date_tools 0.0.2

data/examples/example_date_creator.rb

@@ -0,0 +1,24 @@
+require '../lib/date_tools/date_creator'
+
+puts "The first sunday in January 2010: #{Date.new_by_mday(2010,1,0,1)}"
+puts "The second sunday in January 2010: #{Date.new_by_mday(2010,1,0,2)}"
+puts "The third sunday in January 2010: #{Date.new_by_mday(2010,1,0,3)}"
+puts "The fourth sunday in January 2010: #{Date.new_by_mday(2010,1,0,4)}"
+puts "The fifth sunday in January 2010: #{Date.new_by_mday(2010,1,0,5)}"
+
+puts 
+
+puts "The first monday in January 2010: #{Date.new_by_mday(2010,1,1,1)}"
+puts "The second monday in January 2010: #{Date.new_by_mday(2010,1,1,2)}"
+puts "The third monday in January 2010: #{Date.new_by_mday(2010,1,1,3)}"
+puts "The fourth monday in January 2010: #{Date.new_by_mday(2010,1,1,4)}"
+#~ puts "The fifth monday in January 2010: #{Date.new_by_mday(2010,1,1,5)}"
+
+puts 
+
+puts "The first sunday in February 2010: #{Date.new_by_mday(2010,2,0,1)}"
+puts "The second sunday in February 2010: #{Date.new_by_mday(2010,2,0,2)}"
+puts "The third sunday in February 2010: #{Date.new_by_mday(2010,2,0,3)}"
+puts "The fourth sunday in February 2010: #{Date.new_by_mday(2010,2,0,4)}"
+puts "The fifth sunday in February 2010: #{Date.new_by_mday(2010,2,0,5)}"
+

data/examples/example_date_locale.rb

@@ -0,0 +1,35 @@
+require '../lib/date_tools/date_locale'
+
+#Here you can play with locales.
+#Please run the tests with and without locale.
+#~ require 'locale'
+#~ Locale.current = 'en'
+#~ Locale.current = 'fr'
+
+#
+#Test with encoding conversion
+#
+Date_locale.set_target_encoding( 'iso-8859-1')
+[
+  Date.new(2009, 1,21),
+  Date.new(2009, 2,21),
+  Date.new(2009,10,21),
+].each{|d|
+  puts d.strftime('%Y-%m-%d: %A (%a) %B (%b)')
+  puts d.strftime('%Y-%m-%d: %A (%a) %B (%b)', :de)
+  puts d.strftime('%Y-%m-%d: %A (%a) %B (%b)', :de_at)
+  puts d.strftime('%Y-%m-%d: %A (%a) %B (%b)', :fr)
+}
+
+#
+#Test all languages (unicode nbeeded)
+Date_locale.set_target_encoding( 'utf-8')
+[
+  Date.new(2009, 1,21),
+  Date.new(2009, 2,21),
+  Date.new(2009,10,21),
+].each{|d|
+  Date_locale::DATE_TEXTS.keys.each{|lang|
+    puts d.strftime("#{lang}: %Y-%m-%d: %A (%a) %B (%b)", lang)
+  }
+}

data/examples/example_date_time_compare.rb

@@ -0,0 +1,29 @@
+require '../lib/date_tools/date_time_compare.rb'
+
+
+array = [
+  Date.new(2010,1,1),
+  Time.local(2010,1,2,12,0),
+  DateTime.new(2010,1,3,12,30),
+]
+#Add some random dates and times:
+5.times{
+  array << Date.new(  rand(10)+1995,  rand(11)+1, rand(27)+1)
+  array << Time.local(  rand(10)+1995,  rand(11)+1, rand(27)+1, rand(22)+1,rand(58)+1)
+  array << DateTime.new(rand(10)+1995 ,rand(11)+1, rand(27)+1,  rand(22)+1,rand(58)+1)
+}
+
+#~ array.sort  #-> error
+#~ puts array.map{|d| d.to_date}.sort 
+array.sort_by{|d| d.to_date}.each{|d|
+  puts d.strftime("%Y-%m-%d %H:%M (#{d.class})")
+}
+
+10.times{
+  sec = rand(200000)
+  puts "%6i seconds are %s" % [ sec, Time.sec2time(sec) ]
+}
+
+
+#Print time differences in days, hours...
+puts Time.gm(2009,8,11,12,0).timediff( Time.gm(2009,8,12,12,0) )

data/lib/date_tools.rb

@@ -0,0 +1,31 @@
+#Little helper for the classes Date, DateTime and Time:
+#
+#= date_time_compare.rb:
+#Allows to compare Date and Time objects (allows to sort by mixed Date/Time-keys).
+#
+#Time gets also some methods like Date:
+#* Time#cwday
+#* Time#cweek
+#* Time#cwyear
+# 
+#= date_creator.rb:
+#New date creations:
+#
+#Date#new_by_mday: Allows "Third sunday in june 2010"...
+#
+#
+#= date_locale.rb:
+#Localization of Date, DateTime and Time.
+#
+#strftime (Date#strftime, Time#strftime and DateTime#strftime)
+#gets a optional parameter to determine the language.
+#
+#Default is en, or if locale is used the current locale.
+
+
+#
+#There are no dependicies between the 
+#
+require 'date_tools/date_creator.rb'
+require 'date_tools/date_locale.rb'
+require 'date_tools/date_time_compare.rb'

data/lib/date_tools/date_creator.rb

@@ -0,0 +1,38 @@
+#
+#Add some possibilities to create new dates.
+#
+#Similar packages:
+#* expanded_date: http://gemcutter.org/gems/expanded_date
+#
+require 'date'
+
+class Date
+  
+  #~ class DateError < ArgumentError; end
+  
+  #Get the third monday in march 2008: new_by_mday( 2008, 3, 1, 3)
+  #
+  #Based on http://forum.ruby-portal.de/viewtopic.php?f=1&t=6157
+  def self.new_by_mday(year, month, weekday, nr)
+    
+    raise( ArgumentError, "No number for weekday/nr") unless weekday.respond_to?(:between?) and nr.respond_to?(:between?)
+    raise( ArgumentError, "Number not in Range 1..5: #{nr}") unless nr.between?(1,5)
+    raise( ArgumentError,  "Weekday not between 0 (Sunday)and 6 (Saturday): #{nr}") unless weekday.between?(0,6)
+    
+    day =  (weekday-Date.new(year, month, 1).wday)%7 + (nr-1)*7 + 1
+    
+    if nr == 5
+      lastday = (Date.new(year, (month)%12+1, 1)-1).day # each december has the same no. of days
+      raise "There are not 5 weekdays with number #{weekday} in month #{month}" if day > lastday
+    end
+    
+  Date.new(year, month, day)
+  end
+end
+
+#~ Date.new_by_mday(2010,1,:wrong,6)
+#~ Date.new_by_mday(2010,1,2,:wrong)
+
+#~ puts     Date.new_by_mday(2010,1,8,1)
+
+#~ Date.new_by_mday(2010,1,1,5)

data/lib/date_tools/date_locale.rb

@@ -0,0 +1,300 @@
+#
+#Make a 'localization' for Date, DateTime and Time.
+#
+#This is not using locale, but if you use locale, it is detected and locale sensitive.
+#
+#The output is in iso-8859-1, other encodings can be set with Date_locale.set_target_encoding.
+#
+
+
+require 'iconv'
+#~ require 'date'
+
+#
+#Adaption for a localized Date-class
+#
+#Solution based on discussion at ruby-forum.de 
+#-http://forum.ruby-portal.de/viewtopic.php?f=1&t=10527&start=0
+#
+module Date_locale
+
+  #Constant/Hash with the supported languages.
+  #
+  #Initial definitions are taken from localization_simplified.
+  #
+  #Changes:
+  #* added de_at
+  #* adapted :pt to pt_br (original :pt was French).
+  DATE_TEXTS = {
+   :ca => {
+      :monthnames => [nil] + %w{gener febrer març abril maig juny juliol agost setembre octubre novembre desembre},
+      :abbr_monthnames => [nil] + %w{gen feb mar abr mai jun jul ago set oct nov des},
+      :daynames => %w{diumenge dilluns dimarts dimecres dijous divendres dissabte},
+      :abbr_daynames => %w{dmg dll dmt dmc djs dvn dsb},
+     },
+   :cf => {
+      :monthnames => [nil] + %w{Janvier Février Mars Avril Mai Juin Juillet Août Septembre Octobre Novembre Décembre},
+      :abbr_monthnames => [nil] + %w{Jan Fev Mar Avr Mai Jun Jui Aou Sep Oct Nov Dec},
+      :daynames => %w{Dimanche Lundi Mardi Mercredi Jeudi Vendredi Samedi},
+      :abbr_daynames => %w{Dim Lun Mar Mer Jeu Ven Sam},
+     },
+   :cs => {
+      :monthnames => [nil] + %w{Leden Únor Březen Duben Květen Červen Červenec Srpen Září Říjen Listopad Prosinec},
+      :abbr_monthnames => [nil] + %w{Led Úno Bře Dub Kvě Čvn Čvc Srp Zář Říj Lis Pro},
+      :daynames => %w{Neděle Pondělí Úterý Středa Čtvrtek Pátek Sobota},
+      :abbr_daynames => %w{Ne Po Út St Čt Pá So},
+     },
+   :da => {
+      :monthnames => [nil] + %w{januar februar marts april maj juni juli august september oktober november december},
+      :abbr_monthnames => [nil] + %w{jan feb mar apr maj jun jul aug sep okt nov dec},
+      :daynames => %w{søndag mandag tirsdag onsdag torsdag fredag lørdag},
+      :abbr_daynames => %w{søn man tir ons tors fre lør},
+     },
+   :de => {
+      :monthnames => [nil] + %w{Januar Februar März April Mai Juni Juli August September Oktober November Dezember},
+      :abbr_monthnames => [nil] + %w{Jan Feb Mrz Apr Mai Jun Jul Aug Sep Okt Nov Dez},
+      :daynames => %w{Sonntag Montag Dienstag Mittwoch Donnerstag Freitag Samstag},
+      :abbr_daynames => %w{So Mo Di Mi Do Fr Sa},
+     },
+    :de_at => {
+        :monthnames => [nil] + %w(Jänner Feber März April Mai Juni Juli August September Oktober November Dezember),
+        :abbr_monthnames => [nil] + %w(Jan Feb Mrz Apr Mai Jun Jul Aug Sep Okt Nov Dez),
+        :daynames => %w(Sonntag Montag Dienstag Mittwoch Donnerstag Freitag Samstag),
+        :abbr_daynames => %w(So Mo Di Mi Do Fr Sa),
+      },     
+   :en => {
+      :monthnames => [nil] + %w{January February March April May June July August September October November December},
+      :abbr_monthnames => [nil] + %w{Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec},
+      :daynames => %w{Sunday Monday Tuesday Wednesday Thursday Friday Saturday},
+      :abbr_daynames => %w{Sun Mon Tue Wed Thu Fri Sat},
+     },
+   :es => {
+      :monthnames => [nil] + %w{enero febrero marzo abril mayo junio julio agosto septiembre octubre noviembre diciembre},
+      :abbr_monthnames => [nil] + %w{ene feb mar abr may jun jul ago sep oct nov dic},
+      :daynames => %w{domingo lunes martes miércoles jueves viernes sábado},
+      :abbr_daynames => %w{dom lun mar mié jue vie sáb},
+     },
+   :es_ar => {
+      :monthnames => [nil] + %w{enero febrero marzo abril mayo junio julio agosto septiembre octubre noviembre diciembre},
+      :abbr_monthnames => [nil] + %w{ene feb mar abr may jun jul ago sep oct nov dic},
+      :daynames => %w{domingo lunes martes miércoles jueves viernes sábado},
+      :abbr_daynames => %w{dom lun mar mié jue vie sáb},
+     },
+   :fi => {
+      :monthnames => [nil] + %w{tammikuu helmikuu maaliskuu huhtikuu toukokuu kesäkuu heinäkuu elokuu syyskuu lokakuu marraskuu joulukuu},
+      :abbr_monthnames => [nil] + %w{tammi helmi maalis huhti touko kesä heinä elo syys loka marras joulu},
+      :daynames => %w{sunnuntai maanantai tiistai keskiviikko torstai perjantai lauantai},
+      :abbr_daynames => %w{su ma ti ke to pe la},
+     },
+   :fr => {
+      :monthnames => [nil] + %w{Janvier Février Mars Avril Mai Juin Juillet Août Septembre Octobre Novembre Decembre},
+      :abbr_monthnames => [nil] + %w{Jan Fév Mar Avr Mai Jui Jul Aoû Sep Oct Nov Déc},
+      :daynames => %w{Dimanche Lundi Mardi Mercredi Jeudi Vendredi Samedi},
+      :abbr_daynames => %w{Dim Lun Mar Mer Jeu Ven Sam},
+     },
+   :it => {
+      :monthnames => [nil] + %w{Gennaio Febbraio Marzo Aprile Maggio Giugno Luglio Agosto Settembre Ottobre Novembre Dicembre },
+      :daynames => %w{ Domenica Lunedì Martedì Mercoledì Giovedì Venerdì Sabato },
+      :abbr_monthnames => [nil] + %w{ Gen Feb Mar Apr Mag Giu Lug Ago Set Ott Nov Dic },
+      :abbr_daynames => %w{ Dom Lun Mar Mer Gio Ven Sab },
+     },
+   :ko => {
+      :monthnames => [nil] + %w{1월 2월 3월 4월 5월 6월 7월 8월 9월 10월 11월 12월},
+      :abbr_monthnames => [nil] + %w{1 2 3 4 5 6 7 8 9 10 11 12},
+      :daynames => %w{일요일 월요일 화요일 수요일 목요일 금요일 토요일},
+      :abbr_daynames => %w{일 월 화 수 목 금 토},
+     },
+   :nl => {
+      :monthnames => [nil] + %w{Januari Februari Maart April Mei Juni Juli Augustus September Oktober November December},
+      :abbr_monthnames => [nil] + %w{Jan Feb Maa Apr Mei Jun Jul Aug Sep Okt Nov Dec},
+      :daynames => %w{Zondag Maandag Dinsdag Woensdag Donderdag Vrijdag Zaterdag},
+      :abbr_daynames => %w{Zo Ma Di Wo Do Vr Za},
+     },
+   :no => {
+      :monthnames => [nil] + %w{januar februar mars april mai juni juli august september oktober november desember},
+      :abbr_monthnames => [nil] + %w{jan feb mar apr mai jun jul aug sep okt nov des},
+      :daynames => %w{søndag mandag tirsdag onsdag torsdag fredag lørdag},
+      :abbr_daynames => %w{søn man tir ons tors fre lør},
+     },
+   :pt => {
+      :monthnames => [nil] + %w{Janeiro Fevereiro Março Abril Maio Junho Julho Agosto Setembro Outubro Novembro Dezembro},
+      :abbr_monthnames => [nil] + %w{Jan Fev Mar Abr Mai Jun Jul Ago Set Out Nov Dez},
+      :daynames => %w{domingo segunda terça quarta quinta sexta sábado},
+      :abbr_daynames => %w{Dom Seg Ter Qua Qui Sex Sab},
+     },
+   :pt_br => {
+      :monthnames => [nil] + %w{janeiro fevereiro março abril maio junho julho agosto setembro outubro novembro dezembro},
+      :abbr_monthnames => [nil] + %w{jan fev mar abr mai jun jul ago set out nov dez},
+      :daynames => %w{domingo segunda terça quarta quinta sexta sábado},
+      :abbr_daynames => %w{dom seg ter qua qui sex sáb},
+     },
+   :ru => {
+      :monthnames => [nil] + %w{Январь Февраль Март Апрель Май Июнь Июль Август Сентябрь Октябрь Ноябрь Декабрь},
+      :abbr_monthnames => [nil] + %w{Янв Фев Мар Апр Май Июн Июл Авг Сен Окт Ноя Дек},
+      :daynames => %w{Воскресенье Понедельник Вторник Среда Четверг Пятница Суббота},
+      :abbr_daynames => %w{Вск Пнд Втр Сре Чет Пят Суб},
+     },
+   :se => {
+      :monthnames => [nil] + %w{januari februari mars april maj juni juli augusti september oktober november december},
+      :abbr_monthnames => [nil] + %w{jan feb mar apr maj jun jul aug sep okt nov dec},
+      :daynames => %w{söndag måndag tisdag onsdag torsdag fredag lördag},
+      :abbr_daynames => %w{sön mån tis ons tors fre lör},
+     },
+   :sr => {
+      :monthnames => [nil] + %w{Januar Februar Mart April Maj Jun Jul Avgust Septembar Oktobar Novembar Decembar},
+      :abbr_monthnames => [nil] + %w{Jan Feb Mar Apr Maj Jun Jul Aug Sep Okt Nov Dec},
+      :daynames => %w{Nedelja Ponedeljak Utorak Sreda Četvrtak Petak Subota},
+      :abbr_daynames => %w{Ned Pon Uto Sre Čet Pet Sub},
+     },
+  }
+  #~ puts DATE_TEXTS.to_yaml
+    
+  #Not really necessary.
+  #But I want to avoid later changes.
+  DATE_TEXTS.freeze
+    
+  #
+  #Test if the seleted language is available in Date_locale.
+  def self.locale?( lang )
+    return DATE_TEXTS[lang]
+  end
+  
+  #Set default converter
+  #~ @@encoding_converter = Iconv.new( 'iso-8859-1', 'utf-8' )
+  
+  #
+  #The daynames are encoded in UTF (I hope ;-) ).
+  #With this method you can define a global converter.
+  #
+  #Example:
+  #     Date_locale.set_target_encoding( 'iso-8859-1')
+  #
+  def self.set_target_encoding( enc )
+    @@encoding_converter = Iconv.new( enc, 'utf-8' )
+  end
+
+
+  #
+  #Get the key for the wanted language.
+  #
+  #Allows the usage (or not to use) locale.
+  def self.get_language_key( lang = nil )
+    
+    #
+    #What's the better solution? Check for locale, or check for the method :language?
+    #
+    if defined?( Locale ) and lang.is_a?(Locale::Object)
+    #~ if lang.respond_to?(:language)
+      Date_locale.set_target_encoding( lang.charset )
+      return lang.language.to_sym
+    end
+    
+    case lang
+      when nil  #Undefined default, take actual locale or en
+        return defined?( Locale ) ? Locale.current.language.to_sym : :en
+      #This code require locale (or you get an error "uninitialized constant Date_locale::Locale")
+      #when Locale::Object
+      #  return lang.language.to_sym
+      else
+        return lang.to_sym
+      end
+  end
+
+  #
+  #strftime with the day- and month names in the selected language.
+  #
+  #Lang can be a language symbol or a locale.
+  def strftime_locale(format = '%F', lang = nil )
+    
+    lang = Date_locale.get_language_key(lang)
+    
+    #Get the texts
+    if DATE_TEXTS[lang]
+      daynames = DATE_TEXTS[lang][:daynames]
+      abbr_daynames = DATE_TEXTS[lang][:abbr_daynames]
+      monthnames  = DATE_TEXTS[lang][:monthnames]
+      abbr_monthnames = DATE_TEXTS[lang][:abbr_monthnames]
+    else
+      raise "Missing Support for locale #{lang.inspect}"
+    end
+    
+    #Make the original replacements, after....
+    result = self.strftime_orig( 
+      #...you replaced the language dependent parts.
+      format.gsub(/%([aAbB])/){|m|
+            case $1
+              when 'a'; abbr_daynames[self.wday]
+              when 'A'; daynames[self.wday]
+              when 'b'; abbr_monthnames[self.mon]
+              when 'B'; monthnames[self.mon]
+              else
+                raise "Date#strftime: InputError"
+            end
+          }
+        )
+    if defined? @@encoding_converter
+      @@encoding_converter.iconv(result)
+    else
+      result
+    end
+  end #strftime_locale(format = '%F', lang = :en )
+
+end #module Date_locale
+
+class Date
+
+  include Date_locale
+  alias :strftime_orig :strftime
+
+  #Redefine strftime with flexible daynames.
+  #
+  def strftime(format = '%F', lang = nil )
+    return strftime_locale(format, lang )
+   end #strftime
+end #class Date
+
+
+#
+#Redefine strftime for DateTime
+#
+class DateTime
+  #No alias! It is done already in class Date.
+  #alias :strftime_orig_date :strftime
+  
+  #Redefine strftime.
+  #strftime_orig is already defined in Date.
+  def strftime( format='%F', lang = nil )
+    return strftime_locale(format, lang )
+  end #strftime
+end
+
+
+class Time
+  include Date_locale  
+  alias :strftime_orig :strftime
+  #Redefine strftime for locale versions.
+  def strftime(format='%F', lang = nil )
+    return strftime_locale(format, lang )
+  end #strftime
+  
+end
+
+#
+#Make some quick tests
+#
+if __FILE__ == $0
+  #~ require 'date_locale'
+  
+  d = Date.new(2009,10,21)
+  puts d.strftime("de: %A {%a} {%A} {%W}  %w ", :de ) #=> de: Mittwoch {Mi} {Mittwoch} {42}  3 (loc: en)
+  puts d.strftime("en: %A {%a} {%A} {%W}  %w ", :en ) #=> en: Wednesday {Wed} {Wednesday} {42}  3 (loc: en)
+  
+  puts "=======Load locale"
+  require 'locale'
+  Locale.current = 'de'
+  puts d.strftime("#{Locale.current}: %A {%a} {%A} {%W}  %w") #=> de: Mittwoch {Mi} {Mittwoch} {42}  3
+  Locale.current = 'en'
+  puts d.strftime("#{Locale.current}: %A {%a} {%A} {%W}  %w") #=> en: Wednesday {Wed} {Wednesday} {42}  3
+  puts d.strftime("de: %A {%a} {%A} {%W}  %w (loc: #{Locale.current})", :de ) #=> de: Mittwoch {Mi} {Mittwoch} {42}  3 (loc: en)
+  puts d.strftime("en: %A {%a} {%A} {%W}  %w (loc: #{Locale.current})", :en ) #=> en: Wednesday {Wed} {Wednesday} {42}  3 (loc: en)
+end #if __FILE__ == $0

data/lib/date_tools/date_time_compare.rb

@@ -0,0 +1,55 @@
+#
+#Some extensions for Time and Date to compare the two classes.
+#
+require 'date'
+
+#Adaption to allow comparison of time and date
+class Time
+  #Convert Time object to a Date object.
+	def to_date()
+		return Date.new( self.year, self.month, self.day )
+	end
+  #Simulate Date#cwday
+	def cwday()
+		return self.to_date.cwday
+	end
+	#Return the week.
+	#At the beginning of the year, 0 is possible.
+  #
+	#See also http://de.wikipedia.org/wiki/Woche#Kalenderwoche
+	def cweek()
+		#~ return [1,self.strftime_d('%W').to_i].max
+		#~ return self.strftime_d('%W').to_i	#Wrong, not  ISO 8601
+		return self.to_date.cweek
+	end
+  #Simulate Date#cwyear
+	def cwyear()
+		return self.to_date.cwyear
+	end
+  
+  #Calculate the difference (no negative times) and build the diff-string.
+  def timediff( time2 )
+    return Time.sec2time( ( self - time2 ).abs )
+  end
+  
+  #Build a string with number of days, hours ... for the given seconds.
+  #Only positive seconds allowed.
+  def self.sec2time( sec )
+    raise "No negative time" if sec < 0
+    days, sec = sec.divmod(86400)  # 60*60*24
+    hours, sec = sec.divmod(3600)  # 60*60
+    min, sec = sec.divmod(60)  # 60*60
+    return "#{days}d #{hours}h #{min}m #{sec}s"
+  end  #sec2time
+end
+
+#Adaption to allow comparison of time and date
+class Date
+  #Returns 'me'.
+  #
+  #Needed like Time#to_date() if you don't know, if you have a date or a time-object.
+	def to_date()
+		self
+	end
+end
+

data/readme.html

@@ -0,0 +1,68 @@
+<!--
+
+	Build by	C:/Program Files/ruby/lib/ruby/gems/1.8/gems/docgenerator-1.2.0/./lib/docgenerator/document.rb
+	Dir:		C:/usr/Script/date_tools
+	Creator:	rakefile.rb
+	Target:		readme.html
+	2009/12/26 18:37:11
+	
+	Generation-Info-End
+-->
+<!doctype html public "-//W3C//DTD HTML 4.01 Transitional//EN">
+<html>
+<head ></head>
+<body ><h1 >date_tools-Gem</h1>
+<p >
+Some tools to handle dates:  
+</p>
+<ul >
+<li >compare to time (sort date and time-objects)  </li>
+<li >locales  </li>
+<li >new creators  </li>
+</ul>
+<p >
+Check the examples-folders to get an impression of the gem.  
+</p>
+<h1 >Gem-Content</h1>
+<h2 >date_tools/date_time_compare.rb:</h2>
+<p >
+Allows to compare Date and Time objects (allows to sort by mixed
+Date/Time-keys).  
+</p>
+<p >
+&rarr; please check the examples in <a href = "./examples/example_date_time_compare.rb" >./examples/example_date_time_compare.rb</a>  
+</p>
+<h2 >date_tools/date_creator.rb:</h2>
+<p >
+New date creations: Date#new_by_mday: Allows "Third sunday in june 2010"...  
+</p>
+<p >
+&rarr; please check the examples in <a href = "./examples/example_date_creator.rb" >./examples/example_date_creator.rb</a>  
+</p>
+<h2 >date_tools/date_locale.rb:</h2>
+<p >
+Localization of Date, DateTime and Time.  
+</p>
+<p >
+strftime gets a optional parameter to determine the language. Default is en, or if locale is used the current locale.  
+</p>
+<p >
+&rarr; please check the examples in <a href = "./examples/example_date_locale.rb" >./examples/example_date_locale.rb</a>  
+</p>
+<h1 >Version history:</h1>
+<p >
+0.0.1       2009-11-13  
+</p>
+<ul >
+<li >Initial version, including date_locale.rb and date_time_compare.rb  </li>
+</ul>
+<p >
+0.0.2       2009-12-18  
+</p>
+<ul >
+<li >Add date_creator  </li>
+<li >folder reorg with date_tools see Gem-packaging question: <a href = "http://forum.ruby-portal.de/viewtopic.php?f=6&t=10654" >http://forum.ruby-portal.de/viewtopic.php?f=6&t=10654</a> </li>
+<li >added examples (2009-12-28)  </li>
+</ul>
+</body>
+</html>

data/readme.txt

@@ -0,0 +1,50 @@
+
+
+date_tools-Gem
+    ------------------------------
+
+Some tools to handle dates:  
+- compare to time (sort date and time-objects)  
+- locales  
+- new creators  
+
+Check the examples-folders to get an impression of the gem.  
+
+Gem-Content
+    ------------------------------
+
+date_tools/date_time_compare.rb:
+      ------------------------------
+
+Allows to compare Date and Time objects (allows to sort by mixed
+Date/Time-keys).  
+
+-> please check the examples in ./examples/example_date_time_compare.rb (./examples/example_date_time_compare.rb)  
+
+date_tools/date_creator.rb:
+      ------------------------------
+
+New date creations: Date#new_by_mday: Allows "Third sunday in june 2010"...  
+
+-> please check the examples in ./examples/example_date_creator.rb (./examples/example_date_creator.rb)  
+
+date_tools/date_locale.rb:
+      ------------------------------
+
+Localization of Date, DateTime and Time.  
+
+strftime gets a optional parameter to determine the language. Default is en, or if locale is used the current locale.  
+
+-> please check the examples in ./examples/example_date_locale.rb (./examples/example_date_locale.rb)  
+
+Version history:
+    ------------------------------
+
+0.0.1       2009-11-13  
+- Initial version, including date_locale.rb and date_time_compare.rb  
+
+0.0.2       2009-12-18  
+- Add date_creator  
+- folder reorg with date_tools see Gem-packaging question: http://forum.ruby-portal.de/viewtopic.php?f=6&t=10654 (http://forum.ruby-portal.de/viewtopic.php?f=6&t=10654) 
+- added examples (2009-12-28)  
+

data/unittest/test_date_creator.rb

@@ -0,0 +1,46 @@
+require 'test/unit'
+require '../lib/date_tools/date_creator'
+
+class Test_Date_creator < Test::Unit::TestCase
+
+  def test_exceptions()
+    #No number for weekday/nr
+    assert_raise( ArgumentError ){ Date.new_by_mday(2010,1,:wrong,6)}
+    assert_raise( ArgumentError ){ Date.new_by_mday(2010,1,1,:wrong)}
+    
+    #Number not in Range...
+    assert_raise( ArgumentError ){ Date.new_by_mday(2010,1,1,6)}
+    assert_raise( ArgumentError ){ Date.new_by_mday(2010,1,8,1)}
+
+    #No fifth monday in jan 2010
+    assert_raise( RuntimeError ){ Date.new_by_mday(2010,1,1,5)}
+
+  end
+  
+  def test_sunday()
+    #Januar 2010
+    assert_equal( Date.new(2010,1,3) , Date.new_by_mday(2010,1,0,1))
+    assert_equal( Date.new(2010,1,10) , Date.new_by_mday(2010,1,0,2))
+    assert_equal( Date.new(2010,1,17) , Date.new_by_mday(2010,1,0,3))
+    assert_equal( Date.new(2010,1,24) , Date.new_by_mday(2010,1,0,4))
+    assert_equal( Date.new(2010,1,31) , Date.new_by_mday(2010,1,0,5))
+  end   #test_first_sunday()
+
+
+  def test_monday()
+    #Januar 2010
+    assert_equal( Date.new(2010,1,4) , Date.new_by_mday(2010,1,1,1))
+    assert_equal( Date.new(2010,1,11) , Date.new_by_mday(2010,1,1,2))
+    assert_equal( Date.new(2010,1,18) , Date.new_by_mday(2010,1,1,3))
+    assert_equal( Date.new(2010,1,25) , Date.new_by_mday(2010,1,1,4))
+
+    #No fifth monday in jan 2010
+    assert_raise( RuntimeError ){ Date.new_by_mday(2010,1,1,5)}
+    
+  end   #test_first_monday()
+  def test_tuesday()
+    assert_equal( Date.new(2010,1,5) , Date.new_by_mday(2010,1,2,1))
+    assert_equal( Date.new(2010,1,12) , Date.new_by_mday(2010,1,2,2))
+  end   #test_first_monday()
+  
+end #Test_Date_creator

data/unittest/test_date_locale.rb

@@ -0,0 +1,225 @@
+require 'test/unit'
+require '../lib/date_tools/date_locale'
+
+#Here you can play with locales.
+#Please run the tests with and without locale.
+#~ require 'locale'
+#~ Locale.current = 'en'
+#~ Locale.current = 'fr'
+
+class Test_Date_locale < Test::Unit::TestCase
+  def test_locale_encoding
+    return unless defined? Locale
+      #~ assert_equal( 'de', Locale.current.language )    #changing during tests
+      assert_equal( 'CP1252', Locale.current.charset )    
+  end
+  def test_DATE_TEXTS
+    
+    assert_kind_of(Hash, Date_locale::DATE_TEXTS)
+    
+    Date_locale::DATE_TEXTS.each{|lang, langdata |
+      assert_kind_of(Symbol, lang)
+      assert_kind_of(Hash, langdata)
+      assert_equal(4, langdata.keys.size)
+      #test not possibe, different orders in Hash key.
+      #~ assert_equal([:abbr_daynames, :monthnames, :abbr_monthnames, :daynames], langdata.keys)
+      
+      assert_equal( 7, langdata[:abbr_daynames].size, "check language #{lang}")
+      assert_equal( 7, langdata[:daynames].size, "check language #{lang}")
+      assert_equal( 13, langdata[:abbr_monthnames].size, "check language #{lang}")
+      assert_equal( 13, langdata[:monthnames].size, "check language #{lang}")
+      assert_nil( langdata[:abbr_monthnames].first, "check language #{lang}")
+      assert_nil( langdata[:monthnames].first, "check language #{lang}")
+      
+    }
+    
+  end #test_DATE_TEXTS
+end #Test_Date_locale < Test::Unit::TestCase
+  
+  
+  
+class Test_Date < Test::Unit::TestCase
+  
+  TESTSTRING = '%A %a %B (%b)'
+  def test_default_en()
+    
+    Locale.current = 'en' if defined? Locale
+    if defined? Locale
+      assert_equal( 'en', Locale.current.language )
+    end
+    
+    d = Date.new(2009,10,21)
+    assert_equal( 'Wednesday {Wed} {Wednesday} {42}  3', d.strftime('%A {%a} {%A} {%W}  %w'))
+    assert_equal( 'Wednesday (Wed)', d.strftime('%A (%a)'))
+    assert_equal( 'October (Oct)',   d.strftime('%B (%b)'))
+  end
+
+  #Check the defined lanuages.
+  def test_defined()
+    assert_not_nil( Date_locale.locale?(:de))
+    assert_not_nil( Date_locale.locale?(:de_at))
+    assert_not_nil( Date_locale.locale?(:en))
+    assert_not_nil( Date_locale.locale?(:fr))
+  end 
+  
+  def test_undefined()
+    assert_nil( Date_locale.locale?(:xx))
+    
+    d = Date.new(2009,10,21)
+    assert_raise( RuntimeError ){ d.strftime('%A {%a} {%A} {%W}  %w', :xx) }
+  end
+
+  def test_en()
+    d = Date.new(2009,10,21)
+    
+    assert_equal( 'Wednesday (Wed)', d.strftime('%A (%a)', :en))
+    assert_equal( 'October (Oct)',   d.strftime('%B (%b)', :en))
+    assert_equal( 'Wednesday {Wed} {Wednesday} {42}  3', d.strftime('%A {%a} {%A} {%W}  %w', :en))
+    
+    Locale.current = 'en' if defined? Locale
+    if defined? Locale  and Locale.current.language == 'en'
+      assert_equal( 'en', Locale.current.language )    
+      assert_equal( d.strftime('%A (%a)'), d.strftime('%A (%a)', :en))
+      assert_equal( d.strftime('%B (%b)'),   d.strftime('%B (%b)', :en))    
+      assert_equal( d.strftime('%A {%a} {%A} {%W}  %w'), d.strftime('%A {%a} {%A} {%W}  %w', :en))
+    end
+    
+  end
+
+  def test_de()
+    d = Date.new(2009,10,21)
+    
+    assert_equal( 'Mittwoch (Mi)', d.strftime('%A (%a)', :de))
+    assert_equal( 'Oktober (Okt)', d.strftime('%B (%b)', :de))
+
+    Locale.current = 'de' if defined? Locale
+    if defined? Locale  and Locale.current.language == 'de'
+      assert_equal( 'de', Locale.current.language )    
+      assert_equal( d.strftime('%A (%a)'), d.strftime('%A (%a)', :de))
+      assert_equal( d.strftime('%B (%b)'),   d.strftime('%B (%b)', :de))    
+      assert_equal( d.strftime('%A {%a} {%A} {%W}  %w'), d.strftime('%A {%a} {%A} {%W}  %w', :de))
+    end
+
+  end
+
+  def test_de_umlaut()
+    d = Date.new(2009,3,21)
+    #Set automatic.
+    #~ Date_locale.set_target_encoding( 'iso-8859-1')
+    
+    assert_equal( 'Samstag (Sa)', d.strftime('%A (%a)', :de))
+    if defined? Locale
+      assert_equal( 'M�rz (Mrz)', d.strftime('%B (%b)', :de))
+    else
+      assert_equal( 'März (Mrz)', d.strftime('%B (%b)', :de))
+    end
+
+    Locale.current = 'de' if defined? Locale
+    if defined? Locale  and Locale.current.language == 'de'
+      assert_equal( 'de', Locale.current.language )    
+      assert_equal( d.strftime('%A (%a)'), d.strftime('%A (%a)', :de))
+      assert_equal( d.strftime('%B (%b)'),   d.strftime('%B (%b)', :de))    
+      assert_equal( d.strftime('%A {%a} {%A} {%W}  %w'), d.strftime('%A {%a} {%A} {%W}  %w', :de))
+    end
+
+  end
+  
+  def test_de_locale()
+    return unless defined? Locale
+    
+    #Get a German locale
+    #?How to define it??
+    Locale.current = 'de'
+    loc_de = Locale.current
+    Locale.current = 'en' #set back english
+    loc_en   = Locale.current
+    
+    d = Date.new(2009,10,21)
+    assert_equal( 'Mittwoch (Mi)', d.strftime('%A (%a)', loc_de ))
+    assert_equal( 'Wednesday (Wed)', d.strftime('%A (%a)', loc_en ))
+
+
+  end
+
+end #Test_Date
+
+class Test_DateTime < Test::Unit::TestCase
+  
+  TESTSTRING = '%A %a %B (%b)'
+  def test_default_en()
+    Locale.current = 'en' if defined? Locale
+    if defined? Locale
+      assert_equal( 'en', Locale.current.language )
+    end
+    
+    1.upto(12){|m|
+      1.upto(7){|day| #first week (=all day names)
+      d   = Date.new(2009,m,day)
+      dt  = DateTime.new(2009,m, day)    
+      assert_equal( dt.strftime(TESTSTRING),   d.strftime(TESTSTRING))
+    }}
+  end
+
+  def test_en()    
+    1.upto(12){|m|
+      1.upto(7){|day| #first week (=all day names)
+      d   = Date.new(2009,m,day)
+      dt  = DateTime.new(2009,m, day)    
+      assert_equal( dt.strftime(TESTSTRING, :en),   d.strftime(TESTSTRING, :en))
+    }}
+  end
+
+  def test_de()    
+    1.upto(12){|m|
+      1.upto(7){|day| #first week (=all day names)
+      d   = Date.new(2009,m,day)
+      dt  = DateTime.new(2009,m, day)    
+      assert_equal( dt.strftime(TESTSTRING, :de),   d.strftime(TESTSTRING, :de))
+    }}
+  end
+end #Test_DateTime
+
+class Test_Time < Test::Unit::TestCase
+  
+  def test_default()
+    t = Time.local(2009,10,21)
+    
+    Locale.current = 'en' if defined? Locale
+    if defined? Locale  and Locale.current.language == 'en'
+      assert_equal( 'en', Locale.current.language )    
+      assert_equal( 'Wednesday {Wed} {Wednesday} {42}  3', t.strftime('%A {%a} {%A} {%W}  %w'))
+      assert_equal( 'Wednesday (Wed)', t.strftime('%A (%a)'))
+      assert_equal( 'October (Oct)',   t.strftime('%B (%b)'))
+    end
+  end
+
+  def test_en()
+    t = Time.local(2009,10,21)
+    assert_equal( 'Wednesday (Wed)', t.strftime('%A (%a)', :en))
+    assert_equal( 'October (Oct)',   t.strftime('%B (%b)', :en))
+    assert_equal( 'Wednesday {Wed} {Wednesday} {42}  3', t.strftime('%A {%a} {%A} {%W}  %w', :en))
+    
+    Locale.current = 'en' if defined? Locale
+    if defined? Locale  and Locale.current.language == 'en'
+      assert_equal( 'en', Locale.current.language )
+      assert_equal( t.strftime('%A (%a)'), t.strftime('%A (%a)', :en))
+      assert_equal( t.strftime('%B (%b)'), t.strftime('%B (%b)', :en))    
+      assert_equal( t.strftime('%A {%a} {%A} {%W}  %w'), t.strftime('%A {%a} {%A} {%W}  %w', :en))
+    end
+  end
+
+  def test_de()
+    t = Time.local(2009,10,21)    
+    assert_equal( 'Mittwoch (Mi)', t.strftime('%A (%a)', :de))
+    assert_equal( 'Oktober (Okt)', t.strftime('%B (%b)', :de))
+    
+    Locale.current = 'de' if defined? Locale
+    if defined? Locale  and Locale.current.language == 'de'
+      assert_equal( 'de', Locale.current.language )    
+      assert_equal( t.strftime('%A (%a)'), t.strftime('%A (%a)', :de))
+      assert_equal( t.strftime('%B (%b)'),   t.strftime('%B (%b)', :de))    
+      assert_equal( t.strftime('%A {%a} {%A} {%W}  %w'), t.strftime('%A {%a} {%A} {%W}  %w', :de))
+    end
+    
+  end
+end #Test_Time

data/unittest/test_date_time_compare.rb

@@ -0,0 +1,46 @@
+require '../lib/date_tools/date_time_compare.rb'
+require 'test/unit'
+
+class Test_TimeDate < Test::Unit::TestCase
+  
+  @@testdata = []
+  1990.upto(2037){|year|  #ab 2038 �berlauf
+    @@testdata << [year,1,1]
+    @@testdata << [year,3,1]
+    @@testdata << [year,6,15]
+    @@testdata << [year,12,31]
+  }
+  def test_conversion()
+    @@testdata.each{|testdata|
+      assert_equal( Date.new(*testdata), Time.local(*testdata).to_date)
+    }
+  end
+  def test_cwday()
+    @@testdata.each{|testdata|
+      assert_equal( Date.new(*testdata).cwday, Time.local(*testdata).cwday)
+    }
+  end
+  def test_cweek()
+    @@testdata.each{|testdata|
+      assert_equal( Date.new(*testdata).cweek, Time.local(*testdata).cweek)
+    }
+  end
+  def test_cwyear()
+    @@testdata.each{|testdata|
+      assert_equal( Date.new(*testdata).cwyear, Time.local(*testdata).cwyear)
+    }
+  end
+end #Test_TimeDate
+
+class Test_Timediff < Test::Unit::TestCase
+  def test_datediff()
+      assert_equal( '1d 0h 0m 0.0s', Time.gm(2009,8,11,12,0).timediff( Time.gm(2009,8,12,12,0) ))
+      assert_equal( '1d 0h 0m 0.0s', Time.gm(2009,8,12,12,0).timediff( Time.gm(2009,8,11,12,0) ))
+  end
+        
+  def test_sec2time()
+      assert_equal( '1d 1h 0m 0s', Time.sec2time(90000))
+      assert_raise( RuntimeError) { Time.sec2time(-90000) }
+  end
+end #Test_Timediff
+

metadata

@@ -0,0 +1,80 @@
+--- !ruby/object:Gem::Specification 
+name: date_tools
+version: !ruby/object:Gem::Version 
+  version: 0.0.2
+platform: ruby
+authors: 
+- Knut Lickert
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-12-26 00:00:00 +01:00
+default_executable: 
+dependencies: []
+
+description: |
+  Little helper for the classes Date, DateTime and Time.
+  //
+  date_time_compare.rb:
+  Allows to compare Date and Time objects (allows to sort by mixed Date/Time-keys).
+  //
+  date_creator.rb:
+  New date creations:
+  Date#new_by_mday: Allows "Third sunday in june 2010"...
+  //
+  date_locale.rb:
+  Localization of Date, DateTime and Time.
+  strftime gets a optional parameter to determine the language.
+  Default is en, or if locale is used the current locale.
+
+email: knut@lickert.net
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- lib/date_tools.rb
+- lib/date_tools/date_creator.rb
+- lib/date_tools/date_locale.rb
+- lib/date_tools/date_time_compare.rb
+- readme.txt
+- readme.html
+- examples/example_date_creator.rb
+- examples/example_date_locale.rb
+- examples/example_date_time_compare.rb
+has_rdoc: true
+homepage: http://www.rubypla.net/
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --main
+- lib/date_tools.rb
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Some tools to handle dates (compare to time, locales, new creators)
+test_files: 
+- unittest/test_date_creator.rb
+- unittest/test_date_locale.rb
+- unittest/test_date_time_compare.rb