gcc/testsuite/gcc.target/i386/sse4_2-pcmpestri-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_MOST_SIGNIFICANT)
  15 #define IMM_VAL2 \
  16  (_SIDD_UWORD_OPS | _SIDD_CMP_EQUAL_ANY | _SIDD_MASKED_NEGATIVE_POLARITY)
  17 #define IMM_VAL3 \
  18   (_SIDD_SWORD_OPS | _SIDD_CMP_EQUAL_ORDERED \
  19    | _SIDD_MASKED_NEGATIVE_POLARITY | _SIDD_LEAST_SIGNIFICANT)
  20
  21
  22 static void
  23 sse4_2_test (void)
  24 {
  25   union
  26     {
  27       __m128i x[NUM];
  28       char c[NUM *16];
  29     } src1, src2;
  30   int res, correct, 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_cmpestri (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_ei (&src1.x[i], l1, &src2.x[i], l2, IMM_VAL0,
  55                             &correct_flags);
  56           break;
  57
  58         case 1:
  59           res = _mm_cmpestri (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_ei (&src1.x[i], l1, &src2.x[i], l2, IMM_VAL1,
  66                             &correct_flags);
  67           break;
  68
  69         case 2:
  70           res = _mm_cmpestri (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_ei (&src1.x[i], l1, &src2.x[i], l2, IMM_VAL2,
  77                             &correct_flags);
  78           break;
  79
  80         default:
  81           res = _mm_cmpestri (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_ei (&src1.x[i], l1, &src2.x[i], l2, IMM_VAL3,
  88                             &correct_flags);
  89           break;
  90         }
  91
  92       if (correct != 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 }