1*f3782652STreehugger Robot /*
2*f3782652STreehugger Robot
3*f3782652STreehugger Robot Copyright (c) 2009, 2010, 2011 STMicroelectronics
4*f3782652STreehugger Robot Written by Christophe Lyon
5*f3782652STreehugger Robot
6*f3782652STreehugger Robot Permission is hereby granted, free of charge, to any person obtaining a copy
7*f3782652STreehugger Robot of this software and associated documentation files (the "Software"), to deal
8*f3782652STreehugger Robot in the Software without restriction, including without limitation the rights
9*f3782652STreehugger Robot to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10*f3782652STreehugger Robot copies of the Software, and to permit persons to whom the Software is
11*f3782652STreehugger Robot furnished to do so, subject to the following conditions:
12*f3782652STreehugger Robot
13*f3782652STreehugger Robot The above copyright notice and this permission notice shall be included in
14*f3782652STreehugger Robot all copies or substantial portions of the Software.
15*f3782652STreehugger Robot
16*f3782652STreehugger Robot THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17*f3782652STreehugger Robot IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18*f3782652STreehugger Robot FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19*f3782652STreehugger Robot AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20*f3782652STreehugger Robot LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21*f3782652STreehugger Robot OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22*f3782652STreehugger Robot THE SOFTWARE.
23*f3782652STreehugger Robot
24*f3782652STreehugger Robot */
25*f3782652STreehugger Robot
26*f3782652STreehugger Robot #if defined(__arm__) || defined(__aarch64__)
27*f3782652STreehugger Robot #include <arm_neon.h>
28*f3782652STreehugger Robot #else
29*f3782652STreehugger Robot #include "stm-arm-neon.h"
30*f3782652STreehugger Robot #endif
31*f3782652STreehugger Robot
32*f3782652STreehugger Robot #include "stm-arm-neon-ref.h"
33*f3782652STreehugger Robot #include <math.h>
34*f3782652STreehugger Robot
35*f3782652STreehugger Robot #ifndef INSN_NAME
36*f3782652STreehugger Robot #define INSN_NAME vmax
37*f3782652STreehugger Robot #define TEST_MSG "VMAX/VMAXQ"
38*f3782652STreehugger Robot #endif
39*f3782652STreehugger Robot
40*f3782652STreehugger Robot /* Can't use the standard ref_v_binary_op.c template because vmax has
41*f3782652STreehugger Robot no 64 bits variant */
42*f3782652STreehugger Robot #define FNNAME1(NAME) void exec_ ## NAME (void)
43*f3782652STreehugger Robot #define FNNAME(NAME) FNNAME1(NAME)
44*f3782652STreehugger Robot
FNNAME(INSN_NAME)45*f3782652STreehugger Robot FNNAME (INSN_NAME)
46*f3782652STreehugger Robot {
47*f3782652STreehugger Robot int i;
48*f3782652STreehugger Robot
49*f3782652STreehugger Robot /* Basic test: y=OP(x,x), then store the result. */
50*f3782652STreehugger Robot #define TEST_BINARY_OP1(INSN, Q, T1, T2, W, N) \
51*f3782652STreehugger Robot VECT_VAR(vector_res, T1, W, N) = \
52*f3782652STreehugger Robot INSN##Q##_##T2##W(VECT_VAR(vector, T1, W, N), \
53*f3782652STreehugger Robot VECT_VAR(vector2, T1, W, N)); \
54*f3782652STreehugger Robot vst1##Q##_##T2##W(VECT_VAR(result, T1, W, N), VECT_VAR(vector_res, T1, W, N))
55*f3782652STreehugger Robot
56*f3782652STreehugger Robot #define TEST_BINARY_OP(INSN, Q, T1, T2, W, N) \
57*f3782652STreehugger Robot TEST_BINARY_OP1(INSN, Q, T1, T2, W, N) \
58*f3782652STreehugger Robot
59*f3782652STreehugger Robot /* With ARM RVCT, we need to declare variables before any executable
60*f3782652STreehugger Robot statement */
61*f3782652STreehugger Robot DECL_VARIABLE_ALL_VARIANTS(vector);
62*f3782652STreehugger Robot DECL_VARIABLE_ALL_VARIANTS(vector2);
63*f3782652STreehugger Robot DECL_VARIABLE_ALL_VARIANTS(vector_res);
64*f3782652STreehugger Robot
65*f3782652STreehugger Robot clean_results ();
66*f3782652STreehugger Robot
67*f3782652STreehugger Robot /* Initialize input "vector" from "buffer" */
68*f3782652STreehugger Robot TEST_MACRO_ALL_VARIANTS_2_5(VLOAD, vector, buffer);
69*f3782652STreehugger Robot #ifndef NO_FLOAT_VARIANT
70*f3782652STreehugger Robot VLOAD(vector, buffer, , float, f, 32, 2);
71*f3782652STreehugger Robot VLOAD(vector, buffer, q, float, f, 32, 4);
72*f3782652STreehugger Robot #endif
73*f3782652STreehugger Robot
74*f3782652STreehugger Robot /* Choose init value arbitrarily, will be used as comparison value */
75*f3782652STreehugger Robot VDUP(vector2, , int, s, 8, 8, -13);
76*f3782652STreehugger Robot VDUP(vector2, , int, s, 16, 4, -14);
77*f3782652STreehugger Robot VDUP(vector2, , int, s, 32, 2, -16);
78*f3782652STreehugger Robot VDUP(vector2, , uint, u, 8, 8, 0xf3);
79*f3782652STreehugger Robot VDUP(vector2, , uint, u, 16, 4, 0xfff1);
80*f3782652STreehugger Robot VDUP(vector2, , uint, u, 32, 2, 0xfffffff0);
81*f3782652STreehugger Robot VDUP(vector2, q, int, s, 8, 16, -12);
82*f3782652STreehugger Robot VDUP(vector2, q, int, s, 16, 8, -13);
83*f3782652STreehugger Robot VDUP(vector2, q, int, s, 32, 4, -15);
84*f3782652STreehugger Robot VDUP(vector2, q, uint, u, 8, 16, 0xf9);
85*f3782652STreehugger Robot VDUP(vector2, q, uint, u, 16, 8, 0xfff2);
86*f3782652STreehugger Robot VDUP(vector2, q, uint, u, 32, 4, 0xfffffff1);
87*f3782652STreehugger Robot #ifndef NO_FLOAT_VARIANT
88*f3782652STreehugger Robot VDUP(vector2, , float, f, 32, 2, -15.5f);
89*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, -14.5f);
90*f3782652STreehugger Robot #endif
91*f3782652STreehugger Robot
92*f3782652STreehugger Robot #ifndef NO_FLOAT_VARIANT
93*f3782652STreehugger Robot #define FLOAT_VARIANT(MACRO, VAR) \
94*f3782652STreehugger Robot MACRO(VAR, , float, f, 32, 2); \
95*f3782652STreehugger Robot MACRO(VAR, q, float, f, 32, 4)
96*f3782652STreehugger Robot #else
97*f3782652STreehugger Robot #define FLOAT_VARIANT(MACRO, VAR)
98*f3782652STreehugger Robot #endif
99*f3782652STreehugger Robot
100*f3782652STreehugger Robot #define TEST_MACRO_NO64BIT_VARIANT_1_5(MACRO, VAR) \
101*f3782652STreehugger Robot MACRO(VAR, , int, s, 8, 8); \
102*f3782652STreehugger Robot MACRO(VAR, , int, s, 16, 4); \
103*f3782652STreehugger Robot MACRO(VAR, , int, s, 32, 2); \
104*f3782652STreehugger Robot MACRO(VAR, , uint, u, 8, 8); \
105*f3782652STreehugger Robot MACRO(VAR, , uint, u, 16, 4); \
106*f3782652STreehugger Robot MACRO(VAR, , uint, u, 32, 2); \
107*f3782652STreehugger Robot MACRO(VAR, q, int, s, 8, 16); \
108*f3782652STreehugger Robot MACRO(VAR, q, int, s, 16, 8); \
109*f3782652STreehugger Robot MACRO(VAR, q, int, s, 32, 4); \
110*f3782652STreehugger Robot MACRO(VAR, q, uint, u, 8, 16); \
111*f3782652STreehugger Robot MACRO(VAR, q, uint, u, 16, 8); \
112*f3782652STreehugger Robot MACRO(VAR, q, uint, u, 32, 4); \
113*f3782652STreehugger Robot FLOAT_VARIANT(MACRO, VAR)
114*f3782652STreehugger Robot
115*f3782652STreehugger Robot /* Apply a binary operator named INSN_NAME */
116*f3782652STreehugger Robot TEST_MACRO_NO64BIT_VARIANT_1_5(TEST_BINARY_OP, INSN_NAME);
117*f3782652STreehugger Robot
118*f3782652STreehugger Robot dump_results_hex (TEST_MSG);
119*f3782652STreehugger Robot
120*f3782652STreehugger Robot
121*f3782652STreehugger Robot #ifndef NO_FLOAT_VARIANT
122*f3782652STreehugger Robot /* Extra FP tests with special values (NaN, ....) */
123*f3782652STreehugger Robot VDUP(vector, q, float, f, 32, 4, 1.0f);
124*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, NAN);
125*f3782652STreehugger Robot TEST_BINARY_OP(INSN_NAME, q, float, f, 32, 4);
126*f3782652STreehugger Robot DUMP_FP(TEST_MSG " FP special (NaN)", float, 32, 4, PRIx32);
127*f3782652STreehugger Robot
128*f3782652STreehugger Robot VDUP(vector, q, float, f, 32, 4, -NAN);
129*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, 1.0f);
130*f3782652STreehugger Robot TEST_BINARY_OP(INSN_NAME, q, float, f, 32, 4);
131*f3782652STreehugger Robot DUMP_FP(TEST_MSG " FP special (-NaN)", float, 32, 4, PRIx32);
132*f3782652STreehugger Robot
133*f3782652STreehugger Robot VDUP(vector, q, float, f, 32, 4, 1.0f);
134*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, HUGE_VALF);
135*f3782652STreehugger Robot TEST_BINARY_OP(INSN_NAME, q, float, f, 32, 4);
136*f3782652STreehugger Robot DUMP_FP(TEST_MSG " FP special (inf)", float, 32, 4, PRIx32);
137*f3782652STreehugger Robot
138*f3782652STreehugger Robot VDUP(vector, q, float, f, 32, 4, -HUGE_VALF);
139*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, 1.0f);
140*f3782652STreehugger Robot TEST_BINARY_OP(INSN_NAME, q, float, f, 32, 4);
141*f3782652STreehugger Robot DUMP_FP(TEST_MSG " FP special (-inf)", float, 32, 4, PRIx32);
142*f3782652STreehugger Robot
143*f3782652STreehugger Robot VDUP(vector, q, float, f, 32, 4, 0.0f);
144*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, -0.0f);
145*f3782652STreehugger Robot TEST_BINARY_OP(INSN_NAME, q, float, f, 32, 4);
146*f3782652STreehugger Robot DUMP_FP(TEST_MSG " FP special (-0.0)", float, 32, 4, PRIx32);
147*f3782652STreehugger Robot
148*f3782652STreehugger Robot VDUP(vector, q, float, f, 32, 4, -0.0f);
149*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, 0.0f);
150*f3782652STreehugger Robot TEST_BINARY_OP(INSN_NAME, q, float, f, 32, 4);
151*f3782652STreehugger Robot DUMP_FP(TEST_MSG " FP special (-0.0)", float, 32, 4, PRIx32);
152*f3782652STreehugger Robot #endif
153*f3782652STreehugger Robot }
154