mirror of
https://gitlab.gnome.org/GNOME/glib.git
synced 2024-12-25 15:06:14 +01:00
397ad5881e
Fri May 5 01:15:48 2000 Tim Janik <timj@gtk.org> * gtype.h: add reserved fundamental ids for gtk types (for transition time). added G_TYPE_FUNDAMENTAL_MAX for gtk. Mon Apr 17 20:45:50 2000 Tim Janik <timj@gtk.org> * glib-gobject.c (g_object_base_class_finalize): oops, don't unset n_params prior to destructing them. Tue Apr 11 04:28:10 2000 Tim Janik <timj@gtk.org> * fixed a couple of bugs in the initial parameter/object implementations, after getting beast running on GObject and GValue. Fri Apr 7 04:27:49 2000 Tim Janik <timj@gtk.org> * glib-gobject.[hc]: completed parameter set/get implementations, along with asyncronous parameter changed notification queue. Sun Apr 2 04:54:36 2000 Tim Janik <timj@gtk.org> * glib-gobject.[hc]: GObject implementation, that is facilities for setting/getting quarked data and reference counting. * glib-gparamspecs.[hc]: first actuall parameter implementations for GLib, so far we have: char, uchar, bool, int, uint, long, ulong, enum, flags, float, double, string and object. each of these GParamSpecs is a new instantiatable type in its own respect, so the .c file derives 13 new types from G_TYPE_PARAM and defines over 50 (*2) conversion facilities. * glib-gvaluecollector.h: generic varargs handling stubs for GParamSpecs, private header file (does get installed for inclusion into user code though). * glib-gvalue.[hc]: GValue functionality implementation. * glib-gparam.[hc]: basis GParamSpec implementation for the virtual base type G_TYPE_PARAM. * glib-genums.[hc]: enum/flags type implementation, based on bseenum.[hc]. * glib-extra.[hc]: GLib additions, including 1.3 compatibility routines and various other functions, from string manipulation over list manipulation up to a unix signal GSource. * glib-gtype.[hc]: GLib Type System implementation, heavily based on BSE's dynamic type system.
375 lines
9.8 KiB
C
375 lines
9.8 KiB
C
/* GObject - GLib Type, Object, Parameter and Signal Library
|
|
* Copyright (C) 1997, 1998, 1999, 2000 Tim Janik and Red Hat, Inc.
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General
|
|
* Public License along with this library; if not, write to the
|
|
* Free Software Foundation, Inc., 59 Temple Place, Suite 330,
|
|
* Boston, MA 02111-1307, USA.
|
|
*/
|
|
#include "gvalue.h"
|
|
|
|
|
|
/* --- defines --- */
|
|
#define G_PARAM_SPEC_CLASS(class) (G_TYPE_CHECK_CLASS_CAST ((class), G_TYPE_PARAM, GParamSpecClass))
|
|
|
|
|
|
/* --- typedefs & structures --- */
|
|
typedef struct
|
|
{
|
|
GType value_type1;
|
|
GType value_type2;
|
|
GValueExchange func;
|
|
GType first_type;
|
|
} ExchangeEntry;
|
|
|
|
|
|
/* --- variables --- */
|
|
static GHashTable *param_exchange_ht = NULL;
|
|
|
|
|
|
/* --- functions --- */
|
|
void
|
|
g_value_init (GValue *value,
|
|
GType g_type)
|
|
{
|
|
GParamSpecClass *pclass;
|
|
|
|
g_return_if_fail (value != NULL);
|
|
g_return_if_fail (G_VALUE_TYPE (value) == 0);
|
|
g_type = g_type_next_base (g_type, G_TYPE_PARAM);
|
|
g_return_if_fail (G_TYPE_IS_VALUE (g_type));
|
|
|
|
memset (value, 0, sizeof (*value));
|
|
value->g_type = g_type;
|
|
|
|
pclass = g_type_class_ref (G_VALUE_TYPE (value));
|
|
pclass->param_init (value, NULL);
|
|
g_type_class_unref (pclass);
|
|
}
|
|
|
|
void
|
|
g_value_init_default (GValue *value,
|
|
GParamSpec *pspec)
|
|
{
|
|
g_return_if_fail (value != NULL);
|
|
g_return_if_fail (G_VALUE_TYPE (value) == 0);
|
|
g_return_if_fail (G_IS_PARAM_SPEC (pspec));
|
|
|
|
memset (value, 0, sizeof (*value));
|
|
value->g_type = g_type_next_base (G_PARAM_SPEC_TYPE (pspec), G_TYPE_PARAM);
|
|
|
|
G_PARAM_SPEC_GET_CLASS (pspec)->param_init (value, pspec);
|
|
}
|
|
|
|
gboolean
|
|
g_value_validate (GValue *value,
|
|
GParamSpec *pspec)
|
|
{
|
|
g_return_val_if_fail (G_IS_VALUE (value), FALSE);
|
|
g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), FALSE);
|
|
g_return_val_if_fail (g_type_is_a (G_PARAM_SPEC_TYPE (pspec), G_VALUE_TYPE (value)), FALSE);
|
|
|
|
if (G_PARAM_SPEC_GET_CLASS (pspec)->param_validate)
|
|
{
|
|
GValue oval = *value;
|
|
|
|
if (G_PARAM_SPEC_GET_CLASS (pspec)->param_validate (value, pspec) ||
|
|
memcmp (&oval.data, &value->data, sizeof (oval.data)))
|
|
return TRUE;
|
|
}
|
|
return FALSE;
|
|
}
|
|
|
|
gboolean
|
|
g_value_defaults (const GValue *value,
|
|
GParamSpec *pspec)
|
|
{
|
|
GValue dflt_value = { 0, };
|
|
gboolean defaults;
|
|
|
|
g_return_val_if_fail (G_IS_VALUE (value), FALSE);
|
|
g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), FALSE);
|
|
g_return_val_if_fail (g_type_is_a (G_PARAM_SPEC_TYPE (pspec), G_VALUE_TYPE (value)), FALSE);
|
|
|
|
dflt_value.g_type = g_type_next_base (G_PARAM_SPEC_TYPE (pspec), G_TYPE_PARAM);
|
|
G_PARAM_SPEC_GET_CLASS (pspec)->param_init (&dflt_value, pspec);
|
|
defaults = g_values_cmp (value, &dflt_value, pspec) == 0;
|
|
g_value_unset (&dflt_value);
|
|
|
|
return defaults;
|
|
}
|
|
|
|
void
|
|
g_value_set_default (GValue *value,
|
|
GParamSpec *pspec)
|
|
{
|
|
GValue tmp_value = { 0, };
|
|
|
|
g_return_if_fail (G_IS_VALUE (value));
|
|
g_return_if_fail (G_IS_PARAM_SPEC (pspec));
|
|
g_return_if_fail (g_type_is_a (G_PARAM_SPEC_TYPE (pspec), G_VALUE_TYPE (value)));
|
|
|
|
/* retrive default value */
|
|
tmp_value.g_type = g_type_next_base (G_PARAM_SPEC_TYPE (pspec), G_TYPE_PARAM);
|
|
G_PARAM_SPEC_GET_CLASS (pspec)->param_init (&tmp_value, pspec);
|
|
|
|
/* set default value */
|
|
g_values_exchange (&tmp_value, value);
|
|
|
|
g_value_unset (&tmp_value);
|
|
}
|
|
|
|
gint
|
|
g_values_cmp (const GValue *value1,
|
|
const GValue *value2,
|
|
GParamSpec *pspec)
|
|
{
|
|
GParamSpecClass *pclass;
|
|
gint cmp;
|
|
|
|
/* param_values_cmp() effectively does: value1 - value2
|
|
* so the return values are:
|
|
* -1) value1 < value2
|
|
* 0) value1 == value2
|
|
* 1) value1 > value2
|
|
*/
|
|
g_return_val_if_fail (G_IS_VALUE (value1), 0);
|
|
g_return_val_if_fail (G_IS_VALUE (value2), 0);
|
|
g_return_val_if_fail (G_VALUE_TYPE (value1) == G_VALUE_TYPE (value2), 0);
|
|
if (pspec)
|
|
{
|
|
g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), 0);
|
|
g_return_val_if_fail (g_type_is_a (G_PARAM_SPEC_TYPE (pspec), G_VALUE_TYPE (value1)), FALSE);
|
|
}
|
|
|
|
pclass = g_type_class_ref (G_VALUE_TYPE (value1));
|
|
cmp = pclass->param_values_cmp (value1, value2, pspec);
|
|
g_type_class_unref (pclass);
|
|
|
|
return CLAMP (cmp, -1, 1);
|
|
}
|
|
|
|
void
|
|
g_value_copy (const GValue *src_value,
|
|
GValue *dest_value)
|
|
{
|
|
g_return_if_fail (G_IS_VALUE (src_value));
|
|
g_return_if_fail (G_IS_VALUE (dest_value));
|
|
g_return_if_fail (G_VALUE_TYPE (src_value) == G_VALUE_TYPE (dest_value));
|
|
|
|
if (src_value != dest_value)
|
|
{
|
|
GParamSpecClass *pclass = g_type_class_ref (G_VALUE_TYPE (src_value));
|
|
|
|
/* make sure dest_value's value is free()d and zero initialized */
|
|
g_value_reset (dest_value);
|
|
|
|
if (pclass->param_copy_value)
|
|
pclass->param_copy_value (src_value, dest_value);
|
|
else
|
|
memcpy (&dest_value->data, &src_value->data, sizeof (src_value->data));
|
|
g_type_class_unref (pclass);
|
|
}
|
|
}
|
|
|
|
void
|
|
g_value_unset (GValue *value)
|
|
{
|
|
GParamSpecClass *pclass;
|
|
|
|
g_return_if_fail (G_IS_VALUE (value));
|
|
|
|
pclass = g_type_class_ref (G_VALUE_TYPE (value));
|
|
if (pclass->param_free_value)
|
|
pclass->param_free_value (value);
|
|
memset (value, 0, sizeof (*value));
|
|
g_type_class_unref (pclass);
|
|
}
|
|
|
|
void
|
|
g_value_reset (GValue *value)
|
|
{
|
|
GParamSpecClass *pclass;
|
|
GType g_type;
|
|
|
|
g_return_if_fail (G_IS_VALUE (value));
|
|
|
|
g_type = G_VALUE_TYPE (value);
|
|
pclass = g_type_class_ref (g_type);
|
|
|
|
if (pclass->param_free_value)
|
|
pclass->param_free_value (value);
|
|
memset (value, 0, sizeof (*value));
|
|
|
|
value->g_type = g_type;
|
|
pclass->param_init (value, NULL);
|
|
|
|
g_type_class_unref (pclass);
|
|
}
|
|
|
|
static gint
|
|
exchange_entries_equal (gconstpointer v1,
|
|
gconstpointer v2)
|
|
{
|
|
const ExchangeEntry *entry1 = v1;
|
|
const ExchangeEntry *entry2 = v2;
|
|
|
|
return (entry1->value_type1 == entry2->value_type1 &&
|
|
entry1->value_type2 == entry2->value_type2);
|
|
}
|
|
|
|
static guint
|
|
exchange_entry_hash (gconstpointer key)
|
|
{
|
|
const ExchangeEntry *entry = key;
|
|
|
|
return entry->value_type1 ^ entry->value_type2;
|
|
}
|
|
|
|
static void
|
|
value_exchange_memcpy (GValue *value1,
|
|
GValue *value2)
|
|
{
|
|
GValue tmp_value;
|
|
|
|
memcpy (&tmp_value.data, &value1->data, sizeof (value1->data));
|
|
memcpy (&value1->data, &value2->data, sizeof (value1->data));
|
|
memcpy (&value2->data, &tmp_value.data, sizeof (value2->data));
|
|
}
|
|
|
|
static inline GValueExchange
|
|
exchange_func_lookup (GType value_type1,
|
|
GType value_type2,
|
|
gboolean *need_swap)
|
|
{
|
|
if (value_type1 == value_type2)
|
|
return value_exchange_memcpy;
|
|
else
|
|
{
|
|
ExchangeEntry entry, *ret;
|
|
|
|
entry.value_type1 = MIN (value_type1, value_type2);
|
|
entry.value_type2 = MAX (value_type1, value_type2);
|
|
|
|
ret = g_hash_table_lookup (param_exchange_ht, &entry);
|
|
if (ret)
|
|
{
|
|
if (need_swap)
|
|
*need_swap = ret->first_type == value_type1;
|
|
|
|
return ret->func;
|
|
}
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
void
|
|
g_value_register_exchange_func (GType value_type1,
|
|
GType value_type2,
|
|
GValueExchange func)
|
|
{
|
|
GType type1, type2;
|
|
|
|
g_return_if_fail (G_TYPE_IS_VALUE (value_type1));
|
|
g_return_if_fail (G_TYPE_IS_VALUE (value_type2));
|
|
g_return_if_fail (func != NULL);
|
|
|
|
type1 = g_type_next_base (value_type1, G_TYPE_PARAM);
|
|
type2 = g_type_next_base (value_type2, G_TYPE_PARAM);
|
|
|
|
if (param_exchange_ht && exchange_func_lookup (type1, type2, NULL))
|
|
g_warning (G_STRLOC ": cannot re-register param value exchange function "
|
|
"for `%s' and `%s'",
|
|
g_type_name (type1),
|
|
g_type_name (type2));
|
|
else
|
|
{
|
|
ExchangeEntry *entry = g_new (ExchangeEntry, 1);
|
|
|
|
if (!param_exchange_ht)
|
|
param_exchange_ht = g_hash_table_new (exchange_entry_hash, exchange_entries_equal);
|
|
entry->value_type1 = MIN (type1, type2);
|
|
entry->value_type2 = MAX (type1, type2);
|
|
entry->func = func;
|
|
entry->first_type = type1;
|
|
g_hash_table_insert (param_exchange_ht, entry, entry);
|
|
}
|
|
}
|
|
|
|
gboolean
|
|
g_value_types_exchangable (GType value_type1,
|
|
GType value_type2)
|
|
{
|
|
GType type1, type2;
|
|
|
|
g_return_val_if_fail (G_TYPE_IS_VALUE (value_type1), FALSE);
|
|
g_return_val_if_fail (G_TYPE_IS_VALUE (value_type2), FALSE);
|
|
|
|
type1 = g_type_next_base (value_type1, G_TYPE_PARAM);
|
|
type2 = g_type_next_base (value_type2, G_TYPE_PARAM);
|
|
|
|
return exchange_func_lookup (type1, type2, NULL) != NULL;
|
|
}
|
|
|
|
gboolean
|
|
g_values_exchange (GValue *value1,
|
|
GValue *value2)
|
|
{
|
|
g_return_val_if_fail (G_IS_VALUE (value1), FALSE);
|
|
g_return_val_if_fail (G_IS_VALUE (value2), FALSE);
|
|
|
|
if (value1 != value2)
|
|
{
|
|
GType type1 = g_type_next_base (G_VALUE_TYPE (value1), G_TYPE_PARAM);
|
|
GType type2 = g_type_next_base (G_VALUE_TYPE (value2), G_TYPE_PARAM);
|
|
gboolean need_swap;
|
|
GValueExchange value_exchange = exchange_func_lookup (type1,
|
|
type2,
|
|
&need_swap);
|
|
if (value_exchange)
|
|
{
|
|
if (need_swap)
|
|
value_exchange (value2, value1);
|
|
else
|
|
value_exchange (value1, value2);
|
|
}
|
|
|
|
return value_exchange != NULL;
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
gboolean
|
|
g_value_convert (const GValue *src_value,
|
|
GValue *dest_value)
|
|
{
|
|
gboolean success = TRUE;
|
|
|
|
g_return_val_if_fail (G_IS_VALUE (src_value), FALSE);
|
|
g_return_val_if_fail (G_IS_VALUE (dest_value), FALSE);
|
|
|
|
if (src_value != dest_value)
|
|
{
|
|
GValue tmp_value = { 0, };
|
|
|
|
g_value_init (&tmp_value, G_VALUE_TYPE (src_value));
|
|
g_value_copy (src_value, &tmp_value);
|
|
|
|
success = g_values_exchange (&tmp_value, dest_value);
|
|
g_value_unset (&tmp_value);
|
|
}
|
|
|
|
return success;
|
|
}
|