ltt/branches/poly/lttv/modules/guiStatistic/guiStatistic.c

   1 #include <glib.h>
   2 #include <gmodule.h>
   3 #include <gtk/gtk.h>
   4 #include <gdk/gdk.h>
   5
   6 #include <lttv/module.h>
   7 #include <lttv/gtkTraceSet.h>
   8 #include <lttv/processTrace.h>
   9 #include <lttv/hook.h>
  10 #include <lttv/common.h>
  11 #include <lttv/state.h>
  12 #include <lttv/stats.h>
  13
  14 #include <ltt/ltt.h>
  15 #include <ltt/event.h>
  16 #include <ltt/type.h>
  17 #include <ltt/trace.h>
  18
  19 #include <string.h>
  20
  21 #include "../icons/hGuiStatisticInsert.xpm"
  22
  23 #define g_info(format...) g_log (G_LOG_DOMAIN, G_LOG_LEVEL_INFO, format)
  24 #define g_debug(format...) g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, format)
  25
  26 #define PATH_LENGTH        256
  27
  28 static LttvModule *statistic_main_win_module;
  29
  30 /** Array containing instanced objects. Used when module is unloaded */
  31 static GSList *g_statistic_viewer_data_list = NULL ;
  32
  33 typedef struct _StatisticViewerData StatisticViewerData;
  34
  35 //! Statistic Viewer's constructor hook
  36 GtkWidget *h_gui_statistic(MainWindow *parent_window, LttvTracesetSelector * s, char* key);
  37 //! Statistic Viewer's constructor
  38 StatisticViewerData *gui_statistic(MainWindow *parent_window,LttvTracesetSelector * s, char* key);
  39 //! Statistic Viewer's destructor
  40 void gui_statistic_destructor(StatisticViewerData *statistic_viewer_data);
  41 void gui_statistic_free(StatisticViewerData *statistic_viewer_data);
  42
  43 void grab_focus(GtkWidget *widget, gpointer data);
  44 static void tree_selection_changed_cb (GtkTreeSelection *selection, gpointer data);
  45
  46 void statistic_destroy_hash_key(gpointer key);
  47 void statistic_destroy_hash_data(gpointer data);
  48
  49 void get_traceset_stats(StatisticViewerData * statistic_viewer_data);
  50 void show_traceset_stats(StatisticViewerData * statistic_viewer_data);
  51 void show_tree(StatisticViewerData * statistic_viewer_data,
  52                LttvAttribute* stats,  GtkTreeIter* parent);
  53 void show_statistic(StatisticViewerData * statistic_viewer_data,
  54                     LttvAttribute* stats, GtkTextBuffer* buf);
  55
  56
  57 enum
  58 {
  59    NAME_COLUMN,
  60    N_COLUMNS
  61 };
  62
  63 struct _StatisticViewerData{
  64   MainWindow * mw;
  65   LttvTracesetStats * stats;
  66
  67   GtkWidget    * hpaned_v;
  68   GtkTreeStore * store_m;
  69   GtkWidget    * tree_v;
  70
  71   //scroll window containing Tree View
  72   GtkWidget * scroll_win_tree;
  73
  74   GtkWidget    * text_v;
  75   //scroll window containing Text View
  76   GtkWidget * scroll_win_text;
  77
  78   // Selection handler
  79   GtkTreeSelection *select_c;
  80
  81   //hash
  82   GHashTable *statistic_hash;
  83 };
  84
  85
  86 /**
  87  * plugin's init function
  88  *
  89  * This function initializes the Statistic Viewer functionnality through the
  90  * gtkTraceSet API.
  91  */
  92 G_MODULE_EXPORT void init(LttvModule *self, int argc, char *argv[]) {
  93
  94   statistic_main_win_module = lttv_module_require(self, "mainwin", argc, argv);
  95
  96   if(statistic_main_win_module == NULL){
  97       g_critical("Can't load Statistic Viewer : missing mainwin\n");
  98       return;
  99   }
 100
 101   /* Register the toolbar insert button */
 102   toolbar_item_reg(hGuiStatisticInsert_xpm, "Insert Statistic Viewer", h_gui_statistic);
 103
 104   /* Register the menu item insert entry */
 105   menu_item_reg("/", "Insert Statistic Viewer", h_gui_statistic);
 106
 107 }
 108
 109 void statistic_destroy_walk(gpointer data, gpointer user_data)
 110 {
 111   gui_statistic_destructor((StatisticViewerData*)data);
 112 }
 113
 114 /**
 115  * plugin's destroy function
 116  *
 117  * This function releases the memory reserved by the module and unregisters
 118  * everything that has been registered in the gtkTraceSet API.
 119  */
 120 G_MODULE_EXPORT void destroy() {
 121   int i;
 122
 123   if(g_statistic_viewer_data_list){
 124     g_slist_foreach(g_statistic_viewer_data_list, statistic_destroy_walk, NULL );
 125     g_slist_free(g_statistic_viewer_data_list);
 126   }
 127
 128   /* Unregister the toolbar insert button */
 129   toolbar_item_unreg(h_gui_statistic);
 130
 131   /* Unregister the menu item insert entry */
 132   menu_item_unreg(h_gui_statistic);
 133 }
 134
 135
 136 void
 137 gui_statistic_free(StatisticViewerData *statistic_viewer_data)
 138 {
 139   if(statistic_viewer_data){
 140     g_hash_table_destroy(statistic_viewer_data->statistic_hash);
 141     g_statistic_viewer_data_list = g_slist_remove(g_statistic_viewer_data_list, statistic_viewer_data);
 142     g_free(statistic_viewer_data);
 143   }
 144 }
 145
 146 void
 147 gui_statistic_destructor(StatisticViewerData *statistic_viewer_data)
 148 {
 149   /* May already been done by GTK window closing */
 150   if(GTK_IS_WIDGET(statistic_viewer_data->hpaned_v)){
 151     gtk_widget_destroy(statistic_viewer_data->hpaned_v);
 152     statistic_viewer_data = NULL;
 153   }
 154   //gui_statistic_free(statistic_viewer_data);
 155 }
 156
 157
 158 /**
 159  * Statistic Viewer's constructor hook
 160  *
 161  * This constructor is given as a parameter to the menuitem and toolbar button
 162  * registration. It creates the list.
 163  * @param parent_window A pointer to the parent window.
 164  * @return The widget created.
 165  */
 166 GtkWidget *
 167 h_gui_statistic(MainWindow * parent_window, LttvTracesetSelector * s, char* key)
 168 {
 169   StatisticViewerData* statistic_viewer_data = gui_statistic(parent_window, s, key) ;
 170
 171   if(statistic_viewer_data)
 172     return statistic_viewer_data->hpaned_v;
 173   else return NULL;
 174
 175 }
 176
 177 /**
 178  * Statistic Viewer's constructor
 179  *
 180  * This constructor is used to create StatisticViewerData data structure.
 181  * @return The Statistic viewer data created.
 182  */
 183 StatisticViewerData *
 184 gui_statistic(MainWindow *parent_window, LttvTracesetSelector * s, char* key)
 185 {
 186   GtkCellRenderer *renderer;
 187   GtkTreeViewColumn *column;
 188
 189   StatisticViewerData* statistic_viewer_data = g_new(StatisticViewerData,1);
 190
 191   statistic_viewer_data->mw     = parent_window;
 192   statistic_viewer_data->stats  = get_traceset_stats_api(statistic_viewer_data->mw);
 193
 194   statistic_viewer_data->statistic_hash = g_hash_table_new_full(g_str_hash, g_str_equal,
 195                                                                 statistic_destroy_hash_key,
 196                                                                 statistic_destroy_hash_data);
 197
 198   statistic_viewer_data->hpaned_v  = gtk_hpaned_new();
 199   statistic_viewer_data->store_m = gtk_tree_store_new (N_COLUMNS, G_TYPE_STRING);
 200   statistic_viewer_data->tree_v  = gtk_tree_view_new_with_model (GTK_TREE_MODEL (statistic_viewer_data->store_m));
 201   g_object_unref (G_OBJECT (statistic_viewer_data->store_m));
 202
 203   g_signal_connect (G_OBJECT (statistic_viewer_data->tree_v), "grab-focus",
 204                     G_CALLBACK (grab_focus),
 205                     statistic_viewer_data);
 206
 207   // Setup the selection handler
 208   statistic_viewer_data->select_c = gtk_tree_view_get_selection (GTK_TREE_VIEW (statistic_viewer_data->tree_v));
 209   gtk_tree_selection_set_mode (statistic_viewer_data->select_c, GTK_SELECTION_SINGLE);
 210   g_signal_connect (G_OBJECT (statistic_viewer_data->select_c), "changed",
 211                     G_CALLBACK (tree_selection_changed_cb),
 212                     statistic_viewer_data);
 213
 214   renderer = gtk_cell_renderer_text_new ();
 215   column = gtk_tree_view_column_new_with_attributes ("Statistic Name",
 216                                                      renderer,
 217                                                      "text", NAME_COLUMN,
 218                                                      NULL);
 219   gtk_tree_view_column_set_alignment (column, 0.0);
 220   //  gtk_tree_view_column_set_fixed_width (column, 45);
 221   gtk_tree_view_append_column (GTK_TREE_VIEW (statistic_viewer_data->tree_v), column);
 222
 223
 224   gtk_tree_view_set_headers_visible(GTK_TREE_VIEW (statistic_viewer_data->tree_v), FALSE);
 225
 226   statistic_viewer_data->scroll_win_tree = gtk_scrolled_window_new (NULL, NULL);
 227   gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(statistic_viewer_data->scroll_win_tree),
 228                                  GTK_POLICY_AUTOMATIC,GTK_POLICY_AUTOMATIC);
 229
 230   gtk_container_add (GTK_CONTAINER (statistic_viewer_data->scroll_win_tree), statistic_viewer_data->tree_v);
 231   gtk_paned_pack1(GTK_PANED(statistic_viewer_data->hpaned_v),statistic_viewer_data->scroll_win_tree, TRUE, FALSE);
 232   gtk_paned_set_position(GTK_PANED(statistic_viewer_data->hpaned_v), 160);
 233
 234   statistic_viewer_data->scroll_win_text = gtk_scrolled_window_new (NULL, NULL);
 235   gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(statistic_viewer_data->scroll_win_text),
 236                                  GTK_POLICY_AUTOMATIC,GTK_POLICY_AUTOMATIC);
 237
 238   statistic_viewer_data->text_v = gtk_text_view_new ();
 239   g_signal_connect (G_OBJECT (statistic_viewer_data->text_v), "grab-focus",
 240                     G_CALLBACK (grab_focus),
 241                     statistic_viewer_data);
 242
 243   gtk_text_view_set_editable(GTK_TEXT_VIEW(statistic_viewer_data->text_v),FALSE);
 244   gtk_text_view_set_cursor_visible(GTK_TEXT_VIEW(statistic_viewer_data->text_v),FALSE);
 245   gtk_container_add (GTK_CONTAINER (statistic_viewer_data->scroll_win_text), statistic_viewer_data->text_v);
 246   gtk_paned_pack2(GTK_PANED(statistic_viewer_data->hpaned_v), statistic_viewer_data->scroll_win_text, TRUE, FALSE);
 247
 248   gtk_widget_show(statistic_viewer_data->scroll_win_tree);
 249   gtk_widget_show(statistic_viewer_data->scroll_win_text);
 250   gtk_widget_show(statistic_viewer_data->tree_v);
 251   gtk_widget_show(statistic_viewer_data->text_v);
 252   gtk_widget_show(statistic_viewer_data->hpaned_v);
 253
 254   g_object_set_data(
 255                     G_OBJECT(statistic_viewer_data->hpaned_v),
 256                     key,
 257                     s);
 258
 259   g_object_set_data_full(
 260                         G_OBJECT(statistic_viewer_data->hpaned_v),
 261                         "statistic_viewer_data",
 262                         statistic_viewer_data,
 263                         (GDestroyNotify)gui_statistic_free);
 264
 265   /* Add the object's information to the module's array */
 266   g_statistic_viewer_data_list = g_slist_append(
 267                         g_statistic_viewer_data_list,
 268                         statistic_viewer_data);
 269
 270   get_traceset_stats(statistic_viewer_data);
 271
 272   return statistic_viewer_data;
 273 }
 274
 275 void grab_focus(GtkWidget *widget, gpointer data)
 276 {
 277   StatisticViewerData *statistic_viewer_data = (StatisticViewerData *)data;
 278   MainWindow * mw = statistic_viewer_data->mw;
 279   set_focused_pane(mw, gtk_widget_get_parent(statistic_viewer_data->hpaned_v));
 280 }
 281
 282 static void
 283 tree_selection_changed_cb (GtkTreeSelection *selection, gpointer data)
 284 {
 285   StatisticViewerData *statistic_viewer_data = (StatisticViewerData*)data;
 286   GtkTreeIter iter;
 287   GtkTreeModel *model = GTK_TREE_MODEL(statistic_viewer_data->store_m);
 288   gchar *event;
 289   GtkTextBuffer* buf;
 290   gchar * str;
 291   GtkTreePath * path;
 292   GtkTextIter   text_iter;
 293   LttvAttribute * stats;
 294
 295   if (gtk_tree_selection_get_selected (selection, &model, &iter))
 296     {
 297       gtk_tree_model_get (model, &iter, NAME_COLUMN, &event, -1);
 298
 299       path = gtk_tree_model_get_path(GTK_TREE_MODEL(model),&iter);
 300       str = gtk_tree_path_to_string (path);
 301       stats = (LttvAttribute*)g_hash_table_lookup (statistic_viewer_data->statistic_hash,str);
 302       g_free(str);
 303
 304       buf =  gtk_text_view_get_buffer((GtkTextView*)statistic_viewer_data->text_v);
 305       gtk_text_buffer_set_text(buf,"Statistic for  '", -1);
 306       gtk_text_buffer_get_end_iter(buf, &text_iter);
 307       gtk_text_buffer_insert(buf, &text_iter, event, strlen(event));
 308       gtk_text_buffer_get_end_iter(buf, &text_iter);
 309       gtk_text_buffer_insert(buf, &text_iter, "' :\n\n",5);
 310
 311       show_statistic(statistic_viewer_data, stats, buf);
 312
 313       g_free (event);
 314     }
 315 }
 316
 317 void statistic_destroy_hash_key(gpointer key)
 318 {
 319   g_free(key);
 320 }
 321
 322 void statistic_destroy_hash_data(gpointer data)
 323 {
 324   //  g_free(data);
 325 }
 326
 327 void get_traceset_stats(StatisticViewerData * statistic_viewer_data)
 328 {
 329   LttTime start, end;
 330
 331   start.tv_sec = 0;
 332   start.tv_nsec = 0;
 333   end.tv_sec = G_MAXULONG;
 334   end.tv_nsec = G_MAXULONG;
 335
 336   state_add_event_hooks_api(statistic_viewer_data->mw);
 337   stats_add_event_hooks_api(statistic_viewer_data->mw);
 338
 339   process_traceset_api(statistic_viewer_data->mw, start, end, G_MAXULONG);
 340
 341   state_remove_event_hooks_api(statistic_viewer_data->mw);
 342   stats_remove_event_hooks_api(statistic_viewer_data->mw);
 343
 344   //establish tree view for stats
 345   show_traceset_stats(statistic_viewer_data);
 346 }
 347
 348 void show_traceset_stats(StatisticViewerData * statistic_viewer_data)
 349 {
 350   int i, nb;
 351   LttvTraceset *ts;
 352   LttvTraceStats *tcs;
 353   LttSystemDescription *desc;
 354   LttvTracesetStats * tscs = statistic_viewer_data->stats;
 355   gchar * str, trace_str[PATH_LENGTH];
 356   GtkTreePath * path;
 357   GtkTreeIter   iter;
 358   GtkTreeStore * store = statistic_viewer_data->store_m;
 359
 360   if(tscs->stats == NULL) return;
 361
 362   gtk_tree_store_append (store, &iter, NULL);
 363   gtk_tree_store_set (store, &iter,
 364                       NAME_COLUMN, "Traceset statistics",
 365                       -1);
 366   path = gtk_tree_model_get_path(GTK_TREE_MODEL(store), &iter);
 367   str = gtk_tree_path_to_string (path);
 368   g_hash_table_insert(statistic_viewer_data->statistic_hash,
 369                       (gpointer)str, tscs->stats);
 370   show_tree(statistic_viewer_data, tscs->stats, &iter);
 371
 372   //show stats for all traces
 373   ts = tscs->parent.parent.ts;
 374   nb = lttv_traceset_number(ts);
 375
 376   for(i = 0 ; i < nb ; i++) {
 377     tcs = (LttvTraceStats *)(LTTV_TRACESET_CONTEXT(tscs)->traces[i]);
 378     desc = ltt_trace_system_description(tcs->parent.parent.t);
 379     sprintf(trace_str, "Trace on system %s at time %d secs",
 380             desc->node_name,desc->trace_start.tv_sec);
 381
 382     gtk_tree_store_append (store, &iter, NULL);
 383     gtk_tree_store_set (store, &iter,NAME_COLUMN,trace_str,-1);
 384     path = gtk_tree_model_get_path(GTK_TREE_MODEL(store), &iter);
 385     str = gtk_tree_path_to_string (path);
 386     g_hash_table_insert(statistic_viewer_data->statistic_hash,
 387                         (gpointer)str,tcs->stats);
 388     show_tree(statistic_viewer_data, tcs->stats, &iter);
 389   }
 390 }
 391
 392 void show_tree(StatisticViewerData * statistic_viewer_data,
 393                LttvAttribute* stats,  GtkTreeIter* parent)
 394 {
 395   int i, nb;
 396   LttvAttribute *subtree;
 397   LttvAttributeName name;
 398   LttvAttributeValue value;
 399   LttvAttributeType type;
 400   gchar * str, dir_str[PATH_LENGTH];
 401   GtkTreePath * path;
 402   GtkTreeIter   iter;
 403   GtkTreeStore * store = statistic_viewer_data->store_m;
 404
 405   nb = lttv_attribute_get_number(stats);
 406   for(i = 0 ; i < nb ; i++) {
 407     type = lttv_attribute_get(stats, i, &name, &value);
 408     switch(type) {
 409      case LTTV_GOBJECT:
 410         if(LTTV_IS_ATTRIBUTE(*(value.v_gobject))) {
 411           sprintf(dir_str, "%s", g_quark_to_string(name));
 412           subtree = (LttvAttribute *)*(value.v_gobject);
 413           gtk_tree_store_append (store, &iter, parent);
 414           gtk_tree_store_set (store, &iter,NAME_COLUMN,dir_str,-1);
 415           path = gtk_tree_model_get_path(GTK_TREE_MODEL(store), &iter);
 416           str = gtk_tree_path_to_string (path);
 417           g_hash_table_insert(statistic_viewer_data->statistic_hash,
 418                               (gpointer)str, subtree);
 419           show_tree(statistic_viewer_data, subtree, &iter);
 420         }
 421         break;
 422       default:
 423         break;
 424     }
 425   }
 426 }
 427
 428 void show_statistic(StatisticViewerData * statistic_viewer_data,
 429                     LttvAttribute* stats, GtkTextBuffer* buf)
 430 {
 431   int i, nb , flag;
 432   LttvAttribute *subtree;
 433   LttvAttributeName name;
 434   LttvAttributeValue value;
 435   LttvAttributeType type;
 436   gchar type_name[PATH_LENGTH], type_value[PATH_LENGTH];
 437   GtkTextIter   text_iter;
 438
 439   flag = 0;
 440   nb = lttv_attribute_get_number(stats);
 441   for(i = 0 ; i < nb ; i++) {
 442     type = lttv_attribute_get(stats, i, &name, &value);
 443     sprintf(type_name,"%s", g_quark_to_string(name));
 444     type_value[0] = '\0';
 445     switch(type) {
 446       case LTTV_INT:
 447         sprintf(type_value, " :  %d\n", *value.v_int);
 448         break;
 449       case LTTV_UINT:
 450         sprintf(type_value, " :  %u\n", *value.v_uint);
 451         break;
 452       case LTTV_LONG:
 453         sprintf(type_value, " :  %ld\n", *value.v_long);
 454         break;
 455       case LTTV_ULONG:
 456         sprintf(type_value, " :  %lu\n", *value.v_ulong);
 457         break;
 458       case LTTV_FLOAT:
 459         sprintf(type_value, " :  %f\n", (double)*value.v_float);
 460         break;
 461       case LTTV_DOUBLE:
 462         sprintf(type_value, " :  %f\n", *value.v_double);
 463         break;
 464       case LTTV_TIME:
 465         sprintf(type_value, " :  %10u.%09u\n", value.v_time->tv_sec,
 466             value.v_time->tv_nsec);
 467         break;
 468       case LTTV_POINTER:
 469         sprintf(type_value, " :  POINTER\n");
 470         break;
 471       case LTTV_STRING:
 472         sprintf(type_value, " :  %s\n", *value.v_string);
 473         break;
 474       default:
 475         break;
 476     }
 477     if(strlen(type_value)){
 478       flag = 1;
 479       strcat(type_name,type_value);
 480       gtk_text_buffer_get_end_iter(buf, &text_iter);
 481       gtk_text_buffer_insert(buf, &text_iter, type_name, strlen(type_name));
 482     }
 483   }
 484
 485   if(flag == 0){
 486     sprintf(type_value, "No statistic information in this directory.\nCheck in subdirectories please.\n");
 487     gtk_text_buffer_get_end_iter(buf, &text_iter);
 488     gtk_text_buffer_insert(buf, &text_iter, type_value, strlen(type_value));
 489
 490   }
 491 }
 492
 493