forj 1.0.1 → 1.0.2

data/lib/forj-settings.rb

@@ -16,17 +16,27 @@
 
 module Forj
    module Settings
+
+      def Settings.common_options(options)
+         PrcLib.set_level(Logger::INFO) if options[:verbose]
+         PrcLib.set_level(Logger::DEBUG) if options[:debug]
+         unless options[:lorj_debug].nil?
+            PrcLib.core_level = options[:lorj_debug].to_i
+            PrcLib.set_level(Logger::DEBUG)
+         end
+      end
+
       def Settings.account_show_all(oConfig, account_name)
          oConfig.set(:account_name, account_name)
 
-         oForjAccount = ForjAccount.new(oConfig)
+         oForjAccount = Lorj::Account.new(oConfig)
          oForjAccount.ac_load()
          puts "List of account settings for provider '%s': " % [oForjAccount.get(:provider)]
          puts "%-15s %-12s :\n------------------------------" % ['key', 'section name']
 
          oForjAccount.metadata_each { |section, found_key, hValue|
-            next if rhGet(hValue, :readonly)            
-            sDesc = rhGet(hValue, :desc)
+            next if Lorj::rhGet(hValue, :readonly)
+            sDesc = Lorj::rhGet(hValue, :desc)
             puts "%-15s %-12s : %s" % [found_key, section, sDesc]
             }
          puts "\nUse `forj set KeyName=Value -a %s` to set one." % [ account_name]
@@ -37,8 +47,8 @@ module Forj
          puts "List of available FORJ default settings:"
          puts "%-15s %-12s :\n------------------------------" % ['key', 'section name']
          oConfig.meta_each { |section, found_key, hValue|
-            next if rhGet(hValue, :readonly)            
-            sDesc = rhGet(hValue, :desc)
+            next if Lorj::rhGet(hValue, :readonly)
+            sDesc = Lorj::rhGet(hValue, :desc)
             puts "%-15s %-12s : %s" % [found_key, section, sDesc]
             }
          puts "\nUse `forj set KeyName=Value` to set one. "
@@ -48,29 +58,29 @@ module Forj
       def Settings.account_set(oConfig, account_name, *p)
          bDirty = false
 
-         oConfig.set(:account_name, account_name)
+         oConfig[:account_name] = account_name
 
-         oForjAccount = ForjAccount.new(oConfig)
+         oForjAccount = Lorj::Account.new(oConfig)
          oForjAccount.ac_load()
 
          p.flatten!
          p.each { | key_val |
             mkey_val = key_val.match(/^(.*) *= *(.*)$/)
-            
-            Logging.fatal(1, "Syntax error. Please set your value like: 'key=value' and retry.") if not mkey_val
+
+            PrcLib.fatal(1, "Syntax error. Please set your value like: 'key=value' and retry.") if not mkey_val
 
             key_to_set = mkey_val[1]
             key_value = mkey_val[2]
 
             sBef = "unset"
             sAft = "unset"
-            
-            Logging.fatal(1, "Unable to update protected '%s'. use `forj setup`, to update it." % key_to_set) if oForjAccount.readonly?(key_to_set)
+
+            PrcLib.fatal(1, "Unable to update protected '%s'. use `forj setup`, to update it." % key_to_set) if oForjAccount.readonly?(key_to_set)
             if oForjAccount.meta_type?(key_to_set) == :default
-               Logging.fatal(1, "Unable set '%s' value. To update this one, use forj set %s, WITHOUT -a %s" % [key_to_set, key_to_set, account_name])
+               PrcLib.fatal(1, "Unable set '%s' value. To update this one, use forj set %s, WITHOUT -a %s" % [key_to_set, key_to_set, account_name])
             end
 
-            full_key = '%s/%s' % [ForjDefault.get_meta_section(key_to_set), key_to_set]
+            full_key = '%s/%s' % [Lorj::Default.get_meta_section(key_to_set), key_to_set]
 
             old_value = oForjAccount.get(key_to_set)
             sBef = "'%s' (%s)" % [old_value, oForjAccount.exist?(key_to_set)] if oForjAccount.exist?(key_to_set)
@@ -92,63 +102,66 @@ module Forj
             }
          oForjAccount.ac_save() if bDirty
       end
-      
+
       def Settings.config_set(oConfig, *p)
          bDirty = false
 
          p.flatten!
          p.each { | key_val |
             mkey_val = key_val.match(/^(.*) *= *(.*)$/)
-            
-            Logging.fatal(1, "Syntax error. Please set your value like: 'key=value' and retry.") if not mkey_val
+
+            PrcLib.fatal(1, "Syntax error. Please set your value like: 'key=value' and retry.") if not mkey_val
 
             key_to_set = mkey_val[1]
             key_value = mkey_val[2]
 
             sBef = "unset"
             sAft = "unset"
-            
+            if Lorj::Default.get_meta_section(key_to_set).nil?
+               PrcLib.warning("key '%s' is not a recognized default key by forj process. " % key_to_set)
+            end
+
             old_value = oConfig.get(key_to_set)
             sBef = "%s: '%s'" % [oConfig.exist?(key_to_set), oConfig.get(key_to_set)] if oConfig.exist?(key_to_set)
-            
+
             if old_value == key_value
                puts "%-15s: No update" % [key_to_set]
                next
             end
-            
+
             bDirty = true
-            
+
             if key_value != ""
-               oConfig.LocalSet(key_to_set, key_value)
+               oConfig.localSet(key_to_set, key_value)
             else
-               oConfig.LocalDel(key_to_set)
+               oConfig.localDel(key_to_set)
             end
 
             sAft = "%s: '%s'" % [oConfig.exist?(key_to_set), oConfig.get(key_to_set)] if oConfig.exist?(key_to_set)
             puts "%-15s: %s => %s" % [key_to_set, sBef, ANSI.bold+sAft+ANSI.clear]
             }
-         oConfig.SaveConfig() if bDirty
+         oConfig.saveConfig() if bDirty
       end
 
       def Settings.account_get_all(oConfig, account_name)
          oConfig.set(:account_name, account_name)
-         oForjAccount = ForjAccount.new(oConfig)
-         Logging.fatal(1, "Unable to load account '%s'. Not found." % account_name) if not oForjAccount.ac_load
-         
+         oForjAccount = Lorj::Account.new(oConfig)
+         PrcLib.fatal(1, "Unable to load account '%s'. Not found." % account_name) if not oForjAccount.ac_load
+
          puts "legend: default = Application defaults, local = Local default config, %s = '%s' account config\n\n" % [account_name, account_name]
          puts "%s %-15s(%-7s) %-12s:\n----------------------------------------" % ['U', 'key', 'origin', 'section name']
          oForjAccount.metadata_each { | section, mykey, hValue |
             key_exist = oForjAccount.exist?(mykey)
 
             sUpdMsg = '+'
-            sUpdMsg = ' ' if rhGet(hValue, :readonly)
+            sUpdMsg = ' ' if Lorj::rhGet(hValue, :readonly)
 
             if key_exist
                highlight = ''
                highlight = ANSI.bold if key_exist == account_name
                highlight = ANSI.bold + ANSI.yellow if key_exist == 'local'
                default_key = nil
-               default_key = " (from default key '%s')" % rhGet(hValue, :default) if rhExist?(hValue, :default) == 1 and key_exist != account_name
+               default_key = " (from default key '%s')" % Lorj::rhGet(hValue, :default) if Lorj::rhExist?(hValue, :default) == 1 and key_exist != account_name
                puts "%s %-15s(%s%-7s%s) %-12s: '%s'%s" % [sUpdMsg, mykey, highlight, key_exist, ANSI.clear, section, oForjAccount.get(mykey), default_key]
             else
                puts "%s %-15s(       ) %-12s: unset" % [sUpdMsg, mykey, section]
@@ -158,16 +171,16 @@ module Forj
          puts "Use `forj set <key>=<value> -a %s` to update account data." % account_name
          puts "Or  `forj set <key>= -a %s`        to restore key default value." % account_name
       end
-      
+
       def Settings.config_get_all(oConfig)
          puts "legend: default = Application defaults, local = Local default config\n\n"
          puts "%s %-15s(%-7s) %-12s:\n----------------------------------------" % ['U', '''key', 'origin', 'section name']
-         
+
          oConfig.meta_each { |section, found_key, hValue|
             sUpdMsg = '+'
-            sUpdMsg = ' ' if rhGet(hValue, :readonly)
-            found_key = rhGet(hValue, :default) if rhExist?(hValue, :default) == 1
-            
+            sUpdMsg = ' ' if Lorj::rhGet(hValue, :readonly)
+            found_key = Lorj::rhGet(hValue, :default) if Lorj::rhExist?(hValue, :default) == 1
+
             where = oConfig.exist?(found_key)
             if where
                highlight = ''
@@ -180,13 +193,13 @@ module Forj
          puts "\nUse 'forj set <key>=<value>' to update defaults on values identified with '+'"
 
       end
-      
+
       def Settings.account_get(oConfig, account_name, key)
 
          oConfig.set(:account_name, account_name)
-         oForjAccount = ForjAccount.new(oConfig)
+         oForjAccount = Lorj::Account.new(oConfig)
 
-         Logging.fatal(1, "Unable to load account '%s'. Not found." % account_name) if not oForjAccount.ac_load
+         PrcLib.fatal(1, "Unable to load account '%s'. Not found." % account_name) if not oForjAccount.ac_load
 
          if oForjAccount.exist?(key)
             puts "%s: '%s'" % [oForjAccount.exist?(key), oForjAccount.get(key)]
@@ -194,15 +207,15 @@ module Forj
             key_symb = key.parameterize.underscore.to_sym
             puts "%s: '%s'" % [oForjAccount.exist?(key_symb), oForjAccount.get(key_symb)]
          else
-            Logging.message("key '%s' not found"% [key])
+            PrcLib.message("key '%s' not found"% [key])
          end
       end
-      
+
       def Settings.config_get(oConfig, key)
          if oConfig.exist?(key)
             puts "%s:'%s'" % [oConfig.exist?(key), oConfig.get(key)]
          else
-            Logging.message("key '%s' not found" % [key])
+            PrcLib.message("key '%s' not found" % [key])
          end
       end
    end

data/lib/forj/ForjCli.rb

@@ -21,18 +21,19 @@
 # Define framework object on BaseDefinition
 # See lib/core/definition.rb for function details usage.
 
-class ForjCliProcess
-   def connect_to(sObjectType, hParams)
-   end
-end
-
-class BaseDefinition
 
-   define_obj  :box_ssh,
+class Lorj::BaseDefinition
+   # ************************************ SSH Object
+   define_obj(:ssh,
       {
-         :create_e => :connect_to
-      }
+         :create_e      => :ssh_connection
+      })
    obj_needs   :CloudObject,  :forge
-   obj_needs   :data,         :box_name
+   obj_needs   :data,         :instance_name
+   obj_needs   :data,         :keypair_name
+   obj_needs   :data,         :keypair_path
 
+   obj_needs_optional
+   obj_needs    :data,         :forge_server
+   obj_needs    :data,         :ssh_user
 end

data/lib/forj/ForjCore.rb

@@ -25,7 +25,7 @@ $FORJCORE_PATH = File.expand_path(File.dirname(__FILE__))
 
 require File.join($FORJCORE_PATH, "process", "ForjProcess.rb")
 
-class BaseDefinition
+class Lorj::BaseDefinition
 
    process_default :use_controller => false
 
@@ -97,12 +97,14 @@ class BaseDefinition
    # ******************* forge object
    define_obj  :forge,
       {
-         :create_e => :build_forge
-#         :delete_e => :drop_forge
+         :create_e => :build_forge,
+         :delete_e => :delete_forge,
+         :get_e    => :get_forge
       }
-   obj_needs   :CloudObject,  :metadata
-   obj_needs   :CloudObject,  :userdata
-   obj_needs   :data,         :instance_name
+   obj_needs   :CloudObject,  :compute_connection
+   obj_needs   :CloudObject,  :metadata,        { :for => [:create_e] }
+   obj_needs   :CloudObject,  :userdata,        { :for => [:create_e] }
+   obj_needs   :data,         :instance_name,   { :for => [:create_e] }
 
    obj_needs_optional
    obj_needs   :CloudObject,  :server

data/lib/forj/process/ForjProcess.rb

@@ -24,6 +24,7 @@ require 'digest'
 require 'json'
 require 'encryptor' # gem install encryptor
 require 'base64'
+require 'net/ssh'
 
 $INFRA_VERSION = "0.0.37"
 
@@ -41,12 +42,12 @@ class ForjCoreProcess
             :iv => Base64::strict_encode64(OpenSSL::Cipher::Cipher.new('aes-256-cbc').random_iv)
          }
 
-         Logging.debug("Writing '%s' key file" % key_file)
+         PrcLib.debug("Writing '%s' key file" % key_file)
          File.open(key_file, 'w') do |out|
             out.write(Base64::encode64(entr.to_yaml))
          end
       else
-         Logging.debug("Loading '%s' key file" % key_file)
+         PrcLib.debug("Loading '%s' key file" % key_file)
          encoded_key = IO.read(key_file)
          entr = YAML.load(Base64::decode64(encoded_key))
       end
@@ -106,7 +107,9 @@ class ForjCoreProcess
 
       config.set(:meta_data, hMeta) # Used by :server object
 
-      Logging.info("Metadata set:\n%s" % hMeta)
+      hMetaPrintable = hMeta.clone
+      hMetaPrintable['hpcloud_priv'] = "XXX - data hidden - XXX"
+      PrcLib.info("Metadata set:\n%s" % hMetaPrintable)
 
       oMetaData = register(hMeta, sObjectType)
       oMetaData[:meta_data] = hMeta
@@ -116,17 +119,46 @@ class ForjCoreProcess
 
    def build_forge(sObjectType, hParams)
 
+      oForge = Get(sObjectType, config[:instance_name])
+      if oForge.empty? or oForge[:servers].length == 0
+         PrcLib.high_level_msg ("\nBuilding your forge...\n")
+         Create(:internet_server)
+      else
+         oForge[:servers].each { | oServerToFind |
+            Get(:server, oServerToFind[:id]) if /^maestro\./ =~ oServerToFind[:name]
+         }
+         PrcLib.high_level_msg ("\nChecking your forge...\n")
+         oServer = DataObjects(:server, :ObjectData)
+         if oServer
+            oIP = Query(:public_ip, :server_id => oServer[:id])
+            if oIP.length > 0
+               register oIP[0]
+            end
+            Create(:keypairs)
+         else
+            PrcLib.high_level_msg ("\nYour forge exist, without maestro. Building Maestro...\n")
+            Create(:internet_server)
 
-      object.Create(:internet_server)
-
-      Logging.high_level_msg ("\nBuilding your forge...\n")
+            PrcLib.high_level_msg ("\nBuilding your forge...\n")
+         end
+      end
 
       oServer = DataObjects(:server, :ObjectData)
 
+      #Get keypairs
+      hKeys = keypair_detect(oServer[:key_name], File.join($FORJ_KEYPAIRS_PATH, oServer[:key_name]))
+
+      private_key_file = File.join(hKeys[:keypair_path], hKeys[:private_key_name])
+      public_key_file  = File.join(hKeys[:keypair_path], hKeys[:public_key_name])
+
+      oServerKey = Get(:keypairs, oServer[:key_name])
+
+      keypair_coherent = coherent_keypair?(hKeys, oServerKey)
+
       # Define the log lines to get and test.
       config.set(:log_lines, 5)
 
-      Logging.info("Maestro server '%s' id is '%s'." % [oServer[:name], oServer[:id]])
+      PrcLib.info("Maestro server '%s' id is '%s'." % [oServer[:name], oServer[:id]])
       # Waiting for server to come online before assigning a public IP.
 
       sStatus = :checking
@@ -135,21 +167,22 @@ class ForjCoreProcess
 
       if oServer[:attrs][:status] == :active
          sMsg = <<-END
-Your server is up and running and is publically accessible through IP '#{oAddress[:public_ip]}'.
+Your forj Maestro server is up and running and is publically accessible through IP '#{oAddress[:public_ip]}'.
 
 You can connect to '#{oServer[:name]}' with:
-ssh ubuntu@#{oAddress[:public_ip]} -o StrictHostKeyChecking=no -i #{get_data(:keypairs, :private_key_file)}
+ssh ubuntu@#{oAddress[:public_ip]} -o StrictHostKeyChecking=no -i #{private_key_file}
          END
-         if not object.get_data(:keypairs)[:coherent]
+         if not keypair_coherent
             sMsg += ANSI.bold("\nUnfortunatelly") + " your current keypair is not usable to connect to your server.\nYou need to fix this issue to gain access to your server."
          end
-         Logging.info(sMsg)
-         Logging.high_level_msg ("\n%s\nThe forge is still building...\n" % sMsg)
+         PrcLib.info(sMsg)
 
-         oLog = object.Get(:server_log, 5)[:attrs][:output]
+         oLog = Get(:server_log, 25)[:attrs][:output]
          if /cloud-init boot finished/ =~ oLog
             sStatus = :active
+            PrcLib.high_level_msg ("\n%s\nThe forge is ready...\n" % sMsg)
          else
+            PrcLib.high_level_msg ("\n%s\nThe forge is still building...\n" % sMsg)
             sStatus = :cloud_init
          end
       else
@@ -157,12 +190,18 @@ ssh ubuntu@#{oAddress[:public_ip]} -o StrictHostKeyChecking=no -i #{get_data(:ke
          sStatus = :starting
       end
 
+      mCloudInitError = []
+      iCurAct = 0
+      oOldLog = ""
+
       while sStatus != :active
-         maestro_create_status(sStatus)
+         maestro_create_status(sStatus, iCurAct)
+         iCurAct += 1
+         iCurAct = iCurAct % 4
          begin
-            oServer = object.Get(:server, oServer[:attrs][:id])
+            oServer = Get(:server, oServer[:attrs][:id])
          rescue => e
-            Logging.error(e.message)
+            PrcLib.error(e.message)
          end
          if sStatus == :starting
             if oServer[:attrs][:status] == :active
@@ -171,56 +210,120 @@ ssh ubuntu@#{oAddress[:public_ip]} -o StrictHostKeyChecking=no -i #{get_data(:ke
          elsif sStatus == :assign_ip
             if oAddress.empty?
                query_cache_cleanup(:public_ip) # To be able to ask for server IP assigned
-               oAddresses = object.Query(:public_ip, :server_id => oServer[:id])
+               oAddresses = Query(:public_ip, :server_id => oServer[:id])
                if oAddresses.length == 0
                   # Assigning Public IP.
-                  oAddress = object.Create(:public_ip)
+                  oAddress = Create(:public_ip)
                else
                   oAddress = oAddresses[0]
                end
             end
             sMsg = <<-END
-Public IP for server '#{oServer[:name]}' is assigned'
+Public IP for server '#{oServer[:name]}' is assigned.
 Now, as soon as the server respond to the ssh port, you will be able to get a tail of the build with:
 while [ 1 = 1 ]
 do
-  ssh ubuntu@#{oAddress[:public_ip]} -o StrictHostKeyChecking=no -i #{get_data(:keypairs, :private_key_file)} tail -f /var/log/cloud-init.log
+  ssh ubuntu@#{oAddress[:public_ip]} -o StrictHostKeyChecking=no -i #{private_key_file} tail -f /var/log/cloud-init.log
   sleep 5
 done
             END
-            if not object.get_data(:keypairs)[:coherent]
+            if not keypair_coherent
                sMsg += ANSI.bold("\nUnfortunatelly") + " your current keypair is not usable to connect to your server.\nYou need to fix this issue to gain access to your server."
             end
-            Logging.info(sMsg)
-            Logging.high_level_msg ("\n%s\nThe forge is still building...\n" % sMsg)
+            PrcLib.info(sMsg)
+            PrcLib.high_level_msg ("\n%s\nThe forge is still building...\n" % sMsg)
             sStatus = :cloud_init
-         elsif sStatus == :cloud_init
-            oLog = object.Get(:server_log, 5)[:attrs][:output]
+         else #analyze the log output
+            oLog = Get(:server_log, 25)[:attrs][:output]
+            iCurAct = 4 if oLog == oOldLog
+            oOldLog = oLog
             if /cloud-init boot finished/ =~ oLog
                sStatus = :active
+               if mCloudInitError != []
+                  PrcLib.high_level_msg ("Critical error cleared. Cloud-init seems moving...")
+                  PrcLib.info ("Critical error cleared. Cloud-init seems moving...")
+                  mCloudInitError = []
+               end
+            elsif /\[CRITICAL\]/ =~ oLog
+               mCritical = oLog.scan(/.*\[CRITICAL\].*\n/)
+               if not (mCloudInitError == mCritical)
+                  sReported = oLog.clone
+                  sReported['CRITICAL'] = ANSI.bold('CRITICAL')
+                  PrcLib.error("cloud-init error detected:\n-----\n%s\n-----\nPlease connect to the box to decide what you need to do." % [sReported])
+                  mCloudInitError = mCritical
+               end
+            elsif sStatus == :cloud_init and /cloud-init-nonet gave up waiting for a network device/ =~ oLog
+               # Valid for ubuntu image 12.04
+               PrcLib.warning("Cloud-init has gave up to configure the network. waiting...")
+               sStatus = :nonet
+            elsif sStatus == :nonet and /Booting system without full network configuration/ =~ oLog
+               # Valid for ubuntu image 12.04
+               PrcLib.warning("forj has detected an issue to bring up your maestro server. Removing it and re-creating a new one. please be patient...")
+               sStatus = :restart
+            elsif sStatus == :restart
+               Delete(:server)
+               Create(:internet_server)
+               sStatus = :starting
             end
          end
          sleep(5) if sStatus != :active
       end
-      sMsg = "Server '%s' is now ACTIVE. Bootstrap done." % oServer[:name]
-      Logging.info(sMsg)
+
+      oForge = get_forge(sObjectType, config[:instance_name], hParams)
+      sMsg = "Your Forge '%s' is ready and accessible from IP #{oAddress[:public_ip]}." % config[:instance_name]
       # TODO: read the blueprint/layout to identify which services are implemented and can be accessible.
-      Logging.high_level_msg ("Your Forge '%s' is over and accessible from IP #{oAddress[:public_ip]}. Enjoy!\n" % config[:instance_name])
-      oServer
+      if config[:blueprint]
+         sMsg += "\nMaestro has implemented the following server(s) for your blueprint '%s':" % config[:blueprint]
+         iCount = 0
+         oForge[:servers].each { | oServer|
+            next if /^maestro\./ =~ oServer[:name]
+            register(oServer)
+            oIP = Query(:public_ip, :server_id => oServer[:id])
+            if oIP.length == 0
+               sMsg += "\n- %s (No public IP)" % [oServer[:name]]
+            else
+               sMsg += "\n- %s (%s)" % [oServer[:name], oIP[0][:public_ip]]
+            end
+            iCount += 1
+         }
+         if iCount > 0
+            sMsg += "\n%d server(s) identified.\n" % iCount
+         else
+            sMsg = "No servers found except maestro"
+            PrcLib.warning("Something went wrong, while creating nodes for " \
+               "blueprint '%s'. check maestro logs." % config[:blueprint])
+         end
+      else
+         sMsg += "\nMaestro has NOT implemented any servers, because you did not provided a blueprint. Connect to Maestro, and ask Maestro to implement any kind of blueprint you need. (Feature currently under development)"
+      end
+      PrcLib.info(sMsg)
+      PrcLib.high_level_msg ("\n%s\nEnjoy!\n" % sMsg)
+      oForge
    end
 
-   def maestro_create_status(sStatus)
+   def maestro_create_status(sStatus, iCurAct = 4)
+      sActivity = "/-\\|?"
+      if iCurAct < 4
+         sCurAct = "ACTIVE"
+      else
+         sCurAct = ANSI.bold("PENDING")
+      end
+
       case sStatus
          when :checking
-            Logging.state("Checking server status")
+            PrcLib.state("Checking server status")
          when :starting
-            Logging.state("STARTING")
+            PrcLib.state("STARTING")
          when :assign_ip
-            Logging.state("ACTIVE - Assigning Public IP")
+            PrcLib.state("%s - %s - Assigning Public IP" % [sActivity[iCurAct], sCurAct])
          when :cloud_init
-            Logging.state("ACTIVE - Currently running cloud-init. Be patient.")
+            PrcLib.state("%s - %s - Currently running cloud-init. Be patient." % [sActivity[iCurAct], sCurAct])
+         when :nonet
+            PrcLib.state("%s - %s - Currently running cloud-init. Be patient." % [sActivity[iCurAct], sCurAct])
+         when :restart
+            PrcLib.state("RESTARTING - Currently restarting maestro box. Be patient.")
          when :active
-            Logging.info("Server is active")
+            PrcLib.info("Server is active")
       end
    end
 
@@ -233,11 +336,11 @@ done
 
       begin
          if maestro_repo and File.directory?(maestro_repo)
-            Logging.info("Using maestro repo '%s'" % maestro_repo)
+            PrcLib.info("Using maestro repo '%s'" % maestro_repo)
             hResult[:maestro_repo] = maestro_repo
          else
             hResult[:maestro_repo] = File.join(path_maestro, 'maestro')
-            Logging.state("Cloning maestro repo from '%s' to '%s'" % [maestro_url, File.join(path_maestro, 'maestro')])
+            PrcLib.state("Cloning maestro repo from '%s' to '%s'" % [maestro_url, File.join(path_maestro, 'maestro')])
             if File.directory?(path_maestro)
                if File.directory?(File.join(path_maestro, 'maestro'))
                   FileUtils.rm_r File.join(path_maestro, 'maestro')
@@ -245,11 +348,11 @@ done
             end
             git = Git.clone(maestro_url, 'maestro', :path => path_maestro)
             git.checkout(config[:branch]) if config[:branch] != 'master'
-            Logging.info("Maestro repo '%s' cloned on branch '%s'" % [File.join(path_maestro, 'maestro'), config[:branch]])
+            PrcLib.info("Maestro repo '%s' cloned on branch '%s'" % [File.join(path_maestro, 'maestro'), config[:branch]])
          end
       rescue => e
-         Logging.error("Error while cloning the repo from %s\n%s\n%s" % [maestro_url, e.message, e.backtrace.join("\n")])
-         Logging.info("If this error persist you could clone the repo manually in ~/.forj/")
+         PrcLib.error("Error while cloning the repo from %s\n%s\n%s" % [maestro_url, e.message, e.backtrace.join("\n")])
+         PrcLib.info("If this error persist you could clone the repo manually in ~/.forj/")
       end
       oMaestro = register(hResult, sObjectType)
       oMaestro[:maestro_repo] = hResult[:maestro_repo]
@@ -271,16 +374,16 @@ done
       bReBuildInfra = infra_is_original?(infra, maestro_repo)
 
       if bReBuildInfra
-         Logging.state("Building your infra workspace in '%s'" % [infra])
+         PrcLib.state("Building your infra workspace in '%s'" % [infra])
 
-         Logging.debug("Copying recursively '%s' to '%s'" % [cloud_init, infra])
+         PrcLib.debug("Copying recursively '%s' to '%s'" % [cloud_init, infra])
          FileUtils.copy_entry(cloud_init, dest_cloud_init)
 
          file_ver = File.join(infra, 'forj-cli.ver')
          File.write(file_ver, $INFRA_VERSION)
-         Logging.info("The infra workspace '%s' has been built from maestro predefined files." % [infra])
+         PrcLib.info("The infra workspace '%s' has been built from maestro predefined files." % [infra])
       else
-         Logging.info("Re-using your infra... in '%s'" % [infra])
+         PrcLib.info("Re-using your infra... in '%s'" % [infra])
       end
 
 
@@ -300,7 +403,7 @@ done
          begin
             hResult = YAML.load_file(sMD5List)
          rescue => e
-            Logging.error("Unable to load valid Original files list '%s'. Your infra workspace won't be migrated, until fixed." % sMD5List)
+            PrcLib.error("Unable to load valid Original files list '%s'. Your infra workspace won't be migrated, until fixed." % sMD5List)
             bResult = false
          end
          if not hResult
@@ -318,9 +421,9 @@ done
                md5_file = Digest::MD5.file(sInfra_path).hexdigest
                if hResult.key?(sMaestroRelPath) and hResult[sMaestroRelPath] != md5_file
                   bResult = false
-                  Logging.info("'%s' infra file has changed from original template in maestro." % sInfra_path)
+                  PrcLib.info("'%s' infra file has changed from original template in maestro." % sInfra_path)
                else
-                  Logging.debug("'%s' infra file has not been updated." % sInfra_path)
+                  PrcLib.debug("'%s' infra file has not been updated." % sInfra_path)
                end
             end
             md5_file = Digest::MD5.file(path).hexdigest
@@ -332,12 +435,12 @@ done
             YAML.dump(hResult, out)
          end
       rescue => e
-         Logging.error("%s\n%s" % [e.message, e.backtrace.join("\n")])
+         PrcLib.error("%s\n%s" % [e.message, e.backtrace.join("\n")])
       end
       if bResult
-         Logging.debug("No original files found has been updated. Infra workspace can be updated/created if needed.")
+         PrcLib.debug("No original files found has been updated. Infra workspace can be updated/created if needed.")
       else
-         Logging.warning("At least, one file has been updated. Infra workspace won't be updated by forj cli.")
+         PrcLib.warning("At least, one file has been updated. Infra workspace won't be updated by forj cli.")
       end
       bResult
    end
@@ -358,7 +461,7 @@ done
    end
 
    def old_infra_data_update(oConfig, version, infra_dir)
-      Logging.info("Migrating your local infra repo (%s) to the latest version." % version)
+      PrcLib.info("Migrating your local infra repo (%s) to the latest version." % version)
       bRebuild = false # Be default migration is successful. No need to rebuild it.
       case version
          when '0.0.36'
@@ -381,7 +484,7 @@ done
             Dir.foreach(infra_dir) do | file |
                next if not /^maestro\.box\..*\.env$/ =~ file
                build_env = File.join(infra_dir, file)
-               Logging.debug("Reading data from '%s'" % build_env)
+               PrcLib.debug("Reading data from '%s'" % build_env)
                tags = {'SET_DNS_TENANTID' => :tenant_id,
                        'SET_DNS_ZONE' => :service,
                        'SET_DOMAIN' => :domain_name
@@ -393,16 +496,16 @@ done
                      f.each_line do |line|
                         mObj = line.match(/^(SET_[A-Z_]+)=["'](.*)["'].*$/)
                         if mObj
-                           Logging.debug("Reviewing detected '%s' tag" % [mObj[1]])
+                           PrcLib.debug("Reviewing detected '%s' tag" % [mObj[1]])
                            tag = (tags[mObj[1]]? tags[mObj[1]] : nil)
                            if tag and mObj[2]
                               if bUpdate == nil and rhGet(yDns, tag) and rhGet(yDns, tag) != mObj[2]
-                                 Logging.message("Your account setup is different than build env.")
-                                 Logging.message("We suggest you to update your account setup with data from your build env.")
+                                 PrcLib.message("Your account setup is different than build env.")
+                                 PrcLib.message("We suggest you to update your account setup with data from your build env.")
                                  bUpdate = agree("Do you want to update your setup with those build environment data?")
                               end
                               if bUpdate != nil and bUpdate
-                                 Logging.debug("Saved: '%s' = '%s'" % [mObj[1],mObj[2]])
+                                 PrcLib.debug("Saved: '%s' = '%s'" % [mObj[1],mObj[2]])
                                  rhSet(yDns, mObj[2], tag)
                               end
                            end
@@ -410,7 +513,7 @@ done
                      end
                   end
                rescue => e
-                  Logging.fatal(1, "Failed to open the build environment file '%s'" % build_env, e)
+                  PrcLib.fatal(1, "Failed to open the build environment file '%s'" % build_env, e)
                end
             end
             file_ver = File.join(infra_dir, 'forj-cli.ver')
@@ -437,7 +540,7 @@ done
 
       build_tmpl_dir = File.expand_path(File.join($LIB_PATH, 'build_tmpl'))
 
-      Logging.state("Preparing user_data - file '%s'" % mime)
+      PrcLib.state("Preparing user_data - file '%s'" % mime)
       # generate boot_*.sh
       mime_cmd = "#{build_tmpl_dir}/write-mime-multipart.py"
       bootstrap = "#{build_tmpl_dir}/bootstrap_build.sh"
@@ -454,13 +557,13 @@ done
       ]
 
       # TODO: Replace shell script call to ruby functions
-      if $LIB_FORJ_DEBUG >=1
+      if $LIB_FORJ_DEBUG >= 1
          cmd += " >> #{$FORJ_DATA_PATH}/forj.log"
       else
          cmd += " | tee -a #{$FORJ_DATA_PATH}/forj.log"
       end
       raise ForjError.new, "#{bootstrap} script file is not found." if not File.exists?(bootstrap)
-      Logging.debug("Running '%s'" % cmd)
+      PrcLib.debug("Running '%s'" % cmd)
       Kernel.system(cmd)
 
       raise ForjError.new(), "mime file '%s' not found." % mime if not File.exists?(mime)
@@ -468,7 +571,7 @@ done
       begin
          user_data = File.read(mime)
       rescue => e
-         Logging.fatal(1, e.message)
+         PrcLib.fatal(1, e.message)
       end
       if $LIB_FORJ_DEBUG < 5
          File.delete(mime)
@@ -482,7 +585,7 @@ done
       oUserData[:user_data] = user_data
       oUserData[:user_data_encoded] = Base64.strict_encode64(user_data)
       oUserData[:mime] = mime
-      Logging.info("user_data prepared. File: '%s'" % mime)
+      PrcLib.info("user_data prepared. File: '%s'" % mime)
       oUserData
   end
 
@@ -516,15 +619,15 @@ class ForjCoreProcess
    # keypair_files post setup
    def forj_setup_keypairs_files
       # Getting Account keypair information
-      key_name = config.get(:keypair_name)
-      key_path = File.expand_path(config.get(:keypair_files))
+      key_name = config[:keypair_name]
+      key_path = File.expand_path(config[:keypair_files])
 
       keys_imported = nil
-      keys_imported = keypair_detect(key_name, config.oConfig.LocalGet(key_name, :imported_keys)) if config.oConfig.LocalExist?(key_name, :imported_keys)
+      keys_imported = keypair_detect(key_name, config.oConfig.localGet(key_name, :imported_keys)) if config.oConfig.localExist?(key_name, :imported_keys)
       keys = keypair_detect(key_name, key_path)
 
       if keys_imported and keys_imported[:key_basename] != keys[:key_basename] and $FORJ_KEYPAIRS_PATH != keys[:keypair_path]
-         Logging.warning("The private key '%s' was assigned to a different private key file '%s'.\nTo not overwrite it, we recommend you to choose a different keypair name." % [key_name, keys_imported[:key_basename] ])
+         PrcLib.warning("The private key '%s' was assigned to a different private key file '%s'.\nTo not overwrite it, we recommend you to choose a different keypair name." % [key_name, keys_imported[:key_basename] ])
          new_key_name = key_name
          sMsg = "Please, provide a different keypair name:"
          while key_name == new_key_name
@@ -546,24 +649,24 @@ class ForjCoreProcess
       # Creation sequences
       if not keys[:private_key_exist? ]
          # Need to create a key. ask if we need so.
-         Logging.message("The private key file attached to keypair named '%s' is not found. Running ssh-keygen to create it." % keys[:keypair_name])
+         PrcLib.message("The private key file attached to keypair named '%s' is not found. Running ssh-keygen to create it." % keys[:keypair_name])
          if not File.exists?(private_key_file)
             AppInit.ensure_dir_exists(File.dirname(private_key_file))
             command = 'ssh-keygen -t rsa -f %s' % private_key_file
-            Logging.debug("Executing '%s'" % command)
+            PrcLib.debug("Executing '%s'" % command)
             system(command)
          end
          if not File.exists?(private_key_file)
-            Logging.fatal(1, "'%s' not found. Unable to add your keypair to hpcloud. Create it yourself and provide it with -p option. Then retry." % [private_key_file])
+            PrcLib.fatal(1, "'%s' not found. Unable to add your keypair to hpcloud. Create it yourself and provide it with -p option. Then retry." % [private_key_file])
          else
-            Logging.fatal(1, "ssh-keygen did not created your key pairs. Aborting. Please review errors in ~/.forj/forj.log")
+            PrcLib.fatal(1, "ssh-keygen did not created your key pairs. Aborting. Please review errors in ~/.forj/forj.log")
          end
       end
 
       if not keys[:public_key_exist? ]
-         Logging.message("Your public key '%s' was not found. Getting it from the private one. It may require your passphrase." % [public_key_file])
+         PrcLib.message("Your public key '%s' was not found. Getting it from the private one. It may require your passphrase." % [public_key_file])
          command = 'ssh-keygen -y -f %s > %s' % [private_key_file,public_key_file ]
-         Logging.debug("Executing '%s'" % command)
+         PrcLib.debug("Executing '%s'" % command)
          system(command)
       end
 
@@ -574,7 +677,7 @@ class ForjCoreProcess
 
       if keys[:keypair_path] != $FORJ_KEYPAIRS_PATH
          if not File.exists?(forj_private_key_file) or not File.exists?(forj_public_key_file)
-            Logging.info("Importing key pair to FORJ keypairs list.")
+            PrcLib.info("Importing key pair to FORJ keypairs list.")
             FileUtils.copy(private_key_file, forj_private_key_file)
             FileUtils.copy(public_key_file, forj_public_key_file)
             # Attaching this keypair to the account
@@ -584,22 +687,23 @@ class ForjCoreProcess
          else
             # Checking source/dest files content
             if Digest::MD5.file(private_key_file).hexdigest != Digest::MD5.file(forj_private_key_file).hexdigest
-               Logging.info("Updating private key keypair piece to FORJ keypairs list.")
+               PrcLib.info("Updating private key keypair piece to FORJ keypairs list.")
                FileUtils.copy(private_key_file, forj_private_key_file)
             else
-               Logging.info("Private key keypair up to date.")
+               PrcLib.info("Private key keypair up to date.")
             end
             if Digest::MD5.file(public_key_file).hexdigest != Digest::MD5.file(forj_public_key_file).hexdigest
-               Logging.info("Updating public key keypair piece to FORJ keypairs list.")
+               PrcLib.info("Updating public key keypair piece to FORJ keypairs list.")
                FileUtils.copy(public_key_file, forj_public_key_file)
             else
-               Logging.info("Public key keypair up to date.")
+               PrcLib.info("Public key keypair up to date.")
             end
          end
       end
       # Saving internal copy of private key file for forj use.
       config.set(:keypair_path, forj_private_key_file )
-      Logging.info("Configured forj keypair '%s' with '%s'" % [ keys[:keypair_name], File.join(keys[:keypair_path], keys[:key_basename]) ] )
+      PrcLib.info("Configured forj keypair '%s' with '%s'" % [ keys[:keypair_name], File.join(keys[:keypair_path], keys[:key_basename]) ] )
+      true # forj_setup_keypairs_files successfull
    end
 
    def forj_DNS_settings()
@@ -620,25 +724,184 @@ class ForjCoreProcess
    def setup_tenant_name()
       # TODO: To re-introduce with a Controller call instead.
       oSSLError=SSLErrorMgt.new # Retry object
-      Logging.debug("Getting tenants from hpcloud cli libraries")
+      PrcLib.debug("Getting tenants from hpcloud cli libraries")
       begin
          tenants = Connection.instance.tenants(@sAccountName)
       rescue => e
          if not oSSLError.ErrorDetected(e.message,e.backtrace, e)
             retry
          end
-         Logging.fatal(1, 'Network: Unable to connect.')
+         PrcLib.fatal(1, 'Network: Unable to connect.')
       end
       tenant_id = rhGet(@oConfig.ExtraGet(:hpc_accounts, @sAccountName, :credentials), :tenant_id)
       tenant_name = nil
       tenants.each { |elem| tenant_name = elem['name'] if elem['id'] == tenant_id }
       if tenant_name
-         Logging.debug("Tenant ID '%s': '%s' found." % [tenant_id, tenant_name])
+         PrcLib.debug("Tenant ID '%s': '%s' found." % [tenant_id, tenant_name])
          rhSet(@hAccountData, tenant_name, :maestro, :tenant_name)
       else
-         Logging.error("Unable to find the tenant Name for '%s' ID." % tenant_id)
+         PrcLib.error("Unable to find the tenant Name for '%s' ID." % tenant_id)
       end
       @oConfig.set('tenants', tenants)
    end
 
 end
+
+#Funtions for get
+class ForjCoreProcess
+  def get_forge(sCloudObj, sForgeId, hParams)
+    sQuery = {}
+    hServers = []
+    sQuery[:name] = sForgeId
+
+    oServers = Query(:server, sQuery )
+
+    regex =  Regexp.new('\.%s$' % sForgeId)
+
+    oServers.each { |oServer|
+      oName = oServer[:name]
+      hServers<<oServer if regex =~ oName
+    }
+   PrcLib.info("%s server(s) were found under instance name %s " % [hServers.count(), sQuery[:name]])
+
+   oForge = register(hServers, sCloudObj)
+   oForge[:servers] = hServers
+   oForge[:name] = sForgeId
+   oForge
+  end
+end
+
+#Funtions for destroy
+class ForjCoreProcess
+   def delete_forge(sCloudObj, hParams)
+
+      PrcLib.state("Destroying server(s) of your forge")
+
+      forge_serverid = config.get(:forge_server)
+
+      oForge = hParams[:forge]
+
+      oForge[:servers].each{|server|
+         next if forge_serverid and forge_serverid != server[:id]
+         register(server)
+         PrcLib.state("Destroying server '%s'" % server[:name])
+         Delete(:server)
+      }
+      if forge_serverid.nil?
+         PrcLib.high_level_msg ("The forge '%s' has been destroyed. (all servers linked to the forge)\n" % oForge[:name] )
+      else
+         PrcLib.high_level_msg ("Server(s) selected in the forge '%s' has been removed.\n"  % [oForge[:name]])
+      end
+  end
+end
+
+# Functions for ssh
+class ForjCoreProcess
+   def ssh_connection(sObjectType, hParams)
+      oForge = hParams[:forge]
+      oServer = nil
+
+      oForge[:servers].each{|server|
+         next if hParams[:forge_server] != server[:id]
+         oServer = server
+         break
+      }
+
+      #Get server information
+      PrcLib.state("Getting server information")
+      oServer = Get(:server, oServer[:id])
+      register(oServer)
+
+      # Get Public IP of the server. Needs the server to be loaded.
+      oAddress = Query(:public_ip, :server_id =>  oServer[:id])
+
+      if oAddress.length == 0
+         PrcLib.fatal(1, "ip address for %s server was not found" % oServer[:name])
+      else
+         public_ip = oAddress[0][:public_ip]
+      end
+
+      if config[:identity].nil? or not config[:identity].is_a?(String)
+         hKeys = keypair_detect(oServer[:key_name], File.join($FORJ_KEYPAIRS_PATH, oServer[:key_name]))
+      else
+         hKeys = keypair_detect(oServer[:key_name], File.expand_path(config[:identity]))
+      end
+
+      private_key_file = File.join(hKeys[:keypair_path], hKeys[:private_key_name])
+      public_key_file = File.join(hKeys[:keypair_path], hKeys[:public_key_name])
+
+      PrcLib.info("Found openssh private key file '%s'." % private_key_file) if hKeys[:private_key_exist? ]
+      if hKeys[:public_key_exist? ]
+         PrcLib.info("Found openssh public key file '%s'."  % public_key_file)
+      else
+         PrcLib.warning("Openssh public key file '%s' not found. Unable to verify keys coherence with remote server." % public_key_file)
+      end
+
+      if hKeys[:private_key_exist? ]
+         ssh_options = { :keys => private_key_file}
+         PrcLib.debug("Using private key '%s'." % private_key_file)
+      else
+         PrcLib.fatal 1, <<-END
+The server '#{oServer[:name]}' has been configured with a keypair '#{oServer[:key_name]}' which is not found locally.
+You won't be able to connect to that server without '#{oServer[:key_name]}' private key.
+To connect to this box, you need to provide the appropriate private key file with option -i
+         END
+      end
+
+      # Get ssh user
+      image  = Get(:image, oServer[:image_id])
+      user = hParams[:ssh_user]
+
+      if user.nil?
+         user = image[:ssh_user]
+      end
+
+      PrcLib.debug("Using account '%s'." % user)
+
+      begin
+         PrcLib.state("creating ssh connection with '%s' box" % oServer[:name])
+         session = Net::SSH.start(public_ip, user, ssh_options) do |ssh|
+            ssh_login(ssh_options, user, public_ip)
+         end
+         PrcLib.debug("Error closing ssh connection, box %s " % oServer[:name]) if not session
+      rescue => e
+         PrcLib.fatal 1, <<-END
+#{e.message}
+You were not able to connect to this box. Please note that there is no garantuee that your local private key file '#{private_key_file}' is the one that was used while building this box.
+You have to check with the user who created that box.
+         END
+      end
+      register({ :success => true }, sObjectType)
+   end
+
+   def setup_ssh_user(sCloudObj, hParams)
+       images  = Query(:image, { name: hParams[:image_name]} )
+       case images.length
+         when 0
+            sDefault = hParams[:default_value]
+         else
+            if images[0, :ssh_user].nil?
+               sDefault = hParams[:default_value]
+            else
+               sDefault = images[0, :ssh_user]
+            end
+       end
+       { default_value: sDefault, list: config[:users] }
+   end
+
+   def ssh_login(options, user, public_ip)
+      sOpts = "-o StrictHostKeyChecking=no -o ServerAliveInterval=180"
+      sOpts += " -i %s" % options[:keys] if options[:keys]
+
+      command = 'ssh %s %s@%s' % [sOpts, user, public_ip]
+      PrcLib.debug("Running '%s'" % command)
+      system(command)
+   end
+
+   def ssh_user(image_name)
+      return "fedora" if image_name =~ /fedora/i
+      return "centos" if image_name =~ /centos/i
+      return "ubuntu"
+   end
+
+end