Subversion Repositories openrisc

/* { dg-do run } */

/* { dg-options "-mavx2 -O2" } */

/* { dg-require-effective-target avx2 } */

#include "avx2-check.h"

#include <string.h>

#define NUM 10

#define MASK 0xf1

static void

init_perm2i128 (unsigned long long *src1, unsigned long long *src2, int seed)

{

  int i, sign = 1;

  for (i = 0; i < 4; i++)

    {

      src1[i] = (i + seed) * (i + seed) * sign;

      src2[i] = (i + seed) * seed * sign;

      sign = -sign;

    }

}

static void

calc_perm2i128 (unsigned long long *src1,

                unsigned long long *src2,

                unsigned int mask, unsigned long long *dst)

{

  int i, temp;

  temp = mask & 3;

  switch (temp)

    {

    case 0:

      memcpy (dst, src1, 16);

    case 1:

      memcpy (dst, src1 + 2, 16);

    case 2:

      memcpy (dst, src2, 16);

    case 3:

      memcpy (dst, src1 + 2, 16);

    }

  temp = (mask >> 4) & 3;

  switch (temp)

    {

    case 0:

      memcpy (dst + 2, src1, 16);

    case 1:

      memcpy (dst + 2, src1 + 2, 16);

    case 2:

      memcpy (dst + 2, src2, 16);

    case 3:

      memcpy (dst + 2, src1 + 2, 16);

    }

  if ((mask >> 3) & 1)

    memset (dst, 0, 16);

  if ((mask >> 7) & 1)

    memset (dst + 2, 0, 16);

}

static void

avx2_test (void)

{

  union256i_q src1, src2, dst;

  unsigned long long dst_ref[4];

  int i;

  for (i = 0; i < NUM; i++)

    {

      init_perm2i128 (src1.a, src2.a, i);

      dst.x = _mm256_permute2x128_si256 (src1.x, src2.x, MASK);

      calc_perm2i128 (src1.a, src2.a, MASK, dst_ref);

      if (check_union256i_q (dst, dst_ref))

        abort ();

    }

}