1 /* GObject - GLib Type, Object, Parameter and Signal Library
2 * Copyright (C) 1997, 1998, 1999, 2000 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 /* --- typedefs & structures --- */
35 /* --- variables --- */
36 static GHashTable *param_exchange_ht = NULL;
39 /* --- functions --- */
41 g_value_init (GValue *value,
44 GTypeValueTable *value_table = g_type_value_table_peek (g_type);
46 g_return_if_fail (value != NULL);
47 g_return_if_fail (G_VALUE_TYPE (value) == 0);
51 memset (value, 0, sizeof (*value));
52 value->g_type = g_type;
53 value_table->value_init (value);
56 g_warning (G_STRLOC ": cannot initialize value of type `%s' which has no GTypeValueTable",
57 g_type_name (g_type));
61 g_value_copy (const GValue *src_value,
64 GTypeValueTable *value_table = g_type_value_table_peek (G_VALUE_TYPE (dest_value));
66 g_return_if_fail (G_IS_VALUE (src_value));
67 g_return_if_fail (G_IS_VALUE (dest_value));
68 g_return_if_fail (g_type_is_a (G_VALUE_TYPE (src_value), G_VALUE_TYPE (dest_value)));
70 g_return_if_fail (g_type_value_table_peek (G_VALUE_TYPE (dest_value)) != NULL);
72 if (src_value != dest_value)
74 /* make sure dest_value's value is free()d and zero initialized */
75 g_value_reset (dest_value);
77 value_table->value_copy (src_value, dest_value);
82 g_value_unset (GValue *value)
84 GTypeValueTable *value_table = g_type_value_table_peek (G_VALUE_TYPE (value));
86 g_return_if_fail (G_IS_VALUE (value));
88 g_return_if_fail (g_type_value_table_peek (G_VALUE_TYPE (value)) != NULL);
90 if (value_table->value_free)
91 value_table->value_free (value);
92 memset (value, 0, sizeof (*value));
96 g_value_reset (GValue *value)
98 GTypeValueTable *value_table = g_type_value_table_peek (G_VALUE_TYPE (value));
101 g_return_if_fail (G_IS_VALUE (value));
103 g_type = G_VALUE_TYPE (value);
105 if (value_table->value_free)
106 value_table->value_free (value);
107 memset (value, 0, sizeof (*value));
109 value->g_type = g_type;
110 value_table->value_init (value);
114 exchange_entries_equal (gconstpointer v1,
117 const ExchangeEntry *entry1 = v1;
118 const ExchangeEntry *entry2 = v2;
120 return (entry1->value_type1 == entry2->value_type1 &&
121 entry1->value_type2 == entry2->value_type2);
125 exchange_entry_hash (gconstpointer key)
127 const ExchangeEntry *entry = key;
129 return entry->value_type1 ^ entry->value_type2;
133 value_exchange_memcpy (GValue *value1,
138 memcpy (&tmp_value.data, &value1->data, sizeof (value1->data));
139 memcpy (&value1->data, &value2->data, sizeof (value1->data));
140 memcpy (&value2->data, &tmp_value.data, sizeof (value2->data));
143 static inline GValueExchange
144 exchange_func_lookup (GType value_type1,
148 if (value_type1 == value_type2)
149 return value_exchange_memcpy;
152 GType type1 = value_type1;
156 GType type2 = value_type2;
160 ExchangeEntry entry, *ret;
162 entry.value_type1 = MIN (type1, type2);
163 entry.value_type2 = MAX (type1, type2);
164 ret = g_hash_table_lookup (param_exchange_ht, &entry);
168 *need_swap = ret->first_type == type2;
173 type2 = g_type_parent (type2);
177 type1 = g_type_parent (type1);
186 g_value_register_exchange_func (GType value_type1,
192 g_return_if_fail (G_TYPE_IS_VALUE (value_type1));
193 g_return_if_fail (G_TYPE_IS_VALUE (value_type2));
194 g_return_if_fail (func != NULL);
196 entry.value_type1 = MIN (value_type1, value_type2);
197 entry.value_type2 = MAX (value_type1, value_type2);
198 if (param_exchange_ht && g_hash_table_lookup (param_exchange_ht, &entry))
199 g_warning (G_STRLOC ": cannot re-register param value exchange function "
201 g_type_name (value_type1),
202 g_type_name (value_type2));
205 ExchangeEntry *entry = g_new (ExchangeEntry, 1);
207 if (!param_exchange_ht)
208 param_exchange_ht = g_hash_table_new (exchange_entry_hash, exchange_entries_equal);
209 entry->value_type1 = MIN (value_type1, value_type2);
210 entry->value_type2 = MAX (value_type1, value_type2);
212 entry->first_type = value_type1;
213 g_hash_table_insert (param_exchange_ht, entry, entry);
218 g_value_types_exchangable (GType value_type1,
221 g_return_val_if_fail (G_TYPE_IS_VALUE (value_type1), FALSE);
222 g_return_val_if_fail (G_TYPE_IS_VALUE (value_type2), FALSE);
224 return exchange_func_lookup (value_type1, value_type2, NULL) != NULL;
228 g_values_exchange (GValue *value1,
231 g_return_val_if_fail (G_IS_VALUE (value1), FALSE);
232 g_return_val_if_fail (G_IS_VALUE (value2), FALSE);
234 if (value1 != value2)
237 GValueExchange value_exchange = exchange_func_lookup (G_VALUE_TYPE (value1),
238 G_VALUE_TYPE (value2),
243 value_exchange (value2, value1);
245 value_exchange (value1, value2);
248 return value_exchange != NULL;
255 g_value_convert (const GValue *src_value,
258 gboolean success = TRUE;
260 g_return_val_if_fail (G_IS_VALUE (src_value), FALSE);
261 g_return_val_if_fail (G_IS_VALUE (dest_value), FALSE);
263 if (src_value != dest_value)
265 GValue tmp_value = { 0, };
267 g_value_init (&tmp_value, G_VALUE_TYPE (src_value));
268 g_value_copy (src_value, &tmp_value);
270 success = g_values_exchange (&tmp_value, dest_value);
271 g_value_unset (&tmp_value);