ruote 0.9.20 → 2.1.1

data/test/unit/ut_7b_parser_ruby.rb

@@ -1,56 +0,0 @@
-
-#
-# Testing Ruote (OpenWFEru)
-#
-# John Mettraux at openwfe.org
-#
-# Mon Oct  9 22:19:44 JST 2006
-#
-
-require File.dirname(__FILE__) + '/../test_helper.rb'
-
-require 'openwfe/def'
-require 'openwfe/expool/def_parser'
-
-
-class ParserRubyTestB < Test::Unit::TestCase
-
-  def do_test (class_name, pdef)
-    #
-    # losing my time with an eval
-    #
-    result = eval %{
-      class #{class_name} < OpenWFE::ProcessDefinition
-        def make
-          participant 'nada'
-        end
-      end
-      #{class_name}.do_make
-    }
-    assert_equal result[1]['name'], pdef[0]
-    assert_equal result[1]['revision'], pdef[1]
-  end
-
-  def test_process_name_extraction_in_ruby_procdefs
-
-    do_test 'MyProcessDefinition_10', [ 'MyProcess', '10' ]
-    do_test 'MyProcessDefinition10', [ 'MyProcess', '10' ]
-    do_test 'MyProcessDefinition1_0', [ 'MyProcess', '1.0' ]
-    do_test 'MyProcessThing_1_0', [ 'MyProcessThing', '1.0' ]
-  end
-
-  def do_test_2 (raw_name, expected)
-
-    assert_equal(
-      expected,
-      OpenWFE::ProcessDefinition.extract_name_and_revision(raw_name))
-  end
-
-  def test_process_name_extraction_in_ruby_procdefs_2
-
-    do_test_2 'MyProcessDefinition_10', [ 'MyProcess', '10' ]
-    do_test_2 'MyProcessDefinition5b', [ 'MyProcess', '5b' ]
-  end
-
-end
-

data/test/unit/ut_8_parser_description.rb

@@ -1,77 +0,0 @@
-
-#
-# Testing Ruote (OpenWFEru)
-#
-# John Mettraux at openwfe.org
-#
-# Mon Oct 15 08:42:08 JST 2007
-#
-
-require File.dirname(__FILE__) + '/../test_helper.rb'
-
-require 'openwfe/expool/def_parser'
-
-
-class ParserDescriptionTest < Test::Unit::TestCase
-
-  DEF0 = %{
-class MyDef0 < OpenWFE::ProcessDefinition
-  description 'not much to say'
-  sequence do
-  end
-end
-  }
-
-  def test_0
-
-    #rep = OpenWFE::SimpleExpRepresentation.from_code DEF0
-    #rep = OpenWFE::DefParser.parse_string DEF0
-    rep = OpenWFE::DefParser.parse DEF0
-
-    assert_equal(
-      'not much to say',
-      OpenWFE::ExpressionTree.get_description(rep))
-  end
-
-  DEF1 = <<-EOS
-<process-definition name="x" revision="y">
-  <description>
-    just a tiny process
-  </description>
-  <participant ref="nada" />
-</process-definition>
-  EOS
-
-  def test_1
-
-    rep = OpenWFE::DefParser.parse DEF1
-
-    assert_equal(
-      'just a tiny process',
-      OpenWFE::ExpressionTree.get_description(rep))
-  end
-
-  class Test2 < OpenWFE::ProcessDefinition
-    # no description
-    sequence do
-    end
-  end
-  class Test2b < OpenWFE::ProcessDefinition
-    # no description
-    sequence do
-    end
-    define "sub0" do
-    end
-  end
-
-  def test_2
-
-    tree = OpenWFE::DefParser.parse Test2
-    assert_nil OpenWFE::ExpressionTree.get_description(tree)
-
-    tree = OpenWFE::DefParser.parse Test2b
-    #p tree
-    assert_nil OpenWFE::ExpressionTree.get_description(tree)
-  end
-end
-

data/test/unit/ut_9_workitem.rb

@@ -1,72 +0,0 @@
-
-#
-# Testing Ruote (OpenWFEru)
-#
-# John Mettraux at openwfe.org
-#
-# since Mon Oct  9 22:19:44 JST 2006
-#
-
-require File.dirname(__FILE__) + '/../test_helper.rb'
-
-require 'openwfe/workitem'
-require 'openwfe/util/dollar'
-
-
-class WorkitemTest < Test::Unit::TestCase
-
-  def test_0
-
-    wi = OpenWFE::InFlowWorkItem.new
-    wi.attributes = {
-      'field0' => 'value0',
-      'field1' => [ 0, 1, 2, 3, [ 'a', 'b', 'c' ]],
-      'field2' => {
-        'a' => 'AA',
-        'b' => 'BB',
-        'c' => [ 'C0', 'C1', 'C3' ]
-      },
-      'field3' => 3,
-      'field99' => nil
-    }
-
-    assert_equal 3, wi.lookup_attribute('field3')
-    assert_equal 1, wi.lookup_attribute('field1.1')
-    assert_equal 'b', wi.lookup_attribute('field1.4.1')
-    assert_equal 'C1', wi.lookup_attribute('field2.c.1')
-    assert_equal nil, wi.lookup_attribute('field4')
-    assert_equal nil, wi.lookup_attribute('field4.2')
-    assert_equal nil, wi.lookup_attribute('field99')
-    assert_equal nil, wi.lookup_attribute('field99.9')
-
-    assert_equal false, wi.has_attribute?('field4')
-    assert_equal false, wi.has_attribute?('field4.2')
-    assert_equal true, wi.has_attribute?('field99')
-    assert_equal false, wi.has_attribute?('field99.9')
-
-    text = "value is '${f:field2.c.1}'"
-    text = OpenWFE::dosub text, nil, wi
-    assert_equal "value is 'C1'", text
-
-    # setting attributes
-
-    wi.set_attribute('field2.a', 42)
-    wi.set_attribute('field99', 'f99')
-
-    assert_equal 42, wi.lookup_attribute("field2.a")
-    assert_equal 'f99', wi.lookup_attribute('field99')
-
-    # unsetting attributes
-
-    wi.unset_attribute 'field99'
-    assert_nil wi.lookup_attribute('field99')
-
-    wi.unset_attribute 'field1.4'
-    assert_equal [ 0, 1, 2, 3 ], wi.lookup_attribute('field1')
-
-    wi.unset_attribute 'field2.c'
-    assert_equal({ 'a' => 42, 'b' => 'BB' }, wi.lookup_attribute('field2'))
-  end
-
-end
-