ltt/branches/poly/lttv/state.c

   1
   2 #include <lttv/state.h>
   3 #include <ltt/facility.h>
   4 #include <ltt/trace.h>
   5
   6 LttvInterruptType
   7   LTTV_STATE_USER_MODE,
   8   LTTV_STATE_SYSCALL,
   9   LTTV_STATE_TRAP,
  10   LTTV_STATE_IRQ;
  11
  12
  13 LttvProcessStatus
  14   LTTV_STATE_UNNAMED,
  15   LTTV_STATE_WAIT_FORK,
  16   LTTV_STATE_WAIT_CPU,
  17   LTTV_STATE_EXIT,
  18   LTTV_STATE_WAIT,
  19   LTTV_STATE_RUN;
  20
  21 static GQuark
  22   LTTV_STATE_HOOKS;
  23
  24 void remove_all_processes(GHashTable *processes);
  25
  26
  27 static void
  28 init(LttvTracesetState *self, LttvTraceset *ts)
  29 {
  30   guint i, j, nb_trace, nb_tracefile;
  31
  32   LttvTraceContext *tc;
  33
  34   LttvTraceState *tcs;
  35
  36   LttvTracefileContext *tfc;
  37
  38   LttvTracefileState *tfcs;
  39
  40   LTTV_TRACESET_CONTEXT_CLASS(g_type_class_peek_parent(LTTV_TRACESET_STATE_GET_CLASS(self)))->init((LttvTracesetContext *)self, ts);
  41
  42   nb_trace = lttv_traceset_number(ts);
  43   for(i = 0 ; i < nb_trace ; i++) {
  44     tcs = (LttvTraceState *)tc = (LTTV_TRACESET_CONTEXT(self)->traces[i]);
  45     tcs->processes = g_hash_table_new(g_direct_hash, g_direct_equal);
  46
  47     nb_tracefile = ltt_trace_control_tracefile_number(tc->t);
  48     for(j = 0 ; j < nb_tracefile ; j++) {
  49       tfcs = (LttvTracefileState *)tfc = tc->control_tracefiles[j];
  50       tfcs->process = NULL;
  51     }
  52
  53     nb_tracefile = ltt_trace_per_cpu_tracefile_number(tc->t);
  54     for(j = 0 ; j < nb_tracefile ; j++) {
  55       tfcs = (LttvTracefileState *)tfc = tc->per_cpu_tracefiles[j];
  56       tfcs->process = NULL;
  57     }
  58   }
  59 }
  60
  61
  62 static void
  63 fini(LttvTracesetState *self)
  64 {
  65   guint i, j, nb_trace, nb_tracefile;
  66
  67   LttvTraceState *tcs;
  68
  69   LttvTracefileState *tfcs;
  70
  71   nb_trace = lttv_traceset_number(LTTV_TRACESET_CONTEXT(self)->ts);
  72   for(i = 0 ; i < nb_trace ; i++) {
  73     tcs = (LttvTraceState *)(LTTV_TRACESET_CONTEXT(self)->traces[i]);
  74     remove_all_processes(tcs->processes);
  75     g_hash_table_destroy(tcs->processes);
  76   }
  77   LTTV_TRACESET_CONTEXT_CLASS(g_type_class_peek_parent(LTTV_TRACESET_STATE_GET_CLASS(self)))->fini((LttvTracesetContext *)self);
  78 }
  79
  80
  81 static LttvTracesetContext *
  82 new_traceset_context(LttvTracesetContext *self)
  83 {
  84   return LTTV_TRACESET_CONTEXT(g_object_new(LTTV_TRACESET_STATE_TYPE, NULL));
  85 }
  86
  87
  88 static LttvTraceContext *
  89 new_trace_context(LttvTracesetContext *self)
  90 {
  91   return LTTV_TRACE_CONTEXT(g_object_new(LTTV_TRACE_STATE_TYPE, NULL));
  92 }
  93
  94
  95 static LttvTracefileContext *
  96 new_tracefile_context(LttvTracesetContext *self)
  97 {
  98   return LTTV_TRACEFILE_CONTEXT(g_object_new(LTTV_TRACEFILE_STATE_TYPE, NULL));
  99 }
 100
 101
 102 static void
 103 traceset_state_instance_init (GTypeInstance *instance, gpointer g_class)
 104 {
 105 }
 106
 107
 108 static void
 109 traceset_state_finalize (LttvTracesetState *self)
 110 {
 111   G_OBJECT_CLASS(g_type_class_peek_parent(g_type_class_peek_parent(LTTV_TRACESET_STATE_GET_CLASS(self))))->finalize(G_OBJECT(self));
 112 }
 113
 114
 115 static void
 116 traceset_state_class_init (LttvTracesetContextClass *klass)
 117 {
 118   GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
 119
 120   gobject_class->finalize = (void (*)(GObject *self)) traceset_state_finalize;
 121   klass->init = (void (*)(LttvTracesetContext *self, LttvTraceset *ts))init;
 122   klass->fini = (void (*)(LttvTracesetContext *self))fini;
 123   klass->new_traceset_context = new_traceset_context;
 124   klass->new_trace_context = new_trace_context;
 125   klass->new_tracefile_context = new_tracefile_context;
 126 }
 127
 128
 129 GType
 130 lttv_traceset_state_get_type(void)
 131 {
 132   static GType type = 0;
 133   if (type == 0) {
 134     static const GTypeInfo info = {
 135       sizeof (LttvTracesetStateClass),
 136       NULL,   /* base_init */
 137       NULL,   /* base_finalize */
 138       (GClassInitFunc) traceset_state_class_init,   /* class_init */
 139       NULL,   /* class_finalize */
 140       NULL,   /* class_data */
 141       sizeof (LttvTracesetContext),
 142       0,      /* n_preallocs */
 143       (GInstanceInitFunc) traceset_state_instance_init    /* instance_init */
 144     };
 145
 146     type = g_type_register_static (LTTV_TRACESET_CONTEXT_TYPE, "LttvTracesetStateType",
 147         &info, 0);
 148   }
 149   return type;
 150 }
 151
 152
 153 static void
 154 trace_state_instance_init (GTypeInstance *instance, gpointer g_class)
 155 {
 156 }
 157
 158
 159 static void
 160 trace_state_finalize (LttvTraceState *self)
 161 {
 162   G_OBJECT_CLASS(g_type_class_peek_parent(g_type_class_peek_parent(LTTV_TRACE_STATE_GET_CLASS(self))))->finalize(G_OBJECT(self));
 163 }
 164
 165
 166 static void
 167 trace_state_class_init (LttvTraceContextClass *klass)
 168 {
 169   GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
 170
 171   gobject_class->finalize = (void (*)(GObject *self)) trace_state_finalize;
 172 }
 173
 174
 175 GType
 176 lttv_trace_state_get_type(void)
 177 {
 178   static GType type = 0;
 179   if (type == 0) {
 180     static const GTypeInfo info = {
 181       sizeof (LttvTraceStateClass),
 182       NULL,   /* base_init */
 183       NULL,   /* base_finalize */
 184       (GClassInitFunc) trace_state_class_init,   /* class_init */
 185       NULL,   /* class_finalize */
 186       NULL,   /* class_data */
 187       sizeof (LttvTraceState),
 188       0,      /* n_preallocs */
 189       (GInstanceInitFunc) trace_state_instance_init    /* instance_init */
 190     };
 191
 192     type = g_type_register_static (LTTV_TRACE_CONTEXT_TYPE,
 193         "LttvTraceStateType", &info, 0);
 194   }
 195   return type;
 196 }
 197
 198
 199 static void
 200 tracefile_state_instance_init (GTypeInstance *instance, gpointer g_class)
 201 {
 202 }
 203
 204
 205 static void
 206 tracefile_state_finalize (LttvTracefileState *self)
 207 {
 208   G_OBJECT_CLASS(g_type_class_peek_parent(g_type_class_peek_parent(LTTV_TRACEFILE_STATE_GET_CLASS(self))))->finalize(G_OBJECT(self));
 209 }
 210
 211
 212 static void
 213 tracefile_state_class_init (LttvTracefileStateClass *klass)
 214 {
 215   GObjectClass *gobject_class = G_OBJECT_CLASS(klass);
 216
 217   gobject_class->finalize = (void (*)(GObject *self)) tracefile_state_finalize;
 218 }
 219
 220
 221 GType
 222 lttv_tracefile_state_get_type(void)
 223 {
 224   static GType type = 0;
 225   if (type == 0) {
 226     static const GTypeInfo info = {
 227       sizeof (LttvTracefileStateClass),
 228       NULL,   /* base_init */
 229       NULL,   /* base_finalize */
 230       (GClassInitFunc) tracefile_state_class_init,   /* class_init */
 231       NULL,   /* class_finalize */
 232       NULL,   /* class_data */
 233       sizeof (LttvTracefileState),
 234       0,      /* n_preallocs */
 235       (GInstanceInitFunc) tracefile_state_instance_init    /* instance_init */
 236     };
 237
 238     type = g_type_register_static (LTTV_TRACEFILE_CONTEXT_TYPE,
 239         "LttvTracefileStateType", &info, 0);
 240   }
 241   return type;
 242 }
 243
 244
 245 struct HookData {
 246   LttField *f1;
 247   LttField *f2;
 248   LttField *f3;
 249 };
 250
 251
 252 struct HookId {
 253   LttvHook h;
 254   guint id;
 255   void *hook_data;
 256   gboolean free_hook_data;
 257 };
 258
 259
 260 static void push_state(LttvTracefileState *tfs, LttvInterruptType t,
 261     guint state_id)
 262 {
 263   LttvInterruptState *intr;
 264
 265   LttvProcessState *process = tfs->process;
 266
 267   guint depth = process->interrupt_stack->len;
 268
 269   g_array_set_size(process->interrupt_stack, depth + 1);
 270   intr = &g_array_index(process->interrupt_stack, LttvInterruptState, depth);
 271   intr->t = t;
 272   intr->n = state_id;
 273   intr->entry = intr->last_change = LTTV_TRACEFILE_CONTEXT(tfs)->timestamp;
 274   intr->s = process->state->s;
 275   process->state = intr;
 276 }
 277
 278
 279 static void pop_state(LttvTracefileState *tfs, LttvInterruptType t)
 280 {
 281   LttvProcessState *process = tfs->process;
 282
 283   guint depth = process->interrupt_stack->len - 1;
 284
 285   g_assert(process->state->t == t);
 286   g_array_remove_index(process->interrupt_stack, depth);
 287   depth--;
 288   process->state = &g_array_index(process->interrupt_stack, LttvInterruptState,
 289       depth);
 290 }
 291
 292
 293 LttvProcessState *create_process(LttvTracefileState *tfs,
 294     LttvProcessState *parent, guint pid)
 295 {
 296   LttvProcessState *process = g_new(LttvProcessState, 1);
 297
 298   LttvInterruptState *intr;
 299
 300   LttvTraceContext *tc;
 301
 302   LttvTraceState *tcs;
 303
 304   LttvTracefileContext *tfc = LTTV_TRACEFILE_CONTEXT(tfs);
 305
 306   tcs = (LttvTraceState *)tc = tfc->t_context;
 307
 308   g_hash_table_insert(tcs->processes, GUINT_TO_POINTER(pid), process);
 309   process->pid = pid;
 310   process->birth = tfc->timestamp;
 311   process->name = LTTV_STATE_UNNAMED;
 312   process->interrupt_stack = g_array_new(FALSE, FALSE,
 313       sizeof(LttvInterruptState));
 314   g_array_set_size(process->interrupt_stack, 1);
 315   intr = process->state = &g_array_index(process->interrupt_stack,
 316       LttvInterruptState, 0);
 317   intr->t = LTTV_STATE_USER_MODE;
 318   intr->n = 0;
 319   intr->entry = tfc->timestamp;
 320   intr->last_change = tfc->timestamp;
 321   intr->s = LTTV_STATE_WAIT_FORK;
 322
 323   return process;
 324 }
 325
 326
 327 LttvProcessState *find_process(LttvTracefileState *tfs, guint pid)
 328 {
 329   LttvTraceState *ts =(LttvTraceState *)LTTV_TRACEFILE_CONTEXT(tfs)->t_context;
 330   LttvProcessState *process = g_hash_table_lookup(ts->processes,
 331       GUINT_TO_POINTER(pid));
 332   if(process == NULL) process = create_process(tfs, NULL, pid);
 333   return process;
 334 }
 335
 336
 337 void exit_process(LttvTracefileState *tfs, LttvProcessState *process)
 338 {
 339   LttvTraceState *ts = LTTV_TRACE_STATE(tfs->parent.t_context);
 340
 341   g_hash_table_remove(ts->processes, GUINT_TO_POINTER(process->pid));
 342   g_array_free(process->interrupt_stack, TRUE);
 343   g_free(process);
 344 }
 345
 346
 347 void free_process_state(gpointer key, gpointer value, gpointer user_data)
 348 {
 349   g_array_free(((LttvProcessState *)value)->interrupt_stack, TRUE);
 350   g_free(value);
 351 }
 352
 353
 354 void remove_all_processes(GHashTable *processes)
 355 {
 356   g_hash_table_foreach(processes, free_process_state, NULL);
 357 }
 358
 359
 360 gboolean syscall_entry(void *hook_data, void *call_data)
 361 {
 362   LttField *f = (LttField *)hook_data;
 363
 364   LttvTracefileState *s = (LttvTracefileState *)call_data;
 365
 366   push_state(s, LTTV_STATE_SYSCALL, ltt_event_get_unsigned(
 367       LTTV_TRACEFILE_CONTEXT(s)->e, f));
 368   return FALSE;
 369 }
 370
 371
 372 gboolean syscall_exit(void *hook_data, void *call_data)
 373 {
 374   LttvTracefileState *s = (LttvTracefileState *)call_data;
 375
 376   pop_state(s, LTTV_STATE_SYSCALL);
 377   return FALSE;
 378 }
 379
 380
 381 gboolean trap_entry(void *hook_data, void *call_data)
 382 {
 383   LttField *f = (LttField *)hook_data;
 384
 385   LttvTracefileState *s = (LttvTracefileState *)call_data;
 386
 387   push_state(s, LTTV_STATE_TRAP, ltt_event_get_unsigned(s->parent.e, f));
 388   return FALSE;
 389 }
 390
 391
 392 gboolean trap_exit(void *hook_data, void *call_data)
 393 {
 394   LttvTracefileState *s = (LttvTracefileState *)call_data;
 395
 396   pop_state(s, LTTV_STATE_TRAP);
 397   return FALSE;
 398 }
 399
 400
 401 gboolean irq_entry(void *hook_data, void *call_data)
 402 {
 403   LttField *f = (LttField *)hook_data;
 404
 405   LttvTracefileState *s = (LttvTracefileState *)call_data;
 406
 407   /* Do something with the info about being in user or system mode when int? */
 408   push_state(s, LTTV_STATE_IRQ, ltt_event_get_unsigned(s->parent.e, f));
 409   return FALSE;
 410 }
 411
 412
 413 gboolean irq_exit(void *hook_data, void *call_data)
 414 {
 415   LttvTracefileState *s = (LttvTracefileState *)call_data;
 416
 417   pop_state(s, LTTV_STATE_IRQ);
 418   return FALSE;
 419 }
 420
 421
 422 gboolean schedchange(void *hook_data, void *call_data)
 423 {
 424   struct HookData *h = (struct HookData *)hook_data;
 425
 426   LttvTracefileState *s = (LttvTracefileState *)call_data;
 427
 428   guint pid_in, pid_out, state_out;
 429
 430   pid_in = ltt_event_get_int(s->parent.e, h->f1);
 431   pid_out = ltt_event_get_int(s->parent.e, h->f2);
 432   state_out = ltt_event_get_int(s->parent.e, h->f3);
 433   if(s->process != NULL) {
 434     if(state_out == 0) s->process->state->s = LTTV_STATE_WAIT_CPU;
 435     else if(s->process->state->s == LTTV_STATE_EXIT)
 436         exit_process(s, s->process);
 437     else s->process->state->s = LTTV_STATE_WAIT;
 438   }
 439   s->process = find_process(s, pid_in);
 440   s->process->state->s = LTTV_STATE_RUN;
 441   return FALSE;
 442 }
 443
 444
 445 gboolean process_fork(void *hook_data, void *call_data)
 446 {
 447   LttField *f = (LttField *)hook_data;
 448
 449   LttvTracefileState *s = (LttvTracefileState *)call_data;
 450
 451   guint child_pid;
 452
 453   child_pid = ltt_event_get_int(s->parent.e, f);
 454   create_process(s, s->process, child_pid);
 455   return FALSE;
 456 }
 457
 458
 459 gboolean process_exit(void *hook_data, void *call_data)
 460 {
 461   LttvTracefileState *s = (LttvTracefileState *)call_data;
 462
 463   if(s->process != NULL) {
 464     s->process->state->s = LTTV_STATE_EXIT;
 465   }
 466   return FALSE;
 467 }
 468
 469
 470 static LttField *
 471 find_field(LttEventType *et, const char *field)
 472 {
 473   LttType *t;
 474
 475   LttField *f;
 476
 477   guint i, nb;
 478
 479   char *name;
 480
 481   if(field == NULL) return NULL;
 482
 483   f = ltt_eventtype_field(et);
 484   t = ltt_eventtype_type(et);
 485   g_assert(ltt_type_class(t) == LTT_STRUCT);
 486   nb = ltt_type_member_number(t);
 487   for(i = 0 ; i < nb ; i++) {
 488     ltt_type_member_type(t, i, &name);
 489     if(strcmp(name, field) == 0) break;
 490   }
 491   g_assert(i < nb);
 492   return ltt_field_member(f, i);
 493 }
 494
 495
 496 static struct HookId
 497 find_hook(LttTrace *t, char *facility, char *event,
 498     char *field1, char *field2, char *field3, LttvHook h)
 499 {
 500   LttFacility *f;
 501
 502   LttEventType *et;
 503
 504   guint nb, pos, i;
 505
 506   struct HookId hook_id;
 507
 508   struct HookData hook_data, *phook_data;
 509
 510   char *name;
 511
 512   nb = ltt_trace_facility_find(t, facility, &pos);
 513   if(nb < 1) g_error("No %s facility", facility);
 514   f = ltt_trace_facility_get(t, pos);
 515   et = ltt_facility_eventtype_get_by_name(f, event);
 516   if(et == NULL) g_error("Event %s does not exist", event);
 517
 518   hook_id.id = ltt_eventtype_id(et);
 519   hook_id.h = h;
 520   hook_id.free_hook_data = FALSE;
 521   hook_data.f1 = find_field(et, field1);
 522   hook_data.f2 = find_field(et, field2);
 523   hook_data.f3 = find_field(et, field3);
 524   if(hook_data.f1 == NULL) hook_id.hook_data = NULL;
 525   else if(hook_data.f2 == NULL) hook_id.hook_data = hook_data.f1;
 526   else {
 527     phook_data = g_new(struct HookData, 1);
 528     *phook_data = hook_data;
 529     hook_id.hook_data = phook_data;
 530     hook_id.free_hook_data = TRUE;
 531   }
 532   return hook_id;
 533 }
 534
 535
 536 lttv_state_add_event_hooks(LttvTracesetState *self)
 537 {
 538   LttvTraceset *traceset = self->parent.ts;
 539
 540   guint i, j, k, nb_trace, nb_control, nb_per_cpu, nb_tracefile;
 541
 542   LttFacility *f;
 543
 544   LttEventType *et;
 545
 546   LttvTraceState *ts;
 547
 548   LttvTracefileState *tfs;
 549
 550   void *hook_data;
 551
 552   GArray *hooks;
 553
 554   struct HookId hook_id;
 555
 556   LttvAttributeValue val;
 557
 558   nb_trace = lttv_traceset_number(traceset);
 559   for(i = 0 ; i < nb_trace ; i++) {
 560     ts = (LttvTraceState *)self->parent.traces[i];
 561
 562     /* Find the eventtype id for the following events and register the
 563        associated by id hooks. */
 564
 565     hooks = g_array_new(FALSE, FALSE, sizeof(struct HookId));
 566     hook_id = find_hook(ts->parent.t, "core","syscall_entry","syscall_id",
 567                         NULL, NULL, syscall_entry);
 568     g_array_append_val(hooks, hook_id);
 569
 570     hook_id = find_hook(ts->parent.t, "core", "syscall_exit",
 571                         NULL, NULL, NULL, syscall_exit);
 572     g_array_append_val(hooks, hook_id);
 573
 574     hook_id = find_hook(ts->parent.t, "core", "trap_entry", "trap_id",
 575                         NULL, NULL, trap_entry);
 576     g_array_append_val(hooks, hook_id);
 577
 578     hook_id = find_hook(ts->parent.t, "core", "trap_exit", NULL, NULL,
 579                         NULL, trap_exit);
 580     g_array_append_val(hooks, hook_id);
 581
 582     hook_id = find_hook(ts->parent.t, "core", "irq_entry", "irq_id",
 583                         NULL, NULL, irq_entry);
 584     g_array_append_val(hooks, hook_id);
 585
 586     hook_id = find_hook(ts->parent.t, "core", "irq_exit", NULL, NULL,
 587                         NULL, irq_exit);
 588     g_array_append_val(hooks, hook_id);
 589
 590     hook_id = find_hook(ts->parent.t, "core", "schedchange",
 591                         "in", "out", "out_state", schedchange);
 592     g_array_append_val(hooks, hook_id);
 593
 594 /* for now, in core facility there is no process_fork and process_exit event
 595     hook_id = find_hook(ts->parent.t, "core", "process_fork",
 596                         "child_pid", NULL, NULL, process_fork);
 597     g_array_append_val(hooks, hook_id);
 598
 599     hook_id = find_hook(ts->parent.t, "core", "process_exit",
 600                         NULL, NULL, NULL, process_exit);
 601     g_array_append_val(hooks, hook_id);
 602 */
 603
 604     /* Add these hooks to each before_event_by_id hooks list */
 605
 606     nb_control = ltt_trace_control_tracefile_number(ts->parent.t);
 607     nb_per_cpu = ltt_trace_per_cpu_tracefile_number(ts->parent.t);
 608     nb_tracefile = nb_control + nb_per_cpu;
 609     for(j = 0 ; j < nb_tracefile ; j++) {
 610       if(j < nb_control) {
 611         tfs = LTTV_TRACEFILE_STATE(ts->parent.control_tracefiles[j]);
 612       }
 613       else {
 614         tfs = LTTV_TRACEFILE_STATE(ts->parent.per_cpu_tracefiles[j-nb_control]);
 615       }
 616
 617       for(k = 0 ; k < hooks->len ; k++) {
 618         hook_id = g_array_index(hooks, struct HookId, k);
 619         lttv_hooks_add(lttv_hooks_by_id_find(tfs->parent.before_event_by_id,
 620           hook_id.id), hook_id.h, hook_id.hook_data);
 621       }
 622     }
 623     lttv_attribute_find(self->parent.a, LTTV_STATE_HOOKS, LTTV_POINTER, &val);
 624     *(val.v_pointer) = hooks;
 625   }
 626 }
 627
 628
 629 lttv_state_remove_event_hooks(LttvTracesetState *self)
 630 {
 631   LttvTraceset *traceset = self->parent.ts;
 632
 633   guint i, j, k, nb_trace, nb_control, nb_per_cpu, nb_tracefile;
 634
 635   LttvTraceState *ts;
 636
 637   LttvTracefileState *tfs;
 638
 639   void *hook_data;
 640
 641   GArray *hooks;
 642
 643   struct HookId hook_id;
 644
 645   LttvAttributeValue val;
 646
 647   nb_trace = lttv_traceset_number(traceset);
 648   for(i = 0 ; i < nb_trace ; i++) {
 649     ts = LTTV_TRACE_STATE(self->parent.traces[i]);
 650     lttv_attribute_find(self->parent.a, LTTV_STATE_HOOKS, LTTV_POINTER, &val);
 651     hooks = *(val.v_pointer);
 652
 653     /* Add these hooks to each before_event_by_id hooks list */
 654
 655     nb_control = ltt_trace_control_tracefile_number(ts->parent.t);
 656     nb_per_cpu = ltt_trace_per_cpu_tracefile_number(ts->parent.t);
 657     nb_tracefile = nb_control + nb_per_cpu;
 658     for(j = 0 ; j < nb_tracefile ; j++) {
 659       if(j < nb_control) {
 660         tfs = LTTV_TRACEFILE_STATE(ts->parent.control_tracefiles[j]);
 661       }
 662       else {
 663         tfs = LTTV_TRACEFILE_STATE(ts->parent.per_cpu_tracefiles[j-nb_control]);
 664       }
 665
 666       for(k = 0 ; k < hooks->len ; k++) {
 667         hook_id = g_array_index(hooks, struct HookId, k);
 668         lttv_hooks_remove_data(
 669             lttv_hooks_by_id_find(tfs->parent.before_event_by_id,
 670             hook_id.id), hook_id.h, hook_id.hook_data);
 671         if(hook_id.free_hook_data) g_free(hook_id.hook_data);
 672       }
 673       //      for(k = 0 ; k < hooks->len ; k++) {
 674       //        hook_id = g_array_index(hooks, struct HookId, k);
 675       //        if(hook_id.free_hook_data) g_free(hook_id.hook_data);
 676       //      }
 677     }
 678     g_array_free(hooks, TRUE);
 679   }
 680 }
 681
 682
 683 void lttv_state_init(int argc, char **argv)
 684 {
 685   LTTV_STATE_UNNAMED = g_quark_from_string("unnamed");
 686   LTTV_STATE_USER_MODE = g_quark_from_string("user mode");
 687   LTTV_STATE_WAIT_FORK = g_quark_from_string("wait fork");
 688   LTTV_STATE_SYSCALL = g_quark_from_string("system call");
 689   LTTV_STATE_TRAP = g_quark_from_string("trap");
 690   LTTV_STATE_IRQ = g_quark_from_string("irq");
 691   LTTV_STATE_WAIT_CPU = g_quark_from_string("wait for cpu");
 692   LTTV_STATE_EXIT = g_quark_from_string("exiting");
 693   LTTV_STATE_WAIT = g_quark_from_string("wait for I/O");
 694   LTTV_STATE_RUN = g_quark_from_string("running");
 695   LTTV_STATE_HOOKS = g_quark_from_string("saved state hooks");
 696 }
 697
 698 void lttv_state_destroy()
 699 {
 700 }
 701
 702
 703
 704