1 /* This file is part of the Linux Trace Toolkit viewer
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,
24 #include "processlist.h"
27 #define g_info(format...) g_log (G_LOG_DOMAIN, G_LOG_LEVEL_INFO, format)
28 #define g_debug(format...) g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, format)
31 /*****************************************************************************
32 * Methods to synchronize process list *
33 *****************************************************************************/
35 //static inline guint get_cpu_number_from_name(GQuark name);
37 /* Enumeration of the columns */
51 gint
process_sort_func ( GtkTreeModel
*model
,
58 memset(&a
, 0, sizeof(GValue
));
59 memset(&b
, 0, sizeof(GValue
));
62 gtk_tree_model_get_value( model
,
67 gtk_tree_model_get_value( model
,
72 if(G_VALUE_TYPE(&a
) == G_TYPE_UINT
73 && G_VALUE_TYPE(&b
) == G_TYPE_UINT
)
77 if(g_value_get_uint(&a
) == 0 && g_value_get_uint(&b
) == 0) {
81 memset(&cpua
, 0, sizeof(GValue
));
82 memset(&cpub
, 0, sizeof(GValue
));
84 /* If 0, order by CPU */
85 gtk_tree_model_get_value( model
,
90 gtk_tree_model_get_value( model
,
95 if(G_VALUE_TYPE(&cpua
) == G_TYPE_UINT
96 && G_VALUE_TYPE(&cpub
) == G_TYPE_UINT
)
98 if(g_value_get_uint(&cpua
) > g_value_get_uint(&cpub
))
100 g_value_unset(&cpua
);
101 g_value_unset(&cpub
);
104 if(g_value_get_uint(&cpua
) < g_value_get_uint(&cpub
))
106 g_value_unset(&cpua
);
107 g_value_unset(&cpub
);
112 g_value_unset(&cpua
);
113 g_value_unset(&cpub
);
115 } else { /* if not 0, order by pid */
117 if(g_value_get_uint(&a
) > g_value_get_uint(&b
))
123 if(g_value_get_uint(&a
) < g_value_get_uint(&b
))
137 /* Order by birth second */
138 gtk_tree_model_get_value( model
,
143 gtk_tree_model_get_value( model
,
149 if(G_VALUE_TYPE(&a
) == G_TYPE_ULONG
150 && G_VALUE_TYPE(&b
) == G_TYPE_ULONG
)
152 if(g_value_get_ulong(&a
) > g_value_get_ulong(&b
))
158 if(g_value_get_ulong(&a
) < g_value_get_ulong(&b
))
170 /* Order by birth nanosecond */
171 gtk_tree_model_get_value( model
,
176 gtk_tree_model_get_value( model
,
182 if(G_VALUE_TYPE(&a
) == G_TYPE_ULONG
183 && G_VALUE_TYPE(&b
) == G_TYPE_ULONG
)
185 if(g_value_get_ulong(&a
) > g_value_get_ulong(&b
))
191 if(g_value_get_ulong(&a
) < g_value_get_ulong(&b
))
203 /* Order by trace_num */
204 gtk_tree_model_get_value( model
,
209 gtk_tree_model_get_value( model
,
214 if(G_VALUE_TYPE(&a
) == G_TYPE_ULONG
215 && G_VALUE_TYPE(&b
) == G_TYPE_ULONG
)
217 if(g_value_get_ulong(&a
) > g_value_get_ulong(&b
))
223 if(g_value_get_ulong(&a
) < g_value_get_ulong(&b
))
236 static guint
process_list_hash_fct(gconstpointer key
)
238 guint pid
= ((ProcessInfo
*)key
)->pid
;
239 return ((pid
>>8 ^ pid
>>4 ^ pid
>>2 ^ pid
) ^ ((ProcessInfo
*)key
)->cpu
);
242 /* If hash is good, should be different */
243 static gboolean
process_list_equ_fct(gconstpointer a
, gconstpointer b
)
245 const ProcessInfo
*pa
= (const ProcessInfo
*)a
;
246 const ProcessInfo
*pb
= (const ProcessInfo
*)b
;
250 if(likely(pa
->pid
!= pb
->pid
))
252 else if(likely((pa
->pid
== 0 && (pa
->cpu
!= pb
->cpu
))))
254 else if(unlikely(ltt_time_compare(pa
->birth
, pb
->birth
) != 0))
256 else if(unlikely(pa
->trace_num
!= pb
->trace_num
))
262 void destroy_hash_key(gpointer key
);
264 void destroy_hash_data(gpointer data
);
269 ProcessList
*processlist_construct(void)
271 GtkTreeViewColumn
*column
;
272 GtkCellRenderer
*renderer
;
274 ProcessList
* process_list
= g_new(ProcessList
,1);
276 process_list
->number_of_process
= 0;
277 process_list
->cell_height_cache
= -1;
279 process_list
->current_hash_data
= NULL
;
281 /* Create the Process list */
282 process_list
->list_store
= gtk_list_store_new ( N_COLUMNS
,
292 process_list
->process_list_widget
=
293 gtk_tree_view_new_with_model
294 (GTK_TREE_MODEL (process_list
->list_store
));
295 g_object_unref (G_OBJECT (process_list
->list_store
));
297 gtk_tree_sortable_set_sort_func(
298 GTK_TREE_SORTABLE(process_list
->list_store
),
304 gtk_tree_sortable_set_sort_column_id(
305 GTK_TREE_SORTABLE(process_list
->list_store
),
309 process_list
->process_hash
= g_hash_table_new_full(
310 process_list_hash_fct
, process_list_equ_fct
,
311 destroy_hash_key
, destroy_hash_data
315 gtk_tree_view_set_headers_visible(
316 GTK_TREE_VIEW(process_list
->process_list_widget
), TRUE
);
318 /* Create a column, associating the "text" attribute of the
319 * cell_renderer to the first column of the model */
320 /* Columns alignment : 0.0 : Left 0.5 : Center 1.0 : Right */
321 renderer
= gtk_cell_renderer_text_new ();
322 column
= gtk_tree_view_column_new_with_attributes ( "Process",
327 gtk_tree_view_column_set_alignment (column
, 0.0);
328 gtk_tree_view_column_set_fixed_width (column
, 45);
329 gtk_tree_view_append_column (
330 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
332 process_list
->button
= column
->button
;
334 column
= gtk_tree_view_column_new_with_attributes ( "PID",
339 gtk_tree_view_append_column (
340 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
342 column
= gtk_tree_view_column_new_with_attributes ( "PPID",
347 gtk_tree_view_append_column (
348 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
350 column
= gtk_tree_view_column_new_with_attributes ( "CPU",
355 gtk_tree_view_append_column (
356 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
358 column
= gtk_tree_view_column_new_with_attributes ( "Birth sec",
363 gtk_tree_view_append_column (
364 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
366 //gtk_tree_view_column_set_visible(column, 0);
368 column
= gtk_tree_view_column_new_with_attributes ( "Birth nsec",
373 gtk_tree_view_append_column (
374 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
376 column
= gtk_tree_view_column_new_with_attributes ( "TRACE",
381 gtk_tree_view_append_column (
382 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
385 //gtk_tree_view_column_set_visible(column, 0);
387 g_object_set_data_full(
388 G_OBJECT(process_list
->process_list_widget
),
391 (GDestroyNotify
)processlist_destroy
);
396 void processlist_destroy(ProcessList
*process_list
)
398 g_debug("processlist_destroy %p", process_list
);
399 g_hash_table_destroy(process_list
->process_hash
);
400 process_list
->process_hash
= NULL
;
402 g_free(process_list
);
403 g_debug("processlist_destroy end");
406 static gboolean
remove_hash_item(ProcessInfo
*process_info
,
407 HashedProcessData
*hashed_process_data
,
408 ProcessList
*process_list
)
412 iter
= hashed_process_data
->y_iter
;
414 gtk_list_store_remove (process_list
->list_store
, &iter
);
416 if(likely(process_list
->current_hash_data
!= NULL
)) {
417 if(likely(hashed_process_data
==
418 process_list
->current_hash_data
[process_info
->cpu
]))
419 process_list
->current_hash_data
[process_info
->cpu
] = NULL
;
421 return TRUE
; /* remove the element from the hash table */
424 void processlist_clear(ProcessList
*process_list
)
426 g_info("processlist_clear %p", process_list
);
428 g_hash_table_foreach_remove(process_list
->process_hash
,
429 (GHRFunc
)remove_hash_item
,
430 (gpointer
)process_list
);
431 process_list
->number_of_process
= 0;
435 GtkWidget
*processlist_get_widget(ProcessList
*process_list
)
437 return process_list
->process_list_widget
;
441 void destroy_hash_key(gpointer key
)
446 void destroy_hash_data(gpointer data
)
451 int processlist_add( ProcessList
*process_list
,
459 ProcessInfo
**pm_process_info
,
460 HashedProcessData
**pm_hashed_process_data
)
462 ProcessInfo
*Process_Info
= g_new(ProcessInfo
, 1);
463 HashedProcessData
*hashed_process_data
= g_new(HashedProcessData
, 1);
464 *pm_hashed_process_data
= hashed_process_data
;
465 *pm_process_info
= Process_Info
;
467 Process_Info
->pid
= pid
;
469 Process_Info
->cpu
= cpu
;
471 Process_Info
->cpu
= 0;
472 Process_Info
->ppid
= ppid
;
473 Process_Info
->birth
= *birth
;
474 Process_Info
->trace_num
= trace_num
;
476 /* When we create it from before state update, we are sure that the
477 * last event occured before the beginning of the global area.
479 * If it is created after state update, this value (0) will be
480 * overriden by the new state before anything is drawn.
482 hashed_process_data
->x
.over
= 0;
483 hashed_process_data
->x
.over_used
= FALSE
;
484 hashed_process_data
->x
.over_marked
= FALSE
;
485 hashed_process_data
->x
.middle
= 0;
486 hashed_process_data
->x
.middle_used
= FALSE
;
487 hashed_process_data
->x
.middle_marked
= FALSE
;
488 hashed_process_data
->x
.under
= 0;
489 hashed_process_data
->x
.under_used
= FALSE
;
490 hashed_process_data
->x
.under_marked
= FALSE
;
491 hashed_process_data
->next_good_time
= ltt_time_zero
;
493 /* Add a new row to the model */
494 gtk_list_store_append ( process_list
->list_store
,
495 &hashed_process_data
->y_iter
);
497 gtk_list_store_set ( process_list
->list_store
, &hashed_process_data
->y_iter
,
498 PROCESS_COLUMN
, name
,
502 BIRTH_S_COLUMN
, birth
->tv_sec
,
503 BIRTH_NS_COLUMN
, birth
->tv_nsec
,
504 TRACE_COLUMN
, trace_num
,
507 hashed_process_data
->row_ref
= gtk_tree_row_reference_new (
508 GTK_TREE_MODEL(process_list
->list_store
),
509 gtk_tree_model_get_path(
510 GTK_TREE_MODEL(process_list
->list_store
),
513 g_hash_table_insert(process_list
->process_hash
,
514 (gpointer
)Process_Info
,
515 (gpointer
)hashed_process_data
);
517 //g_critical ( "iter after : %s", gtk_tree_path_to_string (
518 // gtk_tree_model_get_path (
519 // GTK_TREE_MODEL(process_list->list_store),
521 process_list
->number_of_process
++;
523 *height
= get_cell_height(process_list
,
524 GTK_TREE_VIEW(process_list
->process_list_widget
))
525 * process_list
->number_of_process
;
530 int processlist_remove( ProcessList
*process_list
,
536 ProcessInfo process_info
;
538 HashedProcessData
*hashed_process_data
;
541 process_info
.pid
= pid
;
543 process_info
.cpu
= cpu
;
545 process_info
.cpu
= 0;
546 process_info
.birth
= *birth
;
547 process_info
.trace_num
= trace_num
;
550 hashed_process_data
=
551 (HashedProcessData
*)g_hash_table_lookup(
552 process_list
->process_hash
,
554 if(likely(hashed_process_data
!= NULL
))
556 iter
= hashed_process_data
->y_iter
;
558 gtk_list_store_remove (process_list
->list_store
, &iter
);
560 g_hash_table_remove(process_list
->process_hash
,
563 if(likely(process_list
->current_hash_data
!= NULL
)) {
564 if(likely(hashed_process_data
== process_list
->current_hash_data
[cpu
])) {
565 process_list
->current_hash_data
[cpu
] = NULL
;
568 process_list
->number_of_process
--;
578 static inline guint
get_cpu_number_from_name(GQuark name
)
584 string
= g_quark_to_string(name
);
586 begin
= strrchr(string
, '/');
589 g_assert(begin
!= '\0');
591 cpu
= strtoul(begin
, NULL
, 10);