home_run 0.9.0

data/spec/datetime/format_spec.rb

@@ -0,0 +1,59 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime formatting methods" do
+  it "#asctime and #ctime should use a format similar to Time" do
+    DateTime.new(2008, 1, 2, 10, 20, 30).asctime.should == 'Wed Jan  2 10:20:30 2008'
+    DateTime.new(2008, 1, 2, 10, 20, 30).ctime.should == 'Wed Jan  2 10:20:30 2008'
+  end
+  
+  it "#to_s should use an ISO8601 format" do
+    DateTime.new(2008, 1, 2, 10, 20, 30, 8/24.0).to_s.should == '2008-01-02T10:20:30+08:00'
+  end
+
+  it "#inspect should use an ISO8601 format" do
+    DateTime.new(2008, 1, 2, 10, 20, 30, 8/24.0).inspect.should == '#<DateTime 2008-01-02T10:20:30+08:00>'
+  end
+
+  ruby_version_is "1.9" do
+    it "#httpdate should use an HTTP format" do
+      DateTime.new(2009, 1, 2, 3, 4, 5).httpdate.should ==  "Fri, 02 Jan 2009 03:04:05 GMT"
+    end
+
+    it "#iso8601 should use an ISO8601 format" do
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).iso8601.should ==  "2009-01-02T03:04:05+12:00"
+    end
+
+    it "#jisx03010 should use an JIS X 0301 format" do
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).jisx0301.should ==  "H21.01.02T03:04:05+12:00"
+      DateTime.new(1988, 1, 2, 3, 4, 5, 0.5).jisx0301.should ==  "S63.01.02T03:04:05+12:00"
+      DateTime.new(1925, 1, 2, 3, 4, 5, 0.5).jisx0301.should ==  "T14.01.02T03:04:05+12:00"
+      DateTime.new(1911, 1, 2, 3, 4, 5, 0.5).jisx0301.should ==  "M44.01.02T03:04:05+12:00"
+      DateTime.new(1873, 1, 2, 3, 4, 5, 0.5).jisx0301.should ==  "M06.01.02T03:04:05+12:00"
+      DateTime.new(1872, 1, 2, 3, 4, 5, 0.5).jisx0301.should ==  "1872-01-02T03:04:05+12:00"
+      DateTime.new(1867, 1, 2, 3, 4, 5, 0.5).jisx0301.should ==  "1867-01-02T03:04:05+12:00"
+    end
+
+    it "#rfc2822 should use an RFC2822 format" do
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).rfc2822.should ==  "Fri, 2 Jan 2009 03:04:05 +1200"
+    end
+
+    it "#rfc822 should use an RFC822 format" do
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).rfc822.should ==  "Fri, 2 Jan 2009 03:04:05 +1200"
+    end
+
+    it "#rfc3339 should use an RFC3339 format" do
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).rfc3339.should ==  "2009-01-02T03:04:05+12:00"
+    end
+
+    it "#xmlschema should use an ISO8601 format" do
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).xmlschema.should ==  "2009-01-02T03:04:05+12:00"
+    end
+
+    it "should handle fractional seconds if given an argument for iso8601, jisx0301, rfc3339, and xmlschema" do
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).iso8601(4).should ==  "2009-01-02T03:04:05.0000+12:00"
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).jisx0301(4).should ==  "H21.01.02T03:04:05.0000+12:00"
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).rfc3339(4).should ==  "2009-01-02T03:04:05.0000+12:00"
+      DateTime.new(2009, 1, 2, 3, 4, 5, 0.5).xmlschema(4).should ==  "2009-01-02T03:04:05.0000+12:00"
+    end
+  end
+end

data/spec/datetime/hash_spec.rb

@@ -0,0 +1,11 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#hash" do
+  it "should use the same hash value for equal datetimes" do 
+    DateTime.civil(2004, 7, 12, 13, 14, 15).hash.should == DateTime.civil(2004, 7, 12, 13, 14, 15).hash
+  end
+  
+  it "should use a different hash value for different dates" do 
+    DateTime.civil(2004, 7, 12, 13, 14, 15).hash.should_not == DateTime.civil(2004, 7, 12, 13, 14, 16).hash
+  end
+end

data/spec/datetime/leap_spec.rb

@@ -0,0 +1,19 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#leap?" do
+  it "should be true if the current date is a leap year and no argument is given" do
+    DateTime.civil(2000, 10, 11).leap?.should ==  true
+    DateTime.civil(2004, 10, 11).leap?.should ==  true
+    DateTime.civil(2008, 10, 11).leap?.should ==  true
+    DateTime.civil(1996, 10, 11).leap?.should ==  true
+    DateTime.civil(1600, 10, 11).leap?.should ==  true
+  end
+  
+  it "should be false if the current date is not a leap year and no argument is given" do
+    DateTime.civil(1700, 10, 11).leap?.should ==  false
+    DateTime.civil(1800, 10, 11).leap?.should ==  false
+    DateTime.civil(1900, 10, 11).leap?.should ==  false
+    DateTime.civil(1999, 10, 11).leap?.should ==  false
+    DateTime.civil(2001, 10, 11).leap?.should ==  false
+  end
+end

data/spec/datetime/minus_month_spec.rb

@@ -0,0 +1,25 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#<<" do
+
+  it "should substract a number of months from a date" do
+    (DateTime.civil(2007, 12, 27) << 10).should == DateTime.civil(2007,2,27)
+    (DateTime.commercial(2007, 45, 5) << 10).should == DateTime.commercial(2007,2,2)
+    (DateTime.jd(2455086) << 10).should == DateTime.jd(2454782)
+    (DateTime.ordinal(2008, 315) << 10).should == DateTime.ordinal(2008, 10)
+    (DateTime.civil(2007, 12, 27) << 12).should == DateTime.civil(2006,12,27)
+    (DateTime.civil(2007, 12, 27) << -12).should == DateTime.civil(2008,12,27)
+  end
+
+  it "should result in the last day of a month if the day doesn't exist" do
+    d = DateTime.civil(2008,3,31) << 1
+    d.should == DateTime.civil(2008, 2, 29)
+  end
+
+  it "should raise an error on non numeric parameters" do
+    lambda { DateTime.civil(2007,2,27) << "hello" }.should raise_error(TypeError)
+    lambda { DateTime.civil(2007,2,27) << DateTime.new }.should raise_error(TypeError)
+    lambda { DateTime.civil(2007,2,27) << Object.new }.should raise_error(TypeError)
+  end
+  
+end

data/spec/datetime/minus_spec.rb

@@ -0,0 +1,77 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#-" do
+
+  it "should substract a number of days from a DateTime" do
+    (DateTime.civil(2008, 1, 8) - 315).should == DateTime.civil(2007,2,27)
+    (DateTime.commercial(2007, 47, 2) - 315).should == DateTime.commercial(2007,2,2)
+    (DateTime.jd(2455097) - 315).should == DateTime.jd(2454782)
+    (DateTime.ordinal(2008, 325) - 315).should == DateTime.ordinal(2008, 10)
+  end
+  
+  it "should subtract a fractional number of days to a Date" do
+    (DateTime.civil(2008, 1, 8, 12) - 315.5).should == DateTime.civil(2007,2,27)
+    (DateTime.commercial(2007, 47, 2, 18) - 315.75).should == DateTime.commercial(2007,2,2)
+    (DateTime.jd(2455097, 6) - 315.25).should == DateTime.jd(2454782)
+    (DateTime.ordinal(2008, 325, 6) - 315.25).should == DateTime.ordinal(2008, 10)
+  end
+  
+  it "should substract a negative number of days from a DateTime" do
+    d = DateTime.civil(2007, 4, 19).-(-13)
+    d.should == DateTime.civil(2007, 5 ,2) 
+  end
+  
+  it "should subtract a fractional negative number of days to a Date" do
+    d = DateTime.civil(2007, 2, 16, 12).-(-10.5)
+    d.should == DateTime.civil(2007,2,27)
+  end
+
+  it "should be able to compute the different between two DateTimes" do
+    (DateTime.civil(2007,2,27) - DateTime.civil(2007,2,27)).should be_close(0.0, 0.00000001)
+    (DateTime.civil(2007,2,27) - DateTime.civil(2007,2,26)).should be_close(1.0, 0.00000001)
+    (DateTime.civil(2006,2,27) - DateTime.civil(2007,2,27)).should be_close(-365.0, 0.00000001)
+    (DateTime.civil(2008,2,27) - DateTime.civil(2007,2,27)).should be_close(365.0, 0.00000001)
+    (DateTime.civil(2009,2,27) - DateTime.civil(2008,2,27)).should be_close(366.0, 0.00000001)
+    
+    (DateTime.civil(2009,2,27) - DateTime.commercial(2008,2,1)).should be_close(417.0, 0.00000001)
+    (DateTime.civil(2009,2,27) - DateTime.jd(2454782)).should be_close(108.0, 0.00000001)
+    (DateTime.civil(2009,2,27) - DateTime.ordinal(2008, 10)).should be_close(414.0, 0.00000001)
+    
+    (DateTime.commercial(2008,2,1) - DateTime.civil(2008,2,27)).should be_close(-51.0, 0.00000001)
+    (DateTime.commercial(2008,2,1) - DateTime.jd(2454782)).should be_close(-309.0, 0.00000001)
+    (DateTime.commercial(2008,2,1) - DateTime.ordinal(2008, 10)).should be_close(-3.0, 0.00000001)
+    
+    (DateTime.jd(2454782) - DateTime.commercial(2008,2,1)).should be_close(309.0, 0.00000001)
+    (DateTime.jd(2454782) - DateTime.civil(2009,2,27)).should be_close(-108.0, 0.00000001)
+    (DateTime.jd(2454782) - DateTime.ordinal(2008, 10)).should be_close(306.0, 0.00000001)
+    
+    (DateTime.ordinal(2008, 10) - DateTime.commercial(2008,2,1)).should be_close(3.0, 0.00000001)
+    (DateTime.ordinal(2008, 10) - DateTime.jd(2454782)).should be_close(-306.0, 0.00000001)
+    (DateTime.ordinal(2008, 10) - DateTime.civil(2009,2,27)).should be_close(-414.0, 0.00000001)
+  end
+  
+  it "should consider the offset when computing the different between two DateTimes" do
+    (DateTime.civil(2007,2,27, 0, 0, 0, 0.5) - DateTime.civil(2007,2,27,0,0,0)).should be_close(-0.5, 0.00000001)
+    (DateTime.civil(2007,2,27, 0, 0, 0, -0.5) - DateTime.civil(2007,2,27,12,0,0)).should be_close(0.0, 0.00000001)
+    (DateTime.civil(2007,2,27,0,0,0,-0.5) - DateTime.civil(2007,2,27,0,0,0,0.5)).should be_close(1.0, 0.00000001)
+  end
+
+  it "should be able to subtract a Date from a DateTime" do
+    (DateTime.ordinal(2008, 10) - Date.commercial(2008,2,1)).should be_close(3.0, 0.00000001)
+    (DateTime.ordinal(2008, 10) - Date.jd(2454782)).should be_close(-306.0, 0.00000001)
+    (DateTime.ordinal(2008, 10) - Date.civil(2009,2,27)).should be_close(-414.0, 0.00000001)
+  end
+
+  it "should assume a Date is in the same offset as the receiver" do
+    (DateTime.ordinal(2008, 10, 0, 0, 0, 0.5) - Date.commercial(2008,2,1)).should be_close(3.0, 0.00000001)
+    (DateTime.ordinal(2008, 10, 0, 0, 0, 0.1) - Date.jd(2454782)).should be_close(-306.0, 0.00000001)
+    (DateTime.ordinal(2008, 10, 0, 0, 0, -0.5) - Date.civil(2009,2,27)).should be_close(-414.0, 0.00000001)
+  end
+
+  it "should raise an error on non numeric parameters" do
+    lambda { DateTime.civil(2007,2,27) - :hello }.should raise_error(TypeError)
+    lambda { DateTime.civil(2007,2,27) - "hello" }.should raise_error(TypeError)
+    lambda { DateTime.civil(2007,2,27) - Object.new }.should raise_error(TypeError)
+  end
+  
+end

data/spec/datetime/next_prev_spec.rb

@@ -0,0 +1,138 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+ruby_version_is "1.9" do
+  describe "DateTime#next_day" do
+    it "should add a single day to a DateTime if no arguments" do
+      (DateTime.civil(2007,2,27).next_day).should == DateTime.civil(2007, 2, 28)
+    end
+
+    it "should add the given number of days to a DateTime if an argument" do
+      (DateTime.civil(2007,2,27).next_day(2)).should == DateTime.civil(2007, 3, 1)
+    end
+
+    it "should handle a negative argument by subtracting days" do
+      (DateTime.civil(2007,2,27).next_day(-2)).should == DateTime.civil(2007, 2, 25)
+    end
+
+    it "should keep the same fractional part and offset" do
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).next_day).day_fraction.should == 0.5
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).next_day).offset.should == 0.5
+    end
+  end 
+
+  describe "DateTime#prev_day" do
+    it "should subtract a single day to a DateTime if no arguments" do
+      (DateTime.civil(2007,2,27).prev_day).should == DateTime.civil(2007, 2, 26)
+    end
+
+    it "should subtract the given number of days to a DateTime if an argument" do
+      (DateTime.civil(2007,2,27).prev_day(2)).should == DateTime.civil(2007, 2, 25)
+    end
+
+    it "should handle a negative argument by adding days" do
+      (DateTime.civil(2007,2,27).prev_day(-2)).should == DateTime.civil(2007, 3, 1)
+    end
+
+    it "should keep the same fractional part and offset" do
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).prev_day).day_fraction.should == 0.5
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).prev_day).offset.should == 0.5
+    end
+  end 
+
+  describe "DateTime#next_month" do
+    it "should add a single month to a DateTime if no arguments" do
+      (DateTime.civil(2007,2,27).next_month).should == DateTime.civil(2007, 3, 27)
+    end
+
+    it "should add the given number of months to a DateTime if an argument" do
+      (DateTime.civil(2007,2,27).next_month(2)).should == DateTime.civil(2007, 4, 27)
+    end
+
+    it "should handle a negative argument by subtracting months" do
+      (DateTime.civil(2007,2,27).next_month(-2)).should == DateTime.civil(2006, 12, 27)
+    end
+
+    it "should handle adding a month where the new date is not a valid date" do
+      (DateTime.civil(2007,1,31).next_month).should == DateTime.civil(2007, 2, 28)
+      (DateTime.civil(2008,1,31).next_month).should == DateTime.civil(2008, 2, 29)
+      (DateTime.civil(2007,1,31).next_month(3)).should == DateTime.civil(2007, 4, 30)
+    end
+
+    it "should keep the same fractional part and offset" do
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).next_month).day_fraction.should == 0.5
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).next_month).offset.should == 0.5
+    end
+  end 
+
+  describe "DateTime#prev_month" do
+    it "should subtract a single month to a DateTime if no arguments" do
+      (DateTime.civil(2007,2,27).prev_month).should == DateTime.civil(2007, 1, 27)
+    end
+
+    it "should subtract the given number of months to a DateTime if an argument" do
+      (DateTime.civil(2007,2,27).prev_month(2)).should == DateTime.civil(2006, 12, 27)
+    end
+
+    it "should handle a negative argument by adding months" do
+      (DateTime.civil(2007,2,27).prev_month(-2)).should == DateTime.civil(2007, 4, 27)
+    end
+
+    it "should handle subtracting a month where the new date is not a valid date" do
+      (DateTime.civil(2007,3,31).prev_month).should == DateTime.civil(2007, 2, 28)
+      (DateTime.civil(2008,3,31).prev_month).should == DateTime.civil(2008, 2, 29)
+      (DateTime.civil(2007,3,31).prev_month(4)).should == DateTime.civil(2006, 11, 30)
+    end
+
+    it "should keep the same fractional part and offset" do
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).prev_month).day_fraction.should == 0.5
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).prev_month).offset.should == 0.5
+    end
+  end 
+
+  describe "DateTime#next_year" do
+    it "should add a single year to a DateTime if no arguments" do
+      (DateTime.civil(2007,2,27).next_year).should == DateTime.civil(2008, 2, 27)
+    end
+
+    it "should add the given number of years to a DateTime if an argument" do
+      (DateTime.civil(2007,2,27).next_year(2)).should == DateTime.civil(2009, 2, 27)
+    end
+
+    it "should handle a negative argument by subtracting years" do
+      (DateTime.civil(2007,2,27).next_year(-2)).should == DateTime.civil(2005, 2, 27)
+    end
+
+    it "should handle adding a year where the new date is not a valid date" do
+      (DateTime.civil(2008,2,29).next_year).should == DateTime.civil(2009, 2, 28)
+    end
+
+    it "should keep the same fractional part and offset" do
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).next_year).day_fraction.should == 0.5
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).next_year).offset.should == 0.5
+    end
+  end 
+
+  describe "DateTime#prev_year" do
+    it "should add a single year to a DateTime if no arguments" do
+      (DateTime.civil(2007,2,27).prev_year).should == DateTime.civil(2006, 2, 27)
+    end
+
+    it "should add the given number of years to a DateTime if an argument" do
+      (DateTime.civil(2007,2,27).prev_year(2)).should == DateTime.civil(2005, 2, 27)
+    end
+
+    it "should handle a negative argument by subtracting years" do
+      (DateTime.civil(2007,2,27).prev_year(-2)).should == DateTime.civil(2009, 2, 27)
+    end
+
+    it "should handle adding a year where the new date is not a valid date" do
+      (DateTime.civil(2008,2,29).prev_year).should == DateTime.civil(2007, 2, 28)
+    end
+
+    it "should keep the same fractional part and offset" do
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).prev_year).day_fraction.should == 0.5
+      (DateTime.civil(2007,2,27, 12, 0, 0, 0.5).prev_year).offset.should == 0.5
+    end
+  end 
+
+end

data/spec/datetime/now_spec.rb

@@ -0,0 +1,18 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime.now" do
+  it "should be right now as a DateTime" do
+    t = Time.now
+    d = DateTime.now
+    d.year.should == t.year
+    d.mon.should == t.mon
+    d.day.should == t.day
+    d.hour.should == t.hour
+    d.min.should == t.min
+    d.sec.should == t.sec
+  end
+  
+  it "should accept an optional sg value" do
+    DateTime.now(1).to_s.should == DateTime.now.to_s
+  end
+end