1 <?xml version="1.0" encoding="utf-8"?>
2 <!--
3 Copyright (c) 2012, 2018, 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 "tracefiles/traceTypes.hpp"
40 #include "utilities/macros.hpp"
41
42 #if INCLUDE_TRACE
43 #include "trace/traceEvent.hpp"
44 #include "trace/traceStream.hpp"
45 #include "utilities/ostream.hpp"
46
47 <xsl:apply-templates select="trace/events/struct" mode="trace"/>
48 <xsl:apply-templates select="trace/events/event" mode="trace"/>
49
50 #else // !INCLUDE_TRACE
51
52 class TraceEvent {
53 public:
54 TraceEvent() {}
55 void set_starttime(const Ticks& ignore) {}
56 void set_endtime(const Ticks& ignore) {}
57 bool should_commit() const { return false; }
58 static bool is_enabled() { return false; }
59 void commit() {}
60 };
61
62 <xsl:apply-templates select="trace/events/struct" mode="empty"/>
63 <xsl:apply-templates select="trace/events/event" mode="empty"/>
64
65 #endif // INCLUDE_TRACE
66 #endif // TRACEFILES_TRACEEVENTCLASSES_HPP
67 </xsl:template>
68
69 <xsl:template match="struct" mode="trace">
70 struct TraceStruct<xsl:value-of select="@id"/>
71 {
72 private:
73 <xsl:apply-templates select="value" mode="write-fields"/>
74 public:
75 <xsl:apply-templates select="value" mode="write-setters"/>
76
77 void writeStruct(TraceStream& ts) {
78 <xsl:apply-templates select="value" mode="write-data"/>
79 }
80 };
81
82 </xsl:template>
83
84 <xsl:template match="struct" mode="empty">
85 struct TraceStruct<xsl:value-of select="@id"/>
86 {
87 public:
88 <xsl:apply-templates select="value" mode="write-empty-setters"/>
89 };
90 </xsl:template>
91
92
93 <xsl:template match="event" mode="empty">
94 <xsl:value-of select="concat('class Event', @id, ' : public TraceEvent')"/>
95 {
96 public:
97 <xsl:value-of select="concat(' Event', @id, '(bool ignore=true) {}')"/>
98 <xsl:text>
99 </xsl:text>
100
101 <xsl:apply-templates select="value|structvalue|transition_value|relation" mode="write-empty-setters"/>
102 };
103
104 </xsl:template>
105
106
107 <xsl:template match="event" mode="trace">
108 <xsl:value-of select="concat('class Event', @id, ' : public TraceEvent<Event', @id, '>')"/>
109 {
110 public:
111 static const bool hasThread = <xsl:value-of select="@has_thread"/>;
112 static const bool hasStackTrace = <xsl:value-of select="@has_stacktrace"/>;
113 static const bool isInstant = <xsl:value-of select="@is_instant"/>;
114 static const bool isRequestable = <xsl:value-of select="@is_requestable"/>;
115 static const TraceEventId eventId = <xsl:value-of select="concat('Trace', @id, 'Event')"/>;
116
117 private:
118 <xsl:apply-templates select="value|structvalue|transition_value|relation" mode="write-fields"/>
119
120 void writeEventContent(void) {
121 TraceStream ts;
122 ts.print("<xsl:value-of select="@label"/>: [");
123 <xsl:apply-templates select="value|structvalue" mode="write-data"/>
124 ts.print("]\n");
125 }
126
127 public:
128 <xsl:apply-templates select="value|structvalue|transition_value|relation" mode="write-setters"/>
129
130 bool should_write(void) {
131 return true;
132 }
133 <xsl:text>
134
135 </xsl:text>
136 <xsl:value-of select="concat(' Event', @id, '(EventStartTime timing=TIMED) : TraceEvent<Event', @id, '>(timing) {}', $newline)"/>
137 void writeEvent(void) {
138 if (UseLockedTracing) {
139 ttyLocker lock;
140 writeEventContent();
141 } else {
142 writeEventContent();
143 }
144 }
145
146 using <xsl:value-of select="concat('TraceEvent<Event', @id, '>')"/>::commit; // else commit() is hidden by overloaded versions in this class
147
148 <xsl:variable name="instant" select="@is_instant"/>
149 <!-- non static method (only for non instant events)-->
150 <xsl:if test="$instant='false'">
151 <xsl:value-of select="concat(' Event', @id)"/>(
152 <xsl:for-each select="value|structvalue|transition_value|relation">
153 <xsl:apply-templates select="." mode="cpp-type"/><xsl:value-of select="concat(' ', @field)"/>
154 <xsl:if test="position() != last()">,
155 </xsl:if></xsl:for-each>) : TraceEvent<<xsl:value-of select="concat('Event', @id)"/>>(TIMED) {
156 if (should_commit()) {<xsl:for-each select="value|structvalue|transition_value|relation">
157 set_<xsl:value-of select="@field"/>(<xsl:value-of select="@field"/>);</xsl:for-each>
158 }
159 }
160
161 void commit(<xsl:for-each select="value|structvalue|transition_value|relation">
162 <xsl:apply-templates select="." mode="cpp-type"/><xsl:value-of select="concat(' ', @field)"/>
163 <xsl:if test="position() != last()">,
164 </xsl:if></xsl:for-each>) {
165 if (should_commit()) {
166 <xsl:for-each select="value|structvalue|transition_value|relation">set_<xsl:value-of select="@field"/>(<xsl:value-of select="@field"/>);
167 </xsl:for-each>commit();
168 }
169 }</xsl:if>
170 <!-- static method (for all events) -->
171 static void commit(<xsl:if test="$instant='false'">const Ticks& startTicks,
172 const Ticks& endTicks<xsl:choose><xsl:when test="value|structvalue|transition_value|relation">,
173 </xsl:when></xsl:choose></xsl:if>
174 <xsl:for-each select="value|structvalue|transition_value|relation">
175 <xsl:apply-templates select="." mode="cpp-type"/><xsl:value-of select="concat(' ', @field)"/>
176 <xsl:if test="position() != last()">,
177 </xsl:if></xsl:for-each>) {
178 <xsl:value-of select="concat('Event', @id)"/> me(UNTIMED);
179
180 if (me.should_commit()) {
181 <xsl:if test="$instant='false'">me.set_starttime(startTicks);
182 me.set_endtime(endTicks);
183 </xsl:if>
184 <xsl:for-each select="value|structvalue|transition_value|relation">me.set_<xsl:value-of select="@field"/>(<xsl:value-of select="@field"/>);
185 </xsl:for-each>me.commit();
186 }
187 }
188 };
189
190 </xsl:template>
191
192 <xsl:template match="value|transition_value|relation" mode="write-empty-setters">
193 <xsl:param name="cls"/>
194 <xsl:variable name="type" select="@type"/>
195 <xsl:variable name="wt" select="//primary_type[@symbol=$type]/@type"/>
196 <xsl:value-of select="concat(' void set_', @field, '(', $wt, ' value) { }')"/>
197 <xsl:if test="position() != last()">
198 <xsl:text>
199 </xsl:text>
200 </xsl:if>
201 </xsl:template>
202
203 <xsl:template match="structvalue" mode="write-empty-setters">
204 <xsl:param name="cls"/>
205 <xsl:value-of select="concat(' void set_', @field, '(const TraceStruct', @type, '& value) { }')"/>
206 <xsl:if test="position() != last()">
207 <xsl:text>
208 </xsl:text>
209 </xsl:if>
210 </xsl:template>
211
212 <xsl:template match="value[@type='TICKS']" mode="write-setters">
213 #if INCLUDE_TRACE
214 <xsl:value-of select="concat(' void set_', @field, '(const Ticks& time) { _', @field, ' = time; }')"/>
215 #else
216 <xsl:value-of select="concat(' void set_', @field, '(const Ticks& ignore) {}')"/>
217 #endif
218 </xsl:template>
219
220 <xsl:template match="value[@type='TICKSPAN']" mode="write-setters">
221 #if INCLUDE_TRACE
222 <xsl:value-of select="concat(' void set_', @field, '(const Tickspan& time) { _', @field, ' = time; }')"/>
223 #else
224 <xsl:value-of select="concat(' void set_', @field, '(const Tickspan& ignore) {}')"/>
225 #endif
226 </xsl:template>
227
228
229 <xsl:template match="value" mode="write-fields">
230 <xsl:variable name="type" select="@type"/>
231 <xsl:variable name="wt" select="//primary_type[@symbol=$type]/@type"/>
232 <xsl:value-of select="concat(' ', $wt, ' _', @field, ';')"/>
233 <xsl:if test="position() != last()">
234 <xsl:text>
235 </xsl:text>
236 </xsl:if>
237 </xsl:template>
238
239 <xsl:template match="structvalue" mode="write-fields">
240 <xsl:value-of select="concat(' TraceStruct', @type, ' _', @field, ';')"/>
241 <xsl:text>
242 </xsl:text>
243 </xsl:template>
244
245 <xsl:template match="value|transition_value|relation" mode="write-setters">
246 <xsl:param name="cls"/>
247 <xsl:variable name="type" select="@type"/>
248 <xsl:variable name="wt" select="//primary_type[@symbol=$type]/@type"/>
249 <xsl:value-of select="concat(' void set_', @field, '(', $wt, ' value) { this->_', @field, ' = value; }')"/>
250 <xsl:if test="position() != last()">
251 <xsl:text>
252 </xsl:text>
253 </xsl:if>
254 </xsl:template>
255
256 <xsl:template match="structvalue" mode="write-setters">
257 <xsl:param name="cls"/>
258 <xsl:value-of select="concat(' void set_', @field, '(const TraceStruct', @type, '& value) { this->_', @field, ' = value; }')"/>
259 <xsl:if test="position() != last()">
260 <xsl:text>
261 </xsl:text>
262 </xsl:if>
263 </xsl:template>
264
265 <xsl:template match="value" mode="write-data">
266 <xsl:variable name="type" select="@type"/>
267 <xsl:variable name="wt" select="//primary_type[@symbol=$type]/@writetype"/>
268 <xsl:choose>
269 <xsl:when test="@type='TICKSPAN'">
270 <xsl:value-of select="concat(' ts.print_val("', @label, '", _', @field, '.value());')"/>
271 </xsl:when>
272 <xsl:when test="@type='TICKS'">
273 <xsl:value-of select="concat(' ts.print_val("', @label, '", _', @field, '.value());')"/>
274 </xsl:when>
275 <xsl:otherwise>
276 <xsl:value-of select="concat(' ts.print_val("', @label, '", _', @field, ');')"/>
277 </xsl:otherwise>
278 </xsl:choose>
279 <xsl:if test="position() != last()">
280 <xsl:text>
281 ts.print(", ");
282 </xsl:text>
283 </xsl:if>
284 </xsl:template>
285
286 <xsl:template match="structvalue" mode="write-data">
287 <xsl:value-of select="concat(' _', @field, '.writeStruct(ts);')"/>
288 <xsl:if test="position() != last()">
289 <xsl:text>
290 ts.print(", ");
291 </xsl:text>
292 </xsl:if>
293 </xsl:template>
294
295
296 <xsl:template match="value|transition_value|relation" mode="cpp-type">
297 <xsl:variable name="type" select="@type"/>
298 <xsl:value-of select="//primary_type[@symbol=$type]/@type"/>
299 </xsl:template>
300 <xsl:template match="structvalue" mode="cpp-type">
301 <xsl:value-of select="concat('const TraceStruct', @type, '&')"/>
302 </xsl:template>
303
304 </xsl:stylesheet>