mack-facets 0.8.1 → 0.8.2

data/lib/gems/facets-2.4.5/lib/core/facets/range/overlap.rb

@@ -0,0 +1,13 @@
+class Range
+
+  # Do two ranges overlap?
+  #
+  #   CREDIT: Daniel Schierbeck
+  #   CREDIT: Brandon Keepers
+
+  def overlap?(other)
+    include?(other.first) or other.include?(first)
+  end
+
+end
+

data/lib/gems/facets-2.4.5/lib/core/facets/range/to_r.rb

@@ -0,0 +1,26 @@
+class Range
+
+  # A thing really should know itself.
+  # This simply returns _self_.
+  #
+  # CREDIT: Trans
+
+  def to_r
+    self
+  end
+
+  # A thing really should know itself.
+  # This simply returns _self_.
+  #
+  # Note: This does not internally effect the Ruby
+  # interpretor such that it can coerce Range-like
+  # objects into a Range.
+  #
+  # CREDIT: Trans
+
+  def to_range
+    self
+  end
+
+end
+

data/lib/gems/facets-2.4.5/lib/core/facets/range/umbrella.rb

@@ -0,0 +1 @@
+require 'facets/range/within'

data/lib/gems/facets-2.4.5/lib/core/facets/range/within.rb

@@ -0,0 +1,66 @@
+class Range
+
+  # Uses the Range#umbrella method to determine
+  # if another Range is _anywhere_ within this Range.
+  #
+  #   (1..3).within?(0..4)  #=> true
+  #
+  #   CREDIT: Trans
+
+  def within?(rng)
+    case rng.umbrella(self)
+    when [0,0], [-1,0], [0,-1], [-1,-1]
+      return true
+    else
+      return false
+    end
+  end
+
+  # Returns a two element array of the relationship
+  # between two Ranges.
+  #
+  # Diagram:
+  #
+  #     Relationship     Returns
+  #
+  #   self |-----------|
+  #   r    |-----------|    [0,0]
+  #
+  #   self |-----------|
+  #   r     |---------|     [-1,-1]
+  #
+  #   self  |---------|
+  #   r    |-----------|    [1,1]
+  #
+  #   self |-----------|
+  #   r     |----------|    [-1,0]
+  #
+  #   self |-----------|
+  #   r     |-----------|   [-1,1]
+  #
+  #   etc.
+  #
+  # Example:
+  #
+  #   (0..3).umbrella(1..2)  #=>  [-1,-1]
+  #
+  #   CREDIT: Trans
+  #   CREDIT: Chris Kappler
+
+  def umbrella(r)
+    s = first <=> r.first
+    e = r.last <=> last
+
+    if e == 0
+      if r.exclude_end? and exclude_end?
+        e = r.max <=> max
+      else
+        e = (r.exclude_end? ? 0 : 1) <=> (exclude_end? ? 0 : 1)
+      end
+    end
+
+    return s,e
+  end
+
+end
+

data/lib/gems/facets-2.4.5/lib/core/facets/regexp.rb

@@ -0,0 +1,6 @@
+dir, base = *File.split(__FILE__)
+base = base.chomp('.rb')
+Dir[File.join(dir, base, '*')].each do |lib|
+  require "facets/#{base}/#{File.basename(lib)}"
+end
+

data/lib/gems/facets-2.4.5/lib/core/facets/regexp/arity.rb

@@ -0,0 +1,17 @@
+class Regexp
+
+  # Returns the number of backreferencing subexpressions.
+  #
+  #   /(a)(b)(c)/.arity  #=> 3
+  #   /(a(b(c)))/.arity  #=> 3
+  #
+  # Note that this is not perfect, especially with regards to \x
+  # and embedded comments.
+  #
+  #  CREDIT: Trans
+
+  def arity
+    source.scan( /(?!\\)[(](?!\?[#=:!>-imx])/ ).length
+  end
+
+end

data/lib/gems/facets-2.4.5/lib/core/facets/regexp/to_re.rb

@@ -0,0 +1,28 @@
+class Regexp
+
+  # Like #to_re, but following Ruby's formal definitions,
+  # only a Regular expression type object will respond to this.
+  #
+  # Note that to be of much real use this should be defined in core Ruby.
+  #
+  # CREDIT: Florian Gross
+
+  def to_regexp
+    self
+  end
+
+  # Simply returns itself. Helpful when converting
+  # strings to regular expressions, where regexp
+  # might occur as well --in the same vien as using
+  # #to_s on symbols. The parameter is actaully a
+  # dummy parameter to coincide with String#to_re.
+  #
+  #   /abc/.to_re  #=> /abc/
+  #
+  # CREDIT: Trans
+
+  def to_re(esc=false)
+    self  # Of course, things really should know how to say "I" ;)
+  end
+
+end

data/lib/gems/facets-2.4.5/lib/core/facets/stackable.rb

@@ -0,0 +1,86 @@
+# = Stackable
+#
+# Stackable mixin provides #pop, #push, #pull, etc.
+# It depends on #slice, #splice and #insert.
+#
+# == Authors
+#
+# * Thomas Sawyer
+#
+# == Copyright
+#
+# Copyright (c) 2007 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.
+
+
+# = Stackable
+#
+# Stackable mixin provides #pop, #push, #pull, etc.
+# It depends on #slice, #splice and #insert.
+#
+module Stackable
+
+  # Pop item off stack.
+  #
+  #   a = [1, 2, 3]
+  #   a.pop           #=> 3
+  #   a               #=> [1, 2]
+
+  def pop
+    splice(-1)
+  end
+
+  # Push item onto the stack.
+  #
+  #   a = [1, 2]
+  #   a.push(3)       #=> [1, 2, 3]
+
+  def push(x)
+    insert(-1,x)
+  end
+
+  # Pull item off the stack.
+  #
+  #   a = [1, 2, 3]
+  #   a.pull          #=> 1
+  #   a               #=> [2, 3]
+
+  def pull
+    slice(0)
+  end
+
+  alias_method :shift, :pull
+
+  # Poke item onto the stack.
+  #
+  #   a = [2, 3]
+  #   a.poke(1)       #=> [1, 2, 3]
+  #
+  #   TODO: Better name (besides unshift)?
+
+  def poke(x)
+    insert(0,x)
+  end
+
+  alias_method :unshift, :poke
+
+  # Peek at the top of the stack.
+  #
+  #   a = [1, 2, 3]
+  #   a.peek          #=> 3
+  #   a               #=> [1, 2, 3]
+
+  def peek
+    slice(-1)
+  end
+
+end
+

data/lib/gems/facets-2.4.5/lib/core/facets/string.rb

@@ -0,0 +1,6 @@
+dir, base = *File.split(__FILE__)
+base = base.chomp('.rb')
+Dir[File.join(dir, base, '*')].each do |lib|
+  require "facets/#{base}/#{File.basename(lib)}"
+end
+

data/lib/gems/facets-2.4.5/lib/core/facets/string/align.rb

@@ -0,0 +1,106 @@
+class String
+
+  def align(direction, n, sep="\n", c=' ')
+    case direction
+    when :right
+      align_right(n, sep="\n", c=' ')
+    when :left
+      align_left(n, sep="\n", c=' ')
+    when :center
+      align_center(n, sep="\n", c=' ')
+    else
+      raise ArgumentError
+    end
+  end
+
+  # Align a string to the right.
+  # The defualt alignment seperation is a new line ("/n")
+  # This can be changes as can be the padding string which
+  # defaults to a single space (' ').
+  #
+  #   s = <<-EOS
+  #   This is a test
+  #     and
+  #     so on
+  #   EOS
+  #
+  #   puts s.align_right(2)
+  #
+  # _produces_
+  #
+  #     This is a test
+  #                and
+  #              so on
+  #
+  #   CREDIT: Trans
+
+  def align_right(n, sep="\n", c=' ')
+    return rjust(n.to_i,c.to_s) if sep==nil
+    q = split(sep.to_s).collect { |line|
+      line.rjust(n.to_i,c.to_s)
+    }
+    q.join(sep.to_s)
+  end
+
+  # Align a string to the left.
+  #
+  # The defualt alignment seperation is a new line ("/n")
+  # This can be changes as can be the padding string which
+  # defaults to a single space (' ').
+  #
+  #   s = <<-EOS
+  #   This is a test
+  #     and
+  #     so on
+  #   EOS
+  #
+  #   puts s.align_left(2)
+  #
+  # _produces_
+  #
+  #     This is a test
+  #     and
+  #     so on
+  #
+  #   CREDIT: Trans
+
+  def align_left(n, sep="\n", c=' ')
+    return ljust(n.to_i,c.to_s) if sep==nil
+    q = split(sep.to_s).collect { |line|
+      line.ljust(n.to_i,c.to_s)
+    }
+    q.join(sep.to_s)
+  end
+
+  # Centers each line of a string.
+  #
+  # The defualt alignment seperation is a new line ("/n")
+  # This can be changed as can be the padding string which
+  # defaults to a single space (' ').
+  #
+  #   s = <<-EOS
+  #     This is a test
+  #     and
+  #     so on
+  #   EOS
+  #
+  #   puts s.align_center(14)
+  #
+  # _produces_
+  #
+  #   This is a test
+  #        and
+  #       so on
+  #
+  #   CREDIT: Trans
+
+  def align_center(n, sep="\n", c=' ')
+    return center(n.to_i,c.to_s) if sep==nil
+    q = split(sep.to_s).collect { |line|
+      line.center(n.to_i,c.to_s)
+    }
+    q.join(sep.to_s)
+  end
+
+end
+

data/lib/gems/facets-2.4.5/lib/core/facets/string/bracket.rb

@@ -0,0 +1,105 @@
+class String
+
+  BRA2KET = { '['=>']', '('=>')', '{'=>'}', '<'=>'>' }
+
+  # Return a new string embraced by given brakets.
+  # If only one bracket char is given it will be placed
+  # on either side.
+  #
+  #   "wrap me".bracket('{')        #=> "{wrap me}"
+  #   "wrap me".bracket('--','!')   #=> "--wrap me!"
+  #
+  #   CREDIT: Trans
+
+  def bracket(bra, ket=nil)
+    #ket = String.bra2ket[$&] if ! ket && /^[\[({<]$/ =~ bra
+    ket = BRA2KET[bra] unless ket
+    "#{bra}#{self}#{ket ? ket : bra}"
+  end
+
+  # Inplace version of #braket.
+  #
+  #   CREDIT: Trans
+
+  def bracket!(bra, ket=nil)
+    self.replace(bracket(bra, ket))
+  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!"
+  #
+  #   CREDIT: Trans
+
+  def unbracket(bra=nil, ket=nil)
+    if bra
+      ket = 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 = 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.
+  #
+  #   CREDIT: Trans
+
+  def unbracket!(bra=nil, ket=nil)
+    self.replace( unbracket(bra, ket) )
+  end
+
+  # Return a new string embraced by given quotes.
+  # If no quotes are specified, then assumes single quotes.
+  #
+  #   "quote me".quote     #=> "'quote me'"
+  #   "quote me".quote(2)  #=> "\"quote me\""
+  #
+  #   CREDIT: Trans
+
+  def quote(type=:s)
+    case type.to_s.downcase
+    when 's', 'single'
+      bracket("'")
+    when 'd', 'double'
+      bracket('"')
+    when 'b', 'back'
+      bracket('`')
+    else
+      bracket("'")
+    end
+  end
+
+  # Remove quotes from string.
+  #
+  #   "'hi'".dequite    #=> "hi"
+  #
+  #   CREDIT: Trans
+
+  def dequote
+    s = self.dup
+
+    case self[0,1]
+    when "'", '"', '`'
+      s[0] = ''
+    end
+
+    case self[-1,1]
+    when "'", '"', '`'
+      s[-1] = ''
+    end
+
+    return s
+  end
+
+end
+