gcc/testsuite/gcc.target/i386/sha1msg2-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 void
  11 compute_sha1msg2 (int *s1, int *s2, int *r)
  12 {
  13   int w13, w14, w15, w16, w17, w18, w19;
  14
  15   w13 = s2[2];
  16   w14 = s2[1];
  17   w15 = s2[0];
  18   w16 = __rold (s1[3] ^ w13, 1);
  19   w17 = __rold (s1[2] ^ w14, 1);
  20   w18 = __rold (s1[1] ^ w15, 1);
  21   w19 = __rold (s1[0] ^ w16, 1);
  22
  23   r[0] = w19;
  24   r[1] = w18;
  25   r[2] = w17;
  26   r[3] = w16;
  27 }
  28
  29 static void
  30 sha_test (void)
  31 {
  32   union128i_d s1, s2, res;
  33   int res_ref[4];
  34
  35   s1.x = _mm_set_epi32 (111, 222, 333, 444);
  36   s2.x = _mm_set_epi32 (555, 666, 777, 0);
  37
  38   res.x = _mm_sha1msg2_epu32 (s1.x, s2.x);
  39
  40   compute_sha1msg2 (s1.a, s2.a, res_ref);
  41
  42   if (check_union128i_d (res, res_ref))
  43     abort ();
  44 }