lorj 0.2.0 → 1.0.0

data/lib/prc-logging.rb

@@ -1,261 +0,0 @@
-#!/usr/bin/env ruby
-# encoding: UTF-8
-
-# (c) Copyright 2014 Hewlett-Packard Development Company, L.P.
-#
-#    Licensed under the Apache License, Version 2.0 (the "License");
-#    you may not use this file except in compliance with the License.
-#    You may obtain a copy of the License at
-#
-#        http://www.apache.org/licenses/LICENSE-2.0
-#
-#    Unless required by applicable law or agreed to in writing, software
-#    distributed under the License is distributed on an "AS IS" BASIS,
-#    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-#    See the License for the specific language governing permissions and
-#    limitations under the License.
-
-
-# create a forj.log file in ~/.hpcloud/forj.log
-
-require 'rubygems'
-require 'logger'
-require 'ansi'
-require 'ansi/logger'
-
-#
-# PrcLib module
-#
-# PrcLib Implements a Logging class based on logger.
-#
-# For details about this class capabilities, see PrcLib::Logging
-#
-#    # To use the Prc::Logging system, do the following:
-#    require 'PrcLib'
-#
-#    # To configure logging system:
-#    PrcLib.app_name = 'config/app'    # Define application data path as ~/.<app_name>. Ex: 'config/app' will use ~/.config/app
-#    PrcLib.log_file = 'app.log'       # Relative path to the log file name stored in the Application data path. Here, ~/.config/app/app.log
-#    PrcLib.level = Logger::FATAL      # Define printout debug level. Can be any Logger predefined value.
-#
-#    # To log some information:
-#    PrcLib.debug('My debug message')
-#    PrcLib.info('My info message')
-#    PrcLib.warning('my warning')
-#    PrcLib.error('my error')
-#    PrcLib.fatal(2, "Fatal error, with return code = 2)
-#    PrcLib.message('Only printout message')
-#
-#    # You can printout some instant message to the terminal, not logged.
-#    # This is useful before any action that will take time to be executed.
-#    # It is inform the end user that something is still running, which means
-#    # the application is not frozen
-#    PrcLib.state("Running a long task")
-#    # The next message will replace the previous state message.
-#    sleep(10)
-#    PrcLib.info("The long task has been executed successfully.")
-#
-#    # You can change the logger level with PrcLib.level
-#    PrcLib.level = Logger::DEBUG
-#
-#    # You can just print high level message (print without \n) if PrcLib.level is not DEBUG or INFO.
-#    PrcLib.high_level_msg("Print a message, not logged, if level is not DEBUG or INFO")
-#
-# Enjoy!
-module PrcLib
-
-   # Class used to create 2 logger object, in order to keep track of error in a log file and change log output to OUTPUT on needs (option flags).
-   # The idea is that everytime, if you did not set the debug level mode, you can refer to the log file which is
-   # already configured with Logger::DEBUG level.
-   #
-   # As well, sometimes, you do not want to keep track on messages that are just to keep informed the end user about activity.
-   # So, this object implement 2 Logger objects.
-   # * One for log file
-   # * One for print out.
-   #
-   # Everytime you log a message with Logging, it is printed out if the level permits and stored everytime in the log file, never mind about Logger level set.
-   # In several cases, messages are printed out, but not stored in the log file.
-   #
-   # See Logging functions for details.
-   #
-   class Logging
-
-     attr_reader :level
-
-      # Initialize Logging instance
-      # The log file name is defined by PrcLib.log_file
-      # The log path is defined by PrcLib.app_name and will be kept as ~/.<PrcLib.app_name>
-      # The log level is defined by PrcLib.level. It will update only log print out.
-      # Depending on levels, messages are prefixed by colored 'ERROR!!!', 'FATAL!!!', 'WARNING' or <LEVEL NAME>
-      def initialize()
-
-         if not PrcLib.app_name
-            PrcLib.app_name = "Lorj"
-         end
-
-         if not PrcLib.data_path
-            PrcLib.data_path = File.expand_path(File.join("~", ".%s" % PrcLib.app_name))
-         end
-
-         sLogFile = PrcLib.log_file
-         sLogFile = File.join(PrcLib.data_path, "%s.log" % PrcLib.app_name) if PrcLib.log_file.nil?
-
-         @oFileLogger = Logger.new(sLogFile, 'weekly')
-         @oFileLogger.level = Logger::DEBUG
-         @oFileLogger.formatter = proc do |severity, datetime, progname, msg|
-            "#{progname} : #{datetime}: #{severity}: #{msg} \n"
-         end
-
-         @oOutLogger = Logger.new(STDOUT)
-         @level = (PrcLib.level.nil? ? Logger::WARN : PrcLib.level)
-         @oOutLogger.level = @level
-         @oOutLogger.formatter = proc do |severity, datetime, progname, msg|
-            case severity
-               when 'ANY'
-                  str = "#{msg} \n"
-               when "ERROR", "FATAL"
-                  str = ANSI.bold(ANSI.red("#{severity}!!!")) + ": #{msg} \n"
-               when "WARN"
-                  str = ANSI.bold(ANSI.yellow("WARNING")) + ": #{msg} \n"
-               else
-                  str = "#{severity}: #{msg} \n"
-            end
-            str
-         end
-         PrcLib.log_file = sLogFile
-      end
-
-      # Is Logging print out level is info?
-      def info?
-         return(@oOutLogger.info?)
-      end
-
-      # Is Logging print out level is debug?
-      def debug?
-         return(@oOutLogger.debug?)
-      end
-
-      # Is Logging print out level is error?
-      def error?
-         return(@oOutLogger.error?)
-      end
-
-      # Is Logging print out level is fatal?
-      def fatal?
-         return(@oOutLogger.fatal?)
-      end
-
-      # Log to STDOUT and Log file and INFO class message
-      def info(message)
-         @oOutLogger.info(message + ANSI.clear_line)
-         @oFileLogger.info(message)
-      end
-
-      # Log to STDOUT and Log file and DEBUG class message
-      def debug(message)
-         @oOutLogger.debug(message + ANSI.clear_line)
-         @oFileLogger.debug(message)
-      end
-
-      # Log to STDOUT and Log file and ERROR class message
-      def error(message)
-         @oOutLogger.error(message + ANSI.clear_line)
-         @oFileLogger.error(message)
-      end
-
-      # Log to STDOUT and Log file and FATAL class message
-      # fatal retrieve the caller list of functions and save it to the log file if the exception class is given.
-      # The exception class should provide message and backtrace.
-      def fatal(message, e)
-         @oOutLogger.fatal(message + ANSI.clear_line)
-         @oFileLogger.fatal("%s\n%s\n%s" % [message, e.message, e.backtrace.join("\n")]) if e
-         @oFileLogger.fatal(message)
-      end
-
-      # Log to STDOUT and Log file and WARNING class message
-      def warn(message)
-         @oOutLogger.warn(message + ANSI.clear_line)
-         @oFileLogger.warn(message)
-      end
-
-      # set STDOUT logger level
-      def set_level(level)
-         @level = level
-         @oOutLogger.level = level
-      end
-
-      # Print out a message, not logged in the log file. This message is printed out systematically as not taking care of logger level.
-      def unknown(message)
-         @oOutLogger.unknown(message + ANSI.clear_line)
-      end
-
-   end
-
-   module_function
-
-   # Create a Logging object if missing and return it.
-   # Used internally by other functions
-   def log_object()
-      if PrcLib.log.nil?
-         PrcLib.log = PrcLib::Logging.new
-      else
-         PrcLib.log
-      end
-   end
-
-   # Print out a message, not logged in the log file. This message is printed out systematically as not taking care of logger level.
-   def message(message)
-      log_object.unknown(message)
-   end
-
-   # Log to STDOUT and Log file and INFO class message
-   def info(message)
-      log_object.info(message)
-      nil
-   end
-
-   # Log to STDOUT and Log file and DEBUG class message
-   def debug(message)
-      log_object.debug(message)
-      nil
-   end
-
-   # Log to STDOUT and Log file and WARNING class message
-   def warning(message)
-      log_object.warn(message)
-      nil
-   end
-
-   # Log to STDOUT and Log file and ERROR class message
-   def error(message)
-      log_object.error(message)
-      nil
-   end
-
-   # Log to STDOUT and Log file and FATAL class message then exit the application with a return code.
-   # fatal retrieve the caller list of functions and save it to the log file if the exception class is given.
-   # The exception class should provide message and backtrace.
-   def fatal(rc, message, e = nil)
-      log_object.fatal(message, e)
-      puts 'Issues found. Please fix it and retry. Process aborted.'
-      exit rc
-   end
-
-   def set_level(level)
-      log_object.set_level(level)
-      nil
-   end
-
-   def state(message)
-      print("%s ...%s\r" % [message, ANSI.clear_line]) if log_object.level <= Logger::INFO
-      nil
-   end
-
-   # Not DEBUG and not INFO. Just printed to the output.
-   def high_level_msg(message)
-
-      print ("%s" % [message]) if log_object.level > 1
-      nil
-   end
-
-end

data/lib/providers/hpcloud/Hpcloud.rb

@@ -1,426 +0,0 @@
-# encoding: UTF-8
-
-# (c) Copyright 2014 Hewlett-Packard Development Company, L.P.
-#
-#    Licensed under the Apache License, Version 2.0 (the "License");
-#    you may not use this file except in compliance with the License.
-#    You may obtain a copy of the License at
-#
-#        http://www.apache.org/licenses/LICENSE-2.0
-#
-#    Unless required by applicable law or agreed to in writing, software
-#    distributed under the License is distributed on an "AS IS" BASIS,
-#    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-#    See the License for the specific language governing permissions and
-#    limitations under the License.
-
-
-# This class describes how to process some actions, and will do everything prior
-# this task to make it to work.
-
-require 'fog' # We use fog to access HPCloud
-
-$HPCLOUD_PATH = File.expand_path(File.dirname(__FILE__))
-
-require File.join($HPCLOUD_PATH, "compute.rb")
-require File.join($HPCLOUD_PATH, "network.rb")
-require File.join($HPCLOUD_PATH, "security_groups.rb")
-
-# Defines Meta HPCloud object
-class Hpcloud
-
-   define_obj :services
-   obj_needs   :data, :account_id,      :mapping => :hp_access_key
-   obj_needs   :data, :account_key,     :mapping => :hp_secret_key
-   obj_needs   :data, :auth_uri,        :mapping => :hp_auth_uri
-   obj_needs   :data, :tenant,          :mapping => :hp_tenant_id
-   obj_needs   :data, ":excon_opts/:connect_timeout", :default_value => 30
-   obj_needs   :data, ":excon_opts/:read_timeout",    :default_value => 240
-   obj_needs   :data, ":excon_opts/:write_timeout",   :default_value => 240
-
-   # Defines Object structure and function stored on the Hpcloud class object.
-   # Compute Object
-   define_obj :compute_connection
-   # Defines Data used by compute.
-
-   obj_needs   :data, :account_id,  :mapping => :hp_access_key
-   obj_needs   :data, :account_key, :mapping => :hp_secret_key
-   obj_needs   :data, :auth_uri,    :mapping => :hp_auth_uri
-   obj_needs   :data, :tenant,      :mapping => :hp_tenant_id
-   obj_needs   :data, :compute,     :mapping => :hp_avl_zone
-
-   define_obj  :network_connection
-   obj_needs   :data, :account_id,  :mapping => :hp_access_key
-   obj_needs   :data, :account_key, :mapping => :hp_secret_key
-   obj_needs   :data, :auth_uri,    :mapping => :hp_auth_uri
-   obj_needs   :data, :tenant,      :mapping => :hp_tenant_id
-   obj_needs   :data, :network,     :mapping => :hp_avl_zone
-
-   # Forj predefine following query mapping, used by ForjProcess
-   # id => id, name => name
-   # If we need to add another mapping, add
-   # query_mapping :id => :MyID
-   # If the query is not push through and Hash object, the Provider
-   # will needs to create his own mapping function.
-   define_obj  :network
-   query_mapping :external, :router_external
-
-   define_obj  :rule
-   obj_needs   :data, :dir,        :mapping => :direction
-   attr_value_mapping  :IN,  'ingress'
-   attr_value_mapping  :OUT, 'egress'
-
-   obj_needs   :data, :proto,      :mapping => :protocol
-   obj_needs   :data, :port_min,   :mapping => :port_range_min
-   obj_needs   :data, :port_max,   :mapping => :port_range_max
-   obj_needs   :data, :addr_map,   :mapping => :remote_ip_prefix
-   obj_needs   :data, :sg_id,      :mapping => :security_group_id
-
-   get_attr_mapping :dir,      :direction
-   get_attr_mapping :proto,    :protocol
-   get_attr_mapping :port_min, :port_range_min
-   get_attr_mapping :port_max, :port_range_max
-   get_attr_mapping :addr_map, :remote_ip_prefix
-   get_attr_mapping :sg_id,    :security_group_id
-
-   define_obj :keypairs
-
-   undefine_attribute :id    # Do not return any predefined ID
-
-   # ************************************ Router Object
-   define_obj  :router
-
-   obj_needs_optional
-   obj_needs   :data,   :router_name,           :mapping => :name
-   # The FORJ gateway_network_id is extracted from Fog::HP::Network::Router[:external_gateway_info][:network_id]
-   obj_needs   :data,   :external_gateway_id,   :mapping => [:external_gateway_info, 'network_id' ]
-
-   get_attr_mapping :gateway_network_id, [:external_gateway_info, 'network_id']
-
-   # ************************************ SERVER Object
-   define_obj  :server
-   get_attr_mapping :status, :state
-   attr_value_mapping :create, "BUILD"
-   attr_value_mapping :boot,   :boot
-   attr_value_mapping :active, "ACTIVE"
-
-   # ************************************ SERVER log Object
-   define_obj  :server_log
-
-   # Excon::Response object type
-   get_attr_mapping :output,  "output"
-
-   # ************************************* Public IP Object
-   define_obj  :public_ip
-   get_attr_mapping :server_id, :instance_id
-   get_attr_mapping :public_ip, :ip
-
-   # defines setup Cloud data (:account => true for setup)
-   define_data(:account_id, {
-      :account => true,
-      :desc => 'HPCloud Access Key (From horizon, user drop down, manage keys)',
-      :validate => /^[A-Z0-9]*$/
-   })
-   define_data(:account_key, {
-      :account => true,
-      :desc => 'HPCloud secret Key (From horizon, user drop down, manage keys)',
-      :encrypted => false,
-      :validate => /^.+/
-   })
-   define_data(:auth_uri, {
-      :account => true,
-      :desc => 'HPCloud Authentication service URL (default is HP Public cloud)',
-      :validate => /^http(s)?:\/\/.*$/,
-      :default_value => "https://region-a.geo-1.identity.hpcloudsvc.com:35357/v2.0/"
-   })
-   define_data(:tenant, {
-      :account => true,
-      :desc => 'HPCloud Tenant ID (from horizon, identity, projecs, Project ID)',
-      :validate => /^[0-9]+$/
-   })
-
-   define_data(:compute, {
-      :account => true,
-      :desc => 'HPCloud Compute service zone (Ex: region-a.geo-1)',
-      :depends_on => [:account_id, :account_key, :auth_uri,:tenant ],
-      :list_values => {
-         :query_type  => :controller_call,
-         :object       => :services,
-         :query_call   => :get_services,
-         :query_params => { :list_services => [:Compute, :compute] },
-         :validate     => :list_strict
-      }
-   })
-
-   define_data(:network, {
-      :account => true,
-      :desc => 'HPCloud Network service zone (Ex: region-a.geo-1)',
-      :depends_on => [:account_id, :account_key, :auth_uri,:tenant ],
-      :list_values => {
-         :query_type  => :controller_call,
-         :object       => :services ,
-         :query_call   => :get_services,
-         :query_params => { :list_services => [:Networking, :network] },
-         :validate     => :list_strict
-      }
-   })
-
-   data_value_mapping 'xsmall', "standard.xsmall"
-   data_value_mapping 'small',  "standard.small"
-   data_value_mapping 'medium', "standard.medium"
-   data_value_mapping 'large',  "standard.large"
-   data_value_mapping 'xlarge', "standard.xlarge"
-
-
-end
-
-# Following class describe how FORJ should handle HP Cloud objects.
-# Except Cloud connection, all HPCloud objects management are described/called in HP* modules.
-class HpcloudController
-
-   def connect(sObjectType, hParams)
-      case sObjectType
-         when :services
-            Fog::HP.authenticate_v2(hParams[:hdata], hParams[:excon_opts])
-         when :compute_connection
-            Fog::Compute.new(hParams[:hdata].merge({:provider => :hp,:version => 'v2'}))
-         when :network_connection
-            Fog::HP::Network.new(hParams[:hdata])
-         else
-            Error "'%s' is not a valid object for 'connect'" % sObjectType
-      end
-   end
-
-   def create(sObjectType, hParams)
-      case sObjectType
-         when :public_ip
-            required?(hParams, :compute_connection)
-            required?(hParams, :server)
-            HPCompute.server_assign_address(hParams[:compute_connection], hParams[:server])
-         when :server
-            required?(hParams, :compute_connection)
-            required?(hParams, :image)
-            required?(hParams, :network)
-            required?(hParams, :flavor)
-            required?(hParams, :keypairs)
-            required?(hParams, :security_groups)
-            required?(hParams, :server_name)
-            HPCompute.create_server(
-               hParams[:compute_connection],
-               hParams[:server_name], hParams[:security_groups],
-               hParams[:image],       hParams[:network],
-               hParams[:flavor],      hParams[:keypairs],
-               hParams[:user_data],   hParams[:meta_data]
-            )
-         when :image
-            required?(hParams, :compute_connection)
-            required?(hParams, :image_name)
-            HPCompute.get_image(hParams[:compute_connection], hParams[:image_name])
-         when :network
-            required?(hParams, :network_connection)
-            required?(hParams, :network_name)
-            HPNetwork.create_network(hParams[:network_connection], hParams[:network_name])
-         when :subnetwork
-            required?(hParams, :network_connection)
-            required?(hParams, :network)
-            required?(hParams, :subnetwork_name)
-            HPNetwork.create_subnetwork(hParams[:network_connection], hParams[:network], hParams[:subnetwork_name])
-         when :security_groups
-            required?(hParams, :network_connection)
-            required?(hParams, :security_group)
-            HPSecurityGroups.create_sg(hParams[:network_connection], hParams[:security_group], hParams[:sg_desc])
-         when :keypairs
-            required?(hParams, :compute_connection)
-            required?(hParams, :keypair_name)
-            required?(hParams, :public_key)
-            HPKeyPairs.create_keypair(hParams[:compute_connection], hParams[:keypair_name], hParams[:public_key])
-         when :router
-            required?(hParams, :network_connection)
-            required?(hParams, :router_name)
-            #~ if hParams[:external_gateway_id]
-               #~ hParams[:hdata][:external_gateway_info] = { 'network_id' => hParams[:external_gateway_id] }
-            #~ end
-            hParams[:hdata] = hParams[:hdata].merge(:admin_state_up => true) # Forcelly used admin_status_up to true.
-
-            HPNetwork.create_router(hParams[:network_connection], hParams[:hdata])
-         when :rule
-            required?(hParams, :network_connection)
-            required?(hParams, :security_groups)
-            HPSecurityGroups.create_rule(hParams[:network_connection], hParams[:hdata])
-         when :router_interface
-            required?(hParams, :router)
-            required?(hParams, :subnetwork)
-            HPNetwork.add_interface(hParams[:router], hParams[:subnetwork])
-         else
-            Error "'%s' is not a valid object for 'create'" % sObjectType
-      end
-   end
-
-   # This function return a collection which have to provide:
-   # functions: [], length, each
-   # Used by network process.
-   def query(sObjectType, sQuery, hParams)
-      case sObjectType
-         when :public_ip
-            required?(hParams, :compute_connection)
-            required?(hParams, :server)
-            HPCompute.query_server_assigned_addresses(hParams[:compute_connection], hParams[:server], sQuery)
-         when :server
-            required?(hParams, :compute_connection)
-            HPCompute.query_server(hParams[:compute_connection], sQuery)
-         when :image
-            required?(hParams, :compute_connection)
-            HPCompute.query_image(hParams[:compute_connection], sQuery)
-         when :network
-            required?(hParams, :network_connection)
-            HPNetwork.query_network(hParams[:network_connection], sQuery)
-         when :subnetwork
-            required?(hParams, :network_connection)
-            HPNetwork.query_subnetwork(hParams[:network_connection], sQuery)
-         when :router
-            required?(hParams, :network_connection)
-            HPNetwork.query_router(hParams[:network_connection], sQuery)
-         when :port
-            required?(hParams, :network_connection)
-            HPNetwork.query_port(hParams[:network_connection], sQuery)
-         when :security_groups
-            required?(hParams, :network_connection)
-            HPSecurityGroups.query_sg(hParams[:network_connection], sQuery)
-         when :rule
-            required?(hParams, :network_connection)
-            HPSecurityGroups.query_rule(hParams[:network_connection], sQuery)
-         when :keypairs
-            required?(hParams, :compute_connection)
-            HPKeyPairs.query_keypair(hParams[:compute_connection], sQuery)
-         when :flavor
-            required?(hParams, :compute_connection)
-            HPCompute.query_flavor(hParams[:compute_connection], sQuery)
-         else
-            Error "'%s' is not a valid object for 'query'" % sObjectType
-      end
-   end
-
-   def delete(sObjectType, hParams)
-      case sObjectType
-         when :network
-            HPNetwork.delete_network(hParams[:network_connection], hParams[:network])
-         when :rule
-            HPSecurityGroups.delete_rule(hParams[:network_connection], hParams[:id])
-            hParams[:network_connection].security_group_rules.get(hParams[:id]).destroy
-          when :server
-            required?(hParams, :compute_connection)
-            required?(hParams, :server)
-            HPCompute.delete_server(hParams[:compute_connection], hParams[:server] )
-        else
-            nil
-      end
-   end
-
-   def get(sObjectType, sUniqId, hParams)
-      case sObjectType
-         when :server_log
-            required?(hParams, :server)
-            
-            hParams[:server].console_output(sUniqId)
-         when :server
-            required?(hParams, :compute_connection)
-            HPCompute.get_server(hParams[:compute_connection], sUniqId)
-         when :image
-            required?(hParams, :compute_connection)
-            HPCompute.get_image(hParams[:compute_connection], sUniqId)
-         when :network
-            required?(hParams, :network_connection)
-            HPNetwork.get_network(hParams[:network_connection], sUniqId)
-         when :keypairs
-            required?(hParams, :compute_connection)
-            HPKeyPairs.get_keypair(hParams[:compute_connection], sUniqId)
-         else
-            forjError "'%s' is not a valid object for 'get'" % sObjectType
-      end
-   end
-
-   def query_each(oFogObject)
-      case oFogObject.class.to_s
-         when "Fog::HP::Network::Networks"
-            oFogObject.each { | value |
-               yield(value)
-            }
-         else
-            Error "'%s' is not a valid list for 'each'" % oFogObject.class
-      end
-   end
-
-   def get_attr(oControlerObject, key)
-      begin
-         if oControlerObject.is_a?(Excon::Response)
-            Lorj::rhGet(oControlerObject.data, :body, key)
-         else
-            attributes = oControlerObject.attributes
-            raise "attribute '%s' is unknown in '%s'. Valid one are : '%s'" % [key[0], oControlerObject.class, oControlerObject.class.attributes ] unless oControlerObject.class.attributes.include?(key[0])
-            Lorj::rhGet(attributes, key)
-         end
-      rescue => e
-         Error "Unable to map '%s'. %s" % [key, e.message]
-      end
-   end
-
-   def set_attr(oControlerObject, key, value)
-      begin
-         raise "No set feature for '%s'" % oControlerObject.class if oControlerObject.is_a?(Excon::Response)
-         attributes = oControlerObject.attributes
-         raise "attribute '%s' is unknown in '%s'. Valid one are : '%s'" % [key[0], oControlerObject.class, oControlerObject.class.attributes ] unless oControlerObject.class.attributes.include?(key[0])
-         Lorj::rhSet(attributes, value, key)
-      rescue => e
-         Error "Unable to map '%s' on '%s'" % [key, sObjectType]
-      end
-   end
-
-
-   def update(sObjectType, oObject, hParams)
-      case sObjectType
-         when :router
-            Error "Object to update is nil" if oObject.nil?
-
-            HPNetwork.update_router(oObject[:object])
-         else
-            Error "'%s' is not a valid list for 'update'" % oFogObject.class
-      end
-   end
-
-   # This function requires to return an Array of values or nil.
-   def get_services(sObjectType, oParams)
-      case sObjectType
-         when :services
-            # oParams[sObjectType] will provide the controller object.
-            # This one can be interpreted only by controller code,
-            # except if controller declares how to map with this object.
-            # Processes can deal only process mapped data.
-            # Currently there is no services process function. No need to map.
-            hServices = oParams[:services]
-            if not oParams[:list_services].is_a?(Array)
-               hServiceToFind = [oParams[:list_services]]
-            else
-               hServiceToFind = oParams[:list_services]
-            end
-            # Search for service. Ex: Can be :Networking or network. I currently do not know why...
-            hSearchServices= Lorj::rhGet(hServices, :service_catalog)
-            sService = nil
-            hServiceToFind.each { | sServiceElem |
-               if hSearchServices.key?(sServiceElem)
-                  sService = sServiceElem
-                  break
-               end
-            }
-
-            Error "Unable to find services %s" % hServiceToFind if sService.nil?
-            result = Lorj::rhGet(hServices, :service_catalog, sService).keys
-            result.delete("name")
-            result.each_index { | iIndex |
-               result[iIndex] = result[iIndex].to_s if result[iIndex].is_a?(Symbol)
-            }
-            return result
-         else
-            Error "'%s' is not a valid object for 'get_services'" % sObjectType
-      end
-   end
-end