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