1 /* valaccodeelementaccess.c generated by valac, the Vala compiler
2 * generated from valaccodeelementaccess.vala, do not modify */
3
4 /* valaccodememberaccess.vala
5 *
6 * Copyright (C) 2006 Raffaele Sandrini
7 * Copyright (C) 2006-2008 Jürg Billeter
8 *
9 * This library is free software; you can redistribute it and/or
10 * modify it under the terms of the GNU Lesser General Public
11 * License as published by the Free Software Foundation; either
12 * version 2.1 of the License, or (at your option) any later version.
13
14 * This library is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17 * Lesser General Public License for more details.
18
19 * You should have received a copy of the GNU Lesser General Public
20 * License along with this library; if not, write to the Free Software
21 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22 *
23 * Author:
24 * Raffaele Sandrini <raffaele@sandrini.ch>
25 * Jürg Billeter <j@bitron.ch>
26 */
27
28 #include "valaccode.h"
29 #include <valagee.h>
30 #include <glib-object.h>
31 #include <glib.h>
32
33 #define _vala_ccode_node_unref0(var) ((var == NULL) ? NULL : (var = (vala_ccode_node_unref (var), NULL)))
34 #define _vala_iterable_unref0(var) ((var == NULL) ? NULL : (var = (vala_iterable_unref (var), NULL)))
35
36 struct _ValaCCodeElementAccessPrivate {
37 ValaCCodeExpression* _container;
38 ValaList* _indices;
39 };
40
41 static gint ValaCCodeElementAccess_private_offset;
42 static gpointer vala_ccode_element_access_parent_class = NULL;
43
44 static void vala_ccode_element_access_real_write (ValaCCodeNode* base,
45 ValaCCodeWriter* writer);
46 static void vala_ccode_element_access_finalize (ValaCCodeNode * obj);
47 static GType vala_ccode_element_access_get_type_once (void);
48
49 static inline gpointer
vala_ccode_element_access_get_instance_private(ValaCCodeElementAccess * self)50 vala_ccode_element_access_get_instance_private (ValaCCodeElementAccess* self)
51 {
52 return G_STRUCT_MEMBER_P (self, ValaCCodeElementAccess_private_offset);
53 }
54
55 ValaCCodeExpression*
vala_ccode_element_access_get_container(ValaCCodeElementAccess * self)56 vala_ccode_element_access_get_container (ValaCCodeElementAccess* self)
57 {
58 ValaCCodeExpression* result;
59 ValaCCodeExpression* _tmp0_;
60 g_return_val_if_fail (self != NULL, NULL);
61 _tmp0_ = self->priv->_container;
62 result = _tmp0_;
63 return result;
64 }
65
66 static gpointer
_vala_ccode_node_ref0(gpointer self)67 _vala_ccode_node_ref0 (gpointer self)
68 {
69 return self ? vala_ccode_node_ref (self) : NULL;
70 }
71
72 void
vala_ccode_element_access_set_container(ValaCCodeElementAccess * self,ValaCCodeExpression * value)73 vala_ccode_element_access_set_container (ValaCCodeElementAccess* self,
74 ValaCCodeExpression* value)
75 {
76 ValaCCodeExpression* _tmp0_;
77 g_return_if_fail (self != NULL);
78 _tmp0_ = _vala_ccode_node_ref0 (value);
79 _vala_ccode_node_unref0 (self->priv->_container);
80 self->priv->_container = _tmp0_;
81 }
82
83 ValaList*
vala_ccode_element_access_get_indices(ValaCCodeElementAccess * self)84 vala_ccode_element_access_get_indices (ValaCCodeElementAccess* self)
85 {
86 ValaList* result;
87 ValaList* _tmp0_;
88 g_return_val_if_fail (self != NULL, NULL);
89 _tmp0_ = self->priv->_indices;
90 result = _tmp0_;
91 return result;
92 }
93
94 static gpointer
_vala_iterable_ref0(gpointer self)95 _vala_iterable_ref0 (gpointer self)
96 {
97 return self ? vala_iterable_ref (self) : NULL;
98 }
99
100 void
vala_ccode_element_access_set_indices(ValaCCodeElementAccess * self,ValaList * value)101 vala_ccode_element_access_set_indices (ValaCCodeElementAccess* self,
102 ValaList* value)
103 {
104 ValaList* _tmp0_;
105 g_return_if_fail (self != NULL);
106 _tmp0_ = _vala_iterable_ref0 (value);
107 _vala_iterable_unref0 (self->priv->_indices);
108 self->priv->_indices = _tmp0_;
109 }
110
111 ValaCCodeElementAccess*
vala_ccode_element_access_construct(GType object_type,ValaCCodeExpression * cont,ValaCCodeExpression * i)112 vala_ccode_element_access_construct (GType object_type,
113 ValaCCodeExpression* cont,
114 ValaCCodeExpression* i)
115 {
116 ValaCCodeElementAccess* self = NULL;
117 GEqualFunc _tmp0_;
118 ValaArrayList* _tmp1_;
119 ValaArrayList* _tmp2_;
120 ValaList* _tmp3_;
121 g_return_val_if_fail (cont != NULL, NULL);
122 g_return_val_if_fail (i != NULL, NULL);
123 self = (ValaCCodeElementAccess*) vala_ccode_expression_construct (object_type);
124 vala_ccode_element_access_set_container (self, cont);
125 _tmp0_ = g_direct_equal;
126 _tmp1_ = vala_array_list_new (VALA_TYPE_CCODE_EXPRESSION, (GBoxedCopyFunc) vala_ccode_node_ref, (GDestroyNotify) vala_ccode_node_unref, _tmp0_);
127 _tmp2_ = _tmp1_;
128 vala_ccode_element_access_set_indices (self, (ValaList*) _tmp2_);
129 _vala_iterable_unref0 (_tmp2_);
130 _tmp3_ = self->priv->_indices;
131 vala_collection_add ((ValaCollection*) _tmp3_, i);
132 return self;
133 }
134
135 ValaCCodeElementAccess*
vala_ccode_element_access_new(ValaCCodeExpression * cont,ValaCCodeExpression * i)136 vala_ccode_element_access_new (ValaCCodeExpression* cont,
137 ValaCCodeExpression* i)
138 {
139 return vala_ccode_element_access_construct (VALA_TYPE_CCODE_ELEMENT_ACCESS, cont, i);
140 }
141
142 ValaCCodeElementAccess*
vala_ccode_element_access_construct_with_indices(GType object_type,ValaCCodeExpression * cont,ValaList * i)143 vala_ccode_element_access_construct_with_indices (GType object_type,
144 ValaCCodeExpression* cont,
145 ValaList* i)
146 {
147 ValaCCodeElementAccess* self = NULL;
148 g_return_val_if_fail (cont != NULL, NULL);
149 g_return_val_if_fail (i != NULL, NULL);
150 self = (ValaCCodeElementAccess*) vala_ccode_expression_construct (object_type);
151 vala_ccode_element_access_set_container (self, cont);
152 vala_ccode_element_access_set_indices (self, i);
153 return self;
154 }
155
156 ValaCCodeElementAccess*
vala_ccode_element_access_new_with_indices(ValaCCodeExpression * cont,ValaList * i)157 vala_ccode_element_access_new_with_indices (ValaCCodeExpression* cont,
158 ValaList* i)
159 {
160 return vala_ccode_element_access_construct_with_indices (VALA_TYPE_CCODE_ELEMENT_ACCESS, cont, i);
161 }
162
163 static void
vala_ccode_element_access_real_write(ValaCCodeNode * base,ValaCCodeWriter * writer)164 vala_ccode_element_access_real_write (ValaCCodeNode* base,
165 ValaCCodeWriter* writer)
166 {
167 ValaCCodeElementAccess * self;
168 ValaCCodeExpression* _tmp0_;
169 gboolean first = FALSE;
170 self = (ValaCCodeElementAccess*) base;
171 g_return_if_fail (writer != NULL);
172 _tmp0_ = self->priv->_container;
173 vala_ccode_expression_write_inner (_tmp0_, writer);
174 vala_ccode_writer_write_string (writer, "[");
175 first = TRUE;
176 {
177 ValaList* _index_list = NULL;
178 ValaList* _tmp1_;
179 ValaList* _tmp2_;
180 gint _index_size = 0;
181 ValaList* _tmp3_;
182 gint _tmp4_;
183 gint _tmp5_;
184 gint _index_index = 0;
185 _tmp1_ = self->priv->_indices;
186 _tmp2_ = _vala_iterable_ref0 (_tmp1_);
187 _index_list = _tmp2_;
188 _tmp3_ = _index_list;
189 _tmp4_ = vala_collection_get_size ((ValaCollection*) _tmp3_);
190 _tmp5_ = _tmp4_;
191 _index_size = _tmp5_;
192 _index_index = -1;
193 while (TRUE) {
194 gint _tmp6_;
195 gint _tmp7_;
196 ValaCCodeExpression* index = NULL;
197 ValaList* _tmp8_;
198 gpointer _tmp9_;
199 ValaCCodeExpression* _tmp10_;
200 _index_index = _index_index + 1;
201 _tmp6_ = _index_index;
202 _tmp7_ = _index_size;
203 if (!(_tmp6_ < _tmp7_)) {
204 break;
205 }
206 _tmp8_ = _index_list;
207 _tmp9_ = vala_list_get (_tmp8_, _index_index);
208 index = (ValaCCodeExpression*) _tmp9_;
209 if (!first) {
210 vala_ccode_writer_write_string (writer, "][");
211 }
212 _tmp10_ = index;
213 vala_ccode_node_write ((ValaCCodeNode*) _tmp10_, writer);
214 first = FALSE;
215 _vala_ccode_node_unref0 (index);
216 }
217 _vala_iterable_unref0 (_index_list);
218 }
219 vala_ccode_writer_write_string (writer, "]");
220 }
221
222 static void
vala_ccode_element_access_class_init(ValaCCodeElementAccessClass * klass,gpointer klass_data)223 vala_ccode_element_access_class_init (ValaCCodeElementAccessClass * klass,
224 gpointer klass_data)
225 {
226 vala_ccode_element_access_parent_class = g_type_class_peek_parent (klass);
227 ((ValaCCodeNodeClass *) klass)->finalize = vala_ccode_element_access_finalize;
228 g_type_class_adjust_private_offset (klass, &ValaCCodeElementAccess_private_offset);
229 ((ValaCCodeNodeClass *) klass)->write = (void (*) (ValaCCodeNode*, ValaCCodeWriter*)) vala_ccode_element_access_real_write;
230 }
231
232 static void
vala_ccode_element_access_instance_init(ValaCCodeElementAccess * self,gpointer klass)233 vala_ccode_element_access_instance_init (ValaCCodeElementAccess * self,
234 gpointer klass)
235 {
236 self->priv = vala_ccode_element_access_get_instance_private (self);
237 }
238
239 static void
vala_ccode_element_access_finalize(ValaCCodeNode * obj)240 vala_ccode_element_access_finalize (ValaCCodeNode * obj)
241 {
242 ValaCCodeElementAccess * self;
243 self = G_TYPE_CHECK_INSTANCE_CAST (obj, VALA_TYPE_CCODE_ELEMENT_ACCESS, ValaCCodeElementAccess);
244 _vala_ccode_node_unref0 (self->priv->_container);
245 _vala_iterable_unref0 (self->priv->_indices);
246 VALA_CCODE_NODE_CLASS (vala_ccode_element_access_parent_class)->finalize (obj);
247 }
248
249 /**
250 * Represents an access to an array member in the C code.
251 */
252 static GType
vala_ccode_element_access_get_type_once(void)253 vala_ccode_element_access_get_type_once (void)
254 {
255 static const GTypeInfo g_define_type_info = { sizeof (ValaCCodeElementAccessClass), (GBaseInitFunc) NULL, (GBaseFinalizeFunc) NULL, (GClassInitFunc) vala_ccode_element_access_class_init, (GClassFinalizeFunc) NULL, NULL, sizeof (ValaCCodeElementAccess), 0, (GInstanceInitFunc) vala_ccode_element_access_instance_init, NULL };
256 GType vala_ccode_element_access_type_id;
257 vala_ccode_element_access_type_id = g_type_register_static (VALA_TYPE_CCODE_EXPRESSION, "ValaCCodeElementAccess", &g_define_type_info, 0);
258 ValaCCodeElementAccess_private_offset = g_type_add_instance_private (vala_ccode_element_access_type_id, sizeof (ValaCCodeElementAccessPrivate));
259 return vala_ccode_element_access_type_id;
260 }
261
262 GType
vala_ccode_element_access_get_type(void)263 vala_ccode_element_access_get_type (void)
264 {
265 static volatile gsize vala_ccode_element_access_type_id__volatile = 0;
266 if (g_once_init_enter (&vala_ccode_element_access_type_id__volatile)) {
267 GType vala_ccode_element_access_type_id;
268 vala_ccode_element_access_type_id = vala_ccode_element_access_get_type_once ();
269 g_once_init_leave (&vala_ccode_element_access_type_id__volatile, vala_ccode_element_access_type_id);
270 }
271 return vala_ccode_element_access_type_id__volatile;
272 }
273
274