date_ext 0.0.3

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,21 @@
+## MAC OS
+.DS_Store
+
+## TEXTMATE
+*.tmproj
+tmtags
+
+## EMACS
+*~
+\#*
+.\#*
+
+## VIM
+*.swp
+
+## PROJECT::GENERAL
+coverage
+rdoc
+pkg
+
+## PROJECT::SPECIFIC

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 hasclass
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,17 @@
+= date_extensions
+
+Description goes here.
+
+== Note on Patches/Pull Requests
+ 
+* Fork the project.
+* Make your feature addition or bug fix.
+* Add tests for it. This is important so I don't break it in a
+  future version unintentionally.
+* Commit, do not mess with rakefile, version, or history.
+  (if you want to have your own version, that is fine but bump version in a commit by itself I can ignore when I pull)
+* Send me a pull request. Bonus points for topic branches.
+
+== Copyright
+
+Copyright (c) 2009 hasclass. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,54 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "date_ext"
+    gem.summary = %Q{date extensions helps you work with weekdays, workdays, holidays, months, weeks, etc.}
+    gem.description = %Q{Ruby classes for weekday, month, etc.}
+    gem.email = "sebastian.burkhard@gmail.com"
+    gem.homepage = "http://github.com/hasclass/test"
+    gem.authors = ["hasclass"]
+    gem.add_development_dependency "thoughtbot-shoulda", ">= 0"
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: gem install jeweler"
+end
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/*_test.rb'
+  test.verbose = true
+end
+
+begin
+  require 'rcov/rcovtask'
+  Rcov::RcovTask.new do |test|
+    test.libs << 'test'
+    test.pattern = 'test/**/*_test.rb'
+    test.verbose = true
+    test.rcov_opts = %w{--rails --exclude osx\/objc,gems\/,spec\/,features\/ --aggregate coverage.data}
+  end
+rescue LoadError
+  task :rcov do
+    abort "RCov is not available. In order to run rcov, you must: sudo gem install spicycode-rcov"
+  end
+end
+
+task :test => :check_dependencies
+
+task :default => :test
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  version = File.exist?('VERSION') ? File.read('VERSION') : ""
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "test #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end

data/VERSION

@@ -0,0 +1 @@
+0.0.3

data/date_ext.gemspec

@@ -0,0 +1,60 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run the gemspec command
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{date_ext}
+  s.version = "0.0.3"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["hasclass"]
+  s.date = %q{2009-12-09}
+  s.description = %q{Ruby classes for weekday, month, etc.}
+  s.email = %q{sebastian.burkhard@gmail.com}
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+     ".gitignore",
+     "LICENSE",
+     "README.rdoc",
+     "Rakefile",
+     "VERSION",
+     "date_ext.gemspec",
+     "init.rb",
+     "lib/core_ext.rb",
+     "lib/date_ext.rb",
+     "lib/month.rb",
+     "lib/weekday.rb",
+     "test/month_test.rb",
+     "test/test_helper.rb",
+     "test/weekday_test.rb"
+  ]
+  s.homepage = %q{http://github.com/hasclass/test}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.5}
+  s.summary = %q{date extensions helps you work with weekdays, workdays, holidays, months, weeks, etc.}
+  s.test_files = [
+    "test/month_test.rb",
+     "test/test_helper.rb",
+     "test/weekday_test.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<thoughtbot-shoulda>, [">= 0"])
+    else
+      s.add_dependency(%q<thoughtbot-shoulda>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<thoughtbot-shoulda>, [">= 0"])
+  end
+end
+

data/init.rb

@@ -0,0 +1 @@
+require 'date_ext'

data/lib/core_ext.rb

@@ -0,0 +1,3 @@
+class Date
+  include WeekDayCoreExt
+end

data/lib/date_ext.rb

@@ -0,0 +1,3 @@
+require 'month'
+require 'weekday'
+require 'core_ext'

data/lib/month.rb

@@ -0,0 +1,143 @@
+# == Synopsis
+# 
+# Representation of a month
+#
+# == Usage
+#
+#   m = Month.new(2009,2)
+#   m = m + 1#
+#   m.to_s                    -> "2009-03"
+#
+#   m1 = Month.new(2009,2)
+#   m2 = Month.new(2009,12)
+#   (m1..m2).to_a             -> [<Month: 2009-02>, .. <Month: 2009-12>]
+#
+#   d = Date.new(2009,8,6)
+#   d.to_month                -> <Month: 2009-08>
+#
+#
+# == Author
+# S Burkhard
+#
+# == Version
+# 0.1
+class Month  
+  include Comparable
+  
+  attr_accessor :year, :month
+  
+  # Month.new(2009,2)
+  #
+  # Month.new("2009","2")
+  #
+  # Month.new(Date.new(2009,2,3)) 
+  def initialize(date_or_year, month = nil)
+    year = date_or_year
+    if date_or_year.is_a? Date
+      year = date_or_year.year 
+      month = date_or_year.month
+    end
+    @year = year.to_i     
+    @month = month.to_i
+  end
+  
+
+  #   If _months_ is a Numeric value, create a new Month object that is x months earlier than the current one.
+  #
+  #   If _months_ is not a Numeric, a TypeError is raised.
+  def -(months)
+    raise TypeError, 'expected numeric' unless months.is_a?(Numeric)    
+    d = first_day << months
+    d.to_month
+  end
+
+  # If _months_ is a Numeric value, create a new Month object that is x months later than the current one.
+  #
+  # If _months_ is not a Numeric, a TypeError is raised.  
+  def +(months)
+    raise TypeError, 'expected numeric' unless months.is_a?(Numeric)
+    d = first_day >> months
+    d.to_month
+  end
+  
+  # Formats current month according to the directives in the given format string. 
+  def strftime(string)
+    first_day.strftime(string)
+  end
+  
+  # alias to strftime. 
+  # default format string: %Y-%m
+  def to_s(string = "%m/%y")
+    strftime(string)
+  end
+  
+  # Creates a new Month object that is 1 month later than the current one
+  def next
+    self + 1
+  end
+  
+  # Creates a new Month object that is 1 month earlier than the current one
+  def previous
+    self - 1
+  end
+  
+  # alias to next
+  def succ
+    self.next
+  end
+  
+  # Compare this month with another month. 
+  def <=>(other)
+    self.first_day <=> other.first_day
+  end
+  
+  # Returns the last weekday (everyday except saturday or sunday) of the current month.
+  def last_cday
+    date = last_day
+    while date.cwday > 5
+      date = date -= 1
+    end
+    date
+  end
+  
+  # Returns the first weekday (everyday except saturday or sunday) of the current month.
+  def first_cday
+    date = first_day 
+    while date.cwday > 5
+      date = date += 1
+    end
+    date
+  end
+  
+  # Returns the first commercial weekday with the given weekday number
+  def first_cwday(wday)
+    date = first_day 
+    while date.cwday != wday
+      date = date += 1
+    end
+    date
+  end
+  
+  # Returns the last day of current month as a Date object.
+  def last_day
+    first_of_next_month = first_day + 32
+    Date.new(first_of_next_month.year, first_of_next_month.month, 1) - 1  # back off one day from first of that month
+  end
+  
+  # Returns the first day of current month as a Date object.
+  def first_day
+    Date.new year, month, 1
+  end
+  
+  # Returns self
+  def to_month
+    return self
+  end  
+end
+
+class Date
+  # Creates a Month object of the current month
+  def to_month
+    Month.new(self)
+  end
+end

data/lib/weekday.rb

@@ -0,0 +1,53 @@
+module WeekDayCoreExt
+  def is_weekday?
+    self.cwday < 6
+  end
+  
+  def to_weekday
+    self.is_a?(Weekday) ? self : Weekday.new(self.year, self.month, self.day)
+  end
+end
+
+
+
+class Weekday < Date  
+  
+  def initialize(ajd=0, of=0, sg=ITALY) 
+    super(ajd, of, sg)
+    raise 'Is not a weekday' unless self.is_weekday?
+  end
+  
+  def -(x)
+    if x.is_a?(Numeric)
+#      weekend_offset = 0
+#      weekend_offset += 2 if (self.cwday - (x % 5)) <= 0
+#      weekend_offset += ((x / 5)) * 2 if x >= 5
+#      return self.class.new!(@ajd - x - weekend_offset, @of, @sg)
+      days = x % 5
+      weeks = (x / 5) * 7
+      days += 2 if (self.cwday - days) <= 0
+      return self.class.new!(@ajd - weeks - days, @of, @sg)
+    elsif x.is_a?(Date) 
+      return @ajd - x.ajd
+    else
+      raise TypeError, 'expected numeric or date'
+    end
+  end
+  
+  def +(x)
+    if x.is_a?(Numeric)
+      days = x % 5
+      weeks = (x / 5) * 7
+      days += 2 if (self.cwday + days) >= 6
+      return self.class.new!(@ajd + weeks + days, @of, @sg)
+    elsif x.is_a?(Date)
+      return @ajd + x.ajd
+    else
+      raise TypeError, 'expected numeric or date'
+    end
+  end
+
+  def self.today
+    super.class.today.to_weekday
+  end
+end

data/test/month_test.rb

@@ -0,0 +1,132 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+
+
+
+class MonthTest < Test::Unit::TestCase
+  
+  context "Date#to_month" do
+    setup do 
+      @d = Date.new(2009,2,1)
+      @m = @d.to_month      
+    end
+    
+    should "have correct flag" do
+      assert_equal @m.year, @d.year
+      assert_equal @m.month, @d.month
+    end    
+  end
+  
+  context "Date#+/-" do
+    setup do 
+      @m = Month.new 2009,3    
+    end
+    
+    should "have correct flag" do
+      assert_equal 2008, (@m - 12).year
+      assert_equal 3, (@m - 12).month
+
+      assert_equal 2009, (@m + 1).year
+      assert_equal 4, (@m + 1).month
+    end    
+  end
+  
+  context "Date#<=>" do
+    setup do 
+      @m1 = Month.new 2009,3    
+      @m12 = Month.new 2009,3    
+      @m2 = Month.new 2009,4    
+      @m3 = Month.new 2008,2    
+      @m4 = Month.new 2008,4
+    end
+    
+    should "have correct flag" do
+      assert_equal true, @m1 > @m4
+      assert_equal true, @m1 > @m3
+      assert_equal true, @m1 < @m2
+      assert_equal true, @m1 == @m12
+    end    
+  end
+  
+  context "Date#next" do
+    setup do 
+      @d = Date.new(2009,2,1)
+      @m = @d.to_month.next      
+    end
+    
+    should "have correct flag" do
+      assert_equal @m.year, @d.year
+      assert_equal @m.month, @d.month+1
+    end    
+  end
+  
+  context "Date#next December" do
+    setup do 
+      @d = Date.new(2008,12,5)
+      @m = @d.to_month.next      
+    end
+    
+    should "have correct flag" do
+      assert_equal @m.year, 2009
+      assert_equal @m.month, 1
+    end    
+  end
+  
+  context "Date#previous" do
+    setup do 
+      @d = Date.new(2009,2,1)
+      @m = @d.to_month.previous      
+    end
+    
+    should "have correct flag" do
+      assert_equal @m.year, @d.year
+      assert_equal @m.month, @d.month-1
+    end    
+  end
+  
+  context "Date#previous January" do
+    setup do 
+      @d = Date.new(2009,1,31)
+      @m = @d.to_month.previous      
+    end
+    
+    should "have correct flag" do
+      assert_equal @m.year, 2008
+      assert_equal @m.month, 12
+    end    
+  end
+
+
+  context "new" do
+    setup do 
+      @d = Date.new(2009,2,1)
+      @m = Month.new(@d)
+    end
+    
+    should "have correct flag" do
+      assert_equal @m.year, @d.year
+      assert_equal @m.month, @d.month
+    end    
+  end
+
+
+  context "new" do
+    setup { @m = Month.new(2009,2)}
+    
+    should "have correct flag" do
+      assert_equal @m.year, 2009
+      assert_equal @m.month, 2    
+    end    
+  end
+  
+  context "new" do
+    setup { @m = Month.new("2009","02")}
+    
+    should "initialize" do
+      assert_equal @m.year, 2009
+      assert_equal @m.month, 2    
+    end    
+  end
+  
+  
+end

data/test/test_helper.rb

@@ -0,0 +1,13 @@
+require 'rubygems'
+require 'test/unit'
+require 'redgreen'
+require 'shoulda'
+require 'active_support'
+
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+
+require 'date_ext'
+
+class Test::Unit::TestCase
+end

data/test/weekday_test.rb

@@ -0,0 +1,101 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+
+
+
+class WeekdayTest < Test::Unit::TestCase
+  context "range friday ... friday_next_week" do
+    setup {
+      @fri = Weekday.new(2009,12,4)
+      @fri_next = Weekday.new(2009,12,11)
+      @range = (@fri...@fri_next)
+    }
+    
+    should "have 5 elements" do
+      assert_equal 5, @range.to_a.length
+    end
+    
+    should "all be weekdays" do
+      assert @range.to_a.all?{|wd| wd.is_a?(Weekday)}
+    end
+  end
+  
+  context "Weekday methods" do
+    should "return a Weekday object on #new" do
+      assert_equal Weekday, Weekday.new(2009,12,3).class
+    end
+    
+    should "return a Weekday object on #today" do
+      assert_equal Weekday, Weekday.today.class
+    end
+  end
+  
+  context "Weekdays" do
+    setup {
+      @thu = Weekday.new(2009,12,3)
+      @fri = Weekday.new(2009,12,4)
+      
+      @mon = Weekday.new(2009,12,7)
+      @tue = Weekday.new(2009,12,8)
+      @wed = Weekday.new(2009,12,9)
+    }
+    context "Wednesday" do
+      should "be valid" do
+        assert Weekday, @wed
+      end
+      should "return previous Tuesday on -1" do
+        assert_equal Weekday.new(2009,12,8), @wed - 1
+      end
+      should "return previous Monday on -2" do
+        assert_equal Weekday.new(2009,12,7), @wed - 2
+      end
+      should "return previous Fri on -3" do
+        assert_equal @fri, @wed - 3
+      end
+      should "return previous Thu on -4" do
+        assert_equal @thu, @wed - 4
+      end
+      should "return previous Wed on -5" do
+        assert_equal Weekday.new(2009,12,2), @wed - 5
+      end
+    end
+    context "Monday" do
+      should "be valid" do
+        assert Weekday, @mon
+      end
+      should "return next Tuesday on +1" do
+        assert_equal @tue, @mon + 1
+      end
+      should "return next Wed on +2" do
+        assert_equal @wed, @mon + 2
+      end
+      should "return previous Friday on -1" do
+        assert_equal @fri, @mon - 1
+      end
+      should "return previous Thursday on -2" do
+        assert_equal @thu, @mon - 2
+      end
+      should "return monday a week ago on -5" do
+        assert_equal Weekday.new(2009,11,30), @mon - 5
+      end
+      should "return monday 2 weeks ago on -10" do
+        assert_equal Weekday.new(2009,11,23), @mon - 10
+      end
+      should "return wed 4 weeks ago on -18" do
+        assert_equal Weekday.new(2009,11,11), @mon - 18
+      end
+      should "return tuesay 4 weeks ago on -19" do
+        assert_equal Weekday.new(2009,11,10), @mon - 19
+      end
+      should "return monday 4 weeks ago on -20" do
+        assert_equal Weekday.new(2009,11,9), @mon - 20
+      end
+      should "not return any weekends for the last 3 years" do
+        arr = (0..800).to_a
+        days = arr.map{|i| [@mon - i, @tue - i, @wed - i, @thu - 1, @fri - 1]}.flatten
+        assert days.all?{|wd| wd.cwday <= 5}
+      end
+    end
+  end
+end
+  

metadata

@@ -0,0 +1,81 @@
+--- !ruby/object:Gem::Specification 
+name: date_ext
+version: !ruby/object:Gem::Version 
+  version: 0.0.3
+platform: ruby
+authors: 
+- hasclass
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-12-09 00:00:00 +01:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: thoughtbot-shoulda
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: Ruby classes for weekday, month, etc.
+email: sebastian.burkhard@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+files: 
+- .document
+- .gitignore
+- LICENSE
+- README.rdoc
+- Rakefile
+- VERSION
+- date_ext.gemspec
+- init.rb
+- lib/core_ext.rb
+- lib/date_ext.rb
+- lib/month.rb
+- lib/weekday.rb
+- test/month_test.rb
+- test/test_helper.rb
+- test/weekday_test.rb
+has_rdoc: true
+homepage: http://github.com/hasclass/test
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+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: date extensions helps you work with weekdays, workdays, holidays, months, weeks, etc.
+test_files: 
+- test/month_test.rb
+- test/test_helper.rb
+- test/weekday_test.rb