point-cli 0.0.1

data/bin/point

@@ -0,0 +1,3 @@
+#!/usr/bin/env ruby
+require File.dirname(__FILE__) + "/../lib/point_cli"
+PointCLI.run(ARGV.shift, ARGV)

data/lib/commands/domains.rb

@@ -0,0 +1,41 @@
+desc "Lists all domains on your account"
+usage "point list [group]"
+command "list" do |group|
+  use_hirb
+  domains = Point::Zone.find(:all)
+  table domains, :fields => [:id, :name, :ttl, :group, :updated_at], :headers => {:id => "ID", :name => "Name", :ttl => "TTL", :group => "Group", :updated_at => "Last updated"}
+end
+
+desc "Get information about the specified domain"
+usage "point info [domain]"
+command "info", :required_args => 1 do |domain|
+  zone = select_zone(domain)
+
+  divider
+  puts "    Domain Name...: #{zone.name}"
+  puts "    TTL...........: #{zone.ttl}"
+  puts "    Group.........: #{zone.group.empty? ? 'none' : zone.group}"
+  if zone.additional_slaves
+    heading "    Additional Slaves"
+    for slave in zone.additional_slaves.to_s.split("\n")
+      puts "      * #{slave}"
+    end
+  end
+  heading "    Dates"
+  
+  puts "    Created at....: #{zone.created_at}"
+  puts "    Updated at....: #{zone.updated_at}"
+  puts "    Last live at..: #{zone.last_updated_on_server_at}"
+  
+  divider
+  puts "See 'cb records #{zone.name}' for a list of records on this domain."
+end
+
+desc "Return all records for this domain"
+usage "point records [domain]"
+command "records", :required_args => 1 do |domain|
+  zone = select_zone(domain)
+  puts "Showing records for #{zone.name}"
+  use_hirb
+  table zone.records, :fields => [:record_type, :name, :data, :aux], :headers => {:record_type => "Type", :name => "Name", :data => "Data", :aux => "Aux"}
+end

data/lib/commands/setup.rb

@@ -0,0 +1,30 @@
+desc "Setup the Point Gem for access"
+usage "point setup"
+command "setup" do 
+  puts "\e[33;44mPointHQ CLI Setup Tool\e[0m"
+  puts "You can use this tool to automatically download and save your API key so you can easily use the"
+  puts "the command line interface."
+  
+  unless `which curl`; $?.success?
+    puts "'curl' is not installed on this computer. You need to install curl to use this command line"
+    puts "setup tool"
+    Process.exit(1)
+  end
+  
+  username = ask("E-Mail Address: ")
+  password = ask("Password: ") { |q| q.echo = ''}
+  
+  puts "Attempting to get your API key from '#{Point.site}'..."
+  
+  command = "curl -q -s -u \"#{username}:#{password}\" #{Point.site}/api_key"
+  if `#{command}` =~ /(\w{40})/
+    api_key = $1
+  else
+    puts "\e[31mAccess was denied or the server was unavailable. Please check your username & password is correct.\e[0m"
+    Process.exit(1)
+  end
+  
+  config_json = {:username => username, :apitoken => api_key}.to_json
+  File.open($point_config_file, 'w') { |f| f.write(config_json)}
+  puts "\e[32mConfiguration was successfully saved to #{$point_config_file}\e[0m"
+end

data/lib/point_cli.rb

@@ -0,0 +1,142 @@
+$:.unshift File.dirname(__FILE__)
+
+require 'point'
+require 'hirb'
+
+require 'highline/import'
+HighLine.track_eof = false
+
+require 'point_cli/command'
+
+trap("INT") { puts; exit }
+
+## Load Configuration before we do anything else
+$point_config_file = File.expand_path(File.join('~', '.point'))
+if File.exist?($point_config_file)
+  config_hash = JSON.parse(File.read($point_config_file))
+  Point.username = config_hash['username']
+  Point.apitoken = config_hash['apitoken']
+end
+
+module PointCLI
+  
+  VERSION = "0.0.1"
+  
+  extend self
+  
+  def run(command, args = [])
+    load_commands
+    command = 'help' if command.nil?
+    if @commands[command]
+      @options = parse_options(args)
+      if args.size < @commands[command][:required_args]
+        puts "usage: #{@commands[command][:usage]}"
+      else
+        @commands[command][:block].call(*args)
+      end
+    else
+      puts "Command not found. Check 'point help' for full information."
+    end
+  rescue Point::Errors::AccessDenied
+    puts "Access Denied. The username & API key stored for your account was invalid. Have you run 'point setup'?"
+    Process.exit(1)
+  rescue Point::Error
+    puts "An error occured with your point request."
+    Process.exit(1)
+  end
+  
+  def command(command, options = {}, &block)
+    @commands = Hash.new if @commands.nil?
+    @commands[command] = Hash.new
+    @commands[command][:description] = @next_description
+    @commands[command][:usage] = @next_usage
+    @commands[command][:flags] = @next_flags
+    @commands[command][:required_args] = (options[:required_args] || 0)
+    @commands[command][:block] = Command.new(block)
+    @next_usage, @next_description, @next_flags = nil, nil, nil
+  end
+  
+  def commands
+    @commands
+  end
+  
+  def desc(value)
+    @next_description = value
+  end
+  
+  def usage(value)
+    @next_usage = value
+  end
+  
+  def flags(key, value)
+    @next_flags = Hash.new if @next_flags.nil?
+    @next_flags[key] = value
+  end
+  
+  def load_commands
+    Dir[File.join(File.dirname(__FILE__), 'commands', '*.rb')].each do |path|
+      PointCLI.module_eval File.read(path), path
+    end
+  end
+  
+  def parse_options(args)
+    idx = 0
+    args.clone.inject({}) do |memo, arg|
+      case arg
+      when /^--(.+?)=(.*)/
+        args.delete_at(idx)
+        memo.merge($1.to_sym => $2)
+      when /^--(.+)/
+        args.delete_at(idx)
+        memo.merge($1.to_sym => true)
+      when "--"
+        args.delete_at(idx)
+        return memo
+      else
+        idx += 1
+        memo
+      end
+    end
+  end
+  
+end
+
+PointCLI.desc "Displays this help message"
+PointCLI.usage "point usage [command]"
+PointCLI.command "help" do |command|
+  if command.nil?
+    puts "The Point Gem allows you to easily control your DNS hosting from a simple to use"
+    puts "command line interface. "
+    puts    
+    for key, command in PointCLI.commands.sort_by{|k,v| k}
+      puts "    #{key.ljust(15)} #{command[:description]}"
+    end
+    puts
+    puts "For more information see http://www.pointhq.com/gem"
+    puts "See 'point help [command]' for usage information."
+  else
+    if c = PointCLI.commands[command]
+      puts c[:description]
+      if c[:usage]
+        puts
+        puts "Usage:"
+        puts "     #{c[:usage]}"
+      end
+      if c[:flags]
+        puts
+        puts "Options:"
+        for key, value in c[:flags]
+          puts "     #{key.ljust(15)} #{value}"
+        end
+      end
+    else
+      puts "Command Not Found. Check 'point help' for a full list of commands available to you."
+    end
+  end
+end
+
+PointCLI.desc "Displays the current version number"
+PointCLI.command "version" do
+  puts "Point Library Version..: #{Point::VERSION}"
+  puts "Point CLI Version......: #{PointCLI::VERSION} "
+end

data/lib/point_cli/command.rb

@@ -0,0 +1,59 @@
+module PointCLI
+  class Command
+    
+    def initialize(block)
+      (class << self;self end).send :define_method, :command, &block
+    end
+    
+    def call(*args)
+      arity = method(:command).arity
+      args << nil while args.size < arity
+      send :command, *args
+    end
+    
+    def use_hirb
+      begin
+        require 'hirb'
+        extend Hirb::Console
+      rescue LoadError
+        puts "Hirb is not installed. Install hirb using '[sudo] gem install hirb' to get cool ASCII tables"
+        Process.exit(1)
+      end      
+    end
+    
+    def display_zone_information(zone)
+      puts "Zone #{zone.inspect}"
+    end
+
+
+    def select_zone(zone)
+      zones = Point::Zone.find(:all)
+      zones = zones.select{|z| z.name.match(/\A#{zone}/) }
+      if zones.size == 0
+        puts "There are no zones matching the domain you entered"
+        Process.exit(1)
+      elsif zones.size > 1
+        puts "There are multiple zones matching the domain you have posted. Which domain would"
+        puts "you like to view?"
+        zone_choice = choose do |menu|
+          for zone in zones
+            menu.choice(zone.name)
+          end
+        end
+        zones.select{|z| z.name == zone_choice}.first
+      else
+        zones.first
+      end
+    end
+
+    def heading(title)
+      puts "-" * 80
+      puts title
+    end
+    
+    def divider
+      puts "=" * 80
+    end
+
+  end
+end

metadata

@@ -0,0 +1,98 @@
+--- !ruby/object:Gem::Specification 
+name: point-cli
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Adam Cooke
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-10-29 00:00:00 +00:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: highline
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.5.0
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: json
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.1.5
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: hirb
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 0.2.7
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: point
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.0.0
+    version: 
+description: 
+email: adam@atechmedia.com
+executables: 
+- point
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- lib/commands/domains.rb
+- lib/commands/setup.rb
+- lib/point_cli/command.rb
+- lib/point_cli.rb
+- bin/point
+has_rdoc: true
+homepage: http://www.pointhq.com
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: CLI client for the PointHQ DNS Hosting System
+test_files: []
+