pintos-os.org Git - pspp/blob - src/ui/gui/dict-display.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 #include <gettext.h>
  20 #include <gtk/gtk.h>
  21
  22 #include "psppire-conf.h"
  23 #include "dict-display.h"
  24
  25 #include "psppire-dict.h"
  26 #include "psppire-dictview.h"
  27 #include "psppire-means-layer.h"
  28 #include "psppire-var-ptr.h"
  29 #include "psppire-var-view.h"
  30 #include "psppire-select-dest.h"
  31 #include <libpspp/i18n.h>
  32 #include "helper.h"
  33 #include <data/variable.h>
  34 #include <data/format.h>
  35
  36 #define _(msgid) gettext (msgid)
  37 #define N_(msgid) msgid
  38
  39 static void
  40 get_base_model (GtkTreeModel *top_model, GtkTreeIter *top_iter,
  41                 GtkTreeModel **model, GtkTreeIter *iter
  42                 )
  43 {
  44   *model = top_model;
  45   *iter = *top_iter;
  46   while (GTK_IS_TREE_MODEL_FILTER (*model))
  47     {
  48       GtkTreeIter parent_iter = *iter;
  49       GtkTreeModelFilter *parent_model = GTK_TREE_MODEL_FILTER (*model);
  50
  51       *model = gtk_tree_model_filter_get_model (parent_model);
  52
  53       gtk_tree_model_filter_convert_iter_to_child_iter (parent_model,
  54                                                         iter,
  55                                                         &parent_iter);
  56     }
  57
  58   g_assert (PSPPIRE_IS_DICT (*model));
  59 }
  60
  61
  62 void
  63 insert_source_row_into_entry (GtkTreeIter iter,
  64                               GtkWidget *dest,
  65                               GtkTreeModel *model,
  66                               gpointer data
  67                               )
  68 {
  69   GtkTreePath *path;
  70   GtkTreeModel *dict;
  71   gint *idx;
  72   struct variable *var;
  73   GtkTreeIter dict_iter;
  74
  75   g_return_if_fail (GTK_IS_ENTRY(dest));
  76
  77   get_base_model (model, &iter, &dict, &dict_iter);
  78
  79   path = gtk_tree_model_get_path (GTK_TREE_MODEL (dict), &dict_iter);
  80
  81   idx = gtk_tree_path_get_indices (path);
  82
  83   var =  psppire_dict_get_variable (PSPPIRE_DICT (dict), *idx);
  84
  85   gtk_tree_path_free (path);
  86
  87   gtk_entry_set_text (GTK_ENTRY (dest),  var_get_name (var));
  88 }
  89
  90
  91
  92 static void
  93 insert_source_row_into_tree_model (GtkTreeIter source_iter,
  94                                      GtkTreeModel *dest_model,
  95                                      GtkTreeModel *source_model,
  96                                      gpointer data)
  97 {
  98   GtkTreePath *path;
  99   GtkTreeIter dest_iter;
 100   GtkTreeIter dict_iter;
 101   gint *row ;
 102
 103   const struct variable *var;
 104   GtkTreeModel *dict;
 105
 106   get_base_model (source_model, &source_iter, &dict, &dict_iter);
 107
 108   path = gtk_tree_model_get_path (dict, &dict_iter);
 109
 110   row = gtk_tree_path_get_indices (path);
 111
 112   var = psppire_dict_get_variable (PSPPIRE_DICT (dict), *row);
 113
 114   gtk_list_store_append (GTK_LIST_STORE (dest_model),  &dest_iter);
 115
 116   gtk_list_store_set (GTK_LIST_STORE (dest_model), &dest_iter, 0, var, -1);
 117
 118   gtk_tree_path_free (path);
 119 }
 120
 121
 122
 123 void
 124 insert_source_row_into_tree_view (GtkTreeIter iter,
 125                                   GtkWidget *dest,
 126                                   GtkTreeModel *model,
 127                                   gpointer data)
 128 {
 129   GtkTreeModel *destmodel = gtk_tree_view_get_model (GTK_TREE_VIEW (dest));
 130
 131   insert_source_row_into_tree_model (iter, destmodel, model, data);
 132 }
 133
 134
 135 void
 136 insert_source_row_into_layers (GtkTreeIter iter,
 137                                GtkWidget *dest,
 138                                GtkTreeModel *model,
 139                                gpointer data)
 140 {
 141   GtkTreeModel *destmodel = psppire_means_layer_get_model (PSPPIRE_MEANS_LAYER (dest));
 142
 143   insert_source_row_into_tree_model (iter, destmodel, model, data);
 144
 145   psppire_means_layer_update (PSPPIRE_MEANS_LAYER (dest));
 146 }
 147
 148
 149
 150
 151 gboolean
 152 is_currently_in_entry (GtkTreeModel *model, GtkTreeIter *iter,
 153                        PsppireSelector *selector)
 154 {
 155   gboolean result;
 156   GtkTreeIter dict_iter;
 157   GtkTreeModel *dict;
 158   struct variable *var;
 159   gint dict_index;
 160   gint *indeces;
 161   GtkTreePath *path;
 162   GtkWidget *entry = NULL;
 163   const gchar *text = NULL;
 164
 165   g_object_get (selector, "dest-widget", &entry, NULL);
 166
 167   text = gtk_entry_get_text (GTK_ENTRY (entry));
 168
 169   get_base_model (model, iter, &dict, &dict_iter);
 170
 171   path = gtk_tree_model_get_path (dict, &dict_iter);
 172
 173   indeces = gtk_tree_path_get_indices (path);
 174
 175   dict_index = indeces [0];
 176
 177   var = psppire_dict_get_variable (PSPPIRE_DICT (dict), dict_index);
 178
 179   gtk_tree_path_free (path);
 180
 181   result = ( 0 == strcmp (text, var_get_name (var) ));
 182
 183   return result;
 184 }
 185
 186 gboolean
 187 is_currently_in_varview (GtkTreeModel *model, GtkTreeIter *iter, PsppireSelector *sel)
 188 {
 189   gboolean ret = false;
 190
 191   /* First, fetch the variable from the source */
 192
 193   PsppireDictView *dv = PSPPIRE_DICT_VIEW (sel->source);
 194
 195   GtkTreePath *path = gtk_tree_model_get_path (model, iter);
 196
 197   gint *idx = gtk_tree_path_get_indices (path);
 198
 199   const struct variable *var =  psppire_dict_get_variable (dv->dict, *idx);
 200
 201
 202   /* Now test if that variable exists in the destination */
 203
 204   GValue value = {0};
 205
 206   g_value_init (&value, PSPPIRE_VAR_PTR_TYPE);
 207   g_value_set_boxed (&value, var);
 208
 209   ret = psppire_select_dest_widget_contains_var (PSPPIRE_SELECT_DEST_WIDGET (sel->dest), &value);
 210
 211   g_value_unset (&value);
 212
 213   return ret ;
 214 }
 215