2 PSPPIRE --- A Graphical User Interface for PSPP
3 Copyright (C) 2005 Free Software Foundation
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software
17 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
21 /* This module describes the behaviour of the Value Labels dialog box,
22 used for input of the value labels in the variable sheet */
29 #include "val-labs-dialog.h"
30 #include <data/value-labels.h>
32 /* This callback occurs when the text in the label entry box
35 on_label_entry_change (GtkEntry *entry, gpointer data)
39 struct val_labs_dialog *dialog = data;
40 g_assert (dialog->labs);
42 text = gtk_entry_get_text (GTK_ENTRY (dialog->value_entry));
44 text_to_value (text, &v,
45 *var_get_write_format (dialog->pv));
48 if ( val_labs_find (dialog->labs, v) )
50 gtk_widget_set_sensitive (dialog->change_button, TRUE);
51 gtk_widget_set_sensitive (dialog->add_button, FALSE);
55 gtk_widget_set_sensitive (dialog->change_button, FALSE);
56 gtk_widget_set_sensitive (dialog->add_button, TRUE);
61 /* Set the TREEVIEW list cursor to the item which has the value VAL */
63 select_treeview_from_value (GtkTreeView *treeview, union value *val)
68 We do this with a linear search through the model --- hardly
69 efficient, but the list is short ... */
72 GtkTreeModel * model = gtk_tree_view_get_model (treeview);
75 for (success = gtk_tree_model_get_iter_first (model, &iter);
77 success = gtk_tree_model_iter_next (model, &iter))
82 gtk_tree_model_get_value (model, &iter, 1, &gvalue);
84 v.f = g_value_get_double (&gvalue);
86 if ( 0 == memcmp (&v, val, sizeof (union value)))
92 path = gtk_tree_model_get_path (model, &iter);
95 gtk_tree_view_set_cursor (treeview, path, 0, 0);
96 gtk_tree_path_free (path);
102 /* This callback occurs when the text in the value entry box is
105 on_value_entry_change (GtkEntry *entry, gpointer data)
109 struct val_labs_dialog *dialog = data;
111 const gchar *text = gtk_entry_get_text (GTK_ENTRY (dialog->value_entry));
114 text_to_value (text, &v,
115 *var_get_write_format (dialog->pv));
118 g_signal_handler_block (GTK_ENTRY (dialog->label_entry),
119 dialog->change_handler_id);
121 gtk_entry_set_text (GTK_ENTRY (dialog->label_entry),"");
124 if ( (s = val_labs_find (dialog->labs, v)) )
126 gtk_entry_set_text (GTK_ENTRY (dialog->label_entry), s);
127 gtk_widget_set_sensitive (dialog->add_button, FALSE);
128 gtk_widget_set_sensitive (dialog->remove_button, TRUE);
129 select_treeview_from_value (GTK_TREE_VIEW (dialog->treeview), &v);
133 gtk_widget_set_sensitive (dialog->remove_button, FALSE);
134 gtk_widget_set_sensitive (dialog->add_button, TRUE);
137 g_signal_handler_unblock (GTK_ENTRY (dialog->label_entry),
138 dialog->change_handler_id);
142 /* Callback for when the Value Labels dialog is closed using
145 val_labs_ok (GtkWidget *w, gpointer data)
147 struct val_labs_dialog *dialog = data;
149 var_set_value_labels (dialog->pv, dialog->labs);
151 val_labs_destroy (dialog->labs);
158 /* Callback for when the Value Labels dialog is closed using
161 val_labs_cancel (GtkWidget *w, gpointer data)
163 struct val_labs_dialog *dialog = data;
165 val_labs_destroy (dialog->labs);
172 /* Return the value-label pair currently selected in the dialog box */
173 static struct val_lab *
174 get_selected_tuple (struct val_labs_dialog *dialog)
176 GtkTreeView *treeview = GTK_TREE_VIEW (dialog->treeview);
177 static struct val_lab vl;
180 GValue the_value = {0};
182 GtkTreeSelection* sel = gtk_tree_view_get_selection (treeview);
184 GtkTreeModel * model = gtk_tree_view_get_model (treeview);
186 gtk_tree_selection_get_selected (sel, &model, &iter);
188 gtk_tree_model_get_value (model, &iter, 1, &the_value);
190 vl.value.f = g_value_get_double (&the_value);
191 g_value_unset (&the_value);
193 vl.label = val_labs_find (dialog->labs, vl.value);
199 static void repopulate_dialog (struct val_labs_dialog *dialog);
201 /* Callback which occurs when the "Change" button is clicked */
203 on_change (GtkWidget *w, gpointer data)
205 struct val_labs_dialog *dialog = data;
207 const gchar *val_text = gtk_entry_get_text (GTK_ENTRY (dialog->value_entry));
211 text_to_value (val_text, &v,
212 *var_get_write_format (dialog->pv));
214 val_labs_replace (dialog->labs, v,
215 gtk_entry_get_text (GTK_ENTRY (dialog->label_entry)));
217 gtk_widget_set_sensitive (dialog->change_button, FALSE);
219 repopulate_dialog (dialog);
224 /* Callback which occurs when the "Add" button is clicked */
226 on_add (GtkWidget *w, gpointer data)
228 struct val_labs_dialog *dialog = data;
232 const gchar *text = gtk_entry_get_text (GTK_ENTRY (dialog->value_entry));
234 text_to_value (text, &v,
235 *var_get_write_format (dialog->pv));
238 if ( ! val_labs_add (dialog->labs, v,
240 ( GTK_ENTRY (dialog->label_entry)) ) )
243 gtk_widget_set_sensitive (dialog->add_button, FALSE);
245 repopulate_dialog (dialog);
250 /* Callback which occurs when the "Remove" button is clicked */
252 on_remove (GtkWidget *w, gpointer data)
254 struct val_labs_dialog *dialog = data;
256 struct val_lab *vl = get_selected_tuple (dialog);
258 val_labs_remove (dialog->labs, vl->value);
260 repopulate_dialog (dialog);
262 gtk_widget_set_sensitive (dialog->remove_button, FALSE);
269 /* Callback which occurs when a line item is selected in the list of
270 value--label pairs.*/
272 on_select_row (GtkTreeView *treeview,
276 struct val_labs_dialog *dialog = data;
278 struct val_lab * vl = get_selected_tuple (dialog);
280 gchar *const text = value_to_text (vl->value,
281 *var_get_write_format (dialog->pv));
283 g_signal_handler_block (GTK_ENTRY (dialog->value_entry),
284 dialog->value_handler_id);
286 gtk_entry_set_text (GTK_ENTRY (dialog->value_entry), text);
288 g_signal_handler_unblock (GTK_ENTRY (dialog->value_entry),
289 dialog->value_handler_id);
292 g_signal_handler_block (GTK_ENTRY (dialog->label_entry),
293 dialog->change_handler_id);
295 labeltext = pspp_locale_to_utf8 (vl->label, -1, 0);
296 gtk_entry_set_text (GTK_ENTRY (dialog->label_entry),
300 g_signal_handler_unblock (GTK_ENTRY (dialog->label_entry),
301 dialog->change_handler_id);
303 gtk_widget_set_sensitive (dialog->remove_button, TRUE);
304 gtk_widget_set_sensitive (dialog->change_button, FALSE);
308 /* Create a new dialog box
309 (there should normally be only one)*/
310 struct val_labs_dialog *
311 val_labs_dialog_create (GladeXML *xml)
313 GtkTreeViewColumn *column;
315 GtkCellRenderer *renderer ;
317 struct val_labs_dialog *dialog = g_malloc (sizeof (*dialog));
319 dialog->window = get_widget_assert (xml,"val_labs_dialog");
320 dialog->value_entry = get_widget_assert (xml,"value_entry");
321 dialog->label_entry = get_widget_assert (xml,"label_entry");
323 gtk_window_set_transient_for
324 (GTK_WINDOW (dialog->window),
325 GTK_WINDOW (get_widget_assert (xml, "data_editor")));
327 dialog->ok = get_widget_assert (xml, "val_labs_ok");
328 dialog->add_button = get_widget_assert (xml, "val_labs_add");
329 dialog->remove_button = get_widget_assert (xml, "val_labs_remove");
330 dialog->change_button = get_widget_assert (xml, "val_labs_change");
332 dialog->treeview = get_widget_assert (xml,"treeview1");
334 gtk_tree_view_set_headers_visible (GTK_TREE_VIEW (dialog->treeview), FALSE);
336 renderer = gtk_cell_renderer_text_new ();
338 column = gtk_tree_view_column_new_with_attributes ("Title",
344 gtk_tree_view_append_column (GTK_TREE_VIEW (dialog->treeview), column);
346 g_signal_connect (GTK_OBJECT (get_widget_assert (xml, "val_labs_cancel")),
348 GTK_SIGNAL_FUNC (val_labs_cancel), dialog);
350 dialog->change_handler_id =
351 g_signal_connect (GTK_OBJECT (dialog->label_entry),
353 GTK_SIGNAL_FUNC (on_label_entry_change), dialog);
355 dialog->value_handler_id =
356 g_signal_connect (GTK_OBJECT (dialog->value_entry),
358 GTK_SIGNAL_FUNC (on_value_entry_change), dialog);
360 g_signal_connect (GTK_OBJECT (dialog->change_button),
362 GTK_SIGNAL_FUNC (on_change), dialog);
365 g_signal_connect (GTK_OBJECT (get_widget_assert (xml, "val_labs_ok")),
367 GTK_SIGNAL_FUNC (val_labs_ok), dialog);
370 g_signal_connect (GTK_OBJECT (dialog->treeview), "cursor-changed",
371 GTK_SIGNAL_FUNC (on_select_row), dialog);
374 g_signal_connect (GTK_OBJECT (dialog->remove_button), "clicked",
375 GTK_SIGNAL_FUNC (on_remove), dialog);
378 g_signal_connect (GTK_OBJECT (dialog->add_button), "clicked",
379 GTK_SIGNAL_FUNC (on_add), dialog);
387 /* Populate the components of the dialog box, from the 'labs' member
390 repopulate_dialog (struct val_labs_dialog *dialog)
392 struct val_labs_iterator *vli = 0;
397 GtkListStore *list_store = gtk_list_store_new (2,
401 g_signal_handler_block (GTK_ENTRY (dialog->label_entry),
402 dialog->change_handler_id);
403 g_signal_handler_block (GTK_ENTRY (dialog->value_entry),
404 dialog->value_handler_id);
406 gtk_entry_set_text (GTK_ENTRY (dialog->value_entry), "");
407 gtk_entry_set_text (GTK_ENTRY (dialog->label_entry), "");
409 g_signal_handler_unblock (GTK_ENTRY (dialog->value_entry),
410 dialog->value_handler_id);
411 g_signal_handler_unblock (GTK_ENTRY (dialog->label_entry),
412 dialog->change_handler_id);
415 for (vl = val_labs_first_sorted (dialog->labs, &vli);
417 vl = val_labs_next (dialog->labs, &vli))
421 value_to_text (vl->value,
422 *var_get_write_format (dialog->pv));
425 pspp_locale_to_utf8 (vl->label, -1, 0);
427 gchar *const text = g_strdup_printf ("%s = \"%s\"",
431 gtk_list_store_append (list_store, &iter);
432 gtk_list_store_set (list_store, &iter,
442 gtk_tree_view_set_model (GTK_TREE_VIEW (dialog->treeview),
443 GTK_TREE_MODEL (list_store));
445 g_object_unref (list_store);
449 /* Initialise and display the dialog box */
451 val_labs_dialog_show (struct val_labs_dialog *dialog)
453 const struct val_labs *value_labels;
455 g_assert (!dialog->labs);
457 value_labels = var_get_value_labels (dialog->pv);
460 dialog->labs = val_labs_copy ( value_labels );
462 dialog->labs = val_labs_create ( var_get_width (dialog->pv));
464 gtk_widget_set_sensitive (dialog->remove_button, FALSE);
465 gtk_widget_set_sensitive (dialog->change_button, FALSE);
466 gtk_widget_set_sensitive (dialog->add_button, FALSE);
468 repopulate_dialog (dialog);
469 gtk_widget_show (dialog->window);