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