@@ -244,6 +244,7 @@ instance ToJSON VerifyCustomTokenResponse where
244244data IdpConfig = IdpConfig'
245245 { _icClientId :: !(Maybe Text)
246246 , _icEnabled :: !(Maybe Bool)
247+ , _icSecret :: !(Maybe Text)
247248 , _icExperimentPercent :: !(Maybe (Textual Int32))
248249 , _icProvider :: !(Maybe Text)
249250 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -256,6 +257,8 @@ data IdpConfig = IdpConfig'
256257--
257258-- * 'icEnabled'
258259--
260+-- * 'icSecret'
261+--
259262-- * 'icExperimentPercent'
260263--
261264-- * 'icProvider'
@@ -265,6 +268,7 @@ idpConfig =
265268 IdpConfig'
266269 { _icClientId = Nothing
267270 , _icEnabled = Nothing
271+ , _icSecret = Nothing
268272 , _icExperimentPercent = Nothing
269273 , _icProvider = Nothing
270274 }
@@ -279,6 +283,10 @@ icEnabled :: Lens' IdpConfig (Maybe Bool)
279283icEnabled
280284 = lens _icEnabled (\ s a -> s{_icEnabled = a})
281285
286+-- | OAuth2 client secret.
287+icSecret :: Lens' IdpConfig (Maybe Text)
288+icSecret = lens _icSecret (\ s a -> s{_icSecret = a})
289+
282290-- | Percent of users who will be prompted\/redirected federated login for
283291-- this IDP.
284292icExperimentPercent :: Lens' IdpConfig (Maybe Int32)
@@ -298,7 +306,8 @@ instance FromJSON IdpConfig where
298306 (\ o ->
299307 IdpConfig' <$>
300308 (o .:? "clientId") <*> (o .:? "enabled") <*>
301− (o .:? "experimentPercent")
309+ (o .:? "secret")
310+ <*> (o .:? "experimentPercent")
302311 <*> (o .:? "provider"))
303312
304313instance ToJSON IdpConfig where
@@ -307,6 +316,7 @@ instance ToJSON IdpConfig where
307316 (catMaybes
308317 [("clientId" .=) <$> _icClientId,
309318 ("enabled" .=) <$> _icEnabled,
319+ ("secret" .=) <$> _icSecret,
310320 ("experimentPercent" .=) <$> _icExperimentPercent,
311321 ("provider" .=) <$> _icProvider])
312322
@@ -594,6 +604,7 @@ instance ToJSON
594604data SetAccountInfoResponseProviderUserInfoItem = SetAccountInfoResponseProviderUserInfoItem'
595605 { _sairpuiiProviderId :: !(Maybe Text)
596606 , _sairpuiiPhotoURL :: !(Maybe Text)
607+ , _sairpuiiFederatedId :: !(Maybe Text)
597608 , _sairpuiiDisplayName :: !(Maybe Text)
598609 } deriving (Eq,Show,Data,Typeable,Generic)
599610
@@ -605,6 +616,8 @@ data SetAccountInfoResponseProviderUserInfoItem = SetAccountInfoResponseProvider
605616--
606617-- * 'sairpuiiPhotoURL'
607618--
619+-- * 'sairpuiiFederatedId'
620+--
608621-- * 'sairpuiiDisplayName'
609622setAccountInfoResponseProviderUserInfoItem
610623 :: SetAccountInfoResponseProviderUserInfoItem
@@ -612,6 +625,7 @@ setAccountInfoResponseProviderUserInfoItem =
612625 SetAccountInfoResponseProviderUserInfoItem'
613626 { _sairpuiiProviderId = Nothing
614627 , _sairpuiiPhotoURL = Nothing
628+ , _sairpuiiFederatedId = Nothing
615629 , _sairpuiiDisplayName = Nothing
616630 }
617631
@@ -629,6 +643,12 @@ sairpuiiPhotoURL
629643 = lens _sairpuiiPhotoURL
630644 (\ s a -> s{_sairpuiiPhotoURL = a})
631645
646+-- | User\'s identifier at IDP.
647+sairpuiiFederatedId :: Lens' SetAccountInfoResponseProviderUserInfoItem (Maybe Text)
648+sairpuiiFederatedId
649+ = lens _sairpuiiFederatedId
650+ (\ s a -> s{_sairpuiiFederatedId = a})
651+
632652-- | The user\'s display name at the IDP.
633653sairpuiiDisplayName :: Lens' SetAccountInfoResponseProviderUserInfoItem (Maybe Text)
634654sairpuiiDisplayName
@@ -643,7 +663,8 @@ instance FromJSON
643663 (\ o ->
644664 SetAccountInfoResponseProviderUserInfoItem' <$>
645665 (o .:? "providerId") <*> (o .:? "photoUrl") <*>
646− (o .:? "displayName"))
666+ (o .:? "federatedId")
667+ <*> (o .:? "displayName"))
647668
648669instance ToJSON
649670 SetAccountInfoResponseProviderUserInfoItem where
@@ -653,6 +674,7 @@ instance ToJSON
653674 (catMaybes
654675 [("providerId" .=) <$> _sairpuiiProviderId,
655676 ("photoUrl" .=) <$> _sairpuiiPhotoURL,
677+ ("federatedId" .=) <$> _sairpuiiFederatedId,
656678 ("displayName" .=) <$> _sairpuiiDisplayName])
657679
658680-- | Request to verify the password.
@@ -911,20 +933,25 @@ instance ToJSON SignupNewUserResponse where
911933--
912934-- /See:/ 'identitytoolkitRelyingPartySetProjectConfigRequest' smart constructor.
913935data IdentitytoolkitRelyingPartySetProjectConfigRequest = IdentitytoolkitRelyingPartySetProjectConfigRequest'
914− { _irpspcrAPIKey :: !(Maybe Text)
915− , _irpspcrIdpConfig :: !(Maybe [IdpConfig])
916− , _irpspcrChangeEmailTemplate :: !(Maybe EmailTemplate)
917− , _irpspcrDelegatedProjectNumber :: !(Maybe (Textual Int64))
918− , _irpspcrVerifyEmailTemplate :: !(Maybe EmailTemplate)
919− , _irpspcrAllowPasswordUser :: !(Maybe Bool)
920− , _irpspcrResetPasswordTemplate :: !(Maybe EmailTemplate)
921− , _irpspcrUseEmailSending :: !(Maybe Bool)
936+ { _irpspcrAuthorizedDomains :: !(Maybe [Text])
937+ , _irpspcrAPIKey :: !(Maybe Text)
938+ , _irpspcrIdpConfig :: !(Maybe [IdpConfig])
939+ , _irpspcrChangeEmailTemplate :: !(Maybe EmailTemplate)
940+ , _irpspcrDelegatedProjectNumber :: !(Maybe (Textual Int64))
941+ , _irpspcrVerifyEmailTemplate :: !(Maybe EmailTemplate)
942+ , _irpspcrEnableAnonymousUser :: !(Maybe Bool)
943+ , _irpspcrLegacyResetPasswordTemplate :: !(Maybe EmailTemplate)
944+ , _irpspcrAllowPasswordUser :: !(Maybe Bool)
945+ , _irpspcrResetPasswordTemplate :: !(Maybe EmailTemplate)
946+ , _irpspcrUseEmailSending :: !(Maybe Bool)
922947 } deriving (Eq,Show,Data,Typeable,Generic)
923948
924949-- | Creates a value of 'IdentitytoolkitRelyingPartySetProjectConfigRequest' with the minimum fields required to make a request.
925950--
926951-- Use one of the following lenses to modify other fields as desired:
927952--
953+-- * 'irpspcrAuthorizedDomains'
954+--
928955-- * 'irpspcrAPIKey'
929956--
930957-- * 'irpspcrIdpConfig'
@@ -935,6 +962,10 @@ data IdentitytoolkitRelyingPartySetProjectConfigRequest = IdentitytoolkitRelying
935962--
936963-- * 'irpspcrVerifyEmailTemplate'
937964--
965+-- * 'irpspcrEnableAnonymousUser'
966+--
967+-- * 'irpspcrLegacyResetPasswordTemplate'
968+--
938969-- * 'irpspcrAllowPasswordUser'
939970--
940971-- * 'irpspcrResetPasswordTemplate'
@@ -944,16 +975,27 @@ identitytoolkitRelyingPartySetProjectConfigRequest
944975 :: IdentitytoolkitRelyingPartySetProjectConfigRequest
945976identitytoolkitRelyingPartySetProjectConfigRequest =
946977 IdentitytoolkitRelyingPartySetProjectConfigRequest'
947− { _irpspcrAPIKey = Nothing
978+ { _irpspcrAuthorizedDomains = Nothing
979+ , _irpspcrAPIKey = Nothing
948980 , _irpspcrIdpConfig = Nothing
949981 , _irpspcrChangeEmailTemplate = Nothing
950982 , _irpspcrDelegatedProjectNumber = Nothing
951983 , _irpspcrVerifyEmailTemplate = Nothing
984+ , _irpspcrEnableAnonymousUser = Nothing
985+ , _irpspcrLegacyResetPasswordTemplate = Nothing
952986 , _irpspcrAllowPasswordUser = Nothing
953987 , _irpspcrResetPasswordTemplate = Nothing
954988 , _irpspcrUseEmailSending = Nothing
955989 }
956990
991+-- | Authorized domains for widget redirect.
992+irpspcrAuthorizedDomains :: Lens' IdentitytoolkitRelyingPartySetProjectConfigRequest [Text]
993+irpspcrAuthorizedDomains
994+ = lens _irpspcrAuthorizedDomains
995+ (\ s a -> s{_irpspcrAuthorizedDomains = a})
996+ . _Default
997+ . _Coerce
998+
957999-- | Browser API key, needed when making http request to Apiary.
9581000irpspcrAPIKey :: Lens' IdentitytoolkitRelyingPartySetProjectConfigRequest (Maybe Text)
9591001irpspcrAPIKey
@@ -988,6 +1030,18 @@ irpspcrVerifyEmailTemplate
9881030 = lens _irpspcrVerifyEmailTemplate
9891031 (\ s a -> s{_irpspcrVerifyEmailTemplate = a})
9901032
1033+-- | Whether to enable anonymous user.
1034+irpspcrEnableAnonymousUser :: Lens' IdentitytoolkitRelyingPartySetProjectConfigRequest (Maybe Bool)
1035+irpspcrEnableAnonymousUser
1036+ = lens _irpspcrEnableAnonymousUser
1037+ (\ s a -> s{_irpspcrEnableAnonymousUser = a})
1038+
1039+-- | Legacy reset password email template.
1040+irpspcrLegacyResetPasswordTemplate :: Lens' IdentitytoolkitRelyingPartySetProjectConfigRequest (Maybe EmailTemplate)
1041+irpspcrLegacyResetPasswordTemplate
1042+ = lens _irpspcrLegacyResetPasswordTemplate
1043+ (\ s a -> s{_irpspcrLegacyResetPasswordTemplate = a})
1044+
9911045-- | Whether to allow password user sign in or sign up.
9921046irpspcrAllowPasswordUser :: Lens' IdentitytoolkitRelyingPartySetProjectConfigRequest (Maybe Bool)
9931047irpspcrAllowPasswordUser
@@ -1015,10 +1069,14 @@ instance FromJSON
10151069 (\ o ->
10161070 IdentitytoolkitRelyingPartySetProjectConfigRequest'
10171071 <$>
1018− (o .:? "apiKey") <*> (o .:? "idpConfig" .!= mempty)
1072+ (o .:? "authorizedDomains" .!= mempty) <*>
1073+ (o .:? "apiKey")
1074+ <*> (o .:? "idpConfig" .!= mempty)
10191075 <*> (o .:? "changeEmailTemplate")
10201076 <*> (o .:? "delegatedProjectNumber")
10211077 <*> (o .:? "verifyEmailTemplate")
1078+ <*> (o .:? "enableAnonymousUser")
1079+ <*> (o .:? "legacyResetPasswordTemplate")
10221080 <*> (o .:? "allowPasswordUser")
10231081 <*> (o .:? "resetPasswordTemplate")
10241082 <*> (o .:? "useEmailSending"))
@@ -1030,7 +1088,9 @@ instance ToJSON
10301088 IdentitytoolkitRelyingPartySetProjectConfigRequest'{..}
10311089 = object
10321090 (catMaybes
1033− [("apiKey" .=) <$> _irpspcrAPIKey,
1091+ [("authorizedDomains" .=) <$>
1092+ _irpspcrAuthorizedDomains,
1093+ ("apiKey" .=) <$> _irpspcrAPIKey,
10341094 ("idpConfig" .=) <$> _irpspcrIdpConfig,
10351095 ("changeEmailTemplate" .=) <$>
10361096 _irpspcrChangeEmailTemplate,
@@ -1038,6 +1098,10 @@ instance ToJSON
10381098 _irpspcrDelegatedProjectNumber,
10391099 ("verifyEmailTemplate" .=) <$>
10401100 _irpspcrVerifyEmailTemplate,
1101+ ("enableAnonymousUser" .=) <$>
1102+ _irpspcrEnableAnonymousUser,
1103+ ("legacyResetPasswordTemplate" .=) <$>
1104+ _irpspcrLegacyResetPasswordTemplate,
10411105 ("allowPasswordUser" .=) <$>
10421106 _irpspcrAllowPasswordUser,
10431107 ("resetPasswordTemplate" .=) <$>
@@ -1605,15 +1669,17 @@ instance ToJSON DownloadAccountResponse where
16051669--
16061670-- /See:/ 'identitytoolkitRelyingPartyGetProjectConfigResponse' smart constructor.
16071671data IdentitytoolkitRelyingPartyGetProjectConfigResponse = IdentitytoolkitRelyingPartyGetProjectConfigResponse'
1608− { _irpgpcrAuthorizedDomains :: !(Maybe [Text])
1609− , _irpgpcrAPIKey :: !(Maybe Text)
1610− , _irpgpcrIdpConfig :: !(Maybe [IdpConfig])
1611− , _irpgpcrChangeEmailTemplate :: !(Maybe EmailTemplate)
1612− , _irpgpcrVerifyEmailTemplate :: !(Maybe EmailTemplate)
1613− , _irpgpcrAllowPasswordUser :: !(Maybe Bool)
1614− , _irpgpcrResetPasswordTemplate :: !(Maybe EmailTemplate)
1615− , _irpgpcrProjectId :: !(Maybe Text)
1616− , _irpgpcrUseEmailSending :: !(Maybe Bool)
1672+ { _irpgpcrAuthorizedDomains :: !(Maybe [Text])
1673+ , _irpgpcrAPIKey :: !(Maybe Text)
1674+ , _irpgpcrIdpConfig :: !(Maybe [IdpConfig])
1675+ , _irpgpcrChangeEmailTemplate :: !(Maybe EmailTemplate)
1676+ , _irpgpcrVerifyEmailTemplate :: !(Maybe EmailTemplate)
1677+ , _irpgpcrEnableAnonymousUser :: !(Maybe Bool)
1678+ , _irpgpcrLegacyResetPasswordTemplate :: !(Maybe EmailTemplate)
1679+ , _irpgpcrAllowPasswordUser :: !(Maybe Bool)
1680+ , _irpgpcrResetPasswordTemplate :: !(Maybe EmailTemplate)
1681+ , _irpgpcrProjectId :: !(Maybe Text)
1682+ , _irpgpcrUseEmailSending :: !(Maybe Bool)
16171683 } deriving (Eq,Show,Data,Typeable,Generic)
16181684
16191685-- | Creates a value of 'IdentitytoolkitRelyingPartyGetProjectConfigResponse' with the minimum fields required to make a request.
@@ -1630,6 +1696,10 @@ data IdentitytoolkitRelyingPartyGetProjectConfigResponse = IdentitytoolkitRelyin
16301696--
16311697-- * 'irpgpcrVerifyEmailTemplate'
16321698--
1699+-- * 'irpgpcrEnableAnonymousUser'
1700+--
1701+-- * 'irpgpcrLegacyResetPasswordTemplate'
1702+--
16331703-- * 'irpgpcrAllowPasswordUser'
16341704--
16351705-- * 'irpgpcrResetPasswordTemplate'
@@ -1646,6 +1716,8 @@ identitytoolkitRelyingPartyGetProjectConfigResponse =
16461716 , _irpgpcrIdpConfig = Nothing
16471717 , _irpgpcrChangeEmailTemplate = Nothing
16481718 , _irpgpcrVerifyEmailTemplate = Nothing
1719+ , _irpgpcrEnableAnonymousUser = Nothing
1720+ , _irpgpcrLegacyResetPasswordTemplate = Nothing
16491721 , _irpgpcrAllowPasswordUser = Nothing
16501722 , _irpgpcrResetPasswordTemplate = Nothing
16511723 , _irpgpcrProjectId = Nothing
@@ -1686,6 +1758,18 @@ irpgpcrVerifyEmailTemplate
16861758 = lens _irpgpcrVerifyEmailTemplate
16871759 (\ s a -> s{_irpgpcrVerifyEmailTemplate = a})
16881760
1761+-- | Whether anonymous user is enabled.
1762+irpgpcrEnableAnonymousUser :: Lens' IdentitytoolkitRelyingPartyGetProjectConfigResponse (Maybe Bool)
1763+irpgpcrEnableAnonymousUser
1764+ = lens _irpgpcrEnableAnonymousUser
1765+ (\ s a -> s{_irpgpcrEnableAnonymousUser = a})
1766+
1767+-- | Legacy reset password email template.
1768+irpgpcrLegacyResetPasswordTemplate :: Lens' IdentitytoolkitRelyingPartyGetProjectConfigResponse (Maybe EmailTemplate)
1769+irpgpcrLegacyResetPasswordTemplate
1770+ = lens _irpgpcrLegacyResetPasswordTemplate
1771+ (\ s a -> s{_irpgpcrLegacyResetPasswordTemplate = a})
1772+
16891773-- | Whether to allow password user sign in or sign up.
16901774irpgpcrAllowPasswordUser :: Lens' IdentitytoolkitRelyingPartyGetProjectConfigResponse (Maybe Bool)
16911775irpgpcrAllowPasswordUser
@@ -1724,6 +1808,8 @@ instance FromJSON
17241808 <*> (o .:? "idpConfig" .!= mempty)
17251809 <*> (o .:? "changeEmailTemplate")
17261810 <*> (o .:? "verifyEmailTemplate")
1811+ <*> (o .:? "enableAnonymousUser")
1812+ <*> (o .:? "legacyResetPasswordTemplate")
17271813 <*> (o .:? "allowPasswordUser")
17281814 <*> (o .:? "resetPasswordTemplate")
17291815 <*> (o .:? "projectId")
@@ -1744,6 +1830,10 @@ instance ToJSON
17441830 _irpgpcrChangeEmailTemplate,
17451831 ("verifyEmailTemplate" .=) <$>
17461832 _irpgpcrVerifyEmailTemplate,
1833+ ("enableAnonymousUser" .=) <$>
1834+ _irpgpcrEnableAnonymousUser,
1835+ ("legacyResetPasswordTemplate" .=) <$>
1836+ _irpgpcrLegacyResetPasswordTemplate,
17471837 ("allowPasswordUser" .=) <$>
17481838 _irpgpcrAllowPasswordUser,
17491839 ("resetPasswordTemplate" .=) <$>
@@ -3087,6 +3177,8 @@ data SetAccountInfoResponse = SetAccountInfoResponse'
30873177 , _sairProviderUserInfo :: !(Maybe [SetAccountInfoResponseProviderUserInfoItem])
30883178 , _sairExpiresIn :: !(Maybe (Textual Int64))
30893179 , _sairDisplayName :: !(Maybe Text)
3180+ , _sairPasswordHash :: !(Maybe (Textual Word8))
3181+ , _sairLocalId :: !(Maybe Text)
30903182 , _sairNewEmail :: !(Maybe Text)
30913183 , _sairIdToken :: !(Maybe Text)
30923184 } deriving (Eq,Show,Data,Typeable,Generic)
@@ -3109,6 +3201,10 @@ data SetAccountInfoResponse = SetAccountInfoResponse'
31093201--
31103202-- * 'sairDisplayName'
31113203--
3204+-- * 'sairPasswordHash'
3205+--
3206+-- * 'sairLocalId'
3207+--
31123208-- * 'sairNewEmail'
31133209--
31143210-- * 'sairIdToken'
@@ -3123,6 +3219,8 @@ setAccountInfoResponse =
31233219 , _sairProviderUserInfo = Nothing
31243220 , _sairExpiresIn = Nothing
31253221 , _sairDisplayName = Nothing
3222+ , _sairPasswordHash = Nothing
3223+ , _sairLocalId = Nothing
31263224 , _sairNewEmail = Nothing
31273225 , _sairIdToken = Nothing
31283226 }
@@ -3169,6 +3267,18 @@ sairDisplayName
31693267 = lens _sairDisplayName
31703268 (\ s a -> s{_sairDisplayName = a})
31713269
3270+-- | The user\'s hashed password.
3271+sairPasswordHash :: Lens' SetAccountInfoResponse (Maybe Word8)
3272+sairPasswordHash
3273+ = lens _sairPasswordHash
3274+ (\ s a -> s{_sairPasswordHash = a})
3275+ . mapping _Coerce
3276+
3277+-- | The local ID of the user.
3278+sairLocalId :: Lens' SetAccountInfoResponse (Maybe Text)
3279+sairLocalId
3280+ = lens _sairLocalId (\ s a -> s{_sairLocalId = a})
3281+
31723282-- | The new email the user attempts to change to.
31733283sairNewEmail :: Lens' SetAccountInfoResponse (Maybe Text)
31743284sairNewEmail
@@ -3191,6 +3301,8 @@ instance FromJSON SetAccountInfoResponse where
31913301 <*> (o .:? "providerUserInfo" .!= mempty)
31923302 <*> (o .:? "expiresIn")
31933303 <*> (o .:? "displayName")
3304+ <*> (o .:? "passwordHash")
3305+ <*> (o .:? "localId")
31943306 <*> (o .:? "newEmail")
31953307 <*> (o .:? "idToken"))
31963308
@@ -3205,6 +3317,8 @@ instance ToJSON SetAccountInfoResponse where
32053317 ("providerUserInfo" .=) <$> _sairProviderUserInfo,
32063318 ("expiresIn" .=) <$> _sairExpiresIn,
32073319 ("displayName" .=) <$> _sairDisplayName,
3320+ ("passwordHash" .=) <$> _sairPasswordHash,
3321+ ("localId" .=) <$> _sairLocalId,
32083322 ("newEmail" .=) <$> _sairNewEmail,
32093323 ("idToken" .=) <$> _sairIdToken])
32103324
@@ -3213,14 +3327,13 @@ instance ToJSON SetAccountInfoResponse where
32133327--
32143328-- /See:/ 'identitytoolkitRelyingPartySignupNewUserRequest' smart constructor.
32153329data IdentitytoolkitRelyingPartySignupNewUserRequest = IdentitytoolkitRelyingPartySignupNewUserRequest'
3216− { _irpsnurEmail :: !(Maybe Text)
3217− , _irpsnurInstanceId :: !(Maybe Text)
3218− , _irpsnurCaptchaChallenge :: !(Maybe Text)
3219− , _irpsnurReturnSecureToken :: !(Maybe Bool)
3220− , _irpsnurPassword :: !(Maybe Text)
3221− , _irpsnurCaptchaResponse :: !(Maybe Text)
3222− , _irpsnurDisplayName :: !(Maybe Text)
3223− , _irpsnurIdToken :: !(Maybe Text)
3330+ { _irpsnurEmail :: !(Maybe Text)
3331+ , _irpsnurInstanceId :: !(Maybe Text)
3332+ , _irpsnurCaptchaChallenge :: !(Maybe Text)
3333+ , _irpsnurPassword :: !(Maybe Text)
3334+ , _irpsnurCaptchaResponse :: !(Maybe Text)
3335+ , _irpsnurDisplayName :: !(Maybe Text)
3336+ , _irpsnurIdToken :: !(Maybe Text)
32243337 } deriving (Eq,Show,Data,Typeable,Generic)
32253338
32263339-- | Creates a value of 'IdentitytoolkitRelyingPartySignupNewUserRequest' with the minimum fields required to make a request.
@@ -3233,8 +3346,6 @@ data IdentitytoolkitRelyingPartySignupNewUserRequest = IdentitytoolkitRelyingPar
32333346--
32343347-- * 'irpsnurCaptchaChallenge'
32353348--
3236−-- * 'irpsnurReturnSecureToken'
3237−--
32383349-- * 'irpsnurPassword'
32393350--
32403351-- * 'irpsnurCaptchaResponse'
@@ -3249,7 +3360,6 @@ identitytoolkitRelyingPartySignupNewUserRequest =
32493360 { _irpsnurEmail = Nothing
32503361 , _irpsnurInstanceId = Nothing
32513362 , _irpsnurCaptchaChallenge = Nothing
3252− , _irpsnurReturnSecureToken = Nothing
32533363 , _irpsnurPassword = Nothing
32543364 , _irpsnurCaptchaResponse = Nothing
32553365 , _irpsnurDisplayName = Nothing
@@ -3273,12 +3383,6 @@ irpsnurCaptchaChallenge
32733383 = lens _irpsnurCaptchaChallenge
32743384 (\ s a -> s{_irpsnurCaptchaChallenge = a})
32753385
3276−-- | Whether return sts id token and refresh token instead of gitkit token.
3277−irpsnurReturnSecureToken :: Lens' IdentitytoolkitRelyingPartySignupNewUserRequest (Maybe Bool)
3278−irpsnurReturnSecureToken
3279− = lens _irpsnurReturnSecureToken
3280− (\ s a -> s{_irpsnurReturnSecureToken = a})
3281−
32823386-- | The new password of the user.
32833387irpsnurPassword :: Lens' IdentitytoolkitRelyingPartySignupNewUserRequest (Maybe Text)
32843388irpsnurPassword
@@ -3312,7 +3416,6 @@ instance FromJSON
33123416 IdentitytoolkitRelyingPartySignupNewUserRequest' <$>
33133417 (o .:? "email") <*> (o .:? "instanceId") <*>
33143418 (o .:? "captchaChallenge")
3315− <*> (o .:? "returnSecureToken")
33163419 <*> (o .:? "password")
33173420 <*> (o .:? "captchaResponse")
33183421 <*> (o .:? "displayName")
@@ -3327,8 +3430,6 @@ instance ToJSON
33273430 [("email" .=) <$> _irpsnurEmail,
33283431 ("instanceId" .=) <$> _irpsnurInstanceId,
33293432 ("captchaChallenge" .=) <$> _irpsnurCaptchaChallenge,
3330− ("returnSecureToken" .=) <$>
3331− _irpsnurReturnSecureToken,
33323433 ("password" .=) <$> _irpsnurPassword,
33333434 ("captchaResponse" .=) <$> _irpsnurCaptchaResponse,
33343435 ("displayName" .=) <$> _irpsnurDisplayName,
@@ -3357,6 +3458,7 @@ data VerifyAssertionResponse = VerifyAssertionResponse'
33573458 , _varAction :: !(Maybe Text)
33583459 , _varNeedEmail :: !(Maybe Bool)
33593460 , _varFederatedId :: !(Maybe Text)
3461+ , _varOAuthIdToken :: !(Maybe Text)
33603462 , _varAppScheme :: !(Maybe Text)
33613463 , _varExpiresIn :: !(Maybe (Textual Int64))
33623464 , _varInputEmail :: !(Maybe Text)
@@ -3416,6 +3518,8 @@ data VerifyAssertionResponse = VerifyAssertionResponse'
34163518--
34173519-- * 'varFederatedId'
34183520--
3521+-- * 'varOAuthIdToken'
3522+--
34193523-- * 'varAppScheme'
34203524--
34213525-- * 'varExpiresIn'
@@ -3468,6 +3572,7 @@ verifyAssertionResponse =
34683572 , _varAction = Nothing
34693573 , _varNeedEmail = Nothing
34703574 , _varFederatedId = Nothing
3575+ , _varOAuthIdToken = Nothing
34713576 , _varAppScheme = Nothing
34723577 , _varExpiresIn = Nothing
34733578 , _varInputEmail = Nothing
@@ -3603,6 +3708,12 @@ varFederatedId
36033708 = lens _varFederatedId
36043709 (\ s a -> s{_varFederatedId = a})
36053710
3711+-- | The OIDC id token.
3712+varOAuthIdToken :: Lens' VerifyAssertionResponse (Maybe Text)
3713+varOAuthIdToken
3714+ = lens _varOAuthIdToken
3715+ (\ s a -> s{_varOAuthIdToken = a})
3716+
36063717-- | The custom scheme used by mobile app.
36073718varAppScheme :: Lens' VerifyAssertionResponse (Maybe Text)
36083719varAppScheme
@@ -3716,6 +3827,7 @@ instance FromJSON VerifyAssertionResponse where
37163827 <*> (o .:? "action")
37173828 <*> (o .:? "needEmail")
37183829 <*> (o .:? "federatedId")
3830+ <*> (o .:? "oauthIdToken")
37193831 <*> (o .:? "appScheme")
37203832 <*> (o .:? "expiresIn")
37213833 <*> (o .:? "inputEmail")
@@ -3755,6 +3867,7 @@ instance ToJSON VerifyAssertionResponse where
37553867 ("action" .=) <$> _varAction,
37563868 ("needEmail" .=) <$> _varNeedEmail,
37573869 ("federatedId" .=) <$> _varFederatedId,
3870+ ("oauthIdToken" .=) <$> _varOAuthIdToken,
37583871 ("appScheme" .=) <$> _varAppScheme,
37593872 ("expiresIn" .=) <$> _varExpiresIn,
37603873 ("inputEmail" .=) <$> _varInputEmail,