2 <!DOCTYPE xsl:stylesheet [
3 <!ENTITY % common.entities SYSTEM "entities.ent">
6 <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
7 xmlns:d="http://docbook.org/ns/docbook"
9 xmlns:func="http://exslt.org/functions"
10 xmlns:exslt="http://exslt.org/common"
11 xmlns:l="http://docbook.sourceforge.net/xmlns/l10n/1.0"
12 xmlns:fo="http://www.w3.org/1999/XSL/Format"
13 extension-element-prefixes="func exslt"
14 exclude-result-prefixes="func exslt i l d"
15 xmlns:i="urn:cz-kosek:functions:index">
17 <!-- ********************************************************************
19 This file is part of the DocBook XSL Stylesheet distribution.
20 See ../README or http://cdn.docbook.org/ for copyright
21 copyright and other information.
23 ******************************************************************** -->
25 <xsl:param name="kosek.imported">
26 <xsl:variable name="vendor" select="system-property('xsl:vendor')"/>
28 <xsl:when test="contains($vendor, 'libxslt')">
29 <xsl:message terminate="yes">
30 <xsl:text>ERROR: the 'kosek' index method does not </xsl:text>
31 <xsl:text>work with the xsltproc XSLT processor.</xsl:text>
34 <xsl:otherwise>1</xsl:otherwise>
38 <!-- Returns index group code for given term -->
39 <func:function name="i:group-index">
40 <xsl:param name="term"/>
42 <xsl:variable name="letters-rtf">
43 <xsl:variable name="lang">
44 <xsl:call-template name="l10n.language"/>
47 <xsl:variable name="local.l10n.letters"
48 select="($local.l10n.xml//l:i18n/l:l10n[@language=$lang]/l:letters)[1]"/>
50 <xsl:for-each select="$l10n.xml">
51 <xsl:variable name="l10n.letters"
52 select="document(key('l10n-lang', $lang)/@href)/l:l10n/l:letters[1]"/>
55 <xsl:when test="count($local.l10n.letters) > 0">
56 <xsl:copy-of select="$local.l10n.letters"/>
58 <xsl:when test="count($l10n.letters) > 0">
59 <xsl:copy-of select="$l10n.letters"/>
63 <xsl:text>No "</xsl:text>
64 <xsl:value-of select="$lang"/>
65 <xsl:text>" localization of index grouping letters exists</xsl:text>
67 <xsl:when test="$lang = 'en'">
68 <xsl:text>.</xsl:text>
71 <xsl:text>; using "en".</xsl:text>
76 <xsl:copy-of select="document(key('l10n-lang', 'en'))/l:l10n/l:letters[1]"/>
82 <xsl:variable name="letters" select="exslt:node-set($letters-rtf)/*"/>
84 <xsl:variable name="long-letter-index" select="$letters/l:l[. = substring($term,1,2)]/@i"/>
85 <xsl:variable name="short-letter-index" select="$letters/l:l[. = substring($term,1,1)]/@i"/>
86 <xsl:variable name="letter-index">
88 <xsl:when test="$long-letter-index">
89 <xsl:value-of select="$long-letter-index"/>
91 <xsl:when test="$short-letter-index">
92 <xsl:value-of select="$short-letter-index"/>
94 <xsl:otherwise>0</xsl:otherwise>
97 <func:result select="number($letter-index)"/>
100 <!-- Return index group letter for given group code -->
101 <func:function name="i:group-letter">
102 <xsl:param name="index"/>
104 <xsl:variable name="letters-rtf">
105 <xsl:variable name="lang">
106 <xsl:call-template name="l10n.language"/>
109 <xsl:variable name="local.l10n.letters"
110 select="($local.l10n.xml//l:i18n/l:l10n[@language=$lang]/l:letters)[1]"/>
112 <xsl:for-each select="$l10n.xml">
113 <xsl:variable name="l10n.letters"
114 select="document(key('l10n-lang', $lang)/@href)/l:l10n/l:letters[1]"/>
117 <xsl:when test="count($local.l10n.letters) > 0">
118 <xsl:copy-of select="$local.l10n.letters"/>
120 <xsl:when test="count($l10n.letters) > 0">
121 <xsl:copy-of select="$l10n.letters"/>
125 <xsl:text>No "</xsl:text>
126 <xsl:value-of select="$lang"/>
127 <xsl:text>" localization of index grouping letters exists</xsl:text>
129 <xsl:when test="$lang = 'en'">
130 <xsl:text>.</xsl:text>
133 <xsl:text>; using "en".</xsl:text>
138 <xsl:copy-of select="document(key('l10n-lang', 'en')/@href)/l:l10n/l:letters[1]"/>
144 <xsl:variable name="letters" select="exslt:node-set($letters-rtf)/*"/>
146 <func:result select="$letters/l:l[@i=$index][1]"/>
149 <xsl:key name="group-code"
151 use="i:group-index(&primary;)"/>