diff options
| -rw-r--r-- | lib/ayk/age.rb | 37 | ||||
| -rw-r--r-- | spec/age.rb | 88 |
2 files changed, 125 insertions, 0 deletions
diff --git a/lib/ayk/age.rb b/lib/ayk/age.rb new file mode 100644 index 0000000..fc1aeb3 --- /dev/null +++ b/lib/ayk/age.rb @@ -0,0 +1,37 @@ +#! /usr/bin/env ruby +# -*- coding: UTF-8 -*- + +#---------------------------------------------------------------------------- +# +# File : age.rb +# Author : Jérémy Zurcher <jeremy@asynk.ch> +# Date : 22/08/09 +# +#---------------------------------------------------------------------------- + +require 'date' + +class DateTime + # returns an array representing years,months,days,hours,minutes,seconds + # between self and futur DateTime at + def age at=DateTime.now + return [nil]*6 if at<self + # years + years = at.year-self.year + years -= 1 if ( self>>(12*years) ) > at + x = self>>(12*years) + # months + months = at.month-x.month+(12*(at.year-x.year)) + months -= 1 if ( x>>months ) > at + x >>=months + # days + days = (at-x).to_i + x += days + # hours + hours,r = (at.to_time-x.to_time).to_i.divmod 3600 + mins,secs = r.divmod 60 + # return + [years,months,days,hours,mins,secs] + end +end + diff --git a/spec/age.rb b/spec/age.rb new file mode 100644 index 0000000..99a09c7 --- /dev/null +++ b/spec/age.rb @@ -0,0 +1,88 @@ +#! /usr/bin/env ruby +# -*- coding: UTF-8 -*- + +require 'ayk/age' +# +def age_spec(birth,dy,dm,dd) + at = ((birth>>(12*dy))>>dm)+dd +# puts at.strftime "%d.%m.%Y" + y,m,d,h,i,s = birth.age(at) +# puts "#{y} #{m} #{d}" + y.should eql dy + m.should eql dm + d.should eql dd +end +# +describe DateTime do + # + before(:all) do + @b = DateTime.civil 2009,7,27,4,40,0 # Róisín Mannion-Zurcher [IRL|CH] ) + end + it "should pass time checks" do + y,m,d,h,i,s = @b.age( DateTime.civil(2009,7,27,4,40,0) ) + h.should eql 0 + i.should eql 0 + s.should eql 0 + y,m,d,h,i,s = @b.age( DateTime.civil(2009,7,27,7,2,2) ) + h.should eql 2 + i.should eql 22 + s.should eql 2 + end + it "simple checks" do + age_spec(@b,0,0,0) + age_spec(@b,0,0,1) + age_spec(@b,0,1,0) + age_spec(@b,0,1,1) + age_spec(@b,1,0,0) + age_spec(@b,1,0,1) + age_spec(@b,1,1,0) + age_spec(@b,1,1,1) + end + it "should pass day computations" do + at = ((@b>>(12*0))>>15)+3 + y,m,d,h,i,s = @b.age(at) + y.should eql 1 + m.should eql 3 + d.should eql 3 + at = ((@b>>(12*0))>>1)+366 + y,m,d,h,i,s = @b.age(at) + y.should eql 1 + m.should eql 1 + d.should eql 1 + at = ((@b>>(12*5))>>10)+15 + y,m,d,h,i,s = @b.age(at) + y.should eql 5 + m.should eql 10 + d.should eql 15 + at = ((@b>>(12*0))>>0)+750 + y,m,d,h,i,s = @b.age(at) + y.should eql 2 + m.should eql 0 + d.should eql 20 + end + it "should pass more complicated one" do + at = DateTime.civil 2010,7,13,4,40,0 # Corina Mannion + y,m,d,h,i,s = @b.age(at) + y.should eql 0 + m.should eql 11 + d.should eql 16 + h.should eql 0 + i.should eql 0 + s.should eql 0 + at = DateTime.civil 2010,7,13,0,0,0 # Corina Mannion + y,m,d,h,i,s = @b.age(at) + y.should eql 0 + m.should eql 11 + d.should eql 15 + h.should eql 19 + i.should eql 20 + s.should eql 0 + end +end + + +#(1..365).each do |n| +# dt = birth.age( birth+n) +# puts "#{n} => #{dt[1]} #{dt[2]}" +#end + |