EC2.SecurityGroupsee http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-security-group.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html
and ingress = {cidr_ip : string option;cidr_ipv6 : string option;description : string option;from_port : int option;ip_protocol : string;source_prefix_list_id : string option;source_security_group_id : string option;source_security_group_name : string option;source_security_group_owner_id : string option;to_port : int option;}see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-security-group-rule.html
and egress = {cidr_ip : string option;cidr_ipv6 : string option;description : string option;destination_prefix_list_id : string option;destination_security_group_id : string option;from_port : int option;ip_protocol : string;to_port : int option;}see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-security-group-rule.html
type properties = {group_description : string;group_name : string option;security_group_egress : egress list option;security_group_ingress : ingress list option;vpc_id : string option;}see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-security-group.html;
val make_properties :
group_description:string ->
?group_name:string ->
?security_group_egress:egress list ->
?security_group_ingress:ingress list ->
?tags:tag list ->
?vpc_id:string ->
unit ->
propertiesval make_tag : key:string -> value:string -> unit -> tagval make_ingress :
?cidr_ip:string ->
?cidr_ipv6:string ->
?description:string ->
?from_port:int ->
ip_protocol:string ->
?source_prefix_list_id:string ->
?source_security_group_id:string ->
?source_security_group_name:string ->
?source_security_group_owner_id:string ->
?to_port:int ->
unit ->
ingressval make_egress :
?cidr_ip:string ->
?cidr_ipv6:string ->
?description:string ->
?destination_prefix_list_id:string ->
?destination_security_group_id:string ->
?from_port:int ->
ip_protocol:string ->
?to_port:int ->
unit ->
egressval yojson_of_tag : tag -> [> `Assoc of (string * Yojson.Safe.t) list ]val yojson_of_ingress : ingress -> [> `Assoc of (string * Yojson.Safe.t) list ]val yojson_of_egress : egress -> [> `Assoc of (string * Yojson.Safe.t) list ]val yojson_of_properties :
properties ->
[> `Assoc of (string * Yojson.Safe.t) list ]val create_attributes : string -> attributes