| <?xml version='1.0'?> |
| <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" |
| xmlns:doc="http://nwalsh.com/xsl/documentation/1.0" |
| xmlns:fo="http://www.w3.org/1999/XSL/Format" |
| xmlns:stbl="http://nwalsh.com/xslt/ext/com.nwalsh.saxon.Table" |
| xmlns:xtbl="com.nwalsh.xalan.Table" |
| xmlns:lxslt="http://xml.apache.org/xslt" |
| xmlns:ptbl="http://nwalsh.com/xslt/ext/xsltproc/python/Table" |
| exclude-result-prefixes="doc stbl xtbl lxslt ptbl" |
| version='1.0'> |
| |
| <xsl:include href="../common/table.xsl"/> |
| |
| <!-- ******************************************************************** |
| $Id: table.xsl,v 1.1 2004/03/01 10:26:07 eelco12 Exp $ |
| ******************************************************************** |
| |
| This file is part of the XSL DocBook Stylesheet distribution. |
| See ../README or http://nwalsh.com/docbook/xsl/ for copyright |
| and other information. |
| |
| ******************************************************************** --> |
| |
| <doc:reference xmlns=""> |
| <referenceinfo> |
| <releaseinfo role="meta"> |
| $Id: table.xsl,v 1.1 2004/03/01 10:26:07 eelco12 Exp $ |
| </releaseinfo> |
| <author><surname>Walsh</surname> |
| <firstname>Norman</firstname></author> |
| <copyright><year>1999</year><year>2000</year> |
| <holder>Norman Walsh</holder> |
| </copyright> |
| </referenceinfo> |
| <title>Formatting Object Table Reference</title> |
| |
| <partintro> |
| <section><title>Introduction</title> |
| |
| <para>This is technical reference documentation for the DocBook XSL |
| Stylesheets; it documents (some of) the parameters, templates, and |
| other elements of the stylesheets.</para> |
| |
| <para>This is not intended to be <quote>user</quote> documentation. |
| It is provided for developers writing customization layers for the |
| stylesheets, and for anyone who's interested in <quote>how it |
| works</quote>.</para> |
| |
| <para>Although I am trying to be thorough, this documentation is known |
| to be incomplete. Don't forget to read the source, too :-)</para> |
| </section> |
| </partintro> |
| </doc:reference> |
| |
| <!-- ==================================================================== --> |
| |
| <lxslt:component prefix="xtbl" |
| functions="adjustColumnWidths"/> |
| |
| <!-- ==================================================================== --> |
| |
| <xsl:template name="empty.table.cell"> |
| <xsl:param name="colnum" select="0"/> |
| |
| <xsl:variable name="rowsep"> |
| <xsl:call-template name="inherited.table.attribute"> |
| <xsl:with-param name="entry" select="NOT-AN-ELEMENT-NAME"/> |
| <xsl:with-param name="row" select="ancestor-or-self::row[1]"/> |
| <xsl:with-param name="colnum" select="$colnum"/> |
| <xsl:with-param name="attribute" select="'rowsep'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="colsep"> |
| <xsl:call-template name="inherited.table.attribute"> |
| <xsl:with-param name="entry" select="NOT-AN-ELEMENT-NAME"/> |
| <xsl:with-param name="row" select="ancestor-or-self::row[1]"/> |
| <xsl:with-param name="colnum" select="$colnum"/> |
| <xsl:with-param name="attribute" select="'colsep'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <fo:table-cell text-align="center" |
| display-align="center" |
| xsl:use-attribute-sets="table.cell.padding"> |
| <xsl:if test="$xep.extensions != 0"> |
| <!-- Suggested by RenderX to workaround a bug in their implementation --> |
| <xsl:attribute name="keep-together.within-column">always</xsl:attribute> |
| </xsl:if> |
| <xsl:if test="$rowsep > 0"> |
| <xsl:call-template name="border"> |
| <xsl:with-param name="side" select="'bottom'"/> |
| </xsl:call-template> |
| </xsl:if> |
| |
| <xsl:if test="$colsep > 0 and $colnum < ancestor::tgroup/@cols"> |
| <xsl:call-template name="border"> |
| <xsl:with-param name="side" select="'right'"/> |
| </xsl:call-template> |
| </xsl:if> |
| |
| <!-- fo:table-cell should not be empty --> |
| <fo:block/> |
| </fo:table-cell> |
| </xsl:template> |
| |
| <!-- ==================================================================== --> |
| |
| <xsl:template name="border"> |
| <xsl:param name="side" select="'left'"/> |
| |
| <xsl:attribute name="border-{$side}-width"> |
| <xsl:value-of select="$table.cell.border.thickness"/> |
| </xsl:attribute> |
| <xsl:attribute name="border-{$side}-style"> |
| <xsl:value-of select="$table.cell.border.style"/> |
| </xsl:attribute> |
| <xsl:attribute name="border-{$side}-color"> |
| <xsl:value-of select="$table.cell.border.color"/> |
| </xsl:attribute> |
| </xsl:template> |
| |
| <!-- ==================================================================== --> |
| |
| <xsl:template match="tgroup" name="tgroup"> |
| <xsl:variable name="explicit.table.width"> |
| <xsl:call-template name="dbfo-attribute"> |
| <xsl:with-param name="pis" |
| select="../processing-instruction('dbfo')"/> |
| <xsl:with-param name="attribute" select="'table-width'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="table.width"> |
| <xsl:choose> |
| <xsl:when test="$explicit.table.width != ''"> |
| <xsl:value-of select="$explicit.table.width"/> |
| </xsl:when> |
| <xsl:when test="$default.table.width = ''"> |
| <xsl:text>100%</xsl:text> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:value-of select="$default.table.width"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <xsl:variable name="colspecs"> |
| <xsl:choose> |
| <xsl:when test="$use.extensions != 0 |
| and $tablecolumns.extension != 0"> |
| <xsl:call-template name="generate.colgroup.raw"> |
| <xsl:with-param name="cols" select="@cols"/> |
| </xsl:call-template> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:call-template name="generate.colgroup"> |
| <xsl:with-param name="cols" select="@cols"/> |
| </xsl:call-template> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <xsl:if test="position() = 1"> |
| <!-- If this is the first tgroup, output the width attribute for the --> |
| <!-- surrounding fo:table. (If this isn't the first tgroup, trying --> |
| <!-- to output the attribute will cause an error.) --> |
| <xsl:attribute name="width"> |
| <xsl:value-of select="$table.width"/> |
| </xsl:attribute> |
| </xsl:if> |
| |
| <xsl:choose> |
| <xsl:when test="$use.extensions != 0 |
| and $tablecolumns.extension != 0"> |
| <xsl:choose> |
| <xsl:when test="function-available('stbl:adjustColumnWidths')"> |
| <xsl:copy-of select="stbl:adjustColumnWidths($colspecs)"/> |
| </xsl:when> |
| <xsl:when test="function-available('xtbl:adjustColumnWidths')"> |
| <xsl:copy-of select="xtbl:adjustColumnWidths($colspecs)"/> |
| </xsl:when> |
| <xsl:when test="function-available('ptbl:adjustColumnWidths')"> |
| <xsl:copy-of select="ptbl:adjustColumnWidths($colspecs)"/> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:message terminate="yes"> |
| <xsl:text>No adjustColumnWidths function available.</xsl:text> |
| </xsl:message> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:copy-of select="$colspecs"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| |
| <xsl:apply-templates select="thead"/> |
| <xsl:apply-templates select="tfoot"/> |
| <xsl:apply-templates select="tbody"/> |
| </xsl:template> |
| |
| <xsl:template match="colspec"></xsl:template> |
| |
| <xsl:template match="spanspec"></xsl:template> |
| |
| <xsl:template match="thead"> |
| <xsl:variable name="tgroup" select="parent::*"/> |
| |
| <fo:table-header> |
| <xsl:apply-templates select="row[1]"> |
| <xsl:with-param name="spans"> |
| <xsl:call-template name="blank.spans"> |
| <xsl:with-param name="cols" select="../@cols"/> |
| </xsl:call-template> |
| </xsl:with-param> |
| </xsl:apply-templates> |
| </fo:table-header> |
| </xsl:template> |
| |
| <xsl:template match="tfoot"> |
| <xsl:variable name="tgroup" select="parent::*"/> |
| |
| <fo:table-footer> |
| <xsl:apply-templates select="row[1]"> |
| <xsl:with-param name="spans"> |
| <xsl:call-template name="blank.spans"> |
| <xsl:with-param name="cols" select="../@cols"/> |
| </xsl:call-template> |
| </xsl:with-param> |
| </xsl:apply-templates> |
| |
| </fo:table-footer> |
| </xsl:template> |
| |
| <xsl:template match="tbody"> |
| <xsl:variable name="tgroup" select="parent::*"/> |
| |
| <fo:table-body> |
| <xsl:apply-templates select="row[1]"> |
| <xsl:with-param name="spans"> |
| <xsl:call-template name="blank.spans"> |
| <xsl:with-param name="cols" select="../@cols"/> |
| </xsl:call-template> |
| </xsl:with-param> |
| </xsl:apply-templates> |
| </fo:table-body> |
| </xsl:template> |
| |
| <xsl:template match="row"> |
| <xsl:param name="spans"/> |
| |
| <fo:table-row> |
| <xsl:call-template name="anchor"/> |
| |
| <xsl:apply-templates select="(entry|entrytbl)[1]"> |
| <xsl:with-param name="spans" select="$spans"/> |
| </xsl:apply-templates> |
| </fo:table-row> |
| |
| <xsl:if test="following-sibling::row"> |
| <xsl:variable name="nextspans"> |
| <xsl:apply-templates select="(entry|entrytbl)[1]" mode="span"> |
| <xsl:with-param name="spans" select="$spans"/> |
| </xsl:apply-templates> |
| </xsl:variable> |
| |
| <xsl:apply-templates select="following-sibling::row[1]"> |
| <xsl:with-param name="spans" select="$nextspans"/> |
| </xsl:apply-templates> |
| </xsl:if> |
| </xsl:template> |
| |
| <xsl:template match="entry|entrytbl" name="entry"> |
| <xsl:param name="col" select="1"/> |
| <xsl:param name="spans"/> |
| |
| <xsl:variable name="row" select="parent::row"/> |
| <xsl:variable name="group" select="$row/parent::*[1]"/> |
| <xsl:variable name="frame" select="ancestor::tgroup/parent::*/@frame"/> |
| |
| <xsl:variable name="empty.cell" select="count(node()) = 0"/> |
| |
| <xsl:variable name="named.colnum"> |
| <xsl:call-template name="entry.colnum"/> |
| </xsl:variable> |
| |
| <xsl:variable name="entry.colnum"> |
| <xsl:choose> |
| <xsl:when test="$named.colnum > 0"> |
| <xsl:value-of select="$named.colnum"/> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:value-of select="$col"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <xsl:variable name="entry.colspan"> |
| <xsl:choose> |
| <xsl:when test="@spanname or @namest"> |
| <xsl:call-template name="calculate.colspan"/> |
| </xsl:when> |
| <xsl:otherwise>1</xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <xsl:variable name="following.spans"> |
| <xsl:call-template name="calculate.following.spans"> |
| <xsl:with-param name="colspan" select="$entry.colspan"/> |
| <xsl:with-param name="spans" select="$spans"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="rowsep"> |
| <xsl:call-template name="inherited.table.attribute"> |
| <xsl:with-param name="entry" select="."/> |
| <xsl:with-param name="colnum" select="$entry.colnum"/> |
| <xsl:with-param name="attribute" select="'rowsep'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <!-- |
| <xsl:message><xsl:value-of select="."/>: <xsl:value-of select="$rowsep"/></xsl:message> |
| --> |
| |
| <xsl:variable name="colsep"> |
| <xsl:call-template name="inherited.table.attribute"> |
| <xsl:with-param name="entry" select="."/> |
| <xsl:with-param name="colnum" select="$entry.colnum"/> |
| <xsl:with-param name="attribute" select="'colsep'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="valign"> |
| <xsl:call-template name="inherited.table.attribute"> |
| <xsl:with-param name="entry" select="."/> |
| <xsl:with-param name="colnum" select="$entry.colnum"/> |
| <xsl:with-param name="attribute" select="'valign'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="align"> |
| <xsl:call-template name="inherited.table.attribute"> |
| <xsl:with-param name="entry" select="."/> |
| <xsl:with-param name="colnum" select="$entry.colnum"/> |
| <xsl:with-param name="attribute" select="'align'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="char"> |
| <xsl:call-template name="inherited.table.attribute"> |
| <xsl:with-param name="entry" select="."/> |
| <xsl:with-param name="colnum" select="$entry.colnum"/> |
| <xsl:with-param name="attribute" select="'char'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="charoff"> |
| <xsl:call-template name="inherited.table.attribute"> |
| <xsl:with-param name="entry" select="."/> |
| <xsl:with-param name="colnum" select="$entry.colnum"/> |
| <xsl:with-param name="attribute" select="'charoff'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:choose> |
| <xsl:when test="$spans != '' and not(starts-with($spans,'0:'))"> |
| <xsl:call-template name="entry"> |
| <xsl:with-param name="col" select="$col+1"/> |
| <xsl:with-param name="spans" select="substring-after($spans,':')"/> |
| </xsl:call-template> |
| </xsl:when> |
| |
| <xsl:when test="$entry.colnum > $col"> |
| <xsl:call-template name="empty.table.cell"> |
| <xsl:with-param name="colnum" select="$col"/> |
| </xsl:call-template> |
| <xsl:call-template name="entry"> |
| <xsl:with-param name="col" select="$col+1"/> |
| <xsl:with-param name="spans" select="substring-after($spans,':')"/> |
| </xsl:call-template> |
| </xsl:when> |
| |
| <xsl:otherwise> |
| <xsl:variable name="cell.content"> |
| <fo:block> |
| <!-- highlight this entry? --> |
| <xsl:if test="ancestor::thead"> |
| <xsl:attribute name="font-weight">bold</xsl:attribute> |
| </xsl:if> |
| |
| <!-- are we missing any indexterms? --> |
| <xsl:if test="not(preceding-sibling::entry) |
| and not(parent::row/preceding-sibling::row)"> |
| <!-- this is the first entry of the first row --> |
| <xsl:if test="ancestor::thead or |
| (ancestor::tbody |
| and not(ancestor::tbody/preceding-sibling::thead |
| or ancestor::tbody/preceding-sibling::tbody))"> |
| <!-- of the thead or the first tbody --> |
| <xsl:apply-templates select="ancestor::tgroup/preceding-sibling::indexterm"/> |
| </xsl:if> |
| </xsl:if> |
| |
| <!-- |
| <xsl:text>(</xsl:text> |
| <xsl:value-of select="$rowsep"/> |
| <xsl:text>,</xsl:text> |
| <xsl:value-of select="$colsep"/> |
| <xsl:text>)</xsl:text> |
| --> |
| <xsl:choose> |
| <xsl:when test="$empty.cell"> |
| <xsl:text> </xsl:text> |
| </xsl:when> |
| <xsl:when test="self::entrytbl"> |
| <xsl:variable name="prop-columns" |
| select=".//colspec[contains(@colwidth, '*')]"/> |
| <fo:table border-collapse="collapse"> |
| <xsl:if test="count($prop-columns) != 0"> |
| <xsl:attribute name="table-layout">fixed</xsl:attribute> |
| </xsl:if> |
| <xsl:call-template name="tgroup"/> |
| </fo:table> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:apply-templates/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </fo:block> |
| </xsl:variable> |
| |
| <xsl:variable name="cell-orientation"> |
| <xsl:call-template name="dbfo-attribute"> |
| <xsl:with-param name="pis" |
| select="ancestor-or-self::entry/processing-instruction('dbfo')"/> |
| <xsl:with-param name="attribute" select="'orientation'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="row-orientation"> |
| <xsl:call-template name="dbfo-attribute"> |
| <xsl:with-param name="pis" |
| select="ancestor-or-self::row/processing-instruction('dbfo')"/> |
| <xsl:with-param name="attribute" select="'orientation'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="cell-width"> |
| <xsl:call-template name="dbfo-attribute"> |
| <xsl:with-param name="pis" |
| select="ancestor-or-self::entry/processing-instruction('dbfo')"/> |
| <xsl:with-param name="attribute" select="'rotated-width'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="row-width"> |
| <xsl:call-template name="dbfo-attribute"> |
| <xsl:with-param name="pis" |
| select="ancestor-or-self::row/processing-instruction('dbfo')"/> |
| <xsl:with-param name="attribute" select="'rotated-width'"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:variable name="orientation"> |
| <xsl:choose> |
| <xsl:when test="$cell-orientation != ''"> |
| <xsl:value-of select="$cell-orientation"/> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:value-of select="$row-orientation"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <xsl:variable name="rotated-width"> |
| <xsl:choose> |
| <xsl:when test="$cell-width != ''"> |
| <xsl:value-of select="$cell-width"/> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:value-of select="$row-width"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <fo:table-cell xsl:use-attribute-sets="table.cell.padding"> |
| <xsl:if test="$xep.extensions != 0"> |
| <!-- Suggested by RenderX to workaround a bug in their implementation --> |
| <xsl:attribute name="keep-together.within-column">always</xsl:attribute> |
| </xsl:if> |
| |
| <xsl:call-template name="anchor"/> |
| |
| <xsl:if test="$rowsep > 0"> |
| <xsl:call-template name="border"> |
| <xsl:with-param name="side" select="'bottom'"/> |
| </xsl:call-template> |
| </xsl:if> |
| |
| <xsl:if test="$colsep > 0 and $col < ancestor::tgroup/@cols"> |
| <xsl:call-template name="border"> |
| <xsl:with-param name="side" select="'right'"/> |
| </xsl:call-template> |
| </xsl:if> |
| |
| <xsl:if test="@morerows"> |
| <xsl:attribute name="number-rows-spanned"> |
| <xsl:value-of select="@morerows+1"/> |
| </xsl:attribute> |
| </xsl:if> |
| |
| <xsl:if test="$entry.colspan > 1"> |
| <xsl:attribute name="number-columns-spanned"> |
| <xsl:value-of select="$entry.colspan"/> |
| </xsl:attribute> |
| </xsl:if> |
| |
| <xsl:if test="$valign != ''"> |
| <xsl:attribute name="display-align"> |
| <xsl:choose> |
| <xsl:when test="$valign='top'">before</xsl:when> |
| <xsl:when test="$valign='middle'">center</xsl:when> |
| <xsl:when test="$valign='bottom'">after</xsl:when> |
| <xsl:otherwise> |
| <xsl:message> |
| <xsl:text>Unexpected valign value: </xsl:text> |
| <xsl:value-of select="$valign"/> |
| <xsl:text>, center used.</xsl:text> |
| </xsl:message> |
| <xsl:text>center</xsl:text> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:attribute> |
| </xsl:if> |
| |
| <xsl:if test="$align != ''"> |
| <xsl:attribute name="text-align"> |
| <xsl:value-of select="$align"/> |
| </xsl:attribute> |
| </xsl:if> |
| |
| <xsl:if test="$char != ''"> |
| <xsl:attribute name="text-align"> |
| <xsl:value-of select="$char"/> |
| </xsl:attribute> |
| </xsl:if> |
| |
| <!-- |
| <xsl:if test="@charoff"> |
| <xsl:attribute name="charoff"> |
| <xsl:value-of select="@charoff"/> |
| </xsl:attribute> |
| </xsl:if> |
| --> |
| |
| <xsl:choose> |
| <xsl:when test="$xep.extensions != 0 and $orientation != ''"> |
| <fo:block-container reference-orientation="{$orientation}"> |
| <xsl:if test="$rotated-width != ''"> |
| <xsl:attribute name="width"> |
| <xsl:value-of select="$rotated-width"/> |
| </xsl:attribute> |
| </xsl:if> |
| <xsl:copy-of select="$cell.content"/> |
| </fo:block-container> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:copy-of select="$cell.content"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </fo:table-cell> |
| |
| <xsl:choose> |
| <xsl:when test="following-sibling::entry|following-sibling::entrytbl"> |
| <xsl:apply-templates select="(following-sibling::entry |
| |following-sibling::entrytbl)[1]"> |
| <xsl:with-param name="col" select="$col+$entry.colspan"/> |
| <xsl:with-param name="spans" select="$following.spans"/> |
| </xsl:apply-templates> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:call-template name="finaltd"> |
| <xsl:with-param name="spans" select="$following.spans"/> |
| <xsl:with-param name="col" select="$col+$entry.colspan"/> |
| </xsl:call-template> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:template> |
| |
| <xsl:template match="entry|entrytbl" name="sentry" mode="span"> |
| <xsl:param name="col" select="1"/> |
| <xsl:param name="spans"/> |
| |
| <xsl:variable name="entry.colnum"> |
| <xsl:call-template name="entry.colnum"/> |
| </xsl:variable> |
| |
| <xsl:variable name="entry.colspan"> |
| <xsl:choose> |
| <xsl:when test="@spanname or @namest"> |
| <xsl:call-template name="calculate.colspan"/> |
| </xsl:when> |
| <xsl:otherwise>1</xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <xsl:variable name="following.spans"> |
| <xsl:call-template name="calculate.following.spans"> |
| <xsl:with-param name="colspan" select="$entry.colspan"/> |
| <xsl:with-param name="spans" select="$spans"/> |
| </xsl:call-template> |
| </xsl:variable> |
| |
| <xsl:choose> |
| <xsl:when test="$spans != '' and not(starts-with($spans,'0:'))"> |
| <xsl:value-of select="substring-before($spans,':')-1"/> |
| <xsl:text>:</xsl:text> |
| <xsl:call-template name="sentry"> |
| <xsl:with-param name="col" select="$col+1"/> |
| <xsl:with-param name="spans" select="substring-after($spans,':')"/> |
| </xsl:call-template> |
| </xsl:when> |
| |
| <xsl:when test="$entry.colnum > $col"> |
| <xsl:text>0:</xsl:text> |
| <xsl:call-template name="sentry"> |
| <xsl:with-param name="col" select="$col+$entry.colspan"/> |
| <xsl:with-param name="spans" select="$following.spans"/> |
| </xsl:call-template> |
| </xsl:when> |
| |
| <xsl:otherwise> |
| <xsl:call-template name="copy-string"> |
| <xsl:with-param name="count" select="$entry.colspan"/> |
| <xsl:with-param name="string"> |
| <xsl:choose> |
| <xsl:when test="@morerows"> |
| <xsl:value-of select="@morerows"/> |
| </xsl:when> |
| <xsl:otherwise>0</xsl:otherwise> |
| </xsl:choose> |
| <xsl:text>:</xsl:text> |
| </xsl:with-param> |
| </xsl:call-template> |
| |
| <xsl:choose> |
| <xsl:when test="following-sibling::entry|following-sibling::entrytbl"> |
| <xsl:apply-templates select="(following-sibling::entry |
| |following-sibling::entrytbl)[1]" |
| mode="span"> |
| <xsl:with-param name="col" select="$col+$entry.colspan"/> |
| <xsl:with-param name="spans" select="$following.spans"/> |
| </xsl:apply-templates> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:call-template name="sfinaltd"> |
| <xsl:with-param name="spans" select="$following.spans"/> |
| </xsl:call-template> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:template> |
| |
| <xsl:template name="generate.colgroup.raw"> |
| <xsl:param name="cols" select="1"/> |
| <xsl:param name="count" select="1"/> |
| |
| <xsl:choose> |
| <xsl:when test="$count>$cols"></xsl:when> |
| <xsl:otherwise> |
| <xsl:call-template name="generate.col.raw"> |
| <xsl:with-param name="countcol" select="$count"/> |
| </xsl:call-template> |
| <xsl:call-template name="generate.colgroup.raw"> |
| <xsl:with-param name="cols" select="$cols"/> |
| <xsl:with-param name="count" select="$count+1"/> |
| </xsl:call-template> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:template> |
| |
| <xsl:template name="generate.colgroup"> |
| <xsl:param name="cols" select="1"/> |
| <xsl:param name="count" select="1"/> |
| |
| <xsl:choose> |
| <xsl:when test="$count>$cols"></xsl:when> |
| <xsl:otherwise> |
| <xsl:call-template name="generate.col"> |
| <xsl:with-param name="countcol" select="$count"/> |
| </xsl:call-template> |
| <xsl:call-template name="generate.colgroup"> |
| <xsl:with-param name="cols" select="$cols"/> |
| <xsl:with-param name="count" select="$count+1"/> |
| </xsl:call-template> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:template> |
| |
| <xsl:template name="generate.col.raw"> |
| <!-- generate the table-column for column countcol --> |
| <xsl:param name="countcol">1</xsl:param> |
| <xsl:param name="colspecs" select="./colspec"/> |
| <xsl:param name="count">1</xsl:param> |
| <xsl:param name="colnum">1</xsl:param> |
| |
| <xsl:choose> |
| <xsl:when test="$count>count($colspecs)"> |
| <fo:table-column column-number="{$countcol}"/> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:variable name="colspec" select="$colspecs[$count=position()]"/> |
| |
| <xsl:variable name="colspec.colnum"> |
| <xsl:choose> |
| <xsl:when test="$colspec/@colnum"> |
| <xsl:value-of select="$colspec/@colnum"/> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:value-of select="$colnum"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <xsl:variable name="colspec.colwidth"> |
| <xsl:choose> |
| <xsl:when test="$colspec/@colwidth"> |
| <xsl:value-of select="$colspec/@colwidth"/> |
| </xsl:when> |
| <xsl:otherwise>1*</xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <xsl:choose> |
| <xsl:when test="$colspec.colnum=$countcol"> |
| <fo:table-column column-number="{$countcol}"> |
| <xsl:attribute name="column-width"> |
| <xsl:value-of select="$colspec.colwidth"/> |
| </xsl:attribute> |
| </fo:table-column> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:call-template name="generate.col.raw"> |
| <xsl:with-param name="countcol" select="$countcol"/> |
| <xsl:with-param name="colspecs" select="$colspecs"/> |
| <xsl:with-param name="count" select="$count+1"/> |
| <xsl:with-param name="colnum"> |
| <xsl:choose> |
| <xsl:when test="$colspec/@colnum"> |
| <xsl:value-of select="$colspec/@colnum + 1"/> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:value-of select="$colnum + 1"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:with-param> |
| </xsl:call-template> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:template> |
| |
| <xsl:template name="generate.col"> |
| <!-- generate the table-column for column countcol --> |
| <xsl:param name="countcol">1</xsl:param> |
| <xsl:param name="colspecs" select="./colspec"/> |
| <xsl:param name="count">1</xsl:param> |
| <xsl:param name="colnum">1</xsl:param> |
| |
| <xsl:choose> |
| <xsl:when test="$count>count($colspecs)"> |
| <fo:table-column column-number="{$countcol}"> |
| <xsl:variable name="colwidth"> |
| <xsl:call-template name="calc.column.width"/> |
| </xsl:variable> |
| <xsl:if test="$colwidth != 'proportional-column-width(1)'"> |
| <xsl:attribute name="column-width"> |
| <xsl:value-of select="$colwidth"/> |
| </xsl:attribute> |
| </xsl:if> |
| </fo:table-column> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:variable name="colspec" select="$colspecs[$count=position()]"/> |
| |
| <xsl:variable name="colspec.colnum"> |
| <xsl:choose> |
| <xsl:when test="$colspec/@colnum"> |
| <xsl:value-of select="$colspec/@colnum"/> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:value-of select="$colnum"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <xsl:variable name="colspec.colwidth"> |
| <xsl:choose> |
| <xsl:when test="$colspec/@colwidth"> |
| <xsl:value-of select="$colspec/@colwidth"/> |
| </xsl:when> |
| <xsl:otherwise>1*</xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <xsl:choose> |
| <xsl:when test="$colspec.colnum=$countcol"> |
| <fo:table-column column-number="{$countcol}"> |
| <xsl:variable name="colwidth"> |
| <xsl:call-template name="calc.column.width"> |
| <xsl:with-param name="colwidth"> |
| <xsl:value-of select="$colspec.colwidth"/> |
| </xsl:with-param> |
| </xsl:call-template> |
| </xsl:variable> |
| <xsl:if test="$colwidth != 'proportional-column-width(1)'"> |
| <xsl:attribute name="column-width"> |
| <xsl:value-of select="$colwidth"/> |
| </xsl:attribute> |
| </xsl:if> |
| </fo:table-column> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:call-template name="generate.col"> |
| <xsl:with-param name="countcol" select="$countcol"/> |
| <xsl:with-param name="colspecs" select="$colspecs"/> |
| <xsl:with-param name="count" select="$count+1"/> |
| <xsl:with-param name="colnum"> |
| <xsl:choose> |
| <xsl:when test="$colspec/@colnum"> |
| <xsl:value-of select="$colspec/@colnum + 1"/> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:value-of select="$colnum + 1"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:with-param> |
| </xsl:call-template> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:template> |
| |
| <doc:template name="calc.column.width" xmlns=""> |
| <refpurpose>Calculate an XSL FO table column width specification from a |
| CALS table column width specification.</refpurpose> |
| |
| <refdescription> |
| <para>CALS expresses table column widths in the following basic |
| forms:</para> |
| |
| <itemizedlist> |
| <listitem> |
| <para><emphasis>99.99units</emphasis>, a fixed length specifier.</para> |
| </listitem> |
| <listitem> |
| <para><emphasis>99.99</emphasis>, a fixed length specifier without any units.</para> |
| </listitem> |
| <listitem> |
| <para><emphasis>99.99*</emphasis>, a relative length specifier.</para> |
| </listitem> |
| <listitem> |
| <para><emphasis>99.99*+99.99units</emphasis>, a combination of both.</para> |
| </listitem> |
| </itemizedlist> |
| |
| <para>The CALS units are points (pt), picas (pi), centimeters (cm), |
| millimeters (mm), and inches (in). These are the same units as XSL, |
| except that XSL abbreviates picas "pc" instead of "pi". If a length |
| specifier has no units, the CALS default unit (pt) is assumed.</para> |
| |
| <para>Relative length specifiers are represented in XSL with the |
| proportional-column-width() function.</para> |
| |
| <para>Here are some examples:</para> |
| |
| <itemizedlist> |
| <listitem> |
| <para>"36pt" becomes "36pt"</para> |
| </listitem> |
| <listitem> |
| <para>"3pi" becomes "3pc"</para> |
| </listitem> |
| <listitem> |
| <para>"36" becomes "36pt"</para> |
| </listitem> |
| <listitem> |
| <para>"3*" becomes "proportional-column-width(3)"</para> |
| </listitem> |
| <listitem> |
| <para>"3*+2pi" becomes "proportional-column-width(3)+2pc"</para> |
| </listitem> |
| <listitem> |
| <para>"1*+2" becomes "proportional-column-width(1)+2pt"</para> |
| </listitem> |
| </itemizedlist> |
| </refdescription> |
| |
| <refparameter> |
| <variablelist> |
| <varlistentry><term>colwidth</term> |
| <listitem> |
| <para>The CALS column width specification.</para> |
| </listitem> |
| </varlistentry> |
| </variablelist> |
| </refparameter> |
| |
| <refreturn> |
| <para>The XSL column width specification.</para> |
| </refreturn> |
| </doc:template> |
| |
| <xsl:template name="calc.column.width"> |
| <xsl:param name="colwidth">1*</xsl:param> |
| |
| <!-- Ok, the colwidth could have any one of the following forms: --> |
| <!-- 1* = proportional width --> |
| <!-- 1unit = 1.0 units wide --> |
| <!-- 1 = 1pt wide --> |
| <!-- 1*+1unit = proportional width + some fixed width --> |
| <!-- 1*+1 = proportional width + some fixed width --> |
| |
| <!-- If it has a proportional width, translate it to XSL --> |
| <xsl:if test="contains($colwidth, '*')"> |
| <xsl:text>proportional-column-width(</xsl:text> |
| <xsl:value-of select="substring-before($colwidth, '*')"/> |
| <xsl:text>)</xsl:text> |
| </xsl:if> |
| |
| <!-- Now grab the non-proportional part of the specification --> |
| <xsl:variable name="width-units"> |
| <xsl:choose> |
| <xsl:when test="contains($colwidth, '*')"> |
| <xsl:value-of |
| select="normalize-space(substring-after($colwidth, '*'))"/> |
| </xsl:when> |
| <xsl:otherwise> |
| <xsl:value-of select="normalize-space($colwidth)"/> |
| </xsl:otherwise> |
| </xsl:choose> |
| </xsl:variable> |
| |
| <!-- Ok, now the width-units could have any one of the following forms: --> |
| <!-- = <empty string> --> |
| <!-- 1unit = 1.0 units wide --> |
| <!-- 1 = 1pt wide --> |
| <!-- with an optional leading sign --> |
| |
| <!-- Grab the width part by blanking out the units part and discarding --> |
| <!-- whitespace. It's not pretty, but it works. --> |
| <xsl:variable name="width" |
| select="normalize-space(translate($width-units, |
| '+-0123456789.abcdefghijklmnopqrstuvwxyz', |
| '+-0123456789.'))"/> |
| |
| <!-- Grab the units part by blanking out the width part and discarding --> |
| <!-- whitespace. It's not pretty, but it works. --> |
| <xsl:variable name="units" |
| select="normalize-space(translate($width-units, |
| 'abcdefghijklmnopqrstuvwxyz+-0123456789.', |
| 'abcdefghijklmnopqrstuvwxyz'))"/> |
| |
| <!-- Output the width --> |
| <xsl:value-of select="$width"/> |
| |
| <!-- Output the units, translated appropriately --> |
| <xsl:choose> |
| <xsl:when test="$units = 'pi'">pc</xsl:when> |
| <xsl:when test="$units = '' and $width != ''">pt</xsl:when> |
| <xsl:otherwise><xsl:value-of select="$units"/></xsl:otherwise> |
| </xsl:choose> |
| </xsl:template> |
| |
| <!-- ==================================================================== --> |
| |
| </xsl:stylesheet> |