wakeup wait for cpu display
[lttv.git] / lttv / lttv / 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 #define _GNU_SOURCE
20 #ifdef HAVE_CONFIG_H
21 #include <config.h>
22 #endif
23
24 #include <glib.h>
25 #include <lttv/lttv.h>
26 #include <lttv/module.h>
27 #include <lttv/state.h>
28 #include <ltt/trace.h>
29 #include <ltt/event.h>
30 #include <ltt/ltt.h>
31 #include <ltt/marker-desc.h>
32 #include <stdio.h>
33 #include <string.h>
34 #include <ltt/ltt-private.h>
35 #include <inttypes.h>
36
37 /* Comment :
38 * Mathieu Desnoyers
39 * usertrace is there only to be able to update the current CPU of the
40 * usertraces when there is a schedchange. it is a way to link the ProcessState
41 * to the associated usertrace. Link only created upon thread creation.
42 *
43 * The cpu id is necessary : it gives us back the current ProcessState when we
44 * are considering data from the usertrace.
45 */
46
47 #define PREALLOCATED_EXECUTION_STACK 10
48
49 /* Channel Quarks */
50
51 GQuark
52 LTT_CHANNEL_FD_STATE,
53 LTT_CHANNEL_GLOBAL_STATE,
54 LTT_CHANNEL_IRQ_STATE,
55 LTT_CHANNEL_MODULE_STATE,
56 LTT_CHANNEL_NETIF_STATE,
57 LTT_CHANNEL_SOFTIRQ_STATE,
58 LTT_CHANNEL_SWAP_STATE,
59 LTT_CHANNEL_SYSCALL_STATE,
60 LTT_CHANNEL_TASK_STATE,
61 LTT_CHANNEL_VM_STATE,
62 LTT_CHANNEL_KPROBE_STATE,
63 LTT_CHANNEL_FS,
64 LTT_CHANNEL_KERNEL,
65 LTT_CHANNEL_MM,
66 LTT_CHANNEL_USERSPACE,
67 LTT_CHANNEL_BLOCK;
68
69 /* Events Quarks */
70
71 GQuark
72 LTT_EVENT_SYSCALL_ENTRY,
73 LTT_EVENT_SYSCALL_EXIT,
74 LTT_EVENT_PAGE_FAULT_NOSEM_ENTRY,
75 LTT_EVENT_PAGE_FAULT_NOSEM_EXIT,
76 LTT_EVENT_PAGE_FAULT_ENTRY,
77 LTT_EVENT_PAGE_FAULT_EXIT,
78 LTT_EVENT_TRAP_ENTRY,
79 LTT_EVENT_TRAP_EXIT,
80 LTT_EVENT_IRQ_ENTRY,
81 LTT_EVENT_IRQ_EXIT,
82 LTT_EVENT_SOFT_IRQ_RAISE,
83 LTT_EVENT_SOFT_IRQ_ENTRY,
84 LTT_EVENT_SOFT_IRQ_EXIT,
85 LTT_EVENT_SCHED_SCHEDULE,
86 LTT_EVENT_SCHED_TRY_WAKEUP,
87 LTT_EVENT_PROCESS_FORK,
88 LTT_EVENT_KTHREAD_CREATE,
89 LTT_EVENT_PROCESS_EXIT,
90 LTT_EVENT_PROCESS_FREE,
91 LTT_EVENT_EXEC,
92 LTT_EVENT_PROCESS_STATE,
93 LTT_EVENT_STATEDUMP_END,
94 LTT_EVENT_FUNCTION_ENTRY,
95 LTT_EVENT_FUNCTION_EXIT,
96 LTT_EVENT_THREAD_BRAND,
97 LTT_EVENT_REQUEST_ISSUE,
98 LTT_EVENT_REQUEST_COMPLETE,
99 LTT_EVENT_LIST_INTERRUPT,
100 LTT_EVENT_SYS_CALL_TABLE,
101 LTT_EVENT_SOFTIRQ_VEC,
102 LTT_EVENT_KPROBE_TABLE,
103 LTT_EVENT_KPROBE,
104 LTT_EVENT_OPEN,
105 LTT_EVENT_READ,
106 LTT_EVENT_POLL_EVENT;
107
108 /* Fields Quarks */
109
110 GQuark
111 LTT_FIELD_SYSCALL_ID,
112 LTT_FIELD_TRAP_ID,
113 LTT_FIELD_IRQ_ID,
114 LTT_FIELD_SOFT_IRQ_ID,
115 LTT_FIELD_PREV_PID,
116 LTT_FIELD_NEXT_PID,
117 LTT_FIELD_PREV_STATE,
118 LTT_FIELD_PARENT_PID,
119 LTT_FIELD_CHILD_PID,
120 LTT_FIELD_PID,
121 LTT_FIELD_TGID,
122 LTT_FIELD_CHILD_TGID,
123 LTT_FIELD_FILENAME,
124 LTT_FIELD_NAME,
125 LTT_FIELD_TYPE,
126 LTT_FIELD_MODE,
127 LTT_FIELD_SUBMODE,
128 LTT_FIELD_STATUS,
129 LTT_FIELD_THIS_FN,
130 LTT_FIELD_CALL_SITE,
131 LTT_FIELD_MINOR,
132 LTT_FIELD_MAJOR,
133 LTT_FIELD_OPERATION,
134 LTT_FIELD_ACTION,
135 LTT_FIELD_ID,
136 LTT_FIELD_ADDRESS,
137 LTT_FIELD_SYMBOL,
138 LTT_FIELD_IP,
139 LTT_FIELD_FD,
140 LTT_FIELD_STATE,
141 LTT_FIELD_CPU_ID;
142
143 LttvExecutionMode
144 LTTV_STATE_MODE_UNKNOWN,
145 LTTV_STATE_USER_MODE,
146 LTTV_STATE_SYSCALL,
147 LTTV_STATE_TRAP,
148 LTTV_STATE_IRQ,
149 LTTV_STATE_SOFT_IRQ;
150
151 LttvExecutionSubmode
152 LTTV_STATE_SUBMODE_UNKNOWN,
153 LTTV_STATE_SUBMODE_NONE;
154
155 LttvProcessStatus
156 LTTV_STATE_UNNAMED,
157 LTTV_STATE_WAIT_FORK,
158 LTTV_STATE_WAIT_CPU,
159 LTTV_STATE_EXIT,
160 LTTV_STATE_ZOMBIE,
161 LTTV_STATE_WAIT,
162 LTTV_STATE_RUN,
163 LTTV_STATE_DEAD;
164
165 GQuark
166 LTTV_STATE_UNBRANDED;
167
168 LttvProcessType
169 LTTV_STATE_USER_THREAD,
170 LTTV_STATE_KERNEL_THREAD;
171
172 LttvCPUMode
173 LTTV_CPU_UNKNOWN,
174 LTTV_CPU_IDLE,
175 LTTV_CPU_BUSY,
176 LTTV_CPU_IRQ,
177 LTTV_CPU_SOFT_IRQ,
178 LTTV_CPU_TRAP;
179
180 LttvIRQMode
181 LTTV_IRQ_UNKNOWN,
182 LTTV_IRQ_IDLE,
183 LTTV_IRQ_BUSY;
184
185 LttvBdevMode
186 LTTV_BDEV_UNKNOWN,
187 LTTV_BDEV_IDLE,
188 LTTV_BDEV_BUSY_READING,
189 LTTV_BDEV_BUSY_WRITING;
190
191 static GQuark
192 LTTV_STATE_TRACEFILES,
193 LTTV_STATE_PROCESSES,
194 LTTV_STATE_PROCESS,
195 LTTV_STATE_RUNNING_PROCESS,
196 LTTV_STATE_EVENT,
197 LTTV_STATE_SAVED_STATES,
198 LTTV_STATE_SAVED_STATES_TIME,
199 LTTV_STATE_TIME,
200 LTTV_STATE_HOOKS,
201 LTTV_STATE_NAME_TABLES,
202 LTTV_STATE_TRACE_STATE_USE_COUNT,
203 LTTV_STATE_RESOURCE_CPUS,
204 LTTV_STATE_RESOURCE_CPUS_COUNT,
205 LTTV_STATE_RESOURCE_IRQS,
206 LTTV_STATE_RESOURCE_SOFT_IRQS,
207 LTTV_STATE_RESOURCE_TRAPS,
208 LTTV_STATE_RESOURCE_BLKDEVS;
209
210 static void create_max_time(LttvTraceState *tcs);
211
212 static void get_max_time(LttvTraceState *tcs);
213
214 static void free_max_time(LttvTraceState *tcs);
215
216 static void create_name_tables(LttvTraceState *tcs);
217
218 static void get_name_tables(LttvTraceState *tcs);
219
220 static void free_name_tables(LttvTraceState *tcs);
221
222 static void free_saved_state(LttvTraceState *tcs);
223
224 static void lttv_state_free_process_table(GHashTable *processes);
225
226 static void lttv_trace_states_read_raw(LttvTraceState *tcs, FILE *fp,
227 GPtrArray *quarktable);
228
229 /* Resource function prototypes */
230 static LttvBdevState *get_hashed_bdevstate(LttvTraceState *ts, guint16 devcode);
231 static LttvBdevState *bdevstate_new(void);
232 static void bdevstate_free(LttvBdevState *);
233 static void bdevstate_free_cb(gpointer key, gpointer value, gpointer user_data);
234 static LttvBdevState *bdevstate_copy(LttvBdevState *bds);
235
236
237 #if (__WORDSIZE == 32)
238 guint guint64_hash(gconstpointer key)
239 {
240 guint64 ukey = *(const guint64 *)key;
241
242 return (guint)ukey ^ (guint)(ukey >> 32);
243 }
244
245 gboolean guint64_equal(gconstpointer a, gconstpointer b)
246 {
247 guint64 ua = *(const guint64 *)a;
248 guint64 ub = *(const guint64 *)b;
249
250 return ua == ub;
251 }
252 #endif
253
254 void lttv_state_save(LttvTraceState *self, LttvAttribute *container)
255 {
256 LTTV_TRACE_STATE_GET_CLASS(self)->state_save(self, container);
257 }
258
259
260 void lttv_state_restore(LttvTraceState *self, LttvAttribute *container)
261 {
262 LTTV_TRACE_STATE_GET_CLASS(self)->state_restore(self, container);
263 }
264
265
266 void lttv_state_state_saved_free(LttvTraceState *self,
267 LttvAttribute *container)
268 {
269 LTTV_TRACE_STATE_GET_CLASS(self)->state_saved_free(self, container);
270 }
271
272
273 guint process_hash(gconstpointer key)
274 {
275 guint pid = ((const LttvProcessState *)key)->pid;
276 return (pid>>8 ^ pid>>4 ^ pid>>2 ^ pid) ;
277 }
278
279
280 /* If the hash table hash function is well distributed,
281 * the process_equal should compare different pid */
282 gboolean process_equal(gconstpointer a, gconstpointer b)
283 {
284 const LttvProcessState *process_a, *process_b;
285 gboolean ret = TRUE;
286
287 process_a = (const LttvProcessState *)a;
288 process_b = (const LttvProcessState *)b;
289
290 if(likely(process_a->pid != process_b->pid)) ret = FALSE;
291 else if(likely(process_a->pid == 0 &&
292 process_a->cpu != process_b->cpu)) ret = FALSE;
293
294 return ret;
295 }
296
297 static void delete_usertrace(gpointer key, gpointer value, gpointer user_data)
298 {
299 g_tree_destroy((GTree*)value);
300 }
301
302 static void lttv_state_free_usertraces(GHashTable *usertraces)
303 {
304 g_hash_table_foreach(usertraces, delete_usertrace, NULL);
305 g_hash_table_destroy(usertraces);
306 }
307
308 gboolean rettrue(gpointer key, gpointer value, gpointer user_data)
309 {
310 return TRUE;
311 }
312
313 static guint check_expand(nb, id)
314 {
315 if(likely(nb > id))
316 return nb;
317 else
318 return max(id + 1, nb * 2);
319 }
320
321 static void expand_name_table(LttvTraceState *ts, GQuark **table,
322 guint nb, guint new_nb)
323 {
324 /* Expand an incomplete table */
325 GQuark *old_table = *table;
326 *table = g_new(GQuark, new_nb);
327 memcpy(*table, old_table, nb * sizeof(GQuark));
328 g_free(old_table);
329 }
330
331 static void fill_name_table(LttvTraceState *ts, GQuark *table, guint nb,
332 guint new_nb, const char *def_string)
333 {
334 guint i;
335 GString *fe_name = g_string_new("");
336 for(i = nb; i < new_nb; i++) {
337 g_string_printf(fe_name, "%s %d", def_string, i);
338 table[i] = g_quark_from_string(fe_name->str);
339 }
340 g_string_free(fe_name, TRUE);
341 }
342
343 static void expand_syscall_table(LttvTraceState *ts, int id)
344 {
345 LttvNameTables *nt = ts->name_tables;
346 guint new_nb;
347
348 new_nb = check_expand(nt->nb_syscalls, id);
349 if(likely(new_nb == nt->nb_syscalls))
350 return;
351 expand_name_table(ts, &nt->syscall_names, nt->nb_syscalls, new_nb);
352 fill_name_table(ts, nt->syscall_names, nt->nb_syscalls, new_nb, "syscall");
353 /* Update the table size */
354 nt->nb_syscalls = new_nb;
355 }
356
357 static void expand_kprobe_table(LttvTraceState *ts, guint64 ip, char *symbol)
358 {
359 LttvNameTables *nt = ts->name_tables;
360 #if (__WORDSIZE == 32)
361 guint64 *ip_ptr = g_new(guint64, 1);
362 g_hash_table_insert(nt->kprobe_hash, ip_ptr,
363 (gpointer)(glong)g_quark_from_string(symbol));
364 #else
365 g_hash_table_insert(nt->kprobe_hash, (gpointer)ip,
366 (gpointer)(glong)g_quark_from_string(symbol));
367 #endif
368 }
369
370 static void expand_trap_table(LttvTraceState *ts, int id)
371 {
372 LttvNameTables *nt = ts->name_tables;
373 LttvTrapState *old_table;
374 guint new_nb, i;
375
376 new_nb = check_expand(nt->nb_traps, id);
377 if(likely(new_nb == nt->nb_traps))
378 return;
379
380 expand_name_table(ts, &nt->trap_names, nt->nb_traps, new_nb);
381 fill_name_table(ts, nt->trap_names, nt->nb_traps, new_nb, "trap");
382
383 old_table = ts->trap_states;
384 ts->trap_states = g_new(LttvTrapState, new_nb);
385 memcpy(ts->trap_states, old_table, nt->nb_traps * sizeof(LttvTrapState));
386 g_free(old_table);
387 for(i = nt->nb_traps; i < new_nb; i++)
388 ts->trap_states[i].running = 0;
389
390 /* Update the table size */
391 nt->nb_traps = new_nb;
392 }
393
394 static void expand_irq_table(LttvTraceState *ts, int id)
395 {
396 LttvNameTables *nt = ts->name_tables;
397 LttvIRQState *old_table;
398 guint new_nb, i;
399
400 new_nb = check_expand(nt->nb_irqs, id);
401 if(likely(new_nb == nt->nb_irqs))
402 return;
403
404 expand_name_table(ts, &nt->irq_names, nt->nb_irqs, new_nb);
405 fill_name_table(ts, nt->irq_names, nt->nb_irqs, new_nb, "irq");
406
407 old_table = ts->irq_states;
408 ts->irq_states = g_new(LttvIRQState, new_nb);
409 memcpy(ts->irq_states, old_table, nt->nb_irqs * sizeof(LttvIRQState));
410 g_free(old_table);
411 for(i = nt->nb_irqs; i < new_nb; i++)
412 ts->irq_states[i].mode_stack =
413 g_array_new(FALSE, FALSE, sizeof(LttvIRQMode));
414
415 /* Update the table size */
416 nt->nb_irqs = new_nb;
417 }
418
419 static void expand_soft_irq_table(LttvTraceState *ts, int id)
420 {
421 LttvNameTables *nt = ts->name_tables;
422 LttvSoftIRQState *old_table;
423 guint new_nb, i;
424
425 new_nb = check_expand(nt->nb_soft_irqs, id);
426 if(likely(new_nb == nt->nb_soft_irqs))
427 return;
428
429 expand_name_table(ts, &nt->soft_irq_names, nt->nb_soft_irqs, new_nb);
430 fill_name_table(ts, nt->soft_irq_names, nt->nb_soft_irqs, new_nb, "softirq");
431
432 old_table = ts->soft_irq_states;
433 ts->soft_irq_states = g_new(LttvSoftIRQState, new_nb);
434 memcpy(ts->soft_irq_states, old_table,
435 nt->nb_soft_irqs * sizeof(LttvSoftIRQState));
436 g_free(old_table);
437 for(i = nt->nb_soft_irqs; i < new_nb; i++)
438 ts->soft_irq_states[i].running = 0;
439
440 /* Update the table size */
441 nt->nb_soft_irqs = new_nb;
442 }
443
444 static void
445 restore_init_state(LttvTraceState *self)
446 {
447 guint i, nb_cpus, nb_irqs, nb_soft_irqs, nb_traps;
448
449 //LttvTracefileState *tfcs;
450
451 LttTime start_time, end_time;
452
453 /* Free the process tables */
454 if(self->processes != NULL) lttv_state_free_process_table(self->processes);
455 if(self->usertraces != NULL) lttv_state_free_usertraces(self->usertraces);
456 self->processes = g_hash_table_new(process_hash, process_equal);
457 self->usertraces = g_hash_table_new(g_direct_hash, g_direct_equal);
458 self->nb_event = 0;
459
460 /* Seek time to beginning */
461 // Mathieu : fix : don't seek traceset here : causes inconsistency in seek
462 // closest. It's the tracecontext job to seek the trace to the beginning
463 // anyway : the init state might be used at the middle of the trace as well...
464 //g_tree_destroy(self->parent.ts_context->pqueue);
465 //self->parent.ts_context->pqueue = g_tree_new(compare_tracefile);
466
467 ltt_trace_time_span_get(self->parent.t, &start_time, &end_time);
468
469 //lttv_process_trace_seek_time(&self->parent, ltt_time_zero);
470
471 nb_cpus = ltt_trace_get_num_cpu(self->parent.t);
472 nb_irqs = self->name_tables->nb_irqs;
473 nb_soft_irqs = self->name_tables->nb_soft_irqs;
474 nb_traps = self->name_tables->nb_traps;
475
476 /* Put the per cpu running_process to beginning state : process 0. */
477 for(i=0; i< nb_cpus; i++) {
478 LttvExecutionState *es;
479 self->running_process[i] = lttv_state_create_process(self, NULL, i, 0, 0,
480 LTTV_STATE_UNNAMED, &start_time);
481 /* We are not sure is it's a kernel thread or normal thread, put the
482 * bottom stack state to unknown */
483 self->running_process[i]->execution_stack =
484 g_array_set_size(self->running_process[i]->execution_stack, 1);
485 es = self->running_process[i]->state =
486 &g_array_index(self->running_process[i]->execution_stack,
487 LttvExecutionState, 0);
488 es->t = LTTV_STATE_MODE_UNKNOWN;
489 es->s = LTTV_STATE_UNNAMED;
490
491 //self->running_process[i]->state->s = LTTV_STATE_RUN;
492 self->running_process[i]->cpu = i;
493
494 /* reset cpu states */
495 if(self->cpu_states[i].mode_stack->len > 0) {
496 g_array_remove_range(self->cpu_states[i].mode_stack, 0, self->cpu_states[i].mode_stack->len);
497 if(self->cpu_states[i].irq_stack->len)
498 g_array_remove_range(self->cpu_states[i].irq_stack, 0, self->cpu_states[i].irq_stack->len);
499 if(self->cpu_states[i].softirq_stack->len)
500 g_array_remove_range(self->cpu_states[i].softirq_stack, 0, self->cpu_states[i].softirq_stack->len);
501 if(self->cpu_states[i].trap_stack->len)
502 g_array_remove_range(self->cpu_states[i].trap_stack, 0, self->cpu_states[i].trap_stack->len);
503 }
504 }
505
506 /* reset irq states */
507 for(i=0; i<nb_irqs; i++) {
508 if(self->irq_states[i].mode_stack->len > 0)
509 g_array_remove_range(self->irq_states[i].mode_stack, 0, self->irq_states[i].mode_stack->len);
510 }
511
512 /* reset softirq states */
513 for(i=0; i<nb_soft_irqs; i++) {
514 self->soft_irq_states[i].pending = 0;
515 self->soft_irq_states[i].running = 0;
516 }
517
518 /* reset trap states */
519 for(i=0; i<nb_traps; i++) {
520 self->trap_states[i].running = 0;
521 }
522
523 /* reset bdev states */
524 g_hash_table_foreach(self->bdev_states, bdevstate_free_cb, NULL);
525 //g_hash_table_steal_all(self->bdev_states);
526 g_hash_table_foreach_steal(self->bdev_states, rettrue, NULL);
527
528 #if 0
529 nb_tracefile = self->parent.tracefiles->len;
530
531 for(i = 0 ; i < nb_tracefile ; i++) {
532 tfcs =
533 LTTV_TRACEFILE_STATE(g_array_index(self->parent.tracefiles,
534 LttvTracefileContext*, i));
535 ltt_trace_time_span_get(self->parent.t, &tfcs->parent.timestamp, NULL);
536 // tfcs->saved_position = 0;
537 tfcs->process = lttv_state_create_process(tfcs, NULL,0);
538 tfcs->process->state->s = LTTV_STATE_RUN;
539 tfcs->process->last_cpu = tfcs->cpu_name;
540 tfcs->process->last_cpu_index = ltt_tracefile_num(((LttvTracefileContext*)tfcs)->tf);
541 }
542 #endif //0
543 }
544
545 //static LttTime time_zero = {0,0};
546
547 static gint compare_usertraces(gconstpointer a, gconstpointer b,
548 gpointer user_data)
549 {
550 const LttTime *t1 = (const LttTime *)a;
551 const LttTime *t2 = (const LttTime *)b;
552
553 return ltt_time_compare(*t1, *t2);
554 }
555
556 static void free_usertrace_key(gpointer data)
557 {
558 g_free(data);
559 }
560
561 #define MAX_STRING_LEN 4096
562
563 static void
564 state_load_saved_states(LttvTraceState *tcs)
565 {
566 FILE *fp;
567 GPtrArray *quarktable;
568 const char *trace_path;
569 char path[PATH_MAX];
570 guint count;
571 guint i;
572 tcs->has_precomputed_states = FALSE;
573 GQuark q;
574 gchar *string;
575 gint hdr;
576 gchar buf[MAX_STRING_LEN];
577 guint len;
578
579 trace_path = g_quark_to_string(ltt_trace_name(tcs->parent.t));
580 strncpy(path, trace_path, PATH_MAX-1);
581 count = strnlen(trace_path, PATH_MAX-1);
582 // quarktable : open, test
583 strncat(path, "/precomputed/quarktable", PATH_MAX-count-1);
584 fp = fopen(path, "r");
585 if(!fp) return;
586 quarktable = g_ptr_array_sized_new(4096);
587
588 /* Index 0 is null */
589 hdr = fgetc(fp);
590 if(hdr == EOF) return;
591 g_assert(hdr == HDR_QUARKS);
592 q = 1;
593 do {
594 hdr = fgetc(fp);
595 if(hdr == EOF) break;
596 g_assert(hdr == HDR_QUARK);
597 g_ptr_array_set_size(quarktable, q+1);
598 i=0;
599 while(1) {
600 fread(&buf[i], sizeof(gchar), 1, fp);
601 if(buf[i] == '\0' || feof(fp)) break;
602 i++;
603 }
604 len = strnlen(buf, MAX_STRING_LEN-1);
605 g_ptr_array_index (quarktable, q) = g_new(gchar, len+1);
606 strncpy(g_ptr_array_index (quarktable, q), buf, len+1);
607 q++;
608 } while(1);
609
610 fclose(fp);
611
612 // saved_states : open, test
613 strncpy(path, trace_path, PATH_MAX-1);
614 count = strnlen(trace_path, PATH_MAX-1);
615 strncat(path, "/precomputed/states", PATH_MAX-count-1);
616 fp = fopen(path, "r");
617 if(!fp) return;
618
619 hdr = fgetc(fp);
620 if(hdr != HDR_TRACE) goto end;
621
622 lttv_trace_states_read_raw(tcs, fp, quarktable);
623
624 tcs->has_precomputed_states = TRUE;
625
626 end:
627 fclose(fp);
628
629 /* Free the quarktable */
630 for(i=0; i<quarktable->len; i++) {
631 string = g_ptr_array_index (quarktable, i);
632 g_free(string);
633 }
634 g_ptr_array_free(quarktable, TRUE);
635 return;
636 }
637
638 static void
639 init(LttvTracesetState *self, LttvTraceset *ts)
640 {
641 guint i, j, nb_trace, nb_tracefile, nb_cpu;
642 guint64 nb_irq;
643
644 LttvTraceContext *tc;
645
646 LttvTraceState *tcs;
647
648 LttvTracefileState *tfcs;
649
650 LttvAttributeValue v;
651
652 LTTV_TRACESET_CONTEXT_CLASS(g_type_class_peek(LTTV_TRACESET_CONTEXT_TYPE))->
653 init((LttvTracesetContext *)self, ts);
654
655 nb_trace = lttv_traceset_number(ts);
656 for(i = 0 ; i < nb_trace ; i++) {
657 tc = self->parent.traces[i];
658 tcs = LTTV_TRACE_STATE(tc);
659 tcs->save_interval = LTTV_STATE_SAVE_INTERVAL;
660 lttv_attribute_find(tcs->parent.t_a, LTTV_STATE_TRACE_STATE_USE_COUNT,
661 LTTV_UINT, &v);
662 (*v.v_uint)++;
663
664 if(*(v.v_uint) == 1) {
665 create_name_tables(tcs);
666 create_max_time(tcs);
667 }
668 get_name_tables(tcs);
669 get_max_time(tcs);
670
671 nb_tracefile = tc->tracefiles->len;
672 nb_cpu = ltt_trace_get_num_cpu(tc->t);
673 nb_irq = tcs->name_tables->nb_irqs;
674 tcs->processes = NULL;
675 tcs->usertraces = NULL;
676 tcs->running_process = g_new(LttvProcessState*, nb_cpu);
677
678 /* init cpu resource stuff */
679 tcs->cpu_states = g_new(LttvCPUState, nb_cpu);
680 for(j = 0; j<nb_cpu; j++) {
681 tcs->cpu_states[j].mode_stack = g_array_new(FALSE, FALSE, sizeof(LttvCPUMode));
682 tcs->cpu_states[j].irq_stack = g_array_new(FALSE, FALSE, sizeof(gint));
683 tcs->cpu_states[j].softirq_stack = g_array_new(FALSE, FALSE, sizeof(gint));
684 tcs->cpu_states[j].trap_stack = g_array_new(FALSE, FALSE, sizeof(gint));
685 g_assert(tcs->cpu_states[j].mode_stack != NULL);
686 }
687
688 /* init irq resource stuff */
689 tcs->irq_states = g_new(LttvIRQState, nb_irq);
690 for(j = 0; j<nb_irq; j++) {
691 tcs->irq_states[j].mode_stack = g_array_new(FALSE, FALSE, sizeof(LttvIRQMode));
692 g_assert(tcs->irq_states[j].mode_stack != NULL);
693 }
694
695 /* init soft irq stuff */
696 /* the kernel has a statically fixed max of 32 softirqs */
697 tcs->soft_irq_states = g_new(LttvSoftIRQState, tcs->name_tables->nb_soft_irqs);
698
699 /* init trap stuff */
700 tcs->trap_states = g_new(LttvTrapState, tcs->name_tables->nb_traps);
701
702 /* init bdev resource stuff */
703 tcs->bdev_states = g_hash_table_new(g_int_hash, g_int_equal);
704
705 restore_init_state(tcs);
706 for(j = 0 ; j < nb_tracefile ; j++) {
707 tfcs =
708 LTTV_TRACEFILE_STATE(g_array_index(tc->tracefiles,
709 LttvTracefileContext*, j));
710 tfcs->tracefile_name = ltt_tracefile_name(tfcs->parent.tf);
711 tfcs->cpu = ltt_tracefile_cpu(tfcs->parent.tf);
712 tfcs->cpu_state = &(tcs->cpu_states[tfcs->cpu]);
713 if(ltt_tracefile_tid(tfcs->parent.tf) != 0) {
714 /* It's a Usertrace */
715 guint tid = ltt_tracefile_tid(tfcs->parent.tf);
716 GTree *usertrace_tree = (GTree*)g_hash_table_lookup(tcs->usertraces,
717 GUINT_TO_POINTER(tid));
718 if(!usertrace_tree) {
719 usertrace_tree = g_tree_new_full(compare_usertraces,
720 NULL, free_usertrace_key, NULL);
721 g_hash_table_insert(tcs->usertraces,
722 GUINT_TO_POINTER(tid), usertrace_tree);
723 }
724 LttTime *timestamp = g_new(LttTime, 1);
725 *timestamp = ltt_interpolate_time_from_tsc(tfcs->parent.tf,
726 ltt_tracefile_creation(tfcs->parent.tf));
727 g_tree_insert(usertrace_tree, timestamp, tfcs);
728 }
729 }
730
731 /* See if the trace has saved states */
732 state_load_saved_states(tcs);
733 }
734 }
735
736 static void
737 fini(LttvTracesetState *self)
738 {
739 guint i, nb_trace;
740
741 LttvTraceState *tcs;
742
743 //LttvTracefileState *tfcs;
744
745 LttvAttributeValue v;
746
747 nb_trace = lttv_traceset_number(LTTV_TRACESET_CONTEXT(self)->ts);
748 for(i = 0 ; i < nb_trace ; i++) {
749 tcs = (LttvTraceState *)(LTTV_TRACESET_CONTEXT(self)->traces[i]);
750 lttv_attribute_find(tcs->parent.t_a, LTTV_STATE_TRACE_STATE_USE_COUNT,
751 LTTV_UINT, &v);
752
753 g_assert(*(v.v_uint) != 0);
754 (*v.v_uint)--;
755
756 if(*(v.v_uint) == 0) {
757 free_name_tables(tcs);
758 free_max_time(tcs);
759 free_saved_state(tcs);
760 }
761 g_free(tcs->running_process);
762 tcs->running_process = NULL;
763 lttv_state_free_process_table(tcs->processes);
764 lttv_state_free_usertraces(tcs->usertraces);
765 tcs->processes = NULL;
766 tcs->usertraces = NULL;
767 }
768 LTTV_TRACESET_CONTEXT_CLASS(g_type_class_peek(LTTV_TRACESET_CONTEXT_TYPE))->
769 fini((LttvTracesetContext *)self);
770 }
771
772
773 static LttvTracesetContext *
774 new_traceset_context(LttvTracesetContext *self)
775 {
776 return LTTV_TRACESET_CONTEXT(g_object_new(LTTV_TRACESET_STATE_TYPE, NULL));
777 }
778
779
780 static LttvTraceContext *
781 new_trace_context(LttvTracesetContext *self)
782 {
783 return LTTV_TRACE_CONTEXT(g_object_new(LTTV_TRACE_STATE_TYPE, NULL));
784 }
785
786
787 static LttvTracefileContext *
788 new_tracefile_context(LttvTracesetContext *self)
789 {
790 return LTTV_TRACEFILE_CONTEXT(g_object_new(LTTV_TRACEFILE_STATE_TYPE, NULL));
791 }
792
793
794 /* Write the process state of the trace */
795
796 static void write_process_state(gpointer key, gpointer value,
797 gpointer user_data)
798 {
799 LttvProcessState *process;
800
801 LttvExecutionState *es;
802
803 FILE *fp = (FILE *)user_data;
804
805 guint i;
806 guint64 address;
807
808 process = (LttvProcessState *)value;
809 fprintf(fp,
810 " <PROCESS CORE=%p PID=%u TGID=%u PPID=%u TYPE=\"%s\" CTIME_S=%lu CTIME_NS=%lu ITIME_S=%lu ITIME_NS=%lu NAME=\"%s\" BRAND=\"%s\" CPU=\"%u\" FREE_EVENTS=\"%u\">\n",
811 process, process->pid, process->tgid, process->ppid,
812 g_quark_to_string(process->type),
813 process->creation_time.tv_sec,
814 process->creation_time.tv_nsec,
815 process->insertion_time.tv_sec,
816 process->insertion_time.tv_nsec,
817 g_quark_to_string(process->name),
818 g_quark_to_string(process->brand),
819 process->cpu, process->free_events);
820
821 for(i = 0 ; i < process->execution_stack->len; i++) {
822 es = &g_array_index(process->execution_stack, LttvExecutionState, i);
823 fprintf(fp, " <ES MODE=\"%s\" SUBMODE=\"%s\" ENTRY_S=%lu ENTRY_NS=%lu",
824 g_quark_to_string(es->t), g_quark_to_string(es->n),
825 es->entry.tv_sec, es->entry.tv_nsec);
826 fprintf(fp, " CHANGE_S=%lu CHANGE_NS=%lu STATUS=\"%s\"/>\n",
827 es->change.tv_sec, es->change.tv_nsec, g_quark_to_string(es->s));
828 }
829
830 for(i = 0 ; i < process->user_stack->len; i++) {
831 address = g_array_index(process->user_stack, guint64, i);
832 fprintf(fp, " <USER_STACK ADDRESS=\"%" PRIu64 "\"/>\n",
833 address);
834 }
835
836 if(process->usertrace) {
837 fprintf(fp, " <USERTRACE NAME=\"%s\" CPU=%u\n/>",
838 g_quark_to_string(process->usertrace->tracefile_name),
839 process->usertrace->cpu);
840 }
841
842
843 fprintf(fp, " </PROCESS>\n");
844 }
845
846
847 void lttv_state_write(LttvTraceState *self, LttTime t, FILE *fp)
848 {
849 guint i, nb_tracefile, nb_block, offset;
850 guint64 tsc;
851
852 LttvTracefileState *tfcs;
853
854 LttTracefile *tf;
855
856 LttEventPosition *ep;
857
858 guint nb_cpus;
859
860 ep = ltt_event_position_new();
861
862 fprintf(fp,"<PROCESS_STATE TIME_S=%lu TIME_NS=%lu>\n", t.tv_sec, t.tv_nsec);
863
864 g_hash_table_foreach(self->processes, write_process_state, fp);
865
866 nb_cpus = ltt_trace_get_num_cpu(self->parent.t);
867 for(i=0;i<nb_cpus;i++) {
868 fprintf(fp," <CPU NUM=%u RUNNING_PROCESS=%u>\n",
869 i, self->running_process[i]->pid);
870 }
871
872 nb_tracefile = self->parent.tracefiles->len;
873
874 for(i = 0 ; i < nb_tracefile ; i++) {
875 tfcs =
876 LTTV_TRACEFILE_STATE(g_array_index(self->parent.tracefiles,
877 LttvTracefileContext*, i));
878 fprintf(fp, " <TRACEFILE TIMESTAMP_S=%lu TIMESTAMP_NS=%lu",
879 tfcs->parent.timestamp.tv_sec,
880 tfcs->parent.timestamp.tv_nsec);
881 LttEvent *e = ltt_tracefile_get_event(tfcs->parent.tf);
882 if(e == NULL) fprintf(fp,"/>\n");
883 else {
884 ltt_event_position(e, ep);
885 ltt_event_position_get(ep, &tf, &nb_block, &offset, &tsc);
886 fprintf(fp, " BLOCK=%u OFFSET=%u TSC=%" PRIu64 "/>\n", nb_block, offset,
887 tsc);
888 }
889 }
890 g_free(ep);
891 fprintf(fp,"</PROCESS_STATE>\n");
892 }
893
894
895 static void write_process_state_raw(gpointer key, gpointer value,
896 gpointer user_data)
897 {
898 LttvProcessState *process;
899
900 LttvExecutionState *es;
901
902 FILE *fp = (FILE *)user_data;
903
904 guint i;
905 guint64 address;
906
907 process = (LttvProcessState *)value;
908 fputc(HDR_PROCESS, fp);
909 //fwrite(&header, sizeof(header), 1, fp);
910 //fprintf(fp, "%s", g_quark_to_string(process->type));
911 //fputc('\0', fp);
912 fwrite(&process->type, sizeof(process->type), 1, fp);
913 //fprintf(fp, "%s", g_quark_to_string(process->name));
914 //fputc('\0', fp);
915 fwrite(&process->name, sizeof(process->name), 1, fp);
916 //fprintf(fp, "%s", g_quark_to_string(process->brand));
917 //fputc('\0', fp);
918 fwrite(&process->brand, sizeof(process->brand), 1, fp);
919 fwrite(&process->pid, sizeof(process->pid), 1, fp);
920 fwrite(&process->free_events, sizeof(process->free_events), 1, fp);
921 fwrite(&process->tgid, sizeof(process->tgid), 1, fp);
922 fwrite(&process->ppid, sizeof(process->ppid), 1, fp);
923 fwrite(&process->cpu, sizeof(process->cpu), 1, fp);
924 fwrite(&process->creation_time, sizeof(process->creation_time), 1, fp);
925 fwrite(&process->insertion_time, sizeof(process->insertion_time), 1, fp);
926
927 #if 0
928 fprintf(fp,
929 " <PROCESS CORE=%p PID=%u TGID=%u PPID=%u TYPE=\"%s\" CTIME_S=%lu CTIME_NS=%lu ITIME_S=%lu ITIME_NS=%lu NAME=\"%s\" BRAND=\"%s\" CPU=\"%u\" PROCESS_TYPE=%u>\n",
930 process, process->pid, process->tgid, process->ppid,
931 g_quark_to_string(process->type),
932 process->creation_time.tv_sec,
933 process->creation_time.tv_nsec,
934 process->insertion_time.tv_sec,
935 process->insertion_time.tv_nsec,
936 g_quark_to_string(process->name),
937 g_quark_to_string(process->brand),
938 process->cpu);
939 #endif //0
940
941 for(i = 0 ; i < process->execution_stack->len; i++) {
942 es = &g_array_index(process->execution_stack, LttvExecutionState, i);
943
944 fputc(HDR_ES, fp);
945 //fprintf(fp, "%s", g_quark_to_string(es->t));
946 //fputc('\0', fp);
947 fwrite(&es->t, sizeof(es->t), 1, fp);
948 //fprintf(fp, "%s", g_quark_to_string(es->n));
949 //fputc('\0', fp);
950 fwrite(&es->n, sizeof(es->n), 1, fp);
951 //fprintf(fp, "%s", g_quark_to_string(es->s));
952 //fputc('\0', fp);
953 fwrite(&es->s, sizeof(es->s), 1, fp);
954 fwrite(&es->entry, sizeof(es->entry), 1, fp);
955 fwrite(&es->change, sizeof(es->change), 1, fp);
956 fwrite(&es->cum_cpu_time, sizeof(es->cum_cpu_time), 1, fp);
957 #if 0
958 fprintf(fp, " <ES MODE=\"%s\" SUBMODE=\"%s\" ENTRY_S=%lu ENTRY_NS=%lu",
959 g_quark_to_string(es->t), g_quark_to_string(es->n),
960 es->entry.tv_sec, es->entry.tv_nsec);
961 fprintf(fp, " CHANGE_S=%lu CHANGE_NS=%lu STATUS=\"%s\"/>\n",
962 es->change.tv_sec, es->change.tv_nsec, g_quark_to_string(es->s));
963 #endif //0
964 }
965
966 for(i = 0 ; i < process->user_stack->len; i++) {
967 address = g_array_index(process->user_stack, guint64, i);
968 fputc(HDR_USER_STACK, fp);
969 fwrite(&address, sizeof(address), 1, fp);
970 #if 0
971 fprintf(fp, " <USER_STACK ADDRESS=\"%llu\"/>\n",
972 address);
973 #endif //0
974 }
975
976 if(process->usertrace) {
977 fputc(HDR_USERTRACE, fp);
978 //fprintf(fp, "%s", g_quark_to_string(process->usertrace->tracefile_name));
979 //fputc('\0', fp);
980 fwrite(&process->usertrace->tracefile_name,
981 sizeof(process->usertrace->tracefile_name), 1, fp);
982 fwrite(&process->usertrace->cpu, sizeof(process->usertrace->cpu), 1, fp);
983 #if 0
984 fprintf(fp, " <USERTRACE NAME=\"%s\" CPU=%u\n/>",
985 g_quark_to_string(process->usertrace->tracefile_name),
986 process->usertrace->cpu);
987 #endif //0
988 }
989
990 }
991
992
993 void lttv_state_write_raw(LttvTraceState *self, LttTime t, FILE *fp)
994 {
995 guint i, nb_tracefile, nb_block, offset;
996 guint64 tsc;
997
998 LttvTracefileState *tfcs;
999
1000 LttTracefile *tf;
1001
1002 LttEventPosition *ep;
1003
1004 guint nb_cpus;
1005
1006 ep = ltt_event_position_new();
1007
1008 //fprintf(fp,"<PROCESS_STATE TIME_S=%lu TIME_NS=%lu>\n", t.tv_sec, t.tv_nsec);
1009 fputc(HDR_PROCESS_STATE, fp);
1010 fwrite(&t, sizeof(t), 1, fp);
1011
1012 g_hash_table_foreach(self->processes, write_process_state_raw, fp);
1013
1014 nb_cpus = ltt_trace_get_num_cpu(self->parent.t);
1015 for(i=0;i<nb_cpus;i++) {
1016 fputc(HDR_CPU, fp);
1017 fwrite(&i, sizeof(i), 1, fp); /* cpu number */
1018 fwrite(&self->running_process[i]->pid,
1019 sizeof(self->running_process[i]->pid), 1, fp);
1020 //fprintf(fp," <CPU NUM=%u RUNNING_PROCESS=%u>\n",
1021 // i, self->running_process[i]->pid);
1022 }
1023
1024 nb_tracefile = self->parent.tracefiles->len;
1025
1026 for(i = 0 ; i < nb_tracefile ; i++) {
1027 tfcs =
1028 LTTV_TRACEFILE_STATE(g_array_index(self->parent.tracefiles,
1029 LttvTracefileContext*, i));
1030 // fprintf(fp, " <TRACEFILE TIMESTAMP_S=%lu TIMESTAMP_NS=%lu",
1031 // tfcs->parent.timestamp.tv_sec,
1032 // tfcs->parent.timestamp.tv_nsec);
1033 fputc(HDR_TRACEFILE, fp);
1034 fwrite(&tfcs->parent.timestamp, sizeof(tfcs->parent.timestamp), 1, fp);
1035 /* Note : if timestamp if LTT_TIME_INFINITE, there will be no
1036 * position following : end of trace */
1037 LttEvent *e = ltt_tracefile_get_event(tfcs->parent.tf);
1038 if(e != NULL) {
1039 ltt_event_position(e, ep);
1040 ltt_event_position_get(ep, &tf, &nb_block, &offset, &tsc);
1041 //fprintf(fp, " BLOCK=%u OFFSET=%u TSC=%llu/>\n", nb_block, offset,
1042 // tsc);
1043 fwrite(&nb_block, sizeof(nb_block), 1, fp);
1044 fwrite(&offset, sizeof(offset), 1, fp);
1045 fwrite(&tsc, sizeof(tsc), 1, fp);
1046 }
1047 }
1048 g_free(ep);
1049 }
1050
1051
1052 /* Read process state from a file */
1053
1054 /* Called because a HDR_PROCESS was found */
1055 static void read_process_state_raw(LttvTraceState *self, FILE *fp,
1056 GPtrArray *quarktable)
1057 {
1058 LttvExecutionState *es;
1059 LttvProcessState *process, *parent_process;
1060 LttvProcessState tmp;
1061 GQuark tmpq;
1062
1063 guint64 *address;
1064
1065 /* TODO : check return value */
1066 fread(&tmp.type, sizeof(tmp.type), 1, fp);
1067 fread(&tmp.name, sizeof(tmp.name), 1, fp);
1068 fread(&tmp.brand, sizeof(tmp.brand), 1, fp);
1069 fread(&tmp.pid, sizeof(tmp.pid), 1, fp);
1070 fread(&tmp.free_events, sizeof(tmp.free_events), 1, fp);
1071 fread(&tmp.tgid, sizeof(tmp.tgid), 1, fp);
1072 fread(&tmp.ppid, sizeof(tmp.ppid), 1, fp);
1073 fread(&tmp.cpu, sizeof(tmp.cpu), 1, fp);
1074 fread(&tmp.creation_time, sizeof(tmp.creation_time), 1, fp);
1075 fread(&tmp.insertion_time, sizeof(tmp.insertion_time), 1, fp);
1076
1077 if(tmp.pid == 0) {
1078 process = lttv_state_find_process(self, tmp.cpu, tmp.pid);
1079 } else {
1080 /* We must link to the parent */
1081 parent_process = lttv_state_find_process_or_create(self, ANY_CPU, tmp.ppid,
1082 &ltt_time_zero);
1083 process = lttv_state_find_process(self, ANY_CPU, tmp.pid);
1084 if(process == NULL) {
1085 process = lttv_state_create_process(self, parent_process, tmp.cpu,
1086 tmp.pid, tmp.tgid,
1087 g_quark_from_string((gchar*)g_ptr_array_index(quarktable, tmp.name)),
1088 &tmp.creation_time);
1089 }
1090 }
1091 process->insertion_time = tmp.insertion_time;
1092 process->creation_time = tmp.creation_time;
1093 process->type = g_quark_from_string(
1094 (gchar*)g_ptr_array_index(quarktable, tmp.type));
1095 process->tgid = tmp.tgid;
1096 process->ppid = tmp.ppid;
1097 process->brand = g_quark_from_string(
1098 (gchar*)g_ptr_array_index(quarktable, tmp.brand));
1099 process->name =
1100 g_quark_from_string((gchar*)g_ptr_array_index(quarktable, tmp.name));
1101 process->free_events = tmp.free_events;
1102
1103 do {
1104 if(feof(fp) || ferror(fp)) goto end_loop;
1105
1106 gint hdr = fgetc(fp);
1107 if(hdr == EOF) goto end_loop;
1108
1109 switch(hdr) {
1110 case HDR_ES:
1111 process->execution_stack =
1112 g_array_set_size(process->execution_stack,
1113 process->execution_stack->len + 1);
1114 es = &g_array_index(process->execution_stack, LttvExecutionState,
1115 process->execution_stack->len-1);
1116 process->state = es;
1117
1118 fread(&es->t, sizeof(es->t), 1, fp);
1119 es->t = g_quark_from_string(
1120 (gchar*)g_ptr_array_index(quarktable, es->t));
1121 fread(&es->n, sizeof(es->n), 1, fp);
1122 es->n = g_quark_from_string(
1123 (gchar*)g_ptr_array_index(quarktable, es->n));
1124 fread(&es->s, sizeof(es->s), 1, fp);
1125 es->s = g_quark_from_string(
1126 (gchar*)g_ptr_array_index(quarktable, es->s));
1127 fread(&es->entry, sizeof(es->entry), 1, fp);
1128 fread(&es->change, sizeof(es->change), 1, fp);
1129 fread(&es->cum_cpu_time, sizeof(es->cum_cpu_time), 1, fp);
1130 break;
1131 case HDR_USER_STACK:
1132 process->user_stack = g_array_set_size(process->user_stack,
1133 process->user_stack->len + 1);
1134 address = &g_array_index(process->user_stack, guint64,
1135 process->user_stack->len-1);
1136 fread(address, sizeof(address), 1, fp);
1137 process->current_function = *address;
1138 break;
1139 case HDR_USERTRACE:
1140 fread(&tmpq, sizeof(tmpq), 1, fp);
1141 fread(&process->usertrace->cpu, sizeof(process->usertrace->cpu), 1, fp);
1142 break;
1143 default:
1144 ungetc(hdr, fp);
1145 goto end_loop;
1146 };
1147 } while(1);
1148 end_loop:
1149 return;
1150 }
1151
1152
1153 /* Called because a HDR_PROCESS_STATE was found */
1154 /* Append a saved state to the trace states */
1155 void lttv_state_read_raw(LttvTraceState *self, FILE *fp, GPtrArray *quarktable)
1156 {
1157 guint i, nb_tracefile, nb_block, offset;
1158 guint64 tsc;
1159 LttvTracefileState *tfcs;
1160
1161 LttEventPosition *ep;
1162
1163 guint nb_cpus;
1164
1165 int hdr;
1166
1167 LttTime t;
1168
1169 LttvAttribute *saved_states_tree, *saved_state_tree;
1170
1171 LttvAttributeValue value;
1172 GTree *pqueue = self->parent.ts_context->pqueue;
1173 ep = ltt_event_position_new();
1174
1175 restore_init_state(self);
1176
1177 fread(&t, sizeof(t), 1, fp);
1178
1179 do {
1180 if(feof(fp) || ferror(fp)) goto end_loop;
1181 hdr = fgetc(fp);
1182 if(hdr == EOF) goto end_loop;
1183
1184 switch(hdr) {
1185 case HDR_PROCESS:
1186 /* Call read_process_state_raw */
1187 read_process_state_raw(self, fp, quarktable);
1188 break;
1189 case HDR_TRACEFILE:
1190 case HDR_TRACESET:
1191 case HDR_TRACE:
1192 case HDR_QUARKS:
1193 case HDR_QUARK:
1194 case HDR_ES:
1195 case HDR_USER_STACK:
1196 case HDR_USERTRACE:
1197 case HDR_PROCESS_STATE:
1198 case HDR_CPU:
1199 ungetc(hdr, fp);
1200 goto end_loop;
1201 break;
1202 default:
1203 g_error("Error while parsing saved state file : unknown data header %d",
1204 hdr);
1205 };
1206 } while(1);
1207 end_loop:
1208
1209 nb_cpus = ltt_trace_get_num_cpu(self->parent.t);
1210 for(i=0;i<nb_cpus;i++) {
1211 int cpu_num;
1212 hdr = fgetc(fp);
1213 g_assert(hdr == HDR_CPU);
1214 fread(&cpu_num, sizeof(cpu_num), 1, fp); /* cpu number */
1215 g_assert(i == cpu_num);
1216 fread(&self->running_process[i]->pid,
1217 sizeof(self->running_process[i]->pid), 1, fp);
1218 }
1219
1220 nb_tracefile = self->parent.tracefiles->len;
1221
1222 for(i = 0 ; i < nb_tracefile ; i++) {
1223 tfcs =
1224 LTTV_TRACEFILE_STATE(g_array_index(self->parent.tracefiles,
1225 LttvTracefileContext*, i));
1226 // fprintf(fp, " <TRACEFILE TIMESTAMP_S=%lu TIMESTAMP_NS=%lu",
1227 // tfcs->parent.timestamp.tv_sec,
1228 // tfcs->parent.timestamp.tv_nsec);
1229 g_tree_remove(pqueue, &tfcs->parent);
1230 hdr = fgetc(fp);
1231 g_assert(hdr == HDR_TRACEFILE);
1232 fread(&tfcs->parent.timestamp, sizeof(tfcs->parent.timestamp), 1, fp);
1233 /* Note : if timestamp if LTT_TIME_INFINITE, there will be no
1234 * position following : end of trace */
1235 if(ltt_time_compare(tfcs->parent.timestamp, ltt_time_infinite) != 0) {
1236 fread(&nb_block, sizeof(nb_block), 1, fp);
1237 fread(&offset, sizeof(offset), 1, fp);
1238 fread(&tsc, sizeof(tsc), 1, fp);
1239 ltt_event_position_set(ep, tfcs->parent.tf, nb_block, offset, tsc);
1240 gint ret = ltt_tracefile_seek_position(tfcs->parent.tf, ep);
1241 g_assert(ret == 0);
1242 g_tree_insert(pqueue, &tfcs->parent, &tfcs->parent);
1243 }
1244 }
1245 g_free(ep);
1246
1247 saved_states_tree = lttv_attribute_find_subdir(self->parent.t_a,
1248 LTTV_STATE_SAVED_STATES);
1249 saved_state_tree = g_object_new(LTTV_ATTRIBUTE_TYPE, NULL);
1250 value = lttv_attribute_add(saved_states_tree,
1251 lttv_attribute_get_number(saved_states_tree), LTTV_GOBJECT);
1252 *(value.v_gobject) = (GObject *)saved_state_tree;
1253 value = lttv_attribute_add(saved_state_tree, LTTV_STATE_TIME, LTTV_TIME);
1254 *(value.v_time) = t;
1255 lttv_state_save(self, saved_state_tree);
1256 g_debug("Saving state at time %lu.%lu", t.tv_sec,
1257 t.tv_nsec);
1258
1259 *(self->max_time_state_recomputed_in_seek) = t;
1260
1261 }
1262
1263 /* Called when a HDR_TRACE is found */
1264 void lttv_trace_states_read_raw(LttvTraceState *tcs, FILE *fp,
1265 GPtrArray *quarktable)
1266 {
1267 int hdr;
1268
1269 do {
1270 if(feof(fp) || ferror(fp)) goto end_loop;
1271 hdr = fgetc(fp);
1272 if(hdr == EOF) goto end_loop;
1273
1274 switch(hdr) {
1275 case HDR_PROCESS_STATE:
1276 /* Call read_process_state_raw */
1277 lttv_state_read_raw(tcs, fp, quarktable);
1278 break;
1279 case HDR_TRACEFILE:
1280 case HDR_TRACESET:
1281 case HDR_TRACE:
1282 case HDR_QUARKS:
1283 case HDR_QUARK:
1284 case HDR_ES:
1285 case HDR_USER_STACK:
1286 case HDR_USERTRACE:
1287 case HDR_PROCESS:
1288 case HDR_CPU:
1289 g_error("Error while parsing saved state file :"
1290 " unexpected data header %d",
1291 hdr);
1292 break;
1293 default:
1294 g_error("Error while parsing saved state file : unknown data header %d",
1295 hdr);
1296 };
1297 } while(1);
1298 end_loop:
1299 *(tcs->max_time_state_recomputed_in_seek) = tcs->parent.time_span.end_time;
1300 restore_init_state(tcs);
1301 lttv_process_trace_seek_time(&tcs->parent, ltt_time_zero);
1302 return;
1303 }
1304
1305
1306
1307 /* Copy each process from an existing hash table to a new one */
1308
1309 static void copy_process_state(gpointer key, gpointer value,gpointer user_data)
1310 {
1311 LttvProcessState *process, *new_process;
1312
1313 GHashTable *new_processes = (GHashTable *)user_data;
1314
1315 guint i;
1316
1317 process = (LttvProcessState *)value;
1318 new_process = g_new(LttvProcessState, 1);
1319 *new_process = *process;
1320 new_process->execution_stack = g_array_sized_new(FALSE, FALSE,
1321 sizeof(LttvExecutionState), PREALLOCATED_EXECUTION_STACK);
1322 new_process->execution_stack =
1323 g_array_set_size(new_process->execution_stack,
1324 process->execution_stack->len);
1325 for(i = 0 ; i < process->execution_stack->len; i++) {
1326 g_array_index(new_process->execution_stack, LttvExecutionState, i) =
1327 g_array_index(process->execution_stack, LttvExecutionState, i);
1328 }
1329 new_process->state = &g_array_index(new_process->execution_stack,
1330 LttvExecutionState, new_process->execution_stack->len - 1);
1331 new_process->user_stack = g_array_sized_new(FALSE, FALSE,
1332 sizeof(guint64), 0);
1333 new_process->user_stack =
1334 g_array_set_size(new_process->user_stack,
1335 process->user_stack->len);
1336 for(i = 0 ; i < process->user_stack->len; i++) {
1337 g_array_index(new_process->user_stack, guint64, i) =
1338 g_array_index(process->user_stack, guint64, i);
1339 }
1340 new_process->current_function = process->current_function;
1341
1342 /* fd hash table stuff */
1343 {
1344 GHashTableIter it;
1345 gpointer key;
1346 gpointer value;
1347
1348 /* copy every item in the hash table */
1349 new_process->fds = g_hash_table_new(g_direct_hash, g_direct_equal);
1350
1351 g_hash_table_iter_init(&it, process->fds);
1352 while (g_hash_table_iter_next (&it, (void *)&key, (void *)&value)) {
1353 g_hash_table_insert(new_process->fds, key, value);
1354 }
1355 }
1356
1357 /* When done creating the new process state, insert it in the
1358 * hash table */
1359 g_hash_table_insert(new_processes, new_process, new_process);
1360 }
1361
1362
1363 static GHashTable *lttv_state_copy_process_table(GHashTable *processes)
1364 {
1365 GHashTable *new_processes = g_hash_table_new(process_hash, process_equal);
1366
1367 g_hash_table_foreach(processes, copy_process_state, new_processes);
1368 return new_processes;
1369 }
1370
1371 static LttvCPUState *lttv_state_copy_cpu_states(LttvCPUState *states, guint n)
1372 {
1373 guint i,j;
1374 LttvCPUState *retval;
1375
1376 retval = g_new(LttvCPUState, n);
1377
1378 for(i=0; i<n; i++) {
1379 retval[i].irq_stack = g_array_new(FALSE, FALSE, sizeof(gint));
1380 g_array_set_size(retval[i].irq_stack, states[i].irq_stack->len);
1381 for(j=0; j<states[i].irq_stack->len; j++) {
1382 g_array_index(retval[i].irq_stack, gint, j) = g_array_index(states[i].irq_stack, gint, j);
1383 }
1384
1385 retval[i].softirq_stack = g_array_new(FALSE, FALSE, sizeof(gint));
1386 g_array_set_size(retval[i].softirq_stack, states[i].softirq_stack->len);
1387 for(j=0; j<states[i].softirq_stack->len; j++) {
1388 g_array_index(retval[i].softirq_stack, gint, j) = g_array_index(states[i].softirq_stack, gint, j);
1389 }
1390
1391 retval[i].trap_stack = g_array_new(FALSE, FALSE, sizeof(gint));
1392 g_array_set_size(retval[i].trap_stack, states[i].trap_stack->len);
1393 for(j=0; j<states[i].trap_stack->len; j++) {
1394 g_array_index(retval[i].trap_stack, gint, j) = g_array_index(states[i].trap_stack, gint, j);
1395 }
1396
1397 retval[i].mode_stack = g_array_new(FALSE, FALSE, sizeof(LttvCPUMode));
1398 g_array_set_size(retval[i].mode_stack, states[i].mode_stack->len);
1399 for(j=0; j<states[i].mode_stack->len; j++) {
1400 g_array_index(retval[i].mode_stack, GQuark, j) = g_array_index(states[i].mode_stack, GQuark, j);
1401 }
1402 }
1403
1404 return retval;
1405 }
1406
1407 static void lttv_state_free_cpu_states(LttvCPUState *states, guint n)
1408 {
1409 guint i;
1410
1411 for(i=0; i<n; i++) {
1412 g_array_free(states[i].mode_stack, TRUE);
1413 g_array_free(states[i].irq_stack, TRUE);
1414 g_array_free(states[i].softirq_stack, TRUE);
1415 g_array_free(states[i].trap_stack, TRUE);
1416 }
1417
1418 g_free(states);
1419 }
1420
1421 static LttvIRQState *lttv_state_copy_irq_states(LttvIRQState *states, guint n)
1422 {
1423 guint i,j;
1424 LttvIRQState *retval;
1425
1426 retval = g_new(LttvIRQState, n);
1427
1428 for(i=0; i<n; i++) {
1429 retval[i].mode_stack = g_array_new(FALSE, FALSE, sizeof(LttvIRQMode));
1430 g_array_set_size(retval[i].mode_stack, states[i].mode_stack->len);
1431 for(j=0; j<states[i].mode_stack->len; j++) {
1432 g_array_index(retval[i].mode_stack, GQuark, j) = g_array_index(states[i].mode_stack, GQuark, j);
1433 }
1434 }
1435
1436 return retval;
1437 }
1438
1439 static void lttv_state_free_irq_states(LttvIRQState *states, guint n)
1440 {
1441 guint i;
1442
1443 for(i=0; i<n; i++) {
1444 g_array_free(states[i].mode_stack, TRUE);
1445 }
1446
1447 g_free(states);
1448 }
1449
1450 static LttvSoftIRQState *lttv_state_copy_soft_irq_states(LttvSoftIRQState *states, guint n)
1451 {
1452 guint i;
1453 LttvSoftIRQState *retval;
1454
1455 retval = g_new(LttvSoftIRQState, n);
1456
1457 for(i=0; i<n; i++) {
1458 retval[i].pending = states[i].pending;
1459 retval[i].running = states[i].running;
1460 }
1461
1462 return retval;
1463 }
1464
1465 static void lttv_state_free_soft_irq_states(LttvSoftIRQState *states, guint n)
1466 {
1467 g_free(states);
1468 }
1469
1470 static LttvTrapState *lttv_state_copy_trap_states(LttvTrapState *states, guint n)
1471 {
1472 guint i;
1473 LttvTrapState *retval;
1474
1475 retval = g_new(LttvTrapState, n);
1476
1477 for(i=0; i<n; i++) {
1478 retval[i].running = states[i].running;
1479 }
1480
1481 return retval;
1482 }
1483
1484 static void lttv_state_free_trap_states(LttvTrapState *states, guint n)
1485 {
1486 g_free(states);
1487 }
1488
1489 /* bdevstate stuff */
1490
1491 static LttvBdevState *get_hashed_bdevstate(LttvTraceState *ts, guint16 devcode)
1492 {
1493 gint devcode_gint = devcode;
1494 gpointer bdev = g_hash_table_lookup(ts->bdev_states, &devcode_gint);
1495 if(bdev == NULL) {
1496 LttvBdevState *bdevstate = g_new(LttvBdevState, 1);
1497 bdevstate->mode_stack = g_array_new(FALSE, FALSE, sizeof(GQuark));
1498
1499 gint * key = g_new(gint, 1);
1500 *key = devcode;
1501 g_hash_table_insert(ts->bdev_states, key, bdevstate);
1502
1503 bdev = bdevstate;
1504 }
1505
1506 return bdev;
1507 }
1508
1509 static LttvBdevState *bdevstate_new(void)
1510 {
1511 LttvBdevState *retval;
1512 retval = g_new(LttvBdevState, 1);
1513 retval->mode_stack = g_array_new(FALSE, FALSE, sizeof(GQuark));
1514
1515 return retval;
1516 }
1517
1518 static void bdevstate_free(LttvBdevState *bds)
1519 {
1520 g_array_free(bds->mode_stack, TRUE);
1521 g_free(bds);
1522 }
1523
1524 static void bdevstate_free_cb(gpointer key, gpointer value, gpointer user_data)
1525 {
1526 LttvBdevState *bds = (LttvBdevState *) value;
1527
1528 bdevstate_free(bds);
1529 }
1530
1531 static LttvBdevState *bdevstate_copy(LttvBdevState *bds)
1532 {
1533 LttvBdevState *retval;
1534
1535 retval = bdevstate_new();
1536 g_array_insert_vals(retval->mode_stack, 0, bds->mode_stack->data, bds->mode_stack->len);
1537
1538 return retval;
1539 }
1540
1541 static void insert_and_copy_bdev_state(gpointer k, gpointer v, gpointer u)
1542 {
1543 //GHashTable *ht = (GHashTable *)u;
1544 LttvBdevState *bds = (LttvBdevState *)v;
1545 LttvBdevState *newbds;
1546
1547 newbds = bdevstate_copy(bds);
1548
1549 g_hash_table_insert(u, k, newbds);
1550 }
1551
1552 static GHashTable *lttv_state_copy_blkdev_hashtable(GHashTable *ht)
1553 {
1554 GHashTable *retval;
1555
1556 retval = g_hash_table_new(g_int_hash, g_int_equal);
1557
1558 g_hash_table_foreach(ht, insert_and_copy_bdev_state, retval);
1559
1560 return retval;
1561 }
1562
1563 /* Free a hashtable and the LttvBdevState structures its values
1564 * point to. */
1565
1566 static void lttv_state_free_blkdev_hashtable(GHashTable *ht)
1567 {
1568 g_hash_table_foreach(ht, bdevstate_free_cb, NULL);
1569 g_hash_table_destroy(ht);
1570 }
1571
1572 /* The saved state for each trace contains a member "processes", which
1573 stores a copy of the process table, and a member "tracefiles" with
1574 one entry per tracefile. Each tracefile has a "process" member pointing
1575 to the current process and a "position" member storing the tracefile
1576 position (needed to seek to the current "next" event. */
1577
1578 static void state_save(LttvTraceState *self, LttvAttribute *container)
1579 {
1580 guint i, nb_tracefile, nb_cpus, nb_irqs, nb_soft_irqs, nb_traps;
1581
1582 LttvTracefileState *tfcs;
1583
1584 LttvAttribute *tracefiles_tree, *tracefile_tree;
1585
1586 guint *running_process;
1587
1588 LttvAttributeValue value;
1589
1590 LttEventPosition *ep;
1591
1592 tracefiles_tree = lttv_attribute_find_subdir(container,
1593 LTTV_STATE_TRACEFILES);
1594
1595 value = lttv_attribute_add(container, LTTV_STATE_PROCESSES,
1596 LTTV_POINTER);
1597 *(value.v_pointer) = lttv_state_copy_process_table(self->processes);
1598
1599 /* Add the currently running processes array */
1600 nb_cpus = ltt_trace_get_num_cpu(self->parent.t);
1601 running_process = g_new(guint, nb_cpus);
1602 for(i=0;i<nb_cpus;i++) {
1603 running_process[i] = self->running_process[i]->pid;
1604 }
1605 value = lttv_attribute_add(container, LTTV_STATE_RUNNING_PROCESS,
1606 LTTV_POINTER);
1607 *(value.v_pointer) = running_process;
1608
1609 g_info("State save");
1610
1611 nb_tracefile = self->parent.tracefiles->len;
1612
1613 for(i = 0 ; i < nb_tracefile ; i++) {
1614 tfcs =
1615 LTTV_TRACEFILE_STATE(g_array_index(self->parent.tracefiles,
1616 LttvTracefileContext*, i));
1617 tracefile_tree = g_object_new(LTTV_ATTRIBUTE_TYPE, NULL);
1618 value = lttv_attribute_add(tracefiles_tree, i,
1619 LTTV_GOBJECT);
1620 *(value.v_gobject) = (GObject *)tracefile_tree;
1621 #if 0
1622 value = lttv_attribute_add(tracefile_tree, LTTV_STATE_PROCESS,
1623 LTTV_UINT);
1624 *(value.v_uint) = tfcs->process->pid;
1625 #endif //0
1626 value = lttv_attribute_add(tracefile_tree, LTTV_STATE_EVENT,
1627 LTTV_POINTER);
1628 /* Only save the position if the tfs has not infinite time. */
1629 //if(!g_tree_lookup(self->parent.ts_context->pqueue, &tfcs->parent)
1630 // && current_tfcs != tfcs) {
1631 if(ltt_time_compare(tfcs->parent.timestamp, ltt_time_infinite) == 0) {
1632 *(value.v_pointer) = NULL;
1633 } else {
1634 LttEvent *e = ltt_tracefile_get_event(tfcs->parent.tf);
1635 ep = ltt_event_position_new();
1636 ltt_event_position(e, ep);
1637 *(value.v_pointer) = ep;
1638
1639 guint nb_block, offset;
1640 guint64 tsc;
1641 LttTracefile *tf;
1642 ltt_event_position_get(ep, &tf, &nb_block, &offset, &tsc);
1643 g_info("Block %u offset %u tsc %" PRIu64 " time %lu.%lu", nb_block, offset,
1644 tsc,
1645 tfcs->parent.timestamp.tv_sec, tfcs->parent.timestamp.tv_nsec);
1646 }
1647 }
1648
1649 /* save the cpu state */
1650 {
1651 value = lttv_attribute_add(container, LTTV_STATE_RESOURCE_CPUS_COUNT,
1652 LTTV_UINT);
1653 *(value.v_uint) = nb_cpus;
1654
1655 value = lttv_attribute_add(container, LTTV_STATE_RESOURCE_CPUS,
1656 LTTV_POINTER);
1657 *(value.v_pointer) = lttv_state_copy_cpu_states(self->cpu_states, nb_cpus);
1658 }
1659
1660 /* save the irq state */
1661 nb_irqs = self->name_tables->nb_irqs;
1662 {
1663 value = lttv_attribute_add(container, LTTV_STATE_RESOURCE_IRQS,
1664 LTTV_POINTER);
1665 *(value.v_pointer) = lttv_state_copy_irq_states(self->irq_states, nb_irqs);
1666 }
1667
1668 /* save the soft irq state */
1669 nb_soft_irqs = self->name_tables->nb_soft_irqs;
1670 {
1671 value = lttv_attribute_add(container, LTTV_STATE_RESOURCE_SOFT_IRQS,
1672 LTTV_POINTER);
1673 *(value.v_pointer) = lttv_state_copy_soft_irq_states(self->soft_irq_states, nb_soft_irqs);
1674 }
1675
1676 /* save the trap state */
1677 nb_traps = self->name_tables->nb_traps;
1678 {
1679 value = lttv_attribute_add(container, LTTV_STATE_RESOURCE_TRAPS,
1680 LTTV_POINTER);
1681 *(value.v_pointer) = lttv_state_copy_trap_states(self->trap_states, nb_traps);
1682 }
1683
1684 /* save the blkdev states */
1685 value = lttv_attribute_add(container, LTTV_STATE_RESOURCE_BLKDEVS,
1686 LTTV_POINTER);
1687 *(value.v_pointer) = lttv_state_copy_blkdev_hashtable(self->bdev_states);
1688 }
1689
1690
1691 static void state_restore(LttvTraceState *self, LttvAttribute *container)
1692 {
1693 guint i, nb_tracefile, pid, nb_cpus, nb_irqs, nb_soft_irqs, nb_traps;
1694
1695 LttvTracefileState *tfcs;
1696
1697 LttvAttribute *tracefiles_tree, *tracefile_tree;
1698
1699 guint *running_process;
1700
1701 LttvAttributeType type;
1702
1703 LttvAttributeValue value;
1704
1705 LttvAttributeName name;
1706
1707 gboolean is_named;
1708
1709 LttEventPosition *ep;
1710
1711 LttvTracesetContext *tsc = self->parent.ts_context;
1712 int retval;
1713
1714 tracefiles_tree = lttv_attribute_find_subdir(container,
1715 LTTV_STATE_TRACEFILES);
1716
1717 type = lttv_attribute_get_by_name(container, LTTV_STATE_PROCESSES,
1718 &value);
1719 g_assert(type == LTTV_POINTER);
1720 lttv_state_free_process_table(self->processes);
1721 self->processes = lttv_state_copy_process_table(*(value.v_pointer));
1722
1723 /* Add the currently running processes array */
1724 nb_cpus = ltt_trace_get_num_cpu(self->parent.t);
1725 type = lttv_attribute_get_by_name(container, LTTV_STATE_RUNNING_PROCESS,
1726 &value);
1727 g_assert(type == LTTV_POINTER);
1728 running_process = *(value.v_pointer);
1729 for(i=0;i<nb_cpus;i++) {
1730 pid = running_process[i];
1731 self->running_process[i] = lttv_state_find_process(self, i, pid);
1732 g_assert(self->running_process[i] != NULL);
1733 }
1734
1735 nb_tracefile = self->parent.tracefiles->len;
1736
1737 //g_tree_destroy(tsc->pqueue);
1738 //tsc->pqueue = g_tree_new(compare_tracefile);
1739
1740 /* restore cpu resource states */
1741 type = lttv_attribute_get_by_name(container, LTTV_STATE_RESOURCE_CPUS, &value);
1742 g_assert(type == LTTV_POINTER);
1743 lttv_state_free_cpu_states(self->cpu_states, nb_cpus);
1744 self->cpu_states = lttv_state_copy_cpu_states(*(value.v_pointer), nb_cpus);
1745
1746 /* restore irq resource states */
1747 nb_irqs = self->name_tables->nb_irqs;
1748 type = lttv_attribute_get_by_name(container, LTTV_STATE_RESOURCE_IRQS, &value);
1749 g_assert(type == LTTV_POINTER);
1750 lttv_state_free_irq_states(self->irq_states, nb_irqs);
1751 self->irq_states = lttv_state_copy_irq_states(*(value.v_pointer), nb_irqs);
1752
1753 /* restore soft irq resource states */
1754 nb_soft_irqs = self->name_tables->nb_soft_irqs;
1755 type = lttv_attribute_get_by_name(container, LTTV_STATE_RESOURCE_SOFT_IRQS, &value);
1756 g_assert(type == LTTV_POINTER);
1757 lttv_state_free_soft_irq_states(self->soft_irq_states, nb_soft_irqs);
1758 self->soft_irq_states = lttv_state_copy_soft_irq_states(*(value.v_pointer), nb_soft_irqs);
1759
1760 /* restore trap resource states */
1761 nb_traps = self->name_tables->nb_traps;
1762 type = lttv_attribute_get_by_name(container, LTTV_STATE_RESOURCE_TRAPS, &value);
1763 g_assert(type == LTTV_POINTER);
1764 lttv_state_free_trap_states(self->trap_states, nb_traps);
1765 self->trap_states = lttv_state_copy_trap_states(*(value.v_pointer), nb_traps);
1766
1767 /* restore the blkdev states */
1768 type = lttv_attribute_get_by_name(container, LTTV_STATE_RESOURCE_BLKDEVS, &value);
1769 g_assert(type == LTTV_POINTER);
1770 lttv_state_free_blkdev_hashtable(self->bdev_states);
1771 self->bdev_states = lttv_state_copy_blkdev_hashtable(*(value.v_pointer));
1772
1773 for(i = 0 ; i < nb_tracefile ; i++) {
1774 tfcs =
1775 LTTV_TRACEFILE_STATE(g_array_index(self->parent.tracefiles,
1776 LttvTracefileContext*, i));
1777 type = lttv_attribute_get(tracefiles_tree, i, &name, &value, &is_named);
1778 g_assert(type == LTTV_GOBJECT);
1779 tracefile_tree = *((LttvAttribute **)(value.v_gobject));
1780 #if 0
1781 type = lttv_attribute_get_by_name(tracefile_tree, LTTV_STATE_PROCESS,
1782 &value);
1783 g_assert(type == LTTV_UINT);
1784 pid = *(value.v_uint);
1785 tfcs->process = lttv_state_find_process_or_create(tfcs, pid);
1786 #endif //0
1787 type = lttv_attribute_get_by_name(tracefile_tree, LTTV_STATE_EVENT,
1788 &value);
1789 g_assert(type == LTTV_POINTER);
1790 //g_assert(*(value.v_pointer) != NULL);
1791 ep = *(value.v_pointer);
1792 g_assert(tfcs->parent.t_context != NULL);
1793
1794 tfcs->cpu_state = &self->cpu_states[tfcs->cpu];
1795
1796 LttvTracefileContext *tfc = LTTV_TRACEFILE_CONTEXT(tfcs);
1797 g_tree_remove(tsc->pqueue, tfc);
1798
1799 if(ep != NULL) {
1800 retval= ltt_tracefile_seek_position(tfc->tf, ep);
1801 g_assert_cmpint(retval, ==, 0);
1802 tfc->timestamp = ltt_event_time(ltt_tracefile_get_event(tfc->tf));
1803 g_assert_cmpint(ltt_time_compare(tfc->timestamp, ltt_time_infinite), !=, 0);
1804 g_tree_insert(tsc->pqueue, tfc, tfc);
1805 g_info("Restoring state for a tf at time %lu.%lu", tfc->timestamp.tv_sec, tfc->timestamp.tv_nsec);
1806 } else {
1807 tfc->timestamp = ltt_time_infinite;
1808 }
1809 }
1810 }
1811
1812
1813 static void state_saved_free(LttvTraceState *self, LttvAttribute *container)
1814 {
1815 guint i, nb_tracefile, nb_cpus, nb_irqs, nb_soft_irqs;
1816
1817 LttvTracefileState *tfcs;
1818
1819 LttvAttribute *tracefiles_tree, *tracefile_tree;
1820
1821 guint *running_process;
1822
1823 LttvAttributeType type;
1824
1825 LttvAttributeValue value;
1826
1827 LttvAttributeName name;
1828
1829 gboolean is_named;
1830
1831 tracefiles_tree = lttv_attribute_find_subdir(container,
1832 LTTV_STATE_TRACEFILES);
1833 g_object_ref(G_OBJECT(tracefiles_tree));
1834 lttv_attribute_remove_by_name(container, LTTV_STATE_TRACEFILES);
1835
1836 type = lttv_attribute_get_by_name(container, LTTV_STATE_PROCESSES,
1837 &value);
1838 g_assert(type == LTTV_POINTER);
1839 lttv_state_free_process_table(*(value.v_pointer));
1840 *(value.v_pointer) = NULL;
1841 lttv_attribute_remove_by_name(container, LTTV_STATE_PROCESSES);
1842
1843 /* Free running processes array */
1844 type = lttv_attribute_get_by_name(container, LTTV_STATE_RUNNING_PROCESS,
1845 &value);
1846 g_assert(type == LTTV_POINTER);
1847 running_process = *(value.v_pointer);
1848 g_free(running_process);
1849
1850 /* free cpu resource states */
1851 type = lttv_attribute_get_by_name(container, LTTV_STATE_RESOURCE_CPUS_COUNT, &value);
1852 g_assert(type == LTTV_UINT);
1853 nb_cpus = *value.v_uint;
1854 type = lttv_attribute_get_by_name(container, LTTV_STATE_RESOURCE_CPUS, &value);
1855 g_assert(type == LTTV_POINTER);
1856 lttv_state_free_cpu_states(*(value.v_pointer), nb_cpus);
1857
1858 /* free irq resource states */
1859 nb_irqs = self->name_tables->nb_irqs;
1860 type = lttv_attribute_get_by_name(container, LTTV_STATE_RESOURCE_IRQS, &value);
1861 g_assert(type == LTTV_POINTER);
1862 lttv_state_free_irq_states(*(value.v_pointer), nb_irqs);
1863
1864 /* free softirq resource states */
1865 nb_soft_irqs = self->name_tables->nb_soft_irqs;
1866 type = lttv_attribute_get_by_name(container, LTTV_STATE_RESOURCE_SOFT_IRQS, &value);
1867 g_assert(type == LTTV_POINTER);
1868 lttv_state_free_soft_irq_states(*(value.v_pointer), nb_soft_irqs);
1869
1870 /* free the blkdev states */
1871 type = lttv_attribute_get_by_name(container, LTTV_STATE_RESOURCE_BLKDEVS, &value);
1872 g_assert(type == LTTV_POINTER);
1873 lttv_state_free_blkdev_hashtable(*(value.v_pointer));
1874
1875 nb_tracefile = self->parent.tracefiles->len;
1876
1877 for(i = 0 ; i < nb_tracefile ; i++) {
1878 tfcs =
1879 LTTV_TRACEFILE_STATE(g_array_index(self->parent.tracefiles,
1880 LttvTracefileContext*, i));
1881 type = lttv_attribute_get(tracefiles_tree, i, &name, &value, &is_named);
1882 g_assert(type == LTTV_GOBJECT);
1883 tracefile_tree = *((LttvAttribute **)(value.v_gobject));
1884
1885 type = lttv_attribute_get_by_name(tracefile_tree, LTTV_STATE_EVENT,
1886 &value);
1887 g_assert(type == LTTV_POINTER);
1888 if(*(value.v_pointer) != NULL) g_free(*(value.v_pointer));
1889 }
1890 g_object_unref(G_OBJECT(tracefiles_tree));
1891 }
1892
1893
1894 static void free_saved_state(LttvTraceState *self)
1895 {
1896 guint i, nb;
1897
1898 LttvAttributeType type;
1899
1900 LttvAttributeValue value;
1901
1902 LttvAttributeName name;
1903
1904 gboolean is_named;
1905
1906 LttvAttribute *saved_states;
1907
1908 saved_states = lttv_attribute_find_subdir(self->parent.t_a,
1909 LTTV_STATE_SAVED_STATES);
1910
1911 nb = lttv_attribute_get_number(saved_states);
1912 for(i = 0 ; i < nb ; i++) {
1913 type = lttv_attribute_get(saved_states, i, &name, &value, &is_named);
1914 g_assert(type == LTTV_GOBJECT);
1915 state_saved_free(self, *((LttvAttribute **)value.v_gobject));
1916 }
1917
1918 lttv_attribute_remove_by_name(self->parent.t_a, LTTV_STATE_SAVED_STATES);
1919 }
1920
1921
1922 static void
1923 create_max_time(LttvTraceState *tcs)
1924 {
1925 LttvAttributeValue v;
1926
1927 lttv_attribute_find(tcs->parent.t_a, LTTV_STATE_SAVED_STATES_TIME,
1928 LTTV_POINTER, &v);
1929 g_assert(*(v.v_pointer) == NULL);
1930 *(v.v_pointer) = g_new(LttTime,1);
1931 *((LttTime *)*(v.v_pointer)) = ltt_time_zero;
1932 }
1933
1934
1935 static void
1936 get_max_time(LttvTraceState *tcs)
1937 {
1938 LttvAttributeValue v;
1939
1940 lttv_attribute_find(tcs->parent.t_a, LTTV_STATE_SAVED_STATES_TIME,
1941 LTTV_POINTER, &v);
1942 g_assert(*(v.v_pointer) != NULL);
1943 tcs->max_time_state_recomputed_in_seek = (LttTime *)*(v.v_pointer);
1944 }
1945
1946
1947 static void
1948 free_max_time(LttvTraceState *tcs)
1949 {
1950 LttvAttributeValue v;
1951
1952 lttv_attribute_find(tcs->parent.t_a, LTTV_STATE_SAVED_STATES_TIME,
1953 LTTV_POINTER, &v);
1954 g_free(*(v.v_pointer));
1955 *(v.v_pointer) = NULL;
1956 }
1957
1958 static void
1959 create_name_tables(LttvTraceState *tcs)
1960 {
1961 int i;
1962
1963 GString *fe_name = g_string_new("");
1964
1965 LttvNameTables *name_tables = g_new(LttvNameTables, 1);
1966
1967 LttvAttributeValue v;
1968
1969 GArray *hooks;
1970
1971 lttv_attribute_find(tcs->parent.t_a, LTTV_STATE_NAME_TABLES,
1972 LTTV_POINTER, &v);
1973 g_assert(*(v.v_pointer) == NULL);
1974 *(v.v_pointer) = name_tables;
1975
1976 hooks = g_array_sized_new(FALSE, FALSE, sizeof(LttvTraceHook), 1);
1977
1978 if(!lttv_trace_find_hook(tcs->parent.t,
1979 LTT_CHANNEL_KERNEL,
1980 LTT_EVENT_SYSCALL_ENTRY,
1981 FIELD_ARRAY(LTT_FIELD_SYSCALL_ID),
1982 NULL, NULL, &hooks)) {
1983
1984 // th = lttv_trace_hook_get_first(&th);
1985 //
1986 // t = ltt_field_type(lttv_trace_get_hook_field(th, 0));
1987 // nb = ltt_type_element_number(t);
1988 //
1989 // name_tables->syscall_names = g_new(GQuark, nb);
1990 // name_tables->nb_syscalls = nb;
1991 //
1992 // for(i = 0 ; i < nb ; i++) {
1993 // name_tables->syscall_names[i] = ltt_enum_string_get(t, i);
1994 // if(!name_tables->syscall_names[i]) {
1995 // GString *string = g_string_new("");
1996 // g_string_printf(string, "syscall %u", i);
1997 // name_tables->syscall_names[i] = g_quark_from_string(string->str);
1998 // g_string_free(string, TRUE);
1999 // }
2000 // }
2001
2002 name_tables->nb_syscalls = 256;
2003 name_tables->syscall_names = g_new(GQuark, 256);
2004 for(i = 0 ; i < 256 ; i++) {
2005 g_string_printf(fe_name, "syscall %d", i);
2006 name_tables->syscall_names[i] = g_quark_from_string(fe_name->str);
2007 }
2008 } else {
2009 name_tables->syscall_names = NULL;
2010 name_tables->nb_syscalls = 0;
2011 }
2012 lttv_trace_hook_remove_all(&hooks);
2013
2014 if(!lttv_trace_find_hook(tcs->parent.t,
2015 LTT_CHANNEL_KERNEL,
2016 LTT_EVENT_TRAP_ENTRY,
2017 FIELD_ARRAY(LTT_FIELD_TRAP_ID),
2018 NULL, NULL, &hooks) ||
2019 !lttv_trace_find_hook(tcs->parent.t,
2020 LTT_CHANNEL_KERNEL,
2021 LTT_EVENT_PAGE_FAULT_ENTRY,
2022 FIELD_ARRAY(LTT_FIELD_TRAP_ID),
2023 NULL, NULL, &hooks)) {
2024
2025 // th = lttv_trace_hook_get_first(&th);
2026 //
2027 // t = ltt_field_type(lttv_trace_get_hook_field(th, 0));
2028 // //nb = ltt_type_element_number(t);
2029 //
2030 // name_tables->trap_names = g_new(GQuark, nb);
2031 // for(i = 0 ; i < nb ; i++) {
2032 // name_tables->trap_names[i] = g_quark_from_string(
2033 // ltt_enum_string_get(t, i));
2034 // }
2035
2036 name_tables->nb_traps = 256;
2037 name_tables->trap_names = g_new(GQuark, 256);
2038 for(i = 0 ; i < 256 ; i++) {
2039 g_string_printf(fe_name, "trap %d", i);
2040 name_tables->trap_names[i] = g_quark_from_string(fe_name->str);
2041 }
2042 } else {
2043 name_tables->trap_names = NULL;
2044 name_tables->nb_traps = 0;
2045 }
2046 lttv_trace_hook_remove_all(&hooks);
2047
2048 if(!lttv_trace_find_hook(tcs->parent.t,
2049 LTT_CHANNEL_KERNEL,
2050 LTT_EVENT_IRQ_ENTRY,
2051 FIELD_ARRAY(LTT_FIELD_IRQ_ID),
2052 NULL, NULL, &hooks)) {
2053
2054 /*
2055 name_tables->irq_names = g_new(GQuark, nb);
2056 for(i = 0 ; i < nb ; i++) {
2057 name_tables->irq_names[i] = g_quark_from_string(ltt_enum_string_get(t, i));
2058 }
2059 */
2060
2061 name_tables->nb_irqs = 256;
2062 name_tables->irq_names = g_new(GQuark, 256);
2063 for(i = 0 ; i < 256 ; i++) {
2064 g_string_printf(fe_name, "irq %d", i);
2065 name_tables->irq_names[i] = g_quark_from_string(fe_name->str);
2066 }
2067 } else {
2068 name_tables->nb_irqs = 0;
2069 name_tables->irq_names = NULL;
2070 }
2071 lttv_trace_hook_remove_all(&hooks);
2072 /*
2073 name_tables->soft_irq_names = g_new(GQuark, nb);
2074 for(i = 0 ; i < nb ; i++) {
2075 name_tables->soft_irq_names[i] = g_quark_from_string(ltt_enum_string_get(t, i));
2076 }
2077 */
2078
2079 /* the kernel is limited to 32 statically defined softirqs */
2080 name_tables->nb_soft_irqs = 32;
2081 name_tables->soft_irq_names = g_new(GQuark, name_tables->nb_soft_irqs);
2082 for(i = 0 ; i < name_tables->nb_soft_irqs ; i++) {
2083 g_string_printf(fe_name, "softirq %d", i);
2084 name_tables->soft_irq_names[i] = g_quark_from_string(fe_name->str);
2085 }
2086 g_array_free(hooks, TRUE);
2087
2088 g_string_free(fe_name, TRUE);
2089
2090 #if (__WORDSIZE == 32)
2091 name_tables->kprobe_hash = g_hash_table_new_full(guint64_hash, guint64_equal,
2092 g_free, NULL);
2093 #else
2094 name_tables->kprobe_hash = g_hash_table_new(g_direct_hash, g_direct_equal);
2095 #endif
2096 }
2097
2098
2099 static void
2100 get_name_tables(LttvTraceState *tcs)
2101 {
2102 LttvAttributeValue v;
2103
2104 lttv_attribute_find(tcs->parent.t_a, LTTV_STATE_NAME_TABLES,
2105 LTTV_POINTER, &v);
2106 g_assert(*(v.v_pointer) != NULL);
2107 tcs->name_tables = (LttvNameTables *)*(v.v_pointer);
2108 }
2109
2110
2111 static void
2112 free_name_tables(LttvTraceState *tcs)
2113 {
2114 LttvNameTables *name_tables;
2115
2116 LttvAttributeValue v;
2117
2118 lttv_attribute_find(tcs->parent.t_a, LTTV_STATE_NAME_TABLES,
2119 LTTV_POINTER, &v);
2120 name_tables = (LttvNameTables *)*(v.v_pointer);
2121 *(v.v_pointer) = NULL;
2122
2123 // g_free(name_tables->eventtype_names);
2124 if(name_tables->syscall_names) g_free(name_tables->syscall_names);
2125 if(name_tables->trap_names) g_free(name_tables->trap_names);
2126 if(name_tables->irq_names) g_free(name_tables->irq_names);
2127 if(name_tables->soft_irq_names) g_free(name_tables->soft_irq_names);
2128 g_hash_table_destroy(name_tables->kprobe_hash);
2129 g_free(name_tables);
2130 }
2131
2132 #ifdef HASH_TABLE_DEBUG
2133
2134 static void test_process(gpointer key, gpointer value, gpointer user_data)
2135 {
2136 LttvProcessState *process = (LttvProcessState *)value;
2137
2138 /* Test for process corruption */
2139 guint stack_len = process->execution_stack->len;
2140 }
2141
2142 static void hash_table_check(GHashTable *table)
2143 {
2144 g_hash_table_foreach(table, test_process, NULL);
2145 }
2146
2147
2148 #endif
2149
2150 /* clears the stack and sets the state passed as argument */
2151 static void cpu_set_base_mode(LttvCPUState *cpust, LttvCPUMode state)
2152 {
2153 g_array_set_size(cpust->mode_stack, 1);
2154 ((GQuark *)cpust->mode_stack->data)[0] = state;
2155 }
2156
2157 static void cpu_push_mode(LttvCPUState *cpust, LttvCPUMode state)
2158 {
2159 g_array_set_size(cpust->mode_stack, cpust->mode_stack->len + 1);
2160 ((GQuark *)cpust->mode_stack->data)[cpust->mode_stack->len - 1] = state;
2161 }
2162
2163 static void cpu_pop_mode(LttvCPUState *cpust)
2164 {
2165 if(cpust->mode_stack->len <= 1)
2166 cpu_set_base_mode(cpust, LTTV_CPU_UNKNOWN);
2167 else
2168 g_array_set_size(cpust->mode_stack, cpust->mode_stack->len - 1);
2169 }
2170
2171 /* clears the stack and sets the state passed as argument */
2172 static void bdev_set_base_mode(LttvBdevState *bdevst, LttvBdevMode state)
2173 {
2174 g_array_set_size(bdevst->mode_stack, 1);
2175 ((GQuark *)bdevst->mode_stack->data)[0] = state;
2176 }
2177
2178 static void bdev_push_mode(LttvBdevState *bdevst, LttvBdevMode state)
2179 {
2180 g_array_set_size(bdevst->mode_stack, bdevst->mode_stack->len + 1);
2181 ((GQuark *)bdevst->mode_stack->data)[bdevst->mode_stack->len - 1] = state;
2182 }
2183
2184 static void bdev_pop_mode(LttvBdevState *bdevst)
2185 {
2186 if(bdevst->mode_stack->len <= 1)
2187 bdev_set_base_mode(bdevst, LTTV_BDEV_UNKNOWN);
2188 else
2189 g_array_set_size(bdevst->mode_stack, bdevst->mode_stack->len - 1);
2190 }
2191
2192 static void irq_set_base_mode(LttvIRQState *irqst, LttvIRQMode state)
2193 {
2194 g_array_set_size(irqst->mode_stack, 1);
2195 ((GQuark *)irqst->mode_stack->data)[0] = state;
2196 }
2197
2198 static void irq_push_mode(LttvIRQState *irqst, LttvIRQMode state)
2199 {
2200 g_array_set_size(irqst->mode_stack, irqst->mode_stack->len + 1);
2201 ((GQuark *)irqst->mode_stack->data)[irqst->mode_stack->len - 1] = state;
2202 }
2203
2204 static void irq_pop_mode(LttvIRQState *irqst)
2205 {
2206 if(irqst->mode_stack->len <= 1)
2207 irq_set_base_mode(irqst, LTTV_IRQ_UNKNOWN);
2208 else
2209 g_array_set_size(irqst->mode_stack, irqst->mode_stack->len - 1);
2210 }
2211
2212 static void push_state(LttvTracefileState *tfs, LttvExecutionMode t,
2213 guint state_id)
2214 {
2215 LttvExecutionState *es;
2216
2217 LttvTraceState *ts = (LttvTraceState*)tfs->parent.t_context;
2218 guint cpu = tfs->cpu;
2219
2220 #ifdef HASH_TABLE_DEBUG
2221 hash_table_check(ts->processes);
2222 #endif
2223 LttvProcessState *process = ts->running_process[cpu];
2224
2225 guint depth = process->execution_stack->len;
2226
2227 process->execution_stack =
2228 g_array_set_size(process->execution_stack, depth + 1);
2229 /* Keep in sync */
2230 process->state =
2231 &g_array_index(process->execution_stack, LttvExecutionState, depth - 1);
2232
2233 es = &g_array_index(process->execution_stack, LttvExecutionState, depth);
2234 es->t = t;
2235 es->n = state_id;
2236 es->entry = es->change = tfs->parent.timestamp;
2237 es->cum_cpu_time = ltt_time_zero;
2238 es->s = process->state->s;
2239 process->state = es;
2240 }
2241
2242 /* pop state
2243 * return 1 when empty, else 0 */
2244 int lttv_state_pop_state_cleanup(LttvProcessState *process,
2245 LttvTracefileState *tfs)
2246 {
2247 guint depth = process->execution_stack->len;
2248
2249 if(depth == 1){
2250 return 1;
2251 }
2252
2253 process->execution_stack =
2254 g_array_set_size(process->execution_stack, depth - 1);
2255 process->state = &g_array_index(process->execution_stack, LttvExecutionState,
2256 depth - 2);
2257 process->state->change = tfs->parent.timestamp;
2258
2259 return 0;
2260 }
2261
2262 static void pop_state(LttvTracefileState *tfs, LttvExecutionMode t)
2263 {
2264 guint cpu = tfs->cpu;
2265 LttvTraceState *ts = (LttvTraceState*)tfs->parent.t_context;
2266 LttvProcessState *process = ts->running_process[cpu];
2267
2268 guint depth = process->execution_stack->len;
2269
2270 if(process->state->t != t){
2271 g_info("Different execution mode type (%lu.%09lu): ignore it\n",
2272 tfs->parent.timestamp.tv_sec, tfs->parent.timestamp.tv_nsec);
2273 g_info("process state has %s when pop_int is %s\n",
2274 g_quark_to_string(process->state->t),
2275 g_quark_to_string(t));
2276 g_info("{ %u, %u, %s, %s, %s }\n",
2277 process->pid,
2278 process->ppid,
2279 g_quark_to_string(process->name),
2280 g_quark_to_string(process->brand),
2281 g_quark_to_string(process->state->s));
2282 return;
2283 }
2284
2285 if(depth == 1){
2286 g_info("Trying to pop last state on stack (%lu.%09lu): ignore it\n",
2287 tfs->parent.timestamp.tv_sec, tfs->parent.timestamp.tv_nsec);
2288 return;
2289 }
2290
2291 process->execution_stack =
2292 g_array_set_size(process->execution_stack, depth - 1);
2293 process->state = &g_array_index(process->execution_stack, LttvExecutionState,
2294 depth - 2);
2295 process->state->change = tfs->parent.timestamp;
2296 }
2297
2298 struct search_result {
2299 const LttTime *time; /* Requested time */
2300 LttTime *best; /* Best result */
2301 };
2302
2303 static gint search_usertrace(gconstpointer a, gconstpointer b)
2304 {
2305 const LttTime *elem_time = (const LttTime*)a;
2306 /* Explicit non const cast */
2307 struct search_result *res = (struct search_result *)b;
2308
2309 if(ltt_time_compare(*elem_time, *(res->time)) < 0) {
2310 /* The usertrace was created before the schedchange */
2311 /* Get larger keys */
2312 return 1;
2313 } else if(ltt_time_compare(*elem_time, *(res->time)) >= 0) {
2314 /* The usertrace was created after the schedchange time */
2315 /* Get smaller keys */
2316 if(res->best) {
2317 if(ltt_time_compare(*elem_time, *res->best) < 0) {
2318 res->best = (LttTime *)elem_time;
2319 }
2320 } else {
2321 res->best = (LttTime *)elem_time;
2322 }
2323 return -1;
2324 }
2325 return 0;
2326 }
2327
2328 static LttvTracefileState *ltt_state_usertrace_find(LttvTraceState *tcs,
2329 guint pid, const LttTime *timestamp)
2330 {
2331 LttvTracefileState *tfs = NULL;
2332 struct search_result res;
2333 /* Find the usertrace associated with a pid and time interval.
2334 * Search in the usertraces by PID (within a hash) and then, for each
2335 * corresponding element of the array, find the first one with creation
2336 * timestamp the lowest, but higher or equal to "timestamp". */
2337 res.time = timestamp;
2338 res.best = NULL;
2339 GTree *usertrace_tree = g_hash_table_lookup(tcs->usertraces,
2340 GUINT_TO_POINTER(pid));
2341 if(usertrace_tree) {
2342 g_tree_search(usertrace_tree, search_usertrace, &res);
2343 if(res.best)
2344 tfs = g_tree_lookup(usertrace_tree, res.best);
2345 }
2346
2347 return tfs;
2348 }
2349
2350 /* Return a new and initialized LttvProcessState structure */
2351
2352 LttvProcessState *
2353 lttv_state_create_process(LttvTraceState *tcs, LttvProcessState *parent,
2354 guint cpu, guint pid, guint tgid, GQuark name, const LttTime *timestamp)
2355 {
2356 LttvProcessState *process = g_new(LttvProcessState, 1);
2357
2358 LttvExecutionState *es;
2359
2360 char buffer[128];
2361
2362 process->pid = pid;
2363 process->tgid = tgid;
2364 process->cpu = cpu;
2365 process->name = name;
2366 process->brand = LTTV_STATE_UNBRANDED;
2367 //process->last_cpu = tfs->cpu_name;
2368 //process->last_cpu_index = ltt_tracefile_num(((LttvTracefileContext*)tfs)->tf);
2369 process->type = LTTV_STATE_USER_THREAD;
2370 process->usertrace = ltt_state_usertrace_find(tcs, pid, timestamp);
2371 process->current_function = 0; //function 0x0 by default.
2372
2373 g_info("Process %u, core %p", process->pid, process);
2374 g_hash_table_insert(tcs->processes, process, process);
2375
2376 if(parent) {
2377 process->ppid = parent->pid;
2378 process->creation_time = *timestamp;
2379 }
2380
2381 /* No parent. This process exists but we are missing all information about
2382 its creation. The birth time is set to zero but we remember the time of
2383 insertion */
2384
2385 else {
2386 process->ppid = 0;
2387 process->creation_time = ltt_time_zero;
2388 }
2389
2390 process->insertion_time = *timestamp;
2391 sprintf(buffer,"%d-%lu.%lu",pid, process->creation_time.tv_sec,
2392 process->creation_time.tv_nsec);
2393 process->pid_time = g_quark_from_string(buffer);
2394 process->cpu = cpu;
2395 process->free_events = 0;
2396 //process->last_cpu = tfs->cpu_name;
2397 //process->last_cpu_index = ltt_tracefile_num(((LttvTracefileContext*)tfs)->tf);
2398 process->execution_stack = g_array_sized_new(FALSE, FALSE,
2399 sizeof(LttvExecutionState), PREALLOCATED_EXECUTION_STACK);
2400 process->execution_stack = g_array_set_size(process->execution_stack, 2);
2401 es = process->state = &g_array_index(process->execution_stack,
2402 LttvExecutionState, 0);
2403 es->t = LTTV_STATE_USER_MODE;
2404 es->n = LTTV_STATE_SUBMODE_NONE;
2405 es->entry = *timestamp;
2406 //g_assert(timestamp->tv_sec != 0);
2407 es->change = *timestamp;
2408 es->cum_cpu_time = ltt_time_zero;
2409 es->s = LTTV_STATE_RUN;
2410
2411 es = process->state = &g_array_index(process->execution_stack,
2412 LttvExecutionState, 1);
2413 es->t = LTTV_STATE_SYSCALL;
2414 es->n = LTTV_STATE_SUBMODE_NONE;
2415 es->entry = *timestamp;
2416 //g_assert(timestamp->tv_sec != 0);
2417 es->change = *timestamp;
2418 es->cum_cpu_time = ltt_time_zero;
2419 es->s = LTTV_STATE_WAIT_FORK;
2420
2421 /* Allocate an empty function call stack. If it's empty, use 0x0. */
2422 process->user_stack = g_array_sized_new(FALSE, FALSE,
2423 sizeof(guint64), 0);
2424
2425 process->fds = g_hash_table_new(g_direct_hash, g_direct_equal);
2426
2427 return process;
2428 }
2429
2430 LttvProcessState *lttv_state_find_process(LttvTraceState *ts, guint cpu,
2431 guint pid)
2432 {
2433 LttvProcessState key;
2434 LttvProcessState *process;
2435
2436 key.pid = pid;
2437 key.cpu = cpu;
2438 process = g_hash_table_lookup(ts->processes, &key);
2439 return process;
2440 }
2441
2442 LttvProcessState *
2443 lttv_state_find_process_or_create(LttvTraceState *ts, guint cpu, guint pid,
2444 const LttTime *timestamp)
2445 {
2446 LttvProcessState *process = lttv_state_find_process(ts, cpu, pid);
2447 LttvExecutionState *es;
2448
2449 /* Put ltt_time_zero creation time for unexisting processes */
2450 if(unlikely(process == NULL)) {
2451 process = lttv_state_create_process(ts,
2452 NULL, cpu, pid, 0, LTTV_STATE_UNNAMED, timestamp);
2453 /* We are not sure is it's a kernel thread or normal thread, put the
2454 * bottom stack state to unknown */
2455 process->execution_stack =
2456 g_array_set_size(process->execution_stack, 1);
2457 process->state = es =
2458 &g_array_index(process->execution_stack, LttvExecutionState, 0);
2459 es->t = LTTV_STATE_MODE_UNKNOWN;
2460 es->s = LTTV_STATE_UNNAMED;
2461 }
2462 return process;
2463 }
2464
2465 /* FIXME : this function should be called when we receive an event telling that
2466 * release_task has been called in the kernel. In happens generally when
2467 * the parent waits for its child termination, but may also happens in special
2468 * cases in the child's exit : when the parent ignores its children SIGCCHLD or
2469 * has the flag SA_NOCLDWAIT. It can also happen when the child is part
2470 * of a killed thread group, but isn't the leader.
2471 */
2472 static int exit_process(LttvTracefileState *tfs, LttvProcessState *process)
2473 {
2474 LttvTraceState *ts = LTTV_TRACE_STATE(tfs->parent.t_context);
2475 LttvProcessState key;
2476
2477 /* Wait for both schedule with exit dead and process free to happen.
2478 * They can happen in any order. */
2479 if (++(process->free_events) < 2)
2480 return 0;
2481
2482 key.pid = process->pid;
2483 key.cpu = process->cpu;
2484 g_hash_table_remove(ts->processes, &key);
2485 g_array_free(process->execution_stack, TRUE);
2486 g_array_free(process->user_stack, TRUE);
2487
2488 /* the following also clears the content */
2489 g_hash_table_destroy(process->fds);
2490
2491 g_free(process);
2492 return 1;
2493 }
2494
2495
2496 static void free_process_state(gpointer key, gpointer value,gpointer user_data)
2497 {
2498 g_array_free(((LttvProcessState *)value)->execution_stack, TRUE);
2499 g_array_free(((LttvProcessState *)value)->user_stack, TRUE);
2500
2501 /* the following also clears the content */
2502 g_hash_table_destroy(((LttvProcessState *)value)->fds);
2503
2504 g_free(value);
2505 }
2506
2507
2508 static void lttv_state_free_process_table(GHashTable *processes)
2509 {
2510 g_hash_table_foreach(processes, free_process_state, NULL);
2511 g_hash_table_destroy(processes);
2512 }
2513
2514
2515 static gboolean syscall_entry(void *hook_data, void *call_data)
2516 {
2517 LttvTracefileState *s = (LttvTracefileState *)call_data;
2518 guint cpu = s->cpu;
2519 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
2520 LttvProcessState *process = ts->running_process[cpu];
2521 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2522 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2523 struct marker_field *f = lttv_trace_get_hook_field(th, 0);
2524 LttvExecutionSubmode submode;
2525 LttvNameTables *nt = ((LttvTraceState *)(s->parent.t_context))->name_tables;
2526
2527 guint syscall = ltt_event_get_unsigned(e, f);
2528 expand_syscall_table(ts, syscall);
2529 submode = nt->syscall_names[syscall];
2530 /* There can be no system call from PID 0 : unknown state */
2531 if(process->pid != 0)
2532 push_state(s, LTTV_STATE_SYSCALL, submode);
2533 return FALSE;
2534 }
2535
2536
2537 static gboolean syscall_exit(void *hook_data, void *call_data)
2538 {
2539 LttvTracefileState *s = (LttvTracefileState *)call_data;
2540 guint cpu = s->cpu;
2541 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
2542 LttvProcessState *process = ts->running_process[cpu];
2543
2544 /* There can be no system call from PID 0 : unknown state */
2545 if(process->pid != 0)
2546 pop_state(s, LTTV_STATE_SYSCALL);
2547 return FALSE;
2548 }
2549
2550
2551 static gboolean trap_entry(void *hook_data, void *call_data)
2552 {
2553 LttvTracefileState *s = (LttvTracefileState *)call_data;
2554 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
2555 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2556 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2557 struct marker_field *f = lttv_trace_get_hook_field(th, 0);
2558 LttvNameTables *nt = ((LttvTraceState *)(s->parent.t_context))->name_tables;
2559
2560 LttvExecutionSubmode submode;
2561
2562 guint64 trap = ltt_event_get_long_unsigned(e, f);
2563
2564 expand_trap_table(ts, trap);
2565
2566 submode = nt->trap_names[trap];
2567
2568 push_state(s, LTTV_STATE_TRAP, submode);
2569
2570 /* update cpu status */
2571 cpu_push_mode(s->cpu_state, LTTV_CPU_TRAP);
2572
2573 /* update trap status */
2574 g_array_append_val(s->cpu_state->trap_stack, trap);
2575 ts->trap_states[trap].running++;
2576
2577 return FALSE;
2578 }
2579
2580 static gboolean trap_exit(void *hook_data, void *call_data)
2581 {
2582 LttvTracefileState *s = (LttvTracefileState *)call_data;
2583 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
2584
2585 pop_state(s, LTTV_STATE_TRAP);
2586
2587 /* update cpu status */
2588 cpu_pop_mode(s->cpu_state);
2589
2590 /* update trap status */
2591 if (s->cpu_state->trap_stack->len > 0) {
2592 gint last = g_array_index(s->cpu_state->trap_stack, gint, s->cpu_state->trap_stack->len-1);
2593 if(ts->trap_states[last].running)
2594 ts->trap_states[last].running--;
2595 g_array_remove_index(s->cpu_state->trap_stack, s->cpu_state->trap_stack->len-1);
2596 }
2597 return FALSE;
2598 }
2599
2600 static gboolean irq_entry(void *hook_data, void *call_data)
2601 {
2602 LttvTracefileState *s = (LttvTracefileState *)call_data;
2603 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
2604 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2605 //guint8 ev_id = ltt_event_eventtype_id(e);
2606 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2607 struct marker_field *f = lttv_trace_get_hook_field(th, 0);
2608 LttvNameTables *nt = ((LttvTraceState *)(s->parent.t_context))->name_tables;
2609
2610 LttvExecutionSubmode submode;
2611 guint64 irq = ltt_event_get_long_unsigned(e, f);
2612
2613 expand_irq_table(ts, irq);
2614
2615 submode = nt->irq_names[irq];
2616
2617 /* Do something with the info about being in user or system mode when int? */
2618 push_state(s, LTTV_STATE_IRQ, submode);
2619
2620 /* update cpu status */
2621 cpu_push_mode(s->cpu_state, LTTV_CPU_IRQ);
2622
2623 /* update irq status */
2624 g_array_append_val(s->cpu_state->irq_stack, irq);
2625 irq_push_mode(&ts->irq_states[irq], LTTV_IRQ_BUSY);
2626
2627 return FALSE;
2628 }
2629
2630 static gboolean soft_irq_exit(void *hook_data, void *call_data)
2631 {
2632 LttvTracefileState *s = (LttvTracefileState *)call_data;
2633 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
2634
2635 pop_state(s, LTTV_STATE_SOFT_IRQ);
2636
2637 /* update cpu status */
2638 cpu_pop_mode(s->cpu_state);
2639
2640 /* update softirq status */
2641 if (s->cpu_state->softirq_stack->len > 0) {
2642 gint last = g_array_index(s->cpu_state->softirq_stack, gint, s->cpu_state->softirq_stack->len-1);
2643 if(ts->soft_irq_states[last].running)
2644 ts->soft_irq_states[last].running--;
2645 g_array_remove_index(s->cpu_state->softirq_stack, s->cpu_state->softirq_stack->len-1);
2646 }
2647 return FALSE;
2648 }
2649
2650 static gboolean irq_exit(void *hook_data, void *call_data)
2651 {
2652 LttvTracefileState *s = (LttvTracefileState *)call_data;
2653 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
2654
2655 pop_state(s, LTTV_STATE_IRQ);
2656
2657 /* update cpu status */
2658 cpu_pop_mode(s->cpu_state);
2659
2660 /* update irq status */
2661 if (s->cpu_state->irq_stack->len > 0) {
2662 gint last = g_array_index(s->cpu_state->irq_stack, gint, s->cpu_state->irq_stack->len-1);
2663 g_array_remove_index(s->cpu_state->irq_stack, s->cpu_state->irq_stack->len-1);
2664 irq_pop_mode(&ts->irq_states[last]);
2665 }
2666
2667 return FALSE;
2668 }
2669
2670 static gboolean soft_irq_raise(void *hook_data, void *call_data)
2671 {
2672 LttvTracefileState *s = (LttvTracefileState *)call_data;
2673 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
2674 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2675 //guint8 ev_id = ltt_event_eventtype_id(e);
2676 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2677 struct marker_field *f = lttv_trace_get_hook_field(th, 0);
2678 LttvNameTables *nt = ((LttvTraceState *)(s->parent.t_context))->name_tables;
2679
2680 LttvExecutionSubmode submode;
2681 guint64 softirq = ltt_event_get_long_unsigned(e, f);
2682 guint64 nb_softirqs = nt->nb_soft_irqs;
2683
2684 if(softirq < nb_softirqs) {
2685 submode = nt->soft_irq_names[softirq];
2686 } else {
2687 /* Fixup an incomplete irq table */
2688 GString *string = g_string_new("");
2689 g_string_printf(string, "softirq %" PRIu64, softirq);
2690 submode = g_quark_from_string(string->str);
2691 g_string_free(string, TRUE);
2692 }
2693
2694 /* update softirq status */
2695 /* a soft irq raises are not cumulative */
2696 ts->soft_irq_states[softirq].pending=1;
2697
2698 return FALSE;
2699 }
2700
2701 static gboolean soft_irq_entry(void *hook_data, void *call_data)
2702 {
2703 LttvTracefileState *s = (LttvTracefileState *)call_data;
2704 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
2705 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2706 //guint8 ev_id = ltt_event_eventtype_id(e);
2707 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2708 struct marker_field *f = lttv_trace_get_hook_field(th, 0);
2709 LttvExecutionSubmode submode;
2710 guint64 softirq = ltt_event_get_long_unsigned(e, f);
2711 expand_soft_irq_table(ts, softirq);
2712 LttvNameTables *nt = ((LttvTraceState *)(s->parent.t_context))->name_tables;
2713 submode = nt->soft_irq_names[softirq];
2714
2715 /* Do something with the info about being in user or system mode when int? */
2716 push_state(s, LTTV_STATE_SOFT_IRQ, submode);
2717
2718 /* update cpu status */
2719 cpu_push_mode(s->cpu_state, LTTV_CPU_SOFT_IRQ);
2720
2721 /* update softirq status */
2722 g_array_append_val(s->cpu_state->softirq_stack, softirq);
2723 if(ts->soft_irq_states[softirq].pending)
2724 ts->soft_irq_states[softirq].pending--;
2725 ts->soft_irq_states[softirq].running++;
2726
2727 return FALSE;
2728 }
2729
2730 static gboolean enum_interrupt(void *hook_data, void *call_data)
2731 {
2732 LttvTracefileState *s = (LttvTracefileState *)call_data;
2733 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
2734 LttvNameTables *nt = ts->name_tables;
2735 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2736 //guint8 ev_id = ltt_event_eventtype_id(e);
2737 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2738
2739 GQuark action = g_quark_from_string(ltt_event_get_string(e,
2740 lttv_trace_get_hook_field(th, 0)));
2741 guint irq = ltt_event_get_long_unsigned(e, lttv_trace_get_hook_field(th, 1));
2742
2743 expand_irq_table(ts, irq);
2744 nt->irq_names[irq] = action;
2745
2746 return FALSE;
2747 }
2748
2749
2750 static gboolean bdev_request_issue(void *hook_data, void *call_data)
2751 {
2752 LttvTracefileState *s = (LttvTracefileState *)call_data;
2753 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
2754 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2755 //guint8 ev_id = ltt_event_eventtype_id(e);
2756 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2757
2758 guint major = ltt_event_get_long_unsigned(e,
2759 lttv_trace_get_hook_field(th, 0));
2760 guint minor = ltt_event_get_long_unsigned(e,
2761 lttv_trace_get_hook_field(th, 1));
2762 guint oper = ltt_event_get_long_unsigned(e,
2763 lttv_trace_get_hook_field(th, 2));
2764 guint16 devcode = MKDEV(major,minor);
2765
2766 /* have we seen this block device before? */
2767 gpointer bdev = get_hashed_bdevstate(ts, devcode);
2768
2769 if(oper == 0)
2770 bdev_push_mode(bdev, LTTV_BDEV_BUSY_READING);
2771 else
2772 bdev_push_mode(bdev, LTTV_BDEV_BUSY_WRITING);
2773
2774 return FALSE;
2775 }
2776
2777 static gboolean bdev_request_complete(void *hook_data, void *call_data)
2778 {
2779 LttvTracefileState *s = (LttvTracefileState *)call_data;
2780 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
2781 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2782 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2783
2784 guint major = ltt_event_get_long_unsigned(e,
2785 lttv_trace_get_hook_field(th, 0));
2786 guint minor = ltt_event_get_long_unsigned(e,
2787 lttv_trace_get_hook_field(th, 1));
2788 //guint oper = ltt_event_get_long_unsigned(e,
2789 // lttv_trace_get_hook_field(th, 2));
2790 guint16 devcode = MKDEV(major,minor);
2791
2792 /* have we seen this block device before? */
2793 gpointer bdev = get_hashed_bdevstate(ts, devcode);
2794
2795 /* update block device */
2796 bdev_pop_mode(bdev);
2797
2798 return FALSE;
2799 }
2800
2801 static void push_function(LttvTracefileState *tfs, guint64 funcptr)
2802 {
2803 guint64 *new_func;
2804
2805 LttvTraceState *ts = (LttvTraceState*)tfs->parent.t_context;
2806 guint cpu = tfs->cpu;
2807 LttvProcessState *process = ts->running_process[cpu];
2808
2809 guint depth = process->user_stack->len;
2810
2811 process->user_stack =
2812 g_array_set_size(process->user_stack, depth + 1);
2813
2814 new_func = &g_array_index(process->user_stack, guint64, depth);
2815 *new_func = funcptr;
2816 process->current_function = funcptr;
2817 }
2818
2819 static void pop_function(LttvTracefileState *tfs, guint64 funcptr)
2820 {
2821 guint cpu = tfs->cpu;
2822 LttvTraceState *ts = (LttvTraceState*)tfs->parent.t_context;
2823 LttvProcessState *process = ts->running_process[cpu];
2824
2825 if(process->current_function != funcptr){
2826 g_info("Different functions (%lu.%09lu): ignore it\n",
2827 tfs->parent.timestamp.tv_sec, tfs->parent.timestamp.tv_nsec);
2828 g_info("process state has %" PRIu64 " when pop_function is %" PRIu64 "\n",
2829 process->current_function, funcptr);
2830 g_info("{ %u, %u, %s, %s, %s }\n",
2831 process->pid,
2832 process->ppid,
2833 g_quark_to_string(process->name),
2834 g_quark_to_string(process->brand),
2835 g_quark_to_string(process->state->s));
2836 return;
2837 }
2838 guint depth = process->user_stack->len;
2839
2840 if(depth == 0){
2841 g_info("Trying to pop last function on stack (%lu.%09lu): ignore it\n",
2842 tfs->parent.timestamp.tv_sec, tfs->parent.timestamp.tv_nsec);
2843 return;
2844 }
2845
2846 process->user_stack =
2847 g_array_set_size(process->user_stack, depth - 1);
2848 process->current_function =
2849 g_array_index(process->user_stack, guint64, depth - 2);
2850 }
2851
2852
2853 static gboolean function_entry(void *hook_data, void *call_data)
2854 {
2855 LttvTracefileState *s = (LttvTracefileState *)call_data;
2856 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2857 //guint8 ev_id = ltt_event_eventtype_id(e);
2858 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2859 struct marker_field *f = lttv_trace_get_hook_field(th, 0);
2860 guint64 funcptr = ltt_event_get_long_unsigned(e, f);
2861
2862 push_function(s, funcptr);
2863 return FALSE;
2864 }
2865
2866 static gboolean function_exit(void *hook_data, void *call_data)
2867 {
2868 LttvTracefileState *s = (LttvTracefileState *)call_data;
2869 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2870 //guint8 ev_id = ltt_event_eventtype_id(e);
2871 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2872 struct marker_field *f = lttv_trace_get_hook_field(th, 0);
2873 guint64 funcptr = ltt_event_get_long_unsigned(e, f);
2874
2875 pop_function(s, funcptr);
2876 return FALSE;
2877 }
2878
2879 static gboolean dump_syscall(void *hook_data, void *call_data)
2880 {
2881 LttvTracefileState *s = (LttvTracefileState *)call_data;
2882 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
2883 LttvNameTables *nt = ts->name_tables;
2884 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2885 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2886 guint id;
2887 guint64 address;
2888 char *symbol;
2889
2890 id = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 0));
2891 address = ltt_event_get_long_unsigned(e, lttv_trace_get_hook_field(th, 1));
2892 symbol = ltt_event_get_string(e, lttv_trace_get_hook_field(th, 2));
2893
2894 expand_syscall_table(ts, id);
2895 nt->syscall_names[id] = g_quark_from_string(symbol);
2896
2897 return FALSE;
2898 }
2899
2900 static gboolean dump_kprobe(void *hook_data, void *call_data)
2901 {
2902 LttvTracefileState *s = (LttvTracefileState *)call_data;
2903 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
2904 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2905 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2906 guint64 ip;
2907 char *symbol;
2908
2909 ip = ltt_event_get_long_unsigned(e, lttv_trace_get_hook_field(th, 0));
2910 symbol = ltt_event_get_string(e, lttv_trace_get_hook_field(th, 1));
2911
2912 expand_kprobe_table(ts, ip, symbol);
2913
2914 return FALSE;
2915 }
2916
2917 static gboolean dump_softirq(void *hook_data, void *call_data)
2918 {
2919 LttvTracefileState *s = (LttvTracefileState *)call_data;
2920 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
2921 LttvNameTables *nt = ts->name_tables;
2922 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2923 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2924 guint id;
2925 guint64 address;
2926 char *symbol;
2927
2928 id = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 0));
2929 address = ltt_event_get_long_unsigned(e, lttv_trace_get_hook_field(th, 1));
2930 symbol = ltt_event_get_string(e, lttv_trace_get_hook_field(th, 2));
2931
2932 expand_soft_irq_table(ts, id);
2933 nt->soft_irq_names[id] = g_quark_from_string(symbol);
2934
2935 return FALSE;
2936 }
2937
2938 static gboolean sched_try_wakeup(void *hook_data, void *call_data) {
2939
2940 LttvTracefileState *s = (LttvTracefileState *)call_data;
2941 LttvProcessState *process;
2942
2943 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2944 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2945 gint woken_pid;
2946 guint woken_cpu;
2947
2948 woken_pid = ltt_event_get_int(e, lttv_trace_get_hook_field(th, 0));
2949 woken_cpu = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 1));
2950
2951 process = lttv_state_find_process_or_create(
2952 (LttvTraceState*)s->parent.t_context,
2953 woken_cpu, woken_pid,
2954 &s->parent.timestamp);
2955 process->state->s = LTTV_STATE_WAIT_CPU;
2956 process->state->change = s->parent.timestamp;
2957
2958 g_debug("Wakeup: process %d on CPU %u\n", woken_pid, woken_cpu);
2959
2960 return FALSE;
2961
2962 }
2963
2964 static gboolean schedchange(void *hook_data, void *call_data)
2965 {
2966 LttvTracefileState *s = (LttvTracefileState *)call_data;
2967 guint cpu = s->cpu;
2968 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
2969 LttvProcessState *process = ts->running_process[cpu];
2970 //LttvProcessState *old_process = ts->running_process[cpu];
2971
2972 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
2973 LttvTraceHook *th = (LttvTraceHook *)hook_data;
2974 guint pid_in, pid_out;
2975 gint64 state_out;
2976
2977 pid_out = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 0));
2978 pid_in = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 1));
2979 state_out = ltt_event_get_long_int(e, lttv_trace_get_hook_field(th, 2));
2980
2981 if(likely(process != NULL)) {
2982
2983 /* We could not know but it was not the idle process executing.
2984 This should only happen at the beginning, before the first schedule
2985 event, and when the initial information (current process for each CPU)
2986 is missing. It is not obvious how we could, after the fact, compensate
2987 the wrongly attributed statistics. */
2988
2989 //This test only makes sense once the state is known and if there is no
2990 //missing events. We need to silently ignore schedchange coming after a
2991 //process_free, or it causes glitches. (FIXME)
2992 //if(unlikely(process->pid != pid_out)) {
2993 // g_assert(process->pid == 0);
2994 //}
2995 if(process->pid == 0
2996 && process->state->t == LTTV_STATE_MODE_UNKNOWN) {
2997 if(pid_out == 0) {
2998 /* Scheduling out of pid 0 at beginning of the trace :
2999 * we know for sure it is in syscall mode at this point. */
3000 g_assert(process->execution_stack->len == 1);
3001 process->state->t = LTTV_STATE_SYSCALL;
3002 process->state->s = LTTV_STATE_WAIT;
3003 process->state->change = s->parent.timestamp;
3004 process->state->entry = s->parent.timestamp;
3005 }
3006 } else {
3007 if(unlikely(process->state->s == LTTV_STATE_EXIT)) {
3008 process->state->s = LTTV_STATE_ZOMBIE;
3009 process->state->change = s->parent.timestamp;
3010 } else {
3011 if(unlikely(state_out == 0)) process->state->s = LTTV_STATE_WAIT_CPU;
3012 else process->state->s = LTTV_STATE_WAIT;
3013 process->state->change = s->parent.timestamp;
3014 }
3015
3016 if(state_out == 32 || state_out == 64) { /* EXIT_DEAD || TASK_DEAD */
3017 /* see sched.h for states */
3018 if (!exit_process(s, process)) {
3019 process->state->s = LTTV_STATE_DEAD;
3020 process->state->change = s->parent.timestamp;
3021 }
3022 }
3023 }
3024 }
3025 process = ts->running_process[cpu] =
3026 lttv_state_find_process_or_create(
3027 (LttvTraceState*)s->parent.t_context,
3028 cpu, pid_in,
3029 &s->parent.timestamp);
3030 process->state->s = LTTV_STATE_RUN;
3031 process->cpu = cpu;
3032 if(process->usertrace)
3033 process->usertrace->cpu = cpu;
3034 // process->last_cpu_index = ltt_tracefile_num(((LttvTracefileContext*)s)->tf);
3035 process->state->change = s->parent.timestamp;
3036
3037 /* update cpu status */
3038 if(pid_in == 0)
3039 /* going to idle task */
3040 cpu_set_base_mode(s->cpu_state, LTTV_CPU_IDLE);
3041 else {
3042 /* scheduling a real task.
3043 * we must be careful here:
3044 * if we just schedule()'ed to a process that is
3045 * in a trap, we must put the cpu in trap mode
3046 */
3047 cpu_set_base_mode(s->cpu_state, LTTV_CPU_BUSY);
3048 if(process->state->t == LTTV_STATE_TRAP)
3049 cpu_push_mode(s->cpu_state, LTTV_CPU_TRAP);
3050 }
3051
3052 return FALSE;
3053 }
3054
3055 static gboolean process_fork(void *hook_data, void *call_data)
3056 {
3057 LttvTracefileState *s = (LttvTracefileState *)call_data;
3058 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
3059 LttvTraceHook *th = (LttvTraceHook *)hook_data;
3060 guint parent_pid;
3061 guint child_pid; /* In the Linux Kernel, there is one PID per thread. */
3062 guint child_tgid; /* tgid in the Linux kernel is the "real" POSIX PID. */
3063 //LttvProcessState *zombie_process;
3064 guint cpu = s->cpu;
3065 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
3066 LttvProcessState *process = ts->running_process[cpu];
3067 LttvProcessState *child_process;
3068 struct marker_field *f;
3069
3070 /* Parent PID */
3071 parent_pid = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 0));
3072
3073 /* Child PID */
3074 child_pid = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 1));
3075 s->parent.target_pid = child_pid;
3076
3077 /* Child TGID */
3078 f = lttv_trace_get_hook_field(th, 2);
3079 if (likely(f))
3080 child_tgid = ltt_event_get_unsigned(e, f);
3081 else
3082 child_tgid = 0;
3083
3084 /* Mathieu : it seems like the process might have been scheduled in before the
3085 * fork, and, in a rare case, might be the current process. This might happen
3086 * in a SMP case where we don't have enough precision on the clocks.
3087 *
3088 * Test reenabled after precision fixes on time. (Mathieu) */
3089 #if 0
3090 zombie_process = lttv_state_find_process(ts, ANY_CPU, child_pid);
3091
3092 if(unlikely(zombie_process != NULL)) {
3093 /* Reutilisation of PID. Only now we are sure that the old PID
3094 * has been released. FIXME : should know when release_task happens instead.
3095 */
3096 guint num_cpus = ltt_trace_get_num_cpu(ts->parent.t);
3097 guint i;
3098 for(i=0; i< num_cpus; i++) {
3099 g_assert(zombie_process != ts->running_process[i]);
3100 }
3101
3102 exit_process(s, zombie_process);
3103 }
3104 #endif //0
3105 g_assert(process->pid != child_pid);
3106 // FIXME : Add this test in the "known state" section
3107 // g_assert(process->pid == parent_pid);
3108 child_process = lttv_state_find_process(ts, ANY_CPU, child_pid);
3109 if(child_process == NULL) {
3110 child_process = lttv_state_create_process(ts, process, cpu,
3111 child_pid, child_tgid,
3112 LTTV_STATE_UNNAMED, &s->parent.timestamp);
3113 } else {
3114 /* The process has already been created : due to time imprecision between
3115 * multiple CPUs : it has been scheduled in before creation. Note that we
3116 * shouldn't have this kind of imprecision.
3117 *
3118 * Simply put a correct parent.
3119 */
3120 g_error("Process %u has been created at [%lu.%09lu] "
3121 "and inserted at [%lu.%09lu] before \n"
3122 "fork on cpu %u[%lu.%09lu].\n"
3123 "Probably an unsynchronized TSC problem on the traced machine.",
3124 child_pid,
3125 child_process->creation_time.tv_sec,
3126 child_process->creation_time.tv_nsec,
3127 child_process->insertion_time.tv_sec,
3128 child_process->insertion_time.tv_nsec,
3129 cpu, ltt_event_time(e).tv_sec, ltt_event_time(e).tv_nsec);
3130 //g_assert(0); /* This is a problematic case : the process has been created
3131 // before the fork event */
3132 child_process->ppid = process->pid;
3133 child_process->tgid = child_tgid;
3134 }
3135 g_assert(child_process->name == LTTV_STATE_UNNAMED);
3136 child_process->name = process->name;
3137 child_process->brand = process->brand;
3138
3139 return FALSE;
3140 }
3141
3142 /* We stamp a newly created process as kernel_thread.
3143 * The thread should not be running yet. */
3144 static gboolean process_kernel_thread(void *hook_data, void *call_data)
3145 {
3146 LttvTracefileState *s = (LttvTracefileState *)call_data;
3147 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
3148 LttvTraceHook *th = (LttvTraceHook *)hook_data;
3149 guint pid;
3150 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
3151 LttvProcessState *process;
3152 LttvExecutionState *es;
3153
3154 /* PID */
3155 pid = (guint)ltt_event_get_long_unsigned(e, lttv_trace_get_hook_field(th, 0));
3156 s->parent.target_pid = pid;
3157
3158 process = lttv_state_find_process_or_create(ts, ANY_CPU, pid,
3159 &ltt_time_zero);
3160 if (process->state->s != LTTV_STATE_DEAD) {
3161 process->execution_stack =
3162 g_array_set_size(process->execution_stack, 1);
3163 es = process->state =
3164 &g_array_index(process->execution_stack, LttvExecutionState, 0);
3165 es->t = LTTV_STATE_SYSCALL;
3166 }
3167 process->type = LTTV_STATE_KERNEL_THREAD;
3168
3169 return FALSE;
3170 }
3171
3172 static gboolean process_exit(void *hook_data, void *call_data)
3173 {
3174 LttvTracefileState *s = (LttvTracefileState *)call_data;
3175 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
3176 LttvTraceHook *th = (LttvTraceHook *)hook_data;
3177 guint pid;
3178 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
3179 LttvProcessState *process; // = ts->running_process[cpu];
3180
3181 pid = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 0));
3182 s->parent.target_pid = pid;
3183
3184 // FIXME : Add this test in the "known state" section
3185 // g_assert(process->pid == pid);
3186
3187 process = lttv_state_find_process(ts, ANY_CPU, pid);
3188 if(likely(process != NULL)) {
3189 process->state->s = LTTV_STATE_EXIT;
3190 }
3191 return FALSE;
3192 }
3193
3194 static gboolean process_free(void *hook_data, void *call_data)
3195 {
3196 LttvTracefileState *s = (LttvTracefileState *)call_data;
3197 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
3198 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
3199 LttvTraceHook *th = (LttvTraceHook *)hook_data;
3200 guint release_pid;
3201 LttvProcessState *process;
3202
3203 /* PID of the process to release */
3204 release_pid = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 0));
3205 s->parent.target_pid = release_pid;
3206
3207 g_assert(release_pid != 0);
3208
3209 process = lttv_state_find_process(ts, ANY_CPU, release_pid);
3210 if(likely(process != NULL))
3211 exit_process(s, process);
3212 return FALSE;
3213 //DISABLED
3214 if(likely(process != NULL)) {
3215 /* release_task is happening at kernel level : we can now safely release
3216 * the data structure of the process */
3217 //This test is fun, though, as it may happen that
3218 //at time t : CPU 0 : process_free
3219 //at time t+150ns : CPU 1 : schedule out
3220 //Clearly due to time imprecision, we disable it. (Mathieu)
3221 //If this weird case happen, we have no choice but to put the
3222 //Currently running process on the cpu to 0.
3223 //I re-enable it following time precision fixes. (Mathieu)
3224 //Well, in the case where an process is freed by a process on another CPU
3225 //and still scheduled, it happens that this is the schedchange that will
3226 //drop the last reference count. Do not free it here!
3227 guint num_cpus = ltt_trace_get_num_cpu(ts->parent.t);
3228 guint i;
3229 for(i=0; i< num_cpus; i++) {
3230 //g_assert(process != ts->running_process[i]);
3231 if(process == ts->running_process[i]) {
3232 //ts->running_process[i] = lttv_state_find_process(ts, i, 0);
3233 break;
3234 }
3235 }
3236 if(i == num_cpus) /* process is not scheduled */
3237 exit_process(s, process);
3238 }
3239
3240 return FALSE;
3241 }
3242
3243
3244 static gboolean process_exec(void *hook_data, void *call_data)
3245 {
3246 LttvTracefileState *s = (LttvTracefileState *)call_data;
3247 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
3248 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
3249 LttvTraceHook *th = (LttvTraceHook *)hook_data;
3250 //gchar *name;
3251 guint cpu = s->cpu;
3252 LttvProcessState *process = ts->running_process[cpu];
3253
3254 #if 0//how to use a sequence that must be transformed in a string
3255 /* PID of the process to release */
3256 guint64 name_len = ltt_event_field_element_number(e,
3257 lttv_trace_get_hook_field(th, 0));
3258 //name = ltt_event_get_string(e, lttv_trace_get_hook_field(th, 0));
3259 LttField *child = ltt_event_field_element_select(e,
3260 lttv_trace_get_hook_field(th, 0), 0);
3261 gchar *name_begin =
3262 (gchar*)(ltt_event_data(e)+ltt_event_field_offset(e, child));
3263 gchar *null_term_name = g_new(gchar, name_len+1);
3264 memcpy(null_term_name, name_begin, name_len);
3265 null_term_name[name_len] = '\0';
3266 process->name = g_quark_from_string(null_term_name);
3267 #endif //0
3268
3269 process->name = g_quark_from_string(ltt_event_get_string(e,
3270 lttv_trace_get_hook_field(th, 0)));
3271 process->brand = LTTV_STATE_UNBRANDED;
3272 //g_free(null_term_name);
3273 return FALSE;
3274 }
3275
3276 static gboolean thread_brand(void *hook_data, void *call_data)
3277 {
3278 LttvTracefileState *s = (LttvTracefileState *)call_data;
3279 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
3280 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
3281 LttvTraceHook *th = (LttvTraceHook *)hook_data;
3282 gchar *name;
3283 guint cpu = s->cpu;
3284 LttvProcessState *process = ts->running_process[cpu];
3285
3286 name = ltt_event_get_string(e, lttv_trace_get_hook_field(th, 0));
3287 process->brand = g_quark_from_string(name);
3288
3289 return FALSE;
3290 }
3291
3292 static gboolean fs_open(void *hook_data, void *call_data)
3293 {
3294 LttvTracefileState *s = (LttvTracefileState *)call_data;
3295 LttvTraceState *ts = (LttvTraceState *)s->parent.t_context;
3296 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
3297 LttvTraceHook *th = (LttvTraceHook *)hook_data;
3298 struct marker_field *f;
3299 guint cpu = s->cpu;
3300 int fd;
3301 char *filename;
3302 LttvProcessState *process = ts->running_process[cpu];
3303
3304 f = lttv_trace_get_hook_field(th, 0);
3305 fd = ltt_event_get_int(e, f);
3306
3307 f = lttv_trace_get_hook_field(th, 1);
3308 filename = ltt_event_get_string(e, f);
3309
3310 g_hash_table_insert(process->fds, (gpointer)(long)fd,
3311 (gpointer)(unsigned long)g_quark_from_string(filename));
3312
3313 return FALSE;
3314 }
3315
3316 static void fix_process(gpointer key, gpointer value,
3317 gpointer user_data)
3318 {
3319 LttvProcessState *process;
3320 LttvExecutionState *es;
3321 process = (LttvProcessState *)value;
3322 LttTime *timestamp = (LttTime*)user_data;
3323
3324 if(process->type == LTTV_STATE_KERNEL_THREAD) {
3325 es = &g_array_index(process->execution_stack, LttvExecutionState, 0);
3326 if(es->t == LTTV_STATE_MODE_UNKNOWN) {
3327 es->t = LTTV_STATE_SYSCALL;
3328 es->n = LTTV_STATE_SUBMODE_NONE;
3329 es->entry = *timestamp;
3330 es->change = *timestamp;
3331 es->cum_cpu_time = ltt_time_zero;
3332 if(es->s == LTTV_STATE_UNNAMED)
3333 es->s = LTTV_STATE_WAIT;
3334 }
3335 } else {
3336 es = &g_array_index(process->execution_stack, LttvExecutionState, 0);
3337 if(es->t == LTTV_STATE_MODE_UNKNOWN) {
3338 es->t = LTTV_STATE_USER_MODE;
3339 es->n = LTTV_STATE_SUBMODE_NONE;
3340 es->entry = *timestamp;
3341 //g_assert(timestamp->tv_sec != 0);
3342 es->change = *timestamp;
3343 es->cum_cpu_time = ltt_time_zero;
3344 if(es->s == LTTV_STATE_UNNAMED)
3345 es->s = LTTV_STATE_RUN;
3346
3347 if(process->execution_stack->len == 1) {
3348 /* Still in bottom unknown mode, means never did a system call
3349 * May be either in user mode, syscall mode, running or waiting.*/
3350 /* FIXME : we may be tagging syscall mode when being user mode */
3351 process->execution_stack =
3352 g_array_set_size(process->execution_stack, 2);
3353 es = process->state = &g_array_index(process->execution_stack,
3354 LttvExecutionState, 1);
3355 es->t = LTTV_STATE_SYSCALL;
3356 es->n = LTTV_STATE_SUBMODE_NONE;
3357 es->entry = *timestamp;
3358 //g_assert(timestamp->tv_sec != 0);
3359 es->change = *timestamp;
3360 es->cum_cpu_time = ltt_time_zero;
3361 if(es->s == LTTV_STATE_WAIT_FORK)
3362 es->s = LTTV_STATE_WAIT;
3363 }
3364 }
3365 }
3366 }
3367
3368 static gboolean statedump_end(void *hook_data, void *call_data)
3369 {
3370 LttvTracefileState *s = (LttvTracefileState *)call_data;
3371 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
3372 LttvTracefileContext *tfc = (LttvTracefileContext *)call_data;
3373 //LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
3374 //LttvTraceHook *th = (LttvTraceHook *)hook_data;
3375
3376 /* For all processes */
3377 /* if kernel thread, if stack[0] is unknown, set to syscall mode, wait */
3378 /* else, if stack[0] is unknown, set to user mode, running */
3379
3380 g_hash_table_foreach(ts->processes, fix_process, &tfc->timestamp);
3381
3382 return FALSE;
3383 }
3384
3385 static gboolean enum_process_state(void *hook_data, void *call_data)
3386 {
3387 LttvTracefileState *s = (LttvTracefileState *)call_data;
3388 LttEvent *e = ltt_tracefile_get_event(s->parent.tf);
3389 //It's slow : optimise later by doing this before reading trace.
3390 LttvTraceHook *th = (LttvTraceHook *)hook_data;
3391 guint parent_pid;
3392 guint pid;
3393 guint tgid;
3394 gchar * command;
3395 guint cpu = s->cpu;
3396 LttvTraceState *ts = (LttvTraceState*)s->parent.t_context;
3397 LttvProcessState *process = ts->running_process[cpu];
3398 LttvProcessState *parent_process;
3399 struct marker_field *f;
3400 GQuark type, mode, submode, status;
3401 LttvExecutionState *es;
3402 guint i, nb_cpus;
3403
3404 /* PID */
3405 pid = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 0));
3406 s->parent.target_pid = pid;
3407
3408 /* Parent PID */
3409 parent_pid = ltt_event_get_unsigned(e, lttv_trace_get_hook_field(th, 1));
3410
3411 /* Command name */
3412 command = ltt_event_get_string(e, lttv_trace_get_hook_field(th, 2));
3413
3414 /* type */
3415 f = lttv_trace_get_hook_field(th, 3);
3416 type = ltt_enum_string_get(f, ltt_event_get_unsigned(e, f));
3417
3418 //FIXME: type is rarely used, enum must match possible types.
3419
3420 /* mode */
3421 f = lttv_trace_get_hook_field(th, 4);
3422 mode = ltt_enum_string_get(f,ltt_event_get_unsigned(e, f));
3423
3424 /* submode */
3425 f = lttv_trace_get_hook_field(th, 5);
3426 submode = ltt_enum_string_get(f, ltt_event_get_unsigned(e, f));
3427
3428 /* status */
3429 f = lttv_trace_get_hook_field(th, 6);
3430 status = ltt_enum_string_get(f, ltt_event_get_unsigned(e, f));
3431
3432 /* TGID */
3433 f = lttv_trace_get_hook_field(th, 7);
3434 if(f)
3435 tgid = ltt_event_get_unsigned(e, f);
3436 else
3437 tgid = 0;
3438
3439 if(pid == 0) {
3440 nb_cpus = ltt_trace_get_num_cpu(ts->parent.t);
3441 for(i=0; i<nb_cpus; i++) {
3442 process = lttv_state_find_process(ts, i, pid);
3443 g_assert(process != NULL);
3444
3445 process->ppid = parent_pid;
3446 process->tgid = tgid;
3447 process->name = g_quark_from_string(command);
3448 es =
3449 &g_array_index(process->execution_stack, LttvExecutionState, 0);
3450 process->type = LTTV_STATE_KERNEL_THREAD;
3451 }
3452
3453 } else {
3454 /* The process might exist if a process was forked while performing the
3455 * state dump. */
3456 process = lttv_state_find_process(ts, ANY_CPU, pid);
3457 if(process == NULL) {
3458 parent_process = lttv_state_find_process(ts, ANY_CPU, parent_pid);
3459 process = lttv_state_create_process(ts, parent_process, cpu,
3460 pid, tgid, g_quark_from_string(command),
3461 &s->parent.timestamp);
3462
3463 /* Keep the stack bottom : a running user mode */
3464 /* Disabled because of inconsistencies in the current statedump states. */
3465 if(type == LTTV_STATE_KERNEL_THREAD) {
3466 /* Only keep the bottom
3467 * FIXME Kernel thread : can be in syscall or interrupt or trap. */
3468 /* Will cause expected trap when in fact being syscall (even after end of
3469 * statedump event)
3470 * Will cause expected interrupt when being syscall. (only before end of
3471 * statedump event) */
3472 // This will cause a "popping last state on stack, ignoring it."
3473 process->execution_stack = g_array_set_size(process->execution_stack, 1);
3474 es = process->state = &g_array_index(process->execution_stack,
3475 LttvExecutionState, 0);
3476 process->type = LTTV_STATE_KERNEL_THREAD;
3477 es->t = LTTV_STATE_MODE_UNKNOWN;
3478 es->s = LTTV_STATE_UNNAMED;
3479 es->n = LTTV_STATE_SUBMODE_UNKNOWN;
3480 #if 0
3481 es->t = LTTV_STATE_SYSCALL;
3482 es->s = status;
3483 es->n = submode;
3484 #endif //0
3485 } else {
3486 /* User space process :
3487 * bottom : user mode
3488 * either currently running or scheduled out.
3489 * can be scheduled out because interrupted in (user mode or in syscall)
3490 * or because of an explicit call to the scheduler in syscall. Note that
3491 * the scheduler call comes after the irq_exit, so never in interrupt
3492 * context. */
3493 // temp workaround : set size to 1 : only have user mode bottom of stack.
3494 // will cause g_info message of expected syscall mode when in fact being
3495 // in user mode. Can also cause expected trap when in fact being user
3496 // mode in the event of a page fault reenabling interrupts in the handler.
3497 // Expected syscall and trap can also happen after the end of statedump
3498 // This will cause a "popping last state on stack, ignoring it."
3499 process->execution_stack = g_array_set_size(process->execution_stack, 1);
3500 es = process->state = &g_array_index(process->execution_stack,
3501 LttvExecutionState, 0);
3502 es->t = LTTV_STATE_MODE_UNKNOWN;
3503 es->s = LTTV_STATE_UNNAMED;
3504 es->n = LTTV_STATE_SUBMODE_UNKNOWN;
3505 #if 0
3506 es->t = LTTV_STATE_USER_MODE;
3507 es->s = status;
3508 es->n = submode;
3509 #endif //0
3510 }
3511 #if 0
3512 /* UNKNOWN STATE */
3513 {
3514 es = process->state = &g_array_index(process->execution_stack,
3515 LttvExecutionState, 1);
3516 es->t = LTTV_STATE_MODE_UNKNOWN;
3517 es->s = LTTV_STATE_UNNAMED;
3518 es->n = LTTV_STATE_SUBMODE_UNKNOWN;
3519 }
3520 #endif //0
3521 } else {
3522 /* The process has already been created :
3523 * Probably was forked while dumping the process state or
3524 * was simply scheduled in prior to get the state dump event.
3525 */
3526 process->ppid = parent_pid;
3527 process->tgid = tgid;
3528 process->name = g_quark_from_string(command);
3529 process->type = type;
3530 es =
3531 &g_array_index(process->execution_stack, LttvExecutionState, 0);
3532 #if 0
3533 if(es->t == LTTV_STATE_MODE_UNKNOWN) {
3534 if(type == LTTV_STATE_KERNEL_THREAD)
3535 es->t = LTTV_STATE_SYSCALL;
3536 else
3537 es->t = LTTV_STATE_USER_MODE;
3538 }
3539 #endif //0
3540 /* Don't mess around with the stack, it will eventually become
3541 * ok after the end of state dump. */
3542 }
3543 }
3544
3545 return FALSE;
3546 }
3547
3548 gint lttv_state_hook_add_event_hooks(void *hook_data, void *call_data)
3549 {
3550 LttvTracesetState *tss = (LttvTracesetState*)(call_data);
3551
3552 lttv_state_add_event_hooks(tss);
3553
3554 return 0;
3555 }
3556
3557 void lttv_state_add_event_hooks(LttvTracesetState *self)
3558 {
3559 LttvTraceset *traceset = self->parent.ts;
3560
3561 guint i, j, k, nb_trace, nb_tracefile;
3562
3563 LttvTraceState *ts;
3564
3565 LttvTracefileState *tfs;
3566
3567 GArray *hooks;
3568
3569 LttvTraceHook *th;
3570
3571 LttvAttributeValue val;
3572
3573 nb_trace = lttv_traceset_number(traceset);
3574 for(i = 0 ; i < nb_trace ; i++) {
3575 ts = (LttvTraceState *)self->parent.traces[i];
3576
3577 /* Find the eventtype id for the following events and register the
3578 associated by id hooks. */
3579
3580 hooks = g_array_sized_new(FALSE, FALSE, sizeof(LttvTraceHook), 20);
3581 //hooks = g_array_set_size(hooks, 19); // Max possible number of hooks.
3582 //hn = 0;
3583
3584 lttv_trace_find_hook(ts->parent.t,
3585 LTT_CHANNEL_KERNEL,
3586 LTT_EVENT_SYSCALL_ENTRY,
3587 FIELD_ARRAY(LTT_FIELD_SYSCALL_ID),
3588 syscall_entry, NULL, &hooks);
3589
3590 lttv_trace_find_hook(ts->parent.t,
3591 LTT_CHANNEL_KERNEL,
3592 LTT_EVENT_SYSCALL_EXIT,
3593 NULL,
3594 syscall_exit, NULL, &hooks);
3595
3596 lttv_trace_find_hook(ts->parent.t,
3597 LTT_CHANNEL_KERNEL,
3598 LTT_EVENT_TRAP_ENTRY,
3599 FIELD_ARRAY(LTT_FIELD_TRAP_ID),
3600 trap_entry, NULL, &hooks);
3601
3602 lttv_trace_find_hook(ts->parent.t,
3603 LTT_CHANNEL_KERNEL,
3604 LTT_EVENT_TRAP_EXIT,
3605 NULL,
3606 trap_exit, NULL, &hooks);
3607
3608 lttv_trace_find_hook(ts->parent.t,
3609 LTT_CHANNEL_KERNEL,
3610 LTT_EVENT_PAGE_FAULT_ENTRY,
3611 FIELD_ARRAY(LTT_FIELD_TRAP_ID),
3612 trap_entry, NULL, &hooks);
3613
3614 lttv_trace_find_hook(ts->parent.t,
3615 LTT_CHANNEL_KERNEL,
3616 LTT_EVENT_PAGE_FAULT_EXIT,
3617 NULL,
3618 trap_exit, NULL, &hooks);
3619
3620 lttv_trace_find_hook(ts->parent.t,
3621 LTT_CHANNEL_KERNEL,
3622 LTT_EVENT_PAGE_FAULT_NOSEM_ENTRY,
3623 FIELD_ARRAY(LTT_FIELD_TRAP_ID),
3624 trap_entry, NULL, &hooks);
3625
3626 lttv_trace_find_hook(ts->parent.t,
3627 LTT_CHANNEL_KERNEL,
3628 LTT_EVENT_PAGE_FAULT_NOSEM_EXIT,
3629 NULL,
3630 trap_exit, NULL, &hooks);
3631
3632 lttv_trace_find_hook(ts->parent.t,
3633 LTT_CHANNEL_KERNEL,
3634 LTT_EVENT_IRQ_ENTRY,
3635 FIELD_ARRAY(LTT_FIELD_IRQ_ID),
3636 irq_entry, NULL, &hooks);
3637
3638 lttv_trace_find_hook(ts->parent.t,
3639 LTT_CHANNEL_KERNEL,
3640 LTT_EVENT_IRQ_EXIT,
3641 NULL,
3642 irq_exit, NULL, &hooks);
3643
3644 lttv_trace_find_hook(ts->parent.t,
3645 LTT_CHANNEL_KERNEL,
3646 LTT_EVENT_SOFT_IRQ_RAISE,
3647 FIELD_ARRAY(LTT_FIELD_SOFT_IRQ_ID),
3648 soft_irq_raise, NULL, &hooks);
3649
3650 lttv_trace_find_hook(ts->parent.t,
3651 LTT_CHANNEL_KERNEL,
3652 LTT_EVENT_SOFT_IRQ_ENTRY,
3653 FIELD_ARRAY(LTT_FIELD_SOFT_IRQ_ID),
3654 soft_irq_entry, NULL, &hooks);
3655
3656 lttv_trace_find_hook(ts->parent.t,
3657 LTT_CHANNEL_KERNEL,
3658 LTT_EVENT_SOFT_IRQ_EXIT,
3659 NULL,
3660 soft_irq_exit, NULL, &hooks);
3661
3662 lttv_trace_find_hook(ts->parent.t,
3663 LTT_CHANNEL_KERNEL,
3664 LTT_EVENT_SCHED_SCHEDULE,
3665 FIELD_ARRAY(LTT_FIELD_PREV_PID, LTT_FIELD_NEXT_PID,
3666 LTT_FIELD_PREV_STATE),
3667 schedchange, NULL, &hooks);
3668
3669 lttv_trace_find_hook(ts->parent.t,
3670 LTT_CHANNEL_KERNEL,
3671 LTT_EVENT_SCHED_TRY_WAKEUP,
3672 FIELD_ARRAY(LTT_FIELD_PID, LTT_FIELD_CPU_ID, LTT_FIELD_STATE),
3673 sched_try_wakeup, NULL, &hooks);
3674
3675 lttv_trace_find_hook(ts->parent.t,
3676 LTT_CHANNEL_KERNEL,
3677 LTT_EVENT_PROCESS_FORK,
3678 FIELD_ARRAY(LTT_FIELD_PARENT_PID, LTT_FIELD_CHILD_PID,
3679 LTT_FIELD_CHILD_TGID),
3680 process_fork, NULL, &hooks);
3681
3682 lttv_trace_find_hook(ts->parent.t,
3683 LTT_CHANNEL_KERNEL,
3684 LTT_EVENT_KTHREAD_CREATE,
3685 FIELD_ARRAY(LTT_FIELD_PID),
3686 process_kernel_thread, NULL, &hooks);
3687
3688 lttv_trace_find_hook(ts->parent.t,
3689 LTT_CHANNEL_KERNEL,
3690 LTT_EVENT_PROCESS_EXIT,
3691 FIELD_ARRAY(LTT_FIELD_PID),
3692 process_exit, NULL, &hooks);
3693
3694 lttv_trace_find_hook(ts->parent.t,
3695 LTT_CHANNEL_KERNEL,
3696 LTT_EVENT_PROCESS_FREE,
3697 FIELD_ARRAY(LTT_FIELD_PID),
3698 process_free, NULL, &hooks);
3699
3700 lttv_trace_find_hook(ts->parent.t,
3701 LTT_CHANNEL_FS,
3702 LTT_EVENT_EXEC,
3703 FIELD_ARRAY(LTT_FIELD_FILENAME),
3704 process_exec, NULL, &hooks);
3705
3706 lttv_trace_find_hook(ts->parent.t,
3707 LTT_CHANNEL_USERSPACE,
3708 LTT_EVENT_THREAD_BRAND,
3709 FIELD_ARRAY(LTT_FIELD_NAME),
3710 thread_brand, NULL, &hooks);
3711
3712 /* statedump-related hooks */
3713 lttv_trace_find_hook(ts->parent.t,
3714 LTT_CHANNEL_TASK_STATE,
3715 LTT_EVENT_PROCESS_STATE,
3716 FIELD_ARRAY(LTT_FIELD_PID, LTT_FIELD_PARENT_PID, LTT_FIELD_NAME,
3717 LTT_FIELD_TYPE, LTT_FIELD_MODE, LTT_FIELD_SUBMODE,
3718 LTT_FIELD_STATUS, LTT_FIELD_TGID),
3719 enum_process_state, NULL, &hooks);
3720
3721 lttv_trace_find_hook(ts->parent.t,
3722 LTT_CHANNEL_GLOBAL_STATE,
3723 LTT_EVENT_STATEDUMP_END,
3724 NULL,
3725 statedump_end, NULL, &hooks);
3726
3727 lttv_trace_find_hook(ts->parent.t,
3728 LTT_CHANNEL_IRQ_STATE,
3729 LTT_EVENT_LIST_INTERRUPT,
3730 FIELD_ARRAY(LTT_FIELD_ACTION, LTT_FIELD_IRQ_ID),
3731 enum_interrupt, NULL, &hooks);
3732
3733 lttv_trace_find_hook(ts->parent.t,
3734 LTT_CHANNEL_BLOCK,
3735 LTT_EVENT_REQUEST_ISSUE,
3736 FIELD_ARRAY(LTT_FIELD_MAJOR, LTT_FIELD_MINOR, LTT_FIELD_OPERATION),
3737 bdev_request_issue, NULL, &hooks);
3738
3739 lttv_trace_find_hook(ts->parent.t,
3740 LTT_CHANNEL_BLOCK,
3741 LTT_EVENT_REQUEST_COMPLETE,
3742 FIELD_ARRAY(LTT_FIELD_MAJOR, LTT_FIELD_MINOR, LTT_FIELD_OPERATION),
3743 bdev_request_complete, NULL, &hooks);
3744
3745 lttv_trace_find_hook(ts->parent.t,
3746 LTT_CHANNEL_USERSPACE,
3747 LTT_EVENT_FUNCTION_ENTRY,
3748 FIELD_ARRAY(LTT_FIELD_THIS_FN, LTT_FIELD_CALL_SITE),
3749 function_entry, NULL, &hooks);
3750
3751 lttv_trace_find_hook(ts->parent.t,
3752 LTT_CHANNEL_USERSPACE,
3753 LTT_EVENT_FUNCTION_EXIT,
3754 FIELD_ARRAY(LTT_FIELD_THIS_FN, LTT_FIELD_CALL_SITE),
3755 function_exit, NULL, &hooks);
3756
3757 lttv_trace_find_hook(ts->parent.t,
3758 LTT_CHANNEL_SYSCALL_STATE,
3759 LTT_EVENT_SYS_CALL_TABLE,
3760 FIELD_ARRAY(LTT_FIELD_ID, LTT_FIELD_ADDRESS, LTT_FIELD_SYMBOL),
3761 dump_syscall, NULL, &hooks);
3762
3763 lttv_trace_find_hook(ts->parent.t,
3764 LTT_CHANNEL_KPROBE_STATE,
3765 LTT_EVENT_KPROBE_TABLE,
3766 FIELD_ARRAY(LTT_FIELD_IP, LTT_FIELD_SYMBOL),
3767 dump_kprobe, NULL, &hooks);
3768
3769 lttv_trace_find_hook(ts->parent.t,
3770 LTT_CHANNEL_SOFTIRQ_STATE,
3771 LTT_EVENT_SOFTIRQ_VEC,
3772 FIELD_ARRAY(LTT_FIELD_ID, LTT_FIELD_ADDRESS, LTT_FIELD_SYMBOL),
3773 dump_softirq, NULL, &hooks);
3774
3775 lttv_trace_find_hook(ts->parent.t,
3776 LTT_CHANNEL_FS,
3777 LTT_EVENT_OPEN,
3778 FIELD_ARRAY(LTT_FIELD_FD, LTT_FIELD_FILENAME),
3779 fs_open, NULL, &hooks);
3780
3781 /* Add these hooks to each event_by_id hooks list */
3782
3783 nb_tracefile = ts->parent.tracefiles->len;
3784
3785 for(j = 0 ; j < nb_tracefile ; j++) {
3786 tfs =
3787 LTTV_TRACEFILE_STATE(g_array_index(ts->parent.tracefiles,
3788 LttvTracefileContext*, j));
3789
3790 for(k = 0 ; k < hooks->len ; k++) {
3791 th = &g_array_index(hooks, LttvTraceHook, k);
3792 if (th->mdata == tfs->parent.tf->mdata)
3793 lttv_hooks_add(
3794 lttv_hooks_by_id_find(tfs->parent.event_by_id, th->id),
3795 th->h,
3796 th,
3797 LTTV_PRIO_STATE);
3798 }
3799 }
3800 lttv_attribute_find(ts->parent.a, LTTV_STATE_HOOKS, LTTV_POINTER, &val);
3801 *(val.v_pointer) = hooks;
3802 }
3803 }
3804
3805 gint lttv_state_hook_remove_event_hooks(void *hook_data, void *call_data)
3806 {
3807 LttvTracesetState *tss = (LttvTracesetState*)(call_data);
3808
3809 lttv_state_remove_event_hooks(tss);
3810
3811 return 0;
3812 }
3813
3814 void lttv_state_remove_event_hooks(LttvTracesetState *self)
3815 {
3816 LttvTraceset *traceset = self->parent.ts;
3817
3818 guint i, j, k, nb_trace, nb_tracefile;
3819
3820 LttvTraceState *ts;
3821
3822 LttvTracefileState *tfs;
3823
3824 GArray *hooks;
3825
3826 LttvTraceHook *th;
3827
3828 LttvAttributeValue val;
3829
3830 nb_trace = lttv_traceset_number(traceset);
3831 for(i = 0 ; i < nb_trace ; i++) {
3832 ts = LTTV_TRACE_STATE(self->parent.traces[i]);
3833
3834 lttv_attribute_find(ts->parent.a, LTTV_STATE_HOOKS, LTTV_POINTER, &val);
3835 hooks = *(val.v_pointer);
3836
3837 /* Remove these hooks from each event_by_id hooks list */
3838
3839 nb_tracefile = ts->parent.tracefiles->len;
3840
3841 for(j = 0 ; j < nb_tracefile ; j++) {
3842 tfs =
3843 LTTV_TRACEFILE_STATE(g_array_index(ts->parent.tracefiles,
3844 LttvTracefileContext*, j));
3845
3846 for(k = 0 ; k < hooks->len ; k++) {
3847 th = &g_array_index(hooks, LttvTraceHook, k);
3848 if (th->mdata == tfs->parent.tf->mdata)
3849 lttv_hooks_remove_data(
3850 lttv_hooks_by_id_find(tfs->parent.event_by_id, th->id),
3851 th->h,
3852 th);
3853 }
3854 }
3855 lttv_trace_hook_remove_all(&hooks);
3856 g_array_free(hooks, TRUE);
3857 }
3858 }
3859
3860 static gboolean state_save_event_hook(void *hook_data, void *call_data)
3861 {
3862 guint *event_count = (guint*)hook_data;
3863
3864 /* Only save at LTTV_STATE_SAVE_INTERVAL */
3865 if(likely((*event_count)++ < LTTV_STATE_SAVE_INTERVAL))
3866 return FALSE;
3867 else
3868 *event_count = 0;
3869
3870 LttvTracefileState *self = (LttvTracefileState *)call_data;
3871
3872 LttvTraceState *tcs = (LttvTraceState *)(self->parent.t_context);
3873
3874 LttvAttribute *saved_states_tree, *saved_state_tree;
3875
3876 LttvAttributeValue value;
3877
3878 saved_states_tree = lttv_attribute_find_subdir(tcs->parent.t_a,
3879 LTTV_STATE_SAVED_STATES);
3880 saved_state_tree = g_object_new(LTTV_ATTRIBUTE_TYPE, NULL);
3881 value = lttv_attribute_add(saved_states_tree,
3882 lttv_attribute_get_number(saved_states_tree), LTTV_GOBJECT);
3883 *(value.v_gobject) = (GObject *)saved_state_tree;
3884 value = lttv_attribute_add(saved_state_tree, LTTV_STATE_TIME, LTTV_TIME);
3885 *(value.v_time) = self->parent.timestamp;
3886 lttv_state_save(tcs, saved_state_tree);
3887 g_debug("Saving state at time %lu.%lu", self->parent.timestamp.tv_sec,
3888 self->parent.timestamp.tv_nsec);
3889
3890 *(tcs->max_time_state_recomputed_in_seek) = self->parent.timestamp;
3891
3892 return FALSE;
3893 }
3894
3895 static gboolean state_save_after_trace_hook(void *hook_data, void *call_data)
3896 {
3897 LttvTraceState *tcs = (LttvTraceState *)(call_data);
3898
3899 *(tcs->max_time_state_recomputed_in_seek) = tcs->parent.time_span.end_time;
3900
3901 return FALSE;
3902 }
3903
3904 guint lttv_state_current_cpu(LttvTracefileState *tfs)
3905 {
3906 return tfs->cpu;
3907 }
3908
3909
3910
3911 #if 0
3912 static gboolean block_start(void *hook_data, void *call_data)
3913 {
3914 LttvTracefileState *self = (LttvTracefileState *)call_data;
3915
3916 LttvTracefileState *tfcs;
3917
3918 LttvTraceState *tcs = (LttvTraceState *)(self->parent.t_context);
3919
3920 LttEventPosition *ep;
3921
3922 guint i, nb_block, nb_event, nb_tracefile;
3923
3924 LttTracefile *tf;
3925
3926 LttvAttribute *saved_states_tree, *saved_state_tree;
3927
3928 LttvAttributeValue value;
3929
3930 ep = ltt_event_position_new();
3931
3932 nb_tracefile = tcs->parent.tracefiles->len;
3933
3934 /* Count the number of events added since the last block end in any
3935 tracefile. */
3936
3937 for(i = 0 ; i < nb_tracefile ; i++) {
3938 tfcs =
3939 LTTV_TRACEFILE_STATE(&g_array_index(tcs->parent.tracefiles,
3940 LttvTracefileContext, i));
3941 ltt_event_position(tfcs->parent.e, ep);
3942 ltt_event_position_get(ep, &nb_block, &nb_event, &tf);
3943 tcs->nb_event += nb_event - tfcs->saved_position;
3944 tfcs->saved_position = nb_event;
3945 }
3946 g_free(ep);
3947
3948 if(tcs->nb_event >= tcs->save_interval) {
3949 saved_states_tree = lttv_attribute_find_subdir(tcs->parent.t_a,
3950 LTTV_STATE_SAVED_STATES);
3951 saved_state_tree = g_object_new(LTTV_ATTRIBUTE_TYPE, NULL);
3952 value = lttv_attribute_add(saved_states_tree,
3953 lttv_attribute_get_number(saved_states_tree), LTTV_GOBJECT);
3954 *(value.v_gobject) = (GObject *)saved_state_tree;
3955 value = lttv_attribute_add(saved_state_tree, LTTV_STATE_TIME, LTTV_TIME);
3956 *(value.v_time) = self->parent.timestamp;
3957 lttv_state_save(tcs, saved_state_tree);
3958 tcs->nb_event = 0;
3959 g_debug("Saving state at time %lu.%lu", self->parent.timestamp.tv_sec,
3960 self->parent.timestamp.tv_nsec);
3961 }
3962 *(tcs->max_time_state_recomputed_in_seek) = self->parent.timestamp;
3963 return FALSE;
3964 }
3965 #endif //0
3966
3967 #if 0
3968 static gboolean block_end(void *hook_data, void *call_data)
3969 {
3970 LttvTracefileState *self = (LttvTracefileState *)call_data;
3971
3972 LttvTraceState *tcs = (LttvTraceState *)(self->parent.t_context);
3973
3974 LttTracefile *tf;
3975
3976 LttEventPosition *ep;
3977
3978 guint nb_block, nb_event;
3979
3980 ep = ltt_event_position_new();
3981 ltt_event_position(self->parent.e, ep);
3982 ltt_event_position_get(ep, &nb_block, &nb_event, &tf);
3983 tcs->nb_event += nb_event - self->saved_position + 1;
3984 self->saved_position = 0;
3985 *(tcs->max_time_state_recomputed_in_seek) = self->parent.timestamp;
3986 g_free(ep);
3987
3988 return FALSE;
3989 }
3990 #endif //0
3991 #if 0
3992 void lttv_state_save_add_event_hooks(LttvTracesetState *self)
3993 {
3994 LttvTraceset *traceset = self->parent.ts;
3995
3996 guint i, j, nb_trace, nb_tracefile;
3997
3998 LttvTraceState *ts;
3999
4000 LttvTracefileState *tfs;
4001
4002 LttvTraceHook hook_start, hook_end;
4003
4004 nb_trace = lttv_traceset_number(traceset);
4005 for(i = 0 ; i < nb_trace ; i++) {
4006 ts = (LttvTraceState *)self->parent.traces[i];
4007
4008 lttv_trace_find_hook(ts->parent.t, "core","block_start",NULL,
4009 NULL, NULL, block_start, &hook_start);
4010 lttv_trace_find_hook(ts->parent.t, "core","block_end",NULL,
4011 NULL, NULL, block_end, &hook_end);
4012
4013 nb_tracefile = ts->parent.tracefiles->len;
4014
4015 for(j = 0 ; j < nb_tracefile ; j++) {
4016 tfs =
4017 LTTV_TRACEFILE_STATE(&g_array_index(ts->parent.tracefiles,
4018 LttvTracefileContext, j));
4019 lttv_hooks_add(lttv_hooks_by_id_find(tfs->parent.event_by_id,
4020 hook_start.id), hook_start.h, NULL, LTTV_PRIO_STATE);
4021 lttv_hooks_add(lttv_hooks_by_id_find(tfs->parent.event_by_id,
4022 hook_end.id), hook_end.h, NULL, LTTV_PRIO_STATE);
4023 }
4024 }
4025 }
4026 #endif //0
4027
4028 void lttv_state_save_add_event_hooks(LttvTracesetState *self)
4029 {
4030 LttvTraceset *traceset = self->parent.ts;
4031
4032 guint i, j, nb_trace, nb_tracefile;
4033
4034 LttvTraceState *ts;
4035
4036 LttvTracefileState *tfs;
4037
4038
4039 nb_trace = lttv_traceset_number(traceset);
4040 for(i = 0 ; i < nb_trace ; i++) {
4041
4042 ts = (LttvTraceState *)self->parent.traces[i];
4043 nb_tracefile = ts->parent.tracefiles->len;
4044
4045 if(ts->has_precomputed_states) continue;
4046
4047 guint *event_count = g_new(guint, 1);
4048 *event_count = 0;
4049
4050 for(j = 0 ; j < nb_tracefile ; j++) {
4051 tfs =
4052 LTTV_TRACEFILE_STATE(g_array_index(ts->parent.tracefiles,
4053 LttvTracefileContext*, j));
4054 lttv_hooks_add(tfs->parent.event,
4055 state_save_event_hook,
4056 event_count,
4057 LTTV_PRIO_STATE);
4058
4059 }
4060 }
4061
4062 lttv_process_traceset_begin(&self->parent,
4063 NULL, NULL, NULL, NULL, NULL);
4064
4065 }
4066
4067 gint lttv_state_save_hook_add_event_hooks(void *hook_data, void *call_data)
4068 {
4069 LttvTracesetState *tss = (LttvTracesetState*)(call_data);
4070
4071 lttv_state_save_add_event_hooks(tss);
4072
4073 return 0;
4074 }
4075
4076
4077 #if 0
4078 void lttv_state_save_remove_event_hooks(LttvTracesetState *self)
4079 {
4080 LttvTraceset *traceset = self->parent.ts;
4081
4082 guint i, j, nb_trace, nb_tracefile;
4083
4084 LttvTraceState *ts;
4085
4086 LttvTracefileState *tfs;
4087
4088 LttvTraceHook hook_start, hook_end;
4089
4090 nb_trace = lttv_traceset_number(traceset);
4091 for(i = 0 ; i < nb_trace ; i++) {
4092 ts = LTTV_TRACE_STATE(self->parent.traces[i]);
4093
4094 lttv_trace_find_hook(ts->parent.t, "core","block_start",NULL,
4095 NULL, NULL, block_start, &hook_start);
4096
4097 lttv_trace_find_hook(ts->parent.t, "core","block_end",NULL,
4098 NULL, NULL, block_end, &hook_end);
4099
4100 nb_tracefile = ts->parent.tracefiles->len;
4101
4102 for(j = 0 ; j < nb_tracefile ; j++) {
4103 tfs =
4104 LTTV_TRACEFILE_STATE(&g_array_index(ts->parent.tracefiles,
4105 LttvTracefileContext, j));
4106 lttv_hooks_remove_data(lttv_hooks_by_id_find(
4107 tfs->parent.event_by_id, hook_start.id), hook_start.h, NULL);
4108 lttv_hooks_remove_data(lttv_hooks_by_id_find(
4109 tfs->parent.event_by_id, hook_end.id), hook_end.h, NULL);
4110 }
4111 }
4112 }
4113 #endif //0
4114
4115 void lttv_state_save_remove_event_hooks(LttvTracesetState *self)
4116 {
4117 LttvTraceset *traceset = self->parent.ts;
4118
4119 guint i, j, nb_trace, nb_tracefile;
4120
4121 LttvTraceState *ts;
4122
4123 LttvTracefileState *tfs;
4124
4125 LttvHooks *after_trace = lttv_hooks_new();
4126
4127 lttv_hooks_add(after_trace,
4128 state_save_after_trace_hook,
4129 NULL,
4130 LTTV_PRIO_STATE);
4131
4132
4133 lttv_process_traceset_end(&self->parent,
4134 NULL, after_trace, NULL, NULL, NULL);
4135
4136 lttv_hooks_destroy(after_trace);
4137
4138 nb_trace = lttv_traceset_number(traceset);
4139 for(i = 0 ; i < nb_trace ; i++) {
4140
4141 ts = (LttvTraceState *)self->parent.traces[i];
4142 nb_tracefile = ts->parent.tracefiles->len;
4143
4144 if(ts->has_precomputed_states) continue;
4145
4146 guint *event_count = NULL;
4147
4148 for(j = 0 ; j < nb_tracefile ; j++) {
4149 tfs =
4150 LTTV_TRACEFILE_STATE(g_array_index(ts->parent.tracefiles,
4151 LttvTracefileContext*, j));
4152 event_count = lttv_hooks_remove(tfs->parent.event,
4153 state_save_event_hook);
4154 }
4155 if(event_count) g_free(event_count);
4156 }
4157 }
4158
4159 gint lttv_state_save_hook_remove_event_hooks(void *hook_data, void *call_data)
4160 {
4161 LttvTracesetState *tss = (LttvTracesetState*)(call_data);
4162
4163 lttv_state_save_remove_event_hooks(tss);
4164
4165 return 0;
4166 }
4167
4168 void lttv_state_traceset_seek_time_closest(LttvTracesetState *self, LttTime t)
4169 {
4170 LttvTraceset *traceset = self->parent.ts;
4171
4172 guint i, nb_trace;
4173
4174 int min_pos, mid_pos, max_pos;
4175
4176 guint call_rest = 0;
4177
4178 LttvTraceState *tcs;
4179
4180 LttvAttributeValue value;
4181
4182 LttvAttributeType type;
4183
4184 LttvAttributeName name;
4185
4186 gboolean is_named;
4187
4188 LttvAttribute *saved_states_tree, *saved_state_tree, *closest_tree = NULL;
4189
4190 //g_tree_destroy(self->parent.pqueue);
4191 //self->parent.pqueue = g_tree_new(compare_tracefile);
4192
4193 g_info("Entering seek_time_closest for time %lu.%lu", t.tv_sec, t.tv_nsec);
4194
4195 nb_trace = lttv_traceset_number(traceset);
4196 for(i = 0 ; i < nb_trace ; i++) {
4197 tcs = (LttvTraceState *)self->parent.traces[i];
4198
4199 if(ltt_time_compare(t, *(tcs->max_time_state_recomputed_in_seek)) < 0) {
4200 saved_states_tree = lttv_attribute_find_subdir(tcs->parent.t_a,
4201 LTTV_STATE_SAVED_STATES);
4202 min_pos = -1;
4203
4204 if(saved_states_tree) {
4205 max_pos = lttv_attribute_get_number(saved_states_tree) - 1;
4206 mid_pos = max_pos / 2;
4207 while(min_pos < max_pos) {
4208 type = lttv_attribute_get(saved_states_tree, mid_pos, &name, &value,
4209 &is_named);
4210 g_assert(type == LTTV_GOBJECT);
4211 saved_state_tree = *((LttvAttribute **)(value.v_gobject));
4212 type = lttv_attribute_get_by_name(saved_state_tree, LTTV_STATE_TIME,
4213 &value);
4214 g_assert(type == LTTV_TIME);
4215 if(ltt_time_compare(*(value.v_time), t) < 0) {
4216 min_pos = mid_pos;
4217 closest_tree = saved_state_tree;
4218 }
4219 else max_pos = mid_pos - 1;
4220
4221 mid_pos = (min_pos + max_pos + 1) / 2;
4222 }
4223 }
4224
4225 /* restore the closest earlier saved state */
4226 if(min_pos != -1) {
4227 lttv_state_restore(tcs, closest_tree);
4228 call_rest = 1;
4229 }
4230
4231 /* There is no saved state, yet we want to have it. Restart at T0 */
4232 else {
4233 restore_init_state(tcs);
4234 lttv_process_trace_seek_time(&(tcs->parent), ltt_time_zero);
4235 }
4236 }
4237 /* We want to seek quickly without restoring/updating the state */
4238 else {
4239 restore_init_state(tcs);
4240 lttv_process_trace_seek_time(&(tcs->parent), t);
4241 }
4242 }
4243 if(!call_rest) g_info("NOT Calling restore");
4244 }
4245
4246
4247 static void
4248 traceset_state_instance_init (GTypeInstance *instance, gpointer g_class)
4249 {
4250 }
4251
4252
4253 static void
4254 traceset_state_finalize (LttvTracesetState *self)
4255 {
4256 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACESET_CONTEXT_TYPE))->
4257 finalize(G_OBJECT(self));
4258 }
4259
4260
4261 static void
4262 traceset_state_class_init (LttvTracesetContextClass *klass)
4263 {
4264 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
4265
4266 gobject_class->finalize = (void (*)(GObject *self)) traceset_state_finalize;
4267 klass->init = (void (*)(LttvTracesetContext *self, LttvTraceset *ts))init;
4268 klass->fini = (void (*)(LttvTracesetContext *self))fini;
4269 klass->new_traceset_context = new_traceset_context;
4270 klass->new_trace_context = new_trace_context;
4271 klass->new_tracefile_context = new_tracefile_context;
4272 }
4273
4274
4275 GType
4276 lttv_traceset_state_get_type(void)
4277 {
4278 static GType type = 0;
4279 if (type == 0) {
4280 static const GTypeInfo info = {
4281 sizeof (LttvTracesetStateClass),
4282 NULL, /* base_init */
4283 NULL, /* base_finalize */
4284 (GClassInitFunc) traceset_state_class_init, /* class_init */
4285 NULL, /* class_finalize */
4286 NULL, /* class_data */
4287 sizeof (LttvTracesetState),
4288 0, /* n_preallocs */
4289 (GInstanceInitFunc) traceset_state_instance_init, /* instance_init */
4290 NULL /* value handling */
4291 };
4292
4293 type = g_type_register_static (LTTV_TRACESET_CONTEXT_TYPE, "LttvTracesetStateType",
4294 &info, 0);
4295 }
4296 return type;
4297 }
4298
4299
4300 static void
4301 trace_state_instance_init (GTypeInstance *instance, gpointer g_class)
4302 {
4303 }
4304
4305
4306 static void
4307 trace_state_finalize (LttvTraceState *self)
4308 {
4309 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACE_CONTEXT_TYPE))->
4310 finalize(G_OBJECT(self));
4311 }
4312
4313
4314 static void
4315 trace_state_class_init (LttvTraceStateClass *klass)
4316 {
4317 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
4318
4319 gobject_class->finalize = (void (*)(GObject *self)) trace_state_finalize;
4320 klass->state_save = state_save;
4321 klass->state_restore = state_restore;
4322 klass->state_saved_free = state_saved_free;
4323 }
4324
4325
4326 GType
4327 lttv_trace_state_get_type(void)
4328 {
4329 static GType type = 0;
4330 if (type == 0) {
4331 static const GTypeInfo info = {
4332 sizeof (LttvTraceStateClass),
4333 NULL, /* base_init */
4334 NULL, /* base_finalize */
4335 (GClassInitFunc) trace_state_class_init, /* class_init */
4336 NULL, /* class_finalize */
4337 NULL, /* class_data */
4338 sizeof (LttvTraceState),
4339 0, /* n_preallocs */
4340 (GInstanceInitFunc) trace_state_instance_init, /* instance_init */
4341 NULL /* value handling */
4342 };
4343
4344 type = g_type_register_static (LTTV_TRACE_CONTEXT_TYPE,
4345 "LttvTraceStateType", &info, 0);
4346 }
4347 return type;
4348 }
4349
4350
4351 static void
4352 tracefile_state_instance_init (GTypeInstance *instance, gpointer g_class)
4353 {
4354 }
4355
4356
4357 static void
4358 tracefile_state_finalize (LttvTracefileState *self)
4359 {
4360 G_OBJECT_CLASS(g_type_class_peek(LTTV_TRACEFILE_CONTEXT_TYPE))->
4361 finalize(G_OBJECT(self));
4362 }
4363
4364
4365 static void
4366 tracefile_state_class_init (LttvTracefileStateClass *klass)
4367 {
4368 GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
4369
4370 gobject_class->finalize = (void (*)(GObject *self)) tracefile_state_finalize;
4371 }
4372
4373
4374 GType
4375 lttv_tracefile_state_get_type(void)
4376 {
4377 static GType type = 0;
4378 if (type == 0) {
4379 static const GTypeInfo info = {
4380 sizeof (LttvTracefileStateClass),
4381 NULL, /* base_init */
4382 NULL, /* base_finalize */
4383 (GClassInitFunc) tracefile_state_class_init, /* class_init */
4384 NULL, /* class_finalize */
4385 NULL, /* class_data */
4386 sizeof (LttvTracefileState),
4387 0, /* n_preallocs */
4388 (GInstanceInitFunc) tracefile_state_instance_init, /* instance_init */
4389 NULL /* value handling */
4390 };
4391
4392 type = g_type_register_static (LTTV_TRACEFILE_CONTEXT_TYPE,
4393 "LttvTracefileStateType", &info, 0);
4394 }
4395 return type;
4396 }
4397
4398
4399 static void module_init()
4400 {
4401 LTTV_STATE_UNNAMED = g_quark_from_string("");
4402 LTTV_STATE_UNBRANDED = g_quark_from_string("");
4403 LTTV_STATE_MODE_UNKNOWN = g_quark_from_string("MODE_UNKNOWN");
4404 LTTV_STATE_USER_MODE = g_quark_from_string("USER_MODE");
4405 LTTV_STATE_SYSCALL = g_quark_from_string("SYSCALL");
4406 LTTV_STATE_TRAP = g_quark_from_string("TRAP");
4407 LTTV_STATE_IRQ = g_quark_from_string("IRQ");
4408 LTTV_STATE_SOFT_IRQ = g_quark_from_string("SOFTIRQ");
4409 LTTV_STATE_SUBMODE_UNKNOWN = g_quark_from_string("UNKNOWN");
4410 LTTV_STATE_SUBMODE_NONE = g_quark_from_string("NONE");
4411 LTTV_STATE_WAIT_FORK = g_quark_from_string("WAIT_FORK");
4412 LTTV_STATE_WAIT_CPU = g_quark_from_string("WAIT_CPU");
4413 LTTV_STATE_EXIT = g_quark_from_string("EXIT");
4414 LTTV_STATE_ZOMBIE = g_quark_from_string("ZOMBIE");
4415 LTTV_STATE_WAIT = g_quark_from_string("WAIT");
4416 LTTV_STATE_RUN = g_quark_from_string("RUN");
4417 LTTV_STATE_DEAD = g_quark_from_string("DEAD");
4418 LTTV_STATE_USER_THREAD = g_quark_from_string("USER_THREAD");
4419 LTTV_STATE_KERNEL_THREAD = g_quark_from_string("KERNEL_THREAD");
4420 LTTV_STATE_TRACEFILES = g_quark_from_string("tracefiles");
4421 LTTV_STATE_PROCESSES = g_quark_from_string("processes");
4422 LTTV_STATE_PROCESS = g_quark_from_string("process");
4423 LTTV_STATE_RUNNING_PROCESS = g_quark_from_string("running_process");
4424 LTTV_STATE_EVENT = g_quark_from_string("event");
4425 LTTV_STATE_SAVED_STATES = g_quark_from_string("saved states");
4426 LTTV_STATE_SAVED_STATES_TIME = g_quark_from_string("saved states time");
4427 LTTV_STATE_TIME = g_quark_from_string("time");
4428 LTTV_STATE_HOOKS = g_quark_from_string("saved state hooks");
4429 LTTV_STATE_NAME_TABLES = g_quark_from_string("name tables");
4430 LTTV_STATE_TRACE_STATE_USE_COUNT =
4431 g_quark_from_string("trace_state_use_count");
4432 LTTV_STATE_RESOURCE_CPUS = g_quark_from_string("cpu resource states");
4433 LTTV_STATE_RESOURCE_CPUS = g_quark_from_string("cpu count");
4434 LTTV_STATE_RESOURCE_IRQS = g_quark_from_string("irq resource states");
4435 LTTV_STATE_RESOURCE_SOFT_IRQS = g_quark_from_string("soft irq resource states");
4436 LTTV_STATE_RESOURCE_TRAPS = g_quark_from_string("trap resource states");
4437 LTTV_STATE_RESOURCE_BLKDEVS = g_quark_from_string("blkdevs resource states");
4438
4439 LTT_CHANNEL_FD_STATE = g_quark_from_string("fd_state");
4440 LTT_CHANNEL_GLOBAL_STATE = g_quark_from_string("global_state");
4441 LTT_CHANNEL_IRQ_STATE = g_quark_from_string("irq_state");
4442 LTT_CHANNEL_MODULE_STATE = g_quark_from_string("module_state");
4443 LTT_CHANNEL_NETIF_STATE = g_quark_from_string("netif_state");
4444 LTT_CHANNEL_SOFTIRQ_STATE = g_quark_from_string("softirq_state");
4445 LTT_CHANNEL_SWAP_STATE = g_quark_from_string("swap_state");
4446 LTT_CHANNEL_SYSCALL_STATE = g_quark_from_string("syscall_state");
4447 LTT_CHANNEL_TASK_STATE = g_quark_from_string("task_state");
4448 LTT_CHANNEL_VM_STATE = g_quark_from_string("vm_state");
4449 LTT_CHANNEL_KPROBE_STATE = g_quark_from_string("kprobe_state");
4450 LTT_CHANNEL_FS = g_quark_from_string("fs");
4451 LTT_CHANNEL_KERNEL = g_quark_from_string("kernel");
4452 LTT_CHANNEL_MM = g_quark_from_string("mm");
4453 LTT_CHANNEL_USERSPACE = g_quark_from_string("userspace");
4454 LTT_CHANNEL_BLOCK = g_quark_from_string("block");
4455
4456 LTT_EVENT_SYSCALL_ENTRY = g_quark_from_string("syscall_entry");
4457 LTT_EVENT_SYSCALL_EXIT = g_quark_from_string("syscall_exit");
4458 LTT_EVENT_TRAP_ENTRY = g_quark_from_string("trap_entry");
4459 LTT_EVENT_TRAP_EXIT = g_quark_from_string("trap_exit");
4460 LTT_EVENT_PAGE_FAULT_ENTRY = g_quark_from_string("page_fault_entry");
4461 LTT_EVENT_PAGE_FAULT_EXIT = g_quark_from_string("page_fault_exit");
4462 LTT_EVENT_PAGE_FAULT_NOSEM_ENTRY = g_quark_from_string("page_fault_nosem_entry");
4463 LTT_EVENT_PAGE_FAULT_NOSEM_EXIT = g_quark_from_string("page_fault_nosem_exit");
4464 LTT_EVENT_IRQ_ENTRY = g_quark_from_string("irq_entry");
4465 LTT_EVENT_IRQ_EXIT = g_quark_from_string("irq_exit");
4466 LTT_EVENT_SOFT_IRQ_RAISE = g_quark_from_string("softirq_raise");
4467 LTT_EVENT_SOFT_IRQ_ENTRY = g_quark_from_string("softirq_entry");
4468 LTT_EVENT_SOFT_IRQ_EXIT = g_quark_from_string("softirq_exit");
4469 LTT_EVENT_SCHED_SCHEDULE = g_quark_from_string("sched_schedule");
4470 LTT_EVENT_SCHED_TRY_WAKEUP = g_quark_from_string("sched_try_wakeup");
4471 LTT_EVENT_PROCESS_FORK = g_quark_from_string("process_fork");
4472 LTT_EVENT_KTHREAD_CREATE = g_quark_from_string("kthread_create");
4473 LTT_EVENT_PROCESS_EXIT = g_quark_from_string("process_exit");
4474 LTT_EVENT_PROCESS_FREE = g_quark_from_string("process_free");
4475 LTT_EVENT_EXEC = g_quark_from_string("exec");
4476 LTT_EVENT_PROCESS_STATE = g_quark_from_string("process_state");
4477 LTT_EVENT_STATEDUMP_END = g_quark_from_string("statedump_end");
4478 LTT_EVENT_FUNCTION_ENTRY = g_quark_from_string("function_entry");
4479 LTT_EVENT_FUNCTION_EXIT = g_quark_from_string("function_exit");
4480 LTT_EVENT_THREAD_BRAND = g_quark_from_string("thread_brand");
4481 LTT_EVENT_REQUEST_ISSUE = g_quark_from_string("_blk_request_issue");
4482 LTT_EVENT_REQUEST_COMPLETE = g_quark_from_string("_blk_request_complete");
4483 LTT_EVENT_LIST_INTERRUPT = g_quark_from_string("interrupt");
4484 LTT_EVENT_SYS_CALL_TABLE = g_quark_from_string("sys_call_table");
4485 LTT_EVENT_SOFTIRQ_VEC = g_quark_from_string("softirq_vec");
4486 LTT_EVENT_KPROBE_TABLE = g_quark_from_string("kprobe_table");
4487 LTT_EVENT_KPROBE = g_quark_from_string("kprobe");
4488 LTT_EVENT_OPEN = g_quark_from_string("open");
4489 LTT_EVENT_READ = g_quark_from_string("read");
4490 LTT_EVENT_POLL_EVENT = g_quark_from_string("poll_event");
4491
4492 LTT_FIELD_SYSCALL_ID = g_quark_from_string("syscall_id");
4493 LTT_FIELD_TRAP_ID = g_quark_from_string("trap_id");
4494 LTT_FIELD_IRQ_ID = g_quark_from_string("irq_id");
4495 LTT_FIELD_SOFT_IRQ_ID = g_quark_from_string("softirq_id");
4496 LTT_FIELD_PREV_PID = g_quark_from_string("prev_pid");
4497 LTT_FIELD_NEXT_PID = g_quark_from_string("next_pid");
4498 LTT_FIELD_PREV_STATE = g_quark_from_string("prev_state");
4499 LTT_FIELD_PARENT_PID = g_quark_from_string("parent_pid");
4500 LTT_FIELD_CHILD_PID = g_quark_from_string("child_pid");
4501 LTT_FIELD_PID = g_quark_from_string("pid");
4502 LTT_FIELD_TGID = g_quark_from_string("tgid");
4503 LTT_FIELD_CHILD_TGID = g_quark_from_string("child_tgid");
4504 LTT_FIELD_FILENAME = g_quark_from_string("filename");
4505 LTT_FIELD_NAME = g_quark_from_string("name");
4506 LTT_FIELD_TYPE = g_quark_from_string("type");
4507 LTT_FIELD_MODE = g_quark_from_string("mode");
4508 LTT_FIELD_SUBMODE = g_quark_from_string("submode");
4509 LTT_FIELD_STATUS = g_quark_from_string("status");
4510 LTT_FIELD_THIS_FN = g_quark_from_string("this_fn");
4511 LTT_FIELD_CALL_SITE = g_quark_from_string("call_site");
4512 LTT_FIELD_MAJOR = g_quark_from_string("major");
4513 LTT_FIELD_MINOR = g_quark_from_string("minor");
4514 LTT_FIELD_OPERATION = g_quark_from_string("direction");
4515 LTT_FIELD_ACTION = g_quark_from_string("action");
4516 LTT_FIELD_ID = g_quark_from_string("id");
4517 LTT_FIELD_ADDRESS = g_quark_from_string("address");
4518 LTT_FIELD_SYMBOL = g_quark_from_string("symbol");
4519 LTT_FIELD_IP = g_quark_from_string("ip");
4520 LTT_FIELD_FD = g_quark_from_string("fd");
4521 LTT_FIELD_STATE = g_quark_from_string("state");
4522 LTT_FIELD_CPU_ID = g_quark_from_string("cpu_id");
4523
4524 LTTV_CPU_UNKNOWN = g_quark_from_string("unknown");
4525 LTTV_CPU_IDLE = g_quark_from_string("idle");
4526 LTTV_CPU_BUSY = g_quark_from_string("busy");
4527 LTTV_CPU_IRQ = g_quark_from_string("irq");
4528 LTTV_CPU_SOFT_IRQ = g_quark_from_string("softirq");
4529 LTTV_CPU_TRAP = g_quark_from_string("trap");
4530
4531 LTTV_IRQ_UNKNOWN = g_quark_from_string("unknown");
4532 LTTV_IRQ_IDLE = g_quark_from_string("idle");
4533 LTTV_IRQ_BUSY = g_quark_from_string("busy");
4534
4535 LTTV_BDEV_UNKNOWN = g_quark_from_string("unknown");
4536 LTTV_BDEV_IDLE = g_quark_from_string("idle");
4537 LTTV_BDEV_BUSY_READING = g_quark_from_string("busy_reading");
4538 LTTV_BDEV_BUSY_WRITING = g_quark_from_string("busy_writing");
4539 }
4540
4541 static void module_destroy()
4542 {
4543 }
4544
4545
4546 LTTV_MODULE("state", "State computation", \
4547 "Update the system state, possibly saving it at intervals", \
4548 module_init, module_destroy)
4549
4550
4551
This page took 0.177775 seconds and 5 git commands to generate.