sugar_refinery 1.0.0

data/lib/sugar_refinery.rb

@@ -0,0 +1 @@
+require_relative 'sugar_refinery/version'

data/lib/sugar_refinery/alias_for.rb

@@ -0,0 +1,15 @@
+require_relative 'version'
+
+module SugarRefinery
+  module AliasFor
+    refine Module do
+      private
+
+      def alias_for(m, *aliases)
+        aliases.each{ |a| class_eval "alias :'#{ a }' :'#{ m }'" }
+      end
+
+      alias aliases_for alias_for
+    end
+  end
+end

data/lib/sugar_refinery/all.rb

@@ -0,0 +1,5 @@
+require_relative 'version'
+
+Dir["#{File.dirname(__FILE__)}/*"].each{ |f|
+  require_relative File.basename(f)
+}

data/lib/sugar_refinery/array_op.rb

@@ -0,0 +1,15 @@
+require_relative 'version'
+
+module SugarRefinery
+  module ArrayOp
+    refine Array do
+      def ^(other)
+        (self - other) + (other - self)
+      end
+
+      def **(*o, &block)
+        product *o, &block
+      end
+    end
+  end
+end

data/lib/sugar_refinery/array_stats.rb

@@ -0,0 +1,31 @@
+require_relative 'version'
+
+module SugarRefinery
+  module ArrayStats
+    refine Array do
+      def mean
+        inject(&:+) / length.to_f
+      end
+
+      def stdev(type = :population)
+        case type
+        when :population then stdev_population
+        when :sample     then stdev_sample
+        else raise ArgumentError.new("%s is not a valid argument" % type)
+        end
+      end
+
+      def stdev_sample
+        Math.sqrt(inject(0.0) { |sum, x| sum + (mean - x) ** 2 } / (length - 1))
+      end
+
+      def stdev_population
+        Math.sqrt(inject(0.0) { |sum, x| sum + (mean - x) ** 2 } / length)
+      end
+
+      def z_score(type = :population)
+        map { |x| (x - mean) / stdev(type) }
+      end
+    end
+  end
+end

data/lib/sugar_refinery/blank.rb

@@ -0,0 +1,47 @@
+require_relative 'version'
+
+module SugarRefinery
+  module Blank
+    refine Object do
+      def blank?
+        if respond_to? :empty? then empty? else !self end
+      end
+
+      def present?
+        !blank?
+      end
+    end
+
+    refine NilClass do
+      def blank?() true end
+    end
+
+    refine FalseClass do
+      def blank?() true end
+    end
+
+    refine TrueClass do
+      def blank?() false end
+    end
+
+    refine Numeric do
+      def blank?() false end
+    end
+
+    refine Array do
+      def blank?() empty? end
+    end
+
+    refine Hash do
+      def blank?() empty? end
+    end
+
+    refine String do
+      def blank?() self !~ /\S/ end
+    end
+
+    refine Regexp do
+      def blank?() self == // end
+    end
+  end
+end

data/lib/sugar_refinery/camel_snake.rb

@@ -0,0 +1,15 @@
+require_relative 'version'
+
+module SugarRefinery
+  module CamelSnake
+    refine String do
+      def to_snake
+        gsub(/(?<!^)[A-Z]/) do "_#$&" end.downcase
+      end
+
+      def to_camel
+        gsub(/(?:^|_)([a-z])/) do $1.upcase end
+      end
+    end
+  end
+end

data/lib/sugar_refinery/chain_map.rb

@@ -0,0 +1,11 @@
+require_relative 'version'
+
+module SugarRefinery
+  module ChainMap
+    refine Array do
+      def chain_map(*args)
+        args.inject(self) { |collection, action| collection.map(&action) }
+      end
+    end
+  end
+end

data/lib/sugar_refinery/constantize.rb

@@ -0,0 +1,29 @@
+require_relative 'version'
+
+module SugarRefinery
+  module Constantize
+    refine String do
+      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
+  end
+end

data/lib/sugar_refinery/dir_utils.rb

@@ -0,0 +1,20 @@
+require_relative 'version'
+require 'fileutils'
+
+module SugarRefinery
+  module DirUtils
+    refine Dir.singleton_class do
+      def join(*args)
+        File.join(*args)
+      end
+
+      def split(*args)
+        File.split(*args)
+      end
+
+      def rm(*args)
+        FileUtils.rm_r(*args)
+      end
+    end
+  end
+end

data/lib/sugar_refinery/file_force_delete.rb

@@ -0,0 +1,12 @@
+require_relative 'version'
+
+module SugarRefinery
+  module FileForceDelete
+    refine File.singleton_class do
+      def delete!(filename)
+        return nil if !File.exist?(filename)
+        File.delete filename
+      end
+    end
+  end
+end

data/lib/sugar_refinery/file_gsub.rb

@@ -0,0 +1,23 @@
+require_relative 'version'
+
+module SugarRefinery
+  module FileGsub
+    refine File.singleton_class do
+      def gsub(filename, regex_hash)
+        data = File.read filename
+        File.open(filename,'w'){ |file|
+          regex_hash.each{ |regex, new_string|
+            regex = regex.to_s unless regex.is_a? Regexp
+
+            if new_string.is_a? Proc
+              data.gsub! regex, &new_string
+            else
+              data.gsub! regex, new_string
+            end
+          }
+          file.print data
+        }
+      end
+    end
+  end
+end

data/lib/sugar_refinery/hash_op.rb

@@ -0,0 +1,28 @@
+require_relative 'version'
+
+module SugarRefinery
+  module HashOp
+    refine Hash do
+      def <<(other)
+        case
+        when other.is_a?(Hash)
+          merge! other
+        when other.is_a?(Enumerable) || other.respond_to?(:to_splat)
+          merge! Hash[*other]
+        else
+          raise TypeError, 'can only append other Hashs and Enumerables (or Classes that implement to_splat)'
+        end
+      end
+
+      def &(other)
+        Hash[ *select{ |k,v|
+          other[k] == v
+        }.flatten ]
+      end
+
+      def +(*o, &block)
+        merge *o, &block
+      end
+    end
+  end
+end

data/lib/sugar_refinery/hash_zip.rb

@@ -0,0 +1,11 @@
+require_relative 'version'
+
+module SugarRefinery
+  module HashZip
+    refine Hash.singleton_class do
+      def zip(keys, values)
+        Hash[ *keys.zip(values).flatten ]
+      end
+    end
+  end
+end

data/lib/sugar_refinery/inner_map.rb

@@ -0,0 +1,15 @@
+require_relative 'version'
+
+module SugarRefinery
+  module InnerMap
+    refine Array do
+      def inner_map(&block)
+        map { |object| object.map(&block) }
+      end
+
+      def inner_inject(default = :not_used, &block)
+        map { |object| default == :not_used ? object.inject(&block) : object.inject(default, &block) }
+      end
+    end
+  end
+end

data/lib/sugar_refinery/lchomp.rb

@@ -0,0 +1,15 @@
+require_relative 'version'
+
+module SugarRefinery
+  module Lchomp
+    refine String do
+      def lchomp(arg = $/)
+        reverse.chomp(arg).reverse
+      end
+
+      def lchomp!(arg = $/)
+        replace reverse.chomp(arg).reverse
+      end
+    end
+  end
+end

data/lib/sugar_refinery/marshal_copy.rb

@@ -0,0 +1,11 @@
+require_relative 'version'
+
+module SugarRefinery
+  module MarshalCopy
+    refine Object do
+      def marshal_copy
+        Marshal.load Marshal.dump self
+      end
+    end
+  end
+end

data/lib/sugar_refinery/mash.rb

@@ -0,0 +1,22 @@
+require_relative 'version'
+
+module SugarRefinery
+  module Mash
+    refine Enumerator do
+      def mash
+        ret = {}
+        each{ |kv| ret.store( *(yield(kv)[0,2]) ) }
+        ret
+      end
+    end
+
+    refine Array do
+      def mash
+        ret = {}
+        each{ |kv| ret.store( *(yield(kv)[0,2]) ) }
+        ret
+      end
+    end
+  end
+end
+

data/lib/sugar_refinery/ords.rb

@@ -0,0 +1,17 @@
+require_relative 'version'
+
+module SugarRefinery
+  module Ords
+    refine Array do
+      def chrs
+        self.pack 'C*'
+      end
+    end
+
+    refine String do
+      def ords
+        self.unpack 'C*'
+      end
+    end
+  end
+end

data/lib/sugar_refinery/regexp_union.rb

@@ -0,0 +1,17 @@
+require_relative 'version'
+
+module SugarRefinery
+  module RegexpUnion
+    refine Regexp do
+      def |(arg)
+        Regexp.union self, arg.is_a?(Regexp) ? arg : arg.to_s
+      end
+    end
+
+    refine String do
+      def |(arg)
+        Regexp.union self, arg.is_a?(Regexp) ? arg : arg.to_s
+      end
+    end
+  end
+end

data/lib/sugar_refinery/same.rb

@@ -0,0 +1,11 @@
+require_relative 'version'
+
+module SugarRefinery
+  module Same
+    refine Float do
+      def same?(other)
+        (self - other).abs < Float::EPSILON
+      end
+    end
+  end
+end

data/lib/sugar_refinery/string_op.rb

@@ -0,0 +1,20 @@
+require_relative 'version'
+
+module SugarRefinery
+  module StringOp
+    refine String do
+      def -(rem)
+        gsub( Regexp === rem ? rem : rem.to_s, '' )
+      end
+
+      def ^(pos)
+        pos = pos.to_i
+        if pos >= 0
+          self[pos..-1]
+        else
+          self[0...pos]
+        end
+      end
+    end
+  end
+end

data/lib/sugar_refinery/version.rb

@@ -0,0 +1,3 @@
+module SugarRefinery
+  VERSION = '1.0.0'.freeze
+end

data/spec/alias_for_spec.rb

@@ -0,0 +1,55 @@
+require 'sugar_refinery/alias_for'
+using SugarRefinery::AliasFor
+
+
+describe 'alias_for' do
+  it 'should create an alias for instance methods' do
+    class Array
+      def m2
+        2
+      end
+      aliases_for :m2, :a2, :'a-2'
+    end
+    proc do
+      [1,2,3].a2.should == 2
+      [1,2,3].send('a-2').should == 2
+    end.should_not raise_exception
+  end
+
+  it 'should create an alias for class (singleton) methods' do
+    class Array
+      class << Array
+        def m3
+          3
+        end
+        alias_for :m3, :a3
+      end
+    end
+
+    proc{
+      Array.a3.should == 3
+    }.should_not raise_exception
+  end
+
+
+  it 'should create aliases for the first argument with all other arguments' do
+    class Object
+      def m4
+        4
+      end
+      alias_for :m4, :ma, :mb, :mc
+    end
+
+    proc{
+      1.ma.should   == 4
+      "1".mb.should == 4
+      [1].mc.should == 4
+    }.should_not raise_exception
+  end
+
+  it 'works with uncommon chars' do
+    class Object
+      alias_for :tainted?, :"tain-ted?"
+    end
+  end
+end