diff options
Diffstat (limited to 'common/autoidx-kosek.xsl')
| -rw-r--r-- | common/autoidx-kosek.xsl | 154 |
1 files changed, 154 insertions, 0 deletions
diff --git a/common/autoidx-kosek.xsl b/common/autoidx-kosek.xsl new file mode 100644 index 0000000..3d755c4 --- /dev/null +++ b/common/autoidx-kosek.xsl @@ -0,0 +1,154 @@ +<?xml version="1.0"?> +<!DOCTYPE xsl:stylesheet [ +<!ENTITY % common.entities SYSTEM "entities.ent"> +%common.entities; +]> +<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" + version="1.0" + xmlns:func="http://exslt.org/functions" + xmlns:exslt="http://exslt.org/common" + xmlns:l="http://docbook.sourceforge.net/xmlns/l10n/1.0" + xmlns:fo="http://www.w3.org/1999/XSL/Format" + extension-element-prefixes="func exslt" + exclude-result-prefixes="func exslt i l" + xmlns:i="urn:cz-kosek:functions:index"> + +<!-- ******************************************************************** + $Id: autoidx-kosek.xsl 8759 2010-07-20 21:46:07Z kosek $ + ******************************************************************** + + This file is part of the DocBook XSL Stylesheet distribution. + See ../README or http://docbook.sf.net/ for copyright + copyright and other information. + + ******************************************************************** --> + +<xsl:param name="kosek.imported"> + <xsl:variable name="vendor" select="system-property('xsl:vendor')"/> + <xsl:choose> + <xsl:when test="contains($vendor, 'libxslt')"> + <xsl:message terminate="yes"> + <xsl:text>ERROR: the 'kosek' index method does not </xsl:text> + <xsl:text>work with the xsltproc XSLT processor.</xsl:text> + </xsl:message> + </xsl:when> + <xsl:otherwise>1</xsl:otherwise> + </xsl:choose> +</xsl:param> + +<!-- Returns index group code for given term --> +<func:function name="i:group-index"> + <xsl:param name="term"/> + + <xsl:variable name="letters-rtf"> + <xsl:variable name="lang"> + <xsl:call-template name="l10n.language"/> + </xsl:variable> + + <xsl:variable name="local.l10n.letters" + select="($local.l10n.xml//l:i18n/l:l10n[@language=$lang]/l:letters)[1]"/> + + <xsl:for-each select="$l10n.xml"> + <xsl:variable name="l10n.letters" + select="document(key('l10n-lang', $lang)/@href)/l:l10n/l:letters[1]"/> + + <xsl:choose> + <xsl:when test="count($local.l10n.letters) > 0"> + <xsl:copy-of select="$local.l10n.letters"/> + </xsl:when> + <xsl:when test="count($l10n.letters) > 0"> + <xsl:copy-of select="$l10n.letters"/> + </xsl:when> + <xsl:otherwise> + <xsl:message> + <xsl:text>No "</xsl:text> + <xsl:value-of select="$lang"/> + <xsl:text>" localization of index grouping letters exists</xsl:text> + <xsl:choose> + <xsl:when test="$lang = 'en'"> + <xsl:text>.</xsl:text> + </xsl:when> + <xsl:otherwise> + <xsl:text>; using "en".</xsl:text> + </xsl:otherwise> + </xsl:choose> + </xsl:message> + + <xsl:copy-of select="document(key('l10n-lang', 'en'))/l:l10n/l:letters[1]"/> + </xsl:otherwise> + </xsl:choose> + </xsl:for-each> + </xsl:variable> + + <xsl:variable name="letters" select="exslt:node-set($letters-rtf)/*"/> + + <xsl:variable name="long-letter-index" select="$letters/l:l[. = substring($term,1,2)]/@i"/> + <xsl:variable name="short-letter-index" select="$letters/l:l[. = substring($term,1,1)]/@i"/> + <xsl:variable name="letter-index"> + <xsl:choose> + <xsl:when test="$long-letter-index"> + <xsl:value-of select="$long-letter-index"/> + </xsl:when> + <xsl:when test="$short-letter-index"> + <xsl:value-of select="$short-letter-index"/> + </xsl:when> + <xsl:otherwise>0</xsl:otherwise> + </xsl:choose> + </xsl:variable> + <func:result select="number($letter-index)"/> +</func:function> + +<!-- Return index group letter for given group code --> +<func:function name="i:group-letter"> + <xsl:param name="index"/> + + <xsl:variable name="letters-rtf"> + <xsl:variable name="lang"> + <xsl:call-template name="l10n.language"/> + </xsl:variable> + + <xsl:variable name="local.l10n.letters" + select="($local.l10n.xml//l:i18n/l:l10n[@language=$lang]/l:letters)[1]"/> + + <xsl:for-each select="$l10n.xml"> + <xsl:variable name="l10n.letters" + select="document(key('l10n-lang', $lang)/@href)/l:l10n/l:letters[1]"/> + + <xsl:choose> + <xsl:when test="count($local.l10n.letters) > 0"> + <xsl:copy-of select="$local.l10n.letters"/> + </xsl:when> + <xsl:when test="count($l10n.letters) > 0"> + <xsl:copy-of select="$l10n.letters"/> + </xsl:when> + <xsl:otherwise> + <xsl:message> + <xsl:text>No "</xsl:text> + <xsl:value-of select="$lang"/> + <xsl:text>" localization of index grouping letters exists</xsl:text> + <xsl:choose> + <xsl:when test="$lang = 'en'"> + <xsl:text>.</xsl:text> + </xsl:when> + <xsl:otherwise> + <xsl:text>; using "en".</xsl:text> + </xsl:otherwise> + </xsl:choose> + </xsl:message> + + <xsl:copy-of select="document(key('l10n-lang', 'en')/@href)/l:l10n/l:letters[1]"/> + </xsl:otherwise> + </xsl:choose> + </xsl:for-each> + </xsl:variable> + + <xsl:variable name="letters" select="exslt:node-set($letters-rtf)/*"/> + + <func:result select="$letters/l:l[@i=$index][1]"/> +</func:function> + +<xsl:key name="group-code" + match="indexterm" + use="i:group-index(&primary;)"/> + +</xsl:stylesheet> |