gcc/testsuite/gcc.target/i386/sha256msg1-2.c

   1 /* { dg-do run } */
   2 /* { dg-options "-O2 -msha" } */
   3 /* { dg-require-effective-target sha } */
   4
   5 #include "sha-check.h"
   6 #include "m128-check.h"
   7 #include <x86intrin.h>
   8 #include <immintrin.h>
   9
  10 static int
  11 s0 (int w)
  12 {
  13   return __rord (w, 7) ^ __rord (w, 18) ^ (w >> 3);
  14 }
  15
  16 static void
  17 compute_sha256msg1 (int *src1, int *src2, int *res)
  18 {
  19   int w0, w1, w2, w3, w4;
  20
  21   w0 = src1[0];
  22   w1 = src1[1];
  23   w2 = src1[2];
  24   w3 = src1[3];
  25   w4 = src2[0];
  26
  27   res[0] = w0 + s0 (w1);
  28   res[1] = w1 + s0 (w2);
  29   res[2] = w2 + s0 (w3);
  30   res[3] = w3 + s0 (w4);
  31 }
  32
  33 static void
  34 sha_test (void)
  35 {
  36   union128i_d s1, s2, res;
  37   int res_ref[4];
  38
  39   s1.x = _mm_set_epi32 (111, 222, 333, 444);
  40   s2.x = _mm_set_epi32 (0, 0, 0, 555);
  41
  42   res.x = _mm_sha256msg1_epu32 (s1.x, s2.x);
  43
  44   compute_sha256msg1 (s1.a, s2.a, res_ref);
  45
  46   if (check_union128i_d (res, res_ref))
  47     abort ();
  48 }