MediaStore.Containersee http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediastore-container.html
type cors_rule = {allowed_methods : string list option;allowed_origins : string list option;expose_headers : string list option;max_age_seconds : int option;allowed_headers : string list option;}see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediastore-container-corsrule.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediastore-container-metricpolicyrule.html
and metric_policy = {container_level_metrics : string;metric_policy_rules : metric_policy_rule list option;}see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediastore-container-metricpolicy.html
type properties = {policy : string option;metric_policy : metric_policy option;container_name : string;cors_policy : cors_rule list option;lifecycle_policy : string option;access_logging_enabled : bool option;}see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediastore-container.html;
val make_properties :
?policy:string ->
?metric_policy:metric_policy ->
container_name:string ->
?cors_policy:cors_rule list ->
?lifecycle_policy:string ->
?access_logging_enabled:bool ->
?tags:tag list ->
unit ->
propertiesval make_cors_rule :
?allowed_methods:string list ->
?allowed_origins:string list ->
?expose_headers:string list ->
?max_age_seconds:int ->
?allowed_headers:string list ->
unit ->
cors_ruleval make_tag : key:string -> value:string -> unit -> tagval make_metric_policy_rule :
object_group:string ->
object_group_name:string ->
unit ->
metric_policy_ruleval make_metric_policy :
container_level_metrics:string ->
?metric_policy_rules:metric_policy_rule list ->
unit ->
metric_policyval yojson_of_cors_rule :
cors_rule ->
[> `Assoc of (string * Yojson.Safe.t) list ]val yojson_of_tag : tag -> [> `Assoc of (string * Yojson.Safe.t) list ]val yojson_of_metric_policy_rule : metric_policy_rule -> Yojson.Safe.tval yojson_of_metric_policy :
metric_policy ->
[> `Assoc of (string * Yojson.Safe.t) list ]val yojson_of_properties :
properties ->
[> `Assoc of (string * Yojson.Safe.t) list ]val create_attributes : string -> attributes