Viewing file:  vec_store_len_r.c (2.4 KB) -rw-r--r--
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
/* { dg-do run } */
/* { dg-require-effective-target s390_vxe2 } */
/* { dg-options "-O3 -mzarch -march=arch13 -mzvector --save-temps" } */
#include <string.h>
#include <vecintrin.h>
typedef vector unsigned char uv16qi;
uv16qi test_vec = (uv16qi){ 1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16 };
#define NUM_TEST_LENGTHS 3
unsigned int test_len[NUM_TEST_LENGTHS] = { 0, 12, 18 };
/* Proceeding from left to right, the specified number (LEN+1) of
rightmost bytes from SOURCE are stored in TARGET. */
void __attribute__((noinline, noclone, target ("arch=zEC12")))
emul (unsigned char *source, unsigned char *target, unsigned int len)
{
int start = 15 - len;
if (start < 0)
start = 0;
for (int s = start, t = 0; s < 16; s++, t++)
target[t] = source[s];
}
void __attribute__((noinline, noclone))
vec_store_len_r_reg (uv16qi s, unsigned char *t, unsigned int len)
{
vec_store_len_r (s, t, len);
}
void __attribute__((noinline, noclone))
vec_store_len_r_mem (uv16qi *s, unsigned char *t, unsigned int *len)
{
vec_store_len_r (*s, t, *len);
}
#define GEN_CONST_FUNC(CONST) \
static void inline \
vec_store_len_r_const##CONST (uv16qi s, unsigned char *t) \
{ \
vec_store_len_r (s, t, CONST); \
}
#define GEN_CONST_TEST(CONST) \
memset (exp_result, 0, 16); \
emul ((unsigned char*)&test_vec, exp_result, CONST); \
memset (result, 0, 16); \
vec_store_len_r_const##CONST (test_vec, result); \
if (memcmp (result, exp_result, 16) != 0) \
__builtin_abort ();
GEN_CONST_FUNC(0)
GEN_CONST_FUNC(12)
GEN_CONST_FUNC(18)
int
main ()
{
unsigned char exp_result[16];
unsigned char result[16];
for (int i = 0; i < NUM_TEST_LENGTHS; i++)
{
memset (exp_result, 0, 16);
emul ((unsigned char*)&test_vec, exp_result, test_len[i]);
memset (result, 0, 16);
vec_store_len_r_reg (test_vec, result, test_len[i]);
if (memcmp (result, exp_result, 16) != 0)
__builtin_abort ();
memset (result, 0, 16);
vec_store_len_r_mem (&test_vec, result, &test_len[i]);
if (memcmp (result, exp_result, 16) != 0)
__builtin_abort ();
}
GEN_CONST_TEST(0)
GEN_CONST_TEST(12)
GEN_CONST_TEST(18)
return 0;
}
/* vec_store_len_r_reg and vec_store_len_r_mem */
/* { dg-final { scan-assembler-times "vstrlr\t" 2 } } */
/* For the 2 constants. The 3. should be implemented with vst. */
/* { dg-final { scan-assembler-times "vstrl\t" 2 } } */
|
