workpattern 0.3.4 → 0.6.0

data/test/test_workpattern.rb

@@ -1,276 +0,0 @@
-require File.dirname(__FILE__) + '/test_helper.rb'
-
-class TestWorkpattern < MiniTest::Unit::TestCase #:nodoc:
-
-  def setup
-    Workpattern.clear()    
-  end
-
-  def test_can_diff_between_working_period_and_resting_day
-    # This is the test for issue 15
-    mywp=Workpattern.new('My Workpattern',2013,3)
-    mywp.resting(:days => :weekend)
-    mywp.resting(:days =>:weekday, :from_time=>Workpattern.clock(0,0),:to_time=>Workpattern.clock(8,59))
-    mywp.resting(:days =>:weekday, :from_time=>Workpattern.clock(12,0),:to_time=>Workpattern.clock(12,59))
-    mywp.resting(:days =>:weekday, :from_time=>Workpattern.clock(18,0),:to_time=>Workpattern.clock(23,59))
-
-    mydate1=DateTime.civil(2013,9,27,0,0,0)
-    mydate2=DateTime.civil(2013,9,27,23,59,59)
-
-    mywp.resting(:start=>mydate1,:finish=>mydate2, :days =>:all, :from_time=>Workpattern.clock(0,0), :to_time=>Workpattern.clock(23,59))
-
-    assert_equal 60, mywp.diff(DateTime.civil(2013,9,26,17,0),DateTime.civil(2013,9,27,10,0))
-  end  
-
-  def test_must_create_a_working_workpattern
-    name='mywp'
-    base=2001
-    span=11
-    wp=Workpattern.new(name,base,span)
-    assert_equal name, wp.name
-    assert_equal base, wp.base
-    assert_equal span, wp.span
-    assert_equal DateTime.new(base), wp.from
-    assert_equal DateTime.new(base+span-1,12,31,23,59), wp.to
-  end
-  
-  def test_must_set_patterns_correctly
-    name='mypattern'
-    base=2000
-    span=11
-    wp=Workpattern.new(name,base,span)
- 
-    start=clock(0,0)
-    finish=clock(8,59)    
-    assert_equal 10080, get_week(wp.weeks).week_total
-    wp.workpattern(:days=>:all,:from_time=>start,:to_time=>finish,:work_type=>0)
-    assert_equal 6300, get_week(wp.weeks).week_total
-    wp.workpattern(:days=>:sun,:from_time=>start,:to_time=>finish,:work_type=>1)
-    assert_equal 6840, get_week(wp.weeks).week_total
-    wp.workpattern(:days=>:mon,:from_time=>start,:to_time=>finish,:work_type=>1)
-    assert_equal 7380, get_week(wp.weeks).week_total
-    wp.workpattern(:days=>:all,:from_time=>clock(18,0),:to_time=>clock(18,19),:work_type=>0)
-    assert_equal 7240, get_week(wp.weeks).week_total
-    wp.workpattern(:days=>:all,:from_time=>clock(0,0),:to_time=>clock(23,59),:work_type=>0)
-    assert_equal 0, get_week(wp.weeks).week_total
-    wp.workpattern(:days=>:all,:from_time=>clock(0,0),:to_time=>clock(0,0),:work_type=>1)
-    assert_equal 7, get_week(wp.weeks).week_total
-    wp.workpattern(:days=>:all,:from_time=>clock(23,59),:to_time=>clock(23,59),:work_type=>1)
-    assert_equal 14, get_week(wp.weeks).week_total
-    wp.workpattern(:days=>:all,:from_time=>clock(0,0),:to_time=>clock(23,59),:work_type=>1)
-    assert_equal 10080, get_week(wp.weeks).week_total
-    wp.workpattern(:days=>:weekend,:from_time=>clock(0,0),:to_time=>clock(23,59),:work_type=>0)
-    assert_equal 7200, get_week(wp.weeks).week_total
-    
-  end
-  
-  def test_must_add_minutes_in_a_working_workpattern
-    name='mypattern'
-    base=1999
-    span=11
-    wp=Workpattern.new(name,base,span)
-    tests=[[2000,1,1,0,0,3,2000,1,1,0,3],
-     [2000,1,1,23,59,0,2000,1,1,23,59],
-     [2000,1,1,23,59,1,2000,1,2,0,0],
-     [2000,1,1,23,59,2,2000,1,2,0,1],
-     [2000,1,1,9,10,33,2000,1,1,9,43],
-     [2000,1,1,9,10,60,2000,1,1,10,10],
-     [2000,1,1,9,0,931,2000,1,2,0,31],
-     [2000,1,1,0,0,3,2000,1,1,0,3]
-    ]
-    clue="add minutes in a working workpattern"
-    calc_test(wp,tests,clue) 
-  end
-  
-  def test_must_add_minutes_in_a_resting_workpattern
-    name='mypattern'
-    base=1999
-    span=11
-    wp=Workpattern.new(name,base,span)
-    start=DateTime.new(1999,6,11,0,0)
-    finish=DateTime.new(2003,6,8,0,0)
-    wp.workpattern(:days=>:all,:start=> start, :finish=>finish, :work_type=>0 )
-    tests=[[2000,1,1,0,0,3,2003,6,9,0,3],
-     [2000,1,1,23,59,0,2000,1,1,23,59],
-     [2000,1,1,23,59,1,2003,6,9,0,1],
-     [2000,1,1,23,59,2,2003,6,9,0,2],
-     [2000,1,1,9,10,33,2003,6,9,0,33],
-     [2000,1,1,9,10,60,2003,6,9,1,0],
-     [2000,1,1,9,0,931,2003,6,9,15,31],
-     [2000,1,1,0,0,3,2003,6,9,0,3]
-    ]
-    clue="add minutes in a resting workpattern"
-    calc_test(wp,tests,clue) 
-  end
-  
-  def test_must_add_minutes_in_a_patterned_workpattern
-    assert true
-  end
-  
-  def test_must_subtract_minutes_in_a_working_workpattern
-    name='mypattern'
-    base=1999
-    span=11
-    wp=Workpattern.new(name,base,span)
-    tests=[[2000,1,1,0,0,-3,1999,12,31,23,57],
-     [2000,1,1,23,59,0,2000,1,1,23,59],
-     [2000,1,1,23,59,-1,2000,1,1,23,58],
-     [2000,1,1,23,59,-2,2000,1,1,23,57],
-     [2000,1,1,9,10,-33,2000,1,1,8,37],
-     [2000,1,1,9,10,-60,2000,1,1,8,10],
-     [2000,1,1,9,0,-931,1999,12,31,17,29],
-     [2000,1,1,0,0,-3,1999,12,31,23,57]
-    ]
-    clue="subtract minutes in a working workpattern"
-    calc_test(wp,tests,clue) 
-  end
-  
-  def test_must_subtract_minutes_in_a_resting_workpattern
-    name='mypattern'
-    base=1999
-    span=11
-    wp=Workpattern.new(name,base,span)
-    start=DateTime.new(1999,6,11,0,0)
-    finish=DateTime.new(2003,6,8,0,0)
-    wp.workpattern(:days=>:all,:start=> start, :finish=>finish, :work_type=>0 )
-    tests=[[2000,1,1,0,0,-3,1999,6,10,23,57],
-     [2000,1,1,23,59,0,2000,1,1,23,59],
-     [2000,1,1,23,59,-1,1999,6,10,23,59],
-     [2000,1,1,23,59,-2,1999,6,10,23,58],
-     [2000,1,1,9,10,-33,1999,6,10,23,27],
-     [2000,1,1,9,10,-60,1999,6,10,23,0],
-     [2000,1,1,9,0,-931,1999,6,10,8,29],
-     [2000,1,1,0,0,-3,1999,6,10,23,57]
-    ]
-    clue="subtract minutes in a resting workpattern"
-    calc_test(wp,tests,clue)
-  end
-  
-  def test_must_subtract_minutes_in_a_patterned_workpattern
-    assert true
-  end
-  
-  
-  def test_must_calculate_difference_between_dates_in_working_calender
-    name='mypattern'
-    base=1999
-    span=40
-    wp=Workpattern.new(name,base,span)
-        
-    [
-     [ 2012,10, 1, 0, 0, 2012,10, 1, 0, 0,    0],
-     [ 2012,10, 1, 0, 0, 2012,10, 1, 0, 1,    1],
-     [ 2012,10, 1, 0,50, 2012,10, 1, 0,59,    9],
-     [ 2012,10, 1, 8,50, 2012,10, 1, 9, 0,   10],
-     [ 2012,10, 1, 0, 0, 2012,10, 1,23,59, 1439],
-     [ 2012,10, 1, 0, 0, 2012,10, 2, 0, 0, 1440],
-     [ 2012,10, 1, 0, 0, 2012,10, 2, 0, 1, 1441],     
-     [ 2012,10, 1, 0, 0, 2013, 3,22, 6,11,248051],
-     [ 2012,10, 1, 0, 1, 2012,10, 1, 0, 0,    1],
-     [ 2012,10, 1, 0,59, 2012,10, 1, 0,50,    9],
-     [ 2012,10, 1, 9, 0, 2012,10, 1, 8,50,   10],
-     [ 2012,10, 1,23,59, 2012,10, 1, 0, 0, 1439],
-     [ 2012,10, 2, 0, 0, 2012,10, 1, 0, 0, 1440],
-     [ 2012,10, 2, 0, 1, 2012,10, 1, 0, 0, 1441],     
-     [ 2013, 3,22, 6,11, 2012,10, 1, 0, 0,248051],
-     [ 2012,10, 2, 6,11, 2012,10, 4, 8, 9, 2998]
-    ].each {|start_year, start_month, start_day, start_hour,start_min,
-             finish_year, finish_month, finish_day, finish_hour,finish_min,result|
-      start=DateTime.new(start_year, start_month, start_day, start_hour,start_min)
-      finish=DateTime.new(finish_year, finish_month, finish_day, finish_hour,finish_min)
-      duration, result_date=wp.diff(start,finish)
-      assert_equal result, duration,"duration diff(#{start}, #{finish})"
-    }
-  end
-
-  def test_must_calculate_difference_between_minutes_in_resting_workpattern
-    assert true
-  end
-
-  def test_must_calculate_difference_between_minutes_in_pattern_workpattern
-    assert true 
-  end
-
-  def test_must_follow_the_example_in_workpattern
-    mywp=Workpattern.new('My Workpattern',2011,10)
-    mywp.resting(:days => :weekend)
-    mywp.resting(:days =>:weekday, :from_time=>Workpattern.clock(0,0),:to_time=>Workpattern.clock(8,59))
-    mywp.resting(:days =>:weekday, :from_time=>Workpattern.clock(12,0),:to_time=>Workpattern.clock(12,59))
-    mywp.resting(:days =>:weekday, :from_time=>Workpattern.clock(18,0),:to_time=>Workpattern.clock(23,59))
-    mydate=DateTime.civil(2011,9,1,9,0)
-    result_date = mywp.calc(mydate,1920) # => 6/9/11@18:00
-    assert_equal DateTime.civil(2011,9,6,18,0), result_date, 'example in workpattern'
-  end
-  
-  def test_must_calculate_across_week_patterns
-    name='mypattern'
-    base=2011
-    span=11
-    wp=Workpattern.new(name,base,span)
-    start=DateTime.new(2012,9,24,0,0)
-    finish=DateTime.new(2012,10,14,0,0)
-    wp.resting(:days =>:all,:start=> start, :finish=>finish)    
-    wp.working(:days =>:mon,:start=> start, :finish=>finish, :from_time=>Workpattern.clock(1,0),:to_time=>Workpattern.clock(1,59))        
-    wp.working(:days =>:tue,:start=> start, :finish=>finish, :from_time=>Workpattern.clock(2,0),:to_time=>Workpattern.clock(2,59))        
-    wp.working(:days =>:wed,:start=> start, :finish=>finish, :from_time=>Workpattern.clock(3,0),:to_time=>Workpattern.clock(3,59))        
-    wp.working(:days =>:thu,:start=> start, :finish=>finish, :from_time=>Workpattern.clock(4,0),:to_time=>Workpattern.clock(4,59))        
-    wp.working(:days =>:fri,:start=> start, :finish=>finish, :from_time=>Workpattern.clock(5,0),:to_time=>Workpattern.clock(5,59))        
-    wp.working(:days =>:sat,:start=> start, :finish=>finish, :from_time=>Workpattern.clock(6,0),:to_time=>Workpattern.clock(6,59))        
-    wp.working(:days =>:sun,:start=> start, :finish=>finish, :from_time=>Workpattern.clock(0,0),:to_time=>Workpattern.clock(23,59))        
-
-    # Mon Tue Wed Thu Fri Sat Sun
-    #  24  25  26  27  28  29  30
-    #   1   2   3   4   5   6   7
-    #   8   9  10  11  12  13  14
-    # Mon 01:00 - 01:59
-    # Tue 02:00 - 02:59
-    # Wed 03:00 - 03:59
-    # Thu 04:00 - 04:59
-    # Fri 05:00 - 05:59
-    # Sat 06:00 - 06:59
-    # Sun 00:00 - 23:59
-    #
-    tests=[[2012,10,1,1,0,1,2012,10,1,1,1],
-     [2012,10,14,23,59,1,2012,10,15,0,0],
-     [2012,10,1,1,0,60*60+1,2012,10,15,0,1],
-     [2012,10,1,2,0,-1,2012,10,1,1,59],
-     [2012,10,2,3,0,-61,2012,10,1,1,59],
-     [2012,9,24,1,1,-2,2012,9,23,23,59],
-     [2012,10,1,1,59,61,2012,10,2,3,0],
-     [2012,10,1,1,1,-1,2012,10,1,1,0],
-     [2012,10,1,1,0,-1,2012,9,30,23,59]          
-    ]
-    clue="calculate across week patterns"
-    calc_test(wp,tests,clue)
-  end
-  
-  def test_must_know_whether_a_time_is_working_or_resting
-    name='working?'
-    base=2011
-    span=11
-    wp=Workpattern.new(name,base,span)
-    wp.resting(:to_time=>Workpattern.clock(8,59))
-    assert wp.working?(DateTime.new(2012,1,1,9,0))
-    assert !wp.working?(DateTime.new(2012,1,1,8,59))    
-  end
-  
-   
-  private
-  
-  def get_week(ss)
-    ss.each {|obj|  return obj}
-  end  
-  
-
-  def calc_test(wp,tests,clue)
-    
-    tests.each{|y,m,d,h,n,add,yr,mr,dr,hr,nr|
-      start_date=DateTime.new(y,m,d,h,n)
-      result_date = wp.calc(start_date,add)
-      assert_equal DateTime.new(yr,mr,dr,hr,nr), result_date, "result date calc(#{start_date},#{add}) for #{clue}"
-    }
-  end
-  def clock(hour,min)
-    return Workpattern.clock(hour,min)
-  end
-end

data/test/test_workpattern_module.rb

@@ -1,93 +0,0 @@
-require File.dirname(__FILE__) + '/test_helper.rb'
-
-class TestWorkpatternModule < MiniTest::Unit::TestCase #:nodoc:
-
-  def setup
-    Workpattern.clear()
-  end
-  
-  def test_must_create_workpattern_with_given_name
-  
-    wp = Workpattern.new()
-    assert_equal Workpattern::DEFAULT_WORKPATTERN_NAME, wp.name, 'not returned the default workpattern name'
-    assert_equal Workpattern::DEFAULT_BASE_YEAR, wp.from.year, 'not returned the default workpattern base year'
-    assert_equal Workpattern::DEFAULT_SPAN, wp.span, 'not returned the default workpattern span'
-    
-    mywp_name='barrie callender'
-    mywp_base=1963
-    mywp_span=48
-    mywp = Workpattern.new(mywp_name, mywp_base,mywp_span)
-    assert_equal mywp_name, mywp.name, 'not returned the supplied workpattern name'
-    assert_equal mywp_base, mywp.from.year, 'not returned the supplied workpattern base year'
-    assert_equal mywp_span, mywp.span, 'not returned the supplied workpattern span'
-    
-  end
-  
-  def test_must_raise_error_when_creating_workpattern_with_existing_name
-
-    assert_raises NameError do
-      mywp_name='duplicate'
-      wp=Workpattern.new(mywp_name)    
-      wp=Workpattern.new(mywp_name)
-    end
-
-  end
-  
-  def test_must_return_an_array_of_all_known_workpattern_objects
-
-    names =%w{fred harry sally}
-    names.each {|name| wp=Workpattern.new(name)}
-    wp_names = Workpattern.to_a
-    
-    assert_equal names.size, wp_names.size, "lists are not the same size"
-    
-    wp_names.each {|name, wp| assert names.include?(name)}
-  end
-  
-  def test_must_return_empty_array_when_no_workpatterns_exist
-
-    assert Workpattern.to_a.empty?
-  end
-  
-  def test_must_return_existing_workpattern
-
-    names =%w{fred harry sally}
-    names.each {|name| wp=Workpattern.new(name)}
-    
-    names.each {|name|
-      wp=Workpattern.get(name)
-      }
-  end
-  
-  def test_must_raise_error_when_workpattern_does_not_exist
-
-    names =%w{fred harry sally}
-    names.each {|name| wp=Workpattern.new(name)}
-    assert_raises NameError do
-      wp=Workpattern.get('missing')
-    end
-  end
-  
-  def test_must_delete_existing_workpattern_returning_true
-
-    names =%w{fred harry sally}
-    names.each {|name| wp=Workpattern.new(name)}
-    names.each {|name| assert Workpattern.delete(name)}
-  end
-  
-  def test_must_return_false_deleting_workpattern_that_does_not_exist
-    names =%w{fred harry sally}
-    names.each {|name| wp=Workpattern.new(name)}
-    assert !Workpattern.delete('missing')
-  end
-  
-  def test_must_delete_all_workpatterns
-
-    names =%w{fred harry sally}
-    names.each {|name| wp=Workpattern.new(name)}
-    Workpattern.clear
-    assert Workpattern.to_a.empty?
-  end
-  
-  
-end