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