Changeset 3092 for cats/shared
- Timestamp:
- 07/01/13 13:12:42 (11 years ago)
- Location:
- cats/shared/urn.org.isocat.sloot/trunk
- Files:
-
- 2 added
- 3 edited
-
module.xml (modified) (2 diffs)
-
tools/pp-dpml.dpml (added)
-
tools/pp-dpml.xsl (added)
-
tools/xpath2.dpml (modified) (2 diffs)
-
tools/xquery.dpml (modified) (7 diffs)
Legend:
- Unmodified
- Added
- Removed
-
cats/shared/urn.org.isocat.sloot/trunk/module.xml
r3077 r3092 67 67 </request> 68 68 </endpoint> 69 <endpoint> 70 <grammar> 71 <active> 72 <identifier>active:sloot.dpml</identifier> 73 <argument name="operator"/> 74 <varargs/> 75 </active> 76 </grammar> 77 <verbs>SOURCE,SINK,EXISTS,DELETE,NEW</verbs> 78 <request> 79 <identifier>active:dpml</identifier> 80 <argument name="operator">res:/tools/pp-dpml.dpml</argument> 81 <argument name="sloot-operator">arg:operator</argument> 82 <varargs/> 83 </request> 84 </endpoint> 69 85 </config> 70 86 <space> … … 74 90 <fileset> 75 91 <regex>res:/debug/.*</regex> 92 <mutable/> 76 93 </fileset> 77 94 <import> -
cats/shared/urn.org.isocat.sloot/trunk/tools/xpath2.dpml
r3004 r3092 1 1 <?xml version="1.0" encoding="UTF-8"?> 2 2 <sequence> 3 <!-- use xquery to turn any operand into an XML, so we can conveniently evaluate a XPath expression --> 3 <literal assignment="debug" type="boolean">false</literal> 4 <!-- use xquery to turn any operand into an XML, so we can conveniently evaluate a XPath expression --> 4 5 <request assignment="o"> 5 6 <identifier>active:xquery</identifier> 6 7 <argument name="operator"> 7 <literal type="string"> 8 <literal type="string" 9 > 8 10 declare variable $o external; 9 <o>{$o}</o>11 if ($o instance of node()) then ($o) else (<o>{$o}</o>) 10 12 </literal> 11 13 </argument> 12 14 <argument name="o">arg:operand</argument> 13 15 </request> 14 <log> 15 <level>INFO</level> 16 <message> 17 <literal type="string">[%1]</literal> 18 </message> 19 <param>this:o</param> 20 </log> 16 <if> 17 <cond> 18 <request> 19 <identifier>this:debug</identifier> 20 </request> 21 </cond> 22 <then> 23 <log> 24 <level>INFO</level> 25 <message> 26 <literal type="string">sloot.xpath: [%1] ? [%2]</literal> 27 </message> 28 <param>this:o</param> 29 <param>arg:xpath</param> 30 </log> 31 </then> 32 </if> 21 33 <request assignment="response"> 22 34 <identifier>active:xpath2</identifier> … … 24 36 <argument name="operator">arg:xpath</argument> 25 37 </request> 26 <log> 27 <level>INFO</level> 28 <message> 29 <literal type="string">[%1] ? [%2] = [%3]</literal> 30 </message> 31 <param>arg:operand</param> 32 <param>arg:xpath</param> 33 <param>this:response</param> 34 </log> 38 <if> 39 <cond> 40 <request> 41 <identifier>this:debug</identifier> 42 </request> 43 </cond> 44 <then> 45 <log> 46 <level>INFO</level> 47 <message> 48 <literal type="string">sloot.xpath: [%1] ? [%2] = [%3]</literal> 49 </message> 50 <param>arg:operand</param> 51 <param>arg:xpath</param> 52 <param>this:response</param> 53 </log> 54 </then> 55 </if> 35 56 </sequence> -
cats/shared/urn.org.isocat.sloot/trunk/tools/xquery.dpml
r3077 r3092 2 2 <sequence> 3 3 <!-- convenience wrapper around active:xquery, which allows to have the XQuery as an XML literal so its wellformedness is easily checked --> 4 <request> 5 <verb>SINK</verb> 6 <identifier>res:/debug/sloot.xquery.query.xml</identifier> 7 <argument name="primary">arg:query</argument> 8 </request> 4 <literal assignment="debug" type="boolean">false</literal> 5 <if> 6 <cond> 7 <request> 8 <identifier>this:debug</identifier> 9 </request> 10 </cond> 11 <then> 12 <request> 13 <verb>SINK</verb> 14 <identifier>res:/debug/sloot.xquery.query.xml</identifier> 15 <argument name="primary">arg:query</argument> 16 </request> 17 </then> 18 </if> 9 19 <request assignment="query"> 10 20 <identifier>active:xslt2</identifier> … … 20 30 <xsl:variable name="query"> 21 31 <!-- turn the namespaces in scope of the root element into 'declare namespace' statements --> 22 <xsl:for-each select="in-scope-prefixes($root)[not(.=('xml','xs','xsi','fn','local'))]"> 32 <xsl:for-each 33 select="in-scope-prefixes($root)[not(.=('xml','xs','xsi','fn','local'))]"> 23 34 <xsl:variable name="prefix" select="current()"/> 24 35 <xsl:choose> 25 36 <xsl:when test="$prefix=''"> 26 37 <xsl:text>declare default namespace "</xsl:text> 27 <xsl:value-of select="namespace-uri-for-prefix($prefix,$root)"/> 38 <xsl:value-of 39 select="namespace-uri-for-prefix($prefix,$root)"/> 28 40 <xsl:text>";</xsl:text> 29 41 <xsl:value-of select="$NL"/> … … 33 45 <xsl:value-of select="$prefix"/> 34 46 <xsl:text> = "</xsl:text> 35 <xsl:value-of select="namespace-uri-for-prefix($prefix,$root)"/> 47 <xsl:value-of 48 select="namespace-uri-for-prefix($prefix,$root)"/> 36 49 <xsl:text>";</xsl:text> 37 50 <xsl:value-of select="$NL"/> … … 40 53 </xsl:for-each> 41 54 <!-- turn the arguments into 'declare variable' statements --> 42 <xsl:for-each select="$vararg/arguments/*[not(name()=('operand','operator'))]"> 55 <xsl:for-each 56 select="$vararg/arguments/*[not(name()=('operand','operator'))]"> 43 57 <xsl:variable name="var" select="name()"/> 44 <xsl:message>DBG: variable name[<xsl:value-of select="$var"/>]</xsl:message> 58 <xsl:message>DBG: variable name[<xsl:value-of select="$var" 59 />]</xsl:message> 45 60 <xsl:text>declare variable $</xsl:text> 46 61 <xsl:value-of select="$var"/> … … 69 84 <xsl:value-of select="name()"/> 70 85 <xsl:text>="</xsl:text> 71 <xsl:value-of select="replace(replace(replace(replace(replace(.,'&','&amp;'),'''','&apos;'),'<','&lt;'),'>','&gt;'),'"','&quot;')"/> 86 <xsl:value-of 87 select="replace(replace(replace(replace(replace(.,'&','&amp;'),'''','&apos;'),'<','&lt;'),'>','&gt;'),'"','&quot;')"/> 72 88 <xsl:text>"</xsl:text> 73 89 </xsl:template> 74 90 <!-- turn a text node into an escaped XML string --> 75 91 <xsl:template match="text()"> 76 <xsl:value-of select="replace(replace(replace(replace(replace(.,'&','&amp;'),'''','&apos;'),'<','&lt;'),'>','&gt;'),'"','&quot;')"/> 92 <xsl:value-of 93 select="replace(replace(replace(replace(replace(.,'&','&amp;'),'''','&apos;'),'<','&lt;'),'>','&gt;'),'"','&quot;')" 94 /> 77 95 </xsl:template> 78 96 </xsl:stylesheet> … … 94 112 </argument> 95 113 </request> 96 <request> 97 <verb>SINK</verb> 98 <identifier>res:/debug/sloot.xquery.query.xq</identifier> 99 <argument name="primary">this:query</argument> 100 </request> 114 <if> 115 <cond> 116 <request> 117 <identifier>this:debug</identifier> 118 </request> 119 </cond> 120 <then> 121 <request> 122 <verb>SINK</verb> 123 <identifier>res:/debug/sloot.xquery.query.xq</identifier> 124 <argument name="primary">this:query</argument> 125 </request> 126 </then> 127 </if> 101 128 <request assignment="response"> 102 129 <identifier>active:xquery</identifier> … … 104 131 <varargs/> 105 132 </request> 106 <request> 107 <verb>SINK</verb> 108 <identifier>res:/debug/sloot.xquery.result.xml</identifier> 109 <argument name="primary">this:response</argument> 110 </request> 133 <if> 134 <cond> 135 <request> 136 <identifier>this:debug</identifier> 137 </request> 138 </cond> 139 <then> 140 <request> 141 <verb>SINK</verb> 142 <identifier>res:/debug/sloot.xquery.result.xml</identifier> 143 <argument name="primary">this:response</argument> 144 </request> 145 </then> 146 </if> 111 147 </sequence>
Note: See TracChangeset
for help on using the changeset viewer.
