epitools 0.4.49 → 0.5.0

data/TODO

@@ -0,0 +1,16 @@
+===========================
+ TODOs
+===========================
+
++ Logger
+  |_ colourized ("ramaze" has a nice style)
+  |_ output to STDERR (default)
+  |_ no setup (default)
+     |_ Log "message"      <- defaults to info
+     |_ Log.warn "message"
+     |_ Log object         <- prettyprints it
+  |_ Verbose mode shows the calling method's info
+     |_ eg: [file:line:method]
+  |_ "gsmartcontrol" has good warning messages
+      ie: "|13<warn>  |07[hz] Warning: exit: The device error log contains records of errors."
+ 

data/VERSION

@@ -1 +1 @@
-0.4.49
+0.5.0

data/epitools.gemspec

@@ -5,22 +5,24 @@
 
 Gem::Specification.new do |s|
   s.name = %q{epitools}
-  s.version = "0.4.49"
+  s.version = "0.5.0"
 
   s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
-  s.authors = ["epitron"]
-  s.date = %q{2011-06-29}
+  s.authors = [%q{epitron}]
+  s.date = %q{2011-10-13}
   s.description = %q{Miscellaneous utility libraries to make my life easier.}
   s.email = %q{chris@ill-logic.com}
   s.extra_rdoc_files = [
     "LICENSE",
-    "README.rdoc"
+    "README.rdoc",
+    "TODO"
   ]
   s.files = [
     ".document",
     "LICENSE",
     "README.rdoc",
     "Rakefile",
+    "TODO",
     "VERSION",
     "epitools.gemspec",
     "lib/epitools.rb",
@@ -31,6 +33,7 @@ Gem::Specification.new do |s|
     "lib/epitools/browser/mechanize_progressbar.rb",
     "lib/epitools/clitools.rb",
     "lib/epitools/colored.rb",
+    "lib/epitools/ezdb.rb",
     "lib/epitools/hexdump.rb",
     "lib/epitools/its.rb",
     "lib/epitools/lcs.rb",
@@ -47,12 +50,15 @@ Gem::Specification.new do |s|
     "lib/epitools/ratio.rb",
     "lib/epitools/string_to_proc.rb",
     "lib/epitools/sys.rb",
+    "lib/epitools/term.rb",
+    "lib/epitools/trie.rb",
     "lib/epitools/zopen.rb",
     "spec/autoreq_spec.rb",
     "spec/basetypes_spec.rb",
     "spec/browser_spec.rb",
     "spec/clitools_spec.rb",
     "spec/colored_spec.rb",
+    "spec/ezdb_spec.rb",
     "spec/lcs_spec.rb",
     "spec/numwords_spec.rb",
     "spec/path_spec.rb",
@@ -62,12 +68,13 @@ Gem::Specification.new do |s|
     "spec/spec.opts",
     "spec/spec_helper.rb",
     "spec/sys_spec.rb",
+    "spec/term_spec.rb",
     "spec/zopen_spec.rb"
   ]
   s.homepage = %q{http://github.com/epitron/epitools}
-  s.licenses = ["WTFPL"]
-  s.require_paths = ["lib"]
-  s.rubygems_version = %q{1.6.2}
+  s.licenses = [%q{WTFPL}]
+  s.require_paths = [%q{lib}]
+  s.rubygems_version = %q{1.8.6}
   s.summary = %q{NOT UTILS... METILS!}
 
   if s.respond_to? :specification_version then

data/lib/epitools.rb

@@ -82,11 +82,12 @@ require_wrapper = proc do |mod|
   end
 end
 
-## Require the tools
+#
+# Make all the modules autoload, and require all the monkeypatches
+#
 %w[
   autoloads
   basetypes 
-  niceprint
   string_to_proc
   zopen
   colored

data/lib/epitools/autoloads.rb

@@ -1,4 +1,5 @@
 ## Standard library
+autoload :Set,        'set'
 autoload :URI,        'uri'
 autoload :CGI,        'cgi'
 autoload :Base64,     'base64'
@@ -10,6 +11,10 @@ autoload :Tempfile,   'tempfile'
 autoload :BigDecimal, 'bigdecimal'
 autoload :StringIO,   'stringio'
 autoload :Curses,     'curses'
+autoload :DateTime,   'date'
+autoload :Date,       'date'
+autoload :Open3,      'open3'
+#autoload :DelegateClass, 'delegate'
 
 module Digest
   autoload :SHA1,     'digest/sha1'
@@ -18,11 +23,16 @@ module Digest
 end
 
 ## Nonstandard library
-autoload :MimeMagic,    'epitools/mimemagic'
 autoload :Path,         'epitools/path'
+autoload :Ezdb,         'epitools/ezdb'
 autoload :Browser,      'epitools/browser'
 autoload :Rash,         'epitools/rash'
 autoload :Ratio,        'epitools/ratio'
 autoload :Sys,          'epitools/sys'
 autoload :ProgressBar,  'epitools/progressbar'
+autoload :Trie,         'epitools/trie'
+autoload :MimeMagic,    'epitools/mimemagic'
+autoload :Term,         'epitools/term'
 
+## Gems
+autoreq  :ANSI,         'ansi' 

data/lib/epitools/basetypes.rb

@@ -15,6 +15,8 @@ unless defined? Enum
   end
 end
 
+RbConfig = Config unless defined? RbConfig
+
 class Object
   
   #
@@ -32,7 +34,22 @@ class Object
   #
   # `truthy?` means `not blank?`
   #
-  def truthy?; not blank?; end
+  def truthy?
+    if respond_to? :blank?
+      not blank?
+    else
+      not nil?
+    end
+  end
+  
+  def marshal
+    Marshal.dump self
+  end
+
+  #
+  # Lets you say: `object.is_an? Array`
+  #  
+  alias_method :is_an?, :is_a?
 
 end
 
@@ -44,7 +61,31 @@ class FalseClass
   def truthy?; false; end
 end
 
+class Float
+  #
+  # 'true' if the float is 0.0
+  #
+  def blank?; self == 0.0; end
+end
+
+class NilClass
+  #
+  # Always 'true'; nil is considered blank.
+  #
+  def blank?; true; end
+end
+
+class Symbol
+  #
+  # Symbols are never blank.
+  #
+  def blank?; false; end
+end
+
+
+
 class Numeric
+
   def integer?; true; end
 
   def truthy?; self > 0; end
@@ -53,8 +94,9 @@ class Numeric
     to_s.gsub(/(\d)(?=\d{3}+(?:\.|$))(\d{3}\..*)?/,'\1,\2')
   end
 
-  # Time
-
+  #
+  # Time methods
+  #
   {
   
     'second'  => 1,
@@ -77,29 +119,95 @@ class Numeric
   def from_now
     Time.now + self
   end
+  
 end
 
-class Float
+class Integer
+  
   #
-  # 'true' if the float is 0.0
+  # 'true' if the integer is 0
   #
-  def blank?; self == 0.0; end
-end
+  def blank?; self == 0; end
 
-class NilClass
   #
-  # Always 'true'; nil is considered blank.
+  # Convert the number into a hexadecimal string representation.
+  # (Identical to to_s(16), except that numbers < 16 will have a 0 in front of them.)
   #
-  def blank?; true; end
-end
+  def to_hex
+    "%0.2x" % self
+  end
+    
+  #
+  # Convert the number to an array of bits (least significant digit first, or little-endian).
+  #
+  def to_bits
+    # TODO: Why does thos go into an infinite loop in 1.8.7?
+    ("%b" % self).chars.to_a.reverse.map(&:to_i)
+  end
+  alias_method :bits, :to_bits
+  
+  #
+  # Cached constants for base62 encoding
+  #
+  BASE62_DIGITS   = ['0'..'9', 'A'..'Z', 'a'..'z'].map(&:to_a).flatten 
+  BASE62_BASE     = BASE62_DIGITS.size
 
-class Symbol
   #
-  # Symbols are never blank.
+  # Convert a number to a string representation (in "base62" encoding).
+  # 
+  # Base62 encoding represents the number using the characters: 0..9, A..Z, a..z
   #
-  def blank?; false; end
+  # It's the same scheme that url shorteners and YouTube uses for their
+  # ID strings. (eg: http://www.youtube.com/watch?v=dQw4w9WgXcQ)
+  #
+  def to_base62
+    result = []
+    remainder = self
+    max_power = ( Math.log(self) / Math.log(BASE62_BASE) ).floor
+    
+    max_power.downto(0) do |power|
+      divisor = BASE62_BASE**power
+      #p [:div, divisor, :rem, remainder]      
+      digit, remainder = remainder.divmod(divisor)
+      result << digit
+    end
+    
+    result << remainder if remainder > 0
+    
+    result.map{|digit| BASE62_DIGITS[digit]}.join ''
+  end
+end
+
+
+#
+# Monkeypatch [] into Bignum and Fixnum using class_eval.
+#
+# (This is necessary because [] is defined directly on the classes, and a mixin
+#  module will still be overridden by Big/Fixnum's native [] method.)
+#
+[Bignum, Fixnum].each do |klass|
+  
+  klass.class_eval do
+    
+    alias_method :bit, :"[]"
+    
+    #
+    # Extends [] so that Integers can be sliced as if they were arrays.
+    #
+    def [](arg)
+      case arg
+      when Integer
+        self.bit(arg)
+      when Range
+        self.bits[arg]
+      end
+    end
+    
+  end
+  
 end
 
+
 class String
   
   #
@@ -141,7 +249,7 @@ class String
   def tighten
     gsub(/[\t ]+/,' ').strip
   end
-  
+
   #
   # Remove redundant whitespace AND newlines.
   #
@@ -149,6 +257,14 @@ class String
     gsub(/\s+/,' ').strip
   end
 
+  #
+  # Remove ANSI color codes.
+  #
+  def strip_color
+    gsub(/\e\[.*?(\d)+m/, '')
+  end
+  alias_method :strip_ansi, :strip_color 
+
   #
   # Like #lines, but skips empty lines and removes \n's.
   #
@@ -157,6 +273,7 @@ class String
     split($/).select{|l| not l.blank? }
   end
   
+  alias_method :nicelines,   :nice_lines
   alias_method :clean_lines, :nice_lines
 
   #
@@ -194,20 +311,51 @@ class String
     end      
   end
   
+
+
+  #
+  # Cached constants for base62 decoding.
+  #  
+  BASE62_DIGITS  = Hash[ Integer::BASE62_DIGITS.map.with_index{|letter,index| [letter,index]} ]
+  BASE62_BASE    = Integer::BASE62_BASE
+  
+  #
+  # Convert a string (encoded in base16 "hex" -- for example, an MD5 or SHA1 hash)
+  # into "base62" format. (See Integer#to_base62 for more info.)  
+  #
+  def to_base62
+    to_i(16).to_base62
+  end
+  
+  #
+  # Convert a string encoded in base62 into an integer.
+  # (See Integer#to_base62 for more info.)
+  #
+  def from_base62
+    accumulator = 0
+    digits = chars.map { |c| BASE62_DIGITS[c] }.reverse
+    digits.each_with_index do |digit, power|
+      accumulator += (BASE62_BASE**power) * digit if digit > 0
+    end
+    accumulator
+  end
+
   #
   # Decode a mime64/base64 encoded string
   #
-  def decode64
+  def from_base64
     Base64.decode64 self
   end
+  alias_method :decode64, :from_base64 
   
   #
   # Encode into a mime64/base64 string
   #
-  def encode64
+  def to_base64
     Base64.encode64 self
   end
-  alias_method :base64, :encode64
+  alias_method :base64,   :to_base64
+  alias_method :encode64, :to_base64
 
   #
   # MD5 the string
@@ -274,59 +422,16 @@ class String
     JSON.parse self
   end
   
-end
-
-
-class Integer
-  
-  #
-  # 'true' if the integer is 0
-  #
-  def blank?; self == 0; end
-
   #
-  # Convert the number into a hexadecimal string representation.
+  # Convert the string to a Path object.
   #
-  def to_hex
-    "%0.2x" % self
+  def as_path
+    Path[self]
   end
-    
-  #
-  # Convert the number to an array of bits (least significant digit first, or little-endian).
-  #
-  def to_bits
-    # TODO: Why does thos go into an infinite loop in 1.8.7?
-    ("%b" % self).chars.to_a.reverse.map(&:to_i)
-  end
-  alias_method :bits, :to_bits
-  
-end
-
-
-#
-# Monkeypatch [] into Bignum and Fixnum using class_eval.
-#
-# (This is necessary because [] is defined directly on the classes, and a mixin
-#  module will still be overridden by Big/Fixnum's native [] method.)
-#
-[Bignum, Fixnum].each do |klass|
+  alias_method :to_p, :as_path
   
-  klass.class_eval do
-    
-    alias_method :bit, :"[]"
-    
-    #
-    # Extends [] so that Integers can be sliced as if they were arrays.
-    #
-    def [](arg)
-      case arg
-      when Integer
-        self.bit(arg)
-      when Range
-        self.bits[arg]
-      end
-    end
-    
+  def unmarshal
+    Marshal.restore self
   end
   
 end
@@ -392,6 +497,21 @@ class Array
     (self | other) - (self & other)
   end
   
+  #
+  # Pick a random element.
+  #
+  def pick
+    self[rand(size)]
+  end
+  
+  #
+  # Divide the array into n pieces.
+  #
+  def / pieces 
+    piece_size = (size.to_f / pieces).ceil
+    each_slice(piece_size).to_a
+  end
+
 end
 
 
@@ -417,6 +537,7 @@ module Enumerable
   #                                  (default: false)
   #   :after => true             #=> split after the matched element (only has an effect when used with :include_boundary)  
   #                                  (default: false)
+  #   :once => flase             #=> only perform one split (default: false)
   #
   # Examples: 
   #   [1,2,3,4,5].split{ |e| e == 3 }                           
@@ -448,10 +569,13 @@ module Enumerable
 
     chunks = []
     current_chunk = []
+    
+    splits = 0
+    max_splits = options[:once] == true ? 1 : options[:max_splits]    
 
     each do |e|
 
-      if boundary_test_proc.call(e)
+      if boundary_test_proc.call(e) and (max_splits == nil or splits < max_splits)
         
         if current_chunk.empty? and not include_boundary 
           next # hit 2 boundaries in a row... just keep moving, people!
@@ -468,6 +592,8 @@ module Enumerable
           current_chunk = []                              # start a new result
           current_chunk << e        if include_boundary   # include the boundary, if necessary
         end
+
+        splits += 1
         
       else
         current_chunk << e
@@ -507,7 +633,11 @@ module Enumerable
   # Sum the elements
   #  
   def sum
-    inject(0) { |total,n| total + n }
+    if block_given?
+      inject(0) { |total,elem| total + yield(elem) }    
+    else
+      inject(0) { |total,elem| total + elem }
+    end
   end
   
   #
@@ -656,11 +786,12 @@ class Object
   #
   def bench(message=nil)
     start = Time.now
-    yield
+    result = yield
     elapsed = Time.now - start
     
     print "[#{message}] " if message
-    puts "elapsed time: %0.5fs" % elapsed 
+    puts "elapsed time: %0.5fs" % elapsed
+    result
   end
   alias time bench
   
@@ -937,3 +1068,21 @@ def dmsg(msg)
 end
 
 
+def del(x)
+  case thing
+    when String
+      del(x.to_sym)
+    when Class, Module
+      Object.send(:remove_const, x)
+    when Method
+      x.owner.send(:undef_method, x.name)
+    when Symbol
+      if Object.const_get(x)
+        Object.send(:remove_const, x)
+      elsif method(x)
+        undef_method x
+      end
+    else
+      raise "Error: don't know how to 'del #{x.inspect}'"
+  end
+end