complete shedchange text information

[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;

	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);
	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(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;
}