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