rbpm 0.0.1 → 0.0.2

data/test/rbpm_action_tests.rb

@@ -1,9 +1,14 @@
 require 'test/unit'
-require 'rbpm'
+
+begin
+  require 'rbpm'
+rescue LoadError
+  require '../lib/rbpm'
+end
 
 $mylog = {}
 
-class Wf1 < Workflow
+class Wf1 < Rbpm::Workflow
   start_node :start, 
       :trans => :end,
       :on_enter => :my_on_enter,
@@ -25,7 +30,7 @@ class Wf1 < Workflow
   end
 end
 
-class Wf2 < Workflow
+class Wf2 < Rbpm::Workflow
   start_node :start, 
       :trans => :end,
       :on_enter => :my_on_enter,
@@ -47,7 +52,7 @@ class Wf2 < Workflow
   end
 end
 
-class Wf3 < Workflow
+class Wf3 < Rbpm::Workflow
   start_node :start, :trans => :end
   end_node :end
   
@@ -65,7 +70,7 @@ class Wf3 < Workflow
   end
 end
 
-class Wf4 < Workflow
+class Wf4 < Rbpm::Workflow
   start_node :start, :trans => :end
   end_node :end
   
@@ -98,12 +103,12 @@ class Wf5Helper
   end
 end
 
-class Wf5 < Workflow
+class Wf5 < Rbpm::Workflow
   start_node :start, :trans => :end, :action_singleton => Wf5Helper.new
   end_node :end
 end
 
-class Wf6 < Workflow
+class Wf6 < Rbpm::Workflow
   start_node :start, 
       :trans => :end,
       :on_enter => lambda { |token,caller| $mylog[:on_enter] = true },
@@ -112,7 +117,7 @@ class Wf6 < Workflow
   end_node :end
 end
 
-class Wf7 < Workflow
+class Wf7 < Rbpm::Workflow
   start_node :start, :trans => :end
   end_node :end
   
@@ -130,9 +135,9 @@ class Wf7 < Workflow
   end
 end
 
-class FewMoreRbpmTest < Test::Unit::TestCase
+class RbpmActionTests < Test::Unit::TestCase
 
-  def test_instance_callback_and_actions
+  def test_events_and_actions
     [Wf1, Wf2, Wf3, Wf4, Wf5, Wf6, Wf7].each do |workflow|
       wf1 = workflow.new
     

data/test/rbpm_call_tests.rb

@@ -1,7 +1,12 @@
 require 'test/unit'
-require 'rbpm'
 
-class DemoWorkflow6b < Workflow
+begin
+  require 'rbpm'
+rescue LoadError
+  require '../lib/rbpm'
+end
+
+class DemoWorkflow6b < Rbpm::Workflow
   
   start_node :start, 
       :trans => :end,
@@ -10,7 +15,7 @@ class DemoWorkflow6b < Workflow
   end_node :end
 end
 
-class DemoWorkflow6 < Workflow
+class DemoWorkflow6 < Rbpm::Workflow
   
   start_node :start, :trans => :call
   
@@ -24,7 +29,7 @@ class DemoWorkflow6 < Workflow
 end
 
 module DemoWorkflow6bSymVersion1
-  class DemoWorkflow6bSym < Workflow
+  class DemoWorkflow6bSym < Rbpm::Workflow
     start_node :start, 
         :trans => :end,
         :trans_action => lambda { |token,caller| token[:result_var] = "(1)Hallo " + token[:param_var]  }
@@ -33,7 +38,7 @@ module DemoWorkflow6bSymVersion1
 end
 
 module DemoWorkflow6bSymVersion2
-  class DemoWorkflow6bSym < Workflow
+  class DemoWorkflow6bSym < Rbpm::Workflow
     start_node :start, 
         :trans => :end,
         :trans_action => lambda { |token,caller| token[:result_var] = "(2)Hallo " + token[:param_var]  }
@@ -42,7 +47,7 @@ module DemoWorkflow6bSymVersion2
 end
 
 module DemoWorkflow6bSymVersion3
-  class DemoWorkflow6bSym < Workflow
+  class DemoWorkflow6bSym < Rbpm::Workflow
     start_node :start, 
         :trans => :end,
         :trans_action => lambda { |token,caller| token[:result_var] = "(3)Hallo " + token[:param_var]  }
@@ -50,7 +55,7 @@ module DemoWorkflow6bSymVersion3
   end
 end
 
-class DemoWorkflow6Sym < Workflow
+class DemoWorkflow6Sym < Rbpm::Workflow
   
   start_node :start, :trans => :call
   
@@ -64,7 +69,7 @@ class DemoWorkflow6Sym < Workflow
   end_node :end
 end
 
-class DemoWorkflow7b < Workflow
+class DemoWorkflow7b < Rbpm::Workflow
   
   start_node :start, 
       :trans => :state,
@@ -75,7 +80,7 @@ class DemoWorkflow7b < Workflow
   end_node :end
 end
 
-class DemoWorkflow7 < Workflow
+class DemoWorkflow7 < Rbpm::Workflow
   
   start_node :start, :trans => :call
   
@@ -88,9 +93,9 @@ class DemoWorkflow7 < Workflow
   end_node :end
 end
 
-class CallRbpmTest < Test::Unit::TestCase
+class CallRbpmTests < Test::Unit::TestCase
 
-  def test_simplistic_case
+  def test_simplistic_call_case
     wf = DemoWorkflow6.new
     t = wf.start(:my_var => "Welt")
     
@@ -98,15 +103,15 @@ class CallRbpmTest < Test::Unit::TestCase
     assert_equal "Hallo Welt", t[:my_var2]
   end
   
-  def test_with_versionning
-    wf = WorkflowVersionManager.create_workflow_instance('DemoWorkflow6Sym')
+  def test_call_with_versionning
+    wf = Rbpm::WorkflowVersionManager.create_workflow_instance('DemoWorkflow6Sym')
     t = wf.start(:my_var => "Welt")
     
     assert_equal :end, t.node   
     assert_equal "(2)Hallo Welt", t[:my_var2]
   end
   
-  def test_subworkflow_with_state
+  def test_call_subworkflow_with_state
     wf = DemoWorkflow7.new
     t = wf.start(:my_var => "Welt")
     

data/test/rbpm_condition_tests.rb

@@ -1,7 +1,12 @@
 require 'test/unit'
-require 'rbpm'
 
-class DemoWorkflow5 < Workflow
+begin
+  require 'rbpm'
+rescue LoadError
+  require '../lib/rbpm'
+end
+
+class DemoWorkflow5 < Rbpm::Workflow
   
   start_node :start, 
       :a_trans => :end_a,
@@ -14,9 +19,9 @@ class DemoWorkflow5 < Workflow
   end_node :end_b
 end
 
-class ConditionRbpmTest < Test::Unit::TestCase
+class RbpmConditionTests < Test::Unit::TestCase
 
-  def test_misc
+  def test_conditions
     wf = DemoWorkflow5.new
     t = wf.start(:my_ctx_value => 5)
     assert_equal :end_b, t.node   

data/test/rbpm_ctxvars_tests.rb

@@ -1,7 +1,12 @@
 require 'test/unit'
-require 'rbpm'
 
-class DemoWorkflow3 < Workflow
+begin
+  require 'rbpm'
+rescue LoadError
+  require '../lib/rbpm'
+end
+
+class DemoWorkflow3 < Rbpm::Workflow
   
   def self.log(s)
     @@logs = [] unless defined? @@logs
@@ -14,17 +19,16 @@ class DemoWorkflow3 < Workflow
   
   start_node :start, :trans => :end
   
-  #TODO fix this crappy lambda syntax :)
-  transition_action(:start, :default, lambda do |token,caller| 
+  transit(:start, :default) do |token,caller| 
     token[:billi] = "Modified"
     
     log "Willi=#{token[:willi]}"
-  end)
+  end
   
   end_node :end
 end
 
-class CtxVarRbpmTest < Test::Unit::TestCase
+class RbpmCtxVarTest < Test::Unit::TestCase
 
   def test_misc
     wf = DemoWorkflow3.new

data/test/rbpm_exceptions_tests.rb

@@ -1,7 +1,12 @@
 require 'test/unit'
-require 'rbpm'
 
-class ExceptionWf1 < Workflow
+begin
+  require 'rbpm'
+rescue LoadError
+  require '../lib/rbpm'
+end
+
+class ExceptionWf1 < Rbpm::Workflow
   start_node :start, 
       :trans => :end,
       :exception => :error_end
@@ -13,7 +18,7 @@ class ExceptionWf1 < Workflow
   end
 end
 
-class ExceptionWf2 < Workflow
+class ExceptionWf2 < Rbpm::Workflow
   start_node :start, 
       :trans => :end,
       :exception => :error_end
@@ -25,7 +30,7 @@ class ExceptionWf2 < Workflow
   end
 end
 
-class ExceptionWf3 < Workflow
+class ExceptionWf3 < Rbpm::Workflow
   start_node :start, 
       :trans => :end,
       :exception => :error_end
@@ -39,39 +44,39 @@ end
 
 #note: exceptions thrown within node actions are frame work exceptions. don't put business logic in node actions.
 
-class ExceptionRbpmTest < Test::Unit::TestCase
+class RbpmExceptionTests < Test::Unit::TestCase
 
   def test_on_enter_exception_handling
-    wf = WorkflowVersionManager.create_workflow_instance(:ExceptionWf1)
+    wf = Rbpm::WorkflowVersionManager.create_workflow_instance(:ExceptionWf1)
     t = wf.start(:raise => true)
     assert_equal :error_end, t.node
     assert_not_nil t[:exception]
     
-    wf = WorkflowVersionManager.create_workflow_instance(:ExceptionWf1)
+    wf = Rbpm::WorkflowVersionManager.create_workflow_instance(:ExceptionWf1)
     t = wf.start(:raise => false)
     assert_equal :end, t.node
     assert_nil t[:exception]
   end
   
   def test_on_leave_exception_handling
-    wf = WorkflowVersionManager.create_workflow_instance(:ExceptionWf2)
+    wf = Rbpm::WorkflowVersionManager.create_workflow_instance(:ExceptionWf2)
     t = wf.start(:raise => true)
     assert_equal :error_end, t.node
     assert_not_nil t[:exception]
     
-    wf = WorkflowVersionManager.create_workflow_instance(:ExceptionWf2)
+    wf = Rbpm::WorkflowVersionManager.create_workflow_instance(:ExceptionWf2)
     t = wf.start(:raise => false)
     assert_equal :end, t.node
     assert_nil t[:exception]
   end
   
   def test_transition_action_exception_handling
-    wf = WorkflowVersionManager.create_workflow_instance(:ExceptionWf3)
+    wf = Rbpm::WorkflowVersionManager.create_workflow_instance(:ExceptionWf3)
     t = wf.start(:raise => true)
     assert_equal :error_end, t.node
     assert_not_nil t[:exception]
     
-    wf = WorkflowVersionManager.create_workflow_instance(:ExceptionWf3)
+    wf = Rbpm::WorkflowVersionManager.create_workflow_instance(:ExceptionWf3)
     t = wf.start(:raise => false)
     assert_equal :end, t.node
     assert_nil t[:exception]

data/test/rbpm_fork_join_tests.rb

@@ -1,7 +1,12 @@
 require 'test/unit'
-require 'rbpm'
 
-class DemoWorkflow4 < Workflow
+begin
+  require 'rbpm'
+rescue LoadError
+  require '../lib/rbpm'
+end
+
+class DemoWorkflow4 < Rbpm::Workflow
   
   def self.log(s)
     @@logs = [] unless defined? @@logs
@@ -49,9 +54,9 @@ class DemoWorkflow4 < Workflow
   end
 end
 
-class ForkJoinRbpmTest < Test::Unit::TestCase
+class RbpmForkJoinTest < Test::Unit::TestCase
 
-  def test_misc
+  def test_join_fork
     wf = DemoWorkflow4.new
     t = wf.start(:msg => "Parent", :sub_ctxs => [{:msg => "Child1"}, {:msg => "Child2"}])
     

data/test/rbpm_simple_tests.rb

@@ -1,7 +1,12 @@
 require 'test/unit'
-require 'rbpm'
 
-#a simple join node
+begin
+  require 'rbpm'
+rescue LoadError
+  require '../lib/rbpm'
+end
+
+#a simple join node (this test is older than rbpm 0.0.1 ;-)
 class MyNode
   def action(token, caller)
     token.workflow.class.log "mynode action"
@@ -17,7 +22,7 @@ class MyNode
   end
 end
 
-class DemoWorkflow < Workflow
+class DemoWorkflow < Rbpm::Workflow
   
   def initialize(do_fork)
     super()
@@ -67,11 +72,11 @@ end
 
 class FirstRbpmTest < Test::Unit::TestCase
   
-  def test_misc_with_fork
+  def test_misc_with_custom_fork
     do_test_misc(true)
   end
   
-  def test_misc_without_fork
+  def test_misc_without_custom_fork
     do_test_misc(false)
   end
   

data/test/rbpm_state_tests.rb

@@ -1,7 +1,12 @@
 require 'test/unit'
-require 'rbpm'
 
-class DemoWorkflow2 < Workflow
+begin
+  require 'rbpm'
+rescue LoadError
+  require '../lib/rbpm'
+end
+
+class DemoWorkflow2 < Rbpm::Workflow
   
   def self.log(s)
     @@logs = [] unless defined? @@logs
@@ -31,9 +36,9 @@ class DemoWorkflow2 < Workflow
   end
 end
 
-class StateRbpmTest < Test::Unit::TestCase
+class RbpmStateNodeTest < Test::Unit::TestCase
 
-  def test_state_and_persistence
+  def test_state_node_and_workflow_persistence
     wf = DemoWorkflow2.new()
     t = wf.start
     
@@ -51,6 +56,8 @@ class StateRbpmTest < Test::Unit::TestCase
     end
     t = wf.tokens[0]
     
+    File.delete("demo_wf_2.txt")
+    
     assert_equal :hello, t.node
     
     t.signal

data/test/rbpm_task_role_tests.rb

@@ -0,0 +1,210 @@
+require 'test/unit'
+
+begin
+  require 'rbpm'
+rescue LoadError
+  require '../lib/rbpm'
+end
+
+#test, prototype, conceptual test - whatever
+
+class WorkflowTask
+  attr_reader :role, :user_id, :task_type
+  
+  #constraint: role XOR user_id
+  def initialize(role, user_id, task_type, input_var_mapping, ouput_var_mapping, owner_token_variable, token)
+    @role = role
+    @user_id = user_id
+    @task_type = task_type
+    @input_var_mapping = input_var_mapping
+    @ouput_var_mapping = ouput_var_mapping
+    @owner_token_variable = owner_token_variable
+    @token = token
+  end
+  
+  def assign(user_id)
+    @role = nil
+    @user_id = user_id
+    @token[@owner_token_variable] = user_id if @owner_token_variable
+  end
+  
+  def done
+    @token.signal
+  end
+  
+  def input_var(key)
+    @token[@input_var_mapping.invert[key]]
+  end
+  
+  def set_output_var(key, value)
+    @token[@ouput_var_mapping[key]] = value
+  end
+end
+
+class TaskManager
+  def initialize
+    @tasks = []
+  end
+    
+  def create_task(options = {})
+    @tasks << WorkflowTask.new(options[:role], options[:user_id], options[:task], options[:input_mapping], 
+          options[:output_mapping], options[:owner_token_variable], options[:token])
+  end
+  
+  def unassigned_tasks
+    @tasks.find_all do |task|
+      task.user_id.nil?
+    end
+  end
+  
+  def shift_user_task(user_id)
+    @tasks.each do  |task|
+      if task.user_id == user_id
+        @tasks.delete task
+        return task 
+      end
+    end
+    nil
+  end
+end
+
+#TODO find app_context solution (dependency injection?)
+
+$app_context = {}
+$app_context[:task_manager] = TaskManager.new
+
+class QuestionAnswerWorkflow < Rbpm::Workflow
+  start_node :start, :trans => :evaluate_question
+  state_node :evaluate_question, 
+          :accept_trans => :anwser_question, 
+          :accept_trans_cond => "token[:question_evaluation] == :accept",
+          :reject_trans => :reject_question,
+          :reject_trans_cond => "token[:question_evaluation] == :reject"
+  state_node :anwser_question, :trans => :evaluate_answer
+  node :reject_question, :trans => :note_rejected_question
+  state_node :evaluate_answer, 
+        :accept_trans => :accept_answer, 
+        :accept_trans_cond => "token[:answer_evaluation] == :accept", 
+        :reject_trans => :reject_answer,
+        :reject_trans_cond => "token[:answer_evaluation] == :reject"
+  node :accept_answer, :trans => :end
+  node :reject_answer, :trans => :evaluate_question
+  node :note_rejected_question, :trans => :end
+  end_node :end
+  
+  enter(:evaluate_question) do |token,caller|
+    unless token[:domain_expert_id]
+      $app_context[:task_manager].create_task :role => :domain_expert, :task => :evaluate_question, :token => token,
+            :input_mapping => {:question => :asked_question}, :output_mapping => {:evaluation => :question_evaluation},
+            :owner_token_variable => :domain_expert_id
+    else
+      $app_context[:task_manager].create_task :user_id => token[:domain_expert_id], :task => :re_evaluate_question, :token => token,
+            :input_mapping => {:question => :asked_question}, :output_mapping => {:evaluation => :question_evaluation}
+    end
+  end
+  
+  enter(:anwser_question) do |token,caller|
+    $app_context[:task_manager].create_task :user_id => token[:domain_expert_id], :task => :answer_question, :token => token,
+          :input_mapping => {:question => :asked_question}, :output_mapping => {:answer => :answer}
+  end
+  
+  enter(:evaluate_answer) do |token,caller|
+    $app_context[:task_manager].create_task :user_id => token[:user_id], :task => :evaluate_answer, :token => token,
+          :input_mapping => {:question => :question, :answer => :answer}, 
+          :output_mapping => {:evaluation => :answer_evaluation, :extended_question => :question}
+  end
+end
+
+class RbpmTaskRoleConceptsTest < Test::Unit::TestCase
+
+  def test_task_and_role_concepts
+    tm = $app_context[:task_manager]
+    
+    #user: start workflow: new question
+    
+    wf = QuestionAnswerWorkflow.new
+    t = wf.start :user_id => 2001, :question => "black's RGB value?"
+    
+    assert_equal :evaluate_question, t.node
+    
+    #domain expert: unassigned tasks in my inbox?
+    
+    assert_equal 1, tm.unassigned_tasks.length    
+    
+    #domain expert: accept task
+    
+    task = tm.unassigned_tasks[0].assign 1001
+    
+    #domain expert: close task: accept question
+    
+    task = tm.shift_user_task 1001
+    assert_not_nil task
+    assert_equal :evaluate_question, task.task_type
+    assert_equal "black's RGB value?", task.input_var(:asked_question)
+    
+    task.set_output_var(:evaluation, :accept)
+    task.done    
+    
+    assert_equal :anwser_question, t.node
+
+    #domain expert: close follow-up task: answer question
+
+    task = tm.shift_user_task 1001
+
+    assert_not_nil task
+    assert_equal "black's RGB value?", task.input_var(:asked_question)
+    
+    task.set_output_var(:answer, "0xff 0xff 0xff")
+    task.done
+    
+    #domain expert: other unassigned or assigned tasks in my inbox?
+    
+    assert_equal 0, tm.unassigned_tasks.length
+
+    task = tm.shift_user_task 1001
+    assert_nil task
+    
+    assert_equal :evaluate_answer, t.node
+    
+    #user: close follow-up task: reject answer
+    
+    task = tm.shift_user_task 2001
+
+    assert_not_nil task
+    assert_equal "0xff 0xff 0xff", task.input_var(:answer)
+    
+    task.set_output_var(:evaluation, :reject)
+    task.set_output_var(:extended_question, task.input_var(:question) + ", in decimal")
+    task.done
+    
+    assert_equal :evaluate_question, t.node
+    
+    #domain expert: close j-up: accept extended question, close f-up: answer extended question
+    
+    task = tm.shift_user_task 1001
+    task.set_output_var(:evaluation, :accept)
+    task.done
+    
+    assert_equal :anwser_question, t.node
+    
+    task = tm.shift_user_task 1001
+    assert_not_nil task
+    assert_equal "black's RGB value?, in decimal", task.input_var(:asked_question)
+    task.set_output_var(:answer, "255 255 255")
+    task.done
+    
+    assert_equal :evaluate_answer, t.node
+    
+    #user: close f-up: accept 2nd answer
+    
+    task = tm.shift_user_task 2001
+    assert_not_nil task
+    assert_equal "255 255 255", task.input_var(:answer)
+    task.set_output_var(:evaluation, :accept)
+    task.done
+    
+    assert_equal :end, t.node
+  end
+end
+
+#conclusion: task and role stuff is doable w/o extending the workflow syntax