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 #define TEST_MSG "VRECPS/VRECPSQ"
exec_vrecps(void)36*f3782652STreehugger Robot void exec_vrecps(void)
37*f3782652STreehugger Robot {
38*f3782652STreehugger Robot int i;
39*f3782652STreehugger Robot
40*f3782652STreehugger Robot /* Basic test: y=vrecps(x), then store the result. */
41*f3782652STreehugger Robot #define TEST_VRECPS(Q, T1, T2, W, N) \
42*f3782652STreehugger Robot VECT_VAR(vector_res, T1, W, N) = \
43*f3782652STreehugger Robot vrecps##Q##_##T2##W(VECT_VAR(vector, T1, W, N), \
44*f3782652STreehugger Robot VECT_VAR(vector2, T1, W, N)); \
45*f3782652STreehugger Robot vst1##Q##_##T2##W(VECT_VAR(result, T1, W, N), \
46*f3782652STreehugger Robot VECT_VAR(vector_res, T1, W, N))
47*f3782652STreehugger Robot
48*f3782652STreehugger Robot /* With ARM RVCT, we need to declare variables before any executable
49*f3782652STreehugger Robot statement */
50*f3782652STreehugger Robot
51*f3782652STreehugger Robot /* No need for integer variants */
52*f3782652STreehugger Robot DECL_VARIABLE(vector, float, 32, 2);
53*f3782652STreehugger Robot DECL_VARIABLE(vector, float, 32, 4);
54*f3782652STreehugger Robot
55*f3782652STreehugger Robot DECL_VARIABLE(vector2, float, 32, 2);
56*f3782652STreehugger Robot DECL_VARIABLE(vector2, float, 32, 4);
57*f3782652STreehugger Robot
58*f3782652STreehugger Robot DECL_VARIABLE(vector_res, float, 32, 2);
59*f3782652STreehugger Robot DECL_VARIABLE(vector_res, float, 32, 4);
60*f3782652STreehugger Robot
61*f3782652STreehugger Robot clean_results ();
62*f3782652STreehugger Robot
63*f3782652STreehugger Robot /* Choose init value arbitrarily */
64*f3782652STreehugger Robot VDUP(vector, , float, f, 32, 2, 12.9f);
65*f3782652STreehugger Robot VDUP(vector, q, float, f, 32, 4, 9.2f);
66*f3782652STreehugger Robot
67*f3782652STreehugger Robot VDUP(vector2, , float, f, 32, 2, 8.9f);
68*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, 3.2f);
69*f3782652STreehugger Robot
70*f3782652STreehugger Robot /* Apply the operator */
71*f3782652STreehugger Robot TEST_VRECPS(, float, f, 32, 2);
72*f3782652STreehugger Robot TEST_VRECPS(q, float, f, 32, 4);
73*f3782652STreehugger Robot
74*f3782652STreehugger Robot fprintf (ref_file, "\n%s output:\n", TEST_MSG);
75*f3782652STreehugger Robot fprintf (gcc_tests_file, "\n%s output:\n", TEST_MSG);
76*f3782652STreehugger Robot DUMP_FP(TEST_MSG, float, 32, 2, PRIx32);
77*f3782652STreehugger Robot DUMP_FP(TEST_MSG, float, 32, 4, PRIx32);
78*f3782652STreehugger Robot
79*f3782652STreehugger Robot
80*f3782652STreehugger Robot /* Test FP variants with special input values (NaN) */
81*f3782652STreehugger Robot VDUP(vector, , float, f, 32, 2, NAN);
82*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, NAN);
83*f3782652STreehugger Robot
84*f3782652STreehugger Robot /* Apply the operator */
85*f3782652STreehugger Robot TEST_VRECPS(, float, f, 32, 2);
86*f3782652STreehugger Robot TEST_VRECPS(q, float, f, 32, 4);
87*f3782652STreehugger Robot
88*f3782652STreehugger Robot fprintf (ref_file, "\n%s output:\n", TEST_MSG " FP special (NAN) and normal values");
89*f3782652STreehugger Robot DUMP_FP(TEST_MSG, float, 32, 2, PRIx32);
90*f3782652STreehugger Robot DUMP_FP(TEST_MSG, float, 32, 4, PRIx32);
91*f3782652STreehugger Robot
92*f3782652STreehugger Robot
93*f3782652STreehugger Robot /* Test FP variants with special input values (infinity, 0) */
94*f3782652STreehugger Robot VDUP(vector, , float, f, 32, 2, HUGE_VALF);
95*f3782652STreehugger Robot VDUP(vector, q, float, f, 32, 4, 0.0f);
96*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, 3.2f); /* Restore a normal value */
97*f3782652STreehugger Robot
98*f3782652STreehugger Robot /* Apply the operator */
99*f3782652STreehugger Robot TEST_VRECPS(, float, f, 32, 2);
100*f3782652STreehugger Robot TEST_VRECPS(q, float, f, 32, 4);
101*f3782652STreehugger Robot
102*f3782652STreehugger Robot fprintf (ref_file, "\n%s output:\n", TEST_MSG " FP special (infinity, 0) and normal values");
103*f3782652STreehugger Robot DUMP_FP(TEST_MSG, float, 32, 2, PRIx32);
104*f3782652STreehugger Robot DUMP_FP(TEST_MSG, float, 32, 4, PRIx32);
105*f3782652STreehugger Robot
106*f3782652STreehugger Robot
107*f3782652STreehugger Robot /* Test FP variants with only special input values (infinity, 0) */
108*f3782652STreehugger Robot VDUP(vector, , float, f, 32, 2, HUGE_VALF);
109*f3782652STreehugger Robot VDUP(vector, q, float, f, 32, 4, 0.0f);
110*f3782652STreehugger Robot VDUP(vector2, , float, f, 32, 2, 0.0f);
111*f3782652STreehugger Robot VDUP(vector2, q, float, f, 32, 4, HUGE_VALF);
112*f3782652STreehugger Robot
113*f3782652STreehugger Robot /* Apply the operator */
114*f3782652STreehugger Robot TEST_VRECPS(, float, f, 32, 2);
115*f3782652STreehugger Robot TEST_VRECPS(q, float, f, 32, 4);
116*f3782652STreehugger Robot
117*f3782652STreehugger Robot fprintf (ref_file, "\n%s output:\n", TEST_MSG " FP special (infinity, 0)");
118*f3782652STreehugger Robot DUMP_FP(TEST_MSG, float, 32, 2, PRIx32);
119*f3782652STreehugger Robot DUMP_FP(TEST_MSG, float, 32, 4, PRIx32);
120*f3782652STreehugger Robot }
121