source: EcnlProtoTool/trunk/tcc-0.9.27/tests/tests2/90_struct-init.c@ 331

Last change on this file since 331 was 331, checked in by coas-nagasima, 6 years ago

prototoolに関連するプロジェクトをnewlibからmuslを使うよう変更・更新
ntshellをnewlibの下位の実装から、muslのsyscallの実装に変更・更新
以下のOSSをアップデート
・mruby-1.3.0
・musl-1.1.18
・onigmo-6.1.3
・tcc-0.9.27
以下のOSSを追加
・openssl-1.1.0e
・curl-7.57.0
・zlib-1.2.11
以下のmrbgemsを追加
・iij/mruby-digest
・iij/mruby-env
・iij/mruby-errno
・iij/mruby-iijson
・iij/mruby-ipaddr
・iij/mruby-mock
・iij/mruby-require
・iij/mruby-tls-openssl

  • Property svn:eol-style set to native
  • Property svn:mime-type set to text/x-csrc
File size: 6.5 KB
Line 
1typedef unsigned char u8;
2typedef struct {} empty_s;
3struct contains_empty {
4 u8 a;
5 empty_s empty;
6 u8 b;
7};
8struct contains_empty ce = { { (1) }, (empty_s){}, 022, };
9/* The following decl of 'q' would demonstrate the TCC bug in init_putv when
10 handling copying compound literals. (Compound literals
11 aren't acceptable constant initializers in isoc99, but
12 we accept them like gcc, except for this case)
13//char *q = (char *){ "trara" }; */
14struct SS {u8 a[3], b; };
15struct SS sinit16[] = { { 1 }, 2 };
16struct S
17{
18 u8 a,b;
19 u8 c[2];
20};
21
22struct T
23{
24 u8 s[16];
25 u8 a;
26};
27
28struct U
29{
30 u8 a;
31 struct S s;
32 u8 b;
33 struct T t;
34};
35
36struct V
37{
38 struct S s;
39 struct T t;
40 u8 a;
41};
42
43struct W
44{
45 struct V t;
46 struct S s[];
47};
48
49struct S gs = ((struct S){1, 2, 3, 4});
50struct S gs2 = {1, 2, {3, 4}};
51struct T gt = {"hello", 42};
52struct U gu = {3, 5,6,7,8, 4, "huhu", 43};
53struct U gu2 = {3, {5,6,7,8}, 4, {"huhu", 43}};
54/* Optional braces around scalar initializers. Accepted, but with
55 a warning. */
56struct U gu3 = { {3}, {5,6,7,8,}, 4, {"huhu", 43}};
57/* Many superfluous braces and leaving out one initializer for U.s.c[1] */
58struct U gu4 = { 3, {5,6,7,}, 5, { "bla", {44}} };
59/* Superfluous braces and useless parens around values */
60struct S gs3 = { (1), {(2)}, {(((3))), {4}}};
61/* Superfluous braces, and leaving out braces for V.t, plus cast */
62struct V gv = {{{3},4,{5,6}}, "haha", (u8)45, 46};
63/* Compound literal */
64struct V gv2 = {(struct S){7,8,{9,10}}, {"hihi", 47}, 48};
65/* Parens around compound literal */
66struct V gv3 = {((struct S){7,8,{9,10}}), {"hoho", 49}, 50};
67/* Initialization of a flex array member (warns in GCC) */
68struct W gw = {{1,2,3,4}, {1,2,3,4,5}};
69
70union UU {
71 u8 a;
72 u8 b;
73};
74struct SU {
75 union UU u;
76 u8 c;
77};
78struct SU gsu = {5,6};
79
80/* Unnamed struct/union members aren't ISO C, but it's a widely accepted
81 extension. See below for further extensions to that under -fms-extension.*/
82union UV {
83 struct {u8 a,b;};
84 struct S s;
85};
86union UV guv = {{6,5}};
87union UV guv2 = {{.b = 7, .a = 8}};
88union UV guv3 = {.b = 8, .a = 7};
89
90/* Under -fms-extensions also the following is valid:
91union UV2 {
92 struct Anon {u8 a,b;}; // unnamed member, but tagged struct, ...
93 struct S s;
94};
95struct Anon gan = { 10, 11 }; // ... which makes it available here.
96union UV2 guv4 = {{4,3}}; // and the other inits from above as well
97*/
98
99struct in6_addr {
100 union {
101 u8 u6_addr8[16];
102 unsigned short u6_addr16[8];
103 } u;
104};
105struct flowi6 {
106 struct in6_addr saddr, daddr;
107};
108struct pkthdr {
109 struct in6_addr daddr, saddr;
110};
111struct pkthdr phdr = { { { 6,5,4,3 } }, { { 9,8,7,6 } } };
112
113struct Wrap {
114 void *func;
115};
116int global;
117void inc_global (void)
118{
119 global++;
120}
121
122struct Wrap global_wrap[] = {
123 ((struct Wrap) {inc_global}),
124 inc_global,
125};
126
127#include <stdio.h>
128void print_ (const char *name, const u8 *p, long size)
129{
130 printf ("%s:", name);
131 while (size--) {
132 printf (" %x", *p++);
133 }
134 printf ("\n");
135}
136#define print(x) print_(#x, (u8*)&x, sizeof (x))
137#if 1
138void foo (struct W *w, struct pkthdr *phdr_)
139{
140 struct S ls = {1, 2, 3, 4};
141 struct S ls2 = {1, 2, {3, 4}};
142 struct T lt = {"hello", 42};
143 struct U lu = {3, 5,6,7,8, 4, "huhu", 43};
144 struct U lu1 = {3, ls, 4, {"huhu", 43}};
145 struct U lu2 = {3, (ls), 4, {"huhu", 43}};
146 const struct S *pls = &ls;
147 struct S ls21 = *pls;
148 struct U lu22 = {3, *pls, 4, {"huhu", 43}};
149 /* Incomplete bracing. */
150 struct U lu21 = {3, ls, 4, "huhu", 43};
151 /* Optional braces around scalar initializers. Accepted, but with
152 a warning. */
153 struct U lu3 = { 3, {5,6,7,8,}, 4, {"huhu", 43}};
154 /* Many superfluous braces and leaving out one initializer for U.s.c[1] */
155 struct U lu4 = { 3, {5,6,7,}, 5, { "bla", 44} };
156 /* Superfluous braces and useless parens around values */
157 struct S ls3 = { (1), (2), {(((3))), 4}};
158 /* Superfluous braces, and leaving out braces for V.t, plus cast */
159 struct V lv = {{3,4,{5,6}}, "haha", (u8)45, 46};
160 /* Compound literal */
161 struct V lv2 = {(struct S)w->t.s, {"hihi", 47}, 48};
162 /* Parens around compound literal */
163 struct V lv3 = {((struct S){7,8,{9,10}}), ((const struct W *)w)->t.t, 50};
164 const struct pkthdr *phdr = phdr_;
165 struct flowi6 flow = { .daddr = phdr->daddr, .saddr = phdr->saddr };
166 int elt = 0x42;
167 /* Range init, overlapping */
168 struct T lt2 = { { [1 ... 5] = 9, [6 ... 10] = elt, [4 ... 7] = elt+1 }, 1 };
169 print(ls);
170 print(ls2);
171 print(lt);
172 print(lu);
173 print(lu1);
174 print(lu2);
175 print(ls21);
176 print(lu21);
177 print(lu22);
178 print(lu3);
179 print(lu4);
180 print(ls3);
181 print(lv);
182 print(lv2);
183 print(lv3);
184 print(lt2);
185 print(flow);
186}
187#endif
188
189void test_compound_with_relocs (void)
190{
191 struct Wrap local_wrap[] = {
192 ((struct Wrap) {inc_global}),
193 inc_global,
194 };
195 void (*p)(void);
196 p = global_wrap[0].func; p();
197 p = global_wrap[1].func; p();
198 p = local_wrap[0].func; p();
199 p = local_wrap[1].func; p();
200}
201
202void sys_ni(void) { printf("ni\n"); }
203void sys_one(void) { printf("one\n"); }
204void sys_two(void) { printf("two\n"); }
205void sys_three(void) { printf("three\n"); }
206typedef void (*fptr)(void);
207const fptr table[3] = {
208 [0 ... 2] = &sys_ni,
209 [0] = sys_one,
210 [1] = sys_two,
211 [2] = sys_three,
212};
213
214void test_multi_relocs(void)
215{
216 int i;
217 for (i = 0; i < sizeof(table)/sizeof(table[0]); i++)
218 table[i]();
219}
220
221
222/* Following is from GCC gcc.c-torture/execute/20050613-1.c. */
223
224struct SEA { int i; int j; int k; int l; };
225struct SEB { struct SEA a; int r[1]; };
226struct SEC { struct SEA a; int r[0]; };
227struct SED { struct SEA a; int r[]; };
228
229static void
230test_correct_filling (struct SEA *x)
231{
232 static int i;
233 if (x->i != 0 || x->j != 5 || x->k != 0 || x->l != 0)
234 printf("sea_fill%d: wrong\n", i);
235 else
236 printf("sea_fill%d: okay\n", i);
237 i++;
238}
239
240int
241test_zero_init (void)
242{
243 /* The peculiarity here is that only a.j is initialized. That
244 means that all other members must be zero initialized. TCC
245 once didn't do that for sub-level designators. */
246 struct SEB b = { .a.j = 5 };
247 struct SEC c = { .a.j = 5 };
248 struct SED d = { .a.j = 5 };
249 test_correct_filling (&b.a);
250 test_correct_filling (&c.a);
251 test_correct_filling (&d.a);
252 return 0;
253}
254
255
256int main()
257{
258 print(ce);
259 print(gs);
260 print(gs2);
261 print(gt);
262 print(gu);
263 print(gu2);
264 print(gu3);
265 print(gu4);
266 print(gs3);
267 print(gv);
268 print(gv2);
269 print(gv3);
270 print(sinit16);
271 print(gw);
272 print(gsu);
273 print(guv);
274 print(guv.b);
275 print(guv2);
276 print(guv3);
277 print(phdr);
278 foo(&gw, &phdr);
279 //printf("q: %s\n", q);
280 test_compound_with_relocs();
281 test_multi_relocs();
282 test_zero_init();
283 return 0;
284}
Note: See TracBrowser for help on using the repository browser.