projects / lttv.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
use realpath to get the absolute pathname, fixes some forgotten cases, especially...
[lttv.git] / ltt / branches / poly / lttv / main / 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
b445142a 19
9f797243 20#include <stdio.h>
08b1c66e 21#include <lttv/module.h>
b445142a 22#include <lttv/stats.h>
2a2fa4f0 23#include <lttv/lttv.h>
b445142a 24#include <ltt/facility.h>
25#include <ltt/trace.h>
26#include <ltt/event.h>
27
9f797243 28#define BUF_SIZE 256
29
b445142a 30GQuark
31 LTTV_STATS_PROCESS_UNKNOWN,
32 LTTV_STATS_PROCESSES,
33 LTTV_STATS_CPU,
34 LTTV_STATS_MODE_TYPES,
35 LTTV_STATS_MODES,
36 LTTV_STATS_SUBMODES,
37 LTTV_STATS_EVENT_TYPES,
38 LTTV_STATS_CPU_TIME,
39 LTTV_STATS_ELAPSED_TIME,
40 LTTV_STATS_EVENTS,
41 LTTV_STATS_EVENTS_COUNT;
42
43static GQuark
44 LTTV_STATS_BEFORE_HOOKS,
45 LTTV_STATS_AFTER_HOOKS;
46
47static void remove_all_processes(GHashTable *processes);
48
49static void
50find_event_tree(LttvTracefileStats *tfcs, GQuark process, GQuark cpu,
51 GQuark mode, GQuark sub_mode, LttvAttribute **events_tree,
52 LttvAttribute **event_types_tree);
53
54static void
55init(LttvTracesetStats *self, LttvTraceset *ts)
56{
dbb7bb09 57 guint i, j, nb_trace, nb_tracefile;
b445142a 58
59 LttvTraceContext *tc;
60
61 LttvTraceStats *tcs;
62
63 LttvTracefileContext *tfc;
64
65 LttvTracefileStats *tfcs;
66
67 LttTime timestamp = {0,0};
68
69 LTTV_TRACESET_CONTEXT_CLASS(g_type_class_peek(LTTV_TRACESET_STATE_TYPE))->
70 init((LttvTracesetContext *)self, ts);
71
72 self->stats = g_object_new(LTTV_ATTRIBUTE_TYPE, NULL);
73 nb_trace = lttv_traceset_number(ts);
74
75 for(i = 0 ; i < nb_trace ; i++) {
76 tcs = (LttvTraceStats *)tc = (LTTV_TRACESET_CONTEXT(self)->traces[i]);
77 tcs->stats = g_object_new(LTTV_ATTRIBUTE_TYPE, NULL);
78
dbb7bb09 79 nb_tracefile = ltt_trace_control_tracefile_number(tc->t) +
80 ltt_trace_per_cpu_tracefile_number(tc->t);
b445142a 81
dbb7bb09 82 for(j = 0 ; j < nb_tracefile ; j++) {
83 tfcs = LTTV_TRACEFILE_STATS(tc->tracefiles[j]);
b445142a 84 tfcs->stats = g_object_new(LTTV_ATTRIBUTE_TYPE, NULL);
85 find_event_tree(tfcs, LTTV_STATS_PROCESS_UNKNOWN,
86 tfcs->parent.cpu_name, LTTV_STATE_MODE_UNKNOWN,
87 LTTV_STATE_SUBMODE_UNKNOWN, &tfcs->current_events_tree,
88 &tfcs->current_event_types_tree);
89 }
90 }
91}
92
93
94static void
95fini(LttvTracesetStats *self)
96{
97 guint i, j, nb_trace, nb_tracefile;
98
99 LttvTraceset *ts;
100
101 LttvTraceContext *tc;
102
103 LttvTraceStats *tcs;
104
105 LttvTracefileContext *tfc;
106
107 LttvTracefileStats *tfcs;
108
109 LttTime timestamp = {0,0};
110
111 lttv_attribute_recursive_free(self->stats);
112 ts = self->parent.parent.ts;
113 nb_trace = lttv_traceset_number(ts);
114
115 for(i = 0 ; i < nb_trace ; i++) {
116 tcs = (LttvTraceStats *)tc = (LTTV_TRACESET_CONTEXT(self)->traces[i]);
117 lttv_attribute_recursive_free(tcs->stats);
118
dbb7bb09 119 nb_tracefile = ltt_trace_control_tracefile_number(tc->t) +
120 ltt_trace_per_cpu_tracefile_number(tc->t);
b445142a 121
b445142a 122 for(j = 0 ; j < nb_tracefile ; j++) {
dbb7bb09 123 tfcs = (LttvTracefileStats *)tfc = tc->tracefiles[j];
b445142a 124 lttv_attribute_recursive_free(tfcs->stats);
125 tfcs->current_events_tree = NULL;
126 tfcs->current_event_types_tree = NULL;
127 }
128 }
129 LTTV_TRACESET_CONTEXT_CLASS(g_type_class_peek(LTTV_TRACESET_STATE_TYPE))->
130 fini((LttvTracesetContext *)self);
131}
132
133
134static LttvTracesetContext *
135new_traceset_context(LttvTracesetContext *self)
136{
137 return LTTV_TRACESET_CONTEXT(g_object_new(LTTV_TRACESET_STATS_TYPE, NULL));
138}
139
140
141static LttvTraceContext *
142new_trace_context(LttvTracesetContext *self)
143{
144 return LTTV_TRACE_CONTEXT(g_object_new(LTTV_TRACE_STATS_TYPE, NULL));
145}
146
147
148static LttvTracefileContext *
149new_tracefile_context(LttvTracesetContext *self)
150{
151 return LTTV_TRACEFILE_CONTEXT(g_object_new(LTTV_TRACEFILE_STATS_TYPE, NULL));
152}
153
154
155static void
156traceset_stats_instance_init (GTypeInstance *instance, gpointer g_class)
157{
158}
159
160
161static void
162traceset_stats_finalize (LttvTracesetStats *self)
163{
164 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACESET_STATE_TYPE))->
165 finalize(G_OBJECT(self));
166}
167
168
169static void
170traceset_stats_class_init (LttvTracesetContextClass *klass)
171{
172 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
173
174 gobject_class->finalize = (void (*)(GObject *self)) traceset_stats_finalize;
175 klass->init = (void (*)(LttvTracesetContext *self, LttvTraceset *ts))init;
176 klass->fini = (void (*)(LttvTracesetContext *self))fini;
177 klass->new_traceset_context = new_traceset_context;
178 klass->new_trace_context = new_trace_context;
179 klass->new_tracefile_context = new_tracefile_context;
180}
181
182
183GType
184lttv_traceset_stats_get_type(void)
185{
186 static GType type = 0;
187 if (type == 0) {
188 static const GTypeInfo info = {
189 sizeof (LttvTracesetStatsClass),
190 NULL, /* base_init */
191 NULL, /* base_finalize */
192 (GClassInitFunc) traceset_stats_class_init, /* class_init */
193 NULL, /* class_finalize */
194 NULL, /* class_data */
dbb7bb09 195 sizeof (LttvTracesetStats),
b445142a 196 0, /* n_preallocs */
197 (GInstanceInitFunc) traceset_stats_instance_init /* instance_init */
198 };
199
200 type = g_type_register_static (LTTV_TRACESET_STATE_TYPE, "LttvTracesetStatsType",
201 &info, 0);
202 }
203 return type;
204}
205
206
207static void
208trace_stats_instance_init (GTypeInstance *instance, gpointer g_class)
209{
210}
211
212
213static void
214trace_stats_finalize (LttvTraceStats *self)
215{
216 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACE_STATE_TYPE))->
217 finalize(G_OBJECT(self));
218}
219
220
221static void
222trace_stats_class_init (LttvTraceContextClass *klass)
223{
224 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
225
226 gobject_class->finalize = (void (*)(GObject *self)) trace_stats_finalize;
227}
228
229
230GType
231lttv_trace_stats_get_type(void)
232{
233 static GType type = 0;
234 if (type == 0) {
235 static const GTypeInfo info = {
236 sizeof (LttvTraceStatsClass),
237 NULL, /* base_init */
238 NULL, /* base_finalize */
239 (GClassInitFunc) trace_stats_class_init, /* class_init */
240 NULL, /* class_finalize */
241 NULL, /* class_data */
242 sizeof (LttvTraceStats),
243 0, /* n_preallocs */
244 (GInstanceInitFunc) trace_stats_instance_init /* instance_init */
245 };
246
247 type = g_type_register_static (LTTV_TRACE_STATE_TYPE,
248 "LttvTraceStatsType", &info, 0);
249 }
250 return type;
251}
252
253
254static void
255tracefile_stats_instance_init (GTypeInstance *instance, gpointer g_class)
256{
257}
258
259
260static void
261tracefile_stats_finalize (LttvTracefileStats *self)
262{
263 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACEFILE_STATE_TYPE))->
264 finalize(G_OBJECT(self));
265}
266
267
268static void
269tracefile_stats_class_init (LttvTracefileStatsClass *klass)
270{
271 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
272
273 gobject_class->finalize = (void (*)(GObject *self)) tracefile_stats_finalize;
274}
275
276
277GType
278lttv_tracefile_stats_get_type(void)
279{
280 static GType type = 0;
281 if (type == 0) {
282 static const GTypeInfo info = {
283 sizeof (LttvTracefileStatsClass),
284 NULL, /* base_init */
285 NULL, /* base_finalize */
286 (GClassInitFunc) tracefile_stats_class_init, /* class_init */
287 NULL, /* class_finalize */
288 NULL, /* class_data */
289 sizeof (LttvTracefileStats),
290 0, /* n_preallocs */
291 (GInstanceInitFunc) tracefile_stats_instance_init /* instance_init */
292 };
293
294 type = g_type_register_static (LTTV_TRACEFILE_STATE_TYPE,
295 "LttvTracefileStatsType", &info, 0);
296 }
297 return type;
298}
299
300
301static void
302find_event_tree(LttvTracefileStats *tfcs, GQuark process, GQuark cpu,
303 GQuark mode, GQuark sub_mode, LttvAttribute **events_tree,
304 LttvAttribute **event_types_tree)
305{
306 LttvAttribute *a;
307
308 LttvTraceStats *tcs = LTTV_TRACE_STATS(tfcs->parent.parent.t_context);
309 a = lttv_attribute_find_subdir(tcs->stats, LTTV_STATS_PROCESSES);
310 a = lttv_attribute_find_subdir(a, tfcs->parent.process->pid_time);
311 a = lttv_attribute_find_subdir(a, LTTV_STATS_CPU);
312 a = lttv_attribute_find_subdir(a, tfcs->parent.cpu_name);
313 a = lttv_attribute_find_subdir(a, LTTV_STATS_MODE_TYPES);
314 a = lttv_attribute_find_subdir(a, tfcs->parent.process->state->t);
315 a = lttv_attribute_find_subdir(a, LTTV_STATS_SUBMODES);
316 a = lttv_attribute_find_subdir(a, tfcs->parent.process->state->n);
317 *events_tree = a;
318 a = lttv_attribute_find_subdir(a, LTTV_STATS_EVENT_TYPES);
319 *event_types_tree = a;
320}
321
322
323static void update_event_tree(LttvTracefileStats *tfcs)
324{
325 LttvExecutionState *es = tfcs->parent.process->state;
326
327 find_event_tree(tfcs, tfcs->parent.process->pid_time, tfcs->parent.cpu_name,
328 es->t, es->n, &(tfcs->current_events_tree),
329 &(tfcs->current_event_types_tree));
330}
331
332
333static void mode_change(LttvTracefileStats *tfcs)
334{
335 LttvAttributeValue cpu_time;
336
337 LttTime delta;
338
339 lttv_attribute_find(tfcs->current_events_tree, LTTV_STATS_CPU_TIME,
340 LTTV_TIME, &cpu_time);
308711e5 341 delta = ltt_time_sub(tfcs->parent.parent.timestamp,
b445142a 342 tfcs->parent.process->state->change);
308711e5 343 *(cpu_time.v_time) = ltt_time_add(*(cpu_time.v_time), delta);
b445142a 344}
345
346
347static void mode_end(LttvTracefileStats *tfcs)
348{
349 LttvAttributeValue elapsed_time, cpu_time;
350
351 LttTime delta;
352
353 lttv_attribute_find(tfcs->current_events_tree, LTTV_STATS_ELAPSED_TIME,
354 LTTV_TIME, &elapsed_time);
308711e5 355 delta = ltt_time_sub(tfcs->parent.parent.timestamp,
b445142a 356 tfcs->parent.process->state->entry);
308711e5 357 *(elapsed_time.v_time) = ltt_time_add(*(elapsed_time.v_time), delta);
b445142a 358
359 lttv_attribute_find(tfcs->current_events_tree, LTTV_STATS_CPU_TIME,
360 LTTV_TIME, &cpu_time);
308711e5 361 delta = ltt_time_sub(tfcs->parent.parent.timestamp,
b445142a 362 tfcs->parent.process->state->change);
308711e5 363 *(cpu_time.v_time) = ltt_time_add(*(cpu_time.v_time), delta);
b445142a 364}
365
366
367static gboolean before_syscall_entry(void *hook_data, void *call_data)
368{
369 mode_change((LttvTracefileStats *)call_data);
370 return FALSE;
371}
372
373
374static gboolean after_syscall_entry(void *hook_data, void *call_data)
375{
376 update_event_tree((LttvTracefileStats *)call_data);
377 return FALSE;
378}
379
380
381gboolean before_syscall_exit(void *hook_data, void *call_data)
382{
383 mode_end((LttvTracefileStats *)call_data);
384 return FALSE;
385}
386
387
388static gboolean after_syscall_exit(void *hook_data, void *call_data)
389{
390 update_event_tree((LttvTracefileStats *)call_data);
391 return FALSE;
392}
393
394
395gboolean before_trap_entry(void *hook_data, void *call_data)
396{
397 mode_change((LttvTracefileStats *)call_data);
398 return FALSE;
399}
400
401
402static gboolean after_trap_entry(void *hook_data, void *call_data)
403{
404 update_event_tree((LttvTracefileStats *)call_data);
405 return FALSE;
406}
407
408
409gboolean before_trap_exit(void *hook_data, void *call_data)
410{
411 mode_end((LttvTracefileStats *)call_data);
412 return FALSE;
413}
414
415
416gboolean after_trap_exit(void *hook_data, void *call_data)
417{
418 update_event_tree((LttvTracefileStats *)call_data);
419 return FALSE;
420}
421
422
423gboolean before_irq_entry(void *hook_data, void *call_data)
424{
425 mode_change((LttvTracefileStats *)call_data);
426 return FALSE;
427}
428
429
430gboolean after_irq_entry(void *hook_data, void *call_data)
431{
432 update_event_tree((LttvTracefileStats *)call_data);
433 return FALSE;
434}
435
436
437gboolean before_irq_exit(void *hook_data, void *call_data)
438{
439 mode_end((LttvTracefileStats *)call_data);
440 return FALSE;
441}
442
443
444gboolean after_irq_exit(void *hook_data, void *call_data)
445{
446 update_event_tree((LttvTracefileStats *)call_data);
447 return FALSE;
448}
449
450
451gboolean before_schedchange(void *hook_data, void *call_data)
452{
453 LttvTraceHook *h = (LttvTraceHook *)hook_data;
454
455 LttvTracefileStats *tfcs = (LttvTracefileStats *)call_data;
456
457 guint pid_in, pid_out, state_out;
458
459 LttvProcessState *process;
460
461 pid_in = ltt_event_get_unsigned(tfcs->parent.parent.e, h->f1);
462 pid_out = ltt_event_get_unsigned(tfcs->parent.parent.e, h->f2);
463 state_out = ltt_event_get_unsigned(tfcs->parent.parent.e, h->f3);
464
465 /* compute the time for the process to schedule out */
466
467 mode_change(tfcs);
468
469 /* get the information for the process scheduled in */
470
2a2fa4f0 471 process = lttv_state_find_process_or_create(&(tfcs->parent), pid_in);
b445142a 472
473 find_event_tree(tfcs, process->pid_time, tfcs->parent.cpu_name,
474 process->state->t, process->state->n, &(tfcs->current_events_tree),
475 &(tfcs->current_event_types_tree));
476
477 /* compute the time waiting for the process to schedule in */
478
479 mode_change(tfcs);
480 return FALSE;
481}
482
483
484gboolean process_fork(void *hook_data, void *call_data)
485{
486 /* nothing to do for now */
487 return FALSE;
488}
489
490
491gboolean process_exit(void *hook_data, void *call_data)
492{
493 /* We should probably exit all modes here or we could do that at
494 schedule out. */
495 return FALSE;
496}
497
498
499gboolean every_event(void *hook_data, void *call_data)
500{
501 LttvTracefileStats *tfcs = (LttvTracefileStats *)call_data;
502
503 LttvAttributeValue v;
504
505 /* The current branch corresponds to the tracefile/process/interrupt state.
506 Statistics are added within it, to count the number of events of this
507 type occuring in this context. A quark has been pre-allocated for each
508 event type and is used as name. */
509
510 lttv_attribute_find(tfcs->current_event_types_tree,
511 ((LttvTraceState *)(tfcs->parent.parent.t_context))->
512 eventtype_names[ltt_event_eventtype_id(tfcs->parent.parent.e)],
513 LTTV_UINT, &v);
514 (*(v.v_uint))++;
515 return FALSE;
516}
517
518
519static gboolean
520sum_stats(void *hook_data, void *call_data)
521{
522 LttvTracesetStats *tscs = (LttvTracesetStats *)call_data;
523
524 LttvTraceStats *tcs;
525
526 LttvTraceset *traceset = tscs->parent.parent.ts;
527
528 LttvAttributeType type;
529
530 LttvAttributeValue value;
531
532 LttvAttributeName name;
533
534 unsigned sum;
535
536 int i, j, k, l, m, n, nb_trace, nb_process, nb_cpu, nb_mode_type, nb_submode,
537 nb_event_type;
538
539 LttvAttribute *main_tree, *processes_tree, *process_tree, *cpus_tree,
540 *cpu_tree, *mode_tree, *mode_types_tree, *submodes_tree,
541 *submode_tree, *event_types_tree, *mode_events_tree,
542 *cpu_events_tree, *process_modes_tree, *trace_cpu_tree,
543 *trace_modes_tree, *traceset_modes_tree;
544
545 traceset_modes_tree = lttv_attribute_find_subdir(tscs->stats,
546 LTTV_STATS_MODES);
547 nb_trace = lttv_traceset_number(traceset);
548
549 for(i = 0 ; i < nb_trace ; i++) {
550 tcs = (LttvTraceStats *)(tscs->parent.parent.traces[i]);
551 main_tree = tcs->stats;
552 processes_tree = lttv_attribute_find_subdir(main_tree,
553 LTTV_STATS_PROCESSES);
554 trace_modes_tree = lttv_attribute_find_subdir(main_tree, LTTV_STATS_MODES);
555 nb_process = lttv_attribute_get_number(processes_tree);
556
557 for(j = 0 ; j < nb_process ; j++) {
558 type = lttv_attribute_get(processes_tree, j, &name, &value);
559 process_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
560
561 cpus_tree = lttv_attribute_find_subdir(process_tree, LTTV_STATS_CPU);
562 process_modes_tree = lttv_attribute_find_subdir(process_tree,
563 LTTV_STATS_MODES);
564 nb_cpu = lttv_attribute_get_number(cpus_tree);
565
566 for(k = 0 ; k < nb_cpu ; k++) {
567 type = lttv_attribute_get(cpus_tree, k, &name, &value);
568 cpu_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
569
570 mode_types_tree = lttv_attribute_find_subdir(cpu_tree,
571 LTTV_STATS_MODE_TYPES);
572 cpu_events_tree = lttv_attribute_find_subdir(cpu_tree,
573 LTTV_STATS_EVENTS);
574 trace_cpu_tree = lttv_attribute_find_subdir(main_tree, LTTV_STATS_CPU);
575 trace_cpu_tree = lttv_attribute_find_subdir(trace_cpu_tree, name);
576 nb_mode_type = lttv_attribute_get_number(mode_types_tree);
577
578 for(l = 0 ; l < nb_mode_type ; l++) {
579 type = lttv_attribute_get(mode_types_tree, l, &name, &value);
580 mode_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
581
582 submodes_tree = lttv_attribute_find_subdir(mode_tree,
583 LTTV_STATS_SUBMODES);
584 mode_events_tree = lttv_attribute_find_subdir(mode_tree,
585 LTTV_STATS_EVENTS);
586 nb_submode = lttv_attribute_get_number(submodes_tree);
587
588 for(m = 0 ; m < nb_submode ; m++) {
589 type = lttv_attribute_get(submodes_tree, m, &name, &value);
590 submode_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
591
592 event_types_tree = lttv_attribute_find_subdir(submode_tree,
593 LTTV_STATS_EVENT_TYPES);
594 nb_event_type = lttv_attribute_get_number(event_types_tree);
595
596 sum = 0;
597 for(n = 0 ; n < nb_event_type ; n++) {
598 type = lttv_attribute_get(event_types_tree, n, &name, &value);
599 sum += *(value.v_uint);
600 }
601 lttv_attribute_find(submode_tree, LTTV_STATS_EVENTS_COUNT,
602 LTTV_UINT, &value);
603 *(value.v_uint) = sum;
604 lttv_attribute_recursive_add(mode_events_tree, submode_tree);
605 }
606 lttv_attribute_recursive_add(cpu_events_tree, mode_events_tree);
607 }
608 lttv_attribute_recursive_add(process_modes_tree, cpu_tree);
609 lttv_attribute_recursive_add(trace_cpu_tree, cpu_tree);
610 }
611 lttv_attribute_recursive_add(trace_modes_tree, process_modes_tree);
612 }
613 lttv_attribute_recursive_add(traceset_modes_tree, trace_modes_tree);
614 }
615 return FALSE;
616}
617
618
619lttv_stats_add_event_hooks(LttvTracesetStats *self)
620{
621 LttvTraceset *traceset = self->parent.parent.ts;
622
dbb7bb09 623 guint i, j, k, nb_trace, nb_tracefile;
b445142a 624
625 LttFacility *f;
626
627 LttEventType *et;
628
629 LttvTraceStats *ts;
630
631 LttvTracefileStats *tfs;
632
633 void *hook_data;
634
635 GArray *hooks, *before_hooks, *after_hooks;
636
637 LttvTraceHook hook;
638
639 LttvAttributeValue val;
640
641 nb_trace = lttv_traceset_number(traceset);
642 for(i = 0 ; i < nb_trace ; i++) {
643 ts = (LttvTraceStats *)self->parent.parent.traces[i];
644
645 /* Find the eventtype id for the following events and register the
646 associated by id hooks. */
647
648 hooks = g_array_new(FALSE, FALSE, sizeof(LttvTraceHook));
649 g_array_set_size(hooks, 7);
650
651 lttv_trace_find_hook(ts->parent.parent.t, "core","syscall_entry",
652 "syscall_id", NULL, NULL, before_syscall_entry,
653 &g_array_index(hooks, LttvTraceHook, 0));
654
655 lttv_trace_find_hook(ts->parent.parent.t, "core", "syscall_exit", NULL,
656 NULL, NULL, before_syscall_exit,
657 &g_array_index(hooks, LttvTraceHook, 1));
658
659 lttv_trace_find_hook(ts->parent.parent.t, "core", "trap_entry", "trap_id",
660 NULL, NULL, before_trap_entry,
661 &g_array_index(hooks, LttvTraceHook, 2));
662
663 lttv_trace_find_hook(ts->parent.parent.t, "core", "trap_exit", NULL, NULL,
664 NULL, before_trap_exit, &g_array_index(hooks, LttvTraceHook, 3));
665
666 lttv_trace_find_hook(ts->parent.parent.t, "core", "irq_entry", "irq_id",
667 NULL, NULL, before_irq_entry, &g_array_index(hooks, LttvTraceHook, 4));
668
669 lttv_trace_find_hook(ts->parent.parent.t, "core", "irq_exit", NULL, NULL,
670 NULL, before_irq_exit, &g_array_index(hooks, LttvTraceHook, 5));
671
672 lttv_trace_find_hook(ts->parent.parent.t, "core", "schedchange", "in",
673 "out", "out_state", before_schedchange,
674 &g_array_index(hooks, LttvTraceHook, 6));
675
676 before_hooks = hooks;
677
678 hooks = g_array_new(FALSE, FALSE, sizeof(LttvTraceHook));
679 g_array_set_size(hooks, 8);
680
681 lttv_trace_find_hook(ts->parent.parent.t, "core","syscall_entry",
682 "syscall_id", NULL, NULL, after_syscall_entry,
683 &g_array_index(hooks, LttvTraceHook, 0));
684
685 lttv_trace_find_hook(ts->parent.parent.t, "core", "syscall_exit", NULL,
686 NULL, NULL, after_syscall_exit,
687 &g_array_index(hooks, LttvTraceHook, 1));
688
689 lttv_trace_find_hook(ts->parent.parent.t, "core", "trap_entry", "trap_id",
690 NULL, NULL, after_trap_entry, &g_array_index(hooks, LttvTraceHook, 2));
691
692 lttv_trace_find_hook(ts->parent.parent.t, "core", "trap_exit", NULL, NULL,
693 NULL, after_trap_exit, &g_array_index(hooks, LttvTraceHook, 3));
694
695 lttv_trace_find_hook(ts->parent.parent.t, "core", "irq_entry", "irq_id",
696 NULL, NULL, after_irq_entry, &g_array_index(hooks, LttvTraceHook, 4));
697
698 lttv_trace_find_hook(ts->parent.parent.t, "core", "irq_exit", NULL, NULL,
699 NULL, after_irq_exit, &g_array_index(hooks, LttvTraceHook, 5));
700
701 lttv_trace_find_hook(ts->parent.parent.t, "core", "process_fork",
702 "child_pid", NULL, NULL, process_fork,
703 &g_array_index(hooks, LttvTraceHook, 6));
704
705 lttv_trace_find_hook(ts->parent.parent.t, "core", "process_exit", NULL,
706 NULL, NULL, process_exit, &g_array_index(hooks, LttvTraceHook, 7));
707
708 after_hooks = hooks;
709
710 /* Add these hooks to each before_event_by_id hooks list */
711
dbb7bb09 712 nb_tracefile = ltt_trace_control_tracefile_number(ts->parent.parent.t) +
713 ltt_trace_per_cpu_tracefile_number(ts->parent.parent.t);
b445142a 714
dbb7bb09 715 for(j = 0 ; j < nb_tracefile ; j++) {
716 tfs = LTTV_TRACEFILE_STATS(ts->parent.parent.tracefiles[j]);
b445142a 717 lttv_hooks_add(tfs->parent.parent.after_event, every_event, NULL);
718
719 for(k = 0 ; k < before_hooks->len ; k++) {
720 hook = g_array_index(before_hooks, LttvTraceHook, k);
721 lttv_hooks_add(lttv_hooks_by_id_find(
722 tfs->parent.parent.before_event_by_id,
723 hook.id), hook.h, &g_array_index(before_hooks, LttvTraceHook, k));
724 }
725 for(k = 0 ; k < after_hooks->len ; k++) {
726 hook = g_array_index(after_hooks, LttvTraceHook, k);
727 lttv_hooks_add(lttv_hooks_by_id_find(
728 tfs->parent.parent.after_event_by_id,
729 hook.id), hook.h, &g_array_index(after_hooks, LttvTraceHook, k));
730 }
731 }
732 lttv_attribute_find(self->parent.parent.a, LTTV_STATS_BEFORE_HOOKS,
733 LTTV_POINTER, &val);
734 *(val.v_pointer) = before_hooks;
735 lttv_attribute_find(self->parent.parent.a, LTTV_STATS_AFTER_HOOKS,
736 LTTV_POINTER, &val);
737 *(val.v_pointer) = after_hooks;
738 }
739 lttv_hooks_add(self->parent.parent.after, sum_stats, NULL);
740}
741
742
743lttv_stats_remove_event_hooks(LttvTracesetStats *self)
744{
745 LttvTraceset *traceset = self->parent.parent.ts;
746
dbb7bb09 747 guint i, j, k, nb_trace, nb_tracefile;
b445142a 748
749 LttvTraceStats *ts;
750
751 LttvTracefileStats *tfs;
752
753 void *hook_data;
754
755 GArray *before_hooks, *after_hooks;
756
757 LttvTraceHook hook;
758
759 LttvAttributeValue val;
760
761 nb_trace = lttv_traceset_number(traceset);
762 for(i = 0 ; i < nb_trace ; i++) {
763 ts = LTTV_TRACE_STATS(self->parent.parent.traces[i]);
764 lttv_attribute_find(self->parent.parent.a, LTTV_STATS_BEFORE_HOOKS,
765 LTTV_POINTER, &val);
766 before_hooks = *(val.v_pointer);
767 lttv_attribute_find(self->parent.parent.a, LTTV_STATS_AFTER_HOOKS,
768 LTTV_POINTER, &val);
769 after_hooks = *(val.v_pointer);
770
771 /* Add these hooks to each before_event_by_id hooks list */
772
dbb7bb09 773 nb_tracefile = ltt_trace_control_tracefile_number(ts->parent.parent.t) +
774 ltt_trace_per_cpu_tracefile_number(ts->parent.parent.t);
b445142a 775
dbb7bb09 776 for(j = 0 ; j < nb_tracefile ; j++) {
777 tfs = LTTV_TRACEFILE_STATS(ts->parent.parent.tracefiles[j]);
b445142a 778 lttv_hooks_remove_data(tfs->parent.parent.after_event, every_event,
779 NULL);
780
781 for(k = 0 ; k < before_hooks->len ; k++) {
782 hook = g_array_index(before_hooks, LttvTraceHook, k);
783 lttv_hooks_remove_data(
784 lttv_hooks_by_id_find(tfs->parent.parent.before_event_by_id,
785 hook.id), hook.h, &g_array_index(before_hooks, LttvTraceHook, k));
786 }
787 for(k = 0 ; k < after_hooks->len ; k++) {
788 hook = g_array_index(after_hooks, LttvTraceHook, k);
789 lttv_hooks_remove_data(
790 lttv_hooks_by_id_find(tfs->parent.parent.after_event_by_id,
791 hook.id), hook.h, &g_array_index(after_hooks, LttvTraceHook, k));
792 }
793 }
2a2fa4f0 794 g_debug("lttv_stats_remove_event_hooks()");
b445142a 795 g_array_free(before_hooks, TRUE);
796 g_array_free(after_hooks, TRUE);
797 }
798 lttv_hooks_remove_data(self->parent.parent.after, sum_stats, NULL);
799}
800
801
9f797243 802void lttv_stats_save_attribute(LttvAttribute *attr, char *indent, FILE * fp)
803{
804 LttvAttributeType type;
805 LttvAttributeValue value;
806 LttvAttributeName name;
807 char type_value[BUF_SIZE];
808 int i, nb_attr, flag;
809
810 nb_attr = lttv_attribute_get_number(attr);
811 for(i=0;i<nb_attr;i++){
812 flag = 1;
813 type = lttv_attribute_get(attr, i, &name, &value);
814 switch(type) {
815 case LTTV_INT:
816 sprintf(type_value, "%d\0", *value.v_int);
817 break;
818 case LTTV_UINT:
819 sprintf(type_value, "%u\0", *value.v_uint);
820 break;
821 case LTTV_LONG:
822 sprintf(type_value, "%ld\0", *value.v_long);
823 break;
824 case LTTV_ULONG:
825 sprintf(type_value, "%lu\0", *value.v_ulong);
826 break;
827 case LTTV_FLOAT:
828 sprintf(type_value, "%f\0", (double)*value.v_float);
829 break;
830 case LTTV_DOUBLE:
831 sprintf(type_value, "%f\0", *value.v_double);
832 break;
833 case LTTV_TIME:
834 sprintf(type_value, "%10u.%09u\0", value.v_time->tv_sec,
835 value.v_time->tv_nsec);
836 break;
837 case LTTV_POINTER:
838 sprintf(type_value, "POINTER\0");
839 break;
840 case LTTV_STRING:
841 sprintf(type_value, "%s\0", *value.v_string);
842 break;
843 default:
844 flag = 0;
845 break;
846 }
847 if(flag == 0) continue;
848 fprintf(fp,"%s<VALUE type=\"%d\" name=\"%s\">",indent,type,g_quark_to_string(name));
849 fprintf(fp,"%s",type_value);
850 fprintf(fp,"</VALUE> \n");
851 }
852
853}
854
855void lttv_stats_save_statistics(LttvTracesetStats *self)
856{
857 LttvTracesetStats *tscs = self;
858 LttvTraceStats *tcs;
859 LttvTraceset *traceset = tscs->parent.parent.ts;
860 LttvAttributeType type;
861 LttvAttributeValue value;
862 LttvAttributeName name;
863
864 char filename[BUF_SIZE];
865 FILE * fp;
866 char indent[10][24]= {" ",
867 " ",
868 " ",
869 " ",
870 " ",
871 " ",
872 " ",
873 " ",
874 " ",
875 " "
876 };
877
878
879 int i, j, k, l, m, n, nb_trace, nb_process, nb_cpu, nb_mode_type, nb_submode;
880
881 LttvAttribute *main_tree, *processes_tree, *process_tree, *cpus_tree,
882 *cpu_tree, *mode_tree, *mode_types_tree, *submodes_tree,
883 *submode_tree, *event_types_tree;
884
885 nb_trace = lttv_traceset_number(traceset);
886
887 for(i = 0 ; i < nb_trace ; i++) {
888 tcs = (LttvTraceStats *)(tscs->parent.parent.traces[i]);
889
890 filename[0] = '\0';
891 strcat(filename,ltt_trace_name(tcs->parent.parent.t));
892 strcat(filename,"/statistics.xml");
893 fp = fopen(filename,"w");
894 if(!fp){
895 g_warning("can not open the file %s for saving statistics\n", filename);
896 exit(1);
897 }
898
899 main_tree = tcs->stats;
900 processes_tree = lttv_attribute_find_subdir(main_tree, LTTV_STATS_PROCESSES);
901 nb_process = lttv_attribute_get_number(processes_tree);
902
903 fprintf(fp, "<NODE name=\"%s\"> \n",g_quark_to_string(LTTV_STATS_PROCESSES)); //root NODE
904
905 for(j = 0 ; j < nb_process ; j++) {
906 type = lttv_attribute_get(processes_tree, j, &name, &value);
907 process_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
908
909 fprintf(fp,"%s<NODE name=\"%s\"> \n",indent[0],g_quark_to_string(name)); //process NODE
910 lttv_stats_save_attribute(process_tree,indent[1], fp);
911 fprintf(fp,"%s<NODE name=\"%s\"> \n", indent[1],g_quark_to_string(LTTV_STATS_CPU)); //cpus NODE
912
913 cpus_tree = lttv_attribute_find_subdir(process_tree, LTTV_STATS_CPU);
914 nb_cpu = lttv_attribute_get_number(cpus_tree);
915
916 for(k = 0 ; k < nb_cpu ; k++) {
917 type = lttv_attribute_get(cpus_tree, k, &name, &value);
918 cpu_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
919
920 fprintf(fp,"%s<NODE name=\"%s\"> \n",indent[2],g_quark_to_string(name)); //cpu NODE
921 lttv_stats_save_attribute(cpu_tree,indent[3], fp);
922 fprintf(fp,"%s<NODE name=\"%s\"> \n",indent[3],g_quark_to_string(LTTV_STATS_MODE_TYPES)); //mode_types NODE
923
924 mode_types_tree = lttv_attribute_find_subdir(cpu_tree,LTTV_STATS_MODE_TYPES);
925 nb_mode_type = lttv_attribute_get_number(mode_types_tree);
926
927 for(l = 0 ; l < nb_mode_type ; l++) {
928 type = lttv_attribute_get(mode_types_tree, l, &name, &value);
929 mode_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
930
931 fprintf(fp,"%s<NODE name=\"%s\"> \n",indent[4],g_quark_to_string(name)); //mode NODE
932 lttv_stats_save_attribute(mode_tree,indent[5], fp);
933 fprintf(fp,"%s<NODE name=\"%s\"> \n",indent[5],g_quark_to_string(LTTV_STATS_SUBMODES)); //sub_modes NODE
934
935 submodes_tree = lttv_attribute_find_subdir(mode_tree,LTTV_STATS_SUBMODES);
936 nb_submode = lttv_attribute_get_number(submodes_tree);
937
938 for(m = 0 ; m < nb_submode ; m++) {
939 type = lttv_attribute_get(submodes_tree, m, &name, &value);
940 submode_tree = LTTV_ATTRIBUTE(*(value.v_gobject));
941 fprintf(fp,"%s<NODE name=\"%s\"> \n",indent[6],g_quark_to_string(name)); //sub_mode NODE
942 lttv_stats_save_attribute(submode_tree,indent[7], fp);
943 fprintf(fp,"%s<NODE name=\"%s\"> \n",indent[7],g_quark_to_string(LTTV_STATS_EVENT_TYPES)); //event_types NODE
944
945 event_types_tree = lttv_attribute_find_subdir(submode_tree, LTTV_STATS_EVENT_TYPES);
946 lttv_stats_save_attribute(event_types_tree,indent[8], fp);
947
948 fprintf(fp,"%s</NODE> \n",indent[7]); //event_types NODE
949 fprintf(fp,"%s</NODE> \n",indent[6]); //sub_mode NODE
950 }
951 fprintf(fp,"%s</NODE> \n",indent[5]); //sub_modes NODE
952 fprintf(fp,"%s</NODE> \n",indent[4]); //mode NODE
953 }
954 fprintf(fp,"%s</NODE> \n",indent[3]); //mode_type NODE
955 fprintf(fp,"%s</NODE> \n",indent[2]); //cpu NODE
956 }
957 fprintf(fp,"%s</NODE> \n",indent[1]); //cpus NODE
958 fprintf(fp,"%s</NODE> \n", indent[0]); //process NODE
959 }
960 fprintf(fp, "</NODE>\n"); //root NODE
961 fclose(fp);
962 }
963}
964
965
966/* Functions to parse statistic.xml file (using glib xml parser) */
967
968typedef struct _ParserStruct{
969 GPtrArray * attribute;
970 LttvAttributeType type;
971 LttvAttributeName name;
972} ParserStruct;
973
974static void stats_parser_start_element (GMarkupParseContext *context,
975 const gchar *element_name,
976 const gchar **attribute_names,
977 const gchar **attribute_values,
978 gpointer user_data,
979 GError **error)
980{
981 ParserStruct * parser = (ParserStruct *)user_data;
982 int len;
983 LttvAttributeType type;
984 LttvAttributeName name;
985 LttvAttribute * parent_att, *new_att;
986
987 len = parser->attribute->len;
988 parent_att = (LttvAttribute *)g_ptr_array_index (parser->attribute, len-1);
989
990 if(strcmp("NODE", element_name) == 0){
991 type = LTTV_GOBJECT;
992 name = g_quark_from_string(attribute_values[0]);
993 new_att = lttv_attribute_find_subdir(parent_att,name);
994 g_ptr_array_add(parser->attribute, (gpointer)new_att);
995 }else if(strcmp("VALUE", element_name) == 0){
996 parser->type = (LttvAttributeType) atoi(attribute_values[0]);
997 parser->name = g_quark_from_string(attribute_values[1]);
998 }else{
999 g_warning("This is not statistics.xml file\n");
1000 exit(1);
1001 }
1002}
1003
1004static void stats_parser_end_element (GMarkupParseContext *context,
1005 const gchar *element_name,
1006 gpointer user_data,
1007 GError **error)
1008{
1009 ParserStruct * parser = (ParserStruct *)user_data;
1010 int len;
1011 LttvAttribute * parent_att;
1012
1013 len = parser->attribute->len;
1014 parent_att = (LttvAttribute *)g_ptr_array_index (parser->attribute, len-1);
1015
1016 if(strcmp("NODE", element_name) == 0){
1017 g_ptr_array_remove_index(parser->attribute, len-1);
1018 }else if(strcmp("VALUE", element_name) == 0){
1019 }else{
1020 g_warning("This is not statistics.xml file\n");
1021 exit(1);
1022 }
1023
1024}
1025
1026static void stats_parser_characters (GMarkupParseContext *context,
1027 const gchar *text,
1028 gsize text_len,
1029 gpointer user_data,
1030 GError **error)
1031{
1032 ParserStruct * parser = (ParserStruct *)user_data;
1033 LttvAttributeValue value;
1034 int len;
1035 LttvAttribute * parent_att;
1036 char *pos;
1037
1038 pos = (char*)text;
1039 for(len=0;len<text_len;len++){
1040 if(isspace(*pos)){
1041 pos++;
1042 continue;
1043 }
1044 break;
1045 }
1046 if(strlen(pos) == 0)return;
1047
1048 len = parser->attribute->len;
1049 parent_att = (LttvAttribute *)g_ptr_array_index (parser->attribute, len-1);
1050 if(!lttv_attribute_find(parent_att,parser->name, parser->type, &value)){
1051 g_warning("can not find value\n");
1052 exit(1);
1053 }
1054
1055 switch(parser->type) {
1056 case LTTV_INT:
1057 *value.v_int = atoi(text);
1058 break;
1059 case LTTV_UINT:
1060 *value.v_uint = (unsigned)atoi(text);
1061 break;
1062 case LTTV_LONG:
1063 *value.v_long = atol(text);
1064 break;
1065 case LTTV_ULONG:
1066 *value.v_ulong = (unsigned long)atol(text);
1067 break;
1068 case LTTV_FLOAT:
1069 *value.v_float = atof(text);
1070 break;
1071 case LTTV_DOUBLE:
1072 *value.v_float = atof(text);
1073 break;
1074 case LTTV_TIME:
1075 pos = strrchr(text,'.');
1076 if(pos){
1077 *pos = '\0';
1078 pos++;
1079 value.v_time->tv_sec = atol(text);
1080 value.v_time->tv_nsec = atol(pos);
1081 }else{
1082 g_warning("The time value format is wrong\n");
1083 exit(1);
1084 }
1085 break;
1086 case LTTV_POINTER:
1087 break;
1088 case LTTV_STRING:
1089 *value.v_string = g_strdup(text);
1090 break;
1091 default:
1092 break;
1093 }
1094
1095}
1096
1097gboolean lttv_stats_load_statistics(LttvTracesetStats *self)
1098{
1099 FILE * fp;
1100 char buf[BUF_SIZE];
1101 LttvTracesetStats *tscs = self;
1102 LttvTraceStats *tcs;
1103 LttvTraceset *traceset = tscs->parent.parent.ts;
1104 char filename[BUF_SIZE];
1105
1106 GMarkupParseContext * context;
08b1c66e 1107 GError * error = NULL;
9f797243 1108 GMarkupParser markup_parser =
1109 {
1110 stats_parser_start_element,
1111 stats_parser_end_element,
1112 stats_parser_characters,
1113 NULL, /* passthrough */
1114 NULL /* error */
1115 };
1116
1117 int i, nb_trace;
1118 LttvAttribute *main_tree;
1119 ParserStruct a_parser_struct;
1120 a_parser_struct.attribute = g_ptr_array_new();
1121
1122 nb_trace = lttv_traceset_number(traceset);
1123
1124 for(i = 0 ; i < nb_trace ; i++) {
1125 tcs = (LttvTraceStats *)(tscs->parent.parent.traces[i]);
1126
1127 filename[0] = '\0';
1128 strcat(filename,ltt_trace_name(tcs->parent.parent.t));
1129 strcat(filename,"/statistics.xml");
1130 fp = fopen(filename,"r");
1131 if(!fp){
1132 g_warning("can not open the file %s for reading statistics\n", filename);
1133 return FALSE;
1134 }
1135
1136 main_tree = tcs->stats;
1137 g_ptr_array_add(a_parser_struct.attribute,(gpointer)main_tree);
1138
1139 context = g_markup_parse_context_new(&markup_parser, 0, (gpointer)&a_parser_struct, NULL);
1140
1141 while(fgets(buf,BUF_SIZE, fp) != NULL){
1142 if(!g_markup_parse_context_parse(context, buf, BUF_SIZE, &error)){
1143 g_warning("Can not parse xml file: \n%s\n", error->message);
1144 exit(1);
1145 }
1146 }
1147 fclose(fp);
1148 }
1149
1150 sum_stats(NULL, (void *)self);
1151
1152 return TRUE;
1153}
08b1c66e 1154
1155
1156static void module_init()
1157{
1158 LTTV_STATS_PROCESS_UNKNOWN = g_quark_from_string("unknown process");
1159 LTTV_STATS_PROCESSES = g_quark_from_string("processes");
1160 LTTV_STATS_CPU = g_quark_from_string("cpu");
1161 LTTV_STATS_MODE_TYPES = g_quark_from_string("mode_types");
1162 LTTV_STATS_MODES = g_quark_from_string("modes");
1163 LTTV_STATS_SUBMODES = g_quark_from_string("submodes");
1164 LTTV_STATS_EVENT_TYPES = g_quark_from_string("event_types");
1165 LTTV_STATS_CPU_TIME = g_quark_from_string("cpu time");
1166 LTTV_STATS_ELAPSED_TIME = g_quark_from_string("elapsed time");
1167 LTTV_STATS_EVENTS = g_quark_from_string("events");
1168 LTTV_STATS_EVENTS_COUNT = g_quark_from_string("events count");
1169 LTTV_STATS_BEFORE_HOOKS = g_quark_from_string("saved stats before hooks");
1170 LTTV_STATS_AFTER_HOOKS = g_quark_from_string("saved stats after hooks");
1171}
1172
1173static void module_destroy()
1174{
1175}
1176
1177
1178LTTV_MODULE("stats", "Compute processes statistics", \
1179 "Accumulate statistics for event types, processes and CPUs", \
1180 module_init, module_destroy, "state");
LTTng 2.x Viewer (LTTV)
This page took 0.066012 seconds and 4 git commands to generate.