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

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