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