tests/tests2/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 struct {
  92     int (*print)(const char *format, ...);
  93 } tst_indir = {
  94     printf
  95 };
  96
  97 void tst_indir_func(void)
  98 {
  99     tst_indir.print("tst_indir_func %d\n", 10);
 100 }
 101
 102 struct V {
 103   int x, y, z;
 104 };
 105
 106 struct V vec(void)
 107 {
 108   return (struct V) { 1, 2, 3 };
 109 }
 110
 111 void func(float f, struct V v)
 112 {
 113   printf("%g\n", f);
 114 }
 115
 116 void tst_struct_return_align(void)
 117 {
 118   float d = 5.0f;
 119   func(d, vec());
 120 }
 121
 122 int
 123 main (void)
 124 {
 125   struct big_struct big;
 126
 127   tst_branch();
 128   tst_shift();
 129   tst_void_ptr(&big.a[0], 0);
 130 #if !defined(_WIN32)
 131   tst_const_addr();
 132 #endif
 133   tst_zero_struct();
 134   tst_big(big);
 135   tst_adr(&sprintf);
 136   tst_compare();
 137   tst_pack();
 138   tst_cast();
 139   tst_indir_func();
 140   tst_struct_return_align();
 141 }