Change license from GPLv2+ to GPLv3+.
[pspp-builds.git] / src / ui / gui / psppire-buttonbox.c
1 /* PSPPIRE - a graphical user interface for PSPP.
2    Copyright (C) 2007  Free Software Foundation
3
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.
8
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.
13
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/>. */
16
17
18 #include <config.h>
19
20 #include <glib.h>
21 #include <gtk/gtk.h>
22 #include <gtk/gtksignal.h>
23 #include "psppire-buttonbox.h"
24 #include "psppire-dialog.h"
25
26 #include <gettext.h>
27
28 #define _(msgid) gettext (msgid)
29 #define N_(msgid) msgid
30
31 GType psppire_button_flags_get_type (void);
32
33
34 static void psppire_button_box_class_init          (PsppireButtonBoxClass *);
35 static void psppire_button_box_init                (PsppireButtonBox      *);
36
37
38 GType
39 psppire_button_box_get_type (void)
40 {
41   static GType button_box_type = 0;
42
43   if (!button_box_type)
44     {
45       static const GTypeInfo button_box_info =
46       {
47         sizeof (PsppireButtonBoxClass),
48         NULL, /* base_init */
49         NULL, /* base_finalize */
50         (GClassInitFunc) psppire_button_box_class_init,
51         NULL, /* class_finalize */
52         NULL, /* class_data */
53         sizeof (PsppireButtonBox),
54         0,
55         (GInstanceInitFunc) psppire_button_box_init,
56       };
57
58       button_box_type = g_type_register_static (GTK_TYPE_BUTTON_BOX,
59                                             "PsppireButtonBox", &button_box_info, 0);
60     }
61
62   return button_box_type;
63 }
64
65 enum {
66   PROP_BUTTONS = 1
67 };
68
69 static void
70 psppire_buttonbox_set_property (GObject         *object,
71                                guint            prop_id,
72                                const GValue    *value,
73                                GParamSpec      *pspec)
74 {
75   gint i;
76   guint flags;
77   PsppireButtonBox *bb = PSPPIRE_BUTTONBOX (object);
78   if ( prop_id != PROP_BUTTONS)
79     {
80       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
81       return ;
82     }
83
84   flags = g_value_get_flags (value);
85
86   for (i = 0 ; i < n_PsppireButtonBoxButtons ; ++i )
87     g_object_set (bb->button[i], "visible", 0x01 & (flags >> i)  , NULL);
88 }
89
90 static void
91 psppire_buttonbox_get_property (GObject         *object,
92                                guint            prop_id,
93                                GValue          *value,
94                                GParamSpec      *pspec)
95 {
96   guint flags = 0;
97   gint i;
98
99   PsppireButtonBox *bb = PSPPIRE_BUTTONBOX (object);
100
101   if  (PROP_BUTTONS != prop_id)
102     {
103       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
104       return;
105     }
106
107   for (i = 0 ; i < n_PsppireButtonBoxButtons ; ++i )
108     {
109       gboolean visibility;
110       g_object_get (bb->button[i], "visible", &visibility, NULL);
111
112       if ( visibility )
113         flags |= (0x01 << i);
114     }
115
116   g_value_set_flags (value, flags);
117 }
118
119
120 typedef enum
121   {
122     PSPPIRE_BUTTON_OK_MASK     = (1 << PSPPIRE_BUTTON_OK),
123     PSPPIRE_BUTTON_GOTO_MASK   = (1 << PSPPIRE_BUTTON_GOTO),
124     PSPPIRE_BUTTON_CONTINUE_MASK = (1 << PSPPIRE_BUTTON_CONTINUE),
125     PSPPIRE_BUTTON_CANCEL_MASK = (1 << PSPPIRE_BUTTON_CANCEL),
126     PSPPIRE_BUTTON_HELP_MASK   = (1 << PSPPIRE_BUTTON_HELP),
127     PSPPIRE_BUTTON_RESET_MASK  = (1 << PSPPIRE_BUTTON_RESET),
128     PSPPIRE_BUTTON_PASTE_MASK  = (1 << PSPPIRE_BUTTON_PASTE)
129   } PsppireButtonMask;
130
131 static GParamSpec *button_flags;
132
133 static void
134 psppire_button_box_class_init (PsppireButtonBoxClass *class)
135 {
136   GObjectClass *object_class = G_OBJECT_CLASS (class);
137
138   object_class->set_property = psppire_buttonbox_set_property;
139   object_class->get_property = psppire_buttonbox_get_property;
140
141   button_flags =
142     g_param_spec_flags ("buttons",
143                         _("Buttons"),
144                         _("The mask that decides what buttons appear in the button box"),
145                         G_TYPE_PSPPIRE_BUTTON_MASK,
146                         PSPPIRE_BUTTON_OK_MASK |
147                         PSPPIRE_BUTTON_CANCEL_MASK |
148                         PSPPIRE_BUTTON_RESET_MASK |
149                         PSPPIRE_BUTTON_HELP_MASK |
150                         PSPPIRE_BUTTON_PASTE_MASK,
151                         G_PARAM_READWRITE);
152
153
154   g_object_class_install_property (object_class,
155                                    PROP_BUTTONS,
156                                    button_flags);
157
158 }
159
160 static void
161 close_and_respond (GtkWidget *w, gint response)
162 {
163   PsppireDialog *dialog;
164
165   GtkWidget *toplevel = gtk_widget_get_toplevel (w);
166
167   /* If we're not in a psppire dialog (for example when in glade)
168      then do nothing */
169   if ( ! PSPPIRE_IS_DIALOG (toplevel))
170     return;
171
172   dialog = PSPPIRE_DIALOG (toplevel);
173
174   dialog->response = response;
175
176   psppire_dialog_close (dialog);
177 }
178
179
180 static void
181 close_dialog (GtkWidget *w, gpointer data)
182 {
183   close_and_respond (w, GTK_RESPONSE_CLOSE);
184 }
185
186
187 static void
188 ok_button_clicked (GtkWidget *w, gpointer data)
189 {
190   close_and_respond (w, GTK_RESPONSE_OK);
191 }
192
193
194 static void
195 paste_button_clicked (GtkWidget *w, gpointer data)
196 {
197   close_and_respond (w, PSPPIRE_RESPONSE_PASTE);
198 }
199
200 static void
201 goto_button_clicked (GtkWidget *w, gpointer data)
202 {
203   close_and_respond (w, PSPPIRE_RESPONSE_GOTO);
204 }
205
206
207 static void
208 refresh_clicked (GtkWidget *w, gpointer data)
209 {
210   GtkWidget *toplevel = gtk_widget_get_toplevel (w);
211   PsppireDialog *dialog;
212
213   if ( ! PSPPIRE_IS_DIALOG (toplevel))
214     return;
215
216   dialog = PSPPIRE_DIALOG (toplevel);
217
218   psppire_dialog_reload (dialog);
219 }
220
221
222 static void
223 psppire_button_box_init (PsppireButtonBox *bb)
224 {
225
226   bb->button[PSPPIRE_BUTTON_OK] = gtk_button_new_from_stock (GTK_STOCK_OK);
227   gtk_box_pack_start_defaults (GTK_BOX (bb), bb->button[PSPPIRE_BUTTON_OK]);
228   g_signal_connect (bb->button[PSPPIRE_BUTTON_OK], "clicked",
229                     G_CALLBACK (ok_button_clicked), NULL);
230   g_object_set (bb->button[PSPPIRE_BUTTON_OK], "no-show-all", TRUE, NULL);
231
232
233   bb->button[PSPPIRE_BUTTON_GOTO] =
234     gtk_button_new_from_stock (GTK_STOCK_JUMP_TO);
235   gtk_box_pack_start_defaults (GTK_BOX (bb), bb->button[PSPPIRE_BUTTON_GOTO]);
236   g_signal_connect (bb->button[PSPPIRE_BUTTON_GOTO], "clicked",
237                     G_CALLBACK (goto_button_clicked), NULL);
238   g_object_set (bb->button[PSPPIRE_BUTTON_GOTO], "no-show-all", TRUE, NULL);
239
240
241   bb->button[PSPPIRE_BUTTON_CONTINUE] =
242     gtk_button_new_with_mnemonic (_("Continue"));
243
244   gtk_box_pack_start_defaults (GTK_BOX (bb),
245                                bb->button[PSPPIRE_BUTTON_CONTINUE]);
246
247   g_object_set (bb->button[PSPPIRE_BUTTON_CONTINUE],
248                 "no-show-all", TRUE, NULL);
249
250
251
252   bb->button[PSPPIRE_BUTTON_PASTE] = gtk_button_new_with_mnemonic (_("_Paste"));
253   g_signal_connect (bb->button[PSPPIRE_BUTTON_PASTE], "clicked",
254                     G_CALLBACK (paste_button_clicked), NULL);
255   gtk_box_pack_start_defaults (GTK_BOX (bb), bb->button[PSPPIRE_BUTTON_PASTE]);
256   g_object_set (bb->button[PSPPIRE_BUTTON_PASTE], "no-show-all", TRUE, NULL);
257
258   bb->button[PSPPIRE_BUTTON_CANCEL] = gtk_button_new_from_stock (GTK_STOCK_CANCEL);
259   g_signal_connect (bb->button[PSPPIRE_BUTTON_CANCEL], "clicked",
260                     G_CALLBACK (close_dialog), NULL);
261   gtk_box_pack_start_defaults (GTK_BOX (bb), bb->button[PSPPIRE_BUTTON_CANCEL]);
262   g_object_set (bb->button[PSPPIRE_BUTTON_CANCEL], "no-show-all", TRUE, NULL);
263
264
265   bb->button[PSPPIRE_BUTTON_RESET] = gtk_button_new_from_stock (GTK_STOCK_REFRESH);
266   g_signal_connect (bb->button[PSPPIRE_BUTTON_RESET], "clicked",
267                     G_CALLBACK (refresh_clicked), NULL);
268   gtk_box_pack_start_defaults (GTK_BOX (bb), bb->button[PSPPIRE_BUTTON_RESET]);
269   g_object_set (bb->button[PSPPIRE_BUTTON_RESET], "no-show-all", TRUE, NULL);
270
271
272   bb->button[PSPPIRE_BUTTON_HELP] = gtk_button_new_from_stock (GTK_STOCK_HELP);
273   gtk_box_pack_start_defaults (GTK_BOX (bb), bb->button[PSPPIRE_BUTTON_HELP]);
274   g_object_set (bb->button[PSPPIRE_BUTTON_HELP], "no-show-all", TRUE, NULL);
275
276
277   /* Set the default visibilities */
278   {
279     GValue value = { 0 };
280     guint flags;
281     gint i;
282     g_value_init (&value, button_flags->value_type);
283     g_param_value_set_default(button_flags, &value);
284
285
286     flags = g_value_get_flags (&value);
287
288     for (i = 0 ; i < n_PsppireButtonBoxButtons ; ++i )
289       g_object_set (bb->button[i], "visible", 0x01 & (flags >> i)  , NULL);
290
291     g_value_unset (&value);
292   }
293
294 }
295
296
297 /* This function is lifted verbatim from the Gtk2.10.6 library */
298
299 void
300 _psppire_button_box_child_requisition (GtkWidget *widget,
301                                        int       *nvis_children,
302                                        int       *nvis_secondaries,
303                                        int       *width,
304                                        int       *height)
305 {
306   GtkButtonBox *bbox;
307   GtkBoxChild *child;
308   GList *children;
309   gint nchildren;
310   gint nsecondaries;
311   gint needed_width;
312   gint needed_height;
313   GtkRequisition child_requisition;
314   gint ipad_w;
315   gint ipad_h;
316   gint width_default;
317   gint height_default;
318   gint ipad_x_default;
319   gint ipad_y_default;
320
321   gint child_min_width;
322   gint child_min_height;
323   gint ipad_x;
324   gint ipad_y;
325
326   g_return_if_fail (GTK_IS_BUTTON_BOX (widget));
327
328   bbox = GTK_BUTTON_BOX (widget);
329
330   gtk_widget_style_get (widget,
331                         "child-min-width", &width_default,
332                         "child-min-height", &height_default,
333                         "child-internal-pad-x", &ipad_x_default,
334                         "child-internal-pad-y", &ipad_y_default,
335                         NULL);
336
337   child_min_width = bbox->child_min_width   != GTK_BUTTONBOX_DEFAULT
338     ? bbox->child_min_width : width_default;
339   child_min_height = bbox->child_min_height !=GTK_BUTTONBOX_DEFAULT
340     ? bbox->child_min_height : height_default;
341   ipad_x = bbox->child_ipad_x != GTK_BUTTONBOX_DEFAULT
342     ? bbox->child_ipad_x : ipad_x_default;
343   ipad_y = bbox->child_ipad_y != GTK_BUTTONBOX_DEFAULT
344     ? bbox->child_ipad_y : ipad_y_default;
345
346   nchildren = 0;
347   nsecondaries = 0;
348   children = GTK_BOX(bbox)->children;
349   needed_width = child_min_width;
350   needed_height = child_min_height;
351   ipad_w = ipad_x * 2;
352   ipad_h = ipad_y * 2;
353
354   while (children)
355     {
356       child = children->data;
357       children = children->next;
358
359       if (GTK_WIDGET_VISIBLE (child->widget))
360         {
361           nchildren += 1;
362           gtk_widget_size_request (child->widget, &child_requisition);
363
364           if (child_requisition.width + ipad_w > needed_width)
365             needed_width = child_requisition.width + ipad_w;
366           if (child_requisition.height + ipad_h > needed_height)
367             needed_height = child_requisition.height + ipad_h;
368           if (child->is_secondary)
369             nsecondaries++;
370         }
371     }
372
373   if (nvis_children)
374     *nvis_children = nchildren;
375   if (nvis_secondaries)
376     *nvis_secondaries = nsecondaries;
377   if (width)
378     *width = needed_width;
379   if (height)
380     *height = needed_height;
381 }
382
383
384 GType
385 psppire_button_flags_get_type (void)
386 {
387   static GType ftype = 0;
388   if (ftype == 0)
389     {
390       static const GFlagsValue values[] =
391         {
392           { PSPPIRE_BUTTON_OK_MASK,     "PSPPIRE_BUTTON_OK_MASK",     N_("OK") },
393           { PSPPIRE_BUTTON_GOTO_MASK,   "PSPPIRE_BUTTON_GOTO_MASK", N_("Go To") },
394           { PSPPIRE_BUTTON_CONTINUE_MASK,"PSPPIRE_BUTTON_CONTINUE_MASK", N_("Continue") },
395           { PSPPIRE_BUTTON_CANCEL_MASK, "PSPPIRE_BUTTON_CANCEL_MASK", N_("Cancel") },
396           { PSPPIRE_BUTTON_HELP_MASK,   "PSPPIRE_BUTTON_HELP_MASK",   N_("Help") },
397           { PSPPIRE_BUTTON_RESET_MASK,  "PSPPIRE_BUTTON_RESET_MASK",  N_("Reset") },
398           { PSPPIRE_BUTTON_PASTE_MASK,  "PSPPIRE_BUTTON_PASTE_MASK",  N_("Paste") },
399           { 0, NULL, NULL }
400         };
401
402       ftype = g_flags_register_static
403         (g_intern_static_string ("PsppireButtonFlags"), values);
404
405     }
406   return ftype;
407 }
408