MediaConnect.FlowSourcesee http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flowsource.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-flowsource-encryption.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediaconnect-flowsource-vpcinterfaceattachment.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-flowsource-gatewaybridgesource.html
type properties = {stream_id : string option;description : string;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;whitelist_cidr : string option;entitlement_arn : string option;min_latency : int option;vpc_interface_name : string option;max_bitrate : int option;protocol : string option;flow_arn : string option;max_latency : int option;}see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-mediaconnect-flowsource.html;
val make_properties :
?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 ->
?min_latency:int ->
?vpc_interface_name:string ->
?max_bitrate:int ->
?protocol:string ->
?flow_arn:string ->
?max_latency:int ->
unit ->
propertiesval 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 ->
encryptionval make_vpc_interface_attachment :
?vpc_interface_name:string ->
unit ->
vpc_interface_attachmentval make_gateway_bridge_source :
bridge_arn:string ->
?vpc_interface_attachment:vpc_interface_attachment ->
unit ->
gateway_bridge_sourceval yojson_of_encryption :
encryption ->
[> `Assoc of (string * Yojson.Safe.t) list ]val yojson_of_vpc_interface_attachment :
vpc_interface_attachment ->
Yojson.Safe.tval yojson_of_gateway_bridge_source :
gateway_bridge_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