ruote 0.9.19 → 0.9.20

data/test/bm/ft_26c_load.rb

@@ -1,102 +0,0 @@
-
-#
-# Testing OpenWFE
-#
-# John Mettraux at openwfe.org
-#
-# Tue Jan  2 13:14:37 JST 2007
-#
-
-#require 'profile'
-
-require 'flowtestbase'
-require 'openwfe/def'
-
-
-class FlowTest26c < Test::Unit::TestCase
-  include FlowTestBase
-
-  #def setup
-  #end
-
-  #def teardown
-  #end
-
-  #
-  # Test 0
-  #
-
-  N = 10_000
-  #N = 100
-
-  class TestDefinition0 < ProcessDefinition
-    sequence do
-      N.times do
-        count
-      end
-    end
-  end
-
-  def test_load_0
-
-    #log_level_to_debug
-
-    #@engine.get_scheduler.sstop
-      #
-      # JRuby is no friend of the Scheduler
-
-    $count = 0
-
-    @engine.register_participant("count") do |workitem|
-      $count += 1
-      print "."
-    end
-
-    fei = @engine.launch LaunchItem.new(TestDefinition0), :wait_for => true
-
-    #log_level_to_debug
-
-    assert_equal N, $count
-  end
-
-  #
-  # Thu Sep 13 15:41:20 JST 2007
-  #
-  # ruby 1.8.5 (2006-12-25 patchlevel 12) [i686-darwin8.8.3]
-  #
-  # 10_000 in 27.69s
-  #
-  # before optimization : 10k in 138.341
-  #
-  #
-  # ruby 1.8.5 (2007-09-13 rev 3876) [i386-jruby1.1]
-  #
-  # 10_000 in 53.96s
-  #
-  # ruby 1.8.5 (2007-09-13 rev 3876) [i386-jruby1.1]
-  # -O -J-server
-  #
-  # 10_000 in 42.616s
-
-  #
-  # Thu Nov  8 21:36:02 JST 2007
-  #
-  # ruby 1.8.6 (2007-06-07 patchlevel 36) [universal-darwin9.0]
-  #
-  # 10_000 in 39.089
-  #
-  # ?
-  #
-
-  #
-  # Fri Jul 25 09:34:15 JST 2008
-  #
-  # 10_000 in 33.60s
-  #
-  # ruby 1.8.6 (2008-03-03 patchlevel 114) [universal-darwin9.0]
-  #
-  # focusing on Marshal for fulldup...
-  #
-
-end
-

data/test/bm/ft_recu.rb

@@ -1,71 +0,0 @@
-
-#
-# Testing OpenWFE
-#
-# John Mettraux at openwfe.org
-#
-# Mon Oct  9 22:19:44 JST 2006
-#
-
-require 'openwfe/def'
-
-require 'flowtestbase'
-
-
-class FlowTestRecursion < Test::Unit::TestCase
-  include FlowTestBase
-
-  #def teardown
-  #end
-
-  #def setup
-  #end
-
-  #
-  # test 0
-  #
-
-  class Test0 < OpenWFE::ProcessDefinition
-    sequence do
-      #print_i
-      #subprocess :ref => "Test"
-      subprocess :ref => "Testy"
-    end
-    process_definition :name => "Testy" do
-      sequence do
-        print_i
-        subprocess :ref => "Testy"
-      end
-      #_loop do
-      #  print_i
-      #end
-    end
-  end
-
-  def test_0
-
-    i = 0
-    last = Time.now.to_f
-
-    @engine.register_participant :print_i do
-      now = Time.now.to_f
-      print "#{i}"
-      if i % 10 == 0
-        print "("
-        print "#{now-last}"
-        print " #{@engine.get_expression_storage.size}"
-        print ")"
-      end
-      print " "
-      last = now
-      i += 1
-    end
-
-    #dotest TestTag0, "blah"
-    @engine.launch Test0
-
-    sleep 360
-  end
-
-end
-

data/test/concurrence_test.rb

@@ -1,77 +0,0 @@
-#
-# Testing OpenWFE
-#
-# John Mettraux at openwfe.org
-#
-# Sun Oct 29 15:41:44 JST 2006
-#
-# Kita Yokohama
-#
-
-require 'rubygems'
-
-require 'test/unit'
-
-require 'openwfe/engine/engine'
-require 'openwfe/def'
-require 'openwfe/participants/storeparticipants'
-
-
-class ConcurrenceAndParticipantTest < Test::Unit::TestCase
-
-  def setup
-    @engine = OpenWFE::Engine.new({
-      :definition_in_launchitem_allowed => true })
-  end
-
-  #def teardown
-  #end
-
-  #
-  # concurrence test
-
-  class Hpc0 < OpenWFE::ProcessDefinition
-    concurrence do
-      #participant :alice
-      #participant :bob
-      alice
-      bob
-    end
-  end
-
-  def test_hpc_0
-
-    @hpAlice = OpenWFE::HashParticipant.new
-    @hpBob = OpenWFE::HashParticipant.new
-
-    @engine.register_participant :alice, @hpAlice
-    @engine.register_participant :bob, @hpBob
-
-    @engine.launch Hpc0
-
-    sleep 0.100
-
-    assert_equal @hpAlice.size, 1
-    assert_equal @hpBob.size, 1
-  end
-
-  def test_1
-
-    @engine.register_participant :alice do |workitem|
-      puts "alice in"
-      sleep 0.100
-      puts "alice out"
-    end
-    @engine.register_participant :bob do |workitem|
-      puts "bob in"
-      sleep 0.100
-      puts "bob out"
-    end
-
-    @engine.launch Hpc0
-
-    sleep 2
-  end
-
-end
-

data/test/console_test.rb

@@ -1,12 +0,0 @@
-
-a = "A"
-b = 2
-
-require 'openwfe/util/irb'
-
-OpenWFE::trap_int_irb(binding())
-
-sleep(30)
-
-puts "out"
-

data/test/cron_ltest.rb

@@ -1,15 +0,0 @@
-#
-# Testing OpenWFE
-#
-# John Mettraux at openwfe.org
-#
-# Mon Oct  9 22:19:44 JST 2006
-#
-
-require 'rubygems'
-
-require 'ft_20_cron'
-require 'ft_21_cron'
-require 'ft_21b_cron_pause'
-require 'restart_cron_test'
-

data/test/eno_test.rb

@@ -1,76 +0,0 @@
-
-#
-# Testing OpenWFEru
-#
-# John Mettraux at openwfe.org
-#
-# Tue Jan  2 13:14:37 JST 2007
-#
-
-require 'test/unit'
-
-require 'openwfe/workitem'
-require 'openwfe/engine/engine'
-require 'openwfe/def'
-require 'openwfe/participants/participants'
-require 'openwfe/participants/enoparticipants'
-
-require 'rubygems'
-require 'mailtrap'
-
-
-class EnoTest < Test::Unit::TestCase
-
-  #def setup
-  #end
-
-  #def teardown
-  #end
-
-  #
-  # Test 0
-  #
-
-  class TestDefinition0 < OpenWFE::ProcessDefinition
-    email_notification_participant
-  end
-
-  def test_eno
-
-    mailfile = "work/mailtrap.txt"
-
-    FileUtils.mkdir "work" unless File.exist?("work")
-    FileUtils.rm mailfile if File.exist?(mailfile)
-    Thread.new do
-      Mailtrap.new 'localhost', 2525, true, "work/mailtrap.txt"
-    end
-
-    engine = Engine.new
-
-    eno = OpenWFE::MailParticipant.new(
-      :smtp_server => "localhost",
-      :smtp_port => 2525,
-      :from_address => "eno@outoftheblue.co.jp"
-    ) do
-
-      s = ""
-      s << "Subject: test 0\n"
-      s << "\n"
-      s << "konnichiwa. #{Time.now.to_s}\n\n"
-
-      s
-    end
-
-    engine.register_participant("email_notification_participant", eno)
-
-    li = OpenWFE::LaunchItem.new TestDefinition0
-
-    li.email_target = 'john@localhost'
-
-    fei = engine.launch li
-    engine.wait_for fei
-
-    assert_equal 1, OpenWFE.grep("konnichiwa", mailfile).size
-  end
-end
-

data/test/expmap_test.rb

@@ -1,54 +0,0 @@
-
-#
-# Testing OpenWFE
-#
-# John Mettraux at openwfe.org
-#
-# Sun Oct 29 16:18:25 JST 2006
-#
-
-require 'test/unit'
-require 'openwfe/expressions/expressionmap'
-
-#
-# testing misc things
-#
-
-class ExpmapTest < Test::Unit::TestCase
-
-  #def setup
-  #end
-
-  #def teardown
-  #end
-
-  def test_expmap_0
-
-    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 \
-      em.get_class('process-definition') == OpenWFE::DefineExpression,
-      "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/extras/README.txt

@@ -1,5 +0,0 @@
-
-The tests here are those for the 'openwferu-extras' gem.
-
-They are not run when the whole OpenWFEru is ran. They are meant to be run one by one.
-

data/test/extras/active_with_engine_test.rb

@@ -1,140 +0,0 @@
-
-require 'test/unit'
-
-require 'extras/active_connection'
-
-require 'openwfe/def'
-require 'openwfe/workitem'
-require 'openwfe/flowexpressionid'
-require 'openwfe/engine/engine'
-require 'openwfe/participants/participant'
-
-require 'openwfe/extras/participants/activeparticipants'
-
-#Thread.abort_on_exception = true
-
-
-class WithEngineTest < Test::Unit::TestCase
-
-  def setup
-
-    #ExtrasTables.down; exit 0
-    #ExtrasTables.up; exit 0
-
-    OpenWFE::Extras::Workitem.delete_all
-    OpenWFE::Extras::Field.delete_all
-
-    @engine = OpenWFE::Engine.new :definition_in_launchitem_allowed => true
-    #require 'openwfe/engine/file_persisted_engine'
-    #@engine = OpenWFE::FilePersistedEngine.new
-
-    @engine.register_participant(
-      :active0, OpenWFE::Extras::ActiveParticipant)
-    @engine.register_participant(
-      :active1, OpenWFE::Extras::ActiveParticipant)
-  end
-
-  def teardown
-    $OWFE_LOG.level = Logger::INFO
-  end
-
-  #
-  # tests
-
-  class MyDefinition < OpenWFE::ProcessDefinition
-    sequence do
-      active0
-      active1
-    end
-  end
-
-  def test_0
-
-    $OWFE_LOG.level = Logger::DEBUG
-
-    li = OpenWFE::LaunchItem.new MyDefinition
-    li.customer_name = 'toto'
-    fei = @engine.launch li
-
-    sleep 1
-
-    #puts @engine.get_expression_storage.to_s
-    #p @engine.get_error_journal.get_error_logs
-
-    wi = OpenWFE::Extras::Workitem.find_by_participant_name "active0"
-
-    assert_not_nil wi
-
-    wi.fields << OpenWFE::Extras::Field.new_field("active0", "was here")
-    wi.fields << OpenWFE::Extras::Field.new_field("active1", [ 1, 2, 4 ])
-
-    @engine.get_participant(:active0).reply_to_engine(wi)
-
-    sleep 1
-
-    wi = OpenWFE::Extras::Workitem.find_by_participant_name("active1")
-
-    assert_not_nil wi
-
-    f = OpenWFE::Extras::Field.find_by_svalue "was here"
-
-    assert_not_nil f
-    assert_equal wi, f.workitem
-
-    f = OpenWFE::Extras::Field.find_by_fkey "active1"
-
-    assert_equal f.value, [ 1, 2, 4 ]
-
-    #$OWFE_LOG.level = Logger::DEBUG
-
-    @engine.cancel_expression wi.as_owfe_workitem.fei
-      #
-      # directly cancelling the *ParticipantExpression*
-
-    sleep 1
-
-    wi = OpenWFE::Extras::Workitem.find_by_participant_name("active1")
-
-    assert_nil wi
-
-    #$OWFE_LOG.level = Logger::INFO
-  end
-
-  #
-  # Testing the Workitem.reply(engine) method.
-  #
-  def test_1
-
-    li = OpenWFE::LaunchItem.new(MyDefinition)
-    li.customer_name = 'toto'
-    @engine.launch li
-
-    sleep 1
-
-    wi = OpenWFE::Extras::Workitem.find_by_participant_name("active0")
-
-    assert_not_nil wi.dispatch_time
-
-    wi.reply @engine
-
-    sleep 0.5
-
-    wi = OpenWFE::Extras::Workitem.find_by_participant_name("active1")
-
-    #wi.reply(@engine)
-    @engine.reply(wi)
-      #
-      # loading the 'active participants' now retrofits the engine
-      # to accept 'active workitems'
-
-    sleep 0.5
-
-    wi = OpenWFE::Extras::Workitem.find_by_participant_name("active0")
-    assert_nil wi
-
-    wi = OpenWFE::Extras::Workitem.find_by_participant_name("active1")
-    assert_nil wi
-  end
-
-end
-