]> matita.cs.unibo.it Git - helm.git/commitdiff
First implementation of graphs stuff. Working on my notebook,
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Mon, 1 Oct 2001 09:52:16 +0000 (09:52 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Mon, 1 Oct 2001 09:52:16 +0000 (09:52 +0000)
probably not working on-line, yet.

helm/style/mk_dep_graph.xsl [new file with mode: 0644]
helm/style/mk_meta_graph.xsl [new file with mode: 0644]

diff --git a/helm/style/mk_dep_graph.xsl b/helm/style/mk_dep_graph.xsl
new file mode 100644 (file)
index 0000000..251dc65
--- /dev/null
@@ -0,0 +1,179 @@
+<?xml version="1.0"?>
+
+<!-- Copyright (C) 2000, HELM Team                                     -->
+<!--                                                                   -->
+<!-- This file is part of HELM, an Hypertextual, Electronic            -->
+<!-- Library of Mathematics, developed at the Computer Science         -->
+<!-- Department, University of Bologna, Italy.                         -->
+<!--                                                                   -->
+<!-- HELM 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 2    -->
+<!-- of the License, or (at your option) any later version.            -->
+<!--                                                                   -->
+<!-- HELM 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 HELM; if not, write to the Free Software               -->
+<!-- Foundation, Inc., 59 Temple Place - Suite 330, Boston,            -->
+<!-- MA  02111-1307, USA.                                              -->
+<!--                                                                   -->
+<!-- For details, see the HELM World-Wide-Web page,                    -->
+<!-- http://cs.unibo.it/helm/.                                         -->
+
+<!-- CSC: Sostituire l'andata a capo con la entity numerica opportuna -->
+<!DOCTYPE html [
+ <!ENTITY CSCbr "
+">
+]>
+
+<xsl:stylesheet version="0.1" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+                              xmlns:ht="http://www.cs.unibo.it/helm/namespaces/helm-theory">
+
+<xsl:output method="text"/>
+
+<xsl:param name="CICURI" select="''"/>
+<xsl:param name="PID" select="''"/>
+<xsl:param name="maxDepth" select="4"/>
+<xsl:param name="getterURL" select="''"/>
+<xsl:variable name="base_URL_of_CIC_URI" select="concat($getterURL,'getxml?uri=')"/>
+
+<!-- CSC: next function because I don't remember the name of the    -->
+<!-- CSC: subst function of xslt and I don't have the specs with me -->
+<xsl:template name="quote">
+ <xsl:param name="s" select="''"/>
+ <xsl:param name="news" select="''"/>
+ <xsl:choose>
+  <xsl:when test="$s = ''"><xsl:value-of select="$news"/></xsl:when>
+  <xsl:otherwise>
+   <xsl:variable name="char" select="substring($s,1,1)"/>
+   <xsl:choose>
+    <xsl:when test="$char = '/'">
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,'X')"/>
+     </xsl:call-template>
+    </xsl:when>
+    <xsl:when test="$char = ':'">
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,'Y')"/>
+     </xsl:call-template>
+    </xsl:when>
+    <xsl:when test="$char = '.'">
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,'Z')"/>
+     </xsl:call-template>
+    </xsl:when>
+    <xsl:when test='$char = "&apos;"'>
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,'W')"/>
+     </xsl:call-template>
+    </xsl:when>
+    <xsl:when test="$char = '-'">
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,'J')"/>
+     </xsl:call-template>
+    </xsl:when>
+    <xsl:otherwise>
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,$char)"/>
+     </xsl:call-template>
+    </xsl:otherwise>
+   </xsl:choose>
+  </xsl:otherwise>
+ </xsl:choose>
+</xsl:template>
+
+<xsl:template match="/">
+ <!-- dep_url_scheme -->
+ <xsl:text>http://localhost:8083/draw?url=http%3A//localhost%3A8080/helm/servlet/uwobo/apply%3Fxmluri%3Dhttp%3A//localhost%3A8081/getxml%253Furi%253D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>%26keys%3DMDG%26param.getterURL%3Dhttp%253A//localhost%253A8081/%26prop.media-type%3Dtext/plain%26param.CICURI%3D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>&CSCbr;</xsl:text>
+ <!-- meta_url_scheme -->
+ <xsl:text>http://localhost:8083/draw?url=http%3A%2F%2Flocalhost%3A8080%2Fhelm%2Fservlet%2Fuwobo%2Fapply%3Fxmluri%3Dhttp%3A%2F%2Flocalhost%3A8081%2Fgetxml%253Furi%253Dhelm%3Ardf%3Awww%2Ecs%2Eunibo.it/helm/rdf/rdfprova//</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>%26keys%3DMMG%26param.getterURL%3Dhttp%253A//localhost%253A8081/%26prop.media-type%3Dtext/plain%26param.CICURI%3D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>%26keys%3DMMG%26param%2EgetterURL%3Dhttp%253A%2F%2Flocalhost%253A8081%2F%26prop%2Emedia%2Dtype%3Dtext%2Fplain%26param%2ECICURI%3D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>&CSCbr;</xsl:text>
+ <!-- cic_url_scheme -->
+ <xsl:text>file:///projects/helm/on-line/html/cic/index.html?url=http://localhost:8080/helm/servlet/uwobo/apply%3Fkeys%3DC1%252CHC2%252CL%26prop.media-type%3Dtext/html%26prop.encoding%3Diso-8859-1%26param.naturalLanguage%3Dyes%26param.UNICODEvsSYMBOL%3Dsymbol%26param.annotations%3DNO%26prop.doctype-public%3D-//W3C//DTD%2520XHTML%25201.0%2520Transitional//EN%26param.doctype-public%3D-//W3C//DTD%2520XHTML%25201.0%2520Transitional//EN%26param.encoding%3Diso-8859-1%26param.media-type%3Dtext/html%26param.keys%3DC1%252CHC2%252CL%26param.getterURL%3Dhttp://localhost:8081/%26param.processorURL%3Dhttp://localhost:8080/helm/servlet/uwobo/%26param.interfaceURL%3Dfile:///projects/helm/on-line/html/cic/index.html%26param.topurl%3Dfile:///projects/helm/on-line%26xmluri%3Dhttp://localhost:8081/getxml%253Furi%253D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>%26param.CICURI%3D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>&CSCbr;</xsl:text>
+ <!--
+ <xsl:text>strict digraph L0 { size = "83,83"; concentrate=true; node [style=filled, shape = box];&CSCbr;</xsl:text>
+ -->
+ <xsl:text>strict digraph L0 { size = "83,83"; node [style=filled, shape = box];&CSCbr;</xsl:text>
+ <!-- The nonce is used to force the document reload -->
+ <xsl:variable name="dummy1" select="document(concat('http://localhost:8084/add_if_not_in?uri=',$CICURI,'&amp;nonce=',generate-id(),'&amp;PID=',$PID))"/>
+ <xsl:apply-templates mode="loop" select="document(concat('http://localhost:8084/get_next?uri=',$CICURI,'&amp;nonce=',generate-id(),'&amp;PID=',$PID))"/>
+ <xsl:variable name="dummy2" select="document(concat('http://localhost:8084/reset_to_empty?PID=',$PID))"/>
+ <xsl:text>}</xsl:text>
+</xsl:template>
+
+<xsl:template mode="loop" match="empty"/>
+
+<xsl:template mode="loop" match="uri|marked_uri">
+ <xsl:apply-templates mode="first_time" select="document(concat($base_URL_of_CIC_URI,@value))/*">
+  <xsl:with-param name="currentCICURI" select="@value"/>
+  <xsl:with-param name="quotedCurrentCICURI">
+   <xsl:call-template name="quote">
+    <xsl:with-param name="s" select="@value"/>
+   </xsl:call-template>
+  </xsl:with-param>
+  <xsl:with-param name="do_not_visit" select="name(.)"/>
+ </xsl:apply-templates>
+ <!-- The couple (uri,nonce) is used to force the document reload -->
+ <xsl:apply-templates mode="loop" select="document(concat('http://localhost:8084/get_next?uri=',@value,'&amp;nonce=',generate-id(),'&amp;PID=',$PID))"/>
+</xsl:template>
+
+<xsl:template mode="first_time" match="*">
+ <xsl:param name="currentCICURI" select="''"/>
+ <xsl:param name="quotedCurrentCICURI" select="''"/>
+ <xsl:param name="do_not_visit" select="'uri'"/>
+ <xsl:text> </xsl:text>
+ <xsl:value-of select="$quotedCurrentCICURI"/>
+<!-- <xsl:text> [fontname="LucidaSansRegular",color=red,label="</xsl:text> -->
+ <xsl:text> [label="</xsl:text>
+ <xsl:value-of select="$currentCICURI"/>
+ <xsl:text>",URL="</xsl:text>
+ <xsl:value-of select="$currentCICURI"/>
+ <xsl:text>"</xsl:text>
+ <xsl:if test="$do_not_visit='marked_uri'">
+  <xsl:text>,color=red</xsl:text>
+ </xsl:if>
+ <xsl:text>];&CSCbr;</xsl:text>
+ <xsl:if test="$do_not_visit='uri'">
+  <xsl:apply-templates select=".">
+   <xsl:with-param name="maxDepth" select="$newMaxDepth"/>
+   <xsl:with-param name="currentCICURI" select="$currentCICURI"/>
+   <xsl:with-param name="quotedCurrentCICURI" select="$quotedCurrentCICURI"/>
+  </xsl:apply-templates>
+ </xsl:if>
+</xsl:template>
+
+<!-- CSC: uriType missing!!! -->
+<xsl:template match="*">
+ <xsl:param name="currentCICURI" select="''"/>
+ <xsl:param name="quotedCurrentCICURI" select="''"/>
+ <xsl:if test="@uri">
+  <xsl:variable name="quotedURI">
+   <xsl:call-template name="quote">
+    <xsl:with-param name="s" select="@uri"/>
+   </xsl:call-template>
+  </xsl:variable>
+  <xsl:text> </xsl:text>
+  <xsl:value-of select="$quotedCurrentCICURI"/>
+  <xsl:text> -&gt; </xsl:text>
+  <xsl:value-of select="$quotedURI"/>
+  <xsl:text>;&CSCbr;</xsl:text>
+  <!-- The nonce is used to force the document reload -->
+  <xsl:variable name="dummy" select="document(concat('http://localhost:8084/add_if_not_in?uri=',@uri,'&amp;nonce=',generate-id(),'&amp;PID=',$PID))"/>
+ </xsl:if>
+ <xsl:apply-templates>
+  <xsl:with-param name="currentCICURI" select="$currentCICURI"/>
+  <xsl:with-param name="quotedCurrentCICURI" select="$quotedCurrentCICURI"/>
+ </xsl:apply-templates>
+</xsl:template>
+
+<xsl:template match="text()"/>
+</xsl:stylesheet>
diff --git a/helm/style/mk_meta_graph.xsl b/helm/style/mk_meta_graph.xsl
new file mode 100644 (file)
index 0000000..9131947
--- /dev/null
@@ -0,0 +1,190 @@
+<?xml version="1.0"?>
+
+<!-- Copyright (C) 2000, HELM Team                                     -->
+<!--                                                                   -->
+<!-- This file is part of HELM, an Hypertextual, Electronic            -->
+<!-- Library of Mathematics, developed at the Computer Science         -->
+<!-- Department, University of Bologna, Italy.                         -->
+<!--                                                                   -->
+<!-- HELM 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 2    -->
+<!-- of the License, or (at your option) any later version.            -->
+<!--                                                                   -->
+<!-- HELM 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 HELM; if not, write to the Free Software               -->
+<!-- Foundation, Inc., 59 Temple Place - Suite 330, Boston,            -->
+<!-- MA  02111-1307, USA.                                              -->
+<!--                                                                   -->
+<!-- For details, see the HELM World-Wide-Web page,                    -->
+<!-- http://cs.unibo.it/helm/.                                         -->
+
+<!-- CSC: Sostituire l'andata a capo con la entity numerica opportuna -->
+<!DOCTYPE html [
+ <!ENTITY CSCbr "
+">
+]>
+
+<xsl:stylesheet version="0.1" xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+                              xmlns:ht="http://www.cs.unibo.it/helm/namespaces/helm-theory">
+
+<xsl:output method="text"/>
+
+<xsl:param name="CICURI" select="''"/>
+<xsl:param name="PID" select="''"/>
+<xsl:param name="maxDepth" select="5"/>
+<xsl:param name="getterURL" select="''"/>
+<xsl:variable name="RDF_base_URL_of_CIC_URI" select="concat($getterURL,'getxml?uri=helm:rdf:www.cs.unibo.it/helm/rdf/rdfprova//')"/>
+
+<!-- CSC: next function because I don't remember the name of the    -->
+<!-- CSC: subst function of xslt and I don't have the specs with me -->
+<xsl:template name="quote">
+ <xsl:param name="s" select="''"/>
+ <xsl:param name="news" select="''"/>
+ <xsl:choose>
+  <xsl:when test="$s = ''"><xsl:value-of select="$news"/></xsl:when>
+  <xsl:otherwise>
+   <xsl:variable name="char" select="substring($s,1,1)"/>
+   <xsl:choose>
+    <xsl:when test="$char = '/'">
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,'X')"/>
+     </xsl:call-template>
+    </xsl:when>
+    <xsl:when test="$char = ':'">
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,'Y')"/>
+     </xsl:call-template>
+    </xsl:when>
+    <xsl:when test="$char = '.'">
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,'Z')"/>
+     </xsl:call-template>
+    </xsl:when>
+    <xsl:when test='$char = "&apos;"'>
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,'W')"/>
+     </xsl:call-template>
+    </xsl:when>
+    <xsl:when test="$char = '-'">
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,'J')"/>
+     </xsl:call-template>
+    </xsl:when>
+    <xsl:otherwise>
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="substring($s,2)"/>
+      <xsl:with-param name="news" select="concat($news,$char)"/>
+     </xsl:call-template>
+    </xsl:otherwise>
+   </xsl:choose>
+  </xsl:otherwise>
+ </xsl:choose>
+</xsl:template>
+
+<xsl:template match="/">
+ <!-- dep_url_scheme -->
+ <xsl:text>http://localhost:8083/draw?url=http%3A//localhost%3A8080/helm/servlet/uwobo/apply%3Fxmluri%3Dhttp%3A//localhost%3A8081/getxml%253Furi%253D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>%26keys%3DMDG%26param.getterURL%3Dhttp%253A//localhost%253A8081/%26prop.media-type%3Dtext/plain%26param.CICURI%3D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>&CSCbr;</xsl:text>
+ <!-- meta_url_scheme -->
+ <xsl:text>http://localhost:8083/draw?url=http%3A%2F%2Flocalhost%3A8080%2Fhelm%2Fservlet%2Fuwobo%2Fapply%3Fxmluri%3Dhttp%3A%2F%2Flocalhost%3A8081%2Fgetxml%253Furi%253Dhelm%3Ardf%3Awww%2Ecs%2Eunibo.it/helm/rdf/rdfprova//</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>%26keys%3DMMG%26param.getterURL%3Dhttp%253A//localhost%253A8081/%26prop.media-type%3Dtext/plain%26param.CICURI%3D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>%26keys%3DMMG%26param%2EgetterURL%3Dhttp%253A%2F%2Flocalhost%253A8081%2F%26prop%2Emedia%2Dtype%3Dtext%2Fplain%26param%2ECICURI%3D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>&CSCbr;</xsl:text>
+ <!-- cic_url_scheme -->
+ <xsl:text>file:///projects/helm/on-line/html/cic/index.html?url=http://localhost:8080/helm/servlet/uwobo/apply%3Fkeys%3DC1%252CHC2%252CL%26prop.media-type%3Dtext/html%26prop.encoding%3Diso-8859-1%26param.naturalLanguage%3Dyes%26param.UNICODEvsSYMBOL%3Dsymbol%26param.annotations%3DNO%26prop.doctype-public%3D-//W3C//DTD%2520XHTML%25201.0%2520Transitional//EN%26param.doctype-public%3D-//W3C//DTD%2520XHTML%25201.0%2520Transitional//EN%26param.encoding%3Diso-8859-1%26param.media-type%3Dtext/html%26param.keys%3DC1%252CHC2%252CL%26param.getterURL%3Dhttp://localhost:8081/%26param.processorURL%3Dhttp://localhost:8080/helm/servlet/uwobo/%26param.interfaceURL%3Dfile:///projects/helm/on-line/html/cic/index.html%26param.topurl%3Dfile:///projects/helm/on-line%26xmluri%3Dhttp://localhost:8081/getxml%253Furi%253D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>%26param.CICURI%3D</xsl:text><xsl:value-of select="'#uri#'"/><xsl:text>&CSCbr;</xsl:text>
+ <!--
+ <xsl:text>strict digraph L0 { size = "83,83"; concentrate=true; node [style=filled, shape = box];&CSCbr;</xsl:text>
+ -->
+ <xsl:text>strict digraph L0 { size = "83,83"; node [style=filled, shape = box];&CSCbr;</xsl:text>
+ <xsl:variable name="dummy1" select="document(concat('http://localhost:8084/add_if_not_in?uri=',$CICURI,'&amp;nonce=',generate-id(),'&amp;PID=',$PID))"/>
+ <xsl:apply-templates mode="loop" select="document(concat('http://localhost:8084/get_next?uri=',$CICURI,'&amp;nonce=',generate-id(),'&amp;PID=',$PID))"/>
+ <xsl:variable name="dummy2" select="document(concat('http://localhost:8084/reset_to_empty?PID=',$PID))"/>
+ <xsl:text>}</xsl:text>
+</xsl:template>
+
+<xsl:template mode="loop" match="empty"/>
+
+<xsl:template mode="loop" match="uri|marked_uri">
+ <xsl:variable name="document" select="document(concat($RDF_base_URL_of_CIC_URI,@value))"/>
+ <xsl:choose>
+  <xsl:when test="$document/*">
+   <xsl:apply-templates mode="first_time" select="$document/*">
+    <xsl:with-param name="currentCICURI" select="@value"/>
+    <xsl:with-param name="quotedCurrentCICURI">
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="@value"/>
+     </xsl:call-template>
+    </xsl:with-param>
+    <xsl:with-param name="do_not_visit" select="name(.)"/>
+   </xsl:apply-templates>
+  </xsl:when>
+  <xsl:otherwise>
+   <xsl:apply-templates mode="first_time" select=".">
+    <xsl:with-param name="currentCICURI" select="@value"/>
+    <xsl:with-param name="quotedCurrentCICURI">
+     <xsl:call-template name="quote">
+      <xsl:with-param name="s" select="@value"/>
+     </xsl:call-template>
+    </xsl:with-param>
+    <xsl:with-param name="do_not_visit" select="'no_deps'"/>
+   </xsl:apply-templates>
+  </xsl:otherwise>
+ </xsl:choose>
+ <!-- The couple (uri,nonce) is used to force the document reload -->
+ <xsl:apply-templates mode="loop" select="document(concat('http://localhost:8084/get_next?uri=',@value,'&amp;nonce=',generate-id(),'&amp;PID=',$PID))"/>
+</xsl:template>
+
+
+<xsl:template mode="first_time" match="*">
+ <xsl:param name="currentCICURI" select="''"/>
+ <xsl:param name="quotedCurrentCICURI" select="''"/>
+ <xsl:param name="do_not_visit" select="'uri'"/>
+ <xsl:text> </xsl:text>
+ <xsl:value-of select="$quotedCurrentCICURI"/>
+<!-- <xsl:text> [fontname="LucidaSansRegular",color=red,label="</xsl:text> -->
+ <xsl:text> [label="</xsl:text>
+ <xsl:value-of select="$currentCICURI"/>
+ <xsl:text>",URL="</xsl:text>
+ <xsl:value-of select="$currentCICURI"/>
+ <xsl:text>"</xsl:text>
+ <xsl:if test="$do_not_visit='marked_uri'">
+  <xsl:text>,color=red</xsl:text>
+ </xsl:if>
+ <xsl:text>];&CSCbr;</xsl:text>
+ <xsl:if test="$do_not_visit='uri'">
+  <xsl:apply-templates select=".">
+   <xsl:with-param name="maxDepth" select="$newMaxDepth"/>
+   <xsl:with-param name="currentCICURI" select="$currentCICURI"/>
+   <xsl:with-param name="quotedCurrentCICURI" select="$quotedCurrentCICURI"/>
+  </xsl:apply-templates>
+ </xsl:if>
+</xsl:template>
+
+<xsl:template match="occurs">
+ <xsl:param name="maxDepth" select="''"/>
+ <xsl:param name="currentCICURI" select="''"/>
+ <xsl:param name="quotedCurrentCICURI" select="''"/>
+ <xsl:for-each select="*">
+  <xsl:variable name="quotedURI">
+   <xsl:call-template name="quote">
+    <xsl:with-param name="s" select="@uri"/>
+   </xsl:call-template>
+  </xsl:variable>
+  <xsl:text> </xsl:text>
+  <xsl:value-of select="$quotedCurrentCICURI"/>
+  <xsl:text> -&gt; </xsl:text>
+  <xsl:value-of select="$quotedURI"/>
+  <xsl:text>;&CSCbr;</xsl:text>
+  <!-- The nonce is used to force the document reload -->
+  <xsl:variable name="dummy" select="document(concat('http://localhost:8084/add_if_not_in?uri=',@uri,'&amp;nonce=',generate-id(),'&amp;PID=',$PID))"/>
+ </xsl:for-each>
+</xsl:template>
+
+</xsl:stylesheet>