Source file io.ml

(* 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_sesv2
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 batch_get_metric_data ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.BatchGetMetricData input
let cancel_export_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CancelExportJob input
let create_configuration_set ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateConfigurationSet input
let create_configuration_set_event_destination ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateConfigurationSetEventDestination
    input
let create_contact ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateContact input
let create_contact_list ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateContactList input
let create_custom_verification_email_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateCustomVerificationEmailTemplate
    input
let create_dedicated_ip_pool ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateDedicatedIpPool input
let create_deliverability_test_report ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateDeliverabilityTestReport input
let create_email_identity ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateEmailIdentity input
let create_email_identity_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateEmailIdentityPolicy input
let create_email_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateEmailTemplate input
let create_export_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateExportJob input
let create_import_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateImportJob input
let create_multi_region_endpoint ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateMultiRegionEndpoint input
let create_tenant ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateTenant input
let create_tenant_resource_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.CreateTenantResourceAssociation input
let delete_configuration_set ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteConfigurationSet input
let delete_configuration_set_event_destination ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteConfigurationSetEventDestination
    input
let delete_contact ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteContact input
let delete_contact_list ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteContactList input
let delete_custom_verification_email_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteCustomVerificationEmailTemplate
    input
let delete_dedicated_ip_pool ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteDedicatedIpPool input
let delete_email_identity ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteEmailIdentity input
let delete_email_identity_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteEmailIdentityPolicy input
let delete_email_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteEmailTemplate input
let delete_multi_region_endpoint ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteMultiRegionEndpoint input
let delete_suppressed_destination ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteSuppressedDestination input
let delete_tenant ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteTenant input
let delete_tenant_resource_association ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.DeleteTenantResourceAssociation input
let get_account ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetAccount input
let get_blacklist_reports ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetBlacklistReports input
let get_configuration_set ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetConfigurationSet input
let get_configuration_set_event_destinations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetConfigurationSetEventDestinations
    input
let get_contact ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetContact input
let get_contact_list ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetContactList input
let get_custom_verification_email_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetCustomVerificationEmailTemplate input
let get_dedicated_ip ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetDedicatedIp input
let get_dedicated_ip_pool ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetDedicatedIpPool input
let get_dedicated_ips ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetDedicatedIps input
let get_deliverability_dashboard_options ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetDeliverabilityDashboardOptions input
let get_deliverability_test_report ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetDeliverabilityTestReport input
let get_domain_deliverability_campaign ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetDomainDeliverabilityCampaign input
let get_domain_statistics_report ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetDomainStatisticsReport input
let get_email_address_insights ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetEmailAddressInsights input
let get_email_identity ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetEmailIdentity input
let get_email_identity_policies ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetEmailIdentityPolicies input
let get_email_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetEmailTemplate input
let get_export_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetExportJob input
let get_import_job ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetImportJob input
let get_message_insights ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetMessageInsights input
let get_multi_region_endpoint ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetMultiRegionEndpoint input
let get_reputation_entity ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetReputationEntity input
let get_suppressed_destination ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetSuppressedDestination input
let get_tenant ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.GetTenant input
let list_configuration_sets ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListConfigurationSets input
let list_contact_lists ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListContactLists input
let list_contacts ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListContacts input
let list_custom_verification_email_templates ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListCustomVerificationEmailTemplates
    input
let list_dedicated_ip_pools ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListDedicatedIpPools input
let list_deliverability_test_reports ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListDeliverabilityTestReports input
let list_domain_deliverability_campaigns ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListDomainDeliverabilityCampaigns input
let list_email_identities ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListEmailIdentities input
let list_email_templates ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListEmailTemplates input
let list_export_jobs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListExportJobs input
let list_import_jobs ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListImportJobs input
let list_multi_region_endpoints ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListMultiRegionEndpoints input
let list_recommendations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListRecommendations input
let list_reputation_entities ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListReputationEntities input
let list_resource_tenants ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListResourceTenants input
let list_suppressed_destinations ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListSuppressedDestinations input
let list_tags_for_resource ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input
let list_tenant_resources ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListTenantResources input
let list_tenants ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.ListTenants input
let put_account_dedicated_ip_warmup_attributes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutAccountDedicatedIpWarmupAttributes
    input
let put_account_details ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutAccountDetails input
let put_account_sending_attributes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutAccountSendingAttributes input
let put_account_suppression_attributes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutAccountSuppressionAttributes input
let put_account_vdm_attributes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutAccountVdmAttributes input
let put_configuration_set_archiving_options ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutConfigurationSetArchivingOptions input
let put_configuration_set_delivery_options ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutConfigurationSetDeliveryOptions input
let put_configuration_set_reputation_options ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutConfigurationSetReputationOptions
    input
let put_configuration_set_sending_options ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutConfigurationSetSendingOptions input
let put_configuration_set_suppression_options ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutConfigurationSetSuppressionOptions
    input
let put_configuration_set_tracking_options ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutConfigurationSetTrackingOptions input
let put_configuration_set_vdm_options ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutConfigurationSetVdmOptions input
let put_dedicated_ip_in_pool ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutDedicatedIpInPool input
let put_dedicated_ip_pool_scaling_attributes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutDedicatedIpPoolScalingAttributes input
let put_dedicated_ip_warmup_attributes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutDedicatedIpWarmupAttributes input
let put_deliverability_dashboard_option ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutDeliverabilityDashboardOption input
let put_email_identity_configuration_set_attributes ?endpoint_url ?cfg input
  =
  eval ?endpoint_url ?cfg
    Endpoints.PutEmailIdentityConfigurationSetAttributes input
let put_email_identity_dkim_attributes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutEmailIdentityDkimAttributes input
let put_email_identity_dkim_signing_attributes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutEmailIdentityDkimSigningAttributes
    input
let put_email_identity_feedback_attributes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutEmailIdentityFeedbackAttributes input
let put_email_identity_mail_from_attributes ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutEmailIdentityMailFromAttributes input
let put_suppressed_destination ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.PutSuppressedDestination input
let send_bulk_email ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.SendBulkEmail input
let send_custom_verification_email ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.SendCustomVerificationEmail input
let send_email ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.SendEmail input
let tag_resource ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.TagResource input
let test_render_email_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.TestRenderEmailTemplate input
let untag_resource ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UntagResource input
let update_configuration_set_event_destination ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateConfigurationSetEventDestination
    input
let update_contact ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateContact input
let update_contact_list ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateContactList input
let update_custom_verification_email_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateCustomVerificationEmailTemplate
    input
let update_email_identity_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateEmailIdentityPolicy input
let update_email_template ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateEmailTemplate input
let update_reputation_entity_customer_managed_status ?endpoint_url ?cfg input
  =
  eval ?endpoint_url ?cfg
    Endpoints.UpdateReputationEntityCustomerManagedStatus input
let update_reputation_entity_policy ?endpoint_url ?cfg input =
  eval ?endpoint_url ?cfg Endpoints.UpdateReputationEntityPolicy input