Merge remote-tracking branch 'origin/maint'

[bison.git] / data / xslt / xml2dot.xsl

diff --git a/data/xslt/xml2dot.xsl b/data/xslt/xml2dot.xsl
index 416ee13e038d0b44992b590566bfaaaac9b69251..49f454bb87bf5b5a0a9a4ae0e4ae721bc424b409 100644 (file)
--- a/data/xslt/xml2dot.xsl
+++ b/data/xslt/xml2dot.xsl
@@ -2,9 +2,8 @@
 
 <!--
     xml2dot.xsl - transform Bison XML Report into DOT.
 
 <!--
     xml2dot.xsl - transform Bison XML Report into DOT.

-    $Id$

 
 

-    Copyright (C) 2007 Free Software Foundation, Inc.
+    Copyright (C) 2007-2012 Free Software Foundation, Inc.

 
     This file is part of Bison, the GNU Compiler Compiler.
 
 
     This file is part of Bison, the GNU Compiler Compiler.
 


@@ -25,8 +24,10 @@
   -->
 
 <xsl:stylesheet version="1.0"
   -->
 
 <xsl:stylesheet version="1.0"

-  xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
-  
+  xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+  xmlns:bison="http://www.gnu.org/software/bison/">
+
+<xsl:import href="bison.xsl"/>

 <xsl:output method="text" encoding="UTF-8" indent="no"/>
 
 <xsl:template match="/">
 <xsl:output method="text" encoding="UTF-8" indent="no"/>
 
 <xsl:template match="/">


@@ -34,11 +35,27 @@
 </xsl:template>
 
 <xsl:template match="bison-xml-report">
 </xsl:template>
 
 <xsl:template match="bison-xml-report">

-  <xsl:apply-templates select="automaton"/>
+  <xsl:text>// Generated by GNU Bison </xsl:text>
+  <xsl:value-of select="@version"/>
+  <xsl:text>.&#10;</xsl:text>
+  <xsl:text>// Report bugs to &lt;</xsl:text>
+  <xsl:value-of select="@bug-report"/>
+  <xsl:text>&gt;.&#10;</xsl:text>
+  <xsl:text>// Home page: &lt;</xsl:text>
+  <xsl:value-of select="@url"/>
+  <xsl:text>&gt;.&#10;&#10;</xsl:text>
+  <xsl:apply-templates select="automaton">
+    <xsl:with-param name="filename" select="filename"/>
+  </xsl:apply-templates>

 </xsl:template>
 
 <xsl:template match="automaton">
 </xsl:template>
 
 <xsl:template match="automaton">

-  <xsl:text>digraph Automaton {&#10;</xsl:text>
+  <xsl:param name="filename"/>
+  <xsl:text>digraph "</xsl:text>
+  <xsl:call-template name="escape">
+    <xsl:with-param name="subject" select="$filename"/>
+  </xsl:call-template>
+  <xsl:text>"&#10;{&#10;</xsl:text>

   <xsl:apply-templates select="state"/>
   <xsl:text>}&#10;</xsl:text>
 </xsl:template>
   <xsl:apply-templates select="state"/>
   <xsl:text>}&#10;</xsl:text>
 </xsl:template>


@@ -48,7 +65,7 @@
     <xsl:with-param name="number" select="@number"/>
     <xsl:with-param name="label">
       <xsl:value-of select="@number"/>
     <xsl:with-param name="number" select="@number"/>
     <xsl:with-param name="label">
       <xsl:value-of select="@number"/>

-      <xsl:apply-templates select="itemset/rule"/>
+      <xsl:apply-templates select="itemset/item"/>

     </xsl:with-param>
   </xsl:call-template>
   <xsl:apply-templates select="actions/transitions"/>
     </xsl:with-param>
   </xsl:call-template>
   <xsl:apply-templates select="actions/transitions"/>


@@ -58,12 +75,27 @@
   <xsl:apply-templates select="transition"/>
 </xsl:template>
 
   <xsl:apply-templates select="transition"/>
 </xsl:template>
 

+<xsl:template match="item">
+  <xsl:apply-templates select="key('bison:ruleByNumber', @rule-number)">
+    <xsl:with-param name="point" select="@point"/>
+  </xsl:apply-templates>
+  <xsl:apply-templates select="lookaheads"/>
+</xsl:template>
+

 <xsl:template match="rule">
 <xsl:template match="rule">

+  <xsl:param name="point"/>

   <xsl:text>&#10;</xsl:text>
   <xsl:value-of select="lhs"/>
   <xsl:text> -&gt;</xsl:text>
   <xsl:text>&#10;</xsl:text>
   <xsl:value-of select="lhs"/>
   <xsl:text> -&gt;</xsl:text>

-  <xsl:apply-templates select="rhs/symbol|rhs/point|rhs/empty"/>
-  <xsl:apply-templates select="lookaheads"/>
+  <xsl:if test="$point = 0">
+    <xsl:text> .</xsl:text>
+  </xsl:if>
+  <xsl:for-each select="rhs/symbol|rhs/empty">
+    <xsl:apply-templates select="."/>
+    <xsl:if test="$point = position()">
+      <xsl:text> .</xsl:text>
+    </xsl:if>
+  </xsl:for-each>

 </xsl:template>
 
 <xsl:template match="symbol">
 </xsl:template>
 
 <xsl:template match="symbol">


@@ -71,13 +103,7 @@
   <xsl:value-of select="."/>
 </xsl:template>
 
   <xsl:value-of select="."/>
 </xsl:template>
 

-<xsl:template match="point">
-  <xsl:text> .</xsl:text>
-</xsl:template>
-
-<xsl:template match="empty">
-  <xsl:text> /* empty */</xsl:text>
-</xsl:template>
+<xsl:template match="empty"/>

 
 <xsl:template match="lookaheads">
   <xsl:text>[</xsl:text>
 
 <xsl:template match="lookaheads">
   <xsl:text>[</xsl:text>


@@ -98,20 +124,20 @@
     <xsl:with-param name="dst" select="@state"/>
     <xsl:with-param name="style">
       <xsl:choose>
     <xsl:with-param name="dst" select="@state"/>
     <xsl:with-param name="style">
       <xsl:choose>

-       <xsl:when test="@symbol = 'error'">
-         <xsl:text>dotted</xsl:text>
-       </xsl:when>
-       <xsl:when test="@type = 'shift'">
-         <xsl:text>solid</xsl:text>
-       </xsl:when>
-       <xsl:otherwise>
-         <xsl:text>dashed</xsl:text>
-       </xsl:otherwise>
+        <xsl:when test="@symbol = 'error'">
+          <xsl:text>dotted</xsl:text>
+        </xsl:when>
+        <xsl:when test="@type = 'shift'">
+          <xsl:text>solid</xsl:text>
+        </xsl:when>
+        <xsl:otherwise>
+          <xsl:text>dashed</xsl:text>
+        </xsl:otherwise>

       </xsl:choose>
     </xsl:with-param>
     <xsl:with-param name="label">
       <xsl:if test="not(@symbol = 'error')">
       </xsl:choose>
     </xsl:with-param>
     <xsl:with-param name="label">
       <xsl:if test="not(@symbol = 'error')">

-       <xsl:value-of select="@symbol"/>
+        <xsl:value-of select="@symbol"/>

       </xsl:if>
     </xsl:with-param>
   </xsl:call-template>
       </xsl:if>
     </xsl:with-param>
   </xsl:call-template>


@@ -151,7 +177,7 @@
 </xsl:template>
 
 <xsl:template name="escape">
 </xsl:template>
 
 <xsl:template name="escape">

-  <xsl:param name="subject" required="yes"/>
+  <xsl:param name="subject"/> <!-- required -->

   <xsl:call-template name="string-replace">
     <xsl:with-param name="subject">
       <xsl:call-template name="string-replace">
   <xsl:call-template name="string-replace">
     <xsl:with-param name="subject">
       <xsl:call-template name="string-replace">


@@ -186,11 +212,11 @@
         <xsl:with-param name="search" select="$search"/>
         <xsl:with-param name="replace" select="$replace"/>
       </xsl:call-template>
         <xsl:with-param name="search" select="$search"/>
         <xsl:with-param name="replace" select="$replace"/>
       </xsl:call-template>

-    </xsl:when> 
+    </xsl:when>

     <xsl:otherwise>
     <xsl:otherwise>

-      <xsl:value-of select="$subject"/>  
+      <xsl:value-of select="$subject"/>

     </xsl:otherwise>
     </xsl:otherwise>

-  </xsl:choose>            
+  </xsl:choose>

 </xsl:template>
 
 </xsl:stylesheet>
 </xsl:template>
 
 </xsl:stylesheet>