gcc/testsuite/gcc.target/powerpc/sse4_1-ptest-1.c

   1 /* { dg-do run } */
   2 /* { dg-require-effective-target p8vector_hw } */
   3 /* { dg-options "-O2 -mvsx -Wno-psabi" } */
   4 /* { dg-additional-options "-mdejagnu-cpu=power8" { target { ! has_arch_pwr8 } } } */
   5
   6 #ifndef CHECK_H
   7 #define CHECK_H "sse4_1-check.h"
   8 #endif
   9
  10 #ifndef TEST
  11 #define TEST sse4_1_test
  12 #endif
  13
  14 #include CHECK_H
  15
  16 #include <smmintrin.h>
  17
  18 static int
  19 make_ptestz (__m128i m, __m128i v)
  20 {
  21   union
  22     {
  23       __m128i x;
  24       unsigned char c[16];
  25     } val, mask;
  26   int i, z;
  27
  28   mask.x = m;
  29   val.x = v;
  30
  31   z = 1;
  32   for (i = 0; i < 16; i++)
  33     if ((mask.c[i] & val.c[i]))
  34       {
  35         z = 0;
  36         break;
  37       }
  38   return z;
  39 }
  40
  41 static int
  42 make_ptestc (__m128i m, __m128i v)
  43 {
  44   union
  45     {
  46       __m128i x;
  47       unsigned char c[16];
  48     } val, mask;
  49   int i, c;
  50
  51   mask.x = m;
  52   val.x = v;
  53
  54   c = 1;
  55   for (i = 0; i < 16; i++)
  56     if ((val.c[i] & ~mask.c[i]))
  57       {
  58         c = 0;
  59         break;
  60       }
  61   return c;
  62 }
  63
  64 static void
  65 TEST (void)
  66 {
  67   union
  68     {
  69       __m128i x;
  70       unsigned int i[4];
  71     } val[4];
  72   int i, j, l;
  73   int res[32];
  74
  75   val[0].i[0] = 0x11111111;
  76   val[0].i[1] = 0x00000000;
  77   val[0].i[2] = 0x00000000;
  78   val[0].i[3] = 0x11111111;
  79
  80   val[1].i[0] = 0x00000000;
  81   val[1].i[1] = 0x11111111;
  82   val[1].i[2] = 0x11111111;
  83   val[1].i[3] = 0x00000000;
  84
  85   val[2].i[0] = 0;
  86   val[2].i[1] = 0;
  87   val[2].i[2] = 0;
  88   val[2].i[3] = 0;
  89
  90   val[3].i[0] = 0xffffffff;
  91   val[3].i[1] = 0xffffffff;
  92   val[3].i[2] = 0xffffffff;
  93   val[3].i[3] = 0xffffffff;
  94
  95   l = 0;
  96   for(i = 0; i < 4; i++)
  97     for(j = 0; j < 4; j++)
  98       {
  99         res[l++] = _mm_testz_si128 (val[j].x, val[i].x);
 100         res[l++] = _mm_testc_si128 (val[j].x, val[i].x);
 101       }
 102
 103   l = 0;
 104   for(i = 0; i < 4; i++)
 105     for(j = 0; j < 4; j++)
 106       {
 107         if (res[l++] != make_ptestz (val[j].x, val[i].x))
 108           abort ();
 109         if (res[l++] != make_ptestc (val[j].x, val[i].x))
 110           abort ();
 111       }
 112
 113   if (res[2] != _mm_testz_si128 (val[1].x, val[0].x))
 114     abort ();
 115
 116   if (res[3] != _mm_testc_si128 (val[1].x, val[0].x))
 117     abort ();
 118 }