zucker 2 → 3

data/lib/zucker/3/iterate.rb

@@ -0,0 +1,23 @@
+def iterate(*params)
+  # params.shift.zip(*params).each{ |*elements| yield *elements }
+
+  first = params.shift
+  if params.empty? # single param - like each
+    if block_given?
+      first.map{|e| yield e }
+    else
+      first.map
+    end
+  else
+    padded_first = Array.new( [first, *params].max_by(&:size).size ){|i| first[i] } # append nils
+    obj = padded_first.zip *params
+    if block_given?
+      obj.map{|es| yield *es }
+    else
+      obj.map.to_enum
+    end
+  end
+end
+
+# J-_-L
+

data/lib/zucker/3/ivars.rb

@@ -0,0 +1,26 @@
+def instance_variables_from(obj, *only)
+  iter =
+  if    obj.is_a? Binding
+    obj.eval('local_variables').map{|e| [obj.eval("#{e}"), e] }
+  elsif obj.is_a? Hash
+    obj.map{|k,v| [v,k] }
+  else
+#  elsif obj.is_a? Enumerable
+    obj.each.with_index
+  end
+
+  ret = []
+  iter.each{ |value, arg|
+    arg = arg.to_s
+    if only.include?(arg) || only.include?(arg.to_sym) || only.empty?
+      arg = '_' + arg  if (48..57).member? arg.unpack('C')[0]  # 1.8+1.9
+      ret << ivar = :"@#{arg}"
+      self.instance_variable_set ivar, value
+    end
+  }
+  ret
+end
+alias ivars instance_variables_from
+
+# J-_-L
+

data/lib/zucker/3/kernel.rb

@@ -0,0 +1,48 @@
+module Kernel
+  def activate_warnings!
+    $VERBOSE = true
+  end
+  
+  def deactivate_warnings!
+    $VERBOSE = false
+  end
+  
+  def library?
+    __FILE__ != $PROGRAM_NAME
+  end
+  
+  def executed_directly?
+    __FILE__ == $PROGRAM_NAME
+  end
+  alias standalone? executed_directly?
+  
+  def ignore_sigint! # ctrl+c
+     Signal.trap *%w|SIGINT IGNORE|
+  end
+
+  # version getter  
+  def ruby_1_9?
+    RUBY_VERSION[2,1] == '9'
+  end
+
+  def ruby_1_8?
+    RUBY_VERSION[2,1] == '8'
+  end
+
+  def ruby_1_9!
+    if RUBY_VERSION[2,1] != '9'
+      fail NotImplementedError, "Sorry, this script requires Ruby 1.9, but was executed with a different Ruby version!"
+    end
+    true
+  end
+
+  def ruby_1_8!
+    if RUBY_VERSION[2,1] != '8'
+      fail NotImplementedError, "Sorry, this script requires Ruby 1.8, but was executed with a different Ruby version!"
+    end
+    true
+  end
+end
+
+# J-_-L
+

data/lib/zucker/3/mcopy.rb

@@ -0,0 +1,8 @@
+class Object
+  def mcopy
+    Marshal.load Marshal.dump self
+  end
+end
+
+# J-_-L
+

data/lib/zucker/3/mm.rb

@@ -0,0 +1,31 @@
+module Kernel
+  def method_list(levels = 1)
+    if self.is_a? Module
+      klass, method_function = self, :public_methods
+    else
+      klass, method_function = self.class, :public_instance_methods
+
+      eigen = self.singleton_methods
+      if !eigen.empty?
+        puts :Eigenclass # sorry for not being up to date, I just love the word
+        p self.singleton_methods
+      end
+    end
+
+    levels.times{ |level|
+      if cur = klass.ancestors[level]
+        p cur                               # put class name
+        p cur.send method_function, false   # put methods of the class
+      else
+        break
+      end
+    }
+
+    self # or whatever
+  end
+
+  alias mm method_list
+end
+
+# J-_-L
+

data/lib/zucker/3/not.rb

@@ -0,0 +1,17 @@
+class Object
+  def not
+    NotClass.new self
+  end
+
+  class NotClass < BasicObject
+    def initialize(receiver)
+      @receiver = receiver
+    end
+    
+    def method_missing(m, *args, &block)
+      not @receiver.public_send( m, *args, &block )
+    end
+  end
+end
+
+# J-_-L

data/lib/zucker/3/regexp2proc.rb

@@ -0,0 +1,10 @@
+class Regexp
+  def to_proc
+    proc do |e|
+      e.to_s[self]
+    end
+  end
+end
+
+# J-_-L
+

data/lib/zucker/3/sandbox.rb

@@ -0,0 +1,19 @@
+def sandbox(rescueblock_or_default=nil)
+  Thread.start do
+    $SAFE = 4
+    yield
+  end.value
+rescue SecurityError => e
+  if !rescueblock_or_default.nil?
+    if rescueblock_or_default.is_a? Proc
+      rescueblock_or_default.call e
+    else
+      rescueblock_or_default
+    end
+  else
+    raise e
+  end
+end
+
+# J-_-L
+

data/lib/zucker/3/square_brackets_for.rb

@@ -0,0 +1,20 @@
+def square_brackets_for(ivar, assignment = true)
+#  undef []   if respond_to? :[]
+#  undef []=  if respond_to? :[]=
+
+#instance_eval do
+  define_method :[] do |key|
+    (instance_variable_get :"@#{ivar}")[key]
+  end
+
+  if assignment
+    define_method :[]= do |key, value|
+      (instance_variable_get :"@#{ivar}")[key] = value
+    end
+  end
+#end
+
+end
+
+# J-_-L
+

data/lib/zucker/3/string.rb

@@ -0,0 +1,47 @@
+class String
+  def ^(pos)
+    pos = pos.to_i
+    if pos >= 0
+      self[pos..-1]
+    else
+      self[0...pos]
+    end
+  end
+
+  def lchomp(arg = $/)
+    self.reverse.chomp(arg).reverse
+  end
+
+  def lchomp!(arg = $/)
+    self.reverse.chomp!(arg).reverse
+  end
+
+  def ords
+    self.unpack 'C*'
+  end
+
+  def constantize(default_value = nil) # always uses global scope as in AS... is this good?
+    get_constant = lambda{
+      self.split(/::/).inject( Object ){ |base_constant, current_constant|
+        base_constant.const_get current_constant
+      }      
+    }
+
+    if !default_value && !block_given?
+      get_constant.call
+    else
+      begin
+        get_constant.call
+      rescue NameError
+        if block_given?
+          yield self
+        else
+          default_value
+        end
+      end
+    end
+  end
+end
+
+# J-_-L
+

data/lib/zucker/3/tap.rb

@@ -0,0 +1,9 @@
+def tap_on(obj, &block)
+  obj.tap &block
+end
+
+def make_new(what, *args, &block)
+  what.new(*args).tap &block
+end
+
+# J-_-L

data/lib/zucker/3/unary.rb

@@ -0,0 +1,22 @@
+class String
+  def +@
+    self
+  end
+
+  def -@
+    to_sym
+  end
+end
+
+class Symbol
+  def +@
+    to_s
+  end
+
+  def -@
+    self
+  end
+end
+
+# J-_-L
+

data/lib/zucker/3/union.rb

@@ -0,0 +1,14 @@
+class Regexp
+  def |(arg)
+    Regexp.union self, arg.is_a?(Regexp) ? arg : arg.to_s
+  end
+end
+
+class String
+  def |(arg)
+    Regexp.union self, arg.is_a?(Regexp) ? arg : arg.to_s
+  end
+end
+
+# J-_-L
+

data/lib/zucker/alias_for.rb

@@ -0,0 +1,19 @@
+def alias_for(m, *aliases)
+  aliases.each{ |a|
+    class_eval "alias #{a} #{m}"
+  }
+end
+alias aliases_for alias_for
+
+class Module
+  def alias_method_for(m, *alias_methods)
+    alias_methods.each{ |a|
+      class_eval do
+        alias_method a.to_sym, m.to_sym
+      end
+    }
+  end
+  alias alias_methods_for alias_method_for
+end
+
+# J-_-L

data/lib/zucker/array.rb

@@ -4,8 +4,14 @@ class Array
     (other - self)
   end
 
-  def sum # sry, you just need this one too often
-    inject :+
+  # can take an argument & block to be Rails compatible
+  def sum(identity = 0, &block)
+    # inject(:+)
+    if block_given?
+      map(&block).sum( identity )
+    else
+      inject(:+) || identity
+    end
   end
 
   def chrs

data/lib/zucker/debug.rb

@@ -1,3 +1,5 @@
+require 'zucker'
+
 require 'zucker/D'
 require 'zucker/mm'
 require 'zucker/binding'

data/lib/zucker/default.rb

@@ -1,5 +1,8 @@
+require 'zucker'
+
 # default
 zucker = %w|
+alias_for
 aliases
 array
 array2proc
@@ -9,17 +12,24 @@ egonil
 enumerable
 hash
 hash2proc
+info
 iterate
 ivars
 kernel
 mcopy
+not
 regexp2proc
 sandbox
 square_brackets_for
 string
+tap
 unary
 union
 |
 
-zucker.each{|rb| require "zucker/#{rb}"}
+# remove 1.9 if 1.8
+if RUBY_VERSION < '1.9'
+  zucker -= %w|not tap union|
+end
 
+zucker.each{|rb| require File.join( 'zucker', rb )}

data/lib/zucker/info.rb

@@ -5,7 +5,10 @@ module Info
       send what
     end
 
-    # TODO: maybe add a descriptions method
+    # list available info methods
+    def list
+      singleton_methods - [:[], :list, '[]', 'list']
+    end
   end
 
   module_function
@@ -124,7 +127,7 @@ module Info
 
   # defined objects
   def global_variables
-    global_variables
+    Object.send :global_variables
   end
 
   def global_constants

data/lib/zucker/kernel.rb

@@ -1,17 +1,47 @@
-def activate_warnings!
-  $VERBOSE = true
-end
+module Kernel
+  def activate_warnings!
+    $VERBOSE = true
+  end
+  
+  def deactivate_warnings!
+    $VERBOSE = false
+  end
+  
+  def library?
+    __FILE__ != $PROGRAM_NAME
+  end
+  
+  def executed_directly?
+    __FILE__ == $PROGRAM_NAME
+  end
+  alias standalone? executed_directly?
+  
+  def ignore_sigint! # ctrl+c
+     Signal.trap *%w|SIGINT IGNORE|
+  end
 
-def deactivate_warnings!
-  $VERBOSE = false
-end
+  # version getter  
+  def ruby_1_9?
+    RUBY_VERSION[2,1] == '9'
+  end
 
-def library?
-  __FILE__ != $PROGRAM_NAME
-end
+  def ruby_1_8?
+    RUBY_VERSION[2,1] == '8'
+  end
+
+  def ruby_1_9!
+    if RUBY_VERSION[2,1] != '9'
+      fail NotImplementedError, "Sorry, this script requires Ruby 1.9, but was executed with a different Ruby version!"
+    end
+    true
+  end
 
-def ignore_sigint! # ctrl+c
-   Signal.trap *%w|SIGINT IGNORE|
+  def ruby_1_8!
+    if RUBY_VERSION[2,1] != '8'
+      fail NotImplementedError, "Sorry, this script requires Ruby 1.8, but was executed with a different Ruby version!"
+    end
+    true
+  end
 end
 
 # J-_-L