gcc/testsuite/gcc.target/powerpc/vsx_mask-expand-runnable.c

   1 /* { dg-do run { target { power10_hw } } } */
   2 /* { dg-do link { target { ! power10_hw } } } */
   3 /* { dg-options "-mdejagnu-cpu=power10 -O2 -save-temps" } */
   4 /* { dg-require-effective-target power10_ok } */
   5 /* { dg-require-effective-target int128 } */
   6
   7 /* Check that the expected 128-bit instructions are generated if the processor
   8    supports the 128-bit integer instructions. */
   9 /* { dg-final { scan-assembler-times {\mvexpandbm\M} 1 } } */
  10 /* { dg-final { scan-assembler-times {\mvexpandhm\M} 1 } } */
  11 /* { dg-final { scan-assembler-times {\mvexpandwm\M} 1 } } */
  12 /* { dg-final { scan-assembler-times {\mvexpanddm\M} 1 } } */
  13 /* { dg-final { scan-assembler-times {\mvexpandqm\M} 1 } } */
  14
  15 #define DEBUG 0
  16
  17 #if DEBUG
  18 #include <stdio.h>
  19 #include <stdlib.h>
  20 #endif
  21 #include <altivec.h>
  22
  23 void abort (void);
  24
  25 int main ()
  26 {
  27   int i, num_elements;
  28   unsigned long long arg1;
  29
  30   vector unsigned char  vbc_result_bi, vbc_expected_result_bi;
  31   vector unsigned short vbc_result_hi, vbc_expected_result_hi;
  32   vector unsigned int  vbc_result_wi, vbc_expected_result_wi;
  33   vector unsigned long long vbc_result_di, vbc_expected_result_di;
  34   vector __uint128_t vbc_result_qi, vbc_expected_result_qi;
  35
  36   unsigned int result_wi, expected_result_wi;
  37   unsigned long long result, expected_result;
  38   const unsigned char mp=1;
  39   vector unsigned char vbc_bi_src;
  40   vector unsigned short vbc_hi_src;
  41   vector unsigned int vbc_wi_src;
  42   vector unsigned long long vbc_di_src;
  43   vector __uint128_t vbc_qi_src;
  44
  45   /* vexpandbm */
  46   num_elements = 16;
  47   vbc_bi_src[0] = 0xFF;
  48   vbc_bi_src[1] = 0xFF;
  49   vbc_bi_src[2] = 0x0;
  50   vbc_bi_src[3] = 0x0;
  51   vbc_bi_src[4] = 0x0;
  52   vbc_bi_src[5] = 0x0;
  53   vbc_bi_src[6] = 0xFF;
  54   vbc_bi_src[7] = 0xFF;
  55   vbc_bi_src[8] = 0x0;
  56   vbc_bi_src[9] = 0x0;
  57   vbc_bi_src[10] = 0x0;
  58   vbc_bi_src[11] = 0x0;
  59   vbc_bi_src[12] = 0x0;
  60   vbc_bi_src[13] = 0xFF;
  61   vbc_bi_src[14] = 0xFF;
  62   vbc_bi_src[15] = 0xFF;
  63
  64   vbc_expected_result_bi[0] = 0xFF;
  65   vbc_expected_result_bi[1] = 0xFF;
  66   vbc_expected_result_bi[2] = 0x0;
  67   vbc_expected_result_bi[3] = 0x0;
  68   vbc_expected_result_bi[4] = 0x0;
  69   vbc_expected_result_bi[5] = 0x0;
  70   vbc_expected_result_bi[6] = 0xFF;
  71   vbc_expected_result_bi[7] = 0xFF;
  72   vbc_expected_result_bi[8] = 0x0;
  73   vbc_expected_result_bi[9] = 0x0;
  74   vbc_expected_result_bi[10] = 0x0;
  75   vbc_expected_result_bi[11] = 0x0;
  76   vbc_expected_result_bi[12] = 0x0;
  77   vbc_expected_result_bi[13] = 0xFF;
  78   vbc_expected_result_bi[14] = 0xFF;
  79   vbc_expected_result_bi[15] = 0xFF;
  80
  81   vbc_result_bi = vec_expandm (vbc_bi_src);
  82
  83   for (i = 0; i<num_elements; i++) {
  84     if (vbc_result_bi[i] != vbc_expected_result_bi[i]) {
  85 #if DEBUG
  86       printf("ERROR: char vec_expandm(arg) ");
  87       printf("element %d, 0x%x does not match expected value = 0x%x\n",
  88              i, vbc_result_bi[i], vbc_expected_result_bi[i]);
  89 #else
  90     abort();
  91 #endif
  92     }
  93   }
  94
  95   /* vexpandhm */
  96   num_elements = 8;
  97   vbc_hi_src[0] = 0x0;
  98   vbc_hi_src[1] = 0xFFFF;
  99   vbc_hi_src[2] = 0x0;
 100   vbc_hi_src[3] = 0xFFFF;
 101   vbc_hi_src[4] = 0x0;
 102   vbc_hi_src[5] = 0x0;
 103   vbc_hi_src[6] = 0xFFFF;
 104   vbc_hi_src[7] = 0xFFFF;
 105
 106   vbc_expected_result_hi[0] = 0x0;
 107   vbc_expected_result_hi[1] = 0xFFFF;
 108   vbc_expected_result_hi[2] = 0x0;
 109   vbc_expected_result_hi[3] = 0xFFFF;
 110   vbc_expected_result_hi[4] = 0x0;
 111   vbc_expected_result_hi[5] = 0x0;
 112   vbc_expected_result_hi[6] = 0xFFFF;
 113   vbc_expected_result_hi[7] = 0xFFFF;
 114
 115   vbc_result_hi = vec_expandm (vbc_hi_src);
 116
 117   for (i = 0; i<num_elements; i++) {
 118     if (vbc_result_hi[i] != vbc_expected_result_hi[i]) {
 119 #if DEBUG
 120       printf("ERROR: short vec_expandm(arg) ");
 121       printf("element %d, 0x%x does not match expected value = 0x%x\n",
 122              i, vbc_result_hi[i], vbc_expected_result_hi[i]);
 123 #else
 124     abort();
 125 #endif
 126     }
 127   }
 128
 129   /* vexpandwm */
 130   num_elements = 4;
 131   vbc_wi_src[0] = 0x0;
 132   vbc_wi_src[1] = 0xFFFFFFFF;
 133   vbc_wi_src[2] = 0x0;
 134   vbc_wi_src[3] = 0xFFFFFFFF;
 135
 136   vbc_expected_result_wi[0] = 0x0;
 137   vbc_expected_result_wi[1] = 0xFFFFFFFF;
 138   vbc_expected_result_wi[2] = 0x0;
 139   vbc_expected_result_wi[3] = 0xFFFFFFFF;
 140
 141   vbc_result_wi = vec_expandm (vbc_wi_src);
 142
 143   for (i = 0; i<num_elements; i++) {
 144     if (vbc_result_wi[i] != vbc_expected_result_wi[i]) {
 145 #if DEBUG
 146       printf("ERROR: int vec_expandm(arg) ");
 147       printf("element %d, 0x%x does not match expected value = 0x%x\n",
 148              i, vbc_result_wi[i], vbc_expected_result_wi[i]);
 149 #else
 150     abort();
 151 #endif
 152     }
 153   }
 154
 155   /* vexpanddm */
 156   num_elements = 2;
 157   vbc_di_src[0] = 0x0;
 158   vbc_di_src[1] = 0xFFFFFFFFFFFFFFFFULL;
 159
 160   vbc_expected_result_di[0] = 0x0;
 161   vbc_expected_result_di[1] = 0xFFFFFFFFFFFFFFFFULL;
 162
 163   vbc_result_di = vec_expandm (vbc_di_src);
 164
 165   for (i = 0; i<num_elements; i++) {
 166     if (vbc_result_di[i] != vbc_expected_result_di[i]) {
 167 #if DEBUG
 168       printf("ERROR: double vec_expandm(arg) ");
 169       printf("element %d, 0x%llx does not match expected value = 0x%llx\n",
 170              i, vbc_result_di[i], vbc_expected_result_di[i]);
 171 #else
 172     abort();
 173 #endif
 174     }
 175   }
 176
 177   /* vexpandqm */
 178   num_elements = 1;
 179   vbc_qi_src[0] = 0x0;
 180
 181   vbc_expected_result_qi[0] = 0x0;
 182
 183   vbc_result_qi = vec_expandm (vbc_qi_src);
 184
 185   if (vbc_result_qi[0] != vbc_expected_result_qi[0]) {
 186 #if DEBUG
 187     printf("ERROR: quad vec_expandm(arg) ");
 188     printf("element %d, 0x%x does not match expected value = 0x%x\n",
 189            0, vbc_result_qi[i], vbc_expected_result_qi[i]);
 190 #else
 191     abort();
 192 #endif
 193   }
 194
 195   return 0;
 196 }