1 /* PSPPIRE - a graphical user interface for PSPP.
2 Copyright (C) 2007, 2010, 2011 Free Software Foundation, Inc.
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/>. */
19 #include <gdk/gdkkeysyms.h>
20 #include <gdk/gdkkeysyms-compat.h>
21 #include "psppire-keypad.h"
29 static void psppire_keypad_class_init (PsppireKeypadClass *klass);
30 static void psppire_keypad_init (PsppireKeypad *kp);
32 static guint keypad_signals [n_SIGNALS] = { 0 };
35 psppire_keypad_get_type (void)
37 static GType kp_type = 0;
41 static const GTypeInfo kp_info =
43 sizeof (PsppireKeypadClass),
45 NULL, /* base_finalize */
46 (GClassInitFunc) psppire_keypad_class_init,
47 NULL, /* class_finalize */
48 NULL, /* class_data */
49 sizeof (PsppireKeypad),
51 (GInstanceInitFunc) psppire_keypad_init,
54 kp_type = g_type_register_static (GTK_TYPE_EVENT_BOX, "PsppireKeypad",
61 static GObjectClass * parent_class = NULL;
64 psppire_keypad_dispose (GObject *obj)
66 PsppireKeypad *kp = (PsppireKeypad *)obj;
68 if (kp->dispose_has_run)
71 /* Make sure dispose does not run twice. */
72 kp->dispose_has_run = TRUE;
74 g_hash_table_unref (kp->frag_table);
76 /* Chain up to the parent class */
77 G_OBJECT_CLASS (parent_class)->dispose (obj);
81 psppire_keypad_finalize (GObject *obj)
83 /* Chain up to the parent class */
84 G_OBJECT_CLASS (parent_class)->finalize (obj);
88 psppire_keypad_class_init (PsppireKeypadClass *klass)
90 GObjectClass *gobject_class = G_OBJECT_CLASS (klass);
92 parent_class = g_type_class_peek_parent (klass);
94 gobject_class->dispose = psppire_keypad_dispose;
95 gobject_class->finalize = psppire_keypad_finalize;
97 keypad_signals[INSERT_SYNTAX] = g_signal_new ("insert-syntax",
98 G_TYPE_FROM_CLASS (klass),
99 G_SIGNAL_RUN_FIRST | G_SIGNAL_ACTION,
100 G_STRUCT_OFFSET (PsppireKeypadClass,
104 g_cclosure_marshal_VOID__STRING,
108 keypad_signals[ERASE] = g_signal_new ("erase",
109 G_TYPE_FROM_CLASS (klass),
110 G_SIGNAL_RUN_FIRST | G_SIGNAL_ACTION,
111 G_STRUCT_OFFSET (PsppireKeypadClass,
115 g_cclosure_marshal_VOID__VOID,
121 These are the strings that will be arguments to
123 The order of these must correspond
124 to the order of the button declarations
126 static const char * const keypad_insert_text[] = {
127 "0", "1", "2", "3", "4", "5", "6", "7", "8", "9",
128 ".", "+", "-", "*", "**", "/", "=", "<>", "<", "<=",
129 ">", ">=", "&", "|", "~", "()", NULL
133 /* Callback for any button click.
134 Emits the "insert-syntax" signal for the keypad,
135 with the string corresponding to the clicked button.
138 button_click (GtkButton *b, PsppireKeypad *kp)
140 const gchar *s = g_hash_table_lookup (kp->frag_table, b);
144 g_signal_emit (kp, keypad_signals [INSERT_SYNTAX], 0, s);
146 g_signal_emit (kp, keypad_signals [ERASE], 0);
149 static const gint cols = 6;
150 static const gint rows = 5;
154 /* Add BUTTON to KP. The top-left corner at X1,Y1, the
155 botton-right corner at X2,Y2 */
157 add_button (PsppireKeypad *kp, GtkWidget **button,
161 g_object_set (G_OBJECT (*button), "focus-on-click", FALSE, NULL);
163 gtk_grid_attach (GTK_GRID(kp->table), *button, x1, y1, 1, 1);
165 gtk_widget_set_size_request (*button,
166 30 * rows / (float) cols,
167 30 * cols / (float) rows);
169 g_hash_table_insert (kp->frag_table, *button,
170 (void *) keypad_insert_text[(button - &kp->digit[0])] );
172 g_signal_connect (*button, "clicked",
173 G_CALLBACK (button_click), kp);
175 gtk_widget_show (*button);
179 /* Return a new button with CODE as the unicode character for its label */
180 static inline GtkWidget *
181 button_new_from_unicode (gunichar code)
183 char s[6] = {0,0,0,0,0,0};
185 g_unichar_to_utf8 (code, s);
187 return gtk_button_new_with_label (s);
191 /* Callback which occurs when the mouse enters the widget.
192 It sets or unsets the focus.
195 enter_leave_notify (GtkWidget *widget,
196 GdkEventCrossing *event,
199 /* Do nothing if we're just moving between the widget and
201 if (event->detail == GDK_NOTIFY_INFERIOR)
204 if (event->type == GDK_ENTER_NOTIFY)
205 gtk_widget_grab_focus (widget);
211 key_release_callback (GtkWidget *widget,
215 if ( ! gtk_widget_has_focus (widget))
218 switch (event->keyval)
221 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "(");
224 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, ")");
227 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, ">");
230 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "<");
234 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "=");
236 case GDK_KP_Multiply :
238 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "*");
242 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "+");
244 case GDK_KP_Subtract :
246 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "-");
248 case GDK_KP_Decimal :
250 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, ".");
254 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "/");
258 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "0");
262 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "1");
266 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "2");
270 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "3");
274 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "4");
278 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "5");
282 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "6");
286 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "7");
290 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "8");
294 g_signal_emit (widget, keypad_signals [INSERT_SYNTAX], 0, "9");
305 psppire_keypad_init (PsppireKeypad *kp)
308 const int digit_voffset = 0;
309 const int digit_hoffset = 3;
311 gtk_widget_set_can_focus (GTK_WIDGET (kp), TRUE);
313 kp->dispose_has_run = FALSE;
315 g_signal_connect (kp, "enter-notify-event", G_CALLBACK (enter_leave_notify),
318 g_signal_connect (kp, "leave-notify-event", G_CALLBACK (enter_leave_notify),
321 g_signal_connect (kp, "key-release-event", G_CALLBACK (key_release_callback),
324 kp->frag_table = g_hash_table_new (g_direct_hash, g_direct_equal);
326 kp->table = gtk_grid_new ();
328 /* Buttons for the digits */
329 for (i = 0; i < 10; i++)
333 g_snprintf (buf, 5, "%d", i);
334 kp->digit[i] = gtk_button_new_with_label (buf);
337 add_button (kp, &kp->digit[i],
338 digit_hoffset + 0, digit_hoffset + 2,
339 digit_voffset + 3, digit_voffset + 4);
341 add_button (kp, &kp->digit[i],
342 digit_hoffset + j % 3, digit_hoffset + j % 3 + 1,
343 digit_voffset + 2 - (j / 3),
344 digit_voffset + 2 - (j / 3) + 1);
347 /* ... all the other buttons */
349 kp->dot = button_new_from_unicode (0xB7); /* MIDDLE DOT */
350 add_button (kp, &kp->dot, digit_hoffset + 2,
355 kp->plus = gtk_button_new_with_label ("+");
356 add_button (kp, &kp->plus, 0, 1,
359 kp->minus = button_new_from_unicode (0x2212); /* MINUS SIGN */
360 add_button (kp, &kp->minus, 0, 1,
363 kp->star = button_new_from_unicode (0xD7); /* MULTIPLICATION SIGN */
364 add_button (kp, &kp->star, 0, 1,
367 kp->slash = button_new_from_unicode (0xF7); /* DIVISION SIGN */
368 add_button (kp, &kp->slash, 0, 1,
374 g_markup_printf_escaped ("<span style=\"italic\">x<sup>y</sup></span>");
376 label = gtk_label_new ("**");
378 gtk_label_set_markup (GTK_LABEL (label), markup);
381 kp->star_star = gtk_button_new ();
382 gtk_container_add (GTK_CONTAINER (kp->star_star), label);
384 gtk_widget_show (label);
386 add_button (kp, &kp->star_star,
392 kp->gt = button_new_from_unicode (0x3E); /* GREATER-THAN SIGN*/
393 add_button (kp, &kp->gt, 2, 3,
396 kp->lt = button_new_from_unicode (0x3C); /* LESS-THAN SIGN*/
397 add_button (kp, &kp->lt, 1, 2,
400 kp->ge = button_new_from_unicode (0x2265); /* GREATER-THAN OR EQUAL */
401 add_button (kp, &kp->ge, 2, 3,
404 kp->le = button_new_from_unicode (0x2264); /* LESS-THAN OR EQUAL */
405 add_button (kp, &kp->le, 1, 2,
408 kp->neq = button_new_from_unicode (0x2260); /* NOT EQUAL */
409 add_button (kp, &kp->neq, 2, 3,
412 kp->eq = gtk_button_new_with_label ("=");
413 add_button (kp, &kp->eq, 1, 2,
416 kp->parentheses = gtk_button_new_with_label ("()");
417 add_button (kp, &kp->parentheses, 2, 3,
421 kp->delete = gtk_button_new_with_label ("Delete");
422 add_button (kp, &kp->delete, 3, 6,
427 kp->and = button_new_from_unicode (0x2227); /* LOGICAL AND */
428 add_button (kp, &kp->and, 1, 2,
432 kp->or = button_new_from_unicode (0x2228); /* LOGICAL OR */
433 add_button (kp, &kp->or, 2, 3,
437 kp->not = button_new_from_unicode (0xAC); /* NOT SIGN */
438 add_button (kp, &kp->not, 1, 2,
443 g_object_set (G_OBJECT (kp->table), "row-spacing", 5, NULL);
444 g_object_set (G_OBJECT (kp->table), "column-spacing", 5, NULL);
446 gtk_container_add (GTK_CONTAINER (kp), kp->table);
447 gtk_widget_show (kp->table);
449 gtk_widget_add_events (GTK_WIDGET (kp),
450 GDK_KEY_RELEASE_MASK |
451 GDK_LEAVE_NOTIFY_MASK |
452 GDK_ENTER_NOTIFY_MASK |
453 GDK_FOCUS_CHANGE_MASK);
459 psppire_keypad_new (void)
461 return GTK_WIDGET (g_object_new (psppire_keypad_get_type (), NULL));