hpcloud 2.0.0

data/lib/hpcloud/commands/dns/records/add.rb

@@ -0,0 +1,50 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      desc "dns:records:add <domain> <name> <type> <data> [priority]", "Add a DNS record."
+      long_desc <<-DESC
+  Add a DNS record to the specified domain with the given name, type and data.  Optionally, a priority may be added.
+
+Examples:
+  hpcloud dns:records:add mydomain.com. www.mydomain.com. A 10.0.0.1 # Create a DNS record for domain `mydomain.com` and `A` record for `www.mydomain.com` pointing to address 10.0.0.1.
+      DESC
+      CLI.add_common_options
+      define_method "dns:records:add" do |domain, name, type, data, *priority|
+        cli_command(options) {
+          dns = Dnss.new.get(domain)
+          unless dns.is_valid?
+            @log.fatal dns.cstatus
+          end
+          priority = priority[0]
+          record = dns.create_record(name, type, data, { 'priority' => priority.to_i })
+          if record.nil?
+            @log.fatal dns.cstatus
+          end
+          @log.display "Created dns record '#{name}' with id '#{record[:id]}'."
+        }
+      end
+    end
+  end
+end

data/lib/hpcloud/commands/dns/records/remove.rb

@@ -0,0 +1,53 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      desc "dns:records:remove <domain> <id ...>", "Remove a DNS record."
+      long_desc <<-DESC
+  Remove a DNS record to the specified domain.  Records may be specified by identifier.
+
+Examples:
+  hpcloud dns:records:remove mydomain.com. www.mydomain.com. # Remove record `www.mydomain.com` from the domain `mydomain.com`.
+      DESC
+      CLI.add_common_options
+      define_method "dns:records:remove" do |domain, *ids|
+        cli_command(options) {
+          dns = Dnss.new.get(domain)
+          unless dns.is_valid?
+            @log.fatal dns.cstatus
+          end
+          ids.each { |oneid|
+            sub_command("removing DNS record") {
+              if dns.delete_record(oneid)
+                @log.display "Removed DNS record '#{oneid}'."
+              else
+                @log.error "Cannot find DNS record '#{oneid}'."
+              end
+            }
+          }
+        }
+      end
+    end
+  end
+end

data/lib/hpcloud/commands/dns/records/update.rb

@@ -0,0 +1,50 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      desc "dns:records:update <domain> <id> <type> <data>", "Update a DNS record."
+      long_desc <<-DESC
+  Update a DNS record to the specified domain with the given id, type and data.
+
+Examples:
+  hpcloud dns:records:update mydomain.com. www.mydomain.com. A 10.0.0.1 # Update a DNS domain `mydomain.com` record `A` for `www.mydomain.com` pointing to address 10.0.0.1
+      DESC
+      CLI.add_common_options
+      define_method "dns:records:update" do |domain, id, type, data|
+        cli_command(options) {
+          dns = Dnss.new.get(domain)
+          unless dns.is_valid?
+            @log.fatal dns.cstatus
+          end
+          record = dns.update_record(id, type, data)
+          unless record.nil?
+            @log.display "Updated DNS record '#{id}'."
+          else
+            @log.error "Cannot find DNS record '#{id}'."
+          end
+        }
+      end
+    end
+  end
+end

data/lib/hpcloud/commands/dns/records.rb

@@ -0,0 +1,57 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+require 'hpcloud/commands/dns/records/add.rb'
+require 'hpcloud/commands/dns/records/remove.rb'
+require 'hpcloud/commands/dns/records/update.rb'
+require 'hpcloud/dnss'
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      desc 'dns:records <name_or_id>', "List the records associated with the DNS domain."
+      long_desc <<-DESC
+  Lists records associated with the DNS domain specified by name or ID.
+
+Examples:
+  hpcloud dns:records 421e8cbf   # List records for DNS domain with ID `421e8cbf`
+  hpcloud dns:records test.com.  # List records for DNS domain `test.com`
+      DESC
+      CLI.add_report_options
+      CLI.add_common_options
+      define_method "dns:records" do |name_or_id|
+        cli_command(options) {
+          dns = Dnss.new.get(name_or_id)
+          if dns.is_valid? == false
+            @log.fatal dns.cstatus
+          end
+          ray = dns.records
+          if ray.empty?
+            @log.display "There are no records associated with this DNS domain"
+          else
+            Tableizer.new(options, dns.record_keys, ray).print
+          end
+        }
+      end
+    end
+  end
+end

data/lib/hpcloud/commands/dns/remove.rb

@@ -0,0 +1,57 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      map %w(dns:rm dns:delete dns:del) => 'dns:remove'
+
+      desc "dns:remove name_or_id [name_or_id ...]", "Remove DNS domains (specified by name or ID)."
+      long_desc <<-DESC
+  Remove DNS domains by specifying their names or ID. You may specify more than one DNS name or ID on a command line.  Optionally, you can specify an availability zone.
+
+Examples:
+  hpcloud dns:remove mydomain.com. yourdomain.com. # Delete the DNS domains `mydomain.com.` and `yourdomain.com.`
+  hpcloud dns:remove f3f3a427                      # Delete the DNS domain with ID f3f3a427
+
+Aliases: dns:rm, dns:delete, dns:del
+      DESC
+      CLI.add_common_options
+      define_method "dns:remove" do |name_or_id, *name_or_ids|
+        cli_command(options) {
+          name_or_ids = [name_or_id] + name_or_ids
+          dnss = Dnss.new.get(name_or_ids, false)
+          dnss.each { |dns|
+            sub_command("removing dns") {
+              if dns.is_valid?
+                dns.destroy
+                @log.display "Removed dns '#{dns.name}'."
+              else
+                @log.error dns.cstatus
+              end
+            }
+          }
+        }
+      end
+    end
+  end
+end

data/lib/hpcloud/commands/dns/servers.rb

@@ -0,0 +1,57 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+require 'hpcloud/commands/dns/add.rb'
+require 'hpcloud/commands/dns/remove.rb'
+require 'hpcloud/commands/dns/update.rb'
+require 'hpcloud/dnss'
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      desc 'dns:servers <name_or_id>', "List the servers associated with the DNS domain."
+      long_desc <<-DESC
+  Lists servers associated with the DNS domain specified by name or ID.
+
+Examples:
+  hpcloud dns:servers 421e8cbf   # List servers for the DNS domain with ID `421e8cbf`
+  hpcloud dns:servers test.com.  # List servers for the DNS domain `test.com.`
+      DESC
+      CLI.add_report_options
+      CLI.add_common_options
+      define_method "dns:servers" do |name_or_id|
+        cli_command(options) {
+          dns = Dnss.new.get(name_or_id)
+          if dns.is_valid? == false
+            @log.fatal dns.cstatus
+          end
+          ray = dns.servers
+          if ray.empty?
+            @log.display "There are no servers associated with this DNS domain"
+          else
+            Tableizer.new(options, dns.server_keys, ray).print
+          end
+        }
+      end
+    end
+  end
+end

data/lib/hpcloud/commands/dns/update.rb

@@ -0,0 +1,58 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      desc "dns:update <name>", "Update a DNS domain."
+      long_desc <<-DESC
+  Update a DNS domain with the specified name.  Optionally, you can specify an email or a time to live (TTL) to adjust DNS caching for your entry.  The default TTL is 3600 (one hour).
+
+Examples:
+  hpcloud dns:update mydomain.com. -e email@example.com        # Update DNS domain `mydomain.com` with email address `email@example.com`
+  hpcloud dns:update mydomain.com. -e email@xample.com -t 7200 # Update DNS domain `mydomain.com` with email address `email@example.com` and TTL 7200
+      DESC
+      method_option :email,
+                    :type => :string, :aliases => '-e',
+                    :desc => 'Email address.'
+      method_option :ttl,
+                    :type => :string, :aliases => '-t',
+                    :desc => 'Time to live.'
+      CLI.add_common_options
+      define_method "dns:update" do |name|
+        cli_command(options) {
+          dns = Dnss.new.get(name)
+          if dns.is_valid? == false
+            @log.fatal dns.cstatus
+          end
+          dns.ttl = options[:ttl] unless options[:ttl].nil?
+          dns.email = options[:email] unless options[:email].nil?
+          if dns.save == true
+            @log.display "Updated DNS domain '#{name}'."
+          else
+            @log.fatal dns.cstatus
+          end
+        }
+      end
+    end
+  end
+end

data/lib/hpcloud/commands/dns.rb

@@ -0,0 +1,65 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+require 'hpcloud/commands/dns/add'
+require 'hpcloud/commands/dns/remove'
+require 'hpcloud/commands/dns/records'
+require 'hpcloud/commands/dns/servers'
+require 'hpcloud/commands/dns/update'
+require 'hpcloud/dnss'
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      map 'dns:list' => 'dns'
+    
+      desc 'dns [name_or_id ...]', "List the DNS domains."
+      long_desc <<-DESC
+  Lists all the DNS domains that are associated with the account. The list begins with identifier and contains name, TTL, serial number, email and time created.  Optionally, you can filter the list by specifying name or ID.
+
+Examples:
+  hpcloud dns            # List all dns domains
+  hpcloud dns 421e8cbf   # List dns domain with id `421e8cbf`
+  hpcloud dns test.com.  # List dns domain `test.com.`
+
+Aliases: dns:list
+      DESC
+      CLI.add_report_options
+      CLI.add_common_options
+      def dns(*arguments)
+        cli_command(options) {
+          dnss = Dnss.new
+          if dnss.empty?
+            @log.display "You currently have no DNS domains, use `#{selfname} dns:add <name>` to create one."
+          else
+            ray = dnss.get_array(arguments)
+            if ray.empty?
+              @log.display "There are no DNS domains that match the provided arguments"
+            else
+              Tableizer.new(options, DnsHelper.get_keys(), ray).print
+            end
+          end
+        }
+      end
+    end
+  end
+end

data/lib/hpcloud/commands/flavors.rb

@@ -0,0 +1,59 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      map 'flavors:list' => 'flavors'
+
+      desc "flavors [name_or_id ...]", "List available flavors."
+      long_desc <<-DESC
+  List the flavors in your compute account. You may filter the output by specifying the names or IDs of the flavors you wish to see.  Optionally, you can specify an availability zone.
+
+Examples:
+  hpcloud flavors                         # List the flavors
+  hpcloud flavors xsmall small            # List the flavors `xsmall` and `small`
+  hpcloud flavors -z az-2.region-a.geo-1  # List the flavors for  availability zone `az-2.region-a.geo-1`
+
+Aliases: flavors:list
+      DESC
+      CLI.add_report_options
+      CLI.add_common_options
+      def flavors(*arguments)
+        columns = [ "id", "name", "ram", "disk" ]
+        cli_command(options) {
+          flavors = Flavors.new
+          if flavors.empty?
+            @log.display "You currently have no flavors."
+          else
+            ray = flavors.get_array(arguments)
+            if ray.empty?
+              @log.display "There are no flavors that match the provided arguments"
+            else
+              Tableizer.new(options, columns, ray).print
+            end
+          end
+        }
+      end
+    end
+  end
+end

data/lib/hpcloud/commands/get.rb

@@ -0,0 +1,58 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      map %w(fetch) => 'get'
+
+      desc 'get object [object ...]', 'Fetch objects to your local directory.'
+      long_desc <<-DESC
+  Copy remote objects from a container to your current directory. Optionally, you can specify an availability zone.
+
+Examples: 
+  hpcloud get :my_container/file.txt :my_container/resume.txt  # Copy `file.txt` and `resume.txt` to your current directory
+  hpcloud get :my_container/file.txt -z region-a.geo-1    # Copy `file.txt` to your current directory for availability zone `region-a.geo-1`
+
+Aliases: fetch
+      DESC
+      CLI.add_common_options
+      def get(source, *sources)
+        cli_command(options) {
+          sources = [source] + sources
+          to = ResourceFactory.create(Connection.instance.storage, ".")
+          sources.each { |name|
+            from = ResourceFactory.create(Connection.instance.storage, name)
+            if from.isRemote() == false
+              @log.error "Source object does not appear to be remote '#{from.fname}'.", :incorrect_usage
+            elsif to.copy(from)
+              @log.display "Copied #{from.fname} => #{to.fname}"
+            else
+              @log.fatal to.cstatus
+            end
+          }
+        }
+      end
+    end
+  end
+end
+

data/lib/hpcloud/commands/images/add.rb

@@ -0,0 +1,54 @@
+# encoding: utf-8
+#
+# © Copyright 2013 Hewlett-Packard Development Company, L.P.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in all
+# copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
+# SOFTWARE.
+
+module HP
+  module Cloud
+    class CLI < Thor
+
+      desc "images:add <name> <server_name>", "Add an image from an existing server."
+      long_desc <<-DESC
+  Add a new image from an existing server to your compute account. Optionally, you may specify metadata or an availability zone.
+
+Examples:
+  hpcloud images:add my_image my_server                           # Create the new image 'my_image' from the existing server named 'my_server'
+  hpcloud images:add my_image 701be39b -m this=that              # Create the new image 'my_image' from the existing server '701be39b' with metadata
+      DESC
+      CLI.add_common_options
+      method_option :metadata,
+                    :type => :string, :aliases => '-m',
+                    :desc => 'Set the meta data.'
+      define_method "images:add" do |name, server_name|
+        cli_command(options) {
+          img = HP::Cloud::ImageHelper.new()
+          img.name = name
+          img.set_server(server_name)
+          img.meta.set_metadata(options[:metadata])
+          if img.save == true
+            @log.display "Created image '#{name}' with id '#{img.id}'."
+          else
+            @log.fatal img.cstatus
+          end
+        }
+      end
+
+    end
+  end
+end