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.
19 * gvaluecollector.h: GValue varargs stubs
21 #ifndef __G_VALUE_COLLECTOR_H__
22 #define __G_VALUE_COLLECTOR_H__
24 #include <glib-object.h>
28 /* we may want to add aggregate types here some day, if requested
29 * by users. the basic C types are covered already, everything
30 * smaller than an int is promoted to an integer and floats are
31 * always promoted to doubles for varargs call constructions.
35 G_VALUE_COLLECT_INT = 'i',
36 G_VALUE_COLLECT_LONG = 'l',
37 G_VALUE_COLLECT_INT64 = 'q',
38 G_VALUE_COLLECT_DOUBLE = 'd',
39 G_VALUE_COLLECT_POINTER = 'p'
43 /* vararg union holding actuall values collected
55 /* G_VALUE_COLLECT() collects a variable argument value
56 * from a va_list. we have to implement the varargs collection as a
57 * macro, because on some systems va_list variables cannot be passed
59 * value is supposed to be initialized according to the value
60 * type to be collected.
61 * var_args is the va_list variable and may be evaluated multiple times.
62 * __error is a gchar** variable that will be modified to hold a g_new()
63 * allocated error messages if something fails.
65 #define G_VALUE_COLLECT(value, var_args, flags, __error) \
67 GValue *_value = (value); \
68 guint _flags = (flags); \
69 GType _value_type = G_VALUE_TYPE (_value); \
70 GTypeValueTable *_vtable = g_type_value_table_peek (_value_type); \
71 gchar *_collect_format = _vtable->collect_format; \
72 GTypeCValue _cvalues[G_VALUE_COLLECT_FORMAT_MAX_LENGTH] = { { 0, }, }; \
73 guint _n_values = 0; \
75 if (_vtable->value_free) \
76 _vtable->value_free (_value); \
77 _value->g_type = _value_type; /* value_meminit() from gvalue.c */ \
78 memset (_value->data, 0, sizeof (_value->data)); \
79 while (*_collect_format) \
81 GTypeCValue *_cvalue = _cvalues + _n_values++; \
83 switch (*_collect_format++) \
85 case G_VALUE_COLLECT_INT: \
86 _cvalue->v_int = va_arg ((var_args), gint); \
88 case G_VALUE_COLLECT_LONG: \
89 _cvalue->v_long = va_arg ((var_args), glong); \
91 case G_VALUE_COLLECT_INT64: \
92 _cvalue->v_int64 = va_arg ((var_args), gint64); \
94 case G_VALUE_COLLECT_DOUBLE: \
95 _cvalue->v_double = va_arg ((var_args), gdouble); \
97 case G_VALUE_COLLECT_POINTER: \
98 _cvalue->v_pointer = va_arg ((var_args), gpointer); \
101 g_assert_not_reached (); \
104 *(__error) = _vtable->collect_value (_value, \
111 /* G_VALUE_LCOPY() collects a value's variable argument
112 * locations from a va_list. usage is analogous to G_VALUE_COLLECT().
114 #define G_VALUE_LCOPY(value, var_args, flags, __error) \
116 const GValue *_value = (value); \
117 guint _flags = (flags); \
118 GType _value_type = G_VALUE_TYPE (_value); \
119 GTypeValueTable *_vtable = g_type_value_table_peek (_value_type); \
120 gchar *_lcopy_format = _vtable->lcopy_format; \
121 GTypeCValue _cvalues[G_VALUE_COLLECT_FORMAT_MAX_LENGTH] = { { 0, }, }; \
122 guint _n_values = 0; \
124 while (*_lcopy_format) \
126 GTypeCValue *_cvalue = _cvalues + _n_values++; \
128 switch (*_lcopy_format++) \
130 case G_VALUE_COLLECT_INT: \
131 _cvalue->v_int = va_arg ((var_args), gint); \
133 case G_VALUE_COLLECT_LONG: \
134 _cvalue->v_long = va_arg ((var_args), glong); \
136 case G_VALUE_COLLECT_INT64: \
137 _cvalue->v_int64 = va_arg ((var_args), gint64); \
139 case G_VALUE_COLLECT_DOUBLE: \
140 _cvalue->v_double = va_arg ((var_args), gdouble); \
142 case G_VALUE_COLLECT_POINTER: \
143 _cvalue->v_pointer = va_arg ((var_args), gpointer); \
146 g_assert_not_reached (); \
149 *(__error) = _vtable->lcopy_value (_value, \
156 #define G_VALUE_COLLECT_FORMAT_MAX_LENGTH (8)
160 #endif /* __G_VALUE_COLLECTOR_H__ */