cloudcli 0.0.1

data/bin/cloudcli

@@ -0,0 +1,31 @@
+#!/opt/local/bin/ruby -rrubygems
+
+require "readline"
+require 'optparse'
+require 'deltacloud'
+
+options = {}
+OptionParser.new do |opt|
+  opt.banner = "Usage: cloudcli [options]"
+  opt.on("-a", "--api=[URL]", 'Deltacloud API URL') { |v| options[:url] = v }
+  opt.on("-p", "--provider=[PROVIDER]", 'Deltacloud API provider URL') { |v| options[:provider] = v }
+  opt.on("-i", "--driver=[DRIVER]", 'Deltacloud API driver (ec2, gogrid, rackspace,...)') { |v| options[:driver] = v }
+  opt.on("-u", "--user=[USER]", 'Username') { |v| options[:user] = v }
+  opt.on("-p", "--password=[PASSWORD]", 'Password') { |v| options[:password] = v }
+  opt.parse!(ARGV)
+end
+
+def error(msg)
+  puts "ERROR: #{msg}"
+  exit(1)
+end
+
+error("Deltacloud API URL must be set") unless options[:url]
+error("Deltacloud API username must be set") unless options[:user]
+error("Deltacloud API password must be set") unless options[:password]
+
+ENV['API_HOST'], ENV['API_USER'], ENV['API_PASSWORD'] = options[:url], options[:user], options[:password]
+ENV['API_PROVIDER'] ||= options[:provider]
+ENV['API_DRIVER'] ||= options[:driver]
+
+require 'lib/deltacloud-cli'

data/lib/deltacloud-cli.rb

@@ -0,0 +1,184 @@
+begin
+  require 'ap'
+rescue LoadError
+  require 'pp'
+  def ap(txt); pp txt; end
+end
+
+module DeltaCloud
+
+  module Operation
+    def self.init
+      @current_config = {
+        :username => ENV['API_USER'],
+        :password => ENV['API_PASSWORD'],
+        :provider => ENV['API_PROVIDER'],
+        :api => ENV['API_HOST']
+      }
+      begin
+        @client = DeltaCloud::new(@current_config[:username], @current_config[:password], @current_config[:api])
+        @current_config[:driver] = ENV['API_DRIVER'] || @client.driver_name
+      rescue Errno::ECONNREFUSED
+        puts "ERROR: Unable to connect: #{ENV['API_HOST']}"
+        exit(1)
+      end
+    end
+
+    def self.current_config(key=nil, value=nil)
+      @current_config[:"#{key}"]=value unless key.nil?
+      @current_config
+    end
+
+    def self.resources
+      Operation::client.entry_points
+    end
+
+    def self.client; @client ; end
+    def self.client=(client); @client=client; end
+
+    def self.execute(operation, resource, options='')
+      client = Operation::client
+      operation = operation.to_sym
+      resource.gsub!('-', '_')
+      case operation
+        when :get, :list then DeltaCloud::Operation::GET::new(operation, resource, options)
+        when :create, :get, :start, :stop, :reboot then DeltaCloud::Operation::POST::new(operation, resource, options)
+        when :destroy then DeltaCloud::Operation::DELETE::new(resource, options)
+        when :switch then DeltaCloud::Operation::switch(resource.to_sym, options)
+      end
+    end
+
+    def self.switch(resource, value)
+      Operation::current_config(resource, value)
+      client = Operation::client.with_config(Operation::current_config)
+      Operation::current_config
+    end
+
+    def self.help
+      help = "\n* Basic commands:\n\n"
+      help += "  help\t\t- Print this help\n"
+      help += "  exit\t\t- Exit to shell\n"
+      help += "  config\t- Print current configuration\n"
+      help += "  resources\t- Print collections available for current configuration\n\n"
+      help += "* Changing settings:\n"
+      help += "  Every change will take effect immediately.\n\n"
+      help += "  switch-driver DRIVER\t\t- Switch to other Deltacloud driver. (See also: list-drivers)\n"
+      help += "  switch-provider PROVIDER\t- Switch provider for current Deltacloud driver.\n"
+      help += "  switch-username USERNAME\t- Set Deltacloud username for current driver (Eg. API key).\n"
+      help += "  switch-password PASSWORD\t- Set Deltacloud user password for current driver (Eg. API Secret key).\n\n"
+      help += "* Listing and getting resources:\n\n"
+      help += "  list-COLLECTION \t\t- Will list all resources for given collection (Eg. list-images, See: resources)\n"
+      help += "  get-RESOURCE ID \t\t- Get single resource identified by given ID (Eg. get-image img1)\n\n"
+      help += "* Creating and destroying new resources:\n\n"
+      help += "  create-RESOURCE OPTIONS\t- Will create a new resource based on options (Eg. create-instance image_id:img1 hwp_id:m1-small)\n"
+      help += "  destroy-RESOURCE ID\t\t- Will execute start operation on given resource (Eg. start-instance inst1)\n\n"
+      help += "* Managing resources:\n\n"
+      help += "  start-RESOURCE ID\t\t- Will execute start operation on given resource (Eg. start-instance inst1)\n"
+      help += "  stop-RESOURCE ID\t\t- Will execute stop operation on given resource (Eg. stop-instance inst1)\n"
+      help += "  reboot-RESOURCE ID\t\t- Will execute reboot operation on given resource (Eg. reboot-instance inst1)\n"
+      help += "\n\n"
+    end
+
+    class POST
+
+      def initialize(operation, resource, options)
+        @operation, @resource, @options = operation, resource, options
+        instance_options = parse_opts(options)
+        puts instance_options.inspect
+        #begin
+        ap resource
+          @collection=case @operation
+            when :create then DeltaCloud::Operation::client.send(:"create_#{resource}", instance_options)
+            when :start, :stop, :reboot then DeltaCloud::Operation::client.send(:"#{resource}", options.strip).send(:"#{@operation}!")
+          end
+        #rescue NoMethodError
+        #  ap "ERROR: Unknown resource #{resource}. Type 'resources' to list all resources"
+        #end
+        return self
+      end
+
+      def parse_opts(options)
+        opts = {}
+        options.split(' ').collect do |opt|
+          opts[:"#{opt.split(':').first}"] = opt.split(':').last
+        end
+        ap opts
+        opts
+      end
+
+      def to_s
+        if @operation != :create
+          GET::new(:get, @resource, @options).to_s
+        else
+          @collection.inspect
+        end
+      end
+
+    end
+
+    class GET
+
+      attr_reader :operation
+
+      def initialize(operation, resource, options)
+        @operation = operation
+        begin
+          if operation == :list
+            @collection = DeltaCloud::Operation::client.send(:"#{resource}")
+          end
+          if operation == :get
+            @collection = [DeltaCloud::Operation::client.send(:"#{resource}", options.strip)].compact
+          end
+        rescue NoMethodError
+          ap "ERROR: Unknown resource #{resource}. Type 'resources' to list all resources"
+        end
+        return self
+      end
+
+      def to_s
+         return '0 items returned' if not @collection
+         return '0 items returned' if @collection.empty?
+         output = @collection.collect do |item|
+          base = {
+            :id => item.id,
+            :name => item.name,
+          }
+          base.merge!(:state => item.state) if item.respond_to?(:state)
+          base.merge!(:description => item.description) if item.respond_to?(:description)
+          base
+        end
+        return output if @operation == :list
+        return output.first if @operation == :get
+      end
+
+    end
+
+  end
+
+end
+
+DeltaCloud::Operation::init
+operation = ''
+
+puts <<BANNER
+Connected to Deltacloud API console (#{DeltaCloud::Operation::current_config[:api]})
+
+BANNER
+
+
+while operation!='exit'
+  buf = Readline.readline("#{DeltaCloud::Operation::current_config[:driver]}~ > ", true)
+  operation, resource = buf.split('-', 2)
+  case operation
+    when 'config' then (ap(DeltaCloud::Operation::current_config);next)
+    when 'resources' then (ap(DeltaCloud::Operation::resources);next)
+    when 'help' then (puts(DeltaCloud::Operation::help);next)
+    when 'exit' then next
+  end
+  if not operation or not resource
+    puts "ERROR: Unknown command. To get list of commands type 'help'"
+    next
+  end
+  resource, options = resource.split(' ', 2)
+  ap DeltaCloud::Operation::execute(operation, resource, options).to_s
+end

metadata

@@ -0,0 +1,83 @@
+--- !ruby/object:Gem::Specification 
+name: cloudcli
+version: !ruby/object:Gem::Version 
+  hash: 29
+  prerelease: 
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- Michal Fojtik
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-06-16 00:00:00 +02:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: deltacloud-client
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 19
+        segments: 
+        - 0
+        - 3
+        - 0
+        version: 0.3.0
+  type: :runtime
+  version_requirements: *id001
+description: A simple CLI tool for accessing Deltacloud API
+email: mfojtik@redhat.com
+executables: 
+- cloudcli
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- bin/cloudcli
+- lib/deltacloud-cli.rb
+has_rdoc: true
+homepage: http://github.com/mifo/cloudcli
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.6.2
+signing_key: 
+specification_version: 3
+summary: A simple CLI to interact with Deltacloud API server
+test_files: []
+