shellopts 0.9.7 → 2.0.0.pre.4

data/lib/shellopts/messenger.rb

@@ -0,0 +1,71 @@
+
+module ShellOpts
+  # Service object for output of messages
+  #
+  # Messages are using the common command line formats
+  #
+  class Messenger
+    # Name of the program. When assigning to +name+ prefixed and suffixed
+    # whitespaces are removed
+    attr_accessor :name
+
+    # :nodoc:
+    def name=(name) @name = name.strip end
+    # :nodoc:
+
+    # Usage string. If not nil the usage string is printed by #error. When
+    # assigning to +usage+ suffixed whitespaces are removed and the format
+    # automatically set to +:custom+
+    attr_accessor :usage
+
+    # :nodoc:
+    def usage=(usage) 
+      @format = :custom
+      @usage = usage&.rstrip
+    end
+    # :nodoc:
+
+    # Format of the usage string: +:default+ prefixes the +usage+ with 'Usage:
+    # #{name} ' before printing. +:custom+ prints +usage+ as is
+    attr_accessor :format
+
+    # Initialize a Messenger object. +name+ is the name of the name and +usage+
+    # is a short description of the options (eg. '-a -b') or a longer multiline
+    # explanation. The +:format+ option selects bewtween the two: +short+ (the
+    # default) or :long. Note that 
+    #
+    def initialize(name, usage, format: :default)
+      @name = name
+      @usage = usage
+      @format = format
+    end
+
+    # Print error message and usage string and exit with status 1. Output is
+    # using the following format
+    #
+    #   <name name>: <message>
+    #   Usage: <name name> <options and arguments>
+    #
+    def error(*msgs)
+      $stderr.print "#{name}: #{msgs.join}\n"
+      if usage
+        $stderr.print "Usage: #{name} " if format == :default
+        $stderr.print "#{usage}\n"
+      end
+      exit 1
+    end
+
+    # Print error message and exit with status 1. It use the current ShellOpts
+    # object if defined. This method should not be called in response to
+    # user-errors but system errors (like disk full). Output is using the
+    # following format:
+    #
+    #   <name name>: <message>
+    #
+    def fail(*msgs)
+      $stderr.puts "#{name}: #{msgs.join}"
+      exit 1
+    end
+  end
+end
+

data/lib/shellopts/option_struct.rb

@@ -0,0 +1,245 @@
+
+require 'shellopts/shellopts.rb'
+require 'shellopts/idr'
+
+module ShellOpts
+  class OptionStruct < BasicObject
+    # +key=:name+ cause command methods to be named without the exclamation
+    # mark. It doesn't change how options are named
+    def self.new(idr, key = :key, aliases = {})
+      ast = idr.instance_variable_get("@ast")
+      grammar = ast.grammar
+      instance = allocate
+
+      # Generate option accessor methods
+      grammar.option_list.each { |option|
+        key = alias_key(option.key, aliases)
+        instance.instance_eval("def #{key}() @#{key} end")
+        present = set_variable(instance, "@#{key}", idr[option.key])
+        instance.instance_eval("def #{key}?() #{present} end")
+      }
+
+      # Generate #subcommand default methods
+      if !idr.subcommand
+        instance.instance_eval("def subcommand() nil end")
+        instance.instance_eval("def subcommand?() false end")
+        instance.instance_eval("def subcommand!() nil end")
+      end
+
+      # Generate subcommand methods
+      grammar.command_list.each { |command|
+        key = alias_key(command.key, aliases)
+        if command.key == idr.subcommand&.key
+          struct = OptionStruct.new(idr.subcommand, aliases[idr.subcommand.key] || {})
+          set_variable(instance, "@subcommand", struct)
+          instance.instance_eval("def #{key}() @subcommand end")
+          instance.instance_eval("def subcommand() :#{key} end")
+          instance.instance_eval("def subcommand?() true end")
+          instance.instance_eval("def subcommand!() @subcommand end")
+        else
+          instance.instance_eval("def #{key}() nil end")
+        end
+      }
+
+      instance
+    end
+
+  private
+    # Return class of object. #class is not defined for BasicObjects so this
+    # method provides an alternative way of getting the class
+    def self.class_of(object) 
+      # https://stackoverflow.com/a/18621313/2130986
+      ::Kernel.instance_method(:class).bind(object).call 
+    end
+
+    # Replace key with alias and check against the list of reserved words
+    def self.alias_key(internal_key, aliases)
+      key = aliases[internal_key] || internal_key
+      !RESERVED_WORDS.include?(key.to_s) or
+        raise ::ShellOpts::ConversionError, "Can't create struct: '#{key}' is a reserved word"
+      key
+    end
+
+    # Shorthand helper method. Substitutes the undefined ObjectStruct#instance_variable_set
+    def self.set_variable(this, var, value)
+      # https://stackoverflow.com/a/18621313/2130986
+      ::Kernel.instance_method(:instance_variable_set).bind(this).call(var, value)
+    end
+
+    BASIC_OBJECT_RESERVED_WORDS = %w(
+         __id__ __send__ instance_eval instance_exec method_missing
+         singleton_method_added singleton_method_removed
+         singleton_method_undefined)
+    OPTIONS_STRUCT_RESERVED_WORDS = %w(subcommand)
+    RESERVED_WORDS = BASIC_OBJECT_RESERVED_WORDS + OPTIONS_STRUCT_RESERVED_WORDS
+  end
+end
+
+
+
+
+
+
+
+
+__END__
+
+module ShellOpts
+  # Struct representation of options. Usually created by ShellOpts::to_struct
+  #
+  # OptionStruct objects give easy access to configuration option values but
+  # meta data are more circuitously accessed through class methods with an
+  # explicit instance argument
+  #
+  # Option values are accessed through a member methods named after the key of
+  # the option. Repeated options have an Array value with one element (possibly
+  # nil) for each use of the option. A query method with a '?' suffixed to the
+  # name returns true or false depending on whether the option was used or not
+  #
+  #   option   - Value of option. Either an object or an Array if the option can
+  #              be repeated
+  #   option?  - True iff option was given
+  #
+  # Command methods return a nested OptionStruct object while the special
+  # #command method returns the key of actual command (if any). Use
+  # +strukt.send(strukt.command)+ to get the subcommand of a OptionStruct. It
+  # is possible to rename #command method to avoid name collisions 
+  #
+  #   name!   - Command. An OptionStruct or nil if not given on the command line
+  #   subcommand - Key of command. Can be renamed
+  #
+  # ---------------------------------
+  #   name!   - Command. An OptionStruct or nil if not given on the command line
+  #
+  #   key!    - Key of command
+  #   value!  - Value of command (a subcommand). Can be renamed
+  #
+  # Note: There is no command query method because option and command names
+  # live in seperate namespaces and could cause colllisions. Check +name!+ for
+  # nil to detect if a command was given
+  #
+  # Meta data are extracted through class methods to avoid polluting the object
+  # namespace. OptionStruct use an OptionsHash object internally and
+  # implements a subset of its meta methods by forwarding to it. The
+  # OptionsHash object can be accessed through the #options_hash method
+  #
+  # Note that #command is defined as both an instance method and a class
+  # method. Use the class method to make the code work with all OptionStruct
+  # objects even if #command has been renamed
+  #
+  # +ShellOpts+ is derived from +BascicObject+ that reserves some words for
+  # internal use (+__id__+, +__send__+, +instance_eval+, +instance_exec+,
+  # +method_missing+, +singleton_method_added+, +singleton_method_removed+,
+  # +singleton_method_undefined+). ShellOpts also define two reserved words of
+  # its own (+__options_hash__+ and +__command__+). ShellOpts raise an
+  # ShellOpts::ConversionError if an option collides with one of the
+  # reserved words or with the special #command method
+  #
+  class OptionStruct < BasicObject
+    # Create a new OptionStruct instance from an AST. The optional
+    # +options_hash+ argument is used to create subcommands without creating a
+    # new options_hash argument. It is not meant for end-users. The
+    # +command_alias+ names the method holding the key for the subcommand (if
+    # any)
+    def self.new(ast, options_hash = OptionsHash.new(ast), command_alias: :command)
+      instance = allocate
+      set_variable(instance, "@__options_hash__", options_hash)
+
+      # Check for reserved words and +command_alias+
+      options_hash.keys.each { |key| 
+        !RESERVED_WORDS.include?(key.to_s) or 
+          raise ::ShellOpts::ConversionError, "Can't create struct: '#{key}' is a reserved word"
+        key != command_alias or
+          raise ::ShellOpts::ConversionError, "Can't create struct: '#{key}' is the command alias"
+      }
+
+      # Create accessor methods
+      ast.grammar.option_list.each { |option|
+        instance.instance_eval("def #{option.key}() @#{option.key} end")
+        instance.instance_eval("def #{option.key}?() false end")
+      }
+      ast.grammar.command_list.each { |command|
+        instance.instance_eval("def #{command.key}() nil end")
+      }
+
+      # Assign values
+      options_hash.each { |key, value|
+        if value.is_a?(OptionsHash)
+          set_variable(instance, "@__command__", OptionStruct.new(value.ast, value))
+          instance.instance_eval("def #{key}() @__command__ end")
+        else
+          set_variable(instance, "@#{key}", value)
+          instance.instance_eval("def #{key}?() true end")
+        end
+      }
+
+      # Command accessor method
+      instance.instance_eval("def #{command_alias}() @__options_hash__.command end")  
+
+      instance
+    end
+
+    # Return the OptionsHash object from the instance
+    def self.options_hash(instance)
+      get_variable(instance, "@__options_hash__")
+    end
+
+    # Return class of object. #class is not defined for BasicObjects so this
+    # method provides an alternative way of getting the class a BasicObject
+    def self.class_of(object) 
+      # https://stackoverflow.com/a/18621313/2130986
+      ::Kernel.instance_method(:class).bind(object).call 
+    end
+
+    # Return the number of options and commands
+    def self.size(instance)
+      options_hash(instance).size
+    end
+
+    # Return the option and command keys. The keys are in order of occurrence
+    # on the command line. A subcommand will always be the last element
+    def self.keys(instance)
+      options_hash(instance).keys
+    end
+
+    # Return the actual option name used on the command line for +name+. Use
+    # +index+ to select between repeated options. Return the name of the
+    # program/subcommand if key is nil
+    def self.name(struct, key = nil, index = nil)
+      options_hash(struct).name(key, index)
+    end
+
+    # Return the AST node for the option key or the AST node for the
+    # OptionStruct if key is nil. Use +index+ to select between repeated
+    # options. Raise InternalError if key doesn't exists
+    def self.node(struct, key = nil, index = nil)
+      options_hash(struct).node(key, index)
+    end
+
+    # Return key of the command of the struct (possibly nil)
+    def self.command(struct)
+      options_hash(struct).command
+    end
+
+  private
+    BASIC_OBJECT_RESERVED_WORDS = %w(
+         __id__ __send__ instance_eval instance_exec method_missing
+         singleton_method_added singleton_method_removed
+         singleton_method_undefined)
+    OPTIONS_STRUCT_RESERVED_WORDS = %w(__options_hash__ __command__)
+    RESERVED_WORDS = BASIC_OBJECT_RESERVED_WORDS + OPTIONS_STRUCT_RESERVED_WORDS 
+
+    # Shorthand helper method. Substitutes the undefined ObjectStruct#instance_variable_set
+    def self.set_variable(this, var, value)
+      # https://stackoverflow.com/a/18621313/2130986
+      ::Kernel.instance_method(:instance_variable_set).bind(this).call(var, value)
+    end
+
+    # Shorthand helper method: Substitutes the undefined ObjectStruct#instance_variable_get
+    def self.get_variable(this, var)
+      # https://stackoverflow.com/a/18621313/2130986
+      ::Kernel.instance_method(:instance_variable_get).bind(this).call(var)
+    end
+  end
+end 
+

data/lib/shellopts/shellopts.rb

@@ -0,0 +1,100 @@
+
+require "shellopts"
+
+require "shellopts/args.rb"
+
+# TODO
+#
+# PROCESSING
+#   1. Compile usage string and yield a grammar
+#   2. Parse the options using the grammar and yield an AST
+#   3. Construct the Program model from the AST
+#   4. Apply defaults to the model
+#   6. Run validations on the model
+#   5. Create representation from the model
+#
+
+module ShellOpts
+  # The command line processing object
+  class ShellOpts
+    # One of :key, :name, :option
+    #
+    #         Option   Command
+    # :key    key      #command! (no collision)
+    # :name   name     #command (possible collision)
+    # :option --option #command (multihash, no collision) (TODO)
+    #
+    DEFAULT_USE = :key
+
+    # Name of program
+    attr_reader :name
+
+    # The grammar compiled from the usage string
+    attr_reader :grammar
+
+    # The AST parsed from the command line arguments
+    attr_reader :ast
+
+    # The IDR generated from the Ast
+    attr_reader :idr
+
+    # Object for error & fail messages. Default is to write a message on
+    # standard error and exit with status 1
+    attr_accessor :messenger
+
+    # Compile a usage string into a grammar and use that to parse command line
+    # arguments
+    #
+    # +usage+ is the usage string, and +argv+ the command line (typically the
+    # global ARGV array). +name+ is the name of the program and defaults to the
+    # basename of the program
+    #
+    # Syntax errors in the usage string are caused by the developer and raise a
+    # +ShellOpts::CompilerError+ exception.  Errors in the +argv+ arguments are
+    # caused by the user and terminates the program with an error message and a
+    # short description of its usage
+    def initialize(usage, argv, name: PROGRAM, messenger: nil)
+      @name = name
+      begin
+        @grammar = Grammar.compile(name, usage)
+        @messenger = messenger || Messenger.new(name, @grammar.usage)
+        @ast = Ast.parse(@grammar, argv)
+        @idr = Idr.generate(@ast, @messenger)
+      rescue Grammar::Compiler::Error => ex
+        raise CompilerError.new(5, ex.message)
+      rescue Ast::Parser::Error => ex
+        error(ex.message)
+      end
+    end
+
+    # Return an array representation of options and commands in the same order
+    # as on the command line. Each option or command is represented by a [name,
+    # value] pair. The value of an option is be nil if the option didn't have
+    # an argument and else either a String, Integer, or Float. The value of a
+    # command is an array of its options and commands
+    def to_a() idr.to_a end
+
+    # Return a hash representation of the options. See {ShellOpts::OptionsHash}
+    def to_h(use: :key, aliases: {}) @idr.to_h(use: use, aliases: aliases) end
+
+    # Return a struct representation of the options. See {ShellOpts::OptionStruct}
+    def to_struct(use: :key, aliases: {}) @idr.to_struct(use: use, aliases: aliases) end
+
+    # List of remaining non-option command line arguments. Returns a Argv object
+    def args() Args.new(self, ast&.arguments) end
+
+    # Iterate options and commands as name/value pairs. Same as +to_a.each+
+    def each(&block) to_a.each(&block) end
+
+    # Print error messages and usage string and exit with status 1. This method
+    # should be called in response to user-errors (eg. specifying an illegal
+    # option)
+    def error(*msgs) @messenger.error(*msgs) end
+
+    # Print error message and exit with status 1. This method should called in
+    # response to system errors (like disk full)
+    def fail(*msgs) @messenger.fail(*msgs) end
+  end
+end
+
+

data/lib/shellopts/version.rb

@@ -1,3 +1,3 @@
 module Shellopts
-  VERSION = "0.9.7"
+  VERSION = "2.0.0-4"
 end

data/rs

@@ -0,0 +1,40 @@
+#!/usr/bin/bash
+
+PROGRAM=$(basename $0)
+USAGE="SOURCE-FILE"
+
+function error() {
+    echo "$PROGRAM: $@"
+    echo "Usage: $PROGRAM $USAGE"
+    exit 1
+} >&2
+
+[ $# = 1 ] || error "Illegal number of arguments"
+SOURCE_NAME=${1%.rb}.rb
+
+GEM_FILE=$(ls *.gemspec 2>/dev/null)
+[ -n "$GEM_FILE" ] || error "Can't find gemspec file"
+GEM_NAME=${GEM_FILE%.gemspec}
+
+if [ -f lib/$SOURCE_NAME ]; then
+    SOURCE_FILE=lib/$SOURCE_NAME
+elif [ -f lib/$GEM_NAME/$SOURCE_NAME ]; then
+    SOURCE_FILE=lib/$GEM_NAME/$SOURCE_NAME
+else    
+    SOURCE_FILE=$(find lib/$GEM_NAME -type f -path $SOURCE_NAME | head -1)
+    if [ -z "$SOURCE_FILE" ]; then
+        SOURCE_FILE=lib/$GEM_NAME/$SOURCE_NAME
+    fi
+fi
+
+SPEC_FILE=spec/${SOURCE_NAME%.rb}_spec.rb
+[ -f $SPEC_FILE ] || error "Can't find spec file '$SPEC_FILE'"
+
+rspec --fail-fast $SPEC_FILE || { 
+    # rcov forgets a newline when rspec fails
+    status=$?; echo; exit $status;
+}
+
+
+
+