opts 0.0.1

data/.gitignore

@@ -0,0 +1,3 @@
+pkg/*
+*.gem
+.bundle

data/Gemfile

@@ -0,0 +1,4 @@
+source :gemcutter
+
+# Specify your gem's dependencies in opts.gemspec
+gemspec

data/LICENSE

@@ -0,0 +1,19 @@
+Copyright (c) 2010 Simon Menke
+
+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.

data/Rakefile

@@ -0,0 +1,2 @@
+require 'bundler'
+Bundler::GemHelper.install_tasks

data/examples/dsl.rb

@@ -0,0 +1,27 @@
+$:.unshift File.expand_path('../../lib', __FILE__)
+require 'opts'
+
+class CLI
+  include Opts::DSL
+  
+  class_use Opts::Shell
+  class_opt 'verbose', :short => 'v', :type => :boolean
+  class_opt 'path',    :type => :string, :short => 'p'
+  
+  arg 'GEMFILE', :type => :string
+  arg 'COUNT',   :type => :numeric, :required => false, :splat => true
+  arg 'PATHS',   :type => :string, :splat => true
+  def pack(env, args)
+    env[:shell].say [env, args].inspect, :green
+  end
+  
+  def deploy(env, args)
+    p [env, args]
+  end
+  
+end
+
+packer = CLI.new
+packer.call({}, ['-v', 'pack', 'Gemfile', '1', '2', 'hello'])
+packer.call({}, ['--verbose', 'deploy', 'Gemfile'])
+packer.call({}, ['--verbose=f', '-p', 'example.g', 'pack', 'Gemfile', 'lib', 'app'])

data/examples/simple.rb

@@ -0,0 +1,49 @@
+$:.unshift File.expand_path('../../lib', __FILE__)
+require 'opts'
+
+class CLI
+  include Opts
+  
+  def initialize
+    cli = self
+    @opts = Opts::Builder.new do
+      use Opts::Shell
+      use Opts::OptionParser do
+        opt 'verbose',
+            :short => 'v', :type => :boolean
+        opt 'path',
+            :short => 'p', :type => :string
+      end
+      use Opts::CommandParser do
+        cmd 'pack', Opts::Builder do
+          use Opts::ArgumentParser do
+            arg 'GEMFILE', :type => :string
+            arg 'COUNT',   :type => :numeric, :required => false, :splat => true
+            arg 'PATHS',   :type => :string, :splat => true
+          end
+          run cli.method(:pack)
+        end
+        cmd 'deploy', cli.method(:deploy)
+      end
+      run lambda { raise Error }
+    end
+  end
+  
+  def call(env, args)
+    @opts.call(env, args)
+  end
+  
+  def pack(env, args)
+    env[:shell].say [env, args].inspect, :green
+  end
+  
+  def deploy(env, args)
+    p [env, args]
+  end
+  
+end
+
+packer = CLI.new
+packer.call({}, ['-v', 'pack', 'Gemfile', '1', '2', 'hello'])
+packer.call({}, ['--verbose', 'deploy', 'Gemfile'])
+packer.call({}, ['--verbose=f', '-p', 'example.g', 'pack', 'Gemfile', 'lib', 'app'])

data/lib/opts.rb

@@ -0,0 +1,17 @@
+module Opts
+
+  Error                = Class.new(RuntimeError)
+  UnknownCommandError  = Class.new(Error)
+  UnknownOptionError   = Class.new(Error)
+  InvalidOptionError   = Class.new(Error)
+  InvalidArgumentError = Class.new(Error)
+
+  require 'opts/version'
+  require 'opts/option_parser'
+  require 'opts/argument_parser'
+  require 'opts/command_parser'
+  require 'opts/builder'
+  require 'opts/shell'
+  require 'opts/dsl'
+
+end

data/lib/opts/argument_parser.rb

@@ -0,0 +1,89 @@
+class Opts::ArgumentParser
+  
+  attr_accessor :app
+  
+  def initialize(app=nil, &block)
+    @app = app
+    @args = []
+    
+    if block and block.arity == -1
+      instance_eval(&block)
+    elsif block_given?
+      yield(self)
+    end
+  end
+  
+  def arg(name, options={})
+    options = { :type => :string, :required => true, :min => 1, :max => 1 }.merge(options)
+    options[:max] = nil if options.delete(:splat)
+    @args << [name, options]
+  end
+  
+  def call(env, args)
+    new_env, new_args = env.dup, args.dup
+    parse(new_env, new_args)
+    @app.call(new_env, new_args)
+  end
+  
+private
+  
+  def parse(env, args)
+    descs = @args.dup
+    while pair = descs.shift
+      name, desc = *pair
+      value = []
+      
+      while arg = args.first
+        valid = false
+        
+        case desc[:type]
+        when :string
+          valid = true
+          
+        when :numeric
+          case arg
+          when /^[+-]?[0-9]+[.][0-9]+$/
+            arg = arg.to_f
+            valid = true
+          when /^[+-]?[0-9]+$/
+            arg = arg.to_i
+            valid = true
+          else
+            valid = false
+          end
+          
+        end
+        
+        if valid
+          value << arg
+          args.shift
+        else
+          break
+        end
+        
+        if desc[:max] and desc[:max] == value.size
+          break
+        end
+      end
+      
+      if value.empty? and desc[:required]
+        raise InvalidArgumentError, "#{name} is a required argument"
+      end
+      
+      if desc[:min] > value.size and (desc[:required] || value.size > 0)
+        raise InvalidArgumentError, "minimum #{desc[:min]} values are required for #{name}"
+      end
+      
+      if desc[:max] and desc[:max] < value.size and (desc[:required] || value.size > 0)
+        raise InvalidArgumentError, "maximum #{desc[:max]} values are allowed for #{name}"
+      end
+      
+      if desc[:max] and desc[:max] == 1 and desc[:max] == 1
+        value = value.shift
+      end
+      
+      env[name] = value if value
+    end
+  end
+  
+end

data/lib/opts/builder.rb

@@ -0,0 +1,41 @@
+class Opts::Builder
+
+  attr_accessor :app
+  
+  def initialize(app=nil, &block)
+    @app = app
+    @ops = []
+    
+    if block and block.arity == -1
+      instance_eval(&block)
+    elsif block_given?
+      yield(self)
+    end
+  end
+  
+  def use(klass, *args, &block)
+    @ops << [klass, args, block]
+  end
+  
+  def run(app)
+    @app = app
+  end
+  
+  def to_app
+    @target ||= begin
+      @ops.reverse.inject(@app) do |app, (klass, args, block)|
+        if Class === klass
+          klass.new(app, *args, &block)
+        else
+          klass.app = app
+          klass
+        end
+      end
+    end
+  end
+  
+  def call(env, args)
+    to_app.call(env, args)
+  end
+  
+end

data/lib/opts/command_parser.rb

@@ -0,0 +1,33 @@
+class Opts::CommandParser
+  
+  def initialize(default_app=nil, &block)
+    @default_app = default_app
+    @commands = {}
+    
+    if block and block.arity == -1
+      instance_eval(&block)
+    elsif block_given?
+      yield(self)
+    end
+  end
+  
+  def cmd(name, app=nil, *args, &block)
+    if Class === app
+      app = app.new(*args, &block)
+    end
+    @commands[name.to_s] = {
+      :app  => app || block
+    }
+  end
+  
+  def call(env, args)
+    cmd_name = args.first.to_s
+    cmd = @commands[cmd_name]
+    
+    raise Opts::UnknownCommandError, "Unknown command #{cmd_name}" unless cmd
+    
+    (env[:commands] ||= []) << cmd_name
+    cmd[:app].call(env, args[1..-1])
+  end
+  
+end

data/lib/opts/dsl.rb

@@ -0,0 +1,74 @@
+module Opts::DSL
+  
+  def self.included(base)
+    base.extend ClassMethods
+  end
+  
+  def call(env, args)
+    (env[:stack] ||= []).push self
+    self.class.parser.call(env, args)
+  ensure
+    env[:stack].pop
+  end
+  
+  module ClassMethods
+    
+    def parser
+      @parser ||= begin
+        @class_builder   ||= Opts::Builder.new
+        @class_opts      ||= Opts::OptionParser.new
+        @command_parser  ||= Opts::CommandParser.new
+        
+        @class_builder.use @class_opts
+        @class_builder.run @command_parser
+        
+        @class_builder.to_app
+      end
+    end
+    
+    def class_use(klass, *args, &block)
+      @class_builder ||= Opts::Builder.new
+      @class_builder.use(klass, *args, &block)
+    end
+    
+    def class_opt(name, options={})
+      @class_opts ||= Opts::OptionParser.new
+      @class_opts.opt(name, options)
+    end
+    
+    def use(klass, *args, &block)
+      @command_builder ||= Opts::Builder.new
+      @command_builder.use(klass, *args, &block)
+    end
+    
+    def opt(name, options={})
+      @command_opts ||= Opts::OptionParser.new
+      @command_opts.opt(name, options)
+    end
+    
+    def arg(name, options={})
+      @command_args ||= Opts::ArgumentParser.new
+      @command_args.arg(name, options)
+    end
+    
+    def method_added(m)
+      @command_parser  ||= Opts::CommandParser.new
+      @command_builder ||= Opts::Builder.new
+      @command_opts    ||= Opts::OptionParser.new
+      @command_args    ||= Opts::ArgumentParser.new
+      
+      @command_builder.use @command_opts
+      @command_builder.use @command_args
+      @command_builder.run lambda { |env, args|
+        env[:stack].last.__send__(m, env, args)
+      }
+      @command_parser.cmd(m, @command_builder.to_app)
+      
+      @command_builder = nil
+      @command_opts    = nil
+      @command_args    = nil
+    end
+    
+  end
+  
+end

data/lib/opts/option_parser.rb

@@ -0,0 +1,99 @@
+class Opts::OptionParser
+  
+  attr_accessor :app
+  
+  def initialize(app=nil, &block)
+    @options = {}
+    @short_names = {}
+    @app = app
+    
+    if block and block.arity == -1
+      instance_eval(&block)
+    elsif block_given?
+      yield(self)
+    end
+  end
+  
+  def call(env, args)
+    new_env, new_args = env.dup, args.dup
+    parse(new_env, new_args)
+    @app.call(new_env, new_args)
+  end
+  
+  
+  def opt(name, options={})
+    if short = options[:short]
+      @short_names[short.to_s] = name.to_s
+    end
+    
+    @options[name.to_s] = {
+      :type => :boolean
+    }.merge(options)
+  end
+  
+private
+  
+  def parse(env, args)
+    while args.first =~ /^(?:--([^-][^=]*)|-([^=-]))(?:=(.+))?$/
+      args.shift
+      
+      long_name, short_name = $1, $2
+      name                  = long_name || short_name
+      value                 = $3
+      long_name           ||= @short_names[short_name]
+      option                = @options[long_name]
+      
+      unless option
+        raise Opts::UnknownOptionError, "Unknown option #{name}"
+      end
+      
+      case option[:type]
+      when :boolean
+        if value
+          case value
+          when /^t(rue)?|y(es)?|1$/i
+            value = true
+          when /^f(alse)?|n(o)?|0$/i
+            value = false
+          else
+            raise Opts::InvalidOptionError, "Invalid boolean option --#{long_name}"
+          end
+        else
+          
+          value = true
+        end
+        
+      when :string
+        if value.nil? or value.empty?
+          value = args.shift
+        end
+        
+      when :numeric
+        if value.nil? or value.empty?
+          value = args.shift
+        end
+        
+        case value
+        when /^[+-]?[0-9]+[.][0-9]+$/
+          value = value.to_f
+        when /^[+-]?[0-9]+$/
+          value = value.to_i
+        else
+          raise Opts::InvalidOptionError, "Invalid numeric option --#{long_name}=#{value}"
+        end
+        
+      end
+      
+      if NilClass === value and option[:default]
+        value = option[:default]
+      end
+      
+      if NilClass === value
+        raise Opts::InvalidOptionError, "Invalid option --#{name}"
+      end
+      
+      env[long_name] = value
+    end
+  end
+  
+end

data/lib/opts/shell.rb

@@ -0,0 +1,102 @@
+class Opts::Shell
+  
+  # Most of this is taken from http://github.com/wycats/thor/blob/master/lib/thor/shell/basic.rb
+  
+  CLEAR      = "\e[0m"
+  BOLD       = "\e[1m"
+  
+  BLACK      = "\e[30m"
+  RED        = "\e[31m"
+  GREEN      = "\e[32m"
+  YELLOW     = "\e[33m"
+  BLUE       = "\e[34m"
+  MAGENTA    = "\e[35m"
+  CYAN       = "\e[36m"
+  WHITE      = "\e[37m"
+  
+  ON_BLACK   = "\e[40m"
+  ON_RED     = "\e[41m"
+  ON_GREEN   = "\e[42m"
+  ON_YELLOW  = "\e[43m"
+  ON_BLUE    = "\e[44m"
+  ON_MAGENTA = "\e[45m"
+  ON_CYAN    = "\e[46m"
+  ON_WHITE   = "\e[47m"
+  
+  def initialize(app, options={})
+    @app     = app
+    @options = { :color => true }.merge(options)
+    @padding = 0
+    @quite   = false
+  end
+  
+  def call(env, args)
+    env[:shell] = self
+    @app.call(env, args)
+  end
+  
+  def with_padding(padding)
+    _padding = @padding
+    @padding = padding
+    yield
+  ensure
+    @padding = _padding
+  end
+  
+  def padding
+    @padding
+  end
+  
+  def with_quite(quite=true)
+    _quite = @quite
+    @quite = quite
+    yield
+  ensure
+    @quite = _quite
+  end
+  
+  def quite?
+    @quite
+  end
+  
+  def say(message="", color=nil, force_new_line=(message.to_s !~ /( |\t)$/))
+    message = message.to_s
+    message = set_color(message, color) if color
+    
+    spaces = "  " * padding
+    
+    if force_new_line
+      $stdout.puts(spaces + message)
+    else
+      $stdout.print(spaces + message)
+    end
+    $stdout.flush
+  end
+  
+  def status(type, message, log_status=true)
+    return if quiet? || log_status == false
+    spaces = "  " * (padding + 1)
+    color  = log_status.is_a?(Symbol) ? log_status : :green
+    
+    status = status.to_s.rjust(12)
+    status = set_color status, color, true if color
+    
+    $stdout.puts "#{status}#{spaces}#{message}"
+    $stdout.flush
+  end
+  
+  def set_color(string, color=false, bold=false)
+    if color and @options[:color]
+      color = self.class.const_get(color.to_s.upcase) if color.is_a?(Symbol)
+      bold  = bold ? BOLD : ""
+      "#{bold}#{color}#{string}#{CLEAR}"
+    else
+      string
+    end
+  end
+  
+  def inspect
+    "#<#{self.class} #{@options[:color] ? 'COLORED' : 'BW'}>"
+  end
+  
+end

data/lib/opts/version.rb

@@ -0,0 +1,3 @@
+module Opts
+  VERSION = "0.0.1"
+end

data/opts.gemspec

@@ -0,0 +1,22 @@
+# -*- encoding: utf-8 -*-
+require File.expand_path("../lib/opts/version", __FILE__)
+
+Gem::Specification.new do |s|
+  s.name        = "opts"
+  s.version     = Opts::VERSION
+  s.platform    = Gem::Platform::RUBY
+  s.authors     = ['Simon Menke']
+  s.email       = ['simon.menke@gmail.com']
+  s.homepage    = "http://rubygems.org/gems/opts"
+  s.summary     = "Rack for command line applications"
+  s.description = "Rack for command line applications"
+
+  s.required_rubygems_version = ">= 1.3.6"
+  s.rubyforge_project         = "opts"
+
+  s.add_development_dependency "bundler", ">= 1.0.0"
+
+  s.files        = `git ls-files`.split("\n")
+  s.executables  = `git ls-files`.split("\n").map{|f| f =~ /^bin\/(.*)/ ? $1 : nil}.compact
+  s.require_path = 'lib'
+end

metadata

@@ -0,0 +1,99 @@
+--- !ruby/object:Gem::Specification 
+name: opts
+version: !ruby/object:Gem::Version 
+  hash: 29
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- Simon Menke
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-08-30 00:00:00 +02:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: bundler
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 23
+        segments: 
+        - 1
+        - 0
+        - 0
+        version: 1.0.0
+  type: :development
+  version_requirements: *id001
+description: Rack for command line applications
+email: 
+- simon.menke@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- .gitignore
+- Gemfile
+- LICENSE
+- Rakefile
+- examples/dsl.rb
+- examples/simple.rb
+- lib/opts.rb
+- lib/opts/argument_parser.rb
+- lib/opts/builder.rb
+- lib/opts/command_parser.rb
+- lib/opts/dsl.rb
+- lib/opts/option_parser.rb
+- lib/opts/shell.rb
+- lib/opts/version.rb
+- opts.gemspec
+has_rdoc: true
+homepage: http://rubygems.org/gems/opts
+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: 23
+      segments: 
+      - 1
+      - 3
+      - 6
+      version: 1.3.6
+requirements: []
+
+rubyforge_project: opts
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: Rack for command line applications
+test_files: []
+