From 4f0c7129c5f6ecda7c621199e636e71fc76b60ce Mon Sep 17 00:00:00 2001
From: Norman Walsh <ndw@nwalsh.com>
Date: Thu, 15 Nov 2001 13:08:52 +0000
Subject: [PATCH] Support experimental XLink support

---
 xsl/html/inline.xsl | 162 +++++++++++++++++++++++++++++++++++++-------
 1 file changed, 137 insertions(+), 25 deletions(-)

diff --git a/xsl/html/inline.xsl b/xsl/html/inline.xsl
index 7416db1f0..8b7202c02 100644
--- a/xsl/html/inline.xsl
+++ b/xsl/html/inline.xsl
@@ -1,5 +1,7 @@
 <?xml version='1.0'?>
 <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+                xmlns:xlink='http://www.w3.org/1999/xlink'
+                exclude-result-prefixes="xlink"
                 version='1.0'>
 
 <!-- ********************************************************************
@@ -12,10 +14,80 @@
 
      ******************************************************************** -->
 
+<xsl:template name="simple.xlink">
+  <xsl:param name="node" select="."/>
+  <xsl:param name="content">
+    <xsl:apply-templates/>
+  </xsl:param>
+
+  <xsl:choose>
+    <xsl:when test="$node/@xlink:type='simple' and $node/@xlink:href">
+      <a>
+        <xsl:if test="@xlink.title">
+          <xsl:attribute name="title">
+            <xsl:value-of select="@xlink:title"/>
+          </xsl:attribute>
+        </xsl:if>
+
+        <xsl:attribute name="href">
+          <xsl:choose>
+            <!-- if the href starts with # and does not contain an "(" -->
+            <!-- or if the href starts with #xpointer(id(, it's just an ID -->
+            <xsl:when test="starts-with(@xlink:href,'#')
+                            and (not(contains(@xlink:href,'&#40;'))
+                            or starts-with(@xlink:href,'#xpointer&#40;id&#40;'))">
+              <xsl:variable name="idref">
+                <xsl:call-template name="xpointer.idref">
+                  <xsl:with-param name="xpointer" select="@xlink:href"/>
+                </xsl:call-template>
+              </xsl:variable>
+
+              <xsl:variable name="targets" select="key('id',$idref)"/>
+              <xsl:variable name="target" select="$targets[1]"/>
+
+              <xsl:call-template name="check.id.unique">
+                <xsl:with-param name="linkend" select="@linkend"/>
+              </xsl:call-template>
+
+              <xsl:choose>
+                <xsl:when test="count($target) = 0">
+                  <xsl:message>
+                    <xsl:text>XLink to nonexistent id: </xsl:text>
+                    <xsl:value-of select="$idref"/>
+                  </xsl:message>
+                  <xsl:text>???</xsl:text>
+                </xsl:when>
+                <xsl:otherwise>
+                  <xsl:call-template name="href.target">
+                    <xsl:with-param name="object" select="$target"/>
+                  </xsl:call-template>
+                </xsl:otherwise>
+              </xsl:choose>
+            </xsl:when>
+
+            <!-- otherwise it's a URI -->
+            <xsl:otherwise>
+              <xsl:value-of select="@xlink:href"/>
+            </xsl:otherwise>
+          </xsl:choose>
+        </xsl:attribute>
+        <xsl:copy-of select="$content"/>
+      </a>
+    </xsl:when>
+    <xsl:otherwise>
+      <xsl:copy-of select="$content"/>
+    </xsl:otherwise>
+  </xsl:choose>
+</xsl:template>
+
 <xsl:template name="inline.charseq">
   <xsl:param name="content">
     <xsl:call-template name="anchor"/>
-    <xsl:apply-templates/>
+    <xsl:call-template name="simple.xlink">
+      <xsl:with-param name="content">
+        <xsl:apply-templates/>
+      </xsl:with-param>
+    </xsl:call-template>
   </xsl:param>
   <xsl:copy-of select="$content"/>
 </xsl:template>
@@ -23,7 +95,11 @@
 <xsl:template name="inline.monoseq">
   <xsl:param name="content">
     <xsl:call-template name="anchor"/>
-    <xsl:apply-templates/>
+    <xsl:call-template name="simple.xlink">
+      <xsl:with-param name="content">
+        <xsl:apply-templates/>
+      </xsl:with-param>
+    </xsl:call-template>
   </xsl:param>
   <tt><xsl:copy-of select="$content"/></tt>
 </xsl:template>
@@ -31,7 +107,11 @@
 <xsl:template name="inline.boldseq">
   <xsl:param name="content">
     <xsl:call-template name="anchor"/>
-    <xsl:apply-templates/>
+    <xsl:call-template name="simple.xlink">
+      <xsl:with-param name="content">
+        <xsl:apply-templates/>
+      </xsl:with-param>
+    </xsl:call-template>
   </xsl:param>
   <!-- don't put <b> inside figure, example, or table titles -->
   <xsl:choose>
@@ -50,7 +130,11 @@
 <xsl:template name="inline.italicseq">
   <xsl:param name="content">
     <xsl:call-template name="anchor"/>
-    <xsl:apply-templates/>
+    <xsl:call-template name="simple.xlink">
+      <xsl:with-param name="content">
+        <xsl:apply-templates/>
+      </xsl:with-param>
+    </xsl:call-template>
   </xsl:param>
   <i><xsl:copy-of select="$content"/></i>
 </xsl:template>
@@ -58,7 +142,11 @@
 <xsl:template name="inline.boldmonoseq">
   <xsl:param name="content">
     <xsl:call-template name="anchor"/>
-    <xsl:apply-templates/>
+    <xsl:call-template name="simple.xlink">
+      <xsl:with-param name="content">
+        <xsl:apply-templates/>
+      </xsl:with-param>
+    </xsl:call-template>
   </xsl:param>
   <!-- don't put <b> inside figure, example, or table titles -->
   <!-- or other titles that may already be represented with <b>'s. -->
@@ -79,7 +167,11 @@
 <xsl:template name="inline.italicmonoseq">
   <xsl:param name="content">
     <xsl:call-template name="anchor"/>
-    <xsl:apply-templates/>
+    <xsl:call-template name="simple.xlink">
+      <xsl:with-param name="content">
+        <xsl:apply-templates/>
+      </xsl:with-param>
+    </xsl:call-template>
   </xsl:param>
   <i><tt><xsl:copy-of select="$content"/></tt></i>
 </xsl:template>
@@ -87,7 +179,11 @@
 <xsl:template name="inline.superscriptseq">
   <xsl:param name="content">
     <xsl:call-template name="anchor"/>
-    <xsl:apply-templates/>
+    <xsl:call-template name="simple.xlink">
+      <xsl:with-param name="content">
+        <xsl:apply-templates/>
+      </xsl:with-param>
+    </xsl:call-template>
   </xsl:param>
   <sup><xsl:copy-of select="$content"/></sup>
 </xsl:template>
@@ -95,7 +191,11 @@
 <xsl:template name="inline.subscriptseq">
   <xsl:param name="content">
     <xsl:call-template name="anchor"/>
-    <xsl:apply-templates/>
+    <xsl:call-template name="simple.xlink">
+      <xsl:with-param name="content">
+        <xsl:apply-templates/>
+      </xsl:with-param>
+    </xsl:call-template>
   </xsl:param>
   <sub><xsl:copy-of select="$content"/></sub>
 </xsl:template>
@@ -192,7 +292,11 @@
       <xsl:variable name="nodes" select="text()|*"/>
       <xsl:call-template name="inline.monoseq">
         <xsl:with-param name="content">
-          <xsl:apply-templates select="$nodes[1]"/>
+          <xsl:call-template name="simple.xlink">
+            <xsl:with-param name="content">
+              <xsl:apply-templates select="$nodes[1]"/>
+            </xsl:with-param>
+          </xsl:call-template>
         </xsl:with-param>
       </xsl:call-template>
       <xsl:text>(</xsl:text>
@@ -400,26 +504,30 @@
     </xsl:choose>
     <xsl:call-template name="anchor"/>
 
-    <xsl:choose>
-      <xsl:when test="@role = 'bold'">
-        <!-- backwards compatibility: make bold into b elements, but -->
-        <!-- don't put bold inside figure, example, or table titles -->
+    <xsl:call-template name="simple.xlink">
+      <xsl:with-param name="content">
         <xsl:choose>
-          <xsl:when test="local-name(..) = 'title'
-                          and (local-name(../..) = 'figure'
-                               or local-name(../..) = 'example'
-                               or local-name(../..) = 'table')">
-            <xsl:apply-templates/>
+          <xsl:when test="@role = 'bold'">
+            <!-- backwards compatibility: make bold into b elements, but -->
+            <!-- don't put bold inside figure, example, or table titles -->
+            <xsl:choose>
+              <xsl:when test="local-name(..) = 'title'
+                              and (local-name(../..) = 'figure'
+                              or local-name(../..) = 'example'
+                              or local-name(../..) = 'table')">
+                <xsl:apply-templates/>
+              </xsl:when>
+              <xsl:otherwise>
+                <b><xsl:apply-templates/></b>
+              </xsl:otherwise>
+            </xsl:choose>
           </xsl:when>
           <xsl:otherwise>
-            <b><xsl:apply-templates/></b>
+            <i><xsl:apply-templates/></i>
           </xsl:otherwise>
         </xsl:choose>
-      </xsl:when>
-      <xsl:otherwise>
-        <i><xsl:apply-templates/></i>
-      </xsl:otherwise>
-    </xsl:choose>
+      </xsl:with-param>
+    </xsl:call-template>
   </span>
 </xsl:template>
 
@@ -439,7 +547,11 @@
       </xsl:attribute>
     </xsl:if>
     <xsl:call-template name="anchor"/>
-    <xsl:apply-templates/>
+    <xsl:call-template name="simple.xlink">
+      <xsl:with-param name="content">
+        <xsl:apply-templates/>
+      </xsl:with-param>
+    </xsl:call-template>
   </span>
 </xsl:template>
 
-- 
2.50.1