1 /* PSPPIRE - a graphical user interface for PSPP.
2 Copyright (C) 2013, 2014 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/>. */
17 /* This file implements a GtkTreeModel. It allows GtkComboBox and
18 GtkTreeView to display the names and non-empty cell ranges of the
19 sheets aka "Tables" of spreadsheet files.
20 It doesn't take any notice of the spreadsheet data itself.
29 #define _(msgid) gettext (msgid)
30 #define N_(msgid) msgid
33 #include "psppire-spreadsheet-model.h"
34 #include "data/spreadsheet-reader.h"
37 static void psppire_spreadsheet_model_init (PsppireSpreadsheetModel *
39 static void psppire_spreadsheet_model_class_init (PsppireSpreadsheetModelClass
42 static void psppire_spreadsheet_model_finalize (GObject * object);
43 static void psppire_spreadsheet_model_dispose (GObject * object);
45 static GObjectClass *parent_class = NULL;
48 static void spreadsheet_tree_model_init (GtkTreeModelIface * iface);
52 psppire_spreadsheet_model_get_type (void)
54 static GType object_type = 0;
58 static const GTypeInfo spreadsheet_model_info = {
59 sizeof (PsppireSpreadsheetModelClass),
61 NULL, /* base_finalize */
62 (GClassInitFunc) psppire_spreadsheet_model_class_init,
63 NULL, /* class_finalize */
64 NULL, /* class_data */
65 sizeof (PsppireSpreadsheetModel),
67 (GInstanceInitFunc) psppire_spreadsheet_model_init,
70 static const GInterfaceInfo tree_model_info = {
71 (GInterfaceInitFunc) spreadsheet_tree_model_init,
76 object_type = g_type_register_static (G_TYPE_OBJECT,
77 "PsppireSpreadsheetModel",
78 &spreadsheet_model_info, 0);
80 g_type_add_interface_static (object_type, GTK_TYPE_TREE_MODEL,
97 psppire_spreadsheet_model_set_property (GObject * object,
102 PsppireSpreadsheetModel *spreadsheetModel =
103 PSPPIRE_SPREADSHEET_MODEL (object);
107 case PROP_SPREADSHEET:
108 spreadsheetModel->spreadsheet = g_value_get_pointer (value);
111 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
118 psppire_spreadsheet_model_dispose (GObject * object)
123 psppire_spreadsheet_model_finalize (GObject * object)
125 // PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (object);
129 psppire_spreadsheet_model_class_init (PsppireSpreadsheetModelClass * class)
131 GObjectClass *object_class;
133 GParamSpec *spreadsheet_spec = g_param_spec_pointer ("spreadsheet",
135 "The spreadsheet that this model represents",
136 G_PARAM_CONSTRUCT_ONLY
139 parent_class = g_type_class_peek_parent (class);
140 object_class = (GObjectClass *) class;
142 object_class->set_property = psppire_spreadsheet_model_set_property;
144 g_object_class_install_property (object_class,
145 PROP_SPREADSHEET, spreadsheet_spec);
147 object_class->finalize = psppire_spreadsheet_model_finalize;
148 object_class->dispose = psppire_spreadsheet_model_dispose;
153 psppire_spreadsheet_model_init (PsppireSpreadsheetModel * spreadsheetModel)
155 spreadsheetModel->dispose_has_run = FALSE;
156 spreadsheetModel->stamp = g_random_int ();
161 psppire_spreadsheet_model_new (struct spreadsheet *sp)
163 return g_object_new (psppire_spreadsheet_model_get_type (),
164 "spreadsheet", sp, NULL);
171 tree_model_n_columns (GtkTreeModel * model)
173 return PSPPIRE_SPREADSHEET_MODEL_N_COLS;
176 static GtkTreeModelFlags
177 tree_model_get_flags (GtkTreeModel * model)
179 g_return_val_if_fail (PSPPIRE_IS_SPREADSHEET_MODEL (model),
180 (GtkTreeModelFlags) 0);
182 return GTK_TREE_MODEL_LIST_ONLY;
186 tree_model_column_type (GtkTreeModel * model, gint index)
188 g_return_val_if_fail (PSPPIRE_IS_SPREADSHEET_MODEL (model), (GType) 0);
189 g_return_val_if_fail (index < PSPPIRE_SPREADSHEET_MODEL_N_COLS, (GType) 0);
191 return G_TYPE_STRING;
196 tree_model_get_iter (GtkTreeModel * model, GtkTreeIter * iter,
199 PsppireSpreadsheetModel *spreadsheetModel =
200 PSPPIRE_SPREADSHEET_MODEL (model);
201 gint *indices, depth;
204 g_return_val_if_fail (path, FALSE);
206 depth = gtk_tree_path_get_depth (path);
208 g_return_val_if_fail (depth == 1, FALSE);
210 indices = gtk_tree_path_get_indices (path);
214 iter->stamp = spreadsheetModel->stamp;
215 iter->user_data = (gpointer) (intptr_t) n;
221 tree_model_iter_next (GtkTreeModel *model, GtkTreeIter *iter)
223 PsppireSpreadsheetModel *spreadsheetModel =
224 PSPPIRE_SPREADSHEET_MODEL (model);
225 g_return_val_if_fail (iter->stamp == spreadsheetModel->stamp, FALSE);
230 if ((intptr_t) iter->user_data >= spreadsheetModel->spreadsheet->n_sheets - 1)
232 iter->user_data = NULL;
244 tree_model_get_value (GtkTreeModel * model, GtkTreeIter * iter,
245 gint column, GValue * value)
247 PsppireSpreadsheetModel *spreadsheetModel =
248 PSPPIRE_SPREADSHEET_MODEL (model);
249 g_return_if_fail (column < PSPPIRE_SPREADSHEET_MODEL_N_COLS);
250 g_return_if_fail (iter->stamp == spreadsheetModel->stamp);
252 g_value_init (value, G_TYPE_STRING);
255 case PSPPIRE_SPREADSHEET_MODEL_COL_NAME:
258 spreadsheet_get_sheet_name (spreadsheetModel->spreadsheet,
259 (intptr_t) iter->user_data);
261 g_value_set_string (value, x);
264 case PSPPIRE_SPREADSHEET_MODEL_COL_RANGE:
267 spreadsheet_get_sheet_range (spreadsheetModel->spreadsheet,
268 (intptr_t) iter->user_data);
270 g_value_set_string (value, x ? x : _("(empty)"));
275 g_error ("%s:%d Invalid column in spreadsheet model",
282 tree_model_nth_child (GtkTreeModel * model, GtkTreeIter * iter,
283 GtkTreeIter * parent, gint n)
285 PsppireSpreadsheetModel *spreadsheetModel =
286 PSPPIRE_SPREADSHEET_MODEL (model);
291 if (n >= spreadsheetModel->spreadsheet->n_sheets)
294 iter->stamp = spreadsheetModel->stamp;
295 iter->user_data = (gpointer) (intptr_t) n;
301 tree_model_n_children (GtkTreeModel * model, GtkTreeIter * iter)
303 PsppireSpreadsheetModel *spreadsheetModel =
304 PSPPIRE_SPREADSHEET_MODEL (model);
307 return spreadsheetModel->spreadsheet->n_sheets;
313 tree_model_iter_has_child (GtkTreeModel *tree_model, GtkTreeIter *iter)
319 tree_model_get_path (GtkTreeModel * model, GtkTreeIter * iter)
321 PsppireSpreadsheetModel *spreadsheetModel =
322 PSPPIRE_SPREADSHEET_MODEL (model);
324 gint index = (intptr_t) iter->user_data;
326 g_return_val_if_fail (iter->stamp == spreadsheetModel->stamp, NULL);
328 path = gtk_tree_path_new ();
330 gtk_tree_path_append_index (path, index);
337 tree_model_children (GtkTreeModel *model, GtkTreeIter *iter, GtkTreeIter *parent)
339 PsppireSpreadsheetModel *spreadsheetModel = PSPPIRE_SPREADSHEET_MODEL (model);
344 iter->stamp = spreadsheetModel->stamp;
353 spreadsheet_tree_model_init (GtkTreeModelIface * iface)
355 iface->get_flags = tree_model_get_flags;
356 iface->get_n_columns = tree_model_n_columns;
357 iface->get_column_type = tree_model_column_type;
358 iface->get_iter = tree_model_get_iter;
359 iface->iter_next = tree_model_iter_next;
360 iface->get_value = tree_model_get_value;
362 iface->iter_children = tree_model_children;
363 iface->iter_parent = NULL;
365 iface->get_path = tree_model_get_path;
366 iface->iter_has_child = tree_model_iter_has_child;
367 iface->iter_n_children = tree_model_n_children;
368 iface->iter_nth_child = tree_model_nth_child;