ruote 0.9.19 → 0.9.20

data/lib/openwfe/storage/yamlcustom.rb

@@ -1,106 +0,0 @@
-#
-#--
-# 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.
-#++
-#
-
-#
-# "made in Japan"
-#
-# John Mettraux at openwfe.org
-#
-
-require 'yaml'
-
-
-module OpenWFE
-
-  #
-  # reopening some classes in order to facilitate their
-  # yaml serialization
-  #
-
-  #
-  # opening for tuning yaml persistence
-  #
-  class FlowExpression
-
-    def to_yaml_properties
-
-      l = super
-
-      l.delete("@application_context")
-
-      #l.delete("@timeout_job_id")
-      #l.delete("@scheduler_job_id")
-        # scheduler ids should not get persisted
-
-      l
-    end
-  end
-
-  #
-  # making sure that the FlowExpressionId is serialized as a unique String
-  #
-  class FlowExpressionId
-
-    yaml_as "tag:ruby.yaml.org,2002:#{self}"
-
-    #--
-    #def to_yaml (opts={})
-    #  @s = to_s
-    #  super
-    #end
-    #def to_yaml_properties
-    #  [ "@s" ]
-    #end
-    #++
-
-    def to_yaml (opts={})
-
-      YAML::quick_emit(self.object_id, opts) do |out|
-        out.map(taguri) do |map|
-          map.add "s", to_s
-        end
-      end
-    end
-
-    def FlowExpressionId.yaml_new (klass, tag, val)
-
-      s = val["s"]
-      begin
-        FlowExpressionId.to_fei s
-      rescue Exception => e
-        raise "failed to decode FlowExpressionId out of '#{s}'"
-      end
-    end
-  end
-end
-

data/lib/openwfe/worklist/oldrest.rb

@@ -1,244 +0,0 @@
-#
-#--
-# 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.
-#++
-#
-
-#
-# "made in Japan"
-#
-# John Mettraux at openwfe.org
-#
-
-require 'openwfe/rexml'
-require 'openwfe/orest/xmlcodec'
-require 'openwfe/orest/oldrestservlet'
-
-
-module OpenWFE
-
-  #
-  # This webrick servlet provides a REST interface for an old style
-  # OpenWFE worklist.
-  #
-  class OldRestWorklistServlet < OldRestServlet
-
-    def initialize (server, params)
-      super
-      @worklist = params[:Worklist]
-    end
-
-    #
-    # The realm for HTTP authentication.
-    #
-    def get_realm_name
-      "worklist"
-    end
-
-    #
-    # Lists the stores in the worklist
-    #
-    def do__getstorenames (req, res)
-
-      e = REXML::Element.new 'stores'
-
-      @worklist.each_store do |regex, store_name, store|
-
-        perms = @worklist.get_permissions(
-          req.attributes['username'], store_name)
-
-        es = REXML::Element.new 'store'
-        es.add_attribute 'name', store_name
-        es.add_attribute 'workitem-count', store.size
-        es.add_attribute 'permissions', perms
-        e << es
-      end
-
-      reply_with_xml res, 200, e
-    end
-
-    alias :do__liststores :do__getstorenames
-
-    #
-    # This implementation simply encodes the workitem, no transformation
-    # into headers at all.
-    #
-    def do__getheaders (req, res)
-
-      limit = req.query['limit']
-      limit = limit.to_s.to_i if limit
-      limit = nil if limit and limit < 1
-
-      hs = @worklist.get_headers(
-        req.attributes['username'],
-        get_store_name(req),
-        limit)
-
-      # TODO raise "404 no store named '#{store_name}'" unless store
-      # TODO raise "403 forbidden"
-
-      e = REXML::Element.new 'headers'
-
-      hs.each do |h|
-
-        workitem, locked = h
-
-        e << OpenWFE::XmlCodec::encode_workitem_as_header(
-          workitem, locked)
-      end
-
-      reply_with_xml res, 200, e
-    end
-
-    #
-    # Launches a new process instance.
-    #
-    def do__launchflow (req, res)
-
-      engine_name = req.query['engineid']
-      engine_name = "__nil__" unless engine_name
-
-      launch_item = OpenWFE::XmlCodec::decode req.body
-
-      r = @worklist.launch_flow engine_name, launch_item
-
-      e = REXML::Element.new 'ok'
-
-      e.add_attribute 'flow-id', r.to_s
-
-      reply_with_xml res, 200, e
-    end
-
-    #
-    # Retrieves a workitem from the worklist
-    #
-    def do__getworkitem (req, res)
-
-      execute_wi_get :get, req, res
-    end
-
-    #
-    # Retrieves a workitem from the worklist, locks it and returns it
-    #
-    def do__getandlockworkitem (req, res)
-
-      execute_wi_get :get_and_lock, req, res
-    end
-
-    #
-    # Returns the flow expression ids of the workitems with a given
-    # workflow instance id in a store.
-    #
-    def do__findflowinstance (req, res)
-
-      store_name = get_store_name req
-
-      wfid = req.query['id']
-      raise "404 'id' not specified" unless wfid
-
-      wis = @worklist.list_workitems(
-        req.attributes['username'], store_name, wfid)
-
-      e = REXML::Element.new 'stores'
-
-      wis.each do |wi|
-        e << OpenWFE::XmlCodec::encode(wi.fei)
-      end
-
-      reply_with_xml res, 200, e
-    end
-
-    #
-    # Releases a workitem (unlocks it).
-    #
-    def do__releaseworkitem (req, res)
-
-      execute_wi_post :release, req, res
-    end
-
-    #
-    # Simply saves the workitem and the modifications done to it.
-    #
-    def do__saveworkitem (req, res)
-
-      execute_wi_post :save, req, res
-    end
-
-    #
-    # Forwards the workitem (makes the worklist reply to the engine
-    # with the modified workitem)
-    #
-    def do__forwardworkitem (req, res)
-
-      execute_wi_post :forward, req, res
-    end
-
-    protected
-
-      def execute_wi_post (method, req, res)
-
-        store_name = get_store_name req
-
-        wi = OpenWFE::XmlCodec::decode req.body
-
-        @worklist.send(
-          method,
-          req.attributes['username'],
-          store_name,
-          wi)
-      end
-
-      def execute_wi_get (method, req, res)
-
-        store_name = get_store_name req
-        fei = OpenWFE::XmlCodec::decode req.body
-
-        wi = @worklist.send(
-          method, req.attributes['username'], store_name, fei)
-
-        raise "404 no workitem found for #{fei.to_s}" unless wi
-
-        reply_with_wi res, wi
-      end
-
-      def reply_with_wi (res, wi)
-
-        reply_with_xml res, 200, OpenWFE::XmlCodec::encode(wi)
-      end
-
-      def get_store_name (req)
-
-        ss = req.path.split("/")
-        raise "404 'store' not specified" if ss.length != 3
-        ss[-1]
-      end
-  end
-end
-

data/test/README.txt

@@ -1,27 +0,0 @@
-= OpenWFEru - about the unit tests
-
-There are three tests triggerable by Rake :
-
-   rake test
-   rake qtest
-   rake ptest
-
-These 3 tests correspond to the following unit test files *
-
-   test/rake_test.rb
-   test/rake_qtest.rb
-   test/rake_ptest.rb
-
-== test/rake_test.rb
-
-Triggers 'quicktests' and time based tests. Running "rake test" takes 10 seconds more than "rake qtest". These are the 10 seconds necessary to test some time and scheduling aspects of OpenWFEru.
-
-== test/rake_qtest.rb
-
-Runs only 'quick' tests.
-
-== test/rake_ptest.rb
-
-Runs the quicktest but with persistence on. Persistence stores its work file under the work/ directory.
-This set of tests takes care of wiping fresh the work/ directory before beginning the tests.
-

data/test/back_0916_test.rb

@@ -1,109 +0,0 @@
-
-#
-# Testing OpenWFE
-#
-# John Mettraux at openwfe.org
-#
-# Tue Feb 19 10:58:43 JST 2008
-#
-
-require 'rubygems'
-
-require 'test/unit'
-require 'fileutils'
-require 'openwfe/def'
-require 'openwfe/engine/file_persisted_engine'
-
-
-class Back0916Test < Test::Unit::TestCase
-
-  WORK = 'work_back'
-
-  def setup
-
-    FileUtils.rm_rf WORK
-    FileUtils.mkdir WORK
-
-    `cd work_back && tar xzvf ../test/expool_20031219_0916.tgz`
-
-    ac = { :work_directory => WORK }
-
-    @engine = OpenWFE::FilePersistedEngine.new ac
-  end
-
-  def teardown
-
-    $OWFE_LOG.level = Logger::INFO
-    FileUtils.rm_rf WORK
-  end
-
-  def test_0
-
-    $OWFE_LOG.level = Logger::DEBUG
-
-    trace = []
-
-    @engine.register_participant :alpha do
-      trace << :alpha
-    end
-
-    @engine.reload
-
-    ps = @engine.process_status '20080212-moshijuzuke' # an XML process
-    #p ps.expressions.collect { |e| e.fei.to_s }
-    exp = ps.expressions.first
-    wi = exp.applied_workitem
-    wi.message = "back from obsolesence"
-
-    @engine.reply wi
-
-    sleep 0.350
-
-    assert_equal [ :alpha ], trace
-
-    ps = @engine.process_status '20080212-moshijuzuke'
-    #puts ps.size
-    #puts ps.collect { |e| e.fei.to_s }.join("\n")
-
-    assert_nil ps
-
-    @engine.stop
-
-    sleep 0.300
-  end
-
-  def test_1
-
-    $OWFE_LOG.level = Logger::DEBUG
-
-    trace = []
-
-    #@engine.register_participant :employee do
-    #  trace << :assistant
-    #end
-    #@engine.register_participant :employee do
-    #  trace << :employee
-    #end
-    [ :user_bob, :user_alice ].each do |p|
-      @engine.register_participant(p) { trace << p }
-    end
-
-    @engine.reload
-
-    ps = @engine.process_status '20080213-depejetzube' # a ruby procdef
-    exp = ps.expressions.first
-    wi = exp.applied_workitem
-
-    @engine.reply wi
-
-    sleep 0.400
-
-    assert_equal [ :user_bob, :user_bob ], trace
-
-    assert_nil @engine.process_status('20080213-depejetzube')
-
-    @engine.stop
-
-    sleep 0.300
-  end
-end