gcc/testsuite/gcc.dg/torture/pr52028.c

   1 /* { dg-do run } */
   2 /* { dg-require-effective-target int32plus } */
   3 /* { dg-options "-ftree-loop-distribution" } */
   4
   5 #define CAST_LONG unsigned int
   6 typedef struct cast_key_st
   7 {
   8   CAST_LONG data[32];
   9 } CAST_KEY;
  10 #define CAST_exp(l,A,a,n) \
  11         A[n/4]=l; \
  12         a[n+3]=(l    )&0xff; \
  13         a[n+2]=(l>> 8)&0xff; \
  14         a[n+1]=(l>>16)&0xff; \
  15         a[n+0]=(l>>24)&0xff;
  16
  17 CAST_LONG CAST_S_table[1024];
  18
  19 #define S4 (CAST_S_table + 000)
  20 #define S5 (CAST_S_table + 256)
  21 #define S6 (CAST_S_table + 512)
  22 #define S7 (CAST_S_table + 768)
  23
  24 void
  25 CAST_set_key (CAST_KEY * key)
  26 {
  27   CAST_LONG x[16];
  28   CAST_LONG z[16];
  29   CAST_LONG k[32];
  30   CAST_LONG X[4] = {0,0,0,0}, Z[4];
  31   CAST_LONG l, *K = k;
  32   int i;
  33   for (i = 0; i < 16; i++)
  34     x[i] = 0;
  35   for (;;)
  36     {
  37       l = X[0] ^ S4[x[13]] ^ S5[x[15]] ^ S6[x[12]] ^ S7[x[14]] ^ S6[x[8]];
  38       CAST_exp (l, Z, z, 0);
  39       CAST_exp (l, Z, z, 4);
  40       CAST_exp (l, Z, z, 8);
  41       CAST_exp (l, Z, z, 12);
  42       K[0] = S4[z[8]] ^ S5[z[9]] ^ S6[z[7]] ^ S7[z[6]] ^ S4[z[2]];
  43       K[1] = S4[z[10]] ^ S5[z[11]] ^ S6[z[5]] ^ S7[z[4]] ^ S5[z[6]];
  44       K[2] = S4[z[12]] ^ S5[z[13]] ^ S6[z[3]] ^ S7[z[2]] ^ S6[z[9]];
  45       K[3] = S4[z[14]] ^ S5[z[15]] ^ S6[z[1]] ^ S7[z[0]] ^ S7[z[12]];
  46       K[4] = S4[x[3]] ^ S5[x[2]] ^ S6[x[12]] ^ S7[x[13]] ^ S4[x[8]];
  47       K[5] = S4[x[1]] ^ S5[x[0]] ^ S6[x[14]] ^ S7[x[15]] ^ S5[x[13]];
  48       K[6] = S4[x[7]] ^ S5[x[6]] ^ S6[x[8]] ^ S7[x[9]] ^ S6[x[3]];
  49       K[7] = S4[x[5]] ^ S5[x[4]] ^ S6[x[10]] ^ S7[x[11]] ^ S7[x[7]];
  50       K[8] = S4[z[3]] ^ S5[z[2]] ^ S6[z[12]] ^ S7[z[13]] ^ S4[z[9]];
  51       K[9] = S4[z[1]] ^ S5[z[0]] ^ S6[z[14]] ^ S7[z[15]] ^ S5[z[12]];
  52       K[10] = S4[z[7]] ^ S5[z[6]] ^ S6[z[8]] ^ S7[z[9]] ^ S6[z[2]];
  53       K[11] = S4[z[5]] ^ S5[z[4]] ^ S6[z[10]] ^ S7[z[11]] ^ S7[z[6]];
  54       l = Z[2] ^ S4[z[5]] ^ S5[z[7]] ^ S6[z[4]] ^ S7[z[6]] ^ S6[z[0]];
  55       CAST_exp (l, X, x, 0);
  56       K[12] = S4[x[8]] ^ S5[x[9]] ^ S6[x[7]] ^ S7[x[6]] ^ S4[x[3]];
  57       K[13] = S4[x[10]] ^ S5[x[11]] ^ S6[x[5]] ^ S7[x[4]] ^ S5[x[7]];
  58       K[14] = S4[x[12]] ^ S5[x[13]] ^ S6[x[3]] ^ S7[x[2]] ^ S6[x[8]];
  59       K[15] = S4[x[14]] ^ S5[x[15]] ^ S6[x[1]] ^ S7[x[0]] ^ S7[x[13]];
  60       if (K != k)
  61         break;
  62       K += 16;
  63     }
  64   for (i = 0; i < 16; i++)
  65     {
  66       key->data[i * 2] = k[i];
  67       key->data[i * 2 + 1] = ((k[i + 16]) + 16) & 0x1f;
  68     }
  69 }
  70
  71 int
  72 main ()
  73 {
  74   CAST_KEY ref = { {0x0069B3F8, 0x00000013, 0x000AEFF8, 0x00000013, 0x004AD0E0, 0x0000001B, 0x00818F18, 0x00000018, 0x008FF000, 0x0000001B, 0x002D1C00, 0x0000001B, 0x00EA2800, 0x00000010, 0x00C73400, 0x00000010, 0x004BF8E0, 0x0000001B, 0x00B3D718, 0x00000018, 0x00B0EBF8, 0x00000013, 0x003247F8, 0x00000013, 0x00C5BA20, 0x00000010, 0x002D1C00, 0x00000010, 0x0060822B, 0x00000008, 0x0096236B, 0x0000001B} };
  75   CAST_KEY key;
  76   unsigned i;
  77   for (i = 1; i < 1024; i++)
  78     CAST_S_table[i] = (CAST_S_table[i-1] * 7 + 3) & 0xFFFFFF;
  79   CAST_set_key (&key);
  80   if (__builtin_memcmp(&ref, &key, sizeof(ref)))
  81     __builtin_abort();
  82   return 0;
  83 }