1 /* GObject - GLib Type, Object, Parameter and Signal Library
2 * Copyright (C) 1998-1999, 2000-2001 Tim Janik and Red Hat, Inc.
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.
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.
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.
25 #include "gvaluecollector.h"
27 #include "gparamspecs.h"
28 #include "gvaluetypes.h"
29 #include "gobjectnotifyqueue.c"
33 #define PREALLOC_CPARAMS (8)
37 #define PARAM_SPEC_PARAM_ID(pspec) ((pspec)->param_id)
38 #define PARAM_SPEC_SET_PARAM_ID(pspec, id) ((pspec)->param_id = (id))
49 /* --- properties --- */
55 /* --- prototypes --- */
56 static void g_object_base_class_init (GObjectClass *class);
57 static void g_object_base_class_finalize (GObjectClass *class);
58 static void g_object_do_class_init (GObjectClass *class);
59 static void g_object_init (GObject *object);
60 static GObject* g_object_constructor (GType type,
61 guint n_construct_properties,
62 GObjectConstructParam *construct_params);
63 static void g_object_last_unref (GObject *object);
64 static void g_object_real_dispose (GObject *object);
65 static void g_object_finalize (GObject *object);
66 static void g_object_do_set_property (GObject *object,
70 static void g_object_do_get_property (GObject *object,
74 static void g_value_object_init (GValue *value);
75 static void g_value_object_free_value (GValue *value);
76 static void g_value_object_copy_value (const GValue *src_value,
78 static void g_value_object_transform_value (const GValue *src_value,
80 static gpointer g_value_object_peek_pointer (const GValue *value);
81 static gchar* g_value_object_collect_value (GValue *value,
82 guint n_collect_values,
83 GTypeCValue *collect_values,
85 static gchar* g_value_object_lcopy_value (const GValue *value,
86 guint n_collect_values,
87 GTypeCValue *collect_values,
89 static void g_object_dispatch_properties_changed (GObject *object,
92 static inline void object_get_property (GObject *object,
95 static inline void object_set_property (GObject *object,
98 GObjectNotifyQueue *nqueue);
101 /* --- structures --- */
104 /* --- variables --- */
105 static GQuark quark_closure_array = 0;
106 static GQuark quark_weak_refs = 0;
107 static GParamSpecPool *pspec_pool = NULL;
108 static GObjectNotifyContext property_notify_context = { 0, };
109 static gulong gobject_signals[LAST_SIGNAL] = { 0, };
112 /* --- functions --- */
113 #ifdef G_ENABLE_DEBUG
114 #define IF_DEBUG(debug_type) if (_g_type_debug_flags & G_TYPE_DEBUG_ ## debug_type)
115 G_LOCK_DEFINE_STATIC (debug_objects);
116 static volatile GObject *g_trap_object_ref = NULL;
117 static guint debug_objects_count = 0;
118 static GHashTable *debug_objects_ht = NULL;
120 debug_objects_foreach (gpointer key,
124 GObject *object = value;
126 g_message ("[%p] stale %s\tref_count=%u",
128 G_OBJECT_TYPE_NAME (object),
132 debug_objects_atexit (void)
136 G_LOCK (debug_objects);
137 g_message ("stale GObjects: %u", debug_objects_count);
138 g_hash_table_foreach (debug_objects_ht, debug_objects_foreach, NULL);
139 G_UNLOCK (debug_objects);
142 #endif /* G_ENABLE_DEBUG */
145 g_object_type_init (void) /* sync with gtype.c */
147 static gboolean initialized = FALSE;
148 static const GTypeFundamentalInfo finfo = {
149 G_TYPE_FLAG_CLASSED | G_TYPE_FLAG_INSTANTIATABLE | G_TYPE_FLAG_DERIVABLE | G_TYPE_FLAG_DEEP_DERIVABLE,
151 static GTypeInfo info = {
152 sizeof (GObjectClass),
153 (GBaseInitFunc) g_object_base_class_init,
154 (GBaseFinalizeFunc) g_object_base_class_finalize,
155 (GClassInitFunc) g_object_do_class_init,
156 NULL /* class_destroy */,
157 NULL /* class_data */,
160 (GInstanceInitFunc) g_object_init,
161 NULL, /* value_table */
163 static const GTypeValueTable value_table = {
164 g_value_object_init, /* value_init */
165 g_value_object_free_value, /* value_free */
166 g_value_object_copy_value, /* value_copy */
167 g_value_object_peek_pointer, /* value_peek_pointer */
168 "p", /* collect_format */
169 g_value_object_collect_value, /* collect_value */
170 "p", /* lcopy_format */
171 g_value_object_lcopy_value, /* lcopy_value */
175 g_return_if_fail (initialized == FALSE);
180 info.value_table = &value_table;
181 type = g_type_register_fundamental (G_TYPE_OBJECT, "GObject", &info, &finfo, 0);
182 g_assert (type == G_TYPE_OBJECT);
183 g_value_register_transform_func (G_TYPE_OBJECT, G_TYPE_OBJECT, g_value_object_transform_value);
185 #ifdef G_ENABLE_DEBUG
188 debug_objects_ht = g_hash_table_new (g_direct_hash, NULL);
189 g_atexit (debug_objects_atexit);
191 #endif /* G_ENABLE_DEBUG */
195 g_object_base_class_init (GObjectClass *class)
197 GObjectClass *pclass = g_type_class_peek_parent (class);
199 /* reset instance specific fields and methods that don't get inherited */
200 class->construct_properties = pclass ? g_slist_copy (pclass->construct_properties) : NULL;
201 class->get_property = NULL;
202 class->set_property = NULL;
206 g_object_base_class_finalize (GObjectClass *class)
210 g_message ("finallizing base class of %s", G_OBJECT_CLASS_NAME (class));
212 _g_signals_destroy (G_OBJECT_CLASS_TYPE (class));
214 g_slist_free (class->construct_properties);
215 class->construct_properties = NULL;
216 list = g_param_spec_pool_list_owned (pspec_pool, G_OBJECT_CLASS_TYPE (class));
217 for (node = list; node; node = node->next)
219 GParamSpec *pspec = node->data;
221 g_param_spec_pool_remove (pspec_pool, pspec);
222 PARAM_SPEC_SET_PARAM_ID (pspec, 0);
223 g_param_spec_unref (pspec);
229 g_object_notify_dispatcher (GObject *object,
233 G_OBJECT_GET_CLASS (object)->dispatch_properties_changed (object, n_pspecs, pspecs);
237 g_object_do_class_init (GObjectClass *class)
239 quark_closure_array = g_quark_from_static_string ("GObject-closure-array");
240 quark_weak_refs = g_quark_from_static_string ("GObject-weak-references");
241 pspec_pool = g_param_spec_pool_new (TRUE);
242 property_notify_context.quark_notify_queue = g_quark_from_static_string ("GObject-notify-queue");
243 property_notify_context.dispatcher = g_object_notify_dispatcher;
245 class->constructor = g_object_constructor;
246 class->set_property = g_object_do_set_property;
247 class->get_property = g_object_do_get_property;
248 class->dispose = g_object_real_dispose;
249 class->finalize = g_object_finalize;
250 class->dispatch_properties_changed = g_object_dispatch_properties_changed;
251 class->notify = NULL;
253 gobject_signals[NOTIFY] =
254 g_signal_new ("notify",
255 G_TYPE_FROM_CLASS (class),
256 G_SIGNAL_RUN_FIRST | G_SIGNAL_NO_RECURSE | G_SIGNAL_DETAILED | G_SIGNAL_NO_HOOKS,
257 G_STRUCT_OFFSET (GObjectClass, notify),
259 g_cclosure_marshal_VOID__PARAM,
265 g_object_class_install_property (GObjectClass *class,
269 g_return_if_fail (G_IS_OBJECT_CLASS (class));
270 g_return_if_fail (G_IS_PARAM_SPEC (pspec));
271 if (pspec->flags & G_PARAM_WRITABLE)
272 g_return_if_fail (class->set_property != NULL);
273 if (pspec->flags & G_PARAM_READABLE)
274 g_return_if_fail (class->get_property != NULL);
275 g_return_if_fail (property_id > 0);
276 g_return_if_fail (PARAM_SPEC_PARAM_ID (pspec) == 0); /* paranoid */
277 if (pspec->flags & G_PARAM_CONSTRUCT)
278 g_return_if_fail ((pspec->flags & G_PARAM_CONSTRUCT_ONLY) == 0);
279 if (pspec->flags & (G_PARAM_CONSTRUCT | G_PARAM_CONSTRUCT_ONLY))
280 g_return_if_fail (pspec->flags & G_PARAM_WRITABLE);
282 if (g_param_spec_pool_lookup (pspec_pool, pspec->name, G_OBJECT_CLASS_TYPE (class), FALSE))
284 g_warning (G_STRLOC ": class `%s' already contains a property named `%s'",
285 G_OBJECT_CLASS_NAME (class),
290 g_param_spec_ref (pspec);
291 g_param_spec_sink (pspec);
292 PARAM_SPEC_SET_PARAM_ID (pspec, property_id);
293 g_param_spec_pool_insert (pspec_pool, pspec, G_OBJECT_CLASS_TYPE (class));
294 if (pspec->flags & (G_PARAM_CONSTRUCT | G_PARAM_CONSTRUCT_ONLY))
295 class->construct_properties = g_slist_prepend (class->construct_properties, pspec);
297 /* for property overrides of construct poperties, we have to get rid
298 * of the overidden inherited construct property
300 pspec = g_param_spec_pool_lookup (pspec_pool, pspec->name, g_type_parent (G_OBJECT_CLASS_TYPE (class)), TRUE);
301 if (pspec && pspec->flags & (G_PARAM_CONSTRUCT | G_PARAM_CONSTRUCT_ONLY))
302 class->construct_properties = g_slist_remove (class->construct_properties, pspec);
306 g_object_class_find_property (GObjectClass *class,
307 const gchar *property_name)
309 g_return_val_if_fail (G_IS_OBJECT_CLASS (class), NULL);
310 g_return_val_if_fail (property_name != NULL, NULL);
312 return g_param_spec_pool_lookup (pspec_pool,
314 G_OBJECT_CLASS_TYPE (class),
318 GParamSpec** /* free result */
319 g_object_class_list_properties (GObjectClass *class,
320 guint *n_properties_p)
325 g_return_val_if_fail (G_IS_OBJECT_CLASS (class), NULL);
327 pspecs = g_param_spec_pool_list (pspec_pool,
328 G_OBJECT_CLASS_TYPE (class),
337 g_object_init (GObject *object)
339 object->ref_count = 1;
340 g_datalist_init (&object->qdata);
342 /* freeze object's notification queue, g_object_newv() preserves pairedness */
343 g_object_notify_queue_freeze (object, &property_notify_context);
345 #ifdef G_ENABLE_DEBUG
348 G_LOCK (debug_objects);
349 debug_objects_count++;
350 g_hash_table_insert (debug_objects_ht, object, object);
351 G_UNLOCK (debug_objects);
353 #endif /* G_ENABLE_DEBUG */
357 g_object_do_set_property (GObject *object,
365 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
371 g_object_do_get_property (GObject *object,
379 G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
385 g_object_real_dispose (GObject *object)
389 g_signal_handlers_destroy (object);
390 g_datalist_id_set_data (&object->qdata, quark_closure_array, NULL);
392 /* yes, temporarily altering the ref_count is hackish, but that
393 * enforces people not jerking around with weak_ref notifiers
395 ref_count = object->ref_count;
396 object->ref_count = 0;
397 g_datalist_id_set_data (&object->qdata, quark_weak_refs, NULL);
398 object->ref_count = ref_count;
402 g_object_finalize (GObject *object)
404 g_datalist_clear (&object->qdata);
406 #ifdef G_ENABLE_DEBUG
409 G_LOCK (debug_objects);
410 g_assert (g_hash_table_lookup (debug_objects_ht, object) == object);
411 g_hash_table_remove (debug_objects_ht, object);
412 debug_objects_count--;
413 G_UNLOCK (debug_objects);
415 #endif /* G_ENABLE_DEBUG */
419 g_object_last_unref (GObject *object)
421 g_return_if_fail (object->ref_count > 0);
423 if (object->ref_count == 1) /* may have been re-referenced meanwhile */
424 G_OBJECT_GET_CLASS (object)->dispose (object);
426 #ifdef G_ENABLE_DEBUG
427 if (g_trap_object_ref == object)
429 #endif /* G_ENABLE_DEBUG */
431 object->ref_count -= 1;
433 if (object->ref_count == 0) /* may have been re-referenced meanwhile */
435 g_datalist_id_set_data (&object->qdata, quark_weak_refs, NULL);
436 G_OBJECT_GET_CLASS (object)->finalize (object);
437 #ifdef G_ENABLE_DEBUG
440 /* catch objects not chaining finalize handlers */
441 G_LOCK (debug_objects);
442 g_assert (g_hash_table_lookup (debug_objects_ht, object) == NULL);
443 G_UNLOCK (debug_objects);
445 #endif /* G_ENABLE_DEBUG */
446 g_type_free_instance ((GTypeInstance*) object);
451 g_object_dispatch_properties_changed (GObject *object,
457 for (i = 0; i < n_pspecs; i++)
458 g_signal_emit (object, gobject_signals[NOTIFY], g_quark_from_string (pspecs[i]->name), pspecs[i]);
462 g_object_run_dispose (GObject *object)
464 g_return_if_fail (G_IS_OBJECT (object));
465 g_return_if_fail (object->ref_count > 0);
467 g_object_ref (object);
468 G_OBJECT_GET_CLASS (object)->dispose (object);
469 g_object_unref (object);
473 g_object_freeze_notify (GObject *object)
475 g_return_if_fail (G_IS_OBJECT (object));
476 if (!object->ref_count)
479 g_object_ref (object);
480 g_object_notify_queue_freeze (object, &property_notify_context);
481 g_object_unref (object);
485 g_object_notify (GObject *object,
486 const gchar *property_name)
490 g_return_if_fail (G_IS_OBJECT (object));
491 g_return_if_fail (property_name != NULL);
492 if (!object->ref_count)
495 g_object_ref (object);
496 pspec = g_param_spec_pool_lookup (pspec_pool,
498 G_OBJECT_TYPE (object),
501 g_warning ("%s: object class `%s' has no property named `%s'",
503 G_OBJECT_TYPE_NAME (object),
507 GObjectNotifyQueue *nqueue = g_object_notify_queue_freeze (object, &property_notify_context);
509 g_object_notify_queue_add (object, nqueue, pspec);
510 g_object_notify_queue_thaw (object, nqueue);
512 g_object_unref (object);
516 g_object_thaw_notify (GObject *object)
518 GObjectNotifyQueue *nqueue;
520 g_return_if_fail (G_IS_OBJECT (object));
521 if (!object->ref_count)
524 g_object_ref (object);
525 nqueue = g_object_notify_queue_from_object (object, &property_notify_context);
526 if (!nqueue || !nqueue->freeze_count)
527 g_warning (G_STRLOC ": property-changed notification for %s(%p) is not frozen",
528 G_OBJECT_TYPE_NAME (object), object);
530 g_object_notify_queue_thaw (object, nqueue);
531 g_object_unref (object);
535 object_get_property (GObject *object,
539 GObjectClass *class = g_type_class_peek (pspec->owner_type);
541 class->get_property (object, PARAM_SPEC_PARAM_ID (pspec), value, pspec);
545 object_set_property (GObject *object,
548 GObjectNotifyQueue *nqueue)
550 GValue tmp_value = { 0, };
551 GObjectClass *class = g_type_class_peek (pspec->owner_type);
553 /* provide a copy to work from, convert (if necessary) and validate */
554 g_value_init (&tmp_value, G_PARAM_SPEC_VALUE_TYPE (pspec));
555 if (!g_value_transform (value, &tmp_value))
556 g_warning ("unable to set property `%s' of type `%s' from value of type `%s'",
558 g_type_name (G_PARAM_SPEC_VALUE_TYPE (pspec)),
559 G_VALUE_TYPE_NAME (value));
560 else if (g_param_value_validate (pspec, &tmp_value) && !(pspec->flags & G_PARAM_LAX_VALIDATION))
562 gchar *contents = g_strdup_value_contents (value);
564 g_warning ("value \"%s\" of type `%s' is invalid for property `%s' of type `%s'",
566 G_VALUE_TYPE_NAME (value),
568 g_type_name (G_PARAM_SPEC_VALUE_TYPE (pspec)));
573 class->set_property (object, PARAM_SPEC_PARAM_ID (pspec), &tmp_value, pspec);
574 g_object_notify_queue_add (object, nqueue, pspec);
576 g_value_unset (&tmp_value);
580 g_object_new (GType object_type,
581 const gchar *first_property_name,
587 g_return_val_if_fail (G_TYPE_IS_OBJECT (object_type), NULL);
589 va_start (var_args, first_property_name);
590 object = g_object_new_valist (object_type, first_property_name, var_args);
597 g_object_newv (GType object_type,
599 GParameter *parameters)
601 GObjectConstructParam *cparams, *oparams;
602 GObjectNotifyQueue *nqueue;
606 guint n_total_cparams = 0, n_cparams = 0, n_oparams = 0, n_cvalues;
611 g_return_val_if_fail (G_TYPE_IS_OBJECT (object_type), NULL);
613 class = g_type_class_ref (object_type);
614 for (slist = class->construct_properties; slist; slist = slist->next)
616 clist = g_list_prepend (clist, slist->data);
617 n_total_cparams += 1;
620 /* collect parameters, sort into construction and normal ones */
621 oparams = g_new (GObjectConstructParam, n_parameters);
622 cparams = g_new (GObjectConstructParam, n_total_cparams);
623 for (i = 0; i < n_parameters; i++)
625 GValue *value = ¶meters[i].value;
626 GParamSpec *pspec = g_param_spec_pool_lookup (pspec_pool,
632 g_warning ("%s: object class `%s' has no property named `%s'",
634 g_type_name (object_type),
638 if (!(pspec->flags & G_PARAM_WRITABLE))
640 g_warning ("%s: property `%s' of object class `%s' is not writable",
643 g_type_name (object_type));
646 if (pspec->flags & (G_PARAM_CONSTRUCT | G_PARAM_CONSTRUCT_ONLY))
648 GList *list = g_list_find (clist, pspec);
652 g_warning (G_STRLOC ": construct property \"%s\" for object `%s' can't be set twice",
653 pspec->name, g_type_name (object_type));
656 cparams[n_cparams].pspec = pspec;
657 cparams[n_cparams].value = value;
662 list->prev->next = list->next;
664 list->next->prev = list->prev;
665 g_list_free_1 (list);
669 oparams[n_oparams].pspec = pspec;
670 oparams[n_oparams].value = value;
675 /* set remaining construction properties to default values */
676 n_cvalues = n_total_cparams - n_cparams;
677 cvalues = g_new (GValue, n_cvalues);
680 GList *tmp = clist->next;
681 GParamSpec *pspec = clist->data;
682 GValue *value = cvalues + n_total_cparams - n_cparams - 1;
685 g_value_init (value, G_PARAM_SPEC_VALUE_TYPE (pspec));
686 g_param_value_set_default (pspec, value);
688 cparams[n_cparams].pspec = pspec;
689 cparams[n_cparams].value = value;
692 g_list_free_1 (clist);
696 /* construct object from construction parameters */
697 object = class->constructor (object_type, n_total_cparams, cparams);
699 /* free construction values */
702 g_value_unset (cvalues + n_cvalues);
705 /* release g_object_init() notification queue freeze_count */
706 nqueue = g_object_notify_queue_freeze (object, &property_notify_context);
707 g_object_notify_queue_thaw (object, nqueue);
709 /* set remaining properties */
710 for (i = 0; i < n_oparams; i++)
711 object_set_property (object, oparams[i].pspec, oparams[i].value, nqueue);
714 g_type_class_unref (class);
716 /* release our own freeze count and handle notifications */
717 g_object_notify_queue_thaw (object, nqueue);
723 g_object_new_valist (GType object_type,
724 const gchar *first_property_name,
731 guint n_params = 0, n_alloced_params = 16;
733 g_return_val_if_fail (G_TYPE_IS_OBJECT (object_type), NULL);
735 if (!first_property_name)
736 return g_object_newv (object_type, 0, NULL);
738 class = g_type_class_ref (object_type);
740 params = g_new (GParameter, n_alloced_params);
741 name = first_property_name;
745 GParamSpec *pspec = g_param_spec_pool_lookup (pspec_pool,
751 g_warning ("%s: object class `%s' has no property named `%s'",
753 g_type_name (object_type),
757 if (n_params >= n_alloced_params)
759 n_alloced_params += 16;
760 params = g_renew (GParameter, params, n_alloced_params);
762 params[n_params].name = name;
763 params[n_params].value.g_type = 0;
764 g_value_init (¶ms[n_params].value, G_PARAM_SPEC_VALUE_TYPE (pspec));
765 G_VALUE_COLLECT (¶ms[n_params].value, var_args, 0, &error);
768 g_warning ("%s: %s", G_STRLOC, error);
771 /* we purposely leak the value here, it might not be
772 * in a sane state if an error condition occoured
777 name = va_arg (var_args, gchar*);
780 object = g_object_newv (object_type, n_params, params);
783 g_value_unset (¶ms[n_params].value);
786 g_type_class_unref (class);
792 g_object_constructor (GType type,
793 guint n_construct_properties,
794 GObjectConstructParam *construct_params)
799 object = (GObject*) g_type_create_instance (type);
801 /* set construction parameters */
802 if (n_construct_properties)
804 GObjectNotifyQueue *nqueue = g_object_notify_queue_freeze (object, &property_notify_context);
806 /* set construct properties */
807 while (n_construct_properties--)
809 GValue *value = construct_params->value;
810 GParamSpec *pspec = construct_params->pspec;
813 object_set_property (object, pspec, value, nqueue);
815 g_object_notify_queue_thaw (object, nqueue);
816 /* the notification queue is still frozen from g_object_init(), so
817 * we don't need to handle it here, g_object_newv() takes
826 g_object_set_valist (GObject *object,
827 const gchar *first_property_name,
830 GObjectNotifyQueue *nqueue;
833 g_return_if_fail (G_IS_OBJECT (object));
835 g_object_ref (object);
836 nqueue = g_object_notify_queue_freeze (object, &property_notify_context);
838 name = first_property_name;
841 GValue value = { 0, };
845 pspec = g_param_spec_pool_lookup (pspec_pool,
847 G_OBJECT_TYPE (object),
851 g_warning ("%s: object class `%s' has no property named `%s'",
853 G_OBJECT_TYPE_NAME (object),
857 if (!(pspec->flags & G_PARAM_WRITABLE))
859 g_warning ("%s: property `%s' of object class `%s' is not writable",
862 G_OBJECT_TYPE_NAME (object));
866 g_value_init (&value, G_PARAM_SPEC_VALUE_TYPE (pspec));
868 G_VALUE_COLLECT (&value, var_args, 0, &error);
871 g_warning ("%s: %s", G_STRLOC, error);
874 /* we purposely leak the value here, it might not be
875 * in a sane state if an error condition occoured
880 object_set_property (object, pspec, &value, nqueue);
881 g_value_unset (&value);
883 name = va_arg (var_args, gchar*);
886 g_object_notify_queue_thaw (object, nqueue);
887 g_object_unref (object);
891 g_object_get_valist (GObject *object,
892 const gchar *first_property_name,
897 g_return_if_fail (G_IS_OBJECT (object));
899 g_object_ref (object);
901 name = first_property_name;
905 GValue value = { 0, };
909 pspec = g_param_spec_pool_lookup (pspec_pool,
911 G_OBJECT_TYPE (object),
915 g_warning ("%s: object class `%s' has no property named `%s'",
917 G_OBJECT_TYPE_NAME (object),
921 if (!(pspec->flags & G_PARAM_READABLE))
923 g_warning ("%s: property `%s' of object class `%s' is not readable",
926 G_OBJECT_TYPE_NAME (object));
930 g_value_init (&value, G_PARAM_SPEC_VALUE_TYPE (pspec));
932 object_get_property (object, pspec, &value);
934 G_VALUE_LCOPY (&value, var_args, 0, &error);
937 g_warning ("%s: %s", G_STRLOC, error);
939 g_value_unset (&value);
943 g_value_unset (&value);
945 name = va_arg (var_args, gchar*);
948 g_object_unref (object);
952 g_object_set (gpointer _object,
953 const gchar *first_property_name,
956 GObject *object = _object;
959 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
961 va_start (var_args, first_property_name);
962 g_object_set_valist (object, first_property_name, var_args);
969 g_object_get (gpointer _object,
970 const gchar *first_property_name,
973 GObject *object = _object;
976 g_return_if_fail (G_IS_OBJECT (object));
978 va_start (var_args, first_property_name);
979 g_object_get_valist (object, first_property_name, var_args);
984 g_object_set_property (GObject *object,
985 const gchar *property_name,
988 GObjectNotifyQueue *nqueue;
991 g_return_if_fail (G_IS_OBJECT (object));
992 g_return_if_fail (property_name != NULL);
993 g_return_if_fail (G_IS_VALUE (value));
995 g_object_ref (object);
996 nqueue = g_object_notify_queue_freeze (object, &property_notify_context);
998 pspec = g_param_spec_pool_lookup (pspec_pool,
1000 G_OBJECT_TYPE (object),
1003 g_warning ("%s: object class `%s' has no property named `%s'",
1005 G_OBJECT_TYPE_NAME (object),
1008 object_set_property (object, pspec, value, nqueue);
1010 g_object_notify_queue_thaw (object, nqueue);
1011 g_object_unref (object);
1015 g_object_get_property (GObject *object,
1016 const gchar *property_name,
1021 g_return_if_fail (G_IS_OBJECT (object));
1022 g_return_if_fail (property_name != NULL);
1023 g_return_if_fail (G_IS_VALUE (value));
1025 g_object_ref (object);
1027 pspec = g_param_spec_pool_lookup (pspec_pool,
1029 G_OBJECT_TYPE (object),
1032 g_warning ("%s: object class `%s' has no property named `%s'",
1034 G_OBJECT_TYPE_NAME (object),
1038 GValue *prop_value, tmp_value = { 0, };
1040 /* auto-conversion of the callers value type
1042 if (G_VALUE_TYPE (value) == G_PARAM_SPEC_VALUE_TYPE (pspec))
1044 g_value_reset (value);
1047 else if (!g_value_type_transformable (G_PARAM_SPEC_VALUE_TYPE (pspec), G_VALUE_TYPE (value)))
1049 g_warning ("can't retrive property `%s' of type `%s' as value of type `%s'",
1051 g_type_name (G_PARAM_SPEC_VALUE_TYPE (pspec)),
1052 G_VALUE_TYPE_NAME (value));
1053 g_object_unref (object);
1058 g_value_init (&tmp_value, G_PARAM_SPEC_VALUE_TYPE (pspec));
1059 prop_value = &tmp_value;
1061 object_get_property (object, pspec, prop_value);
1062 if (prop_value != value)
1064 g_value_transform (prop_value, value);
1065 g_value_unset (&tmp_value);
1069 g_object_unref (object);
1073 g_object_connect (gpointer _object,
1074 const gchar *signal_spec,
1077 GObject *object = _object;
1080 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
1081 g_return_val_if_fail (object->ref_count > 0, object);
1083 va_start (var_args, signal_spec);
1086 gpointer callback = va_arg (var_args, gpointer);
1087 gpointer data = va_arg (var_args, gpointer);
1090 if (strncmp (signal_spec, "signal::", 8) == 0)
1091 sid = g_signal_connect_data (object, signal_spec + 8,
1092 callback, data, NULL,
1094 else if (strncmp (signal_spec, "object_signal::", 15) == 0)
1095 sid = g_signal_connect_object (object, signal_spec + 15,
1098 else if (strncmp (signal_spec, "swapped_signal::", 16) == 0)
1099 sid = g_signal_connect_data (object, signal_spec + 16,
1100 callback, data, NULL,
1102 else if (strncmp (signal_spec, "swapped_object_signal::", 23) == 0)
1103 sid = g_signal_connect_object (object, signal_spec + 23,
1106 else if (strncmp (signal_spec, "signal_after::", 14) == 0)
1107 sid = g_signal_connect_data (object, signal_spec + 14,
1108 callback, data, NULL,
1110 else if (strncmp (signal_spec, "object_signal_after::", 21) == 0)
1111 sid = g_signal_connect_object (object, signal_spec + 21,
1114 else if (strncmp (signal_spec, "swapped_signal_after::", 22) == 0)
1115 sid = g_signal_connect_data (object, signal_spec + 22,
1116 callback, data, NULL,
1117 G_CONNECT_SWAPPED | G_CONNECT_AFTER);
1118 else if (strncmp (signal_spec, "swapped_object_signal_after::", 29) == 0)
1119 sid = g_signal_connect_object (object, signal_spec + 29,
1121 G_CONNECT_SWAPPED | G_CONNECT_AFTER);
1124 g_warning ("%s: invalid signal spec \"%s\"", G_STRLOC, signal_spec);
1127 signal_spec = va_arg (var_args, gchar*);
1135 g_object_disconnect (gpointer _object,
1136 const gchar *signal_spec,
1139 GObject *object = _object;
1142 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
1143 g_return_val_if_fail (object->ref_count > 0, object);
1145 va_start (var_args, signal_spec);
1148 gpointer callback = va_arg (var_args, gpointer);
1149 gpointer data = va_arg (var_args, gpointer);
1150 guint sid = 0, detail = 0, mask = 0;
1152 if (strncmp (signal_spec, "any_signal::", 12) == 0)
1155 mask = G_SIGNAL_MATCH_ID | G_SIGNAL_MATCH_FUNC | G_SIGNAL_MATCH_DATA;
1157 else if (strcmp (signal_spec, "any_signal") == 0)
1160 mask = G_SIGNAL_MATCH_FUNC | G_SIGNAL_MATCH_DATA;
1164 g_warning ("%s: invalid signal spec \"%s\"", G_STRLOC, signal_spec);
1168 if ((mask & G_SIGNAL_MATCH_ID) &&
1169 !g_signal_parse_name (signal_spec, G_OBJECT_TYPE (object), &sid, &detail, FALSE))
1170 g_warning ("%s: invalid signal name \"%s\"", G_STRLOC, signal_spec);
1171 else if (!g_signal_handlers_disconnect_matched (object, mask | (detail ? G_SIGNAL_MATCH_DETAIL : 0),
1173 NULL, callback, data))
1174 g_warning (G_STRLOC ": signal handler %p(%p) is not connected", callback, data);
1175 signal_spec = va_arg (var_args, gchar*);
1187 } weak_refs[1]; /* flexible array */
1191 weak_refs_notify (gpointer data)
1193 WeakRefStack *wstack = data;
1196 for (i = 0; i < wstack->n_weak_refs; i++)
1197 wstack->weak_refs[i].notify (wstack->weak_refs[i].data);
1202 g_object_weak_ref (GObject *object,
1206 WeakRefStack *wstack;
1209 g_return_if_fail (G_IS_OBJECT (object));
1210 g_return_if_fail (notify != NULL);
1211 g_return_if_fail (object->ref_count >= 1);
1213 wstack = g_datalist_id_remove_no_notify (&object->qdata, quark_weak_refs);
1216 i = wstack->n_weak_refs++;
1217 wstack = g_realloc (wstack, sizeof (*wstack) + sizeof (wstack->weak_refs[0]) * i);
1221 wstack = g_renew (WeakRefStack, NULL, 1);
1222 wstack->n_weak_refs = 1;
1223 i = wstack->n_weak_refs;
1225 wstack->weak_refs[i].notify = notify;
1226 wstack->weak_refs[i].data = data;
1227 g_datalist_id_set_data_full (&object->qdata, quark_weak_refs, wstack, weak_refs_notify);
1231 g_object_weak_unref (GObject *object,
1235 WeakRefStack *wstack;
1236 gboolean found_one = FALSE;
1238 g_return_if_fail (G_IS_OBJECT (object));
1239 g_return_if_fail (notify != NULL);
1241 wstack = g_datalist_id_get_data (&object->qdata, quark_weak_refs);
1246 for (i = 0; i < wstack->n_weak_refs; i++)
1247 if (wstack->weak_refs[i].notify == notify &&
1248 wstack->weak_refs[i].data == data)
1251 wstack->n_weak_refs -= 1;
1252 if (i != wstack->n_weak_refs)
1254 wstack->weak_refs[i].notify = wstack->weak_refs[wstack->n_weak_refs].notify;
1255 wstack->weak_refs[i].data = wstack->weak_refs[wstack->n_weak_refs].data;
1261 g_warning (G_STRLOC ": couldn't find weak ref %p(%p)", notify, data);
1265 g_object_ref (gpointer _object)
1267 GObject *object = _object;
1269 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
1270 g_return_val_if_fail (object->ref_count > 0, NULL);
1272 #ifdef G_ENABLE_DEBUG
1273 if (g_trap_object_ref == object)
1275 #endif /* G_ENABLE_DEBUG */
1277 object->ref_count += 1;
1283 g_object_unref (gpointer _object)
1285 GObject *object = _object;
1287 g_return_if_fail (G_IS_OBJECT (object));
1288 g_return_if_fail (object->ref_count > 0);
1290 #ifdef G_ENABLE_DEBUG
1291 if (g_trap_object_ref == object)
1293 #endif /* G_ENABLE_DEBUG */
1295 if (object->ref_count > 1)
1296 object->ref_count -= 1;
1298 g_object_last_unref (object);
1302 g_object_get_qdata (GObject *object,
1305 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
1307 return quark ? g_datalist_id_get_data (&object->qdata, quark) : NULL;
1311 g_object_set_qdata (GObject *object,
1315 g_return_if_fail (G_IS_OBJECT (object));
1316 g_return_if_fail (quark > 0);
1318 g_datalist_id_set_data (&object->qdata, quark, data);
1322 g_object_set_qdata_full (GObject *object,
1325 GDestroyNotify destroy)
1327 g_return_if_fail (G_IS_OBJECT (object));
1328 g_return_if_fail (quark > 0);
1330 g_datalist_id_set_data_full (&object->qdata, quark, data,
1331 data ? destroy : (GDestroyNotify) NULL);
1335 g_object_steal_qdata (GObject *object,
1338 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
1339 g_return_val_if_fail (quark > 0, NULL);
1341 return g_datalist_id_remove_no_notify (&object->qdata, quark);
1345 g_object_get_data (GObject *object,
1350 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
1351 g_return_val_if_fail (key != NULL, NULL);
1353 quark = g_quark_try_string (key);
1355 return quark ? g_datalist_id_get_data (&object->qdata, quark) : NULL;
1359 g_object_set_data (GObject *object,
1363 g_return_if_fail (G_IS_OBJECT (object));
1364 g_return_if_fail (key != NULL);
1366 g_datalist_id_set_data (&object->qdata, g_quark_from_string (key), data);
1370 g_object_set_data_full (GObject *object,
1373 GDestroyNotify destroy)
1375 g_return_if_fail (G_IS_OBJECT (object));
1376 g_return_if_fail (key != NULL);
1378 g_datalist_id_set_data_full (&object->qdata, g_quark_from_string (key), data,
1379 data ? destroy : (GDestroyNotify) NULL);
1383 g_object_steal_data (GObject *object,
1388 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
1389 g_return_val_if_fail (key != NULL, NULL);
1391 quark = g_quark_try_string (key);
1393 return quark ? g_datalist_id_remove_no_notify (&object->qdata, quark) : NULL;
1397 g_value_object_init (GValue *value)
1399 value->data[0].v_pointer = NULL;
1403 g_value_object_free_value (GValue *value)
1405 if (value->data[0].v_pointer)
1406 g_object_unref (value->data[0].v_pointer);
1410 g_value_object_copy_value (const GValue *src_value,
1413 if (src_value->data[0].v_pointer)
1414 dest_value->data[0].v_pointer = g_object_ref (src_value->data[0].v_pointer);
1416 dest_value->data[0].v_pointer = NULL;
1420 g_value_object_transform_value (const GValue *src_value,
1423 if (src_value->data[0].v_pointer && g_type_is_a (G_OBJECT_TYPE (src_value->data[0].v_pointer), G_VALUE_TYPE (dest_value)))
1424 dest_value->data[0].v_pointer = g_object_ref (src_value->data[0].v_pointer);
1426 dest_value->data[0].v_pointer = NULL;
1430 g_value_object_peek_pointer (const GValue *value)
1432 return value->data[0].v_pointer;
1436 g_value_object_collect_value (GValue *value,
1437 guint n_collect_values,
1438 GTypeCValue *collect_values,
1439 guint collect_flags)
1441 if (collect_values[0].v_pointer)
1443 GObject *object = collect_values[0].v_pointer;
1445 if (object->g_type_instance.g_class == NULL)
1446 return g_strconcat ("invalid unclassed object pointer for value type `",
1447 G_VALUE_TYPE_NAME (value),
1450 else if (!g_value_type_compatible (G_OBJECT_TYPE (object), G_VALUE_TYPE (value)))
1451 return g_strconcat ("invalid object type `",
1452 G_OBJECT_TYPE_NAME (object),
1453 "' for value type `",
1454 G_VALUE_TYPE_NAME (value),
1457 /* never honour G_VALUE_NOCOPY_CONTENTS for ref-counted types */
1458 value->data[0].v_pointer = g_object_ref (object);
1461 value->data[0].v_pointer = NULL;
1467 g_value_object_lcopy_value (const GValue *value,
1468 guint n_collect_values,
1469 GTypeCValue *collect_values,
1470 guint collect_flags)
1472 GObject **object_p = collect_values[0].v_pointer;
1475 return g_strdup_printf ("value location for `%s' passed as NULL", G_VALUE_TYPE_NAME (value));
1477 if (!value->data[0].v_pointer)
1479 else if (collect_flags & G_VALUE_NOCOPY_CONTENTS)
1480 *object_p = value->data[0].v_pointer;
1482 *object_p = g_object_ref (value->data[0].v_pointer);
1488 g_value_set_object (GValue *value,
1491 g_return_if_fail (G_VALUE_HOLDS_OBJECT (value));
1493 if (value->data[0].v_pointer)
1495 g_object_unref (value->data[0].v_pointer);
1496 value->data[0].v_pointer = NULL;
1501 g_return_if_fail (G_IS_OBJECT (v_object));
1502 g_return_if_fail (g_value_type_compatible (G_OBJECT_TYPE (v_object), G_VALUE_TYPE (value)));
1504 value->data[0].v_pointer = v_object;
1505 g_object_ref (value->data[0].v_pointer);
1510 g_value_get_object (const GValue *value)
1512 g_return_val_if_fail (G_VALUE_HOLDS_OBJECT (value), NULL);
1514 return value->data[0].v_pointer;
1518 g_value_dup_object (const GValue *value)
1520 g_return_val_if_fail (G_VALUE_HOLDS_OBJECT (value), NULL);
1522 return value->data[0].v_pointer ? g_object_ref (value->data[0].v_pointer) : NULL;
1526 g_signal_connect_object (gpointer instance,
1527 const gchar *detailed_signal,
1528 GCallback c_handler,
1530 GConnectFlags connect_flags)
1532 g_return_val_if_fail (G_TYPE_CHECK_INSTANCE (instance), 0);
1533 g_return_val_if_fail (detailed_signal != NULL, 0);
1534 g_return_val_if_fail (c_handler != NULL, 0);
1540 g_return_val_if_fail (G_IS_OBJECT (gobject), 0);
1542 closure = ((connect_flags & G_CONNECT_SWAPPED) ? g_cclosure_new_object_swap : g_cclosure_new_object) (c_handler, gobject);
1544 return g_signal_connect_closure (instance, detailed_signal, closure, connect_flags & G_CONNECT_AFTER);
1547 return g_signal_connect_data (instance, detailed_signal, c_handler, NULL, NULL, connect_flags);
1553 GClosure *closures[1]; /* flexible array */
1557 object_remove_closure (gpointer data,
1560 GObject *object = data;
1561 CArray *carray = g_object_get_qdata (object, quark_closure_array);
1564 for (i = 0; i < carray->n_closures; i++)
1565 if (carray->closures[i] == closure)
1567 carray->n_closures--;
1568 if (i < carray->n_closures)
1569 carray->closures[i] = carray->closures[carray->n_closures];
1572 g_assert_not_reached ();
1576 destroy_closure_array (gpointer data)
1578 CArray *carray = data;
1579 GObject *object = carray->object;
1580 guint i, n = carray->n_closures;
1582 for (i = 0; i < n; i++)
1584 GClosure *closure = carray->closures[i];
1586 /* removing object_remove_closure() upfront is probably faster than
1587 * letting it fiddle with quark_closure_array which is empty anyways
1589 g_closure_remove_invalidate_notifier (closure, object, object_remove_closure);
1590 g_closure_invalidate (closure);
1596 g_object_watch_closure (GObject *object,
1602 g_return_if_fail (G_IS_OBJECT (object));
1603 g_return_if_fail (closure != NULL);
1604 g_return_if_fail (closure->is_invalid == FALSE);
1605 g_return_if_fail (closure->in_marshal == FALSE);
1606 g_return_if_fail (object->ref_count > 0); /* this doesn't work on finalizing objects */
1608 g_closure_add_invalidate_notifier (closure, object, object_remove_closure);
1609 g_closure_add_marshal_guards (closure,
1610 object, (GClosureNotify) g_object_ref,
1611 object, (GClosureNotify) g_object_unref);
1612 carray = g_datalist_id_remove_no_notify (&object->qdata, quark_closure_array);
1615 carray = g_renew (CArray, NULL, 1);
1616 carray->object = object;
1617 carray->n_closures = 1;
1618 i = carray->n_closures;
1622 i = carray->n_closures++;
1623 carray = g_realloc (carray, sizeof (*carray) + sizeof (carray->closures[0]) * i);
1625 carray->closures[i] = closure;
1626 g_datalist_id_set_data_full (&object->qdata, quark_closure_array, carray, destroy_closure_array);
1630 g_closure_new_object (guint sizeof_closure,
1635 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
1636 g_return_val_if_fail (object->ref_count > 0, NULL); /* this doesn't work on finalizing objects */
1638 closure = g_closure_new_simple (sizeof_closure, object);
1639 g_object_watch_closure (object, closure);
1645 g_cclosure_new_object (GCallback callback_func,
1648 GObject *object = _object;
1651 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
1652 g_return_val_if_fail (object->ref_count > 0, NULL); /* this doesn't work on finalizing objects */
1653 g_return_val_if_fail (callback_func != NULL, NULL);
1655 closure = g_cclosure_new (callback_func, object, NULL);
1656 g_object_watch_closure (object, closure);
1662 g_cclosure_new_object_swap (GCallback callback_func,
1665 GObject *object = _object;
1668 g_return_val_if_fail (G_IS_OBJECT (object), NULL);
1669 g_return_val_if_fail (object->ref_count > 0, NULL); /* this doesn't work on finalizing objects */
1670 g_return_val_if_fail (callback_func != NULL, NULL);
1672 closure = g_cclosure_new_swap (callback_func, object, NULL);
1673 g_object_watch_closure (object, closure);