facets 1.0.0 → 1.0.1

data/lib/facet/string/tab.rb

@@ -1,2 +0,0 @@
-# stub
-require 'facet/string/indent'

data/lib/facet/string/tabto.rb

@@ -1,2 +0,0 @@
-# stub
-require 'facet/string/indent'

data/lib/facet/string/to_a.rb

@@ -1,35 +0,0 @@
-
-require 'facet/string/to_arr'
-
-class String
-
-  # Alias for #to_arr. See #to_arr for documentation.
-  #
-  # WARNING! Use this method with caution as its default behavior
-  # (i.e. chars splitting) is nonconvential (unfortunately).
-  #
-  alias_method :to_a, :to_arr
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_to_a
-      arr = 'abc'
-      assert_equal( ['a','b','c'], arr.to_a )
-    end
-
-  end
-
-=end

data/lib/facet/string/to_arr.rb

@@ -1,55 +0,0 @@
-
-class String
-
-  # Split a string into an array according to ath egiven mode.
-  # The mode is a recognized symbol or a regexp. If no mode is
-  # given the default mode :char (same as regular expression //)
-  # is used.
-  #
-  # Symbolized modes include :byte, :char, :word, :line and :enum.
-  #
-  # The :enum mode passes the call up to the Enumerable#to_a, thus
-  # providing a means to Ruby's current built-in behavior.
-  #
-  #   'abc 123'.to_arr        #=> ['a','b','c',' ','1','2','3']
-  #   'abc 123'.to_arr(:word) #=> ['abc','123']
-  #
-  def to_arr(mode=nil)
-    case mode
-    when nil, :char, :chars
-      split(//)
-    when :enum
-      super
-    when :byte, :bytes
-      unpack('C*')
-    when :word, :words
-      split(/[ ]+/)
-    when :line, :lines
-      split(/\n/)
-    else
-      split(mode)
-    end
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_to_arr
-      assert_equal( ['a','b','c'], 'abc'.to_arr )
-    end
-
-  end
-
-=end

data/lib/facet/string/to_b.rb

@@ -1,64 +0,0 @@
-
-class String
-
-  # Interpret common affirmative string meanings as true,
-  # otherwise false. Balnk sapce and case are ignored.
-  # The following strings that will return true:
-  #
-  #   <tt>true</tt>,<tt>yes</tt>,<tt>on</tt>,<tt>t</tt>,<tt>1</tt>,<tt>y</tt>,<tt>==</tt>
-  #
-  # Examples:
-  #
-  #   "true".to_b   #=> true
-  #   "yes".to_b    #=> true
-  #   "no".to_b     #=> false
-  #   "123".to_b    #=> false
-  #
-  def to_b
-    case self.downcase.strip
-    when 'true', 'yes', 'on', 't', '1', 'y', '=='
-      return true
-    when 'nil', 'null'
-      return nil
-    else
-      return false
-    end
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_to_b
-      assert( 'true'.to_b )
-      assert( 'True'.to_b )
-      assert( 'yes'.to_b )
-      assert( 'YES'.to_b )
-      assert( 'on'.to_b )
-      assert( 'ON'.to_b )
-      assert( 't'.to_b )
-      assert( '1'.to_b )
-      assert( 'y'.to_b )
-      assert( 'Y'.to_b )
-      assert( '=='.to_b )
-      assert( ! 'nil'.to_b )
-      assert( ! 'false'.to_b )
-      assert( ! 'blahblahtrueblah'.to_b )
-      assert_equal( nil, 'nil'.to_b )
-      assert_equal( nil, 'null'.to_b )
-    end
-
-  end
-
-=end

data/lib/facet/string/to_const.rb

@@ -1,39 +0,0 @@
-
-class String
-
-  # Get a constant by a given string name.
-  #
-  #   "Class".to_const   #=> Class
-  #
-  # Note this method is not as verstile as it should be,
-  # since it can not access contants relative to the current 
-  # execution context. But without a binding_of_caller that
-  # does not seem possible.
-  def to_const
-    split('::').inject(Object){ |namespace,name| namespace.const_get(name) }
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    TestConst = 4
-
-    def test_to_const
-      assert_equal( 4, "TCString::TestConst".to_const )
-    end
-
-  end
-
-=end

data/lib/facet/string/to_date.rb

@@ -1,35 +0,0 @@
-
-class String
-
-  def to_date
-    require 'date'
-    require 'parsedate'
-    ::Date::civil(*ParseDate.parsedate(self)[0..2])
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_to_date
-      s = "2005-10-31"
-      d = s.to_date
-      assert_equal( 31, d.day )
-      assert_equal( 10, d.month )
-      assert_equal( 2005, d.year )
-    end
-
-  end
-
-=end

data/lib/facet/string/to_proc.rb

@@ -1,54 +0,0 @@
-
-class String
-
-  # Evaluates a String as a Proc.
-  #
-  #   xyp = "|x,y| x + y".to_proc
-  #   xyp.class      #=> Proc
-  #   xyp.call(1,2)  #=> 3
-  #
-  #--
-  # Note: Sure would be nice if this could
-  # grab the caller's context!
-  #++
-  def to_proc(context=nil)
-    if context
-      if context.kind_of?(Binding) or context.kind_of?(Proc)
-        Kernel.eval "proc { #{self} }", context
-      else context
-        context.instance_eval "proc { #{self} }"
-      end
-    else
-      Kernel.eval "proc { #{self} }"
-    end
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_to_proc
-      assert_nothing_raised { @add = '|x,y| x + y'.to_proc }
-      assert_equal(4, @add.call(2,2))    
-      @t = 3
-      @multi = '|y| @t * y'.to_proc(self)
-      assert_equal(6, @multi.call(2))
-      x = 4
-      @div = '|y| x / y'.to_proc(binding)
-      assert_equal(2, @div.call(2))
-    end
-
-  end
-
-=end

data/lib/facet/string/to_re.rb

@@ -1,46 +0,0 @@
-
-class String
-
-  # Turns a string into a regular expression.
-  # By default it will escape all characters.
-  # Use <tt>false</tt> argument to turn off escaping.
-  #
-  #   "[".to_re  #=> /\[/
-  #
-  def to_re(esc=true)
-    Regexp.new((esc ? Regexp.escape(self) : self))
-  end
-
-  # Turns a string into a regular expression.
-  # Unlike #to_re this will not escape characters.
-  #
-  #   "a?".to_rx  #=> /a?/
-  #
-  def to_rx
-    Regexp.new(self)
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_to_re
-      assert_equal( /abc/, "abc".to_re )
-      assert_equal( /a\+bc/, "a+bc".to_re )
-      assert_equal( /a+bc/, "a+bc".to_re(false) )
-    end
-
-  end
-
-=end

data/lib/facet/string/to_rx.rb

@@ -1,2 +0,0 @@
-# stub
-require 'facet/string/to_re'

data/lib/facet/string/to_time.rb

@@ -1,34 +0,0 @@
-
-class String
-
-  def to_time
-    require 'time'
-    Time.parse(self)
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_to_time
-      s = "2:31:15 PM"
-      t = s.to_time
-      assert_equal( 14, t.hour )
-      assert_equal( 31, t.min )
-      assert_equal( 15, t.sec )
-    end
-
-  end
-
-=end

data/lib/facet/string/unbracket.rb

@@ -1,46 +0,0 @@
-require 'string/bracket'
-
-class String
-
-  #def self.bra2ket
-  #  @bra2ket ||= { '['=>']', '('=>')', '{'=>'}', '<'=>'>' }
-  #end
-
-  # Return a new string embraced by given brakets.
-  # If only one bracket char is given it will be placed
-  # on either side.
-  #
-  #   "{unwrap me}".debracket('{')        #=> "unwrap me"
-  #   "--unwrap me!".debracket('--','!')  #=> "unwrap me!"
-  #
-  def unbracket(bra=nil, ket=nil)
-    if bra
-      ket = Sring.bra2ket[bra] unless ket
-      ket = ket ? ket : bra
-      s = self.dup
-      s.gsub!(%r[^#{Regexp.escape(bra)}], '')
-      s.gsub!(%r[#{Regexp.escape(ket)}$], '')
-      return s
-    else
-      if m = String.bra2ket[ self[0,1] ]
-        return self.slice(1...-1) if self[-1,1]  == m
-      end
-    end
-    return self.dup  # if nothing else
-  end
-
-  # Inplace version of #debraket.
-  def unbracket!(bra=nil, ket=nil)
-    self.replace( unbracket(bra, ket) )
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# TODO

data/lib/facet/string/underscore.rb

@@ -1,18 +0,0 @@
-class String
-
-  # Underscore string based on camelcase characteristics.
-  #
-  def underscore #(camel_cased_word)
-    self.gsub(/([A-Z]+)([A-Z])/,'\1_\2').gsub(/([a-z])([A-Z])/,'\1_\2').downcase
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-# TODO