gcc/testsuite/gcc.target/i386/sse4_2-pcmpestrm-2.c

   1 /* { dg-do run } */
   2 /* { dg-require-effective-target sse4 } */
   3 /* { dg-options "-O2 -msse4.2" } */
   4
   5 #include "sse4_2-check.h"
   6 #include "sse4_2-pcmpstr.h"
   7
   8 #define NUM 1024
   9
  10 #define IMM_VAL0 \
  11   (SIDD_SBYTE_OPS | SIDD_CMP_RANGES | SIDD_MASKED_POSITIVE_POLARITY)
  12 #define IMM_VAL1 \
  13   (SIDD_UBYTE_OPS | SIDD_CMP_EQUAL_EACH | SIDD_NEGATIVE_POLARITY \
  14    | SIDD_BIT_MASK)
  15 #define IMM_VAL2 \
  16   (SIDD_UWORD_OPS | SIDD_CMP_EQUAL_ANY | SIDD_NEGATIVE_POLARITY)
  17 #define IMM_VAL3 \
  18   (SIDD_SWORD_OPS | SIDD_CMP_EQUAL_ORDERED \
  19    | SIDD_MASKED_NEGATIVE_POLARITY | SIDD_UNIT_MASK)
  20
  21 static void
  22 sse4_2_test (void)
  23 {
  24   union
  25     {
  26       __m128i x[NUM];
  27       char c[NUM *16];
  28     } src1, src2;
  29   __m128i res, correct;
  30   int correct_flags, l1, l2;
  31   int flags, cf, zf, sf, of, af;
  32   int i;
  33
  34   for (i = 0; i < NUM *16; i++)
  35     {
  36       src1.c[i] = rand ();
  37       src2.c[i] = rand ();
  38     }
  39
  40   for (i = 0; i < NUM; i++)
  41     {
  42       l1 = rand () % 18;
  43       l2 = rand () % 18;
  44
  45       switch ((rand () % 4))
  46         {
  47         case 0:
  48           res = _mm_cmpestrm (src1.x[i], l1, src2.x[i], l2, IMM_VAL0);
  49           cf = _mm_cmpestrc (src1.x[i], l1, src2.x[i], l2, IMM_VAL0);
  50           zf = _mm_cmpestrz (src1.x[i], l1, src2.x[i], l2, IMM_VAL0);
  51           sf = _mm_cmpestrs (src1.x[i], l1, src2.x[i], l2, IMM_VAL0);
  52           of = _mm_cmpestro (src1.x[i], l1, src2.x[i], l2, IMM_VAL0);
  53           af = _mm_cmpestra (src1.x[i], l1, src2.x[i], l2, IMM_VAL0);
  54           correct = cmp_em (&src1.x[i], l1, &src2.x[i], l2, IMM_VAL0,
  55                             &correct_flags);
  56           break;
  57
  58         case 1:
  59           res = _mm_cmpestrm (src1.x[i], l1, src2.x[i], l2, IMM_VAL1);
  60           cf = _mm_cmpestrc (src1.x[i], l1, src2.x[i], l2, IMM_VAL1);
  61           zf = _mm_cmpestrz (src1.x[i], l1, src2.x[i], l2, IMM_VAL1);
  62           sf = _mm_cmpestrs (src1.x[i], l1, src2.x[i], l2, IMM_VAL1);
  63           of = _mm_cmpestro (src1.x[i], l1, src2.x[i], l2, IMM_VAL1);
  64           af = _mm_cmpestra (src1.x[i], l1, src2.x[i], l2, IMM_VAL1);
  65           correct = cmp_em (&src1.x[i], l1, &src2.x[i], l2, IMM_VAL1,
  66                             &correct_flags);
  67           break;
  68
  69         case 2:
  70           res = _mm_cmpestrm (src1.x[i], l1, src2.x[i], l2, IMM_VAL2);
  71           cf = _mm_cmpestrc (src1.x[i], l1, src2.x[i], l2, IMM_VAL2);
  72           zf = _mm_cmpestrz (src1.x[i], l1, src2.x[i], l2, IMM_VAL2);
  73           sf = _mm_cmpestrs (src1.x[i], l1, src2.x[i], l2, IMM_VAL2);
  74           of = _mm_cmpestro (src1.x[i], l1, src2.x[i], l2, IMM_VAL2);
  75           af = _mm_cmpestra (src1.x[i], l1, src2.x[i], l2, IMM_VAL2);
  76           correct = cmp_em (&src1.x[i], l1, &src2.x[i], l2, IMM_VAL2,
  77                             &correct_flags);
  78           break;
  79
  80         default:
  81           res = _mm_cmpestrm (src1.x[i], l1, src2.x[i], l2, IMM_VAL3);
  82           cf = _mm_cmpestrc (src1.x[i], l1, src2.x[i], l2, IMM_VAL3);
  83           zf = _mm_cmpestrz (src1.x[i], l1, src2.x[i], l2, IMM_VAL3);
  84           sf = _mm_cmpestrs (src1.x[i], l1, src2.x[i], l2, IMM_VAL3);
  85           of = _mm_cmpestro (src1.x[i], l1, src2.x[i], l2, IMM_VAL3);
  86           af = _mm_cmpestra (src1.x[i], l1, src2.x[i], l2, IMM_VAL3);
  87           correct = cmp_em (&src1.x[i], l1, &src2.x[i], l2, IMM_VAL3,
  88                             &correct_flags);
  89           break;
  90         }
  91
  92       if (memcmp (&correct, &res, sizeof (res)))
  93         abort ();
  94
  95       flags = 0;
  96       if (cf)
  97         flags |= CFLAG;
  98       if (zf)
  99         flags |= ZFLAG;
 100       if (sf)
 101         flags |= SFLAG;
 102       if (of)
 103         flags |= OFLAG;
 104
 105       if (flags != correct_flags
 106           || (af && (cf || zf))
 107           || (!af && !(cf || zf)))
 108         abort ();
 109     }
 110 }