Improved behaviour of arrow keys
[pspp-builds.git] / lib / gtksheet / gtksheet.c
index 3a965aec1f54faef2c634056bf8aa1d559dbf04f..6b0e640bd5a57e48692fff8f3998c3ac7d463e41 100644 (file)
@@ -62,7 +62,6 @@
 /* sheet flags */
 enum
   {
-    GTK_SHEET_REDRAW_PENDING = 1 << 0,
     GTK_SHEET_IN_XDRAG = 1 << 1,
     GTK_SHEET_IN_YDRAG = 1 << 2,
     GTK_SHEET_IN_DRAG = 1 << 3,
@@ -79,7 +78,6 @@ enum
 #define GTK_SHEET_IN_DRAG(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_DRAG)
 #define GTK_SHEET_IN_SELECTION(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_SELECTION)
 #define GTK_SHEET_IN_RESIZE(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_RESIZE)
-#define GTK_SHEET_REDRAW_PENDING(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_REDRAW_PENDING)
 
 #define CELL_SPACING 1
 
@@ -487,10 +485,9 @@ static void gtk_sheet_draw_border           (GtkSheet *sheet,
 
 static void gtk_sheet_entry_changed             (GtkWidget *widget,
                                                  gpointer data);
-static void gtk_sheet_deactivate_cell   (GtkSheet *sheet);
 static void gtk_sheet_hide_active_cell          (GtkSheet *sheet);
-static gboolean gtk_sheet_activate_cell                 (GtkSheet *sheet,
-                                                 gint row, gint col);
+static void activate_cell               (GtkSheet *sheet,
+                                         gint row, gint col);
 static void gtk_sheet_draw_active_cell          (GtkSheet *sheet);
 static void gtk_sheet_show_active_cell          (GtkSheet *sheet);
 static gboolean gtk_sheet_click_cell            (GtkSheet *sheet,
@@ -565,7 +562,6 @@ enum
     RESIZE_RANGE,
     MOVE_RANGE,
     TRAVERSE,
-    DEACTIVATE,
     ACTIVATE,
     CHANGED,
     LAST_SIGNAL
@@ -909,23 +905,16 @@ gtk_sheet_class_init (GtkSheetClass *klass)
                  G_TYPE_POINTER, G_TYPE_POINTER);
 
 
-  sheet_signals[DEACTIVATE] =
-    g_signal_new ("deactivate",
-                 G_TYPE_FROM_CLASS (object_class),
-                 G_SIGNAL_RUN_LAST,
-                 offsetof (GtkSheetClass, deactivate),
-                 NULL, NULL,
-                 gtkextra_VOID__INT_INT,
-                 G_TYPE_NONE, 2, G_TYPE_INT, G_TYPE_INT);
-
   sheet_signals[ACTIVATE] =
     g_signal_new ("activate",
                  G_TYPE_FROM_CLASS (object_class),
                  G_SIGNAL_RUN_LAST,
                  offsetof (GtkSheetClass, activate),
                  NULL, NULL,
-                 gtkextra_BOOLEAN__INT_INT,
-                 G_TYPE_BOOLEAN, 2, G_TYPE_INT, G_TYPE_INT);
+                 gtkextra_VOID__INT_INT_INT_INT,
+                 G_TYPE_NONE, 4,
+                 G_TYPE_INT, G_TYPE_INT,
+                 G_TYPE_INT, G_TYPE_INT);
 
   sheet_signals[CHANGED] =
     g_signal_new ("changed",
@@ -1013,7 +1002,6 @@ gtk_sheet_class_init (GtkSheetClass *klass)
   klass->resize_range = NULL;
   klass->move_range = NULL;
   klass->traverse = NULL;
-  klass->deactivate = NULL;
   klass->activate = NULL;
   klass->changed = NULL;
 }
@@ -1118,7 +1106,7 @@ columns_inserted_deleted_callback (GSheetModel *model, gint first_column,
   adjust_scrollbars (sheet);
 
   if (sheet->active_cell.col >= model_columns)
-    gtk_sheet_activate_cell (sheet, sheet->active_cell.row, model_columns - 1);
+    activate_cell (sheet, sheet->active_cell.row, model_columns - 1);
 
   for (i = first_column; i <= max_visible_column (sheet); i++)
     gtk_sheet_column_title_button_draw (sheet, i);
@@ -1150,7 +1138,7 @@ rows_inserted_deleted_callback (GSheetModel *model, gint first_row,
   adjust_scrollbars (sheet);
 
   if (sheet->active_cell.row >= model_rows)
-    gtk_sheet_activate_cell (sheet, model_rows - 1, sheet->active_cell.col);
+    activate_cell (sheet, model_rows - 1, sheet->active_cell.col);
 
   for (i = first_row; i <= max_visible_row (sheet); i++)
     gtk_sheet_row_title_button_draw (sheet, i);
@@ -1404,7 +1392,6 @@ gtk_sheet_autoresize_column (GtkSheet *sheet, gint column)
   if (text_width > g_sheet_column_get_width (sheet->column_geometry, column) )
     {
       gtk_sheet_set_column_width (sheet, column, text_width);
-      GTK_SHEET_SET_FLAGS (sheet, GTK_SHEET_REDRAW_PENDING);
     }
 }
 
@@ -1506,105 +1493,50 @@ gtk_sheet_hide_row_titles (GtkSheet *sheet)
 }
 
 
+/* Scroll the sheet so that the cell ROW, COLUMN is visible.
+   If {ROW,COL}_ALIGN is zero, then the cell will be placed
+   at the {top,left} of the sheet.  If it's 1, then it'll
+   be placed at the {bottom,right}.
+   ROW or COL may be -1, in which case scrolling in that dimension
+   does not occur.
+ */
 void
 gtk_sheet_moveto (GtkSheet *sheet,
                  gint row,
-                 gint column,
+                 gint col,
                  gfloat row_align,
                  gfloat col_align)
 {
-  gint x, y;
   gint width, height;
-  gint adjust;
-  gint min_row, min_col;
 
-  g_return_if_fail (sheet != NULL);
-  g_return_if_fail (GTK_IS_SHEET (sheet));
-  g_return_if_fail (sheet->hadjustment != NULL);
-  g_return_if_fail (sheet->vadjustment != NULL);
+  g_return_if_fail (row_align >= 0);
+  g_return_if_fail (col_align >= 0);
 
-  if (row < 0 || row >= g_sheet_row_get_row_count (sheet->row_geometry))
-    return;
-  if (column < 0 || column >= g_sheet_column_get_column_count (sheet->column_geometry))
-    return;
+  g_return_if_fail (row_align <= 1);
+  g_return_if_fail (col_align <= 1);
 
-  gdk_drawable_get_size (sheet->sheet_window, &width, &height);
+  g_return_if_fail (col <
+                   g_sheet_column_get_column_count (sheet->column_geometry));
+  g_return_if_fail (row <
+                   g_sheet_row_get_row_count (sheet->row_geometry));
 
-  /* adjust vertical scrollbar */
-  if (row >= 0 && row_align >= 0.0)
-    {
-      y = g_sheet_row_start_pixel (sheet->row_geometry, row)
-       - (gint) ( row_align * height + (1.0 - row_align)
-                  * g_sheet_row_get_height (sheet->row_geometry, row));
-
-      /* This forces the sheet to scroll when you don't see the entire cell */
-      min_row = row;
-      adjust = 0;
-      if (row_align >= 1.0)
-       {
-         while (min_row >= 0 && min_row > min_visible_row (sheet))
-           {
-             adjust += g_sheet_row_get_height (sheet->row_geometry, min_row);
-
-             if (adjust >= height)
-               {
-                 break;
-               }
-             min_row--;
-           }
-         min_row = MAX (min_row, 0);
-
-         min_row ++;
-
-         y = g_sheet_row_start_pixel (sheet->row_geometry, min_row) +
-           g_sheet_row_get_height (sheet->row_geometry, min_row) - 1;
-       }
-
-      if (y < 0)
-       sheet->vadjustment->value = 0.0;
-      else
-       sheet->vadjustment->value = y;
-
-      g_signal_emit_by_name (sheet->vadjustment,
-                            "value_changed");
+  gdk_drawable_get_size (sheet->sheet_window, &width, &height);
 
-    }
 
-  /* adjust horizontal scrollbar */
-  if (column >= 0 && col_align >= 0.0)
-    {
-      x = g_sheet_column_start_pixel (sheet->column_geometry, column)
-       - (gint) ( col_align*width + (1.0 - col_align)*
-                  g_sheet_column_get_width (sheet->column_geometry, column));
+  if (row >= 0)
+  {
+    gint y =  g_sheet_row_start_pixel (sheet->row_geometry, row);
 
-      /* This forces the sheet to scroll when you don't see the entire cell */
-      min_col = column;
-      adjust = 0;
-      if (col_align == 1.0)
-       {
-         while (min_col >= 0 && min_col > min_visible_column (sheet))
-           {
-             adjust += g_sheet_column_get_width (sheet->column_geometry, min_col);
+    gtk_adjustment_set_value (sheet->vadjustment, y - height * row_align);
+  }
 
-             if (adjust >= width)
-               {
-                 break;
-               }
-             min_col--;
-           }
-         min_col = MAX (min_col, 0);
-         x = g_sheet_column_start_pixel (sheet->column_geometry, min_col) +
-           g_sheet_column_get_width (sheet->column_geometry, min_col) - 1;
-       }
 
-      if (x < 0)
-       sheet->hadjustment->value = 0.0;
-      else
-       sheet->hadjustment->value = x;
+  if (col >= 0)
+  {
+    gint x =  g_sheet_column_start_pixel (sheet->column_geometry, col);
 
-      g_signal_emit_by_name (sheet->hadjustment,
-                            "value_changed");
-    }
+    gtk_adjustment_set_value (sheet->hadjustment, x - width * col_align);
+  }
 }
 
 
@@ -1639,8 +1571,6 @@ gtk_sheet_select_row (GtkSheet *sheet, gint row)
 
   if (sheet->state != GTK_SHEET_NORMAL)
     gtk_sheet_real_unselect_range (sheet, NULL);
-  else
-    gtk_sheet_deactivate_cell (sheet);
 
   sheet->state = GTK_SHEET_ROW_SELECTED;
   sheet->range.row0 = row;
@@ -1666,9 +1596,6 @@ gtk_sheet_select_column (GtkSheet *sheet, gint column)
 
   if (sheet->state != GTK_SHEET_NORMAL)
     gtk_sheet_real_unselect_range (sheet, NULL);
-  else
-    gtk_sheet_deactivate_cell (sheet);
-
 
   sheet->state = GTK_SHEET_COLUMN_SELECTED;
   sheet->range.row0 = 0;
@@ -2126,9 +2053,9 @@ gtk_sheet_map (GtkWidget *widget)
          gtk_widget_map (GTK_BIN (sheet->button)->child);
 
       gtk_sheet_range_draw (sheet, NULL);
-      gtk_sheet_activate_cell (sheet,
-                              sheet->active_cell.row,
-                              sheet->active_cell.col);
+      activate_cell (sheet,
+                    sheet->active_cell.row,
+                    sheet->active_cell.col);
     }
 }
 
@@ -2607,33 +2534,33 @@ gtk_sheet_get_cell_area (GtkSheet *sheet,
   return TRUE;
 }
 
-gboolean
+void
 gtk_sheet_set_active_cell (GtkSheet *sheet, gint row, gint col)
 {
-  g_return_val_if_fail (sheet != NULL, 0);
-  g_return_val_if_fail (GTK_IS_SHEET (sheet), 0);
+  g_return_if_fail (sheet != NULL);
+  g_return_if_fail (GTK_IS_SHEET (sheet));
+
+  if (row < -1 || col < -1)
+    return;
 
-  if (row < -1 || col < -1) return FALSE;
   if (row >= g_sheet_row_get_row_count (sheet->row_geometry)
       ||
       col >= g_sheet_column_get_column_count (sheet->column_geometry))
-    return FALSE;
+    return;
 
   sheet->active_cell.row = row;
   sheet->active_cell.col = col;
 
   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
-    return TRUE;
-
-  gtk_sheet_deactivate_cell (sheet);
+    return;
 
   if ( row == -1 || col == -1)
     {
       gtk_sheet_hide_active_cell (sheet);
-      return TRUE;
+      return;
     }
 
-  return gtk_sheet_activate_cell (sheet, row, col);
+  activate_cell (sheet, row, col);
 }
 
 void
@@ -2685,54 +2612,6 @@ gtk_sheet_entry_changed (GtkWidget *widget, gpointer data)
 }
 
 
-static void
-gtk_sheet_deactivate_cell (GtkSheet *sheet)
-{
-  g_return_if_fail (sheet != NULL);
-  g_return_if_fail (GTK_IS_SHEET (sheet));
-
-  if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return ;
-  if (sheet->state != GTK_SHEET_NORMAL) return ;
-
-
-  if ( sheet->active_cell.row == -1 || sheet->active_cell.col == -1 )
-    return ;
-
-  /*
-  g_print ("%s\n", __FUNCTION__);
-
-
-  GtkSheetRange r;
-  r.col0 = r.coli = sheet->active_cell.col;
-  r.row0 = r.rowi = sheet->active_cell.row;
-  gtk_sheet_range_draw (sheet, &r);
-  */
-
-
-  g_signal_emit (sheet, sheet_signals[DEACTIVATE], 0,
-                sheet->active_cell.row,
-                sheet->active_cell.col);
-
-
-  g_signal_handlers_disconnect_by_func (gtk_sheet_get_entry (sheet),
-                                       G_CALLBACK (gtk_sheet_entry_changed),
-                                       sheet);
-
-  gtk_sheet_hide_active_cell (sheet);
-  sheet->active_cell.row = -1;
-  sheet->active_cell.col = -1;
-
-#if 0
-  if (GTK_SHEET_REDRAW_PENDING (sheet))
-    {
-      GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_REDRAW_PENDING);
-      gtk_sheet_range_draw (sheet, NULL);
-    }
-#endif
-}
-
-
-
 static void
 gtk_sheet_hide_active_cell (GtkSheet *sheet)
 {
@@ -2763,27 +2642,29 @@ gtk_sheet_hide_active_cell (GtkSheet *sheet)
   GTK_WIDGET_UNSET_FLAGS (GTK_WIDGET (sheet->entry_widget), GTK_VISIBLE);
 }
 
-static gboolean
-gtk_sheet_activate_cell (GtkSheet *sheet, gint row, gint col)
+static void
+activate_cell (GtkSheet *sheet, gint row, gint col)
 {
-  gboolean veto = TRUE;
-
-  g_return_val_if_fail (sheet != NULL, FALSE);
-  g_return_val_if_fail (GTK_IS_SHEET (sheet), FALSE);
+  gint old_row, old_col;
+  g_return_if_fail (sheet != NULL);
+  g_return_if_fail (GTK_IS_SHEET (sheet));
 
-  if (row < 0 || col < 0) return FALSE;
+  if (row < 0 || col < 0)
+    return;
 
   if ( row > g_sheet_row_get_row_count (sheet->row_geometry)
        || col > g_sheet_column_get_column_count (sheet->column_geometry))
-    return FALSE;
+    return;
 
-  if (!veto) return FALSE;
   if (sheet->state != GTK_SHEET_NORMAL)
     {
       sheet->state = GTK_SHEET_NORMAL;
       gtk_sheet_real_unselect_range (sheet, NULL);
     }
 
+  old_row = sheet->active_cell.row;
+  old_col = sheet->active_cell.col;
+
   sheet->range.row0 = row;
   sheet->range.col0 = col;
   sheet->range.rowi = row;
@@ -2802,9 +2683,8 @@ gtk_sheet_activate_cell (GtkSheet *sheet, gint row, gint col)
                    G_CALLBACK (gtk_sheet_entry_changed),
                    sheet);
 
-   g_signal_emit (sheet, sheet_signals [ACTIVATE], 0, row, col, &veto);
-
-  return TRUE;
+  g_signal_emit (sheet, sheet_signals [ACTIVATE], 0,
+                row, col, old_row, old_col);
 }
 
 static void
@@ -3213,8 +3093,6 @@ gtk_sheet_select_range (GtkSheet *sheet, const GtkSheetRange *range)
 
   if (sheet->state != GTK_SHEET_NORMAL)
     gtk_sheet_real_unselect_range (sheet, NULL);
-  else
-    gtk_sheet_deactivate_cell (sheet);
 
   sheet->range.row0 = range->row0;
   sheet->range.rowi = range->rowi;
@@ -3238,8 +3116,8 @@ gtk_sheet_unselect_range (GtkSheet *sheet)
   gtk_sheet_real_unselect_range (sheet, NULL);
   sheet->state = GTK_STATE_NORMAL;
 
-  gtk_sheet_activate_cell (sheet,
-                          sheet->active_cell.row, sheet->active_cell.col);
+  activate_cell (sheet,
+                sheet->active_cell.row, sheet->active_cell.col);
 }
 
 
@@ -3502,7 +3380,6 @@ gtk_sheet_button_press (GtkWidget *widget,
            {
              row = sheet->active_cell.row;
              column = sheet->active_cell.col;
-             gtk_sheet_deactivate_cell (sheet);
              sheet->active_cell.row = row;
              sheet->active_cell.col = column;
              sheet->drag_range = sheet->range;
@@ -3530,7 +3407,6 @@ gtk_sheet_button_press (GtkWidget *widget,
            {
              row = sheet->active_cell.row;
              column = sheet->active_cell.col;
-             gtk_sheet_deactivate_cell (sheet);
              sheet->active_cell.row = row;
              sheet->active_cell.col = column;
              sheet->drag_range = sheet->range;
@@ -3619,7 +3495,7 @@ gtk_sheet_click_cell (GtkSheet *sheet, gint row, gint column)
       row = sheet->active_cell.row;
       column = sheet->active_cell.col;
 
-      gtk_sheet_activate_cell (sheet, row, column);
+      activate_cell (sheet, row, column);
       return FALSE;
     }
 
@@ -3655,8 +3531,7 @@ gtk_sheet_click_cell (GtkSheet *sheet, gint row, gint column)
     }
   else
     {
-      gtk_sheet_deactivate_cell (sheet);
-      gtk_sheet_activate_cell (sheet, row, column);
+      activate_cell (sheet, row, column);
     }
 
   sheet->active_cell.row = row;
@@ -3774,7 +3649,7 @@ gtk_sheet_button_release (GtkWidget *widget,
     {
       GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
       gdk_display_pointer_ungrab (display, event->time);
-      gtk_sheet_activate_cell (sheet, sheet->active_cell.row,
+      activate_cell (sheet, sheet->active_cell.row,
                               sheet->active_cell.col);
     }
 
@@ -4409,34 +4284,48 @@ page_vertical (GtkSheet *sheet, GtkScrollType dir)
 
   new_row =  yyy_row_ypixel_to_row (sheet, vpixel);
 
-  gtk_sheet_activate_cell (sheet, new_row,
+  activate_cell (sheet, new_row,
                           sheet->active_cell.col);
 }
 
 
 static void
-step_horizontal (GtkSheet *sheet, GtkScrollType dir)
+step_sheet (GtkSheet *sheet, GtkScrollType dir)
 {
+  gint current_row = sheet->active_cell.row;
+  gint current_col = sheet->active_cell.col;
+  gint new_row = current_row;
+  gint new_col = current_col;
+  gboolean forbidden = FALSE;
+
   switch ( dir)
     {
+    case GTK_SCROLL_STEP_DOWN:
+      new_row++;
+      break;
+    case GTK_SCROLL_STEP_UP:
+      new_row--;
+      break;
     case GTK_SCROLL_STEP_RIGHT:
-
-      gtk_sheet_activate_cell (sheet,
-                              sheet->active_cell.row,
-                              sheet->active_cell.col + 1);
+      new_col++;
       break;
     case GTK_SCROLL_STEP_LEFT:
-
-      gtk_sheet_activate_cell (sheet,
-                              sheet->active_cell.row,
-                              sheet->active_cell.col - 1);
+      new_col--;
       break;
-
     default:
       g_assert_not_reached ();
       break;
     }
 
+  g_signal_emit (sheet, sheet_signals[TRAVERSE], 0,
+                current_row, current_col,
+                &new_row, &new_col, &forbidden);
+
+  if (forbidden)
+    return;
+
+  activate_cell (sheet, new_row, new_col);
+
   if ( sheet->active_cell.col >= max_visible_column (sheet))
     {
       glong hpos  =
@@ -4458,6 +4347,7 @@ step_horizontal (GtkSheet *sheet, GtkScrollType dir)
     }
 }
 
+
 static gboolean
 gtk_sheet_key_press (GtkWidget *widget,
                     GdkEventKey *key)
@@ -4470,33 +4360,18 @@ gtk_sheet_key_press (GtkWidget *widget,
     {
     case GDK_Tab:
     case GDK_Right:
-      step_horizontal (sheet, GTK_SCROLL_STEP_RIGHT);
+      step_sheet (sheet, GTK_SCROLL_STEP_RIGHT);
       break;
     case GDK_ISO_Left_Tab:
     case GDK_Left:
-      step_horizontal (sheet, GTK_SCROLL_STEP_LEFT);
+      step_sheet (sheet, GTK_SCROLL_STEP_LEFT);
       break;
-
     case GDK_Return:
     case GDK_Down:
-      gtk_sheet_activate_cell (sheet,
-                              sheet->active_cell.row + ROWS_PER_STEP,
-                              sheet->active_cell.col);
-
-      if ( sheet->active_cell.row >= max_visible_row (sheet))
-       gtk_adjustment_set_value (sheet->vadjustment,
-                                 sheet->vadjustment->value +
-                                 sheet->vadjustment->step_increment);
+      step_sheet (sheet, GTK_SCROLL_STEP_DOWN);
       break;
     case GDK_Up:
-      gtk_sheet_activate_cell (sheet,
-                              sheet->active_cell.row - ROWS_PER_STEP,
-                              sheet->active_cell.col);
-
-      if ( sheet->active_cell.row < min_visible_row (sheet))
-       gtk_adjustment_set_value (sheet->vadjustment,
-                                 sheet->vadjustment->value -
-                                 sheet->vadjustment->step_increment);
+      step_sheet (sheet, GTK_SCROLL_STEP_UP);
       break;
 
     case GDK_Page_Down:
@@ -4510,7 +4385,7 @@ gtk_sheet_key_press (GtkWidget *widget,
       gtk_adjustment_set_value (sheet->vadjustment,
                                sheet->vadjustment->lower);
 
-      gtk_sheet_activate_cell (sheet,  0,
+      activate_cell (sheet,  0,
                               sheet->active_cell.col);
 
       break;
@@ -4522,7 +4397,7 @@ gtk_sheet_key_press (GtkWidget *widget,
                                sheet->vadjustment->page_increment);
 
       /*
-       gtk_sheet_activate_cell (sheet,
+       activate_cell (sheet,
        g_sheet_row_get_row_count (sheet->row_geometry) - 1,
        sheet->active_cell.col);
       */