From: Jirka Kosek <jirka@kosek.cz>
Date: Thu, 6 Dec 2001 18:05:14 +0000 (+0000)
Subject: Added support for TeX math in alt element. When using PassiveTeX, TeX equations can... 
X-Git-Tag: release/1.79.1~6^2~6045
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=bfe20799d817bfd7f7474781279c4d6824349c84;p=docbook-dsssl

Added support for TeX math in alt element. When using PassiveTeX, TeX equations can be directly passed to TeX. When using HTML, TeX file with code necessary to produce image equivalents of equations is generated.
---

diff --git a/xsl/fo/Makefile.param b/xsl/fo/Makefile.param
index 04294075d..426160a03 100644
--- a/xsl/fo/Makefile.param
+++ b/xsl/fo/Makefile.param
@@ -110,6 +110,7 @@ PARAMS=../params/admon.graphics.xml \
        ../params/table.entry.padding.xml \
        ../params/tablecolumns.extension.xml \
        ../params/textinsert.extension.xml \
+       ../params/tex.math.in.alt.xml \
        ../params/title.font.family.xml \
        ../params/title.margin.left.xml \
        ../params/toc.indent.width.xml \
diff --git a/xsl/fo/math.xsl b/xsl/fo/math.xsl
index 23c0585cd..9ea86c3d8 100644
--- a/xsl/fo/math.xsl
+++ b/xsl/fo/math.xsl
@@ -15,10 +15,59 @@
      ******************************************************************** -->
 
 <xsl:template match="inlineequation">
-  <xsl:apply-templates/>
+  <xsl:choose>
+    <xsl:when test="$passivetex.extensions != 0 and $tex.math.in.alt != ''">
+      <xsl:apply-templates select="alt"/>
+    </xsl:when>
+    <xsl:otherwise>
+      <xsl:apply-templates/>
+    </xsl:otherwise>
+  </xsl:choose>
+</xsl:template>
+
+<xsl:template match="equation/mediaobject | informalequation/mediaobject">
+  <xsl:if test="$passivetex.extensions = 0 or $tex.math.in.alt = ''">
+    <fo:block>
+      <xsl:call-template name="select.mediaobject"/>
+      <xsl:apply-templates select="caption"/>
+    </fo:block>
+  </xsl:if>
+</xsl:template>
+
+<xsl:template match="equation/graphic | informalequation/graphic">
+  <xsl:if test="$passivetex.extensions = 0 or $tex.math.in.alt = ''">
+    <fo:block>
+      <xsl:call-template name="process.image"/>
+    </fo:block>
+  </xsl:if>
+</xsl:template>
+
+<xsl:template match="inlineequation/alt">
+  <xsl:if test="$passivetex.extensions != 0 and $tex.math.in.alt != ''">
+    <xsl:processing-instruction name="xmltex">
+      <xsl:text>$</xsl:text>
+      <xsl:value-of select="."/>
+      <xsl:text>$</xsl:text>
+    </xsl:processing-instruction>
+  </xsl:if>
+</xsl:template>
+
+<xsl:template match="equation/alt | informalequation/alt">
+  <xsl:if test="$passivetex.extensions != 0 and $tex.math.in.alt != ''">
+    <xsl:processing-instruction name="xmltex">
+      <xsl:text>$$</xsl:text>
+      <xsl:value-of select="."/>
+      <xsl:text>$$</xsl:text>
+    </xsl:processing-instruction>
+  </xsl:if>
 </xsl:template>
 
 <xsl:template match="alt">
+  <xsl:if test="$passivetex.extensions != 0 and $tex.math.in.alt != ''">
+    <xsl:message>
+      Your equation is misplaced. It should be in inlineequation, equation or informalequation.
+    </xsl:message>
+  </xsl:if>
 </xsl:template>
 
 <!-- just send the MathML all the way through... -->
diff --git a/xsl/fo/param.ent b/xsl/fo/param.ent
index c95d04d57..3a0062514 100644
--- a/xsl/fo/param.ent
+++ b/xsl/fo/param.ent
@@ -110,6 +110,7 @@
 <!ENTITY table.entry.padding SYSTEM "../params/table.entry.padding.xml">
 <!ENTITY tablecolumns.extension SYSTEM "../params/tablecolumns.extension.xml">
 <!ENTITY textinsert.extension SYSTEM "../params/textinsert.extension.xml">
+<!ENTITY tex.math.in.alt SYSTEM "../params/tex.math.in.alt.xml">
 <!ENTITY title.font.family SYSTEM "../params/title.font.family.xml">
 <!ENTITY title.margin.left SYSTEM "../params/title.margin.left.xml">
 <!ENTITY toc.indent.width SYSTEM "../params/toc.indent.width.xml">
diff --git a/xsl/fo/param.xweb b/xsl/fo/param.xweb
index 02d6de043..2ebbd02a1 100644
--- a/xsl/fo/param.xweb
+++ b/xsl/fo/param.xweb
@@ -107,6 +107,7 @@ to be incomplete. Don't forget to read the source, too :-)</para>
 &arbortext.extensions;
 &fop.extensions;
 &passivetex.extensions;
+&tex.math.in.alt;
 &xep.extensions;
 </reference>
 
@@ -380,6 +381,7 @@ around all these parameters.</para>
 <src:fragref linkend="table.entry.padding.frag"/>
 <src:fragref linkend="tablecolumns.extension.frag"/>
 <src:fragref linkend="textinsert.extension.frag"/>
+<src:fragref linkend="tex.math.in.alt.frag"/>
 <src:fragref linkend="title.font.family.frag"/>
 <src:fragref linkend="title.margin.left.frag"/>
 <src:fragref linkend="toc.indent.width.frag"/>
diff --git a/xsl/html/Makefile.param b/xsl/html/Makefile.param
index 98ab68e60..166406c05 100644
--- a/xsl/html/Makefile.param
+++ b/xsl/html/Makefile.param
@@ -123,6 +123,8 @@ PARAMS=../params/admon.graphics.xml \
        ../params/table.borders.with.css.xml \
        ../params/tablecolumns.extension.xml \
        ../params/textinsert.extension.xml \
+       ../params/tex.math.in.alt.xml \
+       ../params/tex.math.file.xml \
        ../params/toc.list.type.xml \
        ../params/toc.section.depth.xml \
        ../params/ulink.target.xml \
diff --git a/xsl/html/docbook.xsl b/xsl/html/docbook.xsl
index b5b447b51..70809608a 100644
--- a/xsl/html/docbook.xsl
+++ b/xsl/html/docbook.xsl
@@ -192,11 +192,17 @@
         </xsl:when>
         <xsl:otherwise>
           <xsl:apply-templates select="key('id',$rootid)" mode="process.root"/>
+          <xsl:if test="$tex.math.in.alt != ''">
+            <xsl:apply-templates select="key('id',$rootid)" mode="collect.tex.math"/>
+          </xsl:if>
         </xsl:otherwise>
       </xsl:choose>
     </xsl:when>
     <xsl:otherwise>
       <xsl:apply-templates select="/" mode="process.root"/>
+      <xsl:if test="$tex.math.in.alt != ''">
+        <xsl:apply-templates select="/" mode="collect.tex.math"/>
+      </xsl:if>
     </xsl:otherwise>
   </xsl:choose>
 </xsl:template>
diff --git a/xsl/html/math.xsl b/xsl/html/math.xsl
index 502a930d8..c13fb8e73 100644
--- a/xsl/html/math.xsl
+++ b/xsl/html/math.xsl
@@ -19,4 +19,216 @@
 <xsl:template match="alt">
 </xsl:template>
 
+<!-- Support for TeX math in alt -->
+
+<xsl:template match="*" mode="collect.tex.math">
+  <xsl:call-template name="write.text.chunk">
+    <xsl:with-param name="filename" select="$tex.math.file"/>
+    <xsl:with-param name="method" select="'text'"/>
+    <xsl:with-param name="content">
+      <xsl:choose>
+        <xsl:when test="$tex.math.in.alt = 'plain'">
+          <xsl:call-template name="tex.math.plain.head"/>
+          <xsl:apply-templates select="." mode="collect.tex.math.plain"/>
+          <xsl:call-template name="tex.math.plain.tail"/>
+        </xsl:when>
+        <xsl:when test="$tex.math.in.alt = 'latex'">
+          <xsl:call-template name="tex.math.latex.head"/>
+          <xsl:apply-templates select="." mode="collect.tex.math.latex"/>
+          <xsl:call-template name="tex.math.latex.tail"/>
+        </xsl:when>
+        <xsl:otherwise>
+          <xsl:message>
+            Unsupported TeX math notation: 
+            <xsl:value-of select="$tex.math.in.alt"/>
+          </xsl:message>
+        </xsl:otherwise>
+      </xsl:choose>
+    </xsl:with-param>
+    <xsl:with-param name="encoding" select="$default.encoding"/>
+  </xsl:call-template>
+</xsl:template>
+
+<!-- PlainTeX -->
+
+<xsl:template name="tex.math.plain.head">
+  <xsl:text>\nopagenumbers &#xA;</xsl:text>
+</xsl:template>
+
+<xsl:template name="tex.math.plain.tail">
+  <xsl:text>\bye &#xA;</xsl:text>
+</xsl:template>
+
+<xsl:template match="inlineequation" mode="collect.tex.math.plain">
+  <xsl:variable name="filename">
+    <xsl:choose>
+      <xsl:when test="inlinegraphic">
+        <xsl:call-template name="mediaobject.filename">
+          <xsl:with-param name="object" select="inlinegraphic"/>
+        </xsl:call-template>
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:call-template name="select.mediaobject.filename">
+          <xsl:with-param name="olist" select="inlinemediaobject/*"/>
+        </xsl:call-template>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:variable>
+  <xsl:text>\special{dvi2bitmap outputfile </xsl:text>
+  <xsl:value-of select="$filename"/>
+  <xsl:text>} &#xA;</xsl:text>
+  <xsl:text>$</xsl:text>
+  <xsl:value-of select="alt"/>
+  <xsl:text>$ &#xA;</xsl:text>
+  <xsl:text>\vfill\eject &#xA;</xsl:text>
+</xsl:template>
+
+<xsl:template match="equation|informalequation" mode="collect.tex.math.plain">
+  <xsl:variable name="filename">
+    <xsl:choose>
+      <xsl:when test="graphic">
+        <xsl:call-template name="mediaobject.filename">
+          <xsl:with-param name="object" select="graphic"/>
+        </xsl:call-template>
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:call-template name="select.mediaobject.filename">
+          <xsl:with-param name="olist" select="mediaobject/*"/>
+        </xsl:call-template>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:variable>
+  <xsl:text>\special{dvi2bitmap outputfile </xsl:text>
+  <xsl:value-of select="$filename"/>
+  <xsl:text>} &#xA;</xsl:text>
+  <xsl:text>$$</xsl:text>
+  <xsl:value-of select="alt"/>
+  <xsl:text>$$ &#xA;</xsl:text>
+  <xsl:text>\vfill\eject &#xA;</xsl:text>
+</xsl:template>
+
+<xsl:template match="text()" mode="collect.tex.math.plain"/>
+
+<!-- LaTeX -->
+
+<xsl:template name="tex.math.latex.head">
+  <xsl:text>\documentclass{article} &#xA;</xsl:text>
+  <xsl:text>\pagestyle{empty} &#xA;</xsl:text>
+  <xsl:text>\begin{document} &#xA;</xsl:text>
+</xsl:template>
+
+<xsl:template name="tex.math.latex.tail">
+  <xsl:text>\end{document} &#xA;</xsl:text>
+</xsl:template>
+
+<xsl:template match="inlineequation" mode="collect.tex.math.latex">
+  <xsl:variable name="filename">
+    <xsl:choose>
+      <xsl:when test="inlinegraphic">
+        <xsl:call-template name="mediaobject.filename">
+          <xsl:with-param name="object" select="inlinegraphic"/>
+        </xsl:call-template>
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:call-template name="select.mediaobject.filename">
+          <xsl:with-param name="olist" select="inlinemediaobject/*"/>
+        </xsl:call-template>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:variable>
+  <xsl:text>\special{dvi2bitmap outputfile </xsl:text>
+  <xsl:value-of select="$filename"/>
+  <xsl:text>} &#xA;</xsl:text>
+  <xsl:text>$</xsl:text>
+  <xsl:value-of select="alt"/>
+  <xsl:text>$ &#xA;</xsl:text>
+  <xsl:text>\newpage &#xA;</xsl:text>
+</xsl:template>
+
+<xsl:template match="equation|informalequation" mode="collect.tex.math.latex">
+  <xsl:variable name="filename">
+    <xsl:choose>
+      <xsl:when test="graphic">
+        <xsl:call-template name="mediaobject.filename">
+          <xsl:with-param name="object" select="graphic"/>
+        </xsl:call-template>
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:call-template name="select.mediaobject.filename">
+          <xsl:with-param name="olist" select="mediaobject/*"/>
+        </xsl:call-template>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:variable>
+  <xsl:text>\special{dvi2bitmap outputfile </xsl:text>
+  <xsl:value-of select="$filename"/>
+  <xsl:text>} &#xA;</xsl:text>
+  <xsl:text>$$</xsl:text>
+  <xsl:value-of select="alt"/>
+  <xsl:text>$$ &#xA;</xsl:text>
+  <xsl:text>\newpage &#xA;</xsl:text>
+</xsl:template>
+
+<xsl:template match="text()" mode="collect.tex.math.latex"/>
+
+<!-- Extracting image filename from mediaobject and graphic elements -->
+
+<xsl:template name="select.mediaobject.filename">
+  <xsl:param name="olist"
+             select="imageobject|imageobjectco
+                     |videoobject|audioobject|textobject"/>
+  <xsl:param name="count">1</xsl:param>
+
+  <xsl:if test="$count &lt;= count($olist)">
+    <xsl:variable name="object" select="$olist[position()=$count]"/>
+
+    <xsl:variable name="useobject">
+      <xsl:choose>
+	<!-- The phrase is never used -->
+        <xsl:when test="name($object)='textobject' and $object/phrase">
+          <xsl:text>0</xsl:text>
+        </xsl:when>
+	<!-- The first textobject is not a reasonable fallback for equation image -->
+        <xsl:when test="name($object)='textobject'">
+          <xsl:text>0</xsl:text>
+        </xsl:when>
+	<!-- If there's only one object, use it -->
+	<xsl:when test="$count = 1 and count($olist) = 1">
+	  <xsl:text>1</xsl:text>
+	</xsl:when>
+	<!-- Otherwise, see if this one is a useable graphic -->
+        <xsl:otherwise>
+          <xsl:choose>
+            <!-- peek inside imageobjectco to simplify the test -->
+            <xsl:when test="local-name($object) = 'imageobjectco'">
+              <xsl:call-template name="is.acceptable.mediaobject">
+                <xsl:with-param name="object" select="$object/imageobject"/>
+              </xsl:call-template>
+            </xsl:when>
+            <xsl:otherwise>
+              <xsl:call-template name="is.acceptable.mediaobject">
+                <xsl:with-param name="object" select="$object"/>
+              </xsl:call-template>
+            </xsl:otherwise>
+          </xsl:choose>
+        </xsl:otherwise>
+      </xsl:choose>
+    </xsl:variable>
+
+    <xsl:choose>
+      <xsl:when test="$useobject='1'">
+        <xsl:call-template name="mediaobject.filename">
+          <xsl:with-param name="object" select="$object"/>
+        </xsl:call-template>
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:call-template name="select.mediaobject">
+          <xsl:with-param name="olist" select="$olist"/>
+          <xsl:with-param name="count" select="$count + 1"/>
+        </xsl:call-template>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:if>
+</xsl:template>
+
 </xsl:stylesheet>
diff --git a/xsl/html/param.ent b/xsl/html/param.ent
index 1a17c34bb..47d663e57 100644
--- a/xsl/html/param.ent
+++ b/xsl/html/param.ent
@@ -123,6 +123,8 @@
 <!ENTITY table.borders.with.css SYSTEM "../params/table.borders.with.css.xml">
 <!ENTITY tablecolumns.extension SYSTEM "../params/tablecolumns.extension.xml">
 <!ENTITY textinsert.extension SYSTEM "../params/textinsert.extension.xml">
+<!ENTITY tex.math.in.alt SYSTEM "../params/tex.math.in.alt.xml">
+<!ENTITY tex.math.file SYSTEM "../params/tex.math.file.xml">
 <!ENTITY toc.list.type SYSTEM "../params/toc.list.type.xml">
 <!ENTITY toc.section.depth SYSTEM "../params/toc.section.depth.xml">
 <!ENTITY ulink.target SYSTEM "../params/ulink.target.xml">
diff --git a/xsl/html/param.xweb b/xsl/html/param.xweb
index 31597bd6d..4a963bae1 100644
--- a/xsl/html/param.xweb
+++ b/xsl/html/param.xweb
@@ -216,6 +216,8 @@ to be incomplete. Don't forget to read the source, too :-)</para>
 &shade.verbatim.style;
 &punct.honorific;
 &segmentedlist.as.table;
+&tex.math.in.alt;
+&tex.math.file;
 </reference>
 
 <reference><title>Chunking</title>
@@ -395,6 +397,8 @@ around all these parameters.</para>
 <src:fragref linkend="table.borders.with.css.frag"/>
 <src:fragref linkend="tablecolumns.extension.frag"/>
 <src:fragref linkend="textinsert.extension.frag"/>
+<src:fragref linkend="tex.math.file.frag"/>
+<src:fragref linkend="tex.math.in.alt.frag"/>
 <src:fragref linkend="toc.list.type.frag"/>
 <src:fragref linkend="toc.section.depth.frag"/>
 <src:fragref linkend="ulink.target.frag"/>
diff --git a/xsl/params/tex.math.file.xml b/xsl/params/tex.math.file.xml
new file mode 100644
index 000000000..fd0fcf087
--- /dev/null
+++ b/xsl/params/tex.math.file.xml
@@ -0,0 +1,24 @@
+<refentry id="tex.math.file">
+<refmeta>
+<refentrytitle>tex.math.file</refentrytitle>
+<refmiscinfo role="type">string</refmiscinfo>
+</refmeta>
+<refnamediv>
+<refname>tex.math.file</refname>
+<refpurpose></refpurpose>
+</refnamediv>
+
+<refsynopsisdiv>
+<src:fragment id='tex.math.file.frag'>
+<xsl:param name="tex.math.file" select="'tex-math-equations.tex'"/>
+</src:fragment>
+</refsynopsisdiv>
+
+<refsect1><title>Description</title>
+
+<para>Name of auxiliary file for TeX equations. This file can be
+processed by dvi2bitmap to get bitmap versions of equations for HTML
+output.</para>
+
+</refsect1>
+</refentry>
diff --git a/xsl/params/tex.math.in.alt.xml b/xsl/params/tex.math.in.alt.xml
new file mode 100644
index 000000000..8b2baa5d4
--- /dev/null
+++ b/xsl/params/tex.math.in.alt.xml
@@ -0,0 +1,36 @@
+<refentry id="tex.math.in.alt">
+<refmeta>
+<refentrytitle>tex.math.in.alt</refentrytitle>
+<refmiscinfo role="type">string</refmiscinfo>
+</refmeta>
+<refnamediv>
+<refname>tex.math.in.alt</refname>
+<refpurpose></refpurpose>
+</refnamediv>
+
+<refsynopsisdiv>
+<src:fragment id='tex.math.in.alt.frag'>
+<xsl:param name="tex.math.in.alt" select="''"/>
+</src:fragment>
+</refsynopsisdiv>
+
+<refsect1><title>Description</title>
+
+<para>If you want type math directly in TeX notation into
+<sgmltag>alt</sgmltag> element, this parameter specifies notation
+used. Currently are supported two values --
+<literal>plain</literal> and <literal>latex</literal>. Empty value
+means that you are not using TeX math.</para>
+
+<para>If you want use this feature, you should process your FO with
+PassiveTeX, which only supports TeX math notation. When calling
+stylsheet, don't forget to specify also
+passivetex.extensions=1.</para>
+
+<para>If you want equations in HTML, just process generated file
+<filename>tex-math-equations.tex</filename> by TeX or LaTeX. Then run
+dvi2bitmap program on result DVI file. You will get images for
+equations in your document.</para>
+
+</refsect1>
+</refentry>