diff options
Diffstat (limited to 'doc/editor_configs/serna/scons/docbook-xsl-serna/common-table.xsl')
| -rw-r--r-- | doc/editor_configs/serna/scons/docbook-xsl-serna/common-table.xsl | 444 |
1 files changed, 444 insertions, 0 deletions
diff --git a/doc/editor_configs/serna/scons/docbook-xsl-serna/common-table.xsl b/doc/editor_configs/serna/scons/docbook-xsl-serna/common-table.xsl new file mode 100644 index 0000000..4bf89ca --- /dev/null +++ b/doc/editor_configs/serna/scons/docbook-xsl-serna/common-table.xsl @@ -0,0 +1,444 @@ +<?xml version="1.0"?> +<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" + xmlns:dtm="http://syntext.com/Extensions/DocumentTypeMetadata-1.0" + extension-element-prefixes="dtm" + version="1.0"> + + <!-- A row expressed with the following mnemonics: + + 0: -> means a cell, that takes no rows down + 1: -> means a cell, that takes 1 row down besides its own row + 0:0:0: -> means a cell, that spans 3 cells in its row and takes no row down + 1:1: -> means a cell, that spans 2 cells in its row and takes 1 more row down + + --> + + + <!-- Creates a string of "0:" repeating number of "cols" + + For cols==0: "" + cols==1: 0: + cols==2: 0:0: + .... + --> +<dtm:doc dtm:idref="blank.spans"/> +<xsl:template name="blank.spans" dtm:id="blank.spans"> + <xsl:param name="cols" select="1"/> + <xsl:if test="$cols > 0"> + <xsl:text>0:</xsl:text> + <xsl:call-template name="blank.spans"> + <xsl:with-param name="cols" select="$cols - 1"/> + </xsl:call-template> + </xsl:if> +</xsl:template> + +<!-- Calculates the following cells' span mnemonic, removing + span related to current cell. +--> +<dtm:doc dtm:idref="calculate.following.spans"/> +<xsl:template name="calculate.following.spans" dtm:id="calculate.following.spans"> + <xsl:param name="colspan" select="1"/> + <xsl:param name="spans" select="''"/> + + <xsl:choose> + <xsl:when test="$colspan > 0"> + <xsl:call-template name="calculate.following.spans"> + <xsl:with-param name="colspan" select="$colspan - 1"/> + <xsl:with-param name="spans" select="substring-after($spans,':')"/> + </xsl:call-template> + </xsl:when> + <xsl:otherwise> + <xsl:value-of select="$spans"/> + </xsl:otherwise> + </xsl:choose> +</xsl:template> + +<!-- Generate empty cells if the span is not exhausted. --> +<dtm:doc dtm:idref="finaltd"/> +<xsl:template name="finaltd" dtm:id="finaltd"> + <xsl:param name="spans"/> + <xsl:param name="col" select="0"/> + + <xsl:if test="$spans != ''"> + <xsl:choose> + <xsl:when test="starts-with($spans,'0:')"> + <!-- TODO: We now disable generating empty cells in the end of + the row. When table cell extension will be created, empty cells will be + generated. --> + <!-- xsl:call-template name="empty.table.cell"> + <xsl:with-param name="colnum" select="$col"/> + </xsl:call-template --> + </xsl:when> + <xsl:otherwise></xsl:otherwise> + </xsl:choose> + + <xsl:call-template name="finaltd"> + <xsl:with-param name="spans" select="substring-after($spans,':')"/> + <xsl:with-param name="col" select="$col+1"/> + </xsl:call-template> + </xsl:if> +</xsl:template> + +<!-- For every mnemonic in spans decrease its morerows value for 1 --> +<dtm:doc dtm:idref="sfinaltd"/> +<xsl:template name="sfinaltd" dtm:id="sfinaltd"> + <xsl:param name="spans"/> + + <xsl:if test="$spans != ''"> + <xsl:choose> + <xsl:when test="starts-with($spans,'0:')">0:</xsl:when> + <xsl:otherwise> + <xsl:value-of select="substring-before($spans,':')-1"/> + <xsl:text>:</xsl:text> + </xsl:otherwise> + </xsl:choose> + + <xsl:call-template name="sfinaltd"> + <xsl:with-param name="spans" select="substring-after($spans,':')"/> + </xsl:call-template> + </xsl:if> + <!-- Do nothing if following spans is none --> +</xsl:template> + +<!-- entry.colnum + Determine the column number in which a given entry occurs + + If an entry has a colname or namest attribute, + this template will determine the number of the column in which the + entry should occur. + + For other entry's, 0 is returned. +--> +<dtm:doc dtm:idref="entry.colnum"/> +<xsl:template name="entry.colnum" dtm:id="entry.colnum"> + <xsl:param name="entry" select="."/> + + <xsl:choose> + <xsl:when test="$entry/@spanname"> + <xsl:variable name="spanname" select="$entry/@spanname"/> + <xsl:variable name="spanspec" + select="$entry/ancestor::tgroup/spanspec[@spanname=$spanname]"/> + <xsl:variable name="colspec" + select="$entry/ancestor::tgroup/colspec[@colname=$spanspec/@namest]"/> + <xsl:call-template name="colspec.colnum"> + <xsl:with-param name="colspec" select="$colspec"/> + </xsl:call-template> + </xsl:when> + <xsl:when test="$entry/@colname"> + <xsl:variable name="colname" select="$entry/@colname"/> + <xsl:variable name="colspec" + select="$entry/ancestor::tgroup/colspec[@colname=$colname]"/> + <xsl:call-template name="colspec.colnum"> + <xsl:with-param name="colspec" select="$colspec"/> + </xsl:call-template> + </xsl:when> + <xsl:when test="$entry/@namest"> + <xsl:variable name="namest" select="$entry/@namest"/> + <xsl:variable name="colspec" + select="$entry/ancestor::tgroup/colspec[@colname=$namest]"/> + <xsl:call-template name="colspec.colnum"> + <xsl:with-param name="colspec" select="$colspec"/> + </xsl:call-template> + </xsl:when> + <!-- no idea, return 0 --> + <xsl:otherwise>0</xsl:otherwise> + </xsl:choose> +</xsl:template> + + <!-- Calculates column number the given colspec corresponds to. --> +<dtm:doc dtm:idref="colspec.colnum"/> +<xsl:template name="colspec.colnum" dtm:id="colspec.colnum"> + <xsl:param name="colspec" select="."/> + <xsl:choose> + <xsl:when test="$colspec/@colnum"> + <xsl:value-of select="$colspec/@colnum"/> + </xsl:when> + <xsl:when test="$colspec/preceding-sibling::colspec"> + <xsl:variable name="prec.colspec.colnum"> + <xsl:call-template name="colspec.colnum"> + <xsl:with-param name="colspec" + select="$colspec/preceding-sibling::colspec[1]"/> + </xsl:call-template> + </xsl:variable> + <xsl:value-of select="$prec.colspec.colnum + 1"/> + </xsl:when> + <xsl:otherwise>1</xsl:otherwise> + </xsl:choose> +</xsl:template> + +<!-- + Calculates how many cells the span takes. If one cell, then + value is 1. +--> +<dtm:doc dtm:idref="calculate.colspan"/> +<xsl:template name="calculate.colspan" dtm:id="calculate.colspan"> + <xsl:param name="entry" select="."/> + <xsl:variable name="spanname" select="$entry/@spanname"/> + <xsl:variable name="spanspec" + select="$entry/ancestor::tgroup/spanspec[@spanname=$spanname]"/> + + <xsl:variable name="namest"> + <xsl:choose> + <xsl:when test="@spanname"> + <xsl:value-of select="$spanspec/@namest"/> + </xsl:when> + <xsl:otherwise> + <xsl:value-of select="$entry/@namest"/> + </xsl:otherwise> + </xsl:choose> + </xsl:variable> + + <xsl:variable name="nameend"> + <xsl:choose> + <xsl:when test="@spanname"> + <xsl:value-of select="$spanspec/@nameend"/> + </xsl:when> + <xsl:otherwise> + <xsl:value-of select="$entry/@nameend"/> + </xsl:otherwise> + </xsl:choose> + </xsl:variable> + + <xsl:variable name="scol"> + <xsl:call-template name="colspec.colnum"> + <xsl:with-param name="colspec" + select="$entry/ancestor::tgroup/colspec[@colname=$namest]"/> + </xsl:call-template> + </xsl:variable> + + <xsl:variable name="ecol"> + <xsl:call-template name="colspec.colnum"> + <xsl:with-param name="colspec" + select="$entry/ancestor::tgroup/colspec[@colname=$nameend]"/> + </xsl:call-template> + </xsl:variable> + + <xsl:choose> + <xsl:when test="$namest != '' and $nameend != ''"> + <xsl:choose> + <xsl:when test="$ecol >= $scol"> + <xsl:value-of select="$ecol - $scol + 1"/> + </xsl:when> + <xsl:otherwise> + <xsl:value-of select="$scol - $ecol + 1"/> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:otherwise>1</xsl:otherwise> + </xsl:choose> +</xsl:template> + +<dtm:doc dtm:idref="inherited.table.attribute"/> +<xsl:template name="inherited.table.attribute" dtm:id="inherited.table.attribute"> + <xsl:param name="entry" select="."/> + <xsl:param name="colnum" select="0"/> + <xsl:param name="attribute" select="'colsep'"/> + + <xsl:variable name="row" select="$entry/ancestor-or-self::row[1]"/> + <xsl:variable name="tgroup" select="$row/ancestor::tgroup[1]"/> + + <xsl:variable name="entry.value"> + <xsl:call-template name="get-attribute"> + <xsl:with-param name="element" select="$entry"/> + <xsl:with-param name="attribute" select="$attribute"/> + </xsl:call-template> + </xsl:variable> + + <xsl:variable name="row.value"> + <xsl:call-template name="get-attribute"> + <xsl:with-param name="element" select="$row"/> + <xsl:with-param name="attribute" select="$attribute"/> + </xsl:call-template> + </xsl:variable> + + <xsl:variable name="span.value"> + <xsl:if test="$entry/@spanname"> + <xsl:variable name="spanname" select="$entry/@spanname"/> + <xsl:variable name="spanspec" + select="$tgroup/spanspec[@spanname=$spanname]"/> + <xsl:variable name="span.colspec" + select="$tgroup/colspec[@colname=$spanspec/@namest]"/> + + <xsl:variable name="spanspec.value"> + <xsl:call-template name="get-attribute"> + <xsl:with-param name="element" select="$spanspec"/> + <xsl:with-param name="attribute" select="$attribute"/> + </xsl:call-template> + </xsl:variable> + + <xsl:variable name="scolspec.value"> + <xsl:call-template name="get-attribute"> + <xsl:with-param name="element" select="$span.colspec"/> + <xsl:with-param name="attribute" select="$attribute"/> + </xsl:call-template> + </xsl:variable> + + <xsl:choose> + <xsl:when test="$spanspec.value != ''"> + <xsl:value-of select="$spanspec.value"/> + </xsl:when> + <xsl:when test="$scolspec.value != ''"> + <xsl:value-of select="$scolspec.value"/> + </xsl:when> + <xsl:otherwise></xsl:otherwise> + </xsl:choose> + </xsl:if> + </xsl:variable> + + <xsl:variable name="namest.value"> + <xsl:if test="$entry/@namest"> + <xsl:variable name="namest" select="$entry/@namest"/> + <xsl:variable name="colspec" + select="$tgroup/colspec[@colname=$namest]"/> + + <xsl:variable name="inner.namest.value"> + <xsl:call-template name="get-attribute"> + <xsl:with-param name="element" select="$colspec"/> + <xsl:with-param name="attribute" select="$attribute"/> + </xsl:call-template> + </xsl:variable> + + <xsl:choose> + <xsl:when test="$inner.namest.value"> + <xsl:value-of select="$inner.namest.value"/> + </xsl:when> + <xsl:otherwise></xsl:otherwise> + </xsl:choose> + </xsl:if> + </xsl:variable> + + <xsl:variable name="tgroup.value"> + <xsl:call-template name="get-attribute"> + <xsl:with-param name="element" select="$tgroup"/> + <xsl:with-param name="attribute" select="$attribute"/> + </xsl:call-template> + </xsl:variable> + + <xsl:variable name="default.value"> + <!-- This section used to say that rowsep and colsep have defaults based --> + <!-- on the frame setting. Further reflection and closer examination of the --> + <!-- CALS spec reveals I was mistaken. The default is "1" for rowsep and colsep. --> + <!-- For everything else, the default is the tgroup value --> + <xsl:choose> + <xsl:when test="$tgroup.value != ''"> + <xsl:value-of select="$tgroup.value"/> + </xsl:when> + <xsl:when test="$attribute = 'rowsep'">1</xsl:when> + <xsl:when test="$attribute = 'colsep'">1</xsl:when> + <xsl:otherwise><!-- empty --></xsl:otherwise> + </xsl:choose> + </xsl:variable> + + <xsl:choose> + <xsl:when test="$entry.value != ''"> + <xsl:value-of select="$entry.value"/> + </xsl:when> + <xsl:when test="$row.value != ''"> + <xsl:value-of select="$row.value"/> + </xsl:when> + <xsl:when test="$span.value != ''"> + <xsl:value-of select="$span.value"/> + </xsl:when> + <xsl:when test="$namest.value != ''"> + <xsl:value-of select="$namest.value"/> + </xsl:when> + <xsl:when test="$colnum > 0"> + <xsl:variable name="calc.colvalue"> + <xsl:call-template name="colnum.colspec"> + <xsl:with-param name="colnum" select="$colnum"/> + <xsl:with-param name="attribute" select="$attribute"/> + </xsl:call-template> + </xsl:variable> + <xsl:choose> + <xsl:when test="$calc.colvalue != ''"> + <xsl:value-of select="$calc.colvalue"/> + </xsl:when> + <xsl:otherwise> + <xsl:value-of select="$default.value"/> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <xsl:otherwise> + <xsl:value-of select="$default.value"/> + </xsl:otherwise> + </xsl:choose> +</xsl:template> + +<!-- Get colspec value. Namely, value given for the current column. --> + +<dtm:doc dtm:idref="colnum.colspec"/> +<xsl:template name="colnum.colspec" dtm:id="colnum.colspec"> + <xsl:param name="colnum" select="0"/> + <xsl:param name="attribute" select="'colname'"/> + <xsl:param name="colspecs" select="ancestor::tgroup/colspec"/> + <!-- Param count tells which colspec we currently work on --> + <xsl:param name="count" select="1"/> + + <xsl:choose> + <!-- If there are no column specifications or current colspec + over the colnum, we did not find any column specifications --> + <xsl:when test="not($colspecs) or $count > $colnum"> + <!-- nop --> + </xsl:when> + <!-- If the first colspec has col number, explore it --> + <xsl:when test="$colspecs[1]/@colnum"> + <xsl:choose> + <!-- If colspec's colnum is our colnum take the value --> + <xsl:when test="$colspecs[1]/@colnum = $colnum"> + <xsl:call-template name="get-attribute"> + <xsl:with-param name="element" select="$colspecs[1]"/> + <xsl:with-param name="attribute" select="$attribute"/> + </xsl:call-template> + </xsl:when> + <!-- Otherwise proceed to the next colspec --> + <xsl:otherwise> + <xsl:call-template name="colnum.colspec"> + <xsl:with-param name="colnum" select="$colnum"/> + <xsl:with-param name="attribute" select="$attribute"/> + <xsl:with-param name="colspecs" + select="$colspecs[position()>1]"/> + <xsl:with-param name="count" + select="$colspecs[1]/@colnum+1"/> + </xsl:call-template> + </xsl:otherwise> + </xsl:choose> + </xsl:when> + <!-- Colspec does not have explicit number, therefore rely on + "count" --> + <xsl:otherwise> + <xsl:choose> + <!-- If we reached right colspec, take it value. --> + <xsl:when test="$count = $colnum"> + <xsl:call-template name="get-attribute"> + <xsl:with-param name="element" select="$colspecs[1]"/> + <xsl:with-param name="attribute" select="$attribute"/> + </xsl:call-template> + </xsl:when> + <!-- Otherwise proceed to the next colspec --> + <xsl:otherwise> + <xsl:call-template name="colnum.colspec"> + <xsl:with-param name="colnum" select="$colnum"/> + <xsl:with-param name="attribute" select="$attribute"/> + <xsl:with-param name="colspecs" + select="$colspecs[position()>1]"/> + <xsl:with-param name="count" select="$count+1"/> + </xsl:call-template> + </xsl:otherwise> + </xsl:choose> + </xsl:otherwise> + </xsl:choose> +</xsl:template> + +<dtm:doc dtm:idref="get-attribute"/> +<xsl:template name="get-attribute" dtm:id="get-attribute"> + <xsl:param name="element" select="."/> + <xsl:param name="attribute" select="''"/> + + <xsl:for-each select="$element/@*"> + <xsl:if test="local-name(.) = $attribute"> + <xsl:value-of select="."/> + </xsl:if> + </xsl:for-each> +</xsl:template> + +</xsl:stylesheet> |