pspp-sheet-view: Rename GtkTreeSelectMode to PsppSheetSelectMode.
[pspp] / src / ui / gui / builder-wrapper.c
1 /* PSPPIRE - a graphical user interface for PSPP.
2    Copyright (C) 2004, 2009, 2010, 2011, 2012  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
19 #include <config.h>
20
21 #include "builder-wrapper.h"
22
23
24 GtkBuilder *
25 builder_new_real (const gchar *name)
26 {
27   GtkBuilder *builder = gtk_builder_new ();
28
29   GError *err = NULL;
30   if ( ! gtk_builder_add_from_file (builder, name,  &err))
31     {
32       g_critical ("Couldn\'t open user interface  file %s: %s", name, err->message);
33       g_clear_error (&err);
34     }
35
36   return builder;
37 }
38
39
40 GtkBuilder * 
41 builder_new_x (const gchar *obj_name)
42 {
43   GtkBuilder *b;
44   GString *str = g_string_new (PKGDATADIR);
45   g_string_append (str, "/");
46   g_string_append (str, obj_name);
47
48   b = builder_new_real (relocate (str->str));
49
50   g_string_free (str, TRUE);
51
52   return b;
53 }
54
55
56
57 GObject *
58 get_object_assert (GtkBuilder *builder, const gchar *name, GType type)
59 {
60   GObject *o = NULL;
61   g_assert (name);
62
63   o = gtk_builder_get_object (builder, name);
64
65   if ( !o )
66     g_critical ("Object `%s' could not be found\n", name);
67   else if ( ! g_type_is_a (G_OBJECT_TYPE (o), type))
68    {
69      g_critical ("Object `%s' was expected to have type %s, but in fact has type %s", 
70         name, g_type_name (type), G_OBJECT_TYPE_NAME (o));
71    }
72
73   return o;
74 }
75
76
77 GtkAction *
78 get_action_assert (GtkBuilder *builder, const gchar *name)
79 {
80   return GTK_ACTION (get_object_assert (builder, name, GTK_TYPE_ACTION));
81 }
82
83 GtkWidget *
84 get_widget_assert (GtkBuilder *builder, const gchar *name)
85 {
86   GtkWidget *w = GTK_WIDGET (get_object_assert (builder, name, GTK_TYPE_WIDGET));
87   
88   g_object_set (w, "name", name, NULL);
89
90   return w;
91 }