449cb9d7 |
1 | /* This file is part of the Linux Trace Toolkit viewer |
2 | * Copyright (C) 2003-2004 Xiangxiu Yang |
1b44b0b5 |
3 | * 2006 Mathieu Desnoyers |
449cb9d7 |
4 | * |
1b44b0b5 |
5 | * This library is free software; you can redistribute it and/or |
6 | * modify it under the terms of the GNU Lesser General Public |
7 | * License Version 2.1 as published by the Free Software Foundation. |
449cb9d7 |
8 | * |
1b44b0b5 |
9 | * This library is distributed in the hope that it will be useful, |
449cb9d7 |
10 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
1b44b0b5 |
11 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
12 | * Lesser General Public License for more details. |
449cb9d7 |
13 | * |
1b44b0b5 |
14 | * You should have received a copy of the GNU Lesser General Public |
15 | * License along with this library; if not, write to the |
16 | * Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
17 | * Boston, MA 02111-1307, USA. |
449cb9d7 |
18 | */ |
19 | |
4e4d11b3 |
20 | #ifdef HAVE_CONFIG_H |
21 | #include <config.h> |
22 | #endif |
23 | |
6cd62ccf |
24 | #include <stdio.h> |
8d1e6362 |
25 | #include <string.h> |
26 | #include <stdlib.h> |
3aee1200 |
27 | #include <glib.h> |
8d1e6362 |
28 | |
6cd62ccf |
29 | #include <asm/types.h> |
d4214418 |
30 | #include <byteswap.h> |
a5dcde2f |
31 | |
6cd62ccf |
32 | #include "parser.h" |
a5dcde2f |
33 | #include <ltt/ltt.h> |
34 | #include "ltt-private.h" |
6cd62ccf |
35 | #include <ltt/event.h> |
a5dcde2f |
36 | #include <ltt/trace.h> |
0f7f40c1 |
37 | #include <ltt/ltt-types.h> |
6cd62ccf |
38 | |
2312de30 |
39 | |
40 | |
743e50fd |
41 | void compute_fields_offsets(LttTracefile *tf, |
dd3a6d39 |
42 | LttFacility *fac, LttField *field, off_t *offset, void *root, guint is_compact); |
2312de30 |
43 | |
44 | |
c02ea99f |
45 | LttEvent *ltt_event_new() |
46 | { |
47 | return g_new(LttEvent, 1); |
48 | } |
49 | |
50 | void ltt_event_destroy(LttEvent *event) |
51 | { |
52 | g_free(event); |
53 | } |
54 | |
55 | |
6cd62ccf |
56 | /***************************************************************************** |
57 | *Function name |
963b5f2d |
58 | * ltt_event_eventtype_id: get event type id |
59 | * (base id + position of the event) |
6cd62ccf |
60 | *Input params |
963b5f2d |
61 | * e : an instance of an event type |
6cd62ccf |
62 | *Return value |
963b5f2d |
63 | * unsigned : event type id |
6cd62ccf |
64 | ****************************************************************************/ |
65 | |
eed2ef37 |
66 | unsigned ltt_event_eventtype_id(const LttEvent *e) |
6cd62ccf |
67 | { |
68 | return (unsigned) e->event_id; |
69 | } |
70 | |
71 | /***************************************************************************** |
72 | *Function name |
73 | * ltt_event_facility : get the facility of the event |
74 | *Input params |
75 | * e : an instance of an event type |
76 | *Return value |
963b5f2d |
77 | * LttFacility * : the facility of the event |
6cd62ccf |
78 | ****************************************************************************/ |
79 | |
eed2ef37 |
80 | LttFacility *ltt_event_facility(const LttEvent *e) |
6cd62ccf |
81 | { |
963b5f2d |
82 | LttTrace * trace = e->tracefile->trace; |
27304273 |
83 | unsigned id = e->facility_id; |
84 | LttFacility *facility = ltt_trace_facility_by_id(trace,id); |
85 | |
86 | g_assert(facility->exists); |
87 | |
88 | return facility; |
6cd62ccf |
89 | } |
90 | |
eed2ef37 |
91 | /***************************************************************************** |
92 | *Function name |
93 | * ltt_event_facility_id : get the facility id of the event |
94 | *Input params |
95 | * e : an instance of an event type |
96 | *Return value |
97 | * unsigned : the facility of the event |
98 | ****************************************************************************/ |
99 | |
100 | unsigned ltt_event_facility_id(const LttEvent *e) |
101 | { |
102 | return e->facility_id; |
103 | } |
104 | |
6cd62ccf |
105 | /***************************************************************************** |
106 | *Function name |
107 | * ltt_event_eventtype : get the event type of the event |
108 | *Input params |
109 | * e : an instance of an event type |
110 | *Return value |
963b5f2d |
111 | * LttEventType * : the event type of the event |
6cd62ccf |
112 | ****************************************************************************/ |
113 | |
eed2ef37 |
114 | LttEventType *ltt_event_eventtype(const LttEvent *e) |
6cd62ccf |
115 | { |
963b5f2d |
116 | LttFacility* facility = ltt_event_facility(e); |
117 | if(!facility) return NULL; |
3aee1200 |
118 | return &g_array_index(facility->events, LttEventType, e->event_id); |
6cd62ccf |
119 | } |
120 | |
6cd62ccf |
121 | |
122 | /***************************************************************************** |
123 | *Function name |
963b5f2d |
124 | * ltt_event_time : get the time of the event |
6cd62ccf |
125 | *Input params |
126 | * e : an instance of an event type |
127 | *Return value |
963b5f2d |
128 | * LttTime : the time of the event |
6cd62ccf |
129 | ****************************************************************************/ |
130 | |
eed2ef37 |
131 | LttTime ltt_event_time(const LttEvent *e) |
6cd62ccf |
132 | { |
963b5f2d |
133 | return e->event_time; |
6cd62ccf |
134 | } |
135 | |
136 | /***************************************************************************** |
137 | *Function name |
963b5f2d |
138 | * ltt_event_time : get the cycle count of the event |
6cd62ccf |
139 | *Input params |
140 | * e : an instance of an event type |
141 | *Return value |
963b5f2d |
142 | * LttCycleCount : the cycle count of the event |
6cd62ccf |
143 | ****************************************************************************/ |
144 | |
eed2ef37 |
145 | LttCycleCount ltt_event_cycle_count(const LttEvent *e) |
6cd62ccf |
146 | { |
3aee1200 |
147 | return e->tsc; |
6cd62ccf |
148 | } |
149 | |
eed2ef37 |
150 | |
151 | |
152 | /***************************************************************************** |
153 | *Function name |
154 | * ltt_event_position_get : get the event position data |
155 | *Input params |
156 | * e : an instance of an event type |
157 | * ep : a pointer to event's position structure |
158 | * tf : tracefile pointer |
159 | * block : current block |
160 | * offset : current offset |
161 | * tsc : current tsc |
162 | ****************************************************************************/ |
163 | void ltt_event_position_get(LttEventPosition *ep, LttTracefile **tf, |
164 | guint *block, guint *offset, guint64 *tsc) |
165 | { |
166 | *tf = ep->tracefile; |
167 | *block = ep->block; |
168 | *offset = ep->offset; |
169 | *tsc = ep->tsc; |
170 | } |
171 | |
172 | |
6d0cdf22 |
173 | void ltt_event_position_set(LttEventPosition *ep, LttTracefile *tf, |
174 | guint block, guint offset, guint64 tsc) |
175 | { |
176 | ep->tracefile = tf; |
177 | ep->block = block; |
178 | ep->offset = offset; |
179 | ep->tsc = tsc; |
180 | } |
181 | |
182 | |
80da81ad |
183 | /***************************************************************************** |
184 | *Function name |
185 | * ltt_event_position : get the event's position |
186 | *Input params |
187 | * e : an instance of an event type |
188 | * ep : a pointer to event's position structure |
189 | ****************************************************************************/ |
190 | |
191 | void ltt_event_position(LttEvent *e, LttEventPosition *ep) |
192 | { |
3aee1200 |
193 | ep->tracefile = e->tracefile; |
194 | ep->block = e->block; |
195 | ep->offset = e->offset; |
196 | ep->tsc = e->tsc; |
80da81ad |
197 | } |
198 | |
a5dcde2f |
199 | LttEventPosition * ltt_event_position_new() |
200 | { |
201 | return g_new(LttEventPosition, 1); |
202 | } |
203 | |
80da81ad |
204 | |
96da5c0d |
205 | /***************************************************************************** |
206 | * Function name |
207 | * ltt_event_position_compare : compare two positions |
a00149f6 |
208 | * A NULL value is infinite. |
96da5c0d |
209 | * Input params |
210 | * ep1 : a pointer to event's position structure |
211 | * ep2 : a pointer to event's position structure |
212 | * Return |
213 | * -1 is ep1 < ep2 |
214 | * 1 if ep1 > ep2 |
215 | * 0 if ep1 == ep2 |
216 | ****************************************************************************/ |
217 | |
218 | |
219 | gint ltt_event_position_compare(const LttEventPosition *ep1, |
220 | const LttEventPosition *ep2) |
221 | { |
a00149f6 |
222 | if(ep1 == NULL && ep2 == NULL) |
223 | return 0; |
224 | if(ep1 != NULL && ep2 == NULL) |
225 | return -1; |
226 | if(ep1 == NULL && ep2 != NULL) |
227 | return 1; |
96da5c0d |
228 | |
3aee1200 |
229 | if(ep1->tracefile != ep2->tracefile) |
230 | g_error("ltt_event_position_compare on different tracefiles makes no sense"); |
231 | |
232 | if(ep1->block < ep2->block) |
96da5c0d |
233 | return -1; |
3aee1200 |
234 | if(ep1->block > ep2->block) |
96da5c0d |
235 | return 1; |
3aee1200 |
236 | if(ep1->offset < ep2->offset) |
96da5c0d |
237 | return -1; |
3aee1200 |
238 | if(ep1->offset > ep2->offset) |
96da5c0d |
239 | return 1; |
240 | return 0; |
241 | } |
242 | |
2a74fbf4 |
243 | /***************************************************************************** |
244 | * Function name |
245 | * ltt_event_position_copy : copy position |
246 | * Input params |
247 | * src : a pointer to event's position structure source |
248 | * dest : a pointer to event's position structure dest |
249 | * Return |
250 | * void |
251 | ****************************************************************************/ |
252 | void ltt_event_position_copy(LttEventPosition *dest, |
253 | const LttEventPosition *src) |
254 | { |
a00149f6 |
255 | if(src == NULL) |
256 | dest = NULL; |
257 | else |
258 | *dest = *src; |
2a74fbf4 |
259 | } |
96da5c0d |
260 | |
261 | |
27304273 |
262 | |
263 | LttTracefile *ltt_event_position_tracefile(LttEventPosition *ep) |
264 | { |
265 | return ep->tracefile; |
266 | } |
267 | |
6cd62ccf |
268 | /***************************************************************************** |
269 | *Function name |
963b5f2d |
270 | * ltt_event_cpu_i: get the cpu id where the event happens |
6cd62ccf |
271 | *Input params |
272 | * e : an instance of an event type |
273 | *Return value |
963b5f2d |
274 | * unsigned : the cpu id |
6cd62ccf |
275 | ****************************************************************************/ |
276 | |
963b5f2d |
277 | unsigned ltt_event_cpu_id(LttEvent *e) |
3aee1200 |
278 | { |
279 | return e->tracefile->cpu_num; |
6cd62ccf |
280 | } |
281 | |
282 | /***************************************************************************** |
283 | *Function name |
284 | * ltt_event_data : get the raw data for the event |
285 | *Input params |
286 | * e : an instance of an event type |
287 | *Return value |
288 | * void * : pointer to the raw data for the event |
289 | ****************************************************************************/ |
290 | |
963b5f2d |
291 | void *ltt_event_data(LttEvent *e) |
6cd62ccf |
292 | { |
293 | return e->data; |
294 | } |
295 | |
296 | /***************************************************************************** |
297 | *Function name |
298 | * ltt_event_field_element_number |
299 | * : The number of elements in a sequence field is specific |
300 | * to each event. This function returns the number of |
301 | * elements for an array or sequence field in an event. |
302 | *Input params |
908f42fa |
303 | * e : an instance of an event type |
6cd62ccf |
304 | * f : a field of the instance |
305 | *Return value |
306 | * unsigned : the number of elements for an array/sequence field |
307 | ****************************************************************************/ |
3aee1200 |
308 | guint64 ltt_event_field_element_number(LttEvent *e, LttField *f) |
6cd62ccf |
309 | { |
2312de30 |
310 | if(f->field_type.type_class != LTT_ARRAY && |
311 | f->field_type.type_class != LTT_SEQUENCE) |
6cd62ccf |
312 | return 0; |
908f42fa |
313 | |
2312de30 |
314 | if(f->field_type.type_class == LTT_ARRAY) |
315 | return f->field_type.size; |
316 | return ltt_event_get_long_unsigned(e, &g_array_index(f->field_type.fields, |
317 | LttField, 0)); |
6cd62ccf |
318 | } |
319 | |
320 | /***************************************************************************** |
321 | *Function name |
322 | * ltt_event_field_element_select |
323 | * : Set the currently selected element for a sequence or |
324 | * array field |
f104d082 |
325 | * O(1) because of offset array. |
6cd62ccf |
326 | *Input params |
908f42fa |
327 | * e : an instance of an event type |
6cd62ccf |
328 | * f : a field of the instance |
3aee1200 |
329 | * i : the ith element (0, ...) |
f104d082 |
330 | *returns : the child field, at the right index, updated. |
6cd62ccf |
331 | ****************************************************************************/ |
f104d082 |
332 | LttField *ltt_event_field_element_select(LttEvent *e, LttField *f, gulong i) |
6cd62ccf |
333 | { |
f104d082 |
334 | gulong element_number; |
3aee1200 |
335 | LttField *field; |
8d1e6362 |
336 | unsigned int k; |
3aee1200 |
337 | size_t size; |
338 | LttEventType *event_type; |
f104d082 |
339 | off_t new_offset; |
908f42fa |
340 | |
2312de30 |
341 | if(f->field_type.type_class != LTT_ARRAY && |
342 | f->field_type.type_class != LTT_SEQUENCE) |
743e50fd |
343 | return NULL; |
908f42fa |
344 | |
345 | element_number = ltt_event_field_element_number(e,f); |
3aee1200 |
346 | event_type = ltt_event_eventtype(e); |
347 | /* Sanity check for i : 0..n-1 only, and must be lower or equal element_number |
8d1e6362 |
348 | */ |
743e50fd |
349 | if(i >= element_number) return NULL; |
f104d082 |
350 | |
2312de30 |
351 | if(f->field_type.type_class == LTT_ARRAY) { |
352 | field = &g_array_index(f->field_type.fields, LttField, 0); |
f104d082 |
353 | } else { |
2312de30 |
354 | field = &g_array_index(f->field_type.fields, LttField, 1); |
f104d082 |
355 | } |
3aee1200 |
356 | |
f104d082 |
357 | if(field->field_size != 0) { |
358 | if(f->array_offset + (i * field->field_size) == field->offset_root) |
743e50fd |
359 | return field; /* fixed length child, already at the right offset */ |
f104d082 |
360 | else |
361 | new_offset = f->array_offset + (i * field->field_size); |
3aee1200 |
362 | } else { |
f104d082 |
363 | /* Var. len. child */ |
364 | new_offset = g_array_index(f->dynamic_offsets, off_t, i); |
908f42fa |
365 | } |
743e50fd |
366 | compute_fields_offsets(e->tracefile, |
dd3a6d39 |
367 | ltt_event_facility(e), field, &new_offset, e->data, 0); |
f104d082 |
368 | |
369 | return field; |
6cd62ccf |
370 | } |
371 | |
f2923fb2 |
372 | |
373 | off_t ltt_event_field_offset(LttEvent *e, LttField *f) |
374 | { |
375 | return f->offset_root; |
376 | } |
377 | |
378 | |
379 | |
6cd62ccf |
380 | /***************************************************************************** |
381 | * These functions extract data from an event after architecture specific |
382 | * conversions |
383 | ****************************************************************************/ |
63c35f6c |
384 | guint32 ltt_event_get_unsigned(LttEvent *e, LttField *f) |
6cd62ccf |
385 | { |
f0b795e0 |
386 | gboolean reverse_byte_order; |
c1161b10 |
387 | if(unlikely(f->field_type.network)) { |
388 | reverse_byte_order = (g_ntohs(0x1) != 0x1); |
389 | } else { |
390 | reverse_byte_order = LTT_GET_BO(e->tracefile); |
391 | } |
f0b795e0 |
392 | |
64714253 |
393 | switch(f->field_size) { |
394 | case 1: |
395 | { |
396 | guint8 x = *(guint8 *)(e->data + f->offset_root); |
397 | return (guint32) x; |
398 | } |
399 | break; |
400 | case 2: |
0f7f40c1 |
401 | return (guint32)ltt_get_uint16(reverse_byte_order, e->data + f->offset_root); |
64714253 |
402 | break; |
403 | case 4: |
0f7f40c1 |
404 | return (guint32)ltt_get_uint32(reverse_byte_order, e->data + f->offset_root); |
64714253 |
405 | break; |
406 | case 8: |
407 | default: |
408 | g_critical("ltt_event_get_unsigned : field size %i unknown", f->field_size); |
409 | return 0; |
410 | break; |
63c35f6c |
411 | } |
6cd62ccf |
412 | } |
413 | |
63c35f6c |
414 | gint32 ltt_event_get_int(LttEvent *e, LttField *f) |
6cd62ccf |
415 | { |
f0b795e0 |
416 | gboolean reverse_byte_order; |
c1161b10 |
417 | if(unlikely(f->field_type.network)) { |
418 | reverse_byte_order = (g_ntohs(0x1) != 0x1); |
419 | } else { |
420 | reverse_byte_order = LTT_GET_BO(e->tracefile); |
421 | } |
f0b795e0 |
422 | |
64714253 |
423 | switch(f->field_size) { |
424 | case 1: |
425 | { |
426 | gint8 x = *(gint8 *)(e->data + f->offset_root); |
427 | return (gint32) x; |
428 | } |
429 | break; |
430 | case 2: |
0f7f40c1 |
431 | return (gint32)ltt_get_int16(reverse_byte_order, e->data + f->offset_root); |
64714253 |
432 | break; |
433 | case 4: |
0f7f40c1 |
434 | return (gint32)ltt_get_int32(reverse_byte_order, e->data + f->offset_root); |
64714253 |
435 | break; |
436 | case 8: |
437 | default: |
438 | g_critical("ltt_event_get_int : field size %i unknown", f->field_size); |
439 | return 0; |
440 | break; |
63c35f6c |
441 | } |
6cd62ccf |
442 | } |
443 | |
63c35f6c |
444 | guint64 ltt_event_get_long_unsigned(LttEvent *e, LttField *f) |
6cd62ccf |
445 | { |
c1161b10 |
446 | gboolean reverse_byte_order; |
447 | if(unlikely(f->field_type.network)) { |
448 | reverse_byte_order = (g_ntohs(0x1) != 0x1); |
449 | } else { |
450 | reverse_byte_order = LTT_GET_BO(e->tracefile); |
451 | } |
64714253 |
452 | |
453 | switch(f->field_size) { |
454 | case 1: |
455 | { |
456 | guint8 x = *(guint8 *)(e->data + f->offset_root); |
457 | return (guint64) x; |
458 | } |
459 | break; |
460 | case 2: |
0f7f40c1 |
461 | return (guint64)ltt_get_uint16(reverse_byte_order, e->data + f->offset_root); |
64714253 |
462 | break; |
463 | case 4: |
0f7f40c1 |
464 | return (guint64)ltt_get_uint32(reverse_byte_order, e->data + f->offset_root); |
64714253 |
465 | break; |
466 | case 8: |
0f7f40c1 |
467 | return ltt_get_uint64(reverse_byte_order, e->data + f->offset_root); |
64714253 |
468 | break; |
469 | default: |
470 | g_critical("ltt_event_get_long_unsigned : field size %i unknown", f->field_size); |
471 | return 0; |
472 | break; |
6cd62ccf |
473 | } |
474 | } |
475 | |
63c35f6c |
476 | gint64 ltt_event_get_long_int(LttEvent *e, LttField *f) |
6cd62ccf |
477 | { |
c1161b10 |
478 | gboolean reverse_byte_order; |
479 | if(unlikely(f->field_type.network)) { |
480 | reverse_byte_order = (g_ntohs(0x1) != 0x1); |
481 | } else { |
482 | reverse_byte_order = LTT_GET_BO(e->tracefile); |
483 | } |
64714253 |
484 | |
485 | switch(f->field_size) { |
486 | case 1: |
487 | { |
488 | gint8 x = *(gint8 *)(e->data + f->offset_root); |
489 | return (gint64) x; |
490 | } |
491 | break; |
492 | case 2: |
0f7f40c1 |
493 | return (gint64)ltt_get_int16(reverse_byte_order, e->data + f->offset_root); |
64714253 |
494 | break; |
495 | case 4: |
0f7f40c1 |
496 | return (gint64)ltt_get_int32(reverse_byte_order, e->data + f->offset_root); |
64714253 |
497 | break; |
498 | case 8: |
0f7f40c1 |
499 | return ltt_get_int64(reverse_byte_order, e->data + f->offset_root); |
64714253 |
500 | break; |
501 | default: |
502 | g_critical("ltt_event_get_long_int : field size %i unknown", f->field_size); |
503 | return 0; |
504 | break; |
6cd62ccf |
505 | } |
506 | } |
507 | |
963b5f2d |
508 | float ltt_event_get_float(LttEvent *e, LttField *f) |
6cd62ccf |
509 | { |
c1161b10 |
510 | gboolean reverse_byte_order; |
511 | if(unlikely(f->field_type.network)) { |
512 | reverse_byte_order = (g_ntohs(0x1) != 0x1); |
513 | } else { |
514 | g_assert(LTT_HAS_FLOAT(e->tracefile)); |
515 | reverse_byte_order = LTT_GET_FLOAT_BO(e->tracefile); |
516 | } |
6cd62ccf |
517 | |
2312de30 |
518 | g_assert(f->field_type.type_class == LTT_FLOAT && f->field_size == 4); |
6cd62ccf |
519 | |
0f7f40c1 |
520 | if(reverse_byte_order == 0) return *(float *)(e->data + f->offset_root); |
6cd62ccf |
521 | else{ |
d4214418 |
522 | void *ptr = e->data + f->offset_root; |
fadf7e8b |
523 | guint32 value = bswap_32(*(guint32*)ptr); |
524 | return *(float*)&value; |
6cd62ccf |
525 | } |
526 | } |
527 | |
963b5f2d |
528 | double ltt_event_get_double(LttEvent *e, LttField *f) |
6cd62ccf |
529 | { |
c1161b10 |
530 | gboolean reverse_byte_order; |
531 | if(unlikely(f->field_type.network)) { |
532 | reverse_byte_order = (g_ntohs(0x1) != 0x1); |
533 | } else { |
534 | g_assert(LTT_HAS_FLOAT(e->tracefile)); |
535 | reverse_byte_order = LTT_GET_FLOAT_BO(e->tracefile); |
536 | } |
6cd62ccf |
537 | |
2312de30 |
538 | if(f->field_size == 4) |
539 | return ltt_event_get_float(e, f); |
540 | |
541 | g_assert(f->field_type.type_class == LTT_FLOAT && f->field_size == 8); |
6cd62ccf |
542 | |
0f7f40c1 |
543 | if(reverse_byte_order == 0) return *(double *)(e->data + f->offset_root); |
3b10b765 |
544 | else { |
d4214418 |
545 | void *ptr = e->data + f->offset_root; |
fadf7e8b |
546 | guint64 value = bswap_64(*(guint64*)ptr); |
547 | return *(double*)&value; |
6cd62ccf |
548 | } |
549 | } |
550 | |
551 | /***************************************************************************** |
552 | * The string obtained is only valid until the next read from |
908f42fa |
553 | * the same tracefile. |
6cd62ccf |
554 | ****************************************************************************/ |
963b5f2d |
555 | char *ltt_event_get_string(LttEvent *e, LttField *f) |
6cd62ccf |
556 | { |
2312de30 |
557 | g_assert(f->field_type.type_class == LTT_STRING); |
2a74fbf4 |
558 | |
45e14832 |
559 | return (gchar*)g_strdup((gchar*)(e->data + f->offset_root)); |
6cd62ccf |
560 | } |
eed2ef37 |
561 | |
f104d082 |
562 | /***************************************************************************** |
563 | *Function name |
564 | * compute_fields_offsets : set the precomputable offset of the fields |
565 | *Input params |
743e50fd |
566 | * fac : facility |
f104d082 |
567 | * field : the field |
568 | * offset : pointer to the current offset, must be incremented |
569 | ****************************************************************************/ |
570 | |
571 | |
743e50fd |
572 | void compute_fields_offsets(LttTracefile *tf, |
dd3a6d39 |
573 | LttFacility *fac, LttField *field, off_t *offset, void *root, guint is_compact) |
f104d082 |
574 | { |
2312de30 |
575 | LttType *type = &field->field_type; |
f104d082 |
576 | |
dd3a6d39 |
577 | if(unlikely(is_compact)) { |
578 | g_assert(field->field_size != 0); |
579 | /* FIXME THIS IS A HUUUUUGE hack : |
580 | * offset is between the compact_data field in struct LttEvent |
581 | * and the address of the field root in the memory map. |
582 | * ark. Both will stay at the same addresses while the event |
583 | * is readable, so it's ok. |
584 | */ |
585 | field->offset_root = (unsigned long)(&tf->event.compact_data) |
586 | - (unsigned long)root; |
587 | field->fixed_root = FIELD_FIXED; |
588 | return; |
589 | } |
590 | |
f104d082 |
591 | switch(type->type_class) { |
592 | case LTT_INT_FIXED: |
593 | case LTT_UINT_FIXED: |
594 | case LTT_POINTER: |
595 | case LTT_CHAR: |
596 | case LTT_UCHAR: |
597 | case LTT_SHORT: |
598 | case LTT_USHORT: |
599 | case LTT_INT: |
600 | case LTT_UINT: |
601 | case LTT_LONG: |
602 | case LTT_ULONG: |
603 | case LTT_SIZE_T: |
604 | case LTT_SSIZE_T: |
605 | case LTT_OFF_T: |
606 | case LTT_FLOAT: |
607 | case LTT_ENUM: |
608 | if(field->fixed_root == FIELD_VARIABLE) { |
609 | /* Align offset on type size */ |
743e50fd |
610 | *offset += ltt_align(*offset, get_alignment(field), |
611 | fac->alignment); |
f104d082 |
612 | /* remember offset */ |
613 | field->offset_root = *offset; |
614 | /* Increment offset */ |
615 | *offset += field->field_size; |
743e50fd |
616 | } else { |
617 | //g_debug("type before offset : %llu %llu %u\n", *offset, |
618 | // field->offset_root, |
619 | // field->field_size); |
620 | *offset = field->offset_root; |
621 | *offset += field->field_size; |
622 | //g_debug("type after offset : %llu\n", *offset); |
f104d082 |
623 | } |
f104d082 |
624 | break; |
625 | case LTT_STRING: |
626 | if(field->fixed_root == FIELD_VARIABLE) { |
627 | field->offset_root = *offset; |
628 | } |
629 | *offset += strlen((gchar*)(root+*offset)) + 1; |
743e50fd |
630 | /* Realign the data */ |
631 | *offset += ltt_align(*offset, fac->pointer_size, |
632 | fac->alignment); |
f104d082 |
633 | break; |
634 | case LTT_ARRAY: |
635 | g_assert(type->fields->len == 1); |
636 | { |
637 | off_t local_offset; |
638 | LttField *child = &g_array_index(type->fields, LttField, 0); |
639 | if(field->fixed_root == FIELD_VARIABLE) { |
743e50fd |
640 | *offset += ltt_align(*offset, get_alignment(field), |
641 | fac->alignment); |
f104d082 |
642 | /* remember offset */ |
643 | field->offset_root = *offset; |
644 | field->array_offset = *offset; |
645 | } |
646 | |
647 | if(field->field_size != 0) { |
648 | /* Increment offset */ |
649 | /* field_size is the array size in bytes */ |
650 | *offset = field->offset_root + field->field_size; |
651 | } else { |
652 | guint i; |
653 | *offset = field->array_offset; |
654 | field->dynamic_offsets = g_array_set_size(field->dynamic_offsets, |
655 | 0); |
656 | for(i=0; i<type->size; i++) { |
657 | g_array_append_val(field->dynamic_offsets, *offset); |
dd3a6d39 |
658 | compute_fields_offsets(tf, fac, child, offset, root, is_compact); |
f104d082 |
659 | } |
660 | } |
661 | // local_offset = field->array_offset; |
662 | // /* Set the offset at position 0 */ |
743e50fd |
663 | // compute_fields_offsets(tf, fac, child, &local_offset, root); |
2312de30 |
664 | } |
665 | break; |
f104d082 |
666 | case LTT_SEQUENCE: |
667 | g_assert(type->fields->len == 2); |
668 | { |
669 | off_t local_offset; |
670 | LttField *child; |
671 | guint i; |
743e50fd |
672 | guint num_elem; |
f104d082 |
673 | if(field->fixed_root == FIELD_VARIABLE) { |
743e50fd |
674 | *offset += ltt_align(*offset, get_alignment(field), |
675 | fac->alignment); |
f104d082 |
676 | /* remember offset */ |
677 | field->offset_root = *offset; |
678 | |
679 | child = &g_array_index(type->fields, LttField, 0); |
dd3a6d39 |
680 | compute_fields_offsets(tf, fac, child, offset, root, is_compact); |
f104d082 |
681 | child = &g_array_index(type->fields, LttField, 1); |
743e50fd |
682 | *offset += ltt_align(*offset, get_alignment(child), |
683 | fac->alignment); |
f104d082 |
684 | field->array_offset = *offset; |
685 | |
686 | } else { |
687 | child = &g_array_index(type->fields, LttField, 1); |
688 | } |
689 | *offset = field->array_offset; |
690 | field->dynamic_offsets = g_array_set_size(field->dynamic_offsets, |
691 | 0); |
743e50fd |
692 | num_elem = ltt_event_field_element_number(&tf->event, field); |
693 | for(i=0; i<num_elem; i++) { |
f104d082 |
694 | g_array_append_val(field->dynamic_offsets, *offset); |
dd3a6d39 |
695 | compute_fields_offsets(tf, fac, child, offset, root, is_compact); |
f104d082 |
696 | } |
743e50fd |
697 | g_assert(num_elem == field->dynamic_offsets->len); |
698 | |
699 | /* Realign the data */ |
700 | *offset += ltt_align(*offset, fac->pointer_size, |
701 | fac->alignment); |
702 | |
f104d082 |
703 | // local_offset = field->array_offset; |
704 | // /* Set the offset at position 0 */ |
743e50fd |
705 | // compute_fields_offsets(tf, fac, child, &local_offset, root); |
f104d082 |
706 | } |
707 | break; |
708 | case LTT_STRUCT: |
709 | { |
710 | LttField *child; |
711 | guint i; |
712 | gint ret=0; |
713 | if(field->fixed_root == FIELD_VARIABLE) { |
83e160f2 |
714 | *offset += ltt_align(*offset, get_alignment(field), |
743e50fd |
715 | fac->alignment); |
f104d082 |
716 | /* remember offset */ |
717 | field->offset_root = *offset; |
718 | } else { |
719 | *offset = field->offset_root; |
720 | } |
721 | for(i=0; i<type->fields->len; i++) { |
722 | child = &g_array_index(type->fields, LttField, i); |
dd3a6d39 |
723 | compute_fields_offsets(tf, fac, child, offset, root, is_compact); |
f104d082 |
724 | } |
725 | } |
726 | break; |
727 | case LTT_UNION: |
728 | { |
729 | LttField *child; |
730 | guint i; |
731 | gint ret=0; |
732 | if(field->fixed_root == FIELD_VARIABLE) { |
743e50fd |
733 | *offset += ltt_align(*offset, get_alignment(field), |
734 | fac->alignment); |
f104d082 |
735 | /* remember offset */ |
736 | field->offset_root = *offset; |
737 | } |
738 | for(i=0; i<type->fields->len; i++) { |
739 | *offset = field->offset_root; |
740 | child = &g_array_index(type->fields, LttField, i); |
dd3a6d39 |
741 | compute_fields_offsets(tf, fac, child, offset, root, is_compact); |
f104d082 |
742 | } |
743 | *offset = field->offset_root + field->field_size; |
744 | } |
745 | break; |
746 | case LTT_NONE: |
747 | default: |
748 | g_error("compute_fields_offsets : unknown type"); |
749 | } |
750 | |
751 | } |
eed2ef37 |
752 | |
753 | |
f104d082 |
754 | /***************************************************************************** |
755 | *Function name |
756 | * compute_offsets : set the dynamically computable offsets of an event type |
757 | *Input params |
758 | * tf : tracefile |
759 | * event : event type |
760 | * |
761 | ****************************************************************************/ |
743e50fd |
762 | void compute_offsets(LttTracefile *tf, LttFacility *fac, |
763 | LttEventType *event, off_t *offset, void *root) |
f104d082 |
764 | { |
765 | guint i; |
f104d082 |
766 | |
767 | /* compute all variable offsets */ |
768 | for(i=0; i<event->fields->len; i++) { |
743e50fd |
769 | //g_debug("computing offset %u of %u\n", i, event->fields->len-1); |
f104d082 |
770 | LttField *field = &g_array_index(event->fields, LttField, i); |
dd3a6d39 |
771 | if(event->has_compact_data && i == 0) |
772 | compute_fields_offsets(tf, fac, field, offset, root, 1); |
773 | else |
774 | compute_fields_offsets(tf, fac, field, offset, root, 0); |
f104d082 |
775 | } |
776 | |
777 | } |
778 | |