cpee 1.3.102

data/server/resources/properties.schema.inactive

@@ -0,0 +1,79 @@
+<!--
+  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/>.
+-->
+
+<properties xmlns="http://riddl.org/ns/common-patterns/properties/1.0">
+  <name type="simple" modifiable="false" mutable="false">
+    <text/>
+  </name>
+  <handlerwrapper type="simple" modifiable="true">
+    <data type="string">
+      <param name="pattern">[A-Z][a-zA-Z]*</param>
+    </data>  
+  </handlerwrapper>
+  <dsl type="simple" modifiable="false" mutable="false">
+    <text/>
+  </dsl>
+  <description type="arbitrary" modifiable="true"/>
+  <optional>
+    <transformation type="arbitrary" modifiable="true"/>
+  </optional>  
+  <state type="state" modifiable="true">
+    <ready>
+      <running putable="true"/>
+    </ready>  
+    <running>
+      <stopping putable="true"/>
+      <finished putable="false"/>
+    </running>
+    <stopping>
+      <stopped putable="false"/>
+    </stopping>
+    <stopped>
+      <running putable="true"/>
+    </stopped>  
+    <finished/>
+  </state>  
+  <status type="complex" modifiable="false" mutable="false">
+    <optional>
+      <element name='id'>
+        <data type="integer"/>
+      </element>
+      <element name='message'>
+        <data type="string"/>
+      </element>
+    </optional>  
+  </status>  
+  <positions type="complex" modifiable="true">
+    <zeroOrMore>
+      <element>
+        <anyName/>
+        <data type="string">
+          <param name="pattern">(at|after)(;[A-Za-z0-9]+)?</param>
+        </data>  
+      </element>
+    </zeroOrMore>  
+  </positions>  
+  <dataelements type="complex" modifiable="true">
+    <zeroOrMore>
+      <element><anyName/><text/></element>
+    </zeroOrMore>  
+  </dataelements>  
+  <endpoints type="complex" modifiable="true">
+    <zeroOrMore>
+      <element><anyName/><text/></element>
+    </zeroOrMore>  
+  </endpoints>
+</properties>

data/server/resources/topics.xml

@@ -0,0 +1,55 @@
+<!--
+  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/>.
+-->
+
+<topics xmlns='http://riddl.org/ns/common-patterns/notifications-producer/1.0'>
+  <topic id='running'>
+    <event>activity_calling</event>
+    <event>activity_failed</event>
+    <event>activity_manipulating</event>
+    <event>activity_done</event>
+    <vote>syncing_before</vote>
+    <vote>syncing_after</vote>
+  </topic>
+  <topic id='properties/position'>
+    <event>change</event>
+  </topic>
+  <topic id='properties/description'>
+    <event>change</event>
+    <event>error</event>
+  </topic>
+  <topic id='properties/state'>
+    <event>change</event>
+    <vote>change</vote>
+  </topic>
+  <topic id='properties/status'>
+    <event>change</event>
+  </topic>
+  <topic id='properties/dataelements'>
+    <event>change</event>
+  </topic>
+  <topic id='properties/endpoints'>
+    <event>change</event>
+  </topic>
+  <topic id='properties/handlerwrapper'>
+    <event>change</event>
+  </topic>
+  <topic id='properties/handlers'>
+    <event>change</event>
+    <event>error</event>
+    <event>debug</event>
+    <event>info</event>
+  </topic>
+</topics>

data/server/server.rb

@@ -0,0 +1,25 @@
+#!/usr/bin/ruby
+<!--
+  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 File.expand_path(File.dirname(__FILE__) + '/../lib/cpee/implementation')
+
+Riddl::Server.new(CPEE::SERVER, :port => 9298) do
+  accessible_description true
+  cross_site_xhr true
+
+  use CPEE::implementation(@riddl_opts)
+end.loop!

data/server/todo.txt

@@ -0,0 +1,20 @@
+cockpit: 
+* replace downloadify
+* restrict to http://caniuse.com/download FF>=20
+
+server
+* controller properties_backend (give correct one based on running, stopped, finished)
+* controller notifications_backend
+
+* allow to configure instances location
+* allow to configure handlerwrapper location
+* allow 
+* schemas and init to new location
+
+* handle xmpp://, ws://, http:// for notifications
+
+riddl
+* handle xmpp://, ws://, http:// for requests
+
+
+

data/test/delete.rb

@@ -0,0 +1,27 @@
+#!/usr/bin/ruby
+require 'rubygems'
+require 'riddl/client'
+require 'xml/smart'
+require 'pp'
+
+namepattern = /Performance \d+/
+cpees = [
+  "http://localhost:9298/"
+]
+
+cpees.each do |cpee|
+  srv  = Riddl::Client.new(cpee)
+  res = srv.resource("/")
+  status, response = res.get
+  doc = XML::Smart::string(response.first.value.read)
+  ins = doc.find("/instances/instance")
+  unless ins.empty?
+    ins.each do |e|
+      next unless e.text =~ namepattern
+      p e.text
+      res = srv.resource("/#{e.attributes['id']}")
+      status, response = res.delete
+    end
+  end  
+end
+

data/test/load.rb

@@ -0,0 +1,55 @@
+#!/usr/bin/ruby
+require 'rubygems'
+require 'riddl/client'
+require 'xml/smart'
+require 'pp'
+
+numinstances = 4
+cpee = "http://localhost:9298/"
+
+def create_instance(srv,name)
+  res = srv.resource("/")
+  status, response = res.post [
+    Riddl::Parameter::Simple.new("name","Performance #{name}")
+  ]
+  ins = -1
+  if status == 200
+    ins = response.first.value
+    params = []
+
+    XML::Smart.open("testset.xml") do |doc|
+      doc.register_namespace 'desc', 'http://cpee.org/ns/description/1.0'
+      res = srv.resource("/#{ins}/properties/values")
+      #["transformation"].each do |item|
+      #  status, response = res.post [ 
+      #    Riddl::Parameter::Simple.new("property",item)
+      #  ]
+      #end
+      ["handlerwrapper","positions","dataelements","endpoints","transformation"].each do |item|
+        params << Riddl::Parameter::Simple.new("name",item)
+        params << Riddl::Parameter::Simple.new("content",doc.find("/testset/#{item}").first.dump)
+      end  
+      ["description"].each do |item|
+        params << Riddl::Parameter::Simple.new("name",item)
+        params << Riddl::Parameter::Simple.new("content","<content>" + doc.find("/testset/desc:#{item}").first.dump + "</content>")
+      end
+        params << Riddl::Parameter::Simple.new("name",'state')
+        params << Riddl::Parameter::Simple.new("value","running")
+
+      status, response = res.put params
+    end   
+  end
+  ins
+end  
+
+t = []
+tim = Time.now.to_f
+1.upto(numinstances) do |name|
+#  t << Thread.new(name) { |name|
+    srv  = Riddl::Client.new(cpee)
+    puts create_instance(srv,name)
+#  }
+end
+
+#t.each { |k| k.join }
+puts Time.now.to_f - tim

data/test/testset.xml

@@ -0,0 +1,297 @@
+<?xml version="1.0"?>
+<testset>
+  <positions/>
+  <handlerwrapper>DefaultHandlerWrapper</handlerwrapper>
+  <dataelements><!--{{{-->
+    <input>""</input>
+    <return>"%s World"</return>
+  </dataelements><!--}}}-->
+  <handlers/>
+  <endpoints/>
+  <description xmlns="http://cpee.org/ns/description/1.0"><!--{{{-->
+    <manipulate id="a1">data.return = data.return % data.input</manipulate>
+  </description><!--}}}-->
+  <transformation>
+    <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:d="http://cpee.org/ns/description/1.0">
+      <xsl:output method="text"/>
+      <xsl:strip-space elements="*"/>
+      <xsl:variable name="myspacemultiplier">2</xsl:variable>
+
+      <xsl:template match="/">
+        <xsl:apply-templates select="//d:description"/>
+      </xsl:template>
+
+      <xsl:template match="//d:description">
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="-1*$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>  
+      </xsl:template>
+
+      <xsl:template match="*">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:if test="name()='call' or name()='manipulate'">
+          <xsl:text>activity :</xsl:text>
+          <xsl:value-of select="@id"/>
+        </xsl:if>
+        <xsl:if test="name()='call'">
+          <xsl:text>, :call, :</xsl:text>
+          <xsl:value-of select="@endpoint"/>
+          <xsl:apply-templates select="d:parameters"/>
+          <xsl:apply-templates select="d:manipulate" mode="part-of-call">
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='manipulate'">
+          <xsl:text>, :manipulate</xsl:text>
+          <xsl:call-template name="print-content">
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='parallel'">
+          <xsl:text>parallel</xsl:text>
+          <xsl:if test="@wait">
+            <xsl:text> :wait => </xsl:text>
+            <xsl:value-of select="@wait"/>
+          </xsl:if>
+          <xsl:text> do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='loop'">
+          <xsl:text>loop </xsl:text>
+          <xsl:if test="@pre_test">
+            <xsl:text>pre_test{</xsl:text>
+            <xsl:value-of select="@pre_test"/>
+            <xsl:text>} </xsl:text>
+          </xsl:if>
+          <xsl:if test="@post_test">
+            <xsl:text>post_test{</xsl:text>
+            <xsl:value-of select="@post_test"/>
+            <xsl:text>} </xsl:text>
+          </xsl:if>
+          <xsl:text>do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='choose'">
+          <xsl:text>choose do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='group'">
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+        <xsl:if test="name()='critical'">
+          <xsl:text>critical :</xsl:text>
+          <xsl:value-of select="@sid"/>
+          <xsl:text> do</xsl:text>
+          <xsl:call-template name="print-newline"/>
+          <xsl:apply-templates>
+            <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:apply-templates>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+          <xsl:call-template name="print-newline"/>
+        </xsl:if>
+      </xsl:template>
+      
+      <xsl:template match="d:alternative">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>alternative </xsl:text>
+        <xsl:value-of select="@condition"/>
+        <xsl:text> do</xsl:text>
+        <xsl:call-template name="print-newline"/>
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>end</xsl:text>
+        <xsl:call-template name="print-newline"/>
+      </xsl:template>
+
+      <xsl:template match="d:otherwise">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>otherwise do</xsl:text>
+        <xsl:call-template name="print-newline"/>
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>end</xsl:text>
+        <xsl:call-template name="print-newline"/>
+      </xsl:template>
+
+      <xsl:template match="d:parallel_branch">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>parallel_branch</xsl:text>
+        <xsl:if test="@pass">
+          <xsl:text> </xsl:text>
+          <xsl:value-of select="@pass"/>
+        </xsl:if>
+        <xsl:text> do</xsl:text>
+        <xsl:if test="@local">
+          <xsl:text> |</xsl:text>
+          <xsl:value-of select="@local"/>
+          <xsl:text>|</xsl:text>
+        </xsl:if>
+        <xsl:call-template name="print-newline"/>
+        <xsl:apply-templates>
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:apply-templates>
+        <xsl:call-template name="print-space">
+          <xsl:with-param name="i">1</xsl:with-param>
+          <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+        </xsl:call-template>
+        <xsl:text>end</xsl:text>
+        <xsl:call-template name="print-newline"/>
+      </xsl:template>
+
+      <xsl:template match="d:parameters">
+        <xsl:apply-templates select="d:*" mode="parameter"/>
+      </xsl:template>
+        
+      <xsl:template match="d:*" mode="parameter">
+        <xsl:text>, :</xsl:text>
+        <xsl:value-of select="name()"/>
+        <xsl:text> => </xsl:text>
+        <xsl:choose>  
+          <xsl:when test="count(*) > 0">
+            <xsl:text>[</xsl:text>
+            <xsl:apply-templates select="d:*" mode="sub-parameter"/>
+            <xsl:text>]</xsl:text>
+          </xsl:when>
+          <xsl:otherwise>
+            <xsl:choose>
+              <xsl:when test="@type = 'symbolic'">
+                <xsl:value-of select="text()"/>
+              </xsl:when>
+              <xsl:otherwise>
+                <xsl:text>"</xsl:text>
+                <xsl:value-of select="text()"/>
+                <xsl:text>"</xsl:text>
+              </xsl:otherwise>
+            </xsl:choose>  
+          </xsl:otherwise>
+        </xsl:choose>  
+      </xsl:template>
+      
+      <xsl:template match="d:*" mode="sub-parameter">
+        <xsl:text> { :</xsl:text>
+        <xsl:value-of select="name()"/>
+        <xsl:text> => </xsl:text>
+        <xsl:value-of select="text()"/>
+        <xsl:text> }</xsl:text>
+        <xsl:choose>  
+          <xsl:when test="generate-id(.) = generate-id(../*[last()])">
+            <xsl:text> </xsl:text>
+          </xsl:when>
+          <xsl:otherwise>
+            <xsl:text>,</xsl:text>
+          </xsl:otherwise>
+        </xsl:choose>  
+      </xsl:template>
+
+      <xsl:template match="d:manipulate" mode="part-of-call">
+        <xsl:param name="myspace"/>
+        <xsl:call-template name="print-content">
+          <xsl:with-param name="myspace"><xsl:value-of select="$myspace"/></xsl:with-param>
+        </xsl:call-template>
+      </xsl:template>
+
+      <xsl:template name="print-content">
+        <xsl:param name="myspace"/>
+        <xsl:if test="text()">
+          <xsl:text> do </xsl:text>
+          <xsl:if test="@output">
+            <xsl:text>|</xsl:text>
+            <xsl:value-of select="@output"/>
+            <xsl:text>|</xsl:text>
+          </xsl:if>
+          <xsl:call-template name="print-newline"/>
+          <xsl:value-of select="text()"/>
+          <xsl:call-template name="print-newline"/>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">1</xsl:with-param>
+            <xsl:with-param name="count"><xsl:value-of select="$myspace+$myspacemultiplier"/></xsl:with-param>
+          </xsl:call-template>
+          <xsl:text>end</xsl:text>
+        </xsl:if>
+      </xsl:template>
+
+      <xsl:template name="print-space">
+        <xsl:param name="i"/>
+        <xsl:param name="count"/>
+        <xsl:if test="$i &lt;= $count">
+          <xsl:text> </xsl:text>
+          <xsl:call-template name="print-space">
+            <xsl:with-param name="i">
+              <xsl:value-of select="$i + 1"/>
+            </xsl:with-param>
+            <xsl:with-param name="count">
+              <xsl:value-of select="$count"/>
+            </xsl:with-param>
+          </xsl:call-template>
+        </xsl:if>
+      </xsl:template>
+      <xsl:template name="print-newline">
+        <xsl:text>
+</xsl:text>
+      </xsl:template>
+
+    </xsl:stylesheet>
+  </transformation>
+</testset>