ruote 0.9.19 → 0.9.20

data/lib/openwfe/logging.rb

@@ -1,41 +1,27 @@
-#
 #--
-# Copyright (c) 2006-2008, John Mettraux, OpenWFE.org
-# All rights reserved.
-#
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are met:
+# Copyright (c) 2006-2009, John Mettraux, jmettraux@gmail.com
 #
-# . Redistributions of source code must retain the above copyright notice, this
-#   list of conditions and the following disclaimer.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
 #
-# . Redistributions in binary form must reproduce the above copyright notice,
-#   this list of conditions and the following disclaimer in the documentation
-#   and/or other materials provided with the distribution.
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
 #
-# . Neither the name of the "OpenWFE" nor the names of its contributors may be
-#   used to endorse or promote products derived from this software without
-#   specific prior written permission.
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
 #
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
-# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
-# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
-# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
-# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
-# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
-# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
-# POSSIBILITY OF SUCH DAMAGE.
+# Made in Japan.
 #++
-#
 
-#
-# "made in Japan"
-#
-# John Mettraux at openwfe.org
-#
 
 require 'logger'
 require 'openwfe/utils'

data/lib/openwfe/omixins.rb

@@ -1,43 +1,27 @@
-#
 #--
-# Copyright (c) 2007-2008, John Mettraux, OpenWFE.org
-# All rights reserved.
-#
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are met:
-#
-# . Redistributions of source code must retain the above copyright notice, this
-#   list of conditions and the following disclaimer.
-#
-# . Redistributions in binary form must reproduce the above copyright notice,
-#   this list of conditions and the following disclaimer in the documentation
-#   and/or other materials provided with the distribution.
-#
-# . Neither the name of the "OpenWFE" nor the names of its contributors may be
-#   used to endorse or promote products derived from this software without
-#   specific prior written permission.
-#
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
-# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
-# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
-# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
-# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
-# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
-# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
-# POSSIBILITY OF SUCH DAMAGE.
+# Copyright (c) 2007-2009, John Mettraux, jmettraux@gmail.com
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+#
+# Made in Japan.
 #++
-#
-# $Id: utils.rb 3454 2006-10-08 16:51:00Z jmettraux $
-#
 
-#
-# "made in Japan"
-#
-# john.mettraux@openwfe.org
-#
 
 require 'openwfe/flowexpressionid'
 
@@ -54,28 +38,11 @@ module OpenWFE
       #
       # Makes sure to return a FlowExpressionId instance.
       #
-      def extract_fei (object)
-
-        if object.is_a?(FlowExpressionId)
-
-          object
-
-        #elsif object.is_a?(FlowExpression) or
-        #  object.is_a?(InFlowItem)
-        elsif object.respond_to?(:fei)
-
-          object.fei
+      def extract_fei (o)
 
-        elsif object.is_a?(String)
-
-          FlowExpressionId.to_fei object
-
-        else
-
-          raise \
-            "cannot extract FlowExpressionId "+
-            "out of #{object.inspect}"
-        end
+        return o.fei if o.respond_to?(:fei)
+        return FlowExpressionId.to_fei(o) if o.is_a?(String)
+        raise "cannot extract FlowExpressionId out of #{o.inspect} (#{o.class})"
       end
 
       #

data/lib/openwfe/participants.rb

@@ -1,38 +1,5 @@
-#
-#--
-# Copyright (c) 2007, John Mettraux, OpenWFE.org
-# All rights reserved.
-#
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are met:
-#
-# . Redistributions of source code must retain the above copyright notice, this
-#   list of conditions and the following disclaimer.
-#
-# . Redistributions in binary form must reproduce the above copyright notice,
-#   this list of conditions and the following disclaimer in the documentation
-#   and/or other materials provided with the distribution.
-#
-# . Neither the name of the "OpenWFE" nor the names of its contributors may be
-#   used to endorse or promote products derived from this software without
-#   specific prior written permission.
-#
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
-# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
-# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
-# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
-# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
-# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
-# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
-# POSSIBILITY OF SUCH DAMAGE.
-#++
-#
 
 # just for nicer looking examples
 
-#require 'openwfe/participants/participants'
-require 'openwfe/participants/storeparticipants'
+require 'openwfe/participants/store_participants'
 

data/lib/openwfe/participants/{enoparticipants.rb → mail_participants.rb}

@@ -1,42 +1,27 @@
-#
 #--
-# Copyright (c) 2007, Alain Hoang and John Mettraux, OpenWFE.org
-# All rights reserved.
-#
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are met:
+# Copyright (c) 2007-2009, Alain Hoang and John Mettraux, OpenWFE.org
 #
-# . Redistributions of source code must retain the above copyright notice, this
-#   list of conditions and the following disclaimer.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
 #
-# . Redistributions in binary form must reproduce the above copyright notice,
-#   this list of conditions and the following disclaimer in the documentation
-#   and/or other materials provided with the distribution.
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
 #
-# . Neither the name of the "OpenWFE" nor the names of its contributors may be
-#   used to endorse or promote products derived from this software without
-#   specific prior written permission.
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
 #
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
-# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
-# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
-# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
-# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
-# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
-# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
-# POSSIBILITY OF SUCH DAMAGE.
+# Made in Japan.
 #++
-#
 
-#
-# "made in Japan"
-#
-# Alain Hoang at openwfe.org
-# John Mettraux at openwfe.org
-#
 
 require 'net/smtp'
 
@@ -51,14 +36,16 @@ module OpenWFE
   #
   # It's initialized in this way :
   #
-  #   p = MailParticipant.new(
+  #   require 'openwfe/participants/mail_participants'
+  #
+  #   p = OpenWFE::MailParticipant.new(
   #     :smtp_server => "mailhost.ourcompany.co.jp",
   #     :from_address => "bpms@our.ourcompany.co.jp",
   #     :template => "Dear ${f:name}, you've got mail")
   #
   # or
   #
-  #   p = MailParticipant.new(
+  #   p = OpenWFE::MailParticipant.new(
   #     :smtp_server => "mailhost.ourcompany.co.jp",
   #     :smtp_port => 25,
   #     :from_address => "bpms@our.ourcompany.co.jp"
@@ -89,6 +76,7 @@ module OpenWFE
   # The smtp server and host default to "127.0.0.1" / 25.
   #
   class MailParticipant
+
     include LocalParticipant
     include TemplateMixin
 
@@ -144,9 +132,11 @@ module OpenWFE
   # It's perhaps better to use MailParticipant which is simpler to
   # initialize. This class is anyway an extension of MailParticipant.
   #
+  #   require 'openwfe/participants/mail_participants'
+  #
   #   @engine.register_participant(
   #     'eno',
-  #     EmailNotificationParticipant.new(
+  #     OpenWFE::EmailNotificationParticipant.new(
   #       "googlemail.l.google.com",
   #       25,
   #       "eno@outoftheblue.co.jp",
@@ -159,18 +149,14 @@ module OpenWFE
   # And then, from the process definition :
   #
   #   class TestDefinition0 < OpenWFE::ProcessDefinition
-  #     def make
-  #       process_definition :name => "test0", :revision => "0" do
-  #         sequence do
-  #           set :field => 'email_target' do
-  #             "whatever56x56@gmail.com"
-  #           end
-  #           set :field => 'customer_name' do
-  #             "Monsieur Toto"
-  #           end
-  #           participant :ref => 'eno'
-  #         end
+  #     sequence do
+  #       set :field => 'email_target' do
+  #         "whatever56x56@gmail.com"
+  #       end
+  #       set :field => 'customer_name' do
+  #         "Monsieur Toto"
   #       end
+  #       participant :ref => 'eno'
   #     end
   #   end
   #
@@ -179,7 +165,7 @@ module OpenWFE
   #
   #   @engine.register_participant(
   #     'eno',
-  #     EmailNotificationParticipant.new(
+  #     OpenWFE::EmailNotificationParticipant.new(
   #       "googlemail.l.google.com",
   #       25,
   #       "eno@outoftheblue.co.jp",

data/lib/openwfe/participants/participant.rb

@@ -1,41 +1,27 @@
-#
 #--
-# Copyright (c) 2006-2008, John Mettraux, OpenWFE.org
-# All rights reserved.
-#
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are met:
+# Copyright (c) 2006-2009, John Mettraux, jmettraux@gmail.com
 #
-# . Redistributions of source code must retain the above copyright notice, this
-#   list of conditions and the following disclaimer.
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
 #
-# . Redistributions in binary form must reproduce the above copyright notice,
-#   this list of conditions and the following disclaimer in the documentation
-#   and/or other materials provided with the distribution.
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
 #
-# . Neither the name of the "OpenWFE" nor the names of its contributors may be
-#   used to endorse or promote products derived from this software without
-#   specific prior written permission.
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
 #
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
-# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
-# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
-# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
-# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
-# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
-# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
-# POSSIBILITY OF SUCH DAMAGE.
+# Made in Japan.
 #++
-#
 
-#
-# "made in Japan"
-#
-# John Mettraux at openwfe.org
-#
 
 require 'openwfe/logging'
 require 'openwfe/contextual'
@@ -80,6 +66,17 @@ module OpenWFE
     #def cancel (cancelitem)
     #end
     #++
+
+    #
+    # By default, returns false. When returning true the dispatch to the
+    # participant will not be done in his own thread.
+    #
+    # Since ActiveRecord 2.2, ActiveParticipant returns true (well, this
+    # method was introduced for ActiveParticipant and AR 2.2)
+    #
+    def do_not_thread
+      false
+    end
   end
 
   #
@@ -87,7 +84,11 @@ module OpenWFE
   # further implementations of the Participant concept.
   #
   module LocalParticipant
-    include Participant, Contextual, Logging, OwfeServiceLocator
+
+    include Participant
+    include Contextual
+    include Logging
+    include OwfeServiceLocator
 
     #
     # Returns the FlowExpression instance that triggered this
@@ -96,7 +97,7 @@ module OpenWFE
     #
     def get_flow_expression (workitem)
 
-      return nil if not @application_context
+      return nil unless @application_context
 
       get_expression_pool.fetch_expression(workitem.flow_expression_id)
     end
@@ -117,11 +118,11 @@ module OpenWFE
     def call_block (block, workitem)
 
       if block.arity == 1
-        block.call workitem
+        block.call(workitem)
       elsif block.arity == 2
-        block.call get_flow_expression(workitem), workitem
+        block.call(get_flow_expression(workitem), workitem)
       elsif block.arity == 3
-        block.call get_flow_expression(workitem), self, workitem
+        block.call(get_flow_expression(workitem), self, workitem)
       else
         block.call
       end

data/lib/openwfe/participants/participant_map.rb

@@ -0,0 +1,245 @@
+#--
+# Copyright (c) 2006-2009, John Mettraux, jmettraux@gmail.com
+#
+# Permission is hereby granted, free of charge, to any person obtaining a copy
+# of this software and associated documentation files (the "Software"), to deal
+# in the Software without restriction, including without limitation the rights
+# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+# copies of the Software, and to permit persons to whom the Software is
+# furnished to do so, subject to the following conditions:
+#
+# The above copyright notice and this permission notice shall be included in
+# all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+# THE SOFTWARE.
+#
+# Made in Japan.
+#++
+
+
+require 'openwfe/workitem'
+require 'openwfe/service'
+require 'openwfe/util/observable'
+require 'openwfe/participants/participants'
+
+
+module OpenWFE
+
+  #
+  # A very simple directory of participants
+  #
+  class ParticipantMap < Service
+
+    include OwfeServiceLocator
+    include OwfeObservable
+
+    attr_accessor :participants
+
+    def initialize (service_name, application_context)
+
+      super
+
+      @participants = []
+      @observers = {}
+    end
+
+    #
+    # Returns how many participants are currently registered here.
+    #
+    def size
+
+      @participants.size
+    end
+
+    #
+    # Adds a participant to this map.
+    # This method is called by the engine's own register_participant()
+    # method.
+    #
+    # The participant instance is returned by this method call.
+    #
+    # The know params are :participant (a participant instance or
+    # class) and :position (which can be null or :first).
+    #
+    # By default (if :position is not set to :first), the participant
+    # will appear at the bottom of the participant list.
+    #
+    def register_participant (regex, params, &block)
+
+      #params = params.is_a?(Hash) ? params : { :participant => params }
+
+      participant = params[:participant]
+      position = params[:position]
+
+      if not participant
+
+        raise "please provide a participant instance or a block" unless block
+
+        participant = BlockParticipant.new(block)
+      end
+
+      ldebug { "register_participant() participant.class #{participant.class}" }
+
+      participant = instantiate_participant(regex, participant, params) \
+        if participant.is_a?(Class)
+
+      participant.application_context = @application_context \
+        if participant.respond_to?(:application_context=)
+
+      original_string = regex.to_s
+
+      unless regex.kind_of?(Regexp)
+
+        regex = regex.to_s
+        regex = '^' + regex unless regex[0, 1] == '^'
+        regex = regex  + '$' unless regex[-1, 1] == '$'
+
+        ldebug { "register_participant() '#{regex}'" }
+
+        regex = Regexp.new(regex)
+      end
+
+      class << regex
+        attr_reader :original_string
+      end
+      regex.instance_variable_set('@original_string', original_string)
+
+      # now add the participant to the list
+
+      entry = [ regex, participant ]
+
+      index = (position == :first) ? 0 : -1
+
+      @participants.insert(index, entry)
+
+      participant
+    end
+
+    #
+    # Looks up a participant given a participant_name.
+    # Will return the first participant whose name matches.
+    #
+    def lookup_participant (participant_name)
+
+      participant_name = participant_name.to_s
+
+      @participants.each do |tuple|
+        return tuple[1] if tuple[0].match(participant_name)
+      end
+
+      nil
+    end
+
+    #
+    # Deletes the first participant matching the given name.
+    #
+    # If 'participant_name' is an integer, will remove the participant
+    # at that position in the participant list.
+    #
+    def unregister_participant (participant_name)
+
+      return (@participants.delete_at(participant_name) != nil) \
+        if participant_name.is_a?(Integer)
+
+      participant_name = participant_name.to_s
+
+      par = @participants.find do |tuple|
+        tuple[0].original_string == participant_name
+      end
+      @participants.delete(par) if par
+
+      (par != nil)
+    end
+
+    #
+    # Dispatches to the given participant (participant name (string) or
+    # The workitem will be fed to the consume() method of that participant.
+    # If it's a cancelitem and the participant has a cancel() method,
+    # it will get called instead.
+    #
+    def dispatch (participant, participant_name, workitem)
+
+      participant ||= lookup_participant(participant_name)
+        # participant may be null (AliasParticipant)
+
+      raise "pmap : no participant named '#{participant_name}'" \
+        unless participant
+
+      workitem.participant_name = participant_name
+
+      if participant.respond_to?(:do_not_thread) and participant.do_not_thread
+        do_dispatch(participant, workitem)
+      else
+        Thread.new { do_dispatch(participant, workitem) }
+      end
+    end
+
+    #
+    # The method onotify (from Observable) is made public so that
+    # ParticipantExpression instances may notify the pmap of applies
+    # and replies.
+    #
+    public :onotify
+
+    protected
+
+    #
+    # The participant to register has been passed as a class... Have to
+    # instantiate it...
+    #
+    def instantiate_participant (regex, klass, options)
+
+      [
+        [ regex, @application_context ], [], [ options ]
+      ].each do |args|
+        begin
+          return klass.new(*args)
+        rescue Exception => e
+        end
+      end
+    end
+
+    #
+    # The actual dispatch work is here, along with error catching
+    #
+    def do_dispatch (participant, workitem)
+
+      return do_cancel(participant, workitem) if workitem.is_a?(CancelItem)
+
+      onotify(:dispatch, :before_consume, workitem)
+
+      workitem.dispatch_time = Time.now
+
+      participant.consume(workitem)
+
+      onotify(:dispatch, :after_consume, workitem)
+
+    rescue Exception => e
+
+      get_expression_pool.handle_error(e, workitem.fei, :apply, workitem)
+    end
+
+    #
+    # Will call the cancel method of the participant if it has
+    # one, or will simply discard the cancel item else.
+    #
+    def do_cancel (participant, cancel_item)
+
+      participant.cancel(cancel_item) if participant.respond_to?(:cancel)
+
+      onotify(:dispatch, :cancel, cancel_item)
+        #
+        # maybe it'd be better to specifically log that
+        # a participant has no cancel() method, but it's OK
+        # like that for now.
+    end
+  end
+
+end
+