ruote 0.9.19 → 0.9.20

data/test/functional/ft_4_on_error.rb

@@ -0,0 +1,220 @@
+
+#
+# Testing Ruote (OpenWFEru)
+#
+# John Mettraux at openwfe.org
+#
+# Thu Nov 27 16:30:23 JST 2008
+#
+
+require File.dirname(__FILE__) + '/base'
+
+
+class FtOnErrorTest < Test::Unit::TestCase
+  include FunctionalBase
+
+  def test_on_error_undo
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      sequence do
+        echo '0'
+        sequence :on_error => :undo do
+          alpha
+          echo '1'
+        end
+        echo '2'
+      end
+    end
+
+    @engine.register_participant(:alpha) do |workitem|
+      raise 'Houston, we have a problem !'
+    end
+
+    assert_trace pdef, "0\n2"
+  end
+
+  def test_on_error_failpath
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      sequence do
+        echo '0'
+        sequence :on_error => 'fail_path' do
+          alpha
+          echo '1'
+        end
+        echo '2'
+      end
+      define 'fail_path' do
+        echo 'failed'
+      end
+    end
+
+    @engine.register_participant(:alpha) do |workitem|
+      raise 'Houston, we have a problem !'
+    end
+
+    assert_trace pdef, "0\nfailed\n2"
+  end
+
+  def test_on_error_neutralization
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      sequence do
+        echo '0'
+        sequence :on_error => 'fail_path' do
+          echo '1'
+          alpha :on_error => ''
+          echo '2'
+        end
+        echo '3'
+      end
+      define 'fail_path' do
+        echo 'failed'
+      end
+    end
+
+    @engine.register_participant(:alpha) do |workitem|
+      raise 'Houston, we have a problem !'
+    end
+
+    fei = @engine.launch(pdef)
+
+    sleep 0.350
+
+    ps = @engine.process_status(fei)
+
+    assert_equal 1, ps.errors.size
+
+    purge_engine
+  end
+
+  def test_on_error_redo
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      sequence do
+        echo '0'
+        sequence :on_error => :redo do
+          echo '1'
+          alpha
+          echo '2'
+        end
+        echo '3'
+      end
+    end
+
+    hits = 0
+
+    @engine.register_participant(:alpha) do |workitem|
+      hits += 1
+      raise 'Houston, we have a problem !' if hits == 1
+    end
+
+    assert_trace pdef, %w{ 0 1 1 2 3 }.join("\n")
+  end
+
+  def test_on_error_nested_rescue
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      sequence :on_error => 'parent_rescue' do
+        echo '0'
+        sequence :on_error => 'rescue' do
+          echo '1'
+          alpha
+          echo '2'
+        end
+      end
+      define 'rescue' do
+        sequence do
+          echo 'rescue'
+          bravo
+          echo '3'
+        end
+      end
+      define 'parent_rescue' do
+        echo 'parent_rescue'
+      end
+    end
+
+    @engine.register_participant(:alpha) do |workitem|
+      raise 'Houston, we have a problem !'
+    end
+    @engine.register_participant(:bravo) do |workitem|
+      raise 'Houston, we have had a problem.'
+    end
+
+    assert_trace pdef, %w{ 0 1 rescue parent_rescue }.join("\n")
+  end
+
+  def test_on_error_at_process_level
+
+    pdef = OpenWFE.process_definition :name => 'test', :on_error => 'rescue' do
+      sequence do
+        echo '0'
+        alpha
+        echo '1'
+      end
+      define 'rescue' do
+        echo 'r'
+      end
+    end
+
+    @engine.register_participant(:alpha) do |workitem|
+      raise 'Houston, we have a problem !'
+    end
+
+    fei = @engine.launch(pdef)
+
+    sleep 0.350
+
+    assert_equal "0\nr", @tracer.to_s
+  end
+
+  def test_on_error_and_raise
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      sequence :on_error => 'fail_path' do
+        echo 'a'
+        error 'failing'
+        echo 'b'
+      end
+      define 'fail_path' do
+        echo 'failed.'
+      end
+    end
+
+    assert_trace pdef, "a\nfailed."
+  end
+
+  def test_on_error_failpath_and_variables
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      sequence :on_error => 'fail_path' do
+        set :var => 'var0', :val => 'val0'
+        error 'fail'
+      end
+      define 'fail_path' do
+        echo 'var0:${var0}'
+      end
+    end
+
+    assert_trace pdef, 'var0:val0'
+  end
+
+  def test_on_error_failpath_and_variables_at_the_process_level
+
+    pdef = OpenWFE.process_definition :name => 't', :on_error => 'fail_path' do
+      sequence do
+        set :var => 'var0', :val => 'val0'
+        error 'fail'
+      end
+      define 'fail_path' do
+        echo 'var0:${var0}'
+      end
+    end
+
+    assert_trace(pdef, 'var0:val0') { sleep 0.100 }
+      # the sleep 0.100 is only useful for --fs -C
+  end
+
+end
+

data/test/functional/ft_5_process_uri.rb

@@ -0,0 +1,82 @@
+
+#
+# Testing Ruote (OpenWFEru)
+#
+# John Mettraux at openwfe.org
+#
+# Thu Feb 26 09:18:47 JST 2009
+#
+
+require File.dirname(__FILE__) + '/base'
+
+
+class FtProcessUriTest < Test::Unit::TestCase
+  include FunctionalBase
+
+  def test_launch_missing_local_process
+
+    assert_raise (Errno::ENOENT) {
+      @engine.launch('tmp/missing.xml')
+    }
+  end
+
+  def test_launch_missing_remote_process
+
+    @engine.ac[:remote_definitions_allowed] = true
+
+    assert_raise (Errno::ECONNREFUSED) {
+      @engine.launch('http://127.0.0.1:56343/missing.xml')
+    }
+  end
+
+  def test_launch_remote_process_when_forbidden
+
+    @engine.ac[:remote_definitions_allowed] = false
+      # making sure it's set to false
+
+    assert_raise (RuntimeError) {
+      @engine.launch('http://example.com/pdef0.rb')
+    }
+  end
+
+  def test_launch_fs_stored_process
+
+    prepare_def0
+
+    assert_trace 'tmp/def0.xml', 'a'
+  end
+
+  def test_launch_fs_stored_ruby_process
+
+    prepare_def1
+
+    assert_trace 'tmp/def1.rb', 'b'
+  end
+
+  protected
+
+  def prepare_def0
+
+    FileUtils.mkdir('tmp') rescue nil
+
+    File.open('tmp/def0.xml', 'w') do |f|
+      f.write(%{
+<process-definition name="test">
+  <echo>a</echo>
+</process-definition>
+      })
+    end
+  end
+
+  def prepare_def1
+    File.open('tmp/def1.rb', 'w') do |f|
+      f.write(%{
+OpenWFE.process_definition :name => 'test' do
+  echo 'b'
+end
+      })
+    end
+  end
+
+end
+

data/test/functional/ft_6_process_status.rb

@@ -0,0 +1,62 @@
+
+#
+# Testing Ruote (OpenWFEru)
+#
+# John Mettraux at openwfe.org
+#
+# Thu Feb 26 14:59:09 JST 2009
+#
+
+require File.dirname(__FILE__) + '/base'
+
+
+class FtProcessStatusTest < Test::Unit::TestCase
+  include FunctionalBase
+
+  def test_process_status
+
+    pdef = OpenWFE.process_definition do
+      sequence do
+        alpha
+      end
+    end
+
+    @engine.register_participant(:alpha, OpenWFE::NullParticipant)
+      # receives workitems, discards them, doesn't reply to the engine
+
+    fei = @engine.launch(pdef)
+
+    sleep 0.350
+
+    ps = @engine.processes(fei.wfid)
+    assert_equal 1, ps.size
+
+    purge_engine
+  end
+
+  def test_multiple_process_status
+
+    pdef = OpenWFE.process_definition do
+      sequence do
+        alpha
+      end
+    end
+
+    @engine.register_participant(:alpha, OpenWFE::NullParticipant)
+      # receives workitems, discards them, doesn't reply to the engine
+
+    fei = @engine.launch(pdef)
+    @engine.launch(pdef)
+
+    sleep 0.350
+
+    ps = @engine.processes
+    assert_equal 2, ps.size
+
+    ps = @engine.processes(fei.wfid)
+    assert_equal 1, ps.size
+
+    purge_engine
+  end
+end
+

data/test/functional/ft_7_parameters.rb

@@ -0,0 +1,103 @@
+
+#
+# Testing Ruote (OpenWFEru)
+#
+# John Mettraux at openwfe.org
+#
+# Fri Feb 27 22:12:39 JST 2009
+#
+
+require File.dirname(__FILE__) + '/base'
+
+
+class FtParametersTest < Test::Unit::TestCase
+  include FunctionalBase
+
+  PDEF0 = OpenWFE.process_definition :name => 'test' do
+    parameter :field => 'address'
+    sequence do
+      echo '${f:address}'
+    end
+  end
+
+  def test_missing_field
+
+    #e = assert_raise(OpenWFE::ParameterException) {
+    e = assert_raise(ArgumentError) {
+      @engine.launch(PDEF0)
+    }
+    assert_equal "field 'address' is missing", e.message
+  end
+
+  def test_field_not_missing
+
+    li = OpenWFE::LaunchItem.new(PDEF0)
+    li.address = 'nihonbashi'
+
+    assert_trace li, 'nihonbashi'
+  end
+
+  def test_field_default_value
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      parameter :field => 'address', :default => 'unknown'
+      echo '${f:address}'
+    end
+
+    assert_trace pdef, 'unknown'
+  end
+
+  def test_field_type_boxing
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      parameter :field => 'address', :type => :string
+      parameter :field => 'number', :type => :int
+      echo '${f:address}/${ru:wi.number * 2}'
+    end
+
+    li = OpenWFE::LaunchItem.new(pdef)
+    li.address = 3
+    li.number = '4'
+
+    assert_trace li, '3/8'
+  end
+
+  def test_field_type_boxing_fail
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      parameter :field => 'number', :type => :int
+    end
+
+    e = assert_raise(ArgumentError) {
+      li = OpenWFE::LaunchItem.new(pdef)
+      li.number = 'douze'
+      @engine.launch(li)
+    }
+    assert_equal 'invalid value for Integer: "douze"', e.message
+  end
+
+  def test_field_default_value_and_boxing
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      parameter :field => 'number', :default => '3', :type => :int
+      echo '${r:wi.number * 3}'
+    end
+
+    assert_trace pdef, '9'
+  end
+
+  def test_field_match_fail
+
+    pdef = OpenWFE.process_definition :name => 'test' do
+      parameter :field => 'phone', :match => '^[0-9]{3}-[0-9]{3}-[0-9]{4}$'
+    end
+
+    e = assert_raise(ArgumentError) {
+      li = OpenWFE::LaunchItem.new(pdef)
+      li.phone = 'aa'
+      @engine.launch(li)
+    }
+    assert_equal "value of field 'phone' doesn't match", e.message
+  end
+end
+