ruote 0.9.20 → 2.1.1

data/test/functional/ft_4_on_error.rb

@@ -1,220 +0,0 @@
-
-#
-# 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

@@ -1,82 +0,0 @@
-
-#
-# 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

@@ -1,62 +0,0 @@
-
-#
-# 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

@@ -1,103 +0,0 @@
-
-#
-# 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
-