diff options
| author |   Tim Yamin <plasmaroo@gentoo.org> | 2006-05-17 17:03:30 +0000 |
|---|---|---|
| committer | Tim Yamin <plasmaroo@gentoo.org> | 2006-05-17 17:03:30 +0000 |
| commit | 201ff23233ce8bab23fe8604b9459d69bd219b86 (patch) | |
| tree | b313727d7724e4d6d76fac96eabb7b7960296031 /xsl/str.tokenize.function.xsl | |
| parent | glep31check isn't even in the tree, so lets not mention it (diff) | |
| download | devmanual-201ff23233ce8bab23fe8604b9459d69bd219b86.tar.gz devmanual-201ff23233ce8bab23fe8604b9459d69bd219b86.tar.bz2 devmanual-201ff23233ce8bab23fe8604b9459d69bd219b86.zip | |
Highlighting fixes, author list added, fix codesample syntax in places.
git-svn-id: svn+ssh://svn.gentoo.org/var/svnroot/devmanual/trunk@44 176d3534-300d-0410-8db8-84e73ed771c3
Diffstat (limited to 'xsl/str.tokenize.function.xsl')
| -rw-r--r-- | xsl/str.tokenize.function.xsl | 86 |
1 files changed, 86 insertions, 0 deletions
diff --git a/xsl/str.tokenize.function.xsl b/xsl/str.tokenize.function.xsl new file mode 100644 index 0000000..a5f8589 --- /dev/null +++ b/xsl/str.tokenize.function.xsl @@ -0,0 +1,86 @@ +<?xml version="1.0"?>
+<!-- This is the EXSLT implementation of str:tokenize by Jeni Tennison,
+ I've modified it to keep the tokens since we need them - plasmaroo -->
+
+<xsl:stylesheet version="1.0"
+ xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+ xmlns:func="http://exslt.org/functions"
+ xmlns:exsl="http://exslt.org/common"
+ xmlns:str="http://exslt.org/strings"
+ extension-element-prefixes="str func exsl">
+
+<func:function name="str:tokenize_plasmaroo">
+ <xsl:param name="string" select="''" />
+ <xsl:param name="delimiters" select="' 	
'" />
+ <xsl:choose>
+ <xsl:when test="not($string)">
+ <func:result select="/.." />
+ </xsl:when>
+ <xsl:when test="not(function-available('exsl:node-set'))">
+ <xsl:message terminate="yes">
+ ERROR: EXSLT - Functions implementation of str:tokenize relies on exsl:node-set().
+ </xsl:message>
+ </xsl:when>
+ <xsl:otherwise>
+ <xsl:variable name="tokens">
+ <xsl:choose>
+ <xsl:when test="not($delimiters)">
+ <xsl:call-template name="str:_tokenize-characters">
+ <xsl:with-param name="string" select="$string" />
+ </xsl:call-template>
+ </xsl:when>
+ <xsl:otherwise>
+ <xsl:call-template name="str:_tokenize-delimiters">
+ <xsl:with-param name="string" select="$string" />
+ <xsl:with-param name="delimiters" select="$delimiters" />
+ </xsl:call-template>
+ </xsl:otherwise>
+ </xsl:choose>
+ </xsl:variable>
+ <func:result select="exsl:node-set($tokens)/*" />
+ </xsl:otherwise>
+ </xsl:choose>
+</func:function>
+
+<xsl:template name="str:_tokenize-characters">
+ <xsl:param name="string" />
+ <xsl:if test="$string">
+ <token><xsl:value-of select="substring($string, 1, 1)" /></token>
+ <xsl:call-template name="str:_tokenize-characters">
+ <xsl:with-param name="string" select="substring($string, 2)" />
+ </xsl:call-template>
+ </xsl:if>
+</xsl:template>
+
+<xsl:template name="str:_tokenize-delimiters">
+ <xsl:param name="string"/>
+ <xsl:param name="delimiters"/>
+ <xsl:variable name="delimiter" select="substring($delimiters, 1, 1)" />
+ <xsl:choose>
+ <xsl:when test="not($delimiter)">
+ <token><xsl:value-of select="$string" /></token>
+ </xsl:when>
+ <xsl:when test="contains($string, $delimiter)">
+ <xsl:if test="not(starts-with($string, $delimiter))">
+ <xsl:call-template name="str:_tokenize-delimiters">
+ <xsl:with-param name="string" select="substring-before($string, $delimiter)" />
+ <xsl:with-param name="delimiters" select="substring($delimiters, 2)" />
+ </xsl:call-template>
+ <xsl:value-of select="$delimiter"/>
+ </xsl:if>
+ <delimiter><xsl:attribute name="delimiter"><xsl:value-of select="$delimiter"/></xsl:attribute><xsl:value-of select="$delimiter"/></delimiter>
+ <xsl:call-template name="str:_tokenize-delimiters">
+ <xsl:with-param name="string" select="substring-after($string, $delimiter)"/>
+ <xsl:with-param name="delimiters" select="$delimiters"/>
+ </xsl:call-template>
+ </xsl:when>
+ <xsl:otherwise>
+ <xsl:call-template name="str:_tokenize-delimiters">
+ <xsl:with-param name="string" select="$string" />
+ <xsl:with-param name="delimiters" select="substring($delimiters, 2)" />
+ </xsl:call-template>
+ </xsl:otherwise>
+ </xsl:choose>
+</xsl:template>
+
+</xsl:stylesheet>
|