1 /* PSPPIRE - a graphical user interface for PSPP.
2 Copyright (C) 2013 Free Software Foundation
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.
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.
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/>. */
21 #include "psppire-spreadsheet-model.h"
23 #include "data/spreadsheet-reader.h"
25 #include "data/gnumeric-reader.h"
27 static void psppire_spreadsheet_model_init (PsppireSpreadsheetModel *spreadsheetModel);
28 static void psppire_spreadsheet_model_class_init (PsppireSpreadsheetModelClass *class);
30 static void psppire_spreadsheet_model_finalize (GObject *object);
31 static void psppire_spreadsheet_model_dispose (GObject *object);
33 static GObjectClass *parent_class = NULL;
36 static void spreadsheet_tree_model_init (GtkTreeModelIface *iface);
40 psppire_spreadsheet_model_get_type (void)
42 static GType object_type = 0;
46 static const GTypeInfo spreadsheet_model_info =
48 sizeof (PsppireSpreadsheetModelClass),
50 NULL, /* base_finalize */
51 (GClassInitFunc) psppire_spreadsheet_model_class_init,
52 NULL, /* class_finalize */
53 NULL, /* class_data */
54 sizeof (PsppireSpreadsheetModel),
56 (GInstanceInitFunc) psppire_spreadsheet_model_init,
59 static const GInterfaceInfo tree_model_info = {
60 (GInterfaceInitFunc) spreadsheet_tree_model_init,
65 object_type = g_type_register_static (G_TYPE_OBJECT,
66 "PsppireSpreadsheetModel",
67 &spreadsheet_model_info, 0);
69 g_type_add_interface_static (object_type, GTK_TYPE_TREE_MODEL,
86 psppire_spreadsheet_model_set_property (GObject *object,
91 PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (object);
95 case PROP_SPREADSHEET:
96 spreadsheetModel->spreadsheet = g_value_get_pointer (value);
99 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
107 psppire_spreadsheet_model_dispose (GObject *object)
112 psppire_spreadsheet_model_finalize (GObject *object)
114 // PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (object);
118 psppire_spreadsheet_model_class_init (PsppireSpreadsheetModelClass *class)
120 GObjectClass *object_class;
122 GParamSpec *spreadsheet_spec =
123 g_param_spec_pointer ("spreadsheet",
125 "The spreadsheet that this model represents",
126 G_PARAM_CONSTRUCT_ONLY | G_PARAM_WRITABLE);
128 parent_class = g_type_class_peek_parent (class);
129 object_class = (GObjectClass*) class;
131 object_class->set_property = psppire_spreadsheet_model_set_property;
133 g_object_class_install_property (object_class,
139 object_class->finalize = psppire_spreadsheet_model_finalize;
140 object_class->dispose = psppire_spreadsheet_model_dispose;
145 psppire_spreadsheet_model_init (PsppireSpreadsheetModel *spreadsheetModel)
147 spreadsheetModel->dispose_has_run = FALSE;
148 spreadsheetModel->stamp = g_random_int ();
153 psppire_spreadsheet_model_new (struct spreadsheet *sp)
155 return g_object_new (psppire_spreadsheet_model_get_type (),
165 static const gint N_COLS = 2;
168 tree_model_n_columns (GtkTreeModel *model)
173 static GtkTreeModelFlags
174 tree_model_get_flags (GtkTreeModel *model)
176 g_return_val_if_fail (PSPPIRE_IS_SPREADSHEET_MODEL (model), (GtkTreeModelFlags) 0);
178 return GTK_TREE_MODEL_LIST_ONLY;
182 tree_model_column_type (GtkTreeModel *model, gint index)
184 g_return_val_if_fail (PSPPIRE_IS_SPREADSHEET_MODEL (model), (GType) 0);
185 g_return_val_if_fail (index < N_COLS, (GType) 0);
187 return G_TYPE_STRING;
192 tree_model_get_iter (GtkTreeModel *model, GtkTreeIter *iter, GtkTreePath *path)
194 PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
195 gint *indices, depth;
198 g_return_val_if_fail (path, FALSE);
200 depth = gtk_tree_path_get_depth (path);
202 g_return_val_if_fail (depth == 1, FALSE);
204 indices = gtk_tree_path_get_indices (path);
208 iter->stamp = spreadsheetModel->stamp;
209 iter->user_data = (gpointer) n;
215 tree_model_iter_next (GtkTreeModel *model, GtkTreeIter *iter)
217 PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
218 g_return_val_if_fail (iter->stamp == spreadsheetModel->stamp, FALSE);
223 if ( (gint) iter->user_data >= spreadsheetModel->spreadsheet->sheets - 1)
225 iter->user_data = NULL;
237 tree_model_get_value (GtkTreeModel *model, GtkTreeIter *iter,
238 gint column, GValue *value)
240 PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
241 g_return_if_fail (column < N_COLS);
242 g_return_if_fail (iter->stamp == spreadsheetModel->stamp);
244 g_value_init (value, G_TYPE_STRING);
249 char *x = gnumeric_get_sheet_name (spreadsheetModel->spreadsheet, (gint) iter->user_data);
250 g_value_set_string (value, x);
254 g_value_set_string (value, "bar");
257 g_critical ("Bad column");
263 tree_model_nth_child (GtkTreeModel *model, GtkTreeIter *iter,
264 GtkTreeIter *parent, gint n)
266 PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
271 if ( n >= spreadsheetModel->spreadsheet->sheets)
274 iter->stamp = spreadsheetModel->stamp;
275 iter->user_data = (gpointer) n;
281 tree_model_n_children (GtkTreeModel *model,
284 PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
287 return spreadsheetModel->spreadsheet->sheets;
293 tree_model_iter_has_child (GtkTreeModel *tree_model,
300 tree_model_get_path (GtkTreeModel *model, GtkTreeIter *iter)
302 PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
304 gint index = (gint) iter->user_data;
306 g_return_val_if_fail (iter->stamp == spreadsheetModel->stamp, NULL);
308 path = gtk_tree_path_new ();
310 gtk_tree_path_append_index (path, index);
318 spreadsheet_tree_model_init (GtkTreeModelIface *iface)
320 iface->get_flags = tree_model_get_flags;
321 iface->get_n_columns = tree_model_n_columns;
322 iface->get_column_type = tree_model_column_type;
323 iface->get_iter = tree_model_get_iter;
324 iface->iter_next = tree_model_iter_next;
325 iface->get_value = tree_model_get_value;
327 iface->iter_children = NULL;
328 iface->iter_parent = NULL;
330 iface->get_path = tree_model_get_path;
331 iface->iter_has_child = tree_model_iter_has_child ;
332 iface->iter_n_children = tree_model_n_children ;
333 iface->iter_nth_child = tree_model_nth_child ;