ruote 2.2.0 → 2.3.0

data/jruby_issue.txt

@@ -1,32 +0,0 @@
-
-  ** #<ConcurrencyError: Detected invalid array contents due to unsynchronized modifications with concurrent users>
-/Users/jmettraux/w/ruote/lib/ruote/log/test_logger.rb:124:in `check_waiting'
-/Users/jmettraux/w/ruote/lib/ruote/log/test_logger.rb:71:in `notify'
-/Users/jmettraux/w/ruote/lib/ruote/worker.rb:279:in `notify'
-/Users/jmettraux/w/ruote/lib/ruote/worker.rb:276:in `each'
-/Users/jmettraux/w/ruote/lib/ruote/worker.rb:276:in `notify'
-/Users/jmettraux/w/ruote/lib/ruote/worker.rb:261:in `process'
-/Users/jmettraux/w/ruote/lib/ruote/worker.rb:173:in `step'
-/Users/jmettraux/w/ruote/lib/ruote/worker.rb:75:in `run'
-/Users/jmettraux/w/ruote/lib/ruote/worker.rb:87:in `run_in_thread'
-/Users/jmettraux/w/ruote/lib/ruote/worker.rb:87:in `initialize'
-/Users/jmettraux/w/ruote/lib/ruote/worker.rb:87:in `new'
-/Users/jmettraux/w/ruote/lib/ruote/worker.rb:87:in `run_in_thread'
-/Users/jmettraux/w/ruote/lib/ruote/engine.rb:70:in `initialize'
-./test/functional/base.rb:33:in `new'
-./test/functional/base.rb:33:in `setup'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/testcase.rb:77:in `run'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/testsuite.rb:34:in `run'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/testsuite.rb:33:in `each'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/testsuite.rb:33:in `run'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/testsuite.rb:34:in `run'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/testsuite.rb:33:in `each'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/testsuite.rb:33:in `run'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/ui/testrunnermediator.rb:46:in `run_suite'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/ui/console/testrunner.rb:67:in `start_mediator'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/ui/console/testrunner.rb:41:in `start'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/ui/testrunnerutilities.rb:29:in `run'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/autorunner.rb:216:in `run'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit/autorunner.rb:12:in `run'
-/Users/jmettraux/.rvm/rubies/jruby-1.5.6/lib/ruby/1.8/test/unit.rb:279
-

data/lib/ruote/engine/process_status.rb

@@ -1,403 +0,0 @@
-#--
-# Copyright (c) 2005-2011, 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 'ruote/engine/process_error'
-
-
-module Ruote
-
-  #
-  # A 'view' on the status of a process instance.
-  #
-  # Returned by the #process and the #processes methods of the Engine.
-  #
-  class ProcessStatus
-
-    # The expressions that compose the process instance.
-    #
-    attr_reader :expressions
-
-    # Returns the expression at the root of the process instance.
-    #
-    attr_reader :root_expression
-
-    # An array of the workitems currently in the storage participant for this
-    # process instance.
-    #
-    # Do not confuse with #workitems
-    #
-    attr_reader :stored_workitems
-
-    # An array of errors currently plaguing the process instance. Hopefully,
-    # this array is empty.
-    #
-    attr_reader :errors
-
-    # An array of schedules (open structs yielding information about the
-    # schedules of this process)
-    #
-    attr_reader :schedules
-
-    def initialize(context, expressions, stored_workitems, errors, schedules)
-
-      @expressions = expressions.collect { |e|
-        Ruote::Exp::FlowExpression.from_h(context, e) }
-      @expressions.sort! { |a, b| a.fei.expid <=> b.fei.expid }
-
-      @stored_workitems = stored_workitems.collect { |h|
-        Ruote::Workitem.new(h)
-      }
-
-      @errors = errors.sort! { |a, b| a.fei.expid <=> b.fei.expid }
-      @schedules = schedules.sort! { |a, b| a['owner'].sid <=> b['owner'].sid }
-
-      @root_expression = root_expressions.first
-    end
-
-    # Returns a list of all the expressions that have no parent expression.
-    # The list is sorted with the deeper (closer to the original root) first.
-    #
-    def root_expressions
-
-      roots = @expressions.select { |e| e.h.parent_id == nil }
-
-      roots = roots.inject({}) { |h, e|
-        h["#{e.h.fei['expid']}__#{e.h.fei['subid']}"] = e; h
-      }
-
-      roots.keys.sort.collect { |k| roots[k] }
-    end
-
-    # Given an expression id, returns the root (top ancestor) for its
-    # expression.
-    #
-    def root_expression_for(fei)
-
-      sfei = Ruote.sid(fei)
-
-      exp = @expressions.find { |fe| sfei == Ruote.sid(fe.fei) }
-
-      return nil unless exp
-      return exp if exp.parent_id.nil?
-
-      root_expression_for(exp.parent_id)
-    end
-
-    # Returns the process variables set for this process instance.
-    #
-    def variables
-
-      @root_expression && @root_expression.variables
-    end
-
-    # Returns a hash fei => variable_hash containing all the variable bindings
-    # (expression by expression) of the process instance.
-    #
-    def all_variables
-
-      @expressions.inject({}) do |h, exp|
-        h[exp.fei] = exp.variables if exp.variables
-        h
-      end
-    end
-
-    # Returns a hash tagname => fei of tags set at the root of the process
-    # instance.
-    #
-    def tags
-
-      Hash[variables.select { |k, v| FlowExpressionId.is_a_fei?(v) }]
-    end
-
-    # Returns a hash tagname => array of feis of all the tags set in the process
-    # instance.
-    #
-    def all_tags
-
-      all_variables.inject({}) do |h, (fei, vars)|
-        vars.each { |k, v| (h[k] ||= []) << v if FlowExpressionId.is_a_fei?(v) }
-        h
-      end
-    end
-
-    # Returns the unique identifier for this process instance.
-    #
-    def wfid
-
-      @expressions.any? ? @expressions.first.fei.wfid : @errors.first.fei.wfid
-    end
-
-    # For a process
-    #
-    #   Ruote.process_definition :name => 'review', :revision => '0.1' do
-    #     author
-    #     reviewer
-    #   end
-    #
-    # will yield 'review'.
-    #
-    def definition_name
-
-      @root_expression && (
-        @root_expression.attribute('name') || @root_expression.attribute_text)
-    end
-
-    # For a process
-    #
-    #   Ruote.process_definition :name => 'review', :revision => '0.1' do
-    #     author
-    #     reviewer
-    #   end
-    #
-    # will yield '0.1'.
-    #
-    def definition_revision
-
-      @root_expression && @root_expression.attribute('revision')
-    end
-
-    # Returns the 'position' of the process.
-    #
-    #   pdef = Ruote.process_definition do
-    #     alpha :task => 'clean car'
-    #   end
-    #   wfid = engine.launch(pdef)
-    #
-    #   sleep 0.500
-    #
-    #   engine.process(wfid) # => [["0_0", "alpha", {"task"=>"clean car"}]]
-    #
-    # A process with concurrent branches will yield multiple 'positions'.
-    #
-    # It uses #workitems underneath.
-    #
-    def position
-
-      workitems.collect { |wi|
-
-        r = [ wi.fei.sid, wi.participant_name ]
-
-        params = (wi.fields['params'] || {}).dup
-        params.delete('ref')
-
-        if err = errors.find { |e| e.fei == wi.fei }
-          params['error'] = err.message
-        end
-
-        r << params
-        r
-      }
-    end
-
-    # Returns a list of the workitems currently 'out' to participants
-    #
-    # For example, with an instance of
-    #
-    #   Ruote.process_definition do
-    #     concurrence do
-    #       alpha :task => 'clean car'
-    #       bravo :task => 'sell car'
-    #     end
-    #   end
-    #
-    # calling engine.process(wfid).workitems will yield two workitems
-    # (alpha and bravo).
-    #
-    # Warning : do not confuse the workitems here with the workitems held
-    # in a storage participant or equivalent.
-    #
-    def workitems
-
-      @expressions.select { |fexp|
-        fexp.is_a?(Ruote::Exp::ParticipantExpression)
-      }.collect { |fexp|
-        Ruote::Workitem.new(fexp.h.applied_workitem)
-      }
-    end
-
-    # Returns a parseable UTC datetime string which indicates when the process
-    # was last active.
-    #
-    def last_active
-
-      @expressions.collect { |fexp| fexp.h.put_at }.max
-    end
-
-    # Returns the process definition tree as it was when this process instance
-    # was launched.
-    #
-    def original_tree
-
-      @root_expression && @root_expression.original_tree
-    end
-
-    # Returns a Time instance indicating when the process instance was launched.
-    #
-    def launched_time
-
-      @root_expression && @root_expression.created_time
-    end
-
-    def to_s
-
-      "(process_status wfid '#{wfid}', " +
-      "expressions #{@expressions.size}, " +
-      "stored_workitems #{@stored_workitems.size}, " +
-      "errors #{@errors.size}, " +
-      "schedules #{@schedules.size}, " +
-      ")"
-    end
-
-    def inspect
-
-      vars = variables rescue nil
-      avars = all_variables.inject({}) { |h, (k, v)| h[Ruote.sid(k)] = v; h }
-
-      s = [ "== #{self.class} ==" ]
-      s << "   expressions : #{@expressions.size}"
-      @expressions.each do |e|
-        s << "     #{e.fei.to_storage_id}"
-        s << "       | #{e.name}"
-        s << "       | #{e.attributes.inspect}"
-        s << "       `-parent--> #{e.h.parent_id ? e.parent_id.to_storage_id : 'nil'}"
-      end
-      s << "   schedules : #{@schedules.size}"
-      s << "   stored workitems : #{@stored_workitems.size}"
-      s << "   variables :     #{vars.inspect}"
-      s << "   all_variables : #{avars.inspect}"
-      s << "   errors : #{@errors.size}"
-      @errors.each do |e|
-        s << "     ***"
-        s << "     #{e.fei.to_storage_id} :" if e.fei
-        s << "     action : #{e.action}"
-        s << "     message : #{e.message}"
-        s << "     trace :"
-        e.trace.split("\n").each do |line|
-          s << "       #{line}"
-        end
-        s << "     fields : #{e.fields.inspect}"
-      end
-
-      s.join("\n") + "\n"
-    end
-
-    # Returns a 'dot' representation of the process. A graph describing
-    # the tree of flow expressions that compose the process.
-    #
-    def to_dot(opts={})
-
-      s = [ "digraph \"process wfid #{wfid}\" {" ]
-      @expressions.each { |e| s.push(*e.send(:to_dot, opts)) }
-      @errors.each { |e| s.push(*e.send(:to_dot, opts)) }
-      s << "}"
-
-      s.join("\n")
-    end
-
-    #--
-    #def to_h
-    #  h = {}
-    #  %w[
-    #    wfid
-    #    definition_name definition_revision
-    #    original_tree current_tree
-    #    variables tags
-    #  ].each { |m| h[m] = self.send(m) }
-    #  h['launched_time'] = launched_time
-    #  h['last_active'] = last_active
-    #  # all_variables and all_tags ?
-    #  h['root_expression'] = nil
-    #  h['expressions'] = @expressions.collect { |e| e.fei.to_h }
-    #  h['errors'] = @errors.collect { |e| e.to_h }
-    #  h
-    #end
-    #++
-
-    # Returns the current version of the process definition tree. If no
-    # manipulation (gardening) was performed on the tree, this method yields
-    # the same result as the #original_tree method.
-    #
-    def current_tree
-
-      h = Ruote.decompose_tree(original_tree)
-
-      @expressions.sort { |e0, e1|
-
-        e0.fei.expid <=> e1.fei.expid
-
-      }.each { |e|
-
-        trigger = e.tree[1]['_triggered']
-
-        tree = if trigger && trigger != 'on_re_apply'
-          t = original_tree_from_parent(e).dup
-          t[1]['_triggered'] = trigger
-          t
-        else
-          e.tree
-        end
-
-        h.merge!(Ruote.decompose_tree(tree, e.fei.expid))
-      }
-
-      Ruote.recompose_tree(h)
-    end
-
-    protected
-
-    def original_tree_from_parent(e)
-
-      parent = @expressions.find { |exp| exp.fei == e.parent_id }
-
-      parent ? parent.tree[2][e.fei.child_id] : e.tree
-    end
-  end
-
-  def self.decompose_tree(t, pos='0', h={})
-
-    h[pos] = t[0, 2]
-    t[2].each_with_index { |c, i| decompose_tree(c, "#{pos}_#{i}", h) }
-    h
-  end
-
-  def self.recompose_tree(h, pos='0')
-
-    t = h[pos]
-
-    return nil unless t
-
-    t << []
-    i = 0
-
-    loop do
-      tt = recompose_tree(h, "#{pos}_#{i}")
-      break unless tt
-      t.last << tt
-      i = i + 1
-    end
-
-    t
-  end
-end
-

data/lib/ruote/log/pretty.rb

@@ -1,165 +0,0 @@
-#--
-# Copyright (c) 2005-2011, 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.
-#++
-
-
-module Ruote
-
-  #
-  # A container for the pretty printing logic of TestLogger.
-  #
-  module PrettyLogging
-
-    protected
-
-    #--
-    # <ESC>[{attr1};...;{attrn}m
-    #
-    # 0 Reset all attributes
-    # 1 Bright
-    # 2 Dim
-    # 4 Underscore
-    # 5 Blink
-    # 7 Reverse
-    # 8 Hidden
-    #
-    # Foreground Colours
-    # 30 Black
-    # 31 Red
-    # 32 Green
-    # 33 Yellow
-    # 34 Blue
-    # 35 Magenta
-    # 36 Cyan
-    # 37 White
-    #
-    # Background Colours
-    # 40 Black
-    # 41 Red
-    # 42 Green
-    # 43 Yellow
-    # 44 Blue
-    # 45 Magenta
-    # 46 Cyan
-    # 47 White
-    #++
-
-    def color(mod, s, clear=false)
-
-      return s if Ruote::WIN
-      return s unless STDOUT.tty?
-
-      "[#{mod}m#{s}#{clear ? '' : "[#{@color}m"}"
-    end
-
-    def pretty_print(msg)
-
-      @count += 1
-      @count = 0 if @count > 9
-
-      ei = self.object_id.to_s[-2..-1]
-
-      fei = msg['fei']
-      depth = fei ? fei['expid'].split('_').size : 0
-
-      i = fei ?
-        [ fei['wfid'], (fei['subid'] || '')[0, 5], fei['expid'] ].join(' ') :
-        msg['wfid']
-      wfid = fei ? fei['wfid'] : msg['wfid']
-
-      rest = msg.dup
-      %w[
-        _id put_at _rev
-        type action
-        fei wfid variables
-      ].each { |k| rest.delete(k) }
-
-      if v = rest['parent_id']
-        rest['parent_id'] = Ruote.to_storage_id(v)
-      end
-      if v = rest.delete('workitem')
-        rest[:wi] = [
-          v['fei'] ? Ruote.to_storage_id(v['fei']) : nil,
-          v['fields'].size ]
-      end
-
-      #if t = rest.delete('tree')
-      #  rest[:t] = color(37, t.inspect, true)
-      #end
-
-      { 'tree' => :t, 'parent_id' => :pi }.each do |k0, k1|
-        if v = rest.delete(k0)
-          rest[k1] = v
-        end
-      end
-
-      action = msg['action'][0, 2]
-      action = case msg['action']
-        when 'receive' then 'rc'
-        when 'dispatched' then 'dd'
-        when 'dispatch_cancel' then 'dc'
-        else action
-      end
-      action = case action
-        when 'la' then color('4;32', action)
-        when 'te' then color('4;31', action)
-        when 'ce' then color('31', action)
-        when 'ca' then color('31', action)
-        when 'rc' then color('4;33', action)
-        when 'di' then color('4;33', action)
-        when 'dd' then color('4;33', action)
-        when 'dc' then color('4;31', action)
-        else action
-      end
-
-      if msg['action'] == 'error_intercepted'
-
-        tail = []
-        tail << "  #{wfid} #{rest['error']['class']}"
-        tail << "  #{wfid} #{rest['error']['message']}"
-        rest['error']['trace'].each do |line|
-          tail << "  #{wfid} #{line}"
-        end
-
-        color(
-          @color,
-          "#{@count} #{ei} #{'  ' * depth}#{action} * #{i}",
-          true
-        ) +
-        "\n" +
-        color(
-          @color,
-          tail.join("\n"),
-          true)
-
-      else
-
-        color(
-          @color,
-          "#{@count} #{ei} #{'  ' * depth}#{action} * #{i} #{rest.inspect}",
-          true)
-      end
-    end
-  end
-end
-