multiple traces/tracefiles change
[lttv.git] / ltt / branches / poly / lttv / main / state.c
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
19
20 #include <lttv/state.h>
21 #include <ltt/facility.h>
22 #include <ltt/trace.h>
23 #include <ltt/event.h>
24 #include <ltt/type.h>
25
26 LttvExecutionMode
27 LTTV_STATE_MODE_UNKNOWN,
28 LTTV_STATE_USER_MODE,
29 LTTV_STATE_SYSCALL,
30 LTTV_STATE_TRAP,
31 LTTV_STATE_IRQ;
32
33 LttvExecutionSubmode
34 LTTV_STATE_SUBMODE_UNKNOWN,
35 LTTV_STATE_SUBMODE_NONE;
36
37 LttvProcessStatus
38 LTTV_STATE_UNNAMED,
39 LTTV_STATE_WAIT_FORK,
40 LTTV_STATE_WAIT_CPU,
41 LTTV_STATE_EXIT,
42 LTTV_STATE_WAIT,
43 LTTV_STATE_RUN;
44
45 static GQuark
46 LTTV_STATE_TRACEFILES,
47 LTTV_STATE_PROCESSES,
48 LTTV_STATE_PROCESS,
49 LTTV_STATE_EVENT,
50 LTTV_STATE_SAVED_STATES,
51 LTTV_STATE_TIME,
52 LTTV_STATE_HOOKS;
53
54
55 static void fill_name_tables(LttvTraceState *tcs);
56
57 static void free_name_tables(LttvTraceState *tcs);
58
59 static void lttv_state_free_process_table(GHashTable *processes);
60
61 static LttvProcessState *create_process(LttvTracefileState *tfs,
62 LttvProcessState *parent, guint pid);
63
64 void lttv_state_save(LttvTraceState *self, LttvAttribute *container)
65 {
66 LTTV_TRACE_STATE_GET_CLASS(self)->state_save(self, container);
67 }
68
69
70 void lttv_state_restore(LttvTraceState *self, LttvAttribute *container)
71 {
72 LTTV_TRACE_STATE_GET_CLASS(self)->state_restore(self, container);
73 }
74
75
76 void lttv_state_saved_state_free(LttvTraceState *self,
77 LttvAttribute *container)
78 {
79 LTTV_TRACE_STATE_GET_CLASS(self)->state_restore(self, container);
80 }
81
82
83 static void
84 restore_init_state(LttvTraceState *self)
85 {
86 guint i, nb_control, nb_per_cpu, nb_tracefile;
87
88 LttvTracefileState *tfcs;
89
90 LttTime null_time = {0,0};
91
92 if(self->processes != NULL) lttv_state_free_process_table(self->processes);
93 self->processes = g_hash_table_new(g_direct_hash, g_direct_equal);
94 self->nb_event = 0;
95
96 nb_control = ltt_trace_control_tracefile_number(self->parent.t);
97 nb_per_cpu = ltt_trace_per_cpu_tracefile_number(self->parent.t);
98 nb_tracefile = nb_control + nb_per_cpu;
99 for(i = 0 ; i < nb_tracefile ; i++) {
100 if(i < nb_control) {
101 tfcs = LTTV_TRACEFILE_STATE(self->parent.control_tracefiles[i]);
102 }
103 else {
104 tfcs = LTTV_TRACEFILE_STATE(self->parent.per_cpu_tracefiles[i - nb_control]);
105 }
106
107 tfcs->parent.timestamp = null_time;
108 tfcs->saved_position = 0;
109 tfcs->process = create_process(tfcs, NULL,0);
110 }
111 }
112
113
114 static void
115 init(LttvTracesetState *self, LttvTraceset *ts)
116 {
117 guint i, j, nb_trace, nb_control, nb_per_cpu, nb_tracefile;
118
119 LttvTraceContext *tc;
120
121 LttvTraceState *tcs;
122
123 LttvTracefileState *tfcs;
124
125 LTTV_TRACESET_CONTEXT_CLASS(g_type_class_peek(LTTV_TRACESET_CONTEXT_TYPE))->
126 init((LttvTracesetContext *)self, ts);
127
128 nb_trace = lttv_traceset_number(ts);
129 for(i = 0 ; i < nb_trace ; i++) {
130 tc = self->parent.traces[i];
131 tcs = (LttvTraceState *)tc;
132 tcs->save_interval = 100000;
133 tcs->recompute_state_in_seek = TRUE;
134 tcs->saved_state_ready = FALSE;
135 fill_name_tables(tcs);
136
137 nb_control = ltt_trace_control_tracefile_number(tc->t);
138 nb_per_cpu = ltt_trace_per_cpu_tracefile_number(tc->t);
139 nb_tracefile = nb_control + nb_per_cpu;
140 for(j = 0 ; j < nb_tracefile ; j++) {
141 if(j < nb_control) {
142 tfcs = LTTV_TRACEFILE_STATE(tc->control_tracefiles[j]);
143 }
144 else {
145 tfcs = LTTV_TRACEFILE_STATE(tc->per_cpu_tracefiles[j - nb_control]);
146 }
147 tfcs->cpu_name= g_quark_from_string(ltt_tracefile_name(tfcs->parent.tf));
148 }
149 tcs->processes = NULL;
150 restore_init_state(tcs);
151 }
152 }
153
154
155 static void
156 fini(LttvTracesetState *self)
157 {
158 guint i, j, nb_trace, nb_tracefile;
159
160 LttvTraceState *tcs;
161
162 LttvTracefileState *tfcs;
163
164 nb_trace = lttv_traceset_number(LTTV_TRACESET_CONTEXT(self)->ts);
165 for(i = 0 ; i < nb_trace ; i++) {
166 tcs = (LttvTraceState *)(LTTV_TRACESET_CONTEXT(self)->traces[i]);
167 lttv_state_free_process_table(tcs->processes);
168 tcs->processes = NULL;
169 free_name_tables(tcs);
170 }
171 LTTV_TRACESET_CONTEXT_CLASS(g_type_class_peek(LTTV_TRACESET_CONTEXT_TYPE))->
172 fini((LttvTracesetContext *)self);
173 }
174
175
176 static LttvTracesetContext *
177 new_traceset_context(LttvTracesetContext *self)
178 {
179 return LTTV_TRACESET_CONTEXT(g_object_new(LTTV_TRACESET_STATE_TYPE, NULL));
180 }
181
182
183 static LttvTraceContext *
184 new_trace_context(LttvTracesetContext *self)
185 {
186 return LTTV_TRACE_CONTEXT(g_object_new(LTTV_TRACE_STATE_TYPE, NULL));
187 }
188
189
190 static LttvTracefileContext *
191 new_tracefile_context(LttvTracesetContext *self)
192 {
193 return LTTV_TRACEFILE_CONTEXT(g_object_new(LTTV_TRACEFILE_STATE_TYPE, NULL));
194 }
195
196
197 static void copy_process_state(gpointer key, gpointer value,gpointer user_data)
198 {
199 LttvProcessState *process, *new_process;
200
201 GHashTable *new_processes = (GHashTable *)user_data;
202
203 guint i;
204
205 process = (LttvProcessState *)value;
206 new_process = g_new(LttvProcessState, 1);
207 *new_process = *process;
208 new_process->execution_stack = g_array_new(FALSE, FALSE,
209 sizeof(LttvExecutionState));
210 g_array_set_size(new_process->execution_stack,process->execution_stack->len);
211 for(i = 0 ; i < process->execution_stack->len; i++) {
212 g_array_index(new_process->execution_stack, LttvExecutionState, i) =
213 g_array_index(process->execution_stack, LttvExecutionState, i);
214 }
215 new_process->state = &g_array_index(new_process->execution_stack,
216 LttvExecutionState, new_process->execution_stack->len - 1);
217 g_hash_table_insert(new_processes, GUINT_TO_POINTER(new_process->pid),
218 new_process);
219 }
220
221
222 static GHashTable *lttv_state_copy_process_table(GHashTable *processes)
223 {
224 GHashTable *new_processes = g_hash_table_new(g_direct_hash, g_direct_equal);
225
226 g_hash_table_foreach(processes, copy_process_state, new_processes);
227 return new_processes;
228 }
229
230
231 /* The saved state for each trace contains a member "processes", which
232 stores a copy of the process table, and a member "tracefiles" with
233 one entry per tracefile. Each tracefile has a "process" member pointing
234 to the current process and a "position" member storing the tracefile
235 position (needed to seek to the current "next" event. */
236
237 static void state_save(LttvTraceState *self, LttvAttribute *container)
238 {
239 guint i, nb_control, nb_per_cpu, nb_tracefile;
240
241 LttvTracefileState *tfcs;
242
243 LttvAttribute *tracefiles_tree, *tracefile_tree;
244
245 LttvAttributeType type;
246
247 LttvAttributeValue value;
248
249 LttvAttributeName name;
250
251 LttEventPosition *ep;
252
253 tracefiles_tree = lttv_attribute_find_subdir(container,
254 LTTV_STATE_TRACEFILES);
255
256 value = lttv_attribute_add(container, LTTV_STATE_PROCESSES,
257 LTTV_POINTER);
258 *(value.v_pointer) = lttv_state_copy_process_table(self->processes);
259
260 nb_control = ltt_trace_control_tracefile_number(self->parent.t);
261 nb_per_cpu = ltt_trace_per_cpu_tracefile_number(self->parent.t);
262 nb_tracefile = nb_control + nb_per_cpu;
263
264 for(i = 0 ; i < nb_tracefile ; i++) {
265 if(i < nb_control)
266 tfcs = (LttvTracefileState *)self->parent.control_tracefiles[i];
267 else tfcs = (LttvTracefileState *)
268 self->parent.per_cpu_tracefiles[i - nb_control];
269
270 tracefile_tree = g_object_new(LTTV_ATTRIBUTE_TYPE, NULL);
271 value = lttv_attribute_add(tracefiles_tree, i,
272 LTTV_GOBJECT);
273 *(value.v_gobject) = (GObject *)tracefile_tree;
274 value = lttv_attribute_add(tracefile_tree, LTTV_STATE_PROCESS,
275 LTTV_UINT);
276 *(value.v_uint) = tfcs->process->pid;
277 value = lttv_attribute_add(tracefile_tree, LTTV_STATE_EVENT,
278 LTTV_POINTER);
279 if(tfcs->parent.e == NULL) *(value.v_pointer) = NULL;
280 else {
281 ep = ltt_event_position_new();
282 ltt_event_position(tfcs->parent.e, ep);
283 *(value.v_pointer) = ep;
284 }
285 }
286 }
287
288
289 static void state_restore(LttvTraceState *self, LttvAttribute *container)
290 {
291 guint i, nb_control, nb_per_cpu, nb_tracefile;
292
293 LttvTracefileState *tfcs;
294
295 LttvAttribute *tracefiles_tree, *tracefile_tree;
296
297 LttvAttributeType type;
298
299 LttvAttributeValue value;
300
301 LttvAttributeName name;
302
303 LttEventPosition *ep;
304
305 tracefiles_tree = lttv_attribute_find_subdir(container,
306 LTTV_STATE_TRACEFILES);
307
308 type = lttv_attribute_get_by_name(container, LTTV_STATE_PROCESSES,
309 &value);
310 g_assert(type == LTTV_POINTER);
311 lttv_state_free_process_table(self->processes);
312 self->processes = lttv_state_copy_process_table(*(value.v_pointer));
313
314 nb_control = ltt_trace_control_tracefile_number(self->parent.t);
315 nb_per_cpu = ltt_trace_per_cpu_tracefile_number(self->parent.t);
316 nb_tracefile = nb_control + nb_per_cpu;
317
318 for(i = 0 ; i < nb_tracefile ; i++) {
319 if(i < nb_control) tfcs = (LttvTracefileState *)
320 self->parent.control_tracefiles[i];
321 else tfcs = (LttvTracefileState *)
322 self->parent.per_cpu_tracefiles[i - nb_control];
323
324 type = lttv_attribute_get(tracefiles_tree, i, &name, &value);
325 g_assert(type == LTTV_GOBJECT);
326 tracefile_tree = *((LttvAttribute **)(value.v_gobject));
327
328 type = lttv_attribute_get_by_name(tracefile_tree, LTTV_STATE_PROCESS,
329 &value);
330 g_assert(type == LTTV_UINT);
331 tfcs->process = lttv_state_find_process(tfcs, *(value.v_uint));
332 type = lttv_attribute_get_by_name(tracefile_tree, LTTV_STATE_EVENT,
333 &value);
334 g_assert(type == LTTV_POINTER);
335 if(*(value.v_pointer) == NULL) tfcs->parent.e = NULL;
336 else {
337 ep = *(value.v_pointer);
338 ltt_tracefile_seek_position(tfcs->parent.tf, ep);
339 tfcs->parent.e = ltt_tracefile_read(tfcs->parent.tf);
340 tfcs->parent.timestamp = ltt_event_time(tfcs->parent.e);
341 }
342 }
343 }
344
345
346 static void state_saved_free(LttvTraceState *self, LttvAttribute *container)
347 {
348 guint i, nb_control, nb_per_cpu, nb_tracefile;
349
350 LttvTracefileState *tfcs;
351
352 LttvAttribute *tracefiles_tree, *tracefile_tree;
353
354 LttvAttributeType type;
355
356 LttvAttributeValue value;
357
358 LttvAttributeName name;
359
360 LttEventPosition *ep;
361
362 tracefiles_tree = lttv_attribute_find_subdir(container,
363 LTTV_STATE_TRACEFILES);
364 lttv_attribute_remove_by_name(container, LTTV_STATE_TRACEFILES);
365
366 type = lttv_attribute_get_by_name(container, LTTV_STATE_PROCESSES,
367 &value);
368 g_assert(type == LTTV_POINTER);
369 lttv_state_free_process_table(*(value.v_pointer));
370 *(value.v_pointer) = NULL;
371 lttv_attribute_remove_by_name(container, LTTV_STATE_PROCESSES);
372
373 nb_control = ltt_trace_control_tracefile_number(self->parent.t);
374 nb_per_cpu = ltt_trace_per_cpu_tracefile_number(self->parent.t);
375 nb_tracefile = nb_control + nb_per_cpu;
376
377 for(i = 0 ; i < nb_tracefile ; i++) {
378 if(i < nb_control) tfcs = (LttvTracefileState *)
379 self->parent.control_tracefiles[i];
380 else tfcs = (LttvTracefileState *)
381 self->parent.per_cpu_tracefiles[i - nb_control];
382
383 type = lttv_attribute_get(tracefiles_tree, i, &name, &value);
384 g_assert(type == LTTV_GOBJECT);
385 tracefile_tree = *((LttvAttribute **)(value.v_gobject));
386
387 type = lttv_attribute_get_by_name(tracefile_tree, LTTV_STATE_EVENT,
388 &value);
389 g_assert(type == LTTV_POINTER);
390 if(*(value.v_pointer) != NULL) g_free(*(value.v_pointer));
391 }
392 lttv_attribute_recursive_free(tracefiles_tree);
393 }
394
395
396 static void
397 fill_name_tables(LttvTraceState *tcs)
398 {
399 int i, nb;
400
401 char *f_name, *e_name;
402
403 LttvTraceHook h;
404
405 LttEventType *et;
406
407 LttType *t;
408
409 GString *fe_name = g_string_new("");
410
411 nb = ltt_trace_eventtype_number(tcs->parent.t);
412 tcs->eventtype_names = g_new(GQuark, nb);
413 for(i = 0 ; i < nb ; i++) {
414 et = ltt_trace_eventtype_get(tcs->parent.t, i);
415 e_name = ltt_eventtype_name(et);
416 f_name = ltt_facility_name(ltt_eventtype_facility(et));
417 g_string_printf(fe_name, "%s.%s", f_name, e_name);
418 tcs->eventtype_names[i] = g_quark_from_string(fe_name->str);
419 }
420
421 lttv_trace_find_hook(tcs->parent.t, "core", "syscall_entry",
422 "syscall_id", NULL, NULL, NULL, &h);
423 t = ltt_field_type(h.f1);
424 nb = ltt_type_element_number(t);
425
426 /* CHECK syscalls should be an emun but currently are not!
427 tcs->syscall_names = g_new(GQuark, nb);
428
429 for(i = 0 ; i < nb ; i++) {
430 tcs->syscall_names[i] = g_quark_from_string(ltt_enum_string_get(t, i));
431 }
432 */
433
434 tcs->syscall_names = g_new(GQuark, 256);
435 for(i = 0 ; i < 256 ; i++) {
436 g_string_printf(fe_name, "syscall %d", i);
437 tcs->syscall_names[i] = g_quark_from_string(fe_name->str);
438 }
439
440 lttv_trace_find_hook(tcs->parent.t, "core", "trap_entry",
441 "trap_id", NULL, NULL, NULL, &h);
442 t = ltt_field_type(h.f1);
443 nb = ltt_type_element_number(t);
444
445 /*
446 tcs->trap_names = g_new(GQuark, nb);
447 for(i = 0 ; i < nb ; i++) {
448 tcs->trap_names[i] = g_quark_from_string(ltt_enum_string_get(t, i));
449 }
450 */
451
452 tcs->trap_names = g_new(GQuark, 256);
453 for(i = 0 ; i < 256 ; i++) {
454 g_string_printf(fe_name, "trap %d", i);
455 tcs->trap_names[i] = g_quark_from_string(fe_name->str);
456 }
457
458 lttv_trace_find_hook(tcs->parent.t, "core", "irq_entry",
459 "irq_id", NULL, NULL, NULL, &h);
460 t = ltt_field_type(h.f1);
461 nb = ltt_type_element_number(t);
462
463 /*
464 tcs->irq_names = g_new(GQuark, nb);
465 for(i = 0 ; i < nb ; i++) {
466 tcs->irq_names[i] = g_quark_from_string(ltt_enum_string_get(t, i));
467 }
468 */
469
470 tcs->irq_names = g_new(GQuark, 256);
471 for(i = 0 ; i < 256 ; i++) {
472 g_string_printf(fe_name, "irq %d", i);
473 tcs->irq_names[i] = g_quark_from_string(fe_name->str);
474 }
475
476 g_string_free(fe_name, TRUE);
477 }
478
479
480 static void
481 free_name_tables(LttvTraceState *tcs)
482 {
483 g_free(tcs->eventtype_names);
484 g_free(tcs->syscall_names);
485 g_free(tcs->trap_names);
486 g_free(tcs->irq_names);
487 }
488
489
490 static void push_state(LttvTracefileState *tfs, LttvExecutionMode t,
491 guint state_id)
492 {
493 LttvExecutionState *es;
494
495 LttvProcessState *process = tfs->process;
496
497 guint depth = process->execution_stack->len;
498
499 g_array_set_size(process->execution_stack, depth + 1);
500 es = &g_array_index(process->execution_stack, LttvExecutionState, depth);
501 es->t = t;
502 es->n = state_id;
503 es->entry = es->change = tfs->parent.timestamp;
504 es->s = process->state->s;
505 process->state = es;
506 }
507
508
509 static void pop_state(LttvTracefileState *tfs, LttvExecutionMode t)
510 {
511 LttvProcessState *process = tfs->process;
512
513 guint depth = process->execution_stack->len - 1;
514
515 if(process->state->t != t){
516 g_warning("Different execution mode type (%d.%09d): ignore it\n",
517 tfs->parent.timestamp.tv_sec, tfs->parent.timestamp.tv_nsec);
518 g_warning("process state has %s when pop_int is %s\n",
519 g_quark_to_string(process->state->t),
520 g_quark_to_string(t));
521 g_warning("{ %u, %u, %s, %s }\n",
522 process->pid,
523 process->ppid,
524 g_quark_to_string(process->name),
525 g_quark_to_string(process->state->s));
526 return;
527 }
528
529 if(depth == 0){
530 g_warning("Trying to pop last state on stack (%d.%09d): ignore it\n",
531 tfs->parent.timestamp.tv_sec, tfs->parent.timestamp.tv_nsec);
532 return;
533 }
534
535 g_array_remove_index(process->execution_stack, depth);
536 depth--;
537 process->state = &g_array_index(process->execution_stack, LttvExecutionState,
538 depth);
539 process->state->change = tfs->parent.timestamp;
540 }
541
542
543 static LttvProcessState *create_process(LttvTracefileState *tfs,
544 LttvProcessState *parent, guint pid)
545 {
546 LttvProcessState *process = g_new(LttvProcessState, 1);
547
548 LttvExecutionState *es;
549
550 LttvTraceContext *tc;
551
552 LttvTraceState *tcs;
553
554 char buffer[128];
555
556 tcs = (LttvTraceState *)tc = tfs->parent.t_context;
557
558 g_hash_table_insert(tcs->processes, GUINT_TO_POINTER(pid), process);
559 process->pid = pid;
560
561 if(parent) {
562 process->ppid = parent->pid;
563 process->name = parent->name;
564 }
565 else {
566 process->ppid = 0;
567 process->name = LTTV_STATE_UNNAMED;
568 }
569
570 process->creation_time = tfs->parent.timestamp;
571 sprintf(buffer,"%d-%lu.%lu",pid, process->creation_time.tv_sec,
572 process->creation_time.tv_nsec);
573 process->pid_time = g_quark_from_string(buffer);
574 process->execution_stack = g_array_new(FALSE, FALSE,
575 sizeof(LttvExecutionState));
576 g_array_set_size(process->execution_stack, 1);
577 es = process->state = &g_array_index(process->execution_stack,
578 LttvExecutionState, 0);
579 es->t = LTTV_STATE_USER_MODE;
580 es->n = LTTV_STATE_SUBMODE_NONE;
581 es->entry = tfs->parent.timestamp;
582 es->change = tfs->parent.timestamp;
583 es->s = LTTV_STATE_WAIT_FORK;
584
585 return process;
586 }
587
588 LttvProcessState *lttv_state_find_process(LttvTracefileState *tfs,
589 guint pid)
590 {
591 LttvTraceState *ts =(LttvTraceState *)LTTV_TRACEFILE_CONTEXT(tfs)->t_context;
592 LttvProcessState *process = g_hash_table_lookup(ts->processes,
593 GUINT_TO_POINTER(pid));
594 if(process == NULL) process = create_process(tfs, NULL, pid);
595 return process;
596 }
597
598 LttvProcessState *lttv_state_find_process_from_trace(LttvTraceState *ts,
599 guint pid)
600 {
601 LttvProcessState *process = g_hash_table_lookup(ts->processes,
602 GUINT_TO_POINTER(pid));
603 //We do not create a process at this level, because we can be called
604 //from outside of state.c, and therefore cannot assume a tracefile
605 //exists.
606 //if(process == NULL) process = create_process_from_trace(ts, NULL, pid);
607 return process;
608 }
609
610
611
612 static void exit_process(LttvTracefileState *tfs, LttvProcessState *process)
613 {
614 LttvTraceState *ts = LTTV_TRACE_STATE(tfs->parent.t_context);
615
616 g_hash_table_remove(ts->processes, GUINT_TO_POINTER(process->pid));
617 g_array_free(process->execution_stack, TRUE);
618 g_free(process);
619 }
620
621
622 static void free_process_state(gpointer key, gpointer value,gpointer user_data)
623 {
624 g_array_free(((LttvProcessState *)value)->execution_stack, TRUE);
625 g_free(value);
626 }
627
628
629 static void lttv_state_free_process_table(GHashTable *processes)
630 {
631 g_hash_table_foreach(processes, free_process_state, NULL);
632 g_hash_table_destroy(processes);
633 }
634
635
636 static gboolean syscall_entry(void *hook_data, void *call_data)
637 {
638 LttField *f = ((LttvTraceHook *)hook_data)->f1;
639
640 LttvTracefileState *s = (LttvTracefileState *)call_data;
641
642 LttvExecutionSubmode submode;
643
644 submode = ((LttvTraceState *)(s->parent.t_context))->syscall_names[
645 ltt_event_get_unsigned(s->parent.e, f)];
646 push_state(s, LTTV_STATE_SYSCALL, submode);
647 return FALSE;
648 }
649
650
651 static gboolean syscall_exit(void *hook_data, void *call_data)
652 {
653 LttvTracefileState *s = (LttvTracefileState *)call_data;
654
655 pop_state(s, LTTV_STATE_SYSCALL);
656 return FALSE;
657 }
658
659
660 static gboolean trap_entry(void *hook_data, void *call_data)
661 {
662 LttField *f = ((LttvTraceHook *)hook_data)->f1;
663
664 LttvTracefileState *s = (LttvTracefileState *)call_data;
665
666 LttvExecutionSubmode submode;
667
668 submode = ((LttvTraceState *)(s->parent.t_context))->trap_names[
669 ltt_event_get_unsigned(s->parent.e, f)];
670 push_state(s, LTTV_STATE_TRAP, submode);
671 return FALSE;
672 }
673
674
675 static gboolean trap_exit(void *hook_data, void *call_data)
676 {
677 LttvTracefileState *s = (LttvTracefileState *)call_data;
678
679 pop_state(s, LTTV_STATE_TRAP);
680 return FALSE;
681 }
682
683
684 static gboolean irq_entry(void *hook_data, void *call_data)
685 {
686 LttField *f = ((LttvTraceHook *)hook_data)->f1;
687
688 LttvTracefileState *s = (LttvTracefileState *)call_data;
689
690 LttvExecutionSubmode submode;
691
692 submode = ((LttvTraceState *)(s->parent.t_context))->irq_names[
693 ltt_event_get_unsigned(s->parent.e, f)];
694
695 /* Do something with the info about being in user or system mode when int? */
696 push_state(s, LTTV_STATE_IRQ, submode);
697 return FALSE;
698 }
699
700
701 static gboolean irq_exit(void *hook_data, void *call_data)
702 {
703 LttvTracefileState *s = (LttvTracefileState *)call_data;
704
705 pop_state(s, LTTV_STATE_IRQ);
706 return FALSE;
707 }
708
709
710 static gboolean schedchange(void *hook_data, void *call_data)
711 {
712 LttvTraceHook *h = (LttvTraceHook *)hook_data;
713
714 LttvTracefileState *s = (LttvTracefileState *)call_data;
715
716 guint pid_in, pid_out, state_out;
717
718 pid_in = ltt_event_get_unsigned(s->parent.e, h->f1);
719 pid_out = ltt_event_get_unsigned(s->parent.e, h->f2);
720 state_out = ltt_event_get_unsigned(s->parent.e, h->f3);
721
722 if(s->process != NULL) {
723
724 if(state_out == 0) s->process->state->s = LTTV_STATE_WAIT_CPU;
725 else if(s->process->state->s == LTTV_STATE_EXIT)
726 exit_process(s, s->process);
727 else s->process->state->s = LTTV_STATE_WAIT;
728
729 if(s->process->pid == 0)
730 s->process->pid = pid_out;
731
732 s->process->state->change = s->parent.timestamp;
733 }
734 s->process = lttv_state_find_process(s, pid_in);
735 s->process->state->s = LTTV_STATE_RUN;
736 s->process->state->change = s->parent.timestamp;
737 return FALSE;
738 }
739
740
741 static gboolean process_fork(void *hook_data, void *call_data)
742 {
743 LttField *f = ((LttvTraceHook *)hook_data)->f1;
744
745 LttvTracefileState *s = (LttvTracefileState *)call_data;
746
747 guint child_pid;
748
749 child_pid = ltt_event_get_unsigned(s->parent.e, f);
750 create_process(s, s->process, child_pid);
751 return FALSE;
752 }
753
754
755 static gboolean process_exit(void *hook_data, void *call_data)
756 {
757 LttvTracefileState *s = (LttvTracefileState *)call_data;
758
759 if(s->process != NULL) {
760 s->process->state->s = LTTV_STATE_EXIT;
761 }
762 return FALSE;
763 }
764
765
766 void lttv_state_add_event_hooks(LttvTracesetState *self)
767 {
768 LttvTraceset *traceset = self->parent.ts;
769
770 guint i, j, k, nb_trace, nb_control, nb_per_cpu, nb_tracefile;
771
772 LttvTraceState *ts;
773
774 LttvTracefileState *tfs;
775
776 GArray *hooks;
777
778 LttvTraceHook hook;
779
780 LttvAttributeValue val;
781
782 nb_trace = lttv_traceset_number(traceset);
783 for(i = 0 ; i < nb_trace ; i++) {
784 ts = (LttvTraceState *)self->parent.traces[i];
785
786 /* Find the eventtype id for the following events and register the
787 associated by id hooks. */
788
789 hooks = g_array_new(FALSE, FALSE, sizeof(LttvTraceHook));
790 g_array_set_size(hooks, 9);
791
792 lttv_trace_find_hook(ts->parent.t, "core","syscall_entry","syscall_id",
793 NULL, NULL, syscall_entry, &g_array_index(hooks, LttvTraceHook, 0));
794
795 lttv_trace_find_hook(ts->parent.t, "core", "syscall_exit", NULL, NULL,
796 NULL, syscall_exit, &g_array_index(hooks, LttvTraceHook, 1));
797
798 lttv_trace_find_hook(ts->parent.t, "core", "trap_entry", "trap_id",
799 NULL, NULL, trap_entry, &g_array_index(hooks, LttvTraceHook, 2));
800
801 lttv_trace_find_hook(ts->parent.t, "core", "trap_exit", NULL, NULL, NULL,
802 trap_exit, &g_array_index(hooks, LttvTraceHook, 3));
803
804 lttv_trace_find_hook(ts->parent.t, "core", "irq_entry", "irq_id", NULL,
805 NULL, irq_entry, &g_array_index(hooks, LttvTraceHook, 4));
806
807 lttv_trace_find_hook(ts->parent.t, "core", "irq_exit", NULL, NULL, NULL,
808 irq_exit, &g_array_index(hooks, LttvTraceHook, 5));
809
810 lttv_trace_find_hook(ts->parent.t, "core", "schedchange", "in", "out",
811 "out_state", schedchange, &g_array_index(hooks, LttvTraceHook, 6));
812
813 lttv_trace_find_hook(ts->parent.t, "core", "process_fork", "child_pid",
814 NULL, NULL, process_fork, &g_array_index(hooks, LttvTraceHook, 7));
815
816 lttv_trace_find_hook(ts->parent.t, "core", "process_exit", NULL, NULL,
817 NULL, process_exit, &g_array_index(hooks, LttvTraceHook, 8));
818
819 /* Add these hooks to each before_event_by_id hooks list */
820
821 nb_control = ltt_trace_control_tracefile_number(ts->parent.t);
822 nb_per_cpu = ltt_trace_per_cpu_tracefile_number(ts->parent.t);
823 nb_tracefile = nb_control + nb_per_cpu;
824 for(j = 0 ; j < nb_tracefile ; j++) {
825 if(j < nb_control) {
826 tfs = LTTV_TRACEFILE_STATE(ts->parent.control_tracefiles[j]);
827 }
828 else {
829 tfs = LTTV_TRACEFILE_STATE(ts->parent.per_cpu_tracefiles[j-nb_control]);
830 }
831
832 for(k = 0 ; k < hooks->len ; k++) {
833 hook = g_array_index(hooks, LttvTraceHook, k);
834 lttv_hooks_add(lttv_hooks_by_id_find(tfs->parent.after_event_by_id,
835 hook.id), hook.h, &g_array_index(hooks, LttvTraceHook, k));
836 }
837 }
838 lttv_attribute_find(self->parent.a, LTTV_STATE_HOOKS, LTTV_POINTER, &val);
839 *(val.v_pointer) = hooks;
840 }
841 }
842
843
844 void lttv_state_remove_event_hooks(LttvTracesetState *self)
845 {
846 LttvTraceset *traceset = self->parent.ts;
847
848 guint i, j, k, nb_trace, nb_control, nb_per_cpu, nb_tracefile;
849
850 LttvTraceState *ts;
851
852 LttvTracefileState *tfs;
853
854 GArray *hooks;
855
856 LttvTraceHook hook;
857
858 LttvAttributeValue val;
859
860 nb_trace = lttv_traceset_number(traceset);
861 for(i = 0 ; i < nb_trace ; i++) {
862 ts = LTTV_TRACE_STATE(self->parent.traces[i]);
863 lttv_attribute_find(self->parent.a, LTTV_STATE_HOOKS, LTTV_POINTER, &val);
864 hooks = *(val.v_pointer);
865
866 /* Add these hooks to each before_event_by_id hooks list */
867
868 nb_control = ltt_trace_control_tracefile_number(ts->parent.t);
869 nb_per_cpu = ltt_trace_per_cpu_tracefile_number(ts->parent.t);
870 nb_tracefile = nb_control + nb_per_cpu;
871 for(j = 0 ; j < nb_tracefile ; j++) {
872 if(j < nb_control) {
873 tfs = LTTV_TRACEFILE_STATE(ts->parent.control_tracefiles[j]);
874 }
875 else {
876 tfs = LTTV_TRACEFILE_STATE(ts->parent.per_cpu_tracefiles[j-nb_control]);
877 }
878
879 for(k = 0 ; k < hooks->len ; k++) {
880 hook = g_array_index(hooks, LttvTraceHook, k);
881 lttv_hooks_remove_data(
882 lttv_hooks_by_id_find(tfs->parent.after_event_by_id,
883 hook.id), hook.h, &g_array_index(hooks, LttvTraceHook, k));
884 }
885 }
886 g_array_free(hooks, TRUE);
887 }
888 }
889
890
891 static gboolean block_end(void *hook_data, void *call_data)
892 {
893 LttvTracefileState *tfcs = (LttvTracefileState *)call_data;
894
895 LttvTraceState *tcs = (LttvTraceState *)(tfcs->parent.t_context);
896
897 LttEventPosition *ep = ltt_event_position_new();
898
899 guint nb_block, nb_event;
900
901 LttTracefile *tf;
902
903 LttvAttribute *saved_states_tree, *saved_state_tree;
904
905 LttvAttributeValue value;
906
907 ltt_event_position(tfcs->parent.e, ep);
908
909 ltt_event_position_get(ep, &nb_block, &nb_event, &tf);
910 tcs->nb_event += nb_event - tfcs->saved_position;
911 tfcs->saved_position = 0;
912 if(tcs->nb_event >= tcs->save_interval) {
913 saved_states_tree = lttv_attribute_find_subdir(tcs->parent.t_a,
914 LTTV_STATE_SAVED_STATES);
915 saved_state_tree = g_object_new(LTTV_ATTRIBUTE_TYPE, NULL);
916 value = lttv_attribute_add(saved_states_tree,
917 lttv_attribute_get_number(saved_states_tree), LTTV_GOBJECT);
918 *(value.v_gobject) = (GObject *)saved_state_tree;
919 value = lttv_attribute_add(saved_state_tree, LTTV_STATE_TIME, LTTV_TIME);
920 *(value.v_time) = tfcs->parent.timestamp;
921 lttv_state_save(tcs, saved_state_tree);
922 tcs->nb_event = 0;
923 }
924 return FALSE;
925 }
926
927
928 void lttv_state_save_add_event_hooks(LttvTracesetState *self)
929 {
930 LttvTraceset *traceset = self->parent.ts;
931
932 guint i, j, k, nb_trace, nb_control, nb_per_cpu, nb_tracefile;
933
934 LttvTraceState *ts;
935
936 LttvTracefileState *tfs;
937
938 LttvTraceHook hook;
939
940 nb_trace = lttv_traceset_number(traceset);
941 for(i = 0 ; i < nb_trace ; i++) {
942 ts = (LttvTraceState *)self->parent.traces[i];
943 lttv_trace_find_hook(ts->parent.t, "core","block_end",NULL,
944 NULL, NULL, block_end, &hook);
945
946 nb_control = ltt_trace_control_tracefile_number(ts->parent.t);
947 nb_per_cpu = ltt_trace_per_cpu_tracefile_number(ts->parent.t);
948 nb_tracefile = nb_control + nb_per_cpu;
949 for(j = 0 ; j < nb_tracefile ; j++) {
950 if(j < nb_control) {
951 tfs = LTTV_TRACEFILE_STATE(ts->parent.control_tracefiles[j]);
952 }
953 else {
954 tfs =LTTV_TRACEFILE_STATE(ts->parent.per_cpu_tracefiles[j-nb_control]);
955 }
956
957 lttv_hooks_add(lttv_hooks_by_id_find(tfs->parent.after_event_by_id,
958 hook.id), hook.h, NULL);
959 }
960 }
961 }
962
963
964 void lttv_state_save_remove_event_hooks(LttvTracesetState *self)
965 {
966 LttvTraceset *traceset = self->parent.ts;
967
968 guint i, j, k, nb_trace, nb_control, nb_per_cpu, nb_tracefile;
969
970 LttvTraceState *ts;
971
972 LttvTracefileState *tfs;
973
974 LttvTraceHook hook;
975
976 nb_trace = lttv_traceset_number(traceset);
977 for(i = 0 ; i < nb_trace ; i++) {
978 ts = LTTV_TRACE_STATE(self->parent.traces[i]);
979 lttv_trace_find_hook(ts->parent.t, "core","block_end",NULL,
980 NULL, NULL, block_end, &hook);
981
982 nb_control = ltt_trace_control_tracefile_number(ts->parent.t);
983 nb_per_cpu = ltt_trace_per_cpu_tracefile_number(ts->parent.t);
984 nb_tracefile = nb_control + nb_per_cpu;
985 for(j = 0 ; j < nb_tracefile ; j++) {
986 if(j < nb_control) {
987 tfs = LTTV_TRACEFILE_STATE(ts->parent.control_tracefiles[j]);
988 }
989 else {
990 tfs =LTTV_TRACEFILE_STATE(ts->parent.per_cpu_tracefiles[j-nb_control]);
991 }
992
993 lttv_hooks_remove_data(lttv_hooks_by_id_find(
994 tfs->parent.after_event_by_id, hook.id), hook.h, NULL);
995 }
996 }
997 }
998
999
1000 void lttv_state_traceset_seek_time_closest(LttvTracesetState *self, LttTime t)
1001 {
1002 LttvTraceset *traceset = self->parent.ts;
1003
1004 guint i, j, nb_trace, nb_saved_state;
1005
1006 int min_pos, mid_pos, max_pos;
1007
1008 LttvTraceState *tcs;
1009
1010 LttvAttributeValue value;
1011
1012 LttvAttributeType type;
1013
1014 LttvAttributeName name;
1015
1016 LttvAttribute *saved_states_tree, *saved_state_tree, *closest_tree;
1017
1018 nb_trace = lttv_traceset_number(traceset);
1019 for(i = 0 ; i < nb_trace ; i++) {
1020 tcs = (LttvTraceState *)self->parent.traces[i];
1021
1022 if(tcs->recompute_state_in_seek) {
1023 if(tcs->saved_state_available) {
1024 saved_states_tree = lttv_attribute_find_subdir(tcs->parent.t_a,
1025 LTTV_STATE_SAVED_STATES);
1026 min_pos = -1;
1027 max_pos = lttv_attribute_get_number(saved_states_tree) - 1;
1028 mid_pos = max_pos / 2;
1029 while(min_pos < max_pos) {
1030 type = lttv_attribute_get(saved_states_tree, mid_pos, &name, &value);
1031 g_assert(type == LTTV_GOBJECT);
1032 saved_state_tree = *((LttvAttribute **)(value.v_gobject));
1033 type = lttv_attribute_get_by_name(saved_state_tree, LTTV_STATE_TIME,
1034 &value);
1035 g_assert(type == LTTV_TIME);
1036 if(ltt_time_compare(*(value.v_time), t) < 0) {
1037 min_pos = mid_pos;
1038 closest_tree = saved_state_tree;
1039 }
1040 else max_pos = mid_pos - 1;
1041
1042 mid_pos = (min_pos + max_pos + 1) / 2;
1043 }
1044
1045 /* restore the closest earlier saved state */
1046 if(min_pos != -1) lttv_state_restore(tcs, closest_tree);
1047
1048 }
1049 /* There is no saved state yet we want to have it. Restart at T0 */
1050 else {
1051 restore_init_state(tcs);
1052 lttv_process_trace_seek_time(&(tcs->parent), ltt_time_zero);
1053 }
1054 }
1055 /* We want to seek quickly without restoring/updating the state */
1056 else {
1057 restore_init_state(tcs);
1058 lttv_process_trace_seek_time(&(tcs->parent), t);
1059 }
1060 }
1061 }
1062
1063
1064 static void
1065 traceset_state_instance_init (GTypeInstance *instance, gpointer g_class)
1066 {
1067 }
1068
1069
1070 static void
1071 traceset_state_finalize (LttvTracesetState *self)
1072 {
1073 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACESET_CONTEXT_TYPE))->
1074 finalize(G_OBJECT(self));
1075 }
1076
1077
1078 static void
1079 traceset_state_class_init (LttvTracesetContextClass *klass)
1080 {
1081 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
1082
1083 gobject_class->finalize = (void (*)(GObject *self)) traceset_state_finalize;
1084 klass->init = (void (*)(LttvTracesetContext *self, LttvTraceset *ts))init;
1085 klass->fini = (void (*)(LttvTracesetContext *self))fini;
1086 klass->new_traceset_context = new_traceset_context;
1087 klass->new_trace_context = new_trace_context;
1088 klass->new_tracefile_context = new_tracefile_context;
1089 }
1090
1091
1092 GType
1093 lttv_traceset_state_get_type(void)
1094 {
1095 static GType type = 0;
1096 if (type == 0) {
1097 static const GTypeInfo info = {
1098 sizeof (LttvTracesetStateClass),
1099 NULL, /* base_init */
1100 NULL, /* base_finalize */
1101 (GClassInitFunc) traceset_state_class_init, /* class_init */
1102 NULL, /* class_finalize */
1103 NULL, /* class_data */
1104 sizeof (LttvTracesetContext),
1105 0, /* n_preallocs */
1106 (GInstanceInitFunc) traceset_state_instance_init /* instance_init */
1107 };
1108
1109 type = g_type_register_static (LTTV_TRACESET_CONTEXT_TYPE, "LttvTracesetStateType",
1110 &info, 0);
1111 }
1112 return type;
1113 }
1114
1115
1116 static void
1117 trace_state_instance_init (GTypeInstance *instance, gpointer g_class)
1118 {
1119 }
1120
1121
1122 static void
1123 trace_state_finalize (LttvTraceState *self)
1124 {
1125 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACE_CONTEXT_TYPE))->
1126 finalize(G_OBJECT(self));
1127 }
1128
1129
1130 static void
1131 trace_state_class_init (LttvTraceStateClass *klass)
1132 {
1133 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
1134
1135 gobject_class->finalize = (void (*)(GObject *self)) trace_state_finalize;
1136 klass->state_save = state_save;
1137 klass->state_restore = state_restore;
1138 klass->state_saved_free = state_saved_free;
1139 }
1140
1141
1142 GType
1143 lttv_trace_state_get_type(void)
1144 {
1145 static GType type = 0;
1146 if (type == 0) {
1147 static const GTypeInfo info = {
1148 sizeof (LttvTraceStateClass),
1149 NULL, /* base_init */
1150 NULL, /* base_finalize */
1151 (GClassInitFunc) trace_state_class_init, /* class_init */
1152 NULL, /* class_finalize */
1153 NULL, /* class_data */
1154 sizeof (LttvTraceState),
1155 0, /* n_preallocs */
1156 (GInstanceInitFunc) trace_state_instance_init /* instance_init */
1157 };
1158
1159 type = g_type_register_static (LTTV_TRACE_CONTEXT_TYPE,
1160 "LttvTraceStateType", &info, 0);
1161 }
1162 return type;
1163 }
1164
1165
1166 static void
1167 tracefile_state_instance_init (GTypeInstance *instance, gpointer g_class)
1168 {
1169 }
1170
1171
1172 static void
1173 tracefile_state_finalize (LttvTracefileState *self)
1174 {
1175 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACEFILE_CONTEXT_TYPE))->
1176 finalize(G_OBJECT(self));
1177 }
1178
1179
1180 static void
1181 tracefile_state_class_init (LttvTracefileStateClass *klass)
1182 {
1183 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
1184
1185 gobject_class->finalize = (void (*)(GObject *self)) tracefile_state_finalize;
1186 }
1187
1188
1189 GType
1190 lttv_tracefile_state_get_type(void)
1191 {
1192 static GType type = 0;
1193 if (type == 0) {
1194 static const GTypeInfo info = {
1195 sizeof (LttvTracefileStateClass),
1196 NULL, /* base_init */
1197 NULL, /* base_finalize */
1198 (GClassInitFunc) tracefile_state_class_init, /* class_init */
1199 NULL, /* class_finalize */
1200 NULL, /* class_data */
1201 sizeof (LttvTracefileState),
1202 0, /* n_preallocs */
1203 (GInstanceInitFunc) tracefile_state_instance_init /* instance_init */
1204 };
1205
1206 type = g_type_register_static (LTTV_TRACEFILE_CONTEXT_TYPE,
1207 "LttvTracefileStateType", &info, 0);
1208 }
1209 return type;
1210 }
1211
1212
1213 void lttv_state_init(int argc, char **argv)
1214 {
1215 LTTV_STATE_UNNAMED = g_quark_from_string("unnamed");
1216 LTTV_STATE_MODE_UNKNOWN = g_quark_from_string("unknown execution mode");
1217 LTTV_STATE_USER_MODE = g_quark_from_string("user mode");
1218 LTTV_STATE_WAIT_FORK = g_quark_from_string("wait fork");
1219 LTTV_STATE_SYSCALL = g_quark_from_string("system call");
1220 LTTV_STATE_TRAP = g_quark_from_string("trap");
1221 LTTV_STATE_IRQ = g_quark_from_string("irq");
1222 LTTV_STATE_SUBMODE_UNKNOWN = g_quark_from_string("unknown submode");
1223 LTTV_STATE_SUBMODE_NONE = g_quark_from_string("(no submode)");
1224 LTTV_STATE_WAIT_CPU = g_quark_from_string("wait for cpu");
1225 LTTV_STATE_EXIT = g_quark_from_string("exiting");
1226 LTTV_STATE_WAIT = g_quark_from_string("wait for I/O");
1227 LTTV_STATE_RUN = g_quark_from_string("running");
1228 LTTV_STATE_TRACEFILES = g_quark_from_string("tracefiles");
1229 LTTV_STATE_PROCESSES = g_quark_from_string("processes");
1230 LTTV_STATE_PROCESS = g_quark_from_string("process");
1231 LTTV_STATE_EVENT = g_quark_from_string("event");
1232 LTTV_STATE_SAVED_STATES = g_quark_from_string("saved states");
1233 LTTV_STATE_TIME = g_quark_from_string("time");
1234 LTTV_STATE_HOOKS = g_quark_from_string("saved state hooks");
1235 }
1236
1237 void lttv_state_destroy()
1238 {
1239 }
1240
1241
1242
1243
This page took 0.055918 seconds and 4 git commands to generate.