ruby-nuggets 0.0.1.126

data/lib/nuggets/array/monotone.rb

@@ -0,0 +1,101 @@
+#--
+###############################################################################
+#                                                                             #
+# A component of ruby-nuggets, some extensions to the Ruby programming        #
+# language.                                                                   #
+#                                                                             #
+# Copyright (C) 2007 Jens Wille                                               #
+#                                                                             #
+# Authors:                                                                    #
+#     Jens Wille <jens.wille@uni-koeln.de>                                    #
+#                                                                             #
+# ruby-nuggets is free software; you can redistribute it and/or modify it     #
+# under the terms of the GNU General Public License as published by the Free  #
+# Software Foundation; either version 3 of the License, or (at your option)   #
+# any later version.                                                          #
+#                                                                             #
+# ruby-nuggets 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. See the GNU General Public License for    #
+# more details.                                                               #
+#                                                                             #
+# You should have received a copy of the GNU General Public License along     #
+# with ruby-nuggets. If not, see <http://www.gnu.org/licenses/>.              #
+#                                                                             #
+###############################################################################
+#++
+
+class Array
+
+  # call-seq:
+  #   array.monotone?(op) => true or false
+  #
+  # Check whether _array_ is monotone according to operator +op+.
+  def monotone?(op)
+    inject { |a, b|
+      return false unless a.send(op, b)
+      b
+    }
+
+    true
+  end
+  alias_method :monotonic?, :monotone?
+
+  # call-seq:
+  #   array.ascending? => true or false
+  #
+  # Check whether _array_ is (strictly) ascending.
+  def ascending?(strict = false)
+    monotone?(strict ? :< : :<=)
+  end
+  alias_method :increasing?, :ascending?
+
+  # call-seq:
+  #   array.strictly_ascending? => true or false
+  #
+  # Check whether _array_ is strictly ascending.
+  def strictly_ascending?
+    ascending?(true)
+  end
+  alias_method :strictly_increasing?, :strictly_ascending?
+
+  # call-seq:
+  #   array.descending? => true or false
+  #
+  # Check whether _array_ is (strictly) descending.
+  def descending?(strict = false)
+    monotone?(strict ? :> : :>=)
+  end
+  alias_method :decreasing?, :descending?
+
+  # call-seq:
+  #   array.strictly_descending? => true or false
+  #
+  # Check whether _array_ is strictly descending.
+  def strictly_descending?
+    descending?(true)
+  end
+  alias_method :strictly_decreasing?, :strictly_descending?
+
+end
+
+if $0 == __FILE__
+  a = [1, 2, 3, 4]
+  p a
+
+  p a.ascending?           # => true
+  p a.strictly_ascending?  # => true
+  p a.descending?          # => false
+
+  b = [1, 2, 4, 3]
+  p b
+
+  p b.ascending?           # => false
+  p b.descending?          # => false
+
+  c = [1, 2, 4, 4]
+  p c
+
+  p c.ascending?           # => true
+  p c.strictly_ascending?  # => false
+end

data/lib/nuggets/array/rand.rb

@@ -0,0 +1,45 @@
+#--
+###############################################################################
+#                                                                             #
+# A component of ruby-nuggets, some extensions to the Ruby programming        #
+# language.                                                                   #
+#                                                                             #
+# Copyright (C) 2007 Jens Wille                                               #
+#                                                                             #
+# Authors:                                                                    #
+#     Jens Wille <jens.wille@uni-koeln.de>                                    #
+#                                                                             #
+# ruby-nuggets is free software; you can redistribute it and/or modify it     #
+# under the terms of the GNU General Public License as published by the Free  #
+# Software Foundation; either version 3 of the License, or (at your option)   #
+# any later version.                                                          #
+#                                                                             #
+# ruby-nuggets 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. See the GNU General Public License for    #
+# more details.                                                               #
+#                                                                             #
+# You should have received a copy of the GNU General Public License along     #
+# with ruby-nuggets. If not, see <http://www.gnu.org/licenses/>.              #
+#                                                                             #
+###############################################################################
+#++
+
+class Array
+
+  # call-seq:
+  #   array.rand => anItem
+  #
+  # Randomly pick an item from _array_.
+  def rand
+    at(Kernel.rand(size))
+  end
+
+end
+
+if $0 == __FILE__
+  a = %w[a b c d]
+  p a
+  p a.rand
+  p a.rand
+end

data/lib/nuggets/array/shuffle.rb

@@ -0,0 +1,57 @@
+#--
+###############################################################################
+#                                                                             #
+# A component of ruby-nuggets, some extensions to the Ruby programming        #
+# language.                                                                   #
+#                                                                             #
+# Copyright (C) 2007 Jens Wille                                               #
+#                                                                             #
+# Authors:                                                                    #
+#     Jens Wille <jens.wille@uni-koeln.de>                                    #
+#                                                                             #
+# ruby-nuggets is free software; you can redistribute it and/or modify it     #
+# under the terms of the GNU General Public License as published by the Free  #
+# Software Foundation; either version 3 of the License, or (at your option)   #
+# any later version.                                                          #
+#                                                                             #
+# ruby-nuggets 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. See the GNU General Public License for    #
+# more details.                                                               #
+#                                                                             #
+# You should have received a copy of the GNU General Public License along     #
+# with ruby-nuggets. If not, see <http://www.gnu.org/licenses/>.              #
+#                                                                             #
+###############################################################################
+#++
+
+class Array
+
+  # call-seq:
+  #   array.shuffle => new_array
+  #
+  # Shuffles _array_ in random order.
+  def shuffle
+    sort_by { Kernel.rand }
+  end
+
+  # call-seq:
+  #   array.shuffle! => array
+  #
+  # Destructive version of #shuffle.
+  def shuffle!
+    replace shuffle
+  end
+
+end
+
+if $0 == __FILE__
+  a = %w[1 2 3 4 5 6 7 8]
+  p a
+
+  p a.shuffle
+  p a.shuffle
+
+  a.shuffle!
+  p a
+end

data/lib/nuggets/array/to_hash.rb

@@ -0,0 +1,68 @@
+#--
+###############################################################################
+#                                                                             #
+# A component of ruby-nuggets, some extensions to the Ruby programming        #
+# language.                                                                   #
+#                                                                             #
+# Copyright (C) 2007 Jens Wille                                               #
+#                                                                             #
+# Authors:                                                                    #
+#     Jens Wille <jens.wille@uni-koeln.de>                                    #
+#                                                                             #
+# ruby-nuggets is free software; you can redistribute it and/or modify it     #
+# under the terms of the GNU General Public License as published by the Free  #
+# Software Foundation; either version 3 of the License, or (at your option)   #
+# any later version.                                                          #
+#                                                                             #
+# ruby-nuggets 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. See the GNU General Public License for    #
+# more details.                                                               #
+#                                                                             #
+# You should have received a copy of the GNU General Public License along     #
+# with ruby-nuggets. If not, see <http://www.gnu.org/licenses/>.              #
+#                                                                             #
+###############################################################################
+#++
+
+require File.join(File.dirname(__FILE__), 'flatten_once')
+
+class Array
+
+  # call-seq:
+  #   array.to_h => aHash
+  #   array.to_h(value) => aHash
+  #
+  # If no +value+ is given, converts _array_, being an array of two-element
+  # arrays, into a hash, preserving sub-arrays. Otherwise, maps each element
+  # of _array_ to +value+.
+  #
+  # Examples:
+  #   %w[a b c d].to_h     # => { "a" => "b", "c" => "d" }
+  #   %w[a b c d].to_h(1)  # => { "a" => 1, "b" => 1, "c" => 1, "d" => 1 }
+  def to_hash(value = default = Object.new)
+    if value == default
+      Hash[*flatten_once]
+    else
+      inject({}) { |hash, element|
+        hash.update(element => value)
+      }
+    end
+  end
+  alias_method :to_h, :to_hash
+
+end
+
+if $0 == __FILE__
+  a = [[:a, 1], [:b, 2], [:c, 3]]
+  p a
+  p a.to_h
+
+  b = [[:a, [1, 2]], [:b, 3], [[:c, :d], [4, [5, 6]]]]
+  p b
+  p b.to_h
+
+  c = %w[a b c d]
+  p c
+  p c.to_h(1)
+end

data/lib/nuggets/hash/insert.rb

@@ -0,0 +1,73 @@
+#--
+###############################################################################
+#                                                                             #
+# A component of ruby-nuggets, some extensions to the Ruby programming        #
+# language.                                                                   #
+#                                                                             #
+# Copyright (C) 2007 Jens Wille                                               #
+#                                                                             #
+# Authors:                                                                    #
+#     Jens Wille <jens.wille@uni-koeln.de>                                    #
+#                                                                             #
+# ruby-nuggets is free software; you can redistribute it and/or modify it     #
+# under the terms of the GNU General Public License as published by the Free  #
+# Software Foundation; either version 3 of the License, or (at your option)   #
+# any later version.                                                          #
+#                                                                             #
+# ruby-nuggets 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. See the GNU General Public License for    #
+# more details.                                                               #
+#                                                                             #
+# You should have received a copy of the GNU General Public License along     #
+# with ruby-nuggets. If not, see <http://www.gnu.org/licenses/>.              #
+#                                                                             #
+###############################################################################
+#++
+
+class Hash
+
+  # call-seq:
+  #   hash.insert(key, value) => new_hash
+  #   hash.insert(key, value) { |old_value, value| ... } => new_hash
+  #
+  # Inserts +value+ into _hash_ at +key+, while merging existing values at
+  # +key+ instead of just overwriting. Uses default Hash#merge or block for
+  # merging.
+  def insert(key, value, relax = true, &block)
+    dup.insert!(key, value, relax, &block) || dup
+  end
+
+  # call-seq:
+  #   hash.insert!(key, value) => hash
+  #   hash.insert!(key, value) { |old_value, value| ... } => hash
+  #
+  # Destructive version of #insert.
+  def insert!(key, value, relax = true, &block)
+    block ||= lambda { |old_val, val| old_val.merge(val) }
+
+    self[key] = begin
+      block[self[key], value]
+    rescue NoMethodError, TypeError => err
+      unless relax
+        raise err
+      else
+        value
+      end
+    end
+
+    self
+  end
+
+end
+
+if $0 == __FILE__
+  h = { :a => 0, :b => { :b1 => 1, :b2 => 2 } }
+  p h
+
+  p h.insert(:a, -1)
+  p h.insert(:b, :b3 => 3)
+
+  h.insert!(:b, :b0 => 0)
+  p h
+end

data/lib/nuggets/object/blank.rb

@@ -0,0 +1,112 @@
+#--
+###############################################################################
+#                                                                             #
+# A component of ruby-nuggets, some extensions to the Ruby programming        #
+# language.                                                                   #
+#                                                                             #
+# Copyright (C) 2007 Jens Wille                                               #
+#                                                                             #
+# Authors:                                                                    #
+#     Jens Wille <jens.wille@uni-koeln.de>                                    #
+#                                                                             #
+# ruby-nuggets is free software; you can redistribute it and/or modify it     #
+# under the terms of the GNU General Public License as published by the Free  #
+# Software Foundation; either version 3 of the License, or (at your option)   #
+# any later version.                                                          #
+#                                                                             #
+# ruby-nuggets 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. See the GNU General Public License for    #
+# more details.                                                               #
+#                                                                             #
+# You should have received a copy of the GNU General Public License along     #
+# with ruby-nuggets. If not, see <http://www.gnu.org/licenses/>.              #
+#                                                                             #
+###############################################################################
+#++
+
+class Object
+
+  # call-seq:
+  #   object.blank? => true or false
+  #
+  # Basically a short-cut to <tt>object.nil? || object.empty?</tt>.
+  def blank?(*modifiers)
+    if block_given?
+      return true if yield(dup).blank?
+    end
+
+    if modifiers.empty?
+      respond_to?(:empty?) ? empty? : !self
+    else
+      return true if blank?
+
+      modifiers.each { |modifier|
+        next unless respond_to?(modifier)
+
+        if modifier.to_s[-1] == ??
+          return true if send(modifier)
+        else
+          return true if send(modifier).blank?
+        end
+      }
+
+      false
+    end
+  end
+
+  # call-seq:
+  #   object.void? => true or false
+  #
+  # Adds white-space strings, 0 and arrays of +nil+ objects to the list of
+  # blank objects.
+  def void?
+    blank?(:zero?, :strip, :compact)
+  end
+  alias_method :vain?, :void?
+
+end
+
+class Array
+
+  # call-seq:
+  #   array.vain? => true or false
+  #
+  # Returns true if any of _array_'s elements are themselves vain.
+  def vain?
+    blank? { |a| a.delete_if { |i| i.vain? } }
+  end
+
+end
+
+class Hash
+
+  # call-seq:
+  #   hash.vain? => true or false
+  #
+  # Returns true if any of _hash_'s values are themselves vain.
+  def vain?
+    blank? { |h| h.delete_if { |k, v| v.vain? } }
+  end
+
+end
+
+if $0 == __FILE__
+  ['', ' ', 's', 0, 1, nil, true, false, [], [nil], {}].each { |o|
+    p o
+    p o.blank?
+    p o.void?
+  }
+
+  o = ['', [], [nil], {}]
+  p o
+  p o.blank?
+  p o.void?
+  p o.vain?
+
+  o = { :x => nil, :y => [], :z => { :zz => nil } }
+  p o
+  p o.blank?
+  p o.void?
+  p o.vain?
+end