mack-facets 0.8.1 → 0.8.2

data/lib/gems/facets-2.4.5/lib/more/facets/version.rb

@@ -0,0 +1,136 @@
+# = VersionNumber
+#
+# VersionNumber is a simplified form of a Tuple class
+# desgined specifically for dealing with version numbers.
+#
+# == Authors
+#
+# * Thomas Sawyer (7rans)
+#
+# == Todo
+#
+# * Maybe add Kernel method #version ?
+#
+# * If Tuple were standard part of Ruby this probably would
+#   not be needed or at least might be simple sublcass instead.
+#
+# == Copyright
+#
+# Copyright (c) 2005 Thomas Sawyer
+#
+# Ruby License
+#
+# This module is free software. You may use, modify, and/or redistribute this
+# software under the same terms as Ruby.
+#
+# This program is distributed in the hope that it will be useful, but WITHOUT
+# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+# FOR A PARTICULAR PURPOSE.
+
+# = VersionNumber
+#
+# VersionNumber is a simplified form of a Tuple class
+# desgined specifically for dealing with version numbers.
+#
+class VersionNumber #< Tuple
+
+  #include Enumerable
+  include Comparable
+
+  def initialize( *args )
+    args = args.join('.').split(/\W+/)
+    @self = args.collect { |i| i.to_i }
+  end
+
+  def to_s ; @self.join('.') ; end
+
+  # This is here only becuase File.join calls it instead of to_s.
+
+  def to_str ; @self.join('.') ; end
+
+  def inspect
+    @self.to_s
+  end
+
+  def [](i)
+    @self.fetch(i,0)
+  end
+
+  # "Spaceship" comparsion operator.
+
+  def <=>( other )
+    #other = other.to_t
+    [@self.size, other.size].max.times do |i|
+      c = @self[i] <=> other[i]
+      return c if c != 0
+    end
+    0
+  end
+
+  # For pessimistic constraint (like '~>' in gems)
+
+  def =~( other )
+    #other = other.to_t
+    upver = other.dup
+    upver[0] += 1
+    @self >= other and @self < upver
+  end
+
+  # Major is the first number in the version series.
+
+  def major ; @self[0] ; end
+
+  # Minor is the second number in the version series.
+
+  def minor ; @self[1] || 0 ; end
+
+  # Teeny is third number in the version series.
+
+  def teeny ; @self[2] || 0 ; end
+
+  #
+  def bump(which=:teeny)
+    case which
+    when :major
+      self.class.new(major+1)
+    when :minor
+      self.class.new(major, minor+1)
+    when :teeny
+      self.class.new(major, minor, teeny+1)
+    else
+      # ???
+    end
+  end
+
+  # Delegate to the array.
+
+  def method_missing( sym, *args, &blk )
+    @self.send(sym, *args, &blk ) rescue super
+  end
+
+  # Parses a string constraint returning the operation as a lambda.
+
+  def self.constraint_lambda( constraint )
+    op, val = *parse_constraint( constraint )
+    lambda { |t| t.send(op, val) }
+  end
+
+  def self.parse_constraint( constraint )
+    constraint = constraint.strip
+    re = %r{^(=~|~>|<=|>=|==|=|<|>)?\s*(\d+(:?[-.]\d+)*)$}
+    if md = re.match( constraint )
+      if op = md[1]
+        op = '=~' if op == '~>'
+        op = '==' if op == '='
+        val = new( *md[2].split(/\W+/) )
+      else
+        op = '=='
+        val = new( *constraint.split(/\W+/) )
+      end
+    else
+      raise ArgumentError, "invalid constraint"
+    end
+    return op, val
+  end
+
+end

data/lib/gems/facets-2.4.5/lib/more/facets/xmlhash.rb

@@ -0,0 +1,112 @@
+# = XmlHash
+#
+# WARNING: This is a work in progress!!!
+
+#
+module Hash2Xml
+  extend self
+
+  def convert(root, content)
+    convert_tag(root, '*' => content)
+  end
+
+  private
+
+  #
+
+  def convert_tag(tag, node)
+    subn = node.delete('*')
+    atts = node.collect{ |k,v| %[#{k}="#{v}"] }
+    body = convert_body(subn)
+
+    start_tag = "#{tag} #{atts}".strip
+
+    if body.to_s.empty?
+      "<#{start_tag}/>"
+    else
+      "<#{start_tag}>#{body}</#{tag}>"
+    end
+  end
+
+  #
+
+  def convert_body(node)
+    case node
+    when Array
+      node.collect do |subn|
+        convert_body(subn)
+      end
+    when Hash
+      node.collect do |tag, subn|
+        case subn
+        when Hash
+          convert_tag(tag, subn)
+        when Array
+          subn.collect do |e|
+            case e
+            when Hash
+              convert_tag(tag, e)
+            else
+              convert_tag(tag, '*' => e)
+            end
+          end
+        else
+          convert_tag(tag, '*' => subn)
+        end
+      end
+    else
+      node.to_s
+    end
+  end
+
+end
+
+
+class Hash
+
+  def to_xml(root='root')
+    Blow::Hash2Xml.convert(root, self)
+  end
+
+end
+
+
+
+if $0 == __FILE__
+
+  # case 1
+
+  h = { 'a' => 1, 'b' => 2 }
+
+  puts Blow::Hash2Xml.convert('root', h)
+
+  # case 2
+
+  h = { 'a' => [ 1, 2 ], 'b' => 2 }
+
+  puts Blow::Hash2Xml.convert('root', h)
+
+  # case 3
+
+  h = {
+    'a' => [ 'x', 'y' ],
+    'b' => [ '1', '2' ],
+    'c' => [
+      { 'k' => 'hi', '*' => 'fudge' }
+    ]
+  }
+
+  puts Blow::Hash2Xml.convert('root', h)
+
+end
+
+
+
+
+
+
+
+
+
+
+

data/lib/gems/facets-2.4.5/lib/more/facets/xoxo.rb

@@ -0,0 +1,259 @@
+# = XOXO
+#
+# XOXO is a Ruby XOXO parser and generator. It provides
+# a Ruby API similar to Marshal and YAML (though more
+# specific) to load and dump XOXO[http://microformats.org/wiki/xoxo],
+# an simple, open outline format written in standard XHTML and
+# suitable for embedding in (X)HTML, Atom, RSS, and arbitrary XML.
+#
+# == Author
+#
+# * Christian Neukirchen
+#
+# == Thanks
+#
+# Special thanks go to Christian Neukirchen for xoxo.rb.
+#   http://chneukirchen.org/repos/xoxo-rb/.
+#
+# == Copyright
+#
+# Copyright (C) 2006 Christian Neukirchen
+#
+# Ruby License
+#
+# This module is free software. You may use, modify, and/or redistribute this
+# software under the same terms as Ruby.
+#
+# This program is distributed in the hope that it will be useful, but WITHOUT
+# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+# FOR A PARTICULAR PURPOSE.
+
+require 'rexml/parsers/pullparser'
+
+# = XOXO
+#
+# XOXO is a Ruby XOXO parser and generator. It provides
+# a Ruby API similar to Marshal and YAML (though more
+# specific) to load and dump XOXO[http://microformats.org/wiki/xoxo],
+# an simple, open outline format written in standard XHTML and
+# suitable for embedding in (X)HTML, Atom, RSS, and arbitrary XML.
+#
+module XOXO
+
+  # xoxo.rb version number
+  #VERSION = "0.1"
+
+  # Load and return a XOXO structure from the String, IO or StringIO or _xoxo_.
+  #
+  def self.load(xoxo)
+    structs = Parser.new(xoxo).parse.structs
+    while structs.kind_of?(Array) && structs.size == 1
+      structs = structs.first
+    end
+    structs
+  end
+
+  # Return a XOXO string corresponding to the Ruby object +struct+,
+  # translated to the following rules:
+  #
+  # * Arrays become ordered lists <tt><ol></tt>.
+  # * Hashes become definition lists <tt><dl></tt>, keys are
+  #   stringified with +to_s+.
+  # * Everything else becomes stringified with +to_s+ and wrapped in
+  #   appropriate list elements (<tt><li></tt> or <tt><dt></tt>/<tt><dd></tt>).
+  #
+  # Additionally, you can pass these options on the _options_ hash:
+  # <tt>:html_wrap</tt> => +true+:: Wrap the XOXO with a basic XHTML 1.0
+  #                                 Transitional header.
+  # <tt>:css</tt> => _css_::        Reference _css_ as stylesheet for the
+  #                                 wrapped XOXO document.
+  #
+  def self.dump(struct, options={})
+    struct = [struct]  unless struct.kind_of? Array
+
+    if options[:html_wrap]
+      result = <<EOF.strip
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN
+http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml"><head profile=""><meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
+EOF
+      if options[:css]
+        result << %Q[<style type="text/css" >@import "#{options[:css]}";</style>]
+      end
+
+      result << "</head><body>" << make_xoxo(struct, 'xoxo') << "</body></html>"
+    else
+      result = make_xoxo(struct, 'xoxo')
+    end
+
+    result
+  end
+
+  private
+
+  def self.make_xoxo(struct, class_name=nil)
+    s = ''
+    case struct
+    when Array
+      if class_name
+        s << %Q[<ol class="#{class_name}">]
+      else
+        s << "<ol>"
+      end
+      struct.each { |item|
+        s << "<li>" << make_xoxo(item) << "</li>"
+      }
+      s << "</ol>"
+
+    when Hash
+      d = struct.dup
+      if d.has_key? 'url'
+        s << '<a href="' << d['url'].to_s << '" '
+        text = d.fetch('text') { d.fetch('title', d['url']) }
+        %w[title rel type].each { |tag|
+          if d.has_key? tag
+            s << tag.to_s << '="' << make_xoxo(d.delete(tag)) << '" '
+          end
+        }
+        s << '>' << make_xoxo(text) << '</a>'
+        d.delete 'text'
+        d.delete 'url'
+      end
+
+      unless d.empty?
+        s << "<dl>"
+        d.each { |key, value|
+          s << "<dt>" << key.to_s << "</dt><dd>" << make_xoxo(value) << "</dd>"
+        }
+        s << "</dl>"
+      end
+
+    when String
+      s << struct
+
+    else
+      s << struct.to_s          # too gentle?
+    end
+
+    s
+  end
+end
+
+class XOXO::Parser              # :nodoc:
+  CONTAINER_TAGS = %w{dl ol ul}
+
+  attr_reader :structs
+
+  def initialize(xoxo)
+    @parser = REXML::Parsers::PullParser.new(xoxo)
+
+    @textstack = ['']
+    @xostack = []
+    @structs = []
+    @tags = []
+  end
+
+  def parse
+    while @parser.has_next?
+      res = @parser.pull
+
+      if res.start_element?
+        @tags << res[0]
+
+        case res[0]
+        when "a"
+          attrs = normalize_attrs res[1]
+          attrs['url'] = attrs['href']
+          attrs.delete 'href'
+          push attrs
+          @textstack << ''
+
+        when "dl"
+          push({})
+
+        when "ol", "ul"
+          push []
+
+        when "li", "dt", "dd"
+          @textstack << ''
+
+        end
+      elsif res.end_element?
+        @tags.pop
+
+        case res[0]
+        when "a"
+          val = @textstack.pop
+          unless val.empty?
+            val = ''  if @xostack.last['title'] == val
+            val = ''  if @xostack.last['url'] == val
+            @xostack.last['text'] = val  unless val.empty?
+          end
+          @xostack.pop
+
+        when "dl", "ol", "ul"
+          @xostack.pop
+
+        when "li"
+          val = @textstack.pop
+          while @structs.last != @xostack.last
+            val = @structs.pop
+            @xostack.last << val
+          end
+          @xostack.last << val  if val.kind_of? String
+
+        when "dt"
+          # skip
+
+        when "dd"
+          val = @textstack.pop
+          key = @textstack.pop
+
+          val = @structs.pop  if @structs.last != @xostack.last
+          @xostack.last[key] = val
+
+        end
+      elsif res.text?
+        unless @tags.empty? || CONTAINER_TAGS.include?(@tags.last)
+          @textstack.last << res[0]
+        end
+      end
+    end
+
+    self
+  end
+
+  private
+
+  def normalize_attrs(attrs)
+    attrs.keys.find_all { |k, v| k != k.downcase }.each { |k, v|
+      v = v.downcase  if k == "rel" || k == "type"
+      attrs.delete k
+      attrs[k.downcase] = v
+    }
+    attrs
+  end
+
+  def push(struct)
+    if struct == {} && @structs.last.kind_of?(Hash) &&
+        @structs.last.has_key?('url') &&
+        @structs.last != @xostack.last
+      # put back the <a>-made one for extra def's
+      @xostack << @structs.last
+    else
+      @structs << struct
+      @xostack << @structs.last
+    end
+  end
+end
+
+
+class Object
+
+  # Dump object as XOXO.
+
+  def to_xoxo(*args)
+    XOXO.dump(self,*args)
+  end
+
+end