lib/gtksheet/gtksheet.c

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