cpee 1.5.27 → 2.0.5

data/cockpit/themes/labels/symbols/end.svg

@@ -1,3 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <circle cx="15" cy="15" r="14" class="standfat"/>
-</svg>

data/cockpit/themes/labels/symbols/escape.svg

@@ -1,5 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <circle cx="15" cy="15" r="14" class="stand cline"/>
-  <circle cx="15" cy="15" r="11" class="stand cline hfill"/>
-  <polygon points="10.5,20.5 15,8.5 20.5,20.5 15,15.5 10.5,20.5" class="black"/>
-</svg>

data/cockpit/themes/labels/symbols/event_end.svg

@@ -1,3 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <circle cx="15" cy="15" r="14" class="rfill hfill cline standfat"/>
-</svg>

data/cockpit/themes/labels/symbols/loop.svg

@@ -1,5 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <rect transform="rotate(45,14,12)" x="7" y="3" width="21" height="21" class="cline hfill stand"/>
-  <line x1="10.5" y1="20.5" x2="20.5" y2="10.5" class="stand"/>
-  <line x1="10.5" y1="10.5" x2="20.5" y2="20.5" class="stand"/>
-</svg>

data/cockpit/themes/labels/symbols/manipulate.svg

@@ -1,4 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <rect x="1" y="1" width="28" height="28" rx="4" class="rfill hfill cline stand"/>
-  <text transform="translate(15,21)" class="normal">s</text>
-</svg>

data/cockpit/themes/labels/symbols/otherwise.svg

@@ -1,5 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <circle cx="15" cy="15" r="11" class="hfill standtrans"/>
-  <line x1="9" y1="21" x2="21" y2="9" class="stand cline hline"/>
-  <line x1="15.6" y1="4" x2="15.6" y2="27" class="ourline"/>
-</svg>

data/cockpit/themes/labels/symbols/parallel.svg

@@ -1,5 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <rect transform="rotate(45,14,12)" x="7" y="3" width="21" height="21" class="cline hfill stand"/>
-  <text transform="translate(15,25)" class="normallarge">+</text>
-</svg>
-

data/cockpit/themes/labels/symbols/parallel_branch.svg

@@ -1,5 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <rect x="11" y="6" width="9" height="18" rx="0" class="hline white"/>
-  <path class="cline hfill stand" d="M 11,5 C  2,9  2,21 11,25 M 20,5 C 29,9 29,21 20,25" style="stroke-dasharray:1,4;"/>
-  <line x1="15.6" y1="4" x2="15.6" y2="27" class="ourline"/>
-</svg>

data/cockpit/themes/labels/symbols/parallel_branch_compact.svg

@@ -1,4 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <rect transform="rotate(45,14,12)" x="7" y="3" width="21" height="21" class="cline hfill stand"/>
-  <text transform="translate(15,20)" class="small">|||</text>
-</svg>

data/cockpit/themes/labels/symbols/parallel_branch_event.svg

@@ -1,14 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <rect x="1" y="3" width="24" height="24" rx="4" class="hfill rfill cline stand"/>
-
-  <circle cx="24" cy="15" r="10" class="cline rfill stand" style="stroke-dasharray: 1,3"/>
-  <circle cx="24" cy="15" r="7" class="cline rfill stand" style="stroke-dasharray: 1,3"/>
-  <line x1="24" y1="11" x2="20" y2="18" class="stand"/>
-  <line x1="20" y1="18" x2="28" y2="18" class="stand"/>
-  <line x1="28" y1="18" x2="24" y2="11" class="stand"/>
-
-  <circle cx="55.5" cy="15" r="14" class="cline hfill rfill stand"/>
-  <line x1="55.5" y1="11" x2="51.5" y2="18" class="stand"/>
-  <line x1="51.5" y1="18" x2="59.5" y2="18" class="stand"/>
-  <line x1="59.5" y1="18" x2="55.5" y2="11" class="stand"/>
-</svg>

data/cockpit/themes/labels/symbols/parallel_branch_normal.svg

@@ -1,5 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <rect x="11" y="6" width="9" height="18" rx="0" class="hline white"/>
-  <path class="cline hfill stand" d="M 11,5 C  2,9  2,21 11,25 M 20,5 C 29,9 29,21 20,25" style="stroke-dasharray:1,4;"/>
-  <line x1="15.6" y1="4" x2="15.6" y2="27" class="ourline"/>
-</svg>

data/cockpit/themes/labels/symbols/scripts.svg

@@ -1,4 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <rect x="1" y="1" width="28" height="28" rx="4" class="hfill rfill cline stand"/>
-  <text transform="translate(15,21)" class="normal">s</text>
-</svg>

data/cockpit/themes/labels/symbols/start.svg

@@ -1,3 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <circle cx="15" cy="15" r="14" class="stand"/>
-</svg>

data/cockpit/themes/labels/symbols/stop.svg

@@ -1,5 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <circle cx="15" cy="15" r="14" class="hfill rfill cline stand"/>
-  <line x1="12.5" y1="22.5" x2="12.5" y2="8.5" class="stand"/>
-  <line x1="17.5" y1="22.5" x2="17.5" y2="8.5" class="stand"/>
-</svg>

data/cockpit/themes/labels/symbols/terminate.svg

@@ -1,4 +0,0 @@
-<svg class="clickable" xmlns="http://www.w3.org/2000/svg">
-  <circle cx="15" cy="15" r="14" class="standfat"/>
-  <circle cx="15" cy="15" r="9" class="black"/>
-</svg>

data/cockpit/themes/packed/rngs/alternative.rng

@@ -1 +0,0 @@
-../../default/rngs/alternative.rng

data/cockpit/themes/packed/rngs/choose.rng

@@ -1 +0,0 @@
-../../default/rngs/choose.rng

data/cockpit/themes/packed/rngs/critical.rng

@@ -1 +0,0 @@
-../../default/rngs/critical.rng

data/cockpit/themes/packed/rngs/escape.rng

@@ -1 +0,0 @@
-../../default/rngs/escape.rng

data/cockpit/themes/packed/rngs/group.rng

@@ -1 +0,0 @@
-../../default/rngs/group.rng

data/cockpit/themes/packed/rngs/loop.rng

@@ -1 +0,0 @@
-../../default/rngs/loop.rng

data/cockpit/themes/packed/rngs/manipulate.rng

@@ -1 +0,0 @@
-../../default/rngs/manipulate.rng

data/cockpit/themes/packed/rngs/otherwise.rng

@@ -1 +0,0 @@
-../../default/rngs/otherwise.rng

data/cockpit/themes/packed/rngs/parallel.rng

@@ -1 +0,0 @@
-../../default/rngs/parallel.rng

data/cockpit/themes/packed/rngs/parallel_branch.rng

@@ -1 +0,0 @@
-../../default/rngs/parallel_branch.rng

data/cockpit/themes/packed/rngs/stop.rng

@@ -1 +0,0 @@
-../../default/rngs/stop.rng

data/cockpit/themes/packed/rngs/terminate.rng

@@ -1 +0,0 @@
-../../default/rngs/terminate.rng

data/cockpit/themes/preset/rngs/alternative.rng

@@ -1 +0,0 @@
-../../default/rngs/alternative.rng

data/cockpit/themes/preset/rngs/choose.rng

@@ -1 +0,0 @@
-../../default/rngs/choose.rng

data/cockpit/themes/preset/rngs/critical.rng

@@ -1 +0,0 @@
-../../default/rngs/critical.rng

data/cockpit/themes/preset/rngs/escape.rng

@@ -1 +0,0 @@
-../../default/rngs/escape.rng

data/cockpit/themes/preset/rngs/group.rng

@@ -1 +0,0 @@
-../../default/rngs/group.rng

data/cockpit/themes/preset/rngs/loop.rng

@@ -1 +0,0 @@
-../../default/rngs/loop.rng

data/cockpit/themes/preset/rngs/manipulate.rng

@@ -1 +0,0 @@
-../../default/rngs/manipulate.rng

data/cockpit/themes/preset/rngs/otherwise.rng

@@ -1 +0,0 @@
-../../default/rngs/otherwise.rng

data/cockpit/themes/preset/rngs/parallel.rng

@@ -1 +0,0 @@
-../../default/rngs/parallel.rng

data/cockpit/themes/preset/rngs/parallel_branch.rng

@@ -1 +0,0 @@
-../../default/rngs/parallel_branch.rng

data/cockpit/themes/preset/rngs/stop.rng

@@ -1 +0,0 @@
-../../default/rngs/stop.rng

data/cockpit/themes/preset/rngs/terminate.rng

@@ -1 +0,0 @@
-../../default/rngs/terminate.rng

data/lib/cpee/empty_workflow.rb

@@ -1,28 +0,0 @@
-# This file is part of CPEE.
-#
-# CPEE is free software: you can redistribute it and/or modify it under the terms
-# of the GNU General Public License as published by the Free Software Foundation,
-# either version 3 of the License, or (at your option) any later version.
-#
-# CPEE is distributed in the hope that it will be useful, but WITHOUT ANY
-# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
-# PARTICULAR PURPOSE.  See the GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License along with
-# CPEE (file COPYING in the main directory).  If not, see
-# <http://www.gnu.org/licenses/>.
-
-if Module.const_defined?(:CPEE) && CPEE.const_defined?(:DEVELOP) && CPEE::DEVELOP.const_defined?(:WEEL)
-  require File.join(CPEE::DEVELOP::WEEL,'weel')
-else
-  require 'weel'
-end
-require ::File.dirname(__FILE__) + '/../../server/handlerwrappers/default'
-
-class EmptyWorkflow < WEEL
-  handlerwrapper DefaultHandlerWrapper
-
-  control flow do
-    # control flow will be set externally
-  end
-end

data/lib/cpee/handler_notifications.rb

@@ -1,47 +0,0 @@
-# This file is part of CPEE.
-#
-# CPEE is free software: you can redistribute it and/or modify it under the terms
-# of the GNU General Public License as published by the Free Software Foundation,
-# either version 3 of the License, or (at your option) any later version.
-#
-# CPEE is distributed in the hope that it will be useful, but WITHOUT ANY
-# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
-# PARTICULAR PURPOSE.  See the GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License along with
-# CPEE (file COPYING in the main directory).  If not, see
-# <http://www.gnu.org/licenses/>.
-
-class NotificationsHandler < Riddl::Utils::Notifications::Producer::HandlerBase
-  def ws_open(socket)
-    @data.add_websocket(@key,socket)
-  end
-  def ws_close
-    @data.unserialize_notifications!(:del,@key)
-    @data.notify('handler/change', :instance => @data.instance)
-  end
-  def ws_message(data)
-    begin
-      doc = XML::Smart::string(data)
-      callback = doc.find("string(/vote/@id)")
-      result = doc.find("string(/vote)")
-      @data.callbacks[callback].callback(result == 'true' ? true : false)
-      @data.callbacks.delete(callback)
-    rescue
-      puts "Invalid message over websocket"
-    end
-  end
-
-  def create
-    @data.unserialize_notifications!(:cre,@key)
-    @data.notify('handler/change', :instance => @data.instance)
-  end
-  def delete
-    @data.unserialize_notifications!(:del,@key)
-    @data.notify('handler/change', :instance => @data.instance)
-  end
-  def update
-    @data.unserialize_notifications!(:upd,@key)
-    @data.notify('handler/change', :instance => @data.instance)
-  end
-end

data/lib/cpee/handler_properties.rb

@@ -1,50 +0,0 @@
-# This file is part of CPEE.
-#
-# CPEE is free software: you can redistribute it and/or modify it under the terms
-# of the GNU General Public License as published by the Free Software Foundation,
-# either version 3 of the License, or (at your option) any later version.
-#
-# CPEE is distributed in the hope that it will be useful, but WITHOUT ANY
-# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
-# PARTICULAR PURPOSE.  See the GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License along with
-# CPEE (file COPYING in the main directory).  If not, see
-# <http://www.gnu.org/licenses/>.
-
-class PropertiesHandler < Riddl::Utils::Properties::HandlerBase
-  def sync
-    case @property
-      when 'handlerwrapper'
-        @data.unserialize_handlerwrapper!
-        @data.notify('handlerwrapper/change', :instance => @data.instance)
-      when 'description'
-        nots = @data.unserialize_description!
-        nots.uniq.each do |noti|
-          @data.notify(*noti)
-        end
-      when 'endpoints'
-        @data.unserialize_endpoints!
-        @data.notify('endpoints/change', :label => 'external', :instance => @data.instance, :instance_name => @data.info, :instance_uuid => @data.uuid, :changed => @data.endpoints.keys, :values => @data.endpoints)
-      when 'dataelements'
-        @data.unserialize_dataelements!
-        @data.notify('dataelements/change', :label => 'external', :instance => @data.instance, :instance_name => @data.info, :instance_uuid => @data.uuid, :changed => @data.dataelements.keys, :values => @data.dataelements)
-      when 'attributes'
-        @data.unserialize_attributes!
-        @data.notify('attributes/change', :label => 'external', :instance => @data.instance, :instance_name => @data.info, :instance_uuid => @data.uuid, :changed => @data.attributes.keys, :values => @data.attributes)
-      when 'positions'
-        @data.unserialize_positions!
-        @data.notify('position/change', :instance => @data.instance)
-      when 'transformation'
-        @data.notify('transformation/change', :instance => @data.instance)
-      when 'state'
-        @data.unserialize_state!
-      else
-        nil
-    end
-  end
-
-  def create; sync; end
-  def update; sync; end
-  def delete; sync; end
-end

data/lib/cpee/instantiation.rb

@@ -1,369 +0,0 @@
-# This file is part of CPEE.
-#
-# CPEE is free software: you can redistribute it and/or modify it under the terms
-# of the GNU General Public License as published by the Free Software Foundation,
-# either version 3 of the License, or (at your option) any later version.
-#
-# CPEE is distributed in the hope that it will be useful, but WITHOUT ANY
-# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
-# PARTICULAR PURPOSE.  See the GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License along with
-# CPEE (file COPYING in the main directory).  If not, see
-# <http://www.gnu.org/licenses/>.
-
-require 'riddl/server'
-require 'securerandom'
-require 'xml/smart'
-require 'base64'
-require 'uri'
-require 'redis'
-require 'json'
-require ::File.dirname(__FILE__) + '/value_helper'
-
-module CPEE
-  module Instantiation
-
-    SERVER = File.expand_path(__dir__ + '/../instantiation.xml')
-
-    module Helpers #{{{
-      def load_testset(tdoc,cpee,name=nil,stream=nil) #{{{
-        ins = -1
-        uuid = nil
-        XML::Smart.string(tdoc) do |doc|
-          doc.register_namespace 'desc', 'http://cpee.org/ns/description/1.0'
-          doc.register_namespace 'prop', 'http://riddl.org/ns/common-patterns/properties/1.0'
-
-          srv = Riddl::Client.new(cpee, File.join(cpee,'?riddl-description'))
-          res = srv.resource("/")
-          if name
-            doc.find("/testset/attributes/prop:info").each do |e|
-              e.text = name
-            end
-          end
-          if stream && !stream.empty?
-            JSON.parse(stream).each do |e|
-              begin
-                stream = Typhoeus.get e['url']
-                if stream.success?
-                  XML::Smart::string(stream.response_body) do |str|
-                    doc.find("//desc:call[@id=\"#{e['id']}\"]/desc:parameters/desc:stream").each do |ele|
-                      ele.replace_by str.root
-                    end
-                  end
-                end
-              rescue => e
-                puts e.message
-                puts e.backtrace
-              end
-            end
-          end
-
-          status, response, headers = res.post Riddl::Parameter::Simple.new("info",doc.find("string(/testset/attributes/prop:info)"))
-
-          if status == 200
-            ins = response.first.value
-            uuid = headers['CPEE_INSTANCE_UUID']
-            params = []
-
-            res = srv.resource("/#{ins}/properties/values")
-            ["handlerwrapper","positions","dataelements","endpoints","attributes","transformation"].each do |item|
-              if doc.find("/testset/#{item}").any?
-                params << Riddl::Parameter::Simple.new("name",item)
-                params << Riddl::Parameter::Simple.new("content",doc.find("/testset/#{item}").first.dump)
-              end
-            end
-            ["description"].each do |item|
-              if doc.find("/testset/#{item}").any?
-                params << Riddl::Parameter::Simple.new("name",item)
-                params << Riddl::Parameter::Simple.new("content","<content>" + doc.find("/testset/#{item}/desc:*").first.dump + "</content>")
-              end
-            end
-            status, response = res.put params
-            ["handlers"].each do |item|
-              doc.find("/testset/#{item}/handler").each do |han|
-                #pp han.children.first
-                url =  han.attributes['url']
-                inp = "url=" + URI.encode_www_form_component(url)
-                inp = inp + "&topic=" + han.children.first.attributes['topic']
-                inp = inp + "&" + han.children.first.qname.to_s + "=" + han.children.first.to_s
-                status,body = Riddl::Client::new(cpee+ins+"/notifications/subscriptions/").post(
-                  [
-                    Riddl::Parameter::Simple.new("url",han.attributes['url']),
-                    Riddl::Parameter::Simple.new("topic",han.children.first.attributes['topic']),
-                    Riddl::Parameter::Simple.new(han.children.first.qname.to_s,han.children.first.to_s)
-                  ]
-                )
-              end
-            end
-          end
-        end
-        [ins, uuid]
-      end #}}}
-      private :load_testset
-      def handle_waiting(cpee,instance,uuid,behavior,selfurl,cblist) #{{{
-        if behavior =~ /^wait/
-          condition = behavior.match(/_([^_]+)_/)&.[](1) || 'finished'
-          @headers << Riddl::Header.new('CPEE-CALLBACK','true')
-          cb = @h['CPEE_CALLBACK']
-
-          if cb
-            cbk = SecureRandom.uuid
-            srv = Riddl::Client.new(cpee, File.join(cpee,'?riddl-description'))
-            status, response = srv.resource("/#{instance}/notifications/subscriptions/").post [
-              Riddl::Parameter::Simple.new("url",File.join(selfurl,'callback',cbk)),
-              Riddl::Parameter::Simple.new("topic","state"),
-              Riddl::Parameter::Simple.new("events","change")
-            ]
-            cblist.rpush(cbk, cb)
-            cblist.rpush(cbk, condition)
-            cblist.rpush(cbk, instance)
-            cblist.rpush(cbk, uuid)
-            cblist.rpush(cbk, File.join(cpee,instance))
-          end
-        end
-      end #}}}
-      private :handle_waiting
-      def handle_starting(cpee,instance,behavior) #{{{
-        if behavior =~ /_running$/
-          srv = Riddl::Client.new(cpee, File.join(cpee,'?riddl-description'))
-          res = srv.resource("/#{instance}/properties/values")
-          status, response = res.put [
-            Riddl::Parameter::Simple.new('name', 'state'),
-            Riddl::Parameter::Simple.new('value','running')
-          ]
-        end
-      end #}}}
-      private :handle_starting
-      def handle_data(cpee,instance,data) #{{{
-        if data && !data.empty?
-          content = XML::Smart.string('<content/>')
-          JSON::parse(data).each do |k,v|
-            content.root.add(k,v)
-          end
-          srv = Riddl::Client.new(cpee, File.join(cpee,'?riddl-description'))
-          res = srv.resource("/#{instance}/properties/values/dataelements/")
-          status, response = res.patch [
-            Riddl::Parameter::Complex.new('content','text/xml',content.to_s)
-          ]
-        end rescue nil
-      end #}}}
-      def handle_endpoints(cpee,instance,data) #{{{
-        if data && !data.empty?
-          content = XML::Smart.string('<content/>')
-          JSON::parse(data).each do |k,v|
-            content.root.add(k,v)
-          end
-          srv = Riddl::Client.new(cpee, File.join(cpee,'?riddl-description'))
-          res = srv.resource("/#{instance}/properties/values/endpoints/")
-          status, response = res.patch [
-            Riddl::Parameter::Complex.new('content','text/xml',content.to_s)
-          ]
-        end rescue nil
-      end #}}}
-    end #}}}
-
-    class InstantiateGit < Riddl::Implementation #{{{
-      include Helpers
-
-      def response
-        cpee = @h['X_CPEE'] || @a[0]
-        selfurl = @a[1]
-        cblist = @a[2]
-
-        status, res = Riddl::Client.new(File.join(@p[1].value,'raw',@p[2].value,@p[3].value).gsub(/ /,'%20')).get
-        tdoc = if status >= 200 && status < 300
-          res[0].value.read
-        else
-          (@status = 500) && return
-        end
-        stream = @p.find{ |e| e.name == 'stream' }&.value
-        if (instance, uuid = load_testset(tdoc,cpee,nil,stream)).first == -1
-          @status = 500
-        else
-          handle_data cpee, instance, @p[4]&.value if @p[4]&.name == 'init'
-          handle_endpoints cpee, instance, @p[4]&.value if @p[4]&.name == 'endpoints'
-          handle_endpoints cpee, instance, @p[5]&.value if @p[5]&.name == 'endpoints'
-
-          handle_waiting cpee, instance, uuid, @p[0].value, selfurl, cblist
-          handle_starting cpee, instance, @p[0].value
-
-          send = {
-            'CPEE-INSTANCE' => instance,
-            'CPEE-INSTANCE-URL' => File.join(cpee,instance),
-            'CPEE-INSTANCE-UUID' => uuid,
-            'CPEE-BEHAVIOR' => @p[0].value
-          }
-          @headers << Riddl::Header.new('CPEE-INSTANTIATION',JSON::generate(send))
-          Riddl::Parameter::Complex.new('instance','application/json',JSON::generate(send))
-        end
-      end
-    end  #}}}
-
-    class InstantiateUrl < Riddl::Implementation #{{{
-      include Helpers
-
-      def response
-        cpee    = @h['X_CPEE'] || @a[0]
-        selfurl = @a[1]
-        cblist  = @a[2]
-        name    = @a[3] ? @p.shift.value : nil
-
-        status, res = Riddl::Client.new(@p[1].value.gsub(/ /,'%20')).get
-        tdoc = if status >= 200 && status < 300
-          res[0].value.read
-        else
-          (@status = 500) && return
-        end
-        stream = @p.find{ |e| e.name == 'stream' }&.value
-        if (instance, uuid = load_testset(tdoc,cpee,name,stream)).first == -1
-          @status = 500
-        else
-          handle_data cpee, instance, @p[2]&.value if @p[2]&.name == 'init'
-          handle_endpoints cpee, instance, @p[2]&.value if @p[2]&.name == 'endpoints'
-          handle_endpoints cpee, instance, @p[3]&.value if @p[3]&.name == 'endpoints'
-
-          handle_waiting cpee, instance, uuid, @p[0].value, selfurl, cblist
-          handle_starting cpee, instance, @p[0].value
-
-          send = {
-            'CPEE-INSTANCE' => instance,
-            'CPEE-INSTANCE-URL' => File.join(cpee,instance),
-            'CPEE-INSTANCE-UUID' => uuid,
-            'CPEE-BEHAVIOR' => @p[0].value
-          }
-          @headers << Riddl::Header.new('CPEE-INSTANTIATION',JSON::generate(send))
-          Riddl::Parameter::Complex.new('instance','application/json',JSON::generate(send))
-        end
-      end
-    end  #}}}
-
-    class InstantiateXML < Riddl::Implementation #{{{
-      include Helpers
-
-      def response
-        cpee     = @h['X_CPEE'] || @a[0]
-        behavior = @a[1] ? 'fork_ready' : @p[0].value
-        data     = @a[1] ? 0 : 1
-        selfurl  = @a[2]
-        cblist   = @a[3]
-        tdoc = if @p[data].additional =~ /base64/
-          Base64.decode64(@p[data].value.read)
-        else
-          @p[data].value.read
-        end
-
-        if (instance, uuid = load_testset(tdoc,cpee)).first == -1
-          @status = 500
-        else
-          handle_data cpee, instance, @p[data+1]&.value
-          handle_waiting cpee, instance, uuid, behavior, selfurl, cblist
-          handle_starting cpee, instance, behavior
-
-          send = {
-            'CPEE-INSTANCE' => instance,
-            'CPEE-INSTANCE-URL' => File.join(cpee,instance),
-            'CPEE-INSTANCE-UUID' => uuid,
-            'CPEE-BEHAVIOR' => behavior
-          }
-          Riddl::Parameter::Complex.new('instance','application/json',JSON::generate(send))
-        end
-      end
-    end #}}}
-
-    class HandleInstance < Riddl::Implementation #{{{
-      include Helpers
-
-      def response
-        cpee     = @h['X_CPEE'] || @a[0]
-        selfurl  = @a[1]
-        cblist   = @a[2]
-        instance = @p[1].value
-
-        srv = Riddl::Client.new(cpee, File.join(cpee,'?riddl-description'))
-        res = srv.resource("/#{instance}/properties/values/attributes/uuid")
-        status, response = res.get
-
-        if status >= 200 && status < 300
-          uuid = XML::Smart::string(response.first.value).root.text
-          handle_data cpee, instance, @p[2]&.value
-          handle_waiting cpee, instance, uuid, @p[0].value, selfurl, cblist
-          handle_starting cpee, instance, @p[0].value
-          return Riddl::Parameter::Simple.new("url",cpee + instance)
-        end
-      end
-    end #}}}
-
-    class ContinueTask < Riddl::Implementation #{{{
-      def response
-        cblist       = @a[1]
-        topic        = @p[1].value
-        event_name   = @p[2].value
-        notification = JSON.parse(@p[3].value)
-
-        key = @r.last
-        cb, condition, instance, uuid, instance_url = cblist.lrange(key,0,-1)
-
-        cpee = File.dirname(instance_url)
-
-        orisend = {
-          'CPEE-INSTANCE' => instance,
-          'CPEE-INSTANCE-URL' => instance_url,
-          'CPEE-INSTANCE-UUID' => uuid,
-          'CPEE-STATE' => notification['state']
-        }
-        send = orisend.dup
-
-        if notification['state'] == condition
-          cblist.del(key)
-          srv = Riddl::Client.new(cpee, File.join(cpee,'?riddl-description'))
-          res = srv.resource("/#{instance}/properties/values/dataelements")
-          status, response = res.get
-          if status >= 200 && status < 300
-            doc = XML::Smart.string(response[0].value.read)
-            doc.register_namespace 'p', 'http://riddl.org/ns/common-patterns/properties/1.0'
-            doc.find('/p:value/*').each do |e|
-              send[e.qname.name] = CPEE::ValueHelper::parse(e.text)
-            end
-          end
-          Riddl::Client.new(cb).put Riddl::Parameter::Complex.new('dataelements','application/json',JSON::generate(send))
-        else
-          Riddl::Client.new(cb).put [
-            Riddl::Header.new('CPEE-UPDATE','true'),
-            Riddl::Parameter::Complex.new('dataelements','application/json',JSON::generate(send))
-          ]
-        end
-      end
-    end #}}}
-
-    def self::implementation(opts)
-      opts[:cpee] ||= 'http://localhost:9298/'
-      opts[:self] ||= "http#{opts[:secure] ? 's' : ''}://#{opts[:host]}:#{opts[:port]}/"
-      opts[:cblist] = Redis.new(path: "/tmp/redis.sock", db: 14)
-      Proc.new do
-        on resource do
-          run InstantiateXML, opts[:cpee], true if post 'xmlsimple'
-          on resource 'xml' do
-            run InstantiateXML, opts[:cpee], false if post 'xml'
-          end
-          on resource 'url' do
-            run InstantiateUrl, opts[:cpee], opts[:self], opts[:cblist], false if post 'url'
-            run InstantiateUrl, opts[:cpee], opts[:self], opts[:cblist], true  if post 'url_info'
-          end
-          on resource 'git' do
-            run InstantiateGit, opts[:cpee], opts[:self], opts[:cblist] if post 'git'
-          end
-          on resource 'instance' do
-            run HandleInstance, opts[:cpee] if post 'instance'
-          end
-          on resource 'callback' do
-            on resource do
-              run ContinueTask, opts[:cpee], opts[:cblist] if post
-            end
-          end
-        end
-      end
-    end
-
-  end
-end