fog-terremark 0.0.1

data/lib/fog/compute/terremark/models/servers.rb

@@ -0,0 +1,35 @@
+module Fog
+  module Compute
+    module Terremark
+      class Servers < Fog::Collection
+        model Fog::Compute::Terremark::Server
+
+        def all
+          data = []
+          service.get_vdc(vdc_id).body['ResourceEntities'].select do |entity|
+            data << service.servers.get(entity["href"].split('/').last)
+          end
+          data
+        end
+
+        def get(server_id)
+          if server_id
+            new(service.get_vapp(server_id).body)
+          else
+            nil
+          end
+        end
+
+        def vdc_id
+          @vdc_id ||= service.default_vdc_id
+        end
+
+        private
+
+        def vdc_id=(new_vdc_id)
+          @vdc_id = new_vdc_id
+        end
+      end
+    end
+  end
+end

data/lib/fog/compute/terremark/models/task.rb

@@ -0,0 +1,44 @@
+module Fog
+  module Compute
+    module Terremark
+      class Task < Fog::Model
+        identity :id
+
+        attribute :end_time,    :aliases => 'endTime'
+        attribute :owner,       :aliases => 'Owner'
+        attribute :result,      :aliases => 'Result'
+        attribute :start_time,  :aliases => 'startTime'
+        attribute :status
+        attribute :link,        :aliases => 'Link'
+        attribute :error,       :aliases => 'Error'
+
+        def initialize(attributes = {})
+          new_owner  = attributes.delete('Owner')
+          new_result = attributes.delete('Result')
+          new_error = attributes.delete('Error')
+          new_cancel_link = attributes.delete('Link')
+
+          super
+          self.owner = service.parse(new_owner)
+          if new_result
+            self.result = service.parse(new_result)
+          end
+          self.error = service.parse(new_error) if new_error
+          @cancel_link = service.parse(new_cancel_link) if new_cancel_link
+        end
+
+        def ready?
+          @status == 'success'
+        end
+
+        private
+
+        def href=(new_href)
+          @id = new_href.split('/').last.to_i
+        end
+
+        def type=(_new_type); end
+      end
+    end
+  end
+end

data/lib/fog/compute/terremark/models/tasks.rb

@@ -0,0 +1,41 @@
+module Fog
+  module Compute
+    module Terremark
+      class Tasks < Fog::Collection
+        model Fog::Compute::Terremark::Task
+
+        def all
+          data = service.get_tasks_list(task_list_id).body['Tasks']
+          load(data)
+        end
+
+        def get(task_id)
+          task = service.get_task(task_id).body
+          if task_id && task
+            new(task)
+          elsif !task_id
+            nil
+          end
+        rescue Excon::Errors::Forbidden
+          nil
+        end
+
+        def task_list_id
+          organization = service.get_organization(service.default_organization_id).body
+          @task_list_id ||=
+              if service.default_organization_id && organization
+                organization['Links'].find {|link| link['type'] == 'application/vnd.vmware.vcloud.tasksList+xml'}['href'].split('/').last.to_i
+              else
+                nil
+              end
+        end
+
+        private
+
+        def task_list_id=(new_task_list_id)
+          @task_list_id = new_task_list_id
+        end
+      end
+    end
+  end
+end

data/lib/fog/compute/terremark/models/vdc.rb

@@ -0,0 +1,39 @@
+module Fog
+  module Compute
+    module Terremark
+      class Vdc < Fog::Model
+        identity :id
+
+        attribute :name
+        attribute :ResourceEntities
+        attribute :AvailableNetworks
+        attribute :links
+
+        def networks
+          service.networks(:vdc_id => id)
+        end
+
+        def addresses
+          service.addresses(:vdc_id => id)
+        end
+
+        def servers
+          service.servers(:vdc_id => id)
+        end
+
+        def images
+          service.images(:vdc_id => id)
+        end
+        private
+
+        def href=(new_href)
+          self.id = new_href.split('/').last.to_i
+        end
+
+        def type=(_new_type); end
+
+        def rel=(_new_rel); end
+      end
+    end
+  end
+end

data/lib/fog/compute/terremark/models/vdcs.rb

@@ -0,0 +1,36 @@
+module Fog
+  module Compute
+    module Terremark
+      class Vdcs < Fog::Collection
+        model Fog::Compute::Terremark::Vdc
+
+        def all
+          data = service.get_organization(organization_id).body['Links'].select do |entity|
+            entity['type'] == 'application/vnd.vmware.vcloud.vdc+xml'
+          end
+          load(data)
+        end
+
+        def get(vdc_id)
+          if vdc_id && vdc = service.get_vdc(vdc_id).body
+            new(vdc)
+          elsif !vdc_id
+            nil
+          end
+        rescue Excon::Errors::Forbidden
+          nil
+        end
+
+        def organization_id
+          @organization_id ||= service.default_organization_id
+        end
+
+        private
+
+        def organization_id=(new_organization_id)
+          @organization_id = new_organization_id
+        end
+      end
+    end
+  end
+end

data/lib/fog/compute/terremark/parser.rb

@@ -0,0 +1,16 @@
+module Fog
+  module Compute
+    module Terremark
+      module Parser
+        def parse(data)
+          case data['type']
+            when 'application/vnd.vmware.vcloud.vApp+xml'
+              servers.new(data.merge!(:service => self))
+            else
+              data
+          end
+        end
+      end
+    end
+  end
+end

data/lib/fog/compute/terremark/real.rb

@@ -0,0 +1,67 @@
+module Fog
+  module Compute
+    module Terremark
+      module Real
+        include Common
+
+        private
+
+        def auth_token
+          response = @connection.request({
+                                             :expects   => 200,
+                                             :headers   => {
+                                                 'Authorization' => "Basic #{Base64.encode64("#{@terremark_username}:#{@terremark_password}").chomp!}",
+                                                 'Content-Type'  => "application/vnd.vmware.vcloud.orgList+xml"
+                                             },
+                                             :host      => @host,
+                                             :method    => 'POST',
+                                             :parser    => Fog::Parsers::Terremark::GetOrganizations.new,
+                                             :path      => "#{@path}/login"
+                                         })
+          response.headers['Set-Cookie']
+        end
+
+        def reload
+          @connection.reset
+        end
+
+        def request(params)
+          unless @cookie
+            @cookie = auth_token
+          end
+          begin
+            do_request(params)
+          rescue Excon::Errors::Unauthorized
+            @cookie = auth_token
+            do_request(params)
+          end
+        end
+
+        def do_request(params)
+          headers = {}
+          if @cookie
+            headers.merge!('Cookie' => @cookie)
+          end
+          if params[:path]
+            if params[:override_path] == true
+              path = params[:path]
+            else
+              path = "#{@path}/#{params[:path]}"
+            end
+          else
+            path = "#{@path}"
+          end
+          @connection.request({
+                                  :body     => params[:body],
+                                  :expects  => params[:expects],
+                                  :headers  => headers.merge!(params[:headers] || {}),
+                                  :host     => @host,
+                                  :method   => params[:method],
+                                  :parser   => params[:parser],
+                                  :path     => path
+                              })
+        end
+      end
+    end
+  end
+end

data/lib/fog/compute/terremark/requests/add_internet_service.rb

@@ -0,0 +1,54 @@
+module Fog
+  module Compute
+    module Terremark
+      module Real
+        # Reserve requested resources and deploy vApp
+        #
+        # ==== Parameters
+        # * ip_id<~Integer> - Id of ip to add service to
+        # * name<~String> - Name of service
+        # * protocol<~String> - Protocol of service
+        # * port<~Integer> - Port of service
+        # * options<~Hash>:
+        #   * Enabled<~Boolean>: defaults to true
+        #   * Description<~String>: optional description
+        #
+        # ==== Returns
+        # * response<~Excon::Response>:
+        #   * body<~Hash>:
+        #     * 'endTime'<~String> - endTime of task
+        #     * 'href'<~String> - link to task
+        #     * 'startTime'<~String> - startTime of task
+        #     * 'status'<~String> - status of task
+        #     * 'type'<~String> - type of task
+        #     * 'Owner'<~String> -
+        #       * 'href'<~String> - href of owner
+        #       * 'name'<~String> - name of owner
+        #       * 'type'<~String> - type of owner
+        def add_internet_service(ip_id, name, protocol, port, options = {})
+          unless options.key?('Enabled')
+            options['Enabled'] = true
+          end
+          data = <<-DATA
+          <CreateInternetServiceRequest xml:lang="en" xmlns="urn:tmrk:vCloudExpressExtensions-1.6" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+            <Name>#{name}</Name>
+            <Protocol>#{protocol.upcase}</Protocol>
+            <Port>#{port}</Port>
+            <Enabled>#{options['Enabled']}</Enabled>
+            <Description>#{options['Description']}</Description>
+            </CreateInternetServiceRequest>
+          DATA
+          request(
+              :body     => data,
+              :expects  => 200,
+              :headers  => {'Content-Type' => 'application/xml'},
+              :method   => 'POST',
+              :parser   => Fog::Parsers::Terremark::InternetService.new,
+              :path     => "api/extensions/v1.6/publicIp/#{ip_id}/internetServices",
+              :override_path => true
+          )
+        end
+      end
+    end
+  end
+end

data/lib/fog/compute/terremark/requests/add_node_service.rb

@@ -0,0 +1,51 @@
+module Fog
+  module Compute
+    module Terremark
+      module Real
+        # Reserve requested resources and deploy vApp
+        #
+        # ==== Parameters
+        # * service_id<~String> - Id of service to add node to
+        # * ip<~String> - Private ip of server to add to node
+        # * name<~String> - Name of service
+        # * port<~Integer> - Port of service
+        # * options<~Hash>:
+        #   * Enabled<~Boolean>: defaults to true
+        #   * Description<~String>: optional description
+        #
+        # ==== Returns
+        # * response<~Excon::Response>:
+        #   * body<~Hash>:
+        #     * 'endTime'<~String> - endTime of task
+        #     * 'href'<~String> - link to task
+        #     * 'startTime'<~String> - startTime of task
+        #     * 'status'<~String> - status of task
+        #     * 'type'<~String> - type of task
+        #     * 'Owner'<~String> -
+        #       * 'href'<~String> - href of owner
+        #       * 'name'<~String> - name of owner
+        #       * 'type'<~String> - type of owner
+        def add_node_service(service_id, ip, name, port, options = {})
+          unless options.key?('Enabled')
+            options['Enabled'] = true
+          end
+
+          data = <<-DATA
+                <CreateNodeServiceRequest xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="urn:tmrk:vCloudExpressExtensions-1.6"><IpAddress>#{ip}</IpAddress><Name>#{name}</Name><Port>#{port}</Port><Enabled>#{options['Enabled']}</Enabled><Description>#{options['Description']}</Description></CreateNodeServiceRequest>
+          DATA
+          response = request(
+              :body     => data,
+              :expects  => 200,
+              :headers  => {'Content-Type' => 'application/vnd.tmrk.vCloud.nodeService+xml'},
+              :method   => 'POST',
+              :parser   => Fog::Parsers::Terremark::NodeService.new,
+              :path     => "api/extensions/v1.6/internetService/#{service_id}/nodeServices",
+              :override_path => true
+          )
+
+          response
+        end
+      end
+    end
+  end
+end

data/lib/fog/compute/terremark/requests/configure_vapp.rb

@@ -0,0 +1,58 @@
+module Fog
+  module Compute
+    module Terremark
+      module Real
+        def configure_vapp(vapp_id, vapp_name, options = {})
+          items = ""
+          vapp_uri = [@host, @path, "vApp", vapp_id.to_s].join("/")
+
+          if options['vcpus']
+            vcpu_item = <<-DATA
+<Item xmlns="http://schemas.dmtf.org/ovf/envelope/1"> <InstanceID xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">1</InstanceID><ResourceType xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">3</ResourceType><VirtualQuantity xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">#{options['vcpus']}</VirtualQuantity></Item>
+            DATA
+            items << vcpu_item
+          end
+
+          if options['memory']
+            memory_item = <<-DATA
+<Item xmlns="http://schemas.dmtf.org/ovf/envelope/1"><InstanceID xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">2</InstanceID><ResourceType xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">4</ResourceType>38<VirtualQuantity xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">#{options['memory']}</VirtualQuantity></Item>
+            DATA
+            items << memory_item
+          end
+          #Default root disk
+          virtual_disk_item = <<-DATA
+<Item>
+<AddressOnParent xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">0</AddressOnParent> <HostResource xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">1048576</HostResource><InstanceID xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">9</InstanceID><ResourceType xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">17</ResourceType><VirtualQuantity xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">1048576</VirtualQuantity></Item>
+          DATA
+          items << virtual_disk_item
+          #Additional disks
+          if options['virtual_disks']
+            for disk in options['virtual_disks']
+              actual_size = disk.to_i * 1024 * 1024
+              virtual_disk_item = <<-DATA
+<Item>
+<AddressOnParent xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">-1</AddressOnParent><HostResource xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">#{actual_size}</HostResource><InstanceID xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">9</InstanceID><ResourceType xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">17</ResourceType><VirtualQuantity xmlns="http://schemas.dmtf.org/wbem/wscim/1/cim-schema/2/CIM_ResourceAllocationSettingData">#{actual_size}</VirtualQuantity></Item>
+              DATA
+              items << virtual_disk_item
+            end
+          end
+
+          data = <<-DATA
+<VApp href="#{vapp_uri}" type="application/vnd.vmware.vcloud.vApp+xml" name="#{vapp_name}" status="2" size="10485760" xmlns="http://www.vmware.com/vcloud/v0.8" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
+<VirtualHardwareSection xmlns="http://schemas.dmtf.org/ovf/envelope/1"><Info>Virtual Hardware</Info>#{items}
+</VirtualHardwareSection>
+</VApp>
+          DATA
+
+          request(
+              :body => data,
+              :expects => 202,
+              :headers => { 'Content-Type' => 'application/vnd.vmware.vCloud.vApp+xml' },
+              :method => 'PUT',
+              :path => "vapp/#{vapp_id}"
+          )
+        end
+      end
+    end
+  end
+end