1 /* PSPPIRE - a graphical user interface for PSPP.
2 Copyright (C) 2007, 2010, 2011, 2012 Free Software Foundation
4 This program is free software: you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation, either version 3 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */
21 #include "psppire-dialog.h"
22 #include "psppire-buttonbox.h"
23 #include "psppire-selector.h"
25 #include "builder-wrapper.h"
26 #include "help-menu.h"
28 #include "psppire-window-base.h"
30 static void psppire_dialog_class_init (PsppireDialogClass *);
31 static void psppire_dialog_init (PsppireDialog *);
40 static guint signals [n_SIGNALS];
43 static void psppire_dialog_buildable_init (GtkBuildableIface *iface);
47 psppire_dialog_get_type (void)
49 static GType dialog_type = 0;
53 static const GTypeInfo dialog_info =
55 sizeof (PsppireDialogClass),
57 NULL, /* base_finalize */
58 (GClassInitFunc) psppire_dialog_class_init,
59 NULL, /* class_finalize */
60 NULL, /* class_data */
61 sizeof (PsppireDialog),
63 (GInstanceInitFunc) psppire_dialog_init,
66 static const GInterfaceInfo buildable_info =
68 (GInterfaceInitFunc) psppire_dialog_buildable_init,
73 dialog_type = g_type_register_static (PSPPIRE_TYPE_WINDOW_BASE,
74 "PsppireDialog", &dialog_info, 0);
76 g_type_add_interface_static (dialog_type,
86 static GObjectClass *parent_class = NULL;
99 psppire_dialog_get_property (GObject *object,
104 PsppireDialog *dialog = PSPPIRE_DIALOG (object);
108 case PROP_ORIENTATION:
110 if ( GTK_IS_VBOX (dialog->box) || GTK_VPANED (dialog->box))
111 g_value_set_enum (value, PSPPIRE_VERTICAL);
112 else if ( GTK_IS_HBOX (dialog->box) || GTK_HPANED (dialog->box))
113 g_value_set_enum (value, PSPPIRE_HORIZONTAL);
114 else if ( GTK_IS_TABLE (dialog->box))
115 g_value_set_enum (value, PSPPIRE_TABULAR);
119 g_value_set_boolean (value, dialog->slidable);
122 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
129 dialog_set_container (PsppireDialog *dialog)
131 if ( dialog->box != NULL)
133 gtk_container_remove (GTK_CONTAINER (dialog), dialog->box);
136 switch (dialog->orientation)
138 case PSPPIRE_HORIZONTAL:
139 if ( dialog->slidable)
140 dialog->box = gtk_hpaned_new();
142 dialog->box = gtk_hbox_new (FALSE, 5);
144 case PSPPIRE_VERTICAL:
145 if ( dialog->slidable)
146 dialog->box = gtk_vpaned_new();
148 dialog->box = gtk_vbox_new (FALSE, 5);
150 case PSPPIRE_TABULAR:
151 dialog->box = gtk_table_new (2, 3, FALSE);
152 g_object_set (dialog->box,
159 gtk_widget_show_all (dialog->box);
160 gtk_container_add (GTK_CONTAINER (dialog), dialog->box);
165 psppire_dialog_set_property (GObject *object,
171 PsppireDialog *dialog = PSPPIRE_DIALOG (object);
176 dialog->slidable = g_value_get_boolean (value);
178 case PROP_ORIENTATION:
179 dialog->orientation = g_value_get_enum (value);
182 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
186 dialog_set_container (dialog);
190 static GParamSpec *orientation_spec ;
193 psppire_dialog_class_init (PsppireDialogClass *class)
195 GObjectClass *object_class = (GObjectClass *) class;
197 GParamSpec *sliding_spec ;
200 g_param_spec_enum ("orientation",
202 "Which way widgets are packed",
203 PSPPIRE_TYPE_ORIENTATION,
204 PSPPIRE_HORIZONTAL /* default value */,
205 G_PARAM_CONSTRUCT_ONLY |G_PARAM_READWRITE);
208 g_param_spec_boolean ("slidable",
210 "Can the container be sized by the user",
212 G_PARAM_CONSTRUCT_ONLY |G_PARAM_READWRITE);
214 object_class->set_property = psppire_dialog_set_property;
215 object_class->get_property = psppire_dialog_get_property;
217 g_object_class_install_property (object_class,
222 g_object_class_install_property (object_class,
226 signals [DIALOG_REFRESH] =
227 g_signal_new ("refresh",
228 G_TYPE_FROM_CLASS (class),
232 g_cclosure_marshal_VOID__VOID,
238 g_signal_new ("response",
239 G_TYPE_FROM_CLASS (class),
243 g_cclosure_marshal_VOID__INT,
249 signals [VALIDITY_CHANGED] =
250 g_signal_new ("validity-changed",
251 G_TYPE_FROM_CLASS (class),
255 g_cclosure_marshal_VOID__BOOLEAN,
261 signals [DIALOG_HELP] =
262 g_signal_new ("help",
263 G_TYPE_FROM_CLASS (class),
267 g_cclosure_marshal_VOID__STRING,
273 parent_class = g_type_class_peek_parent (class);
280 close_dialog (GtkWidget *w, gpointer data)
282 PsppireDialog *dialog = data;
284 psppire_dialog_close (dialog);
288 psppire_dialog_close (PsppireDialog *dialog)
290 g_main_loop_quit (dialog->loop);
291 gtk_widget_hide (GTK_WIDGET (dialog));
296 delete_event_callback (GtkWidget *w, GdkEvent *e, gpointer data)
298 close_dialog (w, data);
303 psppire_dialog_init (PsppireDialog *dialog)
307 dialog->contents_are_valid = NULL;
308 dialog->validity_data = NULL;
309 dialog->contents_are_acceptable = NULL;
310 dialog->acceptable_data = NULL;
311 dialog->slidable = FALSE;
313 g_value_init (&value, orientation_spec->value_type);
314 g_param_value_set_default (orientation_spec, &value);
316 gtk_window_set_type_hint (GTK_WINDOW (dialog),
317 GDK_WINDOW_TYPE_HINT_DIALOG);
319 g_value_unset (&value);
321 g_signal_connect (dialog, "delete-event",
322 G_CALLBACK (delete_event_callback),
325 gtk_window_set_type_hint (GTK_WINDOW (dialog),
326 GDK_WINDOW_TYPE_HINT_DIALOG);
328 g_object_set (dialog, "icon-name", "pspp", NULL);
333 psppire_dialog_new (void)
335 PsppireDialog *dialog ;
337 dialog = g_object_new (psppire_dialog_get_type (),
340 return GTK_WIDGET (dialog) ;
345 psppire_dialog_notify_change (PsppireDialog *dialog)
347 if ( dialog->contents_are_valid )
349 gboolean valid = dialog->contents_are_valid (dialog->validity_data);
351 g_signal_emit (dialog, signals [VALIDITY_CHANGED], 0, valid);
356 /* Descend the widget tree, connecting appropriate signals to the
357 psppire_dialog_notify_change callback */
359 connect_notify_signal (GtkWidget *w, gpointer data)
361 PsppireDialog *dialog = data;
363 if ( PSPPIRE_IS_BUTTONBOX (w))
366 if ( GTK_IS_CONTAINER (w))
368 gtk_container_foreach (GTK_CONTAINER (w),
369 connect_notify_signal,
374 /* It's unfortunate that GTK+ doesn't have a generic
375 "user-modified-state-changed" signal. Instead, we have to try and
376 predict what widgets and signals are likely to exist in our dialogs. */
378 if ( GTK_IS_TOGGLE_BUTTON (w))
380 g_signal_connect_swapped (w, "toggled",
381 G_CALLBACK (psppire_dialog_notify_change),
385 if ( PSPPIRE_IS_SELECTOR (w))
387 g_signal_connect_swapped (w, "selected",
388 G_CALLBACK (psppire_dialog_notify_change),
391 g_signal_connect_swapped (w, "de-selected",
392 G_CALLBACK (psppire_dialog_notify_change),
396 if ( GTK_IS_EDITABLE (w))
398 g_signal_connect_swapped (w, "changed",
399 G_CALLBACK (psppire_dialog_notify_change),
403 if ( GTK_IS_CELL_EDITABLE (w))
405 g_signal_connect_swapped (w, "editing-done",
406 G_CALLBACK (psppire_dialog_notify_change),
410 if ( GTK_IS_TEXT_VIEW (w))
412 GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (w));
414 g_signal_connect_swapped (buffer, "changed",
415 G_CALLBACK (psppire_dialog_notify_change),
419 if ( GTK_IS_TREE_VIEW (w))
422 GtkTreeView *tv = GTK_TREE_VIEW (w);
423 GtkTreeSelection *selection =
424 gtk_tree_view_get_selection (tv);
425 GtkTreeViewColumn *col;
426 GtkTreeModel *model = gtk_tree_view_get_model (tv);
430 g_signal_connect_swapped (model, "row-changed",
431 G_CALLBACK (psppire_dialog_notify_change),
434 g_signal_connect_swapped (model, "row-deleted",
435 G_CALLBACK (psppire_dialog_notify_change),
438 g_signal_connect_swapped (model, "row-inserted",
439 G_CALLBACK (psppire_dialog_notify_change),
443 g_signal_connect_swapped (selection, "changed",
444 G_CALLBACK (psppire_dialog_notify_change),
447 while ((col = gtk_tree_view_get_column (tv, i++)))
449 GList *renderers = gtk_cell_layout_get_cells (GTK_CELL_LAYOUT (col));
450 GList *start = renderers;
453 if ( GTK_IS_CELL_RENDERER_TOGGLE (renderers->data))
454 g_signal_connect_swapped (renderers->data, "toggled",
455 G_CALLBACK (psppire_dialog_notify_change), dialog);
456 renderers = renderers->next;
465 psppire_dialog_run (PsppireDialog *dialog)
467 if ( dialog->contents_are_valid != NULL )
468 gtk_container_foreach (GTK_CONTAINER (dialog->box),
469 connect_notify_signal,
472 dialog->loop = g_main_loop_new (NULL, FALSE);
474 gtk_widget_show (GTK_WIDGET (dialog));
476 if ( dialog->contents_are_valid != NULL)
477 g_signal_emit (dialog, signals [VALIDITY_CHANGED], 0, FALSE);
479 g_signal_emit (dialog, signals [DIALOG_REFRESH], 0);
481 gdk_threads_leave ();
482 g_main_loop_run (dialog->loop);
483 gdk_threads_enter ();
485 g_main_loop_unref (dialog->loop);
487 g_signal_emit (dialog, signals [RESPONSE], 0, dialog->response);
489 return dialog->response;
494 psppire_dialog_reload (PsppireDialog *dialog)
496 g_signal_emit (dialog, signals [DIALOG_REFRESH], 0);
501 psppire_dialog_help (PsppireDialog *dialog)
504 g_object_get (dialog, "name", &name, NULL);
508 g_signal_emit (dialog, signals [DIALOG_HELP], 0, name);
513 psppire_orientation_get_type (void)
515 static GType etype = 0;
518 static const GEnumValue values[] =
520 { PSPPIRE_HORIZONTAL, "PSPPIRE_HORIZONTAL", "Horizontal" },
521 { PSPPIRE_VERTICAL, "PSPPIRE_VERTICAL", "Vertical" },
522 { PSPPIRE_TABULAR, "PSPPIRE_TABULAR", "Tabular" },
526 etype = g_enum_register_static
527 (g_intern_static_string ("PsppireOrientation"), values);
534 /* Sets a predicate function that is checked after each change that the user
535 makes to the dialog's state. If the predicate function returns false, then
536 "OK" and other buttons that accept the dialog's settings will be
539 psppire_dialog_set_valid_predicate (PsppireDialog *dialog,
540 ContentsAreValid contents_are_valid,
543 dialog->contents_are_valid = contents_are_valid;
544 dialog->validity_data = data;
547 /* Sets a predicate function that is called after "OK" or another button that
548 accepts the dialog's settings is pushed. If the predicate function returns
549 false, then the button push is ignored. (If the predicate function returns
550 false, then it should take some action to notify the user why the contents
551 are unacceptable, e.g. pop up a dialog box.)
553 An accept predicate is preferred over a validity predicate when the reason
554 why the dialog settings are unacceptable may not be obvious to the user, so
555 that the user needs a helpful message to explain. */
557 psppire_dialog_set_accept_predicate (PsppireDialog *dialog,
558 ContentsAreValid contents_are_acceptable,
561 dialog->contents_are_acceptable = contents_are_acceptable;
562 dialog->acceptable_data = data;
566 psppire_dialog_is_acceptable (const PsppireDialog *dialog)
568 return (dialog->contents_are_acceptable == NULL
569 || dialog->contents_are_acceptable (dialog->acceptable_data));
576 get_internal_child (GtkBuildable *buildable,
578 const gchar *childname)
580 PsppireDialog *dialog = PSPPIRE_DIALOG (buildable);
582 if ( 0 == strcmp (childname, "hbox"))
583 return G_OBJECT (dialog->box);
591 psppire_dialog_buildable_init (GtkBuildableIface *iface)
593 iface->get_internal_child = get_internal_child;