2010-03-16 18:46:21 -04:00
module Fog
module AWS
2010-09-08 17:40:02 -04:00
class Compute
2010-03-16 18:46:21 -04:00
class Real
2009-09-16 23:02:32 -04:00
2011-02-22 22:05:14 -05:00
require 'fog/compute/parsers/aws/basic'
2009-09-16 23:02:32 -04:00
# Remove permissions from a security group
#
# ==== Parameters
2011-03-03 18:44:49 -05:00
# * 'GroupName'<~String> - Name of group
2009-09-16 23:02:32 -04:00
# * options<~Hash>:
# * 'SourceSecurityGroupName'<~String> - Name of security group to authorize
# * 'SourceSecurityGroupOwnerId'<~String> - Name of owner to authorize
# or
# * 'CidrIp' - CIDR range
# * 'FromPort' - Start of port range (or -1 for ICMP wildcard)
# * 'IpProtocol' - Ip protocol, must be in ['tcp', 'udp', 'icmp']
# * 'ToPort' - End of port range (or -1 for ICMP wildcard)
#
# === Returns
2009-11-02 21:48:49 -05:00
# * response<~Excon::Response>:
2009-09-16 23:02:32 -04:00
# * body<~Hash>:
# * 'requestId'<~String> - Id of request
# * 'return'<~Boolean> - success?
2011-03-03 18:44:49 -05:00
def revoke_security_group_ingress ( group_name , options = { } )
if group_name . is_a? ( Hash )
location = caller . first
warning = " [yellow][WARN] Fog::AWS::Compute # revoke_security_group_ingress now requires the 'group_name' parameter. Only specifying an options hash is now deprecated "
warning << " [light_black]( " << location << " )[/] "
Formatador . display_line ( warning )
options = group_name
group_name = options [ 'GroupName' ]
end
2009-09-16 23:02:32 -04:00
request ( {
2010-05-24 17:22:35 -04:00
'Action' = > 'RevokeSecurityGroupIngress' ,
2011-03-03 18:44:49 -05:00
'GroupName' = > group_name ,
2010-05-24 17:22:35 -04:00
:idempotent = > true ,
2010-09-08 17:40:02 -04:00
:parser = > Fog :: Parsers :: AWS :: Compute :: Basic . new
2010-03-16 01:15:33 -04:00
} . merge! ( options ) )
2009-09-16 23:02:32 -04:00
end
2009-07-14 18:02:56 -04:00
end
2009-09-16 23:02:32 -04:00
2010-03-16 18:46:21 -04:00
class Mock
2009-07-14 18:02:56 -04:00
2011-03-03 18:44:49 -05:00
def revoke_security_group_ingress ( group_name , options = { } )
if group_name . is_a? ( Hash )
location = caller . first
warning = " [yellow][WARN] Fog::AWS::Compute # revoke_security_group_ingress now requires the 'group_name' parameter. Only specifying an options hash is now deprecated "
warning << " [light_black]( " << location << " )[/] "
Formatador . display_line ( warning )
options = group_name
group_name = options [ 'GroupName' ]
end
2010-05-24 20:41:01 -04:00
response = Excon :: Response . new
2011-03-03 18:44:49 -05:00
group = @data [ :security_groups ] [ group_name ]
2010-05-24 20:41:01 -04:00
if group
2011-03-03 18:44:49 -05:00
if options [ 'SourceSecurityGroupName' ] && options [ 'SourceSecurityGroupOwnerId' ]
2010-05-24 20:41:01 -04:00
group [ 'ipPermissions' ] . delete_if { | permission |
2011-03-03 18:44:49 -05:00
permission [ 'groups' ] . first [ 'groupName' ] == group_name
2010-05-24 20:41:01 -04:00
}
else
ingress = group [ 'ipPermissions' ] . select { | permission |
permission [ 'fromPort' ] == options [ 'FromPort' ] &&
permission [ 'ipProtocol' ] == options [ 'IpProtocol' ] &&
permission [ 'toPort' ] == options [ 'ToPort' ] &&
(
permission [ 'ipRanges' ] . empty? ||
(
permission [ 'ipRanges' ] . first &&
permission [ 'ipRanges' ] . first [ 'cidrIp' ] == options [ 'CidrIp' ]
)
)
} . first
group [ 'ipPermissions' ] . delete ( ingress )
end
2010-02-02 01:53:18 -05:00
response . status = 200
response . body = {
'requestId' = > Fog :: AWS :: Mock . request_id ,
'return' = > true
}
2010-05-26 01:26:20 -04:00
response
2010-05-24 20:41:01 -04:00
else
2011-03-03 18:44:49 -05:00
raise Fog :: AWS :: Compute :: NotFound . new ( " The security group ' #{ group_name } ' does not exist " )
2010-02-02 01:53:18 -05:00
end
2009-09-16 23:02:32 -04:00
end
end
2009-07-14 18:02:56 -04:00
end
end
end