rmtools 1.0.0 → 1.1.0

data/History.txt

@@ -2,3 +2,8 @@
 
 * Divided by classes and packed as gem
 
+=== Version 1.1.0
+
+* Fixed some bugs
+* Divided by semantics
+* Compatible with ruby 1.8.7 (2010-08-16 patchlevel 302)

data/Manifest.txt

@@ -2,34 +2,92 @@ ext/extconf.rb
 ext/rmtools.h
 ext/rmtools.cpp
 lib/rmtools.rb
-lib/rmtools/arguments.rb
-lib/rmtools/numeric.rb
-lib/rmtools/string.rb
-lib/rmtools/io.rb
-lib/rmtools/js.rb
-lib/rmtools/cyrilic.rb
-lib/rmtools/coloring.rb
-lib/rmtools/stringscanner.rb
-lib/rmtools/enum.rb
-lib/rmtools/string_to_proc.rb
-lib/rmtools/traceback.rb
+lib/rmtools/db/active_record.rb
+lib/rmtools/fs/io.rb
+lib/rmtools/fs/file.rb
+lib/rmtools/fs/dir.rb
+lib/rmtools/fs/tools.rb
+lib/rmtools/ip/numeric.rb
+lib/rmtools/ip/string.rb
+lib/rmtools/xml/xpath.rb
+lib/rmtools/xml/string.rb
+lib/rmtools/xml/libxml.rb
+lib/rmtools/xml/finders.rb
+lib/rmtools/xml/node.rb
+lib/rmtools/xml/document.rb
+lib/rmtools/b.rb
+lib/rmtools/core/arguments.rb
+lib/rmtools/core/numeric.rb
+lib/rmtools/core/js.rb
+lib/rmtools/core/string_compliance.rb
+lib/rmtools/core/kernel.rb
+lib/rmtools/core/boolean.rb
+lib/rmtools/core/module.rb
+lib/rmtools/core/object.rb
+lib/rmtools/core/regexp.rb
+lib/rmtools/core/class.rb
+lib/rmtools/core/proc.rb
+lib/rmtools/lang/shortcuts.rb
+lib/rmtools/lang/ansi.rb
+lib/rmtools/lang/regexp.rb
+lib/rmtools/lang/cyrillic.rb
+lib/rmtools/rand/string.rb
+lib/rmtools/rand/enum.rb
+lib/rmtools/rand/range.rb
+lib/rmtools/rand/array.rb
+lib/rmtools/text/string_simple.rb
+lib/rmtools/text/string_scanner.rb
+lib/rmtools/text/textilize.rb
+lib/rmtools/text/string_split.rb
+lib/rmtools/text/string_parse.rb
+lib/rmtools/time/russian.rb
+lib/rmtools/time/global.rb
+lib/rmtools/rand.rb
+lib/rmtools/console/coloring.rb
+lib/rmtools/console/printing.rb
+lib/rmtools/console/highlight.rb
+lib/rmtools/core.rb
+lib/rmtools/db.rb
+lib/rmtools/debug/present.rb
+lib/rmtools/debug/traceback.rb
+lib/rmtools/debug/binding.rb
+lib/rmtools/debug/logging.rb
+lib/rmtools/debug/highlight.rb
+lib/rmtools/debug/timer.rb
+lib/rmtools/fs.rb
+lib/rmtools/ip.rb
+lib/rmtools/lang.rb
+lib/rmtools/functional.rb
+lib/rmtools/experimental.rb
+lib/rmtools/functional/string_to_proc.rb
+lib/rmtools/functional/fold.rb
+lib/rmtools/functional/unfold.rb
+lib/rmtools/text.rb
+lib/rmtools/console.rb
 lib/rmtools/time.rb
-lib/rmtools/random.rb
-lib/rmtools/binding.rb
-lib/rmtools/printing.rb
-lib/rmtools/range.rb
-lib/rmtools/tree.rb
-lib/rmtools/boolean.rb
-lib/rmtools/hash.rb
-lib/rmtools/logging.rb
-lib/rmtools/limited_string.rb
-lib/rmtools/module.rb
-lib/rmtools/object.rb
-lib/rmtools/array.rb
+lib/rmtools/debug_notrace.rb
+lib/rmtools/debug.rb
+lib/rmtools/enumerable/common.rb
+lib/rmtools/enumerable/range.rb
+lib/rmtools/enumerable/hash.rb
+lib/rmtools/enumerable/array.rb
+lib/rmtools/enumerable/object_space.rb
+lib/rmtools/enumerable/array_iterators.rb
+lib/rmtools/require.rb
+lib/rmtools/experimental/numeric.rb
+lib/rmtools/experimental/string.rb
+lib/rmtools/experimental/blackhole.rb
+lib/rmtools/experimental/tree.rb
+lib/rmtools/experimental/deprecation.rb
+lib/rmtools/experimental/dumps.rb
+lib/rmtools/experimental/rails_backtrace.rb
+lib/rmtools/xml.rb
+lib/rmtools/conversions.rb
 lib/rmtools/setup.rb
-lib/rmtools/cyr-time.rb
-lib/rmtools/dumps.rb
-lib/rmtools/proc.rb
+lib/rmtools/conversions/string.rb
+lib/rmtools/conversions/enum.rb
+lib/rmtools/conversions/int.rb
+lib/rmtools/enumerable.rb
 ./Rakefile
 ./Manifest.txt
 ./License.txt

data/Rakefile

@@ -4,7 +4,7 @@ compile_manifest
 
 begin
     require 'hoe'
-    config = Hoe.new('rmtools', '1.0.0') do |h|
+    config = Hoe.new('rmtools', '1.1.0') do |h|
         h.developer("Shinku Templar", "tinbka@gmail.com")
 
         h.summary = 'Yet another Ruby applied framework'
@@ -13,7 +13,7 @@ begin
         h.url = 'http://github.com/tinbka'
        
         h.extra_deps << ['rake','>= 0.8.7']
-        h.extra_deps << ['activesupport','>= 2.3.5']
+        h.extra_deps << ['activesupport','>= 2.3.8']
     end
     config.spec.extensions << 'ext/extconf.rb'
 rescue LoadError
@@ -23,6 +23,8 @@ rescue Exception => e
     STDERR.puts "error message is: #{e.message}"
 end
 
+puts "Installing RMTools..."
+
 ruby  = RbConfig::CONFIG['RUBY_INSTALL_NAME']
 windoze = PLATFORM =~ /mswin32/
 make = windoze ? 'nmake' : 'make'
@@ -35,5 +37,6 @@ Dir.chdir "ext" do
   if File.file? 'Makefile'
     system "#{make} clean" and FileUtils.rm_f "Makefile"
   end
-end unless ext_files_not_modified
-  
+end unless ext_files_not_modified 'rmtools', '1.1.0'
+  
+puts "RMTools installed!"

data/ext/extconf.rb

@@ -5,7 +5,7 @@ if RUBY_VERSION >= "1.9"
     $CFLAGS += " -DRUBY_IS_19"
 end
 
-$LDFLAGS += "-module"
+$LDFLAGS += " -module"
 
 dir_config("ruby19")
 create_makefile("rmtools")

data/ext/rmtools.cpp

@@ -225,19 +225,24 @@ static VALUE rb_ary_uniq_by(VALUE ary)
 /*
  *   Make hash with unique items of +self+ or (when block given)
  *   unique results of items yield for keys and 
- *   count of them in +self, or (with option :fill) arrays of themselves, 
- *   or (with option :indexes) arrays of indexes of them for values
+ *   count of them in +self, 
+ *   or (with option :fill) arrays of yield results, 
+ *   or (with option :indexes) arrays of indexes of them,
+ *   or (with option :group) arrays of themselves for values
  *   
- *   [1, 2, 2, 3, 3, 3].count
- *   => {1=>1, 2=>2, 3=>3}
- *   [1, 2, 2, 3, 3, 3].count :fill
- *   => {1=>[1], 2=>[2, 2], 3=>[3, 3, 3]}
- *   [1, 2, 2, 3, 3, 3].count :indexes
- *   => {1=>[0], 2=>[1, 2], 3=>[3, 4, 5]}
- *   [1, 2, 2, 3, 3, 3].count(:indexes) {|i| i%2}
- *   => {0=>[1, 2], 1=>[0, 3, 4, 5]}
- *   [1, 2, 2, 3, 3, 3].count {|i| i%2}
- *   => {0=>2, 1=>4}
+ *   [1, 2, 2, 2, 3, 3].count
+ *   => {1=>1, 2=>3, 3=>2}
+ *   [1, 2, 2, 2, 3, 3].count {|i| i%2}
+ *   => {0=>3, 1=>3}
+ *   [1, 2, 2, 2, 3, 3].count :fill
+ *   => {1=>[1], 2=>[2, 2, 2], 3=>[3, 3]}
+ *   [1, 2, 2, 2, 3, 3].count :indexes
+ *   => {1=>[0], 2=>[1, 2, 3], 3=>[4, 5]}
+ *   [1, 2, 2, 2, 3, 3].count(:indexes) {|i| i%2}
+ *   => {0=>[1, 2, 3], 1=>[0, 4, 5]}
+ *   :group is analogue to rails' group_by but twice faster
+ *   [1, 2, 2, 2, 3, 3].count(:group) {|i| i%2}
+ *   => {0=>[2, 2, 2], 1=>[1, 3, 3]}
  */
 static VALUE rb_ary_count_items(int argc, VALUE *argv, VALUE ary)
 {
@@ -276,6 +281,16 @@ static VALUE rb_ary_count_items(int argc, VALUE *argv, VALUE ary)
   return hash;
 }
 
+/*
+ *  call-seq:
+ *     ary.partition {| obj | block }  => [ true_array, false_array ]
+ *  
+ *  Same as Enumerable#partition, but twice faster
+ *     
+ *     [5, 6, 1, 2, 4, 3].partition {|i| (i&1).zero?}   #=> [[2, 4, 6], [1, 3, 5]]
+ *     
+ */
+
 static VALUE rb_ary_partition(VALUE ary)
 {
   VALUE select, reject;

data/ext/rmtools.h

@@ -94,12 +94,13 @@ static const size_t SLOT_SIZE = sizeof(RVALUE);
 #include <re.h>
 
 # define STR_SET_LEN(x, i) (RSTRING(x)->len = (i))
- 
+
+#ifndef RFLOAT_VALUE
 # define RFLOAT_VALUE(f) (RFLOAT(f)->value)
- 
 # define RBIGNUM_DIGITS(f) (RBIGNUM(f)->digits)
 # define RBIGNUM_LEN(f) (RBIGNUM(f)->len)
- 
+#endif 
+
 # define ARY_SET_LEN(x, i) (RARRAY(x)->len = (i))
 
 # define BDIGITS(x) ((BDIGIT*)RBIGNUM(x)->digits)
@@ -141,11 +142,11 @@ static const size_t SLOT_SIZE = sizeof(RVALUE);
 
 
 // shortcuts for debug r_r
-extern void rb_log_std(const char* str)
+extern void rb_log(const char* str)
 {
   rb_funcall(rb_gv_get("$log"), rb_intern("debug"), 1, rb_str_new2(str));
 }
-extern void rb_log_obj_std(VALUE obj)
+extern void rb_log_obj(VALUE obj)
 {
   rb_funcall(rb_gv_get("$log"), rb_intern("debug"), 1, obj);
 }

data/lib/rmtools/b.rb

@@ -0,0 +1,18 @@
+# {obj.b -> self or false} with python logic
+# Since 2.3.8 active_support has analogue: #presence
+
+class Object
+  def b; self end
+end
+class Numeric
+  def b; !zero? && self end
+end
+class String
+  def b; !empty? && self end
+end
+class Proc
+  def b; (self != NULL) && self end
+end
+module Enumerable
+  def b; !empty? && self end
+end

data/lib/rmtools/console/coloring.rb

@@ -0,0 +1,72 @@
+# encoding: utf-8
+module RMTools
+
+  class Coloring
+    __init__
+    method_defined? :b and undef_method :b
+    method_defined? :p and undef_method :p
+        
+    if !defined? ::BOLD
+      BOLD = 1
+      UNDERLINE = 4
+      GRAYBG = 5
+      BOLDBG = 7
+            
+      KEY = BLACK = 30
+      RED = 31
+      GREEN = 32
+      YELLOW = 33
+      BLUE = 34
+      PURPLE = 35
+      CYAN = 36
+      GRAY = 37
+            
+      Colors = {:black => 30, :red => 31, :green => 32, :yellow => 33, :blue => 34, :purple => 35, :cyan => 36, :gray => 37,
+                    :k => 30, :r => 31, :g => 32, :y => 33, :b => 34, :p => 35, :c => 36
+                  }.unify_keys
+      Effects = {:bold => 1, :underline => 4, :graybg => 5, :boldbg => 7,
+                      :b => 1, :u => 4, :gbg => 5, :bbg => 7
+                  }.unify_keys   
+    end
+        
+    def paint(str, num=nil, effect=nil)
+      # default cmd.exe cannot into ANSI
+      return str if ENV['ComSpec'] =~ /cmd(.exe)?$/
+      num = Colors[num] if num.is String
+      effect = Effects[effect] if effect.is String
+      if num and effect
+        "\e[#{effect};#{num}m#{str}\e[m"
+      elsif effect
+        "\e[#{effect}m#{str}\e[m"
+      elsif num
+        "\e[#{num}m#{str}\e[m"
+      else str    
+      end 
+    end
+        
+    def method_missing(m, str)
+      paint str, *(m.to_s/"_")
+    end
+        
+    def clean str
+      str.gsub(/\e\[.*?m/, '')
+    end
+    
+  end
+  
+  Painter = Coloring.new
+  ['sub', 'gsub', 'sub!', 'gsub!'].each {|m| 
+    Coloring.module_eval "
+    def #{m.sub 'sub', 'hl'} str, pattern, color=:red_bold
+        str.#{m}(pattern) {|word| send color, word}
+    end
+  "
+    module_eval "
+    def #{m.sub 'sub', 'hl'} str, pattern, color=:red_bold
+        str.#{m}(pattern) {|word| Painter.send color, word}
+    end
+  "
+  #      module_function m.to_sym
+  }
+  
+end

data/lib/rmtools/console/highlight.rb

@@ -0,0 +1,13 @@
+require_with_path 'console/coloring'
+
+class String
+  
+  def find_hl(pat, range=1000) idx = case pat
+    when String;   index pat
+    when Regexp; self =~ pat
+    else raise TypeError, "pattern must be string or regexp"
+    end
+    puts RMTools.ghl(self[[idx-range, 0].max, 2*range], pat)
+  end
+  
+end

data/lib/rmtools/{printing.rb → console/printing.rb}

@@ -1,16 +1,23 @@
 module RMTools
 
+  # transparent print: print text (or object details) and erase it
   class TempPrinter
     __init__
     
     def initialize object=nil, format=nil
       if @object = object
         @format = '"' + format.gsub(/:([a-z_]\w*)/, '#{@\1.inspect}') + '"'
+      else
+        @format = format
       end
     end
     
-    def format_str
-      @object.instance_eval @format
+    def format_str params_hash=nil
+      if params_hash
+        params_hash.each {|k, v| @format.sub! ":#{k}", v.inspect}
+      else
+        @object.instance_eval @format
+      end
     end
 
     def p(str=format_str)
@@ -38,4 +45,12 @@ module RMTools
     
   end
   
+end
+
+module RMTools
+
+  def tick!
+    print %W{|\b /\b -\b \\\b +\b X\b}.rand
+  end
+    
 end

data/lib/rmtools/console.rb

@@ -0,0 +1 @@
+require_with_path __FILE__, '*'

data/lib/rmtools/conversions/enum.rb

@@ -0,0 +1,23 @@
+require 'cgi'
+
+module Enumerable
+  
+  # Simple http stringifying. Also stringifies multi-value hashes
+  # {'a'=>'10&20&30'}.urlencode
+  # => "a=10&a=20&a=30"
+  def urlencode
+    map {|k, v| next if !v
+      k, v = k.to_s, v.to_s
+      if v =~ /&/
+        v = v/'&'
+        v.map {|val| "#{CGI.escape(k)}=#{CGI.escape(val)}"} * '&'
+      elsif k =~ /&/
+        k = k/'&'
+        k.map {|key| "#{CGI.escape(key)}=#{CGI.escape(v)}"} * '&'
+      else
+        "#{CGI.escape(k)}=#{CGI.escape(v)}" 
+      end
+    } * '&'
+  end
+    
+end

data/lib/rmtools/conversions/int.rb

@@ -0,0 +1,47 @@
+class Integer
+  
+    def kb;  self*1024 end
+    def mb; self*1048576 end
+    def gb;  self*1073741824 end
+
+    def to_timestr(t=nil)
+      if t
+        if t.in [:minutes, :min, :m]
+          "#{self/60} minutes"
+        elsif t.in [:hours, :h]
+          "#{self/3600} hours"
+        elsif t.in [:days, :d]
+          "#{self/86400} days"
+        end
+      elsif self < 60
+        "#{self} seconds"
+      elsif self < 3600
+        "#{self/60} minutes"
+      elsif self < 86400
+        "#{self/3600} hours"
+      else
+        "#{self/86400} days"
+      end
+    end
+    
+    def bytes(t=nil)
+      if t
+        if :kb == t
+          "%.2fKB"%[to_f/1024]
+        elsif :mb == t
+          "%.2fMB"%[to_f/1048576]
+        elsif :gb == t
+          "%.2fGB"%[to_f/1073741824]
+        end
+      elsif self < 1024
+        "#{self}B"
+      elsif self < 1048576
+        "%.2fKB"%[to_f/1024]
+      elsif self < 1073741824
+        "%.2fMB"%[to_f/1048576]
+      else
+        "%.2fGB"%[to_f/1073741824]
+      end
+    end
+    
+  end

data/lib/rmtools/conversions/string.rb

@@ -0,0 +1,26 @@
+require 'cgi'
+
+class String
+
+  # with default delimiters - inversion of #urlencode
+  def to_hash(unscp=true, params_delim='&', k_v_delim='=')
+    params = split(params_delim)
+    h = {}
+    params.each {|par|
+      str = par.split(k_v_delim, 2)
+      if unscp
+        h[CGI.unescape(str[0]) || ''] = CGI.unescape(str[1] || '')
+      else
+        h[str[0]] = str[1]
+      end
+    }
+    h
+  end
+  
+  # inversion of #to_json
+  # active support activesupport
+  def from_json
+    ActiveSupport::JSON.decode self
+  end
+
+end

data/lib/rmtools/conversions.rb

@@ -0,0 +1 @@
+require_with_path __FILE__, '*'

data/lib/rmtools/core/arguments.rb

@@ -0,0 +1,52 @@
+require 'active_support/core_ext/hash'
+
+class Array
+  
+  # a, b, opts = [<hash1>].fetch_opts([<hash2>, <object1>]) may work unintuitive:
+  # you'll get <hash1> as `a' and not as `opts'
+  # So if function is not implying that some argument other than `opts' definetly 
+  # must be a hash, don't make hash default. 
+  # Better put hashie argument into opts like
+  # b, opts = [<hash1>].fetch([<object1>], :a => <hash2>)
+  # and get `a' from `'opts' hash
+  def fetch_opts(defaults=[], opts={})
+    if Hash === defaults
+      opts = defaults
+      defaults = []
+      $log.warn "fetch_opts(<hash>) now changed"
+    end
+    opts &&= if self[-1].kind_of?(Hash) and !defaults[size-1].kind_of?(Hash)
+      opts.merge pop
+    else
+      opts.dup
+    end
+    if defaults == :flags
+      defauls = [:flags]
+    end
+    if defaults.last == :flags
+      defaults.pop
+      flags = defaults.size..-1
+      if defaults.size < size
+        self[flags].each {|flag| opts[flag] = true}
+        self[flags] = []
+      end
+    end
+    each_index {|i| import(defaults, i) if self[i] == :def}
+    defaults.slice! 0, size
+    concat defaults << opts
+  end
+  alias :fetch_options :fetch_opts
+  alias :get_opts :fetch_opts
+
+  def valid_types(pattern_ary)
+    each_with_index.find {|var, i|
+      pattern = pattern_ary[i]
+      if pattern.is Array
+             pattern.find {|j| !(pattern[j] === var[i])}
+      else !(pattern === var[i])
+      end
+    }
+  end
+  
+end
+

data/lib/rmtools/{boolean.rb → core/boolean.rb}

@@ -1,17 +1,4 @@
 # encoding: utf-8
-class Numeric
-  def b; (self != 0) && self end
-end
-class String
-  def b; !empty? && self end
-end
-class Proc
-  def b; (self != NULL) && self end
-end
-module Enumerable
-  def b; !empty? && self end
-end
-
 class TrueClass
   def to_i; 1; end
   def <=>(obj)

data/lib/rmtools/core/class.rb

@@ -0,0 +1,41 @@
+class Class
+  
+  # define python-style initializer
+  def __init__
+    modname, classname = name.match(/^(?:(.+)::)?([^:]+)$/)[1..2]
+    classname ||= modname
+    mod = '::'.in(name) ? eval(modname) : RMTools
+    mod.module_eval "def #{classname} *args; #{name}.new *args end
+                  module_function :#{classname}"
+    if mod != RMTools
+      mod.each_child {|c| c.class_eval "include #{mod}; extend #{mod}" if !c.in c.children}
+    end
+  end 
+  
+  def method_proxy *vars
+    buffered_missing = instance_methods.grep(/method_missing/).sort.last || 'method_missing'
+    # next arg overrides previous
+    vars.each {|v|
+      class_eval "
+      alias #{buffered_missing.bump! '_'} method_missing
+      def method_missing *args, &block
+        #{v}.send *args, &block
+      rescue NoMethodError
+        #{buffered_missing} *args, &block
+      end"
+    }
+  end
+  
+  def personal_methods filter=//
+    (self.singleton_methods - self.superclass.singleton_methods).sort!.grep(filter)
+  end
+  
+  def my_instance_methods filter=//
+    (self.public_instance_methods - Object.public_instance_methods).sort!.grep(filter)
+  end
+  
+  def personal_instance_methods filter=//
+    (self.public_instance_methods - self.superclass.public_instance_methods).sort!.grep(filter)
+  end
+  
+end

data/lib/rmtools/core/js.rb

@@ -0,0 +1,45 @@
+# encoding: utf-8
+# js hash getter/setter and string concat logic
+class Hash
+  
+  # hash = {}
+  # hash.abc = 123
+  # hash # => {"abc"=>123}
+  # hash.abc # => 123
+  # hash.unknown_function(321) # => raise NoMethodError
+  # hash.unknown_function # => nil
+  # hash[:def] = 456
+  # hash.def # => 456
+  def method_missing(met, *args)
+    str = met.id2name
+    if str[/=$/]
+      self[str[0..-2]] = args[0]
+    else
+      raise NoMethodError, "undefined method `#{str}' for #{self}:#{(self.class)}" if !args.empty?
+      a = self[str]
+      (a == default) ? self[met] : a
+    end
+  end
+
+end
+
+class String
+  if !method_defined? :plus
+    alias :plus :+ 
+  end
+  
+  #   immutable:
+  # '123' + 95 # => '12395'
+  # '123'.plus 95 # => raise TypeError
+  #   mutable:
+  # '123' << 95 # => '12395'
+  # '123'.concat 95 # => '123_'
+  def +(str)
+    plus str.to_s
+  end
+  
+  def <<(str)
+    concat str.to_s
+  end
+  
+end