fog-arubacloud 0.0.3

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

@@ -0,0 +1,43 @@
+#
+# Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/core/collection'
+require 'fog/arubacloud/models/compute/server'
+
+
+module Fog
+  module Compute
+    class ArubaCloud
+      class Servers < Fog::Collection
+        model Fog::Compute::ArubaCloud::Server
+
+        # Returns list of servers
+        # @return [Fog::Compute::ArubaCloud::Servers] Retrieves a list servers.
+        # @raise [Fog::Compute::ArubaCloud::NotFound]
+        # @note The filter parameter on the method is just to maintain compatibility with other providers that support
+        #       filtering.
+        def all(filters = [])
+          data = service.get_servers
+          objects = data['Value']
+          load(objects)
+        end
+
+        # Retrieves server
+        # @param [String] server_id for server to be returned.
+        # @return [Fog::Compute::ArubaCloud::Server]
+        def get(server_id)
+          data = service.get_server_details(server_id)
+          objects = data['Value']
+          msg = "Fog::Compute::ArubaCloud::Servers.get 'objects' must be an hash, actually is: #{objects.class} #{objects.to_yaml}"
+          Fog::Logger.debug(msg)
+          raise Fog::ArubaCloud::Errors::BadObjectType.new("#{msg}") unless objects.instance_of? Hash
+          new(objects)
+        end
+      end
+    end
+  end
+end

data/lib/fog/arubacloud/models/compute/template.rb

@@ -0,0 +1,33 @@
+#
+# Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/core/model'
+
+module Fog
+  module Compute
+    class ArubaCloud
+
+      class Template < Fog::Model
+        identity :id, :aliases => 'Id'
+
+        attribute :name, :aliases => 'Name'
+        attribute :description, :aliases => 'Description'
+        attribute :enabled, :aliases => 'Enabled'
+        attribute :export_enabled, :aliases => 'ExportEnabled'
+        attribute :identification_code, :aliases => 'IdentificationCode'
+        attribute :product_id, :aliases => 'ProductId'
+        attribute :hypervisor
+
+        ignore_attributes :ApplianceType, :ArchitectureType, :CompanyID, :CompatiblePreConfiguredPackages,
+            :FeatureTypes, :Icon, :OwnerUserId, :ParentTemplateID, :OSFamily, :OSVersion, :ResourceBounds,
+            :Revision, :TemplateExtendedDescription, :TemplateOwnershipType, :TemplatePassword,
+            :TemplateSellingStatus, :TemplateType, :TemplateUsername, :ToolsAvailable
+      end
+
+    end
+  end
+end

data/lib/fog/arubacloud/models/compute/templates.rb

@@ -0,0 +1,67 @@
+#
+# Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/core/collection'
+require 'fog/arubacloud/models/compute/template'
+
+
+module Fog
+  module Compute
+    class ArubaCloud
+      class Templates < Fog::Collection
+        model Fog::Compute::ArubaCloud::Template
+
+        # Returns list of Template
+        # @return [Fog::Compute::ArubaCloud::Template] Retrieves the complete Templates list.
+        # @raise [Fog::Compute::ArubaCloud::NotFound]
+        def all
+          data = service.get_hypervisors
+          objects = data['Value']
+          manipulated_objects = Array.new
+          objects.each do |h|
+            hv_type = h['HypervisorType']
+            h['Templates'].each do |t|
+              t.merge!({'hypervisor' => hv_type})
+              manipulated_objects << t
+            end
+          end
+          load(manipulated_objects)
+        end
+
+        # Return only templates assigned to a specific service, default is smart (4)
+        # @param hv [Int] The ID of the hypervisor
+        # @return [Fog::Compute::ArubaCloud::Template] List of templates
+        # @raise [Fog::Compute::ArubaCloud::NotFound]
+        def get_hypervisor(hv=4)
+          manipulated_objects = Array.new
+          data = service.get_hypervisors
+          objects = data['Value']
+          objects.each do |h|
+            hv_type = h['HypervisorType']
+            h['Templates'].each do |t|
+              # select{|f| f['HypervisorType'].eql?(hv)}
+              t.merge!({'hypervisor' => hv_type})
+              if t['hypervisor'].eql?(4)
+                Fog::Logger.debug("Fog::Compute::ArubaCloud::Templates.get_hypervisors: t: #{h.to_yaml}")
+                manipulated_objects << t
+              end
+            end
+          end
+          load(manipulated_objects)
+        end
+
+        # Retrieves Single Template Item
+        # @param [String] template_id for server to be returned.
+        # @return [Fog::Compute::ArubaCloud::Template]
+        def get(template_id)
+          # TODO: Implement retrieve of a single template
+        end
+
+      end
+    end
+  end
+end

data/lib/fog/arubacloud/requests/compute/create_vm_pro.rb

@@ -0,0 +1,88 @@
+#
+# Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'benchmark'
+
+module Fog
+  module Compute
+    class ArubaCloud
+      class Real
+        # Create a new VM: Pro.
+        # @param [String] name name of the server
+        # @param [String] admin_password server administrative password
+        # @param [Int] cpu amount of vcpu
+        # @param [Int] ram amount of ram in GB
+        # @param [String] template_id id of template to use
+        # @param [String] ipv4_id if present, the ID of the ip resource to associate
+        # @param [String] note Metadata for VM
+        # @return [Excon::Response]
+        def create_vm_pro(data)
+          body = self.body('SetEnqueueServerCreation').merge(
+                {
+                    :Server => {
+                        :AdministratorPassword => data[:admin_passwd],
+                        :CPUQuantity => data[:cpu],
+                        :Name => data[:name],
+                        :NetworkAdaptersConfiguration => [],
+                        :Note => 'Created by Fog Cloud.',
+                        :OSTemplateId => data[:template_id],
+                        :RAMQuantity => data[:memory],
+                        :VirtualDisks => []
+                    }
+                }
+            )
+            unless data[:ipv4_id].nil?
+              body[:Server][:NetworkAdaptersConfiguration] << {
+                  :NetworkAdapterType => 0,
+                  :PublicIpAddresses => [{
+                      :PrimaryIPAddress => 'true',
+                      :PublicIpAddressResourceId => data[:ipv4_id]
+                  }]
+              }
+            end
+            unless data[:disks].nil? && data[:disks].instance_of?(Array)
+              data[:disks].each { |d| body[:Server][:VirtualDisks] << d}
+            end
+
+          options = {
+              :http_method => :post,
+              :method => 'SetEnqueueServerCreation',
+              :body => Fog::JSON.encode(body)
+          }
+
+          response = nil
+          time = Benchmark.realtime {
+            response = request(options)
+          }
+          Fog::Logger.debug("SetEnqueueServerCreation time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new("Error during the VM creation. Object: \n#{body}\nError: \n#{response}")
+          end
+
+        end
+      end
+
+      class Mock
+        def create_vm_pro(data)
+          response = Excon::Response.new
+          response.status = 201
+          response.body = {
+              'ExceptionInfo' => nil,
+              'ResultCode' => 0,
+              'ResultMessage' => nil,
+              'Success' => true
+          }
+          response.body
+        end
+      end
+
+    end # ArubaCloud
+  end # Compute
+end # Fog

data/lib/fog/arubacloud/requests/compute/create_vm_smart.rb

@@ -0,0 +1,74 @@
+#
+# Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+
+module Fog
+  module Compute
+    class ArubaCloud
+      class Real
+        # Create a new VM: Smart.
+        # @param [String] name name of the server
+        # @param [String] admin_password server administrative password
+        # @param [String] template_id id of template to use
+        # @param [Int] size
+        # * 1 => small
+        # * 2 => medium
+        # * 3 => large
+        # * 4 => extra-large
+        # @param [String] note Metadata for VM
+        # @return [Excon::Response]
+        def create_vm_smart(data)
+          body = self.body('SetEnqueueServerCreation').merge(
+              {
+                  :Server => {
+                      :AdministratorPassword => data[:admin_passwd],
+                      :Name => data[:name],
+                      :SmartVMWarePackageID => data[:size] || 1,
+                      :Note => data[:note] || 'Created by Fog Cloud.',
+                      :OSTemplateId => data[:template_id]
+                  }
+              }
+          )
+
+          options = {
+              :http_method => :post,
+              :method => 'SetEnqueueServerCreation',
+              :body => Fog::JSON.encode(body),
+          }
+
+          response = nil
+          time = Benchmark.realtime {
+            response = request(options)
+          }
+          Fog::Logger.debug("SetEnqueueServerCreation time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new("Error during the VM creation. Object: \n#{body}",
+                                                            response=response)
+          end
+        end
+      end
+
+      class Mock
+        def create_vm_smart(data)
+          response = Excon::Response.new
+          response.status = 201
+          response.body = {
+              'ExceptionInfo' => nil,
+              'ResultCode' => 0,
+              'ResultMessage' => nil,
+              'Success' => true
+          }
+          response.body
+        end # create_vm_smart
+      end # Mock
+
+    end # ArubaCloud
+  end # Compute
+end # Fog

data/lib/fog/arubacloud/requests/compute/delete_vm.rb

@@ -0,0 +1,50 @@
+#
+# Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+module Fog
+  module Compute
+    class ArubaCloud
+
+      class Real
+        def delete_vm(id)
+          body = self.body('SetEnqueueServerDeletion').merge({:ServerId => "#{id}"})
+          options = {
+              :http_method => :post,
+              :method => 'SetEnqueueServerDeletion',
+              :body => Fog::JSON.encode(body)
+          }
+          response = nil
+          time = Benchmark.realtime {
+            response = request(options)
+          }
+          Fog::Logger.debug("SetEnqueueServerDeletion time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new("Error Powering off the VM. Error: #{response}")
+          end
+        end # delete_vm
+      end # Real
+
+      class Mock
+        def delete_vm(id)
+          self.servers.select!{|s| s.id.eql?(id)}
+          response = Excon::Response.new
+          response.status = 200
+          response.body = {
+              'ExceptionInfo' => nil,
+              'ResultCode' => 0,
+              'ResultMessage' => nil,
+              'Success' => true
+          }
+          response.body
+        end # delete_vm
+      end # Mock
+
+    end # ArubaCloud
+  end # Compute
+end # Fog

data/lib/fog/arubacloud/requests/compute/get_hypervisors.rb

@@ -0,0 +1,49 @@
+#
+# Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+module Fog
+  module Compute
+    class ArubaCloud
+      class Real
+        def get_hypervisors
+          body = self.body('GetHypervisors')
+          options = {
+              :http_method => :post,
+              :method => 'GetHypervisors',
+              :body => Fog::JSON.encode(body)
+          }
+          response = nil
+          time = Benchmark.realtime {
+            response = request(options)
+          }
+          Fog::Logger.debug("GetHypervisors time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error in request.')
+          end
+        end # get_hypervisors
+      end # Real
+
+      class Mock
+        # Due to the length of the response body, I actually decided to not implement
+        # the mock method of the request. I will introduce it in the next version after structuring the mock
+        # objects in a more reasonable way.
+        def get_hypervisors
+          raise Fog::Errors::MockNotImplemented.new(
+              'Mock object for get_hypervisor not present, read code comments for details.'
+          )
+        end # get_hypervisors
+      end # Mock
+
+    end # ArubaCloud
+  end # Compute
+end # Fog

data/lib/fog/arubacloud/requests/compute/get_purchased_ip_addresses.rb

@@ -0,0 +1,79 @@
+#
+# Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+module Fog
+  module Compute
+    class ArubaCloud
+
+      # noinspection RubyResolve
+      class Real
+        def get_purchased_ip_addresses
+          body = self.body('GetPurchasedIpAddresses')
+          get_servers_options = {
+              :http_method => :post,
+              :method => 'GetPurchasedIpAddresses',
+              :body => Fog::JSON.encode(body)
+          }
+          response = nil
+          time = Benchmark.realtime {
+            response = request(get_servers_options)
+          }
+          Fog::Logger.debug("GetPurchasedIpAddresses time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Error::RequestError
+          end
+        end # get_purchased_ip_addresses
+      end # Real
+
+      class Mock
+        def get_purchased_ip_addresses
+          response = Excon::Response.new
+          response.status = 200
+          response.body = {
+              'ExceptionInfo' => nil,
+              'ResultCode' => 0,
+              'ResultMessage' => nil,
+              'Success' => true,
+              'Value' => [
+                  {
+                      'CompanyId' => 1,
+                      'ProductId' => 20,
+                      'ResourceId' => 96052,
+                      'ResourceType' => 6,
+                      'UserId' => 1856,
+                      'Gateway' => '5.249.158.1',
+                      'LoadBalancerID' => nil,
+                      'ServerId' => nil,
+                      'SubNetMask' => '255.255.255.0',
+                      'Value' => '5.249.158.66'
+                  }, {
+                      'CompanyId' => 1,
+                      'ProductId' => 20,
+                      'ResourceId' => 96054,
+                      'ResourceType' => 6,
+                      'UserId' => 1856,
+                      'Gateway' => '5.249.158.1',
+                      'LoadBalancerID' => nil,
+                      'ServerId' => nil,
+                      'SubNetMask' => '255.255.255.0',
+                      'Value' => '5.249.158.102'
+                  }
+              ]
+          }
+          response.body
+        end # get_purchased_ip_addresses
+      end # Mock
+
+    end # ArubaCloud
+  end # Compute
+end # Fog