1
/* GObject introspection: Union implementation
3
* Copyright (C) 2005 Matthias Clasen
4
* Copyright (C) 2008,2009 Red Hat, Inc.
6
* This library is free software; you can redistribute it and/or
7
* modify it under the terms of the GNU Lesser General Public
8
* License as published by the Free Software Foundation; either
9
* version 2 of the License, or (at your option) any later version.
11
* This library is distributed in the hope that it will be useful,
12
* but WITHOUT ANY WARRANTY; without even the implied warranty of
13
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14
* Lesser General Public License for more details.
16
* You should have received a copy of the GNU Lesser General Public
17
* License along with this library; if not, write to the
18
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19
* Boston, MA 02111-1307, USA.
24
#include <girepository.h>
25
#include "girepository-private.h"
26
#include "gitypelib-internal.h"
29
g_union_info_get_n_fields (GIUnionInfo *info)
31
GIRealInfo *rinfo = (GIRealInfo *)info;
32
UnionBlob *blob = (UnionBlob *)&rinfo->typelib->data[rinfo->offset];
34
return blob->n_fields;
38
g_union_info_get_field (GIUnionInfo *info,
41
GIRealInfo *rinfo = (GIRealInfo *)info;
42
Header *header = (Header *)rinfo->typelib->data;
44
return (GIFieldInfo *) g_info_new (GI_INFO_TYPE_FIELD, (GIBaseInfo*)info, rinfo->typelib,
45
rinfo->offset + header->union_blob_size +
46
n * header->field_blob_size);
50
g_union_info_get_n_methods (GIUnionInfo *info)
52
GIRealInfo *rinfo = (GIRealInfo *)info;
53
UnionBlob *blob = (UnionBlob *)&rinfo->typelib->data[rinfo->offset];
55
return blob->n_functions;
59
g_union_info_get_method (GIUnionInfo *info,
62
GIRealInfo *rinfo = (GIRealInfo *)info;
63
UnionBlob *blob = (UnionBlob *)&rinfo->typelib->data[rinfo->offset];
64
Header *header = (Header *)rinfo->typelib->data;
67
offset = rinfo->offset + header->union_blob_size
68
+ blob->n_fields * header->field_blob_size
69
+ n * header->function_blob_size;
70
return (GIFunctionInfo *) g_info_new (GI_INFO_TYPE_FUNCTION, (GIBaseInfo*)info,
71
rinfo->typelib, offset);
75
g_union_info_is_discriminated (GIUnionInfo *info)
77
GIRealInfo *rinfo = (GIRealInfo *)info;
78
UnionBlob *blob = (UnionBlob *)&rinfo->typelib->data[rinfo->offset];
80
return blob->discriminated;
84
g_union_info_get_discriminator_offset (GIUnionInfo *info)
86
GIRealInfo *rinfo = (GIRealInfo *)info;
87
UnionBlob *blob = (UnionBlob *)&rinfo->typelib->data[rinfo->offset];
89
return blob->discriminator_offset;
93
g_union_info_get_discriminator_type (GIUnionInfo *info)
95
GIRealInfo *rinfo = (GIRealInfo *)info;
97
return _g_type_info_new ((GIBaseInfo*)info, rinfo->typelib, rinfo->offset + 24);
101
g_union_info_get_discriminator (GIUnionInfo *info,
104
GIRealInfo *rinfo = (GIRealInfo *)info;
105
UnionBlob *blob = (UnionBlob *)&rinfo->typelib->data[rinfo->offset];
107
if (blob->discriminated)
109
Header *header = (Header *)rinfo->typelib->data;
112
offset = rinfo->offset + header->union_blob_size
113
+ blob->n_fields * header->field_blob_size
114
+ blob->n_functions * header->function_blob_size
115
+ n * header->constant_blob_size;
117
return (GIConstantInfo *) g_info_new (GI_INFO_TYPE_CONSTANT, (GIBaseInfo*)info,
118
rinfo->typelib, offset);
125
g_union_info_find_method (GIUnionInfo *info,
129
GIRealInfo *rinfo = (GIRealInfo *)info;
130
Header *header = (Header *)rinfo->typelib->data;
131
UnionBlob *blob = (UnionBlob *)&rinfo->typelib->data[rinfo->offset];
133
offset = rinfo->offset + header->union_blob_size
134
+ blob->n_fields * header->field_blob_size;
136
return _g_base_info_find_method ((GIBaseInfo*)info, offset, blob->n_functions, name);
140
g_union_info_get_size (GIUnionInfo *info)
142
GIRealInfo *rinfo = (GIRealInfo *)info;
143
UnionBlob *blob = (UnionBlob *)&rinfo->typelib->data[rinfo->offset];
149
g_union_info_get_alignment (GIUnionInfo *info)
151
GIRealInfo *rinfo = (GIRealInfo *)info;
152
UnionBlob *blob = (UnionBlob *)&rinfo->typelib->data[rinfo->offset];
154
return blob->alignment;