Alessandro Bonazzi
8c43d5cf2f
Files correlati : cg0.exe cg0700a.msk cg0700b.msk cg3.exe cg4.exe Bug : Commento: Merge 1.0 libraries
193 lines
7.2 KiB
XML
193 lines
7.2 KiB
XML
<?xml version='1.0'?>
|
|
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
|
|
xmlns:fo="http://www.w3.org/1999/XSL/Format"
|
|
xmlns:sverb="http://nwalsh.com/xslt/ext/com.nwalsh.saxon.Verbatim"
|
|
xmlns:xverb="com.nwalsh.xalan.Verbatim"
|
|
xmlns:lxslt="http://xml.apache.org/xslt"
|
|
exclude-result-prefixes="sverb xverb lxslt"
|
|
version='1.0'>
|
|
|
|
<!-- ********************************************************************
|
|
$Id$
|
|
********************************************************************
|
|
|
|
This file is part of the XSL DocBook Stylesheet distribution.
|
|
See ../README or http://nwalsh.com/docbook/xsl/ for copyright
|
|
and other information.
|
|
|
|
******************************************************************** -->
|
|
|
|
<lxslt:component prefix="xverb"
|
|
functions="insertCallouts"/>
|
|
|
|
<xsl:template match="programlistingco|screenco">
|
|
<xsl:variable name="verbatim" select="programlisting|screen"/>
|
|
<xsl:variable name="vendor" select="system-property('xsl:vendor')"/>
|
|
|
|
<xsl:choose>
|
|
<xsl:when test="$use.extensions != '0'
|
|
and $callouts.extension != '0'">
|
|
<xsl:variable name="rtf">
|
|
<xsl:apply-templates select="$verbatim">
|
|
<xsl:with-param name="suppress-numbers" select="'1'"/>
|
|
</xsl:apply-templates>
|
|
</xsl:variable>
|
|
|
|
<xsl:variable name="rtf-with-callouts">
|
|
<xsl:choose>
|
|
<xsl:when test="contains($vendor, 'SAXON ')">
|
|
<xsl:copy-of select="sverb:insertCallouts(areaspec,$rtf)"/>
|
|
</xsl:when>
|
|
<xsl:when test="contains($vendor, 'Apache Software Foundation')">
|
|
<xsl:copy-of select="xverb:insertCallouts(areaspec,$rtf)"/>
|
|
</xsl:when>
|
|
<xsl:otherwise>
|
|
<xsl:message terminate="yes">
|
|
<xsl:text>Don't know how to do callouts with </xsl:text>
|
|
<xsl:value-of select="$vendor"/>
|
|
</xsl:message>
|
|
</xsl:otherwise>
|
|
</xsl:choose>
|
|
</xsl:variable>
|
|
|
|
<xsl:choose>
|
|
<xsl:when test="$verbatim/@linenumbering = 'numbered'
|
|
and $linenumbering.extension != '0'">
|
|
<xsl:call-template name="number.rtf.lines">
|
|
<xsl:with-param name="rtf" select="$rtf-with-callouts"/>
|
|
<xsl:with-param name="pi.context"
|
|
select="programlisting|screen"/>
|
|
</xsl:call-template>
|
|
<xsl:apply-templates select="calloutlist"/>
|
|
</xsl:when>
|
|
<xsl:otherwise>
|
|
<xsl:copy-of select="$rtf-with-callouts"/>
|
|
<xsl:apply-templates select="calloutlist"/>
|
|
</xsl:otherwise>
|
|
</xsl:choose>
|
|
</xsl:when>
|
|
<xsl:otherwise>
|
|
<xsl:apply-templates/>
|
|
</xsl:otherwise>
|
|
</xsl:choose>
|
|
</xsl:template>
|
|
|
|
<xsl:template match="areaspec|areaset|area">
|
|
</xsl:template>
|
|
|
|
<xsl:template match="areaset" mode="conumber">
|
|
<xsl:number count="area|areaset" format="1"/>
|
|
</xsl:template>
|
|
|
|
<xsl:template match="area" mode="conumber">
|
|
<xsl:number count="area|areaset" format="1"/>
|
|
</xsl:template>
|
|
|
|
<xsl:template match="co">
|
|
<fo:inline id="{@id}">
|
|
<xsl:apply-templates select="." mode="callout-bug"/>
|
|
</fo:inline>
|
|
</xsl:template>
|
|
|
|
<xsl:template match="co" mode="callout-bug">
|
|
<xsl:call-template name="callout-bug">
|
|
<xsl:with-param name="conum">
|
|
<xsl:number count="co" format="1"/>
|
|
</xsl:with-param>
|
|
</xsl:call-template>
|
|
</xsl:template>
|
|
|
|
<xsl:template name="callout-bug">
|
|
<xsl:param name="conum" select='1'/>
|
|
|
|
<xsl:choose>
|
|
<!-- Draw callouts as images -->
|
|
<xsl:when test="$callout.graphics != '0'
|
|
and $conum <= $callout.graphics.number.limit">
|
|
<fo:external-graphic
|
|
src="{$callout.graphics.path}{$conum}{$callout.graphics.extension}"/>
|
|
</xsl:when>
|
|
|
|
<xsl:when test="$callout.unicode != 0
|
|
and $conum <= $callout.unicode.number.limit">
|
|
<xsl:choose>
|
|
<xsl:when test="$callout.unicode.start.character = 10102">
|
|
<xsl:choose>
|
|
<xsl:when test="$conum = 1">❶</xsl:when>
|
|
<xsl:when test="$conum = 2">❷</xsl:when>
|
|
<xsl:when test="$conum = 3">❸</xsl:when>
|
|
<xsl:when test="$conum = 4">❹</xsl:when>
|
|
<xsl:when test="$conum = 5">❺</xsl:when>
|
|
<xsl:when test="$conum = 6">❻</xsl:when>
|
|
<xsl:when test="$conum = 7">❼</xsl:when>
|
|
<xsl:when test="$conum = 8">❽</xsl:when>
|
|
<xsl:when test="$conum = 9">❾</xsl:when>
|
|
<xsl:when test="$conum = 10">❿</xsl:when>
|
|
</xsl:choose>
|
|
</xsl:when>
|
|
<xsl:otherwise>
|
|
<xsl:message>
|
|
<xsl:text>Don't know how to generate Unicode callouts </xsl:text>
|
|
<xsl:text>when $callout.unicode.start.character is </xsl:text>
|
|
<xsl:value-of select="$callout.unicode.start.character"/>
|
|
</xsl:message>
|
|
<fo:inline background-color="#404040"
|
|
color="white"
|
|
padding-top="0.1em"
|
|
padding-bottom="0.1em"
|
|
padding-start="0.2em"
|
|
padding-end="0.2em"
|
|
baseline-shift="0.1em"
|
|
font-family="{$body.font.family}"
|
|
font-weight="bold"
|
|
font-size="75%">
|
|
<xsl:value-of select="$conum"/>
|
|
</fo:inline>
|
|
</xsl:otherwise>
|
|
</xsl:choose>
|
|
</xsl:when>
|
|
|
|
<!-- Pick callouts from Zapf Dingbats - max 10 -->
|
|
<xsl:when test="$callout.dingbats != '0' and $conum <= 10">
|
|
<fo:inline font-family="ZapfDingbats">
|
|
<xsl:choose>
|
|
<xsl:when test="$conum=1">❶</xsl:when>
|
|
<xsl:when test="$conum=2">❷</xsl:when>
|
|
<xsl:when test="$conum=3">❸</xsl:when>
|
|
<xsl:when test="$conum=4">❹</xsl:when>
|
|
<xsl:when test="$conum=5">❺</xsl:when>
|
|
<xsl:when test="$conum=6">❻</xsl:when>
|
|
<xsl:when test="$conum=7">❼</xsl:when>
|
|
<xsl:when test="$conum=8">❽</xsl:when>
|
|
<xsl:when test="$conum=9">❾</xsl:when>
|
|
<xsl:when test="$conum=10">❿</xsl:when>
|
|
<xsl:otherwise><!-- overflow -->
|
|
<xsl:attribute name="color">red</xsl:attribute>
|
|
<xsl:text>●</xsl:text>
|
|
<xsl:message>
|
|
<xsl:text>A callout list contains more than 10 callouts;</xsl:text>
|
|
<xsl:text> callout numbering truncated.</xsl:text>
|
|
</xsl:message>
|
|
</xsl:otherwise>
|
|
</xsl:choose>
|
|
</fo:inline>
|
|
</xsl:when>
|
|
|
|
<!-- Most safe: draw a dark gray square with a white number inside -->
|
|
<xsl:otherwise>
|
|
<fo:inline background-color="#404040"
|
|
color="white"
|
|
padding-top="0.1em"
|
|
padding-bottom="0.1em"
|
|
padding-start="0.2em"
|
|
padding-end="0.2em"
|
|
baseline-shift="0.1em"
|
|
font-family="{$body.font.family}"
|
|
font-weight="bold"
|
|
font-size="75%"><xsl:value-of select="$conum"/></fo:inline>
|
|
</xsl:otherwise>
|
|
</xsl:choose>
|
|
</xsl:template>
|
|
|
|
</xsl:stylesheet>
|