sbailliez    01/08/01 03:34:32

  Added:       src/etc  mmetrics-frames.xsl maudit-frames.xsl
  Log:
  stylesheets that can be used to generate some framed report for Metamata 
tasks MMetrics and MAudit
  
  Revision  Changes    Path
  1.1                  jakarta-ant/src/etc/mmetrics-frames.xsl
  
  Index: mmetrics-frames.xsl
  ===================================================================
  <xsl:stylesheet       xmlns:xsl="http://www.w3.org/1999/XSL/Transform"; 
version="1.0"
        xmlns:lxslt="http://xml.apache.org/xslt";
        xmlns:xalan="http://xml.apache.org/xalan";
        xmlns:redirect="org.apache.xalan.xslt.extensions.Redirect"
        exclude-result-prefixes="xalan"
        extension-element-prefixes="redirect">
  
  <!--
        For xalan 1.2.2
        xmlns:xalan-nodeset="org.apache.xalan.xslt.extensions.Nodeset"
  -->
  <xsl:output   method="html" indent="yes"/>
  
  <!--
      Xalan redirect extension writes relative file based on the parent 
directory
      from the main output file, unfortunately, this is never set and you have
      to do it yourself on the API. The code that does it in command line was
      commented out in Xalan 1.2.2 :-(
      
      Therefore I will use a stylesheet param for the output directory.
      
      This has to be invoked as follows from the command line:
      
      java -classpath bsf.jar;xalan.jar;xerces.jar 
org.apache.xalan.xslt.Process -IN metrics.xml -XSL metrics.xsl -PARAM 
output.dir './report'
  -->
  <xsl:param name="output.dir" select="'.'"/>
  
  <!-- default max value for the metrics -->
  <xsl:param name="vg.max" select="10"/>
  <xsl:param name="loc.max" select="1000"/>
  <xsl:param name="dit.max" select="10"/>
  <xsl:param name="noa.max" select="250"/>
  <xsl:param name="nrm.max" select="50"/>
  <xsl:param name="nlm.max" select="250"/>
  <xsl:param name="wmc.max" select="250"/>
  <xsl:param name="rfc.max" select="50"/>
  <xsl:param name="dac.max" select="10"/>
  <xsl:param name="fanout.max" select="10"/>
  <xsl:param name="cbo.max" select="15"/>
  <xsl:param name="lcom.max" select="10"/>
  <xsl:param name="nocl.max" select="10"/>
  
  
  <!-- create a tree fragment -->
  <xsl:variable name="doctree.var">
      <xsl:element name="classes">
          <xsl:for-each select=".//class">
              <xsl:element name="class">
                  <xsl:attribute name="package">
                      <xsl:value-of select="(ancestor::package)[last()]/@name"/>
                  </xsl:attribute>
                  <xsl:copy-of select="@*"/>
                  <xsl:attribute name="name">
                                        <xsl:apply-templates select="." 
mode="class.name"/>                
                  </xsl:attribute>
                  <xsl:copy-of select="method"/>
              </xsl:element>
          </xsl:for-each>
      </xsl:element>
  </xsl:variable>
  
  <xsl:variable name="doctree" select="xalan:nodeset($doctree.var)"/>
  
  <xsl:template match="metrics">
  
        <!-- create the index.html -->
        <redirect:write file="{$output.dir}/index.html">
                <xsl:call-template name="index.html"/>
        </redirect:write>
  
        <!-- create the stylesheet.css -->
        <redirect:write file="{$output.dir}/stylesheet.css">
                <xsl:call-template name="stylesheet.css"/>
        </redirect:write>
  
        <!-- create the overview-packages.html at the root -->
        <redirect:write file="{$output.dir}/overview-summary.html">
                <xsl:apply-templates select="." mode="overview.packages"/>
        </redirect:write>
  
        <!-- create the all-packages.html at the root -->
        <redirect:write file="{$output.dir}/overview-frame.html">
                <xsl:apply-templates select="." mode="all.packages"/>
        </redirect:write>
        
        <!-- create the all-classes.html at the root -->
        <redirect:write file="{$output.dir}/allclasses-frame.html">
                <xsl:apply-templates select="." mode="all.classes"/>
        </redirect:write>
        
        <!-- process all packages -->
        <xsl:apply-templates select=".//package"/>
  </xsl:template>
  
  
  <xsl:template match="package">
        <xsl:variable name="package.name" select="@name"/>
        <xsl:variable name="package.dir">
                <xsl:if test="not($package.name = 'unnamed 
package')"><xsl:value-of select="translate($package.name,'.','/')"/></xsl:if>
                <xsl:if test="$package.name = 'unnamed package'">.</xsl:if>
        </xsl:variable> 
        <xsl:message>Processing package <xsl:value-of select="@name"/> in 
<xsl:value-of select="$output.dir"/>
        </xsl:message>
        <!-- create a classes-list.html in the package directory -->
        <redirect:write file="{$output.dir}/{$package.dir}/package-frame.html">
                <xsl:apply-templates select="." mode="classes.list"/>
        </redirect:write>
        
        <!-- create a package-summary.html in the package directory -->
        <redirect:write 
file="{$output.dir}/{$package.dir}/package-summary.html">
                <xsl:apply-templates select="." mode="package.summary"/>
        </redirect:write>
        
        <!-- for each class, creates a @name.html -->
        <!-- @bug there will be a problem with inner classes having the same 
name, it will be overwritten -->
        <xsl:for-each select="$doctree/classes/[EMAIL PROTECTED] = 
current()/@name]">
            <!--Processing <xsl:value-of 
select="$class.name"/><xsl:text>&#10;</xsl:text> -->
                <redirect:write file="{$output.dir}/{$package.dir}/[EMAIL 
PROTECTED]">
                        <xsl:apply-templates select="." mode="class.details"/>
                </redirect:write>
        </xsl:for-each>
  </xsl:template>
  
  <!-- little trick to compute the classname for inner and non inner classes -->
  <!-- this is all in one line to avoid CRLF in the name -->
  <xsl:template match="class" mode="class.name">
      <xsl:if test="parent::class"><xsl:apply-templates select="parent::class" 
mode="class.name"/>.<xsl:value-of select="@name"/></xsl:if><xsl:if 
test="not(parent::class)"><xsl:value-of select="@name"/></xsl:if>
  </xsl:template>
  
  
  <xsl:template name="index.html">
  <HTML>
        <HEAD><TITLE>Metrics Results.</TITLE></HEAD>
        <FRAMESET cols="20%,80%">
                <FRAMESET rows="30%,70%">
                        <FRAME src="overview-frame.html" 
name="packageListFrame"/>
                        <FRAME src="allclasses-frame.html" 
name="classListFrame"/>
                </FRAMESET>
                <FRAME src="overview-summary.html" name="classFrame"/>
        </FRAMESET>
        <noframes>
                <H2>Frame Alert</H2>
                <P>
                This document is designed to be viewed using the frames 
feature. If you see this message, you are using a non-frame-capable web client.
                </P>
        </noframes>
  </HTML>
  </xsl:template>
  
  <!-- this is the stylesheet css to use for nearly everything -->
  <xsl:template name="stylesheet.css">
  BODY {
        font:normal 68% verdana,arial,helvetica;
        color:#000000;
  }
  TD {
        FONT-SIZE: 68%
  }
  P {
        line-height:1.5em;
        margin-top:0.5em; margin-bottom:1.0em;
  }
  H1 {
        MARGIN: 0px 0px 5px; FONT: 165% verdana,arial,helvetica
  }
  H2 {
        MARGIN-TOP: 1em; MARGIN-BOTTOM: 0.5em; FONT: bold 125% 
verdana,arial,helvetica
  }
  H3 {
        MARGIN-BOTTOM: 0.5em; FONT: bold 115% verdana,arial,helvetica
  }
  H4 {
        MARGIN-BOTTOM: 0.5em; FONT: bold 100% verdana,arial,helvetica
  }
  H5 {
        MARGIN-BOTTOM: 0.5em; FONT: bold 100% verdana,arial,helvetica
  }
  H6 {
        MARGIN-BOTTOM: 0.5em; FONT: bold 100% verdana,arial,helvetica
  }
  .Error {
        font-weight:bold; color:red;
  }
  
  </xsl:template>
  
  <!-- print the metrics of the class -->
  <xsl:template match="class" mode="class.details">
        <!--xsl:variable name="package.name" 
select="(ancestor::package)[last()]/@name"/-->
        <xsl:variable name="package.name" select="@package"/>
        <HTML>
                <HEAD>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name" 
select="$package.name"/>
                        </xsl:call-template>
                </HEAD>
                <BODY>
                        <xsl:call-template name="pageHeader"/>  
                        <H3>Class <xsl:if test="not($package.name = 'unnamed 
package')"><xsl:value-of select="$package.name"/>.</xsl:if><xsl:value-of 
select="@name"/></H3>
  
                        
                        <table border="0" cellpadding="5" cellspacing="2" 
width="95%">
                                <xsl:call-template name="all.metrics.header"/>  
                        
                                <xsl:apply-templates select="." 
mode="print.metrics"/>
                        </table>
        
                        <H2>Methods</H2>
                        <p>
                        <table border="0" cellpadding="5" cellspacing="2" 
width="95%">
                                <xsl:call-template 
name="method.metrics.header"/>
                                <xsl:apply-templates select="method" 
mode="print.metrics"/>
                        </table>                        
                        
                        </p>
                </BODY>
        </HTML>
  </xsl:template>
  
  
  <!-- list of classes in a package -->
  <xsl:template match="package" mode="classes.list">
        <HTML>
                <HEAD>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name" 
select="@name"/>
                        </xsl:call-template>
                </HEAD>
                <BODY>
                        <table width="100%">
                                <tr>
                                        <td nowrap="nowrap">
                                                <H2><a 
href="package-summary.html" target="classFrame"><xsl:value-of 
select="@name"/></a></H2>
                                        </td>
                                </tr>
                        </table>
        
                        <H2>Classes</H2>
                        <p>
                        <TABLE WIDTH="100%">
                                <!-- xalan-nodeset:nodeset for Xalan 1.2.2 -->
                    <xsl:for-each select="$doctree/classes/[EMAIL PROTECTED] = 
current()/@name]">
                        <xsl:sort select="@name"/>
                                        <tr>
                                                <td nowrap="nowrap">
                                                        <a href="[EMAIL 
PROTECTED]" target="classFrame"><xsl:value-of select="@name"/></a>
                                                </td>
                                        </tr>                           
                    </xsl:for-each>
                        </TABLE>
                        </p>
                </BODY>
        </HTML>
  </xsl:template>
  
  
  <!--
        Creates an all-classes.html file that contains a link to all 
package-summary.html
        on each class.
  -->
  <xsl:template match="metrics" mode="all.classes">
        <html>
                <head>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name" 
select="''"/>
                        </xsl:call-template>
                </head>
                <body>
                        <h2>Classes</h2>
                        <p>
                        <table width="100%">
                            <xsl:for-each select="$doctree/classes/class">
                                <xsl:sort select="@name"/>
                                <xsl:apply-templates select="." 
mode="all.classes"/>
                            </xsl:for-each>
                        </table>
                        </p>
                </body>
        </html>
  </xsl:template>
  
  <xsl:template match="class" mode="all.classes">
      <xsl:variable name="package.name" select="@package"/>
      <xsl:variable name="class.name" select="@name"/>
        <tr>
                <td nowrap="nowrap">
                        <a target="classFrame">
                                <xsl:attribute name="href">
                                        <xsl:if 
test="not($package.name='unnamed package')">
                                                <xsl:value-of 
select="translate($package.name,'.','/')"/><xsl:text>/</xsl:text>
                                        </xsl:if>
                                        <xsl:value-of 
select="$class.name"/><xsl:text>.html</xsl:text>
                                </xsl:attribute>
                                <xsl:value-of select="$class.name"/>
                        </a>
                </td>
        </tr>
  </xsl:template>
  
  <!--
        Creates an html file that contains a link to all package-summary.html 
files on
        each package existing on testsuites.
        @bug there will be a problem here, I don't know yet how to handle 
unnamed package :(
  -->
  <xsl:template match="metrics" mode="all.packages">
        <html>
                <head>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name" 
select="./package/@name"/>
                        </xsl:call-template>
                </head>
                <body>
                        <h2><a href="overview-summary.html" 
target="classFrame">Home</a></h2>
                        <h2>Packages</h2>
                        <p>
                                <table width="100%">
                                        <xsl:apply-templates 
select=".//package[not(./@name = 'unnamed package')]" mode="all.packages">
                                                <xsl:sort select="@name"/>
                                        </xsl:apply-templates>
                                </table>
                        </p>
                </body>
        </html>
  </xsl:template>
  
  <xsl:template match="package" mode="all.packages">
        <tr>
                <td nowrap="nowrap">
                        <a 
href="{translate(@name,'.','/')}/package-summary.html" target="classFrame">
                                <xsl:value-of select="@name"/>
                        </a>
                </td>
        </tr>
  </xsl:template>
  
  
  <xsl:template match="metrics" mode="overview.packages">
        <html>
                <head>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name" 
select="''"/>
                        </xsl:call-template>
                </head>
                <body onload="open('allclasses-frame.html','classListFrame')">
                <xsl:call-template name="pageHeader"/>
                <h2>Summary</h2>
                <table border="0" cellpadding="5" cellspacing="2" width="95%">
                <tr bgcolor="#A6CAF0" valign="top">
                        <td><b>V(G)</b></td>
                        <td><b>LOC</b></td>
                        <td><b>DIT</b></td>
                        <td><b>NOA</b></td>
                        <td><b>NRM</b></td>
                        <td><b>NLM</b></td>
                        <td><b>WMC</b></td>
                        <td><b>RFC</b></td>
                        <td><b>DAC</b></td>
                        <td><b>FANOUT</b></td>
                        <td><b>CBO</b></td>
                        <td><b>LCOM</b></td>
                        <td><b>NOCL</b></td>
                </tr>
                <xsl:apply-templates select="." mode="print.metrics"/>
                </table>
                <table border="0" width="95%">
                <tr>
                <td     style="text-align: justify;">
                Note: Metrics evaluate the quality of software by analyzing     
the     program source and quantifying
                various kind of complexity.     Complexity is a common source 
of problems and defects in software.
                High complexity makes it more difficult to develop,     
understand,     maintain, extend, test and debug
                a program.
                <p/>
                The primary use of metrics is to focus your     attention on 
those parts of code that potentially are
                complexity hot spots. Once the complex areas your program have 
been uncovered, you can take remedial
                actions.
                For additional information about metrics and their meaning, 
please consult
                Metamata Metrics manual.
                </td>
                </tr>
                </table>
  
                <h2>Packages</h2>
                <table border="0" cellpadding="5" cellspacing="2" width="95%">
                        <xsl:call-template name="all.metrics.header"/>
                        <xsl:for-each select=".//package[not(@name = 'unnamed 
package')]">
                                <xsl:sort select="@name" order="ascending"/>    
                        
                                <xsl:apply-templates select="." 
mode="print.metrics"/>
                        </xsl:for-each>
                </table>
                <!-- @bug there could some classes at this level (classes in 
unnamed package) -->
                </body>
                </html>
  </xsl:template>
  
  <xsl:template match="package" mode="package.summary">
        <HTML>
                <HEAD>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name" 
select="@name"/>
                        </xsl:call-template>
                </HEAD>
                <body onload="open('package-frame.html','classListFrame')">
                        <xsl:call-template name="pageHeader"/>
                        <!-- create an anchor to this package name -->
                        <h3>Package <xsl:value-of select="@name"/></h3>
                        
                        <table border="0" cellpadding="5" cellspacing="2" 
width="95%">
                                <xsl:call-template name="all.metrics.header"/>
                                <xsl:apply-templates select="." 
mode="print.metrics"/>
                        </table>
                        
                        <table border="0" width="95%">
                        <tr>
                        <td     style="text-align: justify;">
                        Note: Metrics evaluate the quality of software by 
analyzing     the     program source and quantifying
                        various kind of complexity.     Complexity is a common 
source of problems and defects in software.
                        High complexity makes it more difficult to develop,     
understand,     maintain, extend, test and debug
                        a program.
                        <p/>
                        The primary use of metrics is to focus your     
attention on those parts of code that potentially are
                        complexity hot spots. Once the complex areas your 
program have been uncovered, you can take remedial
                        actions.
                        For additional information about metrics and their 
meaning, please consult
                        Metamata Metrics manual.
                        </td>
                        </tr>
                        </table>
                        
                        
                        <xsl:if test="count($doctree/classes/[EMAIL PROTECTED] 
= current()/@name]) &gt; 0">
                                <H2>Classes</H2>
                                <p>
                                <table border="0" cellpadding="5" 
cellspacing="2" width="95%">
                                        <xsl:call-template 
name="all.metrics.header"/>
                                        <xsl:for-each 
select="$doctree/classes/[EMAIL PROTECTED] = current()/@name]">
                                        <xsl:sort select="@name"/>
                                        <xsl:apply-templates select="." 
mode="print.metrics"/>
                            </xsl:for-each>
                                </table>
                                </p>
                        </xsl:if>
                </body>
        </HTML>
  </xsl:template>
  
  
  <!--
      transform string like a.b.c to ../../../
      @param path the path to transform into a descending directory path
  -->
  <xsl:template name="path">
        <xsl:param name="path"/>
        <xsl:if test="contains($path,'.')">
                <xsl:text>../</xsl:text>        
                <xsl:call-template name="path">
                        <xsl:with-param name="path"><xsl:value-of 
select="substring-after($path,'.')"/></xsl:with-param>
                </xsl:call-template>    
        </xsl:if>
        <xsl:if test="not(contains($path,'.')) and not($path = '')">
                <xsl:text>../</xsl:text>        
        </xsl:if>
  </xsl:template>
  
  
  <!-- create the link to the stylesheet based on the package name -->
  <xsl:template name="create.stylesheet.link">
        <xsl:param name="package.name"/>
        <LINK REL ="stylesheet" TYPE="text/css" TITLE="Style"><xsl:attribute 
name="href"><xsl:if test="not($package.name = 'unnamed 
package')"><xsl:call-template name="path"><xsl:with-param name="path" 
select="$package.name"/></xsl:call-template></xsl:if>stylesheet.css</xsl:attribute></LINK>
  </xsl:template>
  
  
  <!-- Page HEADER -->
  <xsl:template name="pageHeader">
        <h1>Metrics Results</h1>
        <table width="100%">
        <tr>
                <td align="left"></td>
                <td align="right">Designed for use with <a 
href='http://www.webgain.com/products/quality_analyzer/'>Webgain QA/Metamata 
Metrics</a> and <a href='http://jakarta.apache.org'>Ant</a>.</td>
        </tr>
        </table>
        <hr size="1"/>
  </xsl:template>
  
  <!-- class header -->
  <xsl:template name="all.metrics.header">
        <tr bgcolor="#A6CAF0" valign="top">
                <td width="80%"><b>Name</b></td>
                <td nowrap="nowrap"><b>V(G)</b></td>
                <td><b>LOC</b></td>
                <td><b>DIT</b></td>
                <td><b>NOA</b></td>
                <td><b>NRM</b></td>
                <td><b>NLM</b></td>
                <td><b>WMC</b></td>
                <td><b>RFC</b></td>
                <td><b>DAC</b></td>
                <td><b>FANOUT</b></td>
                <td><b>CBO</b></td>
                <td><b>LCOM</b></td>
                <td><b>NOCL</b></td>
        </tr>
  </xsl:template>
  
  <!-- method header -->
  <xsl:template name="method.metrics.header">
        <tr bgcolor="#A6CAF0" valign="top">
                <td width="80%"><b>Name</b></td>
                <td nowrap="nowrap"><b>V(G)</b></td>
                <td><b>LOC</b></td>
                <td><b>FANOUT</b></td>
                <td><b>CBO</b></td>
        </tr>
  </xsl:template>
  
  <!-- method information -->
  <xsl:template match="method" mode="print.metrics">
        <tr bgcolor="#EEEEE" valign="top">
                <td><xsl:apply-templates select="@name"/></td>
                <td><xsl:apply-templates select="@vg"/></td>
                <td><xsl:apply-templates select="@loc"/></td>
                <td><xsl:apply-templates select="@fanout"/></td>
                <td><xsl:apply-templates select="@cbo"/></td>
        </tr>
  </xsl:template>
  
  <!-- class information -->
  <xsl:template match="class" mode="print.metrics">
        <tr bgcolor="#EEEEE" valign="top">              
                <td><a href="[EMAIL PROTECTED]"><xsl:value-of 
select="@name"/></a></td>
                <td><xsl:apply-templates select="@vg"/></td>
                <td><xsl:apply-templates select="@loc"/></td>
                <td><xsl:apply-templates select="@dit"/></td>
                <td><xsl:apply-templates select="@noa"/></td>
                <td><xsl:apply-templates select="@nrm"/></td>
                <td><xsl:apply-templates select="@nlm"/></td>
                <td><xsl:apply-templates select="@wmc"/></td>
                <td><xsl:apply-templates select="@rfc"/></td>
                <td><xsl:apply-templates select="@dac"/></td>
                <td><xsl:apply-templates select="@fanout"/></td>
                <td><xsl:apply-templates select="@cbo"/></td>
                <td><xsl:apply-templates select="@lcom"/></td>
                <td><xsl:apply-templates select="@nocl"/></td>
        </tr>
  </xsl:template>
  
  <xsl:template match="file|package" mode="print.metrics">
        <tr bgcolor="#EEEEE" valign="top">              
                <td><xsl:value-of select="@name"/></td>
                <td><xsl:apply-templates select="@vg"/></td>
                <td><xsl:apply-templates select="@loc"/></td>
                <td><xsl:apply-templates select="@dit"/></td>
                <td><xsl:apply-templates select="@noa"/></td>
                <td><xsl:apply-templates select="@nrm"/></td>
                <td><xsl:apply-templates select="@nlm"/></td>
                <td><xsl:apply-templates select="@wmc"/></td>
                <td><xsl:apply-templates select="@rfc"/></td>
                <td><xsl:apply-templates select="@dac"/></td>
                <td><xsl:apply-templates select="@fanout"/></td>
                <td><xsl:apply-templates select="@cbo"/></td>
                <td><xsl:apply-templates select="@lcom"/></td>
                <td><xsl:apply-templates select="@nocl"/></td>
        </tr>
  </xsl:template>
  
  <xsl:template match="metrics" mode="print.metrics">
        <tr bgcolor="#EEEEE" valign="top">
            <!-- the global metrics is the top package metrics -->
                <td><xsl:apply-templates select="./package/@vg"/></td>
                <td><xsl:apply-templates select="./package/@loc"/></td>
                <td><xsl:apply-templates select="./package/@dit"/></td>
                <td><xsl:apply-templates select="./package/@noa"/></td>
                <td><xsl:apply-templates select="./package/@nrm"/></td>
                <td><xsl:apply-templates select="./package/@nlm"/></td>
                <td><xsl:apply-templates select="./package/@wmc"/></td>
                <td><xsl:apply-templates select="./package/@rfc"/></td>
                <td><xsl:apply-templates select="./package/@dac"/></td>
                <td><xsl:apply-templates select="./package/@fanout"/></td>
                <td><xsl:apply-templates select="./package/@cbo"/></td>
                <td><xsl:apply-templates select="./package/@lcom"/></td>
                <td><xsl:apply-templates select="./package/@nocl"/></td>
        </tr>
  </xsl:template>
  
  
  <!-- how to display the metrics with their max value -->
  <!-- @todo the max values must be external to the xsl -->
  
        <xsl:template match="@vg">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$vg.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@loc">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$loc.max"/>
                </xsl:call-template>
        </xsl:template>
        
        <xsl:template match="@dit">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$dit.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@noa">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$noa.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@nrm">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$nrm.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@nlm">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$nlm.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@wmc">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$wmc.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@rfc">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$rfc.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@dac">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$dac.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@fanout">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$fanout.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@cbo">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$cbo.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@lcom">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$lcom.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template match="@nocl">
                <xsl:call-template name="display-value">
                        <xsl:with-param name="value" select="current()"/>
                        <xsl:with-param name="max" select="$nocl.max"/>
                </xsl:call-template>
        </xsl:template>
  
        <xsl:template name="display-value">
                <xsl:param name="value"/>
                <xsl:param name="max"/>
                <xsl:if test="$value > $max">
                        <xsl:attribute name="class">Error</xsl:attribute>
                </xsl:if>
                <xsl:value-of select="$value"/>
        </xsl:template>
  
  </xsl:stylesheet>
        
  
  
  
  1.1                  jakarta-ant/src/etc/maudit-frames.xsl
  
  Index: maudit-frames.xsl
  ===================================================================
  <xsl:stylesheet       xmlns:xsl="http://www.w3.org/1999/XSL/Transform"; 
version="1.0"
        xmlns:lxslt="http://xml.apache.org/xslt";
        xmlns:redirect="org.apache.xalan.xslt.extensions.Redirect"
        extension-element-prefixes="redirect">
  
  <!-- ======================================================================
  
      Stylesheet to transform an XML file generated by the Ant MAudit task into
      a set of JavaDoc-like HTML page to make pages more convenient to be 
browsed.
      
      It use the Xalan redirect extension to write to multiple output files.
      
      Note: HTML output can be made much more clean by removing non css 
attributes
  
      ====================================================================== -->
  <xsl:output   method="html" indent="yes"/>
  
  <!--
      Xalan redirect extension writes relative file based on the parent 
directory
      from the main output file, unfortunately, this is never set and you have
      to do it yourself on the API. The code that does it in command line was
      commented out in Xalan 1.2.2 :-(
      
      Therefore I will use a stylesheet param for the output directory.
      
      This has to be invoked as follows from the command line:
      
      java -classpath bsf.jar;xalan.jar;xerces.jar 
org.apache.xalan.xslt.Process -IN maudit.xml -XSL maudit.xsl -PARAM output.dir 
'./report'
  -->
  <xsl:param name="output.dir" select="'.'"/>
  
  
  <xsl:template match="classes">
        <!-- create the index.html -->
        <redirect:write file="{$output.dir}/index.html">
                <xsl:call-template name="index.html"/>
        </redirect:write>
  
        <!-- create the stylesheet.css -->
        <redirect:write file="{$output.dir}/stylesheet.css">
                <xsl:call-template name="stylesheet.css"/>
        </redirect:write>
  
        <!-- create the overview-packages.html at the root -->
        <redirect:write file="{$output.dir}/overview-summary.html">
                <xsl:apply-templates select="." mode="overview.packages"/>
        </redirect:write>
  
        <!-- create the all-packages.html at the root -->
        <redirect:write file="{$output.dir}/overview-frame.html">
                <xsl:apply-templates select="." mode="all.packages"/>
        </redirect:write>
        
        <!-- create the all-classes.html at the root -->
        <redirect:write file="{$output.dir}/allclasses-frame.html">
                <xsl:apply-templates select="." mode="all.classes"/>
        </redirect:write>
        
        <!-- process all packages -->
        <xsl:for-each select="./class[not(./@package = 
preceding-sibling::class/@package)]">
                <xsl:call-template name="package">
                        <xsl:with-param name="name" select="@package"/>
                </xsl:call-template>
        </xsl:for-each>
  </xsl:template>
  
  
  <xsl:template name="package">
        <xsl:param name="name"/>
        <xsl:variable name="package.dir">
                <xsl:if test="not($name = '')"><xsl:value-of 
select="translate($name,'.','/')"/></xsl:if>
                <xsl:if test="$name = ''">.</xsl:if>
        </xsl:variable> 
        <!--Processing package <xsl:value-of select="@name"/> in <xsl:value-of 
select="$output.dir"/> -->
        <!-- create a classes-list.html in the package directory -->
        <redirect:write file="{$output.dir}/{$package.dir}/package-frame.html">
                <xsl:call-template name="classes.list">
                        <xsl:with-param name="name" select="$name"/>
                </xsl:call-template>
        </redirect:write>
        
        <!-- create a package-summary.html in the package directory -->
        <redirect:write 
file="{$output.dir}/{$package.dir}/package-summary.html">
                <xsl:call-template name="package.summary">
                        <xsl:with-param name="name" select="$name"/>
                </xsl:call-template>
        </redirect:write>
        
        <!-- for each class, creates a @name.html -->
        <!-- @bug there will be a problem with inner classes having the same 
name, it will be overwritten -->
        <xsl:for-each select="/classes/[EMAIL PROTECTED] = $name]">
                <redirect:write file="{$output.dir}/{$package.dir}/[EMAIL 
PROTECTED]">
                        <xsl:apply-templates select="." mode="class.details"/>
                </redirect:write>
        </xsl:for-each>
  </xsl:template>
  
  <xsl:template name="index.html">
  <HTML>
        <HEAD><TITLE>Audit Results.</TITLE></HEAD>
        <FRAMESET cols="20%,80%">
                <FRAMESET rows="30%,70%">
                        <FRAME src="overview-frame.html" 
name="packageListFrame"/>
                        <FRAME src="allclasses-frame.html" 
name="classListFrame"/>
                </FRAMESET>
                <FRAME src="overview-summary.html" name="classFrame"/>
        </FRAMESET>
        <noframes>
                <H2>Frame Alert</H2>
                <P>
                This document is designed to be viewed using the frames 
feature. If you see this message, you are using a non-frame-capable web client.
                </P>
        </noframes>
  </HTML>
  </xsl:template>
  
  
  <!-- this is the stylesheet css to use for nearly everything -->
  <xsl:template name="stylesheet.css">
  BODY {
        font:normal 68% verdana,arial,helvetica;
        color:#000000;
  }
  TD {
        FONT-SIZE: 68%
  }
  P {
        line-height:1.5em;
        margin-top:0.5em; margin-bottom:1.0em;
  }
  H1 {
        MARGIN: 0px 0px 5px; FONT: 165% verdana,arial,helvetica
  }
  H2 {
        MARGIN-TOP: 1em; MARGIN-BOTTOM: 0.5em; FONT: bold 125% 
verdana,arial,helvetica
  }
  H3 {
        MARGIN-BOTTOM: 0.5em; FONT: bold 115% verdana,arial,helvetica
  }
  H4 {
        MARGIN-BOTTOM: 0.5em; FONT: bold 100% verdana,arial,helvetica
  }
  H5 {
        MARGIN-BOTTOM: 0.5em; FONT: bold 100% verdana,arial,helvetica
  }
  H6 {
        MARGIN-BOTTOM: 0.5em; FONT: bold 100% verdana,arial,helvetica
  }
  </xsl:template>
  
  
  <!-- print the violations of the class -->
  <xsl:template match="class" mode="class.details">
        <xsl:variable name="package.name" select="@package"/>
        <HTML>
                <HEAD>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name" 
select="$package.name"/>
                        </xsl:call-template>
                </HEAD>
                <BODY>
                        <xsl:call-template name="pageHeader"/>  
                        <H3>Class <xsl:if test="not($package.name = 
'')"><xsl:value-of select="$package.name"/>.</xsl:if><xsl:value-of 
select="@name"/></H3>
  
                        
                        <table border="0" cellpadding="5" cellspacing="2" 
width="95%">
                                <xsl:call-template name="class.audit.header"/>
                                <xsl:apply-templates select="." 
mode="print.audit"/>
                        </table>
        
                        <H2>Violations</H2>
                        <p>
                        <table border="0" cellpadding="5" cellspacing="2" 
width="95%">
                                <xsl:call-template 
name="violation.audit.header"/>
                                <xsl:apply-templates select="./violation" 
mode="print.audit">
                                        <xsl:sort data-type="number" 
select="@line"/>
                                </xsl:apply-templates>
                        </table>
                        
                        </p>
                </BODY>
        </HTML>
  </xsl:template>
  
  
  <!-- list of classes in a package -->
  <xsl:template name="classes.list">
        <xsl:param name="name"/>
        <HTML>
                <HEAD>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name" 
select="$name"/>
                        </xsl:call-template>
                </HEAD>
                <BODY>
                        <table width="100%">
                                <tr>
                                        <td nowrap="nowrap">
                                                <H2><a 
href="package-summary.html" target="classFrame"><xsl:value-of 
select="$name"/></a></H2>
                                        </td>
                                </tr>
                        </table>
        
                        <H2>Classes</H2>
                        <p>
                        <TABLE WIDTH="100%">
                                <xsl:apply-templates 
select="/classes/class[./@package = $name]" mode="classes.list">
                                        <xsl:sort select="@name"/>
                                </xsl:apply-templates>
                        </TABLE>
                        </p>
                </BODY>
        </HTML>
  </xsl:template>
  <!-- the class to list -->
  <xsl:template match="class" mode="classes.list">
        <tr>
                <td nowrap="nowrap">
                        <!-- @bug naming to fix for inner classes -->
                        <a href="[EMAIL PROTECTED]" 
target="classFrame"><xsl:value-of select="@name"/></a>
                </td>
        </tr>
  </xsl:template>
  
  
  <!--
        Creates an all-classes.html file that contains a link to all 
package-summary.html
        on each class.
  -->
  <xsl:template match="classes" mode="all.classes">
        <html>
                <head>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name"/>
                        </xsl:call-template>
                </head>
                <body>
                        <h2>Classes</h2>
                        <p>
                        <table width="100%">
                                <xsl:apply-templates select=".//class" 
mode="all.classes">
                                        <xsl:sort select="@name"/>
                                </xsl:apply-templates>
                        </table>
                        </p>
                </body>
        </html>
  </xsl:template>
  
  <xsl:template match="class" mode="all.classes">
      <!-- (ancestor::package)[last()] is buggy in MSXML3 ? -->
      <xsl:variable name="package.name" select="@package"/>
        <tr>
                <td nowrap="nowrap">
                        <a target="classFrame">
                                <xsl:attribute name="href">
                                        <xsl:if test="not($package.name='')">
                                                <xsl:value-of 
select="translate($package.name,'.','/')"/><xsl:text>/</xsl:text>
                                        </xsl:if><xsl:value-of 
select="@name"/><xsl:text>.html</xsl:text>
                                </xsl:attribute>
                                <xsl:value-of select="@name"/>
                        </a>
                </td>
        </tr>
  </xsl:template>
  
  
  <!--
        Creates an html file that contains a link to all package-summary.html 
files on
        each package existing on testsuites.
        @bug there will be a problem here, I don't know yet how to handle 
unnamed package :(
  -->
  <xsl:template match="classes" mode="all.packages">
        <html>
                <head>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name"/>
                        </xsl:call-template>
                </head>
                <body>
                        <h2><a href="overview-summary.html" 
target="classFrame">Home</a></h2>
                        <h2>Packages</h2>
                        <p>
                                <table width="100%">
                                        <xsl:apply-templates 
select="class[not(./@package = preceding-sibling::class/@package)]" 
mode="all.packages">
                                                <xsl:sort select="@package" 
order="ascending"/>
                                        </xsl:apply-templates>
                                </table>
                        </p>
                </body>
        </html>
  </xsl:template>
  
  <xsl:template match="class" mode="all.packages">
        <tr>
                <td nowrap="nowrap">
                        <a 
href="{translate(@package,'.','/')}/package-summary.html" target="classFrame">
                                <xsl:value-of select="@package"/>
                        </a>
                </td>
        </tr>
  </xsl:template>
  
  
  <xsl:template match="classes" mode="overview.packages">
        <html>
                <head>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name"/>
                        </xsl:call-template>
                </head>
                <body onload="open('allclasses-frame.html','classListFrame')">
                <xsl:call-template name="pageHeader"/>
                <h2>Summary</h2>
                <table border="0" cellpadding="5" cellspacing="2" width="95%">
                <tr bgcolor="#A6CAF0" valign="top">
                        <td><b>Audited classes</b></td>
                        <td><b>Reported classes</b></td>
                        <td><b>Violations</b></td>
                </tr>
                <tr bgcolor="#EEEEE" valign="top">
                        <td><xsl:value-of select="@audited"/></td>
                        <td><xsl:value-of select="@reported"/></td>
                        <td><xsl:value-of select="@violations"/></td>
                </tr>
                </table>
                <table border="0" width="95%">
                <tr>
                <td     style="text-align: justify;">
                Note: Rules checked have originated from style guidelines 
suggested by the language designers,
                experience from the Java development community and insite 
experience. Violations are generally
                reported with a reference to the <a 
href="http://java.sun.com/docs/books/jls/second_edition/html/jTOC.doc.html";>Java
 Language Specifications</a> (JLS x.x.x)
                and Metamata Audit rules (x.x).
                Please consult these documents for additional information about 
violations.
                <p/>
                One should note that these violations do not necessary 
underline errors but should be used
                as an indication for <i>possible</i> errors. As always, use 
your best judgment and review
                them carefully, it might save you hours of debugging.
                </td>
                </tr>
                </table>
  
                <h2>Packages</h2>
                <table border="0" cellpadding="5" cellspacing="2" width="95%">
                        <xsl:call-template name="class.audit.header"/>
                        <xsl:for-each select="class[not(./@package = 
preceding-sibling::class/@package)]">
                                <xsl:sort select="@package" order="ascending"/>
                                <tr bgcolor="#EEEEE" valign="top">
                                        <td><a 
href="{translate(@package,'.','/')}/package-summary.html"><xsl:value-of 
select="@package"/></a></td>
                                        <td><xsl:value-of 
select="sum(/classes/class[./@package = current()/@package]/@violations)"/></td>
                                </tr>
                        </xsl:for-each>
                </table>
                </body>
                </html>
  </xsl:template>
  
  
  <xsl:template name="package.summary">
        <xsl:param name="name"/>
        <HTML>
                <HEAD>
                        <xsl:call-template name="create.stylesheet.link">
                                <xsl:with-param name="package.name" 
select="$name"/>
                        </xsl:call-template>
                </HEAD>
                <BODY>
                        <xsl:attribute 
name="onload">open('package-frame.html','classListFrame')</xsl:attribute>
                        <xsl:call-template name="pageHeader"/>
                        <h3>Package <xsl:value-of select="$name"/></h3>
                        
                        <!--table border="0" cellpadding="5" cellspacing="2" 
width="95%">
                                <xsl:call-template name="class.metrics.header"/>
                                <xsl:apply-templates select="." 
mode="print.metrics"/>
                        </table-->
                        
                        <xsl:if test="count(/classes/class[./@package = $name]) 
&gt; 0">
                                <H2>Classes</H2>
                                <p>
                                <table border="0" cellpadding="5" 
cellspacing="2" width="95%">
                                        <xsl:call-template 
name="class.audit.header"/>
                                        <xsl:apply-templates 
select="/classes/class[./@package = $name]" mode="print.audit">
                                                <xsl:sort select="@name"/>
                                        </xsl:apply-templates>
                                </table>
                                </p>
                        </xsl:if>
                </BODY>
        </HTML>
  </xsl:template>
  
  
  <!--
      transform string like a.b.c to ../../../
      @param path the path to transform into a descending directory path
  -->
  <xsl:template name="path">
        <xsl:param name="path"/>
        <xsl:if test="contains($path,'.')">
                <xsl:text>../</xsl:text>        
                <xsl:call-template name="path">
                        <xsl:with-param name="path"><xsl:value-of 
select="substring-after($path,'.')"/></xsl:with-param>
                </xsl:call-template>    
        </xsl:if>
        <xsl:if test="not(contains($path,'.')) and not($path = '')">
                <xsl:text>../</xsl:text>        
        </xsl:if>
  </xsl:template>
  
  
  <!-- create the link to the stylesheet based on the package name -->
  <xsl:template name="create.stylesheet.link">
        <xsl:param name="package.name"/>
        <LINK REL ="stylesheet" TYPE="text/css" TITLE="Style"><xsl:attribute 
name="href"><xsl:if test="not($package.name = 'unnamed 
package')"><xsl:call-template name="path"><xsl:with-param name="path" 
select="$package.name"/></xsl:call-template></xsl:if>stylesheet.css</xsl:attribute></LINK>
  </xsl:template>
  
  
  <!-- Page HEADER -->
  <xsl:template name="pageHeader">
        <h1>Audit Results</h1>
        <table width="100%">
        <tr>
                <td align="left"></td>
                <td align="right">Designed for use with <a 
href='http://www.webgain.com/products/quality_analyzer/'>Webgain QA/Metamata 
Audit</a> and <a href='http://jakarta.apache.org'>Ant</a>.</td>
        </tr>
        </table>
        <hr size="1"/>
  </xsl:template>
  
  <!-- class header -->
  <xsl:template name="class.audit.header">
        <tr bgcolor="#A6CAF0" valign="top">
                <td width="80%"><b>Name</b></td>
                <td><b>Violations</b></td>
        </tr>
  </xsl:template>
  
  <!-- method header -->
  <xsl:template name="violation.audit.header">
        <tr bgcolor="#A6CAF0" valign="top">
                <td><b>Line</b></td>
                <td><b>Message</b></td>
        </tr>
  </xsl:template>
  
  
  <!-- class information -->
  <xsl:template match="class" mode="print.audit">
        <tr bgcolor="#EEEEE" valign="top">              
                <td><a href="[EMAIL PROTECTED]"><xsl:value-of 
select="@name"/></a></td>
                <td><xsl:apply-templates select="@violations"/></td>
        </tr>
  </xsl:template>
  
  <xsl:template match="violation" mode="print.audit">
        <tr bgcolor="#EEEEE" valign="top">              
                <td><xsl:value-of select="@line"/></td>
                <td><xsl:apply-templates select="@message"/></td>
        </tr>
  </xsl:template>
  
  
  </xsl:stylesheet>
        
  
  
  

Reply via email to