fog-vcloud-director 0.1.0

data/lib/fog/vcloud_director/models/compute/template_vm.rb

@@ -0,0 +1,52 @@
+require 'fog/core/model'
+require 'fog/vcloud_director/models/compute/vm_customization'
+
+module Fog
+  module Compute
+    class VcloudDirector
+      class TemplateVm < Model
+        identity  :id
+
+        attribute :vapp_template_id
+        attribute :vapp_template_name
+        attribute :name
+        attribute :type
+        attribute :href
+
+        def reload
+          #Parent vapp_name & id are nil on a template_vm. Adding them from the collection parent
+          self.vapp_template_id = collection.vapp_template.id
+          self.vapp_template_name = collection.vapp_template.name
+        end
+
+
+        def tags
+          requires :id
+          service.tags(:vm => self)
+        end
+
+        def customization
+          requires :id
+          data = service.get_vm_customization(id).body
+          service.vm_customizations.new(data)
+        end
+
+        def network
+          requires :id
+          data = service.get_vm_network(id).body
+          service.vm_networks.new(data)
+        end
+
+        def disks
+          requires :id
+          service.disks(:vm => self)
+        end
+        
+
+        def vapp_template
+          service.vapp_templates.get(vapp_template_id)
+        end
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/models/compute/template_vms.rb

@@ -0,0 +1,41 @@
+require 'fog/core/collection'
+require 'fog/vcloud_director/models/compute/vm'
+
+module Fog
+  module Compute
+    class VcloudDirector
+      class TemplateVms < Collection
+
+        include Fog::VcloudDirector::Query
+
+        model Fog::Compute::VcloudDirector::TemplateVm
+
+        attribute :vapp_template
+
+
+        def get_single_vm(vm_id)
+          item = service.get_template_vm(vm_id).body
+          return nil unless item
+          new(item[:vm])
+        end
+
+        def query_type
+          "vm"
+        end
+
+        private
+
+        def get_by_id(item_id)
+          item = item_list.find{ |vm| vm[:id] == item_id }
+          item
+        end
+
+        def item_list
+          data = service.get_template_vms(vapp_template.id).body  # vapp.id
+          items = data[:vms]
+          items
+        end
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/models/compute/vapp.rb

@@ -0,0 +1,144 @@
+require 'fog/core/model'
+
+module Fog
+  module Compute
+    class VcloudDirector
+      class Vapp < Model
+        identity  :id
+
+        attribute :name
+        attribute :type
+        attribute :href
+        attribute :description, :aliases => :Description
+        attribute :deployed, :type => :boolean
+        attribute :status
+        attribute :lease_settings, :aliases => :LeaseSettingsSection
+        attribute :network_section, :aliases => :"ovf:NetworkSection", :squash => :"ovf:Network"
+        attribute :network_config, :aliases => :NetworkConfigSection, :squash => :NetworkConfig
+        attribute :owner, :aliases => :Owner, :squash => :User
+        attribute :InMaintenanceMode, :type => :boolean
+
+        def vms
+          requires :id
+          service.vms(:vapp => self)
+        end
+
+        def tags
+          requires :id
+          service.tags(:vm => self)
+        end
+
+        def custom_fields
+          requires :id
+          service.custom_fields( :vapp => self)
+        end
+
+        # @param [String] action The specified action is applied to all virtual
+        #   machines in the vApp. All values other than **default** ignore
+        #   actions, order, and delay specified in the StartupSection. One of:
+        # * powerOff (Power off the virtual machines. This is the default
+        #   action if this attribute is missing or empty)
+        # * suspend (Suspend the virtual machines)
+        # * shutdown (Shut down the virtual machines)
+        # * force (Attempt to power off the virtual machines. Failures in
+        #   undeploying the virtual machine or associated networks are ignored.
+        #   All references to the vApp and its virtual machines are removed
+        #   from the database)
+        # * default (Use the actions, order, and delay specified in the
+        #   StartupSection)
+        def undeploy(action='powerOff')
+          begin
+            response = service.post_undeploy_vapp(id, :UndeployPowerAction => action)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Power off all VMs in the vApp.
+        def power_off
+          requires :id
+          begin
+            response = service.post_power_off_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Power on all VMs in the vApp.
+        def power_on
+          requires :id
+          begin
+            response = service.post_power_on_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Reboot all VMs in the vApp.
+        def reboot
+          requires :id
+          begin
+            response = service.post_reboot_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Reset all VMs in the vApp.
+        def reset
+          requires :id
+          begin
+            response = service.post_reset_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Shut down all VMs in the vApp.
+        def shutdown
+          requires :id
+          begin
+            response = service.post_shutdown_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Suspend all VMs in the vApp.
+        def suspend
+          requires :id
+          begin
+            response = service.post_suspend_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        def destroy
+          requires :id
+          begin
+            response = service.delete_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/models/compute/vapp_template.rb

@@ -0,0 +1,26 @@
+require 'fog/core/model'
+
+module Fog
+  module Compute
+    class VcloudDirector
+      class VappTemplate < Model
+        identity  :id
+
+        attribute :name
+        attribute :type
+        attribute :href
+        attribute :description, :aliases => :Description
+        attribute :status
+        attribute :lease_settings, :aliases => :LeaseSettingsSection
+        attribute :network_section, :aliases => :"ovf:NetworkSection", :squash => :"ovf:Network"
+        attribute :network_config, :aliases => :NetworkConfigSection, :squash => :NetworkConfig
+        attribute :owner, :aliases => :Owner, :squash => :User
+
+        def vms
+          requires :id
+          service.template_vms(:vapp_template => self)
+        end
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/models/compute/vapp_templates.rb

@@ -0,0 +1,40 @@
+require 'fog/core/collection'
+require 'fog/vcloud_director/models/compute/vapp'
+
+module Fog
+  module Compute
+    class VcloudDirector
+      class VappTemplates < Collection
+
+        include Fog::VcloudDirector::Query
+
+        model Fog::Compute::VcloudDirector::VappTemplate
+
+        attribute :vdc
+
+        def query_type
+          "vAppTemplate"
+        end
+
+        private
+
+        def get_by_id(item_id)
+          item = service.get_vapp_template(item_id).body
+          %w(:Link).each {|key_to_delete| item.delete(key_to_delete) }
+          service.add_id_from_href!(item)
+          item[:Description] ||= ""
+          item
+        end
+
+        def item_list
+          data = service.get_vdc(vdc.id).body
+          return [] if data[:ResourceEntities].empty?
+          resource_entities = data[:ResourceEntities][:ResourceEntity]
+          items = resource_entities.select { |link| link[:type] == "application/vnd.vmware.vcloud.vAppTemplate+xml" }
+          items.each{|item| service.add_id_from_href!(item) }
+          items
+        end
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/models/compute/vapps.rb

@@ -0,0 +1,40 @@
+require 'fog/core/collection'
+require 'fog/vcloud_director/models/compute/vapp'
+
+module Fog
+  module Compute
+    class VcloudDirector
+      class Vapps < Collection
+
+        include Fog::VcloudDirector::Query
+
+        model Fog::Compute::VcloudDirector::Vapp
+
+        attribute :vdc
+
+        def query_type
+          "vApp"
+        end
+
+        private
+
+        def get_by_id(item_id)
+          item = service.get_vapp(item_id).body
+          %w(:Link).each {|key_to_delete| item.delete(key_to_delete) }
+          service.add_id_from_href!(item)
+          item[:Description] ||= ""
+          item
+        end
+
+        def item_list
+          data = service.get_vdc(vdc.id).body
+          return [] if data[:ResourceEntities].empty?
+          resource_entities = data[:ResourceEntities][:ResourceEntity]
+          items = resource_entities.select { |link| link[:type] == "application/vnd.vmware.vcloud.vApp+xml" }
+          items.each{|item| service.add_id_from_href!(item) }
+          items
+        end
+      end
+    end
+  end
+end

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

@@ -0,0 +1,45 @@
+require 'fog/core/model'
+
+module Fog
+  module Compute
+    class VcloudDirector
+      class Vdc < Model
+        identity  :id
+
+        attribute :name
+        attribute :type
+        attribute :href
+        attribute :description, :aliases => :Description
+        attribute :available_networks, :aliases => :AvailableNetworks, :squash => :Network
+        attribute :compute_capacity, :aliases => :ComputeCapacity
+        attribute :storage_capacity , :aliases => :StorageCapacity
+        attribute :allocation_model, :aliases => :AllocationModel
+        attribute :capabilities, :aliases => :Capabilities, :squash => :SupportedHardwareVersions
+        attribute :nic_quota, :aliases => :NicQuota, :type => :integer
+        attribute :network_quota ,:aliases => :NetworkQuota, :type => :integer
+        attribute :vm_quota ,:aliases => :VmQuota, :type => :integer
+        attribute :is_enabled ,:aliases => :IsEnabled, :type => :boolean
+
+        def medias
+          requires :id
+          service.medias(:vdc => self)
+        end
+
+        def vapps
+          requires :id
+          service.vapps(:vdc => self)
+        end
+        
+        def vapp_templates
+          requires :id
+          service.vapp_templates(:vdc => self)
+        end
+        
+        def networks
+          requires :available_networks
+          service.networks(:vdc => self)
+        end
+      end
+    end
+  end
+end

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

@@ -0,0 +1,37 @@
+require 'fog/core/collection'
+require 'fog/vcloud_director/models/compute/vdc'
+
+module Fog
+  module Compute
+    class VcloudDirector
+      class Vdcs < Collection
+
+        include Fog::VcloudDirector::Query
+
+        model Fog::Compute::VcloudDirector::Vdc
+
+        attribute :organization
+
+        def query_type
+          "orgVdc"
+        end
+
+        private
+
+        def get_by_id(item_id)
+          item = service.get_vdc(item_id).body
+          %w(:VdcItems :Link :ResourceEntities).each {|key_to_delete| item.delete(key_to_delete) }
+          service.add_id_from_href!(item)
+          item
+        end
+
+        def item_list
+          data = service.get_organization(organization.id).body
+          items = data[:Link].select { |link| link[:type] == "application/vnd.vmware.vcloud.vdc+xml" }
+          items.each{|item| service.add_id_from_href!(item) }
+          items
+        end
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/models/compute/vm.rb

@@ -0,0 +1,197 @@
+require 'fog/core/model'
+require 'fog/vcloud_director/models/compute/vm_customization'
+
+module Fog
+  module Compute
+    class VcloudDirector
+      class Vm < Model
+        identity  :id
+
+        attribute :vapp_id
+        attribute :vapp_name
+        attribute :name
+        attribute :type
+        attribute :description
+        attribute :href
+        attribute :status
+        attribute :deployed
+        attribute :operating_system
+        attribute :ip_address
+        attribute :cpu, :type => :integer
+        attribute :memory, :type => :integer
+        attribute :hard_disks, :aliases => :disks
+        attribute :network_adapters
+
+        def reload
+          # when collection.vapp is nil, it means it's fatherless,
+          # vms from different vapps are loaded in the same collection.
+          # This situation comes from a "query" result
+          collection.vapp.nil? ? reload_single_vm : super
+        end
+
+        def reload_single_vm
+          return unless data = begin
+            collection.get_single_vm(identity)
+          rescue Excon::Errors::SocketError
+            nil
+          end
+          # these two attributes don't exists in the get_single_vm response
+          # that's why i use the old attributes
+          data.attributes[:vapp_id] = attributes[:vapp_id]
+          data.attributes[:vapp_name] = attributes[:vapp_name]
+          new_attributes = data.attributes
+          merge_attributes(new_attributes)
+          self
+        end
+
+        # Power off the VM.
+        def power_off
+          requires :id
+          begin
+            response = service.post_power_off_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Power on the VM.
+        def power_on
+          requires :id
+          begin
+            response = service.post_power_on_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Reboot the VM.
+        def reboot
+          requires :id
+          begin
+            response = service.post_reboot_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Reset the VM.
+        def reset
+          requires :id
+          begin
+            response = service.post_reset_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        def undeploy
+          requires :id
+          begin
+            response = service.post_undeploy_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Shut down the VM.
+        def shutdown
+          requires :id
+          begin
+            response = service.post_shutdown_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        # Suspend the VM.
+        def suspend
+          requires :id
+          begin
+            response = service.post_suspend_vapp(id)
+          rescue Fog::Compute::VcloudDirector::BadRequest => ex
+            Fog::Logger.debug(ex.message)
+            return false
+          end
+          service.process_task(response.body)
+        end
+
+        def tags
+          requires :id
+          service.tags(:vm => self)
+        end
+
+        def customization
+          requires :id
+          data = service.get_vm_customization(id).body
+          service.vm_customizations.new(data)
+        end
+
+        def network
+          requires :id
+          data = service.get_vm_network(id).body
+          service.vm_networks.new(data)
+        end
+
+        def disks
+          requires :id
+          service.disks(:vm => self)
+        end
+
+        def memory=(new_memory)
+          has_changed = ( memory != new_memory.to_i )
+          not_first_set = !memory.nil?
+          attributes[:memory] = new_memory.to_i
+          if not_first_set && has_changed
+            response = service.put_memory(id, memory)
+            service.process_task(response.body)
+          end
+        end
+
+        def cpu=(new_cpu)
+          has_changed = ( cpu != new_cpu.to_i )
+          not_first_set = !cpu.nil?
+          attributes[:cpu] = new_cpu.to_i
+          if not_first_set && has_changed
+            response = service.put_cpu(id, cpu)
+            service.process_task(response.body)
+          end
+        end
+        
+        # Reconfigure a VM using any of the options documented in
+        # post_reconfigure_vm
+        def reconfigure(options)
+          options[:name] ||= name # name has to be sent
+          # Delete those things that are not changing for performance
+          [:cpu, :memory, :description].each do |k|
+            options.delete(k) if options.key? k and options[k] == attributes[k]
+          end
+          response = service.post_reconfigure_vm(id, options)
+          service.process_task(response.body)
+          options.each {|k,v| attributes[k] = v}
+        end
+        
+        def ready?
+          reload
+          status == 'on'
+        end
+
+        def vapp
+          # get_by_metadata returns a vm collection where every vapp parent is orpahn
+          collection.vapp ||= service.vapps.get(vapp_id)
+        end
+      end
+    end
+  end
+end