rev 7560 : 8066814: Reduce accessibility in TraceEvent
Reviewed-by:

   1 <?xml version="1.0" encoding="utf-8"?>
   2 <!--
   3  Copyright (c) 2012, 2014, Oracle and/or its affiliates. All rights reserved.
   4  DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5 
   6  This code is free software; you can redistribute it and/or modify it
   7  under the terms of the GNU General Public License version 2 only, as
   8  published by the Free Software Foundation.
   9 
  10  This code is distributed in the hope that it will be useful, but WITHOUT
  11  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  12  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  13  version 2 for more details (a copy is included in the LICENSE file that
  14  accompanied this code).
  15 
  16  You should have received a copy of the GNU General Public License version
  17  2 along with this work; if not, write to the Free Software Foundation,
  18  Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  19 
  20  Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  21  or visit www.oracle.com if you need additional information or have any
  22  questions.
  23 -->
  24 
  25 <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
  26 <xsl:import href="xsl_util.xsl"/>
  27 <xsl:output method="text" indent="no" omit-xml-declaration="yes"/>
  28 
  29 <xsl:template match="/">
  30   <xsl:call-template name="file-header"/>
  31 
  32 #ifndef TRACEFILES_TRACEEVENTCLASSES_HPP
  33 #define TRACEFILES_TRACEEVENTCLASSES_HPP
  34 
  35 // On purpose outside the INCLUDE_TRACE
  36 // Some parts of traceEvent.hpp are used outside of
  37 // INCLUDE_TRACE
  38 
  39 #include "memory/resourceArea.hpp"
  40 #include "tracefiles/traceTypes.hpp"
  41 #include "trace/traceEvent.hpp"
  42 #include "utilities/macros.hpp"
  43 #include "utilities/ticks.hpp"
  44 #if INCLUDE_TRACE
  45 #include "trace/traceStream.hpp"
  46 #include "utilities/ostream.hpp"
  47 
  48   <xsl:apply-templates select="trace/events/struct" mode="trace"/>
  49   <xsl:apply-templates select="trace/events/event" mode="trace"/>
  50 
  51 #else // !INCLUDE_TRACE
  52 
  53 class TraceEvent {
  54 public:
  55   TraceEvent() {}
  56   void set_starttime(const Ticks&amp; time) {}
  57   void set_endtime(const Ticks&amp; time) {}
  58   bool should_commit() const { return false; }
  59   static bool is_enabled() { return false; }
  60   void commit() const {}

  61 };
  62 
  63   <xsl:apply-templates select="trace/events/struct" mode="empty"/>
  64   <xsl:apply-templates select="trace/events/event" mode="empty"/>
  65 
  66 #endif // INCLUDE_TRACE
  67 #endif // TRACEFILES_TRACEEVENTCLASSES_HPP
  68 </xsl:template>
  69 
  70 <xsl:template match="struct" mode="trace">
  71 struct TraceStruct<xsl:value-of select="@id"/>
  72 {
  73 private:
  74 <xsl:apply-templates select="value" mode="write-fields"/>
  75 public:
  76 <xsl:apply-templates select="value" mode="write-setters"/>
  77 
  78   void writeStruct(TraceStream&amp; ts) {
  79 <xsl:apply-templates select="value" mode="write-data"/>
  80   }
  81 };
  82 
  83 </xsl:template>
  84 
  85 <xsl:template match="struct" mode="empty">
  86 struct TraceStruct<xsl:value-of select="@id"/> 
  87 {
  88 public:
  89 <xsl:apply-templates select="value" mode="write-empty-setters"/>
  90 };
  91 </xsl:template>
  92 
  93 
  94 <xsl:template match="event" mode="empty">
  95   <xsl:value-of select="concat('class Event', @id, ' : public TraceEvent')"/>
  96 {
  97  public:
  98 <xsl:value-of select="concat('  Event', @id, '(bool ignore=true) {}')"/>
  99 <xsl:text>
 100 </xsl:text>
 101 
 102 <xsl:apply-templates select="value|structvalue|transition_value|relation" mode="write-empty-setters"/>
 103 };
 104 
 105 </xsl:template>
 106 
 107 
 108 <xsl:template match="event" mode="trace">
 109   <xsl:value-of select="concat('class Event', @id, ' : public TraceEvent&lt;Event', @id, '&gt;')"/>
 110 {
 111  public:
 112   static const bool hasThread = <xsl:value-of select="@has_thread"/>;
 113   static const bool hasStackTrace = <xsl:value-of select="@has_stacktrace"/>;
 114   static const bool isInstant = <xsl:value-of select="@is_instant"/>;
 115   static const bool isRequestable = <xsl:value-of select="@is_requestable"/>;
 116   static const TraceEventId eventId = <xsl:value-of select="concat('Trace', @id, 'Event')"/>;
 117 
 118  private:
 119 <xsl:apply-templates select="value|structvalue|transition_value|relation" mode="write-fields"/>
 120 
 121   void writeEventContent(void) {
 122     TraceStream ts(*tty);
 123     ts.print("<xsl:value-of select="@label"/>: [");
 124 <xsl:apply-templates select="value|structvalue" mode="write-data"/>
 125     ts.print("]\n");
 126   }
 127 
 128  public:
 129 <xsl:apply-templates select="value|structvalue|transition_value|relation" mode="write-setters"/>
 130 
 131   bool should_write(void) {
 132     return true;
 133   }
 134 <xsl:text>
 135 
 136 </xsl:text>
 137   <xsl:value-of select="concat('  Event', @id, '(EventStartTime timing=TIMED) : TraceEvent&lt;Event', @id, '&gt;(timing) {}', $newline)"/>
 138   void writeEvent(void) {
 139     ResourceMark rm;
 140     if (UseLockedTracing) {
 141       ttyLocker lock;
 142       writeEventContent();
 143     } else {
 144       writeEventContent();
 145     }
 146   }
 147 };
 148 
 149 </xsl:template>
 150 
 151 <xsl:template match="value|transition_value|relation" mode="write-empty-setters">
 152   <xsl:param name="cls"/>
 153   <xsl:variable name="type" select="@type"/>
 154   <xsl:variable name="wt" select="//primary_type[@symbol=$type]/@type"/>
 155   <xsl:value-of select="concat('  void set_', @field, '(', $wt, ' value) { }')"/>
 156   <xsl:if test="position() != last()">
 157     <xsl:text>
 158 </xsl:text>
 159   </xsl:if>
 160 </xsl:template>
 161 
 162 <xsl:template match="structvalue" mode="write-empty-setters">
 163   <xsl:param name="cls"/>
 164   <xsl:value-of select="concat('  void set_', @field, '(const TraceStruct', @type, '&amp; value) { }')"/>
 165   <xsl:if test="position() != last()">
 166     <xsl:text>
 167 </xsl:text>
 168   </xsl:if>
 169 </xsl:template>
 170 
 171 <xsl:template match="value[@type='TICKS']" mode="write-setters">
 172 #if INCLUDE_TRACE
 173 <xsl:value-of select="concat('  void set_', @field, '(const Ticks&amp; time) { _', @field, ' = time; }')"/>
 174 #else
 175 <xsl:value-of select="concat('  void set_', @field, '(const Ticks&amp; ignore) {}')"/>
 176 #endif
 177 </xsl:template>
 178 
 179 <xsl:template match="value[@type='TICKSPAN']" mode="write-setters">
 180 #if INCLUDE_TRACE
 181   <xsl:value-of select="concat('  void set_', @field, '(const Tickspan&amp; time) { _', @field, ' = time; }')"/>
 182 #else
 183   <xsl:value-of select="concat('  void set_', @field, '(const Tickspan&amp; ignore) {}')"/>
 184 #endif
 185 </xsl:template>
 186 
 187 
 188 <xsl:template match="value" mode="write-fields">
 189   <xsl:variable name="type" select="@type"/>
 190   <xsl:variable name="wt" select="//primary_type[@symbol=$type]/@type"/>
 191   <xsl:value-of select="concat('  ', $wt, ' _', @field, ';')"/>
 192   <xsl:if test="position() != last()">
 193     <xsl:text> 
 194 </xsl:text>
 195   </xsl:if>
 196 </xsl:template>
 197 
 198 <xsl:template match="structvalue" mode="write-fields">
 199   <xsl:value-of select="concat('  TraceStruct', @type, ' _', @field, ';')"/>
 200   <xsl:text>
 201 </xsl:text>
 202 </xsl:template>
 203 
 204 <xsl:template match="value|transition_value|relation" mode="write-setters">
 205   <xsl:param name="cls"/>
 206   <xsl:variable name="type" select="@type"/>
 207   <xsl:variable name="wt" select="//primary_type[@symbol=$type]/@type"/>
 208   <xsl:value-of select="concat('  void set_', @field, '(', $wt, ' value) { this->_', @field, ' = value; }')"/>
 209   <xsl:if test="position() != last()">
 210     <xsl:text>
 211 </xsl:text>
 212   </xsl:if>
 213 </xsl:template>
 214 
 215 <xsl:template match="structvalue" mode="write-setters">
 216   <xsl:param name="cls"/>
 217   <xsl:value-of select="concat('  void set_', @field, '(const TraceStruct', @type, '&amp; value) { this->_', @field, ' = value; }')"/>
 218   <xsl:if test="position() != last()">
 219     <xsl:text>
 220 </xsl:text>
 221   </xsl:if>
 222 </xsl:template>
 223 
 224 <xsl:template match="value" mode="write-data">
 225   <xsl:variable name="type" select="@type"/>
 226   <xsl:variable name="wt" select="//primary_type[@symbol=$type]/@writetype"/>
 227   <xsl:choose>
 228     <xsl:when test="@type='TICKSPAN'">
 229       <xsl:value-of select="concat('    ts.print_val(&quot;', @label, '&quot;, _', @field, '.value());')"/>
 230     </xsl:when>
 231     <xsl:when test="@type='TICKS'">
 232       <xsl:value-of select="concat('    ts.print_val(&quot;', @label, '&quot;, _', @field, '.value());')"/>
 233     </xsl:when>
 234     <xsl:otherwise>
 235       <xsl:value-of select="concat('    ts.print_val(&quot;', @label, '&quot;, _', @field, ');')"/>
 236     </xsl:otherwise>
 237   </xsl:choose>
 238   <xsl:if test="position() != last()">
 239     <xsl:text>
 240     ts.print(", ");
 241 </xsl:text>
 242   </xsl:if>
 243 </xsl:template>
 244 
 245 <xsl:template match="structvalue" mode="write-data">
 246   <xsl:value-of select="concat('    _', @field, '.writeStruct(ts);')"/>
 247   <xsl:if test="position() != last()">
 248     <xsl:text>
 249     ts.print(", ");
 250 </xsl:text>
 251   </xsl:if>
 252 </xsl:template>
 253 
 254 </xsl:stylesheet>
--- EOF ---