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>
33 #include <ltt/trace.h>
35 #include <lttv/lttv.h>
36 #include <lttv/traceset.h>
37 #include <lttv/attribute.h>
38 #include <lttv/tracecontext.h>
39 #include <lttvwindow/lttvwindowtraces.h>
40 #include <lttvwindow/lttvwindow.h> // for CHUNK_NUM_EVENTS
41 #include <lttvwindow/mainwindow-private.h> /* for main window structure */
43 extern GSList
* g_main_window_list
;
45 typedef struct _BackgroundRequest
{
46 LttvAttributeName module_name
; /* Hook path in global attributes,
47 where all standard hooks under computation/.
49 LttvTrace
*trace
; /* trace concerned */
50 GtkWidget
*dialog
; /* Dialog linked with the request, may be NULL */
51 GtkWidget
*parent_window
; /* Parent window the dialog must be transient for */
54 typedef struct _BackgroundNotify
{
56 LttvTrace
*trace
; /* trace */
58 LttvTracesetContextPosition
*notify_position
;
59 LttvHooks
*notify
; /* Hook to call when the notify is
60 passed, or at the end of trace */
66 gboolean
lttvwindowtraces_process_pending_requests(LttvTrace
*trace
);
68 /* Get a trace by its path name.
70 * @param path path of the trace on the virtual file system.
71 * @return Pointer to trace if found
72 * NULL is returned if the trace is not present
75 __EXPORT LttvTrace
*lttvwindowtraces_get_trace_by_name(gchar
*path
)
79 for(i
=0;i
<lttvwindowtraces_get_number();i
++) {
80 LttvTrace
*trace_v
= lttvwindowtraces_get_trace(i
);
83 g_assert(trace_v
!= NULL
);
85 trace
= lttv_trace(trace_v
);
86 g_assert(trace
!= NULL
);
87 name
= g_quark_to_string(ltt_trace_name(trace
));
89 if(strcmp(name
, path
) == 0) {
98 /* Get a trace by its number identifier */
100 __EXPORT LttvTrace
*lttvwindowtraces_get_trace(guint num
)
102 LttvAttribute
*g_attribute
= lttv_global_attributes();
103 LttvAttribute
*attribute
;
104 LttvAttributeType type
;
105 LttvAttributeName name
;
106 LttvAttributeValue value
;
110 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
114 type
= lttv_iattribute_get(LTTV_IATTRIBUTE(attribute
), num
, &name
, &value
,
117 if(type
== LTTV_POINTER
) {
118 return (LttvTrace
*)*(value
.v_pointer
);
124 /* Total number of traces */
126 __EXPORT guint
lttvwindowtraces_get_number()
128 LttvAttribute
*g_attribute
= lttv_global_attributes();
129 LttvAttribute
*attribute
;
132 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
136 return ( lttv_iattribute_get_number(LTTV_IATTRIBUTE(attribute
)) );
139 /* Add a trace to the global attributes */
141 void lttvwindowtraces_add_trace(LttvTrace
*trace
)
143 LttvAttribute
*g_attribute
= lttv_global_attributes();
144 LttvAttribute
*attribute
;
145 LttvAttributeValue value
;
147 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
, "%llu:%llu", buf
.st_dev
, buf
.st_ino
);
157 g_assert(result
>= 0);
160 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
164 value
= lttv_attribute_add(attribute
,
165 g_quark_from_string(attribute_path
),
168 *(value
.v_pointer
) = (gpointer
)trace
;
170 /* create new traceset and tracesetcontext */
172 LttvTracesetStats
*tss
;
173 //LttvTracesetContextPosition *sync_position;
175 attribute
= lttv_trace_attribute(trace
);
176 result_b
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
177 LTTV_COMPUTATION_TRACESET
,
182 ts
= lttv_traceset_new();
183 *(value
.v_pointer
) = ts
;
185 lttv_traceset_add(ts
,trace
);
187 result_b
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
188 LTTV_COMPUTATION_TRACESET_CONTEXT
,
193 tss
= g_object_new(LTTV_TRACESET_STATS_TYPE
, NULL
);
194 *(value
.v_pointer
) = tss
;
196 lttv_context_init(LTTV_TRACESET_CONTEXT(tss
), ts
);
198 result_b
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
199 LTTV_COMPUTATION_SYNC_POSITION
,
204 sync_position
= lttv_traceset_context_position_new();
205 *(value
.v_pointer
) = sync_position
;
207 value
= lttv_attribute_add(attribute
,
211 value
= lttv_attribute_add(attribute
,
212 LTTV_REQUESTS_CURRENT
,
215 value
= lttv_attribute_add(attribute
,
219 value
= lttv_attribute_add(attribute
,
224 /* Remove a trace from the global attributes */
226 void lttvwindowtraces_remove_trace(LttvTrace
*trace
)
228 LttvAttribute
*g_attribute
= lttv_global_attributes();
229 LttvAttribute
*attribute
;
230 LttvAttributeValue value
;
235 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
239 for(i
=0;i
<lttvwindowtraces_get_number();i
++) {
240 LttvTrace
*trace_v
= lttvwindowtraces_get_trace(i
);
242 g_assert(trace_v
!= NULL
);
244 /* Remove and background computation that could be in progress */
245 g_idle_remove_by_data(trace_v
);
247 if(trace_v
== trace
) {
249 LttvAttribute
*l_attribute
;
251 /* destroy traceset and tracesetcontext */
253 LttvTracesetStats
*tss
;
254 //LttvTracesetContextPosition *sync_position;
256 l_attribute
= lttv_trace_attribute(trace
);
259 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
260 LTTV_REQUESTS_QUEUE
);
262 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
263 LTTV_REQUESTS_CURRENT
);
265 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
268 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
269 LTTV_NOTIFY_CURRENT
);
271 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(l_attribute
),
272 LTTV_COMPUTATION_TRACESET
,
277 ts
= (LttvTraceset
*)*(value
.v_pointer
);
279 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(l_attribute
),
280 LTTV_COMPUTATION_SYNC_POSITION
,
285 sync_position
= (LttvTracesetContextPosition
*)*(value
.v_pointer
);
286 lttv_traceset_context_position_destroy(sync_position
);
288 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
289 LTTV_COMPUTATION_SYNC_POSITION
);
292 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(l_attribute
),
293 LTTV_COMPUTATION_TRACESET_CONTEXT
,
298 tss
= (LttvTracesetStats
*)*(value
.v_pointer
);
300 lttv_context_fini(LTTV_TRACESET_CONTEXT(tss
));
302 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
303 LTTV_COMPUTATION_TRACESET_CONTEXT
);
304 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(l_attribute
),
305 LTTV_COMPUTATION_TRACESET
);
306 /* Destroy the traceset and the trace also */
307 lttv_traceset_destroy(ts
);
309 /* finally, remove the global attribute */
310 lttv_attribute_remove(attribute
, i
);
317 static void destroy_dialog(BackgroundRequest
*bg_req
)
319 gtk_widget_destroy(bg_req
->dialog
);
320 bg_req
->dialog
= NULL
;
325 * Function to request data from a specific trace
327 * The memory allocated for the request will be managed by the API.
329 * @param widget the current Window
330 * @param trace the trace to compute
331 * @param module_name the name of the module which registered global computation
335 __EXPORT
void lttvwindowtraces_background_request_queue
336 (GtkWidget
*widget
, LttvTrace
*trace
, gchar
*module_name
)
338 BackgroundRequest
*bg_req
;
339 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
340 LttvAttribute
*g_attribute
= lttv_global_attributes();
341 LttvAttribute
*module_attribute
;
342 LttvAttributeValue value
;
343 LttvAttributeType type
;
347 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
353 slist
= (GSList
**)(value
.v_pointer
);
355 /* Verify that the calculator is loaded */
357 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
359 g_assert(module_attribute
);
361 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
362 g_quark_from_string(module_name
),
364 if(type
== LTTV_NONE
) {
365 g_critical("Missing background calculator %s", module_name
);
369 bg_req
= g_new(BackgroundRequest
,1);
370 bg_req
->module_name
= g_quark_from_string(module_name
);
371 bg_req
->trace
= trace
;
373 *slist
= g_slist_append(*slist
, bg_req
);
375 /* Priority lower than live servicing */
376 g_idle_remove_by_data(trace
);
377 g_idle_add_full((G_PRIORITY_HIGH_IDLE
+ 23),
378 (GSourceFunc
)lttvwindowtraces_process_pending_requests
,
381 /* FIXME : show message in status bar, need context and message id */
382 g_info("Background computation for %s started for trace %p", module_name
,
385 gtk_message_dialog_new(
387 GTK_DIALOG_DESTROY_WITH_PARENT
,
388 GTK_MESSAGE_INFO
, GTK_BUTTONS_OK
,
389 "Background computation for %s started for trace %s",
391 g_quark_to_string(ltt_trace_name(lttv_trace(trace
))));
392 gtk_window_set_transient_for(GTK_WINDOW(dialog
), GTK_WINDOW(widget
));
393 g_signal_connect_swapped (dialog
, "response",
394 G_CALLBACK (destroy_dialog
),
396 bg_req
->dialog
= dialog
;
397 /* the parent window might vanish : only use this pointer for a
398 * comparison with existing windows */
399 bg_req
->parent_window
= gtk_widget_get_toplevel(widget
);
400 gtk_widget_show(dialog
);
404 * Remove a background request from a trace.
406 * This should ONLY be used by the modules which registered the global hooks
407 * (module_name). If this is called by the viewers, it may lead to incomplete
408 * and incoherent background processing information.
410 * Even if the module which deals with the hooks removes the background
411 * requests, it may cause a problem if the module gets loaded again in the
412 * session : the data will be partially calculated. The calculation function
413 * must deal with this case correctly.
415 * @param trace the trace to compute
416 * @param module_name the name of the module which registered global computation
420 void lttvwindowtraces_background_request_remove
421 (LttvTrace
*trace
, gchar
*module_name
)
423 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
424 LttvAttributeValue value
;
429 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
435 slist
= (GSList
**)(value
.v_pointer
);
437 for(iter
=*slist
;iter
!=NULL
;) {
438 BackgroundRequest
*bg_req
=
439 (BackgroundRequest
*)iter
->data
;
441 if(bg_req
->module_name
== g_quark_from_string(module_name
)) {
442 GSList
*rem_iter
= iter
;
443 iter
=g_slist_next(iter
);
445 *slist
= g_slist_delete_link(*slist
, rem_iter
);
447 iter
=g_slist_next(iter
);
453 * Find a background request in a trace
457 __EXPORT gboolean lttvwindowtraces_background_request_find
458 (LttvTrace
*trace
, gchar
*module_name
)
460 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
461 LttvAttributeValue value
;
466 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
472 slist
= (GSList
**)(value
.v_pointer
);
474 for(iter
=*slist
;iter
!=NULL
;) {
475 BackgroundRequest
*bg_req
=
476 (BackgroundRequest
*)iter
->data
;
478 if(bg_req
->module_name
== g_quark_from_string(module_name
)) {
481 iter
=g_slist_next(iter
);
488 * Register a callback to be called when requested data is passed in the next
489 * queued background processing.
491 * @param owner owner of the background notification
492 * @param trace the trace computed
493 * @param notify_time time when notification hooks must be called
494 * @param notify_position position when notification hooks must be called
495 * @param notify Hook to call when the notify position is passed
498 __EXPORT
void lttvwindowtraces_background_notify_queue
502 const LttvTracesetContextPosition
*notify_position
,
503 const LttvHooks
*notify
)
505 BackgroundNotify
*bg_notify
;
506 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
507 LttvAttributeValue value
;
511 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
517 slist
= (GSList
**)(value
.v_pointer
);
519 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
520 LTTV_COMPUTATION_TRACESET_CONTEXT
,
525 LttvTracesetContext
*tsc
= (LttvTracesetContext
*)(value
.v_pointer
);
527 bg_notify
= g_new(BackgroundNotify
,1);
529 bg_notify
->owner
= owner
;
530 bg_notify
->trace
= trace
;
531 bg_notify
->notify_time
= notify_time
;
532 if(notify_position
!= NULL
) {
533 bg_notify
->notify_position
= lttv_traceset_context_position_new(tsc
);
534 lttv_traceset_context_position_copy(bg_notify
->notify_position
,
537 bg_notify
->notify_position
= NULL
;
540 bg_notify
->notify
= lttv_hooks_new();
541 lttv_hooks_add_list(bg_notify
->notify
, notify
);
543 *slist
= g_slist_append(*slist
, bg_notify
);
547 * Register a callback to be called when requested data is passed in the current
548 * background processing.
550 * @param owner owner of the background notification
551 * @param trace the trace computed
552 * @param notify_time time when notification hooks must be called
553 * @param notify_position position when notification hooks must be called
554 * @param notify Hook to call when the notify position is passed
557 __EXPORT
void lttvwindowtraces_background_notify_current
561 const LttvTracesetContextPosition
*notify_position
,
562 const LttvHooks
*notify
)
564 BackgroundNotify
*bg_notify
;
565 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
566 LttvAttributeValue value
;
570 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
576 slist
= (GSList
**)(value
.v_pointer
);
578 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
579 LTTV_COMPUTATION_TRACESET_CONTEXT
,
584 LttvTracesetContext
*tsc
= (LttvTracesetContext
*)(value
.v_pointer
);
587 bg_notify
= g_new(BackgroundNotify
,1);
589 bg_notify
->owner
= owner
;
590 bg_notify
->trace
= trace
;
591 bg_notify
->notify_time
= notify_time
;
592 if(notify_position
!= NULL
) {
593 bg_notify
->notify_position
= lttv_traceset_context_position_new(tsc
);
594 lttv_traceset_context_position_copy(bg_notify
->notify_position
,
597 bg_notify
->notify_position
= NULL
;
599 bg_notify
->notify
= lttv_hooks_new();
600 lttv_hooks_add_list(bg_notify
->notify
, notify
);
602 *slist
= g_slist_append(*slist
, bg_notify
);
606 static void notify_request_free(BackgroundNotify
*notify_req
)
608 if(notify_req
== NULL
) return;
610 if(notify_req
->notify_position
!= NULL
)
611 lttv_traceset_context_position_destroy(notify_req
->notify_position
);
612 if(notify_req
->notify
!= NULL
)
613 lttv_hooks_destroy(notify_req
->notify
);
618 * Removes all the notifications requests from a specific viewer.
620 * @param owner owner of the background notification
623 __EXPORT
void lttvwindowtraces_background_notify_remove(gpointer owner
)
627 for(i
=0;i
<lttvwindowtraces_get_number();i
++) {
628 LttvAttribute
*attribute
;
629 LttvAttributeValue value
;
630 LttvTrace
*trace_v
= lttvwindowtraces_get_trace(i
);
635 g_assert(trace_v
!= NULL
);
637 attribute
= lttv_trace_attribute(trace_v
);
639 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
645 slist
= (GSList
**)(value
.v_pointer
);
647 for(iter
=*slist
;iter
!=NULL
;) {
649 BackgroundNotify
*bg_notify
= (BackgroundNotify
*)iter
->data
;
651 if(bg_notify
->owner
== owner
) {
652 GSList
*rem_iter
= iter
;
653 iter
=g_slist_next(iter
);
654 notify_request_free(bg_notify
);
655 *slist
= g_slist_remove_link(*slist
, rem_iter
);
657 iter
=g_slist_next(iter
);
661 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
667 slist
= (GSList
**)(value
.v_pointer
);
669 for(iter
=*slist
;iter
!=NULL
;) {
671 BackgroundNotify
*bg_notify
= (BackgroundNotify
*)iter
->data
;
673 if(bg_notify
->owner
== owner
) {
674 GSList
*rem_iter
= iter
;
675 iter
=g_slist_next(iter
);
676 notify_request_free(bg_notify
);
677 *slist
= g_slist_remove_link(*slist
, rem_iter
);
679 iter
=g_slist_next(iter
);
686 /* Background processing helper functions */
688 void lttvwindowtraces_add_computation_hooks(LttvAttributeName module_name
,
689 LttvTracesetContext
*tsc
,
690 LttvHooks
*hook_adder
)
692 LttvAttribute
*g_attribute
= lttv_global_attributes();
693 LttvAttribute
*module_attribute
;
694 LttvAttributeType type
;
695 LttvAttributeValue value
;
699 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
701 g_assert(module_attribute
);
704 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
705 LTTV_IATTRIBUTE(module_attribute
),
707 g_assert(module_attribute
);
709 /* Call the module's hook adder */
710 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
713 if(type
== LTTV_POINTER
) {
714 //lttv_hooks_call((LttvHooks*)*(value.v_pointer), (gpointer)tss);
715 if(hook_adder
!= NULL
)
716 lttv_hooks_add_list(hook_adder
, (LttvHooks
*)*(value
.v_pointer
));
720 void lttvwindowtraces_remove_computation_hooks(LttvAttributeName module_name
,
721 LttvTracesetContext
*tsc
,
722 LttvHooks
*hook_remover
)
724 LttvAttribute
*g_attribute
= lttv_global_attributes();
725 LttvAttribute
*module_attribute
;
726 LttvAttributeType type
;
727 LttvAttributeValue value
;
730 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
732 g_assert(module_attribute
);
735 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
736 LTTV_IATTRIBUTE(module_attribute
),
738 g_assert(module_attribute
);
740 /* Call the module's hook remover */
741 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
744 if(type
== LTTV_POINTER
) {
745 //lttv_hooks_call((LttvHooks*)*(value.v_pointer), (gpointer)tss);
746 if(hook_remover
!= NULL
)
747 lttv_hooks_add_list(hook_remover
, (LttvHooks
*)*(value
.v_pointer
));
751 void lttvwindowtraces_call_before_chunk(LttvAttributeName module_name
,
752 LttvTracesetContext
*tsc
)
754 LttvAttribute
*g_attribute
= lttv_global_attributes();
755 LttvAttribute
*module_attribute
;
756 LttvAttributeType type
;
757 LttvAttributeValue value
;
758 LttvHooks
*before_chunk_traceset
=NULL
;
759 LttvHooks
*before_chunk_trace
=NULL
;
760 LttvHooks
*before_chunk_tracefile
=NULL
;
761 LttvHooks
*event_hook
=NULL
;
762 LttvHooksById
*event_hook_by_id
=NULL
;
766 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
768 g_assert(module_attribute
);
771 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
772 LTTV_IATTRIBUTE(module_attribute
),
774 g_assert(module_attribute
);
776 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
777 LTTV_BEFORE_CHUNK_TRACESET
,
779 if(type
== LTTV_POINTER
) {
780 before_chunk_traceset
= (LttvHooks
*)*(value
.v_pointer
);
783 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
784 LTTV_BEFORE_CHUNK_TRACE
,
786 if(type
== LTTV_POINTER
) {
787 before_chunk_trace
= (LttvHooks
*)*(value
.v_pointer
);
790 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
791 LTTV_BEFORE_CHUNK_TRACEFILE
,
793 if(type
== LTTV_POINTER
) {
794 before_chunk_tracefile
= (LttvHooks
*)*(value
.v_pointer
);
797 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
800 if(type
== LTTV_POINTER
) {
801 event_hook
= (LttvHooks
*)*(value
.v_pointer
);
804 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
805 LTTV_EVENT_HOOK_BY_ID
,
807 if(type
== LTTV_POINTER
) {
808 event_hook_by_id
= (LttvHooksById
*)*(value
.v_pointer
);
811 lttv_process_traceset_begin(tsc
,
812 before_chunk_traceset
,
814 before_chunk_tracefile
,
821 void lttvwindowtraces_call_after_chunk(LttvAttributeName module_name
,
822 LttvTracesetContext
*tsc
)
824 LttvAttribute
*g_attribute
= lttv_global_attributes();
825 LttvAttribute
*module_attribute
;
826 LttvAttributeType type
;
827 LttvAttributeValue value
;
828 LttvHooks
*after_chunk_traceset
=NULL
;
829 LttvHooks
*after_chunk_trace
=NULL
;
830 LttvHooks
*after_chunk_tracefile
=NULL
;
831 LttvHooks
*event_hook
=NULL
;
832 LttvHooksById
*event_hook_by_id
=NULL
;
835 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
837 g_assert(module_attribute
);
840 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
841 LTTV_IATTRIBUTE(module_attribute
),
843 g_assert(module_attribute
);
845 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
846 LTTV_AFTER_CHUNK_TRACESET
,
848 if(type
== LTTV_POINTER
) {
849 after_chunk_traceset
= (LttvHooks
*)*(value
.v_pointer
);
852 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
853 LTTV_AFTER_CHUNK_TRACE
,
855 if(type
== LTTV_POINTER
) {
856 after_chunk_trace
= (LttvHooks
*)*(value
.v_pointer
);
859 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
860 LTTV_AFTER_CHUNK_TRACEFILE
,
862 if(type
== LTTV_POINTER
) {
863 after_chunk_tracefile
= (LttvHooks
*)*(value
.v_pointer
);
866 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
869 if(type
== LTTV_POINTER
) {
870 event_hook
= (LttvHooks
*)*(value
.v_pointer
);
873 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
874 LTTV_EVENT_HOOK_BY_ID
,
876 if(type
== LTTV_POINTER
) {
877 event_hook_by_id
= (LttvHooksById
*)*(value
.v_pointer
);
880 lttv_process_traceset_end(tsc
,
881 after_chunk_traceset
,
883 after_chunk_tracefile
,
890 void lttvwindowtraces_set_in_progress(LttvAttributeName module_name
,
893 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
894 LttvAttributeValue value
;
897 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
901 value
= lttv_iattribute_add(LTTV_IATTRIBUTE(attribute
),
904 /* the value is left unset. The only presence of the attribute is necessary.
908 void lttvwindowtraces_unset_in_progress(LttvAttributeName module_name
,
911 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
914 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
918 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
922 __EXPORT gboolean
lttvwindowtraces_get_in_progress(LttvAttributeName module_name
,
925 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
926 LttvAttributeType type
;
927 LttvAttributeValue value
;
930 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
934 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
937 /* The only presence of the attribute is necessary. */
938 if(type
== LTTV_NONE
)
944 void lttvwindowtraces_set_ready(LttvAttributeName module_name
,
947 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
948 LttvAttributeValue value
;
951 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
955 value
= lttv_iattribute_add(LTTV_IATTRIBUTE(attribute
),
958 /* the value is left unset. The only presence of the attribute is necessary.
962 void lttvwindowtraces_unset_ready(LttvAttributeName module_name
,
965 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
968 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
972 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
976 __EXPORT gboolean
lttvwindowtraces_get_ready(LttvAttributeName module_name
,
979 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
980 LttvAttributeType type
;
981 LttvAttributeValue value
;
984 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
988 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
991 /* The only presence of the attribute is necessary. */
992 if(type
== LTTV_NONE
)
998 static gint
find_window_widget(MainWindow
*a
, GtkWidget
*b
)
1000 if(a
->mwindow
== b
) return 0;
1005 /* lttvwindowtraces_process_pending_requests
1007 * Process the pending background computation requests
1009 * This internal function gets called by g_idle, taking care of the pending
1015 gboolean
lttvwindowtraces_process_pending_requests(LttvTrace
*trace
)
1017 LttvTracesetContext
*tsc
;
1018 LttvTracesetStats
*tss
;
1020 //LttvTracesetContextPosition *sync_position;
1021 LttvAttribute
*attribute
;
1022 LttvAttribute
*g_attribute
= lttv_global_attributes();
1023 GSList
**list_out
, **list_in
, **notify_in
, **notify_out
;
1024 LttvAttributeValue value
;
1025 LttvAttributeType type
;
1031 if(lttvwindow_preempt_count
> 0) return TRUE
;
1033 attribute
= lttv_trace_attribute(trace
);
1035 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1036 LTTV_REQUESTS_QUEUE
,
1038 g_assert(type
== LTTV_POINTER
);
1039 list_out
= (GSList
**)(value
.v_pointer
);
1041 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1042 LTTV_REQUESTS_CURRENT
,
1044 g_assert(type
== LTTV_POINTER
);
1045 list_in
= (GSList
**)(value
.v_pointer
);
1047 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1050 g_assert(type
== LTTV_POINTER
);
1051 notify_out
= (GSList
**)(value
.v_pointer
);
1053 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1054 LTTV_NOTIFY_CURRENT
,
1056 g_assert(type
== LTTV_POINTER
);
1057 notify_in
= (GSList
**)(value
.v_pointer
);
1059 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1060 LTTV_COMPUTATION_TRACESET
,
1062 g_assert(type
== LTTV_POINTER
);
1063 ts
= (LttvTraceset
*)*(value
.v_pointer
);
1065 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1066 LTTV_COMPUTATION_TRACESET_CONTEXT
,
1068 g_assert(type
== LTTV_POINTER
);
1069 tsc
= (LttvTracesetContext
*)*(value
.v_pointer
);
1070 tss
= (LttvTracesetStats
*)*(value
.v_pointer
);
1071 g_assert(LTTV_IS_TRACESET_CONTEXT(tsc
));
1072 g_assert(LTTV_IS_TRACESET_STATS(tss
));
1074 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1075 LTTV_COMPUTATION_SYNC_POSITION
,
1077 g_assert(type
== LTTV_POINTER
);
1078 sync_position
= (LttvTracesetContextPosition
*)*(value
.v_pointer
);
1080 /* There is no events requests pending : we should never have been called! */
1081 g_assert(g_slist_length(*list_out
) != 0 || g_slist_length(*list_in
) != 0);
1082 /* 0.1 Lock traces */
1087 iter_trace
<lttv_traceset_number(tsc
->ts
);
1089 LttvTrace
*trace_v
= lttv_traceset_get(tsc
->ts
,iter_trace
);
1091 if(lttvwindowtraces_lock(trace_v
) != 0)
1092 return TRUE
; /* Cannot get trace lock, try later */
1096 /* 0.2 Sync tracefiles */
1097 //g_assert(lttv_process_traceset_seek_position(tsc, sync_position) == 0);
1098 lttv_process_traceset_synchronize_tracefiles(tsc
);
1099 /* 1. Before processing */
1101 /* if list_in is empty */
1102 if(g_slist_length(*list_in
) == 0) {
1105 /* - Add all requests in list_out to list_in, empty list_out */
1106 GSList
*iter
= *list_out
;
1108 while(iter
!= NULL
) {
1109 gboolean remove
= FALSE
;
1110 gboolean free_data
= FALSE
;
1112 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1116 *list_in
= g_slist_append(*list_in
, bg_req
);
1121 GSList
*remove_iter
= iter
;
1123 iter
= g_slist_next(iter
);
1124 if(free_data
) g_free(remove_iter
->data
);
1125 *list_out
= g_slist_remove_link(*list_out
, remove_iter
);
1126 } else { // not remove
1127 iter
= g_slist_next(iter
);
1133 GSList
*iter
= *list_in
;
1134 /* - for each request in list_in */
1135 while(iter
!= NULL
) {
1137 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1138 /* - set hooks'in_progress flag to TRUE */
1139 lttvwindowtraces_set_in_progress(bg_req
->module_name
,
1142 /* - call before request hook */
1143 /* Get before request hook */
1144 LttvAttribute
*module_attribute
;
1147 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
1148 LTTV_IATTRIBUTE(g_attribute
),
1150 g_assert(module_attribute
);
1153 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
1154 LTTV_IATTRIBUTE(module_attribute
),
1155 bg_req
->module_name
));
1156 g_assert(module_attribute
);
1158 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
1159 LTTV_BEFORE_REQUEST
,
1161 g_assert(type
== LTTV_POINTER
);
1162 LttvHooks
*before_request
= (LttvHooks
*)*(value
.v_pointer
);
1164 if(before_request
!= NULL
) lttv_hooks_call(before_request
, tsc
);
1166 iter
= g_slist_next(iter
);
1170 /* - seek trace to start */
1172 LttTime start
= { 0, 0};
1173 lttv_process_traceset_seek_time(tsc
, start
);
1176 /* - Move all notifications from notify_out to notify_in. */
1178 GSList
*iter
= *notify_out
;
1179 g_assert(g_slist_length(*notify_in
) == 0);
1181 while(iter
!= NULL
) {
1182 gboolean remove
= FALSE
;
1183 gboolean free_data
= FALSE
;
1185 BackgroundNotify
*notify_req
= (BackgroundNotify
*)iter
->data
;
1189 *notify_in
= g_slist_append(*notify_in
, notify_req
);
1194 GSList
*remove_iter
= iter
;
1196 iter
= g_slist_next(iter
);
1198 notify_request_free((BackgroundNotify
*)remove_iter
->data
);
1199 *notify_out
= g_slist_remove_link(*notify_out
, remove_iter
);
1200 } else { // not remove
1201 iter
= g_slist_next(iter
);
1206 GSList
*iter
= *list_in
;
1207 LttvHooks
*hook_adder
= lttv_hooks_new();
1208 /* - for each request in list_in */
1209 while(iter
!= NULL
) {
1211 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1212 /*- add hooks to context*/
1213 lttvwindowtraces_add_computation_hooks(bg_req
->module_name
,
1216 iter
= g_slist_next(iter
);
1218 lttv_hooks_call(hook_adder
,tsc
);
1219 lttv_hooks_destroy(hook_adder
);
1226 GSList
*iter
= *list_in
;
1227 /* - for each request in list_in */
1228 while(iter
!= NULL
) {
1230 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1231 /*- Call before chunk hooks for list_in*/
1232 lttvwindowtraces_call_before_chunk(bg_req
->module_name
,
1234 iter
= g_slist_next(iter
);
1239 /* 2. call process traceset middle for a chunk */
1241 /*(assert list_in is not empty! : should not even be called in that case)*/
1242 LttTime end
= ltt_time_infinite
;
1243 g_assert(g_slist_length(*list_in
) != 0);
1245 lttv_process_traceset_middle(tsc
, end
, CHUNK_NUM_EVENTS
, NULL
);
1248 /* 3. After the chunk */
1250 /* 3.1 call after_chunk hooks for list_in */
1252 GSList
*iter
= *list_in
;
1253 /* - for each request in list_in */
1254 while(iter
!= NULL
) {
1256 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1257 /* - Call after chunk hooks for list_in */
1258 lttvwindowtraces_call_after_chunk(bg_req
->module_name
,
1260 iter
= g_slist_next(iter
);
1264 /* 3.2 for each notify_in */
1266 GSList
*iter
= *notify_in
;
1267 LttvTracefileContext
*tfc
= lttv_traceset_context_get_current_tfc(tsc
);
1269 while(iter
!= NULL
) {
1270 gboolean remove
= FALSE
;
1271 gboolean free_data
= FALSE
;
1273 BackgroundNotify
*notify_req
= (BackgroundNotify
*)iter
->data
;
1275 /* - if current time >= notify time, call notify and remove from
1277 * - if current position >= notify position, call notify and remove
1281 ltt_time_compare(notify_req
->notify_time
, tfc
->timestamp
) <= 0)
1283 (notify_req
->notify_position
!= NULL
&&
1284 lttv_traceset_context_ctx_pos_compare(tsc
,
1285 notify_req
->notify_position
) >= 0)
1288 lttv_hooks_call(notify_req
->notify
, notify_req
);
1297 GSList
*remove_iter
= iter
;
1299 iter
= g_slist_next(iter
);
1301 notify_request_free((BackgroundNotify
*)remove_iter
->data
);
1302 *notify_in
= g_slist_remove_link(*notify_in
, remove_iter
);
1303 } else { // not remove
1304 iter
= g_slist_next(iter
);
1310 LttvTracefileContext
*tfc
= lttv_traceset_context_get_current_tfc(tsc
);
1311 /* 3.3 if end of trace reached */
1313 g_debug("Current time : %lu sec, %lu nsec",
1314 tfc
->timestamp
.tv_sec
, tfc
->timestamp
.tv_nsec
);
1315 if(tfc
== NULL
|| ltt_time_compare(tfc
->timestamp
,
1316 tsc
->time_span
.end_time
) > 0) {
1319 GSList
*iter
= *list_in
;
1320 LttvHooks
*hook_remover
= lttv_hooks_new();
1321 /* - for each request in list_in */
1322 while(iter
!= NULL
) {
1324 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1325 /* - remove hooks from context */
1326 lttvwindowtraces_remove_computation_hooks(bg_req
->module_name
,
1329 iter
= g_slist_next(iter
);
1331 lttv_hooks_call(hook_remover
,tsc
);
1332 lttv_hooks_destroy(hook_remover
);
1335 /* - for each request in list_in */
1337 GSList
*iter
= *list_in
;
1339 while(iter
!= NULL
) {
1340 gboolean remove
= FALSE
;
1341 gboolean free_data
= FALSE
;
1343 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1345 /* - set hooks'in_progress flag to FALSE */
1346 lttvwindowtraces_unset_in_progress(bg_req
->module_name
,
1348 /* - set hooks'ready flag to TRUE */
1349 lttvwindowtraces_set_ready(bg_req
->module_name
,
1351 /* - call after request hook */
1352 /* Get after request hook */
1353 LttvAttribute
*module_attribute
;
1356 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
1357 LTTV_IATTRIBUTE(g_attribute
),
1359 g_assert(module_attribute
);
1362 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(
1363 LTTV_IATTRIBUTE(module_attribute
),
1364 bg_req
->module_name
));
1365 g_assert(module_attribute
);
1367 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(module_attribute
),
1370 g_assert(type
== LTTV_POINTER
);
1371 LttvHooks
*after_request
= (LttvHooks
*)*(value
.v_pointer
);
1373 struct sum_traceset_closure t_closure
;
1374 t_closure
.tss
= (LttvTracesetStats
*)tsc
;
1375 t_closure
.current_time
= ltt_time_infinite
;
1376 if(after_request
!= NULL
) lttv_hooks_call(after_request
,
1380 if(bg_req
->dialog
!= NULL
)
1381 gtk_widget_destroy(bg_req
->dialog
);
1382 GtkWidget
*parent_window
;
1383 if(g_slist_find_custom(g_main_window_list
,
1384 bg_req
->parent_window
,
1385 (GCompareFunc
)find_window_widget
))
1386 parent_window
= GTK_WIDGET(bg_req
->parent_window
);
1388 parent_window
= NULL
;
1391 gtk_message_dialog_new(GTK_WINDOW(parent_window
),
1392 GTK_DIALOG_DESTROY_WITH_PARENT
,
1393 GTK_MESSAGE_INFO
, GTK_BUTTONS_OK
,
1394 "Background computation %s finished for trace %s",
1395 g_quark_to_string(bg_req
->module_name
),
1396 g_quark_to_string(ltt_trace_name(lttv_trace(bg_req
->trace
))));
1397 if(parent_window
!= NULL
)
1398 gtk_window_set_transient_for(GTK_WINDOW(dialog
),
1399 GTK_WINDOW(parent_window
));
1400 g_signal_connect_swapped (dialog
, "response",
1401 G_CALLBACK (gtk_widget_destroy
),
1403 gtk_widget_show(dialog
);
1405 /* - remove request */
1412 GSList
*remove_iter
= iter
;
1414 iter
= g_slist_next(iter
);
1415 if(free_data
) g_free(remove_iter
->data
);
1416 *list_in
= g_slist_remove_link(*list_in
, remove_iter
);
1417 } else { // not remove
1418 iter
= g_slist_next(iter
);
1423 /* - for each notifications in notify_in */
1425 GSList
*iter
= *notify_in
;
1427 while(iter
!= NULL
) {
1428 gboolean remove
= FALSE
;
1429 gboolean free_data
= FALSE
;
1431 BackgroundNotify
*notify_req
= (BackgroundNotify
*)iter
->data
;
1433 /* - call notify and remove from notify_in */
1434 lttv_hooks_call(notify_req
->notify
, notify_req
);
1441 GSList
*remove_iter
= iter
;
1443 iter
= g_slist_next(iter
);
1445 notify_request_free((BackgroundNotify
*)remove_iter
->data
);
1446 *notify_in
= g_slist_remove_link(*notify_in
, remove_iter
);
1447 } else { // not remove
1448 iter
= g_slist_next(iter
);
1453 /* - reset the context */
1454 LTTV_TRACESET_CONTEXT_GET_CLASS(tsc
)->fini(tsc
);
1455 LTTV_TRACESET_CONTEXT_GET_CLASS(tsc
)->init(tsc
,ts
);
1457 /* - if list_out is empty */
1458 if(g_slist_length(*list_out
) == 0) {
1459 /* - return FALSE (scheduler stopped) */
1460 g_debug("Background computation scheduler stopped");
1461 g_info("Background computation finished for trace %p", trace
);
1462 /* FIXME : remove status bar info, need context id and message id */
1469 /* 3.4 else, end of trace not reached */
1470 /* - return TRUE (scheduler still registered) */
1471 g_debug("Background computation left");
1476 /* 4. Unlock traces */
1478 lttv_process_traceset_get_sync_data(tsc
);
1479 //lttv_traceset_context_position_save(tsc, sync_position);
1483 iter_trace
<lttv_traceset_number(tsc
->ts
);
1485 LttvTrace
*trace_v
= lttv_traceset_get(tsc
->ts
, iter_trace
);
1487 lttvwindowtraces_unlock(trace_v
);
1496 * Register the background computation hooks for a specific module. It adds the
1497 * computation hooks to the global attrubutes, under "computation/module name".
1499 * @param module_name A GQuark : the name of the module which computes the
1502 void lttvwindowtraces_register_computation_hooks(LttvAttributeName module_name
,
1503 LttvHooks
*before_chunk_traceset
,
1504 LttvHooks
*before_chunk_trace
,
1505 LttvHooks
*before_chunk_tracefile
,
1506 LttvHooks
*after_chunk_traceset
,
1507 LttvHooks
*after_chunk_trace
,
1508 LttvHooks
*after_chunk_tracefile
,
1509 LttvHooks
*before_request
,
1510 LttvHooks
*after_request
,
1511 LttvHooks
*event_hook
,
1512 LttvHooksById
*event_hook_by_id
,
1513 LttvHooks
*hook_adder
,
1514 LttvHooks
*hook_remover
)
1516 LttvAttribute
*g_attribute
= lttv_global_attributes();
1517 LttvAttribute
*attribute
;
1518 LttvAttributeValue value
;
1522 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
1524 g_assert(attribute
);
1527 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
1529 g_assert(attribute
);
1531 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1532 LTTV_BEFORE_CHUNK_TRACESET
,
1537 *(value
.v_pointer
) = before_chunk_traceset
;
1539 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1540 LTTV_BEFORE_CHUNK_TRACE
,
1544 *(value
.v_pointer
) = before_chunk_trace
;
1546 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1547 LTTV_BEFORE_CHUNK_TRACEFILE
,
1551 *(value
.v_pointer
) = before_chunk_tracefile
;
1553 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1554 LTTV_AFTER_CHUNK_TRACESET
,
1558 *(value
.v_pointer
) = after_chunk_traceset
;
1560 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1561 LTTV_AFTER_CHUNK_TRACE
,
1565 *(value
.v_pointer
) = after_chunk_trace
;
1567 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1568 LTTV_AFTER_CHUNK_TRACEFILE
,
1572 *(value
.v_pointer
) = after_chunk_tracefile
;
1574 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1575 LTTV_BEFORE_REQUEST
,
1579 *(value
.v_pointer
) = before_request
;
1581 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1586 *(value
.v_pointer
) = after_request
;
1588 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1593 *(value
.v_pointer
) = event_hook
;
1595 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1596 LTTV_EVENT_HOOK_BY_ID
,
1600 *(value
.v_pointer
) = event_hook_by_id
;
1602 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1607 *(value
.v_pointer
) = hook_adder
;
1609 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1614 *(value
.v_pointer
) = hook_remover
;
1620 * It removes all the requests that can be currently processed by the
1621 * background computation algorithm for all the traces (list_in and list_out).
1623 * Leaves the flag to in_progress or none.. depending if current or queue
1625 * @param module_name A GQuark : the name of the module which computes the
1628 void lttvwindowtraces_unregister_requests(LttvAttributeName module_name
)
1633 for(i
=0;i
<lttvwindowtraces_get_number();i
++) {
1634 LttvTrace
*trace_v
= lttvwindowtraces_get_trace(i
);
1635 g_assert(trace_v
!= NULL
);
1636 LttvAttribute
*attribute
= lttv_trace_attribute(trace_v
);
1637 LttvAttributeValue value
;
1638 GSList
**queue
, **current
;
1641 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1642 LTTV_REQUESTS_QUEUE
,
1647 queue
= (GSList
**)(value
.v_pointer
);
1650 while(iter
!= NULL
) {
1651 gboolean remove
= FALSE
;
1652 gboolean free_data
= FALSE
;
1654 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1656 if(bg_req
->module_name
== module_name
) {
1664 GSList
*remove_iter
= iter
;
1666 iter
= g_slist_next(iter
);
1667 if(free_data
) g_free(remove_iter
->data
);
1668 *queue
= g_slist_remove_link(*queue
, remove_iter
);
1669 } else { // not remove
1670 iter
= g_slist_next(iter
);
1675 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1676 LTTV_REQUESTS_CURRENT
,
1681 current
= (GSList
**)(value
.v_pointer
);
1684 while(iter
!= NULL
) {
1685 gboolean remove
= FALSE
;
1686 gboolean free_data
= FALSE
;
1688 BackgroundRequest
*bg_req
= (BackgroundRequest
*)iter
->data
;
1690 if(bg_req
->module_name
== module_name
) {
1698 GSList
*remove_iter
= iter
;
1700 iter
= g_slist_next(iter
);
1701 if(free_data
) g_free(remove_iter
->data
);
1702 *current
= g_slist_remove_link(*current
, remove_iter
);
1703 } else { // not remove
1704 iter
= g_slist_next(iter
);
1712 * Unregister the background computation hooks for a specific module.
1714 * It also removes all the requests that can be currently processed by the
1715 * background computation algorithm for all the traces (list_in and list_out).
1717 * @param module_name A GQuark : the name of the module which computes the
1721 void lttvwindowtraces_unregister_computation_hooks
1722 (LttvAttributeName module_name
)
1724 LttvAttribute
*g_attribute
= lttv_global_attributes();
1725 LttvAttribute
*attribute
;
1726 LttvAttributeValue value
;
1730 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
1732 g_assert(attribute
);
1735 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(attribute
),
1737 g_assert(attribute
);
1739 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1740 LTTV_BEFORE_CHUNK_TRACESET
,
1745 LttvHooks
*before_chunk_traceset
= (LttvHooks
*)*(value
.v_pointer
);
1746 if(before_chunk_traceset
!= NULL
)
1747 lttv_hooks_destroy(before_chunk_traceset
);
1749 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1750 LTTV_BEFORE_CHUNK_TRACE
,
1755 LttvHooks
*before_chunk_trace
= (LttvHooks
*)*(value
.v_pointer
);
1756 if(before_chunk_trace
!= NULL
)
1757 lttv_hooks_destroy(before_chunk_trace
);
1759 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1760 LTTV_BEFORE_CHUNK_TRACEFILE
,
1765 LttvHooks
*before_chunk_tracefile
= (LttvHooks
*)*(value
.v_pointer
);
1766 if(before_chunk_tracefile
!= NULL
)
1767 lttv_hooks_destroy(before_chunk_tracefile
);
1769 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1770 LTTV_AFTER_CHUNK_TRACESET
,
1775 LttvHooks
*after_chunk_traceset
= (LttvHooks
*)*(value
.v_pointer
);
1776 if(after_chunk_traceset
!= NULL
)
1777 lttv_hooks_destroy(after_chunk_traceset
);
1779 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1780 LTTV_AFTER_CHUNK_TRACE
,
1785 LttvHooks
*after_chunk_trace
= (LttvHooks
*)*(value
.v_pointer
);
1786 if(after_chunk_trace
!= NULL
)
1787 lttv_hooks_destroy(after_chunk_trace
);
1789 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1790 LTTV_AFTER_CHUNK_TRACEFILE
,
1795 LttvHooks
*after_chunk_tracefile
= (LttvHooks
*)*(value
.v_pointer
);
1796 if(after_chunk_tracefile
!= NULL
)
1797 lttv_hooks_destroy(after_chunk_tracefile
);
1799 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1800 LTTV_BEFORE_REQUEST
,
1805 LttvHooks
*before_request
= (LttvHooks
*)*(value
.v_pointer
);
1806 if(before_request
!= NULL
)
1807 lttv_hooks_destroy(before_request
);
1809 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1815 LttvHooks
*after_request
= (LttvHooks
*)*(value
.v_pointer
);
1816 if(after_request
!= NULL
)
1817 lttv_hooks_destroy(after_request
);
1819 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1825 LttvHooks
*event_hook
= (LttvHooks
*)*(value
.v_pointer
);
1826 if(event_hook
!= NULL
)
1827 lttv_hooks_destroy(event_hook
);
1829 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1830 LTTV_EVENT_HOOK_BY_ID
,
1835 LttvHooksById
*event_hook_by_id
= (LttvHooksById
*)*(value
.v_pointer
);
1836 if(event_hook_by_id
!= NULL
)
1837 lttv_hooks_by_id_destroy(event_hook_by_id
);
1839 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1845 LttvHooks
*hook_adder
= (LttvHooks
*)*(value
.v_pointer
);
1846 if(hook_adder
!= NULL
)
1847 lttv_hooks_destroy(hook_adder
);
1849 result
= lttv_iattribute_find(LTTV_IATTRIBUTE(attribute
),
1855 LttvHooks
*hook_remover
= (LttvHooks
*)*(value
.v_pointer
);
1856 if(hook_remover
!= NULL
)
1857 lttv_hooks_destroy(hook_remover
);
1860 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1861 LTTV_EVENT_HOOK_BY_ID
);
1862 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1865 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1866 LTTV_AFTER_REQUEST
);
1867 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1868 LTTV_BEFORE_REQUEST
);
1870 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1871 LTTV_AFTER_CHUNK_TRACEFILE
);
1872 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1873 LTTV_AFTER_CHUNK_TRACE
);
1874 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1875 LTTV_AFTER_CHUNK_TRACESET
);
1877 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1878 LTTV_BEFORE_CHUNK_TRACEFILE
);
1879 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1880 LTTV_BEFORE_CHUNK_TRACE
);
1881 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1882 LTTV_BEFORE_CHUNK_TRACESET
);
1883 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1885 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1888 /* finally, remove module name */
1890 LTTV_ATTRIBUTE(lttv_iattribute_find_subdir(LTTV_IATTRIBUTE(g_attribute
),
1892 g_assert(attribute
);
1893 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1899 * Lock a trace so no other instance can use it.
1901 * @param trace The trace to lock.
1902 * @return 0 on success, -1 if cannot get lock.
1904 gint
lttvwindowtraces_lock(LttvTrace
*trace
)
1906 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
1907 LttvAttributeValue value
;
1908 LttvAttributeType type
;
1910 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1913 /* Verify the absence of the lock. */
1914 if(type
!= LTTV_NONE
) {
1915 g_critical("Cannot take trace lock");
1919 value
= lttv_iattribute_add(LTTV_IATTRIBUTE(attribute
),
1922 /* the value is left unset. The only presence of the attribute is necessary.
1931 * @param trace The trace to unlock.
1932 * @return 0 on success, -1 if cannot unlock (not locked ?).
1934 gint
lttvwindowtraces_unlock(LttvTrace
*trace
)
1936 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
1937 LttvAttributeType type
;
1938 LttvAttributeValue value
;
1940 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1943 /* Verify the presence of the lock. */
1944 if(type
== LTTV_NONE
) {
1945 g_critical("Cannot release trace lock");
1949 lttv_iattribute_remove_by_name(LTTV_IATTRIBUTE(attribute
),
1956 * Verify if a trace is locked.
1958 * @param trace The trace to verify.
1959 * @return TRUE if locked, FALSE is unlocked.
1961 gint
lttvwindowtraces_get_lock_state(LttvTrace
*trace
)
1963 LttvAttribute
*attribute
= lttv_trace_attribute(trace
);
1964 LttvAttributeType type
;
1965 LttvAttributeValue value
;
1967 type
= lttv_iattribute_get_by_name(LTTV_IATTRIBUTE(attribute
),
1970 /* The only presence of the attribute is necessary. */
1971 if(type
== LTTV_NONE
)