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