1 /* vim: set sw=8: -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
4 * wbc-gtk.c: A gtk based WorkbookControl
6 * Copyright (C) 2000-2007 Jody Goldberg (jody@gnome.org)
7 * Copyright (C) 2006-2012 Morten Welinder (terra@gnome.org)
9 * This program is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU General Public License as
11 * published by the Free Software Foundation; either version 2 of the
12 * License, or (at your option) version 3.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301
24 #include <gnumeric-config.h>
26 #include "wbc-gtk-impl.h"
27 #include "workbook-view.h"
28 #include "workbook-priv.h"
32 #include "sheet-control-gui-priv.h"
34 #include "sheet-private.h"
35 #include "sheet-view.h"
36 #include "sheet-style.h"
37 #include "sheet-filter.h"
39 #include "dependent.h"
40 #include "application.h"
44 #include "style-font.h"
45 #include "gnm-format.h"
47 #include "style-color.h"
48 #include "style-border.h"
49 #include "gnumeric-conf.h"
50 #include "dialogs/dialogs.h"
51 #include "gui-clipboard.h"
52 #include "libgnumeric.h"
53 #include "gnm-pane-impl.h"
55 #include "selection.h"
56 #include "file-autoft.h"
58 #include "tools/analysis-auto-expression.h"
59 #include "sheet-object-cell-comment.h"
60 #include "print-info.h"
61 #include "expr-name.h"
63 #include <goffice/goffice.h>
64 #include <gsf/gsf-impl-utils.h>
65 #include <gsf/gsf-doc-meta-data.h>
67 #include "gdk/gdkkeysyms-compat.h"
71 #define GET_GUI_ITEM(i_) (gpointer)(gtk_builder_get_object(wbcg->gui, (i_)))
73 #define SHEET_CONTROL_KEY "SheetControl"
75 #define AUTO_EXPR_SAMPLE "Sumerage = -012345678901234"
80 WBG_GTK_PROP_AUTOSAVE_PROMPT
,
81 WBG_GTK_PROP_AUTOSAVE_TIME
85 WBC_GTK_MARKUP_CHANGED
,
95 static gboolean debug_tab_order
;
96 static char const *uifilename
= NULL
;
97 static GtkActionEntry
const *extra_actions
= NULL
;
98 static int extra_actions_nb
;
99 static guint wbc_gtk_signals
[WBC_GTK_LAST_SIGNAL
];
100 static GObjectClass
*parent_class
= NULL
;
103 wbcg_ui_update_begin (WBCGtk
*wbcg
)
105 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), FALSE
);
106 g_return_val_if_fail (!wbcg
->updating_ui
, FALSE
);
108 return (wbcg
->updating_ui
= TRUE
);
112 wbcg_ui_update_end (WBCGtk
*wbcg
)
114 g_return_if_fail (GNM_IS_WBC_GTK (wbcg
));
115 g_return_if_fail (wbcg
->updating_ui
);
117 wbcg
->updating_ui
= FALSE
;
120 /****************************************************************************/
123 set_uifilename (char const *name
, GtkActionEntry
const *actions
, int nb
)
126 extra_actions
= actions
;
127 extra_actions_nb
= nb
;
132 * @wbcg: the workbook control gui
133 * @name: name of action
135 * Returns: (transfer none): The action with the given name
138 wbcg_find_action (WBCGtk
*wbcg
, const char *name
)
142 a
= gtk_action_group_get_action (wbcg
->actions
, name
);
144 a
= gtk_action_group_get_action (wbcg
->permanent_actions
, name
);
146 a
= gtk_action_group_get_action (wbcg
->semi_permanent_actions
, name
);
148 a
= gtk_action_group_get_action (wbcg
->data_only_actions
, name
);
150 a
= gtk_action_group_get_action (wbcg
->font_actions
, name
);
152 a
= gtk_action_group_get_action (wbcg
->toolbar
.actions
, name
);
158 wbc_gtk_set_action_sensitivity (WBCGtk
*wbcg
,
159 char const *action
, gboolean sensitive
)
161 GtkAction
*a
= wbcg_find_action (wbcg
, action
);
162 g_object_set (G_OBJECT (a
), "sensitive", sensitive
, NULL
);
165 /* NOTE : The semantics of prefix and suffix seem contrived. Why are we
166 * handling it at this end ? That stuff should be done in the undo/redo code
169 wbc_gtk_set_action_label (WBCGtk
*wbcg
,
175 GtkAction
*a
= wbcg_find_action (wbcg
, action
);
177 if (prefix
!= NULL
) {
179 gboolean is_suffix
= (suffix
!= NULL
);
181 text
= is_suffix
? g_strdup_printf ("%s: %s", prefix
, suffix
) : (char *) prefix
;
182 g_object_set (G_OBJECT (a
),
184 "sensitive", is_suffix
,
189 g_object_set (G_OBJECT (a
), "label", suffix
, NULL
);
192 g_object_set (G_OBJECT (a
), "tooltip", new_tip
, NULL
);
196 wbc_gtk_set_toggle_action_state (WBCGtk
*wbcg
,
197 char const *action
, gboolean state
)
199 GtkAction
*a
= wbcg_find_action (wbcg
, action
);
200 gtk_toggle_action_set_active (GTK_TOGGLE_ACTION (a
), state
);
203 /****************************************************************************/
205 static SheetControlGUI
*
206 wbcg_get_scg (WBCGtk
*wbcg
, Sheet
*sheet
)
208 SheetControlGUI
*scg
;
211 if (sheet
== NULL
|| wbcg
->snotebook
== NULL
)
214 npages
= wbcg_get_n_scg (wbcg
);
217 * This can happen during construction when the clipboard is
218 * being cleared. Ctrl-C Ctrl-Q.
223 g_return_val_if_fail (IS_SHEET (sheet
), NULL
);
224 g_return_val_if_fail (sheet
->index_in_wb
>= 0, NULL
);
226 scg
= wbcg_get_nth_scg (wbcg
, sheet
->index_in_wb
);
227 if (NULL
!= scg
&& scg_sheet (scg
) == sheet
)
231 * index_in_wb is probably not accurate because we are in the
232 * middle of removing or adding a sheet.
234 for (i
= 0; i
< npages
; i
++) {
235 scg
= wbcg_get_nth_scg (wbcg
, i
);
236 if (NULL
!= scg
&& scg_sheet (scg
) == sheet
)
240 g_warning ("Failed to find scg for sheet %s", sheet
->name_quoted
);
244 static SheetControlGUI
*
245 get_scg (const GtkWidget
*w
)
247 return g_object_get_data (G_OBJECT (w
), SHEET_CONTROL_KEY
);
251 get_all_scgs (WBCGtk
*wbcg
)
253 int i
, n
= gtk_notebook_get_n_pages (wbcg
->snotebook
);
256 for (i
= 0; i
< n
; i
++) {
257 GtkWidget
*w
= gtk_notebook_get_nth_page (wbcg
->snotebook
, i
);
258 SheetControlGUI
*scg
= get_scg (w
);
259 l
= g_slist_prepend (l
, scg
);
262 return g_slist_reverse (l
);
268 cb_autosave (WBCGtk
*wbcg
)
270 WorkbookView
*wb_view
;
272 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), FALSE
);
274 wb_view
= wb_control_view (GNM_WBC (wbcg
));
279 if (wbcg
->autosave_time
> 0 &&
280 go_doc_is_dirty (wb_view_get_doc (wb_view
))) {
281 if (wbcg
->autosave_prompt
&& !dialog_autosave_prompt (wbcg
))
283 gui_file_save (wbcg
, wb_view
);
289 * wbcg_rangesel_possible:
290 * @wbcg: the workbook control gui
292 * Returns true if the cursor keys should be used to select
293 * a cell range (if the cursor is in a spot in the expression
294 * where it makes sense to have a cell reference), false if not.
297 wbcg_rangesel_possible (WBCGtk
const *wbcg
)
299 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), FALSE
);
301 /* Already range selecting */
302 if (wbcg
->rangesel
!= NULL
)
305 /* Rangesel requires that we be editing somthing */
306 if (!wbcg_is_editing (wbcg
) && !wbcg_entry_has_logical (wbcg
))
309 return gnm_expr_entry_can_rangesel (wbcg_get_entry_logical (wbcg
));
313 wbcg_is_editing (WBCGtk
const *wbcg
)
315 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), FALSE
);
316 return wbcg
->editing
;
320 wbcg_autosave_cancel (WBCGtk
*wbcg
)
322 if (wbcg
->autosave_timer
!= 0) {
323 g_source_remove (wbcg
->autosave_timer
);
324 wbcg
->autosave_timer
= 0;
329 wbcg_autosave_activate (WBCGtk
*wbcg
)
331 wbcg_autosave_cancel (wbcg
);
333 if (wbcg
->autosave_time
> 0) {
334 int secs
= MIN (wbcg
->autosave_time
, G_MAXINT
/ 1000);
335 wbcg
->autosave_timer
=
336 g_timeout_add (secs
* 1000,
337 (GSourceFunc
) cb_autosave
,
343 wbcg_set_autosave_time (WBCGtk
*wbcg
, int secs
)
345 if (secs
== wbcg
->autosave_time
)
348 wbcg
->autosave_time
= secs
;
349 wbcg_autosave_activate (wbcg
);
352 /****************************************************************************/
355 wbcg_edit_line_set (WorkbookControl
*wbc
, char const *text
)
357 GtkEntry
*entry
= wbcg_get_entry ((WBCGtk
*)wbc
);
358 gtk_entry_set_text (entry
, text
);
362 wbcg_edit_selection_descr_set (WorkbookControl
*wbc
, char const *text
)
364 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
365 gtk_entry_set_text (GTK_ENTRY (wbcg
->selection_descriptor
), text
);
369 wbcg_update_action_sensitivity (WorkbookControl
*wbc
)
371 WBCGtk
*wbcg
= WBC_GTK (wbc
);
372 SheetControlGUI
*scg
= wbcg_cur_scg (wbcg
);
373 gboolean edit_object
= scg
!= NULL
&&
374 (scg
->selected_objects
!= NULL
|| wbcg
->new_object
!= NULL
||
375 scg_sheet (scg
)->sheet_type
== GNM_SHEET_OBJECT
);
376 gboolean enable_actions
= TRUE
;
377 gboolean enable_edit_ok_cancel
= FALSE
;
379 if (edit_object
|| wbcg
->edit_line
.guru
!= NULL
)
380 enable_actions
= FALSE
;
381 else if (wbcg_is_editing (wbcg
)) {
382 enable_actions
= FALSE
;
383 enable_edit_ok_cancel
= TRUE
;
386 /* These are only sensitive while editing */
387 gtk_widget_set_sensitive (wbcg
->ok_button
, enable_edit_ok_cancel
);
388 gtk_widget_set_sensitive (wbcg
->cancel_button
, enable_edit_ok_cancel
);
389 gtk_widget_set_sensitive (wbcg
->func_button
, enable_actions
);
391 if (wbcg
->snotebook
) {
392 gboolean tab_context_menu
=
394 scg_sheet (scg
)->sheet_type
== GNM_SHEET_OBJECT
;
395 int i
, N
= wbcg_get_n_scg (wbcg
);
396 for (i
= 0; i
< N
; i
++) {
398 gnm_notebook_get_nth_label (wbcg
->bnotebook
, i
);
399 g_object_set_data (G_OBJECT (label
), "editable",
400 GINT_TO_POINTER (tab_context_menu
));
404 g_object_set (G_OBJECT (wbcg
->actions
),
405 "sensitive", enable_actions
,
407 g_object_set (G_OBJECT (wbcg
->font_actions
),
408 "sensitive", enable_actions
|| enable_edit_ok_cancel
,
411 if (scg
&& scg_sheet (scg
)->sheet_type
== GNM_SHEET_OBJECT
) {
412 g_object_set (G_OBJECT (wbcg
->data_only_actions
),
415 g_object_set (G_OBJECT (wbcg
->semi_permanent_actions
),
418 gtk_widget_set_sensitive (GTK_WIDGET (wbcg
->edit_line
.entry
), FALSE
);
419 gtk_widget_set_sensitive (GTK_WIDGET (wbcg
->selection_descriptor
), FALSE
);
421 g_object_set (G_OBJECT (wbcg
->data_only_actions
),
424 g_object_set (G_OBJECT (wbcg
->semi_permanent_actions
),
425 "sensitive", enable_actions
,
427 gtk_widget_set_sensitive (GTK_WIDGET (wbcg
->edit_line
.entry
), TRUE
);
428 gtk_widget_set_sensitive (GTK_WIDGET (wbcg
->selection_descriptor
), TRUE
);
433 wbcg_insert_sheet (GtkWidget
*unused
, WBCGtk
*wbcg
)
435 WorkbookControl
*wbc
= GNM_WBC (wbcg
);
436 Sheet
*sheet
= wb_control_cur_sheet (wbc
);
437 Workbook
*wb
= sheet
->workbook
;
438 WorkbookSheetState
*old_state
= workbook_sheet_state_new (wb
);
439 /* Use same size as current sheet. */
440 workbook_sheet_add (wb
, sheet
->index_in_wb
,
441 gnm_sheet_get_max_cols (sheet
),
442 gnm_sheet_get_max_rows (sheet
));
443 cmd_reorganize_sheets (wbc
, old_state
, sheet
);
447 wbcg_append_sheet (GtkWidget
*unused
, WBCGtk
*wbcg
)
449 WorkbookControl
*wbc
= GNM_WBC (wbcg
);
450 Sheet
*sheet
= wb_control_cur_sheet (wbc
);
451 Workbook
*wb
= sheet
->workbook
;
452 WorkbookSheetState
*old_state
= workbook_sheet_state_new (wb
);
453 /* Use same size as current sheet. */
454 workbook_sheet_add (wb
, -1,
455 gnm_sheet_get_max_cols (sheet
),
456 gnm_sheet_get_max_rows (sheet
));
457 cmd_reorganize_sheets (wbc
, old_state
, sheet
);
461 wbcg_clone_sheet (GtkWidget
*unused
, WBCGtk
*wbcg
)
463 WorkbookControl
*wbc
= GNM_WBC (wbcg
);
464 Sheet
*sheet
= wb_control_cur_sheet (wbc
);
465 Workbook
*wb
= sheet
->workbook
;
466 WorkbookSheetState
*old_state
= workbook_sheet_state_new (wb
);
467 Sheet
*new_sheet
= sheet_dup (sheet
);
468 workbook_sheet_attach_at_pos (wb
, new_sheet
, sheet
->index_in_wb
+ 1);
469 /* See workbook_sheet_add: */
470 g_signal_emit_by_name (G_OBJECT (wb
), "sheet_added", 0);
471 cmd_reorganize_sheets (wbc
, old_state
, sheet
);
472 g_object_unref (new_sheet
);
476 cb_show_sheet (SheetControlGUI
*scg
)
478 WBCGtk
*wbcg
= scg
->wbcg
;
479 int page_number
= gtk_notebook_page_num (wbcg
->snotebook
,
480 GTK_WIDGET (scg
->grid
));
481 gnm_notebook_set_current_page (wbcg
->bnotebook
, page_number
);
486 static void cb_sheets_manage (SheetControlGUI
*scg
) { dialog_sheet_order (scg
->wbcg
); }
487 static void cb_sheets_insert (SheetControlGUI
*scg
) { wbcg_insert_sheet (NULL
, scg
->wbcg
); }
488 static void cb_sheets_add (SheetControlGUI
*scg
) { wbcg_append_sheet (NULL
, scg
->wbcg
); }
489 static void cb_sheets_clone (SheetControlGUI
*scg
) { wbcg_clone_sheet (NULL
, scg
->wbcg
); }
490 static void cb_sheets_rename (SheetControlGUI
*scg
) { dialog_sheet_rename (scg
->wbcg
, scg_sheet (scg
)); }
491 static void cb_sheets_resize (SheetControlGUI
*scg
) { dialog_sheet_resize (scg
->wbcg
); }
495 cb_by_scg_sheet_name (gconstpointer a_
, gconstpointer b_
)
497 const SheetControlGUI
*a
= a_
;
498 const SheetControlGUI
*b
= b_
;
499 Sheet
*sa
= scg_sheet (a
);
500 Sheet
*sb
= scg_sheet (b
);
502 return g_utf8_collate (sa
->name_unquoted
, sb
->name_unquoted
);
507 sheet_menu_label_run (SheetControlGUI
*scg
, GdkEvent
*event
)
509 enum { CM_MULTIPLE
= 1, CM_DATA_SHEET
= 2 };
510 struct SheetTabMenu
{
512 void (*function
) (SheetControlGUI
*scg
);
515 } const sheet_label_context_actions
[] = {
516 { N_("Manage Sheets..."), &cb_sheets_manage
, 0, 0},
517 { NULL
, NULL
, 0, 0 },
518 { N_("Insert"), &cb_sheets_insert
, 0, 0 },
519 { N_("Append"), &cb_sheets_add
, 0, 0 },
520 { N_("Duplicate"), &cb_sheets_clone
, 0, 0 },
521 { N_("Remove"), &scg_delete_sheet_if_possible
, CM_MULTIPLE
, 0 },
522 { N_("Rename"), &cb_sheets_rename
, 0, 0 },
523 { N_("Resize..."), &cb_sheets_resize
, CM_DATA_SHEET
, 0 },
524 { N_("Select"), NULL
, 0, 1 },
525 { N_("Select (sorted)"), NULL
, 0, 2 }
529 GtkWidget
*item
, *menu
= gtk_menu_new ();
530 GtkWidget
*guru
= wbc_gtk_get_guru (scg_wbcg (scg
));
531 unsigned int N_visible
, pass
;
532 GtkWidget
*submenus
[2 + 1];
533 GSList
*scgs
= get_all_scgs (scg
->wbcg
);
535 for (pass
= 1; pass
<= 2; pass
++) {
538 submenus
[pass
] = gtk_menu_new ();
540 for (l
= scgs
; l
; l
= l
->next
) {
541 SheetControlGUI
*scg1
= l
->data
;
542 Sheet
*sheet
= scg_sheet (scg1
);
543 if (!sheet_is_visible (sheet
))
548 item
= gtk_menu_item_new_with_label (sheet
->name_unquoted
);
549 g_signal_connect_swapped (G_OBJECT (item
), "activate",
550 G_CALLBACK (cb_show_sheet
), scg1
);
551 gtk_menu_shell_append (GTK_MENU_SHELL (submenus
[pass
]), item
);
552 gtk_widget_show (item
);
555 scgs
= g_slist_sort (scgs
, cb_by_scg_sheet_name
);
559 for (ui
= 0; ui
< G_N_ELEMENTS (sheet_label_context_actions
); ui
++) {
560 const struct SheetTabMenu
*it
=
561 sheet_label_context_actions
+ ui
;
563 ((it
->flags
& CM_MULTIPLE
) && N_visible
<= 1) ||
564 ((it
->flags
& CM_DATA_SHEET
) && scg_sheet (scg
)->sheet_type
!= GNM_SHEET_DATA
) ||
565 (!it
->submenu
&& guru
!= NULL
);
568 ? gtk_menu_item_new_with_label (_(it
->text
))
569 : gtk_separator_menu_item_new ();
571 g_signal_connect_swapped (G_OBJECT (item
), "activate",
572 G_CALLBACK (it
->function
), scg
);
574 gtk_menu_item_set_submenu (GTK_MENU_ITEM (item
),
575 submenus
[it
->submenu
]);
577 gtk_widget_set_sensitive (item
, !inactive
);
578 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
579 gtk_widget_show (item
);
582 gnumeric_popup_menu (GTK_MENU (menu
), event
);
586 * cb_sheet_label_button_press:
588 * Invoked when the user has clicked on the sheet name widget.
589 * This takes care of switching to the notebook that contains the label
592 cb_sheet_label_button_press (GtkWidget
*widget
, GdkEvent
*event
,
593 SheetControlGUI
*scg
)
595 WBCGtk
*wbcg
= scg
->wbcg
;
598 if (event
->type
!= GDK_BUTTON_PRESS
)
601 page_number
= gtk_notebook_page_num (wbcg
->snotebook
,
602 GTK_WIDGET (scg
->grid
));
603 gnm_notebook_set_current_page (wbcg
->bnotebook
, page_number
);
605 if (event
->button
.button
== 1 || NULL
!= wbcg
->rangesel
)
608 if (event
->button
.button
== 3) {
609 if ((scg_wbcg (scg
))->edit_line
.guru
== NULL
)
610 scg_object_unselect (scg
, NULL
);
611 if (g_object_get_data (G_OBJECT (widget
), "editable")) {
612 sheet_menu_label_run (scg
, event
);
613 scg_take_focus (scg
);
622 cb_sheet_label_drag_data_get (GtkWidget
*widget
, GdkDragContext
*context
,
623 GtkSelectionData
*selection_data
,
624 guint info
, guint time
)
626 SheetControlGUI
*scg
= get_scg (widget
);
627 g_return_if_fail (GNM_IS_SCG (scg
));
629 scg_drag_data_get (scg
, selection_data
);
633 cb_sheet_label_drag_data_received (GtkWidget
*widget
, GdkDragContext
*context
,
634 gint x
, gint y
, GtkSelectionData
*data
, guint info
, guint time
,
638 SheetControlGUI
*scg_src
, *scg_dst
;
639 Sheet
*s_src
, *s_dst
;
641 g_return_if_fail (GNM_IS_WBC_GTK (wbcg
));
642 g_return_if_fail (GTK_IS_WIDGET (widget
));
644 w_source
= gtk_drag_get_source_widget (context
);
646 g_warning ("Not yet implemented!"); /* Different process */
650 scg_src
= get_scg (w_source
);
651 g_return_if_fail (scg_src
!= NULL
);
652 s_src
= scg_sheet (scg_src
);
654 scg_dst
= get_scg (widget
);
655 g_return_if_fail (scg_dst
!= NULL
);
656 s_dst
= scg_sheet (scg_dst
);
658 if (s_src
== s_dst
) {
660 } else if (s_src
->workbook
== s_dst
->workbook
) {
661 /* Move within workbook */
662 Workbook
*wb
= s_src
->workbook
;
663 int p_src
= s_src
->index_in_wb
;
664 int p_dst
= s_dst
->index_in_wb
;
665 WorkbookSheetState
*old_state
= workbook_sheet_state_new (wb
);
666 workbook_sheet_move (s_src
, p_dst
- p_src
);
667 cmd_reorganize_sheets (GNM_WBC (wbcg
),
671 g_return_if_fail (GNM_IS_SCG (gtk_selection_data_get_data (data
)));
673 /* Different workbook, same process */
674 g_warning ("Not yet implemented!");
679 * Not currently reachable, I believe. We use the notebook's dragging.
682 cb_sheet_label_drag_begin (GtkWidget
*widget
, GdkDragContext
*context
,
685 GtkWidget
*arrow
, *image
;
687 g_return_if_fail (GNM_IS_WBC_GTK (wbcg
));
689 /* Create the arrow. */
690 arrow
= gtk_window_new (GTK_WINDOW_POPUP
);
691 gtk_window_set_screen (GTK_WINDOW (arrow
),
692 gtk_widget_get_screen (widget
));
693 gtk_widget_realize (arrow
);
694 image
= gtk_image_new_from_resource ("/org/gnumeric/gnumeric/images/sheet_move_marker.png");
695 gtk_widget_show (image
);
696 gtk_container_add (GTK_CONTAINER (arrow
), image
);
697 g_object_ref_sink (arrow
);
698 g_object_set_data (G_OBJECT (widget
), "arrow", arrow
);
702 cb_sheet_label_drag_end (GtkWidget
*widget
, GdkDragContext
*context
,
707 g_return_if_fail (GNM_IS_WBC (wbcg
));
709 /* Destroy the arrow. */
710 arrow
= g_object_get_data (G_OBJECT (widget
), "arrow");
711 gtk_widget_destroy (arrow
);
712 g_object_unref (arrow
);
713 g_object_set_data (G_OBJECT (widget
), "arrow", NULL
);
717 cb_sheet_label_drag_leave (GtkWidget
*widget
, GdkDragContext
*context
,
718 guint time
, WBCGtk
*wbcg
)
720 GtkWidget
*w_source
, *arrow
;
722 /* Hide the arrow. */
723 w_source
= gtk_drag_get_source_widget (context
);
725 arrow
= g_object_get_data (G_OBJECT (w_source
), "arrow");
726 gtk_widget_hide (arrow
);
731 cb_sheet_label_drag_motion (GtkWidget
*widget
, GdkDragContext
*context
,
732 gint x
, gint y
, guint time
, WBCGtk
*wbcg
)
734 SheetControlGUI
*scg_src
, *scg_dst
;
735 GtkWidget
*w_source
, *arrow
, *window
;
736 gint root_x
, root_y
, pos_x
, pos_y
;
737 GtkAllocation wa
, wsa
;
739 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), FALSE
);
740 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), FALSE
);
742 /* Make sure we are really hovering over another label. */
743 w_source
= gtk_drag_get_source_widget (context
);
747 arrow
= g_object_get_data (G_OBJECT (w_source
), "arrow");
749 scg_src
= get_scg (w_source
);
750 scg_dst
= get_scg (widget
);
752 if (scg_src
== scg_dst
) {
753 gtk_widget_hide (arrow
);
757 /* Move the arrow to the correct position and show it. */
758 window
= gtk_widget_get_ancestor (widget
, GTK_TYPE_WINDOW
);
759 gtk_window_get_position (GTK_WINDOW (window
), &root_x
, &root_y
);
760 gtk_widget_get_allocation (widget
,&wa
);
761 pos_x
= root_x
+ wa
.x
;
762 pos_y
= root_y
+ wa
.y
;
763 gtk_widget_get_allocation (w_source
,&wsa
);
766 gtk_window_move (GTK_WINDOW (arrow
), pos_x
, pos_y
);
767 gtk_widget_show (arrow
);
773 set_dir (GtkWidget
*w
, GtkTextDirection
*dir
)
775 gtk_widget_set_direction (w
, *dir
);
776 if (GTK_IS_CONTAINER (w
))
777 gtk_container_foreach (GTK_CONTAINER (w
),
778 (GtkCallback
)&set_dir
,
783 wbcg_set_direction (SheetControlGUI
const *scg
)
785 GtkWidget
*w
= (GtkWidget
*)scg
->wbcg
->snotebook
;
786 gboolean text_is_rtl
= scg_sheet (scg
)->text_is_rtl
;
787 GtkTextDirection dir
= text_is_rtl
791 if (dir
!= gtk_widget_get_direction (w
))
794 g_object_set (scg
->hs
, "inverted", text_is_rtl
, NULL
);
798 cb_direction_change (G_GNUC_UNUSED Sheet
*null_sheet
,
799 G_GNUC_UNUSED GParamSpec
*null_pspec
,
800 SheetControlGUI
const *scg
)
802 if (scg
&& scg
== wbcg_cur_scg (scg
->wbcg
))
803 wbcg_set_direction (scg
);
807 wbcg_update_menu_feedback (WBCGtk
*wbcg
, Sheet
const *sheet
)
809 g_return_if_fail (IS_SHEET (sheet
));
811 if (!wbcg_ui_update_begin (wbcg
))
814 wbc_gtk_set_toggle_action_state (wbcg
,
815 "SheetDisplayFormulas", sheet
->display_formulas
);
816 wbc_gtk_set_toggle_action_state (wbcg
,
817 "SheetHideZeros", sheet
->hide_zero
);
818 wbc_gtk_set_toggle_action_state (wbcg
,
819 "SheetHideGridlines", sheet
->hide_grid
);
820 wbc_gtk_set_toggle_action_state (wbcg
,
821 "SheetHideColHeader", sheet
->hide_col_header
);
822 wbc_gtk_set_toggle_action_state (wbcg
,
823 "SheetHideRowHeader", sheet
->hide_row_header
);
824 wbc_gtk_set_toggle_action_state (wbcg
,
825 "SheetDisplayOutlines", sheet
->display_outlines
);
826 wbc_gtk_set_toggle_action_state (wbcg
,
827 "SheetOutlineBelow", sheet
->outline_symbols_below
);
828 wbc_gtk_set_toggle_action_state (wbcg
,
829 "SheetOutlineRight", sheet
->outline_symbols_right
);
830 wbc_gtk_set_toggle_action_state (wbcg
,
831 "SheetUseR1C1", sheet
->convs
->r1c1_addresses
);
832 wbcg_ui_update_end (wbcg
);
836 cb_zoom_change (Sheet
*sheet
,
837 G_GNUC_UNUSED GParamSpec
*null_pspec
,
840 if (wbcg_ui_update_begin (wbcg
)) {
841 int pct
= sheet
->last_zoom_factor_used
* 100 + .5;
842 char *label
= g_strdup_printf ("%d%%", pct
);
843 go_action_combo_text_set_entry (wbcg
->zoom_haction
, label
,
844 GO_ACTION_COMBO_SEARCH_CURRENT
);
846 wbcg_ui_update_end (wbcg
);
851 cb_notebook_switch_page (G_GNUC_UNUSED GtkNotebook
*notebook_
,
852 G_GNUC_UNUSED GtkWidget
*page_
,
853 guint page_num
, WBCGtk
*wbcg
)
856 SheetControlGUI
*new_scg
;
858 g_return_if_fail (GNM_IS_WBC_GTK (wbcg
));
860 /* Ignore events during destruction */
861 if (wbcg
->snotebook
== NULL
)
865 g_printerr ("Notebook page switch\n");
867 /* While initializing adding the sheets will trigger page changes, but
868 * we do not actually want to change the focus sheet for the view
870 if (wbcg
->updating_ui
)
873 /* If we are not at a subexpression boundary then finish editing */
874 if (NULL
!= wbcg
->rangesel
)
875 scg_rangesel_stop (wbcg
->rangesel
, TRUE
);
878 * Make snotebook follow bnotebook. This should be the only place
879 * that changes pages for snotebook.
881 gtk_notebook_set_current_page (wbcg
->snotebook
, page_num
);
883 new_scg
= wbcg_get_nth_scg (wbcg
, page_num
);
884 wbcg_set_direction (new_scg
);
886 if (wbcg_is_editing (wbcg
) && wbcg_rangesel_possible (wbcg
)) {
888 * When we are editing, sheet changes are not done fully.
889 * We revert to the original sheet later.
891 * On the other hand, when we are selecting a range for a
892 * dialog, we do change sheet fully.
894 scg_take_focus (new_scg
);
898 gnm_expr_entry_set_scg (wbcg
->edit_line
.entry
, new_scg
);
901 * Make absolutely sure the expression doesn't get 'lost',
902 * if it's invalid then prompt the user and don't switch
905 if (wbcg_is_editing (wbcg
)) {
906 guint prev
= GPOINTER_TO_INT (g_object_get_data (G_OBJECT (wbcg
->snotebook
),
909 if (prev
== page_num
)
912 if (!wbcg_edit_finish (wbcg
, WBC_EDIT_ACCEPT
, NULL
))
913 gnm_notebook_set_current_page (wbcg
->bnotebook
,
916 /* Looks silly, but is really neccesarry */
917 gnm_notebook_set_current_page (wbcg
->bnotebook
,
923 g_object_set_data (G_OBJECT (wbcg
->snotebook
), "previous_page",
924 GINT_TO_POINTER (gtk_notebook_get_current_page (wbcg
->snotebook
)));
926 /* if we are not selecting a range for an expression update */
927 sheet
= wbcg_focus_cur_scg (wbcg
);
928 if (sheet
!= wbcg_cur_sheet (wbcg
)) {
929 wbcg_update_menu_feedback (wbcg
, sheet
);
930 sheet_flag_status_update_range (sheet
, NULL
);
931 sheet_update (sheet
);
932 wb_view_sheet_focus (wb_control_view (GNM_WBC (wbcg
)), sheet
);
933 cb_zoom_change (sheet
, NULL
, wbcg
);
938 cb_bnotebook_button_press (GtkWidget
*widget
, GdkEventButton
*event
)
940 if (event
->type
== GDK_2BUTTON_PRESS
&& event
->button
== 1) {
942 * Eat the click so cb_paned_button_press doesn't see it.
952 cb_bnotebook_page_reordered (GtkNotebook
*notebook
, GtkWidget
*child
,
953 int page_num
, WBCGtk
*wbcg
)
955 GtkNotebook
*snotebook
= GTK_NOTEBOOK (wbcg
->snotebook
);
956 int old
= gtk_notebook_get_current_page (snotebook
);
958 if (wbcg
->updating_ui
)
962 g_printerr ("Reordered %d -> %d\n", old
, page_num
);
964 if (old
!= page_num
) {
965 WorkbookControl
* wbc
= GNM_WBC (wbcg
);
966 Workbook
*wb
= wb_control_get_workbook (wbc
);
967 Sheet
*sheet
= workbook_sheet_by_index (wb
, old
);
968 WorkbookSheetState
* old_state
= workbook_sheet_state_new(wb
);
969 workbook_sheet_move (sheet
, page_num
- old
);
970 cmd_reorganize_sheets (wbc
, old_state
, sheet
);
976 wbc_gtk_create_notebook_area (WBCGtk
*wbcg
)
978 GtkWidget
*placeholder
;
980 wbcg
->bnotebook
= g_object_new (GNM_NOTEBOOK_TYPE
,
983 g_object_ref (wbcg
->bnotebook
);
985 g_signal_connect_after (G_OBJECT (wbcg
->bnotebook
),
987 G_CALLBACK (cb_notebook_switch_page
), wbcg
);
988 g_signal_connect (G_OBJECT (wbcg
->bnotebook
),
989 "button-press-event",
990 G_CALLBACK (cb_bnotebook_button_press
),
992 g_signal_connect (G_OBJECT (wbcg
->bnotebook
),
994 G_CALLBACK (cb_bnotebook_page_reordered
),
996 placeholder
= gtk_paned_get_child1 (wbcg
->tabs_paned
);
998 gtk_widget_destroy (placeholder
);
999 gtk_paned_pack1 (wbcg
->tabs_paned
, GTK_WIDGET (wbcg
->bnotebook
), FALSE
, TRUE
);
1001 gtk_widget_show_all (GTK_WIDGET (wbcg
->tabs_paned
));
1006 wbcg_menu_state_sheet_count (WBCGtk
*wbcg
)
1008 int const sheet_count
= gnm_notebook_get_n_visible (wbcg
->bnotebook
);
1009 /* Should we enable commands requiring multiple sheets */
1010 gboolean
const multi_sheet
= (sheet_count
> 1);
1012 wbc_gtk_set_action_sensitivity (wbcg
, "SheetRemove", multi_sheet
);
1016 cb_sheet_direction_change (Sheet
*sheet
,
1017 G_GNUC_UNUSED GParamSpec
*pspec
,
1021 "icon-name", (sheet
->text_is_rtl
1022 ? "format-text-direction-rtl"
1023 : "format-text-direction-ltr"),
1028 cb_sheet_tab_change (Sheet
*sheet
,
1029 G_GNUC_UNUSED GParamSpec
*pspec
,
1032 GdkRGBA cfore
, cback
;
1033 SheetControlGUI
*scg
= get_scg (widget
);
1035 g_return_if_fail (GNM_IS_SCG (scg
));
1037 /* We're lazy and just set all relevant attributes. */
1038 g_object_set (widget
,
1039 "label", sheet
->name_unquoted
,
1042 ? go_color_to_gdk_rgba (sheet
->tab_color
->go_color
,
1046 (sheet
->tab_text_color
1047 ? go_color_to_gdk_rgba (sheet
->tab_text_color
->go_color
,
1054 cb_toggle_menu_item_changed (Sheet
*sheet
,
1055 G_GNUC_UNUSED GParamSpec
*pspec
,
1058 /* We're lazy and just update all. */
1059 wbcg_update_menu_feedback (wbcg
, sheet
);
1063 cb_sheet_visibility_change (Sheet
*sheet
,
1064 G_GNUC_UNUSED GParamSpec
*pspec
,
1065 SheetControlGUI
*scg
)
1069 g_return_if_fail (GNM_IS_SCG (scg
));
1071 viz
= sheet_is_visible (sheet
);
1072 gtk_widget_set_visible (GTK_WIDGET (scg
->grid
), viz
);
1073 gtk_widget_set_visible (GTK_WIDGET (scg
->label
), viz
);
1075 wbcg_menu_state_sheet_count (scg
->wbcg
);
1079 disconnect_sheet_focus_signals (WBCGtk
*wbcg
)
1081 SheetControlGUI
*scg
= wbcg
->active_scg
;
1087 sheet
= scg_sheet (scg
);
1090 g_printerr ("Disconnecting focus for %s with scg=%p\n", sheet
->name_unquoted
, scg
);
1093 g_signal_handlers_disconnect_by_func (sheet
, cb_toggle_menu_item_changed
, wbcg
);
1094 g_signal_handlers_disconnect_by_func (sheet
, cb_direction_change
, scg
);
1095 g_signal_handlers_disconnect_by_func (sheet
, cb_zoom_change
, wbcg
);
1097 wbcg
->active_scg
= NULL
;
1101 disconnect_sheet_signals (SheetControlGUI
*scg
)
1103 WBCGtk
*wbcg
= scg
->wbcg
;
1104 Sheet
*sheet
= scg_sheet (scg
);
1106 if (scg
== wbcg
->active_scg
)
1107 disconnect_sheet_focus_signals (wbcg
);
1110 g_printerr ("Disconnecting all for %s with scg=%p\n", sheet
->name_unquoted
, scg
);
1113 g_signal_handlers_disconnect_by_func (sheet
, cb_sheet_direction_change
,
1114 wbcg_find_action (wbcg
, "SheetDirection"));
1115 g_signal_handlers_disconnect_by_func (sheet
, cb_sheet_tab_change
, scg
->label
);
1116 g_signal_handlers_disconnect_by_func (sheet
, cb_sheet_visibility_change
, scg
);
1120 wbcg_sheet_add (WorkbookControl
*wbc
, SheetView
*sv
)
1122 static GtkTargetEntry
const drag_types
[] = {
1123 { (char *)"GNUMERIC_SHEET", GTK_TARGET_SAME_APP
, TARGET_SHEET
},
1124 { (char *)"UTF8_STRING", 0, 0 },
1125 { (char *)"image/svg+xml", 0, 0 },
1126 { (char *)"image/x-wmf", 0, 0 },
1127 { (char *)"image/x-emf", 0, 0 },
1128 { (char *)"image/png", 0, 0 },
1129 { (char *)"image/jpeg", 0, 0 },
1130 { (char *)"image/bmp", 0, 0 }
1133 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
1134 SheetControlGUI
*scg
;
1135 Sheet
*sheet
= sv_sheet (sv
);
1136 gboolean visible
= sheet_is_visible (sheet
);
1138 g_return_if_fail (wbcg
!= NULL
);
1140 scg
= sheet_control_gui_new (sv
, wbcg
);
1142 g_object_set_data (G_OBJECT (scg
->grid
), SHEET_CONTROL_KEY
, scg
);
1144 g_object_set_data (G_OBJECT (scg
->label
), SHEET_CONTROL_KEY
, scg
);
1146 /* do not preempt the editable label handler */
1147 g_signal_connect_after (G_OBJECT (scg
->label
),
1148 "button_press_event",
1149 G_CALLBACK (cb_sheet_label_button_press
), scg
);
1152 gtk_drag_source_set (scg
->label
, GDK_BUTTON1_MASK
| GDK_BUTTON3_MASK
,
1153 drag_types
, G_N_ELEMENTS (drag_types
),
1155 gtk_drag_dest_set (scg
->label
, GTK_DEST_DEFAULT_ALL
,
1156 drag_types
, G_N_ELEMENTS (drag_types
),
1158 g_object_connect (G_OBJECT (scg
->label
),
1159 "signal::drag_begin", G_CALLBACK (cb_sheet_label_drag_begin
), wbcg
,
1160 "signal::drag_end", G_CALLBACK (cb_sheet_label_drag_end
), wbcg
,
1161 "signal::drag_leave", G_CALLBACK (cb_sheet_label_drag_leave
), wbcg
,
1162 "signal::drag_data_get", G_CALLBACK (cb_sheet_label_drag_data_get
), NULL
,
1163 "signal::drag_data_received", G_CALLBACK (cb_sheet_label_drag_data_received
), wbcg
,
1164 "signal::drag_motion", G_CALLBACK (cb_sheet_label_drag_motion
), wbcg
,
1167 gtk_widget_show (scg
->label
);
1168 gtk_widget_show_all (GTK_WIDGET (scg
->grid
));
1170 gtk_widget_hide (GTK_WIDGET (scg
->grid
));
1171 gtk_widget_hide (GTK_WIDGET (scg
->label
));
1173 g_object_connect (G_OBJECT (sheet
),
1174 "signal::notify::visibility", cb_sheet_visibility_change
, scg
,
1175 "signal::notify::name", cb_sheet_tab_change
, scg
->label
,
1176 "signal::notify::tab-foreground", cb_sheet_tab_change
, scg
->label
,
1177 "signal::notify::tab-background", cb_sheet_tab_change
, scg
->label
,
1178 "signal::notify::text-is-rtl", cb_sheet_direction_change
, wbcg_find_action (wbcg
, "SheetDirection"),
1181 if (wbcg_ui_update_begin (wbcg
)) {
1183 * Just let wbcg_sheet_order_changed deal with where to put
1187 gtk_notebook_insert_page (wbcg
->snotebook
,
1188 GTK_WIDGET (scg
->grid
), NULL
,
1190 gnm_notebook_insert_tab (wbcg
->bnotebook
,
1191 GTK_WIDGET (scg
->label
),
1193 wbcg_menu_state_sheet_count (wbcg
);
1194 wbcg_ui_update_end (wbcg
);
1197 scg_adjust_preferences (scg
);
1198 if (sheet
== wb_control_cur_sheet (wbc
)) {
1199 scg_take_focus (scg
);
1200 wbcg_set_direction (scg
);
1201 cb_zoom_change (sheet
, NULL
, wbcg
);
1202 cb_toggle_menu_item_changed (sheet
, NULL
, wbcg
);
1207 wbcg_sheet_remove (WorkbookControl
*wbc
, Sheet
*sheet
)
1209 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
1210 SheetControlGUI
*scg
= wbcg_get_scg (wbcg
, sheet
);
1212 /* During destruction we may have already removed the notebook */
1216 disconnect_sheet_signals (scg
);
1218 gtk_widget_destroy (GTK_WIDGET (scg
->label
));
1219 gtk_widget_destroy (GTK_WIDGET (scg
->grid
));
1221 wbcg_menu_state_sheet_count (wbcg
);
1225 wbcg_sheet_focus (WorkbookControl
*wbc
, Sheet
*sheet
)
1227 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
1228 SheetControlGUI
*scg
= wbcg_get_scg (wbcg
, sheet
);
1231 int n
= gtk_notebook_page_num (wbcg
->snotebook
,
1232 GTK_WIDGET (scg
->grid
));
1233 gnm_notebook_set_current_page (wbcg
->bnotebook
, n
);
1235 if (wbcg
->rangesel
== NULL
)
1236 gnm_expr_entry_set_scg (wbcg
->edit_line
.entry
, scg
);
1239 disconnect_sheet_focus_signals (wbcg
);
1242 wbcg_update_menu_feedback (wbcg
, sheet
);
1245 wbcg_set_direction (scg
);
1248 g_printerr ("Connecting for %s with scg=%p\n", sheet
->name_unquoted
, scg
);
1253 "signal::notify::display-formulas", cb_toggle_menu_item_changed
, wbcg
,
1254 "signal::notify::display-zeros", cb_toggle_menu_item_changed
, wbcg
,
1255 "signal::notify::display-grid", cb_toggle_menu_item_changed
, wbcg
,
1256 "signal::notify::display-column-header", cb_toggle_menu_item_changed
, wbcg
,
1257 "signal::notify::display-row-header", cb_toggle_menu_item_changed
, wbcg
,
1258 "signal::notify::display-outlines", cb_toggle_menu_item_changed
, wbcg
,
1259 "signal::notify::display-outlines-below", cb_toggle_menu_item_changed
, wbcg
,
1260 "signal::notify::display-outlines-right", cb_toggle_menu_item_changed
, wbcg
,
1261 "signal::notify::text-is-rtl", cb_direction_change
, scg
,
1262 "signal::notify::zoom-factor", cb_zoom_change
, wbcg
,
1265 wbcg
->active_scg
= scg
;
1270 by_sheet_index (gconstpointer a
, gconstpointer b
)
1272 SheetControlGUI
*scga
= (SheetControlGUI
*)a
;
1273 SheetControlGUI
*scgb
= (SheetControlGUI
*)b
;
1274 return scg_sheet (scga
)->index_in_wb
- scg_sheet (scgb
)->index_in_wb
;
1278 wbcg_sheet_order_changed (WBCGtk
*wbcg
)
1280 if (wbcg_ui_update_begin (wbcg
)) {
1284 /* Reorder all tabs so they end up in index_in_wb order. */
1285 scgs
= g_slist_sort (get_all_scgs (wbcg
), by_sheet_index
);
1287 for (i
= 0, l
= scgs
; l
; l
= l
->next
, i
++) {
1288 SheetControlGUI
*scg
= l
->data
;
1289 gtk_notebook_reorder_child (wbcg
->snotebook
,
1290 GTK_WIDGET (scg
->grid
),
1292 gnm_notebook_move_tab (wbcg
->bnotebook
,
1293 GTK_WIDGET (scg
->label
),
1296 g_slist_free (scgs
);
1298 wbcg_ui_update_end (wbcg
);
1303 wbcg_update_title (WBCGtk
*wbcg
)
1305 GODoc
*doc
= wb_control_get_doc (GNM_WBC (wbcg
));
1306 char *basename
= doc
->uri
? go_basename_from_uri (doc
->uri
) : NULL
;
1307 char *title
= g_strconcat
1308 (go_doc_is_dirty (doc
) ? "*" : "",
1309 basename
? basename
: doc
->uri
,
1312 gtk_window_set_title (wbcg_toplevel (wbcg
), title
);
1318 wbcg_sheet_remove_all (WorkbookControl
*wbc
)
1320 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
1322 if (wbcg
->snotebook
!= NULL
) {
1323 GtkNotebook
*tmp
= wbcg
->snotebook
;
1324 GSList
*l
, *all
= get_all_scgs (wbcg
);
1325 SheetControlGUI
*current
= wbcg_cur_scg (wbcg
);
1327 /* Clear notebook to disable updates as focus changes for pages
1328 * during destruction */
1329 wbcg
->snotebook
= NULL
;
1331 /* Be sure we are no longer editing */
1332 wbcg_edit_finish (wbcg
, WBC_EDIT_REJECT
, NULL
);
1334 for (l
= all
; l
; l
= l
->next
) {
1335 SheetControlGUI
*scg
= l
->data
;
1336 disconnect_sheet_signals (scg
);
1337 if (scg
!= current
) {
1338 gtk_widget_destroy (GTK_WIDGET (scg
->label
));
1339 gtk_widget_destroy (GTK_WIDGET (scg
->grid
));
1345 /* Do current scg last. */
1347 gtk_widget_destroy (GTK_WIDGET (current
->label
));
1348 gtk_widget_destroy (GTK_WIDGET (current
->grid
));
1351 wbcg
->snotebook
= tmp
;
1356 color_diff (const GdkRGBA
*a
, const GdkRGBA
*b
)
1358 /* Ignoring alpha. */
1359 return ((a
->red
- b
->red
) * (a
->red
- b
->red
) +
1360 (a
->green
- b
->green
) * (a
->green
- b
->green
) +
1361 (a
->blue
- b
->blue
) * (a
->blue
- b
->blue
));
1366 cb_adjust_foreground_attributes (PangoAttribute
*attribute
,
1369 const GdkRGBA
*back
= data
;
1371 if (attribute
->klass
->type
== PANGO_ATTR_FOREGROUND
) {
1372 PangoColor
*pfore
= &((PangoAttrColor
*)attribute
)->color
;
1374 const double threshold
= 0.01;
1376 fore
.red
= pfore
->red
/ 65535.0;
1377 fore
.green
= pfore
->green
/ 65535.0;
1378 fore
.blue
= pfore
->blue
/ 65535.0;
1380 if (color_diff (&fore
, back
) < threshold
) {
1381 static const GdkRGBA black
= { 0, 0, 0, 1 };
1382 static const GdkRGBA white
= { 1, 1, 1, 1 };
1383 double back_norm
= color_diff (back
, &black
);
1385 const GdkRGBA
*ref
=
1386 back_norm
> 0.75 ? &black
: &white
;
1388 #define DO_CHANNEL(channel) \
1390 double val = fore.channel * (1 - f) + ref->channel * f; \
1391 pfore->channel = CLAMP (val, 0, 1) * 65535; \
1403 adjust_foreground_attributes (PangoAttrList
*attrs
, GtkWidget
*w
)
1406 GtkStyleContext
*ctxt
= gtk_widget_get_style_context (w
);
1408 gtk_style_context_get_background_color (ctxt
, GTK_STATE_FLAG_NORMAL
,
1412 g_printerr ("back=%s\n", gdk_rgba_to_string (&c
));
1414 pango_attr_list_unref
1415 (pango_attr_list_filter
1417 cb_adjust_foreground_attributes
,
1423 wbcg_auto_expr_value_changed (WorkbookView
*wbv
,
1424 G_GNUC_UNUSED GParamSpec
*pspec
,
1427 GtkLabel
*lbl
= GTK_LABEL (wbcg
->auto_expr_label
);
1428 GnmValue
const *v
= wbv
->auto_expr
.value
;
1431 GOFormat
const *format
= VALUE_FMT (v
);
1432 GString
*str
= g_string_new (wbv
->auto_expr
.descr
);
1433 PangoAttrList
*attrs
= NULL
;
1435 g_string_append (str
, " = ");
1438 PangoLayout
*layout
= gtk_widget_create_pango_layout (GTK_WIDGET (wbcg
->toplevel
), NULL
);
1439 gsize old_len
= str
->len
;
1440 GODateConventions
const *date_conv
= workbook_date_conv (wb_view_get_workbook (wbv
));
1441 GOFormatNumberError err
=
1442 format_value_layout (layout
, format
, v
,
1443 strlen (AUTO_EXPR_SAMPLE
) - g_utf8_strlen (str
->str
, -1),
1446 case GO_FORMAT_NUMBER_OK
:
1447 case GO_FORMAT_NUMBER_DATE_ERROR
: {
1450 go_pango_translate_layout (layout
); /* translating custom attributes */
1451 g_string_append (str
, pango_layout_get_text (layout
));
1452 /* We need to shift the attribute list */
1453 atl
= pango_attr_list_ref (pango_layout_get_attributes (layout
));
1455 attrs
= pango_attr_list_new ();
1456 pango_attr_list_splice
1457 (attrs
, atl
, old_len
,
1458 str
->len
- old_len
);
1459 pango_attr_list_unref (atl
);
1460 /* Adjust colours to make text visible. */
1461 adjust_foreground_attributes
1463 gtk_widget_get_parent (GTK_WIDGET (lbl
)));
1468 case GO_FORMAT_NUMBER_INVALID_FORMAT
:
1469 g_string_append (str
, _("Invalid format"));
1472 g_object_unref (layout
);
1474 g_string_append (str
, value_peek_string (v
));
1476 gtk_label_set_text (lbl
, str
->str
);
1477 gtk_label_set_attributes (lbl
, attrs
);
1479 pango_attr_list_unref (attrs
);
1480 g_string_free (str
, TRUE
);
1482 gtk_label_set_text (lbl
, "");
1483 gtk_label_set_attributes (lbl
, NULL
);
1488 wbcg_scrollbar_visibility (WorkbookView
*wbv
,
1489 G_GNUC_UNUSED GParamSpec
*pspec
,
1492 SheetControlGUI
*scg
= wbcg_cur_scg (wbcg
);
1493 scg_adjust_preferences (scg
);
1497 wbcg_notebook_tabs_visibility (WorkbookView
*wbv
,
1498 G_GNUC_UNUSED GParamSpec
*pspec
,
1501 gtk_widget_set_visible (GTK_WIDGET (wbcg
->bnotebook
),
1502 wbv
->show_notebook_tabs
);
1507 wbcg_menu_state_update (WorkbookControl
*wbc
, int flags
)
1509 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
1510 SheetControlGUI
*scg
= wbcg_cur_scg (wbcg
);
1511 SheetView
const *sv
= wb_control_cur_sheet_view (wbc
);
1512 Sheet
const *sheet
= wb_control_cur_sheet (wbc
);
1513 gboolean
const has_guru
= wbc_gtk_get_guru (wbcg
) != NULL
;
1514 gboolean edit_object
= scg
!= NULL
&&
1515 (scg
->selected_objects
!= NULL
|| wbcg
->new_object
!= NULL
);
1516 gboolean has_print_area
;
1518 if (MS_INSERT_COLS
& flags
)
1519 wbc_gtk_set_action_sensitivity (wbcg
, "InsertColumns",
1520 sv
->enable_insert_cols
);
1521 if (MS_INSERT_ROWS
& flags
)
1522 wbc_gtk_set_action_sensitivity (wbcg
, "InsertRows",
1523 sv
->enable_insert_rows
);
1524 if (MS_INSERT_CELLS
& flags
)
1525 wbc_gtk_set_action_sensitivity (wbcg
, "InsertCells",
1526 sv
->enable_insert_cells
);
1527 if (MS_SHOWHIDE_DETAIL
& flags
) {
1528 wbc_gtk_set_action_sensitivity (wbcg
, "DataOutlineShowDetail",
1529 sheet
->priv
->enable_showhide_detail
);
1530 wbc_gtk_set_action_sensitivity (wbcg
, "DataOutlineHideDetail",
1531 sheet
->priv
->enable_showhide_detail
);
1533 if (MS_PASTE_SPECIAL
& flags
)
1534 wbc_gtk_set_action_sensitivity (wbcg
, "EditPasteSpecial",
1535 // Inter-process paste special is now allowed
1536 !gnm_app_clipboard_is_cut () &&
1538 if (MS_PRINT_SETUP
& flags
)
1539 wbc_gtk_set_action_sensitivity (wbcg
, "FilePageSetup", !has_guru
);
1540 if (MS_SEARCH_REPLACE
& flags
)
1541 wbc_gtk_set_action_sensitivity (wbcg
, "EditReplace", !has_guru
);
1542 if (MS_DEFINE_NAME
& flags
) {
1543 wbc_gtk_set_action_sensitivity (wbcg
, "EditNames", !has_guru
);
1544 wbc_gtk_set_action_sensitivity (wbcg
, "InsertNames", !has_guru
);
1546 if (MS_CONSOLIDATE
& flags
)
1547 wbc_gtk_set_action_sensitivity (wbcg
, "DataConsolidate", !has_guru
);
1548 if (MS_FILTER_STATE_CHANGED
& flags
)
1549 wbc_gtk_set_action_sensitivity (wbcg
, "DataFilterShowAll", sheet
->has_filtered_rows
);
1550 if (MS_SHOW_PRINTAREA
& flags
) {
1551 GnmRange
*print_area
= sheet_get_nominal_printarea (sheet
);
1552 has_print_area
= (print_area
!= NULL
);
1553 g_free (print_area
);
1554 wbc_gtk_set_action_sensitivity (wbcg
, "FilePrintAreaClear", has_print_area
);
1555 wbc_gtk_set_action_sensitivity (wbcg
, "FilePrintAreaShow", has_print_area
);
1557 if (MS_PAGE_BREAKS
& flags
) {
1558 gint col
= sv
->edit_pos
.col
;
1559 gint row
= sv
->edit_pos
.row
;
1560 GnmPrintInformation
*pi
= sheet
->print_info
;
1561 char const* new_label
= NULL
;
1562 char const *new_tip
= NULL
;
1564 if (pi
->page_breaks
.v
!= NULL
&&
1565 gnm_page_breaks_get_break (pi
->page_breaks
.v
, col
) == GNM_PAGE_BREAK_MANUAL
) {
1566 new_label
= _("Remove Column Page Break");
1567 new_tip
= _("Remove the page break to the left of the current column");
1569 new_label
= _("Add Column Page Break");
1570 new_tip
= _("Add a page break to the left of the current column");
1572 wbc_gtk_set_action_label (wbcg
, "FilePrintAreaToggleColPageBreak",
1573 NULL
, new_label
, new_tip
);
1574 if (pi
->page_breaks
.h
!= NULL
&&
1575 gnm_page_breaks_get_break (pi
->page_breaks
.h
, col
) == GNM_PAGE_BREAK_MANUAL
) {
1576 new_label
= _("Remove Row Page Break");
1577 new_tip
= _("Remove the page break above the current row");
1579 new_label
= _("Add Row Page Break");
1580 new_tip
= _("Add a page break above current row");
1582 wbc_gtk_set_action_label (wbcg
, "FilePrintAreaToggleRowPageBreak",
1583 NULL
, new_label
, new_tip
);
1584 wbc_gtk_set_action_sensitivity (wbcg
, "FilePrintAreaToggleRowPageBreak",
1586 wbc_gtk_set_action_sensitivity (wbcg
, "FilePrintAreaToggleColPageBreak",
1588 wbc_gtk_set_action_sensitivity (wbcg
, "FilePrintAreaClearAllPageBreak",
1589 print_info_has_manual_breaks (sheet
->print_info
));
1591 if (MS_SELECT_OBJECT
& flags
) {
1592 wbc_gtk_set_action_sensitivity (wbcg
, "EditSelectObject",
1593 sheet
->sheet_objects
!= NULL
);
1596 if (MS_FREEZE_VS_THAW
& flags
) {
1597 /* Cheat and use the same accelerator for both states because
1598 * we don't reset it when the label changes */
1599 char const* label
= sv_is_frozen (sv
)
1600 ? _("Un_freeze Panes")
1601 : _("_Freeze Panes");
1602 char const *new_tip
= sv_is_frozen (sv
)
1603 ? _("Unfreeze the top left of the sheet")
1604 : _("Freeze the top left of the sheet");
1605 wbc_gtk_set_action_label (wbcg
, "ViewFreezeThawPanes", NULL
, label
, new_tip
);
1608 if (MS_ADD_VS_REMOVE_FILTER
& flags
) {
1609 gboolean
const has_filter
= (NULL
!= sv_editpos_in_filter (sv
));
1610 GnmFilter
*f
= sv_selection_intersects_filter_rows (sv
);
1612 char const *new_tip
;
1613 gboolean active
= TRUE
;
1616 if ((!has_filter
) && (NULL
!= f
)) {
1617 gchar
*nlabel
= NULL
;
1618 if (NULL
!= (r
= sv_selection_extends_filter (sv
, f
))) {
1620 nlabel
= g_strdup_printf
1621 (_("Extend _Auto Filter to %s"),
1622 range_as_string (r
));
1623 new_tip
= _("Extend the existing filter.");
1624 wbc_gtk_set_action_label
1625 (wbcg
, "DataAutoFilter", NULL
,
1630 nlabel
= g_strdup_printf
1631 (_("Auto Filter blocked by %s"),
1632 range_as_string (&f
->r
));
1633 new_tip
= _("The selection intersects an "
1634 "existing auto filter.");
1635 wbc_gtk_set_action_label
1636 (wbcg
, "DataAutoFilter", NULL
,
1642 ? _("Remove _Auto Filter")
1643 : _("Add _Auto Filter");
1644 new_tip
= has_filter
1645 ? _("Remove a filter")
1646 : _("Add a filter");
1647 wbc_gtk_set_action_label (wbcg
, "DataAutoFilter", NULL
, label
, new_tip
);
1650 wbc_gtk_set_action_sensitivity (wbcg
, "DataAutoFilter", active
);
1652 if (MS_COMMENT_LINKS
& flags
) {
1653 gboolean has_comment
1654 = (sheet_get_comment (sheet
, &sv
->edit_pos
) != NULL
);
1657 range_init_cellpos (&rge
, &sv
->edit_pos
);
1659 sheet_style_region_contains_link (sheet
, &rge
));
1660 wbc_gtk_set_action_sensitivity
1661 (wbcg
, "EditComment", has_comment
);
1662 wbc_gtk_set_action_sensitivity
1663 (wbcg
, "EditHyperlink", has_link
);
1666 if (MS_COMMENT_LINKS_RANGE
& flags
) {
1669 gboolean has_links
= FALSE
, has_comments
= FALSE
;
1670 gboolean sel_is_vector
= FALSE
;
1671 SheetView
*sv
= scg_view (scg
);
1672 for (l
= sv
->selections
;
1673 l
!= NULL
; l
= l
->next
) {
1674 GnmRange
const *r
= l
->data
;
1676 GnmStyleList
*styles
;
1678 styles
= sheet_style_collect_hlinks
1680 has_links
= (styles
!= NULL
);
1681 style_list_free (styles
);
1683 if (!has_comments
) {
1684 objs
= sheet_objects_get
1685 (sheet
, r
, GNM_CELL_COMMENT_TYPE
);
1686 has_comments
= (objs
!= NULL
);
1687 g_slist_free (objs
);
1689 if((count
++ > 1) && has_comments
&& has_links
)
1692 wbc_gtk_set_action_sensitivity
1693 (wbcg
, "EditClearHyperlinks", has_links
);
1694 wbc_gtk_set_action_sensitivity
1695 (wbcg
, "EditClearComments", has_comments
);
1697 GnmRange
const *r
= sv
->selections
->data
;
1698 sel_is_vector
= (range_width (r
) == 1 ||
1699 range_height (r
) == 1) &&
1700 !range_is_singleton (r
);
1702 wbc_gtk_set_action_sensitivity
1703 (wbcg
, "InsertSortDecreasing", sel_is_vector
);
1704 wbc_gtk_set_action_sensitivity
1705 (wbcg
, "InsertSortIncreasing", sel_is_vector
);
1707 if (MS_FILE_EXPORT_IMPORT
& flags
) {
1708 Workbook
*wb
= wb_control_get_workbook (wbc
);
1709 gboolean has_export_info
= workbook_get_file_exporter (wb
) &&
1710 workbook_get_last_export_uri (wb
);
1711 wbc_gtk_set_action_sensitivity (wbcg
, "DataExportRepeat", has_export_info
);
1712 if (has_export_info
) {
1713 gchar
*base
= go_basename_from_uri (workbook_get_last_export_uri (wb
));
1714 gchar
*new_label
= g_strdup_printf (_("Repeat Export to %s"),
1717 wbc_gtk_set_action_label (wbcg
, "DataExportRepeat", NULL
,
1718 new_label
, N_("Repeat the last data export"));
1721 wbc_gtk_set_action_label (wbcg
, "DataExportRepeat", NULL
,
1722 N_("Repeat Export"), N_("Repeat the last data export"));
1725 gboolean
const has_slicer
= (NULL
!= sv_editpos_in_slicer (sv
));
1726 char const* label
= has_slicer
1727 ? _("Remove _Data Slicer")
1728 : _("Create _Data Slicer");
1729 char const *new_tip
= has_slicer
1730 ? _("Remove a Data Slicer")
1731 : _("Create a Data Slicer");
1732 wbc_gtk_set_action_label (wbcg
, "DataSlicer", NULL
, label
, new_tip
);
1733 wbc_gtk_set_action_sensitivity (wbcg
, "DataSlicerRefresh", has_slicer
);
1734 wbc_gtk_set_action_sensitivity (wbcg
, "DataSlicerEdit", has_slicer
);
1739 wbcg_undo_redo_labels (WorkbookControl
*wbc
, char const *undo
, char const *redo
)
1741 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
1742 g_return_if_fail (wbcg
!= NULL
);
1744 wbc_gtk_set_action_label (wbcg
, "Redo", _("_Redo"), redo
, NULL
);
1745 wbc_gtk_set_action_label (wbcg
, "Undo", _("_Undo"), undo
, NULL
);
1746 wbc_gtk_set_action_sensitivity (wbcg
, "Repeat", undo
!= NULL
);
1750 wbcg_paste_from_selection (WorkbookControl
*wbc
, GnmPasteTarget
const *pt
)
1752 gnm_x_request_clipboard ((WBCGtk
*)wbc
, pt
);
1756 wbcg_claim_selection (WorkbookControl
*wbc
)
1758 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
1759 GdkDisplay
*display
= gtk_widget_get_display (GTK_WIDGET (wbcg_toplevel (wbcg
)));
1760 return gnm_x_claim_clipboard (display
);
1764 wbcg_show_save_dialog (WBCGtk
*wbcg
, Workbook
*wb
)
1768 char const *wb_uri
= go_doc_get_uri (GO_DOC (wb
));
1772 char *base
= go_basename_from_uri (wb_uri
);
1773 char *display
= g_markup_escape_text (base
, -1);
1774 msg
= g_strdup_printf (
1775 _("Save changes to workbook '%s' before closing?"),
1780 msg
= g_strdup (_("Save changes to workbook before closing?"));
1783 d
= gnm_message_dialog_create (wbcg_toplevel (wbcg
),
1784 GTK_DIALOG_DESTROY_WITH_PARENT
,
1785 GTK_MESSAGE_WARNING
,
1787 _("If you close without saving, changes will be discarded."));
1788 atk_object_set_role (gtk_widget_get_accessible (d
), ATK_ROLE_ALERT
);
1790 go_gtk_dialog_add_button (GTK_DIALOG(d
), _("Discard"),
1791 GTK_STOCK_DELETE
, GTK_RESPONSE_NO
);
1792 go_gtk_dialog_add_button (GTK_DIALOG(d
), _("Don't close"),
1793 GNM_STOCK_CANCEL
, GTK_RESPONSE_CANCEL
);
1795 gtk_dialog_add_button (GTK_DIALOG(d
), GNM_STOCK_SAVE
, GTK_RESPONSE_YES
);
1796 gtk_dialog_set_default_response (GTK_DIALOG (d
), GTK_RESPONSE_YES
);
1797 ret
= go_gtk_dialog_run (GTK_DIALOG (d
), wbcg_toplevel (wbcg
));
1804 * wbcg_close_if_user_permits : If the workbook is dirty the user is
1805 * prompted to see if they should exit.
1811 * 3) save any future dirty
1812 * 4) do not save any future dirty
1815 wbcg_close_if_user_permits (WBCGtk
*wbcg
, WorkbookView
*wb_view
)
1817 gboolean can_close
= TRUE
;
1818 gboolean done
= FALSE
;
1821 Workbook
*wb
= wb_view_get_workbook (wb_view
);
1822 static int in_can_close
;
1824 g_return_val_if_fail (GNM_IS_WORKBOOK (wb
), 0);
1828 in_can_close
= TRUE
;
1830 while (go_doc_is_dirty (GO_DOC (wb
)) && !done
) {
1832 button
= wbcg_show_save_dialog(wbcg
, wb
);
1835 case GTK_RESPONSE_YES
:
1836 done
= gui_file_save (wbcg
, wb_view
);
1839 case GNM_RESPONSE_SAVE_ALL
:
1840 done
= gui_file_save (wbcg
, wb_view
);
1843 case GTK_RESPONSE_NO
:
1845 go_doc_set_dirty (GO_DOC (wb
), FALSE
);
1848 case GNM_RESPONSE_DISCARD_ALL
:
1850 go_doc_set_dirty (GO_DOC (wb
), FALSE
);
1853 default: /* CANCEL */
1860 in_can_close
= FALSE
;
1863 gnm_x_store_clipboard_if_needed (wb
);
1864 g_object_unref (wb
);
1866 case GNM_RESPONSE_SAVE_ALL
:
1868 case GNM_RESPONSE_DISCARD_ALL
:
1881 * Returns TRUE if the control should NOT be closed.
1884 wbc_gtk_close (WBCGtk
*wbcg
)
1886 WorkbookView
*wb_view
= wb_control_view (GNM_WBC (wbcg
));
1888 g_return_val_if_fail (GNM_IS_WORKBOOK_VIEW (wb_view
), TRUE
);
1889 g_return_val_if_fail (wb_view
->wb_controls
!= NULL
, TRUE
);
1891 /* If we were editing when the quit request came make sure we don't
1892 * lose any entered text
1894 if (!wbcg_edit_finish (wbcg
, WBC_EDIT_ACCEPT
, NULL
))
1897 /* If something is still using the control
1898 * eg progress meter for a new book */
1899 if (G_OBJECT (wbcg
)->ref_count
> 1)
1902 /* This is the last control */
1903 if (wb_view
->wb_controls
->len
<= 1) {
1904 Workbook
*wb
= wb_view_get_workbook (wb_view
);
1906 g_return_val_if_fail (GNM_IS_WORKBOOK (wb
), TRUE
);
1907 g_return_val_if_fail (wb
->wb_views
!= NULL
, TRUE
);
1909 /* This is the last view */
1910 if (wb
->wb_views
->len
<= 1) {
1911 if (wbcg_close_if_user_permits (wbcg
, wb_view
) == 0)
1916 g_object_unref (wb_view
);
1918 g_object_unref (wbcg
);
1920 _gnm_app_flag_windows_changed ();
1926 cb_cancel_input (WBCGtk
*wbcg
)
1928 wbcg_edit_finish (wbcg
, WBC_EDIT_REJECT
, NULL
);
1932 cb_accept_input (WBCGtk
*wbcg
)
1934 wbcg_edit_finish (wbcg
, WBC_EDIT_ACCEPT
, NULL
);
1938 cb_accept_input_wo_ac (WBCGtk
*wbcg
)
1940 wbcg_edit_finish (wbcg
, WBC_EDIT_ACCEPT_WO_AC
, NULL
);
1944 cb_accept_input_array (WBCGtk
*wbcg
)
1946 wbcg_edit_finish (wbcg
, WBC_EDIT_ACCEPT_ARRAY
, NULL
);
1950 cb_accept_input_selected_cells (WBCGtk
*wbcg
)
1952 wbcg_edit_finish (wbcg
, WBC_EDIT_ACCEPT_RANGE
, NULL
);
1956 cb_accept_input_selected_merged (WBCGtk
*wbcg
)
1958 Sheet
*sheet
= wbcg
->editing_sheet
;
1960 #warning FIXME: this creates 2 undo items!
1961 if (wbcg_is_editing (wbcg
) &&
1962 wbcg_edit_finish (wbcg
, WBC_EDIT_ACCEPT
, NULL
)) {
1963 WorkbookControl
*wbc
= GNM_WBC (wbcg
);
1964 WorkbookView
*wbv
= wb_control_view (wbc
);
1965 SheetView
*sv
= sheet_get_view (sheet
, wbv
);
1966 GnmRange sel
= *(selection_first_range (sv
, NULL
, NULL
));
1967 GSList
*selection
= g_slist_prepend (NULL
, &sel
);
1969 cmd_merge_cells (wbc
, sheet
, selection
, FALSE
);
1970 g_slist_free (selection
);
1975 /* cb_accept_input_sheets_collector (Sheet *sheet, GSList **n) */
1977 /* if (sheet->visibility == GNM_SHEET_VISIBILITY_VISIBLE) */
1978 /* (*n) = g_slist_prepend (*n, sheet); */
1982 /* cb_accept_input_sheets (WBCGtk *wbcg) */
1984 /* GSList *sheets = workbook_sheets */
1985 /* (wb_control_get_workbook (GNM_WBC (wbcg))); */
1986 /* GSList *vis_sheets = NULL; */
1988 /* g_slist_foreach (sheets, */
1989 /* (GFunc) cb_accept_input_sheets_collector, */
1992 /* wbcg_edit_multisheet_finish (wbcg, WBC_EDIT_ACCEPT, NULL, vis_sheets); */
1994 /* g_slist_free (sheets); */
1995 /* g_slist_free (vis_sheets); */
1999 /* cb_accept_input_menu_sensitive_sheets_counter (Sheet *sheet, gint *n) */
2001 /* if (sheet->visibility == GNM_SHEET_VISIBILITY_VISIBLE) */
2005 /* static gboolean */
2006 /* cb_accept_input_menu_sensitive_sheets (WBCGtk *wbcg) */
2008 /* GSList *sheets = workbook_sheets */
2009 /* (wb_control_get_workbook (GNM_WBC (wbcg))); */
2012 /* g_slist_foreach (sheets, */
2013 /* (GFunc) cb_accept_input_menu_sensitive_sheets_counter, */
2015 /* g_slist_free (sheets); */
2016 /* return (n > 1); */
2019 /* static gboolean */
2020 /* cb_accept_input_menu_sensitive_selected_sheets (WBCGtk *wbcg) */
2022 /* GSList *sheets = workbook_sheets */
2023 /* (wb_control_get_workbook (GNM_WBC (wbcg))); */
2026 /* g_slist_foreach (sheets, */
2027 /* (GFunc) cb_accept_input_menu_sensitive_sheets_counter, */
2029 /* g_slist_free (sheets); */
2030 /* return (n > 2); */
2034 cb_accept_input_menu_sensitive_selected_cells (WBCGtk
*wbcg
)
2036 WorkbookControl
*wbc
= GNM_WBC (wbcg
);
2037 WorkbookView
*wbv
= wb_control_view (wbc
);
2038 SheetView
*sv
= sheet_get_view (wbcg
->editing_sheet
, wbv
);
2039 gboolean result
= TRUE
;
2040 GSList
*selection
= selection_get_ranges (sv
, FALSE
), *l
;
2042 for (l
= selection
; l
!= NULL
; l
= l
->next
) {
2043 GnmRange
const *sel
= l
->data
;
2044 if (sheet_range_splits_array
2045 (wbcg
->editing_sheet
, sel
, NULL
, NULL
, NULL
)) {
2050 range_fragment_free (selection
);
2055 cb_accept_input_menu_sensitive_selected_merged (WBCGtk
*wbcg
)
2057 WorkbookControl
*wbc
= GNM_WBC (wbcg
);
2058 WorkbookView
*wbv
= wb_control_view (wbc
);
2059 SheetView
*sv
= sheet_get_view (wbcg
->editing_sheet
, wbv
);
2060 GnmRange
const *sel
= selection_first_range (sv
, NULL
, NULL
);
2062 return (sel
&& !range_is_singleton (sel
) &&
2063 sv
->edit_pos
.col
== sel
->start
.col
&&
2064 sv
->edit_pos
.row
== sel
->start
.row
&&
2065 !sheet_range_splits_array
2066 (wbcg
->editing_sheet
, sel
, NULL
, NULL
, NULL
));
2070 cb_accept_input_menu (GtkMenuToolButton
*button
, WBCGtk
*wbcg
)
2072 GtkWidget
*menu
= gtk_menu_tool_button_get_menu (button
);
2073 GList
*l
, *children
= gtk_container_get_children (GTK_CONTAINER (menu
));
2075 struct AcceptInputMenu
{
2077 void (*function
) (WBCGtk
*wbcg
);
2078 gboolean (*sensitive
) (WBCGtk
*wbcg
);
2079 } const accept_input_actions
[] = {
2080 { N_("Enter in current cell"), cb_accept_input
,
2082 { N_("Enter in current cell without autocorrection"), cb_accept_input_wo_ac
,
2084 /* { N_("Enter on all non-hidden sheets"), cb_accept_input_sheets, */
2085 /* cb_accept_input_menu_sensitive_sheets}, */
2086 /* { N_("Enter on multiple sheets..."), cb_accept_input_selected_sheets, */
2087 /* cb_accept_input_menu_sensitive_selected_sheets }, */
2088 { NULL
, NULL
, NULL
},
2089 { N_("Enter in current range merged"), cb_accept_input_selected_merged
,
2090 cb_accept_input_menu_sensitive_selected_merged
},
2091 { NULL
, NULL
, NULL
},
2092 { N_("Enter in selected ranges"), cb_accept_input_selected_cells
,
2093 cb_accept_input_menu_sensitive_selected_cells
},
2094 { N_("Enter in selected ranges as array"), cb_accept_input_array
,
2095 cb_accept_input_menu_sensitive_selected_cells
},
2099 const struct AcceptInputMenu
*it
;
2101 if (children
== NULL
)
2102 for (ui
= 0; ui
< G_N_ELEMENTS (accept_input_actions
); ui
++) {
2103 it
= accept_input_actions
+ ui
;
2106 item
= gtk_image_menu_item_new_with_label
2109 g_signal_connect_swapped
2110 (G_OBJECT (item
), "activate",
2111 G_CALLBACK (it
->function
),
2113 if (wbcg
->editing_sheet
) {
2115 gtk_widget_set_sensitive
2116 (item
, (it
->sensitive
) (wbcg
));
2118 gtk_widget_set_sensitive (item
, TRUE
);
2120 gtk_widget_set_sensitive (item
, FALSE
);
2122 item
= gtk_separator_menu_item_new ();
2123 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
2124 gtk_widget_show (item
);
2127 for (ui
= 0, l
= children
;
2128 ui
< G_N_ELEMENTS (accept_input_actions
) && l
!= NULL
;
2129 ui
++, l
= l
->next
) {
2130 it
= accept_input_actions
+ ui
;
2131 if (wbcg
->editing_sheet
) {
2133 gtk_widget_set_sensitive
2134 (GTK_WIDGET (l
->data
),
2135 (it
->sensitive
) (wbcg
));
2137 gtk_widget_set_sensitive
2138 (GTK_WIDGET (l
->data
), TRUE
);
2140 gtk_widget_set_sensitive (l
->data
, FALSE
);
2144 g_list_free (children
);
2148 cb_editline_focus_in (GtkWidget
*w
, GdkEventFocus
*event
,
2151 if (!wbcg_is_editing (wbcg
))
2152 if (!wbcg_edit_start (wbcg
, FALSE
, TRUE
)) {
2154 GtkEntry
*entry
= GTK_ENTRY (w
);
2156 wbcg_focus_cur_scg (wbcg
);
2157 #warning GTK3: what can we do there for gtk3?
2159 entry
->in_drag
= FALSE
;
2161 * ->button is private, ugh. Since the text area
2162 * never gets a release event, there seems to be
2163 * no official way of returning the widget to its
2175 cb_statusbox_activate (GtkEntry
*entry
, WBCGtk
*wbcg
)
2177 WorkbookControl
*wbc
= GNM_WBC (wbcg
);
2178 wb_control_parse_and_jump (wbc
, gtk_entry_get_text (entry
));
2179 wbcg_focus_cur_scg (wbcg
);
2180 wb_view_selection_desc (wb_control_view (wbc
), TRUE
, wbc
);
2184 cb_statusbox_focus (GtkEntry
*entry
, GdkEventFocus
*event
,
2187 gtk_editable_select_region (GTK_EDITABLE (entry
), 0, 0);
2191 /******************************************************************************/
2194 dump_size_tree (GtkWidget
*w
, gpointer indent_
)
2196 int indent
= GPOINTER_TO_INT (indent_
);
2200 g_printerr ("%*s", indent
, "");
2201 if (gtk_widget_get_name (w
))
2202 g_printerr ("\"%s\" ", gtk_widget_get_name (w
));
2204 gtk_widget_get_preferred_height (w
, &h1
, &h2
);
2205 gtk_widget_get_allocation (w
, &a
);
2207 g_printerr ("%s %p viz=%d act=%dx%d minheight=%d natheight=%d\n",
2208 g_type_name_from_instance ((GTypeInstance
*)w
), w
,
2209 gtk_widget_get_visible (w
),
2213 if (GTK_IS_CONTAINER (w
)) {
2214 gtk_container_foreach (GTK_CONTAINER (w
),
2216 GINT_TO_POINTER (indent
+ 2));
2222 cb_workbook_debug_info (WBCGtk
*wbcg
)
2224 Workbook
*wb
= wb_control_get_workbook (GNM_WBC (wbcg
));
2226 if (gnm_debug_flag ("notebook-size"))
2227 dump_size_tree (GTK_WIDGET (wbcg_toplevel (wbcg
)), GINT_TO_POINTER (0));
2229 if (gnm_debug_flag ("deps")) {
2230 dependents_dump (wb
);
2233 if (gnm_debug_flag ("expr-sharer")) {
2234 GnmExprSharer
*es
= workbook_share_expressions (wb
, FALSE
);
2235 gnm_expr_sharer_report (es
);
2236 gnm_expr_sharer_destroy (es
);
2239 if (gnm_debug_flag ("style-optimize")) {
2240 workbook_optimize_style (wb
);
2243 if (gnm_debug_flag ("name-collections")) {
2244 gnm_named_expr_collection_dump (wb
->names
, "workbook");
2245 WORKBOOK_FOREACH_SHEET(wb
, sheet
, {
2246 gnm_named_expr_collection_dump (sheet
->names
,
2247 sheet
->name_unquoted
);
2253 cb_autofunction (WBCGtk
*wbcg
)
2258 if (wbcg_is_editing (wbcg
))
2261 entry
= wbcg_get_entry (wbcg
);
2262 txt
= gtk_entry_get_text (entry
);
2263 if (strncmp (txt
, "=", 1)) {
2264 if (!wbcg_edit_start (wbcg
, TRUE
, TRUE
))
2265 return; /* attempt to edit failed */
2266 gtk_entry_set_text (entry
, "=");
2267 gtk_editable_set_position (GTK_EDITABLE (entry
), 1);
2269 if (!wbcg_edit_start (wbcg
, FALSE
, TRUE
))
2270 return; /* attempt to edit failed */
2272 /* FIXME : This is crap!
2273 * When the function druid is more complete use that.
2275 gtk_editable_set_position (GTK_EDITABLE (entry
),
2276 gtk_entry_get_text_length (entry
)-1);
2281 * We must not crash on focus=NULL. We're called like that as a result of
2282 * gtk_window_set_focus (toplevel, NULL) if the first sheet view is destroyed
2283 * just after being created. This happens e.g when we cancel a file import or
2287 cb_set_focus (GtkWindow
*window
, GtkWidget
*focus
, WBCGtk
*wbcg
)
2289 if (focus
&& !gtk_window_get_focus (window
))
2290 wbcg_focus_cur_scg (wbcg
);
2293 /***************************************************************************/
2296 cb_scroll_wheel (GtkWidget
*w
, GdkEventScroll
*event
,
2299 SheetControlGUI
*scg
= wbcg_get_scg (wbcg
, wbcg_focus_cur_scg (wbcg
));
2300 Sheet
*sheet
= scg_sheet (scg
);
2301 /* scroll always operates on pane 0 */
2302 GnmPane
*pane
= scg_pane (scg
, 0);
2303 gboolean go_horiz
= (event
->direction
== GDK_SCROLL_LEFT
||
2304 event
->direction
== GDK_SCROLL_RIGHT
);
2305 gboolean go_back
= (event
->direction
== GDK_SCROLL_UP
||
2306 event
->direction
== GDK_SCROLL_LEFT
);
2309 !gtk_widget_get_realized (w
) ||
2310 event
->direction
== GDK_SCROLL_SMOOTH
)
2313 if ((event
->state
& GDK_SHIFT_MASK
))
2314 go_horiz
= !go_horiz
;
2316 if ((event
->state
& GDK_CONTROL_MASK
)) { /* zoom */
2317 int zoom
= (int)(sheet
->last_zoom_factor_used
* 100. + .5) - 10;
2319 if ((zoom
% 15) != 0) {
2320 zoom
= 15 * (int)(zoom
/15);
2330 if (0 <= zoom
&& zoom
<= 390)
2331 cmd_zoom (GNM_WBC (wbcg
), g_slist_append (NULL
, sheet
),
2332 (double) (zoom
+ 10) / 100);
2333 } else if (go_horiz
) {
2334 int col
= (pane
->last_full
.col
- pane
->first
.col
) / 4;
2338 col
= pane
->first
.col
- col
;
2340 col
= pane
->first
.col
+ col
;
2341 scg_set_left_col (pane
->simple
.scg
, col
);
2343 int row
= (pane
->last_full
.row
- pane
->first
.row
) / 4;
2347 row
= pane
->first
.row
- row
;
2349 row
= pane
->first
.row
+ row
;
2350 scg_set_top_row (pane
->simple
.scg
, row
);
2356 * Make current control size the default. Toplevel would resize
2357 * spontaneously. This makes it stay the same size until user resizes.
2360 cb_realize (GtkWindow
*toplevel
, WBCGtk
*wbcg
)
2364 g_return_if_fail (GTK_IS_WINDOW (toplevel
));
2366 gtk_widget_get_allocation (GTK_WIDGET (toplevel
), &ta
);
2367 gtk_window_set_default_size (toplevel
, ta
.width
, ta
.height
);
2369 /* if we are already initialized set the focus. Without this loading a
2370 * multpage book sometimes leaves focus on the last book rather than
2371 * the current book. Which leads to a slew of errors for keystrokes
2372 * until focus is corrected.
2374 if (wbcg
->snotebook
) {
2375 wbcg_focus_cur_scg (wbcg
);
2376 wbcg_update_menu_feedback (wbcg
, wbcg_cur_sheet (wbcg
));
2381 cb_css_parse_error (GtkCssProvider
*css
, GtkCssSection
*section
, GError
*err
)
2383 if (g_error_matches (err
, GTK_CSS_PROVIDER_ERROR
,
2384 GTK_CSS_PROVIDER_ERROR_DEPRECATED
) &&
2385 !gnm_debug_flag ("css"))
2388 g_warning ("Theme parsing error: %s", err
->message
);
2391 struct css_provider_data
{
2392 GtkCssProvider
*css
;
2397 cb_unload_providers (gpointer data_
)
2399 struct css_provider_data
*data
= data_
;
2402 for (l
= data
->screens
; l
; l
= l
->next
) {
2403 GdkScreen
*screen
= l
->data
;
2404 gtk_style_context_remove_provider_for_screen
2405 (screen
, GTK_STYLE_PROVIDER (data
->css
));
2407 g_slist_free (data
->screens
);
2408 g_object_unref (data
->css
);
2413 cb_screen_changed (GtkWidget
*widget
)
2415 GdkScreen
*screen
= gtk_widget_get_screen (widget
);
2416 GObject
*app
= gnm_app_get_app ();
2417 const char *app_key
= "css-provider";
2418 struct css_provider_data
*data
;
2420 data
= g_object_get_data (app
, app_key
);
2422 const char *resource
= "/org/gnumeric/gnumeric/ui/gnumeric.css";
2423 GBytes
*cssbytes
= g_resources_lookup_data (resource
, 0, NULL
);
2424 const char *csstext
= g_bytes_get_data (cssbytes
, NULL
);
2425 gboolean debug
= gnm_debug_flag ("css");
2427 data
= g_new (struct css_provider_data
, 1);
2428 data
->css
= gtk_css_provider_new ();
2429 data
->screens
= NULL
;
2432 g_printerr ("Loading style from %s\n", resource
);
2434 g_signal_connect (data
->css
, "parsing-error",
2435 G_CALLBACK (cb_css_parse_error
),
2438 gtk_css_provider_load_from_data (data
->css
, csstext
, -1, NULL
);
2439 g_object_set_data_full (app
, app_key
, data
, cb_unload_providers
);
2440 g_bytes_unref (cssbytes
);
2443 if (screen
&& !g_slist_find (data
->screens
, screen
)) {
2444 gtk_style_context_add_provider_for_screen
2446 GTK_STYLE_PROVIDER (data
->css
),
2447 GTK_STYLE_PROVIDER_PRIORITY_APPLICATION
);
2448 data
->screens
= g_slist_prepend (data
->screens
, screen
);
2453 wbcg_set_status_text (WBCGtk
*wbcg
, char const *text
)
2455 g_return_if_fail (GNM_IS_WBC_GTK (wbcg
));
2456 gtk_statusbar_pop (GTK_STATUSBAR (wbcg
->status_text
), 0);
2457 gtk_statusbar_push (GTK_STATUSBAR (wbcg
->status_text
), 0, text
);
2461 set_visibility (WBCGtk
*wbcg
,
2462 char const *action_name
,
2465 GtkWidget
*w
= g_hash_table_lookup (wbcg
->visibility_widgets
, action_name
);
2467 gtk_widget_set_visible (w
, visible
);
2468 wbc_gtk_set_toggle_action_state (wbcg
, action_name
, visible
);
2473 wbcg_toggle_visibility (WBCGtk
*wbcg
, GtkToggleAction
*action
)
2475 if (!wbcg
->updating_ui
&& wbcg_ui_update_begin (wbcg
)) {
2476 char const *name
= gtk_action_get_name (GTK_ACTION (action
));
2477 set_visibility (wbcg
, name
,
2478 gtk_toggle_action_get_active (action
));
2479 wbcg_ui_update_end (wbcg
);
2484 cb_visibility (char const *action
, GtkWidget
*orig_widget
, WBCGtk
*new_wbcg
)
2486 set_visibility (new_wbcg
, action
, gtk_widget_get_visible (orig_widget
));
2490 wbcg_copy_toolbar_visibility (WBCGtk
*new_wbcg
,
2493 g_hash_table_foreach (wbcg
->visibility_widgets
,
2494 (GHFunc
)cb_visibility
, new_wbcg
);
2499 wbcg_set_end_mode (WBCGtk
*wbcg
, gboolean flag
)
2501 g_return_if_fail (GNM_IS_WBC_GTK (wbcg
));
2503 if (!wbcg
->last_key_was_end
!= !flag
) {
2504 const char *txt
= flag
? _("END") : "";
2505 wbcg_set_status_text (wbcg
, txt
);
2506 wbcg
->last_key_was_end
= flag
;
2510 static PangoFontDescription
*
2511 settings_get_font_desc (GtkSettings
*settings
)
2513 PangoFontDescription
*font_desc
;
2516 g_object_get (settings
, "gtk-font-name", &font_str
, NULL
);
2517 font_desc
= pango_font_description_from_string (
2518 font_str
? font_str
: "sans 10");
2525 cb_update_item_bar_font (GtkWidget
*w
)
2527 SheetControlGUI
*scg
= get_scg (w
);
2528 sc_resize ((SheetControl
*)scg
, TRUE
);
2532 cb_desktop_font_changed (GtkSettings
*settings
, GParamSpec
*pspec
,
2535 if (wbcg
->font_desc
)
2536 pango_font_description_free (wbcg
->font_desc
);
2537 wbcg
->font_desc
= settings_get_font_desc (settings
);
2538 gtk_container_foreach (GTK_CONTAINER (wbcg
->snotebook
),
2539 (GtkCallback
)cb_update_item_bar_font
, NULL
);
2543 wbcg_get_screen (WBCGtk
*wbcg
)
2545 return gtk_widget_get_screen (wbcg
->notebook_area
);
2548 static GtkSettings
*
2549 wbcg_get_gtk_settings (WBCGtk
*wbcg
)
2551 return gtk_settings_get_for_screen (wbcg_get_screen (wbcg
));
2554 /* ------------------------------------------------------------------------- */
2557 show_gui (WBCGtk
*wbcg
)
2559 SheetControlGUI
*scg
;
2560 WorkbookView
*wbv
= wb_control_view (GNM_WBC (wbcg
));
2564 GdkScreen
*screen
= wbcg_get_screen (wbcg
);
2566 /* In a Xinerama setup, we want the geometry of the actual display
2567 * unit, if available. See bug 59902. */
2568 gdk_screen_get_monitor_geometry (screen
, 0, &rect
);
2569 sx
= MAX (rect
.width
, 600);
2570 sy
= MAX (rect
.height
, 200);
2572 fx
= gnm_conf_get_core_gui_window_x ();
2573 fy
= gnm_conf_get_core_gui_window_y ();
2575 /* Successfully parsed geometry string and urged WM to comply */
2576 if (NULL
!= wbcg
->preferred_geometry
&& NULL
!= wbcg
->toplevel
&&
2577 gtk_window_parse_geometry (GTK_WINDOW (wbcg
->toplevel
),
2578 wbcg
->preferred_geometry
)) {
2579 g_free (wbcg
->preferred_geometry
);
2580 wbcg
->preferred_geometry
= NULL
;
2581 } else if (wbcg
->snotebook
!= NULL
&&
2583 (wbv
->preferred_width
> 0 || wbv
->preferred_height
> 0)) {
2584 /* Set grid size to preferred width */
2585 int pwidth
= MIN(wbv
->preferred_width
, gdk_screen_get_width (screen
));
2586 int pheight
= MIN(wbv
->preferred_height
, gdk_screen_get_height (screen
));
2587 GtkRequisition requisition
;
2589 pwidth
= pwidth
> 0 ? pwidth
: -1;
2590 pheight
= pheight
> 0 ? pheight
: -1;
2591 gtk_widget_set_size_request (GTK_WIDGET (wbcg
->notebook_area
),
2593 gtk_widget_get_preferred_size (GTK_WIDGET (wbcg
->toplevel
),
2594 &requisition
, NULL
);
2595 /* We want to test if toplevel is bigger than screen.
2596 * gtk_widget_size_request tells us the space
2597 * allocated to the toplevel proper, but not how much is
2598 * need for WM decorations or a possible panel.
2600 * The test below should very rarely maximize when there is
2601 * actually room on the screen.
2603 * We maximize instead of resizing for two reasons:
2604 * - The preferred width / height is restored with one click on
2606 * - We don't have to guess what size we should resize to.
2608 if (requisition
.height
+ 20 > rect
.height
||
2609 requisition
.width
> rect
.width
) {
2610 gtk_window_maximize (GTK_WINDOW (wbcg
->toplevel
));
2612 gtk_window_set_default_size
2613 (wbcg_toplevel (wbcg
),
2614 requisition
.width
, requisition
.height
);
2618 gtk_window_set_default_size (wbcg_toplevel (wbcg
), sx
* fx
, sy
* fy
);
2621 scg
= wbcg_cur_scg (wbcg
);
2623 wbcg_set_direction (scg
);
2625 gtk_widget_show (GTK_WIDGET (wbcg_toplevel (wbcg
)));
2627 /* rehide headers if necessary */
2628 if (NULL
!= scg
&& wbcg_cur_sheet (wbcg
))
2629 scg_adjust_preferences (scg
);
2631 gtk_widget_set_size_request (GTK_WIDGET (wbcg
->notebook_area
),
2637 wbcg_get_label_for_position (WBCGtk
*wbcg
, GtkWidget
*source
,
2641 GtkWidget
*last_visible
= NULL
;
2643 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), NULL
);
2645 n
= wbcg_get_n_scg (wbcg
);
2646 for (i
= 0; i
< n
; i
++) {
2647 GtkWidget
*label
= gnm_notebook_get_nth_label (wbcg
->bnotebook
, i
);
2651 if (!gtk_widget_get_visible (label
))
2654 gtk_widget_get_allocation (label
, &la
);
2660 * We are left of this label's right edge. Use it
2661 * even if we are far left of the label.
2666 last_visible
= label
;
2669 return last_visible
;
2673 wbcg_is_local_drag (WBCGtk
*wbcg
, GtkWidget
*source_widget
)
2675 GtkWidget
*top
= (GtkWidget
*)wbcg_toplevel (wbcg
);
2676 return GNM_IS_PANE (source_widget
) &&
2677 gtk_widget_get_toplevel (source_widget
) == top
;
2680 cb_wbcg_drag_motion (GtkWidget
*widget
, GdkDragContext
*context
,
2681 gint x
, gint y
, guint time
, WBCGtk
*wbcg
)
2683 GtkWidget
*source_widget
= gtk_drag_get_source_widget (context
);
2685 if (GNM_IS_NOTEBOOK (gtk_widget_get_parent (source_widget
))) {
2686 /* The user wants to reorder sheets. We simulate a
2687 * drag motion over a label.
2689 GtkWidget
*label
= wbcg_get_label_for_position (wbcg
, source_widget
, x
);
2690 return cb_sheet_label_drag_motion (label
, context
, x
, y
,
2692 } else if (wbcg_is_local_drag (wbcg
, source_widget
))
2693 gnm_pane_object_autoscroll (GNM_PANE (source_widget
),
2694 context
, x
, y
, time
);
2700 cb_wbcg_drag_leave (GtkWidget
*widget
, GdkDragContext
*context
,
2701 guint time
, WBCGtk
*wbcg
)
2703 GtkWidget
*source_widget
= gtk_drag_get_source_widget (context
);
2705 g_return_if_fail (GNM_IS_WBC_GTK (wbcg
));
2707 if (GNM_IS_NOTEBOOK (gtk_widget_get_parent (source_widget
)))
2709 g_object_get_data (G_OBJECT (source_widget
), "arrow"));
2710 else if (wbcg_is_local_drag (wbcg
, source_widget
))
2711 gnm_pane_slide_stop (GNM_PANE (source_widget
));
2715 cb_wbcg_drag_data_received (GtkWidget
*widget
, GdkDragContext
*context
,
2716 gint x
, gint y
, GtkSelectionData
*selection_data
,
2717 guint info
, guint time
, WBCGtk
*wbcg
)
2719 gchar
*target_type
= gdk_atom_name (gtk_selection_data_get_target (selection_data
));
2721 if (!strcmp (target_type
, "text/uri-list")) { /* filenames from nautilus */
2722 scg_drag_data_received (wbcg_cur_scg (wbcg
),
2723 gtk_drag_get_source_widget (context
), 0, 0,
2725 } else if (!strcmp (target_type
, "GNUMERIC_SHEET")) {
2726 /* The user wants to reorder the sheets but hasn't dropped
2727 * the sheet onto a label. Never mind. We figure out
2728 * where the arrow is currently located and simulate a drop
2730 GtkWidget
*label
= wbcg_get_label_for_position (wbcg
,
2731 gtk_drag_get_source_widget (context
), x
);
2732 cb_sheet_label_drag_data_received (label
, context
, x
, y
,
2733 selection_data
, info
, time
, wbcg
);
2735 GtkWidget
*source_widget
= gtk_drag_get_source_widget (context
);
2736 if (wbcg_is_local_drag (wbcg
, source_widget
))
2737 g_printerr ("autoscroll complete - stop it\n");
2739 scg_drag_data_received (wbcg_cur_scg (wbcg
),
2740 source_widget
, 0, 0, selection_data
);
2742 g_free (target_type
);
2745 static void cb_cs_go_up (WBCGtk
*wbcg
)
2746 { wb_control_navigate_to_cell (GNM_WBC (wbcg
), navigator_top
); }
2747 static void cb_cs_go_down (WBCGtk
*wbcg
)
2748 { wb_control_navigate_to_cell (GNM_WBC (wbcg
), navigator_bottom
); }
2749 static void cb_cs_go_left (WBCGtk
*wbcg
)
2750 { wb_control_navigate_to_cell (GNM_WBC (wbcg
), navigator_first
); }
2751 static void cb_cs_go_right (WBCGtk
*wbcg
)
2752 { wb_control_navigate_to_cell (GNM_WBC (wbcg
), navigator_last
); }
2753 static void cb_cs_go_to_cell (WBCGtk
*wbcg
) { dialog_goto_cell (wbcg
); }
2756 wbc_gtk_cell_selector_popup (G_GNUC_UNUSED GtkEntry
*entry
,
2757 G_GNUC_UNUSED GtkEntryIconPosition icon_pos
,
2758 G_GNUC_UNUSED GdkEvent
*event
,
2761 if (event
->type
== GDK_BUTTON_PRESS
) {
2762 WBCGtk
*wbcg
= data
;
2764 struct CellSelectorMenu
{
2766 void (*function
) (WBCGtk
*wbcg
);
2767 } const cell_selector_actions
[] = {
2768 { N_("Go to Top"), &cb_cs_go_up
},
2769 { N_("Go to Bottom"), &cb_cs_go_down
},
2770 { N_("Go to First"), &cb_cs_go_left
},
2771 { N_("Go to Last"), &cb_cs_go_right
},
2773 { N_("Go to Cell..."), &cb_cs_go_to_cell
}
2776 GtkWidget
*item
, *menu
= gtk_menu_new ();
2777 gboolean active
= (!wbcg_is_editing (wbcg
) &&
2778 NULL
== wbc_gtk_get_guru (wbcg
));
2780 for (ui
= 0; ui
< G_N_ELEMENTS (cell_selector_actions
); ui
++) {
2781 const struct CellSelectorMenu
*it
=
2782 cell_selector_actions
+ ui
;
2784 item
= gtk_image_menu_item_new_with_label
2787 item
= gtk_separator_menu_item_new ();
2790 g_signal_connect_swapped
2791 (G_OBJECT (item
), "activate",
2792 G_CALLBACK (it
->function
), wbcg
);
2793 gtk_widget_set_sensitive (item
, active
);
2794 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
2795 gtk_widget_show (item
);
2798 gnumeric_popup_menu (GTK_MENU (menu
), event
);
2803 wbc_gtk_create_edit_area (WBCGtk
*wbcg
)
2808 GtkWidget
*debug_button
;
2810 wbc_gtk_init_editline (wbcg
);
2811 entry
= wbcg_get_entry (wbcg
);
2813 /* Set a reasonable width for the selection box. */
2814 len
= gnm_widget_measure_string
2815 (GTK_WIDGET (wbcg_toplevel (wbcg
)),
2816 cell_coord_name (GNM_MAX_COLS
- 1, GNM_MAX_ROWS
- 1));
2818 * Add a little extra since font might be proportional and since
2819 * we also put user defined names there.
2822 gtk_widget_set_size_request (wbcg
->selection_descriptor
, len
, -1);
2824 g_signal_connect_swapped (wbcg
->cancel_button
,
2825 "clicked", G_CALLBACK (cb_cancel_input
),
2828 g_signal_connect_swapped (wbcg
->ok_button
,
2829 "clicked", G_CALLBACK (cb_accept_input
),
2831 gtk_menu_tool_button_set_menu (GTK_MENU_TOOL_BUTTON (wbcg
->ok_button
),
2833 gtk_menu_tool_button_set_arrow_tooltip_text
2834 (GTK_MENU_TOOL_BUTTON (wbcg
->ok_button
),
2835 _("Accept change in multiple cells"));
2836 g_signal_connect (wbcg
->ok_button
,
2837 "show-menu", G_CALLBACK (cb_accept_input_menu
),
2840 g_signal_connect_swapped (wbcg
->func_button
,
2841 "clicked", G_CALLBACK (cb_autofunction
),
2844 /* Dependency debugger */
2845 debug_button
= GET_GUI_ITEM ("debug_button");
2846 if (gnm_debug_flag ("notebook-size") ||
2847 gnm_debug_flag ("deps") ||
2848 gnm_debug_flag ("expr-sharer") ||
2849 gnm_debug_flag ("style-optimize") ||
2850 gnm_debug_flag ("name-collections")) {
2851 g_signal_connect_swapped (debug_button
,
2852 "clicked", G_CALLBACK (cb_workbook_debug_info
),
2855 gtk_widget_destroy (debug_button
);
2858 item
= GET_GUI_ITEM ("edit_line_entry_item");
2859 gtk_container_add (GTK_CONTAINER (item
),
2860 GTK_WIDGET (wbcg
->edit_line
.entry
));
2861 gtk_widget_show_all (GTK_WIDGET (item
));
2863 /* Do signal setup for the editing input line */
2864 g_signal_connect (G_OBJECT (entry
),
2866 G_CALLBACK (cb_editline_focus_in
), wbcg
);
2869 g_signal_connect (G_OBJECT (wbcg
->selection_descriptor
),
2871 G_CALLBACK (cb_statusbox_activate
), wbcg
);
2872 g_signal_connect (G_OBJECT (wbcg
->selection_descriptor
),
2874 G_CALLBACK (cb_statusbox_focus
), wbcg
);
2876 gtk_entry_set_icon_from_icon_name
2877 (GTK_ENTRY (wbcg
->selection_descriptor
),
2878 GTK_ENTRY_ICON_SECONDARY
, "go-jump");
2879 gtk_entry_set_icon_sensitive
2880 (GTK_ENTRY (wbcg
->selection_descriptor
),
2881 GTK_ENTRY_ICON_SECONDARY
, TRUE
);
2882 gtk_entry_set_icon_activatable
2883 (GTK_ENTRY (wbcg
->selection_descriptor
),
2884 GTK_ENTRY_ICON_SECONDARY
, TRUE
);
2886 g_signal_connect (G_OBJECT (wbcg
->selection_descriptor
),
2889 (wbc_gtk_cell_selector_popup
),
2894 wbcg_validation_msg (WorkbookControl
*wbc
, ValidationStyle v
,
2895 char const *title
, char const *msg
)
2897 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
2898 ValidationStatus res0
, res1
= GNM_VALIDATION_STATUS_VALID
; /* supress warning */
2899 char const *btn0
, *btn1
;
2900 GtkMessageType type
;
2905 case GNM_VALIDATION_STYLE_STOP
:
2906 res0
= GNM_VALIDATION_STATUS_INVALID_EDIT
;
2907 btn0
= _("_Re-Edit");
2908 res1
= GNM_VALIDATION_STATUS_INVALID_DISCARD
;
2909 btn1
= _("_Discard");
2910 type
= GTK_MESSAGE_ERROR
;
2912 case GNM_VALIDATION_STYLE_WARNING
:
2913 res0
= GNM_VALIDATION_STATUS_VALID
;
2914 btn0
= _("_Accept");
2915 res1
= GNM_VALIDATION_STATUS_INVALID_DISCARD
;
2916 btn1
= _("_Discard");
2917 type
= GTK_MESSAGE_WARNING
;
2919 case GNM_VALIDATION_STYLE_INFO
:
2920 res0
= GNM_VALIDATION_STATUS_VALID
;
2921 btn0
= GNM_STOCK_OK
;
2923 type
= GTK_MESSAGE_INFO
;
2925 case GNM_VALIDATION_STYLE_PARSE_ERROR
:
2926 res0
= GNM_VALIDATION_STATUS_INVALID_EDIT
;
2927 btn0
= _("_Re-Edit");
2928 res1
= GNM_VALIDATION_STATUS_VALID
;
2929 btn1
= _("_Accept");
2930 type
= GTK_MESSAGE_ERROR
;
2934 g_assert_not_reached ();
2937 dialog
= gtk_message_dialog_new (wbcg_toplevel (wbcg
),
2938 GTK_DIALOG_DESTROY_WITH_PARENT
,
2939 type
, GTK_BUTTONS_NONE
, "%s", msg
);
2940 gtk_dialog_add_buttons (GTK_DIALOG (dialog
),
2941 btn0
, GTK_RESPONSE_YES
,
2942 btn1
, GTK_RESPONSE_NO
,
2944 /* TODO : what to use if nothing is specified ? */
2945 /* TODO : do we want the document name here too ? */
2947 gtk_window_set_title (GTK_WINDOW (dialog
), title
);
2948 gtk_dialog_set_default_response (GTK_DIALOG (dialog
), GTK_RESPONSE_NO
);
2949 response
= go_gtk_dialog_run (GTK_DIALOG (dialog
),
2950 wbcg_toplevel (wbcg
));
2951 return ((response
== GTK_RESPONSE_NO
|| response
== GTK_RESPONSE_CANCEL
) ? res1
: res0
);
2954 #define DISCONNECT(obj,field) \
2955 if (wbcg->field) { \
2957 g_signal_handler_disconnect (obj, wbcg->field); \
2962 wbcg_view_changed (WBCGtk
*wbcg
,
2963 G_GNUC_UNUSED GParamSpec
*pspec
,
2966 WorkbookControl
*wbc
= GNM_WBC (wbcg
);
2967 Workbook
*wb
= wb_control_get_workbook (wbc
);
2968 WorkbookView
*wbv
= wb_control_view (wbc
);
2970 /* Reconnect self because we need to change data. */
2971 DISCONNECT (wbc
, sig_view_changed
);
2972 wbcg
->sig_view_changed
=
2973 g_signal_connect_object
2976 G_CALLBACK (wbcg_view_changed
),
2980 DISCONNECT (wbcg
->sig_wbv
, sig_auto_expr_text
);
2981 DISCONNECT (wbcg
->sig_wbv
, sig_auto_expr_attrs
);
2982 DISCONNECT (wbcg
->sig_wbv
, sig_show_horizontal_scrollbar
);
2983 DISCONNECT (wbcg
->sig_wbv
, sig_show_vertical_scrollbar
);
2984 DISCONNECT (wbcg
->sig_wbv
, sig_show_notebook_tabs
);
2986 g_object_remove_weak_pointer (wbcg
->sig_wbv
,
2988 wbcg
->sig_wbv
= wbv
;
2990 g_object_add_weak_pointer (wbcg
->sig_wbv
,
2992 wbcg
->sig_auto_expr_text
=
2993 g_signal_connect_object
2995 "notify::auto-expr-value",
2996 G_CALLBACK (wbcg_auto_expr_value_changed
),
2999 wbcg_auto_expr_value_changed (wbv
, NULL
, wbcg
);
3001 wbcg
->sig_show_horizontal_scrollbar
=
3002 g_signal_connect_object
3004 "notify::show-horizontal-scrollbar",
3005 G_CALLBACK (wbcg_scrollbar_visibility
),
3008 wbcg
->sig_show_vertical_scrollbar
=
3009 g_signal_connect_object
3011 "notify::show-vertical-scrollbar",
3012 G_CALLBACK (wbcg_scrollbar_visibility
),
3015 wbcg
->sig_show_notebook_tabs
=
3016 g_signal_connect_object
3018 "notify::show-notebook-tabs",
3019 G_CALLBACK (wbcg_notebook_tabs_visibility
),
3022 wbcg_notebook_tabs_visibility (wbv
, NULL
, wbcg
);
3025 DISCONNECT (old_wb
, sig_sheet_order
);
3026 DISCONNECT (old_wb
, sig_notify_uri
);
3027 DISCONNECT (old_wb
, sig_notify_dirty
);
3030 wbcg
->sig_sheet_order
=
3031 g_signal_connect_object
3033 "sheet-order-changed",
3034 G_CALLBACK (wbcg_sheet_order_changed
),
3035 wbcg
, G_CONNECT_SWAPPED
);
3037 wbcg
->sig_notify_uri
=
3038 g_signal_connect_object
3041 G_CALLBACK (wbcg_update_title
),
3042 wbcg
, G_CONNECT_SWAPPED
);
3044 wbcg
->sig_notify_dirty
=
3045 g_signal_connect_object
3048 G_CALLBACK (wbcg_update_title
),
3049 wbcg
, G_CONNECT_SWAPPED
);
3051 wbcg_update_title (wbcg
);
3057 /***************************************************************************/
3059 static GOActionComboStack
*
3060 ur_stack (WorkbookControl
*wbc
, gboolean is_undo
)
3062 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
3063 return is_undo
? wbcg
->undo_haction
: wbcg
->redo_haction
;
3067 wbc_gtk_undo_redo_truncate (WorkbookControl
*wbc
, int n
, gboolean is_undo
)
3069 go_action_combo_stack_truncate (ur_stack (wbc
, is_undo
), n
);
3073 wbc_gtk_undo_redo_pop (WorkbookControl
*wbc
, gboolean is_undo
)
3075 go_action_combo_stack_pop (ur_stack (wbc
, is_undo
), 1);
3079 wbc_gtk_undo_redo_push (WorkbookControl
*wbc
, gboolean is_undo
,
3080 char const *text
, gpointer key
)
3082 go_action_combo_stack_push (ur_stack (wbc
, is_undo
), text
, key
);
3085 /****************************************************************************/
3088 set_font_name_feedback (GtkAction
*act
, const char *family
)
3090 PangoFontDescription
*desc
= pango_font_description_new ();
3091 pango_font_description_set_family (desc
, family
);
3092 wbcg_font_action_set_font_desc (act
, desc
);
3093 pango_font_description_free (desc
);
3097 set_font_size_feedback (GtkAction
*act
, double size
)
3099 PangoFontDescription
*desc
= pango_font_description_new ();
3100 pango_font_description_set_size (desc
, size
* PANGO_SCALE
);
3101 wbcg_font_action_set_font_desc (act
, desc
);
3102 pango_font_description_free (desc
);
3105 /****************************************************************************/
3107 static WorkbookControl
*
3108 wbc_gtk_control_new (G_GNUC_UNUSED WorkbookControl
*wbc
,
3113 return (WorkbookControl
*)wbc_gtk_new (wbv
, wb
,
3114 extra
? GDK_SCREEN (extra
) : NULL
, NULL
);
3118 wbc_gtk_init_state (WorkbookControl
*wbc
)
3120 WorkbookView
*wbv
= wb_control_view (wbc
);
3121 WBCGtk
*wbcg
= WBC_GTK (wbc
);
3123 /* Share a colour history for all a view's controls */
3124 go_action_combo_color_set_group (wbcg
->back_color
, wbv
);
3125 go_action_combo_color_set_group (wbcg
->fore_color
, wbv
);
3129 wbc_gtk_style_feedback_real (WorkbookControl
*wbc
, GnmStyle
const *changes
)
3131 WorkbookView
*wb_view
= wb_control_view (wbc
);
3132 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
3134 g_return_if_fail (wb_view
!= NULL
);
3136 if (!wbcg_ui_update_begin (WBC_GTK (wbc
)))
3139 if (changes
== NULL
)
3140 changes
= wb_view
->current_style
;
3142 if (gnm_style_is_element_set (changes
, MSTYLE_FONT_BOLD
))
3143 gtk_toggle_action_set_active (wbcg
->font
.bold
,
3144 gnm_style_get_font_bold (changes
));
3145 if (gnm_style_is_element_set (changes
, MSTYLE_FONT_ITALIC
))
3146 gtk_toggle_action_set_active (wbcg
->font
.italic
,
3147 gnm_style_get_font_italic (changes
));
3148 if (gnm_style_is_element_set (changes
, MSTYLE_FONT_UNDERLINE
)) {
3149 gtk_toggle_action_set_active (wbcg
->font
.underline
,
3150 gnm_style_get_font_uline (changes
) == UNDERLINE_SINGLE
);
3151 gtk_toggle_action_set_active (wbcg
->font
.d_underline
,
3152 gnm_style_get_font_uline (changes
) == UNDERLINE_DOUBLE
);
3153 gtk_toggle_action_set_active (wbcg
->font
.sl_underline
,
3154 gnm_style_get_font_uline (changes
) == UNDERLINE_SINGLE_LOW
);
3155 gtk_toggle_action_set_active (wbcg
->font
.dl_underline
,
3156 gnm_style_get_font_uline (changes
) == UNDERLINE_DOUBLE_LOW
);
3158 if (gnm_style_is_element_set (changes
, MSTYLE_FONT_STRIKETHROUGH
))
3159 gtk_toggle_action_set_active (wbcg
->font
.strikethrough
,
3160 gnm_style_get_font_strike (changes
));
3162 if (gnm_style_is_element_set (changes
, MSTYLE_FONT_SCRIPT
)) {
3163 gtk_toggle_action_set_active (wbcg
->font
.superscript
,
3164 gnm_style_get_font_script (changes
) == GO_FONT_SCRIPT_SUPER
);
3165 gtk_toggle_action_set_active (wbcg
->font
.subscript
,
3166 gnm_style_get_font_script (changes
) == GO_FONT_SCRIPT_SUB
);
3168 gtk_toggle_action_set_active (wbcg
->font
.superscript
, FALSE
);
3169 gtk_toggle_action_set_active (wbcg
->font
.subscript
, FALSE
);
3172 if (gnm_style_is_element_set (changes
, MSTYLE_ALIGN_H
)) {
3173 GnmHAlign align
= gnm_style_get_align_h (changes
);
3174 gtk_toggle_action_set_active (wbcg
->h_align
.left
,
3175 align
== GNM_HALIGN_LEFT
);
3176 gtk_toggle_action_set_active (wbcg
->h_align
.center
,
3177 align
== GNM_HALIGN_CENTER
);
3178 gtk_toggle_action_set_active (wbcg
->h_align
.right
,
3179 align
== GNM_HALIGN_RIGHT
);
3180 gtk_toggle_action_set_active (wbcg
->h_align
.center_across_selection
,
3181 align
== GNM_HALIGN_CENTER_ACROSS_SELECTION
);
3182 go_action_combo_pixmaps_select_id (wbcg
->halignment
, align
);
3184 if (gnm_style_is_element_set (changes
, MSTYLE_ALIGN_V
)) {
3185 GnmVAlign align
= gnm_style_get_align_v (changes
);
3186 gtk_toggle_action_set_active (wbcg
->v_align
.top
,
3187 align
== GNM_VALIGN_TOP
);
3188 gtk_toggle_action_set_active (wbcg
->v_align
.bottom
,
3189 align
== GNM_VALIGN_BOTTOM
);
3190 gtk_toggle_action_set_active (wbcg
->v_align
.center
,
3191 align
== GNM_VALIGN_CENTER
);
3192 go_action_combo_pixmaps_select_id (wbcg
->valignment
, align
);
3195 if (gnm_style_is_element_set (changes
, MSTYLE_FONT_SIZE
)) {
3196 set_font_size_feedback (wbcg
->font_name_haction
,
3197 gnm_style_get_font_size (changes
));
3198 set_font_size_feedback (wbcg
->font_name_vaction
,
3199 gnm_style_get_font_size (changes
));
3202 if (gnm_style_is_element_set (changes
, MSTYLE_FONT_NAME
)) {
3203 set_font_name_feedback (wbcg
->font_name_haction
,
3204 gnm_style_get_font_name (changes
));
3205 set_font_name_feedback (wbcg
->font_name_vaction
,
3206 gnm_style_get_font_name (changes
));
3209 wbcg_ui_update_end (WBC_GTK (wbc
));
3213 cb_wbc_gtk_style_feedback (WBCGtk
*gtk
)
3215 wbc_gtk_style_feedback_real ((WorkbookControl
*)gtk
, NULL
);
3216 gtk
->idle_update_style_feedback
= 0;
3220 wbc_gtk_style_feedback (WorkbookControl
*wbc
, GnmStyle
const *changes
)
3222 WBCGtk
*wbcg
= (WBCGtk
*)wbc
;
3225 wbc_gtk_style_feedback_real (wbc
, changes
);
3226 else if (0 == wbcg
->idle_update_style_feedback
)
3227 wbcg
->idle_update_style_feedback
= g_timeout_add (200,
3228 (GSourceFunc
) cb_wbc_gtk_style_feedback
, wbc
);
3232 cb_handlebox_dock_status (GtkHandleBox
*hb
,
3233 GtkToolbar
*toolbar
, gpointer pattached
)
3235 gboolean attached
= GPOINTER_TO_INT (pattached
);
3236 gtk_toolbar_set_show_arrow (toolbar
, attached
);
3240 get_accel_label (GtkMenuItem
*item
, guint
*key
)
3242 GList
*children
= gtk_container_get_children (GTK_CONTAINER (item
));
3244 char const *res
= NULL
;
3246 *key
= GDK_KEY_VoidSymbol
;
3247 for (l
= children
; l
; l
= l
->next
) {
3248 GtkWidget
*w
= l
->data
;
3250 if (GTK_IS_ACCEL_LABEL (w
)) {
3251 *key
= gtk_label_get_mnemonic_keyval (GTK_LABEL (w
));
3252 res
= gtk_label_get_label (GTK_LABEL (w
));
3257 g_list_free (children
);
3262 check_underlines (GtkWidget
*w
, char const *path
)
3264 GList
*children
= gtk_container_get_children (GTK_CONTAINER (w
));
3265 GHashTable
*used
= g_hash_table_new_full (NULL
, NULL
, NULL
, (GDestroyNotify
)g_free
);
3268 for (l
= children
; l
; l
= l
->next
) {
3269 GtkMenuItem
*item
= GTK_MENU_ITEM (l
->data
);
3270 GtkWidget
*sub
= gtk_menu_item_get_submenu (item
);
3272 char const *label
= get_accel_label (item
, &key
);
3275 char *newpath
= g_strconcat (path
, *path
? "->" : "", label
, NULL
);
3276 check_underlines (sub
, newpath
);
3280 if (key
!= GDK_KEY_VoidSymbol
) {
3281 char const *prev
= g_hash_table_lookup (used
, GUINT_TO_POINTER (key
));
3283 /* xgettext: Translators: if this warning shows up when
3284 * running Gnumeric in your locale, the underlines need
3285 * to be moved in strings representing menu entries.
3286 * One slightly tricky point here is that in certain cases,
3287 * the same menu entry shows up in more than one menu.
3289 g_warning (_("In the `%s' menu, the key `%s' is used for both `%s' and `%s'."),
3290 path
, gdk_keyval_name (key
), prev
, label
);
3292 g_hash_table_insert (used
, GUINT_TO_POINTER (key
), g_strdup (label
));
3296 g_list_free (children
);
3297 g_hash_table_destroy (used
);
3300 /****************************************************************************/
3301 /* window list menu */
3304 cb_window_menu_activate (GObject
*action
, WBCGtk
*wbcg
)
3306 gtk_window_present (wbcg_toplevel (wbcg
));
3310 regenerate_window_menu (WBCGtk
*gtk
, Workbook
*wb
, unsigned i
)
3313 char *basename
= GO_DOC (wb
)->uri
3314 ? go_basename_from_uri (GO_DOC (wb
)->uri
)
3317 /* How many controls are there? */
3319 WORKBOOK_FOREACH_CONTROL (wb
, wbv
, wbc
, {
3320 if (GNM_IS_WBC_GTK (wbc
))
3325 WORKBOOK_FOREACH_CONTROL (wb
, wbv
, wbc
, {
3328 if (GNM_IS_WBC_GTK (wbc
) && basename
) {
3329 GString
*label
= g_string_new (NULL
);
3332 GtkActionEntry entry
;
3334 if (i
< 10) g_string_append_c (label
, '_');
3335 g_string_append_printf (label
, "%d ", i
);
3337 for (s
= basename
; *s
; s
++) {
3339 g_string_append_c (label
, '_');
3340 g_string_append_c (label
, *s
);
3344 g_string_append_printf (label
, " #%d", k
++);
3346 entry
.name
= name
= g_strdup_printf ("WindowListEntry%d", i
);
3347 entry
.stock_id
= NULL
;
3348 entry
.label
= label
->str
;
3349 entry
.accelerator
= NULL
;
3350 entry
.tooltip
= NULL
;
3351 entry
.callback
= G_CALLBACK (cb_window_menu_activate
);
3353 gtk_action_group_add_actions (gtk
->windows
.actions
,
3356 g_string_free (label
, TRUE
);
3365 cb_regenerate_window_menu (WBCGtk
*gtk
)
3367 Workbook
*wb
= wb_control_get_workbook (GNM_WBC (gtk
));
3371 /* This can happen during exit. */
3375 if (gtk
->windows
.merge_id
!= 0)
3376 gtk_ui_manager_remove_ui (gtk
->ui
, gtk
->windows
.merge_id
);
3377 gtk
->windows
.merge_id
= gtk_ui_manager_new_merge_id (gtk
->ui
);
3379 if (gtk
->windows
.actions
!= NULL
) {
3380 gtk_ui_manager_remove_action_group (gtk
->ui
,
3381 gtk
->windows
.actions
);
3382 g_object_unref (gtk
->windows
.actions
);
3384 gtk
->windows
.actions
= gtk_action_group_new ("WindowList");
3386 gtk_ui_manager_insert_action_group (gtk
->ui
, gtk
->windows
.actions
, 0);
3388 /* create the actions */
3389 i
= regenerate_window_menu (gtk
, wb
, 1); /* current wb first */
3390 for (ptr
= gnm_app_workbook_list (); ptr
!= NULL
; ptr
= ptr
->next
)
3391 if (ptr
->data
!= wb
)
3392 i
= regenerate_window_menu (gtk
, ptr
->data
, i
);
3396 char *name
= g_strdup_printf ("WindowListEntry%d", i
);
3397 gtk_ui_manager_add_ui (gtk
->ui
, gtk
->windows
.merge_id
,
3398 "/menubar/View/Windows", name
, name
,
3399 GTK_UI_MANAGER_AUTO
, TRUE
);
3405 GtkActionGroup
*actions
;
3410 cb_custom_ui_handler (GObject
*gtk_action
, WorkbookControl
*wbc
)
3412 GnmAction
*action
= g_object_get_data (gtk_action
, "GnmAction");
3413 GnmAppExtraUI
*extra_ui
= g_object_get_data (gtk_action
, "ExtraUI");
3415 g_return_if_fail (action
!= NULL
);
3416 g_return_if_fail (action
->handler
!= NULL
);
3417 g_return_if_fail (extra_ui
!= NULL
);
3419 action
->handler (action
, wbc
, extra_ui
->user_data
);
3423 cb_add_custom_ui (G_GNUC_UNUSED GnmApp
*app
,
3424 GnmAppExtraUI
*extra_ui
, WBCGtk
*gtk
)
3426 CustomUIHandle
*details
;
3428 GError
*error
= NULL
;
3429 const char *ui_substr
;
3431 details
= g_new0 (CustomUIHandle
, 1);
3432 details
->actions
= gtk_action_group_new (extra_ui
->group_name
);
3434 for (ptr
= extra_ui
->actions
; ptr
!= NULL
; ptr
= ptr
->next
) {
3435 GnmAction
*action
= ptr
->data
;
3437 GtkActionEntry entry
;
3439 entry
.name
= action
->id
;
3440 entry
.stock_id
= action
->icon_name
;
3441 entry
.label
= action
->label
;
3442 entry
.accelerator
= NULL
;
3443 entry
.tooltip
= NULL
;
3444 entry
.callback
= G_CALLBACK (cb_custom_ui_handler
);
3445 gtk_action_group_add_actions (details
->actions
, &entry
, 1, gtk
);
3446 res
= gtk_action_group_get_action (details
->actions
, action
->id
);
3447 g_object_set_data (G_OBJECT (res
), "GnmAction", action
);
3448 g_object_set_data (G_OBJECT (res
), "ExtraUI", extra_ui
);
3450 gtk_ui_manager_insert_action_group (gtk
->ui
, details
->actions
, 0);
3452 ui_substr
= strstr (extra_ui
->layout
, "<ui>");
3453 if (ui_substr
== extra_ui
->layout
)
3456 details
->merge_id
= gtk_ui_manager_add_ui_from_string
3457 (gtk
->ui
, extra_ui
->layout
, -1, ui_substr
? NULL
: &error
);
3458 if (details
->merge_id
== 0 && ui_substr
) {
3459 /* Work around bug 569724. */
3460 details
->merge_id
= gtk_ui_manager_add_ui_from_string
3461 (gtk
->ui
, ui_substr
, -1, &error
);
3465 g_message ("building menus failed: %s", error
->message
);
3466 g_error_free (error
);
3467 gtk_ui_manager_remove_action_group (gtk
->ui
, details
->actions
);
3468 g_object_unref (details
->actions
);
3471 g_hash_table_insert (gtk
->custom_uis
, extra_ui
, details
);
3475 cb_remove_custom_ui (G_GNUC_UNUSED GnmApp
*app
,
3476 GnmAppExtraUI
*extra_ui
, WBCGtk
*gtk
)
3478 CustomUIHandle
*details
= g_hash_table_lookup (gtk
->custom_uis
, extra_ui
);
3479 if (NULL
!= details
) {
3480 gtk_ui_manager_remove_ui (gtk
->ui
, details
->merge_id
);
3481 gtk_ui_manager_remove_action_group (gtk
->ui
, details
->actions
);
3482 g_object_unref (details
->actions
);
3483 g_hash_table_remove (gtk
->custom_uis
, extra_ui
);
3488 cb_init_extra_ui (GnmAppExtraUI
*extra_ui
, WBCGtk
*gtk
)
3490 cb_add_custom_ui (NULL
, extra_ui
, gtk
);
3493 /****************************************************************************/
3497 set_toolbar_style_for_position (GtkToolbar
*tb
, GtkPositionType pos
)
3499 GtkWidget
*box
= gtk_widget_get_parent (GTK_WIDGET (tb
));
3501 static const GtkOrientation orientations
[] = {
3502 GTK_ORIENTATION_VERTICAL
, GTK_ORIENTATION_VERTICAL
,
3503 GTK_ORIENTATION_HORIZONTAL
, GTK_ORIENTATION_HORIZONTAL
3506 gtk_orientable_set_orientation (GTK_ORIENTABLE (tb
),
3509 if (GTK_IS_HANDLE_BOX (box
)) {
3510 static const GtkPositionType hdlpos
[] = {
3511 GTK_POS_TOP
, GTK_POS_TOP
,
3512 GTK_POS_LEFT
, GTK_POS_LEFT
3515 gtk_handle_box_set_handle_position (GTK_HANDLE_BOX (box
),
3518 if (pos
== GTK_POS_TOP
|| pos
== GTK_POS_BOTTOM
)
3519 g_object_set (G_OBJECT (tb
), "hexpand", TRUE
, "vexpand", FALSE
, NULL
);
3521 g_object_set (G_OBJECT (tb
), "vexpand", TRUE
, "hexpand", FALSE
, NULL
);
3525 set_toolbar_position (GtkToolbar
*tb
, GtkPositionType pos
, WBCGtk
*gtk
)
3527 GtkWidget
*box
= gtk_widget_get_parent (GTK_WIDGET (tb
));
3528 GtkContainer
*zone
= GTK_CONTAINER (gtk_widget_get_parent (GTK_WIDGET (box
)));
3529 GtkContainer
*new_zone
= GTK_CONTAINER (gtk
->toolbar_zones
[pos
]);
3530 char const *name
= g_object_get_data (G_OBJECT (box
), "name");
3531 const char *key
= "toolbar-order";
3532 int n
= GPOINTER_TO_INT (g_object_get_data (G_OBJECT (box
), key
));
3533 GList
*children
, *l
;
3536 if (zone
== new_zone
)
3541 gtk_container_remove (zone
, box
);
3542 set_toolbar_style_for_position (tb
, pos
);
3544 children
= gtk_container_get_children (new_zone
);
3545 for (l
= children
; l
; l
= l
->next
) {
3546 GObject
*child
= l
->data
;
3547 int nc
= GPOINTER_TO_INT (g_object_get_data (child
, key
));
3550 g_list_free (children
);
3552 gtk_container_add (new_zone
, box
);
3553 gtk_container_child_set (new_zone
, box
, "position", cpos
, NULL
);
3555 g_object_unref (box
);
3558 gnm_conf_set_toolbar_position (name
, pos
);
3562 cb_set_toolbar_position (GtkMenuItem
*item
, WBCGtk
*gtk
)
3564 GtkToolbar
*tb
= g_object_get_data (G_OBJECT (item
), "toolbar");
3565 GtkPositionType side
= GPOINTER_TO_INT (g_object_get_data (G_OBJECT (item
), "side"));
3567 if (gtk_check_menu_item_get_active (GTK_CHECK_MENU_ITEM (item
)))
3568 set_toolbar_position (tb
, side
, gtk
);
3572 cb_tcm_hide (GtkWidget
*widget
, GtkWidget
*box
)
3574 gtk_widget_hide (box
);
3578 toolbar_context_menu (GtkToolbar
*tb
, WBCGtk
*gtk
, GdkEvent
*event
)
3580 GtkWidget
*box
= gtk_widget_get_parent (GTK_WIDGET (tb
));
3581 GtkWidget
*zone
= gtk_widget_get_parent (GTK_WIDGET (box
));
3582 GtkWidget
*menu
= gtk_menu_new ();
3584 GSList
*group
= NULL
;
3587 static const struct {
3589 GtkPositionType pos
;
3590 } const pos_items
[] = {
3591 { N_("Display above sheets"), GTK_POS_TOP
},
3592 { N_("Display to the left of sheets"), GTK_POS_LEFT
},
3593 { N_("Display to the right of sheets"), GTK_POS_RIGHT
}
3596 if (gnm_debug_flag ("toolbar-size"))
3597 dump_size_tree (GTK_WIDGET (tb
), GINT_TO_POINTER (0));
3599 for (ui
= 0; ui
< G_N_ELEMENTS (pos_items
); ui
++) {
3600 char const *text
= _(pos_items
[ui
].text
);
3601 GtkPositionType pos
= pos_items
[ui
].pos
;
3603 item
= gtk_radio_menu_item_new_with_label (group
, text
);
3604 group
= gtk_radio_menu_item_get_group (GTK_RADIO_MENU_ITEM (item
));
3606 gtk_check_menu_item_set_active
3607 (GTK_CHECK_MENU_ITEM (item
),
3608 (zone
== gtk
->toolbar_zones
[pos
]));
3610 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
3611 g_object_set_data (G_OBJECT (item
), "toolbar", tb
);
3612 g_object_set_data (G_OBJECT (item
), "side", GINT_TO_POINTER (pos
));
3613 g_signal_connect (G_OBJECT (item
), "activate",
3614 G_CALLBACK (cb_set_toolbar_position
),
3618 item
= gtk_menu_item_new ();
3619 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
3620 gtk_widget_set_sensitive (item
, FALSE
);
3622 item
= gtk_menu_item_new_with_label (_("Hide"));
3623 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
3624 g_signal_connect (G_OBJECT (item
), "activate",
3625 G_CALLBACK (cb_tcm_hide
),
3628 gtk_widget_show_all (menu
);
3629 gnumeric_popup_menu (GTK_MENU (menu
), event
);
3633 cb_toolbar_button_press (GtkToolbar
*tb
, GdkEvent
*event
, WBCGtk
*gtk
)
3635 if (event
->type
== GDK_BUTTON_PRESS
&&
3636 event
->button
.button
== 3) {
3637 toolbar_context_menu (tb
, gtk
, event
);
3645 cb_handlebox_button_press (GtkHandleBox
*hdlbox
, GdkEvent
*event
, WBCGtk
*gtk
)
3647 if (event
->type
== GDK_BUTTON_PRESS
&&
3648 event
->button
.button
== 3) {
3649 GtkToolbar
*tb
= GTK_TOOLBAR (gtk_bin_get_child (GTK_BIN (hdlbox
)));
3650 toolbar_context_menu (tb
, gtk
, event
);
3659 cb_toolbar_activate (GtkToggleAction
*action
, WBCGtk
*wbcg
)
3661 wbcg_toggle_visibility (wbcg
, action
);
3665 cb_toolbar_box_visible (GtkWidget
*box
, G_GNUC_UNUSED GParamSpec
*pspec
,
3668 GtkToggleAction
*toggle_action
= g_object_get_data (
3669 G_OBJECT (box
), "toggle_action");
3670 char const *name
= g_object_get_data (G_OBJECT (box
), "name");
3671 gboolean visible
= gtk_widget_get_visible (box
);
3673 gtk_toggle_action_set_active (toggle_action
, visible
);
3674 if (!wbcg
->is_fullscreen
) {
3676 * We do not persist changes made going-to/while-in/leaving
3679 gnm_conf_set_toolbar_visible (name
, visible
);
3683 static struct ToolbarInfo
{
3685 const char *menu_text
;
3687 } toolbar_info
[] = {
3688 { "StandardToolbar", N_("Standard Toolbar"), "<control>7" },
3689 { "FormatToolbar", N_("Format Toolbar"), NULL
},
3690 { "ObjectToolbar", N_("Object Toolbar"), NULL
},
3691 { NULL
, NULL
, NULL
}
3696 cb_add_menus_toolbars (G_GNUC_UNUSED GtkUIManager
*ui
,
3697 GtkWidget
*w
, WBCGtk
*gtk
)
3699 if (GTK_IS_TOOLBAR (w
)) {
3700 WBCGtk
*wbcg
= (WBCGtk
*)gtk
;
3701 char const *name
= gtk_widget_get_name (w
);
3702 GtkToggleActionEntry entry
;
3703 char *toggle_name
= g_strconcat ("ViewMenuToolbar", name
, NULL
);
3704 char *tooltip
= g_strdup_printf (_("Show/Hide toolbar %s"), _(name
));
3705 gboolean visible
= gnm_conf_get_toolbar_visible (name
);
3706 int n
= g_hash_table_size (wbcg
->visibility_widgets
);
3708 const struct ToolbarInfo
*ti
;
3710 GtkPositionType pos
= gnm_conf_get_toolbar_position (name
);
3712 // See bug 761142. This isn't supposed to be necessary.
3713 gtk_style_context_invalidate (gtk_widget_get_style_context (w
));
3715 if (gnm_conf_get_detachable_toolbars ()) {
3716 box
= gtk_handle_box_new ();
3717 g_object_connect (box
,
3718 "signal::child_attached", G_CALLBACK (cb_handlebox_dock_status
), GINT_TO_POINTER (TRUE
),
3719 "signal::child_detached", G_CALLBACK (cb_handlebox_dock_status
), GINT_TO_POINTER (FALSE
),
3722 box
= gtk_box_new (GTK_ORIENTATION_HORIZONTAL
, 2);
3723 g_signal_connect (G_OBJECT (w
),
3724 "button_press_event",
3725 G_CALLBACK (cb_toolbar_button_press
),
3727 g_signal_connect (G_OBJECT (box
),
3728 "button_press_event",
3729 G_CALLBACK (cb_handlebox_button_press
),
3732 gtk_container_add (GTK_CONTAINER (box
), w
);
3733 gtk_widget_show_all (box
);
3735 gtk_widget_hide (box
);
3736 g_object_set_data (G_OBJECT (box
), "toolbar-order",
3737 GINT_TO_POINTER (n
));
3738 set_toolbar_position (GTK_TOOLBAR (w
), pos
, gtk
);
3740 g_signal_connect (box
,
3742 G_CALLBACK (cb_toolbar_box_visible
),
3744 g_object_set_data_full (G_OBJECT (box
), "name",
3746 (GDestroyNotify
)g_free
);
3749 g_hash_table_insert (wbcg
->visibility_widgets
,
3750 g_strdup (toggle_name
),
3753 gtk_toolbar_set_show_arrow (GTK_TOOLBAR (w
), TRUE
);
3754 gtk_toolbar_set_style (GTK_TOOLBAR (w
), GTK_TOOLBAR_ICONS
);
3755 gtk_toolbar_set_icon_size (GTK_TOOLBAR (w
), GTK_ICON_SIZE_SMALL_TOOLBAR
);
3757 entry
.name
= toggle_name
;
3758 entry
.stock_id
= NULL
;
3760 entry
.accelerator
= NULL
;
3761 entry
.tooltip
= tooltip
;
3762 entry
.callback
= G_CALLBACK (cb_toolbar_activate
);
3763 entry
.is_active
= visible
;
3765 for (ti
= toolbar_info
; ti
->name
; ti
++) {
3766 if (strcmp (name
, ti
->name
) == 0) {
3767 entry
.label
= _(ti
->menu_text
);
3768 entry
.accelerator
= ti
->accel
;
3773 gtk_action_group_add_toggle_actions (gtk
->toolbar
.actions
,
3775 g_object_set_data (G_OBJECT (box
), "toggle_action",
3776 gtk_action_group_get_action (gtk
->toolbar
.actions
, toggle_name
));
3777 gtk_ui_manager_add_ui (gtk
->ui
, gtk
->toolbar
.merge_id
,
3778 "/menubar/View/Toolbars", toggle_name
, toggle_name
,
3779 GTK_UI_MANAGER_AUTO
, FALSE
);
3780 wbcg
->hide_for_fullscreen
=
3781 g_slist_prepend (wbcg
->hide_for_fullscreen
,
3782 gtk_action_group_get_action (gtk
->toolbar
.actions
,
3786 g_free (toggle_name
);
3788 gtk_box_pack_start (GTK_BOX (gtk
->menu_zone
), w
, FALSE
, TRUE
, 0);
3789 gtk_widget_show_all (w
);
3794 cb_clear_menu_tip (GOCmdContext
*cc
)
3796 go_cmd_context_progress_message_set (cc
, " ");
3800 cb_show_menu_tip (GtkWidget
*proxy
, GOCmdContext
*cc
)
3802 GtkAction
*action
= g_object_get_data (G_OBJECT (proxy
), "GtkAction");
3804 g_object_get (action
, "tooltip", &tip
, NULL
);
3806 go_cmd_context_progress_message_set (cc
, _(tip
));
3809 cb_clear_menu_tip (cc
);
3813 cb_connect_proxy (G_GNUC_UNUSED GtkUIManager
*ui
,
3818 /* connect whether there is a tip or not it may change later */
3819 if (GTK_IS_MENU_ITEM (proxy
)) {
3820 g_object_set_data (G_OBJECT (proxy
), "GtkAction", action
);
3821 g_object_connect (proxy
,
3822 "signal::select", G_CALLBACK (cb_show_menu_tip
), cc
,
3823 "swapped_signal::deselect", G_CALLBACK (cb_clear_menu_tip
), cc
,
3829 cb_disconnect_proxy (G_GNUC_UNUSED GtkUIManager
*ui
,
3830 G_GNUC_UNUSED GtkAction
*action
,
3834 if (GTK_IS_MENU_ITEM (proxy
)) {
3835 g_object_set_data (G_OBJECT (proxy
), "GtkAction", NULL
);
3836 g_object_disconnect (proxy
,
3837 "any_signal::select", G_CALLBACK (cb_show_menu_tip
), cc
,
3838 "any_signal::deselect", G_CALLBACK (cb_clear_menu_tip
), cc
,
3844 cb_post_activate (G_GNUC_UNUSED GtkUIManager
*manager
, GtkAction
*action
, WBCGtk
*wbcg
)
3846 if (!wbcg_is_editing (wbcg
) && strcmp(gtk_action_get_name (action
), "EditGotoCellIndicator") != 0)
3847 wbcg_focus_cur_scg (wbcg
);
3851 cb_wbcg_window_state_event (GtkWidget
*widget
,
3852 GdkEventWindowState
*event
,
3855 gboolean new_val
= (event
->new_window_state
& GDK_WINDOW_STATE_FULLSCREEN
) != 0;
3856 if (!(event
->changed_mask
& GDK_WINDOW_STATE_FULLSCREEN
) ||
3857 new_val
== wbcg
->is_fullscreen
||
3861 wbc_gtk_set_toggle_action_state (wbcg
, "ViewFullScreen", new_val
);
3866 wbcg
->is_fullscreen
= TRUE
;
3867 for (l
= wbcg
->hide_for_fullscreen
; l
; l
= l
->next
) {
3868 GtkToggleAction
*ta
= l
->data
;
3870 gboolean active
= gtk_toggle_action_get_active (ta
);
3871 u
= go_undo_binary_new
3872 (ta
, GUINT_TO_POINTER (active
),
3873 (GOUndoBinaryFunc
)gtk_toggle_action_set_active
,
3875 wbcg
->undo_for_fullscreen
=
3876 go_undo_combine (wbcg
->undo_for_fullscreen
, u
);
3877 gtk_toggle_action_set_active (ta
, FALSE
);
3880 if (wbcg
->undo_for_fullscreen
) {
3881 go_undo_undo (wbcg
->undo_for_fullscreen
);
3882 g_object_unref (wbcg
->undo_for_fullscreen
);
3883 wbcg
->undo_for_fullscreen
= NULL
;
3885 wbcg
->is_fullscreen
= FALSE
;
3889 /****************************************************************************/
3892 cb_auto_expr_cell_changed (GtkWidget
*item
, WBCGtk
*wbcg
)
3894 WorkbookView
*wbv
= wb_control_view (GNM_WBC (wbcg
));
3895 const GnmEvalPos
*ep
;
3896 GnmExprTop
const *texpr
;
3899 if (wbcg
->updating_ui
)
3902 ep
= g_object_get_data (G_OBJECT (item
), "evalpos");
3905 "auto-expr-func", NULL
,
3906 "auto-expr-descr", NULL
,
3907 "auto-expr-eval-pos", ep
,
3910 /* Now we have the expression set. */
3911 texpr
= wbv
->auto_expr
.dep
.texpr
;
3912 v
= gnm_expr_top_get_constant (texpr
);
3915 "auto-expr-descr", value_peek_string (v
),
3920 cb_auto_expr_changed (GtkWidget
*item
, WBCGtk
*wbcg
)
3922 const GnmFunc
*func
;
3924 WorkbookView
*wbv
= wb_control_view (GNM_WBC (wbcg
));
3926 if (wbcg
->updating_ui
)
3929 func
= g_object_get_data (G_OBJECT (item
), "func");
3930 descr
= g_object_get_data (G_OBJECT (item
), "descr");
3933 "auto-expr-func", func
,
3934 "auto-expr-descr", descr
,
3935 "auto-expr-eval-pos", NULL
,
3940 cb_auto_expr_precision_toggled (GtkWidget
*item
, WBCGtk
*wbcg
)
3942 WorkbookView
*wbv
= wb_control_view (GNM_WBC (wbcg
));
3943 if (wbcg
->updating_ui
)
3946 go_object_toggle (wbv
, "auto-expr-max-precision");
3950 cb_auto_expr_insert_formula (WBCGtk
*wbcg
, gboolean below
)
3952 SheetControlGUI
*scg
= wbcg_cur_scg (wbcg
);
3953 GnmRange
const *selection
= selection_first_range (scg_view (scg
), NULL
, NULL
);
3956 gboolean multiple
, use_last_cr
;
3957 data_analysis_output_t
*dao
;
3958 analysis_tools_data_auto_expression_t
*specs
;
3960 g_return_if_fail (selection
!= NULL
);
3963 multiple
= (range_width (selection
) > 1);
3964 output
= *selection
;
3965 range_normalize (&output
);
3966 output
.start
.row
= output
.end
.row
;
3967 use_last_cr
= (range_height (selection
) > 1) && sheet_is_region_empty (scg_sheet (scg
), &output
);
3969 if (range_translate (&output
, scg_sheet (scg
), 0, 1))
3971 if (multiple
&& gnm_sheet_get_last_col (scg_sheet (scg
)) > output
.end
.col
)
3974 input
= gnm_range_dup (selection
);
3975 range_normalize (input
);
3979 multiple
= (range_height (selection
) > 1);
3980 output
= *selection
;
3981 range_normalize (&output
);
3982 output
.start
.col
= output
.end
.col
;
3983 use_last_cr
= (range_width (selection
) > 1) && sheet_is_region_empty (scg_sheet (scg
), &output
);
3985 if (range_translate (&output
, scg_sheet (scg
), 1, 0))
3987 if (multiple
&& gnm_sheet_get_last_row (scg_sheet (scg
)) > output
.end
.row
)
3990 input
= gnm_range_dup (selection
);
3991 range_normalize (input
);
3997 dao
= dao_init (NULL
, RangeOutput
);
3998 dao
->start_col
= output
.start
.col
;
3999 dao
->start_row
= output
.start
.row
;
4000 dao
->cols
= range_width (&output
);
4001 dao
->rows
= range_height (&output
);
4002 dao
->sheet
= scg_sheet (scg
);
4003 dao
->autofit_flag
= FALSE
;
4004 dao
->put_formulas
= TRUE
;
4006 specs
= g_new0 (analysis_tools_data_auto_expression_t
, 1);
4007 specs
->base
.wbc
= GNM_WBC (wbcg
);
4008 specs
->base
.input
= g_slist_prepend (NULL
, value_new_cellrange_r (scg_sheet (scg
), input
));
4010 specs
->base
.group_by
= below
? GROUPED_BY_COL
: GROUPED_BY_ROW
;
4011 specs
->base
.labels
= FALSE
;
4012 specs
->multiple
= multiple
;
4013 specs
->below
= below
;
4015 g_object_get (G_OBJECT (wb_control_view (GNM_WBC (wbcg
))),
4016 "auto-expr-func", &(specs
->func
), NULL
);
4017 if (specs
->func
== NULL
) {
4018 specs
->func
= gnm_func_lookup_or_add_placeholder ("sum");
4019 gnm_func_ref (specs
->func
);
4022 cmd_analysis_tool (GNM_WBC (wbcg
), scg_sheet (scg
),
4023 dao
, specs
, analysis_tool_auto_expression_engine
,
4028 cb_auto_expr_insert_formula_below (G_GNUC_UNUSED GtkWidget
*item
, WBCGtk
*wbcg
)
4030 cb_auto_expr_insert_formula (wbcg
, TRUE
);
4034 cb_auto_expr_insert_formula_to_side (G_GNUC_UNUSED GtkWidget
*item
, WBCGtk
*wbcg
)
4036 cb_auto_expr_insert_formula (wbcg
, FALSE
);
4041 cb_select_auto_expr (GtkWidget
*widget
, GdkEvent
*event
, WBCGtk
*wbcg
)
4044 * WARNING * WARNING * WARNING
4046 * Keep the functions in lower case.
4047 * We currently register the functions in lower case and some locales
4048 * (notably tr_TR) do not have the same encoding for tolower that
4051 * eg tolower ('I') != 'i'
4052 * Which would break function lookup when looking up for function 'selectIon'
4053 * when it was registered as 'selection'
4055 * WARNING * WARNING * WARNING
4058 char const * const displayed_name
;
4059 char const * const function
;
4060 } const quick_compute_routines
[] = {
4061 { N_("Sum"), "sum" },
4062 { N_("Min"), "min" },
4063 { N_("Max"), "max" },
4064 { N_("Average"), "average" },
4065 { N_("Count"), "count" },
4069 WorkbookView
*wbv
= wb_control_view (GNM_WBC (wbcg
));
4070 Sheet
*sheet
= wb_view_cur_sheet (wbv
);
4071 GtkWidget
*item
, *menu
;
4074 GnmCellPos
const *pos
;
4077 if (event
->button
.button
!= 3)
4080 menu
= gtk_menu_new ();
4082 for (i
= 0; quick_compute_routines
[i
].displayed_name
; i
++) {
4084 char const *fname
= quick_compute_routines
[i
].function
;
4085 char const *dispname
=
4086 _(quick_compute_routines
[i
].displayed_name
);
4087 GnmExprTop
const *new_auto_expr
;
4091 /* Test the expression... */
4092 parse_pos_init (&pp
, sheet
->workbook
, sheet
, 0, 0);
4093 expr_txt
= g_strconcat (fname
, "(",
4094 parsepos_as_string (&pp
),
4096 new_auto_expr
= gnm_expr_parse_str
4097 (expr_txt
, &pp
, GNM_EXPR_PARSE_DEFAULT
,
4098 sheet_get_conventions (sheet
), NULL
);
4102 gnm_expr_top_unref (new_auto_expr
);
4104 item
= gtk_menu_item_new_with_label (dispname
);
4105 g_object_set_data (G_OBJECT (item
),
4106 "func", gnm_func_lookup (fname
, NULL
));
4107 g_object_set_data (G_OBJECT (item
),
4108 "descr", (gpointer
)dispname
);
4109 g_signal_connect (G_OBJECT (item
),
4111 G_CALLBACK (cb_auto_expr_changed
), wbcg
);
4112 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
4113 gtk_widget_show (item
);
4116 item
= gtk_separator_menu_item_new ();
4117 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
4118 gtk_widget_show (item
);
4120 pos
= &(scg_view (wbcg_cur_scg (wbcg
)))->edit_pos
;
4121 eval_pos_init_pos (&ep
, sheet
, pos
);
4122 cell_item
= g_strdup_printf (_("Content of %s"), cellpos_as_string (pos
));
4123 item
= gtk_menu_item_new_with_label (cell_item
);
4125 g_object_set_data_full (G_OBJECT (item
),
4126 "evalpos", g_memdup (&ep
, sizeof (ep
)),
4127 (GDestroyNotify
)g_free
);
4128 g_signal_connect (G_OBJECT (item
), "activate",
4129 G_CALLBACK (cb_auto_expr_cell_changed
), wbcg
);
4130 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
4131 gtk_widget_show (item
);
4133 item
= gtk_separator_menu_item_new ();
4134 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
4135 gtk_widget_show (item
);
4137 item
= gtk_check_menu_item_new_with_label (_("Use Maximum Precision"));
4138 gtk_check_menu_item_set_active (GTK_CHECK_MENU_ITEM (item
),
4139 wbv
->auto_expr
.use_max_precision
);
4140 g_signal_connect (G_OBJECT (item
), "activate",
4141 G_CALLBACK (cb_auto_expr_precision_toggled
), wbcg
);
4142 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
4143 gtk_widget_show (item
);
4145 item
= gtk_separator_menu_item_new ();
4146 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
4147 gtk_widget_show (item
);
4149 item
= gtk_menu_item_new_with_label (_("Insert Formula Below"));
4150 g_signal_connect (G_OBJECT (item
), "activate",
4151 G_CALLBACK (cb_auto_expr_insert_formula_below
), wbcg
);
4152 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
4153 gtk_widget_show (item
);
4155 item
= gtk_menu_item_new_with_label (_("Insert Formula to Side"));
4156 g_signal_connect (G_OBJECT (item
), "activate",
4157 G_CALLBACK (cb_auto_expr_insert_formula_to_side
), wbcg
);
4158 gtk_menu_shell_append (GTK_MENU_SHELL (menu
), item
);
4159 gtk_widget_show (item
);
4161 gnumeric_popup_menu (GTK_MENU (menu
), event
);
4166 wbc_gtk_create_status_area (WBCGtk
*wbcg
)
4170 g_object_ref (wbcg
->auto_expr_label
);
4171 gtk_label_set_max_width_chars (GTK_LABEL (wbcg
->auto_expr_label
),
4172 strlen (AUTO_EXPR_SAMPLE
));
4173 gtk_widget_set_size_request
4174 (wbcg
->auto_expr_label
,
4175 gnm_widget_measure_string (GTK_WIDGET (wbcg
->toplevel
),
4179 gtk_widget_set_size_request
4181 gnm_widget_measure_string (GTK_WIDGET (wbcg
->toplevel
),
4184 ebox
= GET_GUI_ITEM ("auto_expr_event_box");
4185 gtk_style_context_add_class (gtk_widget_get_style_context (ebox
),
4187 g_signal_connect (G_OBJECT (ebox
),
4188 "button_press_event",
4189 G_CALLBACK (cb_select_auto_expr
), wbcg
);
4191 g_hash_table_insert (wbcg
->visibility_widgets
,
4192 g_strdup ("ViewStatusbar"),
4193 g_object_ref (wbcg
->status_area
));
4195 /* disable statusbar by default going to fullscreen */
4196 wbcg
->hide_for_fullscreen
=
4197 g_slist_prepend (wbcg
->hide_for_fullscreen
,
4198 wbcg_find_action (wbcg
, "ViewStatusbar"));
4199 g_assert (wbcg
->hide_for_fullscreen
->data
);
4202 /****************************************************************************/
4205 cb_file_history_activate (GObject
*action
, WBCGtk
*wbcg
)
4207 gui_file_read (wbcg
, g_object_get_data (action
, "uri"), NULL
, NULL
);
4211 wbc_gtk_reload_recent_file_menu (WBCGtk
const *wbcg
)
4213 WBCGtk
*gtk
= (WBCGtk
*)wbcg
;
4214 GSList
*history
, *ptr
;
4217 if (gtk
->file_history
.merge_id
!= 0)
4218 gtk_ui_manager_remove_ui (gtk
->ui
, gtk
->file_history
.merge_id
);
4219 gtk
->file_history
.merge_id
= gtk_ui_manager_new_merge_id (gtk
->ui
);
4221 if (gtk
->file_history
.actions
!= NULL
) {
4222 gtk_ui_manager_remove_action_group (gtk
->ui
,
4223 gtk
->file_history
.actions
);
4224 g_object_unref (gtk
->file_history
.actions
);
4226 gtk
->file_history
.actions
= gtk_action_group_new ("FileHistory");
4228 /* create the actions */
4229 history
= gnm_app_history_get_list (3);
4230 for (i
= 1, ptr
= history
; ptr
!= NULL
; ptr
= ptr
->next
, i
++) {
4231 GtkActionEntry entry
;
4233 char const *uri
= ptr
->data
;
4234 char *name
= g_strdup_printf ("FileHistoryEntry%d", i
);
4235 char *label
= gnm_history_item_label (uri
, i
);
4236 char *filename
= go_filename_from_uri (uri
);
4237 char *filename_utf8
= filename
? g_filename_to_utf8 (filename
, -1, NULL
, NULL
, NULL
) : NULL
;
4238 char *tooltip
= g_strdup_printf (_("Open %s"), filename_utf8
? filename_utf8
: uri
);
4241 entry
.stock_id
= NULL
;
4242 entry
.label
= label
;
4243 entry
.accelerator
= NULL
;
4244 entry
.tooltip
= tooltip
;
4245 entry
.callback
= G_CALLBACK (cb_file_history_activate
);
4246 gtk_action_group_add_actions (gtk
->file_history
.actions
,
4247 &entry
, 1, (WBCGtk
*)wbcg
);
4248 action
= gtk_action_group_get_action (gtk
->file_history
.actions
,
4250 g_object_set_data_full (G_OBJECT (action
), "uri",
4251 g_strdup (uri
), (GDestroyNotify
)g_free
);
4256 g_free (filename_utf8
);
4259 g_slist_free_full (history
, (GDestroyNotify
)g_free
);
4261 gtk_ui_manager_insert_action_group (gtk
->ui
, gtk
->file_history
.actions
, 0);
4265 char *name
= g_strdup_printf ("FileHistoryEntry%d", i
);
4266 gtk_ui_manager_add_ui (gtk
->ui
, gtk
->file_history
.merge_id
,
4267 "/menubar/File/FileHistory", name
, name
,
4268 GTK_UI_MANAGER_AUTO
, TRUE
);
4274 cb_new_from_template (GObject
*action
, WBCGtk
*wbcg
)
4276 const char *uri
= g_object_get_data (action
, "uri");
4277 gnm_gui_file_template (wbcg
, uri
);
4281 add_template_dir (const char *path
, GHashTable
*h
)
4286 dir
= g_dir_open (path
, 0, NULL
);
4290 while ((name
= g_dir_read_name (dir
))) {
4291 char *fullname
= g_build_filename (path
, name
, NULL
);
4294 * Unconditionally remove, so we can link to /dev/null
4295 * and cause a system file to be hidden.
4297 g_hash_table_remove (h
, name
);
4299 if (g_file_test (fullname
, G_FILE_TEST_IS_REGULAR
)) {
4300 char *uri
= go_filename_to_uri (fullname
);
4301 g_hash_table_insert (h
, g_strdup (name
), uri
);
4309 wbc_gtk_reload_templates (WBCGtk
*gtk
)
4316 if (gtk
->templates
.merge_id
!= 0)
4317 gtk_ui_manager_remove_ui (gtk
->ui
, gtk
->templates
.merge_id
);
4318 gtk
->templates
.merge_id
= gtk_ui_manager_new_merge_id (gtk
->ui
);
4320 if (gtk
->templates
.actions
!= NULL
) {
4321 gtk_ui_manager_remove_action_group (gtk
->ui
,
4322 gtk
->templates
.actions
);
4323 g_object_unref (gtk
->templates
.actions
);
4325 gtk
->templates
.actions
= gtk_action_group_new ("TemplateList");
4327 gtk_ui_manager_insert_action_group (gtk
->ui
, gtk
->templates
.actions
, 0);
4329 h
= g_hash_table_new_full (g_str_hash
, g_str_equal
, g_free
, g_free
);
4331 path
= g_build_filename (gnm_sys_data_dir (), "templates", NULL
);
4332 add_template_dir (path
, h
);
4335 /* Possibly override the above with user templates without version. */
4336 path
= g_build_filename (gnm_usr_dir (FALSE
), "templates", NULL
);
4337 add_template_dir (path
, h
);
4340 /* Possibly override the above with user templates with version. */
4341 path
= g_build_filename (gnm_usr_dir (TRUE
), "templates", NULL
);
4342 add_template_dir (path
, h
);
4345 names
= g_slist_sort (go_hash_keys (h
), (GCompareFunc
)g_utf8_collate
);
4347 for (i
= 1, l
= names
; l
; l
= l
->next
) {
4348 const char *uri
= g_hash_table_lookup (h
, l
->data
);
4349 GString
*label
= g_string_new (NULL
);
4350 GtkActionEntry entry
;
4353 char *basename
= go_basename_from_uri (uri
);
4357 if (i
< 10) g_string_append_c (label
, '_');
4358 g_string_append_printf (label
, "%d ", i
);
4360 for (s
= basename
; *s
; s
++) {
4361 if (*s
== '_') g_string_append_c (label
, '_');
4362 g_string_append_c (label
, *s
);
4365 entry
.name
= gname
= g_strdup_printf ("Template%d", i
);
4366 entry
.stock_id
= NULL
;
4367 entry
.label
= label
->str
;
4368 entry
.accelerator
= NULL
;
4369 entry
.tooltip
= NULL
;
4370 entry
.callback
= G_CALLBACK (cb_new_from_template
);
4372 gtk_action_group_add_actions (gtk
->templates
.actions
,
4375 action
= gtk_action_group_get_action (gtk
->templates
.actions
,
4378 g_object_set_data_full (G_OBJECT (action
), "uri",
4379 g_strdup (uri
), (GDestroyNotify
)g_free
);
4382 gpath
= "/menubar/File/Templates";
4383 gtk_ui_manager_add_ui (gtk
->ui
, gtk
->templates
.merge_id
,
4384 gpath
, gname
, gname
,
4385 GTK_UI_MANAGER_AUTO
, FALSE
);
4387 g_string_free (label
, TRUE
);
4393 g_slist_free (names
);
4394 g_hash_table_destroy (h
);
4398 wbc_gtk_load_templates (WBCGtk
*wbcg
)
4400 if (wbcg
->templates
.merge_id
== 0) {
4401 wbc_gtk_reload_templates (wbcg
);
4404 wbcg
->template_loader_handler
= 0;
4409 wbcg_set_toplevel (WBCGtk
*wbcg
, GtkWidget
*w
)
4411 static GtkTargetEntry
const drag_types
[] = {
4412 { (char *) "text/uri-list", 0, TARGET_URI_LIST
},
4413 { (char *) "GNUMERIC_SHEET", 0, TARGET_SHEET
},
4414 { (char *) "GNUMERIC_SAME_PROC", GTK_TARGET_SAME_APP
, 0 }
4417 g_return_if_fail (wbcg
->toplevel
== NULL
);
4420 w
= GTK_WIDGET (wbcg_toplevel (wbcg
));
4421 g_return_if_fail (GTK_IS_WINDOW (w
));
4423 g_object_set (G_OBJECT (w
),
4427 g_signal_connect_data (w
, "delete_event",
4428 G_CALLBACK (wbc_gtk_close
), wbcg
, NULL
,
4429 G_CONNECT_AFTER
| G_CONNECT_SWAPPED
);
4430 g_signal_connect_after (w
, "set_focus",
4431 G_CALLBACK (cb_set_focus
), wbcg
);
4432 g_signal_connect (w
, "scroll-event",
4433 G_CALLBACK (cb_scroll_wheel
), wbcg
);
4434 g_signal_connect (w
, "realize",
4435 G_CALLBACK (cb_realize
), wbcg
);
4436 g_signal_connect (w
, "screen-changed",
4437 G_CALLBACK (cb_screen_changed
), NULL
);
4438 cb_screen_changed (w
);
4440 /* Setup a test of Drag and Drop */
4441 gtk_drag_dest_set (GTK_WIDGET (w
),
4442 GTK_DEST_DEFAULT_ALL
, drag_types
, G_N_ELEMENTS (drag_types
),
4443 GDK_ACTION_COPY
| GDK_ACTION_MOVE
);
4444 gtk_drag_dest_add_image_targets (GTK_WIDGET (w
));
4445 gtk_drag_dest_add_text_targets (GTK_WIDGET (w
));
4446 g_object_connect (G_OBJECT (w
),
4447 "signal::drag-leave", G_CALLBACK (cb_wbcg_drag_leave
), wbcg
,
4448 "signal::drag-data-received", G_CALLBACK (cb_wbcg_drag_data_received
), wbcg
,
4449 "signal::drag-motion", G_CALLBACK (cb_wbcg_drag_motion
), wbcg
,
4451 "signal::drag-data-get", G_CALLBACK (wbcg_drag_data_get
), wbc
,
4456 /***************************************************************************/
4459 wbc_gtk_get_property (GObject
*object
, guint property_id
,
4460 GValue
*value
, GParamSpec
*pspec
)
4462 WBCGtk
*wbcg
= (WBCGtk
*)object
;
4464 switch (property_id
) {
4465 case WBG_GTK_PROP_AUTOSAVE_PROMPT
:
4466 g_value_set_boolean (value
, wbcg
->autosave_prompt
);
4468 case WBG_GTK_PROP_AUTOSAVE_TIME
:
4469 g_value_set_int (value
, wbcg
->autosave_time
);
4472 G_OBJECT_WARN_INVALID_PROPERTY_ID (object
, property_id
, pspec
);
4478 wbc_gtk_set_property (GObject
*object
, guint property_id
,
4479 const GValue
*value
, GParamSpec
*pspec
)
4481 WBCGtk
*wbcg
= (WBCGtk
*)object
;
4483 switch (property_id
) {
4484 case WBG_GTK_PROP_AUTOSAVE_PROMPT
:
4485 wbcg
->autosave_prompt
= g_value_get_boolean (value
);
4487 case WBG_GTK_PROP_AUTOSAVE_TIME
:
4488 wbcg_set_autosave_time (wbcg
, g_value_get_int (value
));
4491 G_OBJECT_WARN_INVALID_PROPERTY_ID (object
, property_id
, pspec
);
4497 wbc_gtk_finalize (GObject
*obj
)
4499 WBCGtk
*wbcg
= WBC_GTK (obj
);
4501 if (wbcg
->idle_update_style_feedback
!= 0)
4502 g_source_remove (wbcg
->idle_update_style_feedback
);
4504 if (wbcg
->template_loader_handler
!= 0) {
4505 g_source_remove (wbcg
->template_loader_handler
);
4506 wbcg
->template_loader_handler
= 0;
4509 if (wbcg
->file_history
.merge_id
!= 0)
4510 gtk_ui_manager_remove_ui (wbcg
->ui
, wbcg
->file_history
.merge_id
);
4511 g_clear_object (&wbcg
->file_history
.actions
);
4513 if (wbcg
->toolbar
.merge_id
!= 0)
4514 gtk_ui_manager_remove_ui (wbcg
->ui
, wbcg
->toolbar
.merge_id
);
4515 g_clear_object (&wbcg
->toolbar
.actions
);
4517 if (wbcg
->windows
.merge_id
!= 0)
4518 gtk_ui_manager_remove_ui (wbcg
->ui
, wbcg
->windows
.merge_id
);
4519 g_clear_object (&wbcg
->windows
.actions
);
4521 if (wbcg
->templates
.merge_id
!= 0)
4522 gtk_ui_manager_remove_ui (wbcg
->ui
, wbcg
->templates
.merge_id
);
4523 g_clear_object (&wbcg
->templates
.actions
);
4526 GSList
*l
, *uis
= go_hash_keys (wbcg
->custom_uis
);
4527 for (l
= uis
; l
; l
= l
->next
) {
4528 GnmAppExtraUI
*extra_ui
= l
->data
;
4529 cb_remove_custom_ui (NULL
, extra_ui
, wbcg
);
4534 g_hash_table_destroy (wbcg
->custom_uis
);
4535 wbcg
->custom_uis
= NULL
;
4537 g_clear_object (&wbcg
->zoom_vaction
);
4538 g_clear_object (&wbcg
->zoom_haction
);
4539 g_clear_object (&wbcg
->borders
);
4540 g_clear_object (&wbcg
->fore_color
);
4541 g_clear_object (&wbcg
->back_color
);
4542 g_clear_object (&wbcg
->font_name_haction
);
4543 g_clear_object (&wbcg
->font_name_vaction
);
4544 g_clear_object (&wbcg
->redo_haction
);
4545 g_clear_object (&wbcg
->redo_vaction
);
4546 g_clear_object (&wbcg
->undo_haction
);
4547 g_clear_object (&wbcg
->undo_vaction
);
4548 g_clear_object (&wbcg
->halignment
);
4549 g_clear_object (&wbcg
->valignment
);
4550 g_clear_object (&wbcg
->actions
);
4551 g_clear_object (&wbcg
->permanent_actions
);
4552 g_clear_object (&wbcg
->font_actions
);
4553 g_clear_object (&wbcg
->data_only_actions
);
4554 g_clear_object (&wbcg
->semi_permanent_actions
);
4555 g_clear_object (&wbcg
->ui
);
4557 /* Disconnect signals that would attempt to change things during
4561 wbcg_autosave_cancel (wbcg
);
4563 if (wbcg
->bnotebook
!= NULL
)
4564 g_signal_handlers_disconnect_by_func (
4565 G_OBJECT (wbcg
->bnotebook
),
4566 G_CALLBACK (cb_notebook_switch_page
), wbcg
);
4567 g_clear_object (&wbcg
->bnotebook
);
4569 g_signal_handlers_disconnect_by_func (
4570 G_OBJECT (wbcg
->toplevel
),
4571 G_CALLBACK (cb_set_focus
), wbcg
);
4573 wbcg_auto_complete_destroy (wbcg
);
4575 gtk_window_set_focus (wbcg_toplevel (wbcg
), NULL
);
4577 if (wbcg
->toplevel
!= NULL
) {
4578 gtk_widget_destroy (wbcg
->toplevel
);
4579 wbcg
->toplevel
= NULL
;
4582 if (wbcg
->font_desc
) {
4583 pango_font_description_free (wbcg
->font_desc
);
4584 wbcg
->font_desc
= NULL
;
4587 g_clear_object (&wbcg
->auto_expr_label
);
4589 g_hash_table_destroy (wbcg
->visibility_widgets
);
4590 g_clear_object (&wbcg
->undo_for_fullscreen
);
4592 g_slist_free (wbcg
->hide_for_fullscreen
);
4593 wbcg
->hide_for_fullscreen
= NULL
;
4596 g_free (wbcg
->preferred_geometry
);
4597 wbcg
->preferred_geometry
= NULL
;
4599 g_clear_object (&wbcg
->gui
);
4601 parent_class
->finalize (obj
);
4604 /***************************************************************************/
4607 GnmExprEntry
*entry
;
4608 GogDataset
*dataset
;
4610 gboolean suppress_update
;
4611 GogDataType data_type
;
4614 gulong dataset_changed_handler
;
4615 gulong entry_update_handler
;
4620 cb_graph_dim_editor_update (GnmExprEntry
*gee
,
4621 G_GNUC_UNUSED gboolean user_requested
,
4622 GraphDimEditor
*editor
)
4624 GOData
*data
= NULL
;
4626 SheetControlGUI
*scg
;
4627 editor
->changed
= FALSE
;
4629 /* Ignore changes while we are insensitive. useful for displaying
4630 * values, without storing them as Data. Also ignore updates if the
4631 * dataset has been cleared via the weakref handler */
4632 if (!gtk_widget_is_sensitive (GTK_WIDGET (gee
)) ||
4633 editor
->dataset
== NULL
)
4636 scg
= gnm_expr_entry_get_scg (gee
);
4637 sheet
= scg_sheet (scg
);
4639 /* If we are setting something */
4640 if (!gnm_expr_entry_is_blank (editor
->entry
)) {
4643 GnmExprTop
const *texpr
;
4644 GnmExprParseFlags flags
=
4645 (editor
->data_type
== GOG_DATA_VECTOR
)?
4646 GNM_EXPR_PARSE_PERMIT_MULTIPLE_EXPRESSIONS
|
4647 GNM_EXPR_PARSE_UNKNOWN_NAMES_ARE_STRINGS
:
4648 GNM_EXPR_PARSE_UNKNOWN_NAMES_ARE_STRINGS
;
4650 parse_error_init (&perr
);
4651 /* Setting start_sel=FALSE to avoid */
4652 /* https://bugzilla.gnome.org/show_bug.cgi?id=658223 */
4653 texpr
= gnm_expr_entry_parse (editor
->entry
,
4654 parse_pos_init_sheet (&pos
, sheet
),
4655 &perr
, FALSE
, flags
);
4657 /* TODO : add some error dialogs split out
4658 * the code in workbook_edit to add parens. */
4659 if (texpr
== NULL
) {
4660 if (editor
->data_type
== GOG_DATA_SCALAR
)
4661 texpr
= gnm_expr_top_new_constant (
4663 gnm_expr_entry_get_text (editor
->entry
)));
4665 g_return_if_fail (perr
.err
!= NULL
);
4667 wb_control_validation_msg (GNM_WBC (scg_wbcg (scg
)),
4668 GNM_VALIDATION_STYLE_INFO
, NULL
, perr
.err
->message
);
4669 parse_error_free (&perr
);
4670 gtk_editable_select_region (GTK_EDITABLE (gnm_expr_entry_get_entry (editor
->entry
)), 0, G_MAXINT
);
4671 editor
->changed
= TRUE
;
4676 switch (editor
->data_type
) {
4677 case GOG_DATA_SCALAR
:
4678 data
= gnm_go_data_scalar_new_expr (sheet
, texpr
);
4680 case GOG_DATA_VECTOR
:
4681 data
= gnm_go_data_vector_new_expr (sheet
, texpr
);
4683 case GOG_DATA_MATRIX
:
4684 data
= gnm_go_data_matrix_new_expr (sheet
, texpr
);
4688 /* The SheetObjectGraph does the magic to link things in */
4689 editor
->suppress_update
= TRUE
;
4690 gog_dataset_set_dim (editor
->dataset
, editor
->dim_i
, data
, NULL
);
4691 editor
->suppress_update
= FALSE
;
4695 cb_update_idle (GraphDimEditor
*editor
)
4697 cb_graph_dim_editor_update (editor
->entry
, FALSE
, editor
);
4703 graph_dim_cancel_idle (GraphDimEditor
*editor
)
4706 g_source_remove (editor
->idle
);
4712 cb_graph_dim_entry_focus_out_event (G_GNUC_UNUSED GtkEntry
*ignored
,
4713 G_GNUC_UNUSED GdkEventFocus
*event
,
4714 GraphDimEditor
*editor
)
4716 if (!editor
->changed
)
4718 graph_dim_cancel_idle (editor
);
4719 editor
->idle
= g_idle_add ((GSourceFunc
) cb_update_idle
, editor
);
4725 cb_graph_dim_entry_changed (GraphDimEditor
*editor
)
4727 editor
->changed
= TRUE
;
4731 set_entry_contents (GnmExprEntry
*entry
, GOData
*val
)
4733 if (GNM_IS_GO_DATA_SCALAR (val
)) {
4734 GnmValue
const *v
= gnm_expr_top_get_constant (gnm_go_data_get_expr (val
));
4735 if (v
&& VALUE_IS_NUMBER (v
)) {
4736 double d
= go_data_get_scalar_value (val
);
4737 GODateConventions
const *date_conv
= go_data_date_conv (val
);
4738 gog_data_editor_set_value_double (GOG_DATA_EDITOR (entry
),
4744 if (GO_IS_DATA_SCALAR (val
) && go_data_has_value (val
)) {
4745 double d
= go_data_get_scalar_value (val
);
4746 GODateConventions
const *date_conv
= go_data_date_conv (val
);
4747 gog_data_editor_set_value_double (GOG_DATA_EDITOR (entry
),
4753 SheetControlGUI
*scg
= gnm_expr_entry_get_scg (entry
);
4754 Sheet
const *sheet
= scg_sheet (scg
);
4755 char *txt
= go_data_serialize (val
, (gpointer
)sheet
->convs
);
4756 gnm_expr_entry_load_from_text (entry
, txt
);
4762 cb_dataset_changed (GogDataset
*dataset
,
4764 GraphDimEditor
*editor
)
4766 GOData
*val
= gog_dataset_get_dim (dataset
, editor
->dim_i
);
4767 if (val
!= NULL
&& !editor
->suppress_update
) {
4768 g_signal_handler_block (editor
->entry
,
4769 editor
->entry_update_handler
);
4770 set_entry_contents (editor
->entry
, val
);
4771 g_signal_handler_unblock (editor
->entry
,
4772 editor
->entry_update_handler
);
4777 cb_dim_editor_weakref_notify (GraphDimEditor
*editor
, GogDataset
*dataset
)
4779 g_return_if_fail (editor
->dataset
== dataset
);
4780 editor
->dataset
= NULL
;
4784 graph_dim_editor_free (GraphDimEditor
*editor
)
4786 graph_dim_cancel_idle (editor
);
4787 if (editor
->dataset
) {
4788 g_signal_handler_disconnect (editor
->dataset
, editor
->dataset_changed_handler
);
4789 g_object_weak_unref (G_OBJECT (editor
->dataset
),
4790 (GWeakNotify
) cb_dim_editor_weakref_notify
, editor
);
4795 static GogDataEditor
*
4796 wbcg_data_allocator_editor (GogDataAllocator
*dalloc
,
4797 GogDataset
*dataset
, int dim_i
, GogDataType data_type
)
4799 WBCGtk
*wbcg
= WBC_GTK (dalloc
);
4800 GraphDimEditor
*editor
;
4803 editor
= g_new (GraphDimEditor
, 1);
4804 editor
->dataset
= dataset
;
4805 editor
->dim_i
= dim_i
;
4806 editor
->suppress_update
= FALSE
;
4807 editor
->data_type
= data_type
;
4808 editor
->entry
= gnm_expr_entry_new (wbcg
, TRUE
);
4810 editor
->changed
= FALSE
;
4811 g_object_weak_ref (G_OBJECT (editor
->dataset
),
4812 (GWeakNotify
) cb_dim_editor_weakref_notify
, editor
);
4814 gnm_expr_entry_set_update_policy (editor
->entry
,
4815 GNM_UPDATE_DISCONTINUOUS
);
4817 val
= gog_dataset_get_dim (dataset
, dim_i
);
4819 set_entry_contents (editor
->entry
, val
);
4822 gnm_expr_entry_set_flags (editor
->entry
, GNM_EE_FORCE_ABS_REF
, GNM_EE_MASK
);
4824 editor
->entry_update_handler
= g_signal_connect (G_OBJECT (editor
->entry
),
4826 G_CALLBACK (cb_graph_dim_editor_update
), editor
);
4827 g_signal_connect (G_OBJECT (gnm_expr_entry_get_entry (editor
->entry
)),
4829 G_CALLBACK (cb_graph_dim_entry_focus_out_event
), editor
);
4830 g_signal_connect_swapped (G_OBJECT (gnm_expr_entry_get_entry (editor
->entry
)),
4832 G_CALLBACK (cb_graph_dim_entry_changed
), editor
);
4833 editor
->dataset_changed_handler
= g_signal_connect (G_OBJECT (editor
->dataset
),
4834 "changed", G_CALLBACK (cb_dataset_changed
), editor
);
4835 g_object_set_data_full (G_OBJECT (editor
->entry
),
4836 "editor", editor
, (GDestroyNotify
) graph_dim_editor_free
);
4838 return GOG_DATA_EDITOR (editor
->entry
);
4842 wbcg_data_allocator_allocate (GogDataAllocator
*dalloc
, GogPlot
*plot
)
4844 SheetControlGUI
*scg
= wbcg_cur_scg (WBC_GTK (dalloc
));
4845 sv_selection_to_plot (scg_view (scg
), plot
);
4850 wbcg_go_plot_data_allocator_init (GogDataAllocatorClass
*iface
)
4852 iface
->editor
= wbcg_data_allocator_editor
;
4853 iface
->allocate
= wbcg_data_allocator_allocate
;
4856 /*************************************************************************/
4858 wbcg_get_password (GOCmdContext
*cc
, char const* filename
)
4860 WBCGtk
*wbcg
= WBC_GTK (cc
);
4862 return dialog_get_password (wbcg_toplevel (wbcg
), filename
);
4865 wbcg_set_sensitive (GOCmdContext
*cc
, gboolean sensitive
)
4867 GtkWindow
*toplevel
= wbcg_toplevel (WBC_GTK (cc
));
4868 if (toplevel
!= NULL
)
4869 gtk_widget_set_sensitive (GTK_WIDGET (toplevel
), sensitive
);
4872 wbcg_error_error (GOCmdContext
*cc
, GError
*err
)
4874 go_gtk_notice_dialog (wbcg_toplevel (WBC_GTK (cc
)),
4876 "%s", err
->message
);
4880 wbcg_error_error_info (GOCmdContext
*cc
, GOErrorInfo
*error
)
4882 gnm_go_error_info_dialog_show (
4883 wbcg_toplevel (WBC_GTK (cc
)), error
);
4887 wbcg_error_error_info_list (GOCmdContext
*cc
, GSList
*errs
)
4889 gnm_go_error_info_list_dialog_show
4890 (wbcg_toplevel (WBC_GTK (cc
)), errs
);
4894 wbcg_progress_set (GOCmdContext
*cc
, double val
)
4896 WBCGtk
*wbcg
= WBC_GTK (cc
);
4897 gtk_progress_bar_set_fraction (GTK_PROGRESS_BAR (wbcg
->progress_bar
), val
);
4900 wbcg_progress_message_set (GOCmdContext
*cc
, gchar
const *msg
)
4902 WBCGtk
*wbcg
= WBC_GTK (cc
);
4903 gtk_progress_bar_set_text (GTK_PROGRESS_BAR (wbcg
->progress_bar
), msg
);
4906 wbcg_gnm_cmd_context_init (GOCmdContextClass
*iface
)
4908 iface
->get_password
= wbcg_get_password
;
4909 iface
->set_sensitive
= wbcg_set_sensitive
;
4910 iface
->error
.error
= wbcg_error_error
;
4911 iface
->error
.error_info
= wbcg_error_error_info
;
4912 iface
->error
.error_info_list
= wbcg_error_error_info_list
;
4913 iface
->progress_set
= wbcg_progress_set
;
4914 iface
->progress_message_set
= wbcg_progress_message_set
;
4917 /*************************************************************************/
4920 wbc_gtk_class_init (GObjectClass
*gobject_class
)
4922 WorkbookControlClass
*wbc_class
=
4923 GNM_WBC_CLASS (gobject_class
);
4925 g_return_if_fail (wbc_class
!= NULL
);
4927 debug_tab_order
= gnm_debug_flag ("tab-order");
4929 parent_class
= g_type_class_peek_parent (gobject_class
);
4930 gobject_class
->get_property
= wbc_gtk_get_property
;
4931 gobject_class
->set_property
= wbc_gtk_set_property
;
4932 gobject_class
->finalize
= wbc_gtk_finalize
;
4934 wbc_class
->edit_line_set
= wbcg_edit_line_set
;
4935 wbc_class
->selection_descr_set
= wbcg_edit_selection_descr_set
;
4936 wbc_class
->update_action_sensitivity
= wbcg_update_action_sensitivity
;
4938 wbc_class
->sheet
.add
= wbcg_sheet_add
;
4939 wbc_class
->sheet
.remove
= wbcg_sheet_remove
;
4940 wbc_class
->sheet
.focus
= wbcg_sheet_focus
;
4941 wbc_class
->sheet
.remove_all
= wbcg_sheet_remove_all
;
4943 wbc_class
->undo_redo
.labels
= wbcg_undo_redo_labels
;
4944 wbc_class
->undo_redo
.truncate
= wbc_gtk_undo_redo_truncate
;
4945 wbc_class
->undo_redo
.pop
= wbc_gtk_undo_redo_pop
;
4946 wbc_class
->undo_redo
.push
= wbc_gtk_undo_redo_push
;
4948 wbc_class
->menu_state
.update
= wbcg_menu_state_update
;
4950 wbc_class
->claim_selection
= wbcg_claim_selection
;
4951 wbc_class
->paste_from_selection
= wbcg_paste_from_selection
;
4952 wbc_class
->validation_msg
= wbcg_validation_msg
;
4954 wbc_class
->control_new
= wbc_gtk_control_new
;
4955 wbc_class
->init_state
= wbc_gtk_init_state
;
4956 wbc_class
->style_feedback
= wbc_gtk_style_feedback
;
4958 g_object_class_install_property (gobject_class
,
4959 WBG_GTK_PROP_AUTOSAVE_PROMPT
,
4960 g_param_spec_boolean ("autosave-prompt",
4961 P_("Autosave prompt"),
4962 P_("Ask about autosave?"),
4964 GSF_PARAM_STATIC
| G_PARAM_READWRITE
));
4965 g_object_class_install_property (gobject_class
,
4966 WBG_GTK_PROP_AUTOSAVE_TIME
,
4967 g_param_spec_int ("autosave-time",
4968 P_("Autosave time in seconds"),
4969 P_("Seconds before autosave"),
4971 GSF_PARAM_STATIC
| G_PARAM_READWRITE
));
4973 wbc_gtk_signals
[WBC_GTK_MARKUP_CHANGED
] = g_signal_new ("markup-changed",
4976 G_STRUCT_OFFSET (WBCGtkClass
, markup_changed
),
4978 g_cclosure_marshal_VOID__VOID
,
4982 gtk_window_set_default_icon_name ("gnumeric");
4986 wbc_gtk_init (GObject
*obj
)
4988 WBCGtk
*wbcg
= (WBCGtk
*)obj
;
4989 GError
*error
= NULL
;
4992 GEnumClass
*posclass
;
4993 GtkStyleContext
*ctxt
;
4995 wbcg
->gui
= gnm_gtk_builder_load ("wbcg.ui", NULL
, NULL
);
4996 wbcg
->cancel_button
= GET_GUI_ITEM ("cancel_button");
4997 wbcg
->ok_button
= GET_GUI_ITEM ("ok_button");
4998 wbcg
->func_button
= GET_GUI_ITEM ("func_button");
4999 wbcg
->progress_bar
= GET_GUI_ITEM ("progress_bar");
5000 wbcg
->auto_expr_label
= GET_GUI_ITEM ("auto_expr_label");
5001 wbcg
->status_text
= GET_GUI_ITEM ("status_text");
5002 wbcg
->tabs_paned
= GET_GUI_ITEM ("tabs_paned");
5003 wbcg
->status_area
= GET_GUI_ITEM ("status_area");
5004 wbcg
->notebook_area
= GET_GUI_ITEM ("notebook_area");
5005 wbcg
->snotebook
= GET_GUI_ITEM ("snotebook");
5006 wbcg
->selection_descriptor
= GET_GUI_ITEM ("selection_descriptor");
5007 wbcg
->menu_zone
= GET_GUI_ITEM ("menu_zone");
5008 wbcg
->toolbar_zones
[GTK_POS_TOP
] = GET_GUI_ITEM ("toolbar_zone_top");
5009 wbcg
->toolbar_zones
[GTK_POS_BOTTOM
] = NULL
;
5010 wbcg
->toolbar_zones
[GTK_POS_LEFT
] = GET_GUI_ITEM ("toolbar_zone_left");
5011 wbcg
->toolbar_zones
[GTK_POS_RIGHT
] = GET_GUI_ITEM ("toolbar_zone_right");
5012 wbcg
->updating_ui
= FALSE
;
5014 posclass
= G_ENUM_CLASS (g_type_class_peek (gtk_position_type_get_type ()));
5015 for (i
= 0; i
< posclass
->n_values
; i
++) {
5016 GEnumValue
const *ev
= posclass
->values
+ i
;
5017 GtkWidget
*zone
= wbcg
->toolbar_zones
[ev
->value
];
5018 GtkStyleContext
*ctxt
;
5021 ctxt
= gtk_widget_get_style_context (zone
);
5022 gtk_style_context_add_class (ctxt
, "toolbarzone");
5023 gtk_style_context_add_class (ctxt
, ev
->value_nick
);
5026 wbcg
->visibility_widgets
= g_hash_table_new_full (g_str_hash
,
5027 g_str_equal
, (GDestroyNotify
)g_free
, (GDestroyNotify
)g_object_unref
);
5028 wbcg
->undo_for_fullscreen
= NULL
;
5029 wbcg
->hide_for_fullscreen
= NULL
;
5031 wbcg
->autosave_prompt
= FALSE
;
5032 wbcg
->autosave_time
= 0;
5033 wbcg
->autosave_timer
= 0;
5035 /* We are not in edit mode */
5036 wbcg
->editing
= FALSE
;
5037 wbcg
->editing_sheet
= NULL
;
5038 wbcg
->editing_cell
= NULL
;
5040 wbcg
->new_object
= NULL
;
5042 wbcg
->idle_update_style_feedback
= 0;
5044 wbcg_set_toplevel (wbcg
, GET_GUI_ITEM ("toplevel"));
5045 ctxt
= gtk_widget_get_style_context (GTK_WIDGET (wbcg_toplevel (wbcg
)));
5046 gtk_style_context_add_class (ctxt
, "gnumeric");
5048 g_signal_connect (wbcg_toplevel (wbcg
), "window_state_event",
5049 G_CALLBACK (cb_wbcg_window_state_event
),
5052 wbc_gtk_init_actions (wbcg
);
5053 wbcg
->ui
= gtk_ui_manager_new ();
5054 g_object_connect (wbcg
->ui
,
5055 "signal::add_widget", G_CALLBACK (cb_add_menus_toolbars
), wbcg
,
5056 "signal::connect_proxy", G_CALLBACK (cb_connect_proxy
), wbcg
,
5057 "signal::disconnect_proxy", G_CALLBACK (cb_disconnect_proxy
), wbcg
,
5058 "signal::post_activate", G_CALLBACK (cb_post_activate
), wbcg
,
5060 gtk_ui_manager_insert_action_group (wbcg
->ui
, wbcg
->permanent_actions
, 0);
5061 gtk_ui_manager_insert_action_group (wbcg
->ui
, wbcg
->actions
, 0);
5062 gtk_ui_manager_insert_action_group (wbcg
->ui
, wbcg
->font_actions
, 0);
5063 gtk_ui_manager_insert_action_group (wbcg
->ui
, wbcg
->data_only_actions
, 0);
5064 gtk_ui_manager_insert_action_group (wbcg
->ui
, wbcg
->semi_permanent_actions
, 0);
5065 gtk_window_add_accel_group (wbcg_toplevel (wbcg
),
5066 gtk_ui_manager_get_accel_group (wbcg
->ui
));
5069 gtk_action_group_add_actions (wbcg
->actions
, extra_actions
,
5070 extra_actions_nb
, wbcg
);
5072 uifile
= g_build_filename (gnm_sys_data_dir (),
5073 (uifilename
? uifilename
: "GNOME_Gnumeric-gtk.xml"), NULL
);
5075 if (!gtk_ui_manager_add_ui_from_file (wbcg
->ui
, uifile
, &error
)) {
5076 g_message ("building menus failed: %s", error
->message
);
5077 g_error_free (error
);
5081 wbcg
->custom_uis
= g_hash_table_new_full (g_direct_hash
, g_direct_equal
,
5084 wbcg
->file_history
.actions
= NULL
;
5085 wbcg
->file_history
.merge_id
= 0;
5087 wbcg
->toolbar
.merge_id
= gtk_ui_manager_new_merge_id (wbcg
->ui
);
5088 wbcg
->toolbar
.actions
= gtk_action_group_new ("Toolbars");
5089 gtk_ui_manager_insert_action_group (wbcg
->ui
, wbcg
->toolbar
.actions
, 0);
5091 wbcg
->windows
.actions
= NULL
;
5092 wbcg
->windows
.merge_id
= 0;
5094 wbcg
->templates
.actions
= NULL
;
5095 wbcg
->templates
.merge_id
= 0;
5097 gnm_app_foreach_extra_ui ((GFunc
) cb_init_extra_ui
, wbcg
);
5098 g_object_connect ((GObject
*) gnm_app_get_app (),
5099 "swapped-object-signal::window-list-changed",
5100 G_CALLBACK (cb_regenerate_window_menu
), wbcg
,
5101 "object-signal::custom-ui-added",
5102 G_CALLBACK (cb_add_custom_ui
), wbcg
,
5103 "object-signal::custom-ui-removed",
5104 G_CALLBACK (cb_remove_custom_ui
), wbcg
,
5107 gtk_ui_manager_ensure_update (wbcg
->ui
);
5109 /* updates the undo/redo menu labels before check_underlines
5110 * to avoid problems like #324692. */
5111 wb_control_undo_redo_labels (GNM_WBC (wbcg
), NULL
, NULL
);
5112 if (GNM_VERSION_MAJOR
% 2 != 0 ||
5113 gnm_debug_flag ("underlines")) {
5114 gtk_container_foreach (GTK_CONTAINER (wbcg
->menu_zone
),
5115 (GtkCallback
)check_underlines
,
5119 wbcg_set_autosave_time (wbcg
, gnm_conf_get_core_workbook_autosave_time ());
5122 GSF_CLASS_FULL (WBCGtk
, wbc_gtk
, NULL
, NULL
, wbc_gtk_class_init
, NULL
,
5123 wbc_gtk_init
, GNM_WBC_TYPE
, 0,
5124 GSF_INTERFACE (wbcg_go_plot_data_allocator_init
, GOG_TYPE_DATA_ALLOCATOR
);
5125 GSF_INTERFACE (wbcg_gnm_cmd_context_init
, GO_TYPE_CMD_CONTEXT
))
5127 /******************************************************************************/
5130 wbc_gtk_markup_changer (WBCGtk
*wbcg
)
5132 g_signal_emit (G_OBJECT (wbcg
), wbc_gtk_signals
[WBC_GTK_MARKUP_CHANGED
], 0);
5135 /******************************************************************************/
5138 * @optional_view: (allow-none): #WorkbookView
5139 * @optional_wb: (allow-none) (transfer full): #Workbook
5140 * @optional_screen: (allow-none): #GdkScreen.
5141 * @optional_geometry: (allow-none): string.
5143 * Returns: (transfer none): (allow-none): the new #WBCGtk or %NULL.
5146 wbc_gtk_new (WorkbookView
*optional_view
,
5147 Workbook
*optional_wb
,
5148 GdkScreen
*optional_screen
,
5149 gchar
*optional_geometry
)
5153 WBCGtk
*wbcg
= g_object_new (wbc_gtk_get_type (), NULL
);
5154 WorkbookControl
*wbc
= (WorkbookControl
*)wbcg
;
5156 wbcg
->preferred_geometry
= g_strdup (optional_geometry
);
5158 wbc_gtk_create_edit_area (wbcg
);
5159 wbc_gtk_create_status_area (wbcg
);
5160 wbc_gtk_reload_recent_file_menu (wbcg
);
5162 g_signal_connect_object (gnm_app_get_app (),
5163 "notify::file-history-list",
5164 G_CALLBACK (wbc_gtk_reload_recent_file_menu
), wbcg
, G_CONNECT_SWAPPED
);
5166 wb_control_set_view (wbc
, optional_view
, optional_wb
);
5167 wbv
= wb_control_view (wbc
);
5168 sheet
= wbv
->current_sheet
;
5169 if (sheet
!= NULL
) {
5170 wb_control_menu_state_update (wbc
, MS_ALL
);
5171 wb_control_update_action_sensitivity (wbc
);
5172 wb_control_style_feedback (wbc
, NULL
);
5173 cb_zoom_change (sheet
, NULL
, wbcg
);
5176 wbc_gtk_create_notebook_area (wbcg
);
5178 wbcg_view_changed (wbcg
, NULL
, NULL
);
5180 if (optional_screen
)
5181 gtk_window_set_screen (wbcg_toplevel (wbcg
), optional_screen
);
5183 /* Postpone showing the GUI, so that we may resize it freely. */
5184 g_idle_add ((GSourceFunc
)show_gui
, wbcg
);
5186 /* Load this later when thing have calmed down. If this does not
5187 trigger by the time the file menu is activated, then the UI is
5188 updated right then -- and that looks sub-optimal because the
5189 "Templates" menu is empty (and thus not shown) until the
5191 wbcg
->template_loader_handler
=
5192 g_timeout_add (1000, (GSourceFunc
)wbc_gtk_load_templates
, wbcg
);
5194 wb_control_init_state (wbc
);
5202 * Returns: (transfer none): the toplevel #GtkWindow.
5205 wbcg_toplevel (WBCGtk
*wbcg
)
5207 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), NULL
);
5208 return GTK_WINDOW (wbcg
->toplevel
);
5212 wbcg_set_transient (WBCGtk
*wbcg
, GtkWindow
*window
)
5214 go_gtk_window_set_transient (wbcg_toplevel (wbcg
), window
);
5218 wbcg_get_n_scg (WBCGtk
const *wbcg
)
5220 return (GTK_IS_NOTEBOOK (wbcg
->snotebook
))?
5221 gtk_notebook_get_n_pages (wbcg
->snotebook
): -1;
5229 * Returns: (transfer none): the scg associated with the @i-th tab in
5231 * NOTE : @i != scg->sv->sheet->index_in_wb
5234 wbcg_get_nth_scg (WBCGtk
*wbcg
, int i
)
5236 SheetControlGUI
*scg
;
5239 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), NULL
);
5241 if (NULL
!= wbcg
->snotebook
&&
5242 NULL
!= (w
= gtk_notebook_get_nth_page (wbcg
->snotebook
, i
)) &&
5243 NULL
!= (scg
= get_scg (w
)) &&
5244 NULL
!= scg
->grid
&&
5245 NULL
!= scg_sheet (scg
) &&
5246 NULL
!= scg_view (scg
))
5252 #warning merge these and clarfy whether we want the visible scg, or the logical (view) scg
5254 * wbcg_focus_cur_scg:
5255 * @wbcg: The workbook control to operate on.
5257 * A utility routine to safely ensure that the keyboard focus
5258 * is attached to the item-grid. This is required when a user
5259 * edits a combo-box or and entry-line which grab focus.
5261 * It is called for zoom, font name/size, and accept/cancel for the editline.
5262 * Returns: (transfer none): the sheet.
5265 wbcg_focus_cur_scg (WBCGtk
*wbcg
)
5267 SheetControlGUI
*scg
;
5269 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), NULL
);
5271 if (wbcg
->snotebook
== NULL
)
5274 scg
= wbcg_get_nth_scg (wbcg
,
5275 gtk_notebook_get_current_page (wbcg
->snotebook
));
5277 g_return_val_if_fail (scg
!= NULL
, NULL
);
5279 scg_take_focus (scg
);
5280 return scg_sheet (scg
);
5287 * Returns: (transfer none): the current #ShetControlGUI.
5290 wbcg_cur_scg (WBCGtk
*wbcg
)
5292 return wbcg_get_scg (wbcg
, wbcg_cur_sheet (wbcg
));
5299 * Returns: (transfer none): the current #Sheet.
5302 wbcg_cur_sheet (WBCGtk
*wbcg
)
5304 return wb_control_cur_sheet (GNM_WBC (wbcg
));
5307 PangoFontDescription
*
5308 wbcg_get_font_desc (WBCGtk
*wbcg
)
5310 g_return_val_if_fail (GNM_IS_WBC_GTK (wbcg
), NULL
);
5312 if (!wbcg
->font_desc
) {
5313 GtkSettings
*settings
= wbcg_get_gtk_settings (wbcg
);
5314 wbcg
->font_desc
= settings_get_font_desc (settings
);
5315 g_signal_connect_object (settings
, "notify::gtk-font-name",
5316 G_CALLBACK (cb_desktop_font_changed
),
5319 return wbcg
->font_desc
;
5323 * wbcg_find_for_workbook:
5325 * @candidate: a candidate #WBCGtk
5326 * @pref_screen: the preferred screen.
5327 * @pref_display: the preferred display.
5329 * Returns: (transfer none): the found #WBCGtk or %NULL.
5332 wbcg_find_for_workbook (Workbook
*wb
,
5334 GdkScreen
*pref_screen
,
5335 GdkDisplay
*pref_display
)
5337 gboolean has_screen
, has_display
;
5339 g_return_val_if_fail (GNM_IS_WORKBOOK (wb
), NULL
);
5340 g_return_val_if_fail (candidate
== NULL
|| GNM_IS_WBC_GTK (candidate
), NULL
);
5342 if (candidate
&& wb_control_get_workbook (GNM_WBC (candidate
)) == wb
)
5345 if (!pref_screen
&& candidate
)
5346 pref_screen
= wbcg_get_screen (candidate
);
5348 if (!pref_display
&& pref_screen
)
5349 pref_display
= gdk_screen_get_display (pref_screen
);
5353 has_display
= FALSE
;
5354 WORKBOOK_FOREACH_CONTROL(wb
, wbv
, wbc
, {
5355 if (GNM_IS_WBC_GTK (wbc
)) {
5356 WBCGtk
*wbcg
= WBC_GTK (wbc
);
5357 GdkScreen
*screen
= wbcg_get_screen (wbcg
);
5358 GdkDisplay
*display
= gdk_screen_get_display (screen
);
5360 if (pref_screen
== screen
&& !has_screen
) {
5361 has_screen
= has_display
= TRUE
;
5363 } else if (pref_display
== display
&& !has_display
) {
5366 } else if (!candidate
)
5375 wbcg_focus_current_cell_indicator (WBCGtk
const *wbcg
)
5377 gtk_widget_grab_focus (GTK_WIDGET (wbcg
->selection_descriptor
));
5378 gtk_editable_select_region (GTK_EDITABLE (wbcg
->selection_descriptor
), 0, -1);