fog-vcloud-director 0.1.0

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

@@ -0,0 +1,78 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve an organization network.
+        #
+        # @param [String] id Object identifier of the network.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @raise [Fog::Compute::VcloudDirector::Forbidden]
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-Network.html
+        # @since vCloud API version 0.9
+        def get_network_complete(id)
+          response = request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "admin/network/#{id}"
+          )
+          ensure_list! response.body[:Configuration][:IpScopes][:IpScope], :IpRanges, :IpRange
+          response
+        end
+      end
+
+      class Mock
+        def get_network_complete(id)
+          unless network = data[:networks][id]
+            raise Fog::Compute::VcloudDirector::Forbidden.new(
+              'This operation is denied.'
+            )
+          end
+
+          body = {
+            :name => network[:name],
+            :href => make_href("network/#{id}"),
+            :type => "application/vnd.vmware.vcloud.orgNetwork+xml",
+            :id   => id,
+            :Description => network[:Description],
+            :Configuration => {
+              :IpScopes => {
+                :IpScope => {
+                  :IsInherited => network[:IsInherited].to_s,
+                  :Gateway     => network[:Gateway],
+                  :Netmask     => network[:Netmask],
+                  :Dns1        => network[:Dns1],
+                  :Dns2        => network[:Dns2],
+                  :DnsSuffix   => network[:DnsSuffix],
+                  :IsEnabled   => true.to_s,
+                  :IpRanges    => {
+                    :IpRange => [],
+                  },
+                }
+              },
+              :FenceMode => network[:FenceMode],
+              :RetainNetInfoAcrossDeployments => false.to_s,
+            },
+            :IsShared => network[:IsShared].to_s,
+          }
+
+          body[:Configuration][:IpScopes][:IpScope][:IpRanges][:IpRange] =
+            network[:IpRanges].map do |ip_range|
+              {:StartAddress => ip_range[:StartAddress],
+               :EndAddress   => ip_range[:EndAddress]}
+            end
+
+          Excon::Response.new(
+            :status => 200,
+            :headers => {'Content-Type' => "#{body[:type]};version=#{api_version}"},
+            :body => body
+          )
+        end
+      end
+    end
+  end
+end

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

@@ -0,0 +1,61 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve the network config section of a vApp.
+        #
+        # @param [String] id The object identifier of the vApp.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-NetworkConfigSection-vApp.html
+        # @since vCloud API version 0.9
+        def get_network_config_section_vapp(id)
+          request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "vApp/#{id}/networkConfigSection/"
+          )
+        end
+      end
+
+      class Mock
+
+        def get_network_config_section_vapp(id)
+
+          type = 'application/vnd.vmware.vcloud.networkConfigSection+xml'
+
+          unless vapp = data[:vapps][id]
+            raise Fog::Compute::VcloudDirector::Forbidden.new(
+              'This operation is denied.'
+            )
+          end
+
+          Excon::Response.new(
+            :status => 200,
+            :headers => {'Content-Type' => "#{type};version=#{api_version}"},
+            :body => get_vapp_network_config_section_body(id, vapp)
+          )
+
+        end
+
+        def get_vapp_network_config_section_body(id, vapp)
+          # TODO: This is effectively hardcoding a vAppNetwork configuration
+          #       into here, but this is sufficient for initial testing.
+          #       This network configuration has no networks.
+
+          {
+            :type => "application/vnd.vmware.vcloud.networkConfigSection+xml",
+            :href => make_href("vApp/#{id}/networkConfigSection/"),
+            :ovf_required => "false",
+            :"ovf:Info" => "The configuration parameters for logical networks",
+            :NetworkConfig => [],
+          }
+        end
+
+      end
+    end
+  end
+end

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

@@ -0,0 +1,25 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve the network config section of a vApp template.
+        #
+        # @param [String] id The object identifier of the vApp template.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-NetworkConfigSection-vAppTemplate.html
+        # @since vCloud API version 0.9
+        def get_network_config_section_vapp_template(id)
+          request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "vAppTemplate/#{id}/networkConfigSection/"
+          )
+        end
+      end
+    end
+  end
+end

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

@@ -0,0 +1,68 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve the network connection section of a VM.
+        #
+        # @param [String] id The object identifier of the VM.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-NetworkConnectionSystemSection-vApp.html
+        # @since vCloud API version 0.9
+        def get_network_connection_system_section_vapp(id)
+          request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "vApp/#{id}/networkConnectionSection/"
+          )
+        end
+      end
+
+      class Mock
+
+        def get_network_connection_system_section_vapp(id)
+          type = 'application/vnd.vmware.vcloud.networkConnectionSection+xml'
+
+          unless vm = data[:vms][id]
+            raise Fog::Compute::VcloudDirector::Forbidden.new(
+              'This operation is denied.'
+            )
+          end
+
+          Excon::Response.new(
+            :status => 200,
+            :headers => {'Content-Type' => "#{type};version=#{api_version}"},
+            :body => get_vm_network_connection_section_body(id, vm)
+          )
+
+        end
+
+        def get_vm_network_connection_section_body(id, vm)
+          # TODO: Needs work - does not handle multiple NIC case yet, or
+          #       DHCP/POOL allocations
+          {
+            :type => "application/vnd.vmware.vcloud.networkConnectionSection+xml",
+            :href => make_href("vApp/#{id}/networkConnectionSection/"),
+            :ovf_required => "false",
+            :"ovf:Info" => "Specifies the available VM network connections",
+            :PrimaryNetworkConnectionIndex => "0",
+            :NetworkConnection => {
+              :network => vm[:nics][0][:network_name],
+              :needsCustomization => "false",
+              :NetworkConnectionIndex => "0",
+              :IpAddress => vm[:nics][0][:ip_address],
+              :IsConnected => "true",
+              :MACAddress => vm[:nics][0][:mac_address],
+              :IpAddressAllocationMode => "MANUAL"
+            }
+          }
+        end
+
+      end
+
+    end
+  end
+end

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

@@ -0,0 +1,25 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve the network connection section of a VM.
+        #
+        # @param [String] id The object identifier of the VM.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-NetworkConnectionSystemSection-vAppTemplate.html
+        # @since vCloud API version 0.9
+        def get_network_connection_system_section_vapp_template(id)
+          request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "vAppTemplate/#{id}/networkConnectionSection/"
+          )
+        end
+      end
+    end
+  end
+end

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

@@ -0,0 +1,25 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve metadata associated with the network.
+        #
+        # @param [String] id Object identifier of the network.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-NetworkMetadata.html
+        # @since vCloud API version 1.5
+        def get_network_metadata(id)
+          request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "network/#{id}/metadata"
+          )
+        end
+      end
+    end
+  end
+end

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

@@ -0,0 +1,26 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve the value of the specified key from network metadata.
+        #
+        # @param [String] id Object identifier of the network.
+        # @param [String] key Key of the metadata.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-NetworkMetadataItem-metadata.html
+        # @since vCloud API version 1.5
+        def get_network_metadata_item_metadata(id, key)
+          request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "admin/network/#{id}/metadata/#{URI.escape(key)})"
+          )
+        end
+      end
+    end
+  end
+end

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

@@ -0,0 +1,25 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve the network section of a vApp.
+        #
+        # @param [String] id The object identifier of the vApp.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-NetworkSection-vApp.html
+        # @since vCloud API version 0.9
+        def get_network_section_vapp(id)
+          request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "vApp/#{id}/networkSection/"
+          )
+        end
+      end
+    end
+  end
+end

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

@@ -0,0 +1,25 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve the network section of a vApp template.
+        #
+        # @param [String] id The object identifier of the vApp template.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-NetworkSection-vAppTemplate.html
+        # @since vCloud API version 0.9
+        def get_network_section_vapp_template(id)
+          request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "vAppTemplate/#{id}/networkSection/"
+          )
+        end
+      end
+    end
+  end
+end

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

@@ -0,0 +1,59 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve the operating system section of a VM.
+        #
+        # @param [String] id The object identifier of the VM.
+        # @return [Excon::Response]
+        #   * body<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-OperatingSystemSection.html
+        # @since vCloud API version 0.9
+        def get_operating_system_section(id)
+          request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "vApp/#{id}/operatingSystemSection/"
+          )
+        end
+      end
+
+      class Mock
+
+        def get_operating_system_section(id)
+
+          type = 'application/vnd.vmware.vcloud.operatingSystemSection+xml'
+
+          unless vm = data[:vms][id]
+            raise Fog::Compute::VcloudDirector::Forbidden.new(
+              'This operation is denied.'
+            )
+          end
+
+          Excon::Response.new(
+            :status => 200,
+            :headers => {'Content-Type' => "#{type};version=#{api_version}"},
+            :body => get_vm_operating_system_section_body(id, vm)
+          )
+
+        end
+
+        def get_vm_operating_system_section_body(id, vm)
+          {
+            :xmlns_ns12=>"http://www.vmware.com/vcloud/v1.5",
+            :ovf_id => "94", # TODO: What is this?
+            :ns12_href => make_href("vApp/#{id}/operatingSystemSection/"),
+            :ns12_type => "application/vnd.vmware.vcloud.operatingSystemSection+xml",
+            :vmw_osType => vm[:guest_os_type], # eg "ubuntu64Guest"
+            :"ovf:Info"=>"Specifies the operating system installed",
+            :"ovf:Description"=> vm[:guest_os_description], # eg "Ubuntu Linux (64-bit)",
+          }
+        end
+
+      end
+    end
+  end
+end

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

@@ -0,0 +1,38 @@
+module Fog
+  module Compute
+    class VcloudDirector
+      class Real
+        # Retrieve settings for this organization.
+        #
+        # Organization settings are divided into categories. This request
+        # retrieves all categories of organization settings.
+        #
+        # @param [String] id Object identitifier of the organization.
+        # @return [Excon:Response]
+        #   * body<~Hash>:
+        #     * :href<~String> - The URI of the entity.
+        #     * :type<~String> - The MIME type of the entity.
+        #     * :OrgGeneralSettings<~Hash>:
+        #     * :VAppLeaseSettings<~Hash>:
+        #     * :VAppTemplateLeaseSettings<~Hash>:
+        #     * :OrgLdapSettings<~Hash>:
+        #     * :OrgEmailSettings<~Hash>:
+        #     * :OrgPasswordPolicySettings<~Hash>:
+        #     * :OrgOperationLimitsSettings<~Hash>:
+        #     * :OrgFederationSettings<~Hash>:
+        #
+        # @see http://pubs.vmware.com/vcd-51/topic/com.vmware.vcloud.api.reference.doc_51/doc/operations/GET-OrgSettings.html
+        # @since vCloud API version 0.9
+        def get_org_settings(id)
+          request(
+            :expects    => 200,
+            :idempotent => true,
+            :method     => 'GET',
+            :parser     => Fog::ToHashDocument.new,
+            :path       => "admin/org/#{id}/settings"
+          )
+        end
+      end
+    end
+  end
+end