package awso-async
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(* 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_sns 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_permission ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.AddPermission input let check_if_phone_number_is_opted_out ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CheckIfPhoneNumberIsOptedOut input let confirm_subscription ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ConfirmSubscription input let create_platform_application ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreatePlatformApplication input let create_platform_endpoint ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreatePlatformEndpoint input let create_s_m_s_sandbox_phone_number ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateSMSSandboxPhoneNumber input let create_topic ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateTopic input let delete_endpoint ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteEndpoint input let delete_platform_application ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeletePlatformApplication input let delete_s_m_s_sandbox_phone_number ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteSMSSandboxPhoneNumber input let delete_topic ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteTopic input let get_data_protection_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetDataProtectionPolicy input let get_endpoint_attributes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetEndpointAttributes input let get_platform_application_attributes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetPlatformApplicationAttributes input let get_s_m_s_attributes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetSMSAttributes input let get_s_m_s_sandbox_account_status ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetSMSSandboxAccountStatus input let get_subscription_attributes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetSubscriptionAttributes input let get_topic_attributes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetTopicAttributes input let list_endpoints_by_platform_application ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListEndpointsByPlatformApplication input let list_origination_numbers ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListOriginationNumbers input let list_phone_numbers_opted_out ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListPhoneNumbersOptedOut input let list_platform_applications ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListPlatformApplications input let list_s_m_s_sandbox_phone_numbers ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListSMSSandboxPhoneNumbers input let list_subscriptions ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListSubscriptions input let list_subscriptions_by_topic ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListSubscriptionsByTopic input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input let list_topics ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListTopics input let opt_in_phone_number ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.OptInPhoneNumber input let publish ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.Publish input let publish_batch ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PublishBatch input let put_data_protection_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutDataProtectionPolicy input let remove_permission ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.RemovePermission input let set_endpoint_attributes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.SetEndpointAttributes input let set_platform_application_attributes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.SetPlatformApplicationAttributes input let set_s_m_s_attributes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.SetSMSAttributes input let set_subscription_attributes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.SetSubscriptionAttributes input let set_topic_attributes ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.SetTopicAttributes input let subscribe ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.Subscribe input let tag_resource ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.TagResource input let unsubscribe ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.Unsubscribe input let untag_resource ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UntagResource input let verify_s_m_s_sandbox_phone_number ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.VerifySMSSandboxPhoneNumber input