openwferu-extras 0.9.16 → 0.9.17

data/lib/openwfe/extras/participants/basecamp_participants.rb

@@ -0,0 +1,87 @@
+#
+#--
+# Copyright (c) 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.
+#++
+#
+
+#
+# "made in Japan"
+#
+# John Mettraux at openwfe.org
+#
+
+require 'openwfe/participants/participants'
+require 'openwfe/extras/misc/basecamp'
+
+
+module OpenWFE
+module Extras
+
+    class BasecampParticipant
+        include OpenWFE::LocalParticipant
+        include OpenWFE::TemplateMixin
+
+        def initialize (params, &block)
+
+            super()
+
+            @template = params[:template]
+            @block_template = block
+
+            @company_id = params[:company_id]
+            #@project_id = params[:project_id]
+
+            @responsible_party_id = params[:responsible_party_id]
+            @todo_list_id = params[:todo_list_id]
+
+            ssl = params[:ssl]
+            ssl = true if ssl == nil
+
+            @camp = Basecamp.new(
+                params[:host], params[:username], params[:password], ssl)
+        end
+
+        def consume (workitem)
+
+            text = workitem['todo_text'] || eval_template(wi)
+
+            resp = workitem['todo_responsible_party'] || @responsible_party_id
+            list = workitem['toto_list_id'] || @todo_list_id
+
+            todo = @camp.create_item list, text, resp
+
+            workitem['todo_id'] = todo.id
+
+            reply_to_engine workitem
+        end
+    end
+end
+end
+

data/lib/openwfe/extras/participants/csvparticipants.rb

@@ -1,6 +1,6 @@
 #
 #--
-# Copyright (c) 2007, John Mettraux, OpenWFE.org
+# Copyright (c) 2007-2008, John Mettraux, OpenWFE.org
 # All rights reserved.
 # 
 # Redistribution and use in source and binary forms, with or without 
@@ -37,12 +37,12 @@
 # John Mettraux at openwfe.org
 #
 
+#require 'rubygems'
+require 'rufus/decision' # gem 'rufus-decision'
+
 require 'openwfe/utils'
 require 'openwfe/util/dollar'
 require 'openwfe/participants/participant'
-require 'openwfe/extras/util/csvtable'
-
-include OpenWFE
 
 
 module OpenWFE
@@ -90,8 +90,7 @@ module Extras
     class CsvParticipant
         include LocalParticipant
 
-        attr_accessor \
-            :csv_table
+        attr_accessor :csv_table
 
         #
         # Builds a new CsvParticipant instance, csv_data or the block
@@ -104,7 +103,7 @@ module Extras
 
             csv_data = block.call if block
 
-            @csv_table = CsvTable.new(csv_data)
+            @csv_table = Rufus::DecisionTable.new csv_data
         end
 
         #
@@ -112,9 +111,14 @@ module Extras
         # ParticipantExpression) when handling a workitem to this participant.
         #
         def consume (workitem)
-            fe = get_flow_expression(workitem)
-            workitem = @csv_table.transform_wi(fe, workitem)
-            reply_to_engine(workitem)
+
+            fe = get_flow_expression workitem
+
+            @csv_table.transform!(FlowDict.new(fe, workitem, 'f'))
+                #
+                # default_prefix set to 'f'
+
+            reply_to_engine workitem
         end
     end
 

data/lib/openwfe/extras/participants/sqsparticipants.rb

@@ -1,6 +1,6 @@
 #
 #--
-# Copyright (c) 2007, John Mettraux, OpenWFE.org
+# Copyright (c) 2007-2008, John Mettraux, OpenWFE.org
 # All rights reserved.
 # 
 # Redistribution and use in source and binary forms, with or without 
@@ -41,8 +41,9 @@
 require 'yaml'
 require 'base64'
 
-#require 'openwfe/utils'
-#require 'openwfe/rudefinitions'
+#require 'rubygems'
+require 'rufus/sqs' # gem 'rufus-sqs'
+
 require 'openwfe/participants/participant'
 
 
@@ -78,12 +79,12 @@ module Extras
 
             @queue_name = queue_name
 
-            @queue_service = SQS::QueueService.new(host_name)
+            @queue_service = Rufus::SQS::QueueService.new host_name
 
-            @queue_service.create_queue(@queue_name)
+            @queue_service.create_queue @queue_name
                 # make sure the queue exists
 
-            @queue = @queue_service.get_queue(@queue_name)
+            @queue = @queue_service.get_queue @queue_name
         end
 
         #
@@ -92,9 +93,9 @@ module Extras
         #
         def consume (workitem)
 
-            msg = encode_workitem(workitem)
+            msg = encode_workitem workitem
 
-            msg_id = @queue_service.put_message(@queue, msg)
+            msg_id = @queue_service.put_message @queue, msg
 
             ldebug do 
                 "consume() msg sent to queue #{@queue.path} id is #{msg_id}"

data/lib/openwfe/extras/participants/twitterparticipants.rb

@@ -1,6 +1,6 @@
 #
 #--
-# Copyright (c) 2007, John Mettraux, OpenWFE.org
+# Copyright (c) 2007-2008, John Mettraux, OpenWFE.org
 # All rights reserved.
 # 
 # Redistribution and use in source and binary forms, with or without 
@@ -45,24 +45,9 @@
 # atom-tools' license is X11/MIT
 #
 
-require 'rubygems'
-
-begin
-    #gem 'twitter4r', '0.2.3'
-    require 'twitter'
-rescue LoadError
-    #
-    # soft dependency on 'atom-tools'
-    #
-    puts
-    puts
-    puts "'twitter4r' is missing. You can install it with :"
-    puts
-    puts "    [sudo] gem install -y twitter4r"
-    puts
-    puts
-    exit 1
-end
+#require 'rubygems'
+#gem 'twitter4r', '0.2.3'
+require 'twitter' # gem 'twitter4r'
 
 require 'openwfe/utils'
 require 'openwfe/participants/participant'

metadata

@@ -1,33 +1,26 @@
 --- !ruby/object:Gem::Specification 
-rubygems_version: 0.9.4
-specification_version: 1
 name: openwferu-extras
 version: !ruby/object:Gem::Version 
-  version: 0.9.16
-date: 2007-11-19 00:00:00 +09:00
-summary: OpenWFEru extras (sqs, csv, ...)
-require_paths: 
-- lib
-email: john at openwfe dot org
-homepage: http://openwferu.rubyforge.org/
-rubyforge_project: 
-description: 
-autorequire: openwferu-extras
-default_executable: 
-bindir: bin
-has_rdoc: false
-required_ruby_version: !ruby/object:Gem::Version::Requirement 
-  requirements: 
-  - - ">"
-    - !ruby/object:Gem::Version 
-      version: 0.0.0
-  version: 
+  version: 0.9.17
 platform: ruby
-signing_key: 
-cert_chain: 
-post_install_message: 
 authors: 
 - John Mettraux
+autorequire: openwferu-extras
+bindir: bin
+cert_chain: []
+
+date: 2008-03-17 00:00:00 +09:00
+default_executable: 
+dependencies: []
+
+description: 
+email: john at openwfe dot org
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
 files: 
 - lib/openwfe/extras/engine
 - lib/openwfe/extras/engine/db_persisted_engine.rb
@@ -38,27 +31,40 @@ files:
 - lib/openwfe/extras/listeners/sqslisteners.rb
 - lib/openwfe/extras/misc
 - lib/openwfe/extras/misc/activityfeed.rb
+- lib/openwfe/extras/misc/basecamp.rb
 - lib/openwfe/extras/participants
 - lib/openwfe/extras/participants/activeparticipants.rb
 - lib/openwfe/extras/participants/atomfeed_participants.rb
 - lib/openwfe/extras/participants/atompub_participants.rb
+- lib/openwfe/extras/participants/basecamp_participants.rb
 - lib/openwfe/extras/participants/csvparticipants.rb
 - lib/openwfe/extras/participants/sqsparticipants.rb
 - lib/openwfe/extras/participants/twitterparticipants.rb
-- lib/openwfe/extras/util
-- lib/openwfe/extras/util/csvtable.rb
-- lib/openwfe/extras/util/sqs.rb
-test_files: []
-
+has_rdoc: false
+homepage: http://openwferu.rubyforge.org/
+post_install_message: 
 rdoc_options: []
 
-extra_rdoc_files: []
-
-executables: []
-
-extensions: []
-
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
 requirements: []
 
-dependencies: []
+rubyforge_project: 
+rubygems_version: 0.9.5
+signing_key: 
+specification_version: 2
+summary: OpenWFEru extras (sqs, csv, ...)
+test_files: []
 

data/lib/openwfe/extras/util/csvtable.rb

@@ -1,620 +0,0 @@
-#
-#--
-# 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.
-#++
-#
-
-#
-# "made in Japan"
-#
-# John Mettraux at openwfe.org
-#
-
-require 'csv'
-require 'open-uri'
-
-require 'openwfe/utils'
-require 'openwfe/util/dollar'
-require 'openwfe/workitem'
-
-include OpenWFE
-
-
-module OpenWFE
-module Extras
-
-    #
-    # A regexp for checking if a string is a numeric Ruby range
-    #
-    RUBY_NUMERIC_RANGE_REGEXP = Regexp.compile(
-        "^\\d+(\\.\\d+)?\\.{2,3}\\d+(\\.\\d+)?$")
-
-    #
-    # A regexp for checking if a string is an alpha Ruby range
-    #
-    RUBY_ALPHA_RANGE_REGEXP = Regexp.compile(
-        "^([A-Za-z])(\\.{2,3})([A-Za-z])$")
-
-    #
-    # If the string contains a Ruby range definition
-    # (ie something like "93.0..94.5" or "56..72"), it will return
-    # the Range instance.
-    # Will return nil else.
-    #
-    # The Ruby range returned (if any) will accept String or Numeric,
-    # ie (4..6).include?("5") will yield true.
-    #
-    def to_ruby_range (s)
-
-        range = if RUBY_NUMERIC_RANGE_REGEXP.match(s)
-
-            eval s
-        else
-
-            m = RUBY_ALPHA_RANGE_REGEXP.match(s)
-
-            if m
-                eval "'#{m[1]}'#{m[2]}'#{m[3]}'"
-            else
-                nil
-            end
-        end
-
-        class << range
-
-            alias :old_include? :include?
-
-            def include? (elt)
-
-                elt = if first.is_a?(Numeric)
-                    Float(elt)
-                else
-                    elt
-                end
-
-                old_include?(elt)
-            end
-
-        end if range
-
-        range
-    end
-
-    #
-    # A 'CsvTable' is called a 'decision table' in OpenWFEja (the initial
-    # Java implementation of OpenWFE).
-    #
-    # A csv table is a description of a set of rules as a CSV (comma
-    # separated values) file. Such a file can be edited / generated by
-    # a spreadsheet (Excel, Google spreadsheets, Gnumeric, ...)
-    #
-    # The following CSV file 
-    #
-    #     in:topic,in:region,out:team_member
-    #     sports,europe,Alice
-    #     sports,,Bob
-    #     finance,america,Charly
-    #     finance,europe,Donald
-    #     finance,,Ernest
-    #     politics,asia,Fujio
-    #     politics,america,Gilbert
-    #     politics,,Henry
-    #     ,,Zach
-    #
-    # embodies a rule for distributing items (piece of news) labelled with a 
-    # topic and a region to various members of a team.
-    # For example, all news about finance from Europe are to be routed to 
-    # Donald.
-    #
-    # Evaluation occurs row by row. The "in out" row states which field
-    # is considered at input and which are to be modified if the "ins" do
-    # match.
-    #
-    # The default behaviour is to change the value of the "outs" if all the 
-    # "ins" match and then terminate.
-    # An empty "in" cell means "matches any".
-    #
-    # Enough words, some code :
-    #
-    #     table = CsvTable.new("""
-    #         in:topic,in:region,out:team_member
-    #         sports,europe,Alice
-    #         sports,,Bob
-    #         finance,america,Charly
-    #         finance,europe,Donald
-    #         finance,,Ernest
-    #         politics,asia,Fujio
-    #         politics,america,Gilbert
-    #         politics,,Henry
-    #         ,,Zach
-    #     """)
-    #     
-    #     h = {}
-    #     h["topic"] = "politics"
-    #     
-    #     table.transform(h)
-    #     
-    #     puts h["team_member"]
-    #         # will yield "Henry" who takes care of all the politics stuff,
-    #         # except for Asia and America
-    #
-    # '>', '>=', '<' and '<=' can be put in front of individual cell values :
-    #
-    #     table = CsvTable.new("""
-    #         ,
-    #         in:fx, out:fy
-    #         ,
-    #         >100,a
-    #         >=10,b
-    #         ,c
-    #     """)
-    #
-    #     h = { 'fx' => '10' }
-    #     table.transform(h)
-    #
-    #     require 'pp'; pp h
-    #         # will yield { 'fx' => '10', 'fy' => 'b' }
-    #
-    # Such comparisons are done after the elements are transformed to float
-    # numbers. By default, non-numeric arguments will get compared as Strings.
-    #
-    # Ruby ranges are also accepted in cells. 
-    #
-    #     in:f0,out:result
-    #     ,
-    #     0..32,low
-    #     33..66,medium
-    #     67..100,high
-    #
-    # will set the field 'result' to 'low' for f0 => 24
-    #
-    # Disclaimer : the decision / CSV table system is no replacement for
-    # full rule engines with forward and backward chaining, RETE implementation
-    # and the like...
-    #
-    #
-    # Options : 
-    #
-    # You can put options on their own in a cell BEFORE the line containing
-    # "in:xxx" and "out:yyy" (ins and outs).
-    #
-    # Currently, two options are supported, "ignorecase" and "through".
-    #
-    # * "ignorecase", if found by the CsvTable will make any match (in the "in"
-    #   columns) case unsensitive.
-    #
-    # * "through", will make sure that EVERY row is evaluated and potentially
-    #   applied. The default behaviour (without "through"), is to stop the
-    #   evaluation after applying the results of the first matching row.
-    #
-    # * "accumulate", behaves as with "through" set but instead of overriding
-    #   values each time a match is found, will gather them in an array.
-    #
-    #     accumulate
-    #     in:f0,out:result
-    #     ,
-    #     ,normal
-    #     >10,large
-    #     >100,xl
-    #
-    #   will yield { result => [ 'normal', 'large' ]} for f0 => 56
-    #
-    # CSV Tables are available to workflows as CsvParticipant.
-    #
-    #
-    # See also :
-    #
-    # * http://jmettraux.wordpress.com/2007/02/11/ruby-decision-tables/
-    # * http://rubyforge.org/viewvc/trunk/openwfe-ruby/test/extras/csv_test.rb?root=openwferu&view=co
-    #
-    class CsvTable
-
-        attr_accessor \
-            :first_match,
-            :ignore_case,
-            :header,
-            :rows,
-            :accumulate
-
-        #
-        # The constructor for CsvTable, you can pass a String, an Array 
-        # (of arrays), a File object. The CSV parser coming with Ruby will take
-        # care of it and a CsvTable instance will be built.
-        #
-        def initialize (csv_data)
-
-            @first_match = true
-            @ignore_case = false
-            @accumulate = false
-
-            @header = nil
-            @rows = []
-
-            csv_array = to_csv_array(csv_data)
-
-            csv_array.each do |row|
-
-                next if empty_row? row
-
-                if @header
-                    #@rows << row
-                    @rows << row.collect { |c| c.strip if c }
-                else
-                    parse_header_row(row)
-                end
-            end
-        end
-
-        #
-        # Returns the workitem massaged by the csv table
-        #
-        def transform_wi (flow_expression, workitem)
-
-            @rows.each do |row|
-
-                if matches?(row, flow_expression, workitem)
-                    apply row, flow_expression, workitem
-                    break if @first_match
-                end
-            end
-
-            workitem
-        end
-
-        #
-        # Passes a simple Hash instance though the csv table
-        #
-        def transform (hash)
-
-            wi = InFlowWorkItem.new()
-            wi.attributes = hash
-
-            transform_wi(nil, wi).attributes
-        end
-
-        #
-        # Outputs back this table as a CSV String
-        #
-        def to_csv
-
-            s = ""
-            s << @header.to_csv
-            s << "\n"
-            @rows.each do |row|
-                s << row.join(",")
-                s << "\n"
-            end
-            s
-        end
-
-        protected
-
-            def to_csv_array (csv_data)
-
-                return csv_data if csv_data.kind_of?(Array)
-
-                if csv_data.is_a?(URI)
-                    csv_data = csv_data.to_s
-                end
-                if OpenWFE::parse_uri(csv_data)
-                    csv_data = open(csv_data)
-                end
-
-                CSV::Reader.parse(csv_data)
-            end
-
-            def matches? (row, fexp, wi)
-
-                return false if empty_row?(row)
-
-                #puts
-                #puts "__row match ?"
-                #require 'pp'
-                #pp row
-
-                @header.ins.each_with_index do |in_header, icol|
-
-                    in_header = resolve_in_header(in_header)
-
-                    value = OpenWFE::dosub(in_header, fexp, wi)
-
-                    cell = row[icol]
-
-                    next if not cell
-
-                    cell = cell.strip
-
-                    next if cell.length < 1
-
-                    cell = OpenWFE::dosub(cell, fexp, wi)
-
-                    #puts "__does '#{value}' match '#{cell}' ?"
-
-                    b = if cell[0, 1] == '<' or cell[0, 1] == '>'
-
-                        numeric_compare value, cell
-                    else
-
-                        range = to_ruby_range cell
-                        if range
-                            range.include?(value)
-                        else
-                            regex_compare value, cell
-                        end
-                    end
-
-                    return false unless b
-                end
-
-                #puts "__row matches"
-
-                true
-            end
-
-            def regex_compare (value, cell)
-
-                modifiers = 0
-                modifiers += Regexp::IGNORECASE if @ignore_case
-
-                rcell = Regexp.new(cell, modifiers)
-
-                rcell.match(value)
-            end
-
-            def numeric_compare (value, cell)
-
-                comparator = cell[0, 1]
-                comparator += "=" if cell[1, 1] == "="
-                cell = cell[comparator.length..-1]
-
-                nvalue = narrow(value)
-                ncell = narrow(cell)
-
-                if nvalue.is_a? String or ncell.is_a? String
-                    value = '"' + value + '"'
-                    cell = '"' + cell + '"'
-                else
-                    value = nvalue
-                    cell = ncell
-                end
-
-                s = "#{value} #{comparator} #{cell}"
-
-                #puts "...>>>#{s}<<<"
-
-                begin
-                    return OpenWFE::eval_safely(s, 4)
-                rescue Exception => e
-                end
-
-                false
-            end
-
-            def narrow (s)
-                begin
-                    return Float(s)
-                rescue Exception => e
-                end
-                s
-            end
-
-            def resolve_in_header (in_header)
-
-                in_header = "f:#{in_header}" \
-                    if points_to_nothing?(in_header)
-
-                "${#{in_header}}"
-            end
-
-            def apply (row, fexp, wi)
-
-                #puts "__ apply() wi.class : #{wi.class.name}"
-
-                @header.outs.each_with_index do |out_header, icol|
-
-                    next unless out_header
-
-                    value = row[icol]
-
-                    next unless value
-                    #next unless value.strip.length > 0
-                    next unless value.length > 0
-
-                    value = OpenWFE::dosub(value, fexp, wi)
-
-                    #puts "___ value.class:#{value.class}"
-                    #puts "___ value:'#{value}'"
-                    #puts "___ value:'"+value+"'"
-
-                    type, target = points_at(out_header)
-
-                    #puts "___ t:'#{type}' target:'#{target}'"
-
-                    value = accumulate_values(type, target, value, wi, fexp) \
-                        if @accumulate
-
-                    if type == "v"
-                        fexp.set_variable(target, value) if fexp
-                    elsif type == "f"
-                        wi.set_attribute(target, value)
-                    elsif type == "r"
-                        OpenWFE::instance_eval_safely(self, value, 3)
-                    end
-                end
-            end
-
-            #
-            # 'accumulate' is on, this method got called to compute the
-            # new value.
-            #
-            # If it finds nothing in the target field, the new value is
-            # value.
-            # If there is already a value and its an array, the new value
-            # will be current_array + value.
-            # Else the two values (current and new) are combined into an array.
-            #
-            # Sorry, if you want f([ x ], y) -> [[ x ], y]... It's not
-            # implemented like that.
-            #
-            def accumulate_values (type, target, value, workitem, fexp)
-
-                current_value = case type
-                    when 'v'
-                        if fexp
-                            fexp.lookup_variable target
-                        else
-                            nil
-                        end
-                    when 'f'
-                        workitem.lookup_attribute target
-                    when 'r'
-                        nil
-                end
-
-                return value unless current_value
-
-                return current_value + Array(value) \
-                    if current_value.is_a?(Array)
-
-                [ current_value, value ]
-            end
-
-            def parse_header_row (row)
-
-                row.each_with_index do |cell, icol|
-
-                    next unless cell
-
-                    cell = cell.strip
-                    s = cell.downcase
-
-                    if s == "ignorecase" or s == "ignore_case"
-                        @ignore_case = true
-                        next
-                    end
-
-                    if s == "through"
-                        @first_match = false
-                        next
-                    end
-
-                    if s == "accumulate"
-                        @first_match = false
-                        @accumulate = true
-                        next
-                    end
-
-                    if OpenWFE::starts_with(cell, "in:") or OpenWFE::starts_with(cell, "out:")
-                        @header = Header.new unless @header
-                        @header.add cell, icol
-                    end
-                end
-            end
-
-            def empty_row? (row)
-
-                return true unless row
-                return true if (row.length == 1 and not row[0])
-                row.each do |cell|
-                    return false if cell
-                end
-                true
-            end
-
-            def points_to_nothing? (label)
-                (not points_to_variable? label) and \
-                (not points_to_field? label) and \
-                (not points_to_ruby? label)
-            end
-            def points_at (label)
-                v = points_to_variable? label
-                return "v", v if v
-                r = points_to_ruby? label
-                return "r", r if r
-                f = points_to_field? label
-                return "f", f if f
-                return "f", label # else
-            end
-            def points_to_variable? (label)
-                points_to?(label, [ "v", "var", "variable" ])
-            end
-            def points_to_field? (label)
-                points_to?(label, [ "f", "field" ])
-            end
-            def points_to_ruby? (label)
-                points_to?(label, [ "r", "ruby", "reval" ])
-            end
-            def points_to? (label, names)
-                i = label.index(":")
-                return nil unless i
-                s = label[0..i-1]
-                names.each do |name|
-                    return label[i+1..-1] if s == name
-                end
-                nil
-            end
-
-            class Header
-
-                attr_accessor :ins, :outs
-
-                def initialize
-                    @ins = []
-                    @outs = []
-                end
-
-                def add (cell, icol)
-                    if OpenWFE::starts_with(cell, "in:")
-                        @ins[icol] = cell[3..-1]
-                        #puts "i added #{@ins[icol]}"
-                    elsif OpenWFE::starts_with(cell, "out:")
-                        @outs[icol] = cell[4..-1]
-                        #puts "o added #{@outs[icol]}"
-                    end
-                    # else don't add
-                end
-
-                def to_csv
-
-                    s = ""
-                    @ins.each do |_in|
-                        s << "in:#{_in}," if _in
-                    end
-                    @outs.each do |out|
-                        s << "out:#{out}," if out
-                    end
-                    s[0..-2]
-                end
-            end
-    end
-
-end
-end
-