3 $Id: irspy2zeerex.xsl,v 1.8 2006-10-30 14:55:27 sondberg Exp $
5 This stylesheet is used by IRSpy to map the internal mixed Zeerex/IRSpy
6 record format into the Zeerex record which we store.
10 xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
11 xmlns:irspy="http://indexdata.com/irspy/1.0"
12 xmlns="http://explain.z3950.org/dtd/2.0/"
13 xmlns:explain="http://explain.z3950.org/dtd/2.0/"
14 exclude-result-prefixes="irspy explain"
17 <xsl:output indent="yes"
22 <xsl:preserve-space elements="*"/>
24 <xsl:variable name="old_indexes" select="/*/explain:indexInfo/explain:index"/>
25 <xsl:variable name="use_attr_names" select="document('use-attr-names.xml')"/>
28 <xsl:template match="node() | @*">
30 <xsl:apply-templates select="@* | node()"/>
35 <xsl:template match="/*">
37 <xsl:apply-templates select="explain:serverInfo |
38 explain:databaseInfo |
41 <xsl:call-template name="insert-indexInfo"/>
42 <xsl:call-template name="insert-recordInfo"/>
43 <xsl:call-template name="insert-irspySection"/>
48 <xsl:template name="insert-indexInfo">
50 <xsl:for-each select="/*/irspy:status/irspy:search">
51 <xsl:variable name="set" select="@set"/>
52 <xsl:variable name="ap" select="@ap"/>
53 <xsl:variable name="old"
54 select="$old_indexes[explain:map/explain:attr/@set = $set and
55 explain:map/explain:attr/text() = $ap]"/>
57 <xsl:when test="$old">
58 <xsl:call-template name="insert-index-section">
59 <xsl:with-param name="title" select="$old/explain:title"/>
63 <xsl:call-template name="insert-index-section"/>
71 <xsl:template name="insert-recordInfo">
73 <xsl:for-each select="/*/irspy:status/irspy:record_fetch[@ok = 1]">
74 <recordSyntax name="{@syntax}">
75 <elementSet name="F"/> <!-- FIXME: This should be probed too -->
82 <xsl:template name="insert-irspySection">
83 <xsl:copy-of select="/*/irspy:status"/>
87 <xsl:template name="insert-index-section">
88 <xsl:param name="update" select="."/>
89 <xsl:param name="title">
90 <xsl:call-template name="insert-index-title">
91 <xsl:with-param name="update" select="$update"/>
96 <xsl:attribute name="search">
98 <xsl:when test="$update/@ok = 1">true</xsl:when>
99 <xsl:otherwise>false</xsl:otherwise>
102 <title primary="true" lang="en">
103 <xsl:value-of select="$title"/>
106 <attr type="1" set="{$update/@set}">
107 <xsl:value-of select="$update/@ap"/>
114 <xsl:template name="insert-index-title">
115 <xsl:param name="update"/>
116 <xsl:variable name="name"
117 select="$use_attr_names/*/map[@attr = $update/@ap and
118 @set = $update/@set]/@name"/>
121 <xsl:when test="string-length($name) > 0"><xsl:value-of
122 select="$name"/></xsl:when>
123 <xsl:otherwise><xsl:value-of select="$update/@ap"/></xsl:otherwise>
128 <xsl:template match="explain:dateModified">
129 <dateModified><xsl:value-of
130 select="/*/irspy:status/*[last()]"/></dateModified>