|
1 /* GObject - GLib Type, Object, Parameter and Signal Library |
|
2 * Copyright (C) 2001 Red Hat, Inc. |
|
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 |
|
15 * Public 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 #include <string.h> |
|
21 |
|
22 #undef G_LOG_DOMAIN |
|
23 #define G_LOG_DOMAIN "TestObject" |
|
24 #include <glib-object.h> |
|
25 |
|
26 /* --- TestIface --- */ |
|
27 #define TEST_TYPE_IFACE (test_iface_get_type ()) |
|
28 #define TEST_IFACE(obj) (G_TYPE_CHECK_INSTANCE_CAST ((obj), TEST_TYPE_IFACE, TestIface)) |
|
29 #define TEST_IS_IFACE(obj) (G_TYPE_CHECK_INSTANCE_TYPE ((obj), TEST_TYPE_IFACE)) |
|
30 #define TEST_IFACE_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_INTERFACE ((obj), TEST_TYPE_IFACE, TestIfaceClass)) |
|
31 typedef struct _TestIface TestIface; |
|
32 typedef struct _TestIfaceClass TestIfaceClass; |
|
33 struct _TestIfaceClass |
|
34 { |
|
35 GTypeInterface base_iface; |
|
36 void (*print_string) (TestIface *tiobj, |
|
37 const gchar *string); |
|
38 }; |
|
39 static void iface_base_init (TestIfaceClass *iface); |
|
40 static void iface_base_finalize (TestIfaceClass *iface); |
|
41 static void print_foo (TestIface *tiobj, |
|
42 const gchar *string); |
|
43 static GType |
|
44 test_iface_get_type (void) |
|
45 { |
|
46 static GType test_iface_type = 0; |
|
47 |
|
48 if (!test_iface_type) |
|
49 { |
|
50 static const GTypeInfo test_iface_info = |
|
51 { |
|
52 sizeof (TestIfaceClass), |
|
53 (GBaseInitFunc) iface_base_init, /* base_init */ |
|
54 (GBaseFinalizeFunc) iface_base_finalize, /* base_finalize */ |
|
55 }; |
|
56 |
|
57 test_iface_type = g_type_register_static (G_TYPE_INTERFACE, "TestIface", &test_iface_info, 0); |
|
58 g_type_interface_add_prerequisite (test_iface_type, G_TYPE_OBJECT); |
|
59 } |
|
60 |
|
61 return test_iface_type; |
|
62 } |
|
63 static guint iface_base_init_count = 0; |
|
64 static void |
|
65 iface_base_init (TestIfaceClass *iface) |
|
66 { |
|
67 iface_base_init_count++; |
|
68 if (iface_base_init_count == 1) |
|
69 { |
|
70 /* add signals here */ |
|
71 } |
|
72 } |
|
73 static void |
|
74 iface_base_finalize (TestIfaceClass *iface) |
|
75 { |
|
76 iface_base_init_count--; |
|
77 if (iface_base_init_count == 0) |
|
78 { |
|
79 /* destroy signals here */ |
|
80 } |
|
81 } |
|
82 static void |
|
83 print_foo (TestIface *tiobj, |
|
84 const gchar *string) |
|
85 { |
|
86 if (!string) |
|
87 string = "<NULL>"; |
|
88 g_print ("Iface-FOO: \"%s\" from %p\n", string, tiobj); |
|
89 } |
|
90 static void |
|
91 test_object_test_iface_init (gpointer giface, |
|
92 gpointer iface_data) |
|
93 { |
|
94 TestIfaceClass *iface = giface; |
|
95 |
|
96 g_assert (iface_data == GUINT_TO_POINTER (42)); |
|
97 |
|
98 g_assert (G_TYPE_FROM_INTERFACE (iface) == TEST_TYPE_IFACE); |
|
99 |
|
100 /* assert iface_base_init() was already called */ |
|
101 g_assert (iface_base_init_count > 0); |
|
102 |
|
103 /* initialize stuff */ |
|
104 iface->print_string = print_foo; |
|
105 } |
|
106 static void |
|
107 iface_print_string (TestIface *tiobj, |
|
108 const gchar *string) |
|
109 { |
|
110 TestIfaceClass *iface; |
|
111 |
|
112 g_return_if_fail (TEST_IS_IFACE (tiobj)); |
|
113 g_return_if_fail (G_IS_OBJECT (tiobj)); /* ensured through prerequisite */ |
|
114 |
|
115 iface = TEST_IFACE_GET_CLASS (tiobj); |
|
116 g_object_ref (tiobj); |
|
117 iface->print_string (tiobj, string); |
|
118 g_object_unref (tiobj); |
|
119 } |
|
120 |
|
121 |
|
122 /* --- TestObject --- */ |
|
123 #define TEST_TYPE_OBJECT (test_object_get_type ()) |
|
124 #define TEST_OBJECT(object) (G_TYPE_CHECK_INSTANCE_CAST ((object), TEST_TYPE_OBJECT, TestObject)) |
|
125 #define TEST_OBJECT_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST ((klass), TEST_TYPE_OBJECT, TestObjectClass)) |
|
126 #define TEST_IS_OBJECT(object) (G_TYPE_CHECK_INSTANCE_TYPE ((object), TEST_TYPE_OBJECT)) |
|
127 #define TEST_IS_OBJECT_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE ((klass), TEST_TYPE_OBJECT)) |
|
128 #define TEST_OBJECT_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS ((obj), TEST_TYPE_OBJECT, TestObjectClass)) |
|
129 #define TEST_OBJECT_GET_PRIVATE(o) (G_TYPE_INSTANCE_GET_PRIVATE ((o), TEST_TYPE_OBJECT, TestObjectPrivate)) |
|
130 typedef struct _TestObject TestObject; |
|
131 typedef struct _TestObjectClass TestObjectClass; |
|
132 typedef struct _TestObjectPrivate TestObjectPrivate; |
|
133 struct _TestObject |
|
134 { |
|
135 GObject parent_instance; |
|
136 }; |
|
137 struct _TestObjectClass |
|
138 { |
|
139 GObjectClass parent_class; |
|
140 |
|
141 gchar* (*test_signal) (TestObject *tobject, |
|
142 TestIface *iface_object, |
|
143 gpointer tdata); |
|
144 }; |
|
145 struct _TestObjectPrivate |
|
146 { |
|
147 int dummy1; |
|
148 gdouble dummy2; |
|
149 }; |
|
150 static void test_object_class_init (TestObjectClass *class); |
|
151 static void test_object_init (TestObject *tobject); |
|
152 static gboolean test_signal_accumulator (GSignalInvocationHint *ihint, |
|
153 GValue *return_accu, |
|
154 const GValue *handler_return, |
|
155 gpointer data); |
|
156 static gchar* test_object_test_signal (TestObject *tobject, |
|
157 TestIface *iface_object, |
|
158 gpointer tdata); |
|
159 static GType |
|
160 test_object_get_type (void) |
|
161 { |
|
162 static GType test_object_type = 0; |
|
163 |
|
164 if (!test_object_type) |
|
165 { |
|
166 static const GTypeInfo test_object_info = |
|
167 { |
|
168 sizeof (TestObjectClass), |
|
169 NULL, /* base_init */ |
|
170 NULL, /* base_finalize */ |
|
171 (GClassInitFunc) test_object_class_init, |
|
172 NULL, /* class_finalize */ |
|
173 NULL, /* class_data */ |
|
174 sizeof (TestObject), |
|
175 5, /* n_preallocs */ |
|
176 (GInstanceInitFunc) test_object_init, |
|
177 }; |
|
178 GInterfaceInfo iface_info = { test_object_test_iface_init, NULL, GUINT_TO_POINTER (42) }; |
|
179 |
|
180 test_object_type = g_type_register_static (G_TYPE_OBJECT, "TestObject", &test_object_info, 0); |
|
181 g_type_add_interface_static (test_object_type, TEST_TYPE_IFACE, &iface_info); |
|
182 } |
|
183 |
|
184 return test_object_type; |
|
185 } |
|
186 static void |
|
187 test_object_class_init (TestObjectClass *class) |
|
188 { |
|
189 /* GObjectClass *gobject_class = G_OBJECT_CLASS (class); */ |
|
190 |
|
191 class->test_signal = test_object_test_signal; |
|
192 |
|
193 g_signal_new ("test-signal", |
|
194 G_OBJECT_CLASS_TYPE (class), |
|
195 G_SIGNAL_RUN_FIRST | G_SIGNAL_RUN_LAST | G_SIGNAL_RUN_CLEANUP, |
|
196 G_STRUCT_OFFSET (TestObjectClass, test_signal), |
|
197 test_signal_accumulator, NULL, |
|
198 g_cclosure_marshal_STRING__OBJECT_POINTER, |
|
199 G_TYPE_STRING, 2, TEST_TYPE_IFACE, G_TYPE_POINTER); |
|
200 |
|
201 g_type_class_add_private (class, sizeof (TestObjectPrivate)); |
|
202 } |
|
203 static void |
|
204 test_object_init (TestObject *tobject) |
|
205 { |
|
206 TestObjectPrivate *priv; |
|
207 |
|
208 priv = TEST_OBJECT_GET_PRIVATE (tobject); |
|
209 |
|
210 g_assert (priv); |
|
211 g_assert ((gchar *)priv >= (gchar *)tobject + sizeof (TestObject)); |
|
212 |
|
213 priv->dummy1 = 54321; |
|
214 } |
|
215 /* Check to see if private data initialization in the |
|
216 * instance init function works. |
|
217 */ |
|
218 static void |
|
219 test_object_check_private_init (TestObject *tobject) |
|
220 { |
|
221 TestObjectPrivate *priv; |
|
222 |
|
223 priv = TEST_OBJECT_GET_PRIVATE (tobject); |
|
224 |
|
225 g_print ("private data during initialization: %u == %u\n", priv->dummy1, 54321); |
|
226 g_assert (priv->dummy1 == 54321); |
|
227 } |
|
228 static gboolean |
|
229 test_signal_accumulator (GSignalInvocationHint *ihint, |
|
230 GValue *return_accu, |
|
231 const GValue *handler_return, |
|
232 gpointer data) |
|
233 { |
|
234 gchar *accu_string = g_value_get_string (return_accu); |
|
235 gchar *new_string = g_value_get_string (handler_return); |
|
236 gchar *result_string; |
|
237 |
|
238 if (accu_string) |
|
239 result_string = g_strconcat (accu_string, new_string, NULL); |
|
240 else if (new_string) |
|
241 result_string = g_strdup (new_string); |
|
242 else |
|
243 result_string = NULL; |
|
244 |
|
245 g_value_take_string (return_accu, result_string); |
|
246 |
|
247 return TRUE; |
|
248 } |
|
249 static gchar* |
|
250 test_object_test_signal (TestObject *tobject, |
|
251 TestIface *iface_object, |
|
252 gpointer tdata) |
|
253 { |
|
254 g_message ("::test_signal default_handler called"); |
|
255 |
|
256 g_return_val_if_fail (TEST_IS_IFACE (iface_object), NULL); |
|
257 |
|
258 return g_strdup ("<default_handler>"); |
|
259 } |
|
260 |
|
261 |
|
262 /* --- TestIface for DerivedObject --- */ |
|
263 static void |
|
264 print_bar (TestIface *tiobj, |
|
265 const gchar *string) |
|
266 { |
|
267 TestIfaceClass *parent_iface; |
|
268 |
|
269 g_return_if_fail (TEST_IS_IFACE (tiobj)); |
|
270 |
|
271 if (!string) |
|
272 string = "<NULL>"; |
|
273 g_print ("Iface-BAR: \"%s\" from %p\n", string, tiobj); |
|
274 |
|
275 g_print ("chaining: "); |
|
276 parent_iface = g_type_interface_peek_parent (TEST_IFACE_GET_CLASS (tiobj)); |
|
277 parent_iface->print_string (tiobj, string); |
|
278 |
|
279 g_assert (g_type_interface_peek_parent (parent_iface) == NULL); |
|
280 } |
|
281 |
|
282 static void |
|
283 derived_object_test_iface_init (gpointer giface, |
|
284 gpointer iface_data) |
|
285 { |
|
286 TestIfaceClass *iface = giface; |
|
287 |
|
288 g_assert (iface_data == GUINT_TO_POINTER (87)); |
|
289 |
|
290 g_assert (G_TYPE_FROM_INTERFACE (iface) == TEST_TYPE_IFACE); |
|
291 |
|
292 /* assert test_object_test_iface_init() was already called */ |
|
293 g_assert (iface->print_string == print_foo); |
|
294 |
|
295 /* override stuff */ |
|
296 iface->print_string = print_bar; |
|
297 } |
|
298 |
|
299 |
|
300 /* --- DerivedObject --- */ |
|
301 #define DERIVED_TYPE_OBJECT (derived_object_get_type ()) |
|
302 #define DERIVED_OBJECT(object) (G_TYPE_CHECK_INSTANCE_CAST ((object), DERIVED_TYPE_OBJECT, DerivedObject)) |
|
303 #define DERIVED_OBJECT_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST ((klass), DERIVED_TYPE_OBJECT, DerivedObjectClass)) |
|
304 #define DERIVED_IS_OBJECT(object) (G_TYPE_CHECK_INSTANCE_TYPE ((object), DERIVED_TYPE_OBJECT)) |
|
305 #define DERIVED_IS_OBJECT_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE ((klass), DERIVED_TYPE_OBJECT)) |
|
306 #define DERIVED_OBJECT_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS ((obj), DERIVED_TYPE_OBJECT, DerivedObjectClass)) |
|
307 #define DERIVED_OBJECT_GET_PRIVATE(o) (G_TYPE_INSTANCE_GET_PRIVATE ((o), DERIVED_TYPE_OBJECT, DerivedObjectPrivate)) |
|
308 typedef struct _DerivedObject DerivedObject; |
|
309 typedef struct _TestObjectClass DerivedObjectClass; |
|
310 typedef struct _DerivedObjectPrivate DerivedObjectPrivate; |
|
311 struct _DerivedObject |
|
312 { |
|
313 TestObject parent_instance; |
|
314 int dummy1; |
|
315 int dummy2; |
|
316 }; |
|
317 struct _DerivedObjectPrivate |
|
318 { |
|
319 char dummy; |
|
320 }; |
|
321 static void derived_object_class_init (DerivedObjectClass *class); |
|
322 static void derived_object_init (DerivedObject *dobject); |
|
323 GType |
|
324 derived_object_get_type (void) |
|
325 { |
|
326 static GType derived_object_type = 0; |
|
327 |
|
328 if (!derived_object_type) |
|
329 { |
|
330 static const GTypeInfo derived_object_info = |
|
331 { |
|
332 sizeof (DerivedObjectClass), |
|
333 NULL, /* base_init */ |
|
334 NULL, /* base_finalize */ |
|
335 (GClassInitFunc) derived_object_class_init, |
|
336 NULL, /* class_finalize */ |
|
337 NULL, /* class_data */ |
|
338 sizeof (DerivedObject), |
|
339 5, /* n_preallocs */ |
|
340 (GInstanceInitFunc) derived_object_init, |
|
341 }; |
|
342 GInterfaceInfo iface_info = { derived_object_test_iface_init, NULL, GUINT_TO_POINTER (87) }; |
|
343 |
|
344 derived_object_type = g_type_register_static (TEST_TYPE_OBJECT, "DerivedObject", &derived_object_info, 0); |
|
345 g_type_add_interface_static (derived_object_type, TEST_TYPE_IFACE, &iface_info); |
|
346 } |
|
347 |
|
348 return derived_object_type; |
|
349 } |
|
350 static void |
|
351 derived_object_class_init (DerivedObjectClass *class) |
|
352 { |
|
353 g_type_class_add_private (class, sizeof (DerivedObjectPrivate)); |
|
354 } |
|
355 static void |
|
356 derived_object_init (DerivedObject *dobject) |
|
357 { |
|
358 TestObjectPrivate *test_priv; |
|
359 DerivedObjectPrivate *derived_priv; |
|
360 |
|
361 derived_priv = DERIVED_OBJECT_GET_PRIVATE (dobject); |
|
362 |
|
363 g_assert (derived_priv); |
|
364 g_assert ((gchar *)derived_priv >= (gchar *)TEST_OBJECT_GET_PRIVATE (dobject) + sizeof (TestObjectPrivate)); |
|
365 |
|
366 test_priv = TEST_OBJECT_GET_PRIVATE (dobject); |
|
367 |
|
368 g_assert (test_priv); |
|
369 g_assert ((gchar *)test_priv >= (gchar *)dobject + sizeof (TestObject)); |
|
370 |
|
371 } |
|
372 |
|
373 /* --- main --- */ |
|
374 int |
|
375 main (int argc, |
|
376 char *argv[]) |
|
377 { |
|
378 GTypeInfo info = { 0, }; |
|
379 GTypeFundamentalInfo finfo = { 0, }; |
|
380 GType type; |
|
381 TestObject *sigarg; |
|
382 DerivedObject *dobject; |
|
383 TestObjectPrivate *priv; |
|
384 gchar *string = NULL; |
|
385 |
|
386 g_log_set_always_fatal (g_log_set_always_fatal (G_LOG_FATAL_MASK) | |
|
387 G_LOG_LEVEL_WARNING | |
|
388 G_LOG_LEVEL_CRITICAL); |
|
389 g_type_init_with_debug_flags (G_TYPE_DEBUG_OBJECTS | G_TYPE_DEBUG_SIGNALS); |
|
390 |
|
391 /* test new fundamentals */ |
|
392 g_assert (G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST) == g_type_fundamental_next ()); |
|
393 type = g_type_register_fundamental (g_type_fundamental_next (), "FooShadow1", &info, &finfo, 0); |
|
394 g_assert (G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST + 1) == g_type_fundamental_next ()); |
|
395 type = g_type_register_fundamental (g_type_fundamental_next (), "FooShadow2", &info, &finfo, 0); |
|
396 g_assert (G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST + 2) == g_type_fundamental_next ()); |
|
397 g_assert (g_type_from_name ("FooShadow1") == G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST)); |
|
398 g_assert (g_type_from_name ("FooShadow2") == G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST + 1)); |
|
399 |
|
400 /* to test past class initialization interface setups, create the class here */ |
|
401 g_type_class_ref (TEST_TYPE_OBJECT); |
|
402 |
|
403 dobject = g_object_new (DERIVED_TYPE_OBJECT, NULL); |
|
404 test_object_check_private_init (TEST_OBJECT (dobject)); |
|
405 |
|
406 sigarg = g_object_new (TEST_TYPE_OBJECT, NULL); |
|
407 |
|
408 g_print ("MAIN: emit test-signal:\n"); |
|
409 g_signal_emit_by_name (dobject, "test-signal", sigarg, NULL, &string); |
|
410 g_message ("signal return: \"%s\"", string); |
|
411 g_assert (strcmp (string, "<default_handler><default_handler>") == 0); |
|
412 g_free (string); |
|
413 |
|
414 g_print ("MAIN: call iface print-string on test and derived object:\n"); |
|
415 iface_print_string (TEST_IFACE (sigarg), "iface-string-from-test-type"); |
|
416 iface_print_string (TEST_IFACE (dobject), "iface-string-from-derived-type"); |
|
417 |
|
418 priv = TEST_OBJECT_GET_PRIVATE (dobject); |
|
419 g_print ("private data after initialization: %u == %u\n", priv->dummy1, 54321); |
|
420 g_assert (priv->dummy1 == 54321); |
|
421 |
|
422 g_object_unref (sigarg); |
|
423 g_object_unref (dobject); |
|
424 |
|
425 g_message ("%s done", argv[0]); |
|
426 |
|
427 return 0; |
|
428 } |