fog-vcloud-director 0.1.0

data/lib/fog/vcloud_director/requests/compute/put_product_sections.rb

@@ -0,0 +1,46 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Set the value for the specified metadata key to the value provided,
+        # overwriting any existing value.
+        #
+        # @param [String] id Object identifier of the vApp
+        # @param [Array]  sections List of sections hashes
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.doc_51/GUID-E13A5613-8A41-46E3-889B-8E1EAF10ABBE.html
+        # @since vCloud API version 1.5
+        def put_product_sections(id, sections)
+          xml  = '<ProductSectionList xmlns="http://www.vmware.com/vcloud/v1.5" xmlns:ovf="http://schemas.dmtf.org/ovf/envelope/1">'
+          xml += '<ovf:ProductSection>'
+          xml += '<ovf:Info>Global vApp Custom Properties</ovf:Info>'
+          xml += '<ovf:Category>Global</ovf:Category>'
+
+          sections.each do |section|
+            section[:user_configurable] ||= true
+            section[:type]              ||= "string"
+            section[:password]          ||= false
+            xml += "<ovf:Property ovf:userConfigurable='#{section[:user_configurable]}' ovf:type='#{section[:type]}' ovf:password='#{section[:password]}' ovf:key='#{section[:id]}' ovf:value='#{section[:value]}'>"
+            xml += "<ovf:Label>#{section[:id]}</ovf:Label>"
+            xml += "</ovf:Property>"
+            
+          end
+
+          xml += '</ovf:ProductSection>'
+          xml += "</ProductSectionList>"
+
+          request(
+            :body    => xml,
+            :expects => 202,
+            :headers => {'Content-Type' => 'application/vnd.vmware.vcloud.productSections+xml'},
+            :method  => 'PUT',
+            :parser  => Fog::ToHashDocument.new,
+            :path    => "vApp/#{id}/productSections"
+          )
+        end
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/requests/compute/put_vapp_metadata_item_metadata.rb

@@ -0,0 +1,85 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Set the value for the specified metadata key to the value provided,
+        # overwriting any existing value.
+        #
+        # @param [String] id Object identifier of the vApp or VM.
+        # @param [String] key Key of the metadata item.
+        # @param [Boolean,DateTime,Fixnum,String] value Value of the metadata
+        #   item.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/PUT-VAppMetadataItem-metadata.html
+        # @since vCloud API version 1.5
+        def put_vapp_metadata_item_metadata(id, key, value)
+          body = Nokogiri::XML::Builder.new do
+            attrs = {
+              :xmlns => 'http://www.vmware.com/vcloud/v1.5',
+              'xmlns:xsi' => 'http://www.w3.org/2001/XMLSchema-instance'
+            }
+            MetadataValue(attrs) {
+              if api_version.to_f < 5.1
+                Value value
+              else
+                type = case value
+                       when TrueClass, FalseClass then 'MetadataBooleanValue';
+                       when DateTime then 'MetadataDateTimeValue';
+                       when Fixnum then 'MetadataNumberValue';
+                       else 'MetadataStringValue'
+                       end
+                TypedValue('xsi:type' => type) { Value value }
+              end
+            }
+          end.to_xml
+
+          request(
+            :body    => body,
+            :expects => 202,
+            :headers => {'Content-Type' => 'application/vnd.vmware.vcloud.metadata.value+xml'},
+            :method  => 'PUT',
+            :parser  => Fog::ToHashDocument.new,
+            :path    => "vApp/#{id}/metadata/#{URI.escape(key)}"
+          )
+        end
+      end
+
+      class Mock
+
+        def put_vapp_metadata_item_metadata(id, key, value)
+          unless vm_or_vapp = data[:vapps][id] || vm_or_vapp = data[:vms][id]
+            raise Fog::Compute::VcloudDirector::Forbidden.new(
+              'This operation is denied.'
+            )
+          end
+
+          owner = {
+            :href => make_href("vApp/#{id}"),
+            :type => 'application/vnd.vmware.vcloud.vm+xml'
+          }
+          task_id = enqueue_task(
+            "Updating Virtual Machine #{vm_or_vapp[:name]}(#{id})", 'vappUpdateVm', owner,
+            :on_success => lambda do
+              vm_or_vapp[:metadata][key] = value
+            end
+          )
+          body = {
+            :xmlns => xmlns,
+            :xmlns_xsi => xmlns_xsi,
+            :xsi_schemaLocation => xsi_schema_location,
+          }.merge(task_body(task_id))
+
+          Excon::Response.new(
+            :status => 202,
+            :headers => {'Content-Type' => "#{body[:type]};version=#{api_version}"},
+            :body => body
+          )
+
+        end
+
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/requests/compute/put_vapp_name_and_description.rb

@@ -0,0 +1,36 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        require 'fog/vcloud_director/generators/compute/vapp'
+
+        # Modify the name or description of a vApp.
+        #
+        # This operation is asynchronous and returns a task that you can monitor
+        # to track the progress of the request.
+        #
+        #
+        # @param [String] id Object identifier of the vApp.
+        # @param [String] name of the vApp.
+        # @param [Hash] options
+        #   * :Description<~String>: - description to be assigned (optional)
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-55/topic/com.vmware.vcloud.api.reference.doc_55/doc/operations/PUT-VAppNameAndDescription.html
+        # @since vCloud API version 0.9
+        def put_vapp_name_and_description(id, name, options={})
+          body = Fog::Generators::Compute::VcloudDirector::Vapp.new(name, options).generate_xml
+          request(
+            :body    => body,
+            :expects => 202,
+            :headers => {'Content-Type' => 'application/vnd.vmware.vcloud.vApp+xml'},
+            :method  => 'PUT',
+            :parser  => Fog::ToHashDocument.new,
+            :path    => "vApp/#{id}"
+          )
+        end
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/requests/compute/put_vapp_template_metadata_item_metadata.rb

@@ -0,0 +1,50 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Set the value for the specified metadata key to the value provided,
+        # overwriting any existing value.
+        #
+        # @param [String] id Object identifier of the vApp template.
+        # @param [String] key Key of the metadata item.
+        # @param [Boolean,DateTime,Fixnum,String] value Value of the metadata
+        #   item.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/PUT-VAppTemplateMetadataItem-metadata.html
+        # @since vCloud API version 1.5
+        def put_vapp_template_metadata_item_metadata(id, key, value)
+          body = Nokogiri::XML::Builder.new do
+            attrs = {
+              :xmlns => 'http://www.vmware.com/vcloud/v1.5',
+              'xmlns:xsi' => 'http://www.w3.org/2001/XMLSchema-instance'
+            }
+            MetadataValue(attrs) {
+              if api_version.to_f < 5.1
+                Value value
+              else
+                type = case value
+                       when TrueClass, FalseClass then 'MetadataBooleanValue';
+                       when DateTime then 'MetadataDateTimeValue';
+                       when Fixnum then 'MetadataNumberValue';
+                       else 'MetadataStringValue'
+                       end
+                TypedValue('xsi:type' => type) { Value value }
+              end
+            }
+          end.to_xml
+
+          request(
+            :body    => body,
+            :expects => 202,
+            :headers => {'Content-Type' => 'application/vnd.vmware.vcloud.metadata.value+xml'},
+            :method  => 'PUT',
+            :parser  => Fog::ToHashDocument.new,
+            :path    => "vappTemplate/#{id}/metadata/#{URI.escape(key)}"
+          )
+        end
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/requests/compute/put_vm.rb

@@ -0,0 +1,72 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        require 'fog/vcloud_director/generators/compute/vm'
+
+        # Update the name, description and storage profile for VM.
+        #
+        # This operation is asynchronous and returns a task that you can
+        # monitor to track the progress of the request.
+        #
+        # @param [String] id Object identifier of the VM.
+        # @param [String] name of the VM.
+        # @param [Hash] options
+        #   * :Description<~String>: - description to be assigned.
+        #   * :StorageProfile<~Hash>: - storage profile to be assigned.
+        #     * :name<~String>
+        #     * :href<~String>
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/PUT-Vm.html
+        # @since vCloud API version 0.9
+        def put_vm(id, name, options)
+          body = Fog::Generators::Compute::VcloudDirector::Vm.new(options.merge(:name => name)).generate_xml
+          request(
+            :body    => body,
+            :expects => 202,
+            :headers => {'Content-Type' => 'application/vnd.vmware.vcloud.vm+xml'},
+            :method  => 'PUT',
+            :parser  => Fog::ToHashDocument.new,
+            :path    => "vApp/#{id}"
+          )
+        end
+      end
+
+      class Mock
+
+        def put_vm(id, name, options)
+          unless vm = data[:vms][id]
+            raise Fog::Compute::VcloudDirector::Forbidden.new(
+              'This operation is denied.'
+            )
+          end
+
+          owner = {
+            :href => make_href("vApp/#{id}"),
+            :type => 'application/vnd.vmware.vcloud.vm+xml'
+          }
+          task_id = enqueue_task(
+            "Updating Virtual Machine #{data[:vms][id][:name]}(#{id})", 'vappUpdateVm', owner,
+              :on_success => lambda do
+                data[:vms][id][:name] = name
+            end
+          )
+          body = {
+            :xmlns => xmlns,
+            :xmlns_xsi => xmlns_xsi,
+            :xsi_schemaLocation => xsi_schema_location,
+          }.merge(task_body(task_id))
+
+          Excon::Response.new(
+            :status => 202,
+            :headers => {'Content-Type' => "#{body[:type]};version=#{api_version}"},
+            :body => body
+          )
+        end
+
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/requests/compute/put_vm_capabilities.rb

@@ -0,0 +1,44 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Update VM's capabilities.
+        #
+        # @param [String] id Object identifier of the VM.
+        # @param [Hash] options
+        # @option options [Boolean] :MemoryHotAddEnabled True if the virtual
+        #   machine supports addition of memory while powered on.
+        # @option options [Boolean] :CpuHotAddEnabled True if the virtual
+        #   machine supports addition of virtual CPUs while powered on.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/PUT-VmCapabilities.html
+        def put_vm_capabilities(id, options={})
+          body = Nokogiri::XML::Builder.new do
+            attrs = {
+              :xmlns => 'http://www.vmware.com/vcloud/v1.5'
+            }
+            VmCapabilities(attrs) {
+              if options.key?(:MemoryHotAddEnabled)
+                MemoryHotAddEnabled options[:MemoryHotAddEnabled]
+              end
+              if options.key?(:CpuHotAddEnabled)
+                MemoryHotAddEnabled options[:CpuHotAddEnabled]
+              end
+            }
+          end.to_xml
+
+          request(
+            :body    => body,
+            :expects => 202,
+            :headers => {'Content-Type' => 'application/vnd.vmware.vcloud.vmCapabilitiesSection+xml'},
+            :method  => 'PUT',
+            :parser  => Fog::ToHashDocument.new,
+            :path    => "vApp/#{id}/vmCapabilities"
+          )
+        end
+      end
+    end
+  end
+end

data/lib/fog/vcloud_director/version.rb

@@ -0,0 +1,5 @@
+module Fog
+  module VcloudDirector
+    VERSION = "0.1.0".freeze
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,15 @@
+if ENV["COVERAGE"]
+  require "simplecov"
+
+  SimpleCov.start do
+    add_filter "/spec/"
+  end
+end
+
+require "minitest/autorun"
+require "minitest/spec"
+require "minitest/stub_const"
+
+$LOAD_PATH.unshift "lib"
+
+require "fog"

data/spec/vcloud_director/generators/compute/instantiate_vapp_template_params_spec.rb

@@ -0,0 +1,68 @@
+require './spec/vcloud_director/spec_helper.rb'
+require 'minitest/autorun'
+require 'nokogiri'
+require './lib/fog/vcloud_director/generators/compute/instantiate_vapp_template_params.rb'
+
+describe Fog::Generators::Compute::VcloudDirector::InstantiateVappTemplateParams do
+  
+  let(:xml) do 
+    params = {
+      :name => 'VAPP_NAME',
+      :Description => 'MY VAPP',
+      :InstantiationParams => {
+        :NetworkConfig => [
+          {
+            :networkName => 'NETWORK',
+            :networkHref => 'http://vcloud/api/network/123456789',
+            :fenceMode => 'bridged'
+          }
+        ]
+      },
+      :Source => 'http://vcloud/vapp_template/1234',
+      :source_vms => [
+        {
+          :name => 'VM1',
+          :href => 'http://vcloud/api/vm/12345',
+          :StorageProfileHref => 'http://vcloud/storage/123456789'
+        },
+        {
+          :name => 'VM2',
+          :href => 'http://vcloud/api/vm/12345',
+          :StorageProfileHref => 'http://vcloud/storage/123456789'
+        }
+      ]
+      
+    }
+
+    output = Fog::Generators::Compute::VcloudDirector::InstantiateVappTemplateParams.new(params).generate_xml
+    Nokogiri::XML(output)
+  end
+  
+  it "Generates InstantiateVAppTemplateParams" do
+    xml.xpath('//InstantiateVAppTemplateParams').must_be_instance_of Nokogiri::XML::NodeSet 
+  end
+  
+  it "Has a valid Network" do
+    node = xml.xpath('//xmlns:NetworkConfigSection')
+    
+    xml.xpath("//xmlns:NetworkConfig")[0].attr('networkName').must_equal "NETWORK"    
+    xml.xpath('//xmlns:ParentNetwork')[0].attr('href').must_equal 'http://vcloud/api/network/123456789'
+    
+  end
+  
+  it "Has valid source VAPP info" do
+    node = xml.xpath('//xmlns:Source[@href="http://vcloud/vapp_template/1234"]')
+    node.length.must_equal 1
+  end
+  
+  it "Has valid source VM info" do
+    
+    xml.xpath('//xmlns:StorageProfile[@href="http://vcloud/storage/123456789"]').length.must_equal 2
+  end
+  
+  it "Allows New VM Parameters" do
+    nodes = xml.xpath('//xmlns:VmGeneralParams')
+    nodes.length.must_equal 2   
+  end
+  
+end

data/spec/vcloud_director/requests/compute/instantiate_vapp_template_spec.rb

@@ -0,0 +1,78 @@
+require './spec/vcloud_director/spec_helper.rb'
+require 'minitest/autorun'
+require './lib/fog/vcloud_director/requests/compute/instantiate_vapp_template.rb'
+
+describe Fog::Compute::VcloudDirector::Real do
+  before do
+    Fog.unmock!
+  end
+  
+
+  let(:xml) do
+    service = Fog::Compute::VcloudDirector.new(
+    {
+      :vcloud_director_host             => 'vcloud-director-host',
+      :vcloud_director_password         => 'vcloud_director_password',
+      :vcloud_director_username         => 'vcd_user@vcd_org_name',
+    }
+    
+    
+    )
+
+    params = {
+      :description => 'MY VAPP',
+      :vdc_uri => 'http://vcloud/api/vdc/123456789',
+      :network_uri => 'http://vcloud/api/network/123456789',
+      :template_uri => 'http://vcloud/api/vapptemplate/123456789',
+      :vapp_name => 'http://vcloud/api/vapp/123456789',
+      :network_name => 'NETWORK',
+      :vms_config => [
+          {
+            :name => 'VM1',
+            :href => 'http://vcloud/api/vm/12345',
+            :storage_profile_href => 'http://vcloud/storage/123456789'
+          },
+          {
+            :name => 'VM2',
+            :href => 'http://vcloud/api/vm/12345',
+            :storage_profile_href => 'http://vcloud/storage/123456789'
+          }
+         ]
+    }
+  
+    
+    Nokogiri::XML(service.send(:generate_instantiate_vapp_template_request,params))
+  end  
+
+  
+  
+  it "Generates InstantiateVAppTemplateParams" do
+  
+    xml.xpath('//InstantiateVAppTemplateParams').must_be_instance_of Nokogiri::XML::NodeSet  
+  end
+  
+  it "Has a valid Network" do
+      node = xml.xpath('//xmlns:NetworkConfigSection')
+      
+      xml.xpath("//xmlns:NetworkConfig")[0].attr('networkName').must_equal "NETWORK"    
+      xml.xpath('//xmlns:ParentNetwork')[0].attr('href').must_equal 'http://vcloud/api/network/123456789'
+      
+  end
+  
+  it "Has valid source VAPP info" do
+    node = xml.xpath('//xmlns:Source[@href="http://vcloud/api/vapptemplate/123456789"]')
+    node.length.must_equal 1
+  end
+  
+  it "Has valid source VM info" do
+    xml.xpath('//xmlns:Source[@name="VM1"]').length.must_equal 1
+    xml.xpath('//xmlns:StorageProfile[@href="http://vcloud/storage/123456789"]').length.must_equal 2
+  end
+  
+    
+  after do
+    Fog.mock!
+  end
+
+  
+end