static void
arguments_free(GArray *in_args, GArray *out_args, GPtrArray *args_metadata)
{
guint i;
for (i = 0; i < args_metadata->len; i++) {
RBGIArgMetadata *metadata;
gint in_arg_index;
metadata = g_ptr_array_index(args_metadata, i);
if (metadata->direction == GI_DIRECTION_IN ||
metadata->direction == GI_DIRECTION_INOUT) {
in_arg_index = metadata->in_arg_index;
if (in_arg_index != -1) {
GIArgument *argument;
argument = &(g_array_index(in_args, GIArgument, in_arg_index));
rb_gi_in_argument_free(argument, &(metadata->arg_info));
}
} else {
GIArgument *argument;
argument = &(g_array_index(out_args, GIArgument,
metadata->out_arg_index));
rb_gi_out_argument_fin(argument, &(metadata->arg_info));
}
}
g_array_unref(in_args);
g_array_unref(out_args);
g_ptr_array_unref(args_metadata);
}
void
rb_gi_call_argument_free(GIArgument *argument, GIArgInfo *arg_info)
{
GITypeInfo type_info;
g_arg_info_load_type(arg_info, &type_info);
if (g_arg_info_get_direction(arg_info) == GI_DIRECTION_INOUT) {
rb_gi_inout_argument_free(argument, &type_info);
} else {
rb_gi_in_argument_free(argument, &type_info);
}
}
static void
rb_gi_inout_argument_free(GIArgument *argument, GITypeInfo *type_info)
{
GIArgument in_argument;
GITypeTag type_tag;
memset(&in_argument, 0, sizeof(GIArgument));
type_tag = g_type_info_get_tag(type_info);
switch (type_tag) {
case GI_TYPE_TAG_VOID:
break;
case GI_TYPE_TAG_BOOLEAN:
in_argument.v_boolean = *((gboolean *)(argument->v_pointer));
break;
case GI_TYPE_TAG_INT8:
in_argument.v_int8 = *((gint8 *)(argument->v_pointer));
break;
case GI_TYPE_TAG_UINT8:
/* TODO!!! */
in_argument.v_uint8 = *((guint8 *)(argument->v_pointer));
argument->v_pointer = ALLOC(guint8);
*((guint8 *)argument->v_pointer) = in_argument.v_uint8;
break;
case GI_TYPE_TAG_INT16:
in_argument.v_int16 = *((gint16 *)(argument->v_pointer));
argument->v_pointer = ALLOC(gint16);
*((gint16 *)argument->v_pointer) = in_argument.v_int16;
break;
case GI_TYPE_TAG_UINT16:
in_argument.v_uint16 = *((guint16 *)(argument->v_pointer));
argument->v_pointer = ALLOC(guint16);
*((guint16 *)argument->v_pointer) = in_argument.v_uint16;
break;
case GI_TYPE_TAG_INT32:
in_argument.v_int32 = *((gint32 *)(argument->v_pointer));
argument->v_pointer = ALLOC(gint32);
*((gint32 *)argument->v_pointer) = in_argument.v_int32;
break;
case GI_TYPE_TAG_UINT32:
in_argument.v_uint32 = *((guint32 *)(argument->v_pointer));
argument->v_pointer = ALLOC(guint32);
*((guint32 *)argument->v_pointer) = in_argument.v_uint32;
break;
case GI_TYPE_TAG_INT64:
in_argument.v_int64 = *((gint64 *)(argument->v_pointer));
argument->v_pointer = ALLOC(gint64);
*((gint64 *)argument->v_pointer) = in_argument.v_int64;
break;
case GI_TYPE_TAG_UINT64:
in_argument.v_uint64 = *((guint64 *)(argument->v_pointer));
argument->v_pointer = ALLOC(guint64);
*((guint64 *)argument->v_pointer) = in_argument.v_uint64;
break;
case GI_TYPE_TAG_FLOAT:
in_argument.v_float = *((gfloat *)(argument->v_pointer));
argument->v_pointer = ALLOC(gfloat);
*((gfloat *)argument->v_pointer) = in_argument.v_float;
break;
case GI_TYPE_TAG_DOUBLE:
in_argument.v_double = *((gdouble *)(argument->v_pointer));
argument->v_pointer = ALLOC(gdouble);
*((gdouble *)argument->v_pointer) = in_argument.v_double;
break;
case GI_TYPE_TAG_GTYPE:
in_argument.v_size = *((gsize *)(argument->v_pointer));
break;
case GI_TYPE_TAG_UTF8:
case GI_TYPE_TAG_FILENAME:
in_argument.v_string = *((gchar **)(argument->v_pointer));
break;
case GI_TYPE_TAG_ARRAY:
case GI_TYPE_TAG_INTERFACE:
case GI_TYPE_TAG_GLIST:
case GI_TYPE_TAG_GSLIST:
case GI_TYPE_TAG_GHASH:
in_argument.v_pointer = *((gpointer *)(argument->v_pointer));
break;
case GI_TYPE_TAG_ERROR:
in_argument.v_pointer = *((GError **)(argument->v_pointer));
break;
case GI_TYPE_TAG_UNICHAR:
in_argument.v_uint32 = *((gunichar *)(argument->v_pointer));
break;
default:
g_assert_not_reached();
break;
}
rb_gi_in_argument_free(&in_argument, type_info);
xfree(argument->v_pointer);
}
