retabulation 2 spaces

[lttv.git] / ltt / branches / poly / lttv / modules / guiControlFlow / CFV.c

#include <glib.h>
#include <gtk/gtk.h>
#include <gdk/gdk.h>

#include "CFV.h"
#include "Drawing.h"
#include "Process_List.h"
#include "Event_Hooks.h"
#include "CFV-private.h"


#define g_info(format...) g_log (G_LOG_DOMAIN, G_LOG_LEVEL_INFO, format)
#define g_debug(format...) g_log (G_LOG_DOMAIN, G_LOG_LEVEL_DEBUG, format)

extern GSList *gControl_Flow_Data_List;

/*****************************************************************************
 *                     Control Flow Viewer class implementation              *
 *****************************************************************************/
/**
 * Control Flow Viewer's constructor
 *
 * This constructor is given as a parameter to the menuitem and toolbar button
 * registration. It creates the drawing widget.
 * @param ParentWindow A pointer to the parent window.
 * @return The widget created.
 */
ControlFlowData *
guicontrolflow(void)
{
  GtkWidget *Process_List_Widget, *Drawing_Widget;//, *button;

  ControlFlowData* Control_Flow_Data = g_new(ControlFlowData,1) ;

  /* Create the Drawing */
  Control_Flow_Data->Drawing = drawing_construct(Control_Flow_Data);
  
  Drawing_Widget = 
    drawing_get_widget(Control_Flow_Data->Drawing);
  
  /* TEST DATA, TO BE READ FROM THE TRACE */
  Control_Flow_Data->Number_Of_Events = 1000 ;
  Control_Flow_Data->Currently_Selected_Event = FALSE  ;
  Control_Flow_Data->Selected_Event = 0;
  Control_Flow_Data->Number_Of_Process = 10;

  /* FIXME register Event_Selected_Hook */
  


  /* Create the Process list */
  Control_Flow_Data->Process_List = processlist_construct();
  
  Process_List_Widget = 
    processlist_get_widget(Control_Flow_Data->Process_List);
  
  //Control_Flow_Data->Inside_HBox_V = gtk_hbox_new(0, 0);
  Control_Flow_Data->HPaned = gtk_hpaned_new();
    
  //gtk_box_pack_start(
  //  GTK_BOX(Control_Flow_Data->Inside_HBox_V),
  //  Process_List_Widget, FALSE, TRUE, 0); // FALSE TRUE
  //gtk_box_pack_start(
  //  GTK_BOX(Control_Flow_Data->Inside_HBox_V),
  //  Drawing_Widget, TRUE, TRUE, 0);
  
  //button = gtk_button_new();
  //gtk_button_set_relief(button, GTK_RELIEF_NONE);
  //gtk_container_set_border_width(GTK_CONTAINER(button),0);
  //gtk_container_add(GTK_CONTAINER(button), Drawing_Widget);
  gtk_paned_pack1(GTK_PANED(Control_Flow_Data->HPaned), Process_List_Widget, FALSE, TRUE);
  gtk_paned_pack2(GTK_PANED(Control_Flow_Data->HPaned), Drawing_Widget, TRUE, TRUE);

  Control_Flow_Data->VAdjust_C = 
    GTK_ADJUSTMENT(gtk_adjustment_new(  0.0,  /* Value */
              0.0,  /* Lower */
              0.0,  /* Upper */
              0.0,  /* Step inc. */
              0.0,  /* Page inc. */
              0.0));  /* page size */
  
  Control_Flow_Data->Scrolled_Window_VC =
      gtk_scrolled_window_new (NULL,
      Control_Flow_Data->VAdjust_C);
  
  gtk_scrolled_window_set_policy(
    GTK_SCROLLED_WINDOW(Control_Flow_Data->Scrolled_Window_VC) ,
    GTK_POLICY_NEVER,
    GTK_POLICY_AUTOMATIC);

  gtk_scrolled_window_add_with_viewport(
    GTK_SCROLLED_WINDOW(Control_Flow_Data->Scrolled_Window_VC),
    //Control_Flow_Data->Inside_HBox_V);
    Control_Flow_Data->HPaned);
  
  //g_signal_connect (G_OBJECT (Control_Flow_Data->Drawing_Area_V),
  //    "expose_event",
  //    G_CALLBACK (expose_event_cb),
  //    Control_Flow_Data);


  
  //g_signal_connect (G_OBJECT (Control_Flow_Data->VAdjust_C),
  //    "value-changed",
  //                G_CALLBACK (v_scroll_cb),
  //                Control_Flow_Data);


  /* Set the size of the drawing area */
  //Drawing_Resize(Drawing, h, w);

  /* Get trace statistics */
  //Control_Flow_Data->Trace_Statistics = get_trace_statistics(Trace);


  gtk_widget_show(Drawing_Widget);
  //gtk_widget_show(button);
  gtk_widget_show(Process_List_Widget);
  //gtk_widget_show(Control_Flow_Data->Inside_HBox_V);
  gtk_widget_show(Control_Flow_Data->HPaned);
  gtk_widget_show(Control_Flow_Data->Scrolled_Window_VC);
  
  g_object_set_data_full(
      G_OBJECT(Control_Flow_Data->Scrolled_Window_VC),
      "Control_Flow_Data",
      Control_Flow_Data,
      (GDestroyNotify)guicontrolflow_destructor);
    
  g_object_set_data(
      G_OBJECT(Drawing_Widget),
      "Control_Flow_Data",
      Control_Flow_Data);
        
  gControl_Flow_Data_List = g_slist_append(
      gControl_Flow_Data_List,
      Control_Flow_Data);

  //WARNING : The widget must be 
  //inserted in the main window before the Drawing area
  //can be configured (and this must happend bedore sending
  //data)

  return Control_Flow_Data;

}

/* Destroys widget also */
void
guicontrolflow_destructor_full(ControlFlowData *Control_Flow_Data)
{
  g_info("CFV.c : guicontrolflow_destructor_full, %p", Control_Flow_Data);
  /* May already have been done by GTK window closing */
  if(GTK_IS_WIDGET(Control_Flow_Data->Scrolled_Window_VC))
    gtk_widget_destroy(Control_Flow_Data->Scrolled_Window_VC);
  //Control_Flow_Data->Parent_Window = NULL;
  //FIXME guicontrolflow_destructor(Control_Flow_Data);
}

/* When this destructor is called, the widgets are already disconnected */
void
guicontrolflow_destructor(ControlFlowData *Control_Flow_Data)
{
  guint index;
  
  g_info("CFV.c : guicontrolflow_destructor, %p", Control_Flow_Data);
  g_info("%p, %p, %p", update_time_window_hook, Control_Flow_Data, Control_Flow_Data->Parent_Window);
  if(GTK_IS_WIDGET(Control_Flow_Data->Scrolled_Window_VC))
    g_info("widget still exists");
  
  /* Process List is removed with it's widget */
  //ProcessList_destroy(Control_Flow_Data->Process_List);
  if(Control_Flow_Data->Parent_Window != NULL)
  {
    unreg_update_time_window(update_time_window_hook,
        Control_Flow_Data,
        Control_Flow_Data->Parent_Window);
  
    unreg_update_current_time(update_current_time_hook,
        Control_Flow_Data,
        Control_Flow_Data->Parent_Window);
  }
  g_info("CFV.c : guicontrolflow_destructor, %p", Control_Flow_Data);
  g_slist_remove(gControl_Flow_Data_List,Control_Flow_Data);
  g_free(Control_Flow_Data);
}

GtkWidget *guicontrolflow_get_widget(ControlFlowData *Control_Flow_Data)
{
  return Control_Flow_Data->Scrolled_Window_VC ;
}

ProcessList *guicontrolflow_get_process_list
    (ControlFlowData *Control_Flow_Data)
{
    return Control_Flow_Data->Process_List ;
}

TimeWindow *guicontrolflow_get_time_window(ControlFlowData *Control_Flow_Data)
{
  return &Control_Flow_Data->Time_Window;
}
LttTime *guicontrolflow_get_current_time(ControlFlowData *Control_Flow_Data)
{
  return &Control_Flow_Data->Current_Time;
}