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
open Awso_imagebuilder
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 cancel_image_creation ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CancelImageCreation input
let cancel_lifecycle_execution ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CancelLifecycleExecution input
let create_component ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateComponent input
let create_container_recipe ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateContainerRecipe input
let create_distribution_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateDistributionConfiguration input
let create_image ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateImage input
let create_image_pipeline ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateImagePipeline input
let create_image_recipe ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateImageRecipe input
let create_infrastructure_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateInfrastructureConfiguration input
let create_lifecycle_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateLifecyclePolicy input
let create_workflow ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.CreateWorkflow input
let delete_component ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteComponent input
let delete_container_recipe ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteContainerRecipe input
let delete_distribution_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteDistributionConfiguration input
let delete_image ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteImage input
let delete_image_pipeline ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteImagePipeline input
let delete_image_recipe ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteImageRecipe input
let delete_infrastructure_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteInfrastructureConfiguration input
let delete_lifecycle_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteLifecyclePolicy input
let delete_workflow ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DeleteWorkflow input
let distribute_image ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.DistributeImage input
let get_component ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetComponent input
let get_component_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetComponentPolicy input
let get_container_recipe ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetContainerRecipe input
let get_container_recipe_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetContainerRecipePolicy input
let get_distribution_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetDistributionConfiguration input
let get_image ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetImage input
let get_image_pipeline ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetImagePipeline input
let get_image_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetImagePolicy input
let get_image_recipe ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetImageRecipe input
let get_image_recipe_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetImageRecipePolicy input
let get_infrastructure_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetInfrastructureConfiguration input
let get_lifecycle_execution ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetLifecycleExecution input
let get_lifecycle_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetLifecyclePolicy input
let get_marketplace_resource ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetMarketplaceResource input
let get_workflow ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetWorkflow input
let get_workflow_execution ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetWorkflowExecution input
let get_workflow_step_execution ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.GetWorkflowStepExecution input
let import_component ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ImportComponent input
let import_disk_image ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ImportDiskImage input
let import_vm_image ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ImportVmImage input
let list_component_build_versions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListComponentBuildVersions input
let list_components ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListComponents input
let list_container_recipes ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListContainerRecipes input
let list_distribution_configurations ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListDistributionConfigurations input
let list_image_build_versions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListImageBuildVersions input
let list_image_packages ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListImagePackages input
let list_image_pipeline_images ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListImagePipelineImages input
let list_image_pipelines ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListImagePipelines input
let list_image_recipes ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListImageRecipes input
let list_image_scan_finding_aggregations ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListImageScanFindingAggregations input
let list_image_scan_findings ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListImageScanFindings input
let list_images ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListImages input
let list_infrastructure_configurations ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListInfrastructureConfigurations input
let list_lifecycle_execution_resources ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListLifecycleExecutionResources input
let list_lifecycle_executions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListLifecycleExecutions input
let list_lifecycle_policies ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListLifecyclePolicies input
let list_tags_for_resource ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let list_waiting_workflow_steps ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListWaitingWorkflowSteps input
let list_workflow_build_versions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListWorkflowBuildVersions input
let list_workflow_executions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListWorkflowExecutions input
let list_workflow_step_executions ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListWorkflowStepExecutions input
let list_workflows ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.ListWorkflows input
let put_component_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutComponentPolicy input
let put_container_recipe_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutContainerRecipePolicy input
let put_image_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutImagePolicy input
let put_image_recipe_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.PutImageRecipePolicy input
let retry_image ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.RetryImage input
let send_workflow_step_action ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.SendWorkflowStepAction input
let start_image_pipeline_execution ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartImagePipelineExecution input
let start_resource_state_update ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.StartResourceStateUpdate 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_distribution_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateDistributionConfiguration input
let update_image_pipeline ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateImagePipeline input
let update_infrastructure_configuration ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateInfrastructureConfiguration input
let update_lifecycle_policy ?endpoint_url ?cfg input =
eval ?endpoint_url ?cfg Endpoints.UpdateLifecyclePolicy input