trying to introduce cumulative time
[lttv.git] / ltt / branches / poly / lttv / lttv / stats.c
CommitLineData
9c312311 1/* This file is part of the Linux Trace Toolkit viewer
2 * Copyright (C) 2003-2004 Michel Dagenais
3 *
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License Version 2 as
6 * published by the Free Software Foundation;
7 *
8 * This program is distributed in the hope that it will be useful,
9 * but WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 * GNU General Public License for more details.
12 *
13 * You should have received a copy of the GNU General Public License
14 * along with this program; if not, write to the Free Software
15 * Foundation, Inc., 59 Temple Place - Suite 330, Boston,
16 * MA 02111-1307, USA.
17 */
18
4e4d11b3 19#ifdef HAVE_CONFIG_H
20#include <config.h>
21#endif
b445142a 22
9f797243 23#include <stdio.h>
08b1c66e 24#include <lttv/module.h>
b445142a 25#include <lttv/stats.h>
2a2fa4f0 26#include <lttv/lttv.h>
f95bc830 27#include <lttv/attribute.h>
b445142a 28#include <ltt/facility.h>
29#include <ltt/trace.h>
30#include <ltt/event.h>
826f1ab2 31#include <ltt/type.h>
b445142a 32
9f797243 33#define BUF_SIZE 256
14236daa 34#define MAX_64_HEX_STRING_LEN 19
9f797243 35
b445142a 36GQuark
37 LTTV_STATS_PROCESS_UNKNOWN,
38 LTTV_STATS_PROCESSES,
39 LTTV_STATS_CPU,
40 LTTV_STATS_MODE_TYPES,
41 LTTV_STATS_MODES,
42 LTTV_STATS_SUBMODES,
302efbad 43 LTTV_STATS_FUNCTIONS,
b445142a 44 LTTV_STATS_EVENT_TYPES,
45 LTTV_STATS_CPU_TIME,
b49e54b4 46 LTTV_STATS_CUMULATIVE_CPU_TIME,
b445142a 47 LTTV_STATS_ELAPSED_TIME,
48 LTTV_STATS_EVENTS,
f95bc830 49 LTTV_STATS_EVENTS_COUNT,
50 LTTV_STATS_USE_COUNT,
51 LTTV_STATS,
52 LTTV_STATS_TRACEFILES,
22b165e9 53 LTTV_STATS_SUMMED,
b445142a 54 LTTV_STATS_BEFORE_HOOKS,
55 LTTV_STATS_AFTER_HOOKS;
56
b445142a 57static void
c0cb4d12 58find_event_tree(LttvTracefileStats *tfcs, GQuark pid_time, guint cpu,
14236daa 59 guint64 function,
b445142a 60 GQuark mode, GQuark sub_mode, LttvAttribute **events_tree,
61 LttvAttribute **event_types_tree);
62
d730b5c8 63
64static void lttv_stats_init(LttvTracesetStats *self)
b445142a 65{
dbb7bb09 66 guint i, j, nb_trace, nb_tracefile;
b445142a 67
68 LttvTraceContext *tc;
69
70 LttvTraceStats *tcs;
71
72 LttvTracefileContext *tfc;
73
3c9bb8b1 74 LttvTracefileContext **tfs;
b445142a 75 LttvTracefileStats *tfcs;
76
77 LttTime timestamp = {0,0};
78
f95bc830 79 LttvAttributeValue v;
80
81 LttvAttribute
82 *stats_tree,
83 *tracefiles_stats;
84
d730b5c8 85 LttvTraceset *ts = self->parent.parent.ts;
b445142a 86
d3e01c7a 87 self->stats = lttv_attribute_find_subdir(
88 lttv_traceset_attribute(self->parent.parent.ts),
89 LTTV_STATS);
90 lttv_attribute_find(lttv_traceset_attribute(self->parent.parent.ts),
91 LTTV_STATS_USE_COUNT,
92 LTTV_UINT, &v);
f95bc830 93
0bd2f89c 94 (*(v.v_uint))++;
f95bc830 95 if(*(v.v_uint) == 1) {
96 g_assert(lttv_attribute_get_number(self->stats) == 0);
97 }
98
b445142a 99 nb_trace = lttv_traceset_number(ts);
100
101 for(i = 0 ; i < nb_trace ; i++) {
021eeb41 102 tc = self->parent.parent.traces[i];
103 tcs = LTTV_TRACE_STATS(tc);
f95bc830 104
105 tcs->stats = lttv_attribute_find_subdir(tcs->parent.parent.t_a,LTTV_STATS);
106 tracefiles_stats = lttv_attribute_find_subdir(tcs->parent.parent.t_a,
107 LTTV_STATS_TRACEFILES);
108 lttv_attribute_find(tcs->parent.parent.t_a, LTTV_STATS_USE_COUNT,
109 LTTV_UINT, &v);
110
0bd2f89c 111 (*(v.v_uint))++;
f95bc830 112 if(*(v.v_uint) == 1) {
113 g_assert(lttv_attribute_get_number(tcs->stats) == 0);
114 }
b445142a 115
eed2ef37 116 nb_tracefile = tc->tracefiles->len;
b445142a 117
dbb7bb09 118 for(j = 0 ; j < nb_tracefile ; j++) {
3c9bb8b1 119 tfs = &g_array_index(tc->tracefiles,
120 LttvTracefileContext*, j);
121 tfcs = LTTV_TRACEFILE_STATS(*tfs);
f95bc830 122 tfcs->stats = lttv_attribute_find_subdir(tracefiles_stats,
348c6ba8 123 ltt_tracefile_long_name(tfcs->parent.parent.tf));
c0cb4d12 124 guint cpu = tfcs->parent.cpu;
b445142a 125 find_event_tree(tfcs, LTTV_STATS_PROCESS_UNKNOWN,
c0cb4d12 126 cpu,
14236daa 127 0x0ULL,
348c6ba8 128 LTTV_STATE_MODE_UNKNOWN,
b445142a 129 LTTV_STATE_SUBMODE_UNKNOWN, &tfcs->current_events_tree,
130 &tfcs->current_event_types_tree);
131 }
132 }
d730b5c8 133
b445142a 134}
135
d730b5c8 136static void lttv_stats_fini(LttvTracesetStats *self)
b445142a 137{
138 guint i, j, nb_trace, nb_tracefile;
139
140 LttvTraceset *ts;
141
142 LttvTraceContext *tc;
143
144 LttvTraceStats *tcs;
145
146 LttvTracefileContext *tfc;
147
148 LttvTracefileStats *tfcs;
149
150 LttTime timestamp = {0,0};
151
f95bc830 152 LttvAttributeValue v;
153
154 LttvAttribute *tracefiles_stats;
155
156 lttv_attribute_find(self->parent.parent.ts_a, LTTV_STATS_USE_COUNT,
157 LTTV_UINT, &v);
0bd2f89c 158 (*(v.v_uint))--;
f95bc830 159
160 if(*(v.v_uint) == 0) {
161 lttv_attribute_remove_by_name(self->parent.parent.ts_a, LTTV_STATS);
f95bc830 162 }
163 self->stats = NULL;
164
b445142a 165 ts = self->parent.parent.ts;
166 nb_trace = lttv_traceset_number(ts);
167
168 for(i = 0 ; i < nb_trace ; i++) {
f95bc830 169 tcs = (LttvTraceStats *)(tc = (LTTV_TRACESET_CONTEXT(self)->traces[i]));
170
171 lttv_attribute_find(tcs->parent.parent.t_a, LTTV_STATS_USE_COUNT,
172 LTTV_UINT, &v);
0bd2f89c 173 (*(v.v_uint))--;
f95bc830 174
175 if(*(v.v_uint) == 0) {
176 lttv_attribute_remove_by_name(tcs->parent.parent.t_a,LTTV_STATS);
f95bc830 177 tracefiles_stats = lttv_attribute_find_subdir(tcs->parent.parent.t_a,
178 LTTV_STATS_TRACEFILES);
179 lttv_attribute_remove_by_name(tcs->parent.parent.t_a,
180 LTTV_STATS_TRACEFILES);
f95bc830 181 }
182 tcs->stats = NULL;
b445142a 183
eed2ef37 184 nb_tracefile = tc->tracefiles->len;
b445142a 185
b445142a 186 for(j = 0 ; j < nb_tracefile ; j++) {
cb03932a 187 tfc = g_array_index(tc->tracefiles,
188 LttvTracefileContext*, j);
359b2948 189 tfcs = (LttvTracefileStats *)tfc;
f95bc830 190 tfcs->stats = NULL;
b445142a 191 tfcs->current_events_tree = NULL;
192 tfcs->current_event_types_tree = NULL;
193 }
194 }
d730b5c8 195}
196
197
198void lttv_stats_reset(LttvTracesetStats *self)
199{
200 lttv_stats_fini(self);
201 lttv_stats_init(self);
202}
203
204
205
206static void
207init(LttvTracesetStats *self, LttvTraceset *ts)
208{
209 LTTV_TRACESET_CONTEXT_CLASS(g_type_class_peek(LTTV_TRACESET_STATE_TYPE))->
210 init((LttvTracesetContext *)self, ts);
211
212 lttv_stats_init(self);
213}
214
215
216static void
217fini(LttvTracesetStats *self)
218{
219 lttv_stats_fini(self);
220
b445142a 221 LTTV_TRACESET_CONTEXT_CLASS(g_type_class_peek(LTTV_TRACESET_STATE_TYPE))->
222 fini((LttvTracesetContext *)self);
223}
224
225
226static LttvTracesetContext *
227new_traceset_context(LttvTracesetContext *self)
228{
229 return LTTV_TRACESET_CONTEXT(g_object_new(LTTV_TRACESET_STATS_TYPE, NULL));
230}
231
232
233static LttvTraceContext *
234new_trace_context(LttvTracesetContext *self)
235{
236 return LTTV_TRACE_CONTEXT(g_object_new(LTTV_TRACE_STATS_TYPE, NULL));
237}
238
239
240static LttvTracefileContext *
241new_tracefile_context(LttvTracesetContext *self)
242{
243 return LTTV_TRACEFILE_CONTEXT(g_object_new(LTTV_TRACEFILE_STATS_TYPE, NULL));
244}
245
246
247static void
248traceset_stats_instance_init (GTypeInstance *instance, gpointer g_class)
249{
250}
251
252
253static void
254traceset_stats_finalize (LttvTracesetStats *self)
255{
256 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACESET_STATE_TYPE))->
257 finalize(G_OBJECT(self));
258}
259
260
261static void
262traceset_stats_class_init (LttvTracesetContextClass *klass)
263{
264 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
265
266 gobject_class->finalize = (void (*)(GObject *self)) traceset_stats_finalize;
267 klass->init = (void (*)(LttvTracesetContext *self, LttvTraceset *ts))init;
268 klass->fini = (void (*)(LttvTracesetContext *self))fini;
269 klass->new_traceset_context = new_traceset_context;
270 klass->new_trace_context = new_trace_context;
271 klass->new_tracefile_context = new_tracefile_context;
272}
273
274
275GType
276lttv_traceset_stats_get_type(void)
277{
278 static GType type = 0;
279 if (type == 0) {
280 static const GTypeInfo info = {
281 sizeof (LttvTracesetStatsClass),
282 NULL, /* base_init */
283 NULL, /* base_finalize */
284 (GClassInitFunc) traceset_stats_class_init, /* class_init */
285 NULL, /* class_finalize */
286 NULL, /* class_data */
dbb7bb09 287 sizeof (LttvTracesetStats),
b445142a 288 0, /* n_preallocs */
00e74b69 289 (GInstanceInitFunc) traceset_stats_instance_init, /* instance_init */
290 NULL /* Value handling */
b445142a 291 };
292
00e74b69 293 type = g_type_register_static (LTTV_TRACESET_STATE_TYPE,
294 "LttvTracesetStatsType",
295 &info, 0);
b445142a 296 }
297 return type;
298}
299
300
301static void
302trace_stats_instance_init (GTypeInstance *instance, gpointer g_class)
303{
304}
305
306
307static void
308trace_stats_finalize (LttvTraceStats *self)
309{
310 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACE_STATE_TYPE))->
311 finalize(G_OBJECT(self));
312}
313
314
315static void
316trace_stats_class_init (LttvTraceContextClass *klass)
317{
318 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
319
320 gobject_class->finalize = (void (*)(GObject *self)) trace_stats_finalize;
321}
322
323
324GType
325lttv_trace_stats_get_type(void)
326{
327 static GType type = 0;
328 if (type == 0) {
329 static const GTypeInfo info = {
330 sizeof (LttvTraceStatsClass),
331 NULL, /* base_init */
332 NULL, /* base_finalize */
333 (GClassInitFunc) trace_stats_class_init, /* class_init */
334 NULL, /* class_finalize */
335 NULL, /* class_data */
336 sizeof (LttvTraceStats),
337 0, /* n_preallocs */
00e74b69 338 (GInstanceInitFunc) trace_stats_instance_init, /* instance_init */
339 NULL /* Value handling */
b445142a 340 };
341
342 type = g_type_register_static (LTTV_TRACE_STATE_TYPE,
343 "LttvTraceStatsType", &info, 0);
344 }
345 return type;
346}
347
348
349static void
350tracefile_stats_instance_init (GTypeInstance *instance, gpointer g_class)
351{
352}
353
354
355static void
356tracefile_stats_finalize (LttvTracefileStats *self)
357{
358 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACEFILE_STATE_TYPE))->
359 finalize(G_OBJECT(self));
360}
361
362
363static void
364tracefile_stats_class_init (LttvTracefileStatsClass *klass)
365{
366 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
367
368 gobject_class->finalize = (void (*)(GObject *self)) tracefile_stats_finalize;
369}
370
371
372GType
373lttv_tracefile_stats_get_type(void)
374{
375 static GType type = 0;
376 if (type == 0) {
377 static const GTypeInfo info = {
378 sizeof (LttvTracefileStatsClass),
379 NULL, /* base_init */
380 NULL, /* base_finalize */
381 (GClassInitFunc) tracefile_stats_class_init, /* class_init */
382 NULL, /* class_finalize */
383 NULL, /* class_data */
384 sizeof (LttvTracefileStats),
385 0, /* n_preallocs */
00e74b69 386 (GInstanceInitFunc) tracefile_stats_instance_init, /* instance_init */
387 NULL /* Value handling */
b445142a 388 };
389
390 type = g_type_register_static (LTTV_TRACEFILE_STATE_TYPE,
391 "LttvTracefileStatsType", &info, 0);
392 }
393 return type;
394}
395
396
397static void
00e74b69 398find_event_tree(LttvTracefileStats *tfcs,
399 GQuark pid_time,
c0cb4d12 400 guint cpu,
14236daa 401 guint64 function,
00e74b69 402 GQuark mode,
403 GQuark sub_mode,
404 LttvAttribute **events_tree,
405 LttvAttribute **event_types_tree)
b445142a 406{
c0cb4d12 407 LttvAttribute *a, *prev_a;
14236daa 408 gchar fstring[MAX_64_HEX_STRING_LEN];
b49e54b4 409 gint ret;
14236daa 410
b49e54b4 411 ret = snprintf(fstring, MAX_64_HEX_STRING_LEN-1,
412 "0x%llX", function) > 0;
413 g_assert(ret > 0);
14236daa 414 fstring[MAX_64_HEX_STRING_LEN-1] = '\0';
b445142a 415
3c9bb8b1 416 LttvTraceStats *tcs = (LttvTraceStats*)tfcs->parent.parent.t_context;
b445142a 417 a = lttv_attribute_find_subdir(tcs->stats, LTTV_STATS_PROCESSES);
00e74b69 418 a = lttv_attribute_find_subdir(a, pid_time);
b445142a 419 a = lttv_attribute_find_subdir(a, LTTV_STATS_CPU);
c0cb4d12 420 a = lttv_attribute_find_subdir_unnamed(a, cpu);
14236daa 421 a = lttv_attribute_find_subdir(a, LTTV_STATS_FUNCTIONS);
422 a = lttv_attribute_find_subdir(a, g_quark_from_string(fstring));
b445142a 423 a = lttv_attribute_find_subdir(a, LTTV_STATS_MODE_TYPES);
00e74b69 424 a = lttv_attribute_find_subdir(a, mode);
b445142a 425 a = lttv_attribute_find_subdir(a, LTTV_STATS_SUBMODES);
00e74b69 426 a = lttv_attribute_find_subdir(a, sub_mode);
b445142a 427 *events_tree = a;
428 a = lttv_attribute_find_subdir(a, LTTV_STATS_EVENT_TYPES);
429 *event_types_tree = a;
430}
431
432
433static void update_event_tree(LttvTracefileStats *tfcs)
434{
348c6ba8 435 LttvTraceState *ts = (LttvTraceState *)tfcs->parent.parent.t_context;
ae3d0f50 436 guint cpu = tfcs->parent.cpu;
348c6ba8 437 LttvProcessState *process = ts->running_process[cpu];
438 LttvExecutionState *es = process->state;
b445142a 439
348c6ba8 440 find_event_tree(tfcs, process->pid_time,
c0cb4d12 441 cpu,
14236daa 442 process->current_function,
b445142a 443 es->t, es->n, &(tfcs->current_events_tree),
444 &(tfcs->current_event_types_tree));
445}
446
447
448static void mode_change(LttvTracefileStats *tfcs)
449{
348c6ba8 450 LttvTraceState *ts = (LttvTraceState *)tfcs->parent.parent.t_context;
ae3d0f50 451 guint cpu = tfcs->parent.cpu;
348c6ba8 452 LttvProcessState *process = ts->running_process[cpu];
b49e54b4 453 LttvAttributeValue cpu_time, cum_cpu_time;
b445142a 454
455 LttTime delta;
456
308711e5 457 delta = ltt_time_sub(tfcs->parent.parent.timestamp,
348c6ba8 458 process->state->change);
b49e54b4 459
460 lttv_attribute_find(tfcs->current_events_tree, LTTV_STATS_CPU_TIME,
461 LTTV_TIME, &cpu_time);
308711e5 462 *(cpu_time.v_time) = ltt_time_add(*(cpu_time.v_time), delta);
b445142a 463
b49e54b4 464 process->state->cum_cpu_time = ltt_time_add(process->state->cum_cpu_time,
465 delta);
466}
b445142a 467
b49e54b4 468/* Note : every mode_end must come with a cumulative cpu time update in the
469 * after hook */
b445142a 470static void mode_end(LttvTracefileStats *tfcs)
471{
348c6ba8 472 LttvTraceState *ts = (LttvTraceState *)tfcs->parent.parent.t_context;
ae3d0f50 473 guint cpu = tfcs->parent.cpu;
348c6ba8 474 LttvProcessState *process = ts->running_process[cpu];
b49e54b4 475 LttvAttributeValue elapsed_time, cpu_time, cum_cpu_time;
b445142a 476
477 LttTime delta;
478
479 lttv_attribute_find(tfcs->current_events_tree, LTTV_STATS_ELAPSED_TIME,
480 LTTV_TIME, &elapsed_time);
308711e5 481 delta = ltt_time_sub(tfcs->parent.parent.timestamp,
348c6ba8 482 process->state->entry);
308711e5 483 *(elapsed_time.v_time) = ltt_time_add(*(elapsed_time.v_time), delta);
b445142a 484
485 lttv_attribute_find(tfcs->current_events_tree, LTTV_STATS_CPU_TIME,
486 LTTV_TIME, &cpu_time);
308711e5 487 delta = ltt_time_sub(tfcs->parent.parent.timestamp,
348c6ba8 488 process->state->change);
308711e5 489 *(cpu_time.v_time) = ltt_time_add(*(cpu_time.v_time), delta);
b49e54b4 490 process->state->cum_cpu_time = ltt_time_add(process->state->cum_cpu_time,
491 delta);
492
493 lttv_attribute_find(tfcs->current_events_tree, LTTV_STATS_CUMULATIVE_CPU_TIME,
494 LTTV_TIME, &cum_cpu_time);
495 *(cum_cpu_time.v_time) = ltt_time_add(*(cum_cpu_time.v_time),
496 process->state->cum_cpu_time);
b445142a 497}
498
499
b49e54b4 500static void after_mode_end(LttvTracefileStats *tfcs)
501{
502 LttvTraceState *ts = (LttvTraceState *)tfcs->parent.parent.t_context;
503 guint cpu = tfcs->parent.cpu;
504 LttvProcessState *process = ts->running_process[cpu];
505 LttvAttributeValue cum_cpu_time;
506
507 LttTime nested_delta;
508
509 nested_delta = process->state->cum_cpu_time;
510 process->state->cum_cpu_time = ltt_time_zero; /* For after traceset hook */
511
512 update_event_tree(tfcs);
513
514 process->state->cum_cpu_time = ltt_time_add(process->state->cum_cpu_time,
515 nested_delta);
516}
517
b445142a 518static gboolean before_syscall_entry(void *hook_data, void *call_data)
519{
520 mode_change((LttvTracefileStats *)call_data);
521 return FALSE;
522}
523
524
525static gboolean after_syscall_entry(void *hook_data, void *call_data)
526{
527 update_event_tree((LttvTracefileStats *)call_data);
528 return FALSE;
529}
530
531
532gboolean before_syscall_exit(void *hook_data, void *call_data)
533{
534 mode_end((LttvTracefileStats *)call_data);
535 return FALSE;
536}
537
538
539static gboolean after_syscall_exit(void *hook_data, void *call_data)
540{
b49e54b4 541 after_mode_end((LttvTracefileStats *)call_data);
b445142a 542 return FALSE;
543}
544
545
546gboolean before_trap_entry(void *hook_data, void *call_data)
547{
548 mode_change((LttvTracefileStats *)call_data);
549 return FALSE;
550}
551
552
553static gboolean after_trap_entry(void *hook_data, void *call_data)
554{
555 update_event_tree((LttvTracefileStats *)call_data);
556 return FALSE;
557}
558
559
560gboolean before_trap_exit(void *hook_data, void *call_data)
561{
562 mode_end((LttvTracefileStats *)call_data);
563 return FALSE;
564}
565
566
567gboolean after_trap_exit(void *hook_data, void *call_data)
568{
b49e54b4 569 after_mode_end((LttvTracefileStats *)call_data);
b445142a 570 return FALSE;
571}
572
573
574gboolean before_irq_entry(void *hook_data, void *call_data)
575{
576 mode_change((LttvTracefileStats *)call_data);
577 return FALSE;
578}
579
b445142a 580gboolean after_irq_entry(void *hook_data, void *call_data)
581{
582 update_event_tree((LttvTracefileStats *)call_data);
583 return FALSE;
584}
585
586
587gboolean before_irq_exit(void *hook_data, void *call_data)
588{
589 mode_end((LttvTracefileStats *)call_data);
590 return FALSE;
591}
592
593
594gboolean after_irq_exit(void *hook_data, void *call_data)
595{
b49e54b4 596 after_mode_end((LttvTracefileStats *)call_data);
b445142a 597 return FALSE;
598}
599
600
faf074a3 601gboolean before_soft_irq_entry(void *hook_data, void *call_data)
602{
603 mode_change((LttvTracefileStats *)call_data);
604 return FALSE;
605}
606
607gboolean after_soft_irq_entry(void *hook_data, void *call_data)
608{
609 update_event_tree((LttvTracefileStats *)call_data);
610 return FALSE;
611}
612
613
614gboolean before_soft_irq_exit(void *hook_data, void *call_data)
615{
616 mode_end((LttvTracefileStats *)call_data);
617 return FALSE;
618}
619
620
621gboolean after_soft_irq_exit(void *hook_data, void *call_data)
622{
b49e54b4 623 after_mode_end((LttvTracefileStats *)call_data);
faf074a3 624 return FALSE;
625}
626
14236daa 627gboolean before_function_entry(void *hook_data, void *call_data)
628{
b49e54b4 629 mode_change((LttvTracefileStats *)call_data);
14236daa 630 return FALSE;
631}
632
633gboolean after_function_entry(void *hook_data, void *call_data)
634{
635 update_event_tree((LttvTracefileStats *)call_data);
636 return FALSE;
637}
638
639gboolean before_function_exit(void *hook_data, void *call_data)
640{
641 mode_end((LttvTracefileStats *)call_data);
642 return FALSE;
643}
644
645gboolean after_function_exit(void *hook_data, void *call_data)
646{
b49e54b4 647 after_mode_end((LttvTracefileStats *)call_data);
14236daa 648 return FALSE;
649}
650
faf074a3 651
b445142a 652gboolean before_schedchange(void *hook_data, void *call_data)
653{
b445142a 654 LttvTracefileStats *tfcs = (LttvTracefileStats *)call_data;
655
348c6ba8 656 LttvTraceState *ts = (LttvTraceState*)tfcs->parent.parent.t_context;
657
eed2ef37 658 LttEvent *e = ltt_tracefile_get_event(tfcs->parent.parent.tf);
659
d052ffc3 660 LttvTraceHookByFacility *thf = (LttvTraceHookByFacility *)hook_data;
eed2ef37 661
d7cf605c 662 guint pid_in, pid_out;
663
664 gint state_out;
b445142a 665
eed2ef37 666 pid_out = ltt_event_get_unsigned(e, thf->f1);
667 pid_in = ltt_event_get_unsigned(e, thf->f2);
d7cf605c 668 state_out = ltt_event_get_int(e, thf->f3);
b445142a 669
670 /* compute the time for the process to schedule out */
671
672 mode_change(tfcs);
673
b49e54b4 674 return FALSE;
675}
b445142a 676
b49e54b4 677gboolean after_schedchange(void *hook_data, void *call_data)
678{
679 LttvTracefileStats *tfcs = (LttvTracefileStats *)call_data;
680
681 LttvTraceState *ts = (LttvTraceState*)tfcs->parent.parent.t_context;
b445142a 682
b49e54b4 683 LttEvent *e = ltt_tracefile_get_event(tfcs->parent.parent.tf);
684
685 LttvTraceHookByFacility *thf = (LttvTraceHookByFacility *)hook_data;
686
687 guint pid_in, pid_out;
688
689 gint state_out;
690
691 LttvProcessState *process;
692
693 pid_out = ltt_event_get_unsigned(e, thf->f1);
694 pid_in = ltt_event_get_unsigned(e, thf->f2);
695 state_out = ltt_event_get_int(e, thf->f3);
696
697 /* get the information for the process scheduled in */
c0cb4d12 698 guint cpu = tfcs->parent.cpu;
b49e54b4 699 process = ts->running_process[cpu];
c0cb4d12 700
348c6ba8 701 find_event_tree(tfcs, process->pid_time,
c0cb4d12 702 cpu,
14236daa 703 process->current_function,
b445142a 704 process->state->t, process->state->n, &(tfcs->current_events_tree),
705 &(tfcs->current_event_types_tree));
706
707 /* compute the time waiting for the process to schedule in */
b445142a 708 mode_change(tfcs);
b445142a 709
b49e54b4 710 return FALSE;
711}
b445142a 712
713gboolean process_fork(void *hook_data, void *call_data)
714{
715 /* nothing to do for now */
716 return FALSE;
717}
718
719
720gboolean process_exit(void *hook_data, void *call_data)
721{
722 /* We should probably exit all modes here or we could do that at
723 schedule out. */
724 return FALSE;
725}
726
eed2ef37 727gboolean process_free(void *hook_data, void *call_data)
728{
729 return FALSE;
730}
b445142a 731
732gboolean every_event(void *hook_data, void *call_data)
733{
734 LttvTracefileStats *tfcs = (LttvTracefileStats *)call_data;
735
eed2ef37 736 LttEvent *e = ltt_tracefile_get_event(tfcs->parent.parent.tf);
737
b445142a 738 LttvAttributeValue v;
739
740 /* The current branch corresponds to the tracefile/process/interrupt state.
741 Statistics are added within it, to count the number of events of this
742 type occuring in this context. A quark has been pre-allocated for each
743 event type and is used as name. */
744
745 lttv_attribute_find(tfcs->current_event_types_tree,
eed2ef37 746 ltt_eventtype_name(ltt_event_eventtype(e)),
b445142a 747 LTTV_UINT, &v);
748 (*(v.v_uint))++;
749 return FALSE;
750}
751
b49e54b4 752static void lttv_stats_cleanup_process_state(gpointer key, gpointer value,
753 gpointer user_data)
754{
755 LttvTraceStats *tcs = (LttvTraceStats *)user_data;
756 LttvTraceState *ts = (LttvTraceState *)user_data;
757 LttvTracesetContext *tsc = ts->parent.ts_context;
758 LttvProcessState *process = (LttvProcessState *)value;
759 int i;
760 LttvTracefileStats **tfs = (LttvTracefileStats **)
761 &g_array_index(ts->parent.tracefiles, LttvTracefileContext*,
762 process->cpu);
763 int cleanup_empty = 0;
764
765 do {
766 if(ltt_time_compare(process->state->cum_cpu_time, ltt_time_zero) != 0) {
767 find_event_tree(*tfs, process->pid_time,
768 process->cpu,
769 process->current_function,
770 process->state->t, process->state->n, &((*tfs)->current_events_tree),
771 &((*tfs)->current_event_types_tree));
772 /* FIXME : ok, this is a hack. The time is infinite here :( */
773 LttTime save_time = (*tfs)->parent.parent.timestamp;
774 LttTime start, end;
775 ltt_trace_time_span_get(ts->parent.t, &start, &end);
776 (*tfs)->parent.parent.timestamp = end;
777 mode_end(*tfs);
778 (*tfs)->parent.parent.timestamp = save_time;
779 }
780 cleanup_empty = lttv_state_pop_state_cleanup(process,
781 (LttvTracefileState *)*tfs);
782 } while(cleanup_empty != 1);
783}
784
785/* For each process in the state, for each of their stacked states,
786 * perform sum of needed values. */
787static void lttv_stats_cleanup_state(LttvTraceStats *tcs)
788{
789 LttvTraceState *ts = (LttvTraceState *)tcs;
790
791#if 0
792 /* Does not work correctly FIXME. */
793 g_hash_table_foreach(ts->processes, lttv_stats_cleanup_process_state,
794 tcs);
795#endif //0
796}
b445142a 797
f95bc830 798void
69374af5 799lttv_stats_sum_trace(LttvTraceStats *self, LttvAttribute *ts_stats)
b445142a 800{
d3e01c7a 801 LttvAttribute *sum_container = self->stats;
b445142a 802
b445142a 803 LttvAttributeType type;
804
805 LttvAttributeValue value;
806
807 LttvAttributeName name;
808
c0cb4d12 809 gboolean is_named;
810
b445142a 811 unsigned sum;
812
69374af5 813 int trace_is_summed;
814
f95bc830 815 int i, j, k, l, m, nb_process, nb_cpu, nb_mode_type, nb_submode,
3813c77b 816 nb_event_type, nf, nb_functions;
b445142a 817
818 LttvAttribute *main_tree, *processes_tree, *process_tree, *cpus_tree,
819 *cpu_tree, *mode_tree, *mode_types_tree, *submodes_tree,
820 *submode_tree, *event_types_tree, *mode_events_tree,
3813c77b 821 *cpu_functions_tree,
822 *function_tree,
823 *function_mode_types_tree,
824 *trace_cpu_tree;
f95bc830 825
b49e54b4 826
d3e01c7a 827 main_tree = sum_container;
f95bc830 828
d3e01c7a 829 lttv_attribute_find(sum_container,
830 LTTV_STATS_SUMMED,
831 LTTV_UINT, &value);
69374af5 832 trace_is_summed = *(value.v_uint);
f95bc830 833 *(value.v_uint) = 1;
834
b49e54b4 835 /* First cleanup the state : sum all stalled information (never ending
836 * states). */
837 if(!trace_is_summed)
838 lttv_stats_cleanup_state(self);
839
f95bc830 840 processes_tree = lttv_attribute_find_subdir(main_tree,
d3e01c7a 841 LTTV_STATS_PROCESSES);
f95bc830 842 nb_process = lttv_attribute_get_number(processes_tree);
843
844 for(i = 0 ; i < nb_process ; i++) {
c0cb4d12 845 type = lttv_attribute_get(processes_tree, i, &name, &value, &is_named);
f95bc830 846 process_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
847
848 cpus_tree = lttv_attribute_find_subdir(process_tree, LTTV_STATS_CPU);
f95bc830 849 nb_cpu = lttv_attribute_get_number(cpus_tree);
850
851 for(j = 0 ; j < nb_cpu ; j++) {
c0cb4d12 852 type = lttv_attribute_get(cpus_tree, j, &name, &value, &is_named);
f95bc830 853 cpu_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
854
f95bc830 855 trace_cpu_tree = lttv_attribute_find_subdir(main_tree, LTTV_STATS_CPU);
c0cb4d12 856 trace_cpu_tree = lttv_attribute_find_subdir_unnamed(trace_cpu_tree, name);
3813c77b 857 cpu_functions_tree = lttv_attribute_find_subdir(cpu_tree,
858 LTTV_STATS_FUNCTIONS);
859 nb_functions = lttv_attribute_get_number(cpu_functions_tree);
860
861 for(nf=0; nf < nb_functions; nf++) {
c0cb4d12 862 type = lttv_attribute_get(cpu_functions_tree, nf, &name, &value,
863 &is_named);
3813c77b 864 function_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
865 function_mode_types_tree = lttv_attribute_find_subdir(function_tree,
866 LTTV_STATS_MODE_TYPES);
867 nb_mode_type = lttv_attribute_get_number(function_mode_types_tree);
868 for(k = 0 ; k < nb_mode_type ; k++) {
c0cb4d12 869 type = lttv_attribute_get(function_mode_types_tree, k, &name, &value,
870 &is_named);
3813c77b 871 mode_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
872
873 submodes_tree = lttv_attribute_find_subdir(mode_tree,
874 LTTV_STATS_SUBMODES);
875 mode_events_tree = lttv_attribute_find_subdir(mode_tree,
876 LTTV_STATS_EVENTS);
877 mode_types_tree = lttv_attribute_find_subdir(mode_tree,
878 LTTV_STATS_MODE_TYPES);
879
880 nb_submode = lttv_attribute_get_number(submodes_tree);
881
882 for(l = 0 ; l < nb_submode ; l++) {
c0cb4d12 883 type = lttv_attribute_get(submodes_tree, l, &name, &value,
884 &is_named);
3813c77b 885 submode_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
886
887 event_types_tree = lttv_attribute_find_subdir(submode_tree,
888 LTTV_STATS_EVENT_TYPES);
889 nb_event_type = lttv_attribute_get_number(event_types_tree);
890
891 sum = 0;
892 for(m = 0 ; m < nb_event_type ; m++) {
c0cb4d12 893 type = lttv_attribute_get(event_types_tree, m, &name, &value,
894 &is_named);
3813c77b 895 sum += *(value.v_uint);
896 }
897 lttv_attribute_find(submode_tree, LTTV_STATS_EVENTS_COUNT,
898 LTTV_UINT, &value);
899 *(value.v_uint) = sum;
900
c0cb4d12 901 type = lttv_attribute_get(submodes_tree, l, &name, &value,
902 &is_named);
3813c77b 903 submode_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
69374af5 904 if(!trace_is_summed) {
905 lttv_attribute_recursive_add(mode_events_tree, event_types_tree);
906 lttv_attribute_recursive_add(mode_types_tree, submode_tree);
907 }
3813c77b 908 }
69374af5 909 if(!trace_is_summed) {
b49e54b4 910 //lttv_attribute_recursive_add(function_tree, mode_types_tree);
69374af5 911 }
3813c77b 912 }
65c2c8a0 913 if(!trace_is_summed) {
b49e54b4 914 //lttv_attribute_recursive_add(cpu_tree, function_tree);
915 //lttv_attribute_recursive_add(process_tree, function_tree);
916 //lttv_attribute_recursive_add(trace_cpu_tree, function_tree);
917 //lttv_attribute_recursive_add(main_tree, function_tree);
65c2c8a0 918 }
b49e54b4 919 //lttv_attribute_recursive_add(ts_stats, function_tree);
69374af5 920 }
b445142a 921 }
f95bc830 922 }
923}
924
925
d3e01c7a 926gboolean lttv_stats_sum_traceset_hook(void *hook_data, void *call_data)
927{
928 lttv_stats_sum_traceset((LttvTracesetStats *)call_data);
929 return 0;
930}
931
f95bc830 932void
933lttv_stats_sum_traceset(LttvTracesetStats *self)
934{
935 LttvTraceset *traceset = self->parent.parent.ts;
d3e01c7a 936 LttvAttribute *sum_container = self->stats;
f95bc830 937
938 LttvTraceStats *tcs;
939
940 int i, nb_trace;
941
3813c77b 942 LttvAttribute *main_tree;
f95bc830 943
944 LttvAttributeValue value;
945
d3e01c7a 946 lttv_attribute_find(sum_container, LTTV_STATS_SUMMED,
f95bc830 947 LTTV_UINT, &value);
948 if(*(value.v_uint) != 0) return;
949 *(value.v_uint) = 1;
950
f95bc830 951 nb_trace = lttv_traceset_number(traceset);
952
953 for(i = 0 ; i < nb_trace ; i++) {
954 tcs = (LttvTraceStats *)(self->parent.parent.traces[i]);
69374af5 955 lttv_stats_sum_trace(tcs, self->stats);
956 // lttv_attribute_recursive_add(sum_container, tcs->stats);
b445142a 957 }
b445142a 958}
959
960
d3e01c7a 961// Hook wrapper. call_data is a traceset context.
00e74b69 962gboolean lttv_stats_hook_add_event_hooks(void *hook_data, void *call_data)
d3e01c7a 963{
964 LttvTracesetStats *tss = (LttvTracesetStats*)call_data;
965
966 lttv_stats_add_event_hooks(tss);
967
968 return 0;
969}
970
00e74b69 971void lttv_stats_add_event_hooks(LttvTracesetStats *self)
b445142a 972{
973 LttvTraceset *traceset = self->parent.parent.ts;
974
eed2ef37 975 guint i, j, k, l, nb_trace, nb_tracefile;
b445142a 976
b445142a 977 LttvTraceStats *ts;
978
979 LttvTracefileStats *tfs;
980
b445142a 981 GArray *hooks, *before_hooks, *after_hooks;
982
eed2ef37 983 LttvTraceHook *hook;
984
985 LttvTraceHookByFacility *thf;
b445142a 986
987 LttvAttributeValue val;
988
9d239bd9 989 gint ret;
2501204d 990 gint hn;
9d239bd9 991
b445142a 992 nb_trace = lttv_traceset_number(traceset);
993 for(i = 0 ; i < nb_trace ; i++) {
994 ts = (LttvTraceStats *)self->parent.parent.traces[i];
995
996 /* Find the eventtype id for the following events and register the
997 associated by id hooks. */
998
14236daa 999 hooks = g_array_sized_new(FALSE, FALSE, sizeof(LttvTraceHook), 11);
1000 g_array_set_size(hooks, 11);
2501204d 1001 hn=0;
b445142a 1002
9d239bd9 1003 ret = lttv_trace_find_hook(ts->parent.parent.t,
f5d7967f 1004 LTT_FACILITY_KERNEL_ARCH, LTT_EVENT_SYSCALL_ENTRY,
eed2ef37 1005 LTT_FIELD_SYSCALL_ID, 0, 0,
2c82c4dc 1006 before_syscall_entry, NULL,
2501204d 1007 &g_array_index(hooks, LttvTraceHook, hn++));
1008 if(ret) hn--;
b445142a 1009
9d239bd9 1010 ret = lttv_trace_find_hook(ts->parent.parent.t,
f5d7967f 1011 LTT_FACILITY_KERNEL_ARCH, LTT_EVENT_SYSCALL_EXIT,
eed2ef37 1012 0, 0, 0,
2c82c4dc 1013 before_syscall_exit, NULL,
2501204d 1014 &g_array_index(hooks, LttvTraceHook, hn++));
1015 if(ret) hn--;
b445142a 1016
9d239bd9 1017 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1018 LTT_FACILITY_KERNEL, LTT_EVENT_TRAP_ENTRY,
1019 LTT_FIELD_TRAP_ID, 0, 0,
2c82c4dc 1020 before_trap_entry, NULL,
2501204d 1021 &g_array_index(hooks, LttvTraceHook, hn++));
1022 if(ret) hn--;
b445142a 1023
9d239bd9 1024 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1025 LTT_FACILITY_KERNEL, LTT_EVENT_TRAP_EXIT,
1026 0, 0, 0,
2c82c4dc 1027 before_trap_exit, NULL,
2501204d 1028 &g_array_index(hooks, LttvTraceHook, hn++));
1029 if(ret) hn--;
eed2ef37 1030
9d239bd9 1031 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1032 LTT_FACILITY_KERNEL, LTT_EVENT_IRQ_ENTRY,
1033 LTT_FIELD_IRQ_ID, 0, 0,
2c82c4dc 1034 before_irq_entry, NULL,
2501204d 1035 &g_array_index(hooks, LttvTraceHook, hn++));
1036 if(ret) hn--;
eed2ef37 1037
9d239bd9 1038 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1039 LTT_FACILITY_KERNEL, LTT_EVENT_IRQ_EXIT,
1040 0, 0, 0,
2c82c4dc 1041 before_irq_exit, NULL,
2501204d 1042 &g_array_index(hooks, LttvTraceHook, hn++));
1043 if(ret) hn--;
eed2ef37 1044
faf074a3 1045 ret = lttv_trace_find_hook(ts->parent.parent.t,
1046 LTT_FACILITY_KERNEL, LTT_EVENT_SOFT_IRQ_ENTRY,
1047 LTT_FIELD_SOFT_IRQ_ID, 0, 0,
1048 before_soft_irq_entry, NULL,
2501204d 1049 &g_array_index(hooks, LttvTraceHook, hn++));
1050 if(ret) hn--;
faf074a3 1051
1052 ret = lttv_trace_find_hook(ts->parent.parent.t,
1053 LTT_FACILITY_KERNEL, LTT_EVENT_SOFT_IRQ_EXIT,
1054 0, 0, 0,
1055 before_soft_irq_exit, NULL,
2501204d 1056 &g_array_index(hooks, LttvTraceHook, hn++));
1057 if(ret) hn--;
faf074a3 1058
9d239bd9 1059 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1060 LTT_FACILITY_PROCESS, LTT_EVENT_SCHEDCHANGE,
1061 LTT_FIELD_OUT, LTT_FIELD_IN, LTT_FIELD_OUT_STATE,
2c82c4dc 1062 before_schedchange, NULL,
2501204d 1063 &g_array_index(hooks, LttvTraceHook, hn++));
1064 if(ret) hn--;
14236daa 1065
1066 ret = lttv_trace_find_hook(ts->parent.parent.t,
1067 LTT_FACILITY_USER_GENERIC, LTT_EVENT_FUNCTION_ENTRY,
1068 LTT_FIELD_THIS_FN, LTT_FIELD_CALL_SITE, 0,
1069 before_function_entry, NULL,
1070 &g_array_index(hooks, LttvTraceHook, hn++));
1071 if(ret) hn--;
1072
1073 ret = lttv_trace_find_hook(ts->parent.parent.t,
1074 LTT_FACILITY_USER_GENERIC, LTT_EVENT_FUNCTION_EXIT,
1075 LTT_FIELD_THIS_FN, LTT_FIELD_CALL_SITE, 0,
1076 before_function_exit, NULL,
1077 &g_array_index(hooks, LttvTraceHook, hn++));
1078 if(ret) hn--;
1079
2501204d 1080 g_array_set_size(hooks, hn);
b445142a 1081
1082 before_hooks = hooks;
1083
b49e54b4 1084 hooks = g_array_sized_new(FALSE, FALSE, sizeof(LttvTraceHook), 14);
1085 g_array_set_size(hooks, 14);
2501204d 1086 hn=0;
b445142a 1087
9d239bd9 1088 ret = lttv_trace_find_hook(ts->parent.parent.t,
f5d7967f 1089 LTT_FACILITY_KERNEL_ARCH, LTT_EVENT_SYSCALL_ENTRY,
eed2ef37 1090 LTT_FIELD_SYSCALL_ID, 0, 0,
2c82c4dc 1091 after_syscall_entry, NULL,
2501204d 1092 &g_array_index(hooks, LttvTraceHook, hn++));
1093 if(ret) hn--;
b445142a 1094
9d239bd9 1095 ret = lttv_trace_find_hook(ts->parent.parent.t,
f5d7967f 1096 LTT_FACILITY_KERNEL_ARCH, LTT_EVENT_SYSCALL_EXIT,
eed2ef37 1097 0, 0, 0,
2c82c4dc 1098 after_syscall_exit, NULL,
2501204d 1099 &g_array_index(hooks, LttvTraceHook, hn++));
1100 if(ret) hn--;
b445142a 1101
9d239bd9 1102 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1103 LTT_FACILITY_KERNEL, LTT_EVENT_TRAP_ENTRY,
1104 LTT_FIELD_TRAP_ID, 0, 0,
2c82c4dc 1105 after_trap_entry, NULL,
2501204d 1106 &g_array_index(hooks, LttvTraceHook, hn++));
1107 if(ret) hn--;
eed2ef37 1108
9d239bd9 1109 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1110 LTT_FACILITY_KERNEL, LTT_EVENT_TRAP_EXIT,
1111 0, 0, 0,
2c82c4dc 1112 after_trap_exit, NULL,
2501204d 1113 &g_array_index(hooks, LttvTraceHook, hn++));
1114 if(ret) hn--;
b445142a 1115
9d239bd9 1116 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1117 LTT_FACILITY_KERNEL, LTT_EVENT_IRQ_ENTRY,
1118 LTT_FIELD_IRQ_ID, 0, 0,
2c82c4dc 1119 after_irq_entry, NULL,
2501204d 1120 &g_array_index(hooks, LttvTraceHook, hn++));
1121 if(ret) hn--;
b445142a 1122
9d239bd9 1123 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1124 LTT_FACILITY_KERNEL, LTT_EVENT_IRQ_EXIT,
1125 0, 0, 0,
2c82c4dc 1126 after_irq_exit, NULL,
2501204d 1127 &g_array_index(hooks, LttvTraceHook, hn++));
1128 if(ret) hn--;
b445142a 1129
faf074a3 1130 ret = lttv_trace_find_hook(ts->parent.parent.t,
1131 LTT_FACILITY_KERNEL, LTT_EVENT_SOFT_IRQ_ENTRY,
1132 LTT_FIELD_SOFT_IRQ_ID, 0, 0,
1133 after_irq_entry, NULL,
2501204d 1134 &g_array_index(hooks, LttvTraceHook, hn++));
1135 if(ret) hn--;
faf074a3 1136
1137 ret = lttv_trace_find_hook(ts->parent.parent.t,
1138 LTT_FACILITY_KERNEL, LTT_EVENT_SOFT_IRQ_EXIT,
1139 0, 0, 0,
1140 after_soft_irq_exit, NULL,
2501204d 1141 &g_array_index(hooks, LttvTraceHook, hn++));
1142 if(ret) hn--;
b445142a 1143
b49e54b4 1144 ret = lttv_trace_find_hook(ts->parent.parent.t,
1145 LTT_FACILITY_PROCESS, LTT_EVENT_SCHEDCHANGE,
1146 LTT_FIELD_OUT, LTT_FIELD_IN, LTT_FIELD_OUT_STATE,
1147 after_schedchange, NULL,
1148 &g_array_index(hooks, LttvTraceHook, hn++));
1149 if(ret) hn--;
1150
9d239bd9 1151 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1152 LTT_FACILITY_PROCESS, LTT_EVENT_FORK,
1153 LTT_FIELD_PARENT_PID, LTT_FIELD_CHILD_PID, 0,
2c82c4dc 1154 process_fork, NULL,
2501204d 1155 &g_array_index(hooks, LttvTraceHook, hn++));
1156 if(ret) hn--;
b445142a 1157
9d239bd9 1158 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1159 LTT_FACILITY_PROCESS, LTT_EVENT_EXIT,
1160 LTT_FIELD_PID, 0, 0,
2c82c4dc 1161 process_exit, NULL,
2501204d 1162 &g_array_index(hooks, LttvTraceHook, hn++));
1163 if(ret) hn--;
eed2ef37 1164
9d239bd9 1165 ret = lttv_trace_find_hook(ts->parent.parent.t,
eed2ef37 1166 LTT_FACILITY_PROCESS, LTT_EVENT_FREE,
1167 LTT_FIELD_PID, 0, 0,
2c82c4dc 1168 process_free, NULL,
2501204d 1169 &g_array_index(hooks, LttvTraceHook, hn++));
1170 if(ret) hn--;
eed2ef37 1171
14236daa 1172 ret = lttv_trace_find_hook(ts->parent.parent.t,
1173 LTT_FACILITY_USER_GENERIC, LTT_EVENT_FUNCTION_ENTRY,
1174 LTT_FIELD_THIS_FN, LTT_FIELD_CALL_SITE, 0,
1175 after_function_entry, NULL,
1176 &g_array_index(hooks, LttvTraceHook, hn++));
1177 if(ret) hn--;
1178
1179 ret = lttv_trace_find_hook(ts->parent.parent.t,
1180 LTT_FACILITY_USER_GENERIC, LTT_EVENT_FUNCTION_EXIT,
1181 LTT_FIELD_THIS_FN, LTT_FIELD_CALL_SITE, 0,
1182 after_function_exit, NULL,
1183 &g_array_index(hooks, LttvTraceHook, hn++));
1184 if(ret) hn--;
1185
2501204d 1186 g_array_set_size(hooks, hn);
b445142a 1187
1188 after_hooks = hooks;
1189
359b2948 1190 /* Add these hooks to each event_by_id hooks list */
b445142a 1191
eed2ef37 1192 nb_tracefile = ts->parent.parent.tracefiles->len;
b445142a 1193
dbb7bb09 1194 for(j = 0 ; j < nb_tracefile ; j++) {
d7cf605c 1195 tfs = LTTV_TRACEFILE_STATS(g_array_index(ts->parent.parent.tracefiles,
1196 LttvTracefileContext*, j));
359b2948 1197 lttv_hooks_add(tfs->parent.parent.event, every_event, NULL,
1198 LTTV_PRIO_DEFAULT);
b445142a 1199
1200 for(k = 0 ; k < before_hooks->len ; k++) {
eed2ef37 1201 hook = &g_array_index(before_hooks, LttvTraceHook, k);
1202 for(l = 0; l<hook->fac_list->len;l++) {
1203 thf = g_array_index(hook->fac_list, LttvTraceHookByFacility*, l);
1204 lttv_hooks_add(
1205 lttv_hooks_by_id_find(tfs->parent.parent.event_by_id, thf->id),
1206 thf->h,
d052ffc3 1207 thf,
eed2ef37 1208 LTTV_PRIO_STATS_BEFORE_STATE);
1209 }
b445142a 1210 }
1211 for(k = 0 ; k < after_hooks->len ; k++) {
eed2ef37 1212 hook = &g_array_index(after_hooks, LttvTraceHook, k);
1213 for(l = 0; l<hook->fac_list->len;l++) {
1214 thf = g_array_index(hook->fac_list, LttvTraceHookByFacility*, l);
1215 lttv_hooks_add(
1216 lttv_hooks_by_id_find(tfs->parent.parent.event_by_id, thf->id),
1217 thf->h,
d052ffc3 1218 thf,
eed2ef37 1219 LTTV_PRIO_STATS_AFTER_STATE);
1220 }
b445142a 1221 }
1222 }
1223 lttv_attribute_find(self->parent.parent.a, LTTV_STATS_BEFORE_HOOKS,
1224 LTTV_POINTER, &val);
1225 *(val.v_pointer) = before_hooks;
1226 lttv_attribute_find(self->parent.parent.a, LTTV_STATS_AFTER_HOOKS,
1227 LTTV_POINTER, &val);
1228 *(val.v_pointer) = after_hooks;
1229 }
b445142a 1230}
1231
d3e01c7a 1232// Hook wrapper. call_data is a traceset context.
00e74b69 1233gboolean lttv_stats_hook_remove_event_hooks(void *hook_data, void *call_data)
d3e01c7a 1234{
1235 LttvTracesetStats *tss = (LttvTracesetStats*)call_data;
1236
1237 lttv_stats_remove_event_hooks(tss);
1238
1239 return 0;
1240}
b445142a 1241
00e74b69 1242void lttv_stats_remove_event_hooks(LttvTracesetStats *self)
b445142a 1243{
1244 LttvTraceset *traceset = self->parent.parent.ts;
1245
eed2ef37 1246 guint i, j, k, l, nb_trace, nb_tracefile;
b445142a 1247
1248 LttvTraceStats *ts;
1249
1250 LttvTracefileStats *tfs;
1251
1252 void *hook_data;
1253
1254 GArray *before_hooks, *after_hooks;
1255
eed2ef37 1256 LttvTraceHook *hook;
1257
1258 LttvTraceHookByFacility *thf;
b445142a 1259
1260 LttvAttributeValue val;
1261
1262 nb_trace = lttv_traceset_number(traceset);
1263 for(i = 0 ; i < nb_trace ; i++) {
ae80b609 1264 ts = (LttvTraceStats*)self->parent.parent.traces[i];
b445142a 1265 lttv_attribute_find(self->parent.parent.a, LTTV_STATS_BEFORE_HOOKS,
1266 LTTV_POINTER, &val);
1267 before_hooks = *(val.v_pointer);
1268 lttv_attribute_find(self->parent.parent.a, LTTV_STATS_AFTER_HOOKS,
1269 LTTV_POINTER, &val);
1270 after_hooks = *(val.v_pointer);
1271
359b2948 1272 /* Remove these hooks from each event_by_id hooks list */
b445142a 1273
eed2ef37 1274 nb_tracefile = ts->parent.parent.tracefiles->len;
b445142a 1275
dbb7bb09 1276 for(j = 0 ; j < nb_tracefile ; j++) {
cb03932a 1277 tfs = LTTV_TRACEFILE_STATS(g_array_index(ts->parent.parent.tracefiles,
1278 LttvTracefileContext*, j));
359b2948 1279 lttv_hooks_remove_data(tfs->parent.parent.event, every_event,
b445142a 1280 NULL);
1281
1282 for(k = 0 ; k < before_hooks->len ; k++) {
eed2ef37 1283 hook = &g_array_index(before_hooks, LttvTraceHook, k);
1284 for(l = 0 ; l < hook->fac_list->len ; l++) {
1285 thf = g_array_index(hook->fac_list, LttvTraceHookByFacility*, l);
1286 lttv_hooks_remove_data(
1287 lttv_hooks_by_id_find(tfs->parent.parent.event_by_id, thf->id),
1288 thf->h,
d052ffc3 1289 thf);
eed2ef37 1290 }
b445142a 1291 }
1292 for(k = 0 ; k < after_hooks->len ; k++) {
eed2ef37 1293 hook = &g_array_index(after_hooks, LttvTraceHook, k);
1294 for(l = 0 ; l < hook->fac_list->len ; l++) {
1295 thf = g_array_index(hook->fac_list, LttvTraceHookByFacility*, l);
1296 lttv_hooks_remove_data(
1297 lttv_hooks_by_id_find(tfs->parent.parent.event_by_id, thf->id),
1298 thf->h,
d052ffc3 1299 thf);
eed2ef37 1300 }
b445142a 1301 }
1302 }
2a2fa4f0 1303 g_debug("lttv_stats_remove_event_hooks()");
b445142a 1304 g_array_free(before_hooks, TRUE);
1305 g_array_free(after_hooks, TRUE);
1306 }
9f797243 1307}
08b1c66e 1308
1309
1310static void module_init()
1311{
1312 LTTV_STATS_PROCESS_UNKNOWN = g_quark_from_string("unknown process");
1313 LTTV_STATS_PROCESSES = g_quark_from_string("processes");
1314 LTTV_STATS_CPU = g_quark_from_string("cpu");
1315 LTTV_STATS_MODE_TYPES = g_quark_from_string("mode_types");
1316 LTTV_STATS_MODES = g_quark_from_string("modes");
1317 LTTV_STATS_SUBMODES = g_quark_from_string("submodes");
14236daa 1318 LTTV_STATS_FUNCTIONS = g_quark_from_string("functions");
08b1c66e 1319 LTTV_STATS_EVENT_TYPES = g_quark_from_string("event_types");
1320 LTTV_STATS_CPU_TIME = g_quark_from_string("cpu time");
b49e54b4 1321 LTTV_STATS_CUMULATIVE_CPU_TIME = g_quark_from_string("cumulative cpu time (includes nested routines and modes)");
1322 LTTV_STATS_ELAPSED_TIME = g_quark_from_string("elapsed time (includes per process waiting time)");
08b1c66e 1323 LTTV_STATS_EVENTS = g_quark_from_string("events");
1324 LTTV_STATS_EVENTS_COUNT = g_quark_from_string("events count");
1325 LTTV_STATS_BEFORE_HOOKS = g_quark_from_string("saved stats before hooks");
1326 LTTV_STATS_AFTER_HOOKS = g_quark_from_string("saved stats after hooks");
f95bc830 1327 LTTV_STATS_USE_COUNT = g_quark_from_string("stats_use_count");
1328 LTTV_STATS = g_quark_from_string("statistics");
1329 LTTV_STATS_TRACEFILES = g_quark_from_string("tracefiles statistics");
1330 LTTV_STATS_SUMMED = g_quark_from_string("statistics summed");
08b1c66e 1331}
1332
1333static void module_destroy()
1334{
1335}
1336
1337
1338LTTV_MODULE("stats", "Compute processes statistics", \
1339 "Accumulate statistics for event types, processes and CPUs", \
1340 module_init, module_destroy, "state");
f95bc830 1341
1342/* Change the places where stats are called (create/read/write stats)
1343
1344 Check for options in batchtest.c to reduce writing and see what tests are
1345 best candidates for performance analysis. Once OK, commit, move to main
1346 and run tests. Update the gui for statistics. */
This page took 0.1044 seconds and 4 git commands to generate.