1 /* This file is perl-generated, of course */
5 XBT_LOG_NEW_DEFAULT_SUBCATEGORY(structs,test,"Logs about the gigantic struct test");
11 void write_read(gras_datadesc_type_t type,void *src, void *dst, gras_socket_t *sock, int direction);
13 GRAS_DEFINE_TYPE(cccc,struct cccc { char a; char b; char c;char d;};)
14 GRAS_DEFINE_TYPE(ccsc,struct ccsc { char a; char b; short int c;char d;};)
15 GRAS_DEFINE_TYPE(ccic,struct ccic { char a; char b; int c;char d;};)
16 GRAS_DEFINE_TYPE(cclc,struct cclc { char a; char b; long int c;char d;};)
17 GRAS_DEFINE_TYPE(ccLc,struct ccLc { char a; char b; long long int c;char d;};)
18 GRAS_DEFINE_TYPE(ccfc,struct ccfc { char a; char b; float c;char d;};)
19 GRAS_DEFINE_TYPE(ccdc,struct ccdc { char a; char b; double c;char d;};)
20 GRAS_DEFINE_TYPE(sccc,struct sccc { short int a; char b; char c;char d;};)
21 GRAS_DEFINE_TYPE(scsc,struct scsc { short int a; char b; short int c;char d;};)
22 GRAS_DEFINE_TYPE(scic,struct scic { short int a; char b; int c;char d;};)
23 GRAS_DEFINE_TYPE(sclc,struct sclc { short int a; char b; long int c;char d;};)
24 GRAS_DEFINE_TYPE(scLc,struct scLc { short int a; char b; long long int c;char d;};)
25 GRAS_DEFINE_TYPE(scfc,struct scfc { short int a; char b; float c;char d;};)
26 GRAS_DEFINE_TYPE(scdc,struct scdc { short int a; char b; double c;char d;};)
27 GRAS_DEFINE_TYPE(iccc,struct iccc { int a; char b; char c;char d;};)
28 GRAS_DEFINE_TYPE(icsc,struct icsc { int a; char b; short int c;char d;};)
29 GRAS_DEFINE_TYPE(icic,struct icic { int a; char b; int c;char d;};)
30 GRAS_DEFINE_TYPE(iclc,struct iclc { int a; char b; long int c;char d;};)
31 GRAS_DEFINE_TYPE(icLc,struct icLc { int a; char b; long long int c;char d;};)
32 GRAS_DEFINE_TYPE(icfc,struct icfc { int a; char b; float c;char d;};)
33 GRAS_DEFINE_TYPE(icdc,struct icdc { int a; char b; double c;char d;};)
34 GRAS_DEFINE_TYPE(lccc,struct lccc { long int a; char b; char c;char d;};)
35 GRAS_DEFINE_TYPE(lcsc,struct lcsc { long int a; char b; short int c;char d;};)
36 GRAS_DEFINE_TYPE(lcic,struct lcic { long int a; char b; int c;char d;};)
37 GRAS_DEFINE_TYPE(lclc,struct lclc { long int a; char b; long int c;char d;};)
38 GRAS_DEFINE_TYPE(lcLc,struct lcLc { long int a; char b; long long int c;char d;};)
39 GRAS_DEFINE_TYPE(lcfc,struct lcfc { long int a; char b; float c;char d;};)
40 GRAS_DEFINE_TYPE(lcdc,struct lcdc { long int a; char b; double c;char d;};)
41 GRAS_DEFINE_TYPE(Lccc,struct Lccc { long long int a; char b; char c;char d;};)
42 GRAS_DEFINE_TYPE(Lcsc,struct Lcsc { long long int a; char b; short int c;char d;};)
43 GRAS_DEFINE_TYPE(Lcic,struct Lcic { long long int a; char b; int c;char d;};)
44 GRAS_DEFINE_TYPE(Lclc,struct Lclc { long long int a; char b; long int c;char d;};)
45 GRAS_DEFINE_TYPE(LcLc,struct LcLc { long long int a; char b; long long int c;char d;};)
46 GRAS_DEFINE_TYPE(Lcfc,struct Lcfc { long long int a; char b; float c;char d;};)
47 GRAS_DEFINE_TYPE(Lcdc,struct Lcdc { long long int a; char b; double c;char d;};)
48 GRAS_DEFINE_TYPE(fccc,struct fccc { float a; char b; char c;char d;};)
49 GRAS_DEFINE_TYPE(fcsc,struct fcsc { float a; char b; short int c;char d;};)
50 GRAS_DEFINE_TYPE(fcic,struct fcic { float a; char b; int c;char d;};)
51 GRAS_DEFINE_TYPE(fclc,struct fclc { float a; char b; long int c;char d;};)
52 GRAS_DEFINE_TYPE(fcLc,struct fcLc { float a; char b; long long int c;char d;};)
53 GRAS_DEFINE_TYPE(fcfc,struct fcfc { float a; char b; float c;char d;};)
54 GRAS_DEFINE_TYPE(fcdc,struct fcdc { float a; char b; double c;char d;};)
55 GRAS_DEFINE_TYPE(dccc,struct dccc { double a; char b; char c;char d;};)
56 GRAS_DEFINE_TYPE(dcsc,struct dcsc { double a; char b; short int c;char d;};)
57 GRAS_DEFINE_TYPE(dcic,struct dcic { double a; char b; int c;char d;};)
58 GRAS_DEFINE_TYPE(dclc,struct dclc { double a; char b; long int c;char d;};)
59 GRAS_DEFINE_TYPE(dcLc,struct dcLc { double a; char b; long long int c;char d;};)
60 GRAS_DEFINE_TYPE(dcfc,struct dcfc { double a; char b; float c;char d;};)
61 GRAS_DEFINE_TYPE(dcdc,struct dcdc { double a; char b; double c;char d;};)
63 #define test(a) xbt_assert(a)
64 void test_structures(gras_socket_t *sock, int direction);
65 void test_structures(gras_socket_t *sock, int direction) {
66 struct cccc my_cccc = {'w'+(char)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_cccc2;
67 struct ccsc my_ccsc = {'w'+(char)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_ccsc2;
68 struct ccic my_ccic = {'w'+(char)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_ccic2;
69 struct cclc my_cclc = {'w'+(char)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_cclc2;
70 struct ccLc my_ccLc = {'w'+(char)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_ccLc2;
71 struct ccfc my_ccfc = {'w'+(char)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_ccfc2;
72 struct ccdc my_ccdc = {'w'+(char)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_ccdc2;
73 struct sccc my_sccc = {134+(short int)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_sccc2;
74 struct scsc my_scsc = {134+(short int)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_scsc2;
75 struct scic my_scic = {134+(short int)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_scic2;
76 struct sclc my_sclc = {134+(short int)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_sclc2;
77 struct scLc my_scLc = {134+(short int)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_scLc2;
78 struct scfc my_scfc = {134+(short int)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_scfc2;
79 struct scdc my_scdc = {134+(short int)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_scdc2;
80 struct iccc my_iccc = {-11249+(int)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_iccc2;
81 struct icsc my_icsc = {-11249+(int)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_icsc2;
82 struct icic my_icic = {-11249+(int)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_icic2;
83 struct iclc my_iclc = {-11249+(int)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_iclc2;
84 struct icLc my_icLc = {-11249+(int)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_icLc2;
85 struct icfc my_icfc = {-11249+(int)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_icfc2;
86 struct icdc my_icdc = {-11249+(int)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_icdc2;
87 struct lccc my_lccc = {31319919+(long int)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_lccc2;
88 struct lcsc my_lcsc = {31319919+(long int)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_lcsc2;
89 struct lcic my_lcic = {31319919+(long int)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_lcic2;
90 struct lclc my_lclc = {31319919+(long int)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_lclc2;
91 struct lcLc my_lcLc = {31319919+(long int)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_lcLc2;
92 struct lcfc my_lcfc = {31319919+(long int)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_lcfc2;
93 struct lcdc my_lcdc = {31319919+(long int)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_lcdc2;
94 struct Lccc my_Lccc = {-232130010+(long long int)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_Lccc2;
95 struct Lcsc my_Lcsc = {-232130010+(long long int)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_Lcsc2;
96 struct Lcic my_Lcic = {-232130010+(long long int)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_Lcic2;
97 struct Lclc my_Lclc = {-232130010+(long long int)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_Lclc2;
98 struct LcLc my_LcLc = {-232130010+(long long int)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_LcLc2;
99 struct Lcfc my_Lcfc = {-232130010+(long long int)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_Lcfc2;
100 struct Lcdc my_Lcdc = {-232130010+(long long int)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_Lcdc2;
101 struct fccc my_fccc = {-11313.1135+(float)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_fccc2;
102 struct fcsc my_fcsc = {-11313.1135+(float)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_fcsc2;
103 struct fcic my_fcic = {-11313.1135+(float)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_fcic2;
104 struct fclc my_fclc = {-11313.1135+(float)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_fclc2;
105 struct fcLc my_fcLc = {-11313.1135+(float)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_fcLc2;
106 struct fcfc my_fcfc = {-11313.1135+(float)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_fcfc2;
107 struct fcdc my_fcdc = {-11313.1135+(float)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_fcdc2;
108 struct dccc my_dccc = {1424420.11331+(double)1,'w'+(char)2,'w'+(char)3,'w'+(char)4}, my_dccc2;
109 struct dcsc my_dcsc = {1424420.11331+(double)1,'w'+(char)2,134+(short int)3,'w'+(char)4}, my_dcsc2;
110 struct dcic my_dcic = {1424420.11331+(double)1,'w'+(char)2,-11249+(int)3,'w'+(char)4}, my_dcic2;
111 struct dclc my_dclc = {1424420.11331+(double)1,'w'+(char)2,31319919+(long int)3,'w'+(char)4}, my_dclc2;
112 struct dcLc my_dcLc = {1424420.11331+(double)1,'w'+(char)2,-232130010+(long long int)3,'w'+(char)4}, my_dcLc2;
113 struct dcfc my_dcfc = {1424420.11331+(double)1,'w'+(char)2,-11313.1135+(float)3,'w'+(char)4}, my_dcfc2;
114 struct dcdc my_dcdc = {1424420.11331+(double)1,'w'+(char)2,1424420.11331+(double)3,'w'+(char)4}, my_dcdc2;
115 INFO0("---- Test on all possible struct having 3 fields (49 structs) ----");
116 write_read(gras_datadesc_by_symbol(cccc), &my_cccc, &my_cccc2, sock,direction);
117 if (direction == READ || direction == RW) {
119 test(my_cccc.a == my_cccc2.a);
120 test(my_cccc.b == my_cccc2.b);
121 test(my_cccc.c == my_cccc2.c);
122 test(my_cccc.d == my_cccc2.d);
123 if (!failed) VERB0("Passed cccc");
125 write_read(gras_datadesc_by_symbol(ccsc), &my_ccsc, &my_ccsc2, sock,direction);
126 if (direction == READ || direction == RW) {
128 test(my_ccsc.a == my_ccsc2.a);
129 test(my_ccsc.b == my_ccsc2.b);
130 test(my_ccsc.c == my_ccsc2.c);
131 test(my_ccsc.d == my_ccsc2.d);
132 if (!failed) VERB0("Passed ccsc");
134 write_read(gras_datadesc_by_symbol(ccic), &my_ccic, &my_ccic2, sock,direction);
135 if (direction == READ || direction == RW) {
137 test(my_ccic.a == my_ccic2.a);
138 test(my_ccic.b == my_ccic2.b);
139 test(my_ccic.c == my_ccic2.c);
140 test(my_ccic.d == my_ccic2.d);
141 if (!failed) VERB0("Passed ccic");
143 write_read(gras_datadesc_by_symbol(cclc), &my_cclc, &my_cclc2, sock,direction);
144 if (direction == READ || direction == RW) {
146 test(my_cclc.a == my_cclc2.a);
147 test(my_cclc.b == my_cclc2.b);
148 test(my_cclc.c == my_cclc2.c);
149 test(my_cclc.d == my_cclc2.d);
150 if (!failed) VERB0("Passed cclc");
152 write_read(gras_datadesc_by_symbol(ccLc), &my_ccLc, &my_ccLc2, sock,direction);
153 if (direction == READ || direction == RW) {
155 test(my_ccLc.a == my_ccLc2.a);
156 test(my_ccLc.b == my_ccLc2.b);
157 test(my_ccLc.c == my_ccLc2.c);
158 test(my_ccLc.d == my_ccLc2.d);
159 if (!failed) VERB0("Passed ccLc");
161 write_read(gras_datadesc_by_symbol(ccfc), &my_ccfc, &my_ccfc2, sock,direction);
162 if (direction == READ || direction == RW) {
164 test(my_ccfc.a == my_ccfc2.a);
165 test(my_ccfc.b == my_ccfc2.b);
166 test(my_ccfc.c == my_ccfc2.c);
167 test(my_ccfc.d == my_ccfc2.d);
168 if (!failed) VERB0("Passed ccfc");
170 write_read(gras_datadesc_by_symbol(ccdc), &my_ccdc, &my_ccdc2, sock,direction);
171 if (direction == READ || direction == RW) {
173 test(my_ccdc.a == my_ccdc2.a);
174 test(my_ccdc.b == my_ccdc2.b);
175 test(my_ccdc.c == my_ccdc2.c);
176 test(my_ccdc.d == my_ccdc2.d);
177 if (!failed) VERB0("Passed ccdc");
179 write_read(gras_datadesc_by_symbol(sccc), &my_sccc, &my_sccc2, sock,direction);
180 if (direction == READ || direction == RW) {
182 test(my_sccc.a == my_sccc2.a);
183 test(my_sccc.b == my_sccc2.b);
184 test(my_sccc.c == my_sccc2.c);
185 test(my_sccc.d == my_sccc2.d);
186 if (!failed) VERB0("Passed sccc");
188 write_read(gras_datadesc_by_symbol(scsc), &my_scsc, &my_scsc2, sock,direction);
189 if (direction == READ || direction == RW) {
191 test(my_scsc.a == my_scsc2.a);
192 test(my_scsc.b == my_scsc2.b);
193 test(my_scsc.c == my_scsc2.c);
194 test(my_scsc.d == my_scsc2.d);
195 if (!failed) VERB0("Passed scsc");
197 write_read(gras_datadesc_by_symbol(scic), &my_scic, &my_scic2, sock,direction);
198 if (direction == READ || direction == RW) {
200 test(my_scic.a == my_scic2.a);
201 test(my_scic.b == my_scic2.b);
202 test(my_scic.c == my_scic2.c);
203 test(my_scic.d == my_scic2.d);
204 if (!failed) VERB0("Passed scic");
206 write_read(gras_datadesc_by_symbol(sclc), &my_sclc, &my_sclc2, sock,direction);
207 if (direction == READ || direction == RW) {
209 test(my_sclc.a == my_sclc2.a);
210 test(my_sclc.b == my_sclc2.b);
211 test(my_sclc.c == my_sclc2.c);
212 test(my_sclc.d == my_sclc2.d);
213 if (!failed) VERB0("Passed sclc");
215 write_read(gras_datadesc_by_symbol(scLc), &my_scLc, &my_scLc2, sock,direction);
216 if (direction == READ || direction == RW) {
218 test(my_scLc.a == my_scLc2.a);
219 test(my_scLc.b == my_scLc2.b);
220 test(my_scLc.c == my_scLc2.c);
221 test(my_scLc.d == my_scLc2.d);
222 if (!failed) VERB0("Passed scLc");
224 write_read(gras_datadesc_by_symbol(scfc), &my_scfc, &my_scfc2, sock,direction);
225 if (direction == READ || direction == RW) {
227 test(my_scfc.a == my_scfc2.a);
228 test(my_scfc.b == my_scfc2.b);
229 test(my_scfc.c == my_scfc2.c);
230 test(my_scfc.d == my_scfc2.d);
231 if (!failed) VERB0("Passed scfc");
233 write_read(gras_datadesc_by_symbol(scdc), &my_scdc, &my_scdc2, sock,direction);
234 if (direction == READ || direction == RW) {
236 test(my_scdc.a == my_scdc2.a);
237 test(my_scdc.b == my_scdc2.b);
238 test(my_scdc.c == my_scdc2.c);
239 test(my_scdc.d == my_scdc2.d);
240 if (!failed) VERB0("Passed scdc");
242 write_read(gras_datadesc_by_symbol(iccc), &my_iccc, &my_iccc2, sock,direction);
243 if (direction == READ || direction == RW) {
245 test(my_iccc.a == my_iccc2.a);
246 test(my_iccc.b == my_iccc2.b);
247 test(my_iccc.c == my_iccc2.c);
248 test(my_iccc.d == my_iccc2.d);
249 if (!failed) VERB0("Passed iccc");
251 write_read(gras_datadesc_by_symbol(icsc), &my_icsc, &my_icsc2, sock,direction);
252 if (direction == READ || direction == RW) {
254 test(my_icsc.a == my_icsc2.a);
255 test(my_icsc.b == my_icsc2.b);
256 test(my_icsc.c == my_icsc2.c);
257 test(my_icsc.d == my_icsc2.d);
258 if (!failed) VERB0("Passed icsc");
260 write_read(gras_datadesc_by_symbol(icic), &my_icic, &my_icic2, sock,direction);
261 if (direction == READ || direction == RW) {
263 test(my_icic.a == my_icic2.a);
264 test(my_icic.b == my_icic2.b);
265 test(my_icic.c == my_icic2.c);
266 test(my_icic.d == my_icic2.d);
267 if (!failed) VERB0("Passed icic");
269 write_read(gras_datadesc_by_symbol(iclc), &my_iclc, &my_iclc2, sock,direction);
270 if (direction == READ || direction == RW) {
272 test(my_iclc.a == my_iclc2.a);
273 test(my_iclc.b == my_iclc2.b);
274 test(my_iclc.c == my_iclc2.c);
275 test(my_iclc.d == my_iclc2.d);
276 if (!failed) VERB0("Passed iclc");
278 write_read(gras_datadesc_by_symbol(icLc), &my_icLc, &my_icLc2, sock,direction);
279 if (direction == READ || direction == RW) {
281 test(my_icLc.a == my_icLc2.a);
282 test(my_icLc.b == my_icLc2.b);
283 test(my_icLc.c == my_icLc2.c);
284 test(my_icLc.d == my_icLc2.d);
285 if (!failed) VERB0("Passed icLc");
287 write_read(gras_datadesc_by_symbol(icfc), &my_icfc, &my_icfc2, sock,direction);
288 if (direction == READ || direction == RW) {
290 test(my_icfc.a == my_icfc2.a);
291 test(my_icfc.b == my_icfc2.b);
292 test(my_icfc.c == my_icfc2.c);
293 test(my_icfc.d == my_icfc2.d);
294 if (!failed) VERB0("Passed icfc");
296 write_read(gras_datadesc_by_symbol(icdc), &my_icdc, &my_icdc2, sock,direction);
297 if (direction == READ || direction == RW) {
299 test(my_icdc.a == my_icdc2.a);
300 test(my_icdc.b == my_icdc2.b);
301 test(my_icdc.c == my_icdc2.c);
302 test(my_icdc.d == my_icdc2.d);
303 if (!failed) VERB0("Passed icdc");
305 write_read(gras_datadesc_by_symbol(lccc), &my_lccc, &my_lccc2, sock,direction);
306 if (direction == READ || direction == RW) {
308 test(my_lccc.a == my_lccc2.a);
309 test(my_lccc.b == my_lccc2.b);
310 test(my_lccc.c == my_lccc2.c);
311 test(my_lccc.d == my_lccc2.d);
312 if (!failed) VERB0("Passed lccc");
314 write_read(gras_datadesc_by_symbol(lcsc), &my_lcsc, &my_lcsc2, sock,direction);
315 if (direction == READ || direction == RW) {
317 test(my_lcsc.a == my_lcsc2.a);
318 test(my_lcsc.b == my_lcsc2.b);
319 test(my_lcsc.c == my_lcsc2.c);
320 test(my_lcsc.d == my_lcsc2.d);
321 if (!failed) VERB0("Passed lcsc");
323 write_read(gras_datadesc_by_symbol(lcic), &my_lcic, &my_lcic2, sock,direction);
324 if (direction == READ || direction == RW) {
326 test(my_lcic.a == my_lcic2.a);
327 test(my_lcic.b == my_lcic2.b);
328 test(my_lcic.c == my_lcic2.c);
329 test(my_lcic.d == my_lcic2.d);
330 if (!failed) VERB0("Passed lcic");
332 write_read(gras_datadesc_by_symbol(lclc), &my_lclc, &my_lclc2, sock,direction);
333 if (direction == READ || direction == RW) {
335 test(my_lclc.a == my_lclc2.a);
336 test(my_lclc.b == my_lclc2.b);
337 test(my_lclc.c == my_lclc2.c);
338 test(my_lclc.d == my_lclc2.d);
339 if (!failed) VERB0("Passed lclc");
341 write_read(gras_datadesc_by_symbol(lcLc), &my_lcLc, &my_lcLc2, sock,direction);
342 if (direction == READ || direction == RW) {
344 test(my_lcLc.a == my_lcLc2.a);
345 test(my_lcLc.b == my_lcLc2.b);
346 test(my_lcLc.c == my_lcLc2.c);
347 test(my_lcLc.d == my_lcLc2.d);
348 if (!failed) VERB0("Passed lcLc");
350 write_read(gras_datadesc_by_symbol(lcfc), &my_lcfc, &my_lcfc2, sock,direction);
351 if (direction == READ || direction == RW) {
353 test(my_lcfc.a == my_lcfc2.a);
354 test(my_lcfc.b == my_lcfc2.b);
355 test(my_lcfc.c == my_lcfc2.c);
356 test(my_lcfc.d == my_lcfc2.d);
357 if (!failed) VERB0("Passed lcfc");
359 write_read(gras_datadesc_by_symbol(lcdc), &my_lcdc, &my_lcdc2, sock,direction);
360 if (direction == READ || direction == RW) {
362 test(my_lcdc.a == my_lcdc2.a);
363 test(my_lcdc.b == my_lcdc2.b);
364 test(my_lcdc.c == my_lcdc2.c);
365 test(my_lcdc.d == my_lcdc2.d);
366 if (!failed) VERB0("Passed lcdc");
368 write_read(gras_datadesc_by_symbol(Lccc), &my_Lccc, &my_Lccc2, sock,direction);
369 if (direction == READ || direction == RW) {
371 test(my_Lccc.a == my_Lccc2.a);
372 test(my_Lccc.b == my_Lccc2.b);
373 test(my_Lccc.c == my_Lccc2.c);
374 test(my_Lccc.d == my_Lccc2.d);
375 if (!failed) VERB0("Passed Lccc");
377 write_read(gras_datadesc_by_symbol(Lcsc), &my_Lcsc, &my_Lcsc2, sock,direction);
378 if (direction == READ || direction == RW) {
380 test(my_Lcsc.a == my_Lcsc2.a);
381 test(my_Lcsc.b == my_Lcsc2.b);
382 test(my_Lcsc.c == my_Lcsc2.c);
383 test(my_Lcsc.d == my_Lcsc2.d);
384 if (!failed) VERB0("Passed Lcsc");
386 write_read(gras_datadesc_by_symbol(Lcic), &my_Lcic, &my_Lcic2, sock,direction);
387 if (direction == READ || direction == RW) {
389 test(my_Lcic.a == my_Lcic2.a);
390 test(my_Lcic.b == my_Lcic2.b);
391 test(my_Lcic.c == my_Lcic2.c);
392 test(my_Lcic.d == my_Lcic2.d);
393 if (!failed) VERB0("Passed Lcic");
395 write_read(gras_datadesc_by_symbol(Lclc), &my_Lclc, &my_Lclc2, sock,direction);
396 if (direction == READ || direction == RW) {
398 test(my_Lclc.a == my_Lclc2.a);
399 test(my_Lclc.b == my_Lclc2.b);
400 test(my_Lclc.c == my_Lclc2.c);
401 test(my_Lclc.d == my_Lclc2.d);
402 if (!failed) VERB0("Passed Lclc");
404 write_read(gras_datadesc_by_symbol(LcLc), &my_LcLc, &my_LcLc2, sock,direction);
405 if (direction == READ || direction == RW) {
407 test(my_LcLc.a == my_LcLc2.a);
408 test(my_LcLc.b == my_LcLc2.b);
409 test(my_LcLc.c == my_LcLc2.c);
410 test(my_LcLc.d == my_LcLc2.d);
411 if (!failed) VERB0("Passed LcLc");
413 write_read(gras_datadesc_by_symbol(Lcfc), &my_Lcfc, &my_Lcfc2, sock,direction);
414 if (direction == READ || direction == RW) {
416 test(my_Lcfc.a == my_Lcfc2.a);
417 test(my_Lcfc.b == my_Lcfc2.b);
418 test(my_Lcfc.c == my_Lcfc2.c);
419 test(my_Lcfc.d == my_Lcfc2.d);
420 if (!failed) VERB0("Passed Lcfc");
422 write_read(gras_datadesc_by_symbol(Lcdc), &my_Lcdc, &my_Lcdc2, sock,direction);
423 if (direction == READ || direction == RW) {
425 test(my_Lcdc.a == my_Lcdc2.a);
426 test(my_Lcdc.b == my_Lcdc2.b);
427 test(my_Lcdc.c == my_Lcdc2.c);
428 test(my_Lcdc.d == my_Lcdc2.d);
429 if (!failed) VERB0("Passed Lcdc");
431 write_read(gras_datadesc_by_symbol(fccc), &my_fccc, &my_fccc2, sock,direction);
432 if (direction == READ || direction == RW) {
434 test(my_fccc.a == my_fccc2.a);
435 test(my_fccc.b == my_fccc2.b);
436 test(my_fccc.c == my_fccc2.c);
437 test(my_fccc.d == my_fccc2.d);
438 if (!failed) VERB0("Passed fccc");
440 write_read(gras_datadesc_by_symbol(fcsc), &my_fcsc, &my_fcsc2, sock,direction);
441 if (direction == READ || direction == RW) {
443 test(my_fcsc.a == my_fcsc2.a);
444 test(my_fcsc.b == my_fcsc2.b);
445 test(my_fcsc.c == my_fcsc2.c);
446 test(my_fcsc.d == my_fcsc2.d);
447 if (!failed) VERB0("Passed fcsc");
449 write_read(gras_datadesc_by_symbol(fcic), &my_fcic, &my_fcic2, sock,direction);
450 if (direction == READ || direction == RW) {
452 test(my_fcic.a == my_fcic2.a);
453 test(my_fcic.b == my_fcic2.b);
454 test(my_fcic.c == my_fcic2.c);
455 test(my_fcic.d == my_fcic2.d);
456 if (!failed) VERB0("Passed fcic");
458 write_read(gras_datadesc_by_symbol(fclc), &my_fclc, &my_fclc2, sock,direction);
459 if (direction == READ || direction == RW) {
461 test(my_fclc.a == my_fclc2.a);
462 test(my_fclc.b == my_fclc2.b);
463 test(my_fclc.c == my_fclc2.c);
464 test(my_fclc.d == my_fclc2.d);
465 if (!failed) VERB0("Passed fclc");
467 write_read(gras_datadesc_by_symbol(fcLc), &my_fcLc, &my_fcLc2, sock,direction);
468 if (direction == READ || direction == RW) {
470 test(my_fcLc.a == my_fcLc2.a);
471 test(my_fcLc.b == my_fcLc2.b);
472 test(my_fcLc.c == my_fcLc2.c);
473 test(my_fcLc.d == my_fcLc2.d);
474 if (!failed) VERB0("Passed fcLc");
476 write_read(gras_datadesc_by_symbol(fcfc), &my_fcfc, &my_fcfc2, sock,direction);
477 if (direction == READ || direction == RW) {
479 test(my_fcfc.a == my_fcfc2.a);
480 test(my_fcfc.b == my_fcfc2.b);
481 test(my_fcfc.c == my_fcfc2.c);
482 test(my_fcfc.d == my_fcfc2.d);
483 if (!failed) VERB0("Passed fcfc");
485 write_read(gras_datadesc_by_symbol(fcdc), &my_fcdc, &my_fcdc2, sock,direction);
486 if (direction == READ || direction == RW) {
488 test(my_fcdc.a == my_fcdc2.a);
489 test(my_fcdc.b == my_fcdc2.b);
490 test(my_fcdc.c == my_fcdc2.c);
491 test(my_fcdc.d == my_fcdc2.d);
492 if (!failed) VERB0("Passed fcdc");
494 write_read(gras_datadesc_by_symbol(dccc), &my_dccc, &my_dccc2, sock,direction);
495 if (direction == READ || direction == RW) {
497 test(my_dccc.a == my_dccc2.a);
498 test(my_dccc.b == my_dccc2.b);
499 test(my_dccc.c == my_dccc2.c);
500 test(my_dccc.d == my_dccc2.d);
501 if (!failed) VERB0("Passed dccc");
503 write_read(gras_datadesc_by_symbol(dcsc), &my_dcsc, &my_dcsc2, sock,direction);
504 if (direction == READ || direction == RW) {
506 test(my_dcsc.a == my_dcsc2.a);
507 test(my_dcsc.b == my_dcsc2.b);
508 test(my_dcsc.c == my_dcsc2.c);
509 test(my_dcsc.d == my_dcsc2.d);
510 if (!failed) VERB0("Passed dcsc");
512 write_read(gras_datadesc_by_symbol(dcic), &my_dcic, &my_dcic2, sock,direction);
513 if (direction == READ || direction == RW) {
515 test(my_dcic.a == my_dcic2.a);
516 test(my_dcic.b == my_dcic2.b);
517 test(my_dcic.c == my_dcic2.c);
518 test(my_dcic.d == my_dcic2.d);
519 if (!failed) VERB0("Passed dcic");
521 write_read(gras_datadesc_by_symbol(dclc), &my_dclc, &my_dclc2, sock,direction);
522 if (direction == READ || direction == RW) {
524 test(my_dclc.a == my_dclc2.a);
525 test(my_dclc.b == my_dclc2.b);
526 test(my_dclc.c == my_dclc2.c);
527 test(my_dclc.d == my_dclc2.d);
528 if (!failed) VERB0("Passed dclc");
530 write_read(gras_datadesc_by_symbol(dcLc), &my_dcLc, &my_dcLc2, sock,direction);
531 if (direction == READ || direction == RW) {
533 test(my_dcLc.a == my_dcLc2.a);
534 test(my_dcLc.b == my_dcLc2.b);
535 test(my_dcLc.c == my_dcLc2.c);
536 test(my_dcLc.d == my_dcLc2.d);
537 if (!failed) VERB0("Passed dcLc");
539 write_read(gras_datadesc_by_symbol(dcfc), &my_dcfc, &my_dcfc2, sock,direction);
540 if (direction == READ || direction == RW) {
542 test(my_dcfc.a == my_dcfc2.a);
543 test(my_dcfc.b == my_dcfc2.b);
544 test(my_dcfc.c == my_dcfc2.c);
545 test(my_dcfc.d == my_dcfc2.d);
546 if (!failed) VERB0("Passed dcfc");
548 write_read(gras_datadesc_by_symbol(dcdc), &my_dcdc, &my_dcdc2, sock,direction);
549 if (direction == READ || direction == RW) {
551 test(my_dcdc.a == my_dcdc2.a);
552 test(my_dcdc.b == my_dcdc2.b);
553 test(my_dcdc.c == my_dcdc2.c);
554 test(my_dcdc.d == my_dcdc2.d);
555 if (!failed) VERB0("Passed dcdc");