1 /* GObject - GLib Type, Object, Parameter and Signal Library
2 * Copyright (C) 1997-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 "gparamspecs.h"
27 #include "gvaluecollector.h"
33 #define G_PARAM_USER_MASK (~0 << G_PARAM_USER_SHIFT)
34 #define PSPEC_APPLIES_TO_VALUE(pspec, value) (G_TYPE_CHECK_VALUE_TYPE ((value), G_PARAM_SPEC_VALUE_TYPE (pspec)))
35 #define G_SLOCK(mutex) g_static_mutex_lock (mutex)
36 #define G_SUNLOCK(mutex) g_static_mutex_unlock (mutex)
39 /* --- prototypes --- */
40 static void g_param_spec_class_base_init (GParamSpecClass *class);
41 static void g_param_spec_class_base_finalize (GParamSpecClass *class);
42 static void g_param_spec_class_init (GParamSpecClass *class,
44 static void g_param_spec_init (GParamSpec *pspec,
45 GParamSpecClass *class);
46 static void g_param_spec_finalize (GParamSpec *pspec);
47 static void value_param_init (GValue *value);
48 static void value_param_free_value (GValue *value);
49 static void value_param_copy_value (const GValue *src_value,
51 static void value_param_transform_value (const GValue *src_value,
53 static gpointer value_param_peek_pointer (const GValue *value);
54 static gchar* value_param_collect_value (GValue *value,
55 guint n_collect_values,
56 GTypeCValue *collect_values,
58 static gchar* value_param_lcopy_value (const GValue *value,
59 guint n_collect_values,
60 GTypeCValue *collect_values,
64 /* --- variables --- */
65 static GQuark quark_floating = 0;
66 G_LOCK_DEFINE_STATIC (pspec_ref_count);
69 /* --- functions --- */
71 g_param_type_init (void) /* sync with gtype.c */
73 static const GTypeFundamentalInfo finfo = {
74 (G_TYPE_FLAG_CLASSED |
75 G_TYPE_FLAG_INSTANTIATABLE |
76 G_TYPE_FLAG_DERIVABLE |
77 G_TYPE_FLAG_DEEP_DERIVABLE),
79 static const GTypeValueTable param_value_table = {
80 value_param_init, /* value_init */
81 value_param_free_value, /* value_free */
82 value_param_copy_value, /* value_copy */
83 value_param_peek_pointer, /* value_peek_pointer */
84 "p", /* collect_format */
85 value_param_collect_value, /* collect_value */
86 "p", /* lcopy_format */
87 value_param_lcopy_value, /* lcopy_value */
89 static const GTypeInfo param_spec_info = {
90 sizeof (GParamSpecClass),
92 (GBaseInitFunc) g_param_spec_class_base_init,
93 (GBaseFinalizeFunc) g_param_spec_class_base_finalize,
94 (GClassInitFunc) g_param_spec_class_init,
95 (GClassFinalizeFunc) NULL,
96 NULL, /* class_data */
100 (GInstanceInitFunc) g_param_spec_init,
106 type = g_type_register_fundamental (G_TYPE_PARAM, "GParam", ¶m_spec_info, &finfo, G_TYPE_FLAG_ABSTRACT);
107 g_assert (type == G_TYPE_PARAM);
108 g_value_register_transform_func (G_TYPE_PARAM, G_TYPE_PARAM, value_param_transform_value);
112 g_param_spec_class_base_init (GParamSpecClass *class)
117 g_param_spec_class_base_finalize (GParamSpecClass *class)
122 g_param_spec_class_init (GParamSpecClass *class,
125 quark_floating = g_quark_from_static_string ("GParamSpec-floating");
127 class->value_type = G_TYPE_NONE;
128 class->finalize = g_param_spec_finalize;
129 class->value_set_default = NULL;
130 class->value_validate = NULL;
131 class->values_cmp = NULL;
135 g_param_spec_init (GParamSpec *pspec,
136 GParamSpecClass *class)
140 pspec->_blurb = NULL;
142 pspec->value_type = class->value_type;
143 pspec->owner_type = 0;
145 pspec->ref_count = 1;
147 g_datalist_id_set_data (&pspec->qdata, quark_floating, GUINT_TO_POINTER (TRUE));
151 g_param_spec_finalize (GParamSpec *pspec)
153 g_datalist_clear (&pspec->qdata);
155 g_free (pspec->name);
156 g_free (pspec->_nick);
157 g_free (pspec->_blurb);
159 g_type_free_instance ((GTypeInstance*) pspec);
163 g_param_spec_ref (GParamSpec *pspec)
165 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), NULL);
167 G_LOCK (pspec_ref_count);
168 if (pspec->ref_count > 0)
170 pspec->ref_count += 1;
171 G_UNLOCK (pspec_ref_count);
175 G_UNLOCK (pspec_ref_count);
176 g_return_val_if_fail (pspec->ref_count > 0, NULL);
183 g_param_spec_unref (GParamSpec *pspec)
185 g_return_if_fail (G_IS_PARAM_SPEC (pspec));
187 G_LOCK (pspec_ref_count);
188 if (pspec->ref_count > 0)
190 gboolean need_finalize;
192 /* sync with _sink */
193 pspec->ref_count -= 1;
194 need_finalize = pspec->ref_count == 0;
195 G_UNLOCK (pspec_ref_count);
197 G_PARAM_SPEC_GET_CLASS (pspec)->finalize (pspec);
201 G_UNLOCK (pspec_ref_count);
202 g_return_if_fail (pspec->ref_count > 0);
207 g_param_spec_sink (GParamSpec *pspec)
209 g_return_if_fail (G_IS_PARAM_SPEC (pspec));
211 G_LOCK (pspec_ref_count);
212 if (pspec->ref_count > 0)
214 if (g_datalist_id_remove_no_notify (&pspec->qdata, quark_floating))
216 /* sync with _unref */
217 if (pspec->ref_count > 1)
218 pspec->ref_count -= 1;
221 G_UNLOCK (pspec_ref_count);
222 g_param_spec_unref (pspec);
227 G_UNLOCK (pspec_ref_count);
231 G_UNLOCK (pspec_ref_count);
232 g_return_if_fail (pspec->ref_count > 0);
236 G_CONST_RETURN gchar*
237 g_param_spec_get_name (GParamSpec *pspec)
239 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), NULL);
244 G_CONST_RETURN gchar*
245 g_param_spec_get_nick (GParamSpec *pspec)
247 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), NULL);
253 GParamSpec *redirect_target;
255 redirect_target = g_param_spec_get_redirect_target (pspec);
256 if (redirect_target && redirect_target->_nick)
257 return redirect_target->_nick;
263 G_CONST_RETURN gchar*
264 g_param_spec_get_blurb (GParamSpec *pspec)
266 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), NULL);
269 return pspec->_blurb;
272 GParamSpec *redirect_target;
274 redirect_target = g_param_spec_get_redirect_target (pspec);
275 if (redirect_target && redirect_target->_blurb)
276 return redirect_target->_blurb;
283 canonicalize_key (gchar *key)
287 for (p = key; *p != 0; p++)
292 (c < '0' || c > '9') &&
293 (c < 'A' || c > 'Z') &&
294 (c < 'a' || c > 'z'))
300 g_param_spec_internal (GType param_type,
308 g_return_val_if_fail (G_TYPE_IS_PARAM (param_type) && param_type != G_TYPE_PARAM, NULL);
309 g_return_val_if_fail (name != NULL, NULL);
310 g_return_val_if_fail ((name[0] >= 'A' && name[0] <= 'Z') || (name[0] >= 'a' && name[0] <= 'z'), NULL);
312 pspec = (gpointer) g_type_create_instance (param_type);
313 pspec->name = g_strdup (name);
314 canonicalize_key (pspec->name);
315 pspec->_nick = g_strdup (nick);
316 pspec->_blurb = g_strdup (blurb);
317 pspec->flags = (flags & G_PARAM_USER_MASK) | (flags & G_PARAM_MASK);
323 g_param_spec_get_qdata (GParamSpec *pspec,
326 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), NULL);
328 return quark ? g_datalist_id_get_data (&pspec->qdata, quark) : NULL;
332 g_param_spec_set_qdata (GParamSpec *pspec,
336 g_return_if_fail (G_IS_PARAM_SPEC (pspec));
337 g_return_if_fail (quark > 0);
339 g_datalist_id_set_data (&pspec->qdata, quark, data);
343 g_param_spec_set_qdata_full (GParamSpec *pspec,
346 GDestroyNotify destroy)
348 g_return_if_fail (G_IS_PARAM_SPEC (pspec));
349 g_return_if_fail (quark > 0);
351 g_datalist_id_set_data_full (&pspec->qdata, quark, data, data ? destroy : (GDestroyNotify) NULL);
355 g_param_spec_steal_qdata (GParamSpec *pspec,
358 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), NULL);
359 g_return_val_if_fail (quark > 0, NULL);
361 return g_datalist_id_remove_no_notify (&pspec->qdata, quark);
365 g_param_spec_get_redirect_target (GParamSpec *pspec)
367 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), NULL);
369 if (G_IS_PARAM_SPEC_OVERRIDE (pspec))
371 GParamSpecOverride *ospec = G_PARAM_SPEC_OVERRIDE (pspec);
373 return ospec->overridden;
380 g_param_value_set_default (GParamSpec *pspec,
383 g_return_if_fail (G_IS_PARAM_SPEC (pspec));
384 g_return_if_fail (G_IS_VALUE (value));
385 g_return_if_fail (PSPEC_APPLIES_TO_VALUE (pspec, value));
387 g_value_reset (value);
388 G_PARAM_SPEC_GET_CLASS (pspec)->value_set_default (pspec, value);
392 g_param_value_defaults (GParamSpec *pspec,
395 GValue dflt_value = { 0, };
398 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), FALSE);
399 g_return_val_if_fail (G_IS_VALUE (value), FALSE);
400 g_return_val_if_fail (PSPEC_APPLIES_TO_VALUE (pspec, value), FALSE);
402 g_value_init (&dflt_value, G_PARAM_SPEC_VALUE_TYPE (pspec));
403 G_PARAM_SPEC_GET_CLASS (pspec)->value_set_default (pspec, &dflt_value);
404 defaults = G_PARAM_SPEC_GET_CLASS (pspec)->values_cmp (pspec, value, &dflt_value) == 0;
405 g_value_unset (&dflt_value);
411 g_param_value_validate (GParamSpec *pspec,
414 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), FALSE);
415 g_return_val_if_fail (G_IS_VALUE (value), FALSE);
416 g_return_val_if_fail (PSPEC_APPLIES_TO_VALUE (pspec, value), FALSE);
418 if (G_PARAM_SPEC_GET_CLASS (pspec)->value_validate)
420 GValue oval = *value;
422 if (G_PARAM_SPEC_GET_CLASS (pspec)->value_validate (pspec, value) ||
423 memcmp (&oval.data, &value->data, sizeof (oval.data)))
431 g_param_value_convert (GParamSpec *pspec,
432 const GValue *src_value,
434 gboolean strict_validation)
436 GValue tmp_value = { 0, };
438 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), FALSE);
439 g_return_val_if_fail (G_IS_VALUE (src_value), FALSE);
440 g_return_val_if_fail (G_IS_VALUE (dest_value), FALSE);
441 g_return_val_if_fail (PSPEC_APPLIES_TO_VALUE (pspec, dest_value), FALSE);
443 /* better leave dest_value untouched when returning FALSE */
445 g_value_init (&tmp_value, G_VALUE_TYPE (dest_value));
446 if (g_value_transform (src_value, &tmp_value) &&
447 (!g_param_value_validate (pspec, &tmp_value) || !strict_validation))
449 g_value_unset (dest_value);
451 /* values are relocatable */
452 memcpy (dest_value, &tmp_value, sizeof (tmp_value));
458 g_value_unset (&tmp_value);
465 g_param_values_cmp (GParamSpec *pspec,
466 const GValue *value1,
467 const GValue *value2)
471 /* param_values_cmp() effectively does: value1 - value2
472 * so the return values are:
473 * -1) value1 < value2
474 * 0) value1 == value2
477 g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), 0);
478 g_return_val_if_fail (G_IS_VALUE (value1), 0);
479 g_return_val_if_fail (G_IS_VALUE (value2), 0);
480 g_return_val_if_fail (PSPEC_APPLIES_TO_VALUE (pspec, value1), 0);
481 g_return_val_if_fail (PSPEC_APPLIES_TO_VALUE (pspec, value2), 0);
483 cmp = G_PARAM_SPEC_GET_CLASS (pspec)->values_cmp (pspec, value1, value2);
485 return CLAMP (cmp, -1, 1);
489 value_param_init (GValue *value)
491 value->data[0].v_pointer = NULL;
495 value_param_free_value (GValue *value)
497 if (value->data[0].v_pointer)
498 g_param_spec_unref (value->data[0].v_pointer);
502 value_param_copy_value (const GValue *src_value,
505 if (src_value->data[0].v_pointer)
506 dest_value->data[0].v_pointer = g_param_spec_ref (src_value->data[0].v_pointer);
508 dest_value->data[0].v_pointer = NULL;
512 value_param_transform_value (const GValue *src_value,
515 if (src_value->data[0].v_pointer &&
516 g_type_is_a (G_PARAM_SPEC_TYPE (dest_value->data[0].v_pointer), G_VALUE_TYPE (dest_value)))
517 dest_value->data[0].v_pointer = g_param_spec_ref (src_value->data[0].v_pointer);
519 dest_value->data[0].v_pointer = NULL;
523 value_param_peek_pointer (const GValue *value)
525 return value->data[0].v_pointer;
529 value_param_collect_value (GValue *value,
530 guint n_collect_values,
531 GTypeCValue *collect_values,
534 if (collect_values[0].v_pointer)
536 GParamSpec *param = collect_values[0].v_pointer;
538 if (param->g_type_instance.g_class == NULL)
539 return g_strconcat ("invalid unclassed param spec pointer for value type `",
540 G_VALUE_TYPE_NAME (value),
543 else if (!g_value_type_compatible (G_PARAM_SPEC_TYPE (param), G_VALUE_TYPE (value)))
544 return g_strconcat ("invalid param spec type `",
545 G_PARAM_SPEC_TYPE_NAME (param),
546 "' for value type `",
547 G_VALUE_TYPE_NAME (value),
550 value->data[0].v_pointer = g_param_spec_ref (param);
553 value->data[0].v_pointer = NULL;
559 value_param_lcopy_value (const GValue *value,
560 guint n_collect_values,
561 GTypeCValue *collect_values,
564 GParamSpec **param_p = collect_values[0].v_pointer;
567 return g_strdup_printf ("value location for `%s' passed as NULL", G_VALUE_TYPE_NAME (value));
569 if (!value->data[0].v_pointer)
571 else if (collect_flags & G_VALUE_NOCOPY_CONTENTS)
572 *param_p = value->data[0].v_pointer;
574 *param_p = g_param_spec_ref (value->data[0].v_pointer);
580 /* --- param spec pool --- */
581 struct _GParamSpecPool
584 gboolean type_prefixing;
585 GHashTable *hash_table;
589 param_spec_pool_hash (gconstpointer key_spec)
591 const GParamSpec *key = key_spec;
593 guint h = key->owner_type;
595 for (p = key->name; *p; p++)
596 h = (h << 5) - h + *p;
602 param_spec_pool_equals (gconstpointer key_spec_1,
603 gconstpointer key_spec_2)
605 const GParamSpec *key1 = key_spec_1;
606 const GParamSpec *key2 = key_spec_2;
608 return (key1->owner_type == key2->owner_type &&
609 strcmp (key1->name, key2->name) == 0);
613 g_param_spec_pool_new (gboolean type_prefixing)
615 static GStaticMutex init_smutex = G_STATIC_MUTEX_INIT;
616 GParamSpecPool *pool = g_new (GParamSpecPool, 1);
618 memcpy (&pool->smutex, &init_smutex, sizeof (init_smutex));
619 pool->type_prefixing = type_prefixing != FALSE;
620 pool->hash_table = g_hash_table_new (param_spec_pool_hash, param_spec_pool_equals);
626 g_param_spec_pool_insert (GParamSpecPool *pool,
632 if (pool && pspec && owner_type > 0 && pspec->owner_type == 0)
634 G_SLOCK (&pool->smutex);
635 for (p = pspec->name; *p; p++)
637 if (!strchr (G_CSET_A_2_Z G_CSET_a_2_z G_CSET_DIGITS "-_", *p))
639 g_warning (G_STRLOC ": pspec name \"%s\" contains invalid characters", pspec->name);
640 G_SUNLOCK (&pool->smutex);
645 pspec->owner_type = owner_type;
646 g_param_spec_ref (pspec);
647 g_hash_table_insert (pool->hash_table, pspec, pspec);
648 G_SUNLOCK (&pool->smutex);
652 g_return_if_fail (pool != NULL);
653 g_return_if_fail (pspec);
654 g_return_if_fail (owner_type > 0);
655 g_return_if_fail (pspec->owner_type == 0);
660 g_param_spec_pool_remove (GParamSpecPool *pool,
665 G_SLOCK (&pool->smutex);
666 if (g_hash_table_remove (pool->hash_table, pspec))
667 g_param_spec_unref (pspec);
669 g_warning (G_STRLOC ": attempt to remove unknown pspec `%s' from pool", pspec->name);
670 G_SUNLOCK (&pool->smutex);
674 g_return_if_fail (pool != NULL);
675 g_return_if_fail (pspec);
679 static inline GParamSpec*
680 param_spec_ht_lookup (GHashTable *hash_table,
681 const gchar *param_name,
683 gboolean walk_ancestors)
685 GParamSpec key, *pspec;
687 key.owner_type = owner_type;
688 key.name = (gchar*) param_name;
692 pspec = g_hash_table_lookup (hash_table, &key);
695 key.owner_type = g_type_parent (key.owner_type);
697 while (key.owner_type);
699 pspec = g_hash_table_lookup (hash_table, &key);
703 /* try canonicalized form */
704 key.name = g_strdup (param_name);
705 key.owner_type = owner_type;
707 canonicalize_key (key.name);
711 pspec = g_hash_table_lookup (hash_table, &key);
717 key.owner_type = g_type_parent (key.owner_type);
719 while (key.owner_type);
721 pspec = g_hash_table_lookup (hash_table, &key);
729 g_param_spec_pool_lookup (GParamSpecPool *pool,
730 const gchar *param_name,
732 gboolean walk_ancestors)
737 if (!pool || !param_name)
739 g_return_val_if_fail (pool != NULL, NULL);
740 g_return_val_if_fail (param_name != NULL, NULL);
743 G_SLOCK (&pool->smutex);
745 delim = pool->type_prefixing ? strchr (param_name, ':') : NULL;
747 /* try quick and away, i.e. without prefix */
750 pspec = param_spec_ht_lookup (pool->hash_table, param_name, owner_type, walk_ancestors);
751 G_SUNLOCK (&pool->smutex);
756 /* strip type prefix */
757 if (pool->type_prefixing && delim[1] == ':')
759 guint l = delim - param_name;
760 gchar stack_buffer[32], *buffer = l < 32 ? stack_buffer : g_new (gchar, l + 1);
763 strncpy (buffer, param_name, delim - param_name);
765 type = g_type_from_name (buffer);
768 if (type) /* type==0 isn't a valid type pefix */
770 /* sanity check, these cases don't make a whole lot of sense */
771 if ((!walk_ancestors && type != owner_type) || !g_type_is_a (owner_type, type))
773 G_SUNLOCK (&pool->smutex);
779 pspec = param_spec_ht_lookup (pool->hash_table, param_name, owner_type, walk_ancestors);
780 G_SUNLOCK (&pool->smutex);
785 /* malformed param_name */
787 G_SUNLOCK (&pool->smutex);
793 pool_list (gpointer key,
797 GParamSpec *pspec = value;
798 gpointer *data = user_data;
799 GType owner_type = (GType) data[1];
801 if (owner_type == pspec->owner_type)
802 data[0] = g_list_prepend (data[0], pspec);
806 g_param_spec_pool_list_owned (GParamSpecPool *pool,
811 g_return_val_if_fail (pool != NULL, NULL);
812 g_return_val_if_fail (owner_type > 0, NULL);
814 G_SLOCK (&pool->smutex);
816 data[1] = (gpointer) owner_type;
817 g_hash_table_foreach (pool->hash_table, pool_list, &data);
818 G_SUNLOCK (&pool->smutex);
824 pspec_compare_id (gconstpointer a,
827 const GParamSpec *pspec1 = a, *pspec2 = b;
829 return pspec1->param_id < pspec2->param_id ? -1 : pspec1->param_id > pspec2->param_id;
832 static inline GSList*
833 pspec_list_remove_overridden_and_redirected (GSList *plist,
838 GSList *rlist = NULL;
842 GSList *tmp = plist->next;
843 GParamSpec *pspec = plist->data;
845 gboolean remove = FALSE;
847 /* Remove paramspecs that are redirected, and also paramspecs
848 * that have are overridden by non-redirected properties.
849 * The idea is to get the single paramspec for each name that
850 * best corresponds to what the application sees.
852 if (g_param_spec_get_redirect_target (pspec))
856 found = param_spec_ht_lookup (ht, pspec->name, owner_type, TRUE);
859 GParamSpec *redirect = g_param_spec_get_redirect_target (found);
860 if (redirect != pspec)
867 g_slist_free_1 (plist);
881 pool_depth_list (gpointer key,
885 GParamSpec *pspec = value;
886 gpointer *data = user_data;
887 GSList **slists = data[0];
888 GType owner_type = (GType) data[1];
890 if (g_type_is_a (owner_type, pspec->owner_type))
892 if (G_TYPE_IS_INTERFACE (pspec->owner_type))
894 slists[0] = g_slist_prepend (slists[0], pspec);
898 guint d = g_type_depth (pspec->owner_type);
900 slists[d - 1] = g_slist_prepend (slists[d - 1], pspec);
905 /* We handle interfaces specially since we don't want to
906 * count interface prerequsites like normal inheritance;
907 * the property comes from the direct inheritance from
908 * the prerequisite class, not from the interface that
911 * also 'depth' isn't a meaningful concept for interface
915 pool_depth_list_for_interface (gpointer key,
919 GParamSpec *pspec = value;
920 gpointer *data = user_data;
921 GSList **slists = data[0];
922 GType owner_type = (GType) data[1];
924 if (pspec->owner_type == owner_type)
925 slists[0] = g_slist_prepend (slists[0], pspec);
928 GParamSpec** /* free result */
929 g_param_spec_pool_list (GParamSpecPool *pool,
933 GParamSpec **pspecs, **p;
934 GSList **slists, *node;
938 g_return_val_if_fail (pool != NULL, NULL);
939 g_return_val_if_fail (owner_type > 0, NULL);
940 g_return_val_if_fail (n_pspecs_p != NULL, NULL);
942 G_SLOCK (&pool->smutex);
944 d = g_type_depth (owner_type);
945 slists = g_new0 (GSList*, d);
947 data[1] = (gpointer) owner_type;
949 g_hash_table_foreach (pool->hash_table,
950 G_TYPE_IS_INTERFACE (owner_type) ?
951 pool_depth_list_for_interface :
955 for (i = 0; i < d; i++)
956 slists[i] = pspec_list_remove_overridden_and_redirected (slists[i], pool->hash_table, owner_type, n_pspecs_p);
957 pspecs = g_new (GParamSpec*, *n_pspecs_p + 1);
959 for (i = 0; i < d; i++)
961 slists[i] = g_slist_sort (slists[i], pspec_compare_id);
962 for (node = slists[i]; node; node = node->next)
964 g_slist_free (slists[i]);
968 G_SUNLOCK (&pool->smutex);
974 /* --- auxillary functions --- */
979 void (*finalize) (GParamSpec *pspec);
980 void (*value_set_default) (GParamSpec *pspec,
982 gboolean (*value_validate) (GParamSpec *pspec,
984 gint (*values_cmp) (GParamSpec *pspec,
985 const GValue *value1,
986 const GValue *value2);
987 } ParamSpecClassInfo;
990 param_spec_generic_class_init (gpointer g_class,
993 GParamSpecClass *class = g_class;
994 ParamSpecClassInfo *info = class_data;
996 class->value_type = info->value_type;
998 class->finalize = info->finalize; /* optional */
999 class->value_set_default = info->value_set_default;
1000 if (info->value_validate)
1001 class->value_validate = info->value_validate; /* optional */
1002 class->values_cmp = info->values_cmp;
1003 g_free (class_data);
1007 default_value_set_default (GParamSpec *pspec,
1010 /* value is already zero initialized */
1014 default_values_cmp (GParamSpec *pspec,
1015 const GValue *value1,
1016 const GValue *value2)
1018 return memcmp (&value1->data, &value2->data, sizeof (value1->data));
1022 g_param_type_register_static (const gchar *name,
1023 const GParamSpecTypeInfo *pspec_info)
1026 sizeof (GParamSpecClass), /* class_size */
1027 NULL, /* base_init */
1028 NULL, /* base_destroy */
1029 param_spec_generic_class_init, /* class_init */
1030 NULL, /* class_destroy */
1031 NULL, /* class_data */
1032 0, /* instance_size */
1033 16, /* n_preallocs */
1034 NULL, /* instance_init */
1036 ParamSpecClassInfo *cinfo;
1038 g_return_val_if_fail (name != NULL, 0);
1039 g_return_val_if_fail (pspec_info != NULL, 0);
1040 g_return_val_if_fail (g_type_from_name (name) == 0, 0);
1041 g_return_val_if_fail (pspec_info->instance_size >= sizeof (GParamSpec), 0);
1042 g_return_val_if_fail (g_type_name (pspec_info->value_type) != NULL, 0);
1043 /* default: g_return_val_if_fail (pspec_info->value_set_default != NULL, 0); */
1044 /* optional: g_return_val_if_fail (pspec_info->value_validate != NULL, 0); */
1045 /* default: g_return_val_if_fail (pspec_info->values_cmp != NULL, 0); */
1047 info.instance_size = pspec_info->instance_size;
1048 info.n_preallocs = pspec_info->n_preallocs;
1049 info.instance_init = (GInstanceInitFunc) pspec_info->instance_init;
1050 cinfo = g_new (ParamSpecClassInfo, 1);
1051 cinfo->value_type = pspec_info->value_type;
1052 cinfo->finalize = pspec_info->finalize;
1053 cinfo->value_set_default = pspec_info->value_set_default ? pspec_info->value_set_default : default_value_set_default;
1054 cinfo->value_validate = pspec_info->value_validate;
1055 cinfo->values_cmp = pspec_info->values_cmp ? pspec_info->values_cmp : default_values_cmp;
1056 info.class_data = cinfo;
1058 return g_type_register_static (G_TYPE_PARAM, name, &info, 0);
1062 g_value_set_param (GValue *value,
1065 g_return_if_fail (G_VALUE_HOLDS_PARAM (value));
1067 g_return_if_fail (G_IS_PARAM_SPEC (param));
1069 if (value->data[0].v_pointer)
1070 g_param_spec_unref (value->data[0].v_pointer);
1071 value->data[0].v_pointer = param;
1072 if (value->data[0].v_pointer)
1073 g_param_spec_ref (value->data[0].v_pointer);
1077 g_value_set_param_take_ownership (GValue *value,
1080 g_value_take_param (value, param);
1084 g_value_take_param (GValue *value,
1087 g_return_if_fail (G_VALUE_HOLDS_PARAM (value));
1089 g_return_if_fail (G_IS_PARAM_SPEC (param));
1091 if (value->data[0].v_pointer)
1092 g_param_spec_unref (value->data[0].v_pointer);
1093 value->data[0].v_pointer = param; /* we take over the reference count */
1097 g_value_get_param (const GValue *value)
1099 g_return_val_if_fail (G_VALUE_HOLDS_PARAM (value), NULL);
1101 return value->data[0].v_pointer;
1105 g_value_dup_param (const GValue *value)
1107 g_return_val_if_fail (G_VALUE_HOLDS_PARAM (value), NULL);
1109 return value->data[0].v_pointer ? g_param_spec_ref (value->data[0].v_pointer) : NULL;