lib/gtksheet/gtksheet.c

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