src/ui/gui/psppire-acr.c

   1 /* PSPPIRE - a graphical user interface for PSPP.
   2    Copyright (C) 2007 Free Software Foundation, Inc.
   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 /*
  19   This widget is a GtkBox which looks roughly like:
  20
  21   +-----------------------------+
  22   |+------------+  +----------+ |
  23   ||   Add      |  |          | |
  24   |+------------+  |          | |
  25   |                |          | |
  26   |+------------+  |          | |
  27   ||   Edit     |  |          | |
  28   |+------------+  |          | |
  29   |                |          | |
  30   |+------------+  |          | |
  31   ||  Remove    |  |          | |
  32   |+------------+  +----------+ |
  33   +-----------------------------+
  34
  35 */
  36
  37 #include <config.h>
  38 #include <gtk/gtk.h>
  39
  40 #include "psppire-acr.h"
  41 #include "helper.h"
  42
  43 static void psppire_acr_init (PsppireAcr *);
  44
  45 GType
  46 psppire_acr_get_type (void)
  47 {
  48   static GType acr_type = 0;
  49
  50   if (!acr_type)
  51     {
  52       static const GTypeInfo acr_info =
  53       {
  54         sizeof (PsppireAcrClass),
  55         NULL, /* base_init */
  56         NULL, /* base_finalize */
  57         NULL, /* class_init */
  58         NULL, /* class_finalize */
  59         NULL, /* class_data */
  60         sizeof (PsppireAcr),
  61         0,
  62         (GInstanceInitFunc) psppire_acr_init,
  63       };
  64
  65       acr_type = g_type_register_static (GTK_TYPE_HBOX, "PsppireAcr",
  66                                         &acr_info, 0);
  67     }
  68
  69   return acr_type;
  70 }
  71
  72
  73 static gboolean row_is_selected (const PsppireAcr *acr);
  74
  75
  76 static gboolean
  77 value_from_entry (gint col, GValue *val, gpointer data)
  78 {
  79   GtkEntry *entry = data;
  80   const gchar *text = gtk_entry_get_text (entry);
  81   gdouble x = g_strtod (text, 0);
  82
  83   g_value_init (val, G_TYPE_DOUBLE);
  84   g_value_set_double (val, x);
  85
  86   return TRUE;
  87 }
  88
  89
  90 /* Returns true, if there's text in the entry */
  91 static gboolean
  92 entry_not_empty (gpointer data)
  93 {
  94   GtkEntry *entry = data;
  95
  96   const char *text = gtk_entry_get_text (entry);
  97
  98   return !g_str_equal (text, "");
  99 }
 100
 101
 102 static void
 103 clear_entry (gpointer data)
 104 {
 105   GtkEntry *entry = data;
 106   gtk_entry_set_text (entry, "");
 107 }
 108
 109
 110 static void
 111 on_entry_change (GtkEntry *entry, PsppireAcr *acr)
 112 {
 113   gtk_widget_set_sensitive (acr->add_button, acr->enabled (entry));
 114
 115   gtk_widget_set_sensitive (acr->change_button, acr->enabled (entry)
 116                             && row_is_selected (acr));
 117 }
 118
 119 void
 120 psppire_acr_set_entry  (PsppireAcr *acr, GtkEntry *entry)
 121 {
 122   acr->get_value = value_from_entry;
 123   acr->get_value_data = entry;
 124   acr->enabled = entry_not_empty;
 125   acr->enabled_data = entry;
 126   acr->update = clear_entry;
 127   acr->update_data = entry;
 128
 129   g_signal_connect (entry, "changed", G_CALLBACK (on_entry_change), acr);
 130 }
 131
 132
 133 /* Callback for when the Add button is clicked.
 134    It appends an item to the list. */
 135 static void
 136 on_add_button_clicked (PsppireAcr *acr)
 137 {
 138   gint i;
 139   GtkTreeIter iter;
 140   gtk_list_store_append (acr->list_store, &iter);
 141
 142   for (i = 0 ;
 143        i < gtk_tree_model_get_n_columns (GTK_TREE_MODEL (acr->list_store));
 144        ++i)
 145     {
 146       static GValue value;
 147       if ( ! acr->get_value (i, &value, acr->get_value_data) )
 148         continue;
 149
 150       gtk_list_store_set_value (acr->list_store, &iter,
 151                                 i, &value);
 152       g_value_unset (&value);
 153     }
 154
 155   if (acr->update) acr->update (acr->update_data);
 156 }
 157
 158
 159 /* Callback for when the Changed button is clicked.
 160    It replaces the currently selected entry. */
 161 static void
 162 on_change_button_clicked (PsppireAcr *acr)
 163 {
 164   gint i;
 165   GtkTreeModel *model = GTK_TREE_MODEL (acr->list_store);
 166
 167   GList *l=
 168     gtk_tree_selection_get_selected_rows (acr->selection,
 169                                           &model);
 170
 171   GtkTreePath *path = l->data;
 172
 173   GtkTreeIter iter;
 174
 175   gtk_tree_model_get_iter (model, &iter, path);
 176
 177   for (i = 0 ;
 178        i < gtk_tree_model_get_n_columns (GTK_TREE_MODEL (acr->list_store));
 179        ++i)
 180     {
 181       static GValue value;
 182       if ( ! acr->get_value (i, &value, acr->get_value_data) )
 183         continue;
 184
 185       gtk_list_store_set_value (acr->list_store, &iter,
 186                                 i, &value);
 187       g_value_unset (&value);
 188     }
 189
 190   g_list_foreach (l, (GFunc) gtk_tree_path_free, NULL);
 191   g_list_free (l);
 192
 193   if ( acr->update) acr->update (acr->update_data);
 194 }
 195
 196
 197 /* Callback for when the remove button is clicked.
 198    It deletes the currently selected entry. */
 199 static void
 200 on_remove_button_clicked (PsppireAcr *acr)
 201 {
 202   GtkTreeModel *model = GTK_TREE_MODEL (acr->list_store);
 203
 204   GList *l=
 205     gtk_tree_selection_get_selected_rows (acr->selection,
 206                                           &model);
 207
 208   GtkTreePath *path = l->data;
 209
 210   GtkTreeIter iter;
 211
 212   gtk_tree_model_get_iter (model, &iter, path);
 213
 214   gtk_list_store_remove (acr->list_store, &iter);
 215
 216   g_list_foreach (l, (GFunc) gtk_tree_path_free, NULL);
 217   g_list_free (l);
 218 }
 219
 220 /* Returns true if there is a row currently selected.
 221    False otherwise. */
 222 static gboolean
 223 row_is_selected (const PsppireAcr *acr)
 224 {
 225   gboolean result;
 226   GtkTreeModel *model = GTK_TREE_MODEL (acr->list_store);
 227   GList *l = gtk_tree_selection_get_selected_rows (acr->selection,
 228                                                    &model);
 229
 230   result = (l != NULL);
 231
 232   g_list_foreach (l, (GFunc) gtk_tree_path_free, NULL);
 233   g_list_free (l);
 234
 235   return result;
 236 }
 237
 238
 239 /* Callback which occurs when an item in the treeview
 240    is selected */
 241 static void
 242 on_select (GtkTreeSelection *selection, gpointer data)
 243 {
 244   PsppireAcr *acr = data;
 245
 246   gtk_widget_set_sensitive (acr->remove_button, row_is_selected (acr));
 247
 248   gtk_widget_set_sensitive (acr->change_button,
 249                             row_is_selected (acr)
 250                             );
 251 }
 252
 253
 254 void
 255 psppire_acr_set_enabled (PsppireAcr *acr, gboolean status)
 256 {
 257
 258   gtk_widget_set_sensitive (acr->add_button, status);
 259
 260   gtk_widget_set_sensitive (acr->change_button, status
 261                             && row_is_selected (acr));
 262 }
 263
 264
 265 static void
 266 psppire_acr_init (PsppireAcr *acr)
 267 {
 268   GtkWidget *bb  = gtk_vbutton_box_new ();
 269
 270   GtkWidget *sw = gtk_scrolled_window_new (NULL, NULL);
 271
 272   acr->tv = GTK_TREE_VIEW (gtk_tree_view_new ());
 273
 274   acr->add_button = gtk_button_new_from_stock (GTK_STOCK_ADD);
 275   acr->change_button = gtk_button_new_from_stock (GTK_STOCK_EDIT);
 276   acr->remove_button = gtk_button_new_from_stock (GTK_STOCK_REMOVE);
 277
 278   acr->get_value = NULL;
 279   acr->get_value_data = NULL;
 280   acr->enabled = NULL;
 281   acr->update = NULL;
 282
 283   gtk_widget_set_sensitive (acr->change_button, FALSE);
 284   gtk_widget_set_sensitive (acr->remove_button, FALSE);
 285   gtk_widget_set_sensitive (acr->add_button, FALSE);
 286
 287   psppire_box_pack_start_defaults (GTK_BOX (bb), acr->add_button);
 288   psppire_box_pack_start_defaults (GTK_BOX (bb), acr->change_button);
 289   psppire_box_pack_start_defaults (GTK_BOX (bb), acr->remove_button);
 290
 291   gtk_box_pack_start (GTK_BOX (acr), bb, FALSE, TRUE, 5);
 292
 293   g_object_set (sw,
 294                 "hscrollbar-policy", GTK_POLICY_NEVER,
 295                 "vscrollbar-policy", GTK_POLICY_AUTOMATIC,
 296                 "shadow-type", GTK_SHADOW_ETCHED_IN,
 297                 NULL);
 298
 299   gtk_container_add (GTK_CONTAINER (sw), GTK_WIDGET (acr->tv));
 300
 301   gtk_box_pack_start (GTK_BOX (acr), sw, TRUE, TRUE, 5);
 302
 303
 304   g_signal_connect_swapped (acr->add_button, "clicked",
 305                             G_CALLBACK (on_add_button_clicked), acr);
 306   g_signal_connect_swapped (acr->change_button, "clicked",
 307                             G_CALLBACK (on_change_button_clicked), acr);
 308   g_signal_connect_swapped (acr->remove_button, "clicked",
 309                             G_CALLBACK (on_remove_button_clicked), acr);
 310
 311   gtk_widget_show_all (bb);
 312
 313
 314   g_object_set (acr->tv, "headers-visible", FALSE, NULL);
 315
 316   acr->list_store = NULL;
 317
 318   psppire_acr_set_model (acr, acr->list_store);
 319
 320   acr->selection = gtk_tree_view_get_selection (acr->tv);
 321
 322   g_signal_connect (acr->selection, "changed", G_CALLBACK (on_select), acr);
 323
 324   gtk_widget_set_sensitive (GTK_WIDGET (acr), FALSE);
 325
 326   gtk_widget_show_all (sw);
 327
 328   {
 329     GtkCellRenderer *renderer = gtk_cell_renderer_text_new ();
 330     GtkTreeViewColumn *column =
 331       gtk_tree_view_column_new_with_attributes ("value",
 332                                                 renderer,
 333                                                 "text", 0,
 334                                                 NULL);
 335
 336     gtk_tree_view_append_column (acr->tv, column);
 337   }
 338
 339 }
 340
 341
 342 GtkWidget*
 343 psppire_acr_new (void)
 344 {
 345   return GTK_WIDGET (g_object_new (psppire_acr_get_type (), NULL));
 346 }
 347
 348
 349
 350 /* Set the widget's treemodel */
 351 void
 352 psppire_acr_set_model (PsppireAcr *acr, GtkListStore *liststore)
 353 {
 354   acr->list_store = liststore;
 355
 356   gtk_tree_view_set_model (GTK_TREE_VIEW (acr->tv),
 357                            GTK_TREE_MODEL (liststore));
 358
 359   gtk_widget_set_sensitive (GTK_WIDGET (acr), liststore != NULL);
 360 }
 361
 362
 363 void
 364 psppire_acr_set_enable_func (PsppireAcr *acr, EnabledFunc func, gpointer p)
 365 {
 366   acr->enabled = func;
 367   acr->enabled_data = p;
 368 }
 369
 370 void
 371 psppire_acr_set_get_value_func (PsppireAcr *acr,
 372                                 GetValueFunc getvalue, gpointer data)
 373 {
 374   acr->get_value_data = data;
 375   acr->get_value = getvalue;
 376 }