1 /* This file is part of the Linux Trace Toolkit Graphic User Interface
2 * Copyright (C) 2003-2004 Mathieu Desnoyers
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;
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.
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,
19 /* This file is the API used to launch any background computation on a trace */
21 /* Here is the implementation of the API */
27 #include <sys/types.h>
34 #include <lttv/lttv.h>
35 #include <lttv/traceset.h>
36 #include <lttv/attribute.h>
37 #include <lttvwindow/lttvwindowtraces.h>
38 #include <lttvwindow/lttvwindow.h> // for CHUNK_NUM_EVENTS
39 #include <lttvwindow/mainwindow-private.h> /* for main window structure */
41 extern GSList
* g_main_window_list
;
43 typedef struct _BackgroundRequest
{
44 LttvAttributeName module_name
; /* Hook path in global attributes,
45 where all standard hooks under computation/.
47 LttvTrace
*trace
; /* trace concerned */
48 GtkWidget
*dialog
; /* Dialog linked with the request, may be NULL */
49 GtkWidget
*parent_window
; /* Parent window the dialog must be transient for */
52 typedef struct _BackgroundNotify
{
54 LttvTrace
*trace
; /* trace */
56 LttvTracesetPosition
*notify_position
;
57 LttvHooks
*notify
; /* Hook to call when the notify is
58 passed, or at the end of trace */
64 gboolean
lttvwindowtraces_process_pending_requests(LttvTrace
*trace
);
66 /* Get a trace by its path name.
68 * @param path path of the trace on the virtual file system.
69 * @return Pointer to trace if found
70 * NULL is returned if the trace is not present
73 __EXPORT LttvTrace
*lttvwindowtraces_get_trace_by_name(gchar
*path
)
78 for(i
=0;i
<lttvwindowtraces_get_number();i
++) {
79 LttvTrace
*trace_v
= lttvwindowtraces_get_trace(i
);
82 g_assert(trace_v
!= NULL
);
84 trace
= lttv_trace(trace_v
);
85 g_assert(trace
!= NULL
);
86 name
= g_quark_to_string(ltt_trace_name(trace
));
88 if(strcmp(name
, path
) == 0) {
97 /* Get a trace by its number identifier */
99 __EXPORT LttvTrace
*lttvwindowtraces_get_trace(guint num
)
101 LttvAttribute
*g_attribute
= lttv_global_attributes();
102 LttvAttribute
*attribute
;
103 LttvAttributeType type
;
104 LttvAttributeName name
;
105 LttvAttributeValue value
;
109 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
113 type
= lttv_iattribute_get(LTTV_IATTRIBUTE(attribute
), num
, &name
, &value
,
116 if(type
== LTTV_POINTER
) {
117 return (LttvTrace
*)*(value
.v_pointer
);
123 /* Total number of traces */
125 __EXPORT guint
lttvwindowtraces_get_number()
127 LttvAttribute
*g_attribute
= lttv_global_attributes();
128 LttvAttribute
*attribute
;
131 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
135 return ( lttv_iattribute_get_number(LTTV_IATTRIBUTE(attribute
)) );
138 /* Add a trace to the global attributes */
140 void lttvwindowtraces_add_trace(LttvTrace
*trace
)
143 LttvAttribute
*attribute
;
146 LttvAttribute
*g_attribute
= lttv_global_attributes();
148 gchar attribute_path
[PATH_MAX
];
151 if(stat(g_quark_to_string(ltt_trace_name(lttv_trace(trace
))), &buf
)) {
152 g_warning("lttvwindowtraces_add_trace: Trace %s not found",
153 g_quark_to_string(ltt_trace_name(lttv_trace(trace
))));
156 result
= snprintf(attribute_path
, PATH_MAX
, "%" PRIu64
":%" PRIu64
,
157 buf
.st_dev
, buf
.st_ino
);
158 g_assert(result
>= 0);
161 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
165 value
= lttv_attribute_add(attribute
,
166 g_quark_from_string(attribute_path
),
169 *(value
.v_pointer
) = (gpointer
)trace
;
171 /* create new traceset and tracesetcontext */
173 LttvTracesetStats
*tss
;
174 //LttvTracesetContextPosition *sync_position;
176 attribute
= lttv_trace_attribute(trace
);
177 result_b
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
178 LTTV_COMPUTATION_TRACESET
,
183 ts
= lttv_traceset_new();
184 *(value
.v_pointer
) = ts
;
186 lttv_traceset_add(ts
,trace
);
188 result_b
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
189 LTTV_COMPUTATION_TRACESET_CONTEXT
,
194 tss
= g_object_new(LTTV_TRACESET_STATS_TYPE
, NULL
);
195 *(value
.v_pointer
) = tss
;
197 lttv_context_init(LTTV_TRACESET_CONTEXT(tss
), ts
);
200 result_b
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
201 LTTV_COMPUTATION_SYNC_POSITION
,
206 sync_position
= lttv_traceset_context_position_new();
207 *(value
.v_pointer
) = sync_position
;
209 lttv_attribute_add(attribute
,
213 lttv_attribute_add(attribute
,
214 LTTV_REQUESTS_CURRENT
,
217 lttv_attribute_add(attribute
,
221 lttv_attribute_add(attribute
,
226 /* Remove a trace from the global attributes */
228 void lttvwindowtraces_remove_trace(LttvTrace
*trace
)
230 LttvAttribute
*g_attribute
= lttv_global_attributes();
231 LttvAttribute
*attribute
;
232 LttvAttributeValue value
;
237 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
241 for(i
=0;i
<lttvwindowtraces_get_number();i
++) {
242 LttvTrace
*trace_v
= lttvwindowtraces_get_trace(i
);
244 g_assert(trace_v
!= NULL
);
246 /* Remove and background computation that could be in progress */
247 g_idle_remove_by_data(trace_v
);
249 if(trace_v
== trace
) {
251 LttvAttribute
*l_attribute
;
253 /* destroy traceset and tracesetcontext */
255 //LttvTracesetContextPosition *sync_position;
257 l_attribute
= lttv_trace_attribute(trace
);
260 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
261 LTTV_REQUESTS_QUEUE
);
263 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
264 LTTV_REQUESTS_CURRENT
);
266 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
269 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
270 LTTV_NOTIFY_CURRENT
);
272 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(l_attribute
),
273 LTTV_COMPUTATION_TRACESET
,
278 ts
= (LttvTraceset
*)*(value
.v_pointer
);
280 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(l_attribute
),
281 LTTV_COMPUTATION_SYNC_POSITION
,
286 sync_position
= (LttvTracesetContextPosition
*)*(value
.v_pointer
);
287 lttv_traceset_context_position_destroy(sync_position
);
289 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
290 LTTV_COMPUTATION_SYNC_POSITION
);
293 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(l_attribute
),
294 LTTV_COMPUTATION_TRACESET_CONTEXT
,
299 tss
= (LttvTracesetStats
*)*(value
.v_pointer
);
301 lttv_context_fini(LTTV_TRACESET_CONTEXT(tss
));
303 #endif /* BABEL_CLEANUP */
304 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
305 LTTV_COMPUTATION_TRACESET_CONTEXT
);
306 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
307 LTTV_COMPUTATION_TRACESET
);
308 /* Destroy the traceset and the trace also */
309 lttv_traceset_destroy(ts
);
311 /* finally, remove the global attribute */
312 lttv_attribute_remove(attribute
, i
);
319 static void destroy_dialog(BackgroundRequest
*bg_req
)
321 gtk_widget_destroy(bg_req
->dialog
);
322 bg_req
->dialog
= NULL
;
327 * Function to request data from a specific trace
329 * The memory allocated for the request will be managed by the API.
331 * @param widget the current Window
332 * @param trace the trace to compute
333 * @param module_name the name of the module which registered global computation
337 __EXPORT
void lttvwindowtraces_background_request_queue
338 (GtkWidget
*widget
, LttvTrace
*trace
, gchar
*module_name
)
340 BackgroundRequest
*bg_req
;
341 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
342 LttvAttribute
*g_attribute
= lttv_global_attributes();
343 LttvAttribute
*module_attribute
;
344 LttvAttributeValue value
;
345 LttvAttributeType type
;
349 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
355 slist
= (GSList
**)(value
.v_pointer
);
357 /* Verify that the calculator is loaded */
359 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
361 g_assert(module_attribute
);
363 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
364 g_quark_from_string(module_name
),
366 if(type
== LTTV_NONE
) {
367 g_critical("Missing background calculator %s", module_name
);
371 bg_req
= g_new(BackgroundRequest
,1);
372 bg_req
->module_name
= g_quark_from_string(module_name
);
373 bg_req
->trace
= trace
;
375 *slist
= g_slist_append(*slist
, bg_req
);
377 /* Priority lower than live servicing */
378 g_idle_remove_by_data(trace
);
379 g_idle_add_full((G_PRIORITY_HIGH_IDLE
+ 23),
380 (GSourceFunc
)lttvwindowtraces_process_pending_requests
,
383 /* FIXME : show message in status bar, need context and message id */
384 g_info("Background computation for %s started for trace %p", module_name
,
387 gtk_message_dialog_new(
389 GTK_DIALOG_DESTROY_WITH_PARENT
,
390 GTK_MESSAGE_INFO
, GTK_BUTTONS_OK
,
391 "Background computation for %s started for trace %s",
393 trace
->traceset
->filename
);
394 gtk_window_set_transient_for(GTK_WINDOW(dialog
), GTK_WINDOW(widget
));
395 g_signal_connect_swapped (dialog
, "response",
396 G_CALLBACK (destroy_dialog
),
398 bg_req
->dialog
= dialog
;
399 /* the parent window might vanish : only use this pointer for a
400 * comparison with existing windows */
401 bg_req
->parent_window
= gtk_widget_get_toplevel(widget
);
402 gtk_widget_show(dialog
);
406 * Remove a background request from a trace.
408 * This should ONLY be used by the modules which registered the global hooks
409 * (module_name). If this is called by the viewers, it may lead to incomplete
410 * and incoherent background processing information.
412 * Even if the module which deals with the hooks removes the background
413 * requests, it may cause a problem if the module gets loaded again in the
414 * session : the data will be partially calculated. The calculation function
415 * must deal with this case correctly.
417 * @param trace the trace to compute
418 * @param module_name the name of the module which registered global computation
422 void lttvwindowtraces_background_request_remove
423 (LttvTrace
*trace
, gchar
*module_name
)
425 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
426 LttvAttributeValue value
;
431 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
437 slist
= (GSList
**)(value
.v_pointer
);
439 for(iter
=*slist
;iter
!=NULL
;) {
440 BackgroundRequest
*bg_req
=
441 (BackgroundRequest
*)iter
->data
;
443 if(bg_req
->module_name
== g_quark_from_string(module_name
)) {
444 GSList
*rem_iter
= iter
;
445 iter
=g_slist_next(iter
);
447 *slist
= g_slist_delete_link(*slist
, rem_iter
);
449 iter
=g_slist_next(iter
);
455 * Find a background request in a trace
459 __EXPORT gboolean lttvwindowtraces_background_request_find
460 (LttvTrace
*trace
, gchar
*module_name
)
462 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
463 LttvAttributeValue value
;
468 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
474 slist
= (GSList
**)(value
.v_pointer
);
476 for(iter
=*slist
;iter
!=NULL
;) {
477 BackgroundRequest
*bg_req
=
478 (BackgroundRequest
*)iter
->data
;
480 if(bg_req
->module_name
== g_quark_from_string(module_name
)) {
483 iter
=g_slist_next(iter
);
490 * Register a callback to be called when requested data is passed in the next
491 * queued background processing.
493 * @param owner owner of the background notification
494 * @param trace the trace computed
495 * @param notify_time time when notification hooks must be called
496 * @param notify_position position when notification hooks must be called
497 * @param notify Hook to call when the notify position is passed
500 __EXPORT
void lttvwindowtraces_background_notify_queue
504 const LttvTracesetPosition
*notify_position
,
505 const LttvHooks
*notify
)
508 BackgroundNotify
*bg_notify
;
509 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
510 LttvAttributeValue value
;
514 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
520 slist
= (GSList
**)(value
.v_pointer
);
522 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
523 LTTV_COMPUTATION_TRACESET_CONTEXT
,
528 LttvTraceset
*ts
= (LttvTraceset
)(value
.v_pointer
);
530 bg_notify
= g_new(BackgroundNotify
,1);
532 bg_notify
->owner
= owner
;
533 bg_notify
->trace
= trace
;
534 bg_notify
->notify_time
= notify_time
;
535 if(notify_position
!= NULL
) {
536 bg_notify
->notify_position
= lttv_traceset_context_position_new(tsc
);
537 lttv_traceset_context_position_copy(bg_notify
->notify_position
,
540 bg_notify
->notify_position
= NULL
;
543 bg_notify
->notify
= lttv_hooks_new();
544 lttv_hooks_add_list(bg_notify
->notify
, notify
);
546 *slist
= g_slist_append(*slist
, bg_notify
);
547 #endif /* BABEL_CLEANUP*/
551 * Register a callback to be called when requested data is passed in the current
552 * background processing.
554 * @param owner owner of the background notification
555 * @param trace the trace computed
556 * @param notify_time time when notification hooks must be called
557 * @param notify_position position when notification hooks must be called
558 * @param notify Hook to call when the notify position is passed
561 __EXPORT
void lttvwindowtraces_background_notify_current
565 const LttvTracesetPosition
*notify_position
,
566 const LttvHooks
*notify
)
569 BackgroundNotify
*bg_notify
;
570 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
571 LttvAttributeValue value
;
575 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
581 slist
= (GSList
**)(value
.v_pointer
);
583 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
584 LTTV_COMPUTATION_TRACESET_CONTEXT
,
589 LttvTracesetContext
*tsc
= (LttvTracesetContext
*)(value
.v_pointer
);
592 bg_notify
= g_new(BackgroundNotify
,1);
594 bg_notify
->owner
= owner
;
595 bg_notify
->trace
= trace
;
596 bg_notify
->notify_time
= notify_time
;
597 if(notify_position
!= NULL
) {
598 bg_notify
->notify_position
= lttv_traceset_context_position_new(tsc
);
599 lttv_traceset_context_position_copy(bg_notify
->notify_position
,
602 bg_notify
->notify_position
= NULL
;
604 bg_notify
->notify
= lttv_hooks_new();
605 lttv_hooks_add_list(bg_notify
->notify
, notify
);
607 *slist
= g_slist_append(*slist
, bg_notify
);
608 #endif /* BABEL_CLEANUP */
612 static void notify_request_free(BackgroundNotify
*notify_req
)
615 if(notify_req
== NULL
) return;
617 if(notify_req
->notify_position
!= NULL
)
618 lttv_traceset_context_position_destroy(notify_req
->notify_position
);
619 if(notify_req
->notify
!= NULL
)
620 lttv_hooks_destroy(notify_req
->notify
);
622 #endif /* BABEL_CLEANUP */
626 * Removes all the notifications requests from a specific viewer.
628 * @param owner owner of the background notification
631 __EXPORT
void lttvwindowtraces_background_notify_remove(gpointer owner
)
635 for(i
=0;i
<lttvwindowtraces_get_number();i
++) {
636 LttvAttribute
*attribute
;
637 LttvAttributeValue value
;
638 LttvTrace
*trace_v
= lttvwindowtraces_get_trace(i
);
643 g_assert(trace_v
!= NULL
);
645 attribute
= lttv_trace_attribute(trace_v
);
647 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
653 slist
= (GSList
**)(value
.v_pointer
);
655 for(iter
=*slist
;iter
!=NULL
;) {
657 BackgroundNotify
*bg_notify
= (BackgroundNotify
*)iter
->data
;
659 if(bg_notify
->owner
== owner
) {
660 GSList
*rem_iter
= iter
;
661 iter
=g_slist_next(iter
);
662 notify_request_free(bg_notify
);
663 *slist
= g_slist_remove_link(*slist
, rem_iter
);
665 iter
=g_slist_next(iter
);
669 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
675 slist
= (GSList
**)(value
.v_pointer
);
677 for(iter
=*slist
;iter
!=NULL
;) {
679 BackgroundNotify
*bg_notify
= (BackgroundNotify
*)iter
->data
;
681 if(bg_notify
->owner
== owner
) {
682 GSList
*rem_iter
= iter
;
683 iter
=g_slist_next(iter
);
684 notify_request_free(bg_notify
);
685 *slist
= g_slist_remove_link(*slist
, rem_iter
);
687 iter
=g_slist_next(iter
);
694 /* Background processing helper functions */
696 void lttvwindowtraces_add_computation_hooks(LttvAttributeName module_name
,
698 LttvHooks
*hook_adder
)
701 LttvAttribute
*g_attribute
= lttv_global_attributes();
702 LttvAttribute
*module_attribute
;
703 LttvAttributeType type
;
704 LttvAttributeValue value
;
708 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
710 g_assert(module_attribute
);
713 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
714 LTTV_IATTRIBUTE(module_attribute
),
716 g_assert(module_attribute
);
718 /* Call the module's hook adder */
719 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
722 if(type
== LTTV_POINTER
) {
723 //lttv_hooks_call((LttvHooks*)*(value.v_pointer), (gpointer)tss);
724 if(hook_adder
!= NULL
)
725 lttv_hooks_add_list(hook_adder
, (LttvHooks
*)*(value
.v_pointer
));
727 #endif /* BABEL_CLEANUP */
730 void lttvwindowtraces_remove_computation_hooks(LttvAttributeName module_name
,
732 LttvHooks
*hook_remover
)
735 LttvAttribute
*g_attribute
= lttv_global_attributes();
736 LttvAttribute
*module_attribute
;
737 LttvAttributeType type
;
738 LttvAttributeValue value
;
741 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
743 g_assert(module_attribute
);
746 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
747 LTTV_IATTRIBUTE(module_attribute
),
749 g_assert(module_attribute
);
751 /* Call the module's hook remover */
752 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
755 if(type
== LTTV_POINTER
) {
756 //lttv_hooks_call((LttvHooks*)*(value.v_pointer), (gpointer)tss);
757 if(hook_remover
!= NULL
)
758 lttv_hooks_add_list(hook_remover
, (LttvHooks
*)*(value
.v_pointer
));
760 #endif /* BABEL_CLEANUP */
763 void lttvwindowtraces_call_before_chunk(LttvAttributeName module_name
,
767 LttvAttribute
*g_attribute
= lttv_global_attributes();
768 LttvAttribute
*module_attribute
;
769 LttvAttributeType type
;
770 LttvAttributeValue value
;
771 LttvHooks
*before_chunk_traceset
=NULL
;
772 LttvHooks
*before_chunk_trace
=NULL
;
773 LttvHooks
*before_chunk_tracefile
=NULL
;
774 LttvHooks
*event_hook
=NULL
;
775 LttvHooksByIdChannelArray
*event_hook_by_id_channel
=NULL
;
779 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
781 g_assert(module_attribute
);
784 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
785 LTTV_IATTRIBUTE(module_attribute
),
787 g_assert(module_attribute
);
789 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
790 LTTV_BEFORE_CHUNK_TRACESET
,
792 if(type
== LTTV_POINTER
) {
793 before_chunk_traceset
= (LttvHooks
*)*(value
.v_pointer
);
796 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
797 LTTV_BEFORE_CHUNK_TRACE
,
799 if(type
== LTTV_POINTER
) {
800 before_chunk_trace
= (LttvHooks
*)*(value
.v_pointer
);
803 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
804 LTTV_BEFORE_CHUNK_TRACEFILE
,
806 if(type
== LTTV_POINTER
) {
807 before_chunk_tracefile
= (LttvHooks
*)*(value
.v_pointer
);
810 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
813 if(type
== LTTV_POINTER
) {
814 event_hook
= (LttvHooks
*)*(value
.v_pointer
);
817 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
818 LTTV_EVENT_HOOK_BY_ID_CHANNEL
,
820 if(type
== LTTV_POINTER
) {
821 event_hook_by_id_channel
= (LttvHooksByIdChannelArray
*)*(value
.v_pointer
);
824 lttv_process_traceset_begin(tsc
,
825 before_chunk_traceset
,
827 before_chunk_tracefile
,
829 event_hook_by_id_channel
);
830 #endif /* BABEL_CLEANUP */
835 void lttvwindowtraces_call_after_chunk(LttvAttributeName module_name
,
838 LttvAttribute
*g_attribute
= lttv_global_attributes();
839 LttvAttribute
*module_attribute
;
840 LttvAttributeType type
;
841 LttvAttributeValue value
;
842 LttvHooks
*after_chunk_traceset
=NULL
;
843 LttvHooks
*after_chunk_trace
=NULL
;
844 LttvHooks
*after_chunk_tracefile
=NULL
;
845 LttvHooks
*event_hook
=NULL
;
848 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
850 g_assert(module_attribute
);
853 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
854 LTTV_IATTRIBUTE(module_attribute
),
856 g_assert(module_attribute
);
858 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
859 LTTV_AFTER_CHUNK_TRACESET
,
861 if(type
== LTTV_POINTER
) {
862 after_chunk_traceset
= (LttvHooks
*)*(value
.v_pointer
);
865 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
866 LTTV_AFTER_CHUNK_TRACE
,
868 if(type
== LTTV_POINTER
) {
869 after_chunk_trace
= (LttvHooks
*)*(value
.v_pointer
);
872 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
873 LTTV_AFTER_CHUNK_TRACEFILE
,
875 if(type
== LTTV_POINTER
) {
876 after_chunk_tracefile
= (LttvHooks
*)*(value
.v_pointer
);
879 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
882 if(type
== LTTV_POINTER
) {
883 event_hook
= (LttvHooks
*)*(value
.v_pointer
);
886 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
887 LTTV_EVENT_HOOK_BY_ID_CHANNEL
,
890 lttv_process_traceset_end(tsc
,
891 after_chunk_traceset
,
893 after_chunk_tracefile
,
895 #endif /* BABEL_CLEANUP*/
900 void lttvwindowtraces_set_in_progress(LttvAttributeName module_name
,
903 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
906 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
910 lttv_iattribute_add(LTTV_IATTRIBUTE(attribute
),
913 /* the value is left unset. The only presence of the attribute is necessary.
917 void lttvwindowtraces_unset_in_progress(LttvAttributeName module_name
,
920 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
923 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
927 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
931 __EXPORT gboolean
lttvwindowtraces_get_in_progress(LttvAttributeName module_name
,
934 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
935 LttvAttributeType type
;
936 LttvAttributeValue value
;
939 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
943 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
946 /* The only presence of the attribute is necessary. */
947 if(type
== LTTV_NONE
)
953 void lttvwindowtraces_set_ready(LttvAttributeName module_name
,
956 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
959 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
963 lttv_iattribute_add(LTTV_IATTRIBUTE(attribute
),
966 /* the value is left unset. The only presence of the attribute is necessary.
970 void lttvwindowtraces_unset_ready(LttvAttributeName module_name
,
973 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
976 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
980 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
984 __EXPORT gboolean
lttvwindowtraces_get_ready(LttvAttributeName module_name
,
987 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
988 LttvAttributeType type
;
989 LttvAttributeValue value
;
992 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
996 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
999 /* The only presence of the attribute is necessary. */
1000 if(type
== LTTV_NONE
)
1005 #ifdef BABEL_CLEANUP
1006 static gint
find_window_widget(MainWindow
*a
, GtkWidget
*b
)
1008 if(a
->mwindow
== b
) return 0;
1013 /* lttvwindowtraces_process_pending_requests
1015 * Process the pending background computation requests
1017 * This internal function gets called by g_idle, taking care of the pending
1023 gboolean
lttvwindowtraces_process_pending_requests(LttvTrace
*trace
)
1025 LttvAttribute
*attribute
;
1026 LttvAttribute
*g_attribute
= lttv_global_attributes();
1027 GSList
**list_out
, **list_in
, **notify_in
, **notify_out
;
1028 LttvAttributeValue value
;
1029 LttvAttributeType type
;
1035 if(lttvwindow_preempt_count
> 0) return TRUE
;
1037 attribute
= lttv_trace_attribute(trace
);
1039 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1040 LTTV_REQUESTS_QUEUE
,
1042 g_assert(type
== LTTV_POINTER
);
1043 list_out
= (GSList
**)(value
.v_pointer
);
1045 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1046 LTTV_REQUESTS_CURRENT
,
1048 g_assert(type
== LTTV_POINTER
);
1049 list_in
= (GSList
**)(value
.v_pointer
);
1051 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1054 g_assert(type
== LTTV_POINTER
);
1055 notify_out
= (GSList
**)(value
.v_pointer
);
1057 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1058 LTTV_NOTIFY_CURRENT
,
1060 g_assert(type
== LTTV_POINTER
);
1061 notify_in
= (GSList
**)(value
.v_pointer
);
1063 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1064 LTTV_COMPUTATION_TRACESET
,
1066 g_assert(type
== LTTV_POINTER
);
1067 #ifdef BABEL_CLEANUP
1068 ts
= (LttvTraceset
*)*(value
.v_pointer
);
1071 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1072 LTTV_COMPUTATION_SYNC_POSITION
,
1074 g_assert(type
== LTTV_POINTER
);
1075 sync_position
= (LttvTracesetContextPosition
*)*(value
.v_pointer
);
1077 #ifdef BABEL_CLEANUP
1078 /* There is no events requests pending : we should never have been called! */
1079 g_assert(g_slist_length(*list_out
) != 0 || g_slist_length(*list_in
) != 0);
1080 /* 0.1 Lock traces */
1085 iter_trace
<lttv_traceset_number(ts
->ts
);
1087 LttvTrace
*trace_v
= lttv_traceset_get(ts
->ts
,iter_trace
);
1089 if(lttvwindowtraces_lock(trace_v
) != 0)
1090 return TRUE
; /* Cannot get trace lock, try later */
1094 /* 0.2 Sync tracefiles */
1095 //g_assert(lttv_process_traceset_seek_position(tsc, sync_position) == 0);
1096 lttv_process_traceset_synchronize_tracefiles(tsc
);
1097 /* 1. Before processing */
1099 /* if list_in is empty */
1100 if(g_slist_length(*list_in
) == 0) {
1103 /* - Add all requests in list_out to list_in, empty list_out */
1104 GSList
*iter
= *list_out
;
1106 while(iter
!= NULL
) {
1107 gboolean remove
= FALSE
;
1108 gboolean free_data
= FALSE
;
1110 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1114 *list_in
= g_slist_append(*list_in
, bg_req
);
1119 GSList
*remove_iter
= iter
;
1121 iter
= g_slist_next(iter
);
1122 if(free_data
) g_free(remove_iter
->data
);
1123 *list_out
= g_slist_remove_link(*list_out
, remove_iter
);
1124 } else { // not remove
1125 iter
= g_slist_next(iter
);
1131 GSList
*iter
= *list_in
;
1132 /* - for each request in list_in */
1133 while(iter
!= NULL
) {
1135 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1136 /* - set hooks'in_progress flag to TRUE */
1137 lttvwindowtraces_set_in_progress(bg_req
->module_name
,
1140 /* - call before request hook */
1141 /* Get before request hook */
1142 LttvAttribute
*module_attribute
;
1145 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
1146 LTTV_IATTRIBUTE(g_attribute
),
1148 g_assert(module_attribute
);
1151 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
1152 LTTV_IATTRIBUTE(module_attribute
),
1153 bg_req
->module_name
));
1154 g_assert(module_attribute
);
1156 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
1157 LTTV_BEFORE_REQUEST
,
1159 g_assert(type
== LTTV_POINTER
);
1160 LttvHooks
*before_request
= (LttvHooks
*)*(value
.v_pointer
);
1162 if(before_request
!= NULL
) lttv_hooks_call(before_request
, tsc
);
1164 iter
= g_slist_next(iter
);
1168 /* - seek trace to start */
1170 LttTime start
= { 0, 0};
1171 lttv_process_traceset_seek_time(tsc
, start
);
1174 /* - Move all notifications from notify_out to notify_in. */
1176 GSList
*iter
= *notify_out
;
1177 g_assert(g_slist_length(*notify_in
) == 0);
1179 while(iter
!= NULL
) {
1180 gboolean remove
= FALSE
;
1181 gboolean free_data
= FALSE
;
1183 BackgroundNotify
*notify_req
= (BackgroundNotify
*)iter
->data
;
1187 *notify_in
= g_slist_append(*notify_in
, notify_req
);
1192 GSList
*remove_iter
= iter
;
1194 iter
= g_slist_next(iter
);
1196 notify_request_free((BackgroundNotify
*)remove_iter
->data
);
1197 *notify_out
= g_slist_remove_link(*notify_out
, remove_iter
);
1198 } else { // not remove
1199 iter
= g_slist_next(iter
);
1204 GSList
*iter
= *list_in
;
1205 LttvHooks
*hook_adder
= lttv_hooks_new();
1206 /* - for each request in list_in */
1207 while(iter
!= NULL
) {
1209 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1210 /*- add hooks to context*/
1211 lttvwindowtraces_add_computation_hooks(bg_req
->module_name
,
1214 iter
= g_slist_next(iter
);
1216 lttv_hooks_call(hook_adder
,tsc
);
1217 lttv_hooks_destroy(hook_adder
);
1224 GSList
*iter
= *list_in
;
1225 /* - for each request in list_in */
1226 while(iter
!= NULL
) {
1228 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1229 /*- Call before chunk hooks for list_in*/
1230 lttvwindowtraces_call_before_chunk(bg_req
->module_name
,
1232 iter
= g_slist_next(iter
);
1237 /* 2. call process traceset middle for a chunk */
1239 /*(assert list_in is not empty! : should not even be called in that case)*/
1240 LttTime end
= ltt_time_infinite
;
1241 g_assert(g_slist_length(*list_in
) != 0);
1243 lttv_process_traceset_middle(tsc
, end
, CHUNK_NUM_EVENTS
, NULL
);
1246 /* 3. After the chunk */
1248 /* 3.1 call after_chunk hooks for list_in */
1250 GSList
*iter
= *list_in
;
1251 /* - for each request in list_in */
1252 while(iter
!= NULL
) {
1254 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1255 /* - Call after chunk hooks for list_in */
1256 lttvwindowtraces_call_after_chunk(bg_req
->module_name
,
1258 iter
= g_slist_next(iter
);
1262 /* 3.2 for each notify_in */
1264 GSList
*iter
= *notify_in
;
1265 LttvTracefileContext
*tfc
= lttv_traceset_context_get_current_tfc(tsc
);
1267 while(iter
!= NULL
) {
1268 gboolean remove
= FALSE
;
1269 gboolean free_data
= FALSE
;
1271 BackgroundNotify
*notify_req
= (BackgroundNotify
*)iter
->data
;
1273 /* - if current time >= notify time, call notify and remove from
1275 * - if current position >= notify position, call notify and remove
1279 ltt_time_compare(notify_req
->notify_time
, tfc
->timestamp
) <= 0)
1281 (notify_req
->notify_position
!= NULL
&&
1282 lttv_traceset_context_ctx_pos_compare(tsc
,
1283 notify_req
->notify_position
) >= 0)
1286 lttv_hooks_call(notify_req
->notify
, notify_req
);
1295 GSList
*remove_iter
= iter
;
1297 iter
= g_slist_next(iter
);
1299 notify_request_free((BackgroundNotify
*)remove_iter
->data
);
1300 *notify_in
= g_slist_remove_link(*notify_in
, remove_iter
);
1301 } else { // not remove
1302 iter
= g_slist_next(iter
);
1308 LttvTracefileContext
*tfc
= lttv_traceset_context_get_current_tfc(tsc
);
1309 /* 3.3 if end of trace reached */
1311 g_debug("Current time : %lu sec, %lu nsec",
1312 tfc
->timestamp
.tv_sec
, tfc
->timestamp
.tv_nsec
);
1313 if(tfc
== NULL
|| ltt_time_compare(tfc
->timestamp
,
1314 tsc
->time_span
.end_time
) > 0) {
1317 GSList
*iter
= *list_in
;
1318 LttvHooks
*hook_remover
= lttv_hooks_new();
1319 /* - for each request in list_in */
1320 while(iter
!= NULL
) {
1322 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1323 /* - remove hooks from context */
1324 lttvwindowtraces_remove_computation_hooks(bg_req
->module_name
,
1327 iter
= g_slist_next(iter
);
1329 lttv_hooks_call(hook_remover
,tsc
);
1330 lttv_hooks_destroy(hook_remover
);
1333 /* - for each request in list_in */
1335 GSList
*iter
= *list_in
;
1337 while(iter
!= NULL
) {
1338 gboolean remove
= FALSE
;
1339 gboolean free_data
= FALSE
;
1341 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1343 /* - set hooks'in_progress flag to FALSE */
1344 lttvwindowtraces_unset_in_progress(bg_req
->module_name
,
1346 /* - set hooks'ready flag to TRUE */
1347 lttvwindowtraces_set_ready(bg_req
->module_name
,
1349 /* - call after request hook */
1350 /* Get after request hook */
1351 LttvAttribute
*module_attribute
;
1354 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
1355 LTTV_IATTRIBUTE(g_attribute
),
1357 g_assert(module_attribute
);
1360 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
1361 LTTV_IATTRIBUTE(module_attribute
),
1362 bg_req
->module_name
));
1363 g_assert(module_attribute
);
1365 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
1368 g_assert(type
== LTTV_POINTER
);
1369 LttvHooks
*after_request
= (LttvHooks
*)*(value
.v_pointer
);
1371 struct sum_traceset_closure t_closure
;
1372 t_closure
.tss
= (LttvTracesetStats
*)tsc
;
1373 t_closure
.current_time
= ltt_time_infinite
;
1374 if(after_request
!= NULL
) lttv_hooks_call(after_request
,
1378 if(bg_req
->dialog
!= NULL
)
1379 gtk_widget_destroy(bg_req
->dialog
);
1380 GtkWidget
*parent_window
;
1381 if(g_slist_find_custom(g_main_window_list
,
1382 bg_req
->parent_window
,
1383 (GCompareFunc
)find_window_widget
))
1384 parent_window
= GTK_WIDGET(bg_req
->parent_window
);
1386 parent_window
= NULL
;
1389 gtk_message_dialog_new(GTK_WINDOW(parent_window
),
1390 GTK_DIALOG_DESTROY_WITH_PARENT
,
1391 GTK_MESSAGE_INFO
, GTK_BUTTONS_OK
,
1392 "Background computation %s finished for trace %s",
1393 g_quark_to_string(bg_req
->module_name
),
1394 g_quark_to_string(ltt_trace_name(lttv_trace(bg_req
->trace
))));
1395 if(parent_window
!= NULL
)
1396 gtk_window_set_transient_for(GTK_WINDOW(dialog
),
1397 GTK_WINDOW(parent_window
));
1398 g_signal_connect_swapped (dialog
, "response",
1399 G_CALLBACK (gtk_widget_destroy
),
1401 gtk_widget_show(dialog
);
1403 /* - remove request */
1410 GSList
*remove_iter
= iter
;
1412 iter
= g_slist_next(iter
);
1413 if(free_data
) g_free(remove_iter
->data
);
1414 *list_in
= g_slist_remove_link(*list_in
, remove_iter
);
1415 } else { // not remove
1416 iter
= g_slist_next(iter
);
1421 /* - for each notifications in notify_in */
1423 GSList
*iter
= *notify_in
;
1425 while(iter
!= NULL
) {
1426 gboolean remove
= FALSE
;
1427 gboolean free_data
= FALSE
;
1429 BackgroundNotify
*notify_req
= (BackgroundNotify
*)iter
->data
;
1431 /* - call notify and remove from notify_in */
1432 lttv_hooks_call(notify_req
->notify
, notify_req
);
1439 GSList
*remove_iter
= iter
;
1441 iter
= g_slist_next(iter
);
1443 notify_request_free((BackgroundNotify
*)remove_iter
->data
);
1444 *notify_in
= g_slist_remove_link(*notify_in
, remove_iter
);
1445 } else { // not remove
1446 iter
= g_slist_next(iter
);
1451 /* - reset the context */
1452 LTTV_TRACESET_CONTEXT_GET_CLASS(tsc
)->fini(tsc
);
1453 LTTV_TRACESET_CONTEXT_GET_CLASS(tsc
)->init(tsc
,ts
);
1455 /* - if list_out is empty */
1456 if(g_slist_length(*list_out
) == 0) {
1457 /* - return FALSE (scheduler stopped) */
1458 g_debug("Background computation scheduler stopped");
1459 g_info("Background computation finished for trace %p", trace
);
1460 /* FIXME : remove status bar info, need context id and message id */
1467 /* 3.4 else, end of trace not reached */
1468 /* - return TRUE (scheduler still registered) */
1469 g_debug("Background computation left");
1474 /* 4. Unlock traces */
1476 lttv_process_traceset_get_sync_data(tsc
);
1477 //lttv_traceset_context_position_save(tsc, sync_position);
1481 iter_trace
<lttv_traceset_number(tsc
->ts
);
1483 LttvTrace
*trace_v
= lttv_traceset_get(tsc
->ts
, iter_trace
);
1485 lttvwindowtraces_unlock(trace_v
);
1488 #endif /* BABEL_CLEANUP */
1495 * Register the background computation hooks for a specific module. It adds the
1496 * computation hooks to the global attrubutes, under "computation/module name".
1498 * @param module_name A GQuark : the name of the module which computes the
1501 void lttvwindowtraces_register_computation_hooks(LttvAttributeName module_name
,
1502 LttvHooks
*before_chunk_traceset
,
1503 LttvHooks
*before_chunk_trace
,
1504 LttvHooks
*before_chunk_tracefile
,
1505 LttvHooks
*after_chunk_traceset
,
1506 LttvHooks
*after_chunk_trace
,
1507 LttvHooks
*after_chunk_tracefile
,
1508 LttvHooks
*before_request
,
1509 LttvHooks
*after_request
,
1510 LttvHooks
*event_hook
,
1511 LttvHooks
*hook_adder
,
1512 LttvHooks
*hook_remover
)
1514 LttvAttribute
*g_attribute
= lttv_global_attributes();
1515 LttvAttribute
*attribute
;
1516 LttvAttributeValue value
;
1520 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
1522 g_assert(attribute
);
1525 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
1527 g_assert(attribute
);
1529 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1530 LTTV_BEFORE_CHUNK_TRACESET
,
1535 *(value
.v_pointer
) = before_chunk_traceset
;
1537 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1538 LTTV_BEFORE_CHUNK_TRACE
,
1542 *(value
.v_pointer
) = before_chunk_trace
;
1544 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1545 LTTV_BEFORE_CHUNK_TRACEFILE
,
1549 *(value
.v_pointer
) = before_chunk_tracefile
;
1551 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1552 LTTV_AFTER_CHUNK_TRACESET
,
1556 *(value
.v_pointer
) = after_chunk_traceset
;
1558 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1559 LTTV_AFTER_CHUNK_TRACE
,
1563 *(value
.v_pointer
) = after_chunk_trace
;
1565 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1566 LTTV_AFTER_CHUNK_TRACEFILE
,
1570 *(value
.v_pointer
) = after_chunk_tracefile
;
1572 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1573 LTTV_BEFORE_REQUEST
,
1577 *(value
.v_pointer
) = before_request
;
1579 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1584 *(value
.v_pointer
) = after_request
;
1586 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1591 *(value
.v_pointer
) = event_hook
;
1593 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1598 *(value
.v_pointer
) = hook_adder
;
1600 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1605 *(value
.v_pointer
) = hook_remover
;
1611 * It removes all the requests that can be currently processed by the
1612 * background computation algorithm for all the traces (list_in and list_out).
1614 * Leaves the flag to in_progress or none.. depending if current or queue
1616 * @param module_name A GQuark : the name of the module which computes the
1619 void lttvwindowtraces_unregister_requests(LttvAttributeName module_name
)
1624 for(i
=0;i
<lttvwindowtraces_get_number();i
++) {
1625 LttvTrace
*trace_v
= lttvwindowtraces_get_trace(i
);
1626 g_assert(trace_v
!= NULL
);
1627 LttvAttribute
*attribute
= lttv_trace_attribute(trace_v
);
1628 LttvAttributeValue value
;
1629 GSList
**queue
, **current
;
1632 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1633 LTTV_REQUESTS_QUEUE
,
1638 queue
= (GSList
**)(value
.v_pointer
);
1641 while(iter
!= NULL
) {
1642 gboolean remove
= FALSE
;
1643 gboolean free_data
= FALSE
;
1645 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1647 if(bg_req
->module_name
== module_name
) {
1655 GSList
*remove_iter
= iter
;
1657 iter
= g_slist_next(iter
);
1658 if(free_data
) g_free(remove_iter
->data
);
1659 *queue
= g_slist_remove_link(*queue
, remove_iter
);
1660 } else { // not remove
1661 iter
= g_slist_next(iter
);
1666 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1667 LTTV_REQUESTS_CURRENT
,
1672 current
= (GSList
**)(value
.v_pointer
);
1675 while(iter
!= NULL
) {
1676 gboolean remove
= FALSE
;
1677 gboolean free_data
= FALSE
;
1679 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1681 if(bg_req
->module_name
== module_name
) {
1689 GSList
*remove_iter
= iter
;
1691 iter
= g_slist_next(iter
);
1692 if(free_data
) g_free(remove_iter
->data
);
1693 *current
= g_slist_remove_link(*current
, remove_iter
);
1694 } else { // not remove
1695 iter
= g_slist_next(iter
);
1703 * Unregister the background computation hooks for a specific module.
1705 * It also removes all the requests that can be currently processed by the
1706 * background computation algorithm for all the traces (list_in and list_out).
1708 * @param module_name A GQuark : the name of the module which computes the
1712 void lttvwindowtraces_unregister_computation_hooks
1713 (LttvAttributeName module_name
)
1715 LttvAttribute
*g_attribute
= lttv_global_attributes();
1716 LttvAttribute
*attribute
;
1717 LttvAttributeValue value
;
1721 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
1723 g_assert(attribute
);
1726 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
1728 g_assert(attribute
);
1730 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1731 LTTV_BEFORE_CHUNK_TRACESET
,
1736 LttvHooks
*before_chunk_traceset
= (LttvHooks
*)*(value
.v_pointer
);
1737 if(before_chunk_traceset
!= NULL
)
1738 lttv_hooks_destroy(before_chunk_traceset
);
1740 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1741 LTTV_BEFORE_CHUNK_TRACE
,
1746 LttvHooks
*before_chunk_trace
= (LttvHooks
*)*(value
.v_pointer
);
1747 if(before_chunk_trace
!= NULL
)
1748 lttv_hooks_destroy(before_chunk_trace
);
1750 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1751 LTTV_BEFORE_CHUNK_TRACEFILE
,
1756 LttvHooks
*before_chunk_tracefile
= (LttvHooks
*)*(value
.v_pointer
);
1757 if(before_chunk_tracefile
!= NULL
)
1758 lttv_hooks_destroy(before_chunk_tracefile
);
1760 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1761 LTTV_AFTER_CHUNK_TRACESET
,
1766 LttvHooks
*after_chunk_traceset
= (LttvHooks
*)*(value
.v_pointer
);
1767 if(after_chunk_traceset
!= NULL
)
1768 lttv_hooks_destroy(after_chunk_traceset
);
1770 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1771 LTTV_AFTER_CHUNK_TRACE
,
1776 LttvHooks
*after_chunk_trace
= (LttvHooks
*)*(value
.v_pointer
);
1777 if(after_chunk_trace
!= NULL
)
1778 lttv_hooks_destroy(after_chunk_trace
);
1780 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1781 LTTV_AFTER_CHUNK_TRACEFILE
,
1786 LttvHooks
*after_chunk_tracefile
= (LttvHooks
*)*(value
.v_pointer
);
1787 if(after_chunk_tracefile
!= NULL
)
1788 lttv_hooks_destroy(after_chunk_tracefile
);
1790 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1791 LTTV_BEFORE_REQUEST
,
1796 LttvHooks
*before_request
= (LttvHooks
*)*(value
.v_pointer
);
1797 if(before_request
!= NULL
)
1798 lttv_hooks_destroy(before_request
);
1800 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1806 LttvHooks
*after_request
= (LttvHooks
*)*(value
.v_pointer
);
1807 if(after_request
!= NULL
)
1808 lttv_hooks_destroy(after_request
);
1810 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1816 LttvHooks
*event_hook
= (LttvHooks
*)*(value
.v_pointer
);
1817 if(event_hook
!= NULL
)
1818 lttv_hooks_destroy(event_hook
);
1820 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1821 LTTV_EVENT_HOOK_BY_ID_CHANNEL
,
1826 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1832 LttvHooks
*hook_adder
= (LttvHooks
*)*(value
.v_pointer
);
1833 if(hook_adder
!= NULL
)
1834 lttv_hooks_destroy(hook_adder
);
1836 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1842 LttvHooks
*hook_remover
= (LttvHooks
*)*(value
.v_pointer
);
1843 if(hook_remover
!= NULL
)
1844 lttv_hooks_destroy(hook_remover
);
1847 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1848 LTTV_EVENT_HOOK_BY_ID_CHANNEL
);
1849 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1852 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1853 LTTV_AFTER_REQUEST
);
1854 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1855 LTTV_BEFORE_REQUEST
);
1857 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1858 LTTV_AFTER_CHUNK_TRACEFILE
);
1859 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1860 LTTV_AFTER_CHUNK_TRACE
);
1861 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1862 LTTV_AFTER_CHUNK_TRACESET
);
1864 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1865 LTTV_BEFORE_CHUNK_TRACEFILE
);
1866 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1867 LTTV_BEFORE_CHUNK_TRACE
);
1868 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1869 LTTV_BEFORE_CHUNK_TRACESET
);
1870 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1872 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1875 /* finally, remove module name */
1877 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
1879 g_assert(attribute
);
1880 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1886 * Lock a trace so no other instance can use it.
1888 * @param trace The trace to lock.
1889 * @return 0 on success, -1 if cannot get lock.
1891 gint
lttvwindowtraces_lock(LttvTrace
*trace
)
1893 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
1894 LttvAttributeValue value
;
1895 LttvAttributeType type
;
1897 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1900 /* Verify the absence of the lock. */
1901 if(type
!= LTTV_NONE
) {
1902 g_critical("Cannot take trace lock");
1906 value
= lttv_iattribute_add(LTTV_IATTRIBUTE(attribute
),
1909 /* the value is left unset. The only presence of the attribute is necessary.
1918 * @param trace The trace to unlock.
1919 * @return 0 on success, -1 if cannot unlock (not locked ?).
1921 gint
lttvwindowtraces_unlock(LttvTrace
*trace
)
1923 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
1924 LttvAttributeType type
;
1925 LttvAttributeValue value
;
1927 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1930 /* Verify the presence of the lock. */
1931 if(type
== LTTV_NONE
) {
1932 g_critical("Cannot release trace lock");
1936 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1943 * Verify if a trace is locked.
1945 * @param trace The trace to verify.
1946 * @return TRUE if locked, FALSE is unlocked.
1948 gint
lttvwindowtraces_get_lock_state(LttvTrace
*trace
)
1950 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
1951 LttvAttributeType type
;
1952 LttvAttributeValue value
;
1954 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1957 /* The only presence of the attribute is necessary. */
1958 if(type
== LTTV_NONE
)