vagrant-arubacloud 0.0.4 → 0.0.5

data/lib/vagrant-arubacloud/action/halt_server.rb

@@ -17,17 +17,21 @@ module VagrantPlugins
 
         def call(env)
           if env[:machine].id
-            env[:ui].info(I18n.t('vagrant_arubacloud.halting_server'))
+            config = env[:machine].provider_config
+            arubacloud_dc = config.endpoint
+            env[:ui].info(" [#{arubacloud_dc}] " + I18n.t('vagrant_arubacloud.halting_server'))
             server = env[:arubacloud_compute].servers.get(env[:machine].id)
 
             # Check if the vm is already powered off
             @logger.debug("VM stopped?: #{server.stopped?}")
             if server.stopped?
               # continue the middleware
+              @logger.debug("VM is stopped  ...")
               @app.call(env)
             else
               # Try to poweroff the VM.
               begin
+                @logger.debug("before make do power_off ...")
                 server.power_off
                 rescue Fog::ArubaCloud::Errors::VmStatus
                   env[:ui].warn(I18n.t('vagrant_arubacloud.bad_state'))
@@ -40,10 +44,12 @@ module VagrantPlugins
               end
 
               # Wait for the server to be proper shut down
-              retryable(:tries => 20, :sleep => 1) do
-                server.wait_for(1) { stopped? }
+              @logger.debug("after do power_off wait status stopped .......")
+              env[:ui].info(" [#{arubacloud_dc}] " + I18n.t('vagrant_arubacloud.waiting_server_powered_off'))
+              retryable(:tries => 30, :sleep => 2) do
+                server.wait_for(2) { stopped? }
               end
-              env[:ui].info(I18n.t('vagrant_arubacloud.server_powered_off'))
+              env[:ui].info(" [#{arubacloud_dc}] " + I18n.t('vagrant_arubacloud.server_powered_off'))
             end
           end
 

data/lib/vagrant-arubacloud/action/list_servers.rb

@@ -2,19 +2,48 @@ module VagrantPlugins
   module ArubaCloud
     module Action
       class ListServers
-        def initialize(app, env)
+
+         def initialize(app, env)
           @app = app
-        end
+         end
 
-        def call(env)
+         def call(env )
+          config = env[:machine].provider_config
+          arubacloud_dc = config.endpoint
           compute_service = env[:arubacloud_compute]
-          env[:ui].info ('%-20s %-20s %s' % ['Server Name', 'State', 'IPv4 address'])
-          compute_service.servers.sort_by(&:name).each do |server|
-            # Ask fog for the full details list
+
+          vm_in_dc  = compute_service.servers
+          server_fnd = vm_in_dc.select{ |s|  (s.id).to_i == (env[:machine].id).to_i }
+
+          if server_fnd && server_fnd.length == 1
+            server = server_fnd[0]
             server.get_server_details
-            # Output the result
-            env[:ui].info ('%-20s %-20s %s' % [server.name, server.state, server.smart_ipv4])
+            env[:machine].ui.info('%-6s %-20s %-8s %-12s %-14s %s' % [arubacloud_dc, server.name, server.id, server.state, Fog::ArubaCloud::Compute::Server::STATE_DES[server.state],  server.smart_ipv4] )
           end
+
+          if config.reserved_status == "other"
+            #
+            # output all info relate VM found in current DC , but not found in '.vagrant' directory
+            #
+            ll = env[:machine].name.length
+            ui_ext = Vagrant::UI::Prefixed.new(  Vagrant::UI::Colored.new, "-".center(ll) )
+            if server && server.name
+              config.reserved_list_owned << server.name
+            end
+            server_xs = vm_in_dc.select{ |s|  not (config.reserved_list_owned.include? s.name)}
+            server_xs.sort_by(&:name).each do |server|
+              server.get_server_details
+              ui_ext.detail('%-6s %-20s %-8s %-12s %-14s %s' % [arubacloud_dc, server.name, server.id, server.state, Fog::ArubaCloud::Compute::Server::STATE_DES[server.state],  server.smart_ipv4] )
+            end
+            config.reserved_list_owned  =  []
+          else
+             if server && server.name
+               config.reserved_list_owned  =  server.name
+             else
+               config.reserver_list_owned = ""
+             end
+          end
+
           @app.call(env)
         end
       end

data/lib/vagrant-arubacloud/action/list_templates.rb

@@ -7,10 +7,12 @@ module VagrantPlugins
         end
 
         def call(env)
+          config = env[:machine].provider_config
+          arubacloud_dc = config.endpoint
           compute_service = env[:arubacloud_compute]
-          env[:ui].info ('%-40s %-60s %-20s %s' % ['Template Name', 'Description', 'ID', 'Hypervisor ID'])
+          env[:ui].info ('%-5s %-40s %-60s %-20s %s' % ['DC', 'Template Name', 'Description', 'ID', 'Hypervisor ID'])
           compute_service.templates.sort_by(&:hypervisor).each do |template|
-            env[:ui].info ('%-40s %-60s %-20s %s' % [template.name,
+          env[:ui].info ('%-5s %-40s %-60s %-20s %s' % [arubacloud_dc, template.name,
                                                      template.description,
                                                      template.id,
                                                      enum_hypervisor_id(template.hypervisor)])

data/lib/vagrant-arubacloud/action/read_ssh_info.rb

@@ -24,7 +24,7 @@ module VagrantPlugins
           server = arubacloud.servers.get(machine.id)
           if server.nil?
             # The machine can't be found
-            @logger.info("'Machine couldn't be found, assuming it got destroyed.")
+            @logger.info("Machine couldn't be found, assuming it got destroyed.")
             machine.id = nil
             nil
           else
@@ -40,4 +40,4 @@ module VagrantPlugins
       end # ReadSSHInfo
     end # Action
   end # ArubaCloud
-end # VagrantPlugins
+end # VagrantPlugins

data/lib/vagrant-arubacloud/action/read_state.rb

@@ -13,9 +13,6 @@ module VagrantPlugins
         end
 
         def call(env)
-          # env[:ui].output(":machine_state_id: #{env[:machine_state_id]}")
-          # env[:ui].output(":arubacloud_compute: #{env[:arubacloud_compute]}")
-          # env[:ui].output(":machine: #{env[:machine]}")
           env[:machine_state_id] = read_state(env[:arubacloud_compute], env[:machine])
           @app.call(env)
         end

data/lib/vagrant-arubacloud/action/start_server.rb

@@ -0,0 +1,59 @@
+require 'log4r'
+require 'vagrant/util/retryable'
+require 'fog/arubacloud/error'
+require 'optparse'
+
+module VagrantPlugins
+  module ArubaCloud
+    module Action
+      # This stop a server, if it exists
+      class StartServer
+        include Vagrant::Util::Retryable
+
+        def initialize(app, env)
+          @app    = app
+          @env    = env
+          @logger = Log4r::Logger.new('vagrant_arubacloud::action::start_server')
+        end
+
+        def call(env)
+          if env[:machine].id
+            config = env[:machine].provider_config
+            arubacloud_dc = config.endpoint
+            
+            env[:ui].info(" [#{arubacloud_dc}] " + I18n.t('vagrant_arubacloud.starting_server'))
+            server = env[:arubacloud_compute].servers.get(env[:machine].id)
+            # Check if the vm is already powered on
+            @logger.debug("VM ready?: #{server.ready?}")
+            if server.ready?
+              # continue the middleware
+              @app.call(env)
+            else
+              # Try to power-on the VM.
+              begin
+                server.power_on 
+                rescue Fog::ArubaCloud::Errors::VmStatus
+                  env[:ui].warn(I18n.t('vagrant_arubacloud.bad_state'))
+                  return
+                rescue Fog::ArubaCloud::Errors::RequestError => e
+                  if e.response['ResultCode'].eql? 17
+                    env[:ui].warn(I18n.t('vagrant_arubacloud.operation_already_in_queue'))
+                    return
+                  end
+              end
+
+              # Wait for the server to be proper started and up
+              env[:ui].info(" [#{arubacloud_dc}] " + I18n.t('vagrant_arubacloud.waiting_server_powered_on'))
+              retryable(:tries => 40, :sleep => 2) do
+                server.wait_for(1) { ready? }
+              end
+              env[:ui].info(" [#{arubacloud_dc}] " + I18n.t('vagrant_arubacloud.server_powered_on'))
+            end
+          end
+
+          @app.call(env)
+        end
+      end
+    end
+  end
+end

data/lib/vagrant-arubacloud/command/root.rb

@@ -7,7 +7,6 @@ module VagrantPlugins
         def self.synopsis
           'query ArubaCloud for servers and templates'
         end
-
         def initialize(argv, env)
           @main_args, @sub_command, @sub_args = split_main_and_subcommand(argv)
           @env = env

data/lib/vagrant-arubacloud/command/servers.rb

@@ -1,3 +1,5 @@
+require 'pp'
+
 module VagrantPlugins
   module ArubaCloud
     module Command
@@ -5,14 +7,40 @@ module VagrantPlugins
         def execute
           options = {}
           opts = OptionParser.new do |o|
-            o.banner = 'Usage: vagrant arubacloud templates [options]'
+            o.banner = 'Usage: vagrant arubacloud servers [options]'
           end
-
           argv = parse_options(opts)
           return unless argv
 
-          with_target_vms(argv, :provider => :arubacloud) do |machine|
+          vm_count = 1
+          vm_list = Array.new
+          vm_size = 0
+
+          with_target_vms(argv,  :provider => :arubacloud ,  :plist => '1' ) do |machine|
+            if vm_count == 1
+              ll = machine.name.length
+              ui_ext = Vagrant::UI::Prefixed.new(  Vagrant::UI::Colored.new, " "*ll )
+              ui_ext.opts = { :color => :white, :bold => true  }
+              ui_ext.detail ('%-6s %-20s %-8s %-12s %-14s %s' % ['DC', 'Server Name', ' Id ', 'State Code', 'State meaning', 'IPv4 address'])
+              ui_ext.detail ("-" * 80)
+              # vm_size : how many vm are in .vagrant directory (is default)
+              # status  : 'owned'  all VM defined in my '.vagrant' directory
+              machine.provider_config.reserved_status = "owned"
+              vm_size = machine.config.vm.defined_vm_keys.length
+            end
+            if (vm_count == vm_size)
+                # if last element change 'status' to 'other' to output list of all external VM in current DC
+                # and send  list all  VM's ( server.name) founds  in '.vagrant' directory
+                machine.provider_config.reserved_status = "other"
+                machine.provider_config.reserved_list_owned = vm_list
+            end
+
             machine.action('list_servers')
+            vm_count += 1
+            # accum in append current server-name returned by list_server only if exist
+            if machine.provider_config.reserved_list_owned
+              vm_list <<  machine.provider_config.reserved_list_owned
+            end
           end
         end
       end

data/lib/vagrant-arubacloud/command/snapshot.rb

@@ -0,0 +1,175 @@
+require 'optparse'
+require 'vagrant-arubacloud/action'
+require 'fog/arubacloud'
+
+module VagrantPlugins
+    module Command
+      class Snapshot < Vagrant.plugin('2', :command)
+        def self.synopsis
+          'implement snapshot for vagrant-arubacloud '
+        end
+        def execute
+          options = {:snapop => nil, :namevm => nil}
+          myparser = OptionParser.new do |opts|
+            opts.banner = "Usage: vagrant snapshot  -t [create|delete|restore|list] -n name_server"
+     	    opts.on('-n', '--name name', 'Name server of virtual machine') do |name|
+		options[:namevm] = name;
+ 	    end
+     	    opts.on('-t', '--type type', 'Type of snapshot : create|delete|restore|list') do |type|
+		options[:snapop] = type;
+ 	    end
+      	    opts.on('-h', '--help', 'Displays Help') do
+	      puts opts
+	      return
+	    end
+          end
+
+          myparser.parse!
+
+          if options[:namevm] == nil
+	    puts 'Name of VM is missing'
+            return 
+          end
+          if options[:snapop] == nil
+	    puts "Type of action:  'create,delete,restore,list'  is missing"
+            return 
+          end
+          ck1 = ["create", "delete", "restore", "list"].include? options[:snapop]
+          if !ck1
+	    puts 'Valid option type are:  create,delete,restore,list '
+            return
+          end
+
+          not_found = true
+          with_target_vms( nil, :provider => :arubacloud) do |machine|
+            # if not machine.id....
+            if machine.id == nil
+               next
+            end
+            config1 = machine.provider_config
+            #if no url in config....
+            unless  config1.url 
+              machine.ui.info(" [dc?] " +  I18n.t('vagrant_arubacloud.wrong_dc')) 
+              return 
+            end
+
+            arubacloud_dc = config1.endpoint
+            myprefix = "[#{arubacloud_dc}] "
+            params = {
+              :provider => :arubacloud,
+              :arubacloud_username => config1.arubacloud_username,
+              :arubacloud_password => config1.arubacloud_password,
+              :url => config1.url
+            }
+            
+            envx = Fog::Compute.new params
+            server = envx.servers.get(machine.id)
+            if server.name ==  options[:namevm]
+            
+              machine.ui.info(myprefix  +  I18n.t('vagrant_arubacloud.connect_to_dc'))
+              machine.ui.info(myprefix + I18n.t('vagrant_arubacloud.snapshot_req_type') + " '#{options[:snapop]}'" +  " target id:#{machine.id}" )
+              not_found = false
+              case options[:snapop]
+              # output if exist date creation and date expire for snapshot
+              when "list"
+                begin
+                  myreq = server.list_snapshot
+                  if myreq["Success"] 
+                    machine.ui.info(myprefix + 'snapshot ' + I18n.t('vagrant_arubacloud.snapshot_info_create') + "  #{myreq['credate']} " + I18n.t('vagrant_arubacloud.snapshot_info_expired') + "  #{myreq['expdate']} " )
+                  else
+                    machine.ui.warn(myprefix + I18n.t('vagrant_arubacloud.snapshot_info_not_found'))
+                  end 
+                rescue Fog::ArubaCloud::Errors::RequestError => e
+                  message = ''
+                  error = nil
+                  @logger.debug(e.inspect.to_yaml)
+                  machine.ui.warn(myprefix + " *ERR* list response message: #{e.response.to_yaml}")
+                end
+              # creation of snapshot ....
+              when "create"
+                if server.state == Fog::ArubaCloud::Compute::Server::RUNNING
+                #
+                # if state active and request snapshot create ...
+                #
+                  begin
+                    myreq = server.create_snapshot
+                    if myreq 
+                      machine.ui.info(myprefix + I18n.t('vagrant_arubacloud.snapshot_created'))
+                    else
+                      machine.ui.warn(myprefix + I18n.t('vagrant_arubacloud.snapshot_create_err_fog'))
+                    end 
+                  rescue Fog::ArubaCloud::Errors::RequestError => e
+                    message = ''
+                    error = nil
+                    @logger.debug(e.inspect.to_yaml)
+                    machine.ui.warn(myprefix + " *ERROR* response message: #{e.response.to_yaml}")
+                    #raise error
+                  end
+                #  
+                else
+                  machine.ui.warn(myprefix  + I18n.t('vagrant_arubacloud.snapshot_create_err_not_on'))
+                end
+              # delete of snapshot...
+              when "delete"
+                #
+                # if snapshot delete ... 
+                #  
+                begin
+                  myreq = server.delete_snapshot
+                  if myreq 
+                    machine.ui.info(myprefix + I18n.t('vagrant_arubacloud.snapshot_deleted'))
+                  else
+                    machine.ui.warn(myprefix + I18n.t('vagrant_arubacloud.snapshot_delete_err_fog'))
+                  end 
+                rescue Fog::ArubaCloud::Errors::RequestError => e
+                  message = ''
+                  error = nil
+                  @logger.debug(e.inspect.to_yaml)
+                  machine.ui.warn(myprefix + " *ERROR* response message: #{e.response.to_yaml}")
+                  #raise error
+                end
+              # if vm is power off and esiste a snapshot resorre vm from snapshot
+              # (waring : the machine is not power on after restart and snapshot image is removed) 
+              when "restore"
+                if server.state == Fog::ArubaCloud::Compute::Server::STOPPED
+                  #
+                  # if state stopped (power off) and requets restore
+                  # WARNING : the snapshot file is removed after restore 
+                  #
+                  begin
+                    myreq = server.apply_snapshot
+                    if myreq 
+                      machine.ui.info(myprefix + I18n.t('vagrant_arubacloud.snapshot_restored'))
+                    else
+                      machine.ui.warn(myprefix + I18n.t('vagrant_arubacloud.snapshot_restore_err_fog'))
+                    end 
+                  rescue Fog::ArubaCloud::Errors::RequestError => e
+                    message = ''
+                    error = nil
+                    @logger.debug(e.inspect.to_yaml)
+                    machine.ui.warn(myprefix + " *ERROR* response message: #{e.response.to_yaml}")
+                    #raise error
+                  end
+                else
+                  machine.ui.warn(myprefix  + I18n.t('vagrant_arubacloud.snapshot_restore_err_not_off'))
+                end
+
+              else
+                machine.ui.warn(myprefix  + I18n.t('vagrant_arubacloud.snapshot_type_unknow') + " :#{options[:snapop]}" )
+              end
+
+            end  # test if found machine.id
+
+          end #
+
+          if not_found
+            puts "==> ??? [dc?] " + I18n.t("vagrant_arubacloud.snapshot_server_unknow") + " :#{options[:namevm]}" 
+          end  
+          
+        end
+      end
+    end
+end
+
+
+

data/lib/vagrant-arubacloud/config.rb

@@ -4,7 +4,20 @@ require 'fog'
 module VagrantPlugins
   module ArubaCloud
 
+    DC_TABLES = {
+      :dc1 => "https://api.dc1.computing.cloud.it/WsEndUser/v2.9/WsEndUser.svc/json",
+      :dc2 => "https://api.dc2.computing.cloud.it/WsEndUser/v2.9/WsEndUser.svc/json",
+      :dc3 => "https://api.dc3.computing.cloud.it/WsEndUser/v2.9/WsEndUser.svc/json",
+      :dc4 => "https://api.dc4.computing.cloud.it/WsEndUser/v2.9/WsEndUser.svc/json",
+      :dc5 => "https://api.dc5.computing.cloud.it/WsEndUser/v2.9/WsEndUser.svc/json",
+      :dc6 => "https://api.dc6.computing.cloud.it/WsEndUser/v2.9/WsEndUser.svc/json",
+      :dc8 => "https://api.dc8.computing.cloud.it/WsEndUser/v2.9/WsEndUser.svc/json"
+    }
+
+    DC_DEFAULT = "dc2"
+
     class Config < Vagrant.plugin('2', :config)
+
       # ArubaCloud Username
       # @return [String]
       attr_accessor :arubacloud_username
@@ -13,11 +26,19 @@ module VagrantPlugins
       # @return [String]
       attr_accessor :arubacloud_password
 
+      # reserved for internal use
+      attr_accessor  :reserved_status
+      attr_accessor  :reserved_list_owned
+
       # Ws EndPoint Url
       # Expected to be the url of the web service to use
       # @return [String]
       attr_accessor :url
 
+      # Ws EndPoint id : can be dc2,dc2,dc3,...dc8 (dc7 is not defined at this release)
+      # @return [String]
+      attr_accessor :endpoint
+
       # The name of the server. This defaults to the name of the machine
       # defined by Vagrant (via 'config.vm.define'), but can be override here.
       # @return [String]
@@ -28,17 +49,13 @@ module VagrantPlugins
       # @return [Integer]
       attr_accessor :template_id
 
-      # The smart vm type expressed in ID:
-      # 1 = small
-      # 2 = medium
-      # 3 = large
-      # 4 = extra-large
-      # @return [Integer]
-      attr_accessor :package_id
-
-      # The admin password of the vm (root user) .
+      # The smart vm type expressed as String:
+      # 'small'
+      # 'medium'
+      # 'large'
+      # 'extra large'
       # @return [String]
-      attr_accessor :admin_password
+      attr_accessor :package_id
 
       # Service Type expressed in ID [Integer]:
       # 1 = Pro Hyper-V
@@ -70,8 +87,10 @@ module VagrantPlugins
       def initialize
         @arubacloud_username = UNSET_VALUE
         @arubacloud_password = UNSET_VALUE
-        @admin_password = UNSET_VALUE
         @url = UNSET_VALUE
+        @reserved_status = UNSET_VALUE
+        @reserved_list_owned = UNSET_VALUE
+        @endpoint = UNSET_VALUE
         @server_name = UNSET_VALUE
         @template_id = UNSET_VALUE
         @package_id = UNSET_VALUE
@@ -84,8 +103,10 @@ module VagrantPlugins
       def finalize!
         @arubacloud_username = nil if @arubacloud_username == UNSET_VALUE
         @arubacloud_password = nil if @arubacloud_password == UNSET_VALUE
-        @admin_password = nil if @admin_password == UNSET_VALUE
         @url = nil if @url == UNSET_VALUE
+        @reserved_status = nil if @reserved_status = UNSET_VALUE
+        @reserved_list_owned = nil if @reserved_list_owned = UNSET_VALUE
+        @endpoint = nil if @endpoint == UNSET_VALUE
         @server_name = nil if @server_name == UNSET_VALUE
         @template_id = nil if @template_id == UNSET_VALUE
         @package_id = nil if @package_id == UNSET_VALUE
@@ -101,10 +122,32 @@ module VagrantPlugins
         # Global configurations needed by all service types
         errors << I18n.t('vagrant_arubacloud.config.arubacloud_username_required') unless @arubacloud_username
         errors << I18n.t('vagrant_arubacloud.config.arubacloud_password_required') unless @arubacloud_password
-        errors << I18n.t('vagrant_arubacloud.config.admin_password_required') unless @admin_password
         errors << I18n.t('vagrant_arubacloud.config.template_id_required') unless @template_id
         errors << I18n.t('vagrant_arubacloud.config.service_type_required') unless @service_type
 
+        errors << I18n.t('vagrant_arubacloud.config.ssh_password_required') unless machine.config.ssh.password
+
+        #check if coded url or endpoint
+        #if url not in table or dc wrong return error
+        if (@url)
+          if (DC_TABLES.key(@url))
+            @endpoint = DC_TABLES.key(@url)
+          else
+            errors << I18n.t('vagrant_arubacloud.config.url_is_wrong')
+          end
+        else
+          if (@endpoint)
+            if DC_TABLES.key?(@endpoint.to_sym)
+              @url = DC_TABLES[@endpoint.to_sym]
+            else
+              errors << I18n.t('vagrant_arubacloud.config.endpoint_is_wrong')
+            end
+          else
+            @endpoint = DC_DEFAULT.to_sym
+            @url = DC_TABLES[DC_DEFAULT.to_sym]
+          end
+        end
+
         if @service_type.eql? 4
           errors << I18n.t('vagrant_arubacloud.config.package_id_required') unless @package_id
         else
@@ -118,7 +161,7 @@ module VagrantPlugins
         end
         {'ArubaCloud Provider' => errors}
       end
-
     end # Config
+
   end # ArubaCloud
-end # VagrantPlugins
+end # VagrantPlugins