ruote 0.9.20 → 2.1.1

data/test/functional/ft_30_smtp_participant.rb

@@ -0,0 +1,69 @@
+
+#
+# testing ruote
+#
+# Tue Sep 15 09:04:36 JST 2009
+#
+
+require File.join(File.dirname(__FILE__), 'base')
+
+require 'ruote/part/smtp_participant'
+
+
+class NftSmtpParticipantTest < Test::Unit::TestCase
+  include FunctionalBase
+
+  if RUBY_PLATFORM != 'java'
+
+    require 'mailtrap' # sudo gem install mailtrap
+
+    class Trap < ::Mailtrap
+      def puts (s)
+        # silent night...
+      end
+    end
+  end
+
+  def test_smtp
+
+    return if RUBY_PLATFORM == 'java'
+
+    pdef = Ruote.process_definition :name => 'test' do
+      sequence do
+        set 'f:item' => 'cat food'
+        alpha
+      end
+    end
+
+    trapfile = '/tmp/ruote_mailtrap.txt'
+    FileUtils.rm(trapfile) rescue nil
+
+    Thread.new do
+      Trap.new('127.0.0.1', 2525, true, trapfile)
+    end
+    sleep 0.040
+      # give it some time to start listening
+
+    @engine.register_participant(
+      :alpha,
+      Ruote::SmtpParticipant.new(
+        :server => '127.0.0.1',
+        :port => 2525,
+        :to => 'toto@cloudwhatever.ch',
+        :from => 'john@outoftheblue.ch',
+        :notification => true,
+        :template => %{
+  Hello, do you want ${f:item} ?
+        }))
+
+    #noisy
+
+    wfid = @engine.launch(pdef)
+
+    sleep 0.450
+
+    assert_match(/cat food/, File.read(trapfile))
+    assert_nil @engine.process(wfid)
+  end
+end
+

data/test/functional/ft_31_part_blocking.rb

@@ -0,0 +1,70 @@
+
+#
+# testing ruote
+#
+# Fri Sep 25 16:15:57 JST 2009
+#
+# By David Goldhirsch
+#
+
+require File.join(File.dirname(__FILE__), 'base')
+
+class FtPartBlockingTest < Test::Unit::TestCase
+ include FunctionalBase
+
+ def test_equal_time_favors_first
+   run_engine
+   assert_equal 'first', @tracer.to_s
+ end
+
+ def test_second_is_faster
+   #noisy
+   run_engine :first_time => 0.5
+   assert_equal 'second', @tracer.to_s
+ end
+
+ def test_first_is_faster
+   run_engine  :second_time => 0.5
+   assert_equal 'first', @tracer.to_s
+ end
+
+ protected
+
+ def run_engine (options={})
+
+   first_time = options[:first_time] || 0.0
+   second_time = options[:second_time] || 0.0
+
+   second_time = first_time + 0.1 if first_time == second_time
+
+   pdef = Ruote.process_definition :name => 'simple' do
+     sequence do
+       concurrence do # spec says this is equivalent to :count => 1
+         participant :ref => 'first'
+         participant :ref => 'second'
+       end
+       participant :ref => 'trace'
+     end
+   end
+
+   @engine.register_participant :first do |wi|
+     sleep first_time
+     wi.fields['result'] = 'first'
+   end
+
+   @engine.register_participant :second do |wi|
+     sleep second_time
+     wi.fields['result'] = 'second'
+   end
+
+   @engine.register_participant :trace do |wi|
+     @tracer << "#{wi.fields['result']}"
+   end
+
+   wfid = @engine.launch(pdef)
+   @engine.wait_for(wfid)
+
+   wfid
+ end
+end
+

data/test/functional/ft_32_history.rb

@@ -0,0 +1,184 @@
+
+#
+# testing ruote
+#
+# Sun Oct  4 00:14:27 JST 2009
+#
+
+
+require 'yajl' rescue require 'json'
+Rufus::Json.detect_backend rescue nil
+
+require File.join(File.dirname(__FILE__), 'base')
+
+require 'ruote/log/fs_history'
+require 'ruote/part/no_op_participant'
+
+
+class FtHistoryTest < Test::Unit::TestCase
+  include FunctionalBase
+
+  def test_launch
+
+    pdef = Ruote.process_definition do
+      alpha
+      echo 'done.'
+    end
+
+    history = @engine.add_service(
+      'history', 'ruote/log/fs_history', 'Ruote::FsHistory')
+
+    @engine.register_participant :alpha, Ruote::NoOpParticipant
+
+    #noisy
+
+    wfid0 = assert_trace(pdef, "done.")
+    wfid1 = assert_trace(pdef, "done.\ndone.")
+
+    sleep 0.010
+
+    lines = File.readlines(Dir['work/log/*'].first)
+
+    assert_equal 17, lines.size
+    #lines.each { |l| puts l }
+
+    h = @engine.context.history.by_process(wfid0)
+    #h.each { |r| p r }
+    assert_equal 8, h.size
+
+    # testing record.to_h
+
+    h = @engine.context.history.by_process(wfid1)
+    #h.each { |r| p r }
+    assert_equal 8, h.size
+
+  ensure
+
+    Dir['work/log/*'].each { |fn| FileUtils.rm(fn) }
+  end
+
+  def test_subprocess
+
+    pdef = Ruote.process_definition :name => 'test', :revision => '3' do
+      sequence do
+        sub0
+        echo 'done.'
+      end
+      define 'sub0' do
+        alpha
+      end
+    end
+
+    history = @engine.add_service(
+      'history', 'ruote/log/fs_history', 'Ruote::FsHistory',
+      'history_path' => 'work/log2')
+
+    @engine.register_participant :alpha, Ruote::NoOpParticipant
+
+    #noisy
+
+    wfid0 = assert_trace(pdef, "done.")
+
+    sleep 0.010
+
+    h = @engine.context.history.by_process(wfid0)
+    #h.each { |r| p r }
+    assert_equal 11, h.size
+
+  ensure
+
+    Dir['work/log2/*'].each { |fn| FileUtils.rm(fn) }
+  end
+
+  def test_errors
+
+    pdef = Ruote.process_definition :name => 'test' do
+      nada
+    end
+
+    history = @engine.add_service(
+      'history', 'ruote/log/fs_history', 'Ruote::FsHistory')
+
+    #noisy
+
+    wfid = @engine.launch(pdef)
+    wait_for(wfid)
+
+    sleep 0.010
+
+    h = @engine.context.history.by_process(wfid)
+    #h.each { |r| p r }
+    assert_equal 2, h.size
+
+  ensure
+
+    Dir['work/log/*'].each { |fn| FileUtils.rm(fn) }
+  end
+
+  def test_cancelling_failed_exp
+
+    pdef = Ruote.process_definition :name => 'test' do
+      nada
+    end
+
+    history = @engine.add_service(
+      'history', 'ruote/log/fs_history', 'Ruote::FsHistory')
+
+    #noisy
+
+    wfid = @engine.launch(pdef)
+    wait_for(wfid)
+
+    fei = @engine.process(wfid).errors.first.fei
+
+    @engine.cancel_expression(fei)
+    wait_for(wfid)
+
+    sleep 0.010
+
+    h = @engine.context.history.by_process(wfid)
+    #h.each { |r| p r }
+    assert_equal 5, h.size
+
+  ensure
+
+    Dir['work/log/*'].each { |fn| FileUtils.rm(fn) }
+  end
+
+  def test_history_date
+
+    history = @engine.add_service(
+      'history', 'ruote/log/fs_history', 'Ruote::FsHistory')
+
+    FileUtils.mkdir(File.join(@engine.workdir, 'log')) rescue nil
+
+    File.open(File.join('work', 'log', 'history_2009-10-08.json'), 'w') do |f|
+      f.puts(%{
+["2009-10-08 12:33:27.835469",{"wfid":"20091224-beretsureto","tree":["define",{},[["alpha",{},[]],["echo",{"done.":null},[]]]],"workitem":{"fields":{},"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0"}},"variables":{},"type":"msgs","_id":"17619-2151883888-1261658007.83374","action":"launch","_rev":0,"put_at":"2009/12/24 12:33:27.833769 UTC"}]
+["2009-10-08 12:33:27.836787",{"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0_0"},"tree":["participant",{"ref":"alpha"},[]],"parent_id":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0"},"variables":null,"workitem":{"fields":{"params":{"ref":"alpha"}},"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0_0"},"participant_name":"alpha"},"type":"msgs","_id":"17619-2157823640-1261658007.83534","action":"apply","_rev":0,"put_at":"2009/12/24 12:33:27.835369 UTC"}]
+["2009-10-08 12:33:27.837098",{"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0_0"},"participant_name":"alpha","workitem":{"fields":{"params":{"ref":"alpha"}},"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0_0"},"participant_name":"alpha"},"for_engine_worker?":false,"type":"msgs","_id":"17619-2157823640-1261658007.83666","action":"dispatch","_rev":0,"put_at":"2009/12/24 12:33:27.836690 UTC"}]
+      }.strip)
+    end
+
+    File.open(File.join('work', 'log', 'history_2009-10-31.json'), 'w') do |f|
+      f.puts(%{
+["2009-10-31 12:33:27.835469",{"wfid":"20091224-beretsureto","tree":["define",{},[["alpha",{},[]],["echo",{"done.":null},[]]]],"workitem":{"fields":{},"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0"}},"variables":{},"type":"msgs","_id":"17619-2151883888-1261658007.83374","action":"launch","_rev":0,"put_at":"2009/12/24 12:33:27.833769 UTC"}]
+["2009-10-31 12:33:27.836787",{"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0_0"},"tree":["participant",{"ref":"alpha"},[]],"parent_id":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0"},"variables":null,"workitem":{"fields":{"params":{"ref":"alpha"}},"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0_0"},"participant_name":"alpha"},"type":"msgs","_id":"17619-2157823640-1261658007.83534","action":"apply","_rev":0,"put_at":"2009/12/24 12:33:27.835369 UTC"}]
+["2009-10-31 12:33:27.837098",{"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0_0"},"participant_name":"alpha","workitem":{"fields":{"params":{"ref":"alpha"}},"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0_0"},"participant_name":"alpha"},"for_engine_worker?":false,"type":"msgs","_id":"17619-2157823640-1261658007.83666","action":"dispatch","_rev":0,"put_at":"2009/12/24 12:33:27.836690 UTC"}]
+["2009-10-31 12:33:27.837961",{"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0_0"},"workitem":{"fields":{},"fei":{"engine_id":"engine","wfid":"20091224-beretsureto","expid":"0_0"},"participant_name":"alpha"},"participant_name":"alpha","type":"msgs","_id":"17619-2159486252-1261658007.83719","action":"receive","_rev":0,"put_at":"2009/12/24 12:33:27.837235 UTC"}]
+      }.strip)
+    end
+
+    assert_equal 3, @engine.context.history.by_date('2009-10-08').size
+    assert_equal 4, @engine.context.history.by_date('2009-10-31').size
+
+    assert_equal(
+      [ Time.parse(Time.now.strftime('%F')), Time.parse('2009-10-08') ],
+      @engine.context.history.range)
+
+  ensure
+
+    Dir['work/log/*'].each { |fn| FileUtils.rm(fn) }
+  end
+end
+

data/test/functional/ft_33_participant_subprocess_priority.rb

@@ -0,0 +1,32 @@
+
+#
+# testing ruote
+#
+# Wed Oct 21 05:35:29 JST 2009
+#
+
+require File.join(File.dirname(__FILE__), 'base')
+
+
+class FtParticipantSubprocessPriorityTest < Test::Unit::TestCase
+  include FunctionalBase
+
+  def test_priority
+
+    pdef = Ruote.process_definition do
+      sub0
+      define 'sub0' do
+        echo 'sub0'
+      end
+    end
+
+    @engine.register_participant '.+' do
+      @tracer << 'participant'
+    end
+
+    #noisy
+
+    assert_trace pdef, 'sub0'
+  end
+end
+

data/test/functional/ft_34_cursor_rewind.rb

@@ -0,0 +1,98 @@
+
+#
+# testing ruote
+#
+# Fri Nov 13 10:30:32 JST 2009
+#
+
+require File.join(File.dirname(__FILE__), 'base')
+
+require 'ruote/part/hash_participant'
+
+#
+# testing forced rewinding
+#
+class FtCursorRewindTest < Test::Unit::TestCase
+  include FunctionalBase
+
+  def test_cursor_forced_back
+
+    pdef = Ruote.process_definition do
+      cursor do
+        alpha
+        bravo
+        charly
+      end
+    end
+
+    alpha = @engine.register_participant :alpha, Ruote::HashParticipant.new
+    bravo = @engine.register_participant :bravo, Ruote::HashParticipant.new
+    charly = @engine.register_participant :charly, Ruote::HashParticipant.new
+
+    #noisy
+
+    #
+    # reaching initial situation...
+
+    wfid = @engine.launch(pdef)
+    wait_for(:alpha)
+
+    alpha.reply(alpha.first)
+    wait_for(:bravo)
+
+    #
+    # rewinding...
+
+    wi = bravo.first
+    wi.fields['__command__'] = [ 'back', 2 ]
+
+    @engine.reply(wi)
+
+    #
+    # workitem is back to alpha
+
+    wait_for(:alpha)
+  end
+
+  def test_cursor_forced_jump
+
+    pdef = Ruote.process_definition do
+      cursor do
+        alpha
+        bravo
+        charly
+      end
+    end
+
+    alpha = @engine.register_participant :alpha, Ruote::HashParticipant.new
+    bravo = @engine.register_participant :bravo, Ruote::HashParticipant.new
+    charly = @engine.register_participant :charly, Ruote::HashParticipant.new
+
+    #noisy
+
+    #
+    # reaching initial situation...
+
+    wfid = @engine.launch(pdef)
+    wait_for(:alpha)
+
+    alpha.reply(alpha.first)
+    wait_for(:bravo)
+
+    #
+    # rewinding...
+
+    wi = bravo.first
+
+    wi.h['fei']['expid'] = wi.h['fei']['expid'][0..-3] # parent wfid
+    wi.fields['__command__'] = [ 'jump', 'alpha' ]
+
+    @engine.reply(wi)
+
+    #
+    # workitem is back to alpha
+
+    wait_for(:alpha)
+  end
+end
+