facets 1.1.0 → 1.2.0

data/lib/facet/string/to_re.rb

@@ -1,46 +1 @@
-
-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
+require 'facets/core/string/to_re.rb'

data/lib/facet/string/to_rx.rb

@@ -1,2 +1 @@
-# stub
-require 'facet/string/to_re'
+require 'facets/core/string/to_rx.rb'

data/lib/facet/string/to_time.rb

@@ -1,34 +1 @@
-
-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
+require 'facets/core/string/to_time.rb'

data/lib/facet/string/unbracket.rb

@@ -1,46 +1 @@
-require 'facet/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
+require 'facets/core/string/unbracket.rb'

data/lib/facet/string/underscore.rb

@@ -1,18 +1 @@
-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
+require 'facets/core/string/underscore.rb'

data/lib/facet/string/unix_crypt.rb

@@ -1,41 +1 @@
-
-require 'facet/string/self/rand_letter'
-
-class String
-
-  # Common Unix cryptography method.
-  def unix_crypt
-    self.crypt(String.rand_letter + String.rand_letter)
-  end
-
-  # Common Unix cryptography in-place method.
-  def unix_crypt!
-    self.replace( unix_crypt )
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_unix_crypt
-      assert_nothing_raised { "abc 123".unix_crypt }
-    end
-
-    def test_unix_crypt!
-      assert_nothing_raised { "abc 123".unix_crypt! }
-    end
-
-  end
-
-=end
+require 'facets/core/string/unix_crypt.rb'

data/lib/facet/string/unpack.rb

@@ -1,45 +1 @@
-
-class String
-
-  alias_method( :unpack_from_orgin, :unpack )
-  # Upack with offset. Extends #unpack to allow a string 
-  # to be unpacked starting at an offset position within it.
-  #
-  def unpack(format, offset=nil)
-    if offset.nil?
-      unpack_from_orgin(format)
-    else
-      self[offset..-1].unpack_from_orgin(format)
-    end
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_unpack
-      str, fmt = "abc\0", "Z*"
-      assert_equal "abc", str.unpack(fmt).first
-      assert_equal "abc", str.unpack(fmt, 0).first
-      assert_equal "bc", str.unpack(fmt, 1).first
-      assert_equal "bc", str.unpack(fmt, -3).first
-      assert_equal "c", str.unpack(fmt, 2).first
-      assert_equal "c", str.unpack(fmt, -2).first
-      assert_equal "", str.unpack(fmt, 3).first
-      assert_equal "", str.unpack(fmt, -1).first
-    end
-
-  end
-
-=end
+require 'facets/core/string/unpack.rb'

data/lib/facet/string/unshift.rb

@@ -1,42 +1 @@
-
-class String
-
-  def unshift( str=' ' )
-    insert(0, str)
-  end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def setup
-      @a = ""
-    end
-
-    def test_001
-      assert_raises( ArgumentError ) { @a.unshift(1,2) }
-    end
-
-    def test_002
-      assert_equal( "0", @a.unshift("0") )
-      assert_equal( "10", @a.unshift("1") )
-      assert_equal( "210", @a.unshift("2") )
-      assert_equal( "3210", @a.unshift("3") )
-      assert_equal( "43210", @a.unshift("4") )
-      assert_equal( "543210", @a.unshift("5") )
-    end
-
-  end
-
-=end
+require 'facets/core/string/unshift.rb'

data/lib/facet/string/upcase.rb

@@ -1,45 +1 @@
-#--
-# Credit goes to Phil Tomson.
-#++
-
-class String
-
-  # Is the string upcase/uppercase?
-  #
-  #   "THIS".upcase?  #=> true
-  #   "This".upcase?  #=> false
-  #   "this".upcase?  #=> false
-  #
-  def upcase?
-    self.upcase == self
-  end
-
-  # Alias for #upcase? method.
-  alias_method( :uppercase?, :upcase? )
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_upcase?
-      assert( 'ABC'.upcase? )
-    end
-
-    def test_uppercase?
-      assert( 'ABC'.uppercase? )
-    end
-
-  end
-
-=end
+require 'facets/core/string/upcase.rb'

data/lib/facet/string/uppercase.rb

@@ -1,2 +1 @@
-# stub
-require 'facet/string/upcase'
+require 'facets/core/string/uppercase.rb'

data/lib/facet/string/whitespace.rb

@@ -1,27 +1 @@
-require 'facet/string/blank'
-
-class String
-  alias_method :whitespace?, :blank?
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_whitespace?
-      assert( ! "xyz".whitespace? )
-      assert( "     ".whitespace? )
-    end
-
-  end
-
-=end
+require 'facets/core/string/whitespace.rb'

data/lib/facet/string/word_filter.rb

@@ -1,61 +1 @@
-
-class String
-
-  # Filters out words from a string based on block test.
-  #
-  #   "a string".word_filter { |word| word =~ /^a/ }  #=> "string"
-  #
-  def word_filter( &blk )
-    s = self.dup
-    s.word_filter!( &blk )
-  end
-
-  # In place version of #word_filter.
-  #
-  #   "a string".word_filter { |word| ... }
-  #
-  def word_filter! #:yield:
-    rest_of_string = self
-    wordfind = /(\w+)/
-    offset = 0
-    while wmatch = wordfind.match(rest_of_string)
-      word = wmatch[0]
-      range = offset+wmatch.begin(0) ... offset+wmatch.end(0)
-      rest_of_string = wmatch.post_match
-      self[range] = yield( word ).to_s
-      offset = self.length - rest_of_string.length
-    end
-    self
-  end
-
-end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_word_filter
-      s = "this is a test"
-      n = s.word_filter{ |w| "#{w}1" }
-      assert_equal( 'this1 is1 a1 test1', n )
-    end
-
-    def test_word_filter!
-      s = "this is a test"
-      s.word_filter!{ |w| "#{w}1" }
-      assert_equal( 'this1 is1 a1 test1', s )
-    end
-
-  end
-
-=end
+require 'facets/core/string/word_filter.rb'

data/lib/facet/string/word_wrap.rb

@@ -1,90 +1 @@
-#--
-# Credit goes to Gavin Kistner.
-# Also special mention to Dayne Broderson.
-#++
-
-class String
-
-  # Word wrap a string not exceeding max width.
-  #
-  #   puts "this is a test".word_wrap(4)
-  #
-  # _produces_
-  #
-  #   this
-  #   is a
-  #   test
-  #
-  def word_wrap( col_width=80 )
-    self.dup.word_wrap!( col_width )
-  end
-
-  # As with #word_wrap, but modifies the string in place.
-  #
-  def word_wrap!( col_width=80 )
-    self.gsub!( /(\S{#{col_width}})(?=\S)/, '\1 ' )
-    self.gsub!( /(.{1,#{col_width}})(?:\s+|$)/, "\\1\n" )
-    self
-  end
-
-  # old def
-
-  #def word_wrap(max=80)
-  #  c = dup
-  #  c.word_wrap!(max)
-  #  c
-  #end
-
-  #def word_wrap!(max=80)
-  #  raise ArgumentError, "Wrap margin too low: #{n}" if max <= 2
-  #  #gsub!( Regexp.new( "(.{1,#{max-1}}\\w)\\b\\s*" ), "\\1\n")
-  #  gsub!( /(.{1,#{max-1}}\S)([ ]|\n)/, "\\1\n")
-  #end
-
-end
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-=begin test
-
-  require 'test/unit'
-
-  class TCString < Test::Unit::TestCase
-
-    def test_word_wrap
-      assert_equal "abcde\n12345\nxyzwu\n", "abcde 12345 xyzwu".word_wrap(5)
-      assert_equal "abcd\n1234\nxyzw\n", "abcd 1234 xyzw".word_wrap(4)
-      assert_equal "abc\n123\n", "abc 123".word_wrap(4)
-      assert_equal "abc \n123\n", "abc  123".word_wrap(4)
-      assert_equal "abc \n123\n", "abc     123".word_wrap(4)
-    end
-
-    def test_word_wrap!
-      w = "abcde 12345 xyzwu" ; w.word_wrap!(5)
-      assert_equal("abcde\n12345\nxyzwu\n", w)
-      w = "abcd 1234 xyzw" ; w.word_wrap!(4)
-      assert_equal("abcd\n1234\nxyzw\n", w)
-      w = "abc 123" ; w.word_wrap!(4)
-      assert_equal "abc\n123\n", w
-      w = "abc  123" ; w.word_wrap!(4)
-      assert_equal("abc \n123\n", w)
-      w = "abc     123" ; w.word_wrap!(4)
-      assert_equal("abc \n123\n", w)
-    end
-
-#   def test_word_wrap
-#     assert_equal "abcde-\n12345-\nxyzwu\n", "abcde12345xyzwu".word_wrap(6,2)
-#     assert_equal "abcd-\n1234-\nxyzw\n", "abcd1234xyzw".word_wrap(5,2)
-#     assert_equal "abc \n123\n", "abc 123".word_wrap(4,2)
-#     assert_equal "abc \n123\n", "abc  123".word_wrap(4,2)
-#     assert_equal "abc \n123\n", "abc     123".word_wrap(4,2)
-#   end
-
-  end
-
-=end
+require 'facets/core/string/word_wrap.rb'