1/*
2
3Copyright (c) 2009, 2010, 2011 STMicroelectronics
4Written by Christophe Lyon
5
6Permission is hereby granted, free of charge, to any person obtaining a copy
7of this software and associated documentation files (the "Software"), to deal
8in the Software without restriction, including without limitation the rights
9to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10copies of the Software, and to permit persons to whom the Software is
11furnished to do so, subject to the following conditions:
12
13The above copyright notice and this permission notice shall be included in
14all copies or substantial portions of the Software.
15
16THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22THE SOFTWARE.
23
24*/
25
26#if defined(__arm__) || defined(__aarch64__)
27#include <arm_neon.h>
28#else
29#include "stm-arm-neon.h"
30#endif
31
32#include "stm-arm-neon-ref.h"
33#include <math.h>
34
35#define TEST_MSG "VABD/VABDQ"
36void exec_vabd (void)
37{
38  int i;
39
40  /* Basic test: v4=vabd(v1,v2), then store the result.  */
41#define TEST_VABD(Q, T1, T2, W, N)					\
42  VECT_VAR(vector_res, T1, W, N) =					\
43    vabd##Q##_##T2##W(VECT_VAR(vector1, T1, W, N),			\
44		      VECT_VAR(vector2, T1, W, N));			\
45  vst1##Q##_##T2##W(VECT_VAR(result, T1, W, N), VECT_VAR(vector_res, T1, W, N))
46
47  /* With ARM RVCT, we need to declare variables before any executable
48     statement */
49#define DECL_VABD_VAR(VAR)			\
50  DECL_VARIABLE(VAR, int, 8, 8);		\
51  DECL_VARIABLE(VAR, int, 16, 4);		\
52  DECL_VARIABLE(VAR, int, 32, 2);		\
53  DECL_VARIABLE(VAR, uint, 8, 8);		\
54  DECL_VARIABLE(VAR, uint, 16, 4);		\
55  DECL_VARIABLE(VAR, uint, 32, 2);		\
56  DECL_VARIABLE(VAR, float, 32, 2);		\
57  DECL_VARIABLE(VAR, int, 8, 16);		\
58  DECL_VARIABLE(VAR, int, 16, 8);		\
59  DECL_VARIABLE(VAR, int, 32, 4);		\
60  DECL_VARIABLE(VAR, uint, 8, 16);		\
61  DECL_VARIABLE(VAR, uint, 16, 8);		\
62  DECL_VARIABLE(VAR, uint, 32, 4);		\
63  DECL_VARIABLE(VAR, float, 32, 4)
64
65  DECL_VABD_VAR(vector1);
66  DECL_VABD_VAR(vector2);
67  DECL_VABD_VAR(vector_res);
68
69  clean_results ();
70
71  /* Initialize input "vector" from "buffer"  */
72  VLOAD(vector1, buffer, , int, s, 8, 8);
73  VLOAD(vector1, buffer, , int, s, 16, 4);
74  VLOAD(vector1, buffer, , int, s, 32, 2);
75  VLOAD(vector1, buffer, , uint, u, 8, 8);
76  VLOAD(vector1, buffer, , uint, u, 16, 4);
77  VLOAD(vector1, buffer, , uint, u, 32, 2);
78  VLOAD(vector1, buffer, , float, f, 32, 2);
79  VLOAD(vector1, buffer, q, int, s, 8, 16);
80  VLOAD(vector1, buffer, q, int, s, 16, 8);
81  VLOAD(vector1, buffer, q, int, s, 32, 4);
82  VLOAD(vector1, buffer, q, uint, u, 8, 16);
83  VLOAD(vector1, buffer, q, uint, u, 16, 8);
84  VLOAD(vector1, buffer, q, uint, u, 32, 4);
85  VLOAD(vector1, buffer, q, float, f, 32, 4);
86
87  /* Choose init value arbitrarily */
88  VDUP(vector2, , int, s, 8, 8, 1);
89  VDUP(vector2, , int, s, 16, 4, -13);
90  VDUP(vector2, , int, s, 32, 2, 8);
91  VDUP(vector2, , uint, u, 8, 8, 1);
92  VDUP(vector2, , uint, u, 16, 4, 13);
93  VDUP(vector2, , uint, u, 32, 2, 8);
94  VDUP(vector2, , float, f, 32, 2, 8.3f);
95  VDUP(vector2, q, int, s, 8, 16, 10);
96  VDUP(vector2, q, int, s, 16, 8, -12);
97  VDUP(vector2, q, int, s, 32, 4, 32);
98  VDUP(vector2, q, uint, u, 8, 16, 10);
99  VDUP(vector2, q, uint, u, 16, 8, 12);
100  VDUP(vector2, q, uint, u, 32, 4, 32);
101  VDUP(vector2, q, float, f, 32, 4, 32.12f);
102
103  TEST_VABD(, int, s, 8, 8);
104  TEST_VABD(, int, s, 16, 4);
105  TEST_VABD(, int, s, 32, 2);
106  TEST_VABD(, uint, u, 8, 8);
107  TEST_VABD(, uint, u, 16, 4);
108  TEST_VABD(, uint, u, 32, 2);
109  TEST_VABD(, float, f, 32, 2);
110  TEST_VABD(q, int, s, 8, 16);
111  TEST_VABD(q, int, s, 16, 8);
112  TEST_VABD(q, int, s, 32, 4);
113  TEST_VABD(q, uint, u, 8, 16);
114  TEST_VABD(q, uint, u, 16, 8);
115  TEST_VABD(q, uint, u, 32, 4);
116  TEST_VABD(q, float, f, 32, 4);
117
118  dump_results_hex (TEST_MSG);
119
120
121  /* Extra FP tests with special values (-0.0, ....) */
122  VDUP(vector1, q, float, f, 32, 4, -0.0f);
123  VDUP(vector2, q, float, f, 32, 4, 0.0);
124  TEST_VABD(q, float, f, 32, 4);
125  DUMP_FP(TEST_MSG " FP special (-0.0)", float, 32, 4, PRIx32);
126
127
128  /* Extra FP tests with special values (-0.0, ....) */
129  VDUP(vector1, q, float, f, 32, 4, 0.0f);
130  VDUP(vector2, q, float, f, 32, 4, -0.0);
131  TEST_VABD(q, float, f, 32, 4);
132  DUMP_FP(TEST_MSG " FP special (-0.0)", float, 32, 4, PRIx32);
133}
134