draw_cloud 0.0.1

data/lib/draw_cloud/route_table.rb

@@ -0,0 +1,56 @@
+# encoding: utf-8
+#
+# Copyright:: Copyright (c) 2012, SweetSpot Diabetes Care, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License"); you
+# may not use this work except in compliance with the License. You may
+# obtain a copy of the License in the LICENSE file, or at:
+#
+# http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+
+#
+
+module DrawCloud
+  class RouteTable < Base
+    attr_accessor :name, :routes
+    def initialize(name, options={}, &block)
+      @name = name
+      @routes = []
+      super(options, &block)
+    end
+
+    def route_table
+      self
+    end
+
+    def to(name, to_cidr, options={})
+      raise(Exeception, "No :via specified") unless options[:via]
+      @routes << RouteTableEntry.new(name, to_cidr, options[:via], options.merge(:parent => self))
+    end
+
+    def load_into_config(config)
+      config.cf_add_resource resource_name, self
+      @routes.each {|r| config.cf_add_resource(r.resource_name, r)}
+      super(config)
+    end
+
+    def resource_name
+      resource_style(name) + "Table"
+    end
+
+    def to_h
+      h = {
+        "Type" => "AWS::EC2::RouteTable",
+        "Properties" => {}
+      }
+      h["Properties"]["VpcId"] = DrawCloud.ref(vpc) if vpc
+      add_standard_properties(h)
+    end
+  end
+end

data/lib/draw_cloud/route_table_entry.rb

@@ -0,0 +1,59 @@
+# encoding: utf-8
+#
+# Copyright:: Copyright (c) 2012, SweetSpot Diabetes Care, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License"); you
+# may not use this work except in compliance with the License. You may
+# obtain a copy of the License in the LICENSE file, or at:
+#
+# http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+
+#
+
+module DrawCloud
+  class RouteTableEntry < Base
+    attr_accessor :name, :to, :via
+    def initialize(name, to, via, options={})
+      @name = name
+      @to = to
+      @via = via
+      super(options)
+    end
+
+    def load_into_config(config)
+      # FIXME: emit error if no table attached
+      config.cf_add_resource resource_name, self
+      super(config)
+    end
+
+    def resource_name
+      route_table.resource_name + "To" + resource_style(name)
+    end
+
+    def to_h
+      h = {
+        "Type" => "AWS::EC2::Route",
+        "Properties" => {
+          "RouteTableId" => DrawCloud.ref(route_table),
+          "DestinationCidrBlock" => to,
+        }
+      }
+      if via.nil?
+        throw ArgumentError, "Route #{resource_name} requires :via"
+      elsif via.internet_gateway
+        h["Properties"]["GatewayId"] = DrawCloud.ref(via.internet_gateway)
+        # TODO: ["NetworkInterfaceId"]
+      elsif via.ec2_instance
+        h["Properties"]["InstanceId"] = DrawCloud.ref(via.ec2_instance)
+      end
+
+      add_standard_properties(h)
+    end
+  end
+end

data/lib/draw_cloud/route_table_entry.rb~

@@ -0,0 +1,33 @@
+module DrawCloud
+  class RouteTableEntry
+    include Base
+
+    attr_accessor :name, :to, :via, :route_table
+    def initialize(name, to, via, options={})
+      @name = name
+      @to = to
+      @via = via
+      @route_table = options.fetch(:route_table, nil)
+    end
+
+    def load_into_config(config)
+      # FIXME: emit error if no table attached
+      config.cf_add_resource resource_name, self
+    end
+
+    def resource_name
+      route_table.resource_name + "To" + resource_style(name)
+    end
+
+    def to_h
+      {
+        "Type" => "AWS::EC2::Route",
+        "Properties" => {
+          "RouteTableId" => route_table.ref,
+          "DestinationCdrBlock" => to,
+          "GatewayId" => via.ref,
+        }
+      }
+    end
+  end
+end

data/lib/draw_cloud/s3_bucket.rb~

@@ -0,0 +1,41 @@
+# encoding: utf-8
+#
+# Copyright:: Copyright (c) 2012, SweetSpot Diabetes Care, Inc.
+# License::   All rights reserved
+#
+
+module DrawCloud
+  class S3Bucket < Base
+    attr_accessor( :name )
+
+    def initialize(name, options={}, &block)
+      @name = name
+      @groups = []
+      @policies = []
+      super(options, &block)
+    end
+
+    def iam_user
+      self
+    end
+
+    def load_into_config(config)
+      config.cf_add_resource resource_name, self
+      super(config)
+    end
+
+    def to_h
+      h = {
+        "Type" => "AWS::IAM::User",
+        "Properties" => {
+        }
+      }
+      h["Properties"]["Path"] = path if path
+      h["Properties"]["Groups"] = groups.collect {|g| DrawCloud.ref(g)} if (groups && !groups.empty?)
+      h["Properties"]["Policies"] = policies.collect {|p| DrawCloud.ref(p)} if (policies && !policies.empty?)
+      h["Properties"]["LoginProfile"] = login_profile if login_profile
+      h["Properties"]["LoginProfile"] = {"Password" => password} if (password && !h["Properties"].key?("LoginProfile"))
+      add_standard_properties(h)
+    end
+  end
+end

data/lib/draw_cloud/security_group.rb

@@ -0,0 +1,85 @@
+# encoding: utf-8
+#
+# Copyright:: Copyright (c) 2012, SweetSpot Diabetes Care, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License"); you
+# may not use this work except in compliance with the License. You may
+# obtain a copy of the License in the LICENSE file, or at:
+#
+# http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+
+#
+
+module DrawCloud
+  class SecurityGroup < Base
+
+    attr_accessor :name, :description, :ingress_rules
+    def initialize(name, description=nil, options={}, &block)
+      @name = name
+      @description = description || name.to_s
+      @ingress_rules = []
+      super(options, &block)
+    end
+
+    def security_group
+      self
+    end
+
+    def allow_security_group_in(protocol, source_security_group_id, from_port, to_port)
+      ingress_rules << {
+        "IpProtocol" => protocol.to_s,
+        "SourceSecurityGroupId" => DrawCloud.ref(source_security_group_id),
+        "FromPort" => from_port.to_s,
+        "ToPort" => to_port.to_s
+      }
+    end
+
+    def allow_cidr_in(protocol, cidr, from_port, to_port)
+      ingress_rules << {
+        "IpProtocol" => protocol.to_s,
+        "CidrIp" => cidr,
+        "FromPort" => from_port.to_s,
+        "ToPort" => to_port.to_s
+      }
+    end
+
+    def provides(services, options={})
+    end
+
+    def consumes(services, options={})
+    end
+
+    def load_into_config(config)
+      config.cf_add_resource resource_name, self
+      super(config)
+    end
+
+    def resource_name
+      resource_style(name) + "SecurityGroup"
+    end
+
+    def check_validity
+      raise(ArgumentError, "Bad description for #{name.inspect} => #{description.inspect}. Must be [a-zA-Z0-9_ -]{0,255}") unless description =~ /^[a-zA-Z0-9_ -]{0,255}$/
+    end
+
+    def to_h
+      check_validity
+      h = {
+        "Type" => "AWS::EC2::SecurityGroup",
+        "Properties" => {
+          "GroupDescription" => description,
+          "SecurityGroupIngress" => ingress_rules,
+          "SecurityGroupEgress" => [],
+        }
+      }
+      h["Properties"]["VpcId"] = DrawCloud.ref(vpc) if vpc
+      add_standard_properties(h)
+    end
+  end
+end

data/lib/draw_cloud/security_group.rb~

@@ -0,0 +1,71 @@
+module DrawCloud
+  class SecurityGroup
+    include Base
+
+    attr_accessor :vpc, :name, :description
+    def initialize(name, options={}, &block)
+      @name = name
+      @vpc = options.fetch(:vpc, nil)
+      @entries = []
+      self.instance_exec(self, &block) if block
+    end
+
+    def allow_in(protocol, cidr=:any, ports_or_types=[])
+      add_entry :allow, protocol, :ingress, cidr, ports_or_types
+    end
+
+    def allow_out(protocol, cidr=:any, ports_or_types=[])
+      add_entry :allow, protocol, :egress, cidr, ports_or_types
+    end
+
+    def deny_in(protocol, cidr=:any, ports_or_types=[])
+      add_entry :deny, protocol, :ingress, cidr, ports_or_types
+    end
+
+    def deny_out(protocol, cidr=:any, ports_or_types=[])
+      add_entry :deny, protocol, :egress, cidr, ports_or_types
+    end
+
+    def provides(service)
+    end
+
+    def consumes(service)
+    end
+
+    def add_entry(action, protocol, direction, cidr, ports_or_types)
+      #entries.concat NetworkAclEntry.entries_from_spec(action, protocol, direction,
+      #                                                 cidr, ports_or_types, :network_acl => self)
+    end
+    private :add_entry
+
+    def load_into_config(config)
+      config.cf_add_resource resource_name, self
+      # ingress_index = 1
+      # egress_index = 1
+      # entries.each do |e|
+      #   if e.outgoing?
+      #     e.index = egress_index * 10
+      #     egress_index += 1
+      #   else
+      #     e.index = ingress_index * 10
+      #     ingress_index += 1
+      #   end
+
+      #   e.load_into_config(config)
+      # end
+    end
+
+    def resource_name
+      resource_style(name) + "SecurityGroup"
+    end
+
+    def to_h
+      h = {
+        "Type" => "AWS::EC2::SecurityGroup",
+        "Properties" => {}
+      }
+      h["Properties"]["VpcId"] = vpc.ref if vpc
+      h
+    end
+  end
+end

data/lib/draw_cloud/service.rb~

@@ -0,0 +1,75 @@
+# encoding: utf-8
+#
+# Copyright:: Copyright (c) 2012, SweetSpot Diabetes Care, Inc.
+# License::   All rights reserved
+#
+
+module DrawCloud
+  class Service
+    attr_accessor :name, :description
+    def initialize(name, description=nil, options={}, &block)
+      @name = name
+      @description = description || name.to_s
+      @entries = []
+      super(options, &block)
+    end
+
+    def security_group
+      self
+    end
+
+    def allow_in(protocol, cidr=:any, ports_or_types=[])
+      add_entry :allow, protocol, :ingress, cidr, ports_or_types
+    end
+
+    def allow_out(protocol, cidr=:any, ports_or_types=[])
+      add_entry :allow, protocol, :egress, cidr, ports_or_types
+    end
+
+    def provides(services, options={})
+    end
+
+    def consumes(services, options={})
+    end
+
+    def add_entry(action, protocol, direction, cidr, ports_or_types)
+      #entries.concat NetworkAclEntry.entries_from_spec(action, protocol, direction,
+      #                                                 cidr, ports_or_types, :network_acl => self)
+    end
+    private :add_entry
+
+    def load_into_config(config)
+      config.cf_add_resource resource_name, self
+      super(config)
+    end
+
+    def resource_name
+      resource_style(name) + "SecurityGroup"
+    end
+
+    def check_validity
+      raise(ArgumentError, "Bad description for #{name.inspect} => #{description.inspect}. Must be [a-zA-Z0-9_ -]{0,255}") unless description =~ /^[a-zA-Z0-9_ -]{0,255}$/
+    end
+
+    def to_h
+      check_validity
+      h = {
+        "Type" => "AWS::EC2::SecurityGroup",
+        "Properties" => {
+          "GroupDescription" => description,
+          "SecurityGroupIngress" => [],
+          "SecurityGroupEgress" => [],
+        }
+      }
+      h["Properties"]["VpcId"] = DrawCloud.ref(vpc) if vpc
+      # HACK HACK HACK
+      h["Properties"]["SecurityGroupIngress"] << {
+        "IpProtocol" => "-1",
+        "CidrIp" => "0.0.0.0/0",
+        "FromPort" => "-1",
+        "ToPort" => "-1",
+      }
+      add_standard_properties(h)
+    end
+  end
+end

data/lib/draw_cloud/simple_ref.rb

@@ -0,0 +1,30 @@
+# encoding: utf-8
+#
+# Copyright:: Copyright (c) 2012, SweetSpot Diabetes Care, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License"); you
+# may not use this work except in compliance with the License. You may
+# obtain a copy of the License in the LICENSE file, or at:
+#
+# http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+# implied. See the License for the specific language governing
+# permissions and limitations under the License.
+
+#
+
+module DrawCloud
+  class SimpleRef
+    attr_accessor :literal
+    def initialize(literal)
+      @literal = literal
+    end
+
+    def ref
+      {"Ref" => literal}
+    end
+  end
+end