smart_month 1.0.0

data/test/spec/date/downto_spec.rb

@@ -0,0 +1,18 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+
+describe "Date#downto" do
+
+  it "should be able to step backward in time" do
+    ds    = Date.civil(2000, 4, 14)
+    de    = Date.civil(2000, 3, 29)
+    count = 0
+    ds.step(de, -1) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 17
+  end
+
+end

data/test/spec/date/eql_spec.rb

@@ -0,0 +1,10 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+
+describe "Date#eql?" do
+  it "should be able determine equality between date objects" do
+    Date.civil(2007, 10, 11).should eql(Date.civil(2007, 10, 11))
+    Date.civil(2007, 10, 11).should eql(Date.civil(2007, 10, 12) - 1)
+    Date.civil(2007, 10, 11).should_not eql(Date.civil(2007, 10, 12))
+  end
+end

data/test/spec/date/gregorian_spec.rb

@@ -0,0 +1,28 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+
+describe "Date#gregorian?" do
+
+  it "should mark a day before the calendar reform as Julian" do
+    Date.civil(1007, 2, 27).gregorian?.should == false
+    Date.civil(1907, 2, 27, Date.civil(2000, 1, 1).jd).gregorian?.should == false
+  end
+  
+  it "should mark a day after the calendar reform as Julian" do
+    Date.civil(2007, 2, 27).gregorian?.should == true
+    Date.civil(1007, 2, 27, Date.civil(1000, 1, 1).jd).gregorian?.should == true
+  end
+  
+end
+
+describe "Date#gregorian_leap?" do
+
+  it "should be able to determine whether a year is a leap year in the Gregorian calendar" do
+    Date.gregorian_leap?(1900).should == false
+    Date.gregorian_leap?(1999).should == false
+    Date.gregorian_leap?(2000).should == true
+    Date.gregorian_leap?(2002).should == false
+    Date.gregorian_leap?(2004).should == true
+  end
+
+end

data/test/spec/date/hash_spec.rb

@@ -0,0 +1,14 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+
+describe "Date#hash" do
+  
+  it "should be able determine the hash value for a date" do
+    Date.civil(2004, 7, 12).respond_to?(:hash).should == true
+  end
+  
+  it "should be the case that the same date results in the same hash" do 
+    Date.civil(2004, 7, 12).hash.should == Date.civil(2004, 7, 12).hash
+  end
+  
+end

data/test/spec/date/infinity_spec.rb

@@ -0,0 +1,77 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+
+describe "Date::Infinity" do
+
+  it "should be able to check whether Infinity is zero" do
+    i = Date::Infinity.new
+    i.zero?.should == false
+  end
+
+  it "should be able to check whether Infinity is finite" do
+    i1 = Date::Infinity.new
+    i1.finite?.should == false
+    i2 = Date::Infinity.new(-1)
+    i2.finite?.should == false
+    i3 = Date::Infinity.new(0)
+    i3.finite?.should == false
+  end
+
+  it "should be able to check whether Infinity is infinite" do
+    i1 = Date::Infinity.new
+    i1.infinite?.should == 1
+    i2 = Date::Infinity.new(-1)
+    i2.infinite?.should == -1
+    i3 = Date::Infinity.new(0)
+    i3.infinite?.should == nil
+  end
+
+  it "should be able to check whether Infinity is not a number" do
+    i1 = Date::Infinity.new
+    i1.nan?.should == false
+    i2 = Date::Infinity.new(-1)
+    i2.nan?.should == false
+    i3 = Date::Infinity.new(0)
+    i3.nan?.should == true
+  end
+
+  # These checks fail on MRI because of a bug in Date::Infinity#<=>
+  # Fixed in 1.8.7
+  ruby_bug "#", "1.8.6" do
+    it "should be able to compare Infinity objects" do
+      i1 = Date::Infinity.new
+      i2 = Date::Infinity.new(-1)
+      i3 = Date::Infinity.new(0)
+      i4 = Date::Infinity.new
+      (i4 <=> i1).should == 0
+      (i3 <=> i1).should == -1
+      (i2 <=> i1).should == -1
+      (i3 <=> i2).should == 1
+    end
+  end
+
+  # Also fails because of the same bug as the previous spec
+  # Fixed in 1.8.7
+  ruby_bug "#", "1.8.6" do
+    it "should be able to return plus Infinity for abs" do
+      i1 = Date::Infinity.new
+      i2 = Date::Infinity.new(-1)
+      i3 = Date::Infinity.new(0)
+      (i2.abs <=> i1).should == 0
+      (i3.abs <=> i1).should == 0
+    end
+  end
+  
+  ruby_bug "#222", "1.8.6" do
+    it "should be able to use -@ and +@ for Date::Infinity" do
+      (Date::Infinity.new <=> +Date::Infinity.new).should == 0
+      (Date::Infinity.new(-1) <=> -Date::Infinity.new).should == 0
+    end
+  end
+  
+  it "should be able to coerce a Date::Infinity object" do
+    Date::Infinity.new.coerce(1).should == [-1, 1]
+    Date::Infinity.new(0).coerce(2).should == [0, 0]
+    Date::Infinity.new(-1).coerce(1.5).should == [1, -1]
+  end
+end

data/test/spec/date/julian_spec.rb

@@ -0,0 +1,52 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+
+describe "Date#jd" do
+
+  it "should be able to construct a Date object based on the Julian day" do
+    Date.jd(2454482).should == Date.civil(2008, 1, 16)
+  end
+
+  it "should be able to determine the Julian day for a Date object" do
+    Date.civil(2008, 1, 16).jd.should == 2454482
+  end
+  
+end
+
+describe "Date#julian?" do
+
+  it "should mark a day before the calendar reform as Julian" do
+    Date.civil(1007, 2, 27).julian?.should == true
+    Date.civil(1907, 2, 27, Date.civil(2000, 1, 1).jd).julian?.should == true
+  end
+  
+  it "should mark a day after the calendar reform as Julian" do
+    Date.civil(2007, 2, 27).julian?.should == false
+    Date.civil(1007, 2, 27, Date.civil(1000, 1, 1).jd).julian?.should == false
+  end
+  
+end
+
+describe "Date#julian_leap?" do
+
+  it "should be able to determine whether a year is a leap year in the Julian calendar" do
+    Date.julian_leap?(1900).should == true
+    Date.julian_leap?(1999).should == false
+    Date.julian_leap?(2000).should == true
+    Date.julian_leap?(2002).should == false
+    Date.julian_leap?(2004).should == true
+  end
+
+end
+
+describe "Date#valid_jd?" do
+
+  it "should be able to determine if a day number is a valid Julian day number, true for all numbers" do
+    # This might need to check the type of the jd parameter. Date.valid_jd?(:number) is of course
+    # bogus but returns itself with the current implementation
+    Date.valid_jd?(-100).should == -100
+    Date.valid_jd?(0).should    ==    0
+    Date.valid_jd?(100).should  ==  100
+  end
+
+end

data/test/spec/date/minus_month_spec.rb

@@ -0,0 +1,23 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+
+describe "Date#<<" do
+
+  it "should substract a number of months from a date" do
+    d = Date.civil(2007,2,27) << 10
+    d.should == Date.civil(2006, 4, 27)
+  end
+
+  it "should result in the last day of a month if the day doesn't exist" do
+    d = Date.civil(2008,3,31) << 1
+    d.should == Date.civil(2008, 2, 29)
+  end
+
+  it "should raise an error on non numeric parameters" do
+    lambda { Date.civil(2007,2,27) << :hello }.should raise_error(NoMethodError)
+    lambda { Date.civil(2007,2,27) << "hello" }.should raise_error(NoMethodError)
+    lambda { Date.civil(2007,2,27) << Date.new }.should raise_error(NoMethodError)
+    lambda { Date.civil(2007,2,27) << Object.new }.should raise_error(NoMethodError)
+  end
+  
+end

data/test/spec/date/minus_spec.rb

@@ -0,0 +1,30 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+
+describe "Date#-" do
+
+  it "should substract a number of days from a Date" do
+    d = Date.civil(2007, 5 ,2) - 13
+    d.should == Date.civil(2007, 4, 19)
+  end
+  
+  it "should substract a negative number of days from a Date" do
+    d = Date.civil(2007, 4, 19).-(-13)
+    d.should == Date.civil(2007, 5 ,2) 
+  end
+
+  it "should be able to compute the different between two dates" do
+    (Date.civil(2007,2,27) - Date.civil(2007,2,27)).should == 0
+    (Date.civil(2007,2,27) - Date.civil(2007,2,26)).should == 1
+    (Date.civil(2006,2,27) - Date.civil(2007,2,27)).should == -365
+    (Date.civil(2008,2,27) - Date.civil(2007,2,27)).should == 365
+    
+  end
+
+  it "should raise an error on non numeric parameters" do
+    lambda { Date.civil(2007,2,27) - :hello }.should raise_error(TypeError)
+    lambda { Date.civil(2007,2,27) - "hello" }.should raise_error(TypeError)
+    lambda { Date.civil(2007,2,27) - Object.new }.should raise_error(TypeError)
+  end
+  
+end

data/test/spec/date/new_spec.rb

@@ -0,0 +1,9 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+require File.dirname(__FILE__) + '/shared/civil'
+
+describe "Date#new" do
+
+  it_behaves_like(:date_civil, :new)
+
+end

data/test/spec/date/neww_spec.rb

@@ -0,0 +1,9 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+require File.dirname(__FILE__) + '/shared/commercial'
+
+describe "Date#neww" do
+
+  it_behaves_like(:date_commercial, :neww)
+
+end

data/test/spec/date/ordinal_spec.rb

@@ -0,0 +1,29 @@
+require 'date' 
+require File.dirname(__FILE__) + '/../../spec_helper'
+require File.dirname(__FILE__) + '/shared/commercial'
+
+describe "Date#ordinal" do
+
+  it "should be able to construct a Date object from an ordinal date" do
+    lambda { Date.ordinal(1582, 287) }.should raise_error(ArgumentError)
+    Date.ordinal(1582, 288).should == Date.civil(1582, 10, 15)
+    Date.ordinal(1582, 287, Date::ENGLAND).should == Date.civil(1582, 10, 14, Date::ENGLAND)
+  end
+
+end
+
+describe "Date#valid_ordinal?" do
+
+  it "should be able to determine if the date is a valid ordinal date" do
+    Date.valid_ordinal?(1582, 287).should == nil
+    Date.valid_ordinal?(1582, 288).should == Date.civil(1582, 10, 15).jd
+    Date.valid_ordinal?(1582, 287, Date::ENGLAND).should_not == nil
+    Date.valid_ordinal?(1582, 287, Date::ENGLAND).should == Date.civil(1582, 10, 14, Date::ENGLAND).jd
+  end
+
+  it "should be able to handle negative day numbers" do
+    Date.valid_ordinal?(1582, -79).should == nil
+    Date.valid_ordinal?(2007, -100).should == Date.valid_ordinal?(2007, 266)
+  end
+
+end

data/test/spec/date/parse_spec.rb

@@ -0,0 +1,149 @@
+require File.dirname(__FILE__) + '/../../spec_helper'
+require File.dirname(__FILE__) + '/shared/parse'
+require File.dirname(__FILE__) + '/shared/parse_us'
+require File.dirname(__FILE__) + '/shared/parse_eu'
+require 'date'
+
+describe "Date#parse" do
+  # The space separator is also different, doesn't work for only numbers
+  it "can parse a day name into a Date object" do
+    d = Date.parse("friday")
+    d.should == Date.commercial(d.cwyear, d.cweek, 5)
+  end
+
+  it "can parse a month name into a Date object" do
+    d = Date.parse("october")
+    d.should == Date.civil(Date.today.year, 10)
+  end
+
+  it "can parse a month day into a Date object" do
+    d = Date.parse("5th")
+    d.should == Date.civil(Date.today.year, Date.today.month, 5)
+  end
+
+  # Specs using numbers
+  it "can't handle a single digit" do
+    lambda{ Date.parse("1") }.should raise_error(ArgumentError)
+  end
+
+  it "can handle DD as month day number" do
+    d = Date.parse("10")
+    d.should == Date.civil(Date.today.year, Date.today.month, 10)
+  end
+
+  it "can handle DDD as year day number" do
+    d = Date.parse("100")
+    if Date.gregorian_leap?(Date.today.year)
+      d.should == Date.civil(Date.today.year, 4, 9)
+    else
+      d.should == Date.civil(Date.today.year, 4, 10)
+    end
+  end
+
+  it "can handle MMDD as month and day" do
+    d = Date.parse("1108")
+    d.should == Date.civil(Date.today.year, 11, 8)
+  end
+
+  it "can handle YYDDD as year and day number" do
+    d = Date.parse("10100")
+    d.should == Date.civil(10, 4, 10)
+  end
+
+  it "can handle YYMMDD as year month and day" do
+    d = Date.parse("201023")
+    d.should == Date.civil(20, 10, 23)
+  end
+
+  it "can handle YYYYDDD as year and day number" do
+    d = Date.parse("1910100")
+    d.should == Date.civil(1910, 4, 10)
+  end
+
+  it "can handle YYYYMMDD as year and day number" do
+    d = Date.parse("19101101")
+    d.should == Date.civil(1910, 11, 1)
+  end
+end
+
+describe "Date#parse with '.' separator" do
+  before :all do
+    @sep = '.'
+  end
+
+  it_should_behave_like "date_parse"
+end
+
+describe "Date#parse with '/' separator" do
+  before :all do
+    @sep = '/'
+  end
+
+  it_should_behave_like "date_parse"
+end
+
+describe "Date#parse with ' ' separator" do
+  before :all do
+    @sep = ' '
+  end
+
+  it_should_behave_like "date_parse"
+end
+
+describe "Date#parse with '/' separator US-style" do
+  before :all do
+    @sep = '/'
+  end
+
+  it_should_behave_like "date_parse_us"
+end
+
+ruby_version_is "" ... "1.8.7" do
+  describe "Date#parse with '.' separator US-style" do
+    before :all do
+      @sep = '.'
+    end
+
+    it_should_behave_like "date_parse_us"
+  end
+end
+
+describe "Date#parse with '-' separator EU-style" do
+  before :all do
+    @sep = '-'
+  end
+
+  it_should_behave_like "date_parse_eu"
+end
+
+ruby_version_is "1.8.7" do
+  describe "Date#parse(.)" do
+    it "parses a YYYY.MM.DD string into a Date object" do
+      d = Date.parse("2007.10.01")
+      d.year.should  == 2007
+      d.month.should == 10
+      d.day.should   == 1
+    end
+
+    it "parses a DD.MM.YYYY string into a Date object" do
+      d = Date.parse("10.01.2007")
+      d.year.should  == 2007
+      d.month.should == 1
+      d.day.should   == 10
+    end
+
+    it "parses a YY.MM.DD string into a Date object" do
+      d = Date.parse("10.01.07")
+      d.year.should  == 10
+      d.month.should == 1
+      d.day.should   == 7
+    end
+
+    it "parses a YY.MM.DD string into a Date object using the year digits as 20XX" do
+      d = Date.parse("10.01.07", true)
+      d.year.should  == 2010
+      d.month.should == 1
+      d.day.should   == 7
+    end
+  end
+end