faetr 0.0.3 → 0.0.4

data/VERSION

@@ -1 +1 @@
-0.0.3
+0.0.4

data/faetr.gemspec

@@ -5,7 +5,7 @@
 
 Gem::Specification.new do |s|
   s.name = %q{faetr}
-  s.version = "0.0.3"
+  s.version = "0.0.4"
 
   s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
   s.authors = ["Bodaniel Jeanes", "Jack Chen"]
@@ -30,8 +30,11 @@ Gem::Specification.new do |s|
      "lib/faetr/range_ext.rb",
      "lib/faetr/symbol_ext.rb",
      "lib/faetr/warn_define.rb",
-     "spec/faetr_spec.rb",
-     "spec/spec_helper.rb"
+     "spec/array_ext_spec.rb",
+     "spec/range_ext_spec.rb",
+     "spec/spec_helper.rb",
+     "spec/symbol_ext_spec.rb",
+     "spec/warn_define_spec.rb"
   ]
   s.homepage = %q{http://github.com/bjeanes/faetr}
   s.rdoc_options = ["--charset=UTF-8"]
@@ -40,8 +43,11 @@ Gem::Specification.new do |s|
   s.rubygems_version = %q{1.3.5}
   s.summary = %q{Collection of nice Ruby object extensions}
   s.test_files = [
-    "spec/faetr_spec.rb",
-     "spec/spec_helper.rb"
+    "spec/array_ext_spec.rb",
+     "spec/range_ext_spec.rb",
+     "spec/spec_helper.rb",
+     "spec/symbol_ext_spec.rb",
+     "spec/warn_define_spec.rb"
   ]
 
   if s.respond_to? :specification_version then

data/lib/faetr/range_ext.rb

@@ -1,6 +1,23 @@
+require 'date'
+require 'time'
+
 class Range
   # TODO: make this be a no-op for Time/Dates
   warn_define :rand do
-    to_a.rand # not optimized, but will work regardless of range time
+    case first
+    when Integer
+      Kernel.rand((exclude_end? ? last - 1 : last) - first + 1) + first
+    when Date
+      first + Kernel.rand((exclude_end? ? last - 1 : last) - first + 1)
+    when Time
+      first + Kernel.rand((exclude_end? ? last - 1 : last) - first + 1)
+    else
+      @@rand_warnings ||= {}
+      if !@@rand_warnings[first.class.to_s.to_sym]
+        $stderr.puts "Falling back to non-optimised Range#rand for unimplemented class #{first.class.to_s}"
+        @@rand_warnings[first.class.to_s.to_sym] = true
+      end
+      to_a.rand
+    end
   end
 end

data/spec/array_ext_spec.rb

@@ -0,0 +1,38 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+require File.dirname(__FILE__) + '/../lib/faetr/array_ext'
+
+describe Array do
+  describe "#rand" do
+    subject { [*(1..10000)] }
+    
+    it "returns a random array element" do
+      subject.should include(subject.rand)
+    end
+    
+    it "should return a random value" do
+      subject.rand.should_not == subject.rand
+    end
+  end
+  
+  describe "#to_proc" do
+    # ["ID", "TITLE"].collect(&[:downcase, :to_sym]) # => [:id, :title]
+    it "should create a proc object" do
+      def test_proc(&proc); proc.class.should == Proc; end
+      [:symbol].to_proc.class.should == Proc
+      test_proc(&[:symbol])
+    end
+    
+    it "should create a proc that calls the method named after the symbol on the caller" do
+      array = [stub, stub, stub]
+      array.each do|s|
+        s.should_receive(:foo).and_return(foo = stub)
+        foo.should_receive(:bar)
+      end
+      array.map(&[:foo, :bar])
+    end
+    
+    it "enables Array#map(&[:list, :of, :symbols])" do
+      ['ID', 'NAME', 'EMAIL'].map(&[:downcase, :to_sym]).should == [:id, :name, :email]
+    end
+  end
+end

data/spec/range_ext_spec.rb

@@ -0,0 +1,309 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+require File.dirname(__FILE__) + '/../lib/faetr/range_ext'
+
+RANDOM_TEST_COUNT = 100
+
+describe Range do
+  describe "rand" do
+    
+    describe "on String" do
+      describe "inclusive" do
+        subject do
+          'a'..'z'
+        end
+
+        it "return a random character within the range" do
+          (RANDOM_TEST_COUNT * 3).times do
+            subject.should include(subject.rand)
+          end
+        end
+
+        it "include the start character" do
+          f = false
+          (RANDOM_TEST_COUNT * 3).times do
+            if subject.rand == subject.first
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+
+        it "include the end character" do
+          f = false
+          (RANDOM_TEST_COUNT * 3).times do
+            if subject.rand == subject.last
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+      end
+
+      describe "exclusive" do
+        subject do
+          'a'...'z'
+        end
+
+        it "return a random character within the range" do
+          (RANDOM_TEST_COUNT * 3).times do
+            subject.should include(subject.rand)
+          end
+        end
+
+        it "include the start character" do
+          f = false
+          (RANDOM_TEST_COUNT * 3).times do
+            if subject.rand == subject.first
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+
+        it "doesn't include the end character" do
+          f = false
+          (RANDOM_TEST_COUNT * 3).times do
+            if subject.rand == subject.last
+              f = true
+              break
+            end
+          end
+
+          f.should == false
+        end
+      end
+      
+    end
+    
+    
+    describe "on Integers" do
+      describe "inclusive" do
+        subject do
+          (5..10)
+        end
+
+        it "return a random number within the range" do
+          RANDOM_TEST_COUNT.times do
+            subject.should include(subject.rand)
+          end
+        end
+
+        it "include the start number" do
+          f = false
+          RANDOM_TEST_COUNT.times do
+            if subject.rand == subject.first
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+
+        it "include the end number" do
+          f = false
+          RANDOM_TEST_COUNT.times do
+            if subject.rand == subject.last
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+      end
+      
+      describe "exclusive" do
+        subject do
+          (5...10)
+        end
+
+        it "return a random number within the range" do
+          RANDOM_TEST_COUNT.times do
+            subject.should include(subject.rand)
+          end
+        end
+
+        it "include the start number" do
+          f = false
+          RANDOM_TEST_COUNT.times do
+            if subject.rand == subject.first
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+
+        it "doesn't include the end number" do
+          f = false
+          RANDOM_TEST_COUNT.times do
+            if subject.rand == subject.last
+              f = true
+              break
+            end
+          end
+
+          f.should_not == true
+        end
+      end
+      
+    end
+    
+    describe "on Date" do
+      describe "inclusive" do
+        subject do
+          (Date.new(2009, 1, 1)..Date.new(2009, 1, 10))
+        end
+
+        it "return a random Date within the range" do
+          RANDOM_TEST_COUNT.times do
+            subject.should include(subject.rand)
+          end
+        end
+
+        it "include the start Date" do
+          f = false
+          RANDOM_TEST_COUNT.times do
+            if subject.rand == subject.first
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+
+        it "include the end Date" do
+          f = false
+          RANDOM_TEST_COUNT.times do
+            if subject.rand == subject.last
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+      end
+
+      describe "exclusive" do
+        subject do
+          (Date.new(2009, 1, 1)...Date.new(2009, 1, 30))
+        end
+
+        it "return a random number within the range" do
+          RANDOM_TEST_COUNT.times do
+            subject.should include(subject.rand)
+          end
+        end
+
+        it "include the start Date" do
+          f = false
+          RANDOM_TEST_COUNT.times do
+            if subject.rand == subject.first
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+
+        it "doesn't include the end Date" do
+          f = false
+          RANDOM_TEST_COUNT.times do
+            if subject.rand == subject.last
+              f = true
+              break
+            end
+          end
+
+          f.should_not == true
+        end
+      end
+    end
+    
+    describe "on Time" do
+      describe "inclusive" do
+        subject do
+          (Time.local(2009, 1, 1, 0, 0, 0)..Time.local(2009, 1, 1, 0, 2, 0))
+        end
+
+        it "return a random Date within the range" do
+          (RANDOM_TEST_COUNT * 5).times do
+            subject.should include(subject.rand)
+          end
+        end
+
+        it "include the start Time" do
+          f = false
+          (RANDOM_TEST_COUNT * 5).times do
+            if subject.rand == subject.first
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+
+        it "include the end Time" do
+          f = false
+          (RANDOM_TEST_COUNT * 5).times do
+            if subject.rand == subject.last
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+      end
+
+      describe "exclusive" do
+        subject do
+          (Time.local(2009, 1, 1, 0, 0, 0)...Time.local(2009, 1, 1, 0, 2, 0))
+        end
+
+        it "return a random Date within the range" do
+          (RANDOM_TEST_COUNT * 5).times do
+            subject.should include(subject.rand)
+          end
+        end
+
+        it "include the start Time" do
+          f = false
+          (RANDOM_TEST_COUNT * 5).times do
+            if subject.rand == subject.first
+              f = true
+              break
+            end
+          end
+
+          f.should == true
+        end
+
+        it "doesn't include the end Time" do
+          f = false
+          (RANDOM_TEST_COUNT * 5).times do
+            if subject.rand == subject.last
+              f = true
+              break
+            end
+          end
+
+          f.should == false
+        end
+      end
+      
+    end
+  end
+end

data/spec/symbol_ext_spec.rb

@@ -0,0 +1,18 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+require File.dirname(__FILE__) + '/../lib/faetr/symbol_ext'
+
+describe Symbol do
+  describe "#to_proc" do
+    it "should create a proc object" do
+      def test_proc(&proc); proc.class.should == Proc; end
+      :symbol.to_proc.class.should == Proc
+      test_proc(&:symbol)
+    end
+    
+    it "should create a proc that calls the method named after the symbol on the caller" do
+      array = [stub, stub, stub]
+      array.each {|s| s.should_receive(:foo)}
+      array.map(&:foo)
+    end
+  end
+end

data/spec/warn_define_spec.rb

@@ -0,0 +1,45 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+require File.dirname(__FILE__) + '/../lib/faetr/warn_define'
+
+describe Class do
+  describe "warn_define" do
+    before(:all) do
+      @err, @out = $stderr, $stdout
+      @define    = lambda { |m| Object.warn_define(m.to_sym) { p m } }
+    end
+    
+    before { $stderr, $stdout = StringIO.new, StringIO.new }
+    after  { $stderr, $stdout = @err, @out}
+    
+    context "when the method already exists" do
+      before do
+        @define[:nil?]
+        $stderr.rewind
+      end
+      
+      it "should print out a warning" do
+        $stderr.read.should_not == ""
+      end
+      
+      it "should leave the original method intact" do
+        Object.nil?.should == false
+      end
+    end
+    
+    context "when the method does not exist" do
+      before do
+        @define[:foobaz]
+        Object.foobaz
+        $stdout.rewind
+      end
+      
+      it "should define the method" do
+        $stdout.read.chomp.should == ":foobaz"
+      end
+      
+      it "should not print out a warning" do
+        $stderr.read.chomp.should == ""
+      end
+    end
+  end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: faetr
 version: !ruby/object:Gem::Version 
-  version: 0.0.3
+  version: 0.0.4
 platform: ruby
 authors: 
 - Bodaniel Jeanes
@@ -46,8 +46,11 @@ files:
 - lib/faetr/range_ext.rb
 - lib/faetr/symbol_ext.rb
 - lib/faetr/warn_define.rb
-- spec/faetr_spec.rb
+- spec/array_ext_spec.rb
+- spec/range_ext_spec.rb
 - spec/spec_helper.rb
+- spec/symbol_ext_spec.rb
+- spec/warn_define_spec.rb
 has_rdoc: true
 homepage: http://github.com/bjeanes/faetr
 licenses: []
@@ -77,5 +80,8 @@ signing_key:
 specification_version: 3
 summary: Collection of nice Ruby object extensions
 test_files: 
-- spec/faetr_spec.rb
+- spec/array_ext_spec.rb
+- spec/range_ext_spec.rb
 - spec/spec_helper.rb
+- spec/symbol_ext_spec.rb
+- spec/warn_define_spec.rb

data/spec/faetr_spec.rb

@@ -1,7 +0,0 @@
-require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
-
-describe "Faetr" do
-  it "fails" do
-    fail "hey buddy, you should probably rename this file and start specing for real"
-  end
-end