doc/docbook-xsl/common/table.xsl

   1 <?xml version="1.0"?>
   2 <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
   3                 xmlns:doc="http://nwalsh.com/xsl/documentation/1.0"
   4                 exclude-result-prefixes="doc"
   5                 version="1.0">
   6
   7 <!-- ********************************************************************
   8      $Id: table.xsl,v 1.1 2007/03/10 05:14:55 scott Exp $
   9      ********************************************************************
  10
  11      This file is part of the XSL DocBook Stylesheet distribution.
  12      See ../README or http://nwalsh.com/docbook/xsl/ for copyright
  13      and other information.
  14
  15      ******************************************************************** -->
  16
  17 <!-- ==================================================================== -->
  18
  19 <xsl:template name="blank.spans">
  20   <xsl:param name="cols" select="1"/>
  21   <xsl:if test="$cols &gt; 0">
  22     <xsl:text>0:</xsl:text>
  23     <xsl:call-template name="blank.spans">
  24       <xsl:with-param name="cols" select="$cols - 1"/>
  25     </xsl:call-template>
  26   </xsl:if>
  27 </xsl:template>
  28
  29 <xsl:template name="calculate.following.spans">
  30   <xsl:param name="colspan" select="1"/>
  31   <xsl:param name="spans" select="''"/>
  32
  33   <xsl:choose>
  34     <xsl:when test="$colspan &gt; 0">
  35       <xsl:call-template name="calculate.following.spans">
  36         <xsl:with-param name="colspan" select="$colspan - 1"/>
  37         <xsl:with-param name="spans" select="substring-after($spans,':')"/>
  38       </xsl:call-template>
  39     </xsl:when>
  40     <xsl:otherwise>
  41       <xsl:value-of select="$spans"/>
  42     </xsl:otherwise>
  43   </xsl:choose>
  44 </xsl:template>
  45
  46 <xsl:template name="finaltd">
  47   <xsl:param name="spans"/>
  48   <xsl:param name="col" select="0"/>
  49
  50   <xsl:if test="$spans != ''">
  51     <xsl:choose>
  52       <xsl:when test="starts-with($spans,'0:')">
  53         <xsl:call-template name="empty.table.cell">
  54           <xsl:with-param name="colnum" select="$col"/>
  55         </xsl:call-template>
  56       </xsl:when>
  57       <xsl:otherwise></xsl:otherwise>
  58     </xsl:choose>
  59
  60     <xsl:call-template name="finaltd">
  61       <xsl:with-param name="spans" select="substring-after($spans,':')"/>
  62       <xsl:with-param name="col" select="$col+1"/>
  63     </xsl:call-template>
  64   </xsl:if>
  65 </xsl:template>
  66
  67 <xsl:template name="sfinaltd">
  68   <xsl:param name="spans"/>
  69
  70   <xsl:if test="$spans != ''">
  71     <xsl:choose>
  72       <xsl:when test="starts-with($spans,'0:')">0:</xsl:when>
  73       <xsl:otherwise>
  74         <xsl:value-of select="substring-before($spans,':')-1"/>
  75         <xsl:text>:</xsl:text>
  76       </xsl:otherwise>
  77     </xsl:choose>
  78
  79     <xsl:call-template name="sfinaltd">
  80       <xsl:with-param name="spans" select="substring-after($spans,':')"/>
  81     </xsl:call-template>
  82   </xsl:if>
  83 </xsl:template>
  84
  85 <xsl:template name="entry.colnum">
  86   <xsl:param name="entry" select="."/>
  87
  88   <xsl:choose>
  89     <xsl:when test="$entry/@spanname">
  90       <xsl:variable name="spanname" select="$entry/@spanname"/>
  91       <xsl:variable name="spanspec"
  92                     select="($entry/ancestor::tgroup/spanspec[@spanname=$spanname]
  93                              |$entry/ancestor::entrytbl/spanspec[@spanname=$spanname])[last()]"/>
  94       <xsl:variable name="colspec"
  95                     select="($entry/ancestor::tgroup/colspec[@colname=$spanspec/@namest]
  96                              |$entry/ancestor::entrytbl/colspec[@colname=$spanspec/@namest])[last()]"/>
  97       <xsl:call-template name="colspec.colnum">
  98         <xsl:with-param name="colspec" select="$colspec"/>
  99       </xsl:call-template>
 100     </xsl:when>
 101     <xsl:when test="$entry/@colname">
 102       <xsl:variable name="colname" select="$entry/@colname"/>
 103       <xsl:variable name="colspec"
 104                     select="($entry/ancestor::tgroup/colspec[@colname=$colname]
 105                              |$entry/ancestor::entrytbl/colspec[@colname=$colname])[last()]"/>
 106       <xsl:call-template name="colspec.colnum">
 107         <xsl:with-param name="colspec" select="$colspec"/>
 108       </xsl:call-template>
 109     </xsl:when>
 110     <xsl:when test="$entry/@namest">
 111       <xsl:variable name="namest" select="$entry/@namest"/>
 112       <xsl:variable name="colspec"
 113                     select="($entry/ancestor::tgroup/colspec[@colname=$namest]
 114                              |$entry/ancestor::entrytbl/colspec[@colname=$namest])[last()]"/>
 115       <xsl:call-template name="colspec.colnum">
 116         <xsl:with-param name="colspec" select="$colspec"/>
 117       </xsl:call-template>
 118     </xsl:when>
 119     <!-- no idea, return 0 -->
 120     <xsl:otherwise>0</xsl:otherwise>
 121   </xsl:choose>
 122 </xsl:template>
 123
 124 <doc:template name="entry.colnum" xmlns="">
 125 <refpurpose>Determine the column number in which a given entry occurs</refpurpose>
 126 <refdescription>
 127 <para>If an <sgmltag>entry</sgmltag> has a
 128 <sgmltag class="attribute">colname</sgmltag> or
 129 <sgmltag class="attribute">namest</sgmltag> attribute, this template
 130 will determine the number of the column in which the entry should occur.
 131 For other <sgmltag>entry</sgmltag>s, nothing is returned.</para>
 132 </refdescription>
 133 <refparameter>
 134 <variablelist>
 135 <varlistentry><term>entry</term>
 136 <listitem>
 137 <para>The <sgmltag>entry</sgmltag>-element which is to be tested.</para>
 138 </listitem>
 139 </varlistentry>
 140 </variablelist>
 141 </refparameter>
 142
 143 <refreturn>
 144 <para>This template returns the column number if it can be determined,
 145 or 0 (the empty string)</para>
 146 </refreturn>
 147 </doc:template>
 148
 149 <xsl:template name="colspec.colnum">
 150   <xsl:param name="colspec" select="."/>
 151   <xsl:choose>
 152     <xsl:when test="$colspec/@colnum">
 153       <xsl:value-of select="$colspec/@colnum"/>
 154     </xsl:when>
 155     <xsl:when test="$colspec/preceding-sibling::colspec">
 156       <xsl:variable name="prec.colspec.colnum">
 157         <xsl:call-template name="colspec.colnum">
 158           <xsl:with-param name="colspec"
 159                           select="$colspec/preceding-sibling::colspec[1]"/>
 160         </xsl:call-template>
 161       </xsl:variable>
 162       <xsl:value-of select="$prec.colspec.colnum + 1"/>
 163     </xsl:when>
 164     <xsl:otherwise>1</xsl:otherwise>
 165   </xsl:choose>
 166 </xsl:template>
 167
 168 <xsl:template name="calculate.colspan">
 169   <xsl:param name="entry" select="."/>
 170   <xsl:variable name="spanname" select="$entry/@spanname"/>
 171   <xsl:variable name="spanspec"
 172                 select="($entry/ancestor::tgroup/spanspec[@spanname=$spanname]
 173                          |$entry/ancestor::entrytbl/spanspec[@spanname=$spanname])[last()]"/>
 174
 175   <xsl:variable name="namest">
 176     <xsl:choose>
 177       <xsl:when test="@spanname">
 178         <xsl:value-of select="$spanspec/@namest"/>
 179       </xsl:when>
 180       <xsl:otherwise>
 181         <xsl:value-of select="$entry/@namest"/>
 182       </xsl:otherwise>
 183     </xsl:choose>
 184   </xsl:variable>
 185
 186   <xsl:variable name="nameend">
 187     <xsl:choose>
 188       <xsl:when test="@spanname">
 189         <xsl:value-of select="$spanspec/@nameend"/>
 190       </xsl:when>
 191       <xsl:otherwise>
 192         <xsl:value-of select="$entry/@nameend"/>
 193       </xsl:otherwise>
 194     </xsl:choose>
 195   </xsl:variable>
 196
 197   <xsl:variable name="scol">
 198     <xsl:call-template name="colspec.colnum">
 199       <xsl:with-param name="colspec"
 200                       select="($entry/ancestor::tgroup/colspec[@colname=$namest]
 201                                |$entry/ancestor::entrytbl/colspec[@colname=$namest])[last()]"/>
 202     </xsl:call-template>
 203   </xsl:variable>
 204
 205   <xsl:variable name="ecol">
 206     <xsl:call-template name="colspec.colnum">
 207       <xsl:with-param name="colspec"
 208                       select="($entry/ancestor::tgroup/colspec[@colname=$nameend]
 209                                |$entry/ancestor::entrytbl/colspec[@colname=$nameend])[last()]"/>
 210     </xsl:call-template>
 211   </xsl:variable>
 212
 213   <xsl:choose>
 214     <xsl:when test="$namest != '' and $nameend != ''">
 215       <xsl:choose>
 216         <xsl:when test="number($ecol) &gt;= number($scol)">
 217           <xsl:value-of select="number($ecol) - number($scol) + 1"/>
 218         </xsl:when>
 219         <xsl:otherwise>
 220           <xsl:value-of select="number($scol) - number($ecol) + 1"/>
 221         </xsl:otherwise>
 222       </xsl:choose>
 223     </xsl:when>
 224     <xsl:otherwise>1</xsl:otherwise>
 225   </xsl:choose>
 226 </xsl:template>
 227
 228 <xsl:template name="calculate.rowsep">
 229   <xsl:param name="entry" select="."/>
 230   <xsl:param name="colnum" select="0"/>
 231
 232   <xsl:call-template name="inherited.table.attribute">
 233     <xsl:with-param name="entry" select="$entry"/>
 234     <xsl:with-param name="colnum" select="$colnum"/>
 235     <xsl:with-param name="attribute" select="'rowsep'"/>
 236   </xsl:call-template>
 237 </xsl:template>
 238
 239 <xsl:template name="calculate.colsep">
 240   <xsl:param name="entry" select="."/>
 241   <xsl:param name="colnum" select="0"/>
 242
 243   <xsl:call-template name="inherited.table.attribute">
 244     <xsl:with-param name="entry" select="$entry"/>
 245     <xsl:with-param name="colnum" select="$colnum"/>
 246     <xsl:with-param name="attribute" select="'colsep'"/>
 247   </xsl:call-template>
 248 </xsl:template>
 249
 250 <xsl:template name="inherited.table.attribute">
 251   <xsl:param name="entry" select="."/>
 252   <xsl:param name="row" select="$entry/ancestor-or-self::row[1]"/>
 253   <xsl:param name="colnum" select="0"/>
 254   <xsl:param name="attribute" select="'colsep'"/>
 255
 256   <xsl:variable name="tgroup" select="$row/parent::*/parent::tgroup[1]"/>
 257   <xsl:variable name="tbody" select="$row/parent::*[1]"/>
 258
 259   <xsl:variable name="table" select="($tgroup/ancestor::table
 260                                      |$tgroup/ancestor::informaltable
 261                                      |$entry/ancestor::entrytbl)[last()]"/>
 262
 263   <xsl:variable name="entry.value">
 264     <xsl:call-template name="get-attribute">
 265       <xsl:with-param name="element" select="$entry"/>
 266       <xsl:with-param name="attribute" select="$attribute"/>
 267     </xsl:call-template>
 268   </xsl:variable>
 269
 270   <xsl:variable name="row.value">
 271     <xsl:call-template name="get-attribute">
 272       <xsl:with-param name="element" select="$row"/>
 273       <xsl:with-param name="attribute" select="$attribute"/>
 274     </xsl:call-template>
 275   </xsl:variable>
 276
 277   <xsl:variable name="span.value">
 278     <xsl:if test="$entry/@spanname">
 279       <xsl:variable name="spanname" select="$entry/@spanname"/>
 280       <xsl:variable name="spanspec"
 281                     select="$tgroup/spanspec[@spanname=$spanname]"/>
 282       <xsl:variable name="span.colspec"
 283                     select="$tgroup/colspec[@colname=$spanspec/@namest]"/>
 284
 285       <xsl:variable name="spanspec.value">
 286         <xsl:call-template name="get-attribute">
 287           <xsl:with-param name="element" select="$spanspec"/>
 288           <xsl:with-param name="attribute" select="$attribute"/>
 289         </xsl:call-template>
 290       </xsl:variable>
 291
 292       <xsl:variable name="scolspec.value">
 293         <xsl:call-template name="get-attribute">
 294           <xsl:with-param name="element" select="$span.colspec"/>
 295           <xsl:with-param name="attribute" select="$attribute"/>
 296         </xsl:call-template>
 297       </xsl:variable>
 298
 299       <xsl:choose>
 300         <xsl:when test="$spanspec.value != ''">
 301           <xsl:value-of select="$spanspec.value"/>
 302         </xsl:when>
 303         <xsl:when test="$scolspec.value != ''">
 304           <xsl:value-of select="$scolspec.value"/>
 305         </xsl:when>
 306         <xsl:otherwise></xsl:otherwise>
 307       </xsl:choose>
 308     </xsl:if>
 309   </xsl:variable>
 310
 311   <xsl:variable name="namest.value">
 312     <xsl:if test="$entry/@namest">
 313       <xsl:variable name="namest" select="$entry/@namest"/>
 314       <xsl:variable name="colspec"
 315                     select="$tgroup/colspec[@colname=$namest]"/>
 316
 317       <xsl:variable name="inner.namest.value">
 318         <xsl:call-template name="get-attribute">
 319           <xsl:with-param name="element" select="$colspec"/>
 320           <xsl:with-param name="attribute" select="$attribute"/>
 321         </xsl:call-template>
 322       </xsl:variable>
 323
 324       <xsl:choose>
 325         <xsl:when test="$inner.namest.value">
 326           <xsl:value-of select="$inner.namest.value"/>
 327         </xsl:when>
 328         <xsl:otherwise></xsl:otherwise>
 329       </xsl:choose>
 330     </xsl:if>
 331   </xsl:variable>
 332
 333   <xsl:variable name="tgroup.value">
 334     <xsl:call-template name="get-attribute">
 335       <xsl:with-param name="element" select="$tgroup"/>
 336       <xsl:with-param name="attribute" select="$attribute"/>
 337     </xsl:call-template>
 338   </xsl:variable>
 339
 340   <xsl:variable name="tbody.value">
 341     <xsl:call-template name="get-attribute">
 342       <xsl:with-param name="element" select="$tbody"/>
 343       <xsl:with-param name="attribute" select="$attribute"/>
 344     </xsl:call-template>
 345   </xsl:variable>
 346
 347   <xsl:variable name="table.value">
 348     <xsl:call-template name="get-attribute">
 349       <xsl:with-param name="element" select="$table"/>
 350       <xsl:with-param name="attribute" select="$attribute"/>
 351     </xsl:call-template>
 352   </xsl:variable>
 353
 354   <xsl:variable name="default.value">
 355     <!-- This section used to say that rowsep and colsep have defaults based -->
 356     <!-- on the frame setting. Further reflection and closer examination of the -->
 357     <!-- CALS spec reveals I was mistaken. The default is "1" for rowsep and colsep. -->
 358     <!-- For everything else, the default is the tgroup value -->
 359     <xsl:choose>
 360       <xsl:when test="$tgroup.value != ''">
 361         <xsl:value-of select="$tgroup.value"/>
 362       </xsl:when>
 363       <xsl:when test="$attribute = 'rowsep'">1</xsl:when>
 364       <xsl:when test="$attribute = 'colsep'">1</xsl:when>
 365       <xsl:otherwise><!-- empty --></xsl:otherwise>
 366     </xsl:choose>
 367   </xsl:variable>
 368
 369   <xsl:variable name="calc.colvalue">
 370     <xsl:if test="$colnum &gt; 0">
 371       <xsl:call-template name="colnum.colspec">
 372         <xsl:with-param name="colnum" select="$colnum"/>
 373         <xsl:with-param name="attribute" select="$attribute"/>
 374       </xsl:call-template>
 375     </xsl:if>
 376   </xsl:variable>
 377
 378   <xsl:choose>
 379     <xsl:when test="$entry.value != ''">
 380       <xsl:value-of select="$entry.value"/>
 381     </xsl:when>
 382     <xsl:when test="$row.value != ''">
 383       <xsl:value-of select="$row.value"/>
 384     </xsl:when>
 385     <xsl:when test="$span.value != ''">
 386       <xsl:value-of select="$span.value"/>
 387     </xsl:when>
 388     <xsl:when test="$namest.value != ''">
 389       <xsl:value-of select="$namest.value"/>
 390     </xsl:when>
 391     <xsl:when test="$calc.colvalue != ''">
 392       <xsl:value-of select="$calc.colvalue"/>
 393     </xsl:when>
 394     <xsl:when test="$tbody.value != ''">
 395       <xsl:value-of select="$tbody.value"/>
 396     </xsl:when>
 397     <xsl:when test="$tgroup.value != ''">
 398       <xsl:value-of select="$tgroup.value"/>
 399     </xsl:when>
 400     <xsl:when test="$table.value != ''">
 401       <xsl:value-of select="$table.value"/>
 402     </xsl:when>
 403     <xsl:otherwise>
 404       <xsl:value-of select="$default.value"/>
 405     </xsl:otherwise>
 406   </xsl:choose>
 407 </xsl:template>
 408
 409 <xsl:template name="colnum.colspec">
 410   <xsl:param name="colnum" select="0"/>
 411   <xsl:param name="attribute" select="'colname'"/>
 412   <xsl:param name="colspec.ancestor"
 413              select="(ancestor::tgroup|ancestor::entrytbl)
 414                      [position() = last()]"/>
 415   <xsl:param name="colspecs" select="$colspec.ancestor/colspec"/>
 416   <xsl:param name="count" select="1"/>
 417
 418   <xsl:choose>
 419     <xsl:when test="not($colspecs) or $count &gt; $colnum">
 420       <!-- nop -->
 421     </xsl:when>
 422     <xsl:when test="$colspecs[1]/@colnum">
 423       <xsl:choose>
 424         <xsl:when test="$colspecs[1]/@colnum = $colnum">
 425           <xsl:call-template name="get-attribute">
 426             <xsl:with-param name="element" select="$colspecs[1]"/>
 427             <xsl:with-param name="attribute" select="$attribute"/>
 428           </xsl:call-template>
 429         </xsl:when>
 430         <xsl:otherwise>
 431           <xsl:call-template name="colnum.colspec">
 432             <xsl:with-param name="colnum" select="$colnum"/>
 433             <xsl:with-param name="attribute" select="$attribute"/>
 434             <xsl:with-param name="colspecs"
 435                             select="$colspecs[position()&gt;1]"/>
 436             <xsl:with-param name="count"
 437                             select="$colspecs[1]/@colnum+1"/>
 438           </xsl:call-template>
 439         </xsl:otherwise>
 440       </xsl:choose>
 441     </xsl:when>
 442     <xsl:otherwise>
 443       <xsl:choose>
 444         <xsl:when test="$count = $colnum">
 445           <xsl:call-template name="get-attribute">
 446             <xsl:with-param name="element" select="$colspecs[1]"/>
 447             <xsl:with-param name="attribute" select="$attribute"/>
 448           </xsl:call-template>
 449         </xsl:when>
 450         <xsl:otherwise>
 451           <xsl:call-template name="colnum.colspec">
 452             <xsl:with-param name="colnum" select="$colnum"/>
 453             <xsl:with-param name="attribute" select="$attribute"/>
 454             <xsl:with-param name="colspecs"
 455                             select="$colspecs[position()&gt;1]"/>
 456             <xsl:with-param name="count" select="$count+1"/>
 457           </xsl:call-template>
 458         </xsl:otherwise>
 459       </xsl:choose>
 460     </xsl:otherwise>
 461   </xsl:choose>
 462 </xsl:template>
 463
 464 <xsl:template name="get-attribute">
 465   <xsl:param name="element" select="."/>
 466   <xsl:param name="attribute" select="''"/>
 467
 468   <xsl:for-each select="$element/@*">
 469     <xsl:if test="local-name(.) = $attribute">
 470       <xsl:value-of select="."/>
 471     </xsl:if>
 472   </xsl:for-each>
 473 </xsl:template>
 474
 475 <xsl:template name="consume-row">
 476   <xsl:param name="spans"/>
 477
 478   <xsl:if test="contains($spans,':')">
 479     <xsl:value-of select="substring-before($spans,':') - 1"/>
 480     <xsl:text>:</xsl:text>
 481     <xsl:call-template name="consume-row">
 482       <xsl:with-param name="spans" select="substring-after($spans,':')"/>
 483     </xsl:call-template>
 484   </xsl:if>
 485 </xsl:template>
 486
 487 <!-- Returns the table style for the context element -->
 488 <xsl:template name="tabstyle">
 489   <xsl:param name="node" select="."/>
 490
 491   <xsl:variable name="tgroup" select="$node/tgroup[1] |
 492                                       $node/ancestor-or-self::tgroup[1]"/>
 493
 494   <xsl:variable name="table"
 495                 select="($node/ancestor-or-self::table |
 496                          $node/ancestor-or-self::informaltable)[1]"/>
 497
 498   <xsl:variable name="tabstyle">
 499     <xsl:choose>
 500       <xsl:when test="$table/@tabstyle != ''">
 501         <xsl:value-of select="normalize-space($table/@tabstyle)"/>
 502       </xsl:when>
 503       <xsl:when test="$tgroup/@tgroupstyle != ''">
 504         <xsl:value-of select="normalize-space($tgroup/@tgroupstyle)"/>
 505       </xsl:when>
 506       <xsl:otherwise>
 507       </xsl:otherwise>
 508     </xsl:choose>
 509   </xsl:variable>
 510
 511   <xsl:value-of select="$tabstyle"/>
 512 </xsl:template>
 513
 514 </xsl:stylesheet>