lib/gtksheet/gtksheet.c

   1 /*
   2  * Copyright (C) 2006, 2008 Free Software Foundation
   3  *
   4  * This version of GtkSheet has been *heavily* modified, for the specific
   5  * requirements of PSPPIRE.  The changes are copyright by the
   6  * Free Software Foundation.  The copyright notice for the original work is
   7  * below.
   8  */
   9
  10 /* GtkSheet widget for Gtk+.
  11  * Copyright (C) 1999-2001 Adrian E. Feiguin <adrian@ifir.ifir.edu.ar>
  12  *
  13  * Based on GtkClist widget by Jay Painter, but major changes.
  14  * Memory allocation routines inspired on SC (Spreadsheet Calculator)
  15  *
  16  * This library is free software; you can redistribute it and/or
  17  * modify it under the terms of the GNU Lesser General Public
  18  * License as published by the Free Software Foundation; either
  19  * version 2.1 of the License, or (at your option) any later version.
  20  *
  21  * This library is distributed in the hope that it will be useful,
  22  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  23  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  24  * Lesser General Public License for more details.
  25  *
  26  * You should have received a copy of the GNU Lesser General Public
  27  * License along with this library; if not, write to the Free Software
  28  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
  29  */
  30
  31 /**
  32  * SECTION:gtksheet
  33  * @short_description: spreadsheet widget for gtk2
  34  *
  35  * GtkSheet is a matrix widget for GTK+. It consists of an scrollable grid of
  36  * cells where you can allocate text. Cell contents can be edited interactively
  37  * through a specially designed entry, GtkItemEntry.
  38  *
  39  */
  40 #include <config.h>
  41
  42 #include <string.h>
  43 #include <stdio.h>
  44 #include <stdlib.h>
  45 #include <glib.h>
  46 #include <gdk/gdk.h>
  47 #include <gdk/gdkkeysyms.h>
  48 #include <gtk/gtksignal.h>
  49 #include <gtk/gtkbutton.h>
  50 #include <gtk/gtkadjustment.h>
  51 #include <gtk/gtktypeutils.h>
  52 #include <gtk/gtkentry.h>
  53 #include <gtk/gtkcontainer.h>
  54 #include <pango/pango.h>
  55 #include "gtksheet.h"
  56 #include "gtkextra-marshal.h"
  57 #include "gsheetmodel.h"
  58 #include <libpspp/misc.h>
  59 #include <math.h>
  60
  61 /* sheet flags */
  62 enum
  63   {
  64     GTK_SHEET_IN_XDRAG = 1 << 1,
  65     GTK_SHEET_IN_YDRAG = 1 << 2,
  66     GTK_SHEET_IN_DRAG = 1 << 3,
  67     GTK_SHEET_IN_SELECTION = 1 << 4,
  68     GTK_SHEET_IN_RESIZE = 1 << 5
  69   };
  70
  71 #define GTK_SHEET_FLAGS(sheet) (GTK_SHEET (sheet)->flags)
  72 #define GTK_SHEET_SET_FLAGS(sheet,flag) (GTK_SHEET_FLAGS (sheet) |= (flag))
  73 #define GTK_SHEET_UNSET_FLAGS(sheet,flag) (GTK_SHEET_FLAGS (sheet) &= ~ (flag))
  74
  75 #define GTK_SHEET_IN_XDRAG(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_XDRAG)
  76 #define GTK_SHEET_IN_YDRAG(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_YDRAG)
  77 #define GTK_SHEET_IN_DRAG(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_DRAG)
  78 #define GTK_SHEET_IN_SELECTION(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_SELECTION)
  79 #define GTK_SHEET_IN_RESIZE(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_RESIZE)
  80
  81 #define CELL_SPACING 1
  82
  83 #define TIMEOUT_HOVER 300
  84 #define COLUMN_MIN_WIDTH 10
  85 #define COLUMN_TITLES_HEIGHT 4
  86 #define DEFAULT_COLUMN_WIDTH 80
  87 #define DEFAULT_ROW_HEIGHT 25
  88
  89 static void gtk_sheet_update_primary_selection (GtkSheet *sheet);
  90 static void gtk_sheet_column_title_button_draw (GtkSheet *sheet, gint column);
  91
  92 static void gtk_sheet_row_title_button_draw (GtkSheet *sheet, gint row);
  93
  94 static void gtk_sheet_set_row_height (GtkSheet *sheet,
  95                                       gint row,
  96                                       guint height);
  97
  98 static void destroy_hover_window (GtkSheetHoverTitle *);
  99 static GtkSheetHoverTitle *create_hover_window (void);
 100
 101 static GtkStateType gtk_sheet_cell_get_state (GtkSheet *sheet, gint row, gint col);
 102
 103
 104 static inline  void
 105 dispose_string (const GtkSheet *sheet, gchar *text)
 106 {
 107   GSheetModel *model = gtk_sheet_get_model (sheet);
 108
 109   if ( ! model )
 110     return;
 111
 112   if (g_sheet_model_free_strings (model))
 113     g_free (text);
 114 }
 115
 116 static
 117 guint STRING_WIDTH (GtkWidget *widget,
 118                     const PangoFontDescription *font, const gchar *text)
 119 {
 120   PangoRectangle rect;
 121   PangoLayout *layout;
 122
 123   layout = gtk_widget_create_pango_layout (widget, text);
 124   pango_layout_set_font_description (layout, font);
 125
 126   pango_layout_get_extents (layout, NULL, &rect);
 127
 128   g_object_unref (layout);
 129   return PANGO_PIXELS (rect.width);
 130 }
 131
 132 /* Return the row containing pixel Y */
 133 static gint
 134 yyy_row_ypixel_to_row (const GtkSheet *sheet, gint y)
 135 {
 136   GSheetRow *geo = sheet->row_geometry;
 137
 138   g_return_val_if_fail (y >= 0, -1);
 139
 140   return g_sheet_row_pixel_to_row (geo, y);
 141 }
 142
 143 /* Return the lowest row number which is wholly or partially on
 144    the visible range of the sheet */
 145 static inline glong
 146 min_visible_row (const GtkSheet *sheet)
 147 {
 148   return yyy_row_ypixel_to_row (sheet, sheet->vadjustment->value);
 149 }
 150
 151 static inline glong
 152 min_fully_visible_row (const GtkSheet *sheet)
 153 {
 154   glong row = yyy_row_ypixel_to_row (sheet, sheet->vadjustment->value);
 155
 156   if ( g_sheet_row_start_pixel (sheet->row_geometry, row) < sheet->vadjustment->value)
 157     row++;
 158
 159   return  row;
 160 }
 161
 162
 163
 164 static inline glong
 165 max_visible_row (const GtkSheet *sheet)
 166 {
 167   return yyy_row_ypixel_to_row (sheet,
 168                            sheet->vadjustment->value +
 169                            sheet->vadjustment->page_size);
 170 }
 171
 172
 173 static inline glong
 174 max_fully_visible_row (const GtkSheet *sheet)
 175 {
 176   glong row = max_visible_row (sheet);
 177
 178   if ( g_sheet_row_start_pixel (sheet->row_geometry, row)
 179        +
 180        g_sheet_row_get_height (sheet->row_geometry, row)
 181        > sheet->vadjustment->value)
 182     row--;
 183
 184   return row;
 185 }
 186
 187
 188 /* returns the column index from a x pixel location */
 189 static inline gint
 190 column_from_xpixel (const GtkSheet *sheet, gint x)
 191 {
 192   gint i;
 193   gint cx = 0;
 194
 195   if (x < 0) return -1;
 196   for (i = 0;
 197        i < g_sheet_column_get_column_count (sheet->column_geometry); i++)
 198     {
 199       if (x >= cx &&
 200           x <= (cx + g_sheet_column_get_width (sheet->column_geometry, i)))
 201         return i;
 202
 203       cx += g_sheet_column_get_width (sheet->column_geometry, i);
 204     }
 205
 206   /* no match */
 207   return g_sheet_column_get_column_count (sheet->column_geometry) - 1;
 208 }
 209
 210
 211 /* Returns the lowest column number which is wholly or partially
 212    on the sheet */
 213 static inline glong
 214 min_visible_column (const GtkSheet *sheet)
 215 {
 216   return column_from_xpixel (sheet, sheet->hadjustment->value);
 217 }
 218
 219 static inline glong
 220 min_fully_visible_column (const GtkSheet *sheet)
 221 {
 222   glong col = min_visible_column (sheet);
 223
 224   if ( g_sheet_column_start_pixel (sheet->column_geometry, col) < sheet->hadjustment->value)
 225     col++;
 226
 227   return col;
 228 }
 229
 230
 231 /* Returns the highest column number which is wholly or partially
 232    on the sheet */
 233 static inline glong
 234 max_visible_column (const GtkSheet *sheet)
 235 {
 236   return column_from_xpixel (sheet,
 237                              sheet->hadjustment->value +
 238                              sheet->hadjustment->page_size);
 239 }
 240
 241 static inline glong
 242 max_fully_visible_column (const GtkSheet *sheet)
 243 {
 244   glong col = max_visible_column (sheet);
 245
 246   if ( g_sheet_column_start_pixel (sheet->column_geometry, col)
 247        +
 248        g_sheet_column_get_width (sheet->column_geometry, col)
 249        > sheet->hadjustment->value)
 250     col--;
 251
 252   return col;
 253 }
 254
 255
 256
 257 /* The size of the region (in pixels) around the row/column boundaries
 258    where the height/width may be grabbed to change size */
 259 #define DRAG_WIDTH 6
 260
 261 static gboolean
 262 on_column_boundary (const GtkSheet *sheet, gint x, gint *column)
 263 {
 264   gint col;
 265
 266   x += sheet->hadjustment->value;
 267
 268   col = column_from_xpixel (sheet, x);
 269
 270   if ( column_from_xpixel (sheet, x - DRAG_WIDTH / 2) < col )
 271     {
 272       *column = col - 1;
 273       return TRUE;
 274     }
 275
 276   if  ( column_from_xpixel (sheet, x + DRAG_WIDTH / 2) > col )
 277     {
 278       *column = col;
 279       return TRUE;
 280     }
 281
 282   return FALSE;
 283 }
 284
 285 static inline gboolean
 286 POSSIBLE_YDRAG (const GtkSheet *sheet, gint y, gint *drag_row)
 287 {
 288   gint row, ydrag;
 289
 290   y += sheet->vadjustment->value;
 291   row = yyy_row_ypixel_to_row (sheet, y);
 292   *drag_row = row;
 293
 294   ydrag = g_sheet_row_start_pixel (sheet->row_geometry, row) + CELL_SPACING;
 295   if (y <= ydrag + DRAG_WIDTH / 2 && row != 0)
 296     {
 297       *drag_row = row - 1;
 298       return g_sheet_row_get_sensitivity (sheet->row_geometry, row - 1);
 299     }
 300
 301   ydrag += g_sheet_row_get_height (sheet->row_geometry, row);
 302
 303   if (y >= ydrag - DRAG_WIDTH / 2 && y <= ydrag + DRAG_WIDTH / 2)
 304     return g_sheet_row_get_sensitivity (sheet->row_geometry, row);
 305
 306   return FALSE;
 307 }
 308
 309 static inline gboolean
 310 POSSIBLE_DRAG (const GtkSheet *sheet, gint x, gint y,
 311                gint *drag_row, gint *drag_column)
 312 {
 313   gint ydrag, xdrag;
 314
 315   /* Can't drag if nothing is selected */
 316   if ( sheet->range.row0 < 0 || sheet->range.rowi < 0 ||
 317        sheet->range.col0 < 0 || sheet->range.coli < 0 )
 318     return FALSE;
 319
 320   *drag_column = column_from_xpixel (sheet, x);
 321   *drag_row = yyy_row_ypixel_to_row (sheet, y);
 322
 323   if (x >= g_sheet_column_start_pixel (sheet->column_geometry, sheet->range.col0) - DRAG_WIDTH / 2 &&
 324       x <= g_sheet_column_start_pixel (sheet->column_geometry, sheet->range.coli) +
 325       g_sheet_column_get_width (sheet->column_geometry, sheet->range.coli) + DRAG_WIDTH / 2)
 326     {
 327       ydrag = g_sheet_row_start_pixel (sheet->row_geometry, sheet->range.row0);
 328       if (y >= ydrag - DRAG_WIDTH / 2 && y <= ydrag + DRAG_WIDTH / 2)
 329         {
 330           *drag_row = sheet->range.row0;
 331           return TRUE;
 332         }
 333       ydrag = g_sheet_row_start_pixel (sheet->row_geometry, sheet->range.rowi) +
 334         g_sheet_row_get_height (sheet->row_geometry, sheet->range.rowi);
 335       if (y >= ydrag - DRAG_WIDTH / 2 && y <= ydrag + DRAG_WIDTH / 2)
 336         {
 337           *drag_row = sheet->range.rowi;
 338           return TRUE;
 339         }
 340     }
 341
 342   if (y >= g_sheet_row_start_pixel (sheet->row_geometry, sheet->range.row0) - DRAG_WIDTH / 2 &&
 343       y <= g_sheet_row_start_pixel (sheet->row_geometry, sheet->range.rowi) +
 344       g_sheet_row_get_height (sheet->row_geometry, sheet->range.rowi) + DRAG_WIDTH / 2)
 345     {
 346       xdrag = g_sheet_column_start_pixel (sheet->column_geometry, sheet->range.col0);
 347       if (x >= xdrag - DRAG_WIDTH / 2 && x <= xdrag + DRAG_WIDTH / 2)
 348         {
 349           *drag_column = sheet->range.col0;
 350           return TRUE;
 351         }
 352       xdrag = g_sheet_column_start_pixel (sheet->column_geometry, sheet->range.coli) +
 353         g_sheet_column_get_width (sheet->column_geometry, sheet->range.coli);
 354       if (x >= xdrag - DRAG_WIDTH / 2 && x <= xdrag + DRAG_WIDTH / 2)
 355         {
 356           *drag_column = sheet->range.coli;
 357           return TRUE;
 358         }
 359     }
 360
 361   return FALSE;
 362 }
 363
 364 static inline gboolean
 365 POSSIBLE_RESIZE (const GtkSheet *sheet, gint x, gint y,
 366                  gint *drag_row, gint *drag_column)
 367 {
 368   gint xdrag, ydrag;
 369
 370   /* Can't drag if nothing is selected */
 371   if ( sheet->range.row0 < 0 || sheet->range.rowi < 0 ||
 372        sheet->range.col0 < 0 || sheet->range.coli < 0 )
 373     return FALSE;
 374
 375   xdrag = g_sheet_column_start_pixel (sheet->column_geometry, sheet->range.coli)+
 376     g_sheet_column_get_width (sheet->column_geometry, sheet->range.coli);
 377
 378   ydrag = g_sheet_row_start_pixel (sheet->row_geometry, sheet->range.rowi) +
 379     g_sheet_row_get_height (sheet->row_geometry, sheet->range.rowi);
 380
 381   if (sheet->state == GTK_SHEET_COLUMN_SELECTED)
 382     ydrag = g_sheet_row_start_pixel (sheet->row_geometry, min_visible_row (sheet));
 383
 384   if (sheet->state == GTK_SHEET_ROW_SELECTED)
 385     xdrag = g_sheet_column_start_pixel (sheet->column_geometry, min_visible_column (sheet));
 386
 387   *drag_column = column_from_xpixel (sheet, x);
 388   *drag_row = yyy_row_ypixel_to_row (sheet, y);
 389
 390   if (x >= xdrag - DRAG_WIDTH / 2 && x <= xdrag + DRAG_WIDTH / 2 &&
 391       y >= ydrag - DRAG_WIDTH / 2 && y <= ydrag + DRAG_WIDTH / 2) return TRUE;
 392
 393   return FALSE;
 394 }
 395
 396
 397 static gboolean
 398 rectangle_from_range (GtkSheet *sheet, const GtkSheetRange *range,
 399                       GdkRectangle *r)
 400 {
 401   g_return_val_if_fail (range, FALSE);
 402
 403   r->x = g_sheet_column_start_pixel (sheet->column_geometry, range->col0);
 404   r->x -= round (sheet->hadjustment->value);
 405
 406   if ( sheet->row_titles_visible)
 407     r->x += sheet->row_title_area.width;
 408
 409
 410   r->y = g_sheet_row_start_pixel (sheet->row_geometry, range->row0);
 411   r->y -= round (sheet->vadjustment->value);
 412
 413   if ( sheet->column_titles_visible)
 414     r->y += sheet->column_title_area.height;
 415
 416   r->width = g_sheet_column_start_pixel (sheet->column_geometry, range->coli) -
 417     g_sheet_column_start_pixel (sheet->column_geometry, range->col0) +
 418     g_sheet_column_get_width (sheet->column_geometry, range->coli);
 419
 420   r->height = g_sheet_row_start_pixel (sheet->row_geometry, range->rowi) -
 421     g_sheet_row_start_pixel (sheet->row_geometry, range->row0) +
 422     g_sheet_row_get_height (sheet->row_geometry, range->rowi);
 423
 424   return TRUE;
 425 }
 426
 427 static gboolean
 428 rectangle_from_cell (GtkSheet *sheet, gint row, gint col,
 429                      GdkRectangle *r)
 430 {
 431   GtkSheetRange range;
 432   g_return_val_if_fail (row >= 0, FALSE);
 433   g_return_val_if_fail (col >= 0, FALSE);
 434
 435   range.row0 = range.rowi = row;
 436   range.col0 = range.coli = col;
 437
 438   return rectangle_from_range (sheet, &range, r);
 439 }
 440
 441
 442 static void gtk_sheet_class_init                 (GtkSheetClass *klass);
 443 static void gtk_sheet_init                       (GtkSheet *sheet);
 444 static void gtk_sheet_dispose                    (GObject *object);
 445 static void gtk_sheet_finalize                   (GObject *object);
 446 static void gtk_sheet_style_set                  (GtkWidget *widget,
 447                                                   GtkStyle *previous_style);
 448 static void gtk_sheet_realize                    (GtkWidget *widget);
 449 static void gtk_sheet_unrealize                  (GtkWidget *widget);
 450 static void gtk_sheet_map                        (GtkWidget *widget);
 451 static void gtk_sheet_unmap                      (GtkWidget *widget);
 452 static gint gtk_sheet_expose                     (GtkWidget *widget,
 453                                                   GdkEventExpose *event);
 454 static void gtk_sheet_forall                     (GtkContainer *container,
 455                                                   gboolean include_internals,
 456                                                   GtkCallback callback,
 457                                                   gpointer callback_data);
 458
 459 static void gtk_sheet_set_scroll_adjustments     (GtkSheet *sheet,
 460                                                   GtkAdjustment *hadjustment,
 461                                                   GtkAdjustment *vadjustment);
 462
 463 static gint gtk_sheet_button_press               (GtkWidget *widget,
 464                                                   GdkEventButton *event);
 465 static gint gtk_sheet_button_release             (GtkWidget *widget,
 466                                                   GdkEventButton *event);
 467 static gint gtk_sheet_motion                     (GtkWidget *widget,
 468                                                   GdkEventMotion *event);
 469 static gboolean gtk_sheet_crossing_notify           (GtkWidget *widget,
 470                                                      GdkEventCrossing *event);
 471 static gint gtk_sheet_entry_key_press            (GtkWidget *widget,
 472                                                   GdkEventKey *key);
 473 static gboolean gtk_sheet_key_press              (GtkWidget *widget,
 474                                                   GdkEventKey *key);
 475 static void gtk_sheet_size_request               (GtkWidget *widget,
 476                                                   GtkRequisition *requisition);
 477 static void gtk_sheet_size_allocate              (GtkWidget *widget,
 478                                                   GtkAllocation *allocation);
 479
 480 /* Sheet queries */
 481
 482 static gboolean gtk_sheet_range_isvisible (const GtkSheet *sheet,
 483                                            GtkSheetRange range);
 484 static gboolean gtk_sheet_cell_isvisible  (GtkSheet *sheet,
 485                                            gint row, gint column);
 486 /* Drawing Routines */
 487
 488 /* draw cell */
 489 static void gtk_sheet_cell_draw (GtkSheet *sheet, gint row, gint column);
 490
 491
 492 /* draw visible part of range. If range == NULL then draw the whole screen */
 493 static void gtk_sheet_range_draw (GtkSheet *sheet,
 494                                   const GtkSheetRange *range);
 495
 496 /* highlight the visible part of the selected range */
 497 static void gtk_sheet_range_draw_selection       (GtkSheet *sheet,
 498                                                   GtkSheetRange range);
 499
 500 /* Selection */
 501
 502 static void gtk_sheet_real_select_range          (GtkSheet *sheet,
 503                                                   const GtkSheetRange *range);
 504 static void gtk_sheet_real_unselect_range        (GtkSheet *sheet,
 505                                                   const GtkSheetRange *range);
 506 static void gtk_sheet_extend_selection           (GtkSheet *sheet,
 507                                                   gint row, gint column);
 508 static void gtk_sheet_new_selection              (GtkSheet *sheet,
 509                                                   GtkSheetRange *range);
 510 static void gtk_sheet_draw_border                (GtkSheet *sheet,
 511                                                   GtkSheetRange range);
 512
 513 /* Active Cell handling */
 514
 515 static void gtk_sheet_entry_changed              (GtkWidget *widget,
 516                                                   gpointer data);
 517 static void gtk_sheet_hide_active_cell           (GtkSheet *sheet);
 518 static void change_active_cell           (GtkSheet *sheet,
 519                                           gint row, gint col);
 520 static void gtk_sheet_draw_active_cell           (GtkSheet *sheet);
 521 static void gtk_sheet_show_active_cell           (GtkSheet *sheet);
 522 static gboolean gtk_sheet_click_cell             (GtkSheet *sheet,
 523                                                   gint row,
 524                                                   gint column);
 525
 526
 527 /* Scrollbars */
 528
 529 static void adjust_scrollbars                    (GtkSheet *sheet);
 530 static void vadjustment_value_changed            (GtkAdjustment *adjustment,
 531                                                   gpointer data);
 532 static void hadjustment_value_changed            (GtkAdjustment *adjustment,
 533                                                   gpointer data);
 534
 535
 536 static void draw_xor_vline                       (GtkSheet *sheet);
 537 static void draw_xor_hline                       (GtkSheet *sheet);
 538 static void draw_xor_rectangle                   (GtkSheet *sheet,
 539                                                   GtkSheetRange range);
 540
 541 static guint new_column_width                    (GtkSheet *sheet,
 542                                                   gint column,
 543                                                   gint *x);
 544 static guint new_row_height                      (GtkSheet *sheet,
 545                                                   gint row,
 546                                                   gint *y);
 547 /* Sheet Button */
 548
 549 static void create_global_button                 (GtkSheet *sheet);
 550 static void global_button_clicked                (GtkWidget *widget,
 551                                                   gpointer data);
 552 /* Sheet Entry */
 553
 554 static void create_sheet_entry                   (GtkSheet *sheet);
 555 static void gtk_sheet_size_allocate_entry        (GtkSheet *sheet);
 556
 557 /* Sheet button gadgets */
 558
 559 static void draw_column_title_buttons    (GtkSheet *sheet);
 560 static void draw_row_title_buttons       (GtkSheet *sheet);
 561
 562
 563 static void size_allocate_global_button          (GtkSheet *sheet);
 564 static void gtk_sheet_button_size_request        (GtkSheet *sheet,
 565                                                   const GtkSheetButton *button,
 566                                                   GtkRequisition *requisition);
 567
 568 static void gtk_sheet_real_cell_clear            (GtkSheet *sheet,
 569                                                   gint row,
 570                                                   gint column);
 571
 572
 573 static void gtk_sheet_column_size_request (GtkSheet *sheet,
 574                                            gint col,
 575                                            guint *requisition);
 576 static void gtk_sheet_row_size_request (GtkSheet *sheet,
 577                                         gint row,
 578                                         guint *requisition);
 579
 580
 581 /* Signals */
 582 enum
 583   {
 584     SELECT_ROW,
 585     SELECT_COLUMN,
 586     DOUBLE_CLICK_ROW,
 587     DOUBLE_CLICK_COLUMN,
 588     BUTTON_EVENT_ROW,
 589     BUTTON_EVENT_COLUMN,
 590     SELECT_RANGE,
 591     RESIZE_RANGE,
 592     MOVE_RANGE,
 593     TRAVERSE,
 594     ACTIVATE,
 595     LAST_SIGNAL
 596   };
 597
 598 static GtkContainerClass *parent_class = NULL;
 599 static guint sheet_signals[LAST_SIGNAL] = { 0 };
 600
 601
 602 GType
 603 gtk_sheet_get_type ()
 604 {
 605   static GType sheet_type = 0;
 606
 607   if (!sheet_type)
 608     {
 609       static const GTypeInfo sheet_info =
 610         {
 611           sizeof (GtkSheetClass),
 612           NULL,
 613           NULL,
 614           (GClassInitFunc) gtk_sheet_class_init,
 615           NULL,
 616           NULL,
 617           sizeof (GtkSheet),
 618           0,
 619           (GInstanceInitFunc) gtk_sheet_init,
 620           NULL,
 621         };
 622
 623       sheet_type =
 624         g_type_register_static (GTK_TYPE_BIN, "GtkSheet",
 625                                 &sheet_info, 0);
 626     }
 627   return sheet_type;
 628 }
 629
 630 \f
 631
 632 static GtkSheetRange*
 633 gtk_sheet_range_copy (const GtkSheetRange *range)
 634 {
 635   GtkSheetRange *new_range;
 636
 637   g_return_val_if_fail (range != NULL, NULL);
 638
 639   new_range = g_new (GtkSheetRange, 1);
 640
 641   *new_range = *range;
 642
 643   return new_range;
 644 }
 645
 646 static void
 647 gtk_sheet_range_free (GtkSheetRange *range)
 648 {
 649   g_return_if_fail (range != NULL);
 650
 651   g_free (range);
 652 }
 653
 654 GType
 655 gtk_sheet_range_get_type (void)
 656 {
 657   static GType sheet_range_type = 0;
 658
 659   if (!sheet_range_type)
 660     {
 661       sheet_range_type =
 662         g_boxed_type_register_static ("GtkSheetRange",
 663                                       (GBoxedCopyFunc) gtk_sheet_range_copy,
 664                                       (GBoxedFreeFunc) gtk_sheet_range_free);
 665     }
 666
 667   return sheet_range_type;
 668 }
 669
 670 static GtkSheetCell*
 671 gtk_sheet_cell_copy (const GtkSheetCell *cell)
 672 {
 673   GtkSheetCell *new_cell;
 674
 675   g_return_val_if_fail (cell != NULL, NULL);
 676
 677   new_cell = g_new (GtkSheetCell, 1);
 678
 679   *new_cell = *cell;
 680
 681   return new_cell;
 682 }
 683
 684 static void
 685 gtk_sheet_cell_free (GtkSheetCell *cell)
 686 {
 687   g_return_if_fail (cell != NULL);
 688
 689   g_free (cell);
 690 }
 691
 692 GType
 693 gtk_sheet_cell_get_type (void)
 694 {
 695   static GType sheet_cell_type = 0;
 696
 697   if (!sheet_cell_type)
 698     {
 699       sheet_cell_type =
 700         g_boxed_type_register_static ("GtkSheetCell",
 701                                       (GBoxedCopyFunc) gtk_sheet_cell_copy,
 702                                       (GBoxedFreeFunc) gtk_sheet_cell_free);
 703     }
 704
 705   return sheet_cell_type;
 706 }
 707 \f
 708
 709 static void column_titles_changed (GtkWidget *w, gint first, gint n_columns,
 710                                    gpointer data);
 711
 712 /* Properties */
 713 enum
 714   {
 715     PROP_0,
 716     PROP_ROW_GEO,
 717     PROP_COL_GEO,
 718     PROP_MODEL
 719   };
 720
 721 static void
 722 gtk_sheet_set_row_geometry (GtkSheet *sheet, GSheetRow *geo)
 723 {
 724   if ( sheet->row_geometry ) g_object_unref (sheet->row_geometry);
 725
 726   sheet->row_geometry = geo;
 727
 728   if ( sheet->row_geometry ) g_object_ref (sheet->row_geometry);
 729 }
 730
 731 static void
 732 gtk_sheet_set_column_geometry (GtkSheet *sheet, GSheetColumn *geo)
 733 {
 734   if ( sheet->column_geometry ) g_object_unref (sheet->column_geometry);
 735
 736   sheet->column_geometry = geo;
 737
 738   if ( sheet->column_geometry ) g_object_ref (sheet->column_geometry);
 739 }
 740
 741
 742 static void
 743 gtk_sheet_set_property (GObject         *object,
 744                         guint            prop_id,
 745                         const GValue    *value,
 746                         GParamSpec      *pspec)
 747
 748 {
 749   GtkSheet *sheet = GTK_SHEET (object);
 750
 751   switch (prop_id)
 752     {
 753     case PROP_ROW_GEO:
 754       gtk_sheet_set_row_geometry (sheet, g_value_get_pointer (value));
 755       break;
 756     case PROP_COL_GEO:
 757       gtk_sheet_set_column_geometry (sheet, g_value_get_pointer (value));
 758       if ( sheet->column_geometry)
 759         g_signal_connect (sheet->column_geometry, "columns_changed",
 760                           G_CALLBACK (column_titles_changed), sheet);
 761       break;
 762     case PROP_MODEL:
 763       gtk_sheet_set_model (sheet, g_value_get_pointer (value));
 764       break;
 765     default:
 766       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 767       break;
 768     };
 769 }
 770
 771 static void
 772 gtk_sheet_get_property (GObject         *object,
 773                         guint            prop_id,
 774                         GValue          *value,
 775                         GParamSpec      *pspec)
 776 {
 777   GtkSheet *sheet = GTK_SHEET (object);
 778
 779   switch (prop_id)
 780     {
 781     case PROP_ROW_GEO:
 782       g_value_set_pointer (value, sheet->row_geometry);
 783       break;
 784     case PROP_COL_GEO:
 785       g_value_set_pointer (value, sheet->column_geometry);
 786       break;
 787     case PROP_MODEL:
 788       g_value_set_pointer (value, sheet->model);
 789       break;
 790     default:
 791       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
 792       break;
 793     };
 794 }
 795
 796
 797 static void
 798 gtk_sheet_class_init (GtkSheetClass *klass)
 799 {
 800   GObjectClass *object_class = G_OBJECT_CLASS (klass);
 801
 802   GParamSpec *row_geo_spec ;
 803   GParamSpec *col_geo_spec ;
 804   GParamSpec *model_spec ;
 805
 806   GtkWidgetClass *widget_class = GTK_WIDGET_CLASS (klass);
 807   GtkContainerClass *container_class = GTK_CONTAINER_CLASS (klass);
 808
 809   parent_class = g_type_class_peek_parent (klass);
 810
 811   /**
 812    * GtkSheet::select-row
 813    * @sheet: the sheet widget that emitted the signal
 814    * @row: the newly selected row index
 815    *
 816    * A row has been selected.
 817    */
 818   sheet_signals[SELECT_ROW] =
 819     g_signal_new ("select-row",
 820                   G_TYPE_FROM_CLASS (object_class),
 821                   G_SIGNAL_RUN_LAST,
 822                   offsetof (GtkSheetClass, select_row),
 823                   NULL, NULL,
 824                   g_cclosure_marshal_VOID__INT,
 825                   G_TYPE_NONE,
 826                   1,
 827                   G_TYPE_INT);
 828
 829
 830   /**
 831    * GtkSheet::select - column
 832    * @sheet: the sheet widget that emitted the signal
 833    * @column: the newly selected column index
 834    *
 835    * A column has been selected.
 836    */
 837   sheet_signals[SELECT_COLUMN] =
 838     g_signal_new ("select-column",
 839                   G_TYPE_FROM_CLASS (object_class),
 840                   G_SIGNAL_RUN_LAST,
 841                   offsetof (GtkSheetClass, select_column),
 842                   NULL, NULL,
 843                   g_cclosure_marshal_VOID__INT,
 844                   G_TYPE_NONE,
 845                   1,
 846                   G_TYPE_INT);
 847
 848
 849   /**
 850    * GtkSheet::double-click-row
 851    * @sheet: the sheet widget that emitted the signal
 852    * @row: the row that was double clicked.
 853    *
 854    * A row's title button has been double clicked
 855    */
 856   sheet_signals[DOUBLE_CLICK_ROW] =
 857     g_signal_new ("double-click-row",
 858                   G_TYPE_FROM_CLASS (object_class),
 859                   G_SIGNAL_RUN_LAST,
 860                   0,
 861                   NULL, NULL,
 862                   g_cclosure_marshal_VOID__INT,
 863                   G_TYPE_NONE,
 864                   1,
 865                   G_TYPE_INT);
 866
 867
 868   /**
 869    * GtkSheet::double-click-column
 870    * @sheet: the sheet widget that emitted the signal
 871    * @column: the column that was double clicked.
 872    *
 873    * A column's title button has been double clicked
 874    */
 875   sheet_signals[DOUBLE_CLICK_COLUMN] =
 876     g_signal_new ("double-click-column",
 877                   G_TYPE_FROM_CLASS (object_class),
 878                   G_SIGNAL_RUN_LAST,
 879                   0,
 880                   NULL, NULL,
 881                   g_cclosure_marshal_VOID__INT,
 882                   G_TYPE_NONE,
 883                   1,
 884                   G_TYPE_INT);
 885
 886
 887   /**
 888    * GtkSheet::button-event-column
 889    * @sheet: the sheet widget that emitted the signal
 890    * @column: the column on which the event occured.
 891    *
 892    * A button event occured on a column title button
 893    */
 894   sheet_signals[BUTTON_EVENT_COLUMN] =
 895     g_signal_new ("button-event-column",
 896                   G_TYPE_FROM_CLASS (object_class),
 897                   G_SIGNAL_RUN_LAST,
 898                   0,
 899                   NULL, NULL,
 900                   gtkextra_VOID__INT_POINTER,
 901                   G_TYPE_NONE,
 902                   2,
 903                   G_TYPE_INT,
 904                   G_TYPE_POINTER
 905                   );
 906
 907
 908   /**
 909    * GtkSheet::button-event-row
 910    * @sheet: the sheet widget that emitted the signal
 911    * @column: the column on which the event occured.
 912    *
 913    * A button event occured on a row title button
 914    */
 915   sheet_signals[BUTTON_EVENT_ROW] =
 916     g_signal_new ("button-event-row",
 917                   G_TYPE_FROM_CLASS (object_class),
 918                   G_SIGNAL_RUN_LAST,
 919                   0,
 920                   NULL, NULL,
 921                   gtkextra_VOID__INT_POINTER,
 922                   G_TYPE_NONE,
 923                   2,
 924                   G_TYPE_INT,
 925                   G_TYPE_POINTER
 926                   );
 927
 928
 929   sheet_signals[SELECT_RANGE] =
 930     g_signal_new ("select-range",
 931                   G_TYPE_FROM_CLASS (object_class),
 932                   G_SIGNAL_RUN_LAST,
 933                   offsetof (GtkSheetClass, select_range),
 934                   NULL, NULL,
 935                   g_cclosure_marshal_VOID__BOXED,
 936                   G_TYPE_NONE,
 937                   1,
 938                   GTK_TYPE_SHEET_RANGE);
 939
 940
 941   sheet_signals[RESIZE_RANGE] =
 942     g_signal_new ("resize-range",
 943                   G_TYPE_FROM_CLASS (object_class),
 944                   G_SIGNAL_RUN_LAST,
 945                   offsetof (GtkSheetClass, resize_range),
 946                   NULL, NULL,
 947                   gtkextra_VOID__BOXED_BOXED,
 948                   G_TYPE_NONE,
 949                   2,
 950                   GTK_TYPE_SHEET_RANGE, GTK_TYPE_SHEET_RANGE
 951                   );
 952
 953   sheet_signals[MOVE_RANGE] =
 954     g_signal_new ("move-range",
 955                   G_TYPE_FROM_CLASS (object_class),
 956                   G_SIGNAL_RUN_LAST,
 957                   offsetof (GtkSheetClass, move_range),
 958                   NULL, NULL,
 959                   gtkextra_VOID__BOXED_BOXED,
 960                   G_TYPE_NONE,
 961                   2,
 962                   GTK_TYPE_SHEET_RANGE, GTK_TYPE_SHEET_RANGE
 963                   );
 964
 965   sheet_signals[TRAVERSE] =
 966     g_signal_new ("traverse",
 967                   G_TYPE_FROM_CLASS (object_class),
 968                   G_SIGNAL_RUN_LAST,
 969                   offsetof (GtkSheetClass, traverse),
 970                   NULL, NULL,
 971                   gtkextra_BOOLEAN__BOXED_POINTER,
 972                   G_TYPE_BOOLEAN, 2,
 973                   GTK_TYPE_SHEET_CELL,
 974                   G_TYPE_POINTER);
 975
 976
 977   sheet_signals[ACTIVATE] =
 978     g_signal_new ("activate",
 979                   G_TYPE_FROM_CLASS (object_class),
 980                   G_SIGNAL_RUN_LAST,
 981                   offsetof (GtkSheetClass, activate),
 982                   NULL, NULL,
 983                   gtkextra_VOID__INT_INT_INT_INT,
 984                   G_TYPE_NONE, 4,
 985                   G_TYPE_INT, G_TYPE_INT,
 986                   G_TYPE_INT, G_TYPE_INT);
 987
 988   widget_class->set_scroll_adjustments_signal =
 989     g_signal_new ("set-scroll-adjustments",
 990                   G_TYPE_FROM_CLASS (object_class),
 991                   G_SIGNAL_RUN_LAST,
 992                   offsetof (GtkSheetClass, set_scroll_adjustments),
 993                   NULL, NULL,
 994                   gtkextra_VOID__OBJECT_OBJECT,
 995                   G_TYPE_NONE, 2, GTK_TYPE_ADJUSTMENT, GTK_TYPE_ADJUSTMENT);
 996
 997
 998   container_class->add = NULL;
 999   container_class->remove = NULL;
1000   container_class->forall = gtk_sheet_forall;
1001
1002   object_class->dispose = gtk_sheet_dispose;
1003   object_class->finalize = gtk_sheet_finalize;
1004
1005
1006   row_geo_spec =
1007     g_param_spec_pointer ("row-geometry",
1008                           "Row Geometry",
1009                           "A pointer to the model of the row geometry",
1010                           G_PARAM_READABLE | G_PARAM_WRITABLE );
1011
1012   col_geo_spec =
1013     g_param_spec_pointer ("column-geometry",
1014                           "Column Geometry",
1015                           "A pointer to the model of the column geometry",
1016                           G_PARAM_READABLE | G_PARAM_WRITABLE );
1017
1018   model_spec =
1019     g_param_spec_pointer ("model",
1020                           "Model",
1021                           "A pointer to the data model",
1022                           G_PARAM_READABLE | G_PARAM_WRITABLE );
1023
1024
1025   object_class->set_property = gtk_sheet_set_property;
1026   object_class->get_property = gtk_sheet_get_property;
1027
1028   g_object_class_install_property (object_class,
1029                                    PROP_ROW_GEO,
1030                                    row_geo_spec);
1031
1032   g_object_class_install_property (object_class,
1033                                    PROP_COL_GEO,
1034                                    col_geo_spec);
1035
1036   g_object_class_install_property (object_class,
1037                                    PROP_MODEL,
1038                                    model_spec);
1039
1040
1041   widget_class->realize = gtk_sheet_realize;
1042   widget_class->unrealize = gtk_sheet_unrealize;
1043   widget_class->map = gtk_sheet_map;
1044   widget_class->unmap = gtk_sheet_unmap;
1045   widget_class->style_set = gtk_sheet_style_set;
1046   widget_class->button_press_event = gtk_sheet_button_press;
1047   widget_class->button_release_event = gtk_sheet_button_release;
1048   widget_class->motion_notify_event = gtk_sheet_motion;
1049   widget_class->enter_notify_event = gtk_sheet_crossing_notify;
1050   widget_class->leave_notify_event = gtk_sheet_crossing_notify;
1051   widget_class->key_press_event = gtk_sheet_key_press;
1052   widget_class->expose_event = gtk_sheet_expose;
1053   widget_class->size_request = gtk_sheet_size_request;
1054   widget_class->size_allocate = gtk_sheet_size_allocate;
1055   widget_class->focus_in_event = NULL;
1056   widget_class->focus_out_event = NULL;
1057
1058   klass->set_scroll_adjustments = gtk_sheet_set_scroll_adjustments;
1059   klass->select_row = NULL;
1060   klass->select_column = NULL;
1061   klass->select_range = NULL;
1062   klass->resize_range = NULL;
1063   klass->move_range = NULL;
1064   klass->traverse = NULL;
1065   klass->activate = NULL;
1066   klass->changed = NULL;
1067 }
1068
1069 static void
1070 gtk_sheet_init (GtkSheet *sheet)
1071 {
1072   sheet->model = NULL;
1073   sheet->column_geometry = NULL;
1074   sheet->row_geometry = NULL;
1075
1076   sheet->flags = 0;
1077   sheet->selection_mode = GTK_SELECTION_NONE;
1078   sheet->state = GTK_SHEET_NORMAL;
1079
1080   GTK_WIDGET_UNSET_FLAGS (sheet, GTK_NO_WINDOW);
1081   GTK_WIDGET_SET_FLAGS (sheet, GTK_CAN_FOCUS);
1082
1083   sheet->column_title_window = NULL;
1084   sheet->column_title_area.x = 0;
1085   sheet->column_title_area.y = 0;
1086   sheet->column_title_area.width = 0;
1087   sheet->column_title_area.height = DEFAULT_ROW_HEIGHT;
1088
1089   sheet->row_title_window = NULL;
1090   sheet->row_title_area.x = 0;
1091   sheet->row_title_area.y = 0;
1092   sheet->row_title_area.width = DEFAULT_COLUMN_WIDTH;
1093   sheet->row_title_area.height = 0;
1094
1095
1096   sheet->active_cell.row = 0;
1097   sheet->active_cell.col = 0;
1098   sheet->selection_cell.row = 0;
1099   sheet->selection_cell.col = 0;
1100
1101   sheet->range.row0 = 0;
1102   sheet->range.rowi = 0;
1103   sheet->range.col0 = 0;
1104   sheet->range.coli = 0;
1105
1106   sheet->state = GTK_SHEET_NORMAL;
1107
1108   sheet->sheet_window = NULL;
1109   sheet->entry_widget = NULL;
1110   sheet->entry_container = NULL;
1111   sheet->entry_handler_id = 0;
1112   sheet->button = NULL;
1113
1114   sheet->hadjustment = NULL;
1115   sheet->vadjustment = NULL;
1116
1117   sheet->cursor_drag = NULL;
1118
1119   sheet->xor_gc = NULL;
1120   sheet->fg_gc = NULL;
1121   sheet->bg_gc = NULL;
1122   sheet->x_drag = 0;
1123   sheet->y_drag = 0;
1124   sheet->show_grid = TRUE;
1125
1126   sheet->motion_timer = 0;
1127
1128   sheet->columns_resizable = TRUE;
1129   sheet->rows_resizable = TRUE;
1130
1131   sheet->row_titles_visible = TRUE;
1132   sheet->row_title_area.width = DEFAULT_COLUMN_WIDTH;
1133
1134   sheet->column_titles_visible = TRUE;
1135
1136
1137   /* create sheet entry */
1138   sheet->entry_type = 0;
1139   create_sheet_entry (sheet);
1140
1141   /* create global selection button */
1142   create_global_button (sheet);
1143 }
1144
1145
1146 /* Callback which occurs whenever columns are inserted / deleted in the model */
1147 static void
1148 columns_inserted_deleted_callback (GSheetModel *model, gint first_column,
1149                                    gint n_columns,
1150                                    gpointer data)
1151 {
1152   gint i;
1153   GtkSheet *sheet = GTK_SHEET (data);
1154
1155   GtkSheetRange range;
1156   gint model_columns = g_sheet_model_get_column_count (model);
1157
1158
1159   /* Need to update all the columns starting from the first column and onwards.
1160    * Previous column are unchanged, so don't need to be updated.
1161    */
1162   range.col0 = first_column;
1163   range.row0 = 0;
1164   range.coli = g_sheet_column_get_column_count (sheet->column_geometry) - 1;
1165   range.rowi = g_sheet_row_get_row_count (sheet->row_geometry) - 1;
1166
1167   adjust_scrollbars (sheet);
1168
1169   if (sheet->active_cell.col >= model_columns)
1170     change_active_cell (sheet, sheet->active_cell.row, model_columns - 1);
1171
1172   for (i = first_column; i <= max_visible_column (sheet); i++)
1173     gtk_sheet_column_title_button_draw (sheet, i);
1174
1175   gtk_sheet_range_draw (sheet, &range);
1176 }
1177
1178
1179 /* Callback which occurs whenever rows are inserted / deleted in the model */
1180 static void
1181 rows_inserted_deleted_callback (GSheetModel *model, gint first_row,
1182                                 gint n_rows, gpointer data)
1183 {
1184   gint i;
1185   GtkSheet *sheet = GTK_SHEET (data);
1186
1187   GtkSheetRange range;
1188
1189   gint model_rows = g_sheet_model_get_row_count (model);
1190
1191   /* Need to update all the rows starting from the first row and onwards.
1192    * Previous rows are unchanged, so don't need to be updated.
1193    */
1194   range.row0 = first_row;
1195   range.col0 = 0;
1196   range.rowi = g_sheet_row_get_row_count (sheet->row_geometry) - 1;
1197   range.coli = g_sheet_column_get_column_count (sheet->column_geometry) - 1;
1198
1199   adjust_scrollbars (sheet);
1200
1201   if (sheet->active_cell.row >= model_rows)
1202     change_active_cell (sheet, model_rows - 1, sheet->active_cell.col);
1203
1204   for (i = first_row; i <= max_visible_row (sheet); i++)
1205     gtk_sheet_row_title_button_draw (sheet, i);
1206
1207   gtk_sheet_range_draw (sheet, &range);
1208 }
1209
1210 /*
1211   If row0 or rowi are negative, then all rows will be updated.
1212   If col0 or coli are negative, then all columns will be updated.
1213 */
1214 static void
1215 range_update_callback (GSheetModel *m, gint row0, gint col0,
1216                        gint rowi, gint coli, gpointer data)
1217 {
1218   GtkSheet *sheet = GTK_SHEET (data);
1219
1220   GtkSheetRange range;
1221
1222   range.row0 = row0;
1223   range.col0 = col0;
1224   range.rowi = rowi;
1225   range.coli = coli;
1226
1227   if ( !GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
1228     return;
1229
1230   if ( max_visible_row (sheet) > g_sheet_model_get_row_count (sheet->model)
1231        ||
1232        max_visible_column (sheet) > g_sheet_model_get_column_count (sheet->model))
1233     {
1234       gtk_sheet_moveto (sheet, 0, 0, 0, 0);
1235     }
1236
1237   if ( ( row0 < 0 && col0 < 0 ) || ( rowi < 0 && coli < 0 ) )
1238     {
1239       gint i;
1240       gtk_sheet_range_draw (sheet, NULL);
1241       adjust_scrollbars (sheet);
1242
1243       for (i = min_visible_row (sheet); i <= max_visible_row (sheet); i++)
1244         gtk_sheet_row_title_button_draw (sheet, i);
1245
1246       for (i = min_visible_column (sheet);
1247            i <= max_visible_column (sheet); i++)
1248         gtk_sheet_column_title_button_draw (sheet, i);
1249
1250       return;
1251     }
1252   else if ( row0 < 0 || rowi < 0 )
1253     {
1254       range.row0 = min_visible_row (sheet);
1255       range.rowi = max_visible_row (sheet);
1256     }
1257   else if ( col0 < 0 || coli < 0 )
1258     {
1259       range.col0 = min_visible_column (sheet);
1260       range.coli = max_visible_column (sheet);
1261     }
1262
1263   gtk_sheet_range_draw (sheet, &range);
1264 }
1265
1266
1267 /**
1268  * gtk_sheet_new:
1269  * @rows: initial number of rows
1270  * @columns: initial number of columns
1271  * @title: sheet title
1272  * @model: the model to use for the sheet data
1273  *
1274  * Creates a new sheet widget with the given number of rows and columns.
1275  *
1276  * Returns: the new sheet widget
1277  */
1278 GtkWidget *
1279 gtk_sheet_new (GSheetRow *vgeo, GSheetColumn *hgeo, GSheetModel *model)
1280 {
1281   GtkWidget *widget = g_object_new (GTK_TYPE_SHEET,
1282                                     "row-geometry", vgeo,
1283                                     "column-geometry", hgeo,
1284                                     "model", model,
1285                                     NULL);
1286   return widget;
1287 }
1288
1289
1290 /**
1291  * gtk_sheet_set_model
1292  * @sheet: the sheet to set the model for
1293  * @model: the model to use for the sheet data
1294  *
1295  * Sets the model for a GtkSheet
1296  *
1297  */
1298 void
1299 gtk_sheet_set_model (GtkSheet *sheet, GSheetModel *model)
1300 {
1301   g_return_if_fail (GTK_IS_SHEET (sheet));
1302
1303   if (sheet->model ) g_object_unref (sheet->model);
1304
1305   sheet->model = model;
1306
1307   if ( model)
1308     {
1309       g_object_ref (model);
1310
1311       g_signal_connect (model, "range_changed",
1312                         G_CALLBACK (range_update_callback), sheet);
1313
1314       g_signal_connect (model, "rows_inserted",
1315                         G_CALLBACK (rows_inserted_deleted_callback), sheet);
1316
1317       g_signal_connect (model, "rows_deleted",
1318                         G_CALLBACK (rows_inserted_deleted_callback), sheet);
1319
1320       g_signal_connect (model, "columns_inserted",
1321                         G_CALLBACK (columns_inserted_deleted_callback), sheet);
1322
1323       g_signal_connect (model, "columns_deleted",
1324                         G_CALLBACK (columns_inserted_deleted_callback), sheet);
1325     }
1326 }
1327
1328
1329 /* Call back for when the column titles have changed.
1330    FIRST is the first column changed.
1331    N_COLUMNS is the number of columns which have changed, or -1, which
1332    indicates that the column has changed to its right-most extremity
1333 */
1334 static void
1335 column_titles_changed (GtkWidget *w, gint first, gint n_columns, gpointer data)
1336 {
1337   GtkSheet *sheet = GTK_SHEET (data);
1338   gboolean extremity = FALSE;
1339
1340   if ( n_columns == -1 )
1341     {
1342       extremity = TRUE;
1343       n_columns = g_sheet_column_get_column_count (sheet->column_geometry) - 1 ;
1344     }
1345
1346   if ( extremity)
1347     gtk_sheet_column_title_button_draw (sheet, -1);
1348 }
1349
1350 void
1351 gtk_sheet_change_entry (GtkSheet *sheet, GtkType entry_type)
1352 {
1353   gint state;
1354
1355   g_return_if_fail (sheet != NULL);
1356   g_return_if_fail (GTK_IS_SHEET (sheet));
1357
1358   state = sheet->state;
1359
1360   if (sheet->state == GTK_SHEET_NORMAL)
1361     gtk_sheet_hide_active_cell (sheet);
1362
1363   sheet->entry_type = entry_type;
1364
1365   create_sheet_entry (sheet);
1366
1367   if (state == GTK_SHEET_NORMAL)
1368     {
1369       gtk_sheet_show_active_cell (sheet);
1370     }
1371
1372 }
1373
1374 void
1375 gtk_sheet_show_grid (GtkSheet *sheet, gboolean show)
1376 {
1377   g_return_if_fail (sheet != NULL);
1378   g_return_if_fail (GTK_IS_SHEET (sheet));
1379
1380   if (show == sheet->show_grid) return;
1381
1382   sheet->show_grid = show;
1383
1384   gtk_sheet_range_draw (sheet, NULL);
1385 }
1386
1387 gboolean
1388 gtk_sheet_grid_visible (GtkSheet *sheet)
1389 {
1390   g_return_val_if_fail (sheet != NULL, 0);
1391   g_return_val_if_fail (GTK_IS_SHEET (sheet), 0);
1392
1393   return sheet->show_grid;
1394 }
1395
1396 guint
1397 gtk_sheet_get_columns_count (GtkSheet *sheet)
1398 {
1399   g_return_val_if_fail (sheet != NULL, 0);
1400   g_return_val_if_fail (GTK_IS_SHEET (sheet), 0);
1401
1402   return g_sheet_column_get_column_count (sheet->column_geometry);
1403 }
1404
1405 static void
1406 gtk_sheet_set_column_width (GtkSheet *sheet,
1407                             gint column,
1408                             guint width);
1409
1410
1411 static void
1412 gtk_sheet_autoresize_column (GtkSheet *sheet, gint column)
1413 {
1414   gint text_width = 0;
1415   gint row;
1416
1417   g_return_if_fail (sheet != NULL);
1418   g_return_if_fail (GTK_IS_SHEET (sheet));
1419   if (column >= g_sheet_column_get_column_count (sheet->column_geometry) || column < 0) return;
1420
1421   for (row = 0; row < g_sheet_row_get_row_count (sheet->row_geometry); row++)
1422     {
1423       gchar *text = gtk_sheet_cell_get_text (sheet, row, column);
1424       if (text && strlen (text) > 0)
1425         {
1426           GtkSheetCellAttr attributes;
1427
1428           gtk_sheet_get_attributes (sheet, row, column, &attributes);
1429           if (attributes.is_visible)
1430             {
1431               gint width = STRING_WIDTH (GTK_WIDGET (sheet),
1432                                          attributes.font_desc,
1433                                          text)
1434                 + 2 * COLUMN_TITLES_HEIGHT + attributes.border.width;
1435               text_width = MAX (text_width, width);
1436             }
1437         }
1438       dispose_string (sheet, text);
1439     }
1440
1441   if (text_width > g_sheet_column_get_width (sheet->column_geometry, column) )
1442     {
1443       gtk_sheet_set_column_width (sheet, column, text_width);
1444     }
1445 }
1446
1447 void
1448 gtk_sheet_show_column_titles (GtkSheet *sheet)
1449 {
1450   if (sheet->column_titles_visible) return;
1451
1452   sheet->column_titles_visible = TRUE;
1453
1454   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
1455     return;
1456
1457   gdk_window_show (sheet->column_title_window);
1458   gdk_window_move_resize (sheet->column_title_window,
1459                           sheet->column_title_area.x,
1460                           sheet->column_title_area.y,
1461                           sheet->column_title_area.width,
1462                           sheet->column_title_area.height);
1463
1464   adjust_scrollbars (sheet);
1465
1466   if (sheet->vadjustment)
1467     g_signal_emit_by_name (sheet->vadjustment,
1468                            "value_changed");
1469   size_allocate_global_button (sheet);
1470 }
1471
1472
1473 void
1474 gtk_sheet_show_row_titles (GtkSheet *sheet)
1475 {
1476   if (sheet->row_titles_visible) return;
1477
1478   sheet->row_titles_visible = TRUE;
1479
1480
1481   if (GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
1482     {
1483       gdk_window_show (sheet->row_title_window);
1484       gdk_window_move_resize (sheet->row_title_window,
1485                               sheet->row_title_area.x,
1486                               sheet->row_title_area.y,
1487                               sheet->row_title_area.width,
1488                               sheet->row_title_area.height);
1489
1490       adjust_scrollbars (sheet);
1491     }
1492
1493   if (sheet->hadjustment)
1494     g_signal_emit_by_name (sheet->hadjustment,
1495                            "value_changed");
1496   size_allocate_global_button (sheet);
1497 }
1498
1499 void
1500 gtk_sheet_hide_column_titles (GtkSheet *sheet)
1501 {
1502   if (!sheet->column_titles_visible) return;
1503
1504   sheet->column_titles_visible = FALSE;
1505
1506   if (GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
1507     {
1508       if (sheet->column_title_window)
1509         gdk_window_hide (sheet->column_title_window);
1510       if (GTK_WIDGET_VISIBLE (sheet->button))
1511         gtk_widget_hide (sheet->button);
1512
1513       adjust_scrollbars (sheet);
1514     }
1515
1516   if (sheet->vadjustment)
1517     g_signal_emit_by_name (sheet->vadjustment,
1518                            "value_changed");
1519 }
1520
1521 void
1522 gtk_sheet_hide_row_titles (GtkSheet *sheet)
1523 {
1524   if (!sheet->row_titles_visible) return;
1525
1526   sheet->row_titles_visible = FALSE;
1527
1528   if (GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
1529     {
1530       if (sheet->row_title_window)
1531         gdk_window_hide (sheet->row_title_window);
1532
1533       if (GTK_WIDGET_VISIBLE (sheet->button))
1534         gtk_widget_hide (sheet->button);
1535
1536       adjust_scrollbars (sheet);
1537     }
1538
1539   if (sheet->hadjustment)
1540     g_signal_emit_by_name (sheet->hadjustment,
1541                            "value_changed");
1542 }
1543
1544
1545 /* Scroll the sheet so that the cell ROW, COLUMN is visible.
1546    If {ROW,COL}_ALIGN is zero, then the cell will be placed
1547    at the {top,left} of the sheet.  If it's 1, then it'll
1548    be placed at the {bottom,right}.
1549    ROW or COL may be -1, in which case scrolling in that dimension
1550    does not occur.
1551  */
1552 void
1553 gtk_sheet_moveto (GtkSheet *sheet,
1554                   gint row,
1555                   gint col,
1556                   gfloat row_align,
1557                   gfloat col_align)
1558 {
1559   gint width, height;
1560
1561   g_return_if_fail (row_align >= 0);
1562   g_return_if_fail (col_align >= 0);
1563
1564   g_return_if_fail (row_align <= 1);
1565   g_return_if_fail (col_align <= 1);
1566
1567   g_return_if_fail (col <
1568                     g_sheet_column_get_column_count (sheet->column_geometry));
1569   g_return_if_fail (row <
1570                     g_sheet_row_get_row_count (sheet->row_geometry));
1571
1572   gdk_drawable_get_size (sheet->sheet_window, &width, &height);
1573
1574
1575   if (row >= 0)
1576   {
1577     gint y =  g_sheet_row_start_pixel (sheet->row_geometry, row);
1578
1579     gtk_adjustment_set_value (sheet->vadjustment, y - height * row_align);
1580   }
1581
1582
1583   if (col >= 0)
1584   {
1585     gint x =  g_sheet_column_start_pixel (sheet->column_geometry, col);
1586
1587     gtk_adjustment_set_value (sheet->hadjustment, x - width * col_align);
1588   }
1589 }
1590
1591
1592 static gboolean
1593 gtk_sheet_columns_resizable (GtkSheet *sheet)
1594 {
1595   g_return_val_if_fail (sheet != NULL, FALSE);
1596   g_return_val_if_fail (GTK_IS_SHEET (sheet), FALSE);
1597
1598   return sheet->columns_resizable;
1599 }
1600
1601
1602 static gboolean
1603 gtk_sheet_rows_resizable (GtkSheet *sheet)
1604 {
1605   g_return_val_if_fail (sheet != NULL, FALSE);
1606   g_return_val_if_fail (GTK_IS_SHEET (sheet), FALSE);
1607
1608   return sheet->rows_resizable;
1609 }
1610
1611
1612 void
1613 gtk_sheet_select_row (GtkSheet *sheet, gint row)
1614 {
1615   g_return_if_fail (sheet != NULL);
1616   g_return_if_fail (GTK_IS_SHEET (sheet));
1617
1618   if (row < 0 || row >= g_sheet_row_get_row_count (sheet->row_geometry))
1619     return;
1620
1621   if (sheet->state != GTK_SHEET_NORMAL)
1622     gtk_sheet_real_unselect_range (sheet, NULL);
1623
1624   sheet->state = GTK_SHEET_ROW_SELECTED;
1625   sheet->range.row0 = row;
1626   sheet->range.col0 = 0;
1627   sheet->range.rowi = row;
1628   sheet->range.coli = g_sheet_column_get_column_count (sheet->column_geometry) - 1;
1629   sheet->active_cell.row = row;
1630   sheet->active_cell.col = 0;
1631
1632   g_signal_emit (sheet, sheet_signals[SELECT_ROW], 0, row);
1633   gtk_sheet_real_select_range (sheet, NULL);
1634 }
1635
1636
1637 void
1638 gtk_sheet_select_column (GtkSheet *sheet, gint column)
1639 {
1640   g_return_if_fail (sheet != NULL);
1641   g_return_if_fail (GTK_IS_SHEET (sheet));
1642
1643   if (column < 0 || column >= g_sheet_column_get_column_count (sheet->column_geometry))
1644     return;
1645
1646   if (sheet->state != GTK_SHEET_NORMAL)
1647     gtk_sheet_real_unselect_range (sheet, NULL);
1648
1649   sheet->state = GTK_SHEET_COLUMN_SELECTED;
1650   sheet->range.row0 = 0;
1651   sheet->range.col0 = column;
1652   sheet->range.rowi = g_sheet_row_get_row_count (sheet->row_geometry) - 1;
1653   sheet->range.coli = column;
1654   sheet->active_cell.row = 0;
1655   sheet->active_cell.col = column;
1656
1657   g_signal_emit (sheet, sheet_signals[SELECT_COLUMN], 0, column);
1658   gtk_sheet_real_select_range (sheet, NULL);
1659 }
1660
1661
1662
1663
1664 static gboolean
1665 gtk_sheet_range_isvisible (const GtkSheet *sheet,
1666                            GtkSheetRange range)
1667 {
1668   g_return_val_if_fail (sheet != NULL, FALSE);
1669
1670   if (range.row0 < 0 || range.row0 >= g_sheet_row_get_row_count (sheet->row_geometry))
1671     return FALSE;
1672
1673   if (range.rowi < 0 || range.rowi >= g_sheet_row_get_row_count (sheet->row_geometry))
1674     return FALSE;
1675
1676   if (range.col0 < 0 || range.col0 >= g_sheet_column_get_column_count (sheet->column_geometry))
1677     return FALSE;
1678
1679   if (range.coli < 0 || range.coli >= g_sheet_column_get_column_count (sheet->column_geometry))
1680     return FALSE;
1681
1682   if (range.rowi < min_visible_row (sheet))
1683     return FALSE;
1684
1685   if (range.row0 > max_visible_row (sheet))
1686     return FALSE;
1687
1688   if (range.coli < min_visible_column (sheet))
1689     return FALSE;
1690
1691   if (range.col0 > max_visible_column (sheet))
1692     return FALSE;
1693
1694   return TRUE;
1695 }
1696
1697 static gboolean
1698 gtk_sheet_cell_isvisible (GtkSheet *sheet,
1699                           gint row, gint column)
1700 {
1701   GtkSheetRange range;
1702
1703   range.row0 = row;
1704   range.col0 = column;
1705   range.rowi = row;
1706   range.coli = column;
1707
1708   return gtk_sheet_range_isvisible (sheet, range);
1709 }
1710
1711 void
1712 gtk_sheet_get_visible_range (GtkSheet *sheet, GtkSheetRange *range)
1713 {
1714   g_return_if_fail (sheet != NULL);
1715   g_return_if_fail (GTK_IS_SHEET (sheet)) ;
1716   g_return_if_fail (range != NULL);
1717
1718   range->row0 = min_visible_row (sheet);
1719   range->col0 = min_visible_column (sheet);
1720   range->rowi = max_visible_row (sheet);
1721   range->coli = max_visible_column (sheet);
1722 }
1723
1724
1725 static void
1726 gtk_sheet_set_scroll_adjustments (GtkSheet *sheet,
1727                                   GtkAdjustment *hadjustment,
1728                                   GtkAdjustment *vadjustment)
1729 {
1730   if ( sheet->vadjustment != vadjustment )
1731     {
1732       if (sheet->vadjustment)
1733         g_object_unref (sheet->vadjustment);
1734       sheet->vadjustment = vadjustment;
1735       g_object_ref (vadjustment);
1736
1737       g_signal_connect (sheet->vadjustment, "value_changed",
1738                         G_CALLBACK (vadjustment_value_changed),
1739                         sheet);
1740     }
1741
1742   if ( sheet->hadjustment != hadjustment )
1743     {
1744       if (sheet->hadjustment)
1745         g_object_unref (sheet->hadjustment);
1746       sheet->hadjustment = hadjustment;
1747       g_object_ref (hadjustment);
1748
1749       g_signal_connect (sheet->hadjustment, "value_changed",
1750                         G_CALLBACK (hadjustment_value_changed),
1751                         sheet);
1752     }
1753 }
1754
1755 static void
1756 gtk_sheet_finalize (GObject *object)
1757 {
1758   GtkSheet *sheet;
1759
1760   g_return_if_fail (object != NULL);
1761   g_return_if_fail (GTK_IS_SHEET (object));
1762
1763   sheet = GTK_SHEET (object);
1764
1765   if (G_OBJECT_CLASS (parent_class)->finalize)
1766     (*G_OBJECT_CLASS (parent_class)->finalize) (object);
1767 }
1768
1769 static void
1770 gtk_sheet_dispose  (GObject *object)
1771 {
1772   GtkSheet *sheet = GTK_SHEET (object);
1773
1774   g_return_if_fail (object != NULL);
1775   g_return_if_fail (GTK_IS_SHEET (object));
1776
1777   if ( sheet->dispose_has_run )
1778     return ;
1779
1780   sheet->dispose_has_run = TRUE;
1781
1782   if (sheet->model) g_object_unref (sheet->model);
1783   if (sheet->row_geometry) g_object_unref (sheet->row_geometry);
1784   if (sheet->column_geometry) g_object_unref (sheet->column_geometry);
1785
1786   g_object_unref (sheet->entry_container);
1787   sheet->entry_container = NULL;
1788
1789   g_object_unref (sheet->button);
1790   sheet->button = NULL;
1791
1792   /* unref adjustments */
1793   if (sheet->hadjustment)
1794     {
1795       g_signal_handlers_disconnect_matched (sheet->hadjustment,
1796                                             G_SIGNAL_MATCH_DATA,
1797                                             0, 0, 0, 0,
1798                                             sheet);
1799
1800       g_object_unref (sheet->hadjustment);
1801       sheet->hadjustment = NULL;
1802     }
1803
1804   if (sheet->vadjustment)
1805     {
1806       g_signal_handlers_disconnect_matched (sheet->vadjustment,
1807                                             G_SIGNAL_MATCH_DATA,
1808                                             0, 0, 0, 0,
1809                                             sheet);
1810
1811       g_object_unref (sheet->vadjustment);
1812
1813       sheet->vadjustment = NULL;
1814     }
1815
1816   if (G_OBJECT_CLASS (parent_class)->dispose)
1817     (*G_OBJECT_CLASS (parent_class)->dispose) (object);
1818 }
1819
1820 static void
1821 gtk_sheet_style_set (GtkWidget *widget,
1822                      GtkStyle *previous_style)
1823 {
1824   GtkSheet *sheet;
1825
1826   g_return_if_fail (widget != NULL);
1827   g_return_if_fail (GTK_IS_SHEET (widget));
1828
1829   if (GTK_WIDGET_CLASS (parent_class)->style_set)
1830     (*GTK_WIDGET_CLASS (parent_class)->style_set) (widget, previous_style);
1831
1832   sheet = GTK_SHEET (widget);
1833
1834   if (GTK_WIDGET_REALIZED (widget))
1835     {
1836       gtk_style_set_background (widget->style, widget->window, widget->state);
1837     }
1838
1839 }
1840
1841 static void
1842 gtk_sheet_realize (GtkWidget *widget)
1843 {
1844   GtkSheet *sheet;
1845   GdkWindowAttr attributes;
1846   const gint attributes_mask =
1847     GDK_WA_X | GDK_WA_Y | GDK_WA_VISUAL | GDK_WA_COLORMAP | GDK_WA_CURSOR;
1848
1849   GdkGCValues values, auxvalues;
1850   GdkColormap *colormap;
1851   GdkDisplay *display;
1852
1853   g_return_if_fail (widget != NULL);
1854   g_return_if_fail (GTK_IS_SHEET (widget));
1855
1856   sheet = GTK_SHEET (widget);
1857
1858   GTK_WIDGET_SET_FLAGS (widget, GTK_REALIZED);
1859
1860   colormap = gtk_widget_get_colormap (widget);
1861   display = gtk_widget_get_display (widget);
1862
1863   attributes.window_type = GDK_WINDOW_CHILD;
1864   attributes.x = widget->allocation.x;
1865   attributes.y = widget->allocation.y;
1866   attributes.width = widget->allocation.width;
1867   attributes.height = widget->allocation.height;
1868   attributes.wclass = GDK_INPUT_OUTPUT;
1869
1870   attributes.visual = gtk_widget_get_visual (widget);
1871   attributes.colormap = colormap;
1872
1873   attributes.event_mask = gtk_widget_get_events (widget);
1874   attributes.event_mask |= (GDK_EXPOSURE_MASK |
1875                             GDK_BUTTON_PRESS_MASK |
1876                             GDK_BUTTON_RELEASE_MASK |
1877                             GDK_KEY_PRESS_MASK |
1878                             GDK_ENTER_NOTIFY_MASK |
1879                             GDK_LEAVE_NOTIFY_MASK |
1880                             GDK_POINTER_MOTION_MASK |
1881                             GDK_POINTER_MOTION_HINT_MASK);
1882
1883   attributes.cursor = gdk_cursor_new_for_display (display, GDK_TOP_LEFT_ARROW);
1884
1885   /* main window */
1886   widget->window = gdk_window_new (gtk_widget_get_parent_window (widget), &attributes, attributes_mask);
1887
1888   gdk_window_set_user_data (widget->window, sheet);
1889
1890   widget->style = gtk_style_attach (widget->style, widget->window);
1891
1892   gtk_style_set_background (widget->style, widget->window, GTK_STATE_NORMAL);
1893
1894   gdk_color_parse ("white", &sheet->color[BG_COLOR]);
1895   gdk_colormap_alloc_color (colormap, &sheet->color[BG_COLOR], FALSE,
1896                             TRUE);
1897   gdk_color_parse ("gray", &sheet->color[GRID_COLOR]);
1898   gdk_colormap_alloc_color (colormap, &sheet->color[GRID_COLOR], FALSE,
1899                             TRUE);
1900
1901   attributes.x = 0;
1902   attributes.y = 0;
1903   attributes.width = sheet->column_title_area.width;
1904   attributes.height = sheet->column_title_area.height;
1905
1906
1907   /* column - title window */
1908   sheet->column_title_window =
1909     gdk_window_new (widget->window, &attributes, attributes_mask);
1910   gdk_window_set_user_data (sheet->column_title_window, sheet);
1911   gtk_style_set_background (widget->style, sheet->column_title_window,
1912                             GTK_STATE_NORMAL);
1913
1914
1915   attributes.x = 0;
1916   attributes.y = 0;
1917   attributes.width = sheet->row_title_area.width;
1918   attributes.height = sheet->row_title_area.height;
1919
1920   /* row - title window */
1921   sheet->row_title_window = gdk_window_new (widget->window,
1922                                             &attributes, attributes_mask);
1923   gdk_window_set_user_data (sheet->row_title_window, sheet);
1924   gtk_style_set_background (widget->style, sheet->row_title_window,
1925                             GTK_STATE_NORMAL);
1926
1927   /* sheet - window */
1928   attributes.cursor = gdk_cursor_new_for_display (display, GDK_PLUS);
1929
1930   attributes.x = 0;
1931   attributes.y = 0;
1932
1933   sheet->sheet_window = gdk_window_new (widget->window,
1934                                         &attributes, attributes_mask);
1935   gdk_window_set_user_data (sheet->sheet_window, sheet);
1936
1937   gdk_cursor_unref (attributes.cursor);
1938
1939   gdk_window_set_background (sheet->sheet_window, &widget->style->white);
1940   gdk_window_show (sheet->sheet_window);
1941
1942   /* GCs */
1943   sheet->fg_gc = gdk_gc_new (widget->window);
1944   sheet->bg_gc = gdk_gc_new (widget->window);
1945
1946   gdk_gc_get_values (sheet->fg_gc, &auxvalues);
1947
1948   values.foreground = widget->style->white;
1949   values.function = GDK_INVERT;
1950   values.subwindow_mode = GDK_INCLUDE_INFERIORS;
1951   values.line_width = 3;
1952
1953   sheet->xor_gc = gdk_gc_new_with_values (widget->window,
1954                                           &values,
1955                                           GDK_GC_FOREGROUND |
1956                                           GDK_GC_FUNCTION |
1957                                           GDK_GC_SUBWINDOW |
1958                                           GDK_GC_LINE_WIDTH
1959                                           );
1960
1961
1962   gtk_widget_set_parent_window (sheet->entry_widget, sheet->sheet_window);
1963   gtk_widget_set_parent (sheet->entry_widget, GTK_WIDGET (sheet));
1964
1965   gtk_widget_set_parent_window (sheet->button, sheet->sheet_window);
1966   gtk_widget_set_parent (sheet->button, GTK_WIDGET (sheet));
1967
1968
1969   sheet->cursor_drag = gdk_cursor_new_for_display (display, GDK_PLUS);
1970
1971   if (sheet->column_titles_visible)
1972     gdk_window_show (sheet->column_title_window);
1973   if (sheet->row_titles_visible)
1974     gdk_window_show (sheet->row_title_window);
1975
1976   sheet->hover_window = create_hover_window ();
1977
1978   draw_row_title_buttons (sheet);
1979   draw_column_title_buttons (sheet);
1980
1981   gtk_sheet_update_primary_selection (sheet);
1982 }
1983
1984 static void
1985 create_global_button (GtkSheet *sheet)
1986 {
1987   sheet->button = gtk_button_new_with_label (" ");
1988
1989   g_object_ref_sink (sheet->button);
1990
1991   g_signal_connect (sheet->button,
1992                     "pressed",
1993                     G_CALLBACK (global_button_clicked),
1994                     sheet);
1995 }
1996
1997 static void
1998 size_allocate_global_button (GtkSheet *sheet)
1999 {
2000   GtkAllocation allocation;
2001
2002   if (!sheet->column_titles_visible) return;
2003   if (!sheet->row_titles_visible) return;
2004
2005   gtk_widget_size_request (sheet->button, NULL);
2006
2007   allocation.x = 0;
2008   allocation.y = 0;
2009   allocation.width = sheet->row_title_area.width;
2010   allocation.height = sheet->column_title_area.height;
2011
2012   gtk_widget_size_allocate (sheet->button, &allocation);
2013   gtk_widget_show (sheet->button);
2014 }
2015
2016 static void
2017 global_button_clicked (GtkWidget *widget, gpointer data)
2018 {
2019   gtk_sheet_click_cell (GTK_SHEET (data), -1, -1);
2020   gtk_widget_grab_focus (GTK_WIDGET (data));
2021 }
2022
2023
2024 static void
2025 gtk_sheet_unrealize (GtkWidget *widget)
2026 {
2027   GtkSheet *sheet;
2028
2029   g_return_if_fail (widget != NULL);
2030   g_return_if_fail (GTK_IS_SHEET (widget));
2031
2032   sheet = GTK_SHEET (widget);
2033
2034   gdk_cursor_unref (sheet->cursor_drag);
2035   sheet->cursor_drag = NULL;
2036
2037   gdk_colormap_free_colors (gtk_widget_get_colormap (widget),
2038                             sheet->color, n_COLORS);
2039
2040   g_object_unref (sheet->xor_gc);
2041   g_object_unref (sheet->fg_gc);
2042   g_object_unref (sheet->bg_gc);
2043
2044   destroy_hover_window (sheet->hover_window);
2045
2046   gdk_window_destroy (sheet->sheet_window);
2047   gdk_window_destroy (sheet->column_title_window);
2048   gdk_window_destroy (sheet->row_title_window);
2049
2050   gtk_widget_unparent (sheet->entry_widget);
2051   if (sheet->button != NULL)
2052     gtk_widget_unparent (sheet->button);
2053
2054   if (GTK_WIDGET_CLASS (parent_class)->unrealize)
2055     (* GTK_WIDGET_CLASS (parent_class)->unrealize) (widget);
2056 }
2057
2058 static void
2059 gtk_sheet_map (GtkWidget *widget)
2060 {
2061   GtkSheet *sheet = GTK_SHEET (widget);
2062
2063   g_return_if_fail (widget != NULL);
2064   g_return_if_fail (GTK_IS_SHEET (widget));
2065
2066   if (!GTK_WIDGET_MAPPED (widget))
2067     {
2068       GTK_WIDGET_SET_FLAGS (widget, GTK_MAPPED);
2069
2070       gdk_window_show (widget->window);
2071       gdk_window_show (sheet->sheet_window);
2072
2073       if (sheet->column_titles_visible)
2074         {
2075           draw_column_title_buttons (sheet);
2076           gdk_window_show (sheet->column_title_window);
2077         }
2078       if (sheet->row_titles_visible)
2079         {
2080           draw_row_title_buttons (sheet);
2081           gdk_window_show (sheet->row_title_window);
2082         }
2083
2084       if (!GTK_WIDGET_MAPPED (sheet->entry_widget)
2085           && sheet->active_cell.row >= 0
2086           && sheet->active_cell.col >= 0 )
2087         {
2088           gtk_widget_show (sheet->entry_widget);
2089           gtk_widget_map (sheet->entry_widget);
2090         }
2091
2092       if (GTK_WIDGET_VISIBLE (sheet->button) &&
2093           !GTK_WIDGET_MAPPED (sheet->button))
2094         {
2095           gtk_widget_show (sheet->button);
2096           gtk_widget_map (sheet->button);
2097         }
2098
2099       if (GTK_BIN (sheet->button)->child)
2100         if (GTK_WIDGET_VISIBLE (GTK_BIN (sheet->button)->child) &&
2101             !GTK_WIDGET_MAPPED (GTK_BIN (sheet->button)->child))
2102           gtk_widget_map (GTK_BIN (sheet->button)->child);
2103
2104       gtk_sheet_range_draw (sheet, NULL);
2105       change_active_cell (sheet,
2106                      sheet->active_cell.row,
2107                      sheet->active_cell.col);
2108     }
2109 }
2110
2111 static void
2112 gtk_sheet_unmap (GtkWidget *widget)
2113 {
2114   GtkSheet *sheet = GTK_SHEET (widget);
2115
2116   if (!GTK_WIDGET_MAPPED (widget))
2117     return;
2118
2119   GTK_WIDGET_UNSET_FLAGS (widget, GTK_MAPPED);
2120
2121   gdk_window_hide (sheet->sheet_window);
2122   if (sheet->column_titles_visible)
2123     gdk_window_hide (sheet->column_title_window);
2124   if (sheet->row_titles_visible)
2125     gdk_window_hide (sheet->row_title_window);
2126   gdk_window_hide (widget->window);
2127
2128   if (GTK_WIDGET_MAPPED (sheet->entry_widget))
2129     gtk_widget_unmap (sheet->entry_widget);
2130
2131   if (GTK_WIDGET_MAPPED (sheet->button))
2132     gtk_widget_unmap (sheet->button);
2133 }
2134
2135
2136 static void
2137 gtk_sheet_cell_draw (GtkSheet *sheet, gint row, gint col)
2138 {
2139   PangoLayout *layout;
2140   PangoRectangle text;
2141   gint font_height;
2142
2143   gchar *label;
2144
2145   GtkSheetCellAttr attributes;
2146   GdkRectangle area;
2147
2148   g_return_if_fail (sheet != NULL);
2149
2150   /* bail now if we aren't yet drawable */
2151   if (!GTK_WIDGET_DRAWABLE (sheet)) return;
2152
2153   if (row < 0 ||
2154       row >= g_sheet_row_get_row_count (sheet->row_geometry))
2155     return;
2156
2157   if (col < 0 ||
2158       col >= g_sheet_column_get_column_count (sheet->column_geometry))
2159     return;
2160
2161   gtk_sheet_get_attributes (sheet, row, col, &attributes);
2162
2163   /* select GC for background rectangle */
2164   gdk_gc_set_foreground (sheet->fg_gc, &attributes.foreground);
2165   gdk_gc_set_foreground (sheet->bg_gc, &attributes.background);
2166
2167   rectangle_from_cell (sheet, row, col, &area);
2168
2169   gdk_gc_set_line_attributes (sheet->fg_gc, 1, 0, 0, 0);
2170
2171   if (sheet->show_grid)
2172     {
2173       gdk_gc_set_foreground (sheet->bg_gc, &sheet->color[GRID_COLOR]);
2174
2175       gdk_draw_rectangle (sheet->sheet_window,
2176                           sheet->bg_gc,
2177                           FALSE,
2178                           area.x, area.y,
2179                           area.width, area.height);
2180     }
2181
2182   //  gtk_sheet_cell_draw_label (sheet, row, col);
2183
2184
2185   label = gtk_sheet_cell_get_text (sheet, row, col);
2186   if (NULL == label)
2187     return;
2188
2189
2190   layout = gtk_widget_create_pango_layout (GTK_WIDGET (sheet), label);
2191   dispose_string (sheet, label);
2192   pango_layout_set_font_description (layout, attributes.font_desc);
2193
2194
2195   pango_layout_get_pixel_extents (layout, NULL, &text);
2196
2197   gdk_gc_set_clip_rectangle (sheet->fg_gc, &area);
2198
2199   font_height = pango_font_description_get_size (attributes.font_desc);
2200   if ( !pango_font_description_get_size_is_absolute (attributes.font_desc))
2201     font_height /= PANGO_SCALE;
2202
2203   /* Centre the text vertically */
2204   area.y += (area.height - font_height) / 2.0;
2205
2206   switch (attributes.justification)
2207     {
2208     case GTK_JUSTIFY_RIGHT:
2209       area.x += area.width - text.width;
2210       break;
2211     case GTK_JUSTIFY_CENTER:
2212       area.x += (area.width - text.width) / 2.0;
2213       break;
2214     case GTK_JUSTIFY_LEFT:
2215       /* Do nothing */
2216       break;
2217     default:
2218       g_critical ("Unhandled justification %d in column %d\n",
2219                  attributes.justification, col);
2220       break;
2221     }
2222
2223   gdk_draw_layout (sheet->sheet_window, sheet->fg_gc,
2224                    area.x,
2225                    area.y,
2226                    layout);
2227
2228   gdk_gc_set_clip_rectangle (sheet->fg_gc, NULL);
2229   g_object_unref (layout);
2230 }
2231
2232
2233
2234 static void
2235 gtk_sheet_range_draw (GtkSheet *sheet, const GtkSheetRange *range)
2236 {
2237   gint i, j;
2238
2239   GdkRectangle area;
2240   GtkSheetRange drawing_range;
2241
2242   g_return_if_fail (sheet != NULL);
2243   g_return_if_fail (GTK_SHEET (sheet));
2244
2245   if (!GTK_WIDGET_DRAWABLE (GTK_WIDGET (sheet))) return;
2246   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return;
2247   if (!GTK_WIDGET_MAPPED (GTK_WIDGET (sheet))) return;
2248
2249   if (range == NULL)
2250     {
2251       drawing_range.row0 = min_visible_row (sheet);
2252       drawing_range.col0 = min_visible_column (sheet);
2253       drawing_range.rowi = MIN (max_visible_row (sheet),
2254                                 g_sheet_row_get_row_count (sheet->row_geometry) - 1);
2255       drawing_range.coli = max_visible_column (sheet);
2256       gdk_drawable_get_size (sheet->sheet_window, &area.width, &area.height);
2257       area.x = area.y = 0;
2258     }
2259   else
2260     {
2261       drawing_range.row0 = MAX (range->row0, min_visible_row (sheet));
2262       drawing_range.col0 = MAX (range->col0, min_visible_column (sheet));
2263       drawing_range.rowi = MIN (range->rowi, max_visible_row (sheet));
2264       drawing_range.coli = MIN (range->coli, max_visible_column (sheet));
2265
2266
2267       rectangle_from_range (sheet, &drawing_range, &area);
2268     }
2269
2270
2271   gdk_draw_rectangle (sheet->sheet_window,
2272                       GTK_WIDGET (sheet)->style->white_gc,
2273                       TRUE,
2274                       area.x, area.y,
2275                       area.width, area.height);
2276
2277   for (i = drawing_range.row0; i <= drawing_range.rowi; i++)
2278     for (j = drawing_range.col0; j <= drawing_range.coli; j++)
2279       {
2280         gtk_sheet_cell_draw (sheet, i, j);
2281       }
2282
2283   if (sheet->state != GTK_SHEET_NORMAL &&
2284       gtk_sheet_range_isvisible (sheet, sheet->range))
2285     gtk_sheet_range_draw_selection (sheet, drawing_range);
2286
2287   if (sheet->state == GTK_STATE_NORMAL &&
2288       sheet->active_cell.row >= drawing_range.row0 &&
2289       sheet->active_cell.row <= drawing_range.rowi &&
2290       sheet->active_cell.col >= drawing_range.col0 &&
2291       sheet->active_cell.col <= drawing_range.coli)
2292     gtk_sheet_show_active_cell (sheet);
2293 }
2294
2295 static void
2296 gtk_sheet_range_draw_selection (GtkSheet *sheet, GtkSheetRange range)
2297 {
2298   GdkRectangle area;
2299   gint i, j;
2300   GtkSheetRange aux;
2301
2302   if (range.col0 > sheet->range.coli || range.coli < sheet->range.col0 ||
2303       range.row0 > sheet->range.rowi || range.rowi < sheet->range.row0)
2304     return;
2305
2306   if (!gtk_sheet_range_isvisible (sheet, range)) return;
2307   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return;
2308
2309   aux = range;
2310
2311   range.col0 = MAX (sheet->range.col0, range.col0);
2312   range.coli = MIN (sheet->range.coli, range.coli);
2313   range.row0 = MAX (sheet->range.row0, range.row0);
2314   range.rowi = MIN (sheet->range.rowi, range.rowi);
2315
2316   range.col0 = MAX (range.col0, min_visible_column (sheet));
2317   range.coli = MIN (range.coli, max_visible_column (sheet));
2318   range.row0 = MAX (range.row0, min_visible_row (sheet));
2319   range.rowi = MIN (range.rowi, max_visible_row (sheet));
2320
2321   for (i = range.row0; i <= range.rowi; i++)
2322     {
2323       for (j = range.col0; j <= range.coli; j++)
2324         {
2325           if (gtk_sheet_cell_get_state (sheet, i, j) == GTK_STATE_SELECTED)
2326             {
2327               rectangle_from_cell (sheet, i, j, &area);
2328
2329               if (i == sheet->range.row0)
2330                 {
2331                   area.y = area.y + 2;
2332                   area.height = area.height - 2;
2333                 }
2334               if (i == sheet->range.rowi) area.height = area.height - 3;
2335               if (j == sheet->range.col0)
2336                 {
2337                   area.x = area.x + 2;
2338                   area.width = area.width - 2;
2339                 }
2340               if (j == sheet->range.coli) area.width = area.width - 3;
2341
2342               if (i != sheet->active_cell.row || j != sheet->active_cell.col)
2343                 {
2344                   gdk_draw_rectangle (sheet->sheet_window,
2345                                       sheet->xor_gc,
2346                                       TRUE,
2347                                       area.x + 1, area.y + 1,
2348                                       area.width, area.height);
2349                 }
2350             }
2351
2352         }
2353     }
2354
2355   gtk_sheet_draw_border (sheet, sheet->range);
2356 }
2357
2358 static void gtk_sheet_set_cell (GtkSheet *sheet, gint row, gint col,
2359                                 GtkJustification justification,
2360                                 const gchar *text);
2361
2362
2363 static inline gint
2364 safe_strcmp (const gchar *s1, const gchar *s2)
2365 {
2366   if ( !s1 && !s2) return 0;
2367   if ( !s1) return - 1;
2368   if ( !s2) return +1;
2369   return strcmp (s1, s2);
2370 }
2371
2372 static void
2373 gtk_sheet_set_cell (GtkSheet *sheet, gint row, gint col,
2374                     GtkJustification justification,
2375                     const gchar *text)
2376 {
2377   GSheetModel *model ;
2378   gchar *old_text ;
2379
2380   g_return_if_fail (sheet != NULL);
2381   g_return_if_fail (GTK_IS_SHEET (sheet));
2382
2383   if (col >= g_sheet_column_get_column_count (sheet->column_geometry)
2384       || row >= g_sheet_row_get_row_count (sheet->row_geometry))
2385     return;
2386
2387   if (col < 0 || row < 0) return;
2388
2389   model = gtk_sheet_get_model (sheet);
2390
2391   old_text = g_sheet_model_get_string (model, row, col);
2392
2393   if ( g_sheet_model_free_strings (model))
2394     g_free (old_text);
2395 }
2396
2397
2398 void
2399 gtk_sheet_cell_clear (GtkSheet *sheet, gint row, gint column)
2400 {
2401   GtkSheetRange range;
2402
2403   g_return_if_fail (sheet != NULL);
2404   g_return_if_fail (GTK_IS_SHEET (sheet));
2405   if (column >= g_sheet_column_get_column_count (sheet->column_geometry) ||
2406       row >= g_sheet_row_get_row_count (sheet->row_geometry)) return;
2407
2408   if (column < 0 || row < 0) return;
2409
2410   range.row0 = row;
2411   range.rowi = row;
2412   range.col0 = min_visible_column (sheet);
2413   range.coli = max_visible_column (sheet);
2414
2415   gtk_sheet_real_cell_clear (sheet, row, column);
2416
2417   gtk_sheet_range_draw (sheet, &range);
2418 }
2419
2420 static void
2421 gtk_sheet_real_cell_clear (GtkSheet *sheet, gint row, gint column)
2422 {
2423   GSheetModel *model = gtk_sheet_get_model (sheet);
2424
2425   gchar *old_text = gtk_sheet_cell_get_text (sheet, row, column);
2426
2427   if (old_text && strlen (old_text) > 0 )
2428     {
2429       g_sheet_model_datum_clear (model, row, column);
2430     }
2431
2432   dispose_string (sheet, old_text);
2433 }
2434
2435 gchar *
2436 gtk_sheet_cell_get_text (const GtkSheet *sheet, gint row, gint col)
2437 {
2438   GSheetModel *model;
2439   g_return_val_if_fail (sheet != NULL, NULL);
2440   g_return_val_if_fail (GTK_IS_SHEET (sheet), NULL);
2441
2442   if (col >= g_sheet_column_get_column_count (sheet->column_geometry) || row >= g_sheet_row_get_row_count (sheet->row_geometry))
2443     return NULL;
2444   if (col < 0 || row < 0) return NULL;
2445
2446   model = gtk_sheet_get_model (sheet);
2447
2448   if ( !model )
2449     return NULL;
2450
2451   return g_sheet_model_get_string (model, row, col);
2452 }
2453
2454
2455 static GtkStateType
2456 gtk_sheet_cell_get_state (GtkSheet *sheet, gint row, gint col)
2457 {
2458   gint state;
2459   GtkSheetRange *range;
2460
2461   g_return_val_if_fail (sheet != NULL, 0);
2462   g_return_val_if_fail (GTK_IS_SHEET (sheet), 0);
2463   if (col >= g_sheet_column_get_column_count (sheet->column_geometry) || row >= g_sheet_row_get_row_count (sheet->row_geometry)) return 0;
2464   if (col < 0 || row < 0) return 0;
2465
2466   state = sheet->state;
2467   range = &sheet->range;
2468
2469   switch (state)
2470     {
2471     case GTK_SHEET_NORMAL:
2472       return GTK_STATE_NORMAL;
2473       break;
2474     case GTK_SHEET_ROW_SELECTED:
2475       if (row >= range->row0 && row <= range->rowi)
2476         return GTK_STATE_SELECTED;
2477       break;
2478     case GTK_SHEET_COLUMN_SELECTED:
2479       if (col >= range->col0 && col <= range->coli)
2480         return GTK_STATE_SELECTED;
2481       break;
2482     case GTK_SHEET_RANGE_SELECTED:
2483       if (row >= range->row0 && row <= range->rowi && \
2484           col >= range->col0 && col <= range->coli)
2485         return GTK_STATE_SELECTED;
2486       break;
2487     }
2488   return GTK_STATE_NORMAL;
2489 }
2490
2491 /* Convert X, Y (in pixels) to *ROW, *COLUMN
2492    If the function returns FALSE, then the results will be unreliable.
2493 */
2494 static gboolean
2495 gtk_sheet_get_pixel_info (GtkSheet *sheet,
2496                           gint x,
2497                           gint y,
2498                           gint *row,
2499                           gint *column)
2500 {
2501   gint trow, tcol;
2502   *row = -G_MAXINT;
2503   *column = -G_MAXINT;
2504
2505   g_return_val_if_fail (sheet != NULL, 0);
2506   g_return_val_if_fail (GTK_IS_SHEET (sheet), 0);
2507
2508   /* bounds checking, return false if the user clicked
2509      on a blank area */
2510   if (y < 0)
2511     return FALSE;
2512
2513   if (x < 0)
2514     return FALSE;
2515
2516   if ( sheet->column_titles_visible)
2517     y -= sheet->column_title_area.height;
2518
2519   y += sheet->vadjustment->value;
2520
2521   if ( y < 0 && sheet->column_titles_visible)
2522     {
2523       trow = -1;
2524     }
2525   else
2526     {
2527       trow = yyy_row_ypixel_to_row (sheet, y);
2528       if (trow > g_sheet_row_get_row_count (sheet->row_geometry))
2529         return FALSE;
2530     }
2531
2532   *row = trow;
2533
2534   if ( sheet->row_titles_visible)
2535     x -= sheet->row_title_area.width;
2536
2537   x += sheet->hadjustment->value;
2538
2539   if ( x < 0 && sheet->row_titles_visible)
2540     {
2541       tcol = -1;
2542     }
2543   else
2544     {
2545       tcol = column_from_xpixel (sheet, x);
2546       if (tcol > g_sheet_column_get_column_count (sheet->column_geometry))
2547         return FALSE;
2548     }
2549
2550   *column = tcol;
2551
2552   return TRUE;
2553 }
2554
2555 gboolean
2556 gtk_sheet_get_cell_area (GtkSheet *sheet,
2557                          gint row,
2558                          gint column,
2559                          GdkRectangle *area)
2560 {
2561   g_return_val_if_fail (sheet != NULL, 0);
2562   g_return_val_if_fail (GTK_IS_SHEET (sheet), 0);
2563
2564   if (row >= g_sheet_row_get_row_count (sheet->row_geometry) || column >= g_sheet_column_get_column_count (sheet->column_geometry))
2565     return FALSE;
2566
2567   area->x = (column == -1) ? 0 : g_sheet_column_start_pixel (sheet->column_geometry, column);
2568   area->y = (row == -1)    ? 0 : g_sheet_row_start_pixel (sheet->row_geometry, row);
2569
2570   area->width= (column == -1) ? sheet->row_title_area.width
2571     : g_sheet_column_get_width (sheet->column_geometry, column);
2572
2573   area->height= (row == -1) ? sheet->column_title_area.height
2574     : g_sheet_row_get_height (sheet->row_geometry, row);
2575
2576   return TRUE;
2577 }
2578
2579 void
2580 gtk_sheet_set_active_cell (GtkSheet *sheet, gint row, gint col)
2581 {
2582   g_return_if_fail (sheet != NULL);
2583   g_return_if_fail (GTK_IS_SHEET (sheet));
2584
2585   if (row < -1 || col < -1)
2586     return;
2587
2588   if (row >= g_sheet_row_get_row_count (sheet->row_geometry)
2589       ||
2590       col >= g_sheet_column_get_column_count (sheet->column_geometry))
2591     return;
2592
2593   sheet->active_cell.row = row;
2594   sheet->active_cell.col = col;
2595
2596   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
2597     return;
2598
2599   if ( row == -1 || col == -1)
2600     {
2601       gtk_sheet_hide_active_cell (sheet);
2602       return;
2603     }
2604
2605   change_active_cell (sheet, row, col);
2606 }
2607
2608 void
2609 gtk_sheet_get_active_cell (GtkSheet *sheet, gint *row, gint *column)
2610 {
2611   g_return_if_fail (sheet != NULL);
2612   g_return_if_fail (GTK_IS_SHEET (sheet));
2613
2614   if ( row ) *row = sheet->active_cell.row;
2615   if (column) *column = sheet->active_cell.col;
2616 }
2617
2618 static void
2619 gtk_sheet_entry_changed (GtkWidget *widget, gpointer data)
2620 {
2621   GtkSheet *sheet;
2622   gint row, col;
2623   const char *text;
2624   GtkJustification justification;
2625   GtkSheetCellAttr attributes;
2626
2627   g_return_if_fail (data != NULL);
2628   g_return_if_fail (GTK_IS_SHEET (data));
2629
2630   sheet = GTK_SHEET (data);
2631
2632   if (!GTK_WIDGET_VISIBLE (widget)) return;
2633   if (sheet->state != GTK_STATE_NORMAL) return;
2634
2635   row = sheet->active_cell.row;
2636   col = sheet->active_cell.col;
2637
2638   if (row < 0 || col < 0) return;
2639
2640   sheet->active_cell.row = -1;
2641   sheet->active_cell.col = -1;
2642
2643   text = gtk_entry_get_text (GTK_ENTRY (gtk_sheet_get_entry (sheet)));
2644
2645   if (text && strlen (text) > 0)
2646     {
2647       gtk_sheet_get_attributes (sheet, row, col, &attributes);
2648       justification = attributes.justification;
2649       gtk_sheet_set_cell (sheet, row, col, justification, text);
2650     }
2651
2652   sheet->active_cell.row = row;;
2653   sheet->active_cell.col = col;
2654 }
2655
2656
2657 static void
2658 gtk_sheet_hide_active_cell (GtkSheet *sheet)
2659 {
2660   GdkRectangle area;
2661
2662   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
2663     return;
2664
2665   if (sheet->active_cell.row < 0 ||
2666       sheet->active_cell.col < 0) return;
2667
2668   gtk_widget_hide (sheet->entry_widget);
2669   gtk_widget_unmap (sheet->entry_widget);
2670
2671   rectangle_from_cell (sheet,
2672                        sheet->active_cell.row, sheet->active_cell.col,
2673                        &area);
2674
2675   gdk_draw_rectangle (sheet->sheet_window,
2676                       GTK_WIDGET (sheet)->style->white_gc,
2677                       TRUE,
2678                       area.x, area.y,
2679                       area.width, area.height);
2680
2681   gtk_sheet_cell_draw (sheet, sheet->active_cell.row,
2682                                sheet->active_cell.col);
2683
2684   GTK_WIDGET_UNSET_FLAGS (GTK_WIDGET (sheet->entry_widget), GTK_VISIBLE);
2685 }
2686
2687 static void
2688 change_active_cell (GtkSheet *sheet, gint row, gint col)
2689 {
2690   gint old_row, old_col;
2691   glong old_handler_id = sheet->entry_handler_id;
2692
2693   g_return_if_fail (GTK_IS_SHEET (sheet));
2694
2695   if (row < 0 || col < 0)
2696     return;
2697
2698   if ( row > g_sheet_row_get_row_count (sheet->row_geometry)
2699        || col > g_sheet_column_get_column_count (sheet->column_geometry))
2700     return;
2701
2702   if (sheet->state != GTK_SHEET_NORMAL)
2703     {
2704       sheet->state = GTK_SHEET_NORMAL;
2705       gtk_sheet_real_unselect_range (sheet, NULL);
2706     }
2707
2708   g_signal_handler_block   (sheet->entry_widget, sheet->entry_handler_id);
2709
2710   old_row = sheet->active_cell.row;
2711   old_col = sheet->active_cell.col;
2712
2713   sheet->range.row0 = row;
2714   sheet->range.col0 = col;
2715   sheet->range.rowi = row;
2716   sheet->range.coli = col;
2717   sheet->active_cell.row = row;
2718   sheet->active_cell.col = col;
2719   sheet->selection_cell.row = row;
2720   sheet->selection_cell.col = col;
2721
2722   GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
2723
2724   gtk_sheet_show_active_cell (sheet);
2725
2726
2727   g_signal_emit (sheet, sheet_signals [ACTIVATE], 0,
2728                  row, col, old_row, old_col);
2729
2730   if ( old_handler_id == sheet->entry_handler_id)
2731     g_signal_handler_unblock   (sheet->entry_widget, sheet->entry_handler_id);
2732 }
2733
2734 static void
2735 gtk_sheet_show_active_cell (GtkSheet *sheet)
2736 {
2737   GtkEntry *sheet_entry;
2738   GtkSheetCellAttr attributes;
2739   gchar *text = NULL;
2740   gint row, col;
2741
2742   g_return_if_fail (sheet != NULL);
2743   g_return_if_fail (GTK_IS_SHEET (sheet));
2744
2745   row = sheet->active_cell.row;
2746   col = sheet->active_cell.col;
2747
2748   /* Don't show the active cell, if there is no active cell: */
2749   if (! (row >= 0 && col >= 0)) /* e.g row or coll == -1. */
2750     return;
2751
2752   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return;
2753   if (sheet->state != GTK_SHEET_NORMAL) return;
2754   if (GTK_SHEET_IN_SELECTION (sheet)) return;
2755
2756   GTK_WIDGET_SET_FLAGS (GTK_WIDGET (sheet->entry_widget), GTK_VISIBLE);
2757
2758   sheet_entry = GTK_ENTRY (gtk_sheet_get_entry (sheet));
2759
2760   gtk_sheet_get_attributes (sheet, row, col, &attributes);
2761
2762
2763   text = gtk_sheet_cell_get_text (sheet, row, col);
2764   if ( ! text )
2765     text = g_strdup ("");
2766
2767   gtk_entry_set_visibility (GTK_ENTRY (sheet_entry), attributes.is_visible);
2768
2769
2770   if ( GTK_IS_ENTRY (sheet_entry))
2771     {
2772       const gchar *old_text = gtk_entry_get_text (GTK_ENTRY (sheet_entry));
2773       if (strcmp (old_text, text) != 0)
2774         gtk_entry_set_text (GTK_ENTRY (sheet_entry), text);
2775
2776       switch (attributes.justification)
2777         {
2778         case GTK_JUSTIFY_RIGHT:
2779           gtk_entry_set_alignment (GTK_ENTRY (sheet_entry), 1.0);
2780           break;
2781         case GTK_JUSTIFY_CENTER:
2782           gtk_entry_set_alignment (GTK_ENTRY (sheet_entry), 0.5);
2783           break;
2784         case GTK_JUSTIFY_LEFT:
2785         default:
2786           gtk_entry_set_alignment (GTK_ENTRY (sheet_entry), 0.0);
2787           break;
2788         }
2789     }
2790
2791   gtk_sheet_size_allocate_entry (sheet);
2792
2793   gtk_widget_map (sheet->entry_widget);
2794
2795   gtk_widget_grab_focus (GTK_WIDGET (sheet_entry));
2796
2797   dispose_string (sheet, text);
2798
2799 }
2800
2801 static void
2802 gtk_sheet_draw_active_cell (GtkSheet *sheet)
2803 {
2804   gint row, col;
2805   GtkSheetRange range;
2806
2807   if (!GTK_WIDGET_DRAWABLE (GTK_WIDGET (sheet))) return;
2808   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return;
2809
2810   row = sheet->active_cell.row;
2811   col = sheet->active_cell.col;
2812
2813   if (row < 0 || col < 0) return;
2814
2815   if (!gtk_sheet_cell_isvisible (sheet, row, col))
2816     return;
2817
2818   range.col0 = range.coli = col;
2819   range.row0 = range.rowi = row;
2820
2821   gtk_sheet_draw_border (sheet, range);
2822 }
2823
2824
2825
2826 static void
2827 gtk_sheet_new_selection (GtkSheet *sheet, GtkSheetRange *range)
2828 {
2829   gint i, j, mask1, mask2;
2830   gint state, selected;
2831   gint x, y, width, height;
2832   GtkSheetRange new_range, aux_range;
2833
2834   g_return_if_fail (sheet != NULL);
2835
2836   if (range == NULL) range=&sheet->range;
2837
2838   new_range=*range;
2839
2840   range->row0 = MIN (range->row0, sheet->range.row0);
2841   range->rowi = MAX (range->rowi, sheet->range.rowi);
2842   range->col0 = MIN (range->col0, sheet->range.col0);
2843   range->coli = MAX (range->coli, sheet->range.coli);
2844
2845   range->row0 = MAX (range->row0, min_visible_row (sheet));
2846   range->rowi = MIN (range->rowi, max_visible_row (sheet));
2847   range->col0 = MAX (range->col0, min_visible_column (sheet));
2848   range->coli = MIN (range->coli, max_visible_column (sheet));
2849
2850   aux_range.row0 = MAX (new_range.row0, min_visible_row (sheet));
2851   aux_range.rowi = MIN (new_range.rowi, max_visible_row (sheet));
2852   aux_range.col0 = MAX (new_range.col0, min_visible_column (sheet));
2853   aux_range.coli = MIN (new_range.coli, max_visible_column (sheet));
2854
2855   for (i = range->row0; i <= range->rowi; i++)
2856     {
2857       for (j = range->col0; j <= range->coli; j++)
2858         {
2859
2860           state = gtk_sheet_cell_get_state (sheet, i, j);
2861           selected= (i <= new_range.rowi && i >= new_range.row0 &&
2862                      j <= new_range.coli && j >= new_range.col0) ? TRUE : FALSE;
2863
2864           if (state == GTK_STATE_SELECTED && selected &&
2865               (i == sheet->range.row0 || i == sheet->range.rowi ||
2866                j == sheet->range.col0 || j == sheet->range.coli ||
2867                i == new_range.row0 || i == new_range.rowi ||
2868                j == new_range.col0 || j == new_range.coli))
2869             {
2870
2871               mask1 = i == sheet->range.row0 ? 1 : 0;
2872               mask1 = i == sheet->range.rowi ? mask1 + 2 : mask1;
2873               mask1 = j == sheet->range.col0 ? mask1 + 4 : mask1;
2874               mask1 = j == sheet->range.coli ? mask1 + 8 : mask1;
2875
2876               mask2 = i == new_range.row0 ? 1 : 0;
2877               mask2 = i == new_range.rowi ? mask2 + 2 : mask2;
2878               mask2 = j == new_range.col0 ? mask2 + 4 : mask2;
2879               mask2 = j == new_range.coli ? mask2 + 8 : mask2;
2880
2881               if (mask1 != mask2)
2882                 {
2883                   x = g_sheet_column_start_pixel (sheet->column_geometry, j);
2884                   y = g_sheet_row_start_pixel (sheet->row_geometry, i);
2885                   width = g_sheet_column_start_pixel (sheet->column_geometry, j)- x+
2886                     g_sheet_column_get_width (sheet->column_geometry, j);
2887                   height = g_sheet_row_start_pixel (sheet->row_geometry, i) - y + g_sheet_row_get_height (sheet->row_geometry, i);
2888
2889                   if (i == sheet->range.row0)
2890                     {
2891                       y = y - 3;
2892                       height = height + 3;
2893                     }
2894                   if (i == sheet->range.rowi) height = height + 3;
2895                   if (j == sheet->range.col0)
2896                     {
2897                       x = x - 3;
2898                       width = width + 3;
2899                     }
2900                   if (j == sheet->range.coli) width = width + 3;
2901
2902                   if (i != sheet->active_cell.row || j != sheet->active_cell.col)
2903                     {
2904                       x = g_sheet_column_start_pixel (sheet->column_geometry, j);
2905                       y = g_sheet_row_start_pixel (sheet->row_geometry, i);
2906                       width = g_sheet_column_start_pixel (sheet->column_geometry, j)- x+
2907                         g_sheet_column_get_width (sheet->column_geometry, j);
2908
2909                       height = g_sheet_row_start_pixel (sheet->row_geometry, i) - y + g_sheet_row_get_height (sheet->row_geometry, i);
2910
2911                       if (i == new_range.row0)
2912                         {
2913                           y = y+2;
2914                           height = height - 2;
2915                         }
2916                       if (i == new_range.rowi) height = height - 3;
2917                       if (j == new_range.col0)
2918                         {
2919                           x = x+2;
2920                           width = width - 2;
2921                         }
2922                       if (j == new_range.coli) width = width - 3;
2923
2924                       gdk_draw_rectangle (sheet->sheet_window,
2925                                           sheet->xor_gc,
2926                                           TRUE,
2927                                           x + 1, y + 1,
2928                                           width, height);
2929                     }
2930                 }
2931             }
2932         }
2933     }
2934
2935   for (i = range->row0; i <= range->rowi; i++)
2936     {
2937       for (j = range->col0; j <= range->coli; j++)
2938         {
2939
2940           state = gtk_sheet_cell_get_state (sheet, i, j);
2941           selected= (i <= new_range.rowi && i >= new_range.row0 &&
2942                      j <= new_range.coli && j >= new_range.col0) ? TRUE : FALSE;
2943
2944           if (state == GTK_STATE_SELECTED && !selected)
2945             {
2946
2947               x = g_sheet_column_start_pixel (sheet->column_geometry, j);
2948               y = g_sheet_row_start_pixel (sheet->row_geometry, i);
2949               width = g_sheet_column_start_pixel (sheet->column_geometry, j) - x + g_sheet_column_get_width (sheet->column_geometry, j);
2950               height = g_sheet_row_start_pixel (sheet->row_geometry, i) - y + g_sheet_row_get_height (sheet->row_geometry, i);
2951
2952               if (i == sheet->range.row0)
2953                 {
2954                   y = y - 3;
2955                   height = height + 3;
2956                 }
2957               if (i == sheet->range.rowi) height = height + 3;
2958               if (j == sheet->range.col0)
2959                 {
2960                   x = x - 3;
2961                   width = width + 3;
2962                 }
2963               if (j == sheet->range.coli) width = width + 3;
2964
2965             }
2966         }
2967     }
2968
2969   for (i = range->row0; i <= range->rowi; i++)
2970     {
2971       for (j = range->col0; j <= range->coli; j++)
2972         {
2973
2974           state = gtk_sheet_cell_get_state (sheet, i, j);
2975           selected= (i <= new_range.rowi && i >= new_range.row0 &&
2976                      j <= new_range.coli && j >= new_range.col0) ? TRUE : FALSE;
2977
2978           if (state != GTK_STATE_SELECTED && selected &&
2979               (i != sheet->active_cell.row || j != sheet->active_cell.col))
2980             {
2981
2982               x = g_sheet_column_start_pixel (sheet->column_geometry, j);
2983               y = g_sheet_row_start_pixel (sheet->row_geometry, i);
2984               width = g_sheet_column_start_pixel (sheet->column_geometry, j) - x + g_sheet_column_get_width (sheet->column_geometry, j);
2985               height = g_sheet_row_start_pixel (sheet->row_geometry, i) - y + g_sheet_row_get_height (sheet->row_geometry, i);
2986
2987               if (i == new_range.row0)
2988                 {
2989                   y = y+2;
2990                   height = height - 2;
2991                 }
2992               if (i == new_range.rowi) height = height - 3;
2993               if (j == new_range.col0)
2994                 {
2995                   x = x+2;
2996                   width = width - 2;
2997                 }
2998               if (j == new_range.coli) width = width - 3;
2999
3000               gdk_draw_rectangle (sheet->sheet_window,
3001                                   sheet->xor_gc,
3002                                   TRUE,
3003                                   x + 1, y + 1,
3004                                   width, height);
3005
3006             }
3007
3008         }
3009     }
3010
3011   for (i = aux_range.row0; i <= aux_range.rowi; i++)
3012     {
3013       for (j = aux_range.col0; j <= aux_range.coli; j++)
3014         {
3015           state = gtk_sheet_cell_get_state (sheet, i, j);
3016
3017           mask1 = i == sheet->range.row0 ? 1 : 0;
3018           mask1 = i == sheet->range.rowi ? mask1 + 2 : mask1;
3019           mask1 = j == sheet->range.col0 ? mask1 + 4 : mask1;
3020           mask1 = j == sheet->range.coli ? mask1 + 8 : mask1;
3021
3022           mask2 = i == new_range.row0 ? 1 : 0;
3023           mask2 = i == new_range.rowi ? mask2 + 2 : mask2;
3024           mask2 = j == new_range.col0 ? mask2 + 4 : mask2;
3025           mask2 = j == new_range.coli ? mask2 + 8 : mask2;
3026           if (mask2 != mask1 || (mask2 == mask1 && state != GTK_STATE_SELECTED))
3027             {
3028               x = g_sheet_column_start_pixel (sheet->column_geometry, j);
3029               y = g_sheet_row_start_pixel (sheet->row_geometry, i);
3030               width = g_sheet_column_get_width (sheet->column_geometry, j);
3031               height = g_sheet_row_get_height (sheet->row_geometry, i);
3032               if (mask2 & 1)
3033                 gdk_draw_rectangle (sheet->sheet_window,
3034                                     sheet->xor_gc,
3035                                     TRUE,
3036                                     x + 1, y - 1,
3037                                     width, 3);
3038
3039
3040               if (mask2 & 2)
3041                 gdk_draw_rectangle (sheet->sheet_window,
3042                                     sheet->xor_gc,
3043                                     TRUE,
3044                                     x + 1, y + height - 1,
3045                                     width, 3);
3046
3047               if (mask2 & 4)
3048                 gdk_draw_rectangle (sheet->sheet_window,
3049                                     sheet->xor_gc,
3050                                     TRUE,
3051                                     x - 1, y + 1,
3052                                     3, height);
3053
3054
3055               if (mask2 & 8)
3056                 gdk_draw_rectangle (sheet->sheet_window,
3057                                     sheet->xor_gc,
3058                                     TRUE,
3059                                     x + width - 1, y + 1,
3060                                     3, height);
3061             }
3062         }
3063     }
3064
3065   *range = new_range;
3066 }
3067
3068 static void
3069 gtk_sheet_draw_border (GtkSheet *sheet, GtkSheetRange new_range)
3070 {
3071   GdkRectangle area;
3072
3073   rectangle_from_range (sheet, &new_range, &area);
3074
3075   gdk_draw_rectangle (sheet->sheet_window,
3076                       sheet->xor_gc,
3077                       FALSE,
3078                       area.x + 1,
3079                       area.y + 1,
3080                       area.width - 2,
3081                       area.height - 2);
3082 }
3083
3084
3085 static void
3086 gtk_sheet_real_select_range (GtkSheet *sheet,
3087                              const GtkSheetRange *range)
3088 {
3089   gint state;
3090
3091   g_return_if_fail (sheet != NULL);
3092
3093   if (range == NULL) range = &sheet->range;
3094
3095   memcpy (&sheet->range, range, sizeof (*range));
3096
3097   if (range->row0 < 0 || range->rowi < 0) return;
3098   if (range->col0 < 0 || range->coli < 0) return;
3099
3100   state = sheet->state;
3101
3102 #if 0
3103   if (range->coli != sheet->range.coli || range->col0 != sheet->range.col0 ||
3104       range->rowi != sheet->range.rowi || range->row0 != sheet->range.row0)
3105     {
3106       gtk_sheet_new_selection (sheet, &sheet->range);
3107     }
3108   else
3109     {
3110       gtk_sheet_range_draw_selection (sheet, sheet->range);
3111     }
3112 #endif
3113
3114   gtk_sheet_update_primary_selection (sheet);
3115
3116   g_signal_emit (sheet, sheet_signals[SELECT_RANGE], 0, &sheet->range);
3117 }
3118
3119
3120 void
3121 gtk_sheet_get_selected_range (GtkSheet *sheet, GtkSheetRange *range)
3122 {
3123   g_return_if_fail (sheet != NULL);
3124   *range = sheet->range;
3125 }
3126
3127
3128 void
3129 gtk_sheet_select_range (GtkSheet *sheet, const GtkSheetRange *range)
3130 {
3131   g_return_if_fail (sheet != NULL);
3132
3133   if (range == NULL) range=&sheet->range;
3134
3135   if (range->row0 < 0 || range->rowi < 0) return;
3136   if (range->col0 < 0 || range->coli < 0) return;
3137
3138
3139   if (sheet->state != GTK_SHEET_NORMAL)
3140     gtk_sheet_real_unselect_range (sheet, NULL);
3141
3142   sheet->range.row0 = range->row0;
3143   sheet->range.rowi = range->rowi;
3144   sheet->range.col0 = range->col0;
3145   sheet->range.coli = range->coli;
3146   sheet->active_cell.row = range->row0;
3147   sheet->active_cell.col = range->col0;
3148   sheet->selection_cell.row = range->rowi;
3149   sheet->selection_cell.col = range->coli;
3150
3151   sheet->state = GTK_SHEET_RANGE_SELECTED;
3152   gtk_sheet_real_select_range (sheet, NULL);
3153 }
3154
3155 void
3156 gtk_sheet_unselect_range (GtkSheet *sheet)
3157 {
3158   if (! GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
3159     return;
3160
3161   gtk_sheet_real_unselect_range (sheet, NULL);
3162   sheet->state = GTK_STATE_NORMAL;
3163
3164   change_active_cell (sheet,
3165                  sheet->active_cell.row, sheet->active_cell.col);
3166 }
3167
3168
3169 static void
3170 gtk_sheet_real_unselect_range (GtkSheet *sheet,
3171                                const GtkSheetRange *range)
3172 {
3173   g_return_if_fail (sheet != NULL);
3174   g_return_if_fail (GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)));
3175
3176   if ( range == NULL)
3177     range = &sheet->range;
3178
3179   if (range->row0 < 0 || range->rowi < 0) return;
3180   if (range->col0 < 0 || range->coli < 0) return;
3181
3182   g_signal_emit (sheet, sheet_signals[SELECT_COLUMN], 0, -1);
3183   g_signal_emit (sheet, sheet_signals[SELECT_ROW], 0, -1);
3184
3185 #if 0
3186   if (gtk_sheet_range_isvisible (sheet, *range))
3187     gtk_sheet_draw_backing_pixmap (sheet, *range);
3188 #endif
3189
3190   sheet->range.row0 = -1;
3191   sheet->range.rowi = -1;
3192   sheet->range.col0 = -1;
3193   sheet->range.coli = -1;
3194 }
3195
3196
3197 static gint
3198 gtk_sheet_expose (GtkWidget *widget,
3199                   GdkEventExpose *event)
3200 {
3201   GtkSheet *sheet;
3202   GtkSheetRange range;
3203
3204   g_return_val_if_fail (widget != NULL, FALSE);
3205   g_return_val_if_fail (GTK_IS_SHEET (widget), FALSE);
3206   g_return_val_if_fail (event != NULL, FALSE);
3207
3208   sheet = GTK_SHEET (widget);
3209
3210   if (!GTK_WIDGET_DRAWABLE (widget))
3211     return FALSE;
3212
3213   /* exposure events on the sheet */
3214   if (event->window == sheet->row_title_window &&
3215       sheet->row_titles_visible)
3216     {
3217       gint i;
3218       for (i = min_visible_row (sheet); i <= max_visible_row (sheet); i++)
3219         gtk_sheet_row_title_button_draw (sheet, i);
3220     }
3221
3222   if (event->window == sheet->column_title_window &&
3223       sheet->column_titles_visible)
3224     {
3225       gint i;
3226       for (i = min_visible_column (sheet);
3227            i <= max_visible_column (sheet);
3228            ++i)
3229         gtk_sheet_column_title_button_draw (sheet, i);
3230     }
3231
3232
3233   range.row0 =
3234     yyy_row_ypixel_to_row (sheet,
3235                            event->area.y + sheet->vadjustment->value);
3236   range.row0--;
3237
3238   range.rowi =
3239     yyy_row_ypixel_to_row (sheet,
3240                            event->area.y +
3241                            event->area.height + sheet->vadjustment->value);
3242   range.rowi++;
3243
3244   range.col0 =
3245     column_from_xpixel (sheet,
3246                         event->area.x + sheet->hadjustment->value);
3247   range.col0--;
3248
3249   range.coli =
3250     column_from_xpixel (sheet,
3251                         event->area.x + event->area.width +
3252                         sheet->hadjustment->value);
3253   range.coli++;
3254
3255   if (event->window == sheet->sheet_window)
3256     {
3257       gtk_sheet_range_draw (sheet, &range);
3258
3259       if (sheet->state != GTK_SHEET_NORMAL)
3260         {
3261           if (gtk_sheet_range_isvisible (sheet, sheet->range))
3262             gtk_sheet_range_draw (sheet, &sheet->range);
3263
3264           if (GTK_SHEET_IN_RESIZE (sheet) || GTK_SHEET_IN_DRAG (sheet))
3265             gtk_sheet_range_draw (sheet, &sheet->drag_range);
3266
3267           if (gtk_sheet_range_isvisible (sheet, sheet->range))
3268             gtk_sheet_range_draw_selection (sheet, sheet->range);
3269           if (GTK_SHEET_IN_RESIZE (sheet) || GTK_SHEET_IN_DRAG (sheet))
3270             draw_xor_rectangle (sheet, sheet->drag_range);
3271         }
3272
3273       if ((!GTK_SHEET_IN_XDRAG (sheet)) && (!GTK_SHEET_IN_YDRAG (sheet)))
3274         {
3275           if (sheet->state == GTK_SHEET_NORMAL)
3276             gtk_sheet_draw_active_cell (sheet);
3277         }
3278     }
3279
3280   if (sheet->state != GTK_SHEET_NORMAL && GTK_SHEET_IN_SELECTION (sheet))
3281     gtk_widget_grab_focus (GTK_WIDGET (sheet));
3282
3283   (* GTK_WIDGET_CLASS (parent_class)->expose_event) (widget, event);
3284
3285   return FALSE;
3286 }
3287
3288
3289 static gboolean
3290 gtk_sheet_button_press (GtkWidget *widget,
3291                         GdkEventButton *event)
3292 {
3293   GtkSheet *sheet;
3294   GdkModifierType mods;
3295   gint x, y;
3296   gint  row, column;
3297   gboolean veto;
3298
3299   g_return_val_if_fail (widget != NULL, FALSE);
3300   g_return_val_if_fail (GTK_IS_SHEET (widget), FALSE);
3301   g_return_val_if_fail (event != NULL, FALSE);
3302
3303   sheet = GTK_SHEET (widget);
3304
3305   /* Cancel any pending tooltips */
3306   if (sheet->motion_timer)
3307     {
3308       g_source_remove (sheet->motion_timer);
3309       sheet->motion_timer = 0;
3310     }
3311
3312   gtk_widget_get_pointer (widget, &x, &y);
3313   gtk_sheet_get_pixel_info (sheet, x, y, &row, &column);
3314
3315
3316   if (event->window == sheet->column_title_window)
3317     {
3318       g_signal_emit (sheet,
3319                      sheet_signals[BUTTON_EVENT_COLUMN], 0,
3320                      column, event);
3321
3322       if (g_sheet_column_get_sensitivity (sheet->column_geometry, column))
3323         {
3324           if ( event->type == GDK_2BUTTON_PRESS && event->button == 1)
3325             g_signal_emit (sheet,
3326                            sheet_signals[DOUBLE_CLICK_COLUMN], 0, column);
3327         }
3328     }
3329   else if (event->window == sheet->row_title_window)
3330     {
3331       g_signal_emit (sheet,
3332                      sheet_signals[BUTTON_EVENT_ROW], 0,
3333                      row, event);
3334
3335
3336       if (g_sheet_row_get_sensitivity (sheet->row_geometry, row))
3337         {
3338           if ( event->type == GDK_2BUTTON_PRESS && event->button == 1)
3339             g_signal_emit (sheet,
3340                            sheet_signals[DOUBLE_CLICK_ROW], 0, row);
3341         }
3342     }
3343
3344   gdk_window_get_pointer (widget->window, NULL, NULL, &mods);
3345
3346   if (! (mods & GDK_BUTTON1_MASK)) return TRUE;
3347
3348
3349   /* press on resize windows */
3350   if (event->window == sheet->column_title_window &&
3351       gtk_sheet_columns_resizable (sheet))
3352     {
3353 #if 0
3354       gtk_widget_get_pointer (widget, &sheet->x_drag, NULL);
3355       if ( sheet->row_titles_visible)
3356         sheet->x_drag -= sheet->row_title_area.width;
3357 #endif
3358
3359       sheet->x_drag = event->x;
3360
3361       if (on_column_boundary (sheet, sheet->x_drag, &sheet->drag_cell.col))
3362         {
3363           guint req;
3364           if (event->type == GDK_2BUTTON_PRESS)
3365             {
3366               gtk_sheet_autoresize_column (sheet, sheet->drag_cell.col);
3367               GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_XDRAG);
3368               return TRUE;
3369             }
3370           gtk_sheet_column_size_request (sheet, sheet->drag_cell.col, &req);
3371           GTK_SHEET_SET_FLAGS (sheet, GTK_SHEET_IN_XDRAG);
3372           gdk_pointer_grab (sheet->column_title_window, FALSE,
3373                             GDK_POINTER_MOTION_HINT_MASK |
3374                             GDK_BUTTON1_MOTION_MASK |
3375                             GDK_BUTTON_RELEASE_MASK,
3376                             NULL, NULL, event->time);
3377
3378           draw_xor_vline (sheet);
3379           return TRUE;
3380         }
3381     }
3382
3383   if (event->window == sheet->row_title_window && gtk_sheet_rows_resizable (sheet))
3384     {
3385       gtk_widget_get_pointer (widget, NULL, &sheet->y_drag);
3386
3387       if (POSSIBLE_YDRAG (sheet, sheet->y_drag, &sheet->drag_cell.row))
3388         {
3389           guint req;
3390           gtk_sheet_row_size_request (sheet, sheet->drag_cell.row, &req);
3391           GTK_SHEET_SET_FLAGS (sheet, GTK_SHEET_IN_YDRAG);
3392           gdk_pointer_grab (sheet->row_title_window, FALSE,
3393                             GDK_POINTER_MOTION_HINT_MASK |
3394                             GDK_BUTTON1_MOTION_MASK |
3395                             GDK_BUTTON_RELEASE_MASK,
3396                             NULL, NULL, event->time);
3397
3398           draw_xor_hline (sheet);
3399           return TRUE;
3400         }
3401     }
3402
3403   /* the sheet itself does not handle other than single click events */
3404   if (event->type != GDK_BUTTON_PRESS) return FALSE;
3405
3406   /* selections on the sheet */
3407   if (event->window == sheet->sheet_window)
3408     {
3409       gtk_widget_get_pointer (widget, &x, &y);
3410       gtk_sheet_get_pixel_info (sheet, x, y, &row, &column);
3411       gdk_pointer_grab (sheet->sheet_window, FALSE,
3412                         GDK_POINTER_MOTION_HINT_MASK |
3413                         GDK_BUTTON1_MOTION_MASK |
3414                         GDK_BUTTON_RELEASE_MASK,
3415                         NULL, NULL, event->time);
3416       gtk_grab_add (GTK_WIDGET (sheet));
3417
3418       /* This seems to be a kludge to work around a problem where the sheet
3419          scrolls to another position.  The timeout scrolls it back to its
3420          original posn.          JMD 3 July 2007
3421       */
3422       gtk_widget_grab_focus (GTK_WIDGET (sheet));
3423
3424       if (sheet->selection_mode != GTK_SELECTION_SINGLE &&
3425           sheet->selection_mode != GTK_SELECTION_NONE &&
3426           sheet->cursor_drag->type == GDK_SIZING &&
3427           !GTK_SHEET_IN_SELECTION (sheet) && !GTK_SHEET_IN_RESIZE (sheet))
3428         {
3429           if (sheet->state == GTK_STATE_NORMAL)
3430             {
3431               row = sheet->active_cell.row;
3432               column = sheet->active_cell.col;
3433               sheet->active_cell.row = row;
3434               sheet->active_cell.col = column;
3435               sheet->drag_range = sheet->range;
3436               sheet->state = GTK_SHEET_RANGE_SELECTED;
3437               gtk_sheet_select_range (sheet, &sheet->drag_range);
3438             }
3439           sheet->x_drag = x;
3440           sheet->y_drag = y;
3441           if (row > sheet->range.rowi) row--;
3442           if (column > sheet->range.coli) column--;
3443           sheet->drag_cell.row = row;
3444           sheet->drag_cell.col = column;
3445           sheet->drag_range = sheet->range;
3446           draw_xor_rectangle (sheet, sheet->drag_range);
3447           GTK_SHEET_SET_FLAGS (sheet, GTK_SHEET_IN_RESIZE);
3448         }
3449       else if (sheet->cursor_drag->type == GDK_TOP_LEFT_ARROW &&
3450                !GTK_SHEET_IN_SELECTION (sheet)
3451                && ! GTK_SHEET_IN_DRAG (sheet)
3452                && sheet->active_cell.row >= 0
3453                && sheet->active_cell.col >= 0
3454                )
3455         {
3456           if (sheet->state == GTK_STATE_NORMAL)
3457             {
3458               row = sheet->active_cell.row;
3459               column = sheet->active_cell.col;
3460               sheet->active_cell.row = row;
3461               sheet->active_cell.col = column;
3462               sheet->drag_range = sheet->range;
3463               sheet->state = GTK_SHEET_RANGE_SELECTED;
3464               gtk_sheet_select_range (sheet, &sheet->drag_range);
3465             }
3466           sheet->x_drag = x;
3467           sheet->y_drag = y;
3468           if (row < sheet->range.row0) row++;
3469           if (row > sheet->range.rowi) row--;
3470           if (column < sheet->range.col0) column++;
3471           if (column > sheet->range.coli) column--;
3472           sheet->drag_cell.row = row;
3473           sheet->drag_cell.col = column;
3474           sheet->drag_range = sheet->range;
3475           draw_xor_rectangle (sheet, sheet->drag_range);
3476           GTK_SHEET_SET_FLAGS (sheet, GTK_SHEET_IN_DRAG);
3477         }
3478       else
3479         {
3480           veto = gtk_sheet_click_cell (sheet, row, column);
3481           if (veto) GTK_SHEET_SET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
3482         }
3483     }
3484
3485   if (event->window == sheet->column_title_window)
3486     {
3487       gtk_widget_get_pointer (widget, &x, &y);
3488       if ( sheet->row_titles_visible)
3489         x -= sheet->row_title_area.width;
3490
3491       x += sheet->hadjustment->value;
3492
3493       column = column_from_xpixel (sheet, x);
3494
3495       if (g_sheet_column_get_sensitivity (sheet->column_geometry, column))
3496         {
3497           veto = gtk_sheet_click_cell (sheet, -1, column);
3498           gtk_grab_add (GTK_WIDGET (sheet));
3499           gtk_widget_grab_focus (GTK_WIDGET (sheet));
3500           GTK_SHEET_SET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
3501         }
3502     }
3503
3504   if (event->window == sheet->row_title_window)
3505     {
3506       gtk_widget_get_pointer (widget, &x, &y);
3507       if ( sheet->column_titles_visible)
3508         y -= sheet->column_title_area.height;
3509
3510       y += sheet->vadjustment->value;
3511
3512       row = yyy_row_ypixel_to_row (sheet, y);
3513       if (g_sheet_row_get_sensitivity (sheet->row_geometry, row))
3514         {
3515           veto = gtk_sheet_click_cell (sheet, row, -1);
3516           gtk_grab_add (GTK_WIDGET (sheet));
3517           gtk_widget_grab_focus (GTK_WIDGET (sheet));
3518           GTK_SHEET_SET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
3519         }
3520     }
3521
3522   return TRUE;
3523 }
3524
3525 static gboolean
3526 gtk_sheet_click_cell (GtkSheet *sheet, gint row, gint column)
3527 {
3528   GtkSheetCell cell;
3529   gboolean forbid_move;
3530
3531   cell.row = row;
3532   cell.col = column;
3533
3534   if (row >= g_sheet_row_get_row_count (sheet->row_geometry)
3535       || column >= g_sheet_column_get_column_count (sheet->column_geometry))
3536     {
3537       return FALSE;
3538     }
3539
3540   g_signal_emit (sheet, sheet_signals[TRAVERSE], 0,
3541                  &sheet->active_cell,
3542                  &cell,
3543                  &forbid_move);
3544
3545   if (forbid_move)
3546     {
3547       if (sheet->state == GTK_STATE_NORMAL)
3548         return FALSE;
3549
3550       row = sheet->active_cell.row;
3551       column = sheet->active_cell.col;
3552
3553       change_active_cell (sheet, row, column);
3554       return FALSE;
3555     }
3556
3557   if (row == -1 && column >= 0)
3558     {
3559       gtk_sheet_select_column (sheet, column);
3560       return TRUE;
3561     }
3562
3563   if (column == -1 && row >= 0)
3564     {
3565       gtk_sheet_select_row (sheet, row);
3566       return TRUE;
3567     }
3568
3569   if (row == -1 && column == -1)
3570     {
3571       sheet->range.row0 = 0;
3572       sheet->range.col0 = 0;
3573       sheet->range.rowi = g_sheet_row_get_row_count (sheet->row_geometry) - 1;
3574       sheet->range.coli =
3575         g_sheet_column_get_column_count (sheet->column_geometry) - 1;
3576       sheet->active_cell.row = 0;
3577       sheet->active_cell.col = 0;
3578       gtk_sheet_select_range (sheet, NULL);
3579       return TRUE;
3580     }
3581
3582   if (sheet->state != GTK_SHEET_NORMAL)
3583     {
3584       sheet->state = GTK_SHEET_NORMAL;
3585       gtk_sheet_real_unselect_range (sheet, NULL);
3586     }
3587   else
3588     {
3589       change_active_cell (sheet, row, column);
3590     }
3591
3592   sheet->active_cell.row = row;
3593   sheet->active_cell.col = column;
3594   sheet->selection_cell.row = row;
3595   sheet->selection_cell.col = column;
3596   sheet->range.row0 = row;
3597   sheet->range.col0 = column;
3598   sheet->range.rowi = row;
3599   sheet->range.coli = column;
3600   sheet->state = GTK_SHEET_NORMAL;
3601   GTK_SHEET_SET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
3602   gtk_sheet_draw_active_cell (sheet);
3603   return TRUE;
3604 }
3605
3606 static gint
3607 gtk_sheet_button_release (GtkWidget *widget,
3608                           GdkEventButton *event)
3609 {
3610   gint y;
3611   GdkDisplay *display = gtk_widget_get_display (widget);
3612
3613   GtkSheet *sheet = GTK_SHEET (widget);
3614
3615   /* release on resize windows */
3616   if (GTK_SHEET_IN_XDRAG (sheet))
3617     {
3618       gint xpos = event->x;
3619       gint width;
3620       GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_XDRAG);
3621       GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
3622
3623       gdk_display_pointer_ungrab (display, event->time);
3624       draw_xor_vline (sheet);
3625
3626       width = new_column_width (sheet, sheet->drag_cell.col, &xpos);
3627
3628       gtk_sheet_set_column_width (sheet, sheet->drag_cell.col, width);
3629       return TRUE;
3630     }
3631
3632   if (GTK_SHEET_IN_YDRAG (sheet))
3633     {
3634       GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_YDRAG);
3635       GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
3636       gtk_widget_get_pointer (widget, NULL, &y);
3637       gdk_display_pointer_ungrab (display, event->time);
3638       draw_xor_hline (sheet);
3639
3640       gtk_sheet_set_row_height (sheet, sheet->drag_cell.row,
3641                                 new_row_height (sheet, sheet->drag_cell.row, &y));
3642       g_signal_emit_by_name (sheet->vadjustment, "value_changed");
3643       return TRUE;
3644     }
3645
3646
3647   if (GTK_SHEET_IN_DRAG (sheet))
3648     {
3649       GtkSheetRange old_range;
3650       draw_xor_rectangle (sheet, sheet->drag_range);
3651       GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_DRAG);
3652       gdk_display_pointer_ungrab (display, event->time);
3653
3654       gtk_sheet_real_unselect_range (sheet, NULL);
3655
3656       sheet->active_cell.row = sheet->active_cell.row +
3657         (sheet->drag_range.row0 - sheet->range.row0);
3658       sheet->active_cell.col = sheet->active_cell.col +
3659         (sheet->drag_range.col0 - sheet->range.col0);
3660       sheet->selection_cell.row = sheet->selection_cell.row +
3661         (sheet->drag_range.row0 - sheet->range.row0);
3662       sheet->selection_cell.col = sheet->selection_cell.col +
3663         (sheet->drag_range.col0 - sheet->range.col0);
3664       old_range = sheet->range;
3665       sheet->range = sheet->drag_range;
3666       sheet->drag_range = old_range;
3667       g_signal_emit (sheet, sheet_signals[MOVE_RANGE], 0,
3668                      &sheet->drag_range, &sheet->range);
3669       gtk_sheet_select_range (sheet, &sheet->range);
3670     }
3671
3672   if (GTK_SHEET_IN_RESIZE (sheet))
3673     {
3674       GtkSheetRange old_range;
3675       draw_xor_rectangle (sheet, sheet->drag_range);
3676       GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_RESIZE);
3677       gdk_display_pointer_ungrab (display, event->time);
3678
3679       gtk_sheet_real_unselect_range (sheet, NULL);
3680
3681       sheet->active_cell.row = sheet->active_cell.row +
3682         (sheet->drag_range.row0 - sheet->range.row0);
3683       sheet->active_cell.col = sheet->active_cell.col +
3684         (sheet->drag_range.col0 - sheet->range.col0);
3685       if (sheet->drag_range.row0 < sheet->range.row0)
3686         sheet->selection_cell.row = sheet->drag_range.row0;
3687       if (sheet->drag_range.rowi >= sheet->range.rowi)
3688         sheet->selection_cell.row = sheet->drag_range.rowi;
3689       if (sheet->drag_range.col0 < sheet->range.col0)
3690         sheet->selection_cell.col = sheet->drag_range.col0;
3691       if (sheet->drag_range.coli >= sheet->range.coli)
3692         sheet->selection_cell.col = sheet->drag_range.coli;
3693       old_range = sheet->range;
3694       sheet->range = sheet->drag_range;
3695       sheet->drag_range = old_range;
3696
3697       if (sheet->state == GTK_STATE_NORMAL) sheet->state = GTK_SHEET_RANGE_SELECTED;
3698       g_signal_emit (sheet, sheet_signals[RESIZE_RANGE], 0,
3699                      &sheet->drag_range, &sheet->range);
3700       gtk_sheet_select_range (sheet, &sheet->range);
3701     }
3702
3703   if (sheet->state == GTK_SHEET_NORMAL && GTK_SHEET_IN_SELECTION (sheet))
3704     {
3705       GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
3706       gdk_display_pointer_ungrab (display, event->time);
3707       change_active_cell (sheet, sheet->active_cell.row,
3708                                sheet->active_cell.col);
3709     }
3710
3711   if (GTK_SHEET_IN_SELECTION)
3712     gdk_display_pointer_ungrab (display, event->time);
3713   gtk_grab_remove (GTK_WIDGET (sheet));
3714
3715   GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
3716
3717   return TRUE;
3718 }
3719
3720 \f
3721
3722
3723
3724 /* Shamelessly lifted from gtktooltips */
3725 static gboolean
3726 gtk_sheet_subtitle_paint_window (GtkWidget *tip_window)
3727 {
3728   GtkRequisition req;
3729
3730   gtk_widget_size_request (tip_window, &req);
3731   gtk_paint_flat_box (tip_window->style, tip_window->window,
3732                       GTK_STATE_NORMAL, GTK_SHADOW_OUT,
3733                       NULL, GTK_WIDGET(tip_window), "tooltip",
3734                       0, 0, req.width, req.height);
3735
3736   return FALSE;
3737 }
3738
3739 static void
3740 destroy_hover_window (GtkSheetHoverTitle *h)
3741 {
3742   gtk_widget_destroy (h->window);
3743   g_free (h);
3744 }
3745
3746 static GtkSheetHoverTitle *
3747 create_hover_window (void)
3748 {
3749   GtkSheetHoverTitle *hw = g_malloc (sizeof (*hw));
3750
3751   hw->window = gtk_window_new (GTK_WINDOW_POPUP);
3752
3753 #if GTK_CHECK_VERSION (2, 9, 0)
3754   gtk_window_set_type_hint (GTK_WINDOW (hw->window),
3755                             GDK_WINDOW_TYPE_HINT_TOOLTIP);
3756 #endif
3757
3758   gtk_widget_set_app_paintable (hw->window, TRUE);
3759   gtk_window_set_resizable (GTK_WINDOW (hw->window), FALSE);
3760   gtk_widget_set_name (hw->window, "gtk-tooltips");
3761   gtk_container_set_border_width (GTK_CONTAINER (hw->window), 4);
3762
3763   g_signal_connect (hw->window,
3764                     "expose_event",
3765                     G_CALLBACK (gtk_sheet_subtitle_paint_window),
3766                     NULL);
3767
3768   hw->label = gtk_label_new (NULL);
3769
3770
3771   gtk_label_set_line_wrap (GTK_LABEL (hw->label), TRUE);
3772   gtk_misc_set_alignment (GTK_MISC (hw->label), 0.5, 0.5);
3773
3774   gtk_container_add (GTK_CONTAINER (hw->window), hw->label);
3775
3776   gtk_widget_show (hw->label);
3777
3778   g_signal_connect (hw->window,
3779                     "destroy",
3780                     G_CALLBACK (gtk_widget_destroyed),
3781                     &hw->window);
3782
3783   return hw;
3784 }
3785
3786 #define HOVER_WINDOW_Y_OFFSET 2
3787
3788 static void
3789 show_subtitle (GtkSheet *sheet, gint row, gint column, const gchar *subtitle)
3790 {
3791   gint x, y;
3792   gint px, py;
3793   gint width;
3794
3795   if ( ! subtitle )
3796     return;
3797
3798   gtk_label_set_text (GTK_LABEL (sheet->hover_window->label),
3799                       subtitle);
3800
3801
3802   sheet->hover_window->row = row;
3803   sheet->hover_window->column = column;
3804
3805   gdk_window_get_origin (GTK_WIDGET (sheet)->window, &x, &y);
3806
3807   gtk_widget_get_pointer (GTK_WIDGET (sheet), &px, &py);
3808
3809   gtk_widget_show (sheet->hover_window->window);
3810
3811   width = GTK_WIDGET (sheet->hover_window->label)->allocation.width;
3812
3813   if (row == -1 )
3814     {
3815       x += px;
3816       x -= width / 2;
3817       y += sheet->column_title_area.y;
3818       y += sheet->column_title_area.height;
3819       y += HOVER_WINDOW_Y_OFFSET;
3820     }
3821
3822   if ( column == -1 )
3823     {
3824       y += py;
3825       x += sheet->row_title_area.x;
3826       x += sheet->row_title_area.width * 2 / 3.0;
3827     }
3828
3829   gtk_window_move (GTK_WINDOW (sheet->hover_window->window),
3830                    x, y);
3831 }
3832
3833 static gboolean
3834 motion_timeout_callback (gpointer data)
3835 {
3836   GtkSheet *sheet = GTK_SHEET (data);
3837   gint x, y;
3838   gint row, column;
3839   gtk_widget_get_pointer (GTK_WIDGET (sheet), &x, &y);
3840
3841   if ( gtk_sheet_get_pixel_info (sheet, x, y, &row, &column) )
3842     {
3843       if (sheet->row_title_under)
3844         {
3845           GSheetRow *row_geo = sheet->row_geometry;
3846           gchar *text;
3847
3848           text = g_sheet_row_get_subtitle (row_geo, row);
3849
3850           show_subtitle (sheet, row, -1, text);
3851           g_free (text);
3852         }
3853
3854       if (sheet->column_title_under)
3855         {
3856           GSheetColumn *col_geo = sheet->column_geometry;
3857           gchar *text;
3858
3859           text = g_sheet_column_get_subtitle (col_geo, column);
3860
3861           show_subtitle (sheet, -1, column, text);
3862
3863           g_free (text);
3864         }
3865     }
3866
3867   return FALSE;
3868 }
3869
3870 static gboolean
3871 gtk_sheet_motion (GtkWidget *widget,  GdkEventMotion *event)
3872 {
3873   GtkSheet *sheet;
3874   GdkModifierType mods;
3875   GdkCursorType new_cursor;
3876   gint x, y;
3877   gint row, column;
3878   GdkDisplay *display;
3879
3880   g_return_val_if_fail (widget != NULL, FALSE);
3881   g_return_val_if_fail (GTK_IS_SHEET (widget), FALSE);
3882   g_return_val_if_fail (event != NULL, FALSE);
3883
3884   sheet = GTK_SHEET (widget);
3885
3886   display = gtk_widget_get_display (widget);
3887
3888   /* selections on the sheet */
3889   x = event->x;
3890   y = event->y;
3891
3892   if (!GTK_WIDGET_VISIBLE (sheet->hover_window->window))
3893     {
3894       if ( sheet->motion_timer > 0 )
3895         g_source_remove (sheet->motion_timer);
3896       sheet->motion_timer =
3897         g_timeout_add (TIMEOUT_HOVER, motion_timeout_callback, sheet);
3898     }
3899   else
3900     {
3901       gint row, column;
3902       gint wx, wy;
3903       gtk_widget_get_pointer (widget, &wx, &wy);
3904
3905       if ( gtk_sheet_get_pixel_info (sheet, wx, wy, &row, &column) )
3906         {
3907           if ( row != sheet->hover_window->row ||
3908                column != sheet->hover_window->column)
3909             {
3910               gtk_widget_hide (sheet->hover_window->window);
3911             }
3912         }
3913     }
3914
3915   if (event->window == sheet->column_title_window &&
3916       gtk_sheet_columns_resizable (sheet))
3917     {
3918       if (!GTK_SHEET_IN_SELECTION (sheet) &&
3919           on_column_boundary (sheet, x, &column))
3920         {
3921           new_cursor = GDK_SB_H_DOUBLE_ARROW;
3922           if (new_cursor != sheet->cursor_drag->type)
3923             {
3924               gdk_cursor_unref (sheet->cursor_drag);
3925               sheet->cursor_drag = gdk_cursor_new_for_display (display, GDK_SB_H_DOUBLE_ARROW);
3926               gdk_window_set_cursor (sheet->column_title_window,
3927                                      sheet->cursor_drag);
3928             }
3929         }
3930       else
3931         {
3932           new_cursor = GDK_TOP_LEFT_ARROW;
3933           if (!GTK_SHEET_IN_XDRAG (sheet) &&
3934               new_cursor != sheet->cursor_drag->type)
3935             {
3936               gdk_cursor_unref (sheet->cursor_drag);
3937               sheet->cursor_drag = gdk_cursor_new_for_display (display, GDK_TOP_LEFT_ARROW);
3938               gdk_window_set_cursor (sheet->column_title_window,
3939                                      sheet->cursor_drag);
3940             }
3941         }
3942     }
3943
3944   if (event->window == sheet->row_title_window &&
3945       gtk_sheet_rows_resizable (sheet))
3946     {
3947       if (!GTK_SHEET_IN_SELECTION (sheet) && POSSIBLE_YDRAG (sheet, y, &column))
3948         {
3949           new_cursor = GDK_SB_V_DOUBLE_ARROW;
3950           if (new_cursor != sheet->cursor_drag->type)
3951             {
3952               gdk_cursor_unref (sheet->cursor_drag);
3953               sheet->cursor_drag = gdk_cursor_new_for_display (display, GDK_SB_V_DOUBLE_ARROW);
3954               gdk_window_set_cursor (sheet->row_title_window, sheet->cursor_drag);
3955             }
3956         }
3957       else
3958         {
3959           new_cursor = GDK_TOP_LEFT_ARROW;
3960           if (!GTK_SHEET_IN_YDRAG (sheet) &&
3961               new_cursor != sheet->cursor_drag->type)
3962             {
3963               gdk_cursor_unref (sheet->cursor_drag);
3964               sheet->cursor_drag = gdk_cursor_new_for_display (display, GDK_TOP_LEFT_ARROW);
3965               gdk_window_set_cursor (sheet->row_title_window, sheet->cursor_drag);
3966             }
3967         }
3968     }
3969
3970   new_cursor = GDK_PLUS;
3971   if ( event->window == sheet->sheet_window &&
3972        !POSSIBLE_DRAG (sheet, x, y, &row, &column) &&
3973        !GTK_SHEET_IN_DRAG (sheet) &&
3974        !POSSIBLE_RESIZE (sheet, x, y, &row, &column) &&
3975        !GTK_SHEET_IN_RESIZE (sheet) &&
3976        new_cursor != sheet->cursor_drag->type)
3977     {
3978       gdk_cursor_unref (sheet->cursor_drag);
3979       sheet->cursor_drag = gdk_cursor_new_for_display (display, GDK_PLUS);
3980       gdk_window_set_cursor (sheet->sheet_window, sheet->cursor_drag);
3981     }
3982
3983   new_cursor = GDK_TOP_LEFT_ARROW;
3984   if ( event->window == sheet->sheet_window &&
3985        ! (POSSIBLE_RESIZE (sheet, x, y, &row, &column) ||
3986           GTK_SHEET_IN_RESIZE (sheet)) &&
3987        (POSSIBLE_DRAG (sheet, x, y, &row, &column) ||
3988         GTK_SHEET_IN_DRAG (sheet)) &&
3989        new_cursor != sheet->cursor_drag->type)
3990     {
3991       gdk_cursor_unref (sheet->cursor_drag);
3992       sheet->cursor_drag = gdk_cursor_new_for_display (display, GDK_TOP_LEFT_ARROW);
3993       gdk_window_set_cursor (sheet->sheet_window, sheet->cursor_drag);
3994     }
3995
3996   new_cursor = GDK_SIZING;
3997   if ( event->window == sheet->sheet_window &&
3998        sheet->selection_mode != GTK_SELECTION_NONE &&
3999        !GTK_SHEET_IN_DRAG (sheet) &&
4000        (POSSIBLE_RESIZE (sheet, x, y, &row, &column) ||
4001         GTK_SHEET_IN_RESIZE (sheet)) &&
4002        new_cursor != sheet->cursor_drag->type)
4003     {
4004       gdk_cursor_unref (sheet->cursor_drag);
4005       sheet->cursor_drag = gdk_cursor_new_for_display (display, GDK_SIZING);
4006       gdk_window_set_cursor (sheet->sheet_window, sheet->cursor_drag);
4007     }
4008
4009
4010   gdk_window_get_pointer (widget->window, &x, &y, &mods);
4011   if (! (mods & GDK_BUTTON1_MASK)) return FALSE;
4012
4013   if (GTK_SHEET_IN_XDRAG (sheet))
4014     {
4015       x = event->x;
4016
4017       new_column_width (sheet, sheet->drag_cell.col, &x);
4018 #if 0
4019       if (x != sheet->x_drag)
4020         {
4021           draw_xor_vline (sheet);
4022           sheet->x_drag = x;
4023           draw_xor_vline (sheet);
4024         }
4025 #endif
4026       return TRUE;
4027     }
4028
4029   if (GTK_SHEET_IN_YDRAG (sheet))
4030     {
4031       if (event->is_hint || event->window != widget->window)
4032         gtk_widget_get_pointer (widget, NULL, &y);
4033       else
4034         y = event->y;
4035
4036       new_row_height (sheet, sheet->drag_cell.row, &y);
4037       if (y != sheet->y_drag)
4038         {
4039           draw_xor_hline (sheet);
4040           sheet->y_drag = y;
4041           draw_xor_hline (sheet);
4042         }
4043       return TRUE;
4044     }
4045
4046   if (GTK_SHEET_IN_DRAG (sheet))
4047     {
4048       GtkSheetRange aux;
4049       column = column_from_xpixel (sheet, x)- sheet->drag_cell.col;
4050       row = yyy_row_ypixel_to_row (sheet, y) - sheet->drag_cell.row;
4051       if (sheet->state == GTK_SHEET_COLUMN_SELECTED) row = 0;
4052       if (sheet->state == GTK_SHEET_ROW_SELECTED) column = 0;
4053       sheet->x_drag = x;
4054       sheet->y_drag = y;
4055       aux = sheet->range;
4056       if (aux.row0 + row >= 0 && aux.rowi + row < g_sheet_row_get_row_count (sheet->row_geometry) &&
4057           aux.col0 + column >= 0 && aux.coli + column < g_sheet_column_get_column_count (sheet->column_geometry))
4058         {
4059           aux = sheet->drag_range;
4060           sheet->drag_range.row0 = sheet->range.row0 + row;
4061           sheet->drag_range.col0 = sheet->range.col0 + column;
4062           sheet->drag_range.rowi = sheet->range.rowi + row;
4063           sheet->drag_range.coli = sheet->range.coli + column;
4064           if (aux.row0 != sheet->drag_range.row0 ||
4065               aux.col0 != sheet->drag_range.col0)
4066             {
4067               draw_xor_rectangle (sheet, aux);
4068               draw_xor_rectangle (sheet, sheet->drag_range);
4069             }
4070         }
4071       return TRUE;
4072     }
4073
4074   if (GTK_SHEET_IN_RESIZE (sheet))
4075     {
4076       GtkSheetRange aux;
4077       gint v_h, current_col, current_row, col_threshold, row_threshold;
4078       v_h = 1;
4079       if (abs (x - g_sheet_column_start_pixel (sheet->column_geometry, sheet->drag_cell.col)) >
4080           abs (y - g_sheet_row_start_pixel (sheet->row_geometry, sheet->drag_cell.row))) v_h = 2;
4081
4082       current_col = column_from_xpixel (sheet, x);
4083       current_row = yyy_row_ypixel_to_row (sheet, y);
4084       column = current_col - sheet->drag_cell.col;
4085       row = current_row - sheet->drag_cell.row;
4086
4087       /*use half of column width resp. row height as threshold to
4088         expand selection*/
4089       col_threshold = g_sheet_column_start_pixel (sheet->column_geometry, current_col) +
4090         g_sheet_column_get_width (sheet->column_geometry, current_col) / 2;
4091       if (column > 0)
4092         {
4093           if (x < col_threshold)
4094             column -= 1;
4095         }
4096       else if (column < 0)
4097         {
4098           if (x > col_threshold)
4099             column +=1;
4100         }
4101       row_threshold = g_sheet_row_start_pixel (sheet->row_geometry, current_row) +
4102         g_sheet_row_get_height (sheet->row_geometry, current_row)/2;
4103       if (row > 0)
4104         {
4105           if (y < row_threshold)
4106             row -= 1;
4107         }
4108       else if (row < 0)
4109         {
4110           if (y > row_threshold)
4111             row +=1;
4112         }
4113
4114       if (sheet->state == GTK_SHEET_COLUMN_SELECTED) row = 0;
4115       if (sheet->state == GTK_SHEET_ROW_SELECTED) column = 0;
4116       sheet->x_drag = x;
4117       sheet->y_drag = y;
4118       aux = sheet->range;
4119
4120       if (v_h == 1)
4121         column = 0;
4122       else
4123         row = 0;
4124
4125       if (aux.row0 + row >= 0 && aux.rowi + row < g_sheet_row_get_row_count (sheet->row_geometry) &&
4126           aux.col0 + column >= 0 && aux.coli + column < g_sheet_column_get_column_count (sheet->column_geometry))
4127         {
4128           aux = sheet->drag_range;
4129           sheet->drag_range = sheet->range;
4130
4131           if (row < 0) sheet->drag_range.row0 = sheet->range.row0 + row;
4132           if (row > 0) sheet->drag_range.rowi = sheet->range.rowi + row;
4133           if (column < 0) sheet->drag_range.col0 = sheet->range.col0 + column;
4134           if (column > 0) sheet->drag_range.coli = sheet->range.coli + column;
4135
4136           if (aux.row0 != sheet->drag_range.row0 ||
4137               aux.rowi != sheet->drag_range.rowi ||
4138               aux.col0 != sheet->drag_range.col0 ||
4139               aux.coli != sheet->drag_range.coli)
4140             {
4141               draw_xor_rectangle (sheet, aux);
4142               draw_xor_rectangle (sheet, sheet->drag_range);
4143             }
4144         }
4145       return TRUE;
4146     }
4147
4148   gtk_sheet_get_pixel_info (sheet, x, y, &row, &column);
4149
4150   if (sheet->state == GTK_SHEET_NORMAL && row == sheet->active_cell.row &&
4151       column == sheet->active_cell.col) return TRUE;
4152
4153   if (GTK_SHEET_IN_SELECTION (sheet) && mods&GDK_BUTTON1_MASK)
4154     gtk_sheet_extend_selection (sheet, row, column);
4155
4156   return TRUE;
4157 }
4158
4159 static gboolean
4160 gtk_sheet_crossing_notify (GtkWidget *widget,
4161                            GdkEventCrossing *event)
4162 {
4163   GtkSheet *sheet = GTK_SHEET (widget);
4164
4165   if (event->window == sheet->column_title_window)
4166     sheet->column_title_under = event->type == GDK_ENTER_NOTIFY;
4167   else if (event->window == sheet->row_title_window)
4168     sheet->row_title_under = event->type == GDK_ENTER_NOTIFY;
4169
4170   return TRUE;
4171 }
4172
4173 static void
4174 gtk_sheet_extend_selection (GtkSheet *sheet, gint row, gint column)
4175 {
4176   GtkSheetRange range;
4177   gint state;
4178   gint r, c;
4179
4180   if (row == sheet->selection_cell.row && column == sheet->selection_cell.col)
4181     return;
4182
4183   if (sheet->selection_mode == GTK_SELECTION_SINGLE) return;
4184
4185   gtk_widget_grab_focus (GTK_WIDGET (sheet));
4186
4187   if (GTK_SHEET_IN_DRAG (sheet)) return;
4188
4189   state = sheet->state;
4190
4191   switch (sheet->state)
4192     {
4193     case GTK_SHEET_ROW_SELECTED:
4194       column = g_sheet_column_get_column_count (sheet->column_geometry) - 1;
4195       break;
4196     case GTK_SHEET_COLUMN_SELECTED:
4197       row = g_sheet_row_get_row_count (sheet->row_geometry) - 1;
4198       break;
4199     case GTK_SHEET_NORMAL:
4200       sheet->state = GTK_SHEET_RANGE_SELECTED;
4201       r = sheet->active_cell.row;
4202       c = sheet->active_cell.col;
4203       sheet->range.col0 = c;
4204       sheet->range.row0 = r;
4205       sheet->range.coli = c;
4206       sheet->range.rowi = r;
4207       gtk_sheet_range_draw_selection (sheet, sheet->range);
4208     case GTK_SHEET_RANGE_SELECTED:
4209       sheet->state = GTK_SHEET_RANGE_SELECTED;
4210     }
4211
4212   sheet->selection_cell.row = row;
4213   sheet->selection_cell.col = column;
4214
4215   range.col0 = MIN (column, sheet->active_cell.col);
4216   range.coli = MAX (column, sheet->active_cell.col);
4217   range.row0 = MIN (row, sheet->active_cell.row);
4218   range.rowi = MAX (row, sheet->active_cell.row);
4219
4220   if (range.row0 != sheet->range.row0 || range.rowi != sheet->range.rowi ||
4221       range.col0 != sheet->range.col0 || range.coli != sheet->range.coli ||
4222       state == GTK_SHEET_NORMAL)
4223     gtk_sheet_real_select_range (sheet, &range);
4224
4225 }
4226
4227 static gint
4228 gtk_sheet_entry_key_press (GtkWidget *widget,
4229                            GdkEventKey *key)
4230 {
4231   gboolean focus;
4232   g_signal_emit_by_name (widget, "key_press_event", key, &focus);
4233   return focus;
4234 }
4235
4236
4237 /* Number of rows in a step-increment */
4238 #define ROWS_PER_STEP 1
4239
4240
4241 static void
4242 page_vertical (GtkSheet *sheet, GtkScrollType dir)
4243 {
4244   gint old_row = sheet->active_cell.row ;
4245   glong vpixel = g_sheet_row_start_pixel (sheet->row_geometry, old_row);
4246
4247   gint new_row;
4248
4249   vpixel -= g_sheet_row_start_pixel (sheet->row_geometry,
4250                                      min_visible_row (sheet));
4251
4252   switch ( dir)
4253     {
4254     case GTK_SCROLL_PAGE_DOWN:
4255       gtk_adjustment_set_value (sheet->vadjustment,
4256                                 sheet->vadjustment->value +
4257                                 sheet->vadjustment->page_increment);
4258       break;
4259     case GTK_SCROLL_PAGE_UP:
4260       gtk_adjustment_set_value (sheet->vadjustment,
4261                                 sheet->vadjustment->value -
4262                                 sheet->vadjustment->page_increment);
4263
4264       break;
4265     default:
4266       g_assert_not_reached ();
4267       break;
4268     }
4269
4270
4271   vpixel += g_sheet_row_start_pixel (sheet->row_geometry,
4272                                      min_visible_row (sheet));
4273
4274   new_row =  yyy_row_ypixel_to_row (sheet, vpixel);
4275
4276   change_active_cell (sheet, new_row,
4277                            sheet->active_cell.col);
4278 }
4279
4280
4281 static void
4282 step_sheet (GtkSheet *sheet, GtkScrollType dir)
4283 {
4284   gint current_row = sheet->active_cell.row;
4285   gint current_col = sheet->active_cell.col;
4286   GtkSheetCell new_cell ;
4287   gboolean forbidden = FALSE;
4288
4289   new_cell.row = current_row;
4290   new_cell.col = current_col;
4291
4292   switch ( dir)
4293     {
4294     case GTK_SCROLL_STEP_DOWN:
4295       new_cell.row++;
4296       break;
4297     case GTK_SCROLL_STEP_UP:
4298       new_cell.row--;
4299       break;
4300     case GTK_SCROLL_STEP_RIGHT:
4301       new_cell.col++;
4302       break;
4303     case GTK_SCROLL_STEP_LEFT:
4304       new_cell.col--;
4305       break;
4306     default:
4307       g_assert_not_reached ();
4308       break;
4309     }
4310
4311
4312   maximize_int (&new_cell.row, 0);
4313   maximize_int (&new_cell.col, 0);
4314
4315   minimize_int (&new_cell.row,
4316                 g_sheet_row_get_row_count (sheet->row_geometry) - 1);
4317
4318   minimize_int (&new_cell.col,
4319                 g_sheet_column_get_column_count (sheet->column_geometry) - 1);
4320
4321   g_signal_emit (sheet, sheet_signals[TRAVERSE], 0,
4322                  &sheet->active_cell,
4323                  &new_cell,
4324                 &forbidden);
4325
4326   if (forbidden)
4327     return;
4328
4329   change_active_cell (sheet, new_cell.row, new_cell.col);
4330
4331   if ( new_cell.col > max_fully_visible_column (sheet))
4332     {
4333       glong hpos  =
4334         g_sheet_column_start_pixel (sheet->column_geometry,
4335                                     new_cell.col + 1);
4336       hpos -= sheet->hadjustment->page_size;
4337
4338       gtk_adjustment_set_value (sheet->hadjustment,
4339                                 hpos);
4340     }
4341   else if ( new_cell.col < min_fully_visible_column (sheet))
4342     {
4343       glong hpos  =
4344         g_sheet_column_start_pixel (sheet->column_geometry,
4345                                     new_cell.col);
4346
4347       gtk_adjustment_set_value (sheet->hadjustment,
4348                                 hpos);
4349     }
4350
4351
4352   if ( new_cell.row > max_fully_visible_row (sheet))
4353     {
4354       glong vpos  =
4355         g_sheet_row_start_pixel (sheet->row_geometry,
4356                                     new_cell.row + 1);
4357       vpos -= sheet->vadjustment->page_size;
4358
4359       gtk_adjustment_set_value (sheet->vadjustment,
4360                                 vpos);
4361     }
4362   else if ( new_cell.row < min_fully_visible_row (sheet))
4363     {
4364       glong vpos  =
4365         g_sheet_row_start_pixel (sheet->row_geometry,
4366                                     new_cell.row);
4367
4368       gtk_adjustment_set_value (sheet->vadjustment,
4369                                 vpos);
4370     }
4371 }
4372
4373
4374 static gboolean
4375 gtk_sheet_key_press (GtkWidget *widget,
4376                      GdkEventKey *key)
4377 {
4378   GtkSheet *sheet = GTK_SHEET (widget);
4379
4380   GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_SELECTION);
4381
4382   switch (key->keyval)
4383     {
4384     case GDK_Tab:
4385     case GDK_Right:
4386       step_sheet (sheet, GTK_SCROLL_STEP_RIGHT);
4387       break;
4388     case GDK_ISO_Left_Tab:
4389     case GDK_Left:
4390       step_sheet (sheet, GTK_SCROLL_STEP_LEFT);
4391       break;
4392     case GDK_Return:
4393     case GDK_Down:
4394       step_sheet (sheet, GTK_SCROLL_STEP_DOWN);
4395       break;
4396     case GDK_Up:
4397       step_sheet (sheet, GTK_SCROLL_STEP_UP);
4398       break;
4399
4400     case GDK_Page_Down:
4401       page_vertical (sheet, GTK_SCROLL_PAGE_DOWN);
4402       break;
4403     case GDK_Page_Up:
4404       page_vertical (sheet, GTK_SCROLL_PAGE_UP);
4405       break;
4406
4407     case GDK_Home:
4408       gtk_adjustment_set_value (sheet->vadjustment,
4409                                 sheet->vadjustment->lower);
4410
4411       change_active_cell (sheet,  0,
4412                                sheet->active_cell.col);
4413
4414       break;
4415
4416     case GDK_End:
4417       gtk_adjustment_set_value (sheet->vadjustment,
4418                                 sheet->vadjustment->upper -
4419                                 sheet->vadjustment->page_size -
4420                                 sheet->vadjustment->page_increment);
4421
4422       /*
4423         change_active_cellx (sheet,
4424         g_sheet_row_get_row_count (sheet->row_geometry) - 1,
4425         sheet->active_cell.col);
4426       */
4427       break;
4428     case GDK_Delete:
4429       gtk_sheet_real_cell_clear (sheet, sheet->active_cell.row, sheet->active_cell.col);
4430       break;
4431     default:
4432       return FALSE;
4433       break;
4434     }
4435
4436   return TRUE;
4437 }
4438
4439 static void
4440 gtk_sheet_size_request (GtkWidget *widget,
4441                         GtkRequisition *requisition)
4442 {
4443   GtkSheet *sheet;
4444
4445   g_return_if_fail (widget != NULL);
4446   g_return_if_fail (GTK_IS_SHEET (widget));
4447   g_return_if_fail (requisition != NULL);
4448
4449   sheet = GTK_SHEET (widget);
4450
4451   requisition->width = 3 * DEFAULT_COLUMN_WIDTH;
4452   requisition->height = 3 * DEFAULT_ROW_HEIGHT;
4453
4454   /* compute the size of the column title area */
4455   if (sheet->column_titles_visible)
4456     requisition->height += sheet->column_title_area.height;
4457
4458   /* compute the size of the row title area */
4459   if (sheet->row_titles_visible)
4460     requisition->width += sheet->row_title_area.width;
4461 }
4462
4463
4464 static void
4465 gtk_sheet_size_allocate (GtkWidget *widget,
4466                          GtkAllocation *allocation)
4467 {
4468   GtkSheet *sheet;
4469   GtkAllocation sheet_allocation;
4470   gint border_width;
4471
4472   g_return_if_fail (widget != NULL);
4473   g_return_if_fail (GTK_IS_SHEET (widget));
4474   g_return_if_fail (allocation != NULL);
4475
4476   sheet = GTK_SHEET (widget);
4477   widget->allocation = *allocation;
4478   border_width = GTK_CONTAINER (widget)->border_width;
4479
4480   if (GTK_WIDGET_REALIZED (widget))
4481     gdk_window_move_resize (widget->window,
4482                             allocation->x + border_width,
4483                             allocation->y + border_width,
4484                             allocation->width - 2 * border_width,
4485                             allocation->height - 2 * border_width);
4486
4487   /* use internal allocation structure for all the math
4488    * because it's easier than always subtracting the container
4489    * border width */
4490   sheet->internal_allocation.x = 0;
4491   sheet->internal_allocation.y = 0;
4492   sheet->internal_allocation.width = allocation->width - 2 * border_width;
4493   sheet->internal_allocation.height = allocation->height - 2 * border_width;
4494
4495   sheet_allocation.x = 0;
4496   sheet_allocation.y = 0;
4497   sheet_allocation.width = allocation->width - 2 * border_width;
4498   sheet_allocation.height = allocation->height - 2 * border_width;
4499
4500   if (GTK_WIDGET_REALIZED (widget))
4501     gdk_window_move_resize (sheet->sheet_window,
4502                             sheet_allocation.x,
4503                             sheet_allocation.y,
4504                             sheet_allocation.width,
4505                             sheet_allocation.height);
4506
4507   /* position the window which holds the column title buttons */
4508   sheet->column_title_area.x = 0;
4509   sheet->column_title_area.y = 0;
4510
4511   if (sheet->row_titles_visible)
4512     {
4513       sheet->column_title_area.x = sheet->row_title_area.width;
4514     }
4515
4516   sheet->column_title_area.width = sheet_allocation.width ;
4517
4518
4519   if (GTK_WIDGET_REALIZED (widget) && sheet->column_titles_visible)
4520     gdk_window_move_resize (sheet->column_title_window,
4521                             sheet->column_title_area.x,
4522                             sheet->column_title_area.y,
4523                             sheet->column_title_area.width,
4524                             sheet->column_title_area.height);
4525
4526
4527   /* column button allocation */
4528   draw_column_title_buttons (sheet);
4529
4530   /* position the window which holds the row title buttons */
4531   sheet->row_title_area.x = 0;
4532   sheet->row_title_area.y = 0;
4533   if (sheet->column_titles_visible)
4534     {
4535       sheet->row_title_area.y = sheet->column_title_area.height;
4536     }
4537
4538   sheet->row_title_area.height = sheet_allocation.height -
4539     sheet->row_title_area.y;
4540
4541   if (GTK_WIDGET_REALIZED (widget) && sheet->row_titles_visible)
4542     gdk_window_move_resize (sheet->row_title_window,
4543                             sheet->row_title_area.x,
4544                             sheet->row_title_area.y,
4545                             sheet->row_title_area.width,
4546                             sheet->row_title_area.height);
4547
4548
4549   /* row button allocation */
4550   draw_row_title_buttons (sheet);
4551   draw_column_title_buttons (sheet);
4552
4553   /* set the scrollbars adjustments */
4554   adjust_scrollbars (sheet);
4555 }
4556
4557 static void
4558 draw_column_title_buttons (GtkSheet *sheet)
4559 {
4560   gint i;
4561   gint x, width;
4562
4563   if (!sheet->column_titles_visible) return;
4564   if (!GTK_WIDGET_REALIZED (sheet))
4565     return;
4566
4567   gdk_drawable_get_size (sheet->sheet_window, &width, NULL);
4568   x = 0;
4569
4570   if (sheet->row_titles_visible)
4571     {
4572       x = sheet->row_title_area.width;
4573     }
4574
4575   if (sheet->column_title_area.width != width || sheet->column_title_area.x != x)
4576     {
4577       sheet->column_title_area.width = width;
4578       sheet->column_title_area.x = x;
4579       gdk_window_move_resize (sheet->column_title_window,
4580                               sheet->column_title_area.x,
4581                               sheet->column_title_area.y,
4582                               sheet->column_title_area.width,
4583                               sheet->column_title_area.height);
4584     }
4585
4586   if (max_visible_column (sheet) ==
4587       g_sheet_column_get_column_count (sheet->column_geometry) - 1)
4588     gdk_window_clear_area (sheet->column_title_window,
4589                            0, 0,
4590                            sheet->column_title_area.width,
4591                            sheet->column_title_area.height);
4592
4593   if (!GTK_WIDGET_DRAWABLE (sheet)) return;
4594
4595   size_allocate_global_button (sheet);
4596
4597   for (i = min_visible_column (sheet); i <= max_visible_column (sheet); i++)
4598     gtk_sheet_column_title_button_draw (sheet, i);
4599 }
4600
4601 static void
4602 draw_row_title_buttons (GtkSheet *sheet)
4603 {
4604   gint i;
4605   gint y = 0;
4606   gint height;
4607
4608   if (!sheet->row_titles_visible) return;
4609   if (!GTK_WIDGET_REALIZED (sheet))
4610     return;
4611
4612   gdk_drawable_get_size (sheet->sheet_window, NULL, &height);
4613
4614   if (sheet->column_titles_visible)
4615     {
4616       y = sheet->column_title_area.height;
4617     }
4618
4619   if (sheet->row_title_area.height != height || sheet->row_title_area.y != y)
4620     {
4621       sheet->row_title_area.y = y;
4622       sheet->row_title_area.height = height;
4623       gdk_window_move_resize (sheet->row_title_window,
4624                               sheet->row_title_area.x,
4625                               sheet->row_title_area.y,
4626                               sheet->row_title_area.width,
4627                               sheet->row_title_area.height);
4628     }
4629
4630   if (max_visible_row (sheet) == g_sheet_row_get_row_count (sheet->row_geometry) - 1)
4631     gdk_window_clear_area (sheet->row_title_window,
4632                            0, 0,
4633                            sheet->row_title_area.width,
4634                            sheet->row_title_area.height);
4635
4636   if (!GTK_WIDGET_DRAWABLE (sheet)) return;
4637
4638   size_allocate_global_button (sheet);
4639
4640   for (i = min_visible_row (sheet); i <= max_visible_row (sheet); i++)
4641     {
4642       if ( i >= g_sheet_row_get_row_count (sheet->row_geometry))
4643         break;
4644       gtk_sheet_row_title_button_draw (sheet, i);
4645     }
4646 }
4647
4648
4649 static void
4650 gtk_sheet_size_allocate_entry (GtkSheet *sheet)
4651 {
4652   GtkAllocation entry_alloc;
4653   GtkSheetCellAttr attributes = { 0 };
4654   GtkEntry *sheet_entry;
4655
4656
4657   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return;
4658   if (!GTK_WIDGET_MAPPED (GTK_WIDGET (sheet))) return;
4659
4660   sheet_entry = GTK_ENTRY (gtk_sheet_get_entry (sheet));
4661
4662   if ( ! gtk_sheet_get_attributes (sheet, sheet->active_cell.row,
4663                                    sheet->active_cell.col,
4664                                    &attributes) )
4665     return ;
4666
4667   gtk_widget_ensure_style (GTK_WIDGET (sheet_entry));
4668
4669   if ( GTK_WIDGET_REALIZED (sheet->entry_widget) )
4670     {
4671       GtkStyle *style = GTK_WIDGET (sheet_entry)->style;
4672
4673       style->bg[GTK_STATE_NORMAL] = attributes.background;
4674       style->fg[GTK_STATE_NORMAL] = attributes.foreground;
4675       style->text[GTK_STATE_NORMAL] = attributes.foreground;
4676       style->bg[GTK_STATE_ACTIVE] = attributes.background;
4677       style->fg[GTK_STATE_ACTIVE] = attributes.foreground;
4678       style->text[GTK_STATE_ACTIVE] = attributes.foreground;
4679
4680       pango_font_description_free (style->font_desc);
4681       g_assert (attributes.font_desc);
4682       style->font_desc = pango_font_description_copy (attributes.font_desc);
4683     }
4684
4685   rectangle_from_cell (sheet, sheet->active_cell.row,
4686                        sheet->active_cell.col, &entry_alloc);
4687
4688   gtk_widget_set_size_request (sheet->entry_widget, entry_alloc.width,
4689                                entry_alloc.height);
4690   gtk_widget_size_allocate (sheet->entry_widget, &entry_alloc);
4691 }
4692
4693
4694 static void
4695 create_sheet_entry (GtkSheet *sheet)
4696 {
4697   if (sheet->entry_widget)
4698     {
4699       gtk_widget_unparent (sheet->entry_widget);
4700     }
4701
4702   if (sheet->entry_type)
4703     {
4704       sheet->entry_container = g_object_new (sheet->entry_type, NULL);
4705       g_object_ref_sink (sheet->entry_container);
4706       sheet->entry_widget = gtk_sheet_get_entry (sheet);
4707
4708       if  ( NULL == sheet->entry_widget)
4709         {
4710           g_warning ("Entry type is %s. It must be GtkEntry subclass, or a widget containing one. "
4711                      "Using default", g_type_name (sheet->entry_type));
4712           g_object_unref (sheet->entry_container);
4713           sheet->entry_widget = sheet->entry_container = gtk_entry_new ();
4714         }
4715       else
4716         {
4717           sheet->entry_widget = sheet->entry_container ;
4718         }
4719     }
4720   else
4721     {
4722       sheet->entry_widget = sheet->entry_container = gtk_entry_new ();
4723       g_object_ref_sink (sheet->entry_container);
4724     }
4725
4726   gtk_widget_size_request (sheet->entry_widget, NULL);
4727
4728   if (GTK_WIDGET_REALIZED (sheet))
4729     {
4730       gtk_widget_set_parent_window (sheet->entry_widget, sheet->sheet_window);
4731       gtk_widget_set_parent (sheet->entry_widget, GTK_WIDGET (sheet));
4732       gtk_widget_realize (sheet->entry_widget);
4733     }
4734
4735   g_signal_connect_swapped (sheet->entry_widget, "key_press_event",
4736                             G_CALLBACK (gtk_sheet_entry_key_press),
4737                             sheet);
4738
4739   sheet->entry_handler_id =
4740     g_signal_connect (sheet->entry_widget,
4741                       "changed",
4742                       G_CALLBACK (gtk_sheet_entry_changed),
4743                       sheet);
4744
4745   gtk_widget_show (sheet->entry_widget);
4746 }
4747
4748
4749 /* Finds the last child widget that happens to be of type GtkEntry */
4750 static void
4751 find_entry (GtkWidget *w, gpointer user_data)
4752 {
4753   GtkWidget **entry = user_data;
4754   if ( GTK_IS_ENTRY (w))
4755     {
4756       *entry = w;
4757     }
4758 }
4759
4760 GtkWidget *
4761 gtk_sheet_get_entry (GtkSheet *sheet)
4762 {
4763   GtkWidget *parent;
4764   GtkWidget *entry = NULL;
4765
4766   g_return_val_if_fail (sheet != NULL, NULL);
4767   g_return_val_if_fail (GTK_IS_SHEET (sheet), NULL);
4768   g_return_val_if_fail (sheet->entry_widget != NULL, NULL);
4769
4770   if (GTK_IS_ENTRY (sheet->entry_container))
4771     return (sheet->entry_container);
4772
4773   parent = sheet->entry_container;
4774
4775   if (GTK_IS_CONTAINER (parent))
4776     {
4777       gtk_container_forall (GTK_CONTAINER (parent), find_entry, &entry);
4778
4779       if (GTK_IS_ENTRY (entry))
4780         return entry;
4781     }
4782
4783   if (!GTK_IS_ENTRY (entry)) return NULL;
4784
4785   return (entry);
4786
4787 }
4788
4789 GtkWidget *
4790 gtk_sheet_get_entry_widget (GtkSheet *sheet)
4791 {
4792   g_return_val_if_fail (sheet != NULL, NULL);
4793   g_return_val_if_fail (GTK_IS_SHEET (sheet), NULL);
4794   g_return_val_if_fail (sheet->entry_widget != NULL, NULL);
4795
4796   return (sheet->entry_widget);
4797 }
4798
4799
4800 static void
4801 gtk_sheet_button_draw (GtkSheet *sheet, GdkWindow *window,
4802                        GtkSheetButton *button, gboolean is_sensitive,
4803                        GdkRectangle allocation)
4804 {
4805   GtkShadowType shadow_type;
4806   gint text_width = 0, text_height = 0;
4807   PangoAlignment align = PANGO_ALIGN_LEFT;
4808
4809   gboolean rtl ;
4810
4811   gint state = 0;
4812   gint len = 0;
4813   gchar *line = 0;
4814
4815   g_return_if_fail (sheet != NULL);
4816   g_return_if_fail (button != NULL);
4817
4818
4819   rtl = gtk_widget_get_direction (GTK_WIDGET (sheet)) == GTK_TEXT_DIR_RTL;
4820
4821   gdk_window_clear_area (window,
4822                          allocation.x, allocation.y,
4823                          allocation.width, allocation.height);
4824
4825   gtk_paint_box (sheet->button->style, window,
4826                  GTK_STATE_NORMAL, GTK_SHADOW_OUT,
4827                  &allocation, GTK_WIDGET (sheet->button),
4828                  "buttondefault",
4829                  allocation.x, allocation.y,
4830                  allocation.width, allocation.height);
4831
4832   state = button->state;
4833   if (!is_sensitive) state = GTK_STATE_INSENSITIVE;
4834
4835   if (state == GTK_STATE_ACTIVE)
4836     shadow_type = GTK_SHADOW_IN;
4837   else
4838     shadow_type = GTK_SHADOW_OUT;
4839
4840   if (state != GTK_STATE_NORMAL && state != GTK_STATE_INSENSITIVE)
4841     gtk_paint_box (sheet->button->style, window,
4842                    button->state, shadow_type,
4843                    &allocation, GTK_WIDGET (sheet->button),
4844                    "button",
4845                    allocation.x, allocation.y,
4846                    allocation.width, allocation.height);
4847
4848   if (button->label_visible)
4849     {
4850
4851       text_height = DEFAULT_ROW_HEIGHT -
4852         2 * COLUMN_TITLES_HEIGHT;
4853
4854       gdk_gc_set_clip_rectangle (GTK_WIDGET (sheet)->style->fg_gc[button->state],
4855                                  &allocation);
4856       gdk_gc_set_clip_rectangle (GTK_WIDGET (sheet)->style->white_gc,
4857                                  &allocation);
4858
4859       allocation.y += 2 * sheet->button->style->ythickness;
4860
4861
4862       if (button->label && strlen (button->label)>0)
4863         {
4864           gchar *words = 0;
4865           PangoLayout *layout = NULL;
4866           gint real_x = allocation.x, real_y = allocation.y;
4867
4868           words = button->label;
4869           line = g_new (gchar, 1);
4870           line[0]='\0';
4871
4872           while (words && *words != '\0')
4873             {
4874               if (*words != '\n')
4875                 {
4876                   len = strlen (line);
4877                   line = g_realloc (line, len + 2);
4878                   line[len]=*words;
4879                   line[len + 1]='\0';
4880                 }
4881               if (*words == '\n' || * (words + 1) == '\0')
4882                 {
4883                   text_width = STRING_WIDTH (GTK_WIDGET (sheet), GTK_WIDGET (sheet)->style->font_desc, line);
4884
4885                   layout = gtk_widget_create_pango_layout (GTK_WIDGET (sheet), line);
4886                   switch (button->justification)
4887                     {
4888                     case GTK_JUSTIFY_LEFT:
4889                       real_x = allocation.x + COLUMN_TITLES_HEIGHT;
4890                       align = rtl ? PANGO_ALIGN_RIGHT : PANGO_ALIGN_LEFT;
4891                       break;
4892                     case GTK_JUSTIFY_RIGHT:
4893                       real_x = allocation.x + allocation.width - text_width - COLUMN_TITLES_HEIGHT;
4894                       align = rtl ? PANGO_ALIGN_LEFT : PANGO_ALIGN_RIGHT;
4895                       break;
4896                     case GTK_JUSTIFY_CENTER:
4897                     default:
4898                       real_x = allocation.x + (allocation.width - text_width)/2;
4899                       align = rtl ? PANGO_ALIGN_RIGHT : PANGO_ALIGN_LEFT;
4900                       pango_layout_set_justify (layout, TRUE);
4901                     }
4902                   pango_layout_set_alignment (layout, align);
4903                   gtk_paint_layout (GTK_WIDGET (sheet)->style,
4904                                     window,
4905                                     state,
4906                                     FALSE,
4907                                     &allocation,
4908                                     GTK_WIDGET (sheet),
4909                                     "label",
4910                                     real_x, real_y,
4911                                     layout);
4912                   g_object_unref (layout);
4913
4914                   real_y += text_height + 2;
4915
4916                   g_free (line);
4917                   line = g_new (gchar, 1);
4918                   line[0]='\0';
4919                 }
4920               words++;
4921             }
4922           g_free (line);
4923         }
4924
4925       gdk_gc_set_clip_rectangle (GTK_WIDGET (sheet)->style->fg_gc[button->state],
4926                                  NULL);
4927       gdk_gc_set_clip_rectangle (GTK_WIDGET (sheet)->style->white_gc, NULL);
4928
4929     }
4930
4931   gtk_sheet_button_free (button);
4932 }
4933
4934 static void
4935 gtk_sheet_column_title_button_draw (GtkSheet *sheet, gint column)
4936 {
4937   GdkRectangle allocation;
4938   GtkSheetButton *button = NULL;
4939   gboolean is_sensitive = FALSE;
4940
4941   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return;
4942
4943   if (!sheet->column_titles_visible) return;
4944
4945   if (column < min_visible_column (sheet)) return;
4946   if (column > max_visible_column (sheet)) return;
4947
4948   button = g_sheet_column_get_button (sheet->column_geometry, column);
4949   allocation.y = 0;
4950   allocation.x = g_sheet_column_start_pixel (sheet->column_geometry, column) + CELL_SPACING;
4951   allocation.x -= sheet->hadjustment->value;
4952
4953   allocation.height = sheet->column_title_area.height;
4954   allocation.width = g_sheet_column_get_width (sheet->column_geometry, column);
4955   is_sensitive = g_sheet_column_get_sensitivity (sheet->column_geometry, column);
4956
4957   gtk_sheet_button_draw (sheet, sheet->column_title_window,
4958                          button, is_sensitive, allocation);
4959 }
4960
4961
4962 static void
4963 gtk_sheet_row_title_button_draw (GtkSheet *sheet, gint row)
4964 {
4965   GdkRectangle allocation;
4966   GtkSheetButton *button = NULL;
4967   gboolean is_sensitive = FALSE;
4968
4969
4970   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return;
4971
4972   if (!sheet->row_titles_visible) return;
4973
4974   if (row < min_visible_row (sheet)) return;
4975   if (row > max_visible_row (sheet)) return;
4976
4977   button = g_sheet_row_get_button (sheet->row_geometry, row);
4978   allocation.x = 0;
4979   allocation.y = g_sheet_row_start_pixel (sheet->row_geometry, row) + CELL_SPACING;
4980   allocation.y -= sheet->vadjustment->value;
4981
4982   allocation.width = sheet->row_title_area.width;
4983   allocation.height = g_sheet_row_get_height (sheet->row_geometry, row);
4984   is_sensitive = g_sheet_row_get_sensitivity (sheet->row_geometry, row);
4985
4986   gtk_sheet_button_draw (sheet, sheet->row_title_window,
4987                          button, is_sensitive, allocation);
4988 }
4989
4990 /* SCROLLBARS
4991  *
4992  * functions:
4993  * adjust_scrollbars
4994  * vadjustment_value_changed
4995  * hadjustment_value_changed */
4996
4997 static void
4998 adjust_scrollbars (GtkSheet *sheet)
4999 {
5000   gint width, height;
5001
5002   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
5003     return;
5004
5005   gdk_drawable_get_size (sheet->sheet_window, &width, &height);
5006
5007   if ( sheet->row_titles_visible)
5008     width -= sheet->row_title_area.width;
5009
5010   if (sheet->column_titles_visible)
5011     height -= sheet->column_title_area.height;
5012
5013   if (sheet->vadjustment)
5014     {
5015       glong last_row = g_sheet_row_get_row_count (sheet->row_geometry) - 1;
5016
5017       sheet->vadjustment->step_increment =
5018         ROWS_PER_STEP *
5019         g_sheet_row_get_height (sheet->row_geometry, last_row);
5020
5021       sheet->vadjustment->page_increment =
5022         height -
5023         sheet->column_title_area.height -
5024         g_sheet_row_get_height (sheet->row_geometry, last_row);
5025
5026
5027
5028       sheet->vadjustment->upper =
5029         g_sheet_row_start_pixel (sheet->row_geometry, last_row)
5030         +
5031         g_sheet_row_get_height (sheet->row_geometry, last_row)
5032         ;
5033
5034       sheet->vadjustment->lower = 0;
5035       sheet->vadjustment->page_size = height;
5036
5037       g_signal_emit_by_name (sheet->vadjustment, "changed");
5038     }
5039
5040   if (sheet->hadjustment)
5041     {
5042       gint last_col;
5043       sheet->hadjustment->step_increment = 1;
5044
5045       sheet->hadjustment->page_increment = width;
5046
5047       last_col = g_sheet_column_get_column_count (sheet->column_geometry) - 1;
5048
5049       sheet->hadjustment->upper =
5050         g_sheet_column_start_pixel (sheet->column_geometry, last_col)
5051         +
5052         g_sheet_column_get_width (sheet->column_geometry, last_col)
5053         ;
5054
5055       sheet->hadjustment->lower = 0;
5056       sheet->hadjustment->page_size = width;
5057
5058       g_signal_emit_by_name (sheet->hadjustment, "changed");
5059     }
5060 }
5061
5062 static void
5063 vadjustment_value_changed (GtkAdjustment *adjustment,
5064                            gpointer data)
5065 {
5066   GdkRegion *region;
5067   GtkSheet *sheet = GTK_SHEET (data);
5068
5069   g_return_if_fail (adjustment != NULL);
5070
5071   if ( ! GTK_WIDGET_REALIZED (sheet)) return;
5072
5073
5074   gtk_widget_hide (sheet->entry_widget);
5075
5076   region =
5077     gdk_drawable_get_visible_region (GDK_DRAWABLE (sheet->sheet_window));
5078
5079   gdk_window_begin_paint_region (sheet->sheet_window, region);
5080
5081
5082   gtk_sheet_range_draw (sheet, NULL);
5083   draw_row_title_buttons (sheet);
5084   //  size_allocate_global_button (sheet);
5085
5086   gdk_window_end_paint (sheet->sheet_window);
5087 }
5088
5089
5090 static void
5091 hadjustment_value_changed (GtkAdjustment *adjustment,
5092                            gpointer data)
5093 {
5094   GdkRegion *region;
5095   GtkSheet *sheet = GTK_SHEET (data);
5096
5097   g_return_if_fail (adjustment != NULL);
5098
5099   if ( ! GTK_WIDGET_REALIZED (sheet)) return;
5100
5101   gtk_widget_hide (sheet->entry_widget);
5102
5103
5104   region =
5105     gdk_drawable_get_visible_region (GDK_DRAWABLE (sheet->sheet_window));
5106
5107   gdk_window_begin_paint_region (sheet->sheet_window, region);
5108
5109   gtk_sheet_range_draw (sheet, NULL);
5110   draw_column_title_buttons (sheet);
5111   //  size_allocate_global_button (sheet);
5112
5113   gdk_window_end_paint (sheet->sheet_window);
5114 }
5115
5116
5117 /* COLUMN RESIZING */
5118 static void
5119 draw_xor_vline (GtkSheet *sheet)
5120 {
5121   gint height;
5122   gint xpos = sheet->x_drag;
5123   gdk_drawable_get_size (sheet->sheet_window,
5124                          NULL, &height);
5125
5126
5127   if (sheet->row_titles_visible)
5128     xpos += sheet->row_title_area.width;
5129
5130   gdk_draw_line (GTK_WIDGET (sheet)->window, sheet->xor_gc,
5131                  xpos,
5132                  sheet->column_title_area.height,
5133                  xpos,
5134                  height + CELL_SPACING);
5135 }
5136
5137 /* ROW RESIZING */
5138 static void
5139 draw_xor_hline (GtkSheet *sheet)
5140
5141 {
5142   gint width;
5143   gint ypos = sheet->y_drag;
5144
5145   gdk_drawable_get_size (sheet->sheet_window,
5146                          &width, NULL);
5147
5148
5149   if (sheet->column_titles_visible)
5150     ypos += sheet->column_title_area.height;
5151
5152   gdk_draw_line (GTK_WIDGET (sheet)->window, sheet->xor_gc,
5153                  sheet->row_title_area.width,
5154                  ypos,
5155                  width + CELL_SPACING,
5156                  ypos);
5157 }
5158
5159 /* SELECTED RANGE */
5160 static void
5161 draw_xor_rectangle (GtkSheet *sheet, GtkSheetRange range)
5162 {
5163   gint i = 0;
5164   GdkRectangle clip_area, area;
5165   GdkGCValues values;
5166
5167   area.x = g_sheet_column_start_pixel (sheet->column_geometry, range.col0);
5168   area.y = g_sheet_row_start_pixel (sheet->row_geometry, range.row0);
5169   area.width = g_sheet_column_start_pixel (sheet->column_geometry, range.coli)- area.x+
5170     g_sheet_column_get_width (sheet->column_geometry, range.coli);
5171   area.height = g_sheet_row_start_pixel (sheet->row_geometry, range.rowi)- area.y +
5172     g_sheet_row_get_height (sheet->row_geometry, range.rowi);
5173
5174   clip_area.x = sheet->row_title_area.width;
5175   clip_area.y = sheet->column_title_area.height;
5176
5177   gdk_drawable_get_size (sheet->sheet_window,
5178                          &clip_area.width, &clip_area.height);
5179
5180   if (!sheet->row_titles_visible) clip_area.x = 0;
5181   if (!sheet->column_titles_visible) clip_area.y = 0;
5182
5183   if (area.x < 0)
5184     {
5185       area.width = area.width + area.x;
5186       area.x = 0;
5187     }
5188   if (area.width > clip_area.width) area.width = clip_area.width + 10;
5189   if (area.y < 0)
5190     {
5191       area.height = area.height + area.y;
5192       area.y = 0;
5193     }
5194   if (area.height > clip_area.height) area.height = clip_area.height + 10;
5195
5196   clip_area.x--;
5197   clip_area.y--;
5198   clip_area.width += 3;
5199   clip_area.height += 3;
5200
5201   gdk_gc_get_values (sheet->xor_gc, &values);
5202
5203   gdk_gc_set_clip_rectangle (sheet->xor_gc, &clip_area);
5204
5205   gdk_draw_rectangle (sheet->sheet_window,
5206                       sheet->xor_gc,
5207                       FALSE,
5208                       area.x + i, area.y + i,
5209                       area.width - 2 * i, area.height - 2 * i);
5210
5211
5212   gdk_gc_set_clip_rectangle (sheet->xor_gc, NULL);
5213
5214   gdk_gc_set_foreground (sheet->xor_gc, &values.foreground);
5215 }
5216
5217
5218 /* this function returns the new width of the column being resized given
5219  * the COLUMN and X position of the cursor; the x cursor position is passed
5220  * in as a pointer and automaticaly corrected if it's outside the acceptable
5221  * range */
5222 static guint
5223 new_column_width (GtkSheet *sheet, gint column, gint *x)
5224 {
5225   gint left_pos = g_sheet_column_start_pixel (sheet->column_geometry, column)
5226     - sheet->hadjustment->value;
5227
5228   gint width = *x - left_pos;
5229
5230   if ( width < sheet->column_requisition)
5231     {
5232       width = sheet->column_requisition;
5233       *x = left_pos + width;
5234     }
5235
5236   g_sheet_column_set_width (sheet->column_geometry, column, width);
5237
5238   draw_column_title_buttons (sheet);
5239
5240   return width;
5241 }
5242
5243 /* this function returns the new height of the row being resized given
5244  * the row and y position of the cursor; the y cursor position is passed
5245  * in as a pointer and automaticaly corrected if it's beyond min / max limits */
5246 static guint
5247 new_row_height (GtkSheet *sheet, gint row, gint *y)
5248 {
5249   gint height;
5250   guint min_height;
5251
5252   gint cy = *y;
5253   min_height = sheet->row_requisition;
5254
5255   /* you can't shrink a row to less than its minimum height */
5256   if (cy < g_sheet_row_start_pixel (sheet->row_geometry, row) + min_height)
5257
5258     {
5259       *y = cy = g_sheet_row_start_pixel (sheet->row_geometry, row) + min_height;
5260     }
5261
5262   /* calculate new row height making sure it doesn't end up
5263    * less than the minimum height */
5264   height = (cy - g_sheet_row_start_pixel (sheet->row_geometry, row));
5265   if (height < min_height)
5266     height = min_height;
5267
5268   g_sheet_row_set_height (sheet->row_geometry, row, height);
5269   draw_row_title_buttons (sheet);
5270
5271   return height;
5272 }
5273
5274 static void
5275 gtk_sheet_set_column_width (GtkSheet *sheet,
5276                             gint column,
5277                             guint width)
5278 {
5279   guint min_width;
5280
5281   g_return_if_fail (sheet != NULL);
5282   g_return_if_fail (GTK_IS_SHEET (sheet));
5283
5284   if (column < 0 || column >= g_sheet_column_get_column_count (sheet->column_geometry))
5285     return;
5286
5287   gtk_sheet_column_size_request (sheet, column, &min_width);
5288   if (width < min_width) return;
5289
5290   g_sheet_column_set_width (sheet->column_geometry, column, width);
5291
5292   if (GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
5293     {
5294       draw_column_title_buttons (sheet);
5295       adjust_scrollbars (sheet);
5296       gtk_sheet_size_allocate_entry (sheet);
5297       gtk_sheet_range_draw (sheet, NULL);
5298     }
5299 }
5300
5301
5302
5303 static void
5304 gtk_sheet_set_row_height (GtkSheet *sheet,
5305                           gint row,
5306                           guint height)
5307 {
5308   guint min_height;
5309
5310   g_return_if_fail (sheet != NULL);
5311   g_return_if_fail (GTK_IS_SHEET (sheet));
5312
5313   if (row < 0 || row >= g_sheet_row_get_row_count (sheet->row_geometry))
5314     return;
5315
5316   gtk_sheet_row_size_request (sheet, row, &min_height);
5317   if (height < min_height) return;
5318
5319   g_sheet_row_set_height (sheet->row_geometry, row, height);
5320
5321   if (GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)) )
5322     {
5323       draw_row_title_buttons (sheet);
5324       adjust_scrollbars (sheet);
5325       gtk_sheet_size_allocate_entry (sheet);
5326       gtk_sheet_range_draw (sheet, NULL);
5327     }
5328 }
5329
5330 gboolean
5331 gtk_sheet_get_attributes (const GtkSheet *sheet, gint row, gint col,
5332                           GtkSheetCellAttr *attr)
5333 {
5334   GdkColor *fg, *bg;
5335   const GtkJustification *j ;
5336   const PangoFontDescription *font_desc ;
5337   const GtkSheetCellBorder *border ;
5338   GdkColormap *colormap;
5339
5340   g_return_val_if_fail (sheet != NULL, FALSE);
5341   g_return_val_if_fail (GTK_IS_SHEET (sheet), FALSE);
5342
5343   if (row < 0 || col < 0) return FALSE;
5344
5345
5346   attr->foreground = GTK_WIDGET (sheet)->style->black;
5347   attr->background = sheet->color[BG_COLOR];
5348
5349   attr->border.width = 0;
5350   attr->border.line_style = GDK_LINE_SOLID;
5351   attr->border.cap_style = GDK_CAP_NOT_LAST;
5352   attr->border.join_style = GDK_JOIN_MITER;
5353   attr->border.mask = 0;
5354   attr->border.color = GTK_WIDGET (sheet)->style->black;
5355   attr->font_desc = GTK_WIDGET (sheet)->style->font_desc;
5356
5357   attr->is_editable = g_sheet_model_is_editable (sheet->model, row, col);
5358   attr->is_visible = g_sheet_model_is_visible (sheet->model, row, col);
5359
5360
5361   colormap = gtk_widget_get_colormap (GTK_WIDGET (sheet));
5362   fg = g_sheet_model_get_foreground (sheet->model, row, col);
5363   if ( fg )
5364     {
5365       gdk_colormap_alloc_color (colormap, fg, TRUE, TRUE);
5366       attr->foreground = *fg;
5367     }
5368
5369   bg = g_sheet_model_get_background (sheet->model, row, col);
5370   if ( bg )
5371     {
5372       gdk_colormap_alloc_color (colormap, bg, TRUE, TRUE);
5373       attr->background = *bg;
5374     }
5375
5376   attr->justification =
5377     g_sheet_column_get_justification (sheet->column_geometry, col);
5378
5379   j = g_sheet_model_get_justification (sheet->model, row, col);
5380   if (j)
5381     attr->justification = *j;
5382
5383   font_desc = g_sheet_model_get_font_desc (sheet->model, row, col);
5384   if ( font_desc ) attr->font_desc = font_desc;
5385
5386   border = g_sheet_model_get_cell_border (sheet->model, row, col);
5387
5388   if ( border ) attr->border = *border;
5389
5390   return TRUE;
5391 }
5392
5393 static void
5394 gtk_sheet_button_size_request    (GtkSheet *sheet,
5395                                   const GtkSheetButton *button,
5396                                   GtkRequisition *button_requisition)
5397 {
5398   GtkRequisition requisition;
5399   GtkRequisition label_requisition;
5400
5401   label_requisition.height = DEFAULT_ROW_HEIGHT;
5402   label_requisition.width = COLUMN_MIN_WIDTH;
5403
5404   requisition.height = DEFAULT_ROW_HEIGHT;
5405   requisition.width = COLUMN_MIN_WIDTH;
5406
5407
5408   *button_requisition = requisition;
5409   button_requisition->width = MAX (requisition.width, label_requisition.width);
5410   button_requisition->height = MAX (requisition.height, label_requisition.height);
5411
5412 }
5413
5414 static void
5415 gtk_sheet_row_size_request (GtkSheet *sheet,
5416                             gint row,
5417                             guint *requisition)
5418 {
5419   GtkRequisition button_requisition;
5420
5421   gtk_sheet_button_size_request (sheet,
5422                                  g_sheet_row_get_button (sheet->row_geometry, row),
5423                                  &button_requisition);
5424
5425   *requisition = button_requisition.height;
5426
5427   sheet->row_requisition = *requisition;
5428 }
5429
5430 static void
5431 gtk_sheet_column_size_request (GtkSheet *sheet,
5432                                gint col,
5433                                guint *requisition)
5434 {
5435   GtkRequisition button_requisition;
5436
5437   GtkSheetButton *button = g_sheet_column_get_button (sheet->column_geometry, col);
5438
5439   gtk_sheet_button_size_request (sheet,
5440                                  button,
5441                                  &button_requisition);
5442
5443   gtk_sheet_button_free (button);
5444
5445   *requisition = button_requisition.width;
5446
5447   sheet->column_requisition = *requisition;
5448 }
5449
5450
5451 static void
5452 gtk_sheet_forall (GtkContainer *container,
5453                   gboolean include_internals,
5454                   GtkCallback callback,
5455                   gpointer callback_data)
5456 {
5457   GtkSheet *sheet = GTK_SHEET (container);
5458
5459   g_return_if_fail (callback != NULL);
5460
5461   if (sheet->button && sheet->button->parent)
5462     (* callback) (sheet->button, callback_data);
5463
5464   if (sheet->entry_container && GTK_IS_CONTAINER (sheet->entry_container))
5465     (* callback) (sheet->entry_container, callback_data);
5466 }
5467
5468
5469 GSheetModel *
5470 gtk_sheet_get_model (const GtkSheet *sheet)
5471 {
5472   g_return_val_if_fail (GTK_IS_SHEET (sheet), NULL);
5473
5474   return sheet->model;
5475 }
5476
5477
5478 GtkSheetButton *
5479 gtk_sheet_button_new (void)
5480 {
5481   GtkSheetButton *button = g_malloc (sizeof (GtkSheetButton));
5482
5483   button->state = GTK_STATE_NORMAL;
5484   button->label = NULL;
5485   button->label_visible = TRUE;
5486   button->justification = GTK_JUSTIFY_FILL;
5487
5488   return button;
5489 }
5490
5491
5492 void
5493 gtk_sheet_button_free (GtkSheetButton *button)
5494 {
5495   if (!button) return ;
5496
5497   g_free (button->label);
5498   g_free (button);
5499 }
5500
5501
5502 static void
5503 append_cell_text (GString *string, const GtkSheet *sheet, gint r, gint c)
5504 {
5505   gchar *celltext = gtk_sheet_cell_get_text (sheet, r, c);
5506
5507   if ( NULL == celltext)
5508     return;
5509
5510   g_string_append (string, celltext);
5511   g_free (celltext);
5512 }
5513
5514
5515 static GString *
5516 range_to_text (const GtkSheet *sheet)
5517 {
5518   gint r, c;
5519   GString *string;
5520
5521   if ( !gtk_sheet_range_isvisible (sheet, sheet->range))
5522     return NULL;
5523
5524   string = g_string_sized_new (80);
5525
5526   for (r = sheet->range.row0; r <= sheet->range.rowi; ++r)
5527     {
5528       for (c = sheet->range.col0; c < sheet->range.coli; ++c)
5529         {
5530           append_cell_text (string, sheet, r, c);
5531           g_string_append (string, "\t");
5532         }
5533       append_cell_text (string, sheet, r, c);
5534       if ( r < sheet->range.rowi)
5535         g_string_append (string, "\n");
5536     }
5537
5538   return string;
5539 }
5540
5541 static GString *
5542 range_to_html (const GtkSheet *sheet)
5543 {
5544   gint r, c;
5545   GString *string;
5546
5547   if ( !gtk_sheet_range_isvisible (sheet, sheet->range))
5548     return NULL;
5549
5550   string = g_string_sized_new (480);
5551
5552   g_string_append (string, "<html>\n");
5553   g_string_append (string, "<body>\n");
5554   g_string_append (string, "<table>\n");
5555   for (r = sheet->range.row0; r <= sheet->range.rowi; ++r)
5556     {
5557       g_string_append (string, "<tr>\n");
5558       for (c = sheet->range.col0; c <= sheet->range.coli; ++c)
5559         {
5560           g_string_append (string, "<td>");
5561           append_cell_text (string, sheet, r, c);
5562           g_string_append (string, "</td>\n");
5563         }
5564       g_string_append (string, "</tr>\n");
5565     }
5566   g_string_append (string, "</table>\n");
5567   g_string_append (string, "</body>\n");
5568   g_string_append (string, "</html>\n");
5569
5570   return string;
5571 }
5572
5573 enum {
5574   SELECT_FMT_NULL,
5575   SELECT_FMT_TEXT,
5576   SELECT_FMT_HTML
5577 };
5578
5579 static void
5580 primary_get_cb (GtkClipboard     *clipboard,
5581                 GtkSelectionData *selection_data,
5582                 guint             info,
5583                 gpointer          data)
5584 {
5585   GtkSheet *sheet = GTK_SHEET (data);
5586   GString *string = NULL;
5587
5588   switch (info)
5589     {
5590     case SELECT_FMT_TEXT:
5591       string = range_to_text (sheet);
5592       break;
5593     case SELECT_FMT_HTML:
5594       string = range_to_html (sheet);
5595       break;
5596     default:
5597       g_assert_not_reached ();
5598     }
5599
5600   gtk_selection_data_set (selection_data, selection_data->target,
5601                           8,
5602                           (const guchar *) string->str, string->len);
5603   g_string_free (string, TRUE);
5604 }
5605
5606 static void
5607 primary_clear_cb (GtkClipboard *clipboard,
5608                   gpointer      data)
5609 {
5610   GtkSheet *sheet = GTK_SHEET (data);
5611   if ( ! GTK_WIDGET_REALIZED (GTK_WIDGET (sheet)))
5612     return;
5613
5614   gtk_sheet_real_unselect_range (sheet, NULL);
5615 }
5616
5617 static void
5618 gtk_sheet_update_primary_selection (GtkSheet *sheet)
5619 {
5620   static const GtkTargetEntry targets[] = {
5621     { "UTF8_STRING",   0, SELECT_FMT_TEXT },
5622     { "STRING",        0, SELECT_FMT_TEXT },
5623     { "TEXT",          0, SELECT_FMT_TEXT },
5624     { "COMPOUND_TEXT", 0, SELECT_FMT_TEXT },
5625     { "text/plain;charset=utf-8", 0, SELECT_FMT_TEXT },
5626     { "text/plain",    0, SELECT_FMT_TEXT },
5627     { "text/html",     0, SELECT_FMT_HTML }
5628   };
5629
5630   GtkClipboard *clipboard;
5631
5632   if (!GTK_WIDGET_REALIZED (sheet))
5633     return;
5634
5635   clipboard = gtk_widget_get_clipboard (GTK_WIDGET (sheet),
5636                                         GDK_SELECTION_PRIMARY);
5637
5638   if (gtk_sheet_range_isvisible (sheet, sheet->range))
5639     {
5640       if (!gtk_clipboard_set_with_owner (clipboard, targets,
5641                                          G_N_ELEMENTS (targets),
5642                                          primary_get_cb, primary_clear_cb,
5643                                          G_OBJECT (sheet)))
5644         primary_clear_cb (clipboard, sheet);
5645     }
5646   else
5647     {
5648       if (gtk_clipboard_get_owner (clipboard) == G_OBJECT (sheet))
5649         gtk_clipboard_clear (clipboard);
5650     }
5651 }