gcc/testsuite/gcc.target/powerpc/ssse3-pshufb.c

   1 /* { dg-do run } */
   2 /* { dg-options "-O3 -mvsx -Wno-psabi" } */
   3 /* { dg-additional-options "-mdejagnu-cpu=power8" { target { ! has_arch_pwr8 } } } */
   4 /* { dg-require-effective-target p8vector_hw } */
   5
   6 #ifndef CHECK_H
   7 #define CHECK_H "ssse3-check.h"
   8 #endif
   9
  10 #ifndef TEST
  11 #define TEST ssse3_test
  12 #endif
  13
  14 #include CHECK_H
  15
  16 #include "ssse3-vals.h"
  17
  18 #include <tmmintrin.h>
  19
  20 #ifndef __AVX__
  21 /* Test the 64-bit form */
  22 static void
  23 ssse3_test_pshufb (__m64 *i1, __m64 *i2, __m64 *r)
  24 {
  25   *r = _mm_shuffle_pi8 (*i1, *i2);
  26   _mm_empty ();
  27 }
  28 #endif
  29
  30 /* Test the 128-bit form */
  31 static void
  32 ssse3_test_pshufb128 (__m128i *i1, __m128i *i2, __m128i *r)
  33 {
  34   /* Assumes incoming pointers are 16-byte aligned */
  35   *r = _mm_shuffle_epi8 (*i1, *i2);
  36 }
  37
  38 #ifndef __AVX__
  39 /* Routine to manually compute the results */
  40 static void
  41 compute_correct_result_64 (signed char *i1, signed char *i2, signed char *r)
  42 {
  43   int i;
  44   char select;
  45
  46   for (i = 0; i < 16; i++)
  47     {
  48       select = i2[i];
  49       if (select & 0x80)
  50         r[i] = 0;
  51       else if (i < 8)
  52         r[i] = i1[select & 0x7];
  53       else
  54         r[i] = i1[8 + (select & 0x7)];
  55     }
  56 }
  57 #endif
  58
  59 static void
  60 compute_correct_result_128 (signed char *i1, signed char *i2, signed char *r)
  61 {
  62   int i;
  63   char select;
  64
  65   for (i = 0; i < 16; i++)
  66     {
  67       select = i2[i];
  68       if (select & 0x80)
  69         r[i] = 0;
  70       else
  71         r[i] = i1[select & 0xf];
  72     }
  73 }
  74
  75 static void
  76 TEST (void)
  77 {
  78   int i;
  79   union data r __attribute__ ((aligned(16)));
  80   union data ck;
  81   int fail = 0;
  82
  83   for (i = 0; i < ARRAY_SIZE (vals) - 1; i++)
  84     {
  85 #ifndef __AVX__
  86       /* Manually compute the result */
  87       compute_correct_result_64 (&vals[i + 0].b[0], &vals[i + 1].b[0], &ck.b[0]);
  88
  89       /* Run the 64-bit tests */
  90       ssse3_test_pshufb (&vals[i + 0].ll[0], &vals[i + 1].ll[0], &r.ll[0]);
  91       ssse3_test_pshufb (&vals[i + 0].ll[1], &vals[i + 1].ll[1], &r.ll[1]);
  92       fail += chk_128 (ck.m[0], r.m[0]);
  93 #endif
  94
  95       /* Recompute the result for 128-bits */
  96       compute_correct_result_128 (&vals[i + 0].b[0], &vals[i + 1].b[0], &ck.b[0]);
  97
  98       /* Run the 128-bit tests */
  99       ssse3_test_pshufb128 (&vals[i + 0].m[0], &vals[i + 1].m[0], &r.m[0]);
 100       fail += chk_128 (ck.m[0], r.m[0]);
 101     }
 102
 103   if (fail != 0)
 104     abort ();
 105 }