]> Pileus Git - ~andy/gtk/blob - gtk/gtktypeutils.c
Fix a C99ism
[~andy/gtk] / gtk / gtktypeutils.c
1 /* GTK - The GIMP Toolkit
2  * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2 of the License, or (at your option) any later version.
8  *
9  * This library 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 GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the
16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17  * Boston, MA 02111-1307, USA.
18  */
19
20 /*
21  * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
22  * file for a list of people on the GTK+ Team.  See the ChangeLog
23  * files for a list of changes.  These files are distributed with
24  * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
25  */
26
27 #undef GTK_DISABLE_DEPRECATED
28
29 #include <config.h>
30 #include <string.h> /* strcmp */
31
32 #include "gtktypeutils.h"
33 #include "gtkobject.h"
34 #include "gtkintl.h"
35 #include "gtkalias.h"
36
37
38 /* --- functions --- */
39 GtkType
40 gtk_type_unique (GtkType            parent_type,
41                  const GtkTypeInfo *gtkinfo)
42 {
43   GTypeInfo tinfo = { 0, };
44
45   g_return_val_if_fail (GTK_TYPE_IS_OBJECT (parent_type), 0);
46   g_return_val_if_fail (gtkinfo != NULL, 0);
47   g_return_val_if_fail (gtkinfo->type_name != NULL, 0);
48   g_return_val_if_fail (g_type_from_name (gtkinfo->type_name) == 0, 0);
49
50   tinfo.class_size = gtkinfo->class_size;
51   tinfo.base_init = gtkinfo->base_class_init_func;
52   tinfo.base_finalize = NULL;
53   tinfo.class_init = (GClassInitFunc) gtkinfo->class_init_func;
54   tinfo.class_finalize = NULL;
55   tinfo.class_data = NULL;
56   tinfo.instance_size = gtkinfo->object_size;
57   tinfo.n_preallocs = 0;
58   tinfo.instance_init = gtkinfo->object_init_func;
59
60   return g_type_register_static (parent_type, gtkinfo->type_name, &tinfo, 0);
61 }
62
63 gpointer
64 gtk_type_class (GtkType type)
65 {
66   static GQuark quark_static_class = 0;
67   gpointer class;
68
69   if (!G_TYPE_IS_ENUM (type) && !G_TYPE_IS_FLAGS (type))
70     g_return_val_if_fail (G_TYPE_IS_OBJECT (type), NULL);
71
72   /* ok, this is a bit ugly, GLib reference counts classes,
73    * and gtk_type_class() used to always return static classes.
74    * while we coud be faster with just peeking the glib class
75    * for the normal code path, we can't be sure that that
76    * class stays around (someone else might be holding the
77    * reference count and is going to drop it later). so to
78    * ensure that Gtk actually holds a static reference count
79    * on the class, we use GType qdata to store referenced
80    * classes, and only return those.
81    */
82
83   class = g_type_get_qdata (type, quark_static_class);
84   if (!class)
85     {
86       if (!quark_static_class)
87         quark_static_class = g_quark_from_static_string ("GtkStaticTypeClass");
88
89       class = g_type_class_ref (type);
90       g_assert (class != NULL);
91       g_type_set_qdata (type, quark_static_class, class);
92     }
93
94   return class;
95 }
96
97 gpointer
98 gtk_type_new (GtkType type)
99 {
100   gpointer object;
101
102   g_return_val_if_fail (GTK_TYPE_IS_OBJECT (type), NULL);
103
104   object = g_object_new (type, NULL);
105
106   return object;
107 }
108
109 void
110 gtk_type_init (GTypeDebugFlags debug_flags)
111 {
112   static gboolean initialized = FALSE;
113   
114   if (!initialized)
115     {
116       initialized = TRUE;
117
118       /* initialize GLib type system
119        */
120       g_type_init_with_debug_flags (debug_flags);
121       
122       /* GTK_TYPE_OBJECT
123        */
124       gtk_object_get_type ();
125     }
126 }
127
128 GType
129 gtk_identifier_get_type (void)
130 {
131   static GType our_type = 0;
132   
133   if (our_type == 0)
134     {
135       GTypeInfo tinfo = { 0, };
136       our_type = g_type_register_static (G_TYPE_STRING, I_("GtkIdentifier"), &tinfo, 0);
137     }
138
139   return our_type;
140 }
141
142 GtkEnumValue*
143 gtk_type_enum_get_values (GtkType enum_type)
144 {
145   GEnumClass *class;
146
147   g_return_val_if_fail (G_TYPE_IS_ENUM (enum_type), NULL);
148   
149   class = gtk_type_class (enum_type);
150   
151   return class->values;
152 }
153
154 GtkFlagValue*
155 gtk_type_flags_get_values (GtkType flags_type)
156 {
157   GFlagsClass *class;
158
159   g_return_val_if_fail (G_TYPE_IS_FLAGS (flags_type), NULL);
160
161   class = gtk_type_class (flags_type);
162
163   return class->values;
164 }
165
166 GtkEnumValue*
167 gtk_type_enum_find_value (GtkType      enum_type,
168                           const gchar *value_name)
169 {
170   GtkEnumValue *value;
171   GEnumClass *class;
172
173   g_return_val_if_fail (G_TYPE_IS_ENUM (enum_type), NULL);
174   g_return_val_if_fail (value_name != NULL, NULL);
175
176   class = gtk_type_class (enum_type);
177   value = g_enum_get_value_by_name (class, value_name);
178   if (!value)
179     value = g_enum_get_value_by_nick (class, value_name);
180
181   return value;
182 }
183
184 GtkFlagValue*
185 gtk_type_flags_find_value (GtkType      flags_type,
186                            const gchar *value_name)
187 {
188   GtkFlagValue *value;
189   GFlagsClass *class;
190
191   g_return_val_if_fail (G_TYPE_IS_FLAGS (flags_type), NULL);
192   g_return_val_if_fail (value_name != NULL, NULL);
193
194   class = gtk_type_class (flags_type);
195   value = g_flags_get_value_by_name (class, value_name);
196   if (!value)
197     value = g_flags_get_value_by_nick (class, value_name);
198
199   return value;
200 }
201
202
203 #define __GTK_TYPE_UTILS_C__
204 #include "gtkaliasdef.c"