Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
tracing router existence with the new parser
[simgrid.git] / src / instr / paje.c
1 /* Copyright (c) 2010. The SimGrid Team.
2  * All rights reserved.                                                     */
3
4 /* This program is free software; you can redistribute it and/or modify it
5   * under the terms of the license (GNU LGPL) which comes with this package. */
6
7 #include "instr/private.h"
8
9 #ifdef HAVE_TRACING
10
11 static FILE *tracing_file = NULL;
12 int tracing_active = 0;
13
14 static int pajeDefineContainerTypeId = 0;
15 static int pajeDefineStateTypeId = 1;
16 static int pajeDefineEntityValueId = 2;
17 static int pajeDefineEventTypeId = 3;
18 static int pajeDefineLinkTypeId = 4;
19 static int pajeCreateContainerId = 5;
20 static int pajeSetStateId = 6;
21 #define UNUSED007 7
22 static int pajePopStateId = 8;
23 static int pajeDestroyContainerId = 9;
24 #define UNUSED006 10
25 #define UNUSED003 11
26 static int pajeStartLinkId = 12;
27 static int pajeEndLinkId = 13;
28 #define UNUSED000 14
29 #define UNUSED004 15
30 #define UNUSED008 16
31 #define UNUSED009 17
32 #define UNUSED005 18
33 static int pajePushStateId = 19;
34 #define UNUSED001 20
35 #define UNUSED002 21
36 static int pajeSetVariableId = 22;
37 static int pajeAddVariableId = 23;
38 static int pajeSubVariableId = 24;
39 static int pajeDefineVariableTypeId = 25;
40 static int pajeStartLinkWithVolumeId = 26;
41 static int pajeNewEventId = 27;
42
43 #define TRACE_LINE_SIZE 1000
44
45 void TRACE_paje_start (FILE *file)
46 {
47   tracing_file = file;
48   tracing_active = 1;
49 }
50
51 FILE *TRACE_paje_end (void)
52 {
53   tracing_active = 0;
54   return tracing_file;
55 }
56
57
58 void TRACE_paje_create_header(void) {
59   if (!tracing_active)
60     return;
61   fprintf(
62       tracing_file,
63       " \
64 %%EventDef PajeDefineContainerType %d \n\
65 %%       Alias string \n\
66 %%       ContainerType string \n\
67 %%       Name string \n\
68 %%EndEventDef \n\
69 %%EventDef PajeDefineStateType %d \n\
70 %%       Alias string \n\
71 %%       ContainerType string \n\
72 %%       Name string \n\
73 %%EndEventDef \n\
74 %%EventDef PajeDefineEntityValue %d \n\
75 %%       Alias string \n\
76 %%       EntityType string \n\
77 %%       Name string \n\
78 %%EndEventDef \n\
79 %%EventDef PajeDefineEventType %d \n\
80 %%       Alias string \n\
81 %%       EntityType string \n\
82 %%       Name string \n\
83 %%EndEventDef \n\
84 %%EventDef PajeDefineLinkType %d \n\
85 %%       Alias string \n\
86 %%       ContainerType string \n\
87 %%       SourceContainerType string \n\
88 %%       DestContainerType string \n\
89 %%       Name string \n\
90 %%EndEventDef \n\
91 %%EventDef PajeCreateContainer %d \n\
92 %%       Time date \n\
93 %%       Alias string \n\
94 %%       Type string \n\
95 %%       Container string \n\
96 %%       Name string \n\
97 %%EndEventDef \n\
98 %%EventDef PajeDestroyContainer %d \n\
99 %%       Time date \n\
100 %%       Type string \n\
101 %%       Container string \n\
102 %%EndEventDef \n\
103 %%EventDef PajeSetState %d \n\
104 %%       Time date \n\
105 %%       EntityType string \n\
106 %%       Container string \n\
107 %%       Value string \n\
108 %%EndEventDef\n\
109 %%EventDef PajePopState %d \n\
110 %%       Time date \n\
111 %%       EntityType string \n\
112 %%       Container string \n\
113 %%EndEventDef\n\
114 %%EventDef PajeStartLink %d \n\
115 %%       Time date \n\
116 %%       EntityType string \n\
117 %%       Container string \n\
118 %%       Value string \n\
119 %%       SourceContainer string \n\
120 %%       Key string \n\
121 %%EndEventDef\n\
122 %%EventDef PajeEndLink %d \n\
123 %%       Time date \n\
124 %%       EntityType string \n\
125 %%       Container string \n\
126 %%       Value string \n\
127 %%       DestContainer string \n\
128 %%       Key string \n\
129 %%EndEventDef\n\
130 %%EventDef PajePushState %d \n\
131 %%       Time date \n\
132 %%       EntityType string \n\
133 %%       Container string \n\
134 %%       Value string \n\
135 %%EndEventDef\n\
136 %%EventDef PajeSetVariable %d \n\
137 %%       Time date \n\
138 %%       EntityType string \n\
139 %%       Container string \n\
140 %%       Value string \n\
141 %%EndEventDef\n\
142 %%EventDef PajeAddVariable %d \n\
143 %%       Time date \n\
144 %%       EntityType string \n\
145 %%       Container string \n\
146 %%       Value string \n\
147 %%EndEventDef\n\
148 %%EventDef PajeSubVariable %d \n\
149 %%       Time date \n\
150 %%       EntityType string \n\
151 %%       Container string \n\
152 %%       Value string \n\
153 %%EndEventDef\n\
154 %%EventDef PajeDefineVariableType %d \n\
155 %%       Alias string \n\
156 %%       ContainerType string \n\
157 %%       Name string \n\
158 %%EndEventDef \n\
159 %%EventDef PajeStartLink %d \n\
160 %%       Time date \n\
161 %%       EntityType string \n\
162 %%       Container string \n\
163 %%       Value string \n\
164 %%       SourceContainer string \n\
165 %%       Key string \n\
166 %%       Volume string \n\
167 %%EndEventDef\n\
168 %%EventDef PajeNewEvent %d \n\
169 %%       Time date \n\
170 %%       EntityType string \n\
171 %%       Container string \n\
172 %%       Value string \n\
173 %%EndEventDef\n",
174       pajeDefineContainerTypeId, pajeDefineStateTypeId, pajeDefineEntityValueId,
175       pajeDefineEventTypeId, pajeDefineLinkTypeId, pajeCreateContainerId,
176       pajeDestroyContainerId, pajeSetStateId,
177       pajePopStateId,
178       pajeStartLinkId, pajeEndLinkId,
179       pajePushStateId,
180       pajeSetVariableId,
181       pajeAddVariableId,
182       pajeSubVariableId,
183       pajeDefineVariableTypeId,
184       pajeStartLinkWithVolumeId,
185       pajeNewEventId);
186 }
187
188 /* internal to this file */
189 static void __pajeCreateContainer (char *output, int len, int eventid, double time, const char *alias, const char *type,
190     const char *container, const char *name)
191 {
192   snprintf (output, len, "%d %.15lf %s %s %s %s", eventid, time,
193       alias, type, container, name);
194 }
195
196 static void __pajeSetState (char *output, int len, int eventid, double time, const char *entityType, const char *container, const char *value)
197 {
198   snprintf (output, len, "%d %.15lf %s %s %s", eventid, time, entityType, container, value);
199 }
200
201 static void __pajeSetVariable (char *output, int len, int eventid, double time, const char *entityType, const char *container, const char *value)
202 {
203   snprintf (output, len, "%d %.15lf %s %s %s", eventid, time, entityType, container, value);
204 }
205
206 static void __pajeStartLink (char *output, int len, int eventid,  double time, const char *entityType, const char *container, const char *value,
207 const char *sourceContainer, const char *key)
208 {
209   snprintf(output, len, "%d %.15lf %s %s %s %s %s", eventid, time, entityType, container, value, sourceContainer, key);
210 }
211
212 /* internal do the instrumentation module */
213 void pajeDefineContainerType(const char *alias, const char *containerType,
214     const char *name) {
215   fprintf(tracing_file, "%d %s %s %s\n", pajeDefineContainerTypeId, alias,
216       containerType, name);
217 }
218
219 void pajeDefineStateType(const char *alias, const char *containerType,
220     const char *name) {
221   fprintf(tracing_file, "%d %s %s %s\n", pajeDefineStateTypeId, alias,
222       containerType, name);
223 }
224
225 void pajeDefineEventType(const char *alias, const char *containerType,
226     const char *name) {
227   fprintf(tracing_file, "%d %s %s %s\n", pajeDefineEventTypeId, alias,
228       containerType, name);
229 }
230
231 void pajeDefineLinkType(const char *alias, const char *containerType,
232     const char *sourceContainerType, const char *destContainerType,
233     const char *name) {
234   fprintf(tracing_file, "%d %s %s %s %s %s\n", pajeDefineLinkTypeId, alias,
235       containerType, sourceContainerType, destContainerType, name);
236 }
237
238 void pajeCreateContainer(double time, const char *alias, const char *type, const char *container, const char *name) {
239   char line[TRACE_LINE_SIZE];
240   __pajeCreateContainer (line, TRACE_LINE_SIZE, pajeCreateContainerId, time, alias, type, container, name);
241   fprintf (tracing_file, "%s\n", line);
242 }
243
244 void pajeDestroyContainer (double time, const char *type, const char *container)
245 {
246   fprintf(tracing_file, "%d %.15lf %s %s\n", pajeDestroyContainerId, time, type, container);
247 }
248
249 void pajeSetState (double time, const char *entityType, const char *container, const char *value)
250 {
251   char line[TRACE_LINE_SIZE];
252   __pajeSetState (line, TRACE_LINE_SIZE, pajeSetStateId, time, entityType, container, value);
253   fprintf(tracing_file, "%s\n", line);
254 }
255
256 void pajePushState (double time, const char *entityType, const char *container, const char *value)
257 {
258   char line[TRACE_LINE_SIZE];
259   __pajeSetState (line, TRACE_LINE_SIZE, pajePushStateId, time, entityType, container, value);
260   fprintf(tracing_file, "%s\n", line);
261 }
262
263 void pajePopState (double time, const char *entityType, const char *container)
264 {
265   fprintf(tracing_file, "%d %.15lf %s %s\n", pajePopStateId, time, entityType, container);
266 }
267
268 void pajeStartLink (double time, const char *entityType, const char *container, const char *value,
269     const char *sourceContainer, const char *key)
270 {
271   char line[TRACE_LINE_SIZE];
272   __pajeStartLink (line, TRACE_LINE_SIZE, pajeStartLinkId, time, entityType, container, value, sourceContainer, key);
273   fprintf (tracing_file, "%s\n", line);
274 }
275
276 void pajeStartLinkWithVolume (double time, const char *entityType, const char *container, const char *value,
277     const char *sourceContainer, const char *key, double volume)
278 {
279   char line[TRACE_LINE_SIZE];
280   __pajeStartLink (line, TRACE_LINE_SIZE, pajeStartLinkWithVolumeId, time, entityType, container, value, sourceContainer, key);
281   fprintf (tracing_file, "%s %f\n", line, volume);
282 }
283
284 void pajeEndLink (double time, const char *entityType, const char *container, const char *value,
285     const char *destContainer, const char *key)
286 {
287   fprintf(tracing_file, "%d %.15lf %s %s %s %s %s\n", pajeEndLinkId, time, entityType, container, value, destContainer, key);
288 }
289
290 void pajeDefineVariableType(const char *alias, const char *containerType, const char *name) {
291   fprintf(tracing_file, "%d %s %s %s\n", pajeDefineVariableTypeId, alias, containerType, name);
292 }
293
294 void pajeSetVariable (double time, const char *entityType, const char *container, const char *value)
295 {
296   char line[TRACE_LINE_SIZE];
297   __pajeSetVariable (line, TRACE_LINE_SIZE, pajeSetVariableId, time, entityType, container, value);
298   fprintf(tracing_file, "%s\n", line);
299 }
300
301 void pajeAddVariable (double time, const char *entityType, const char *container, const char *value)
302 {
303   char line[TRACE_LINE_SIZE];
304   __pajeSetVariable (line, TRACE_LINE_SIZE, pajeAddVariableId, time, entityType, container, value);
305   fprintf(tracing_file, "%s\n", line);
306 }
307
308 void pajeSubVariable (double time, const char *entityType, const char *container, const char *value)
309 {
310   char line[TRACE_LINE_SIZE];
311   __pajeSetVariable (line, TRACE_LINE_SIZE, pajeSubVariableId, time, entityType, container, value);
312   fprintf(tracing_file, "%s\n", line);
313 }
314
315 void pajeNewEvent (double time, const char *entityType, const char *container, const char *value)
316 {
317   fprintf(tracing_file, "%d %.15lf %s %s %s\n", pajeNewEventId, time, entityType, container, value);
318 }
319
320 #endif