RubyGems - achoo - Versions diffs - 0.4.2 → 0.5 - Mend

achoo 0.4.2 → 0.5

Files changed (40) hide show

data/CHANGES +13 -0
data/README.rdoc +26 -22
data/lib/achoo/achievo/hour_administration_form.rb +2 -3
data/lib/achoo/achievo/hour_registration_form.rb +12 -15
data/lib/achoo/achievo/hour_registration_form_ranged.rb +5 -2
data/lib/achoo/achievo/lock_month_form.rb +1 -5
data/lib/achoo/achievo/login_form.rb +3 -3
data/lib/achoo/app.rb +27 -28
data/lib/achoo/awake.rb +1 -1
data/lib/achoo/extensions.rb +4 -0
data/lib/achoo/ical.rb +6 -2
data/lib/achoo/plugin/awake.rb +23 -0
data/lib/achoo/plugin/ical.rb +47 -0
data/lib/achoo/plugin/vcs.rb +26 -0
data/lib/achoo/plugin_base.rb +6 -0
data/lib/achoo/rc_loader.rb +9 -0
data/lib/achoo/temporal/timespan.rb +3 -3
data/lib/achoo/term.rb +7 -3
data/lib/achoo/term/table.rb +5 -6
data/lib/achoo/ui/commands.rb +12 -12
data/lib/achoo/ui/date_chooser.rb +1 -1
data/lib/achoo/ui/exception_handling.rb +1 -1
data/lib/achoo/ui/register_hours.rb +50 -50
data/lib/achoo/vcs/git.rb +5 -3
data/test/acceptance/test_flexi_time.rb +41 -0
data/test/acceptance/test_lock_month.rb +39 -0
data/test/acceptance/test_register_hours.rb +161 -0
data/test/lib/achievo_mock.rb +76 -0
data/test/lib/achoo_runner.rb +54 -0
data/test/lib/test_helpers.rb +43 -0
data/test/unit/test_achievo_date_field.rb +34 -0
data/test/unit/test_awake.rb +98 -0
data/test/unit/test_extensions_array.rb +25 -0
data/test/unit/test_system_cstruct.rb +28 -0
data/test/unit/test_system_log_entry.rb +31 -0
data/test/unit/test_term_menu.rb +71 -0
data/test/unit/test_term_table.rb +52 -0
data/test/unit/test_timespan.rb +48 -0
data/test/unit/test_ui_date_chooser.rb +36 -0
metadata +101 -74

data/test/acceptance/test_register_hours.rb ADDED Viewed

@@ -0,0 +1,161 @@
+require 'test_helpers'
+class TestLockMonth < Test::Unit::TestCase
+  include AcceptanceBase
+  def setup
+    super
+    time_registration_html = %q{
+      <html>
+      <head></head>
+      <body>
+        <form name="entryform">
+          <input type="hidden" name="action" value="foo">
+          <input type="hidden" name="atkaction" value="bar">
+          <select name="activitydate[day]">
+            <option value="1" >Saturday 1</option>
+            <option value="2" >Sunday 2</option>
+            <option value="3" >Monday 3</option>
+            <option value="4" >Tuesday 4</option>
+            <option value="5" >Wednesday 5</option>
+            <option value="6" >Thursday 6</option>
+            <option value="7" >Friday 7</option>
+            <option value="8" >Saturday 8</option>
+            <option value="9" >Sunday 9</option>
+            <option value="10" >Monday 10</option>
+            <option value="11" >Tuesday 11</option>
+            <option value="12" >Wednesday 12</option>
+            <option value="13" >Thursday 13</option>
+            <option value="14" >Friday 14</option>
+            <option value="15" >Saturday 15</option>
+            <option value="16" >Sunday 16</option>
+            <option value="17" >Monday 17</option>
+            <option value="18" >Tuesday 18</option>
+            <option value="19" >Wednesday 19</option>
+            <option value="20" >Thursday 20</option>
+            <option value="21" >Friday 21</option>
+            <option value="22" >Saturday 22</option>
+            <option value="23" >Sunday 23</option>
+            <option value="24" >Monday 24</option>
+            <option value="25" selected>Tuesday 25</option>
+            <option value="26" >Wednesday 26</option>
+            <option value="27" >Thursday 27</option>
+            <option value="28" >Friday 28</option>
+            <option value="29" >Saturday 29</option>
+            <option value="30" >Sunday 30</option>
+            <option value="31" >Monday 31</option>
+          </select>
+          <select name="activitydate[month]">
+            <option value="1" >January</option>
+            <option value="2" >February</option>
+            <option value="3" >March</option>
+            <option value="4" >April</option>
+            <option value="5" selected>May</option>
+            <option value="6" >June</option>
+            <option value="7" >July</option>
+            <option value="8" >August</option>
+            <option value="9" >September</option>
+            <option value="10" >October</option>
+            <option value="11" >November</option>
+            <option value="12" >December</option>
+          </select>
+          <input type="text" name="activitydate[year]" value="2010">
+          <a href="FIX">Select range</a>
+          <select name="projectid">
+            <option value="project.id='1'" >foo: Foo</option>
+            <option value="project.id='2'" >bar: Bar</option>
+          </select>
+          <a href="FIX">Select project</a>
+          <select name="phaseid"></select>
+          <textarea name='remark'></textarea>
+          <input name="time" value="">
+          <select name="workperiod">
+            <option value="workperiod.id='1'" selected>Normal</option>
+            <option value="workperiod.id='2'" >Overtime</option>
+          </select>
+          <select name="billpercent">
+            <option value="billpercent.id='1'" >Normal (100%)</option>
+            <option value="billpercent.id='2'" >Overtime (200%)</option>
+          </select>
+          <input type="submit" value="Save">
+        </form>
+      </body>
+      </html>
+    }
+    phase_html = %q{The phase&nbsp;&nbsp;<input type="hidden" name="phaseid" value="phase.id='1'">}
+    @server.register(:get, '/time_registration', [ 200, nil, time_registration_html ])
+    @server.register(:post, '/dispatch.php', [ 200, nil, phase_html ])
+  end
+  def test_register_hours
+    achoo(:verbose => $DEBUG) do
+      expect '1. Register hours'
+      expect_main_prompt
+      puts '1'
+      expect /Date \(\[today\] \| \?\)>/
+      puts '2010-05-25'
+      expect 'Recently used projects'
+      expect '1. foo: Foo'
+      expect '2. bar: Bar'
+      puts '2'
+      expect 'Phases'
+      expect '1. The phase'
+      expect 'Remark>'
+      puts 'A nice remark'
+      expect 'Hours [7:30]>'
+      puts '2'
+      expect 'Do you want to change the defaults for worktime period and/or billing percentage? [N/y]>'
+      puts 'y'
+      expect 'Worktime periods'
+      expect '1. Normal'
+      expect '2. Overtime'
+      expect 'Period [1]>'
+      puts '2'
+      expect 'Billing options'
+      expect '1. Normal (100%)'
+      expect '2. Overtime (200%)'
+      expect 'Billing [1]>'
+      puts '2'
+      expect '     date: "2010-05-25"'
+      expect '  project: "bar: Bar"'
+      expect '    phase: "The phase"'
+      expect '   remark: "A nice remark"'
+      expect '    hours: "2"'
+      expect ' worktime: "Overtime"'
+      expect '  billing: "Overtime (200%)"'
+      expect 'Submit? [Y/n]>'
+      puts 'n'
+      expect 'Cancelled'
+      expect_main_prompt
+      puts 'q'
+    end
+  end
+end

data/test/lib/achievo_mock.rb ADDED Viewed

@@ -0,0 +1,76 @@
+# From http://dynamicorange.com/2009/02/18/ruby-mock-web-server/
+require 'logger'
+require 'rack'
+require 'thin'
+class AchievoMock
+  def initialize(port=4000)
+    @expectations = []
+    @server = Thin::Server.new('127.0.0.1', port, self)
+    @server.silent = true
+    @thread = Thread.new { @server.start }
+    sleep 1
+    @logger = Logger.new(File.dirname(__FILE__) + '/../../tmp/test.log')
+  end
+  def stop
+    @server.stop!
+    Thread.kill(@thread)
+  end
+  def register(method, path, response, env={})
+    env.merge!({
+      'REQUEST_METHOD' => method.to_s.upcase,
+      'REQUEST_PATH'   => path,
+    })
+    response[1] = { 'Content-Type' => 'text/html', 'Content-Length' => response[2].length.to_s }
+    response[2] = [response[2]]
+    @logger.debug "Registered #{[env, response]}"
+    @expectations << [env, response]
+  end
+  def clear
+    @expectations = []
+  end
+  def call(env)
+    @logger.debug "Got request: #{env}"
+    if @expectations.empty?
+      @logger.debug('Got an unexpected request')
+      return error_page('Not expecting any request')
+    end
+    response = @expectations.first[1]
+    if expectation_satisified?(env, @expectations.shift)
+      @logger.debug "Responding with: #{response}"
+      return response
+    end
+  end
+  def error_page(msg)
+    [500,
+     { 'Content-Type'   => 'text/plain',
+       'Content-Length' => msg.length.to_s
+     },
+     [msg]
+    ]
+  end
+  def expectation_satisified?(env, expectation)
+    expectationEnv = expectation[0]
+    matched = false
+    expectationEnv.each do |envKey, value|
+      matched = true
+      if value != env[envKey]
+        matched = false
+        @logger.debug('Unmet expectation')
+        return error_page('Expectation not met')
+      end
+    end
+    matched
+  end
+end

data/test/lib/achoo_runner.rb ADDED Viewed

@@ -0,0 +1,54 @@
+require 'expect'
+require 'pty'
+require 'test/unit'
+class AchooRunner
+  include Test::Unit::Assertions
+  attr_accessor :reader
+  attr_accessor :writer
+  attr_accessor :pid
+  def initialize(reader, writer, pid)
+    self.reader = reader
+    self.writer = writer
+    self.pid    = pid
+  end
+  def puts(str); writer.puts str; end
+  def expect(pattern)
+    stat = reader.expect(pattern, 3)
+    raise "Didn't find '#{pattern}' before timeout" if stat.nil?
+    stat
+  end
+  def expect_main_prompt
+    expect('[1]>')
+  end
+end
+def achoo(opts, &block)
+  options = {
+    :verbose => false,
+  }.merge(opts)
+  rc_file = File.dirname(__FILE__) << '/dot_achoo'
+  File.chmod(0600, rc_file)
+  cmd = 'ruby -Ilib bin/achoo --log --rcfile ' << rc_file
+  PTY.spawn(cmd) do |r, w, pid|
+    w.sync = true
+    $expect_verbose = options[:verbose]
+    runner = AchooRunner.new(r, w, pid)
+    begin
+      runner.instance_eval(&block)
+    rescue Exception => e
+      runner.flunk e
+    end
+  end
+end

data/test/lib/test_helpers.rb ADDED Viewed

@@ -0,0 +1,43 @@
+#require 'redgreen' # FIX Seems to be problems with ruby 1.9.2 due to minitest/unit
+require 'shoulda'
+require 'test/unit'
+require 'achievo_mock'
+require 'achoo_runner'
+module AcceptanceBase
+  @@main_html = %q{
+    <html>
+    <head></head>
+      <frameset>
+        <frame name="menu" src="/menu">
+      <frameset>
+    </html>
+  }
+  @@menu_html = %q{
+    <html>
+    <head></head>
+    <body>
+      <a class="menuItemLevel2"
+         onclick="window.open('time_registration')">Time Registration</a>
+      <a class="menuItemLevel2"
+         onclick="window.open('lock_months')">Lock months</a>
+      <a class="menuItemLevel2"
+         onclick="window.open('holiday_report')">Holiday report</a>
+    </body>
+    </html>
+  }
+  def setup
+    @server = AchievoMock.new()
+    @server.register(:get, '/',     [ 200, nil, @@main_html ])
+    @server.register(:get, '/menu', [ 200, nil, @@menu_html ])
+  end
+  def teardown
+    @server.stop
+  end
+end

data/test/unit/test_achievo_date_field.rb ADDED Viewed

@@ -0,0 +1,34 @@
+require 'achoo/achievo'
+require 'test_helpers'
+class TestTermMenu < Test::Unit::TestCase
+  context 'Include' do
+    setup do
+      @a = Class.new do
+        include Achoo::Achievo::DateField('foo', 'bar')
+      end
+    end
+    should 'mixin foo accessor' do
+      assert @a.instance_methods.include?('foo')
+    end
+    should 'mixin foo= accessor' do
+      assert @a.instance_methods.include?('foo=')
+    end
+    should 'mixin foo_day_field accessor' do
+      assert @a.instance_methods.include?('foo_day_field')
+    end
+    should 'mixin foo_month_field accessor' do
+      assert @a.instance_methods.include?('foo_month_field')
+    end
+    should 'mixin foo_year_field accessor' do
+      assert @a.instance_methods.include?('foo_year_field')
+    end
+  end
+end

data/test/unit/test_awake.rb ADDED Viewed

@@ -0,0 +1,98 @@
+require 'achoo/awake'
+require 'achoo/system'
+require 'stringio'
+require 'test_helpers'
+require 'time'
+class Achoo::Awake
+  def initialize
+    log = [
+           [ '1990-03-01 07:00', :boot],
+           [ '1990-03-01 11:40', :suspend],
+           # Crash
+           [ '1990-03-01 13:00', :boot],
+           [ '1990-03-01 18:00', :halt],
+           #
+           [ '1990-03-02 07:00', :boot],
+           [ '1990-03-02 08:00', :suspend],
+           [ '1990-03-02 09:00', :awake],
+           [ '1990-03-02 10:00', :suspend],
+           [ '1990-03-03 11:00', :awake],
+           [ '1990-03-03 12:00', :halt],
+           #
+           [ '1990-03-04 07:00', :boot],
+           # Crash
+           [ '1990-03-05 07:00', :boot],
+           [ '1990-03-05 08:00', :suspend],
+           [ '1990-03-05 09:00', :awake],
+           # Crash
+           [ '1990-03-05 10:00', :boot],
+          ].reverse
+    log.unshift(['1990-03-05 18:00', :now])
+    log.each {|entry| entry[0] = Time.parse(entry[0])}
+    log.collect! {|entry| Achoo::System::LogEntry.new(*entry)}
+    @sessions = sessions(log)
+  end
+end
+class TestAwake < Test::Unit::TestCase
+  def setup
+    @awake = Achoo::Awake.new
+  end
+  #def teardown
+  #end
+  def test_all
+    $stdout = StringIO.new
+    @awake.all
+    expected = %q{Powered on: (0+08:00) Mon  5. Mar 1990 10:00 - 18:00
+Powered on: (?+??:??) Mon  5. Mar 1990 07:00 - ?
+  Awake: (?+??:??) Mon  5. Mar 1990 09:00 - ?
+  Awake: (0+01:00) Mon  5. Mar 1990 07:00 - 08:00
+Powered on: (?+??:??) Sun  4. Mar 1990 07:00 - ?
+Powered on: (1+05:00) Fri  2. Mar 1990 07:00 - Sat  3. Mar 1990 12:00
+  Awake: (0+01:00) Sat  3. Mar 1990 11:00 - 12:00
+  Awake: (0+01:00) Fri  2. Mar 1990 09:00 - 10:00
+  Awake: (0+01:00) Fri  2. Mar 1990 07:00 - 08:00
+Powered on: (0+05:00) Thu  1. Mar 1990 13:00 - 18:00
+Powered on: (0+04:40) Thu  1. Mar 1990 07:00 - 11:40
+}
+    actual = $stdout.string
+    $stdout = STDOUT
+    assert_equal(expected, actual)
+  end
+  def test_at_1
+    $stdout = StringIO.new
+    @awake.at(Date.new(1990, 3, 2))
+    expected = %q{Powered on: (1+05:00) Fri  2. Mar 1990 07:00 - Sat  3. Mar 1990 12:00
+  Awake: (0+01:00) Fri  2. Mar 1990 09:00 - 10:00
+  Awake: (0+01:00) Fri  2. Mar 1990 07:00 - 08:00
+}
+    actual = $stdout.string
+    $stdout = STDOUT
+    assert_equal(expected, actual)
+  end
+  def test_at_2
+    $stdout = StringIO.new
+    @awake.at(Date.new(1990, 3, 3))
+    expected = %q{Powered on: (1+05:00) Fri  2. Mar 1990 07:00 - Sat  3. Mar 1990 12:00
+  Awake: (0+01:00) Sat  3. Mar 1990 11:00 - 12:00
+}
+    actual = $stdout.string
+    $stdout = STDOUT
+    assert_equal(expected, actual)
+  end
+end