← Back to branch summary

~ubuntu-branches/ubuntu/utopic/glib2.0/utopic

« back to all changes in this revision

Viewing changes to gobject/testgobject.c

Tags: upstream-2.12.12
Import upstream version 2.12.12

Show diffs side-by-side

added added

removed removed

Lines of Context:
gobject/testgobject.c
 
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
}