package awso-async

  1. Overview
  2. Docs

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
(* 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_eks
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 associate_access_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.AssociateAccessPolicy input
let associate_encryption_config ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.AssociateEncryptionConfig input
let associate_identity_provider_config ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.AssociateIdentityProviderConfig input
let create_access_entry ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAccessEntry input
let create_addon ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateAddon input
let create_capability ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateCapability input
let create_cluster ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateCluster input
let create_eks_anywhere_subscription ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateEksAnywhereSubscription input
let create_fargate_profile ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateFargateProfile input
let create_nodegroup ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateNodegroup input
let create_pod_identity_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreatePodIdentityAssociation input
let delete_access_entry ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAccessEntry input
let delete_addon ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteAddon input
let delete_capability ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteCapability input
let delete_cluster ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteCluster input
let delete_eks_anywhere_subscription ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteEksAnywhereSubscription input
let delete_fargate_profile ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteFargateProfile input
let delete_nodegroup ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteNodegroup input
let delete_pod_identity_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeletePodIdentityAssociation input
let deregister_cluster ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeregisterCluster input
let describe_access_entry ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeAccessEntry input
let describe_addon ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeAddon input
let describe_addon_configuration ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeAddonConfiguration input
let describe_addon_versions ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeAddonVersions input
let describe_capability ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeCapability input
let describe_cluster ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeCluster input
let describe_cluster_versions ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeClusterVersions input
let describe_eks_anywhere_subscription ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeEksAnywhereSubscription input
let describe_fargate_profile ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeFargateProfile input
let describe_identity_provider_config ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeIdentityProviderConfig input
let describe_insight ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeInsight input
let describe_insights_refresh ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeInsightsRefresh input
let describe_nodegroup ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeNodegroup input
let describe_pod_identity_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribePodIdentityAssociation input
let describe_update ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DescribeUpdate input
let disassociate_access_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DisassociateAccessPolicy input
let disassociate_identity_provider_config ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DisassociateIdentityProviderConfig input
let list_access_entries ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAccessEntries input
let list_access_policies ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAccessPolicies input
let list_addons ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAddons input
let list_associated_access_policies ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListAssociatedAccessPolicies input
let list_capabilities ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListCapabilities input
let list_clusters ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListClusters input
let list_eks_anywhere_subscriptions ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListEksAnywhereSubscriptions input
let list_fargate_profiles ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListFargateProfiles input
let list_identity_provider_configs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListIdentityProviderConfigs input
let list_insights ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListInsights input
let list_nodegroups ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListNodegroups input
let list_pod_identity_associations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListPodIdentityAssociations input
let list_tags_for_resource ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let list_updates ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListUpdates input
let register_cluster ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.RegisterCluster input
let start_insights_refresh ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.StartInsightsRefresh 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_access_entry ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAccessEntry input
let update_addon ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateAddon input
let update_capability ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateCapability input
let update_cluster_config ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateClusterConfig input
let update_cluster_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateClusterVersion input
let update_eks_anywhere_subscription ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateEksAnywhereSubscription input
let update_nodegroup_config ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateNodegroupConfig input
let update_nodegroup_version ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateNodegroupVersion input
let update_pod_identity_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdatePodIdentityAssociation input