sdcc/support/regression/tcc/119_random_stuff.c

   1 #include <stdio.h>
   2
   3 struct big_struct { char a[262144]; };
   4
   5 static const char str[] = "abcdefghijklmnopqrstuvwxyz";
   6
   7 void tst_branch(void)
   8 {
   9   printf("tst_branch --");
  10   goto *&&a;
  11   printf (" dummy");
  12 a: ;
  13   printf(" --\n");
  14 }
  15
  16 void tst_void_ptr(void *pv, int i)
  17 {
  18   i ? *pv : *pv; // dr106
  19 }
  20
  21 void tst_shift(void)
  22 {
  23   int i = 1;
  24   long long l = 1;
  25   i = i << 32; // illegal. just test
  26   l = l << 64; // illegal. just test
  27 }
  28
  29 #if !defined(_WIN32)
  30 #include <sys/mman.h>
  31
  32 void tst_const_addr(void)
  33 {
  34   void *addr = mmap ((void *)0x20000000, 4096, PROT_READ | PROT_WRITE, MAP_FIXED | MAP_ANONYMOUS, -1, 0);
  35   if (addr != (void *) -1) {
  36     *(int *)0x20000000 += 42;
  37     munmap (addr, 4096);
  38   }
  39 }
  40 #endif
  41
  42 struct zero_struct {};
  43
  44 struct zero_struct tst_zero_struct(void)
  45 {
  46   struct zero_struct ret;
  47   return ret;
  48 }
  49
  50 struct big_struct tst_big(struct big_struct tst)
  51 {
  52    return tst;
  53 }
  54
  55 void tst_adr (int (*fp)(char *, const char *, ...))
  56 {
  57   char buf[10];
  58   (*fp)(buf, "%.0f", 5.0);
  59   printf("tst_adr %s\n", buf);
  60 }
  61
  62 int tst(void)
  63 {
  64   long long value = 3;
  65   return -value;
  66 }
  67
  68 void tst_compare(void)
  69 {
  70   /* This failed on risc64 */
  71   printf ("tst_compare: %s\n", tst() > 0 ? "error" : "ok");
  72 }
  73
  74 #pragma pack(1)
  75 struct S { int d:24; int f:14; } i, j;
  76 #pragma pack()
  77
  78 void tst_pack (void)
  79 {
  80   i.f = 5; j.f = 5;
  81   printf("tst_pack: j.f = %d, i.f = %d\n", j.f, i.f);
  82 }
  83
  84 void tst_cast(void)
  85 {
  86   signed char c = (signed char) 0xaaaaaaaa;
  87   int r = (unsigned short) c ^ (signed char) 0x99999999;
  88   printf ("schar to ushort cast: %x\n", r);
  89 }
  90
  91 int
  92 main (void)
  93 {
  94   struct big_struct big;
  95
  96   tst_branch();
  97   tst_shift();
  98   tst_void_ptr(&big.a[0], 0);
  99 #if !defined(_WIN32)
 100   tst_const_addr();
 101 #endif
 102   tst_zero_struct();
 103   tst_big(big);
 104   tst_adr(&sprintf);
 105   tst_compare();
 106   tst_pack();
 107   tst_cast();
 108 }