usertrace 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 082a8ff934e7f5b49d238b01ebf74b37e9579544..ad1e5fb77a89ebbc8f3f6294c4d99b92ace26898 100644 (file)
--- a/ltt/branches/poly/lttv/modules/gui/controlflow/cfv.c
+++ b/ltt/branches/poly/lttv/modules/gui/controlflow/cfv.c
@@ -47,6 +47,38 @@ 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;
+}
+
 
 /*****************************************************************************
  *                     Control Flow Viewer class implementation              *
@@ -60,12 +92,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 */
@@ -96,6 +130,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),
@@ -119,7 +162,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);