1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
open Awso_cognito_idp
open Awso_async
module Io = Http.Io
let eval ?endpoint_url ?cfg endpoint input =
Io.bind (Io.resolve_cfg cfg)
(fun cfg ->
let meth = Endpoints.method_of_endpoint endpoint in
let uri = Endpoints.uri_of_endpoint endpoint input in
Io.map
(Io.call ?endpoint_url ~cfg ~service:Values.service meth
(Endpoints.to_request endpoint input) uri)
(fun resp_result -> Endpoints.of_response endpoint resp_result))
let add_custom_attributes ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AddCustomAttributes input
let add_user_pool_client_secret ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AddUserPoolClientSecret input
let admin_add_user_to_group ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminAddUserToGroup input
let admin_confirm_sign_up ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminConfirmSignUp input
let admin_create_user ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminCreateUser input
let admin_delete_user ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminDeleteUser input
let admin_delete_user_attributes ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminDeleteUserAttributes input
let admin_disable_provider_for_user ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminDisableProviderForUser input
let admin_disable_user ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminDisableUser input
let admin_enable_user ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminEnableUser input
let admin_forget_device ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminForgetDevice input
let admin_get_device ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminGetDevice input
let admin_get_user ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminGetUser input
let admin_initiate_auth ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminInitiateAuth input
let admin_link_provider_for_user ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminLinkProviderForUser input
let admin_list_devices ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminListDevices input
let admin_list_groups_for_user ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminListGroupsForUser input
let admin_list_user_auth_events ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminListUserAuthEvents input
let admin_remove_user_from_group ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminRemoveUserFromGroup input
let admin_reset_user_password ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminResetUserPassword input
let admin_respond_to_auth_challenge ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminRespondToAuthChallenge input
let admin_set_user_m_f_a_preference ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminSetUserMFAPreference input
let admin_set_user_password ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminSetUserPassword input
let admin_set_user_settings ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminSetUserSettings input
let admin_update_auth_event_feedback ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminUpdateAuthEventFeedback input
let admin_update_device_status ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminUpdateDeviceStatus input
let admin_update_user_attributes ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminUpdateUserAttributes input
let admin_user_global_sign_out ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AdminUserGlobalSignOut input
let associate_software_token ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.AssociateSoftwareToken input
let change_password ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ChangePassword input
let complete_web_authn_registration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CompleteWebAuthnRegistration input
let confirm_device ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ConfirmDevice input
let confirm_forgot_password ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ConfirmForgotPassword input
let confirm_sign_up ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ConfirmSignUp input
let create_group ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateGroup input
let create_identity_provider ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateIdentityProvider input
let create_managed_login_branding ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateManagedLoginBranding input
let create_resource_server ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateResourceServer input
let create_terms ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateTerms input
let create_user_import_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateUserImportJob input
let create_user_pool ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateUserPool input
let create_user_pool_client ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateUserPoolClient input
let create_user_pool_domain ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateUserPoolDomain input
let delete_group ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteGroup input
let delete_identity_provider ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteIdentityProvider input
let delete_managed_login_branding ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteManagedLoginBranding input
let delete_resource_server ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteResourceServer input
let delete_terms ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteTerms input
let delete_user ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteUser input
let delete_user_attributes ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteUserAttributes input
let delete_user_pool ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteUserPool input
let delete_user_pool_client ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteUserPoolClient input
let delete_user_pool_client_secret ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteUserPoolClientSecret input
let delete_user_pool_domain ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteUserPoolDomain input
let delete_web_authn_credential ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteWebAuthnCredential input
let describe_identity_provider ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeIdentityProvider input
let describe_managed_login_branding ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeManagedLoginBranding input
let describe_managed_login_branding_by_client ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeManagedLoginBrandingByClient
input
let describe_resource_server ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeResourceServer input
let describe_risk_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeRiskConfiguration input
let describe_terms ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeTerms input
let describe_user_import_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeUserImportJob input
let describe_user_pool ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeUserPool input
let describe_user_pool_client ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeUserPoolClient input
let describe_user_pool_domain ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DescribeUserPoolDomain input
let forget_device ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ForgetDevice input
let forgot_password ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ForgotPassword input
let ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetCSVHeader input
let get_device ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetDevice input
let get_group ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetGroup input
let get_identity_provider_by_identifier ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetIdentityProviderByIdentifier input
let get_log_delivery_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetLogDeliveryConfiguration input
let get_signing_certificate ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetSigningCertificate input
let get_tokens_from_refresh_token ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetTokensFromRefreshToken input
let get_u_i_customization ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetUICustomization input
let get_user ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetUser input
let get_user_attribute_verification_code ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetUserAttributeVerificationCode input
let get_user_auth_factors ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetUserAuthFactors input
let get_user_pool_mfa_config ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetUserPoolMfaConfig input
let global_sign_out ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GlobalSignOut input
let initiate_auth ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.InitiateAuth input
let list_devices ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListDevices input
let list_groups ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListGroups input
let list_identity_providers ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListIdentityProviders input
let list_resource_servers ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListResourceServers input
let list_tags_for_resource ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let list_terms ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListTerms input
let list_user_import_jobs ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListUserImportJobs input
let list_user_pool_client_secrets ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListUserPoolClientSecrets input
let list_user_pool_clients ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListUserPoolClients input
let list_user_pools ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListUserPools input
let list_users ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListUsers input
let list_users_in_group ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListUsersInGroup input
let list_web_authn_credentials ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListWebAuthnCredentials input
let resend_confirmation_code ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ResendConfirmationCode input
let respond_to_auth_challenge ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.RespondToAuthChallenge input
let revoke_token ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.RevokeToken input
let set_log_delivery_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetLogDeliveryConfiguration input
let set_risk_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetRiskConfiguration input
let set_u_i_customization ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetUICustomization input
let set_user_m_f_a_preference ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetUserMFAPreference input
let set_user_pool_mfa_config ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetUserPoolMfaConfig input
let set_user_settings ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SetUserSettings input
let sign_up ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SignUp input
let start_user_import_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartUserImportJob input
let start_web_authn_registration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartWebAuthnRegistration input
let stop_user_import_job ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StopUserImportJob input
let tag_resource ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.TagResource input
let untag_resource ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UntagResource input
let update_auth_event_feedback ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateAuthEventFeedback input
let update_device_status ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateDeviceStatus input
let update_group ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateGroup input
let update_identity_provider ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateIdentityProvider input
let update_managed_login_branding ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateManagedLoginBranding input
let update_resource_server ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateResourceServer input
let update_terms ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateTerms input
let update_user_attributes ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateUserAttributes input
let update_user_pool ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateUserPool input
let update_user_pool_client ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateUserPoolClient input
let update_user_pool_domain ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateUserPoolDomain input
let verify_software_token ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.VerifySoftwareToken input
let verify_user_attribute ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.VerifyUserAttribute input