fog-arubacloud 0.0.3 → 0.0.5

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

@@ -0,0 +1,49 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        def delete_shared_storage(data)
+          body = self.body('SetEnqueueRemoveSharedStorage').merge(
+              {
+                  :SharedStorage => {
+                      :storageId => data[:id]
+                  }
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body , 'SetEnqueueRemoveSharedStorage', 'SetEnqueueRemoveSharedStorage Error')
+          }
+          Fog::Logger.debug("SetEnqueueRemoveSharedStorage time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error in request.')
+          end
+        end # edit_shared_storage
+
+        class Mock
+          def edit_shared_storage
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # edit_shared_storage
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,60 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        # Apply a snapshot on a VM
+        def delete_snapshot(data)
+          (service.servers).all.each do |server|
+            id = server.id if (server.name).include? data[:name]
+          end
+          body = self.body('SetEnqueueServerSnapshot').merge(
+              {
+                  :Snapshot => {
+                      :ServerId => id,
+                      :SnapshotOperationTypes => 'Delete'
+                  }
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body , 'SetEnqueueServerSnapshot', 'SetEnqueueServerSnapshot Error')
+          }
+          Fog::Logger.debug("SetEnqueueServerSnapshot time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new(response)
+          end
+        end #Apply
+      end #Real
+
+      class Mock
+        def delete_snapshot
+          response = Excon::Response.new
+          response.status = 200
+          response.body = {
+              'ExceptionInfo' => nil,
+              'ResultCode' => 0,
+              'ResultMessage' => nil,
+              'Success' => true
+          }
+          response.body
+        end #delete snapshot
+      end # Mock
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

data/lib/fog/arubacloud/{requests/compute → compute/requests}/delete_vm.rb

@@ -1,3 +1,4 @@
+# coding: utf-8
 #
 # Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
 # © Copyright ArubaCloud.
@@ -6,20 +7,15 @@
 #
 
 module Fog
-  module Compute
-    class ArubaCloud
+  module ArubaCloud
+    class Compute
 
       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)
+            response = request(body, 'SetEnqueueServerDeletion', 'SetEnqueueServerDeletion Error')
           }
           Fog::Logger.debug("SetEnqueueServerDeletion time: #{time}")
           if response['Success']
@@ -32,6 +28,10 @@ module Fog
 
       class Mock
         def delete_vm(id)
+          unless id
+            raise Fog::ArubaCloud::Errors::InvalidParameterValue.new('InvalidParameterValue => Server ID must be specified.')
+          end
+
           self.servers.select!{|s| s.id.eql?(id)}
           response = Excon::Response.new
           response.status = 200
@@ -42,9 +42,9 @@ module Fog
               'Success' => true
           }
           response.body
-        end # delete_vm
-      end # Mock
+        end # Mock
+      end # Real
 
-    end # ArubaCloud
-  end # Compute
-end # Fog
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,47 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        def disable_loadbalancer(data)
+          body = self.body('SetEnqueueLoadBalancerPowerOff').merge(
+              :LoadBalancerPowerOffRequest => {
+                  :loadBalancerID => data[:id]
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body, 'SetEnqueueLoadBalancerPowerOff', 'SetEnqueueLoadBalancerPowerOff Error')
+          }
+          Fog::Logger.debug("SetEnqueueLoadBalancerPowerOff time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error during the request.')
+          end
+        end # disable_loadbalancer
+
+        class Mock
+          def disable_loadbalancer
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # disable_loadbalancer
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,50 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        def edit_shared_storage(data)
+          body = self.body('SetEnqueueModifySharedStorage').merge(
+              {
+                  :SharedStorage => {
+                      :Quantity => data[:quantity],
+                      :storageId => data[:id]
+                  }
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request( body , 'SetEnqueueModifySharedStorage', 'SetEnqueueModifySharedStorage Error')
+          }
+          Fog::Logger.debug("SetEnqueueModifySharedStorage time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error in request.')
+          end
+        end # edit_shared_storage
+
+        class Mock
+          def edit_shared_storage
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # edit_shared_storage
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,47 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        def enable_loadbalancer(data)
+          body = self.body('SetEnqueueLoadBalancerStart').merge(
+              :LoadBalancerStartRequest => {
+                  :loadBalancerID => data[:id]
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body , 'SetEnqueueLoadBalancerStart', 'SetEnqueueLoadBalancerStart Error')
+          }
+          Fog::Logger.debug("SetEnqueueLoadBalancerStart time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error during the request.')
+          end
+        end # enable_loadbalancer
+
+        class Mock
+          def enable_loadbalancer
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # enable_loadbalancer
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,43 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        def get_custom_templates
+          body = self.body('GetAvailablePersonalTemplates')
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body, 'GetAvailablePersonalTemplates', 'GetAvailablePersonalTemplates Error')
+          }
+          Fog::Logger.debug("GetAvailablePersonalTemplates time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error in request.')
+          end
+        end # get_custom_templates
+
+        class Mock
+          def get_custom_templates
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # get_custom_templates
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

data/lib/fog/arubacloud/{requests/compute → compute/requests}/get_hypervisors.rb

@@ -1,3 +1,4 @@
+# coding: utf-8
 #
 # Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
 # © Copyright ArubaCloud.
@@ -10,19 +11,14 @@ require 'fog/arubacloud/error'
 require 'benchmark'
 
 module Fog
-  module Compute
-    class ArubaCloud
+  module ArubaCloud
+    class Compute
       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)
+            response = request( body, 'GetHypervisors', "GetHypervisors Error"  )
           }
           Fog::Logger.debug("GetHypervisors time: #{time}")
           if response['Success']
@@ -37,6 +33,7 @@ module Fog
         # 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.'
@@ -44,6 +41,6 @@ module Fog
         end # get_hypervisors
       end # Mock
 
-    end # ArubaCloud
-  end # Compute
-end # Fog
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,49 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        def get_lb_loads(data)
+          body = self.body('GetLoadBalancerLoads').merge(
+              :GetLoadBalancerLoads => {
+                  :EndTime => data[:endtime],
+                  :LoadBalancerID => data[:id],
+                  :StartTime => data[:starttime]
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body, 'GetLoadBalancerLoads', 'GetLoadBalancerLoads  Error')
+          }
+          Fog::Logger.debug("GetLoadBalancerLoads time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error during the request.')
+          end
+        end # get_lb_loads
+
+        class Mock
+          def get_lb_loads
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # get_lb_loads
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,49 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        def get_lb_stats(data)
+          body = self.body('GetLoadBalancerRuleStatistics').merge(
+              :GetLoadBalancerLoads => {
+                  :EndTime => data[:endtime],
+                  :loadBalancerRuleID => data[:ruleid],
+                  :StartTime => data[:starttime]
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body, 'GetLoadBalancerRuleStatistics', 'GetLoadBalancerRuleStatistics Error')
+          }
+          Fog::Logger.debug("GetLoadBalancerRuleStatistics time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error during the request.')
+          end
+        end # get_lb_stats
+
+        class Mock
+          def get_lb_stats
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # get_lb_stats
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,47 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        def get_loadbalancer(data)
+          body = self.body('GetLoadBalancers').merge(
+              :GetLoadBalancers => {
+                  :loadBalancerID => data[:id]
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body , 'GetLoadBalancers', 'GetLoadBalancers Error')
+          }
+          Fog::Logger.debug("GetLoadBalancers time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error during the Load Balancer deletion.')
+          end
+        end # get_loadbalancer
+
+        class Mock
+          def get_loadbalancer
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # create_loadbalancer
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,50 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+require 'benchmark'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        def get_notifications(data)
+          body = self.body('GetLoadBalancerNotifications').merge(
+              :request => {
+                  :loadBalancerID => data[:id],
+                  :EndDate => data[:endtime],
+                  :StartDate => data[:starttime],
+                  :LoadBalancerRuleID => data[:ruleid]
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body , 'GetLoadBalancerNotifications', 'GetLoadBalancerNotifications Error')
+          }
+          Fog::Logger.debug("GetLoadBalancerNotifications time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error during the request.')
+          end
+        end # get_notifications
+
+        class Mock
+          def get_notifications
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # get_notifications
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,60 @@
+# coding: utf-8
+#
+# Author:: Ugo Vierucci (<ugo.vierucci@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 ArubaCloud
+    class Compute
+
+      class Real
+        # Return the correct package id 
+        # @return [Excon::Response]
+
+        def get_package_id( name="small" )
+          body_r = self.body('GetPreConfiguredPackages').merge(
+            {
+              :HypervisorType => 4
+            }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request( body_r, 'GetPreConfiguredPackages', "Smart_vm getPackageID error"  )
+          }
+          Fog::Logger.debug("GetPreConfiguredPackages time: #{time}")
+          if response['Success']
+            response['Value'].each { | package |
+              packageId  = package['PackageID']
+               package['Descriptions'].each { | description |
+                languageID = description['LanguageID']
+                packageName = description['Text']
+                if (languageID == 2) and (packageName.downcase == name.downcase) then
+                   return packageId
+                end
+              }
+            }
+          else
+           raise Fog::ArubaCloud::Errors::RequestError.new("Error during the get_package_id. Object: \n#{body}", response=response)
+          end
+          return 1
+        end
+      end # Real
+
+      class Mock
+        def get_package_id(  name )
+          raise Fog::Errors::MockNotImplemented.new(
+              'Mock not implemented. Feel free to contribute.'
+          )
+        end # get_package_id
+      end # Mock
+
+    end # Compute
+  end # ArubaCloud
+end # Fog