Source file io.ml

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
(* generated by: awso-codegen generate-all --botocore-data vendor/botocore/botocore/data -o aws --runtime-dir lib/runtime/awso --cli-dir awso-cli *)
open Awso_macie2
open Awso_lwt
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 accept_invitation ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.AcceptInvitation input
let batch_get_custom_data_identifiers ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.BatchGetCustomDataIdentifiers input
let batch_update_automated_discovery_accounts ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.BatchUpdateAutomatedDiscoveryAccounts
    input
let create_allow_list ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAllowList input
let create_classification_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateClassificationJob input
let create_custom_data_identifier ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateCustomDataIdentifier input
let create_findings_filter ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateFindingsFilter input
let create_invitations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateInvitations input
let create_member ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateMember input
let create_sample_findings ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateSampleFindings input
let decline_invitations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeclineInvitations input
let delete_allow_list ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAllowList input
let delete_custom_data_identifier ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteCustomDataIdentifier input
let delete_findings_filter ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteFindingsFilter input
let delete_invitations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteInvitations input
let delete_member ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteMember input
let describe_buckets ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeBuckets input
let describe_classification_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeClassificationJob input
let describe_organization_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeOrganizationConfiguration input
let disable_macie ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DisableMacie input
let disable_organization_admin_account ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DisableOrganizationAdminAccount input
let disassociate_from_administrator_account ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DisassociateFromAdministratorAccount
    input
let disassociate_from_master_account ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DisassociateFromMasterAccount input
let disassociate_member ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DisassociateMember input
let enable_macie ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.EnableMacie input
let enable_organization_admin_account ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.EnableOrganizationAdminAccount input
let get_administrator_account ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAdministratorAccount input
let get_allow_list ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAllowList input
let get_automated_discovery_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAutomatedDiscoveryConfiguration input
let get_bucket_statistics ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetBucketStatistics input
let get_classification_export_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetClassificationExportConfiguration
    input
let get_classification_scope ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetClassificationScope input
let get_custom_data_identifier ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetCustomDataIdentifier input
let get_finding_statistics ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetFindingStatistics input
let get_findings ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetFindings input
let get_findings_filter ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetFindingsFilter input
let get_findings_publication_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetFindingsPublicationConfiguration input
let get_invitations_count ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetInvitationsCount input
let get_macie_session ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetMacieSession input
let get_master_account ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetMasterAccount input
let get_member ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetMember input
let get_resource_profile ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetResourceProfile input
let get_reveal_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetRevealConfiguration input
let get_sensitive_data_occurrences ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetSensitiveDataOccurrences input
let get_sensitive_data_occurrences_availability ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetSensitiveDataOccurrencesAvailability
    input
let get_sensitivity_inspection_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetSensitivityInspectionTemplate input
let get_usage_statistics ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetUsageStatistics input
let get_usage_totals ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetUsageTotals input
let list_allow_lists ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAllowLists input
let list_automated_discovery_accounts ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAutomatedDiscoveryAccounts input
let list_classification_jobs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListClassificationJobs input
let list_classification_scopes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListClassificationScopes input
let list_custom_data_identifiers ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListCustomDataIdentifiers input
let list_findings ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListFindings input
let list_findings_filters ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListFindingsFilters input
let list_invitations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListInvitations input
let list_managed_data_identifiers ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListManagedDataIdentifiers input
let list_members ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListMembers input
let list_organization_admin_accounts ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListOrganizationAdminAccounts input
let list_resource_profile_artifacts ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListResourceProfileArtifacts input
let list_resource_profile_detections ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListResourceProfileDetections input
let list_sensitivity_inspection_templates ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListSensitivityInspectionTemplates input
let list_tags_for_resource ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let put_classification_export_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutClassificationExportConfiguration
    input
let put_findings_publication_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutFindingsPublicationConfiguration input
let search_resources ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.SearchResources input
let tag_resource ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.TagResource input
let test_custom_data_identifier ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.TestCustomDataIdentifier input
let untag_resource ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UntagResource input
let update_allow_list ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAllowList input
let update_automated_discovery_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAutomatedDiscoveryConfiguration
    input
let update_classification_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateClassificationJob input
let update_classification_scope ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateClassificationScope input
let update_findings_filter ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateFindingsFilter input
let update_macie_session ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateMacieSession input
let update_member_session ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateMemberSession input
let update_organization_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateOrganizationConfiguration input
let update_resource_profile ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateResourceProfile input
let update_resource_profile_detections ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateResourceProfileDetections input
let update_reveal_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateRevealConfiguration input
let update_sensitivity_inspection_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateSensitivityInspectionTemplate input