bahuvrihi-tap 0.11.2 → 0.12.0

data/lib/tap/support/tdoc/tdoc_html_generator.rb

@@ -1,38 +0,0 @@
-require 'rdoc/generators/html_generator'
-
-# Defines a specialized generator so it can be called for using a --fmt option.
-class TDocHTMLGenerator < Generators::HTMLGenerator  # :nodoc:
-end
-
-module Generators # :nodoc:
-  const_set(:RubyToken, RDoc::RubyToken)
-
-  class HtmlClass < ContextUser # :nodoc:
-    alias tdoc_original_value_hash value_hash
-    
-    def value_hash
-      # split attributes into configurations and regular attributes
-      configurations, attributes = @context.attributes.partition do |attribute|
-        attribute.kind_of?(Tap::Support::TDoc::ConfigAttr)
-      end
-      
-      # set the context attributes to JUST the regular 
-      # attributes and process as usual.
-      @context.attributes.clear.concat attributes
-      values = tdoc_original_value_hash
-      
-      # set the context attributes to the configurations
-      # and echo the regular processing to produce a list
-      # of configurations
-      @context.attributes.clear.concat configurations
-      @context.sections.each_with_index do |section, i|
-        secdata = values["sections"][i]
- 
-        al = build_attribute_list(section)
-        secdata["configurations"] = al unless al.empty?
-      end 
-
-      values
-    end
-  end
-end

data/lib/tap/support/tdoc/tdoc_html_template.rb

@@ -1,42 +0,0 @@
-require 'rdoc/generators/template/html/html'
-
-#
-# Add a template for documenting configurations.  Do so by inserting in the 
-# template into the content regions used to template html.
-# (see  'rdoc/generators/html_generator' line 864)
-#
-[
-RDoc::Page::BODY, 
-RDoc::Page::FILE_PAGE, 
-RDoc::Page::METHOD_LIST].each do |content|
-  
-  # this substitution method duplicates the attribute template for configurations
-  # (see rdoc\generators\template\html line 523)
-  #
-  #IF:attributes
-  #    <div id="attribute-list">
-  #      <h3 class="section-bar">Attributes</h3>
-  #
-  #      <div class="name-list">
-  #        <table>
-  #START:attributes
-  #        <tr class="top-aligned-row context-row">
-  #          <td class="context-item-name">%name%</td>
-  #IF:rw
-  #          <td class="context-item-value">&nbsp;[%rw%]&nbsp;</td>
-  #ENDIF:rw
-  #IFNOT:rw
-  #          <td class="context-item-value">&nbsp;&nbsp;</td>
-  #ENDIF:rw
-  #          <td class="context-item-desc">%a_desc%</td>
-  #        </tr>
-  #END:attributes
-  #        </table>
-  #      </div>
-  #    </div>
-  #ENDIF:attributes
-  #
-  content.gsub!(/IF:attributes.*?ENDIF:attributes/m) do |match|
-    match + "\n\n" + match.gsub(/attributes/, 'configurations').gsub(/Attributes/, 'Configurations')
-  end
-end

data/lib/tap/support/validation.rb

@@ -1,479 +0,0 @@
-autoload(:PP, 'pp')
-
-module Tap
-  module Support
-    
-    # Validation generates blocks for common validations and transformations of 
-    # configurations set through Configurable.  In general these blocks load
-    # string inputs as YAML and valdiate the results; non-string inputs are
-    # simply validated.
-    #
-    #   integer = Validation.integer
-    #   integer.class             # => Proc
-    #   integer.call(1)           # => 1
-    #   integer.call('1')         # => 1
-    #   integer.call(nil)         # => ValidationError
-    #
-    #--
-    # Note the unusual syntax for declaring constants that are blocks
-    # defined by lambda... ex:
-    #
-    #   block = lambda {}
-    #   CONST = block
-    #
-    # This syntax plays well with RDoc, which otherwise gets jacked 
-    # when you do it all in one step.
-    module Validation
-      
-      # Raised when Validation blocks fail.
-      class ValidationError < ArgumentError
-        def initialize(input, validations)
-          super case 
-          when validations.empty?
-            "no validations specified"
-          else 
-            validation_str = PP.singleline_pp(validations, "")
-            PP.singleline_pp(input, "expected #{validation_str} but was: ")
-          end
-        end
-      end
-      
-      # Raised when yamlization fails.
-      class YamlizationError < ArgumentError
-        def initialize(input, error)
-          super "#{error} ('#{input}')"
-        end
-      end
-      
-      module_function
-      
-      # Yaml conversion and checker.  Valid if any of the validations
-      # match in a case statement.  Otherwise raises an error.
-      
-      # Returns input if any of the validations match any of the
-      # inputs, as in a case statement.  Raises a ValidationError 
-      # otherwise.  For example:
-      #
-      #   validate(10, [Integer, nil])
-      #
-      # Does the same as:
-      #
-      #   case 10
-      #   when Integer, nil then input
-      #   else raise ValidationError.new(...)
-      #   end
-      #
-      # Note the validations input must be an Array or nil; 
-      # validate will raise an ArgumentError otherwise.  
-      # All inputs are considered VALID if validations == nil.
-      def validate(input, validations)
-        case validations
-        when Array
-        
-          case input
-          when *validations then input
-          else raise ValidationError.new(input, validations)
-          end
-          
-        when nil then input
-        else raise ArgumentError.new("validations must be nil, or an array of valid inputs")
-        end
-      end
-      
-      # Attempts to load the input as YAML.  Raises a YamlizationError
-      # for errors.
-      def yamlize(input)
-        begin
-          YAML.load(input)
-        rescue
-          raise YamlizationError.new(input, $!.message)
-        end
-      end
-      
-      # Returns a block that calls validate using the block input
-      # and the input validations.  Raises an error if no validations
-      # are specified.
-      def check(*validations)
-        raise ArgumentError.new("no validations specified") if validations.empty?
-        lambda {|input| validate(input, validations) }
-      end
-    
-      # Returns a block that loads input strings as YAML, then
-      # calls validate with the result and the input validations.
-      # Non-string inputs are not converted.
-      #
-      #   b = yaml(Integer, nil)
-      #   b.class                 # => Proc
-      #   b.call(1)               # => 1
-      #   b.call("1")             # => 1
-      #   b.call(nil)             # => nil
-      #   b.call("str")           # => ValidationError
-      #
-      # If no validations are specified, the result will be 
-      # returned without validation.
-      def yaml(*validations)
-        lambda do |input|
-          res = input.kind_of?(String) ? yamlize(input) : input
-          validations.empty? ? res : validate(res, validations)
-        end
-      end
-      
-      # Returns a block loads a String input as YAML then
-      # validates the result is valid using the input
-      # validations.  If the input is not a String, the
-      # input is validated directly.
-      def yamlize_and_check(*validations)
-        lambda do |input|
-          input = yamlize(input) if input.kind_of?(String)
-          validate(input, validations)
-        end
-      end
-      
-      # Returns a block that checks the input is a string.
-      # Moreover, strings are re-evaluated as string 
-      # literals using %Q. 
-      #
-      #   string.class              # => Proc
-      #   string.call('str')        # => 'str'
-      #   string.call('\n')         # => "\n"
-      #   string.call("\n")         # => "\n"
-      #   string.call("%s")         # => "%s"
-      #   string.call(nil)          # => ValidationError
-      #   string.call(:sym)         # => ValidationError
-      #
-      def string(); STRING; end
-      string_validation_block = lambda do |input|
-        input = validate(input, [String])
-        eval %Q{"#{input}"}
-      end
-      STRING = string_validation_block
-      
-      # Same as string but allows nil.  Note the special
-      # behavior of the nil string '~' -- rather than
-      # being treated as a string, it is processed as nil
-      # to be consistent with the other [class]_or_nil
-      # methods.
-      #
-      #   string_or_nil.call('~')   # => nil
-      #   string_or_nil.call(nil)   # => nil
-      def string_or_nil(); STRING_OR_NIL; end
-      string_or_nil_validation_block = lambda do |input|
-        input = validate(input, [String, nil])
-        case input
-        when nil, '~' then nil 
-        else eval %Q{"#{input}"}
-        end
-      end
-      STRING_OR_NIL = string_or_nil_validation_block
-      
-      # Returns a block that checks the input is a symbol.
-      # String inputs are loaded as yaml first.
-      #
-      #   symbol.class              # => Proc
-      #   symbol.call(:sym)         # => :sym
-      #   symbol.call(':sym')       # => :sym
-      #   symbol.call(nil)          # => ValidationError
-      #   symbol.call('str')        # => ValidationError
-      #
-      def symbol(); SYMBOL; end
-      SYMBOL = yamlize_and_check(Symbol)
-      
-      # Same as symbol but allows nil:
-      #
-      #   symbol_or_nil.call('~')   # => nil
-      #   symbol_or_nil.call(nil)   # => nil
-      def symbol_or_nil(); SYMBOL_OR_NIL; end
-      SYMBOL_OR_NIL = yamlize_and_check(Symbol, nil)
-      
-      # Returns a block that checks the input is true, false or nil.
-      # String inputs are loaded as yaml first.
-      #
-      #   boolean.class             # => Proc
-      #   boolean.call(true)        # => true
-      #   boolean.call(false)       # => false
-      #   boolean.call(nil)         # => nil
-      #
-      #   boolean.call('true')      # => true
-      #   boolean.call('yes')       # => true
-      #   boolean.call('FALSE')     # => false
-      #
-      #   boolean.call(1)           # => ValidationError
-      #   boolean.call("str")       # => ValidationError
-      #
-      def boolean(); BOOLEAN; end
-      BOOLEAN = yamlize_and_check(true, false, nil)
-      
-      # Same as boolean.
-      def switch(); SWITCH; end
-      SWITCH = yamlize_and_check(true, false, nil)
-      
-      # Same as boolean.
-      def flag(); FLAG; end
-      FLAG = yamlize_and_check(true, false, nil)
-
-      # Returns a block that checks the input is an array.
-      # String inputs are loaded as yaml first.
-      #
-      #   array.class               # => Proc
-      #   array.call([1,2,3])       # => [1,2,3]
-      #   array.call('[1, 2, 3]')   # => [1,2,3]
-      #   array.call(nil)           # => ValidationError
-      #   array.call('str')         # => ValidationError
-      #
-      def array(); ARRAY; end
-      ARRAY = yamlize_and_check(Array)
-      
-      # Same as array but allows nil:
-      #
-      #   array_or_nil.call('~')    # => nil
-      #   array_or_nil.call(nil)    # => nil
-      def array_or_nil(); ARRAY_OR_NIL; end
-      ARRAY_OR_NIL = yamlize_and_check(Array, nil)
-      
-      # Returns a block that checks the input is an array.
-      # If the input is a string the string is split along
-      # commas and each value yamlized into an array.
-      #
-      #   list.class                # => Proc
-      #   list.call([1,2,3])        # => [1,2,3]
-      #   list.call('1,2,3')        # => [1,2,3]
-      #   list.call('str')          # => ['str']
-      #   list.call(nil)            # => ValidationError
-      #
-      def list(); LIST; end
-      list_block = lambda do |input|
-        if input.kind_of?(String)
-          input = input.split(/,/).collect {|arg| yamlize(arg) }
-        end
-        
-        validate(input, [Array])
-      end
-      LIST = list_block
-
-      # Returns a block that checks the input is a hash.
-      # String inputs are loaded as yaml first.
-      #
-      #   hash.class                     # => Proc
-      #   hash.call({'key' => 'value'})  # => {'key' => 'value'}
-      #   hash.call('key: value')        # => {'key' => 'value'}
-      #   hash.call(nil)                 # => ValidationError
-      #   hash.call('str')               # => ValidationError
-      #
-      def hash(); HASH; end
-      HASH = yamlize_and_check(Hash)
-      
-      # Same as hash but allows nil:
-      #
-      #   hash_or_nil.call('~')          # => nil
-      #   hash_or_nil.call(nil)          # => nil
-      def hash_or_nil(); HASH_OR_NIL; end
-      HASH_OR_NIL = yamlize_and_check(Hash, nil)
-      
-      # Returns a block that checks the input is an integer.
-      # String inputs are loaded as yaml first.
-      #
-      #   integer.class             # => Proc
-      #   integer.call(1)           # => 1
-      #   integer.call('1')         # => 1
-      #   integer.call(1.1)         # => ValidationError
-      #   integer.call(nil)         # => ValidationError
-      #   integer.call('str')       # => ValidationError
-      #
-      def integer(); INTEGER; end
-      INTEGER = yamlize_and_check(Integer)
-      
-      # Same as integer but allows nil:
-      #
-      #   integer_or_nil.call('~')  # => nil
-      #   integer_or_nil.call(nil)  # => nil
-      def integer_or_nil(); INTEGER_OR_NIL; end
-      INTEGER_OR_NIL = yamlize_and_check(Integer, nil)
-      
-      # Returns a block that checks the input is a float.
-      # String inputs are loaded as yaml first.
-      #
-      #   float.class               # => Proc
-      #   float.call(1.1)           # => 1.1
-      #   float.call('1.1')         # => 1.1
-      #   float.call('1.0e+6')      # => 1e6
-      #   float.call(1)             # => ValidationError
-      #   float.call(nil)           # => ValidationError
-      #   float.call('str')         # => ValidationError
-      #
-      def float(); FLOAT; end
-      FLOAT = yamlize_and_check(Float)
-      
-      # Same as float but allows nil:
-      #
-      #   float_or_nil.call('~')    # => nil
-      #   float_or_nil.call(nil)    # => nil
-      def float_or_nil(); FLOAT_OR_NIL; end
-      FLOAT_OR_NIL = yamlize_and_check(Float, nil)
-      
-      # Returns a block that checks the input is a number.
-      # String inputs are loaded as yaml first.
-      #
-      #   num.class               # => Proc
-      #   num.call(1.1)           # => 1.1
-      #   num.call(1)             # => 1
-      #   num.call(1e6)           # => 1e6
-      #   num.call('1.1')         # => 1.1
-      #   num.call('1.0e+6')      # => 1e6
-      #   num.call(nil)           # => ValidationError
-      #   num.call('str')         # => ValidationError
-      #
-      def num(); NUMERIC; end
-      NUMERIC = yamlize_and_check(Numeric)
-      
-      # Same as num but allows nil:
-      #
-      #   num_or_nil.call('~')    # => nil
-      #   num_or_nil.call(nil)    # => nil
-      def num_or_nil(); NUMERIC_OR_NIL; end
-      NUMERIC_OR_NIL = yamlize_and_check(Numeric, nil)
-      
-      # Returns a block that checks the input is a regexp.
-      # String inputs are converted to regexps using
-      # Regexp#new.
-      #
-      #   regexp.class              # => Proc
-      #   regexp.call(/regexp/)     # => /regexp/
-      #   regexp.call('regexp')     # => /regexp/
-      #
-      #   # use of ruby-specific flags can turn on/off 
-      #   # features like case insensitive matching
-      #   regexp.call('(?i)regexp') # => /(?i)regexp/
-      #
-      def regexp(); REGEXP; end
-      regexp_block = lambda do |input|
-        input = Regexp.new(input) if input.kind_of?(String)
-        validate(input, [Regexp])
-      end
-      REGEXP = regexp_block
-      
-      # Same as regexp but allows nil. Note the special
-      # behavior of the nil string '~' -- rather than
-      # being converted to a regexp, it is processed as 
-      # nil to be consistent with the other [class]_or_nil
-      # methods.
-      #
-      #   regexp_or_nil.call('~')   # => nil
-      #   regexp_or_nil.call(nil)   # => nil
-      def regexp_or_nil(); REGEXP_OR_NIL; end
-      regexp_or_nil_block = lambda do |input|
-        input = case input
-        when nil, '~' then nil
-        when String then Regexp.new(input)
-        else input
-        end
-        
-        validate(input, [Regexp, nil])
-      end
-      REGEXP_OR_NIL = regexp_or_nil_block
-      
-      # Returns a block that checks the input is a range.
-      # String inputs are split into a beginning and
-      # end if possible, where each part is loaded as
-      # yaml before being used to construct a Range.a
-      #
-      #   range.class               # => Proc
-      #   range.call(1..10)         # => 1..10
-      #   range.call('1..10')       # => 1..10
-      #   range.call('a..z')        # => 'a'..'z'
-      #   range.call('-10...10')    # => -10...10
-      #   range.call(nil)           # => ValidationError
-      #   range.call('1.10')        # => ValidationError
-      #   range.call('a....z')      # => ValidationError
-      #
-      def range(); RANGE; end
-      range_block = lambda do |input|
-        if input.kind_of?(String) && input =~ /^([^.]+)(\.{2,3})([^.]+)$/
-          input = Range.new(yamlize($1), yamlize($3), $2.length == 3) 
-        end
-        validate(input, [Range])
-      end
-      RANGE = range_block
-      
-      # Same as range but allows nil:
-      #
-      #   range_or_nil.call('~')    # => nil
-      #   range_or_nil.call(nil)    # => nil
-      def range_or_nil(); RANGE_OR_NIL; end
-      range_or_nil_block = lambda do |input|
-        input = case input
-        when nil, '~' then nil
-        when String
-          if input =~ /^([^.]+)(\.{2,3})([^.]+)$/
-            Range.new(yamlize($1), yamlize($3), $2.length == 3)
-          else
-            input
-          end
-        else input
-        end
-        
-        validate(input, [Range, nil])
-      end
-      RANGE_OR_NIL = range_or_nil_block
-      
-      # Returns a block that checks the input is a Time. String inputs are 
-      # loaded using Time.parse and then converted into times.  Parsed times 
-      # are local unless specified otherwise.
-      #
-      #   time.class               # => Proc
-      #
-      #   now = Time.now
-      #   time.call(now)           # => now
-      #
-      #   time.call('2008-08-08 20:00:00.00 +08:00').getutc.strftime('%Y/%m/%d %H:%M:%S')
-      #   #  => '2008/08/08 12:00:00'
-      #
-      #   time.call('2008-08-08').strftime('%Y/%m/%d %H:%M:%S')
-      #   #  => '2008/08/08 00:00:00'
-      #
-      #   time.call(1)             # => ValidationError
-      #   time.call(nil)           # => ValidationError
-      #
-      # Warning: Time.parse will parse a valid time (Time.now)
-      # even when no time is specified:
-      #
-      #   time.call('str').strftime('%Y/%m/%d %H:%M:%S')      
-      #   # => Time.now.strftime('%Y/%m/%d %H:%M:%S')      
-      #
-      def time()
-        # adding this here is a compromise to lazy-load the parse
-        # method (autoload doesn't work since Time already exists)
-        require 'time' unless Time.respond_to?(:parse)
-        TIME
-      end
-      
-      time_block = lambda do |input|
-        input = Time.parse(input) if input.kind_of?(String)
-        validate(input, [Time])
-      end
-      TIME = time_block
-      
-      # Same as time but allows nil:
-      #
-      #   time_or_nil.call('~')    # => nil
-      #   time_or_nil.call(nil)    # => nil
-      def time_or_nil()
-        # adding this check is a compromise to autoload the parse 
-        # method (autoload doesn't work since Time already exists)
-        require 'time' unless Time.respond_to?(:parse)
-        TIME_OR_NIL
-      end
-      
-      time_or_nil_block = lambda do |input|
-        input = case input
-        when nil, '~' then nil
-        when String then Time.parse(input)
-        else input
-        end
-        
-        validate(input, [Time, nil])
-      end 
-      TIME_OR_NIL = time_or_nil_block
-      
-    end
-  end
-end