herman ten bruggeFix test90 for 32 bits targetsec818773 years agoHistory
424 lines · 9.5 KB · C
RawDownload
typedef unsigned char u8;typedef struct {} empty_s;struct contains_empty {    u8 a;    empty_s empty;    u8 b;};struct contains_empty ce = { { (1) }, (empty_s){}, 022, };/* The following decl of 'q' would demonstrate the TCC bug in init_putv when   handling copying compound literals.  (Compound literals   aren't acceptable constant initializers in isoc99, but   we accept them like gcc, except for this case)//char *q = (char *){ "trara" }; */struct SS {u8 a[3], b; };struct SS sinit16[] = { { 1 }, 2 };struct S{  u8 a,b;  u8 c[2];}; struct T{  u8 s[16];  u8 a;}; struct U{  u8 a;  struct S s;  u8 b;  struct T t;}; struct V{  struct S s;  struct T t;  u8 a;}; struct W{  struct V t;  struct S s[];}; struct S gs = ((struct S){1, 2, 3, 4});struct S gs2 = {1, 2, {3, 4}};struct T gt = {"hello", 42};struct U gu = {3, 5,6,7,8, 4, "huhu", 43};struct U gu2 = {3, {5,6,7,8}, 4, {"huhu", 43}};/* Optional braces around scalar initializers.  Accepted, but with   a warning.  */struct U gu3 = { {3}, {5,6,7,8,}, 4, {"huhu", 43}};/* Many superfluous braces and leaving out one initializer for U.s.c[1] */struct U gu4 = { 3, {5,6,7,},  5, { "bla", {44}} };/* Superfluous braces and useless parens around values */struct S gs3 = { (1), {(2)}, {(((3))), {4}}};/* Superfluous braces, and leaving out braces for V.t, plus cast */struct V gv = {{{3},4,{5,6}}, "haha", (u8)45, 46};/* Compound literal */struct V gv2 = {(struct S){7,8,{9,10}}, {"hihi", 47}, 48};/* Parens around compound literal */struct V gv3 = {((struct S){7,8,{9,10}}), {"hoho", 49}, 50};/* Initialization of a flex array member (warns in GCC) */struct W gw = {{1,2,3,4}, {1,2,3,4,5}}; union UU {    u8 a;    u8 b;};struct SU {    union UU u;    u8 c;};struct SU gsu = {5,6}; /* Unnamed struct/union members aren't ISO C, but it's a widely accepted   extension.  See below for further extensions to that under -fms-extension.*/union UV {    struct {u8 a,b;};    struct S s;};union UV guv = {{6,5}};union UV guv2 = {{.b = 7, .a = 8}};union UV guv3 = {.b = 8, .a = 7}; struct SSU {    int y;    struct { int x; };};struct SSU gssu1 = { .y = 5, .x = 3 };struct SSU gssu2 = { 5, 3 }; /* Under -fms-extensions also the following is valid:union UV2 {    struct Anon {u8 a,b;};    // unnamed member, but tagged struct, ...    struct S s;};struct Anon gan = { 10, 11 }; // ... which makes it available here.union UV2 guv4 = {{4,3}};     // and the other inits from above as well*/ struct in6_addr {    union {	u8 u6_addr8[16];	unsigned short u6_addr16[8];    } u;};struct flowi6 {    struct in6_addr saddr, daddr;};struct pkthdr {    struct in6_addr daddr, saddr;};struct pkthdr phdr = { { { 6,5,4,3 } }, { { 9,8,7,6 } } }; struct Wrap {    void *func;};int global;void inc_global (void){  global++;} struct Wrap global_wrap[] = {    ((struct Wrap) {inc_global}),    inc_global,}; #include <stdio.h>void print_ (const char *name, const u8 *p, long size){  printf ("%s:", name);  while (size--) {      printf (" %x", *p++);  }  printf ("\n");}#define print(x) print_(#x, (u8*)&x, sizeof (x))#if 1void foo (struct W *w, struct pkthdr *phdr_){  struct S ls = {1, 2, 3, 4};  struct S ls2 = {1, 2, {3, 4}};  struct T lt = {"hello", 42};  struct U lu = {3, 5,6,7,8, 4, "huhu", 43};  struct U lu1 = {3, ls, 4, {"huhu", 43}};  struct U lu2 = {3, (ls), 4, {"huhu", 43}};  const struct S *pls = &ls;  struct S ls21 = *pls;  struct U lu22 = {3, *pls, 4, {"huhu", 43}};  /* Incomplete bracing.  */  struct U lu21 = {3, ls, 4, "huhu", 43};  /* Optional braces around scalar initializers.  Accepted, but with     a warning.  */  struct U lu3 = { 3, {5,6,7,8,}, 4, {"huhu", 43}};  /* Many superfluous braces and leaving out one initializer for U.s.c[1] */  struct U lu4 = { 3, {5,6,7,},  5, { "bla", 44} };  /* Superfluous braces and useless parens around values */  struct S ls3 = { (1), (2), {(((3))), 4}};  /* Superfluous braces, and leaving out braces for V.t, plus cast */  struct V lv = {{3,4,{5,6}}, "haha", (u8)45, 46};  /* Compound literal */  struct V lv2 = {(struct S)w->t.s, {"hihi", 47}, 48};  /* Parens around compound literal */  struct V lv3 = {((struct S){7,8,{9,10}}), ((const struct W *)w)->t.t, 50};  const struct pkthdr *phdr = phdr_;  struct flowi6 flow = { .daddr = phdr->daddr, .saddr = phdr->saddr };  int elt = 0x42;  /* Range init, overlapping */  struct T lt2 = { { [1 ... 5] = 9, [6 ... 10] = elt, [4 ... 7] = elt+1 }, 1 };  struct SSU lssu1 = { 5, 3 };  struct SSU lssu2 = { .y = 5, .x = 3 };  /* designated initializers in GNU form */#if defined(__GNUC__) || defined(__TINYC__)  struct S ls4 = {a: 1, b: 2, c: {3, 4}};#else  struct S ls4 = {.a = 1, .b = 2, .c = {3, 4}};#endif  print(ls);  print(ls2);  print(lt);  print(lu);  print(lu1);  print(lu2);  print(ls21);  print(lu21);  print(lu22);  print(lu3);  print(lu4);  print(ls3);  print(lv);  print(lv2);  print(lv3);  print(lt2);  print(lssu1);  print(lssu2);  print(flow);  print(ls4);}#endif void test_compound_with_relocs (void){  struct Wrap local_wrap[] = {      ((struct Wrap) {inc_global}),      inc_global,  };  void (*p)(void);  p = global_wrap[0].func; p();  p = global_wrap[1].func; p();  p = local_wrap[0].func; p();  p = local_wrap[1].func; p();} void sys_ni(void) { printf("ni\n"); }void sys_one(void) { printf("one\n"); }void sys_two(void) { printf("two\n"); }void sys_three(void) { printf("three\n"); }void sys_four(void) { printf("four\n"); }typedef void (*fptr)(void); #define array_size(a) (sizeof a / sizeof a[0]) void test_multi_relocs(void){  int i;   static const fptr tabl1[4] = {      [0 ... 3] = &sys_ni,      [0] = sys_one,      [1] = sys_two,      [2] = sys_three,      sys_four,      [1 ... 2] = &sys_ni,      [1] = 0,  };  for (i = 0; i < array_size(tabl1); i++)    if (tabl1[i])      tabl1[i]();    else      printf("(0)\n");   const fptr tabl2[4] = {      [0 ... 3] = &sys_ni,      [0] = sys_one,      [1] = sys_two,      [2] = sys_three,      sys_four,      [1 ... 2] = &sys_ni,      [1] = 0,  };  for (i = 0; i < array_size(tabl2); i++)    if (tabl2[i])      tabl2[i]();    else      printf("(0)\n");   int c = 0;  int dd[] = {    [0 ... 1] = ++c,    [2 ... 3] = ++c  };  for (i = 0; i < array_size(dd); i++)    printf(" %d", dd[i]);  printf("\n");   /* multi-dimensional flex array with range initializers */  static char m1[][2][3] = {[0 ... 2]={{3,4,5},{6,7,8}},{{9},10},"abc"};  char        m2[][2][3] = {[0 ... 2]={{3,4,5},{6,7,8}},{{9},10},"abc"};  int g, j, k;  for (g = 2; g-- > 0;) {    printf("mdfa %s: %d -", "locl\0glob" + g * 5, sizeof m1);    for (i = 0; i < array_size(m1); i++)    for (j = 0; j < array_size(m1[0]); j++)    for (k = 0; k < array_size(m1[0][0]); k++)      printf(" %d", (g ? m1:m2)[i][j][k]);    printf("\n");  }} void test_init_ranges(void) {    int i,c=0;    static void *gostring[] = {        [0 ... 31] = &&l_bad, [127] = &&l_bad,        [32 ... 126] = &&l_loop,        ['\\'] = &&l_esc, ['"'] = &&l_qdown,        [128 ... 191] = &&l_bad,        [192 ... 223] = &&l_utf8_2,        [224 ... 239] = &&l_utf8_3,        [240 ... 247] = &&l_utf8_4,        [248 ... 255] = &&l_bad    };     for (i = 0; i < 256; i++) {        goto *gostring[i];        l_bad: c++;        l_loop: c++;        l_esc: c++;        l_qdown: c++;        l_utf8_2: c++;        l_utf8_3: c++;        l_utf8_4: c++;    }    printf ("%d\n", c);} /* Following is from GCC gcc.c-torture/execute/20050613-1.c.  */ struct SEA { int i; int j; int k; int l; };struct SEB { struct SEA a; int r[1]; };struct SEC { struct SEA a; int r[0]; };struct SED { struct SEA a; int r[]; }; static voidtest_correct_filling (struct SEA *x){  static int i;  if (x->i != 0 || x->j != 5 || x->k != 0 || x->l != 0)    printf("sea_fill%d: wrong\n", i);  else    printf("sea_fill%d: okay\n", i);  i++;} inttest_zero_init (void){  /* The peculiarity here is that only a.j is initialized.  That     means that all other members must be zero initialized.  TCC     once didn't do that for sub-level designators.  */  struct SEB b = { .a.j = 5 };  struct SEC c = { .a.j = 5 };  struct SED d = { .a.j = 5 };  test_correct_filling (&b.a);  test_correct_filling (&c.a);  test_correct_filling (&d.a);  return 0;} void test_init_struct_from_struct(void){    int i = 0;    struct S {int x,y;}        a = {1,2},        b = {3,4},        c[] = {a,b},        d[] = {++i, ++i, ++i, ++i},        e[] = {b, (struct S){5,6}}        ;     printf("%s: %d %d %d %d - %d %d %d %d - %d %d %d %d\n",        __FUNCTION__,        c[0].x,        c[0].y,        c[1].x,        c[1].y,        d[0].x,        d[0].y,        d[1].x,        d[1].y,        e[0].x,        e[0].y,        e[1].x,        e[1].y        );} typedef struct {    unsigned int a;    unsigned int : 32;    unsigned int b;    unsigned long long : 64;    unsigned int c;} tst_bf; tst_bf arr[] = { { 1, 2, 3 } }; voidtest_init_bf(void){    printf ("%s: %d %d %d\n", __FUNCTION__, arr[0].a, arr[0].b, arr[0].c);} int main(){  print(ce);  print(gs);  print(gs2);  print(gt);  print(gu);  print(gu2);  print(gu3);  print(gu4);  print(gs3);  print(gv);  print(gv2);  print(gv3);  print(sinit16);  print(gw);  print(gsu);  print(guv);  print(guv.b);  print(guv2);  print(guv3);  print(gssu1);  print(gssu2);  print(phdr);  foo(&gw, &phdr);  //printf("q: %s\n", q);  test_compound_with_relocs();  test_multi_relocs();  test_zero_init();  test_init_ranges();  test_init_struct_from_struct();  test_init_bf();  return 0;}

Keyboard shortcuts

General

Show keyboard shortcuts
?
Focus the current search
/

Issues and pull requests

Open filters
f

Issues, pull requests and Inbox

Select next item
j↓
Select previous item
k↑
Open selected item
Enter
Dismiss filters or clear selection
Esc

Repository code

Go to file
t