@@ -97,7 +97,7 @@ instance ToJSON LatLng where
9797--
9898-- /See:/ 'attachmentInfo' smart constructor.
9999data AttachmentInfo = AttachmentInfo'
100− { _aiData :: !(Maybe Base64)
100+ { _aiData :: !(Maybe Bytes)
101101 , _aiNamespacedType :: !(Maybe Text)
102102 } deriving (Eq,Show,Data,Typeable,Generic)
103103
@@ -120,7 +120,7 @@ attachmentInfo =
120120aiData :: Lens' AttachmentInfo (Maybe ByteString)
121121aiData
122122 = lens _aiData (\ s a -> s{_aiData = a}) .
123− mapping _Base64
123+ mapping _Bytes
124124
125125-- | Specifies what kind of attachment this is. Tells a client how to
126126-- interpret the \`data\` field. Format is namespace\/type, for example
@@ -378,10 +378,10 @@ instance ToJSON Namespace where
378378data EphemeralIdRegistration = EphemeralIdRegistration'
379379 { _eirRotationPeriodExponent :: !(Maybe (Textual Word32))
380380 , _eirInitialClockValue :: !(Maybe (Textual Word64))
381− , _eirBeaconIdentityKey :: !(Maybe Base64)
382− , _eirBeaconEcdhPublicKey :: !(Maybe Base64)
383− , _eirInitialEid :: !(Maybe Base64)
384− , _eirServiceEcdhPublicKey :: !(Maybe Base64)
381+ , _eirBeaconIdentityKey :: !(Maybe Bytes)
382+ , _eirBeaconEcdhPublicKey :: !(Maybe Bytes)
383+ , _eirInitialEid :: !(Maybe Bytes)
384+ , _eirServiceEcdhPublicKey :: !(Maybe Bytes)
385385 } deriving (Eq,Show,Data,Typeable,Generic)
386386
387387-- | Creates a value of 'EphemeralIdRegistration' with the minimum fields required to make a request.
@@ -442,7 +442,7 @@ eirBeaconIdentityKey :: Lens' EphemeralIdRegistration (Maybe ByteString)
442442eirBeaconIdentityKey
443443 = lens _eirBeaconIdentityKey
444444 (\ s a -> s{_eirBeaconIdentityKey = a})
445− . mapping _Base64
445+ . mapping _Bytes
446446
447447-- | The beacon\'s public key used for the Elliptic curve Diffie-Hellman key
448448-- exchange. When this field is populated, \`service_ecdh_public_key\` must
@@ -451,7 +451,7 @@ eirBeaconEcdhPublicKey :: Lens' EphemeralIdRegistration (Maybe ByteString)
451451eirBeaconEcdhPublicKey
452452 = lens _eirBeaconEcdhPublicKey
453453 (\ s a -> s{_eirBeaconEcdhPublicKey = a})
454− . mapping _Base64
454+ . mapping _Bytes
455455
456456-- | An initial ephemeral ID calculated using the clock value submitted as
457457-- \`initial_clock_value\`, and the secret key generated by the
@@ -462,7 +462,7 @@ eirInitialEid :: Lens' EphemeralIdRegistration (Maybe ByteString)
462462eirInitialEid
463463 = lens _eirInitialEid
464464 (\ s a -> s{_eirInitialEid = a})
465− . mapping _Base64
465+ . mapping _Bytes
466466
467467-- | The service\'s public key used for the Elliptic curve Diffie-Hellman key
468468-- exchange. When this field is populated, \`beacon_ecdh_public_key\` must
@@ -471,7 +471,7 @@ eirServiceEcdhPublicKey :: Lens' EphemeralIdRegistration (Maybe ByteString)
471471eirServiceEcdhPublicKey
472472 = lens _eirServiceEcdhPublicKey
473473 (\ s a -> s{_eirServiceEcdhPublicKey = a})
474− . mapping _Base64
474+ . mapping _Bytes
475475
476476instance FromJSON EphemeralIdRegistration where
477477 parseJSON
@@ -616,7 +616,7 @@ data Beacon = Beacon'
616616 , _bEphemeralIdRegistration :: !(Maybe EphemeralIdRegistration)
617617 , _bIndoorLevel :: !(Maybe IndoorLevel)
618618 , _bExpectedStability :: !(Maybe Text)
619− , _bProvisioningKey :: !(Maybe Base64)
619+ , _bProvisioningKey :: !(Maybe Bytes)
620620 , _bDescription :: !(Maybe Text)
621621 , _bPlaceId :: !(Maybe Text)
622622 , _bAdvertisedId :: !(Maybe AdvertisedId)
@@ -722,7 +722,7 @@ bProvisioningKey :: Lens' Beacon (Maybe ByteString)
722722bProvisioningKey
723723 = lens _bProvisioningKey
724724 (\ s a -> s{_bProvisioningKey = a})
725− . mapping _Base64
725+ . mapping _Bytes
726726
727727-- | Free text used to identify and describe the beacon. Maximum length 140
728728-- characters. Optional.
@@ -934,7 +934,7 @@ instance ToJSON IndoorLevel where
934934data EphemeralIdRegistrationParams = EphemeralIdRegistrationParams'
935935 { _eirpMinRotationPeriodExponent :: !(Maybe (Textual Word32))
936936 , _eirpMaxRotationPeriodExponent :: !(Maybe (Textual Word32))
937− , _eirpServiceEcdhPublicKey :: !(Maybe Base64)
937+ , _eirpServiceEcdhPublicKey :: !(Maybe Bytes)
938938 } deriving (Eq,Show,Data,Typeable,Generic)
939939
940940-- | Creates a value of 'EphemeralIdRegistrationParams' with the minimum fields required to make a request.
@@ -977,7 +977,7 @@ eirpServiceEcdhPublicKey :: Lens' EphemeralIdRegistrationParams (Maybe ByteStrin
977977eirpServiceEcdhPublicKey
978978 = lens _eirpServiceEcdhPublicKey
979979 (\ s a -> s{_eirpServiceEcdhPublicKey = a})
980− . mapping _Base64
980+ . mapping _Bytes
981981
982982instance FromJSON EphemeralIdRegistrationParams where
983983 parseJSON
@@ -1069,7 +1069,7 @@ instance ToJSON BeaconInfo where
10691069--
10701070-- /See:/ 'observation' smart constructor.
10711071data Observation = Observation'
1072− { _oTelemetry :: !(Maybe Base64)
1072+ { _oTelemetry :: !(Maybe Bytes)
10731073 , _oTimestampMs :: !(Maybe Text)
10741074 , _oAdvertisedId :: !(Maybe AdvertisedId)
10751075 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -1098,7 +1098,7 @@ observation =
10981098oTelemetry :: Lens' Observation (Maybe ByteString)
10991099oTelemetry
11001100 = lens _oTelemetry (\ s a -> s{_oTelemetry = a}) .
1101− mapping _Base64
1101+ mapping _Bytes
11021102
11031103-- | Time when the beacon was observed.
11041104oTimestampMs :: Lens' Observation (Maybe Text)
@@ -1134,7 +1134,7 @@ instance ToJSON Observation where
11341134--
11351135-- /See:/ 'beaconAttachment' smart constructor.
11361136data BeaconAttachment = BeaconAttachment'
1137− { _baData :: !(Maybe Base64)
1137+ { _baData :: !(Maybe Bytes)
11381138 , _baAttachmentName :: !(Maybe Text)
11391139 , _baNamespacedType :: !(Maybe Text)
11401140 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -1164,7 +1164,7 @@ beaconAttachment =
11641164baData :: Lens' BeaconAttachment (Maybe ByteString)
11651165baData
11661166 = lens _baData (\ s a -> s{_baData = a}) .
1167− mapping _Base64
1167+ mapping _Bytes
11681168
11691169-- | Resource name of this attachment. Attachment names have the format:
11701170-- beacons\/beacon_id\/attachments\/attachment_id. Leave this empty on
@@ -1257,7 +1257,7 @@ instance ToJSON ListDiagnosticsResponse where
12571257--
12581258-- /See:/ 'advertisedId' smart constructor.
12591259data AdvertisedId = AdvertisedId'
1260− { _aiId :: !(Maybe Base64)
1260+ { _aiId :: !(Maybe Bytes)
12611261 , _aiType :: !(Maybe Text)
12621262 } deriving (Eq,Show,Data,Typeable,Generic)
12631263
@@ -1283,8 +1283,7 @@ advertisedId =
12831283-- (such as hex) representation thereof. Required.
12841284aiId :: Lens' AdvertisedId (Maybe ByteString)
12851285aiId
1286− = lens _aiId (\ s a -> s{_aiId = a}) .
1287− mapping _Base64
1286+ = lens _aiId (\ s a -> s{_aiId = a}) . mapping _Bytes
12881287
12891288-- | Specifies the identifier type. Required.
12901289aiType :: Lens' AdvertisedId (Maybe Text)