update for powerpc

[lttv.git] / ltt / branches / poly / lttv / modules / gui / controlflow / cfv.c

diff --git a/ltt/branches/poly/lttv/modules/gui/controlflow/cfv.c b/ltt/branches/poly/lttv/modules/gui/controlflow/cfv.c
index 8d4a339ec2b47ff25bc3fd2045f0fb3ac6cada1b..33bcdd2a8c9df1bf1efff772c9450b6aaf88b10e 100644 (file)
--- a/ltt/branches/poly/lttv/modules/gui/controlflow/cfv.c
+++ b/ltt/branches/poly/lttv/modules/gui/controlflow/cfv.c
@@ -16,16 +16,21 @@
  * MA 02111-1307, USA.
  */
 
+#ifdef HAVE_CONFIG_H
+#include <config.h>
+#endif
+
 #include <glib.h>
 #include <gtk/gtk.h>
 #include <gdk/gdk.h>
+#include <lttv/lttv.h>
+#include <lttvwindow/lttvwindow.h>
+#include <lttvwindow/lttvwindowtraces.h>
 
 #include "cfv.h"
 #include "drawing.h"
 #include "processlist.h"
 #include "eventhooks.h"
-#include "cfv-private.h"
-#include <lttv/lttv.h>
 
 extern GSList *g_control_flow_data_list;
 
@@ -43,6 +48,37 @@ header_size_allocate(GtkWidget *widget,
   return 0;
 }
 
+gboolean cfv_scroll_event(GtkWidget *widget, GdkEventScroll *event,
+               gpointer data)
+{
+  ControlFlowData *control_flow_data = (ControlFlowData*)data;
+       unsigned int cell_height =
+               get_cell_height(
+                               GTK_TREE_VIEW(control_flow_data->process_list->process_list_widget));
+       gdouble new;
+
+  switch(event->direction) {
+    case GDK_SCROLL_UP:
+                       {
+                               new = gtk_adjustment_get_value(control_flow_data->v_adjust) 
+                                                                                                                                       - cell_height;
+                       }
+      break;
+    case GDK_SCROLL_DOWN:
+                       {
+                               new = gtk_adjustment_get_value(control_flow_data->v_adjust) 
+                                                                                                                                       + cell_height;
+                       }
+      break;
+               default:
+                       return FALSE;
+  }
+       if(new >= control_flow_data->v_adjust->lower &&
+                       new <= control_flow_data->v_adjust->upper 
+                                       - control_flow_data->v_adjust->page_size)
+               gtk_adjustment_set_value(control_flow_data->v_adjust, new);
+       return TRUE;
+}
 
 
 /*****************************************************************************
@@ -57,12 +93,14 @@ header_size_allocate(GtkWidget *widget,
  * @return The widget created.
  */
 ControlFlowData *
-guicontrolflow(void)
+guicontrolflow(Tab *tab)
 {
   GtkWidget *process_list_widget, *drawing_widget, *drawing_area;
 
   ControlFlowData* control_flow_data = g_new(ControlFlowData,1) ;
 
+  control_flow_data->tab = tab;
+
   control_flow_data->v_adjust = 
     GTK_ADJUSTMENT(gtk_adjustment_new(  0.0,  /* Value */
               0.0,  /* Lower */
@@ -93,6 +131,15 @@ guicontrolflow(void)
                                 GTK_ADJUSTMENT(
                                    control_flow_data->v_adjust));
 
+  g_signal_connect (G_OBJECT(process_list_widget),
+        "scroll-event",
+        G_CALLBACK (cfv_scroll_event),
+        (gpointer)control_flow_data);
+        g_signal_connect (G_OBJECT(drawing_area),
+        "scroll-event",
+        G_CALLBACK (cfv_scroll_event),
+        (gpointer)control_flow_data);
+       
   g_signal_connect (G_OBJECT(control_flow_data->process_list->button),
         "size-allocate",
         G_CALLBACK(header_size_allocate),
@@ -116,7 +163,9 @@ guicontrolflow(void)
                   process_list_widget, FALSE, TRUE);
   gtk_paned_pack2(GTK_PANED(control_flow_data->h_paned),
                   drawing_widget, TRUE, TRUE);
- 
+  
+  gtk_container_set_border_width(GTK_CONTAINER(control_flow_data->box), 1);
+  
   /* Set the size of the drawing area */
   //drawing_Resize(drawing, h, w);
 
@@ -147,7 +196,6 @@ guicontrolflow(void)
   //inserted in the main window before the drawing area
   //can be configured (and this must happend bedore sending
   //data)
-
   
   return control_flow_data;