Fix missing header
[babeltrace.git] / types / struct.c
1 /*
2 * struct.c
3 *
4 * BabelTrace - Structure Type Converter
5 *
6 * Copyright 2010, 2011 - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
7 *
8 * Permission is hereby granted, free of charge, to any person obtaining a copy
9 * of this software and associated documentation files (the "Software"), to deal
10 * in the Software without restriction, including without limitation the rights
11 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
12 * copies of the Software, and to permit persons to whom the Software is
13 * furnished to do so, subject to the following conditions:
14 *
15 * The above copyright notice and this permission notice shall be included in
16 * all copies or substantial portions of the Software.
17 */
18
19 #include <babeltrace/compiler.h>
20 #include <babeltrace/format.h>
21
22 #ifndef max
23 #define max(a, b) ((a) < (b) ? (b) : (a))
24 #endif
25
26 static
27 struct definition *_struct_definition_new(struct declaration *declaration,
28 struct definition_scope *parent_scope,
29 GQuark field_name, int index);
30 static
31 void _struct_definition_free(struct definition *definition);
32
33 void struct_rw(struct stream_pos *ppos, struct definition *definition)
34 {
35 struct definition_struct *struct_definition =
36 container_of(definition, struct definition_struct, p);
37 unsigned long i;
38
39 for (i = 0; i < struct_definition->fields->len; i++) {
40 struct field *field = &g_array_index(struct_definition->fields,
41 struct field, i);
42 generic_rw(ppos, field->definition);
43 }
44 }
45
46 static
47 void _struct_declaration_free(struct declaration *declaration)
48 {
49 struct declaration_struct *struct_declaration =
50 container_of(declaration, struct declaration_struct, p);
51 unsigned long i;
52
53 free_declaration_scope(struct_declaration->scope);
54 g_hash_table_destroy(struct_declaration->fields_by_name);
55
56 for (i = 0; i < struct_declaration->fields->len; i++) {
57 struct declaration_field *declaration_field =
58 &g_array_index(struct_declaration->fields,
59 struct declaration_field, i);
60 declaration_unref(declaration_field->declaration);
61 }
62 g_array_free(struct_declaration->fields, true);
63 g_free(struct_declaration);
64 }
65
66 struct declaration_struct *
67 struct_declaration_new(struct declaration_scope *parent_scope)
68 {
69 struct declaration_struct *struct_declaration;
70 struct declaration *declaration;
71
72 struct_declaration = g_new(struct declaration_struct, 1);
73 declaration = &struct_declaration->p;
74 struct_declaration->fields_by_name = g_hash_table_new(g_direct_hash,
75 g_direct_equal);
76 struct_declaration->fields = g_array_sized_new(FALSE, TRUE,
77 sizeof(struct declaration_field),
78 DEFAULT_NR_STRUCT_FIELDS);
79 struct_declaration->scope = new_declaration_scope(parent_scope);
80 declaration->id = CTF_TYPE_STRUCT;
81 declaration->alignment = 1;
82 declaration->declaration_free = _struct_declaration_free;
83 declaration->definition_new = _struct_definition_new;
84 declaration->definition_free = _struct_definition_free;
85 declaration->ref = 1;
86 return struct_declaration;
87 }
88
89 static
90 struct definition *
91 _struct_definition_new(struct declaration *declaration,
92 struct definition_scope *parent_scope,
93 GQuark field_name, int index)
94 {
95 struct declaration_struct *struct_declaration =
96 container_of(declaration, struct declaration_struct, p);
97 struct definition_struct *_struct;
98 unsigned long i;
99 int ret;
100
101 _struct = g_new(struct definition_struct, 1);
102 declaration_ref(&struct_declaration->p);
103 _struct->p.declaration = declaration;
104 _struct->declaration = struct_declaration;
105 _struct->p.ref = 1;
106 _struct->p.index = index;
107 _struct->scope = new_definition_scope(parent_scope, field_name);
108 _struct->fields = g_array_sized_new(FALSE, TRUE,
109 sizeof(struct field),
110 DEFAULT_NR_STRUCT_FIELDS);
111 g_array_set_size(_struct->fields, struct_declaration->fields->len);
112 for (i = 0; i < struct_declaration->fields->len; i++) {
113 struct declaration_field *declaration_field =
114 &g_array_index(struct_declaration->fields,
115 struct declaration_field, i);
116 struct field *field = &g_array_index(_struct->fields,
117 struct field, i);
118
119 field->name = declaration_field->name;
120 field->definition =
121 declaration_field->declaration->definition_new(declaration_field->declaration,
122 _struct->scope,
123 field->name, i);
124 ret = register_field_definition(field->name,
125 field->definition,
126 _struct->scope);
127 assert(!ret);
128 }
129 return &_struct->p;
130 }
131
132 static
133 void _struct_definition_free(struct definition *definition)
134 {
135 struct definition_struct *_struct =
136 container_of(definition, struct definition_struct, p);
137 unsigned long i;
138
139 assert(_struct->fields->len == _struct->declaration->fields->len);
140 for (i = 0; i < _struct->fields->len; i++) {
141 struct field *field = &g_array_index(_struct->fields,
142 struct field, i);
143 definition_unref(field->definition);
144 }
145 free_definition_scope(_struct->scope);
146 declaration_unref(_struct->p.declaration);
147 g_free(_struct);
148 }
149
150 void struct_declaration_add_field(struct declaration_struct *struct_declaration,
151 const char *field_name,
152 struct declaration *field_declaration)
153 {
154 struct declaration_field *field;
155 unsigned long index;
156
157 g_array_set_size(struct_declaration->fields, struct_declaration->fields->len + 1);
158 index = struct_declaration->fields->len - 1; /* last field (new) */
159 field = &g_array_index(struct_declaration->fields, struct declaration_field, index);
160 field->name = g_quark_from_string(field_name);
161 declaration_ref(field_declaration);
162 field->declaration = field_declaration;
163 /* Keep index in hash rather than pointer, because array can relocate */
164 g_hash_table_insert(struct_declaration->fields_by_name,
165 (gpointer) (unsigned long) field->name,
166 (gpointer) index);
167 /*
168 * Alignment of structure is the max alignment of declarations contained
169 * therein.
170 */
171 struct_declaration->p.alignment = max(struct_declaration->p.alignment,
172 field_declaration->alignment);
173 }
174
175 /*
176 * struct_declaration_lookup_field_index - returns field index
177 *
178 * Returns the index of a field in a structure, or -1 if it does not
179 * exist.
180 */
181 int struct_declaration_lookup_field_index(struct declaration_struct *struct_declaration,
182 GQuark field_name)
183 {
184 gpointer index;
185 gboolean found;
186
187 found = g_hash_table_lookup_extended(struct_declaration->fields_by_name,
188 (gconstpointer) (unsigned long) field_name,
189 NULL, &index);
190 if (!found)
191 return -1;
192 return (int) (unsigned long) index;
193 }
194
195 /*
196 * field returned only valid as long as the field structure is not appended to.
197 */
198 struct declaration_field *
199 struct_declaration_get_field_from_index(struct declaration_struct *struct_declaration,
200 int index)
201 {
202 if (index < 0)
203 return NULL;
204 return &g_array_index(struct_declaration->fields, struct declaration_field, index);
205 }
206
207 /*
208 * field returned only valid as long as the field structure is not appended to.
209 */
210 struct field *
211 struct_definition_get_field_from_index(struct definition_struct *_struct,
212 int index)
213 {
214 if (index < 0)
215 return NULL;
216 return &g_array_index(_struct->fields, struct field, index);
217 }
This page took 0.032502 seconds and 4 git commands to generate.