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