package awso-eio
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(* 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_waf open Awso_eio 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 create_byte_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateByteMatchSet input let create_geo_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateGeoMatchSet input let create_i_p_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateIPSet input let create_rate_based_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateRateBasedRule input let create_regex_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateRegexMatchSet input let create_regex_pattern_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateRegexPatternSet input let create_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateRule input let create_rule_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateRuleGroup input let create_size_constraint_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateSizeConstraintSet input let create_sql_injection_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateSqlInjectionMatchSet input let create_web_a_c_l ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateWebACL input let create_web_a_c_l_migration_stack ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateWebACLMigrationStack input let create_xss_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.CreateXssMatchSet input let delete_byte_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteByteMatchSet input let delete_geo_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteGeoMatchSet input let delete_i_p_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteIPSet input let delete_logging_configuration ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteLoggingConfiguration input let delete_permission_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeletePermissionPolicy input let delete_rate_based_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteRateBasedRule input let delete_regex_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteRegexMatchSet input let delete_regex_pattern_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteRegexPatternSet input let delete_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteRule input let delete_rule_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteRuleGroup input let delete_size_constraint_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteSizeConstraintSet input let delete_sql_injection_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteSqlInjectionMatchSet input let delete_web_a_c_l ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteWebACL input let delete_xss_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.DeleteXssMatchSet input let get_byte_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetByteMatchSet input let get_change_token ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetChangeToken input let get_change_token_status ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetChangeTokenStatus input let get_geo_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetGeoMatchSet input let get_i_p_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetIPSet input let get_logging_configuration ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetLoggingConfiguration input let get_permission_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetPermissionPolicy input let get_rate_based_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetRateBasedRule input let get_rate_based_rule_managed_keys ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetRateBasedRuleManagedKeys input let get_regex_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetRegexMatchSet input let get_regex_pattern_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetRegexPatternSet input let get_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetRule input let get_rule_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetRuleGroup input let get_sampled_requests ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetSampledRequests input let get_size_constraint_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetSizeConstraintSet input let get_sql_injection_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetSqlInjectionMatchSet input let get_web_a_c_l ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetWebACL input let get_xss_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.GetXssMatchSet input let list_activated_rules_in_rule_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListActivatedRulesInRuleGroup input let list_byte_match_sets ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListByteMatchSets input let list_geo_match_sets ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListGeoMatchSets input let list_i_p_sets ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListIPSets input let list_logging_configurations ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListLoggingConfigurations input let list_rate_based_rules ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListRateBasedRules input let list_regex_match_sets ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListRegexMatchSets input let list_regex_pattern_sets ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListRegexPatternSets input let list_rule_groups ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListRuleGroups input let list_rules ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListRules input let list_size_constraint_sets ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListSizeConstraintSets input let list_sql_injection_match_sets ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListSqlInjectionMatchSets input let list_subscribed_rule_groups ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListSubscribedRuleGroups input let ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListTagsForResource input let list_web_a_c_ls ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListWebACLs input let list_xss_match_sets ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.ListXssMatchSets input let put_logging_configuration ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutLoggingConfiguration input let put_permission_policy ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.PutPermissionPolicy 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_byte_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateByteMatchSet input let update_geo_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateGeoMatchSet input let update_i_p_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateIPSet input let update_rate_based_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateRateBasedRule input let update_regex_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateRegexMatchSet input let update_regex_pattern_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateRegexPatternSet input let update_rule ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateRule input let update_rule_group ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateRuleGroup input let update_size_constraint_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateSizeConstraintSet input let update_sql_injection_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateSqlInjectionMatchSet input let update_web_a_c_l ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateWebACL input let update_xss_match_set ?endpoint_url ?cfg input = eval ?endpoint_url ?cfg Endpoints.UpdateXssMatchSet input