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,
25 #include "processlist.h"
29 #define g_info(format...) g_log (G_LOG_DOMAIN, G_LOG_LEVEL_INFO, format)
30 #define g_debug(format...) g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, format)
32 /* Preallocated Size of the index_to_pixmap array */
33 #define ALLOCATE_PROCESSES 1000
35 /*****************************************************************************
36 * Methods to synchronize process list *
37 *****************************************************************************/
40 gint
process_sort_func ( GtkTreeModel
*model
,
46 guint a_pid
, a_ppid
, a_cpu
;
47 gulong a_birth_s
, a_birth_ns
;
51 guint b_pid
, b_ppid
, b_cpu
;
52 gulong b_birth_s
, b_birth_ns
;
55 gtk_tree_model_get(model
,
66 gtk_tree_model_get(model
,
79 if(a_pid
== 0 && b_pid
== 0) {
80 /* If 0, order by CPU */
81 if(a_cpu
> b_cpu
) return 1;
82 if(a_cpu
< b_cpu
) return -1;
84 } else { /* if not 0, order by pid */
86 if(a_pid
> b_pid
) return 1;
87 if(a_pid
< b_pid
) return -1;
90 /* Order by birth second */
92 if(a_birth_s
> b_birth_s
) return 1;
93 if(a_birth_s
< b_birth_s
) return -1;
96 /* Order by birth nanosecond */
97 if(a_birth_ns
> b_birth_ns
) return 1;
98 if(a_birth_ns
< b_birth_ns
) return -1;
100 /* Order by trace_num */
101 if(a_trace
> b_trace
) return 1;
102 if(a_trace
< b_trace
) return -1;
108 static guint
process_list_hash_fct(gconstpointer key
)
110 guint pid
= ((const ProcessInfo
*)key
)->pid
;
111 return ((pid
>>8 ^ pid
>>4 ^ pid
>>2 ^ pid
) ^ ((const ProcessInfo
*)key
)->cpu
);
114 /* If hash is good, should be different */
115 static gboolean
process_list_equ_fct(gconstpointer a
, gconstpointer b
)
117 const ProcessInfo
*pa
= (const ProcessInfo
*)a
;
118 const ProcessInfo
*pb
= (const ProcessInfo
*)b
;
122 if(likely(pa
->pid
!= pb
->pid
))
124 else if(likely((pa
->pid
== 0 && (pa
->cpu
!= pb
->cpu
))))
126 else if(unlikely(ltt_time_compare(pa
->birth
, pb
->birth
) != 0))
128 else if(unlikely(pa
->trace_num
!= pb
->trace_num
))
134 void destroy_hash_key(gpointer key
);
136 void destroy_hash_data(gpointer data
);
139 static void update_index_to_pixmap_each(ProcessInfo
*key
,
140 HashedProcessData
*value
,
141 ProcessList
*process_list
)
143 guint array_index
= processlist_get_index_from_data(process_list
, value
);
145 g_assert(array_index
< process_list
->index_to_pixmap
->len
);
148 (GdkPixmap
**)&g_ptr_array_index(process_list
->index_to_pixmap
, array_index
);
150 *pixmap
= value
->pixmap
;
154 void update_index_to_pixmap(ProcessList
*process_list
)
156 g_ptr_array_set_size(process_list
->index_to_pixmap
,
157 g_hash_table_size(process_list
->process_hash
));
158 g_hash_table_foreach(process_list
->process_hash
,
159 (GHFunc
)update_index_to_pixmap_each
,
164 static void update_pixmap_size_each(ProcessInfo
*key
,
165 HashedProcessData
*value
,
168 GdkPixmap
*old_pixmap
= value
->pixmap
;
171 gdk_pixmap_new(old_pixmap
,
176 gdk_pixmap_unref(old_pixmap
);
180 void update_pixmap_size(ProcessList
*process_list
, guint width
)
182 g_hash_table_foreach(process_list
->process_hash
,
183 (GHFunc
)update_pixmap_size_each
,
188 typedef struct _CopyPixmap
{
192 gint xsrc
, ysrc
, xdest
, ydest
, width
, height
;
195 static void copy_pixmap_region_each(ProcessInfo
*key
,
196 HashedProcessData
*value
,
199 GdkPixmap
*src
= cp
->src
;
200 GdkPixmap
*dest
= cp
->dest
;
203 dest
= value
->pixmap
;
207 gdk_draw_drawable (dest
,
211 cp
->xdest
, cp
->ydest
,
212 cp
->width
, cp
->height
);
218 void copy_pixmap_region(ProcessList
*process_list
, GdkDrawable
*dest
,
219 GdkGC
*gc
, GdkDrawable
*src
,
220 gint xsrc
, gint ysrc
,
221 gint xdest
, gint ydest
, gint width
, gint height
)
223 CopyPixmap cp
= { dest
, gc
, src
, xsrc
, ysrc
, xdest
, ydest
, width
, height
};
225 g_hash_table_foreach(process_list
->process_hash
,
226 (GHFunc
)copy_pixmap_region_each
,
232 typedef struct _RectanglePixmap
{
234 gint x
, y
, width
, height
;
238 static void rectangle_pixmap_each(ProcessInfo
*key
,
239 HashedProcessData
*value
,
243 rp
->height
= value
->height
;
245 gdk_draw_rectangle (value
->pixmap
,
249 rp
->width
, rp
->height
);
255 void rectangle_pixmap(ProcessList
*process_list
, GdkGC
*gc
,
256 gboolean filled
, gint x
, gint y
, gint width
, gint height
)
258 RectanglePixmap rp
= { filled
, x
, y
, width
, height
, gc
};
260 g_hash_table_foreach(process_list
->process_hash
,
261 (GHFunc
)rectangle_pixmap_each
,
266 /* Renders each pixmaps into on big drawable */
267 void copy_pixmap_to_screen(ProcessList
*process_list
,
271 gint width
, gint height
)
273 if(process_list
->index_to_pixmap
->len
== 0) return;
274 guint cell_height
= process_list
->cell_height
;
276 //cell_height = 24; //FIXME
278 gint begin
= floor(y
/(double)cell_height
);
279 gint end
= MIN(ceil((y
+height
)/(double)cell_height
),
280 process_list
->index_to_pixmap
->len
);
283 for(i
=begin
; i
<end
; i
++) {
284 g_assert(i
<process_list
->index_to_pixmap
->len
);
285 /* Render the pixmap to the screen */
287 (GdkPixmap
*)g_ptr_array_index(process_list
->index_to_pixmap
, i
);
289 gdk_draw_drawable (dest
,
309 ProcessList
*processlist_construct(void)
311 GtkTreeViewColumn
*column
;
312 GtkCellRenderer
*renderer
;
314 ProcessList
* process_list
= g_new(ProcessList
,1);
316 process_list
->number_of_process
= 0;
318 process_list
->current_hash_data
= NULL
;
320 /* Create the Process list */
321 process_list
->list_store
= gtk_list_store_new ( N_COLUMNS
,
331 process_list
->process_list_widget
=
332 gtk_tree_view_new_with_model
333 (GTK_TREE_MODEL (process_list
->list_store
));
335 g_object_unref (G_OBJECT (process_list
->list_store
));
337 gtk_tree_sortable_set_default_sort_func(
338 GTK_TREE_SORTABLE(process_list
->list_store
),
343 process_list
->process_hash
= g_hash_table_new_full(
344 process_list_hash_fct
, process_list_equ_fct
,
345 destroy_hash_key
, destroy_hash_data
349 gtk_tree_view_set_headers_visible(
350 GTK_TREE_VIEW(process_list
->process_list_widget
), TRUE
);
352 /* Create a column, associating the "text" attribute of the
353 * cell_renderer to the first column of the model */
354 /* Columns alignment : 0.0 : Left 0.5 : Center 1.0 : Right */
355 renderer
= gtk_cell_renderer_text_new ();
356 process_list
->renderer
= renderer
;
358 gtk_cell_renderer_get_size(renderer
,
359 GTK_WIDGET(process_list
->process_list_widget
),
364 &process_list
->cell_height
);
367 g_object_get(G_OBJECT(renderer
), "ypad", &ypad
, NULL
);
369 process_list
->cell_height
+= ypad
;
371 column
= gtk_tree_view_column_new_with_attributes ( "Process",
376 gtk_tree_view_column_set_alignment (column
, 0.0);
377 gtk_tree_view_column_set_fixed_width (column
, 45);
378 gtk_tree_view_append_column (
379 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
381 process_list
->button
= column
->button
;
383 column
= gtk_tree_view_column_new_with_attributes ( "PID",
388 gtk_tree_view_append_column (
389 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
391 column
= gtk_tree_view_column_new_with_attributes ( "PPID",
396 gtk_tree_view_append_column (
397 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
399 column
= gtk_tree_view_column_new_with_attributes ( "CPU",
404 gtk_tree_view_append_column (
405 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
407 column
= gtk_tree_view_column_new_with_attributes ( "Birth sec",
412 gtk_tree_view_append_column (
413 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
415 //gtk_tree_view_column_set_visible(column, 0);
417 column
= gtk_tree_view_column_new_with_attributes ( "Birth nsec",
422 gtk_tree_view_append_column (
423 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
425 column
= gtk_tree_view_column_new_with_attributes ( "TRACE",
430 gtk_tree_view_append_column (
431 GTK_TREE_VIEW (process_list
->process_list_widget
), column
);
434 //gtk_tree_view_column_set_visible(column, 0);
436 g_object_set_data_full(
437 G_OBJECT(process_list
->process_list_widget
),
440 (GDestroyNotify
)processlist_destroy
);
442 process_list
->index_to_pixmap
= g_ptr_array_sized_new(ALLOCATE_PROCESSES
);
447 void processlist_destroy(ProcessList
*process_list
)
449 g_debug("processlist_destroy %p", process_list
);
450 g_hash_table_destroy(process_list
->process_hash
);
451 process_list
->process_hash
= NULL
;
452 g_ptr_array_free(process_list
->index_to_pixmap
, TRUE
);
454 g_free(process_list
);
455 g_debug("processlist_destroy end");
458 static gboolean
remove_hash_item(ProcessInfo
*process_info
,
459 HashedProcessData
*hashed_process_data
,
460 ProcessList
*process_list
)
464 iter
= hashed_process_data
->y_iter
;
466 gtk_list_store_remove (process_list
->list_store
, &iter
);
467 gdk_pixmap_unref(hashed_process_data
->pixmap
);
469 if(likely(process_list
->current_hash_data
!= NULL
)) {
470 if(likely(hashed_process_data
==
471 process_list
->current_hash_data
[process_info
->cpu
]))
472 process_list
->current_hash_data
[process_info
->cpu
] = NULL
;
474 return TRUE
; /* remove the element from the hash table */
477 void processlist_clear(ProcessList
*process_list
)
479 g_info("processlist_clear %p", process_list
);
481 g_hash_table_foreach_remove(process_list
->process_hash
,
482 (GHRFunc
)remove_hash_item
,
483 (gpointer
)process_list
);
484 process_list
->number_of_process
= 0;
485 update_index_to_pixmap(process_list
);
489 GtkWidget
*processlist_get_widget(ProcessList
*process_list
)
491 return process_list
->process_list_widget
;
495 void destroy_hash_key(gpointer key
)
500 void destroy_hash_data(gpointer data
)
505 int processlist_add( ProcessList
*process_list
,
514 ProcessInfo
**pm_process_info
,
515 HashedProcessData
**pm_hashed_process_data
)
517 ProcessInfo
*Process_Info
= g_new(ProcessInfo
, 1);
518 HashedProcessData
*hashed_process_data
= g_new(HashedProcessData
, 1);
519 *pm_hashed_process_data
= hashed_process_data
;
520 *pm_process_info
= Process_Info
;
522 Process_Info
->pid
= pid
;
524 Process_Info
->cpu
= cpu
;
526 Process_Info
->cpu
= 0;
527 Process_Info
->ppid
= ppid
;
528 Process_Info
->birth
= *birth
;
529 Process_Info
->trace_num
= trace_num
;
531 /* When we create it from before state update, we are sure that the
532 * last event occured before the beginning of the global area.
534 * If it is created after state update, this value (0) will be
535 * overriden by the new state before anything is drawn.
537 hashed_process_data
->x
.over
= 0;
538 hashed_process_data
->x
.over_used
= FALSE
;
539 hashed_process_data
->x
.over_marked
= FALSE
;
540 hashed_process_data
->x
.middle
= 0;
541 hashed_process_data
->x
.middle_used
= FALSE
;
542 hashed_process_data
->x
.middle_marked
= FALSE
;
543 hashed_process_data
->x
.under
= 0;
544 hashed_process_data
->x
.under_used
= FALSE
;
545 hashed_process_data
->x
.under_marked
= FALSE
;
546 hashed_process_data
->next_good_time
= ltt_time_zero
;
548 /* Add a new row to the model */
549 gtk_list_store_append ( process_list
->list_store
,
550 &hashed_process_data
->y_iter
);
552 gtk_list_store_set ( process_list
->list_store
, &hashed_process_data
->y_iter
,
553 PROCESS_COLUMN
, name
,
557 BIRTH_S_COLUMN
, birth
->tv_sec
,
558 BIRTH_NS_COLUMN
, birth
->tv_nsec
,
559 TRACE_COLUMN
, trace_num
,
561 //gtk_tree_view_set_model(GTK_TREE_VIEW(process_list->process_list_widget),
562 // GTK_TREE_MODEL(process_list->list_store));
563 //gtk_container_resize_children(GTK_CONTAINER(process_list->process_list_widget));
565 g_hash_table_insert(process_list
->process_hash
,
566 (gpointer
)Process_Info
,
567 (gpointer
)hashed_process_data
);
569 process_list
->number_of_process
++;
571 hashed_process_data
->height
= process_list
->cell_height
;
573 //hashed_process_data->height = 24; // FIXME
574 g_assert(hashed_process_data
->height
!= 0);
576 *height
= hashed_process_data
->height
* process_list
->number_of_process
;
578 hashed_process_data
->pixmap
=
579 gdk_pixmap_new(drawing
->drawing_area
->window
,
580 drawing
->alloc_width
,
581 hashed_process_data
->height
,
585 gdk_draw_rectangle (hashed_process_data
->pixmap
,
586 drawing
->drawing_area
->style
->black_gc
,
589 drawing
->alloc_width
,
590 hashed_process_data
->height
);
592 update_index_to_pixmap(process_list
);
598 int processlist_remove( ProcessList
*process_list
,
604 ProcessInfo process_info
;
605 HashedProcessData
*hashed_process_data
;
608 process_info
.pid
= pid
;
610 process_info
.cpu
= cpu
;
612 process_info
.cpu
= 0;
613 process_info
.birth
= *birth
;
614 process_info
.trace_num
= trace_num
;
617 hashed_process_data
=
618 (HashedProcessData
*)g_hash_table_lookup(
619 process_list
->process_hash
,
621 if(likely(hashed_process_data
!= NULL
))
623 iter
= hashed_process_data
->y_iter
;
625 gtk_list_store_remove (process_list
->list_store
, &iter
);
627 g_hash_table_remove(process_list
->process_hash
,
630 if(likely(process_list
->current_hash_data
!= NULL
)) {
631 if(likely(hashed_process_data
== process_list
->current_hash_data
[cpu
])) {
632 process_list
->current_hash_data
[cpu
] = NULL
;
636 gdk_pixmap_unref(hashed_process_data
->pixmap
);
638 update_index_to_pixmap(process_list
);
640 process_list
->number_of_process
--;
650 static inline guint
get_cpu_number_from_name(GQuark name
)
656 string
= g_quark_to_string(name
);
658 begin
= strrchr(string
, '/');
661 g_assert(begin
!= '\0');
663 cpu
= strtoul(begin
, NULL
, 10);