MediaConnect.Flow
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flow.html
type encryption = {
secret_arn : string option;
key_type : string option;
resource_id : string option;
device_id : string option;
region : string option;
constant_initialization_vector : string option;
algorithm : string option;
role_arn : string;
url : string option;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-flow-encryption.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-flow-sourcepriority.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-flow-vpcinterfaceattachment.html
and failover_config = {
state : string option;
source_priority : source_priority option;
failover_mode : string option;
recovery_window : int option;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-flow-failoverconfig.html
and gateway_bridge_source = {
bridge_arn : string;
vpc_interface_attachment : vpc_interface_attachment option;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-flow-gatewaybridgesource.html
and source = {
ingest_ip : string option;
stream_id : string option;
description : string option;
sender_ip_address : string option;
ingest_port : int option;
sender_control_port : int option;
decryption : encryption option;
gateway_bridge_source : gateway_bridge_source option;
source_listener_address : string option;
source_listener_port : int option;
name : string option;
whitelist_cidr : string option;
entitlement_arn : string option;
source_arn : string option;
min_latency : int option;
vpc_interface_name : string option;
max_bitrate : int option;
protocol : string option;
max_latency : int option;
source_ingest_port : string option;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-flow-source.html
type properties = {
source_failover_config : failover_config option;
availability_zone : string option;
source : source;
name : string;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flow.html;
val make_properties :
?source_failover_config:failover_config ->
?availability_zone:string ->
source:source ->
name:string ->
unit ->
properties
val make_encryption :
?secret_arn:string ->
?key_type:string ->
?resource_id:string ->
?device_id:string ->
?region:string ->
?constant_initialization_vector:string ->
?algorithm:string ->
role_arn:string ->
?url:string ->
unit ->
encryption
val make_source_priority : primary_source:string -> unit -> source_priority
val make_vpc_interface_attachment :
?vpc_interface_name:string ->
unit ->
vpc_interface_attachment
val make_failover_config :
?state:string ->
?source_priority:source_priority ->
?failover_mode:string ->
?recovery_window:int ->
unit ->
failover_config
val make_gateway_bridge_source :
bridge_arn:string ->
?vpc_interface_attachment:vpc_interface_attachment ->
unit ->
gateway_bridge_source
val make_source :
?ingest_ip:string ->
?stream_id:string ->
?description:string ->
?sender_ip_address:string ->
?ingest_port:int ->
?sender_control_port:int ->
?decryption:encryption ->
?gateway_bridge_source:gateway_bridge_source ->
?source_listener_address:string ->
?source_listener_port:int ->
?name:string ->
?whitelist_cidr:string ->
?entitlement_arn:string ->
?source_arn:string ->
?min_latency:int ->
?vpc_interface_name:string ->
?max_bitrate:int ->
?protocol:string ->
?max_latency:int ->
?source_ingest_port:string ->
unit ->
source
val yojson_of_encryption : encryption -> Yojson.Safe.t
val yojson_of_source_priority : source_priority -> Yojson.Safe.t
val yojson_of_vpc_interface_attachment :
vpc_interface_attachment ->
Yojson.Safe.t
val yojson_of_failover_config :
failover_config ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_gateway_bridge_source : gateway_bridge_source -> Yojson.Safe.t
val yojson_of_source : source -> [> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_properties :
properties ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val create_attributes : string -> attributes