radiantcms-couchrest_model 0.1.8 → 0.1.9

data/radiantcms-couchrest_model.gemspec

@@ -2,7 +2,7 @@
 
 Gem::Specification.new do |s|
   s.name = %q{radiantcms-couchrest_model}
-  s.version = "0.1.8"
+  s.version = "0.1.9"
 
   s.required_rubygems_version = Gem::Requirement.new("> 1.3.1") if s.respond_to? :required_rubygems_version=
   s.authors = ["davide-malagoli"]
@@ -2859,6 +2859,17 @@ a general purpose content managment system--not merely a blogging engine.}
 "vendor/radius/CHANGELOG",
 "vendor/radius/lib",
 "vendor/radius/lib/radius19.rb",
+"vendor/radius/lib/radius/errors.rb",
+"vendor/radius/lib/radius/context.rb",
+"vendor/radius/lib/radius/dostruct.rb",
+"vendor/radius/lib/radius/parser.rb",
+"vendor/radius/lib/radius/parsetag.rb",
+"vendor/radius/lib/radius/tagbinding.rb",
+"vendor/radius/lib/radius/tagdefs.rb",
+"vendor/radius/lib/radius/util.rb",
+"vendor/radius/lib/radius/parser/",
+"vendor/radius/lib/radius/parser/scan.rb",
+"vendor/radius/lib/radius/parser/scan.rl",
 "vendor/radius/README",
 "vendor/radius/test",
 "vendor/radius/test/context_test.rb",

data/vendor/radius/lib/radius/context.rb

@@ -0,0 +1,139 @@
+module Radius
+  #
+  # A context contains the tag definitions which are available for use in a template.
+  # See the QUICKSTART[link:files/QUICKSTART.html] for a detailed explaination its
+  # usage.
+  #
+  class Context
+    # A hash of tag definition blocks that define tags accessible on a Context.
+    attr_accessor :definitions # :nodoc:
+    attr_accessor :globals # :nodoc:
+
+    # Creates a new Context object.
+    def initialize(&block)
+      @definitions = {}
+      @tag_binding_stack = []
+      @globals = DelegatingOpenStruct.new
+      with(&block) if block_given?
+    end
+
+    # Yeild an instance of self for tag definitions:
+    #
+    #   context.with do |c|
+    #     c.define_tag 'test' do
+    #       'test'
+    #     end
+    #   end
+    #
+    def with
+      yield self
+      self
+    end
+
+    # Creates a tag definition on a context. Several options are available to you
+    # when creating a tag:
+    #
+    # +for+::             Specifies an object that the tag is in reference to. This is
+    #                     applicable when a block is not passed to the tag, or when the
+    #                     +expose+ option is also used.
+    #
+    # +expose+::          Specifies that child tags should be set for each of the methods
+    #                     contained in this option. May be either a single symbol/string or
+    #                     an array of symbols/strings.
+    #
+    # +attributes+::      Specifies whether or not attributes should be exposed
+    #                     automatically. Useful for ActiveRecord objects. Boolean. Defaults
+    #                     to +true+.
+    #
+    def define_tag(name, options = {}, &block)
+      type = Util.impartial_hash_delete(options, :type).to_s
+      klass = Util.constantize('Radius::TagDefinitions::' + Util.camelize(type) + 'TagFactory') rescue raise(ArgumentError.new("Undefined type `#{type}' in options hash"))
+      klass.new(self).define_tag(name, options, &block)
+    end
+
+    # Returns the value of a rendered tag. Used internally by Parser#parse.
+    def render_tag(name, attributes = {}, &block)
+      if name =~ /^(.+?):(.+)$/
+        render_tag($1) { render_tag($2, attributes, &block) }
+      else
+        tag_definition_block = @definitions[qualified_tag_name(name.to_s)]
+        if tag_definition_block
+          stack(name, attributes, block) do |tag|
+            tag_definition_block.call(tag).to_s
+          end
+        else
+          tag_missing(name, attributes, &block)
+        end
+      end
+    end
+
+    # Like method_missing for objects, but fired when a tag is undefined.
+    # Override in your own Context to change what happens when a tag is
+    # undefined. By default this method raises an UndefinedTagError.
+    def tag_missing(name, attributes, &block)
+      raise UndefinedTagError.new(name)
+    end
+
+    # Returns the state of the current render stack. Useful from inside
+    # a tag definition. Normally just use TagBinding#nesting.
+    def current_nesting
+      @tag_binding_stack.collect { |tag| tag.name }.join(':')
+    end
+
+    private
+
+    # A convienence method for managing the various parts of the
+    # tag binding stack.
+    def stack(name, attributes, block)
+      previous = @tag_binding_stack.last
+      previous_locals = previous.nil? ? @globals : previous.locals
+      locals = DelegatingOpenStruct.new(previous_locals)
+      binding = TagBinding.new(self, locals, name, attributes, block)
+      @tag_binding_stack.push(binding)
+      result = yield(binding)
+      @tag_binding_stack.pop
+      result
+    end
+
+    # Returns a fully qualified tag name based on state of the
+    # tag binding stack.
+    def qualified_tag_name(name)
+      nesting_parts = @tag_binding_stack.collect { |tag| tag.name }
+      nesting_parts << name unless nesting_parts.last == name
+      specific_name = nesting_parts.join(':') # specific_name always has the highest specificity
+      unless @definitions.has_key? specific_name
+        possible_matches = @definitions.keys.grep(/(^|:)#{name}$/)
+        specificity = possible_matches.inject({}) { |hash, tag| hash[numeric_specificity(tag, nesting_parts)] = tag; hash }
+        max = specificity.keys.max
+        if max != 0
+          specificity[max]
+        else
+          name
+        end
+      else
+        specific_name
+      end
+    end
+
+    # Returns the specificity for +tag_name+ at nesting defined
+    # by +nesting_parts+ as a number.
+    def numeric_specificity(tag_name, nesting_parts)
+      nesting_parts = nesting_parts.dup
+      name_parts = tag_name.split(':')
+      specificity = 0
+      value = 1
+      if nesting_parts.last == name_parts.last
+        while nesting_parts.size > 0
+          if nesting_parts.last == name_parts.last
+            specificity += value
+            name_parts.pop
+          end
+          nesting_parts.pop
+          value *= 0.1
+        end
+        specificity = 0 if (name_parts.size > 0)
+      end
+      specificity
+    end
+  end
+end

data/vendor/radius/lib/radius/dostruct.rb

@@ -0,0 +1,31 @@
+module Radius
+  class DelegatingOpenStruct # :nodoc:
+    attr_accessor :object
+
+    def initialize(object = nil)
+      @object = object
+      @hash = {}
+    end
+
+    def method_missing(method, *args, &block)
+      symbol = (method.to_s =~ /^(.*?)=$/) ? $1.intern : method
+      if (0..1).include?(args.size)
+        if args.size == 1
+          @hash[symbol] = args.first
+        else
+          if @hash.has_key?(symbol)
+            @hash[symbol]
+          else
+            unless object.nil?
+              @object.send(method, *args, &block)
+            else
+              nil
+            end
+          end
+        end
+      else
+        super
+      end
+    end
+  end
+end

data/vendor/radius/lib/radius/errors.rb

@@ -0,0 +1,24 @@
+module Radius
+
+  # Abstract base class for all parsing errors.
+  class ParseError < StandardError
+  end
+
+  # Occurs when Parser cannot find an end tag for a given tag in a template or when
+  # tags are miss-matched in a template.
+  class MissingEndTagError < ParseError
+    # Create a new MissingEndTagError object for +tag_name+.
+    def initialize(tag_name)
+      super("end tag not found for start tag `#{tag_name}'")
+    end
+  end
+
+  # Occurs when Context#render_tag cannot find the specified tag on a Context.
+  class UndefinedTagError < ParseError
+    # Create a new UndefinedTagError object for +tag_name+.
+    def initialize(tag_name)
+      super("undefined tag `#{tag_name}'")
+    end
+  end
+
+end

data/vendor/radius/lib/radius/parser.rb

@@ -0,0 +1,95 @@
+module Radius
+  #
+  # The Radius parser. Initialize a parser with a Context object that
+  # defines how tags should be expanded. See the QUICKSTART[link:files/QUICKSTART.html]
+  # for a detailed explaination of its usage.
+  #
+  class Parser
+    # The Context object used to expand template tags.
+    attr_accessor :context
+
+    # The string that prefixes all tags that are expanded by a parser
+    # (the part in the tag name before the first colon).
+    attr_accessor :tag_prefix
+
+    # Creates a new parser object initialized with a Context.
+    def initialize(context = Context.new, options = {})
+      if context.kind_of?(Hash) and options.empty?
+        options = context
+        context = options[:context] || options['context'] || Context.new
+      end
+      options = Util.symbolize_keys(options)
+      @context = context
+      @tag_prefix = options[:tag_prefix]
+    end
+
+    # Parses string for tags, expands them, and returns the result.
+    def parse(string)
+      @stack = [ParseContainerTag.new { |t| Util.recurring_array_to_s(t.contents) }]
+      pre_parse(string)
+      @stack.last.to_s
+    end
+
+    protected
+
+    def pre_parse(text) # :nodoc:
+      re = %r{<#{@tag_prefix}:([\w:]+?)(\s+(?:\w+\s*=\s*(?:"[^"]*?"|'[^']*?')\s*)*|)>|</#{@tag_prefix}:([\w:]+?)\s*>}
+      if md = re.match(text)
+        start_tag, attr, end_tag = $1, $2, $3
+        @stack.last.contents << ParseTag.new { parse_individual(md.pre_match) }
+        remaining = md.post_match
+        if start_tag
+          parse_start_tag(start_tag, attr, remaining)
+        else
+          parse_end_tag(end_tag, remaining)
+        end
+      else
+        if @stack.length == 1
+          @stack.last.contents << ParseTag.new { parse_individual(text) }
+        else
+          raise MissingEndTagError.new(@stack.last.name)
+        end
+      end
+    end
+
+    def parse_start_tag(start_tag, attr, remaining) # :nodoc:
+      @stack.push(ParseContainerTag.new(start_tag, parse_attributes(attr)))
+      pre_parse(remaining)
+    end
+
+    def parse_end_tag(end_tag, remaining) # :nodoc:
+      popped = @stack.pop
+      if popped.name == end_tag
+        popped.on_parse do |t|
+          @context.render_tag(popped.name, popped.attributes) { Util.recurring_array_to_s(t.contents) }
+        end
+        tag = @stack.last
+        tag.contents << popped
+        pre_parse(remaining)
+      else
+        raise MissingEndTagError.new(popped.name)
+      end
+    end
+
+    def parse_individual(text) # :nodoc:
+      re = %r{<#{@tag_prefix}:([\w:]+?)(\s+(?:\w+\s*=\s*(?:"[^"]*?"|'[^']*?')\s*)*|)/>}
+      if md = re.match(text)
+        attr = parse_attributes($2)
+        replace = @context.render_tag($1, attr)
+        md.pre_match + replace + parse_individual(md.post_match)
+      else
+        text || ''
+      end
+    end
+
+    def parse_attributes(text) # :nodoc:
+      attr = {}
+      re = /(\w+?)\s*=\s*('|")(.*?)\2/
+      while md = re.match(text)
+        attr[$1] = $3
+        text = md.post_match
+      end
+      attr
+    end
+  end
+end

data/vendor/radius/lib/radius/parser/scan.rb

@@ -0,0 +1,678 @@
+
+# line 1 "scan.rl"
+
+# line 84 "scan.rl"
+
+
+module Radius
+  class Scanner
+    def self.operate(prefix, data)
+      buf = ""
+      csel = ""
+      @prematch = ''
+      @starttag = nil
+      @attrs = {}
+      @flavor = :tasteless
+      @cursor = 0
+      @tagstart = 0
+      @nodes = ['']
+      remainder = data.dup
+
+      until remainder.length == 0
+        p = perform_parse(prefix, remainder)
+        remainder = remainder[p..-1]
+      end
+
+      return @nodes
+    end
+    
+    private
+    def self.perform_parse(prefix, data)
+      stack = []
+      p = 0
+      ts = 0
+      te = 0
+      act = 0
+      eof = data.length
+      
+      @prefix = prefix
+      
+# line 41 "scan.rb"
+class << self
+	attr_accessor :_parser_actions
+	private :_parser_actions, :_parser_actions=
+end
+self._parser_actions = [
+	0, 1, 0, 1, 1, 1, 2, 1, 
+	3, 1, 4, 1, 5, 1, 6, 1, 
+	7, 1, 8, 1, 9, 1, 13, 1, 
+	14, 1, 18, 1, 20, 1, 21, 1, 
+	22, 2, 4, 5, 2, 5, 6, 2, 
+	8, 4, 2, 8, 9, 2, 9, 8, 
+	2, 10, 19, 2, 11, 19, 2, 12, 
+	19, 2, 15, 16, 2, 15, 17, 3, 
+	4, 5, 6, 3, 8, 4, 5, 3, 
+	15, 5, 16, 4, 8, 4, 5, 6, 
+	4, 15, 4, 5, 16, 5, 15, 8, 
+	4, 5, 16
+]
+
+class << self
+	attr_accessor :_parser_key_offsets
+	private :_parser_key_offsets, :_parser_key_offsets=
+end
+self._parser_key_offsets = [
+	0, 0, 11, 21, 34, 47, 61, 65, 
+	70, 72, 74, 87, 100, 101, 103, 118, 
+	133, 149, 155, 161, 176, 179, 182, 185, 
+	200, 202, 204, 219, 235, 241, 247, 250, 
+	253, 269, 285, 302, 309, 315, 331, 335, 
+	351, 366, 369, 371, 381, 392, 402, 416, 
+	420, 420, 421, 430, 430, 430, 432, 434, 
+	437, 440, 442, 444
+]
+
+class << self
+	attr_accessor :_parser_trans_keys
+	private :_parser_trans_keys, :_parser_trans_keys=
+end
+self._parser_trans_keys = [
+	58, 63, 95, 45, 46, 48, 57, 65, 
+	90, 97, 122, 63, 95, 45, 46, 48, 
+	58, 65, 90, 97, 122, 32, 47, 62, 
+	63, 95, 9, 13, 45, 58, 65, 90, 
+	97, 122, 32, 47, 62, 63, 95, 9, 
+	13, 45, 58, 65, 90, 97, 122, 32, 
+	61, 63, 95, 9, 13, 45, 46, 48, 
+	58, 65, 90, 97, 122, 32, 61, 9, 
+	13, 32, 34, 39, 9, 13, 34, 92, 
+	34, 92, 32, 47, 62, 63, 95, 9, 
+	13, 45, 58, 65, 90, 97, 122, 32, 
+	47, 62, 63, 95, 9, 13, 45, 58, 
+	65, 90, 97, 122, 62, 34, 92, 32, 
+	34, 47, 62, 63, 92, 95, 9, 13, 
+	45, 58, 65, 90, 97, 122, 32, 34, 
+	47, 62, 63, 92, 95, 9, 13, 45, 
+	58, 65, 90, 97, 122, 32, 34, 61, 
+	63, 92, 95, 9, 13, 45, 46, 48, 
+	58, 65, 90, 97, 122, 32, 34, 61, 
+	92, 9, 13, 32, 34, 39, 92, 9, 
+	13, 32, 34, 47, 62, 63, 92, 95, 
+	9, 13, 45, 58, 65, 90, 97, 122, 
+	34, 62, 92, 34, 39, 92, 34, 39, 
+	92, 32, 39, 47, 62, 63, 92, 95, 
+	9, 13, 45, 58, 65, 90, 97, 122, 
+	39, 92, 39, 92, 32, 39, 47, 62, 
+	63, 92, 95, 9, 13, 45, 58, 65, 
+	90, 97, 122, 32, 39, 61, 63, 92, 
+	95, 9, 13, 45, 46, 48, 58, 65, 
+	90, 97, 122, 32, 39, 61, 92, 9, 
+	13, 32, 34, 39, 92, 9, 13, 34, 
+	39, 92, 34, 39, 92, 32, 34, 39, 
+	47, 62, 63, 92, 95, 9, 13, 45, 
+	58, 65, 90, 97, 122, 32, 34, 39, 
+	47, 62, 63, 92, 95, 9, 13, 45, 
+	58, 65, 90, 97, 122, 32, 34, 39, 
+	61, 63, 92, 95, 9, 13, 45, 46, 
+	48, 58, 65, 90, 97, 122, 32, 34, 
+	39, 61, 92, 9, 13, 32, 34, 39, 
+	92, 9, 13, 32, 34, 39, 47, 62, 
+	63, 92, 95, 9, 13, 45, 58, 65, 
+	90, 97, 122, 34, 39, 62, 92, 32, 
+	34, 39, 47, 62, 63, 92, 95, 9, 
+	13, 45, 58, 65, 90, 97, 122, 32, 
+	39, 47, 62, 63, 92, 95, 9, 13, 
+	45, 58, 65, 90, 97, 122, 39, 62, 
+	92, 39, 92, 63, 95, 45, 46, 48, 
+	57, 65, 90, 97, 122, 58, 63, 95, 
+	45, 46, 48, 57, 65, 90, 97, 122, 
+	63, 95, 45, 46, 48, 58, 65, 90, 
+	97, 122, 32, 62, 63, 95, 9, 13, 
+	45, 46, 48, 58, 65, 90, 97, 122, 
+	32, 62, 9, 13, 60, 47, 63, 95, 
+	45, 57, 65, 90, 97, 122, 34, 92, 
+	34, 92, 34, 39, 92, 34, 39, 92, 
+	39, 92, 39, 92, 0
+]
+
+class << self
+	attr_accessor :_parser_single_lengths
+	private :_parser_single_lengths, :_parser_single_lengths=
+end
+self._parser_single_lengths = [
+	0, 3, 2, 5, 5, 4, 2, 3, 
+	2, 2, 5, 5, 1, 2, 7, 7, 
+	6, 4, 4, 7, 3, 3, 3, 7, 
+	2, 2, 7, 6, 4, 4, 3, 3, 
+	8, 8, 7, 5, 4, 8, 4, 8, 
+	7, 3, 2, 2, 3, 2, 4, 2, 
+	0, 1, 3, 0, 0, 2, 2, 3, 
+	3, 2, 2, 0
+]
+
+class << self
+	attr_accessor :_parser_range_lengths
+	private :_parser_range_lengths, :_parser_range_lengths=
+end
+self._parser_range_lengths = [
+	0, 4, 4, 4, 4, 5, 1, 1, 
+	0, 0, 4, 4, 0, 0, 4, 4, 
+	5, 1, 1, 4, 0, 0, 0, 4, 
+	0, 0, 4, 5, 1, 1, 0, 0, 
+	4, 4, 5, 1, 1, 4, 0, 4, 
+	4, 0, 0, 4, 4, 4, 5, 1, 
+	0, 0, 3, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0
+]
+
+class << self
+	attr_accessor :_parser_index_offsets
+	private :_parser_index_offsets, :_parser_index_offsets=
+end
+self._parser_index_offsets = [
+	0, 0, 8, 15, 25, 35, 45, 49, 
+	54, 57, 60, 70, 80, 82, 85, 97, 
+	109, 121, 127, 133, 145, 149, 153, 157, 
+	169, 172, 175, 187, 199, 205, 211, 215, 
+	219, 232, 245, 258, 265, 271, 284, 289, 
+	302, 314, 318, 321, 328, 336, 343, 353, 
+	357, 358, 360, 367, 368, 369, 372, 375, 
+	379, 383, 386, 389
+]
+
+class << self
+	attr_accessor :_parser_indicies
+	private :_parser_indicies, :_parser_indicies=
+end
+self._parser_indicies = [
+	2, 1, 1, 1, 1, 1, 1, 0, 
+	3, 3, 3, 3, 3, 3, 0, 4, 
+	6, 7, 5, 5, 4, 5, 5, 5, 
+	0, 8, 10, 11, 9, 9, 8, 9, 
+	9, 9, 0, 13, 15, 14, 14, 13, 
+	14, 14, 14, 14, 12, 16, 17, 16, 
+	12, 17, 18, 19, 17, 12, 21, 22, 
+	20, 24, 25, 23, 26, 28, 29, 27, 
+	27, 26, 27, 27, 27, 12, 30, 32, 
+	33, 31, 31, 30, 31, 31, 31, 12, 
+	34, 12, 35, 25, 23, 36, 24, 38, 
+	39, 37, 25, 37, 36, 37, 37, 37, 
+	23, 40, 24, 42, 43, 41, 25, 41, 
+	40, 41, 41, 41, 23, 44, 24, 46, 
+	45, 25, 45, 44, 45, 45, 45, 45, 
+	23, 47, 24, 48, 25, 47, 23, 48, 
+	49, 50, 25, 48, 23, 51, 21, 53, 
+	54, 52, 22, 52, 51, 52, 52, 52, 
+	20, 24, 55, 25, 23, 57, 58, 59, 
+	56, 61, 35, 62, 60, 64, 24, 66, 
+	67, 65, 68, 65, 64, 65, 65, 65, 
+	63, 24, 68, 63, 61, 68, 63, 69, 
+	24, 71, 72, 70, 68, 70, 69, 70, 
+	70, 70, 63, 73, 24, 75, 74, 68, 
+	74, 73, 74, 74, 74, 74, 63, 76, 
+	24, 77, 68, 76, 63, 77, 78, 79, 
+	68, 77, 63, 80, 58, 59, 56, 81, 
+	81, 62, 60, 82, 61, 35, 84, 85, 
+	83, 62, 83, 82, 83, 83, 83, 60, 
+	86, 61, 35, 88, 89, 87, 62, 87, 
+	86, 87, 87, 87, 60, 90, 61, 35, 
+	92, 91, 62, 91, 90, 91, 91, 91, 
+	91, 60, 93, 61, 35, 94, 62, 93, 
+	60, 94, 95, 96, 62, 94, 60, 97, 
+	80, 58, 99, 100, 98, 59, 98, 97, 
+	98, 98, 98, 56, 61, 35, 101, 62, 
+	60, 97, 57, 58, 99, 100, 98, 59, 
+	98, 97, 98, 98, 98, 56, 103, 21, 
+	105, 106, 104, 107, 104, 103, 104, 104, 
+	104, 102, 24, 108, 68, 63, 21, 107, 
+	102, 109, 109, 109, 109, 109, 109, 0, 
+	111, 110, 110, 110, 110, 110, 110, 0, 
+	112, 112, 112, 112, 112, 112, 0, 113, 
+	115, 114, 114, 113, 114, 114, 114, 114, 
+	0, 116, 117, 116, 0, 118, 120, 119, 
+	123, 122, 122, 122, 122, 122, 121, 124, 
+	125, 24, 25, 23, 24, 25, 23, 61, 
+	35, 62, 60, 61, 35, 62, 60, 24, 
+	68, 63, 24, 68, 63, 126, 0
+]
+
+class << self
+	attr_accessor :_parser_trans_targs
+	private :_parser_trans_targs, :_parser_trans_targs=
+end
+self._parser_trans_targs = [
+	49, 1, 2, 3, 4, 3, 12, 52, 
+	4, 5, 12, 52, 49, 6, 5, 7, 
+	6, 7, 8, 42, 9, 10, 13, 9, 
+	10, 13, 11, 5, 12, 52, 11, 5, 
+	12, 52, 51, 14, 15, 16, 20, 54, 
+	15, 16, 20, 54, 17, 16, 18, 17, 
+	18, 19, 21, 15, 16, 20, 54, 53, 
+	22, 23, 14, 31, 22, 23, 31, 24, 
+	26, 27, 41, 58, 25, 26, 27, 41, 
+	58, 28, 27, 29, 28, 29, 30, 40, 
+	23, 32, 33, 34, 38, 56, 33, 34, 
+	38, 56, 35, 34, 36, 35, 36, 37, 
+	39, 33, 34, 38, 56, 55, 24, 26, 
+	27, 41, 58, 25, 57, 44, 44, 45, 
+	46, 47, 46, 59, 47, 59, 0, 49, 
+	50, 49, 1, 43, 49, 49, 49
+]
+
+class << self
+	attr_accessor :_parser_trans_actions
+	private :_parser_trans_actions, :_parser_trans_actions=
+end
+self._parser_trans_actions = [
+	29, 0, 3, 5, 7, 0, 7, 7, 
+	0, 13, 0, 0, 31, 15, 0, 15, 
+	0, 0, 0, 0, 17, 42, 17, 0, 
+	19, 0, 9, 63, 33, 33, 0, 36, 
+	11, 11, 0, 19, 9, 63, 33, 80, 
+	0, 36, 11, 71, 15, 0, 15, 0, 
+	0, 19, 0, 39, 75, 67, 85, 57, 
+	17, 45, 42, 17, 0, 19, 0, 0, 
+	9, 63, 33, 80, 0, 0, 36, 11, 
+	71, 15, 0, 15, 0, 0, 0, 19, 
+	42, 19, 9, 63, 33, 80, 0, 36, 
+	11, 71, 15, 0, 15, 0, 0, 19, 
+	19, 39, 75, 67, 85, 57, 17, 39, 
+	75, 67, 85, 17, 57, 1, 0, 3, 
+	5, 7, 0, 7, 0, 0, 0, 25, 
+	60, 27, 1, 0, 51, 48, 54
+]
+
+class << self
+	attr_accessor :_parser_to_state_actions
+	private :_parser_to_state_actions, :_parser_to_state_actions=
+end
+self._parser_to_state_actions = [
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	21, 21, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0
+]
+
+class << self
+	attr_accessor :_parser_from_state_actions
+	private :_parser_from_state_actions, :_parser_from_state_actions=
+end
+self._parser_from_state_actions = [
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0, 0, 0, 0, 0, 
+	0, 23, 0, 0, 0, 0, 0, 0, 
+	0, 0, 0, 0
+]
+
+class << self
+	attr_accessor :_parser_eof_trans
+	private :_parser_eof_trans, :_parser_eof_trans=
+end
+self._parser_eof_trans = [
+	0, 1, 1, 1, 1, 13, 13, 13, 
+	13, 13, 13, 13, 13, 13, 13, 13, 
+	13, 13, 13, 13, 13, 13, 13, 13, 
+	13, 13, 13, 13, 13, 13, 13, 13, 
+	13, 13, 13, 13, 13, 13, 13, 13, 
+	13, 13, 13, 1, 1, 1, 1, 1, 
+	0, 0, 122, 125, 126, 125, 126, 125, 
+	126, 125, 126, 127
+]
+
+class << self
+	attr_accessor :parser_start
+end
+self.parser_start = 49;
+class << self
+	attr_accessor :parser_first_final
+end
+self.parser_first_final = 49;
+class << self
+	attr_accessor :parser_error
+end
+self.parser_error = 0;
+
+class << self
+	attr_accessor :parser_en_Closeout
+end
+self.parser_en_Closeout = 48;
+class << self
+	attr_accessor :parser_en_main
+end
+self.parser_en_main = 49;
+
+
+# line 119 "scan.rl"
+      
+# line 356 "scan.rb"
+begin
+	p ||= 0
+	pe ||= data.length
+	cs = parser_start
+	ts = nil
+	te = nil
+	act = 0
+end
+
+# line 120 "scan.rl"
+      
+# line 368 "scan.rb"
+begin
+	_klen, _trans, _keys, _acts, _nacts = nil
+	_goto_level = 0
+	_resume = 10
+	_eof_trans = 15
+	_again = 20
+	_test_eof = 30
+	_out = 40
+	while true
+	_trigger_goto = false
+	if _goto_level <= 0
+	if p == pe
+		_goto_level = _test_eof
+		next
+	end
+	if cs == 0
+		_goto_level = _out
+		next
+	end
+	end
+	if _goto_level <= _resume
+	_acts = _parser_from_state_actions[cs]
+	_nacts = _parser_actions[_acts]
+	_acts += 1
+	while _nacts > 0
+		_nacts -= 1
+		_acts += 1
+		case _parser_actions[_acts - 1]
+			when 14 then
+# line 1 "NONE"
+		begin
+ts = p
+		end
+# line 402 "scan.rb"
+		end # from state action switch
+	end
+	if _trigger_goto
+		next
+	end
+	_keys = _parser_key_offsets[cs]
+	_trans = _parser_index_offsets[cs]
+	_klen = _parser_single_lengths[cs]
+	_break_match = false
+	
+	begin
+	  if _klen > 0
+	     _lower = _keys
+	     _upper = _keys + _klen - 1
+
+	     loop do
+	        break if _upper < _lower
+	        _mid = _lower + ( (_upper - _lower) >> 1 )
+
+	        if data[p] < _parser_trans_keys[_mid]
+	           _upper = _mid - 1
+	        elsif data[p] > _parser_trans_keys[_mid]
+	           _lower = _mid + 1
+	        else
+	           _trans += (_mid - _keys)
+	           _break_match = true
+	           break
+	        end
+	     end # loop
+	     break if _break_match
+	     _keys += _klen
+	     _trans += _klen
+	  end
+	  _klen = _parser_range_lengths[cs]
+	  if _klen > 0
+	     _lower = _keys
+	     _upper = _keys + (_klen << 1) - 2
+	     loop do
+	        break if _upper < _lower
+	        _mid = _lower + (((_upper-_lower) >> 1) & ~1)
+	        if data[p] < _parser_trans_keys[_mid]
+	          _upper = _mid - 2
+	        elsif data[p] > _parser_trans_keys[_mid+1]
+	          _lower = _mid + 2
+	        else
+	          _trans += ((_mid - _keys) >> 1)
+	          _break_match = true
+	          break
+	        end
+	     end # loop
+	     break if _break_match
+	     _trans += _klen
+	  end
+	end while false
+	_trans = _parser_indicies[_trans]
+	end
+	if _goto_level <= _eof_trans
+	cs = _parser_trans_targs[_trans]
+	if _parser_trans_actions[_trans] != 0
+		_acts = _parser_trans_actions[_trans]
+		_nacts = _parser_actions[_acts]
+		_acts += 1
+		while _nacts > 0
+			_nacts -= 1
+			_acts += 1
+			case _parser_actions[_acts - 1]
+when 0 then
+# line 5 "scan.rl"
+		begin
+ mark_pfx = p 		end
+when 1 then
+# line 6 "scan.rl"
+		begin
+
+	  if data[mark_pfx..p-1] != @prefix
+	    closing = data[mark_pfx-1,1] == '/'
+	    @nodes.last << data[mark_pfx-(closing ? 2 : 1)..p]
+	    	begin
+		p += 1
+		_trigger_goto = true
+		_goto_level = _out
+		break
+	end
+
+    end
+			end
+when 2 then
+# line 13 "scan.rl"
+		begin
+ mark_stg = p 		end
+when 3 then
+# line 14 "scan.rl"
+		begin
+ @starttag = data[mark_stg..p-1] 		end
+when 4 then
+# line 15 "scan.rl"
+		begin
+ mark_attr = p 		end
+when 5 then
+# line 16 "scan.rl"
+		begin
+
+	  @attrs[@nat] = @vat 
+			end
+when 6 then
+# line 25 "scan.rl"
+		begin
+ mark_nat = p 		end
+when 7 then
+# line 26 "scan.rl"
+		begin
+ @nat = data[mark_nat..p-1] 		end
+when 8 then
+# line 27 "scan.rl"
+		begin
+ mark_vat = p 		end
+when 9 then
+# line 28 "scan.rl"
+		begin
+ @vat = data[mark_vat..p-1] 		end
+when 10 then
+# line 30 "scan.rl"
+		begin
+ @flavor = :open 		end
+when 11 then
+# line 31 "scan.rl"
+		begin
+ @flavor = :self 		end
+when 12 then
+# line 32 "scan.rl"
+		begin
+ @flavor = :close 		end
+when 15 then
+# line 1 "NONE"
+		begin
+te = p+1
+		end
+when 16 then
+# line 70 "scan.rl"
+		begin
+act = 1;		end
+when 17 then
+# line 79 "scan.rl"
+		begin
+act = 2;		end
+when 18 then
+# line 79 "scan.rl"
+		begin
+te = p+1
+ begin 
+	    @nodes.last << data[p]
+	    @tagstart = p
+	   end
+		end
+when 19 then
+# line 70 "scan.rl"
+		begin
+te = p
+p = p - 1; begin 
+	    tag = {:prefix=>@prefix, :name=>@starttag, :flavor => @flavor, :attrs => @attrs}
+	    @prefix = nil
+	    @name = nil
+	    @flavor = :tasteless
+	    @attrs = {}
+	    @nodes << tag << ''
+      	begin
+		p += 1
+		_trigger_goto = true
+		_goto_level = _out
+		break
+	end
+
+	   end
+		end
+when 20 then
+# line 79 "scan.rl"
+		begin
+te = p
+p = p - 1; begin 
+	    @nodes.last << data[p]
+	    @tagstart = p
+	   end
+		end
+when 21 then
+# line 79 "scan.rl"
+		begin
+ begin p = ((te))-1; end
+ begin 
+	    @nodes.last << data[p]
+	    @tagstart = p
+	   end
+		end
+when 22 then
+# line 1 "NONE"
+		begin
+	case act
+	when 1 then
+	begin begin p = ((te))-1; end
+
+	    tag = {:prefix=>@prefix, :name=>@starttag, :flavor => @flavor, :attrs => @attrs}
+	    @prefix = nil
+	    @name = nil
+	    @flavor = :tasteless
+	    @attrs = {}
+	    @nodes << tag << ''
+      	begin
+		p += 1
+		_trigger_goto = true
+		_goto_level = _out
+		break
+	end
+
+	  end
+	when 2 then
+	begin begin p = ((te))-1; end
+
+	    @nodes.last << data[p]
+	    @tagstart = p
+	  end
+end 
+			end
+# line 624 "scan.rb"
+			end # action switch
+		end
+	end
+	if _trigger_goto
+		next
+	end
+	end
+	if _goto_level <= _again
+	_acts = _parser_to_state_actions[cs]
+	_nacts = _parser_actions[_acts]
+	_acts += 1
+	while _nacts > 0
+		_nacts -= 1
+		_acts += 1
+		case _parser_actions[_acts - 1]
+when 13 then
+# line 1 "NONE"
+		begin
+ts = nil;		end
+# line 644 "scan.rb"
+		end # to state action switch
+	end
+	if _trigger_goto
+		next
+	end
+	if cs == 0
+		_goto_level = _out
+		next
+	end
+	p += 1
+	if p != pe
+		_goto_level = _resume
+		next
+	end
+	end
+	if _goto_level <= _test_eof
+	if p == eof
+	if _parser_eof_trans[cs] > 0
+		_trans = _parser_eof_trans[cs] - 1;
+		_goto_level = _eof_trans
+		next;
+	end
+end
+	end
+	if _goto_level <= _out
+		break
+	end
+	end
+	end
+
+# line 121 "scan.rl"
+      return p
+    end
+  end
+end

data/vendor/radius/lib/radius/parser/scan.rl

@@ -0,0 +1,124 @@
+%%{
+	machine parser;
+	
+	
+	action _prefix { mark_pfx = p }
+	action prefix {
+	  if data[mark_pfx..p-1] != @prefix
+	    closing = data[mark_pfx-1,1] == '/'
+	    @nodes.last << data[mark_pfx-(closing ? 2 : 1)..p]
+	    fbreak;
+    end
+	}
+	action _starttag { mark_stg = p }
+	action starttag { @starttag = data[mark_stg..p-1] }
+	action _attr { mark_attr = p }
+	action attr {
+	  @attrs[@nat] = @vat 
+	}
+	
+	action prematch {
+	  @prematch_end = p
+	  @prematch = data[0..p] if p > 0
+	}
+	
+	action _nameattr { mark_nat = p }
+	action nameattr { @nat = data[mark_nat..p-1] }
+	action _valattr { mark_vat = p }
+	action valattr { @vat = data[mark_vat..p-1] }
+	
+	action opentag  { @flavor = :open }
+	action selftag  { @flavor = :self }
+	action closetag { @flavor = :close }
+	
+	action stopparse {
+	  @cursor = p;
+	  fbreak;
+	}
+	
+	
+	Closeout := empty;
+	
+	# words
+	PrefixChar = [\-A-Za-z0-9._?] ;
+	NameChar = [\-A-Za-z0-9._:?] ;
+	TagName = NameChar+ >_starttag %starttag;
+	Prefix = PrefixChar+ >_prefix %prefix;
+	
+	Name = Prefix ":" TagName;
+	
+	NameAttr = NameChar+ >_nameattr %nameattr;
+  Q1Char = ( "\\\'" | [^'] ) ;
+  Q1Attr = Q1Char* >_valattr %valattr;
+  Q2Char = ( "\\\"" | [^"] ) ;
+  Q2Attr = Q2Char* >_valattr %valattr;
+ 
+  Attr =  NameAttr space* "=" space* ('"' Q2Attr '"' | "'" Q1Attr "'") space* >_attr %attr;
+  Attrs = (space+ Attr* | empty);
+  
+  CloseTrailer = "/>" %selftag;
+  OpenTrailer = ">" %opentag;
+  
+  Trailer = (OpenTrailer | CloseTrailer);
+  
+	OpenOrSelfTag = Name Attrs? Trailer;
+	CloseTag = "/" Name space* ">" %closetag;
+	
+	SomeTag = '<' (OpenOrSelfTag | CloseTag);
+	
+	main := |*
+	  SomeTag => {
+	    tag = {:prefix=>@prefix, :name=>@starttag, :flavor => @flavor, :attrs => @attrs}
+	    @prefix = nil
+	    @name = nil
+	    @flavor = :tasteless
+	    @attrs = {}
+	    @nodes << tag << ''
+      fbreak;
+	  };
+	  any => {
+	    @nodes.last << data[p]
+	    @tagstart = p
+	  };
+	*|;
+}%%
+
+module Radius
+  class Scanner
+    def self.operate(prefix, data)
+      buf = ""
+      csel = ""
+      @prematch = ''
+      @starttag = nil
+      @attrs = {}
+      @flavor = :tasteless
+      @cursor = 0
+      @tagstart = 0
+      @nodes = ['']
+      remainder = data.dup
+
+      until remainder.length == 0
+        p = perform_parse(prefix, remainder)
+        remainder = remainder[p..-1]
+      end
+
+      return @nodes
+    end
+    
+    private
+    def self.perform_parse(prefix, data)
+      stack = []
+      p = 0
+      ts = 0
+      te = 0
+      act = 0
+      eof = data.length
+      
+      @prefix = prefix
+      %% write data;
+      %% write init;
+      %% write exec;
+      return p
+    end
+  end
+end

data/vendor/radius/lib/radius/parsetag.rb

@@ -0,0 +1,23 @@
+class ParseTag # :nodoc:
+  def initialize(&b)
+    @block = b
+  end
+
+  def on_parse(&b)
+    @block = b
+  end
+
+  def to_s
+    @block.call(self)
+  end
+end
+
+class ParseContainerTag < ParseTag # :nodoc:
+  attr_accessor :name, :attributes, :contents
+
+  def initialize(name = "", attributes = {}, contents = [], &b)
+    @name, @attributes, @contents = name, attributes, contents
+    super(&b)
+  end
+end
+

data/vendor/radius/lib/radius/tagbinding.rb

@@ -0,0 +1,66 @@
+module Radius
+  #
+  # A tag binding is passed into each tag definition and contains helper methods for working
+  # with tags. Use it to gain access to the attributes that were passed to the tag, to
+  # render the tag contents, and to do other tasks.
+  #
+  class TagBinding
+    # The Context that the TagBinding is associated with. Used internally. Try not to use
+    # this object directly.
+    attr_reader :context
+
+    # The locals object for the current tag.
+    attr_reader :locals
+
+    # The name of the tag (as used in a template string).
+    attr_reader :name
+
+    # The attributes of the tag. Also aliased as TagBinding#attr.
+    attr_reader :attributes
+    alias :attr :attributes
+
+    # The render block. When called expands the contents of the tag. Use TagBinding#expand
+    # instead.
+    attr_reader :block
+
+    # Creates a new TagBinding object.
+    def initialize(context, locals, name, attributes, block)
+      @context, @locals, @name, @attributes, @block = context, locals, name, attributes, block
+    end
+
+    # Evaluates the current tag and returns the rendered contents.
+    def expand
+      double? ? block.call : ''
+    end
+
+    # Returns true if the current tag is a single tag.
+    def single?
+      block.nil?
+    end
+
+    # Returns true if the current tag is a container tag.
+    def double?
+      not single?
+    end
+
+    # The globals object from which all locals objects ultimately inherit their values.
+    def globals
+      @context.globals
+    end
+
+    # Returns a list of the way tags are nested around the current tag as a string.
+    def nesting
+      @context.current_nesting
+    end
+
+    # Fires off Context#tag_missing for the current tag.
+    def missing!
+      @context.tag_missing(name, attributes, &block)
+    end
+
+    # Renders the tag using the current context .
+    def render(tag, attributes = {}, &block)
+      @context.render_tag(tag, attributes, &block)
+    end
+  end
+end

data/vendor/radius/lib/radius/tagdefs.rb

@@ -0,0 +1,78 @@
+module Radius
+  module TagDefinitions # :nodoc:
+    class TagFactory # :nodoc:
+      def initialize(context)
+        @context = context
+      end
+
+      def define_tag(name, options, &block)
+        options = prepare_options(name, options)
+        validate_params(name, options, &block)
+        construct_tag_set(name, options, &block)
+        expose_methods_as_tags(name, options)
+      end
+
+      protected
+
+      # Normalizes options pased to tag definition. Override in decendants to preform
+      # additional normalization.
+      def prepare_options(name, options)
+        options = Util.symbolize_keys(options)
+        options[:expose] = expand_array_option(options[:expose])
+        object = options[:for]
+        options[:attributes] = object.respond_to?(:attributes) unless options.has_key? :attributes
+        options[:expose] += object.attributes.keys if options[:attributes]
+        options
+      end
+
+      # Validates parameters passed to tag definition. Override in decendants to add custom
+      # validations.
+      def validate_params(name, options, &block)
+        unless options.has_key? :for
+          raise ArgumentError.new("tag definition must contain a :for option or a block") unless block
+          raise ArgumentError.new("tag definition must contain a :for option when used with the :expose option") unless options[:expose].empty?
+        end
+      end
+
+      # Adds the tag definition to the context. Override in subclasses to add additional tags
+      # (child tags) when the tag is created.
+      def construct_tag_set(name, options, &block)
+        if block
+          @context.definitions[name.to_s] = block
+        else
+          lp = last_part(name)
+          @context.define_tag(name) do |tag|
+            if tag.single?
+              options[:for]
+            else
+              tag.locals.send("#{ lp }=", options[:for]) unless options[:for].nil?
+              tag.expand
+            end
+          end
+        end
+      end
+
+      # Exposes the methods of an object as child tags.
+      def expose_methods_as_tags(name, options)
+        options[:expose].each do |method|
+          tag_name = "#{name}:#{method}"
+          lp = last_part(name)
+          @context.define_tag(tag_name) do |tag|
+            object = tag.locals.send(lp)
+            object.send(method)
+          end
+        end
+      end
+
+      protected
+
+      def expand_array_option(value)
+        [*value].compact.map { |m| m.to_s.intern }
+      end
+
+      def last_part(name)
+        name.split(':').last
+      end
+    end
+  end
+end

data/vendor/radius/lib/radius/util.rb

@@ -0,0 +1,34 @@
+module Radius
+  module Util # :nodoc:
+    def self.symbolize_keys(hash)
+      new_hash = {}
+      hash.keys.each do |k|
+        new_hash[k.to_s.intern] = hash[k]
+      end
+      new_hash
+    end
+
+    def self.impartial_hash_delete(hash, key)
+      string = key.to_s
+      symbol = string.intern
+      value1 = hash.delete(symbol)
+      value2 = hash.delete(string)
+      value1 || value2
+    end
+
+    def self.constantize(camelized_string)
+      raise "invalid constant name `#{camelized_string}'" unless camelized_string.split('::').all? { |part| part =~ /^[A-Za-z]+$/ }
+      Object.module_eval(camelized_string)
+    end
+
+    def self.camelize(underscored_string)
+      string = ''
+      underscored_string.split('_').each { |part| string << part.capitalize }
+      string
+    end
+
+    def self.recurring_array_to_s(ary)
+      ary.map{|x| x.is_a?(Array) ? recurring_array_to_s(x) : x.to_s }.join
+    end
+  end
+end

metadata

@@ -5,8 +5,8 @@ version: !ruby/object:Gem::Version
   segments: 
   - 0
   - 1
-  - 8
-  version: 0.1.8
+  - 9
+  version: 0.1.9
 platform: ruby
 authors: 
 - davide-malagoli
@@ -2403,6 +2403,16 @@ files:
 - vendor/radius/ROADMAP
 - vendor/radius/CHANGELOG
 - vendor/radius/lib/radius19.rb
+- vendor/radius/lib/radius/errors.rb
+- vendor/radius/lib/radius/context.rb
+- vendor/radius/lib/radius/dostruct.rb
+- vendor/radius/lib/radius/parser.rb
+- vendor/radius/lib/radius/parsetag.rb
+- vendor/radius/lib/radius/tagbinding.rb
+- vendor/radius/lib/radius/tagdefs.rb
+- vendor/radius/lib/radius/util.rb
+- vendor/radius/lib/radius/parser/scan.rb
+- vendor/radius/lib/radius/parser/scan.rl
 - vendor/radius/README
 - vendor/radius/test/context_test.rb
 - vendor/radius/test/dostruct_test.rb