home_run 0.9.0-x86-mswin32

data/spec/datetime/relationship_spec.rb

@@ -0,0 +1,28 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#===" do
+
+  it "should be true for the two same dates" do
+    (DateTime.civil(2000, 04, 06) === DateTime.civil(2000, 04, 06)).should == true
+  end
+
+  it "should be true if comparison is a Date on the same date" do
+    (DateTime.civil(2000, 04, 06, 10) === Date.civil(2000, 04, 06)).should == true
+  end
+
+  it "should be true if comparison is a Numeric with the same integer value as JD" do
+    (DateTime.civil(2000, 04, 06) === DateTime.civil(2000, 04, 06).jd).should == true
+  end
+  
+  it "should be false for different dates" do
+    (DateTime.civil(2000, 04, 05) === DateTime.civil(2000, 04, 06)).should == false
+  end
+  
+  it "should be false if comparison is a Date with a different date" do
+    (DateTime.civil(2000, 04, 06, 10) === Date.civil(2000, 04, 07)).should == false
+  end
+
+  it "should be false if comparison is a Numeric with the different integer value as JD" do
+    (DateTime.civil(2000, 04, 06) === DateTime.civil(2000, 04, 07).jd).should == false
+  end
+end

data/spec/datetime/step_spec.rb

@@ -0,0 +1,155 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#step" do
+  
+  it "should be able to step forward in time" do
+    ds    = DateTime.civil(2008, 10, 11)
+    de    = DateTime.civil(2008,  9, 29)
+    count = 0
+    de.step(ds) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end.should == de
+    count.should == 13
+
+    count = 0
+    de.step(ds, 5) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end.should == de
+    count.should == 3
+
+    count = 0
+    de.step(ds, 0.25) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end.should == de
+    count.should == 49
+
+    count = 0
+    ds.step(de) do |d|; count += 1; end.should == ds
+    count.should == 0
+
+  end
+  
+  it "should be able to step backward in time" do
+    ds    = DateTime.civil(2000, 4, 14)
+    de    = DateTime.civil(2000, 3, 29)
+    count = 0
+    ds.step(de, -1) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end.should == ds
+    count.should == 17
+
+    count = 0
+    ds.step(de, -5) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end.should == ds
+    count.should == 4
+
+    count = 0
+    ds.step(de, -0.25) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end.should == ds
+    count.should == 65
+
+    count = 0
+    de.step(ds, -1) do |d|; count += 1; end.should == de
+    count.should == 0
+    
+  end
+  
+  it "should yield once if the dates are the same, regardless of step" do
+    ds = DateTime.civil(2008, 10, 11)
+    count = 0
+    ds.step(ds, 1) do |d|
+      d.should == ds
+      count += 1
+    end.should == ds
+    count.should == 1
+
+    count = 0
+    ds.step(ds, 0) do |d|
+      d.should == ds
+      count += 1
+    end.should == ds
+    count.should == 1
+
+    count = 0
+    ds.step(ds, -1) do |d|
+      d.should == ds
+      count += 1
+    end.should == ds
+    count.should == 1
+  end
+  
+  it "should not yield if the target date is greater than the receiver, and step is not positive" do
+    ds = DateTime.civil(2008, 10, 11)
+    count = 0
+    ds.step(ds.next, 0) do |d|
+      count += 1
+    end.should == ds
+    count.should == 0
+
+    count = 0
+    ds.step(ds.next, -1) do |d|
+      count += 1
+    end.should == ds
+    count.should == 0
+  end
+  
+  it "should not yield if the target date is less than the receiver, and step is not negative" do
+    ds = DateTime.civil(2008, 10, 11)
+    count = 0
+    ds.next.step(ds, 0) do |d|
+      count += 1
+    end.should == ds.next
+    count.should == 0
+
+    count = 0
+    ds.next.step(ds, 1) do |d|
+      count += 1
+    end.should == ds.next
+    count.should == 0
+  end
+  
+  it "should correctly handle offsets" do
+    ds = DateTime.civil(2008, 10, 11)
+    de = DateTime.civil(2008, 10, 11, 0, 0, 0, 0.5)
+
+    count = 0
+    ds.step(de, 0.25) do |d|
+      count += 1
+    end.should == ds
+    count.should == 0
+
+    count = 0
+    ds.step(de, -0.25) do |d|
+      count += 1
+    end.should == ds
+    count.should == 3
+
+    count = 0
+    de.step(ds, -0.25) do |d|
+      count += 1
+    end.should == de
+    count.should == 0
+
+    count = 0
+    de.step(ds, 0.25) do |d|
+      count += 1
+    end.should == de
+    count.should == 3
+
+  end
+  
+end

data/spec/datetime/strftime_spec.rb

@@ -0,0 +1,118 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#strftime" do
+
+  it "should be able to print the date time" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime.should == "2000-04-06T10:11:12+00:00"
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime.should == DateTime.civil(2000, 4, 6, 10, 11, 12).to_s
+  end
+
+  it "should be able to print the hour in a 24 hour clock with leading zero" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%H').should == "10"
+    DateTime.civil(2000, 4, 6, 13, 11, 12).strftime('%H').should == "13"
+  end
+
+  it "should be able to print the hour in a 12 hour clock with leading zero" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%I').should == "10"
+    DateTime.civil(2000, 4, 6, 13, 11, 12).strftime('%I').should == "01"
+  end
+  
+  it "should be able to print the hour in a 24 hour clock with leading space" do
+    DateTime.civil(2000, 4, 6, 9, 11, 12).strftime('%k').should == " 9"
+    DateTime.civil(2000, 4, 6, 13, 11, 12).strftime('%k').should == "13"
+  end
+
+  it "should be able to print the hour in a 12 hour clock with leading space" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%l').should == "10"
+    DateTime.civil(2000, 4, 6, 13, 11, 12).strftime('%l').should == " 1"
+  end
+  
+  it "should be able to print the number of milliseconds of the second" do
+    DateTime.civil(2008, 11, 12, 14, 3, 30, -8/24.0).strftime('%L').should == "000"
+    (DateTime.civil(2008, 11, 12, 14, 3, 31, 8/24.0) + (0.5/86400)).strftime('%L').should == "500"
+  end
+  
+  it "should be able to print the minute with leading zero" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%M').should == "11"
+    DateTime.civil(2000, 4, 6, 10, 14, 12).strftime('%M').should == "14"
+  end
+  
+  it "should be able to print the number of nanoseconds of the second" do
+    DateTime.civil(2008, 11, 12, 14, 3, 30, -8/24.0).strftime('%N').should == "000000000"
+    (DateTime.civil(2008, 11, 12, 14, 3, 31, 8/24.0) + (0.5/86400)).strftime('%N').should == "500000000"
+  end
+  
+  it "should be able to print the meridian indicator in lower case" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%P').should == "am"
+    DateTime.civil(2000, 4, 6, 13, 11, 12).strftime('%P').should == "pm"
+  end
+  
+  it "should be able to print the meridian indicator in upper case" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%p').should == "AM"
+    DateTime.civil(2000, 4, 6, 13, 11, 12).strftime('%p').should == "PM"
+  end
+  
+  it "should be able to print the number of milliseconds since the unix epoch" do
+    DateTime.civil(2008, 11, 12, 14, 3, 30, -8/24.0).strftime('%Q').should == "1226527410000"
+    (DateTime.civil(2008, 11, 12, 14, 3, 31, 8/24.0) + (0.5/86400)).strftime('%Q').should == "1226469811500"
+  end
+  
+  it "should be able to print the second with leading zero" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%S').should == "12"
+    DateTime.civil(2000, 4, 6, 10, 11, 13).strftime('%S').should == "13"
+  end
+  
+  it "should be able to print the number of seconds since the unix epoch" do
+    DateTime.civil(2008, 11, 12, 14, 3, 30, -8/24.0).strftime('%s').should == "1226527410"
+    DateTime.civil(2008, 11, 12, 14, 3, 31, 8/24.0).strftime('%s').should == "1226469811"
+  end
+  
+  it "should be able to print the time zone offset as a string of hours and minutes" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%z').should == "+0000"
+    DateTime.civil(2000, 4, 6, 10, 11, 12, -0.5).strftime('%z').should == "-1200"
+    DateTime.civil(2000, 4, 6, 10, 11, 12, 0.5).strftime('%z').should == "+1200"
+    DateTime.civil(2000, 4, 6, 10, 11, 12, -1/24.0).strftime('%z').should == "-0100"
+    DateTime.civil(2000, 4, 6, 10, 11, 12, 1/24.0).strftime('%z').should == "+0100"
+    
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%Z').should == "+00:00"
+    DateTime.civil(2000, 4, 6, 10, 11, 12, -0.5).strftime('%Z').should == "-12:00"
+    DateTime.civil(2000, 4, 6, 10, 11, 12, 0.5).strftime('%Z').should == "+12:00"
+    DateTime.civil(2000, 4, 6, 10, 11, 12, -1/24.0).strftime('%Z').should == "-01:00"
+    DateTime.civil(2000, 4, 6, 10, 11, 12, 1/24.0).strftime('%Z').should == "+01:00"
+  end
+  
+  ############################
+  # Specs that combine stuff #
+  ############################
+
+  it "should be able to print the common date" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime("%c").should == "Thu Apr  6 10:11:12 2000"
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime("%c").should == DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%a %b %e %H:%M:%S %Y')  
+  end
+
+  it "should be able to print the hour and minute" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime("%R").should == "10:11"
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime("%R").should == DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%H:%M')
+  end
+
+  it "should be able to show the hour, minute, second, and am/pm flag" do
+    DateTime.civil(2000, 4,  9, 10, 11, 12).strftime("%r").should == "10:11:12 AM"
+    DateTime.civil(2000, 4,  9, 13, 11, 12).strftime("%r").should == " 1:11:12 PM"
+    DateTime.civil(2000, 4,  9, 10, 11, 12).strftime("%r").should == DateTime.civil(2000, 4,  9, 10, 11, 12).strftime('%I:%M:%S %p')
+  end
+
+  it "should be able to show the hour, minute, and second" do
+    DateTime.civil(2000, 4,  9, 10, 11, 12).strftime("%T").should == "10:11:12"
+    DateTime.civil(2000, 4,  9, 13, 11, 12).strftime("%T").should == "13:11:12"
+    DateTime.civil(2000, 4,  9, 10, 11, 12).strftime("%T").should == DateTime.civil(2000, 4,  9, 10, 11, 12).strftime('%H:%M:%S')
+    DateTime.civil(2000, 4,  9, 10, 11, 12).strftime("%X").should == "10:11:12"
+    DateTime.civil(2000, 4,  9, 13, 11, 12).strftime("%X").should == "13:11:12"
+    DateTime.civil(2000, 4,  9, 10, 11, 12).strftime("%X").should == DateTime.civil(2000, 4,  9, 10, 11, 12).strftime('%H:%M:%S')
+  end
+  
+  it "should be able to print the common date and timezone" do
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime("%+").should == "Thu Apr  6 10:11:12 +00:00 2000"
+    DateTime.civil(2000, 4, 6, 10, 11, 12, 0.5).strftime("%+").should == "Thu Apr  6 10:11:12 +12:00 2000"
+    DateTime.civil(2000, 4, 6, 10, 11, 12).strftime("%+").should == DateTime.civil(2000, 4, 6, 10, 11, 12).strftime('%a %b %e %H:%M:%S %Z %Y')  
+  end
+end

data/spec/datetime/strptime_spec.rb

@@ -0,0 +1,117 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime.strptime" do
+  before do
+    @t = Time.now
+  end
+  
+  it "._strptime should be a hash of values" do
+    DateTime._strptime('2008-10-11T01:00:02+0000').should == {:offset=>0, :zone=>"+0000", :sec=>2, :year=>2008, :hour=>1, :mday=>11, :min=>0, :mon=>10}
+    DateTime._strptime('2008-10-11', '%Y-%m-%d').should == {:year=>2008, :mon=>10, :mday=>11}
+  end
+  
+  it "should have defaults and an optional sg value" do
+    DateTime.strptime('2008-10-11T00:00:00+00:00').should == DateTime.civil(2008, 10, 11)
+    DateTime.strptime('2008-10-11', '%Y-%m-%d').should == DateTime.civil(2008, 10, 11)
+    DateTime.strptime('2008-10-11', '%Y-%m-%d', 1).should == DateTime.civil(2008, 10, 11)
+    DateTime.strptime.should == DateTime.jd
+  end
+
+  it "should be able to parse the date time" do
+    DateTime.strptime("2000-04-06T10:11:12+00:00").should == DateTime.civil(2000, 4, 6, 10, 11, 12)
+  end
+
+  it "should be able to parse the hour in a 24 hour clock with leading zero" do
+    DateTime.strptime("10", '%H').should == DateTime.civil(@t.year, @t.mon, @t.day, 10, 0, 0)
+    DateTime.strptime("09", '%H').should == DateTime.civil(@t.year, @t.mon, @t.day, 9, 0, 0)
+    DateTime.strptime("2000 16", '%Y %H').should == DateTime.civil(2000, 1, 1, 16, 0, 0)
+  end
+
+  it "should be able to parse the hour in a 12 hour clock with leading zero with meridian indicator" do
+    DateTime.strptime("10 AM", '%I %p').should == DateTime.civil(@t.year, @t.mon, @t.day, 10, 0, 0)
+    DateTime.strptime("03 04 04 PM", '%m %d %I %p').should == DateTime.civil(@t.year, 3, 4, 16, 0, 0)
+  end
+  
+  it "should be able to parse the hour in a 24 hour clock with leading space" do
+    DateTime.strptime("10", '%k').should == DateTime.civil(@t.year, @t.mon, @t.day, 10, 0, 0)
+    DateTime.strptime(" 9", '%k').should == DateTime.civil(@t.year, @t.mon, @t.day, 9, 0, 0)
+    DateTime.strptime("10 16", '%d %k').should == DateTime.civil(@t.year, @t.mon, 10, 16, 0, 0)
+  end
+
+  it "should be able to parse the hour in a 12 hour clock with leading space with meridian indicator" do
+    DateTime.strptime("10 am", '%l %P').should == DateTime.civil(@t.year, @t.mon, @t.day, 10, 0, 0)
+    DateTime.strptime(" 4 pm", '%l %P').should == DateTime.civil(@t.year, @t.mon, @t.day, 16, 0, 0)
+  end
+  
+  it "should be able to parse the number of milliseconds of the second" do
+    DateTime.strptime("10 000", '%M %L').should == DateTime.civil(@t.year, @t.mon, @t.day, 0, 10, 0)
+    DateTime.strptime("10 500", '%M %L').should == DateTime.civil(@t.year, @t.mon, @t.day, 0, 10, 0) + (0.5/86400)
+  end
+  
+  it "should be able to parse the minute with leading zero" do
+    DateTime.strptime("10", '%M').should == DateTime.civil(@t.year, @t.mon, @t.day, 0, 10, 0)
+    DateTime.strptime("09", '%M').should == DateTime.civil(@t.year, @t.mon, @t.day, 0, 9, 0)
+  end
+ 
+  it "should be able to parse the number of nanoseconds of the second" do
+    DateTime.strptime("10 000000000", '%M %N').should == DateTime.civil(@t.year, @t.mon, @t.day, 0, 10, 0)
+    DateTime.strptime("10 500000000", '%M %N').should == DateTime.civil(@t.year, @t.mon, @t.day, 0, 10, 0) + (0.5/86400)
+  end
+  
+  it "should be able to parse the number of seconds since the unix epoch" do
+    Date.strptime("954979200", "%s").should == Date.civil(2000, 4, 6)
+  end
+  
+  it "should be able to parse the number of milliseconds since the unix epoch" do
+    DateTime.strptime("1226527410000", '%Q').should == DateTime.civil(2008, 11, 12, 22, 3, 30, 0)
+    DateTime.strptime("1226527411000", '%Q').should == DateTime.civil(2008, 11, 12, 22, 3, 31, 0)
+    DateTime.strptime("32511888001500", "%Q").should == DateTime.civil(3000, 4, 6, 0, 0, 1) + (0.5/86400)
+  end
+  
+  it "should be able to parse the second with leading zero" do
+    DateTime.strptime("10", '%S').should == DateTime.civil(@t.year, @t.mon, @t.day, 0, 0, 10)
+    DateTime.strptime("10 09", '%H %S').should == DateTime.civil(@t.year, @t.mon, @t.day, 10, 0, 9)
+  end
+  
+  it "should be able to parse the number of seconds since the unix epoch" do
+    DateTime.strptime("1226527410", '%s').should == DateTime.civil(2008, 11, 12, 22, 3, 30, 0)
+    DateTime.strptime("1226527411", '%s').should == DateTime.civil(2008, 11, 12, 22, 3, 31, 0)
+    DateTime.strptime("32511888001", "%s").should == DateTime.civil(3000, 4, 6, 0, 0, 1)
+  end
+  
+  it "should be able to parse the time zone offset as a string of hours and minutes" do
+    DateTime.strptime("2000 +0000", '%Y %z').offset.should == 0
+    DateTime.strptime("2000 Z", '%Y %z').offset.should == 0
+    DateTime.strptime("2000 -1200", '%Y %z').offset.should == -0.5
+    DateTime.strptime("2000 +1200", '%Y %z').offset.should == 0.5
+    DateTime.strptime("2000 -01:00", '%Y %z').offset.should == -1/24.0
+    DateTime.strptime("2000 +01:00", '%Y %z').offset.should == 1/24.0
+  end
+  
+  ############################
+  # Specs that combine stuff #
+  ############################
+
+  it "should be able to parse the common date" do
+    DateTime.strptime("Thu Apr  6 10:11:12 2000", "%c").should == DateTime.civil(2000, 4, 6, 10, 11, 12)  
+  end
+
+  it "should be able to parse the hour and minute" do
+    DateTime.strptime("10:11", "%R").should == DateTime.civil(@t.year, @t.mon, @t.day, 10, 11, 0)
+  end
+
+  it "should be able to parse the hour, minute, second, and am/pm flag" do
+    DateTime.strptime("10:11:12 AM", "%r").should == DateTime.civil(@t.year, @t.mon, @t.day, 10, 11, 12)
+    DateTime.strptime("01:11:12 PM", "%r").should == DateTime.civil(@t.year, @t.mon, @t.day, 13, 11, 12)
+  end
+
+  it "should be able to parse the hour, minute, and second" do
+    DateTime.strptime("10:11:12", "%T").should == DateTime.civil(@t.year, @t.mon, @t.day, 10, 11, 12)
+    DateTime.strptime("01:11:12", "%X").should == DateTime.civil(@t.year, @t.mon, @t.day, 1, 11, 12)
+  end
+  
+  it "should be able to parse the common date and timezone" do
+    DateTime.strptime("Thu Apr  6 10:11:12 +0000 2000", "%+").should == DateTime.civil(2000, 4, 6, 10, 11, 12)
+    DateTime.strptime("Thu Apr  6 10:11:12 +1200 2000", "%+").should == DateTime.civil(2000, 4, 6, 10, 11, 12, 0.5) 
+  end
+end

data/spec/datetime/succ_spec.rb

@@ -0,0 +1,24 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#succ" do
+  it "should be the next day" do
+    ds    = DateTime.civil(2008, 10, 11)
+    ds.succ.should == DateTime.civil(2008, 10, 12)
+    ds    = DateTime.civil(2008, 10, 31)
+    ds.succ.should == DateTime.civil(2008, 11, 1)
+    ds    = DateTime.commercial(2008, 2, 7)
+    ds.succ.should == DateTime.commercial(2008, 3, 1)
+    ds    = DateTime.jd(2008)
+    ds.succ.should == DateTime.jd(2009)
+    ds    = DateTime.ordinal(2008, 366)
+    ds.succ.should == DateTime.ordinal(2009, 1)
+  end
+
+  it "should be aliased as next" do
+    DateTime.civil(2008, 10, 11).next.should == DateTime.civil(2008, 10, 12)
+  end
+
+  it "should keep the same fractional component" do
+    DateTime.civil(2008, 10, 11, 12, 13, 14).succ.should == DateTime.civil(2008, 10, 12, 12, 13, 14)
+  end
+end

data/spec/datetime/upto_spec.rb

@@ -0,0 +1,39 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "DateTime#upto" do
+  
+  it "should be able to step forward in time" do
+    ds    = DateTime.civil(2008, 10, 11)
+    de    = DateTime.civil(2008,  9, 29)
+    count = 0
+    de.upto(ds) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 13
+  end
+
+  it "should respect fractional days" do
+    ds    = DateTime.civil(2008, 10, 11, 0)
+    de    = DateTime.civil(2008,  9, 29, 12)
+    count = 0
+    de.upto(ds) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 12
+
+    ds    = DateTime.civil(2008, 10, 11, 12)
+    de    = DateTime.civil(2008,  9, 29, 0)
+    count = 0
+    de.upto(ds) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 13
+  end
+
+end