fog-arubacloud 0.0.3 → 0.0.5

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

@@ -0,0 +1,58 @@
+# 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 add_lb_rule(data)
+          body = self.body('SetModifyLoadBalancer').merge(
+              :LoadBalancerStartRequest => {
+                  :loadBalancerID => data[:id],
+                  :NewLoadBalancerRule => [
+                      {
+                          :BalanceType => data[:balancetype],
+                          :Certificate => data[:certificate],
+                          :CreationDate => data[:creationdate],
+                          :ID => data[:ruleid],
+                          :InstancePort => data[:instanceport],
+                          :LoadBalancerPort => data[:loadbalancerport],
+                          :Protocol => data[:protocol]
+                      }
+                  ]
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body, 'SetModifyLoadBalancer', 'SetModifyLoadBalancer Error')
+          }
+          Fog::Logger.debug("SetModifyLoadBalancer time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error during the request.')
+          end
+        end # add_lb_rule
+
+        class Mock
+          def add_lb_rule
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # add_lb_rule
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,53 @@
+# 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 apply_snapshot(data)
+          (service.servers).all.each do |server|
+            id = server.id if (server.name).include? data[:name]
+          end
+          body = {
+              :Snapshot => {
+                  :ServerId => id,
+                  :SnapshotOperationTypes => 'Restore'
+              }
+          }
+          self.request(
+                  body=body,
+                  method_name='SetEnqueueServerSnapshot',
+                  failure_message='Error while applying snapshot.'
+          )
+        end #Apply
+      end #Real
+
+      class Mock
+        def apply_snapshot
+          response = Excon::Response.new
+          response.status = 200
+          response.body = {
+              'ExceptionInfo' => nil,
+              'ResultCode' => 0,
+              'ResultMessage' => nil,
+              'Success' => true
+          }
+          response.body
+        end # apply snapshot
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,59 @@
+# 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 archive_vm(data)
+          (service.servers).all.each do |server|
+            id = server.id if (server.name).include? data[:name] and (server.vm_type).include? 'pro'
+          end
+          body = self.body('SetEnqueueServerArchiviation').merge(
+              {
+                  :SetEnqueueServerArchiviation => {
+                      :ServerId => id
+                  }
+              }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body, 'SetEnqueueServerArchiviation', 'SetEnqueueServerArchiviation Error')
+          }
+          Fog::Logger.debug("SetEnqueueServerArchiviation time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new(response)
+          end
+
+        end # archive_vm
+      end # Real
+
+      class Mock
+        def archive_vm
+          response = Excon::Response.new
+          response.status = 200
+          response.body = {
+              'ExceptionInfo' => nil,
+              'ResultCode' => 0,
+              'ResultMessage' => nil,
+              'Success' => true
+          }
+          response.body
+        end # archive_vm
+      end # Mock
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,76 @@
+# 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 create_loadbalancer(data)
+          body = self.body('SetEnqueueLoadBalancerCreation').merge(
+                :LoadBalancerCreationRequest => {
+                    :HealthCheckNotification => data[:healthchecknotification],
+                    :Name => data[:name],
+                    :rules => [
+                        :LoadBalancerRule => [
+                            {
+                                :BalanceType => data[:balancetype],
+                                :Certificate => data[:certificate],
+                                :CreationDate => data[:creationdate],
+                                :ID => data[:ruleid],
+                                :InstancePort => data[:instanceport],
+                                :LoadBalancerPort => data[:loadbalancerport],
+                                :Protocol => data[:protocol]
+                            }
+                        ]
+                    ],
+                    :ipAddressesResourceId => data[:ipaddressesresourceid],
+                    :NotificationContacts => [
+                        :NotificationContact => [
+                            {
+                                :ContactValue => data[:contacvalue],
+                                :LoadBalancerContactID => data[:loadbalancercontactid],
+                                :Type => data[:type]
+                            }
+                        ]
+                    ]
+                }
+          )
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body, 'SetEnqueueLoadBalancerCreation', 'SetEnqueueLoadBalancerCreation Error')
+          }
+          Fog::Logger.debug("SetEnqueueLoadBalancerCreation time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error during the Load Balancer creation.')
+          end
+        end # create_loadbalancer
+
+        class Mock
+          def create_loadbalancer(data)
+            response = Excon::Response.new
+            response.status = 200
+            response.body = {
+                'ExceptionInfo' => nil,
+                'ResultCode' => 0,
+                'ResultMessage' => nil,
+                'Success' => true
+            }
+            response.body
+          end # create_loadbalancer
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,71 @@
+# 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 create_scheduled_occurence(data)
+          body = self.body('SetAddServerScheduledOperation').merge(
+              :NewSchedulePlan => {
+                  :FirstExecutionTime => data[:dateStart],
+                  :LastExecutionTime => data[:endDate],
+                  :OperationType => data[:OperationType],
+                  :ServerID => data[:ServerId],
+              }
+          )
+          if data[:frequencyType].include? 'Monthly'
+            body[:NewSchedulePlan] << {
+                :ScheduleDaysOfMonth => [{
+                    :int => data[:daysOfMonth]
+                                               }]
+            }
+          elsif data[:frequencyType].include? 'MonthlyRelative'
+            body[:NewSchedulePlan] << {
+                :ScheduledMontlyRecurrence => data[:monthlyRecurrence]
+            }
+          elsif data[:frequencyType].include? 'Weekly'
+            body[:NewSchedulePlan] << {
+                :ScheduleWeekDays => [{
+                    :ScheduleWeekDays => data[:daysOfWeek]
+                                      }]
+            }
+          elsif data[:frequencyType].include? 'Daily' or data[:frequencyType].include? 'Hourly'
+            body[:NewSchedulePlan] << {
+                :ScheduleFrequencyType => data[:frequency]
+            }
+          end
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body, 'SetAddServerScheduledOperation', 'SetAddServerScheduledOperation Error')
+          }
+          Fog::Logger.debug("SetAddServerScheduledOperation time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error during the Scheduled Operation creation.')
+          end
+        end # create_scheduled_occurence
+
+        class Mock
+          def create_scheduled_occurence
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # create_scheduled_occurence
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,56 @@
+# coding: utf-8
+#
+# Author:: Dangleterre Michaël
+# © Copyright ArubaCloud.
+#
+# LICENSE: MIT (http://opensource.org/licenses/MIT)
+#
+
+require 'fog/arubacloud/service'
+require 'fog/arubacloud/error'
+
+
+module Fog
+  module ArubaCloud
+    class Compute
+      class Real
+        def create_scheduled_operation(data)
+          body = {
+              :NewSchedulePlan => {
+                  :FirstExecutionTime => data[:dateStart],
+                  :LastExecutionTime => data[:endDate],
+                  :OperationType => data[:OperationType],
+                  :ServerID => data[:ServerId],
+                  :ScheduledPlanStatus => 'Enabled'
+              }
+          }
+          self.request(
+              body=body,
+              method_name='SetAddServerScheduledOperation',
+              failure_message='Error configuring Scheduled Operation.',
+              benchmark=true
+          )
+        end # create_scheduled_operation
+      end # Real
+
+      class Mock
+        def create_scheduled_operation(data)
+          unless data['ServerId']
+            raise ArgumentError
+          end
+          self.servers.select!{|s| s.id.eql?(data['ServerId'])}
+          response = Excon::Response.new
+          response.status = 200
+          response.body = {
+              'ExceptionInfo' => nil,
+              'ResultCode' => 0,
+              'ResultMessage' => nil,
+              'Success' => true
+          }
+          response.body
+        end # create_scheduled_operation
+      end # Mock
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,55 @@
+# 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 create_shared_storage(data)
+          body = {
+              :SharedStorage => {
+                  :Quantity => data[:quantity],
+                  :SharedStorageName => data[:sharedstoragename],
+                  :SharedStorageProtocolType => data[:sharedstorageprotocoltype],
+              }
+          }
+          unless data[:sharedstorageprotocoltype].include? 'ISCSI'
+            body[:SharedStorage] << {
+                :Value => data[:Value]
+            }
+          end
+          self.request(
+              body,
+              'SetEnqueuePurchaseSharedStorage',
+              'Error during Shared Storage creation.'
+          )
+        end
+      end # Real
+
+      class Mock
+        def create_shared_storage(data)
+          response = Excon::Response.new
+          response.status = 200
+          response.body = {
+              'ExceptionInfo' => nil,
+              'ResultCode' => 0,
+              'ResultMessage' => nil,
+              'Success' => true
+          }
+          response.body
+        end # create_shared_storage
+      end # Mock
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -0,0 +1,54 @@
+# 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
+        # Create a new snapshot of a VM
+        def create_snapshot(data)
+          (service.servers).all.each do |server|
+            id = server.id if (server.name).include? data[:name]
+          end
+          body = {
+                  :Snapshot => {
+                      :ServerId => id,
+                      :SnapshotOperationTypes => 'Create'
+                  }
+              }
+          self.request(
+                  body=body,
+                  method_name='SetEnqueueServerSnapshot',
+                  failure_message='Error while attempting to create a snapshot.'
+          )
+        end #Create_snapshot
+      end #Real
+
+      class Mock
+        def create_snapshot
+          response = Excon::Response.new
+          response.status = 200
+          response.body = {
+              'ExceptionInfo' => nil,
+              'ResultCode' => 0,
+              'ResultMessage' => nil,
+              'Success' => true
+          }
+          response.body
+        end # create snapshot
+      end # Mock
+
+    end # Compute
+  end # ArubaCloud
+end #Fog

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

@@ -1,3 +1,4 @@
+# coding: utf-8
 #
 # Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
 # © Copyright ArubaCloud.
@@ -9,8 +10,8 @@ require 'fog/arubacloud/service'
 require 'benchmark'
 
 module Fog
-  module Compute
-    class ArubaCloud
+  module ArubaCloud
+    class Compute
       class Real
         # Create a new VM: Pro.
         # @param [String] name name of the server
@@ -49,15 +50,9 @@ module Fog
               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)
+            response = request(body, 'SetEnqueueServerCreation', 'SetEnqueueServerCreation Error')
           }
           Fog::Logger.debug("SetEnqueueServerCreation time: #{time}")
           if response['Success']
@@ -80,9 +75,9 @@ module Fog
               'Success' => true
           }
           response.body
-        end
-      end
+        end # create_vm_pro
+      end # Mock
 
-    end # ArubaCloud
-  end # Compute
-end # Fog
+    end # Compute
+  end # ArubaCloud
+end # Fog

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

@@ -1,3 +1,4 @@
+# coding: utf-8
 #
 # Author:: Alessio Rocchi (<alessio.rocchi@staff.aruba.it>)
 # © Copyright ArubaCloud.
@@ -8,8 +9,8 @@
 require 'fog/arubacloud/service'
 
 module Fog
-  module Compute
-    class ArubaCloud
+  module ArubaCloud
+    class Compute
       class Real
         # Create a new VM: Smart.
         # @param [String] name name of the server
@@ -22,35 +23,30 @@ module Fog
         # * 4 => extra-large
         # @param [String] note Metadata for VM
         # @return [Excon::Response]
+
         def create_vm_smart(data)
+          idPackage = self.get_package_id( data[:package_id] )
           body = self.body('SetEnqueueServerCreation').merge(
               {
                   :Server => {
                       :AdministratorPassword => data[:admin_passwd],
                       :Name => data[:name],
-                      :SmartVMWarePackageID => data[:size] || 1,
+                      :SmartVMWarePackageID => idPackage || 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)
+            response = request( body, 'SetEnqueueServerCreation', "Smart_vm creation error"  )
           }
           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)
+            raise Fog::ArubaCloud::Errors::RequestError.new("Error during the VM creation. Object: \n#{body}", response=response)
           end
         end
       end
@@ -69,6 +65,6 @@ module Fog
         end # create_vm_smart
       end # Mock
 
-    end # ArubaCloud
-  end # Compute
-end # Fog
+    end # Compute
+  end # ArubaCloud
+end # Fog

data/lib/fog/arubacloud/compute/requests/delete_custom_template.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 delete_custom_template(data)
+          body = {
+              :template => {
+                  :templateID => data[:id]
+              }
+          }
+          self.request(
+              body=body,
+              method_name='SetRemovePersonalTemplate',
+              failure_message='Error while attempting to delete custom template.'
+          )
+        end # delete_custom_template
+      end # Real
+
+      class Mock
+        def delete_custom_template
+          raise Fog::Errors::MockNotImplemented.new(
+              'Mock not implemented. Feel free to contribute.'
+          )
+        end # delete_custom_template
+      end # Mock
+
+    end # Compute
+  end # ArubaCloud
+end # Fog

data/lib/fog/arubacloud/compute/requests/delete_scheduled_operation.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 delete_scheduled_operation(operationid)
+          body = self.body('SetRemoveServerScheduledOperation').merge({:operationid => operationid})
+          response = nil
+          time = Benchmark.realtime {
+            response = request(body, 'SetRemoveServerScheduledOperation', 'SetRemoveServerScheduledOperation Error')
+          }
+          Fog::Logger.debug("SetRemoveServerScheduledOperation time: #{time}")
+          if response['Success']
+            response
+          else
+            raise Fog::ArubaCloud::Errors::RequestError.new('Error in request.')
+          end
+        end # suspend_scheduled_operations
+
+        class Mock
+          def get_scheduled_operations
+            raise Fog::Errors::MockNotImplemented.new(
+                      'Mock not implemented. Feel free to contribute.'
+                  )
+          end # get_scheduled_operations
+        end # Mock
+      end # Real
+
+    end # Compute
+  end # ArubaCloud
+end # Fog