+++ /dev/null
-<?xml version="1.0"?>
-<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
- xmlns:exsl="http://exslt.org/common"
- xmlns:set="http://exslt.org/sets"
- exclude-result-prefixes="exsl set"
- version="1.0">
-
-<!-- ********************************************************************
- $Id: html-rtf.xsl 8345 2009-03-16 06:44:07Z bobstayton $
- ********************************************************************
-
- This file is part of the XSL DocBook Stylesheet distribution.
- See ../README or http://docbook.sf.net/release/xsl/current/ for
- copyright and other information.
-
- ******************************************************************** -->
-
-<!-- ==================================================================== -->
-
-<!-- This module contains templates that match against HTML nodes. It is used
- to post-process result tree fragments for some sorts of cleanup.
- These templates can only ever be fired by a processor that supports
- exslt:node-set(). -->
-
-<!-- ==================================================================== -->
-
-<!-- insert.html.p mode templates insert a particular RTF at the beginning
- of the first paragraph in the primary RTF. -->
-
-<xsl:template match="/" mode="insert.html.p">
- <xsl:param name="mark" select="'?'"/>
- <xsl:apply-templates mode="insert.html.p">
- <xsl:with-param name="mark" select="$mark"/>
- </xsl:apply-templates>
-</xsl:template>
-
-<xsl:template match="*" mode="insert.html.p">
- <xsl:param name="mark" select="'?'"/>
- <xsl:copy>
- <xsl:copy-of select="@*"/>
- <xsl:apply-templates mode="insert.html.p">
- <xsl:with-param name="mark" select="$mark"/>
- </xsl:apply-templates>
- </xsl:copy>
-</xsl:template>
-
-<xsl:template xmlns:html="http://www.w3.org/1999/xhtml"
- match="html:p|p" mode="insert.html.p">
- <xsl:param name="mark" select="'?'"/>
- <xsl:copy>
- <xsl:copy-of select="@*"/>
- <xsl:if test="not(preceding::p|preceding::html:p)">
- <xsl:copy-of select="$mark"/>
- </xsl:if>
- <xsl:apply-templates mode="insert.html.p">
- <xsl:with-param name="mark" select="$mark"/>
- </xsl:apply-templates>
- </xsl:copy>
-</xsl:template>
-
-<xsl:template match="text()|processing-instruction()|comment()" mode="insert.html.p">
- <xsl:param name="mark" select="'?'"/>
- <xsl:copy/>
-</xsl:template>
-
-<!-- ==================================================================== -->
-
-<!-- insert.html.text mode templates insert a particular RTF at the beginning
- of the first text-node in the primary RTF. -->
-
-<xsl:template match="/" mode="insert.html.text">
- <xsl:param name="mark" select="'?'"/>
- <xsl:apply-templates mode="insert.html.text">
- <xsl:with-param name="mark" select="$mark"/>
- </xsl:apply-templates>
-</xsl:template>
-
-<xsl:template match="*" mode="insert.html.text">
- <xsl:param name="mark" select="'?'"/>
- <xsl:copy>
- <xsl:copy-of select="@*"/>
- <xsl:apply-templates mode="insert.html.text">
- <xsl:with-param name="mark" select="$mark"/>
- </xsl:apply-templates>
- </xsl:copy>
-</xsl:template>
-
-<xsl:template match="text()|processing-instruction()|comment()" mode="insert.html.text">
- <xsl:param name="mark" select="'?'"/>
-
- <xsl:if test="not(preceding::text())">
- <xsl:copy-of select="$mark"/>
- </xsl:if>
-
- <xsl:copy/>
-</xsl:template>
-
-<xsl:template match="processing-instruction()|comment()" mode="insert.html.text">
- <xsl:param name="mark" select="'?'"/>
- <xsl:copy/>
-</xsl:template>
-
-<!-- ==================================================================== -->
-
-<!-- unwrap.p mode templates remove blocks from HTML p elements (and
- other places where blocks aren't allowed) -->
-
-<xsl:template name="unwrap.p">
- <xsl:param name="p"/>
- <xsl:choose>
- <xsl:when test="$exsl.node.set.available != 0
- and function-available('set:leading')
- and function-available('set:trailing')">
- <xsl:apply-templates select="exsl:node-set($p)" mode="unwrap.p"/>
- </xsl:when>
- <xsl:otherwise>
- <xsl:copy-of select="$p"/>
- </xsl:otherwise>
- </xsl:choose>
-</xsl:template>
-
-<xsl:template xmlns:html="http://www.w3.org/1999/xhtml"
- match="html:p|p" mode="unwrap.p">
- <!-- xmlns:html is necessary for the xhtml stylesheet case -->
- <xsl:variable name="blocks" xmlns:html="http://www.w3.org/1999/xhtml"
- select="address|blockquote|div|hr|h1|h2|h3|h4|h5|h6
- |layer|p|pre|table|dl|menu|ol|ul|form
- |html:address|html:blockquote|html:div|html:hr
- |html:h1|html:h2|html:h3|html:h4|html:h5|html:h6
- |html:layer|html:p|html:pre|html:table|html:dl
- |html:menu|html:ol|html:ul|html:form"/>
- <xsl:choose>
- <xsl:when test="$blocks">
- <xsl:call-template name="unwrap.p.nodes">
- <xsl:with-param name="wrap" select="."/>
- <xsl:with-param name="first" select="1"/>
- <xsl:with-param name="nodes" select="node()"/>
- <xsl:with-param name="blocks" select="$blocks"/>
- </xsl:call-template>
- </xsl:when>
- <xsl:otherwise>
- <xsl:copy>
- <xsl:copy-of select="@*"/>
- <xsl:apply-templates mode="unwrap.p"/>
- </xsl:copy>
- </xsl:otherwise>
- </xsl:choose>
-</xsl:template>
-
-<xsl:template match="*" mode="unwrap.p">
- <xsl:copy>
- <xsl:copy-of select="@*"/>
- <xsl:apply-templates mode="unwrap.p"/>
- </xsl:copy>
-</xsl:template>
-
-<xsl:template match="text()|processing-instruction()|comment()" mode="unwrap.p">
- <xsl:copy/>
-</xsl:template>
-
-<xsl:template name="unwrap.p.nodes">
- <xsl:param name="wrap" select="."/>
- <xsl:param name="first" select="0"/>
- <xsl:param name="nodes"/>
- <xsl:param name="blocks"/>
- <xsl:variable name="block" select="$blocks[1]"/>
-
- <!-- This template should never get called if these functions aren't available -->
- <!-- but this test is still necessary so that processors don't choke on the -->
- <!-- function calls if they don't support the set: functions -->
- <xsl:if test="function-available('set:leading')
- and function-available('set:trailing')">
- <xsl:choose>
- <xsl:when test="$blocks">
- <xsl:variable name="leading" select="set:leading($nodes,$block)"/>
- <xsl:variable name="trailing" select="set:trailing($nodes,$block)"/>
-
- <xsl:if test="(($wrap/@id or $wrap/@xml:id)
- and $first = 1) or $leading">
- <xsl:element name="{local-name($wrap)}" namespace="{namespace-uri($wrap)}">
- <xsl:for-each select="$wrap/@*">
- <xsl:if test="$first != 0 or local-name(.) != 'id'">
- <xsl:copy/>
- </xsl:if>
- </xsl:for-each>
- <xsl:apply-templates select="$leading" mode="unwrap.p"/>
- </xsl:element>
- </xsl:if>
-
- <xsl:apply-templates select="$block" mode="unwrap.p"/>
-
- <xsl:if test="$trailing">
- <xsl:call-template name="unwrap.p.nodes">
- <xsl:with-param name="wrap" select="$wrap"/>
- <xsl:with-param name="nodes" select="$trailing"/>
- <xsl:with-param name="blocks" select="$blocks[position() > 1]"/>
- </xsl:call-template>
- </xsl:if>
- </xsl:when>
-
- <xsl:otherwise>
- <xsl:if test="(($wrap/@id or $wrap/@xml:id) and $first = 1) or $nodes">
- <xsl:element name="{local-name($wrap)}" namespace="{namespace-uri($wrap)}">
- <xsl:for-each select="$wrap/@*">
- <xsl:if test="$first != 0 or local-name(.) != 'id'">
- <xsl:copy/>
- </xsl:if>
- </xsl:for-each>
- <xsl:apply-templates select="$nodes" mode="unwrap.p"/>
- </xsl:element>
- </xsl:if>
- </xsl:otherwise>
- </xsl:choose>
- </xsl:if>
-</xsl:template>
-
-<!-- ==================================================================== -->
-<!-- make.verbatim.mode replaces spaces and newlines -->
-
-<xsl:template match="/" mode="make.verbatim.mode">
- <xsl:apply-templates mode="make.verbatim.mode"/>
-</xsl:template>
-
-<xsl:template match="*" mode="make.verbatim.mode">
- <xsl:copy>
- <xsl:copy-of select="@*"/>
- <xsl:apply-templates mode="make.verbatim.mode"/>
- </xsl:copy>
-</xsl:template>
-
-<xsl:template match="processing-instruction()|comment()" mode="make.verbatim.mode">
- <xsl:copy/>
-</xsl:template>
-
-<xsl:template match="text()" mode="make.verbatim.mode">
- <xsl:variable name="text" select="translate(., ' ', ' ')"/>
-
- <xsl:choose>
- <xsl:when test="not(contains($text, '
'))">
- <xsl:value-of select="$text"/>
- </xsl:when>
-
- <xsl:otherwise>
- <xsl:variable name="len" select="string-length($text)"/>
-
- <xsl:choose>
- <xsl:when test="$len = 1">
- <br/><xsl:text>
</xsl:text>
- </xsl:when>
-
- <xsl:otherwise>
- <xsl:variable name="half" select="$len div 2"/>
- <xsl:call-template name="make-verbatim-recursive">
- <xsl:with-param name="text" select="substring($text, 1, $half)"/>
- </xsl:call-template>
- <xsl:call-template name="make-verbatim-recursive">
- <xsl:with-param name="text"
- select="substring($text, ($half + 1), $len)"/>
- </xsl:call-template>
- </xsl:otherwise>
- </xsl:choose>
- </xsl:otherwise>
- </xsl:choose>
-</xsl:template>
-
-<xsl:template name="make-verbatim-recursive">
- <xsl:param name="text" select="''"/>
-
- <xsl:choose>
- <xsl:when test="not(contains($text, '
'))">
- <xsl:value-of select="$text"/>
- </xsl:when>
-
- <xsl:otherwise>
- <xsl:variable name="len" select="string-length($text)"/>
-
- <xsl:choose>
- <xsl:when test="$len = 1">
- <br/><xsl:text>
</xsl:text>
- </xsl:when>
-
- <xsl:otherwise>
- <xsl:variable name="half" select="$len div 2"/>
- <xsl:call-template name="make-verbatim-recursive">
- <xsl:with-param name="text" select="substring($text, 1, $half)"/>
- </xsl:call-template>
- <xsl:call-template name="make-verbatim-recursive">
- <xsl:with-param name="text"
- select="substring($text, ($half + 1), $len)"/>
- </xsl:call-template>
- </xsl:otherwise>
- </xsl:choose>
- </xsl:otherwise>
- </xsl:choose>
-</xsl:template>
-
-<!-- ==================================================================== -->
-
-<!-- remove.empty.div mode templates remove empty blocks -->
-
-<xsl:template name="remove.empty.div">
- <xsl:param name="div"/>
- <xsl:choose>
- <xsl:when test="$exsl.node.set.available != 0">
- <xsl:apply-templates select="exsl:node-set($div)" mode="remove.empty.div"/>
- </xsl:when>
- <xsl:otherwise>
- <xsl:copy-of select="$div"/>
- </xsl:otherwise>
- </xsl:choose>
-</xsl:template>
-
-<xsl:template xmlns:html="http://www.w3.org/1999/xhtml"
- match="html:p|p|html:div|div" mode="remove.empty.div">
- <xsl:if test="node()">
- <xsl:copy>
- <xsl:copy-of select="@*"/>
- <xsl:apply-templates mode="remove.empty.div"/>
- </xsl:copy>
- </xsl:if>
-</xsl:template>
-
-<xsl:template match="*" mode="remove.empty.div">
- <xsl:copy>
- <xsl:copy-of select="@*"/>
- <xsl:apply-templates mode="remove.empty.div"/>
- </xsl:copy>
-</xsl:template>
-
-<xsl:template match="text()|processing-instruction()|comment()" mode="remove.empty.div">
- <xsl:copy/>
-</xsl:template>
-
-<!-- ==================================================================== -->
-
-</xsl:stylesheet>
git.stg.codes / stg.git / blobdiff