ruote 0.9.19 → 0.9.20

data/test/{slock_test.rb → unit/ut_18_store_lock.rb}

@@ -1,13 +1,16 @@
 
 #
-# Testing OpenWFEru (Ruote)
+# 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 'test/unit'
 require 'openwfe/worklist/storelocks'
-require 'openwfe/participants/storeparticipants'
+require 'openwfe/participants/store_participants'
 
 
 class MockItem
@@ -22,38 +25,32 @@ end
 
 class StoreLockTest < Test::Unit::TestCase
 
-  #def setup
-  #end
-
-  #def teardown
-  #end
-
   def test_0
 
     store = OpenWFE::StoreWithLocks.new(OpenWFE::HashParticipant)
 
-    wi0 = MockItem.new("fei")
+    wi0 = MockItem.new('fei')
 
     store.store.push(wi0)
 
-    wi1 = store.get_and_lock("locker_a", "fei")
+    wi1 = store.get_and_lock('locker_a', 'fei')
 
     assert_not_nil wi1
     assert_equal wi0.object_id, wi1.object_id
 
     assert_raise RuntimeError do
-      wi2 = store.get_and_lock("locker_b", "fei")
+      wi2 = store.get_and_lock('locker_b', 'fei')
     end
 
-    assert_equal store.get_locker("fei"), "locker_a"
+    assert_equal store.get_locker('fei'), 'locker_a'
 
     assert_raise RuntimeError do
-      store.release "locker_b", "fei"
+      store.release 'locker_b', 'fei'
     end
 
-    store.release "locker_a", "fei"
+    store.release 'locker_a', 'fei'
 
-    assert_nil store.get_locker("fei")
+    assert_nil store.get_locker('fei')
   end
 
   def test_1
@@ -61,19 +58,19 @@ class StoreLockTest < Test::Unit::TestCase
     store = OpenWFE::StoreWithLocks.new(
       OpenWFE::HashParticipant,
       nil,
-      :lock_max_age => "100")
+      :lock_max_age => '100')
 
-    wi0 = MockItem.new("fei")
+    wi0 = MockItem.new('fei')
 
     store.store.push(wi0)
 
-    wi1 = store.get_and_lock("locker_a", "fei")
+    wi1 = store.get_and_lock('locker_a', 'fei')
 
     assert_not_nil wi1
 
     sleep 1
 
-    assert_nil store.get_locker("fei")
+    assert_nil store.get_locker('fei')
   end
 
 end

data/test/{wfid_test.rb → unit/ut_1_wfid.rb}

@@ -1,23 +1,15 @@
 
 #
-# Testing OpenWFE
+# Testing Ruote (OpenWFEru)
 #
 # John Mettraux at openwfe.org
 #
 # Sun Oct 29 16:18:25 JST 2006
 #
 
-require "rubygems"
-#require "thread"
-#require "fastthread"
+require File.dirname(__FILE__) + '/../test_helper.rb'
 
-require 'test/unit'
-
-require 'openwfe/utils'
-require 'openwfe/workitem'
-require 'openwfe/engine/engine'
 require 'openwfe/expool/wfidgen'
-require 'openwfe/def'
 
 
 #
@@ -25,12 +17,6 @@ require 'openwfe/def'
 #
 class WfidTest < Test::Unit::TestCase
 
-  #def setup
-  #end
-
-  #def teardown
-  #end
-
   def test_wfid_0
 
     gen = OpenWFE::DefaultWfidGenerator.new('wfidgen', nil)
@@ -65,8 +51,6 @@ class WfidTest < Test::Unit::TestCase
     #puts
 
     assert_equal map.size, n
-
-    assert true
   end
 
   def test_wfid_1
@@ -88,8 +72,6 @@ class WfidTest < Test::Unit::TestCase
 
     id = gen.generate
 
-    #puts id
-
     #assert_equal gen.split_wfid(id).join, id[0, 8]
     assert_equal OpenWFE::split_wfid(id).join, id[0, 8]
   end
@@ -101,13 +83,8 @@ class WfidTest < Test::Unit::TestCase
     t = Time.now.gmtime
     kid = gen.generate
 
-    #puts "now : #{t}"
-    #puts "kid : #{kid}"
-
     t2 = OpenWFE::KotobaWfidGenerator.to_time(kid)
 
-    #puts "t2  : #{t2}"
-
     assert_equal t.to_s, t2.to_s
 
     #t = Time.utc(2007, 03, 20, 23, 59, 59)
@@ -124,52 +101,4 @@ class WfidTest < Test::Unit::TestCase
     #puts OpenWFE::KotobaWfidGenerator.to_time(kid)
   end
 
-
-  #
-  # test FieldWfidGenerator
-
-  class MyEngine < OpenWFE::Engine
-
-    def initialize
-
-      super
-
-      self.ac[:definition_in_launchitem_allowed] = true
-    end
-
-    def build_wfid_generator
-
-      OpenWFE::FieldWfidGenerator.new(
-        :s_wfid_generator, @application_context, 'wfid')
-    end
-  end
-
-  class MyProcDef < OpenWFE::ProcessDefinition
-    sequence do
-      # do nothing
-    end
-  end
-
-  def test_field_wfid
-
-    eng = MyEngine.new
-
-    li = OpenWFE::LaunchItem.new MyProcDef
-    li.wfid = 'toto'
-    fei = eng.launch(li)
-
-    assert_equal fei.wfid, 'toto'
-
-    li = OpenWFE::LaunchItem.new(MyProcDef)
-    fei = eng.launch(li)
-
-    #puts fei.wfid
-
-    assert_not_equal fei.wfid, 'toto'
-
-    t = OpenWFE::KotobaWfidGenerator.to_time(fei.wfid)
-
-    assert t.is_a?(Time)
-  end
-
 end

data/test/unit/ut_2_utils.rb

@@ -0,0 +1,53 @@
+
+#
+# Testing Ruote (OpenWFEru)
+#
+# John Mettraux at openwfe.org
+#
+# Sun Oct 29 16:18:25 JST 2006
+#
+
+require File.dirname(__FILE__) + '/../test_helper.rb'
+
+require 'openwfe/utils'
+
+
+class UtilsTest < Test::Unit::TestCase
+
+  def test_ends_with
+
+    assert OpenWFE::ends_with('c\'est la fin', 'fin')
+  end
+
+  def test_ensure_for_filename
+
+    assert_equal OpenWFE::ensure_for_filename('abc'), 'abc'
+    assert_equal OpenWFE::ensure_for_filename('a/c'), 'a_c'
+    assert_equal OpenWFE::ensure_for_filename('a\\c'), 'a_c'
+    assert_equal OpenWFE::ensure_for_filename('a*c'), 'a_c'
+    assert_equal OpenWFE::ensure_for_filename('a+?'), 'a__'
+    assert_equal OpenWFE::ensure_for_filename('a b'), 'a_b'
+  end
+
+  def test_clean_path
+
+    assert_equal OpenWFE::clean_path('my//file/path'), 'my/file/path'
+    assert_equal OpenWFE::clean_path('my//file//path'), 'my/file/path'
+  end
+
+  def test_stu
+
+    assert_equal 'a_b_c', OpenWFE::stu('a b c')
+  end
+
+  def test_grep_0
+
+    assert OpenWFE::grep('sputnik', 'Rakefile').empty?
+    assert_equal 1, OpenWFE::grep('Mettraux', 'Rakefile').size
+
+    OpenWFE::grep 'Mettraux', 'Rakefile' do |line|
+      assert_match 'Mettraux', line
+    end
+  end
+end
+

data/test/unit/ut_3_expmap.rb

@@ -0,0 +1,65 @@
+
+#
+# Testing Ruote (OpenWFEru)
+#
+# John Mettraux at openwfe.org
+#
+# Sun Oct 29 16:18:25 JST 2006
+#
+
+require File.dirname(__FILE__) + '/../test_helper.rb'
+
+require 'openwfe/expressions/expression_map'
+
+
+class ExpmapTest < Test::Unit::TestCase
+
+  def test_expmap_get_classes
+
+    em = OpenWFE::ExpressionMap.new
+
+    assert_equal(
+      [
+        OpenWFE::ParticipantExpression,
+        OpenWFE::CronExpression,
+        OpenWFE::WhenExpression,
+        OpenWFE::WaitExpression,
+        #OpenWFE::ReserveExpression,
+        OpenWFE::ListenExpression,
+        OpenWFE::TimeoutExpression,
+        OpenWFE::HpollExpression,
+        OpenWFE::Environment
+      ],
+      em.get_expression_classes(Rufus::Schedulable))
+  end
+
+  def test_lookingup_exp_classes
+
+    em = OpenWFE::ExpressionMap.new
+
+    #puts em.to_s
+
+    assert_equal \
+      em.get_class(:sequence),
+      OpenWFE::SequenceExpression
+
+    assert_equal \
+      em.get_class(:sequence),
+      em.get_class('sequence')
+
+    assert_not_equal \
+      em.get_class(:loop),
+      em.get_class(:cursor)
+
+    assert_equal \
+      OpenWFE::DefineExpression,
+      em.get_class('process-definition'),
+      'class of "process-definition" should be DefineExpression'
+    assert \
+      em.is_definition?('process-definition'),
+      'process-definition should be considered as a definition'
+    assert \
+      em.is_definition?(:process_definition),
+      'process-definition should be considered as a definition (2)'
+  end
+end

data/test/{clone_test.rb → unit/ut_4_fulldup.rb}

@@ -1,11 +1,14 @@
 
 #
-# Testing OpenWFEru
+# 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 'test/unit'
 require 'rexml/document'
 
 require 'openwfe/utils'
@@ -14,12 +17,6 @@ require 'openwfe/workitem'
 
 class FullDupTest < Test::Unit::TestCase
 
-  #def setup
-  #end
-
-  #def teardown
-  #end
-
   class MyClass
 
     attr_reader :name
@@ -29,9 +26,9 @@ class FullDupTest < Test::Unit::TestCase
     end
   end
 
-  def test_fulldup
+  def test_fulldup_0
 
-    o0 = MyClass.new("cow")
+    o0 = MyClass.new('cow')
 
     o1 = OpenWFE.fulldup(o0)
 
@@ -39,39 +36,37 @@ class FullDupTest < Test::Unit::TestCase
     assert_equal o0.name, o1.name
   end
 
-  def test_yaml
-
-    require 'yaml'
-
-    o0 = MyClass.new("pig")
-    o1 = YAML.load(o0.to_yaml)
-
-    assert_not_equal o0.object_id, o1.object_id
-    assert_equal o0.name, o1.name
-  end
+  def test_fulldup_1
 
-  def test_dup_0
     a0 = A.new
     a0.a = 1
     a0.b = 2
-    a1 = OpenWFE::fulldup(a0)
+    a1 = OpenWFE.fulldup(a0)
 
     #puts a0
     #puts a1
 
-    assert_equal a0, a1, "dup() utility not working"
+    assert_equal a0, a1
   end
 
-  def test_dup_1
-    d = REXML::Document.new("<document/>")
+  #def test_yaml
+  #  require 'yaml'
+  #  o0 = MyClass.new("pig")
+  #  o1 = YAML.load(o0.to_yaml)
+  #  assert_not_equal o0.object_id, o1.object_id
+  #  assert_equal o0.name, o1.name
+  #end
+
+  def test_xml_0
+    d = REXML::Document.new('<document/>')
     d1 = OpenWFE.fulldup(d)
-    assert d.object_id != d1.object_id
+    assert_not_equal d.object_id, d1.object_id
   end
 
-  def test_dup_2
-    d = REXML::Document.new("<document>text</document>")
+  def test_xml_1
+    d = REXML::Document.new('<document>text</document>')
     d1 = OpenWFE::fulldup(d)
-    assert d.object_id != d1.object_id
+    assert_not_equal d.object_id, d1.object_id
   end
 
   PAT_XML = <<END
@@ -98,29 +93,29 @@ xmlns:sps="http://www.opengis.net/sps" xmlns="">
 </sps:GetFeasibilityRequestResponse>
 END
 
-  def test_dup_2b
+  def test_xml_2
     d = REXML::Document.new PAT_XML
     d1 = OpenWFE::fulldup(d)
     assert_not_equal d.object_id, d1.object_id
     assert_equal d.to_s, d1.to_s
   end
 
-  def test_dup_3
+  def test_xml_3
     d = REXML::Text.new "toto"
     d1 = OpenWFE::fulldup(d)
     assert d.object_id != d1.object_id
   end
 
-  def test_dup_4
+  def test_xml_4
     wi = OpenWFE::InFlowWorkItem.new
-    wi.xml_stuff = REXML::Text.new "whatever"
+    wi.xml_stuff = REXML::Text.new('whatever')
     wi1 = wi.dup
     assert wi.object_id != wi1.object_id
     assert wi.xml_stuff.object_id != wi1.xml_stuff.object_id
     assert_equal wi.xml_stuff, wi1.xml_stuff
   end
 
-  def test_dup_5
+  def test_fulldup_2
     require 'date'
     d = DateTime.now
     d1 = OpenWFE::fulldup(d)
@@ -128,7 +123,7 @@ END
     assert_equal d.to_s, d1.to_s
   end
 
-  def test_dup_6
+  def test_fulldup_3
     t = Time.new
     sleep 0.100
     t1 = OpenWFE::fulldup(t)
@@ -136,14 +131,14 @@ END
     assert_equal t.to_f, t1.to_f
   end
 
-  def test_dup_7
+  def test_fulldup_4
     s = :symbol
     s1 = OpenWFE::fulldup(s)
     assert_equal s.object_id, s1.object_id
     assert_equal s, s1
   end
 
-  def test_dup_8
+  def test_fulldup_5
     require 'rational'
     r = Rational(4, 5)
     r1 = OpenWFE.fulldup(r)
@@ -153,16 +148,16 @@ END
 
   private
 
-    class A
-      attr_accessor :a, :b
+  class A
+    attr_accessor :a, :b
 
-      def == (other)
-        return false if not other.kind_of?(A)
-        (self.a == other.a and self.b == other.b)
-      end
+    def == (other)
+      return false if not other.kind_of?(A)
+      (self.a == other.a and self.b == other.b)
+    end
 
-      def to_s
-        "A : a='#{a}', b='#{b}'"
-      end
+    def to_s
+      "A : a='#{a}', b='#{b}'"
     end
+  end
 end