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.
319 lines
8.1 KiB
C
319 lines
8.1 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 "gparam.h"
|
|
|
|
|
|
#include <string.h>
|
|
|
|
|
|
|
|
/* --- defines --- */
|
|
#define G_PARAM_SPEC_CLASS(class) (G_TYPE_CHECK_CLASS_CAST ((class), G_TYPE_PARAM, GParamSpecClass))
|
|
|
|
|
|
/* --- prototypes --- */
|
|
extern void g_param_types_init (void);
|
|
extern void g_param_spec_types_init (void); /* sync with glib-gparamspecs.c */
|
|
static void g_param_spec_class_base_init (GParamSpecClass *class);
|
|
static void g_param_spec_class_base_finalize (GParamSpecClass *class);
|
|
static void g_param_spec_class_init (GParamSpecClass *class,
|
|
gpointer class_data);
|
|
static void g_param_spec_init (GParamSpec *pspec);
|
|
static void g_param_spec_finalize (GParamSpec *pspec);
|
|
|
|
|
|
/* --- functions --- */
|
|
void
|
|
g_param_types_init (void) /* sync with glib-gtype.c */
|
|
{
|
|
static const GTypeFundamentalInfo finfo = {
|
|
(G_TYPE_FLAG_CLASSED |
|
|
G_TYPE_FLAG_INSTANTIATABLE |
|
|
G_TYPE_FLAG_DERIVABLE |
|
|
G_TYPE_FLAG_DEEP_DERIVABLE),
|
|
0 /* n_collect_bytes */,
|
|
NULL /* GTypeParamCollector */,
|
|
};
|
|
static const GTypeInfo param_spec_info = {
|
|
sizeof (GParamSpecClass),
|
|
|
|
(GBaseInitFunc) g_param_spec_class_base_init,
|
|
(GBaseFinalizeFunc) g_param_spec_class_base_finalize,
|
|
(GClassInitFunc) g_param_spec_class_init,
|
|
(GClassFinalizeFunc) NULL,
|
|
NULL /* class_data */,
|
|
|
|
sizeof (GParamSpec),
|
|
0 /* n_preallocs */,
|
|
(GInstanceInitFunc) g_param_spec_init,
|
|
};
|
|
GType type;
|
|
|
|
type = g_type_register_fundamental (G_TYPE_PARAM, "GParam", &finfo, ¶m_spec_info);
|
|
g_assert (type == G_TYPE_PARAM);
|
|
|
|
/* derived param specs
|
|
*/
|
|
g_param_spec_types_init ();
|
|
}
|
|
|
|
static void
|
|
g_param_spec_class_base_init (GParamSpecClass *class)
|
|
{
|
|
}
|
|
|
|
static void
|
|
g_param_spec_class_base_finalize (GParamSpecClass *class)
|
|
{
|
|
}
|
|
|
|
static void
|
|
g_param_spec_class_init (GParamSpecClass *class,
|
|
gpointer class_data)
|
|
{
|
|
class->finalize = g_param_spec_finalize;
|
|
class->param_init = NULL;
|
|
class->param_free_value = NULL;
|
|
class->param_validate = NULL;
|
|
class->param_values_cmp = NULL;
|
|
class->param_copy_value = NULL;
|
|
class->collect_type = 0;
|
|
class->param_collect_value = NULL;
|
|
class->lcopy_type = 0;
|
|
class->param_lcopy_value = NULL;
|
|
}
|
|
|
|
static void
|
|
g_param_spec_init (GParamSpec *pspec)
|
|
{
|
|
pspec->name = NULL;
|
|
pspec->nick = NULL;
|
|
pspec->blurb = NULL;
|
|
pspec->flags = 0;
|
|
pspec->owner_type = 0;
|
|
pspec->qdata = NULL;
|
|
pspec->ref_count = 1;
|
|
}
|
|
|
|
static void
|
|
g_param_spec_finalize (GParamSpec *pspec)
|
|
{
|
|
g_datalist_clear (&pspec->qdata);
|
|
|
|
g_free (pspec->name);
|
|
g_free (pspec->nick);
|
|
g_free (pspec->blurb);
|
|
|
|
g_type_free_instance ((GTypeInstance*) pspec);
|
|
}
|
|
|
|
GParamSpec*
|
|
g_param_spec_ref (GParamSpec *pspec)
|
|
{
|
|
g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), NULL);
|
|
g_return_val_if_fail (pspec->ref_count > 0, NULL);
|
|
|
|
pspec->ref_count += 1;
|
|
|
|
return pspec;
|
|
}
|
|
|
|
void
|
|
g_param_spec_unref (GParamSpec *pspec)
|
|
{
|
|
g_return_if_fail (G_IS_PARAM_SPEC (pspec));
|
|
g_return_if_fail (pspec->ref_count > 0);
|
|
|
|
pspec->ref_count -= 1;
|
|
if (pspec->ref_count == 0)
|
|
G_PARAM_SPEC_GET_CLASS (pspec)->finalize (pspec);
|
|
}
|
|
|
|
gpointer
|
|
g_param_spec_internal (GType param_type,
|
|
const gchar *name,
|
|
const gchar *nick,
|
|
const gchar *blurb,
|
|
GParamFlags flags)
|
|
{
|
|
GParamSpec *pspec;
|
|
|
|
g_return_val_if_fail (G_TYPE_IS_PARAM (param_type) && param_type != G_TYPE_PARAM, NULL);
|
|
g_return_val_if_fail (name != NULL, NULL);
|
|
|
|
pspec = (gpointer) g_type_create_instance (param_type);
|
|
pspec->name = g_strdup (name);
|
|
g_strcanon (pspec->name, G_CSET_A_2_Z G_CSET_a_2_z G_CSET_DIGITS "-", '-');
|
|
pspec->nick = g_strdup (nick ? nick : pspec->name);
|
|
pspec->blurb = g_strdup (blurb);
|
|
pspec->flags = (flags & G_PARAM_USER_MASK) | (flags & G_PARAM_MASK);
|
|
|
|
return pspec;
|
|
}
|
|
|
|
gpointer
|
|
g_param_spec_get_qdata (GParamSpec *pspec,
|
|
GQuark quark)
|
|
{
|
|
g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), NULL);
|
|
|
|
return quark ? g_datalist_id_get_data (&pspec->qdata, quark) : NULL;
|
|
}
|
|
|
|
void
|
|
g_param_spec_set_qdata (GParamSpec *pspec,
|
|
GQuark quark,
|
|
gpointer data)
|
|
{
|
|
g_return_if_fail (G_IS_PARAM_SPEC (pspec));
|
|
g_return_if_fail (quark > 0);
|
|
|
|
g_datalist_id_set_data (&pspec->qdata, quark, data);
|
|
}
|
|
|
|
void
|
|
g_param_spec_set_qdata_full (GParamSpec *pspec,
|
|
GQuark quark,
|
|
gpointer data,
|
|
GDestroyNotify destroy)
|
|
{
|
|
g_return_if_fail (G_IS_PARAM_SPEC (pspec));
|
|
g_return_if_fail (quark > 0);
|
|
|
|
g_datalist_id_set_data_full (&pspec->qdata, quark, data, data ? destroy : NULL);
|
|
}
|
|
|
|
gpointer
|
|
g_param_spec_steal_qdata (GParamSpec *pspec,
|
|
GQuark quark)
|
|
{
|
|
g_return_val_if_fail (G_IS_PARAM_SPEC (pspec), NULL);
|
|
g_return_val_if_fail (quark > 0, NULL);
|
|
|
|
return g_datalist_id_remove_no_notify (&pspec->qdata, quark);
|
|
}
|
|
|
|
static guint
|
|
param_spec_hash (gconstpointer key_spec)
|
|
{
|
|
const GParamSpec *key = key_spec;
|
|
const gchar *p;
|
|
guint h = key->owner_type;
|
|
|
|
for (p = key->name; *p; p++)
|
|
h = (h << 5) - h + *p;
|
|
|
|
return h;
|
|
}
|
|
|
|
static gint
|
|
param_spec_equals (gconstpointer key_spec_1,
|
|
gconstpointer key_spec_2)
|
|
{
|
|
const GParamSpec *key1 = key_spec_1;
|
|
const GParamSpec *key2 = key_spec_2;
|
|
|
|
return (key1->owner_type == key2->owner_type &&
|
|
strcmp (key1->name, key2->name) == 0);
|
|
}
|
|
|
|
GHashTable*
|
|
g_param_spec_hash_table_new (void)
|
|
{
|
|
return g_hash_table_new (param_spec_hash, param_spec_equals);
|
|
}
|
|
|
|
void
|
|
g_param_spec_hash_table_insert (GHashTable *hash_table,
|
|
GParamSpec *pspec,
|
|
GType owner_type)
|
|
{
|
|
g_return_if_fail (hash_table != NULL);
|
|
g_return_if_fail (G_IS_PARAM_SPEC (pspec));
|
|
g_return_if_fail (pspec->name != NULL);
|
|
if (pspec->owner_type != owner_type)
|
|
g_return_if_fail (pspec->owner_type == 0);
|
|
|
|
if (strchr (pspec->name, ':'))
|
|
g_warning (G_STRLOC ": parameter name `%s' contains field-delimeter",
|
|
pspec->name);
|
|
else
|
|
{
|
|
pspec->owner_type = owner_type;
|
|
g_hash_table_insert (hash_table, pspec, pspec);
|
|
}
|
|
}
|
|
|
|
void
|
|
g_param_spec_hash_table_remove (GHashTable *hash_table,
|
|
GParamSpec *pspec)
|
|
{
|
|
g_return_if_fail (hash_table != NULL);
|
|
g_return_if_fail (G_IS_PARAM_SPEC (pspec));
|
|
|
|
g_assert (g_param_spec_hash_table_lookup (hash_table, pspec->name, pspec->owner_type, FALSE, NULL) != NULL); // FIXME: paranoid
|
|
|
|
g_hash_table_remove (hash_table, pspec);
|
|
g_assert (g_param_spec_hash_table_lookup (hash_table, pspec->name, pspec->owner_type, FALSE, NULL) == NULL); // FIXME: paranoid
|
|
pspec->owner_type = 0;
|
|
}
|
|
|
|
GParamSpec*
|
|
g_param_spec_hash_table_lookup (GHashTable *hash_table,
|
|
const gchar *param_name,
|
|
GType owner_type,
|
|
gboolean try_ancestors,
|
|
const gchar **trailer)
|
|
{
|
|
GParamSpec *pspec;
|
|
GParamSpec key;
|
|
gchar *delim;
|
|
|
|
g_return_val_if_fail (hash_table != NULL, NULL);
|
|
g_return_val_if_fail (param_name != NULL, NULL);
|
|
|
|
key.owner_type = owner_type;
|
|
delim = strchr (param_name, ':');
|
|
if (delim)
|
|
key.name = g_strndup (param_name, delim - param_name);
|
|
else
|
|
key.name = g_strdup (param_name);
|
|
g_strcanon (key.name, G_CSET_A_2_Z G_CSET_a_2_z G_CSET_DIGITS "-", '-');
|
|
|
|
if (trailer)
|
|
*trailer = delim;
|
|
|
|
pspec = g_hash_table_lookup (hash_table, &key);
|
|
if (!pspec && try_ancestors)
|
|
{
|
|
key.owner_type = g_type_parent (key.owner_type);
|
|
while (key.owner_type)
|
|
{
|
|
pspec = g_hash_table_lookup (hash_table, &key);
|
|
if (pspec)
|
|
break;
|
|
key.owner_type = g_type_parent (key.owner_type);
|
|
}
|
|
}
|
|
|
|
g_free (key.name);
|
|
|
|
return pspec;
|
|
}
|