pintos-os.org Git - pspp/blob - src/ui/gui/psppire-spreadsheet-model.c

   1 /* PSPPIRE - a graphical user interface for PSPP.
   2    Copyright (C) 2013  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 <glib.h>
  20
  21 #include "psppire-spreadsheet-model.h"
  22
  23 #include "data/spreadsheet-reader.h"
  24
  25 static void psppire_spreadsheet_model_init           (PsppireSpreadsheetModel *spreadsheetModel);
  26 static void psppire_spreadsheet_model_class_init     (PsppireSpreadsheetModelClass *class);
  27
  28 static void psppire_spreadsheet_model_finalize       (GObject   *object);
  29 static void psppire_spreadsheet_model_dispose        (GObject   *object);
  30
  31 static GObjectClass *parent_class = NULL;
  32
  33
  34 static void spreadsheet_tree_model_init (GtkTreeModelIface *iface);
  35
  36
  37 GType
  38 psppire_spreadsheet_model_get_type (void)
  39 {
  40   static GType object_type = 0;
  41
  42   if (!object_type)
  43     {
  44       static const GTypeInfo spreadsheet_model_info =
  45       {
  46         sizeof (PsppireSpreadsheetModelClass),
  47         NULL,           /* base_init */
  48         NULL,           /* base_finalize */
  49         (GClassInitFunc) psppire_spreadsheet_model_class_init,
  50         NULL,           /* class_finalize */
  51         NULL,           /* class_data */
  52         sizeof (PsppireSpreadsheetModel),
  53         0,
  54         (GInstanceInitFunc) psppire_spreadsheet_model_init,
  55       };
  56
  57       static const GInterfaceInfo tree_model_info = {
  58         (GInterfaceInitFunc) spreadsheet_tree_model_init,
  59         NULL,
  60         NULL
  61       };
  62
  63       object_type = g_type_register_static (G_TYPE_OBJECT,
  64                                                 "PsppireSpreadsheetModel",
  65                                                 &spreadsheet_model_info, 0);
  66
  67       g_type_add_interface_static (object_type, GTK_TYPE_TREE_MODEL,
  68                                    &tree_model_info);
  69
  70     }
  71
  72   return object_type;
  73 }
  74
  75
  76 /* Properties */
  77 enum
  78 {
  79   PROP_0,
  80   PROP_SPREADSHEET
  81 };
  82
  83
  84 static void
  85 psppire_spreadsheet_model_set_property (GObject         *object,
  86                                         guint            prop_id,
  87                                         const GValue    *value,
  88                                         GParamSpec      *pspec)
  89 {
  90   PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (object);
  91
  92   switch (prop_id)
  93     {
  94     case PROP_SPREADSHEET:
  95       spreadsheetModel->spreadsheet = g_value_get_pointer (value);
  96       break;
  97     default:
  98       G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
  99       break;
 100     };
 101 }
 102
 103
 104
 105 static void
 106 psppire_spreadsheet_model_dispose  (GObject *object)
 107 {
 108 }
 109
 110 static void
 111 psppire_spreadsheet_model_finalize (GObject *object)
 112 {
 113   //  PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (object);
 114 }
 115
 116 static void
 117 psppire_spreadsheet_model_class_init (PsppireSpreadsheetModelClass *class)
 118 {
 119   GObjectClass *object_class;
 120
 121   GParamSpec *spreadsheet_spec =
 122     g_param_spec_pointer ("spreadsheet",
 123                           "Spreadsheet",
 124                           "The spreadsheet that this model represents",
 125                           G_PARAM_CONSTRUCT_ONLY | G_PARAM_WRITABLE);
 126
 127   parent_class = g_type_class_peek_parent (class);
 128   object_class = (GObjectClass*) class;
 129
 130   object_class->set_property = psppire_spreadsheet_model_set_property;
 131
 132   g_object_class_install_property (object_class,
 133                                    PROP_SPREADSHEET,
 134                                    spreadsheet_spec);
 135
 136
 137
 138   object_class->finalize = psppire_spreadsheet_model_finalize;
 139   object_class->dispose = psppire_spreadsheet_model_dispose;
 140 }
 141
 142
 143 static void
 144 psppire_spreadsheet_model_init (PsppireSpreadsheetModel *spreadsheetModel)
 145 {
 146   spreadsheetModel->dispose_has_run = FALSE;
 147   spreadsheetModel->stamp = g_random_int ();
 148 }
 149
 150
 151 GtkTreeModel*
 152 psppire_spreadsheet_model_new (struct spreadsheet *sp)
 153 {
 154   return g_object_new (psppire_spreadsheet_model_get_type (),
 155                        "spreadsheet", sp,
 156                        NULL);
 157 }
 158
 159
 160
 161
 162 \f
 163
 164 static const gint N_COLS = 2;
 165
 166 static gint
 167 tree_model_n_columns (GtkTreeModel *model)
 168 {
 169   g_print ("%s\n", __FUNCTION__);
 170   return N_COLS;
 171 }
 172
 173 static GtkTreeModelFlags
 174 tree_model_get_flags (GtkTreeModel *model)
 175 {
 176   g_print ("%s\n", __FUNCTION__);
 177   g_return_val_if_fail (PSPPIRE_IS_SPREADSHEET_MODEL (model), (GtkTreeModelFlags) 0);
 178
 179   return GTK_TREE_MODEL_LIST_ONLY;
 180 }
 181
 182 static GType
 183 tree_model_column_type (GtkTreeModel *model, gint index)
 184 {
 185   g_print ("%s %d\n", __FUNCTION__, index);
 186   g_return_val_if_fail (PSPPIRE_IS_SPREADSHEET_MODEL (model), (GType) 0);
 187   g_return_val_if_fail (index < N_COLS, (GType) 0);
 188
 189   return G_TYPE_STRING;
 190 }
 191
 192
 193 static gboolean
 194 tree_model_get_iter (GtkTreeModel *model, GtkTreeIter *iter, GtkTreePath *path)
 195 {
 196   gint *indices, depth;
 197
 198   PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
 199
 200   g_return_val_if_fail (path, FALSE);
 201
 202   indices = gtk_tree_path_get_indices (path);
 203
 204   depth = gtk_tree_path_get_depth (path);
 205
 206   g_return_val_if_fail (depth == 1, FALSE);
 207
 208   g_print ("%s %d\n", __FUNCTION__, *indices);
 209
 210   iter->stamp = spreadsheetModel->stamp;
 211   iter->user_data = *indices; // kludge
 212
 213   return TRUE;
 214 }
 215
 216 static gboolean
 217 tree_model_iter_next (GtkTreeModel *model, GtkTreeIter *iter)
 218 {
 219   PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
 220   g_return_val_if_fail (iter->stamp == spreadsheetModel->stamp, FALSE);
 221
 222   g_print ("%s %d\n", __FUNCTION__, iter->user_data);
 223
 224   if ( iter->user_data >= spreadsheetModel->spreadsheet->sheets - 1)
 225     return FALSE;
 226
 227   iter->user_data++;
 228
 229   return TRUE;
 230 }
 231
 232
 233 static void
 234 tree_model_get_value (GtkTreeModel *model, GtkTreeIter *iter,
 235                       gint column, GValue *value)
 236 {
 237   PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
 238   g_return_if_fail (column < N_COLS);
 239   g_return_if_fail (iter->stamp == spreadsheetModel->stamp);
 240   g_print ("%s col %d\n", __FUNCTION__, column);
 241
 242   g_value_init (value, G_TYPE_STRING);
 243   if ( column > 0)
 244     g_value_set_string (value, "foo");
 245   else
 246     g_value_set_string (value, "bar");
 247 }
 248
 249
 250 static gboolean
 251 tree_model_nth_child (GtkTreeModel *model, GtkTreeIter *iter,
 252                       GtkTreeIter *parent, gint n)
 253 {
 254   PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
 255
 256   if ( parent )
 257     return FALSE;
 258
 259   if ( n >= spreadsheetModel->spreadsheet->sheets)
 260     return FALSE;
 261
 262   iter->stamp = spreadsheetModel->stamp;
 263
 264   return TRUE;
 265 }
 266
 267
 268 static void
 269 spreadsheet_tree_model_init (GtkTreeModelIface *iface)
 270 {
 271   iface->get_flags = tree_model_get_flags;
 272   iface->get_n_columns = tree_model_n_columns;
 273   iface->get_column_type = tree_model_column_type;
 274   iface->get_iter = tree_model_get_iter;
 275   iface->iter_next = tree_model_iter_next;
 276
 277   iface->get_value = tree_model_get_value;
 278
 279 #if 0
 280   iface->get_path = tree_model_get_path;
 281   iface->iter_children = tree_model_iter_children ;
 282   iface->iter_has_child = tree_model_iter_has_child ;
 283   iface->iter_n_children = tree_model_n_children ;
 284
 285   iface->iter_parent = tree_model_iter_parent ;
 286 #endif
 287
 288   iface->iter_nth_child = tree_model_nth_child ;
 289 }