1 /*
2 * Assembly testing and benchmarking tool
3 * Copyright (c) 2015 Henrik Gramner
4 * Copyright (c) 2008 Loren Merritt
5 *
6 * This file is part of FFmpeg.
7 *
8 * FFmpeg is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
12 *
13 * FFmpeg is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License along
19 * with FFmpeg; if not, write to the Free Software Foundation, Inc.,
20 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
21 */
22
23 #ifndef TESTS_CHECKASM_CHECKASM_H
24 #define TESTS_CHECKASM_CHECKASM_H
25
26 #include <stdint.h>
27 #include "config.h"
28
29 #if CONFIG_LINUX_PERF
30 #include <unistd.h> // read(3)
31 #include <sys/ioctl.h>
32 #include <asm/unistd.h>
33 #include <linux/perf_event.h>
34 #elif CONFIG_MACOS_KPERF
36 #endif
37
43
94
96
102
103 /* float compare utilities */
112 unsigned max_ulp,
unsigned len);
116
118 #define rnd() av_lfg_get(&checkasm_lfg)
119
121
122 #define BENCH_RUNS 1000 /* Trade-off between accuracy and speed */
123
124 /* Decide whether or not the specified function needs to be tested */
125 #define check_func(func, ...) (func_ref = checkasm_check_func((func_new = func), __VA_ARGS__))
126
127 /* Declare the function prototype. The first argument is the return value, the remaining
128 * arguments are the function parameters. Naming parameters is optional. */
129 #define declare_func(ret, ...) declare_new(ret, __VA_ARGS__) typedef ret func_type(__VA_ARGS__)
130 #define declare_func_float(ret, ...) declare_new_float(ret, __VA_ARGS__) typedef ret func_type(__VA_ARGS__)
131 #define declare_func_emms(cpu_flags, ret, ...) declare_new_emms(cpu_flags, ret, __VA_ARGS__) typedef ret func_type(__VA_ARGS__)
132
133 /* Indicate that the current test has failed */
134 #define fail() checkasm_fail_func("%s:%d", av_basename(__FILE__), __LINE__)
135
136 /* Print the test outcome */
137 #define report checkasm_report
138
139 /* Call the reference function */
140 #define call_ref(...) ((func_type *)func_ref)(__VA_ARGS__)
141
142 #if ARCH_X86 && HAVE_X86ASM
143 /* Verifies that clobbered callee-saved registers are properly saved and restored
144 * and that either no MMX registers are touched or emms is issued */
145 void checkasm_checked_call(
void *
func, ...);
146 /* Verifies that clobbered callee-saved registers are properly saved and restored
147 * and issues emms for asm functions which are not required to do so */
148 void checkasm_checked_call_emms(
void *
func, ...);
149 /* Verifies that clobbered callee-saved registers are properly saved and restored
150 * but doesn't issue emms. Meant for dsp functions returning float or double */
151 void checkasm_checked_call_float(
void *
func, ...);
152
153 #if ARCH_X86_64
154 /* Evil hack: detect incorrect assumptions that 32-bit ints are zero-extended to 64-bit.
155 * This is done by clobbering the stack with junk around the stack pointer and calling the
156 * assembly function through checked_call() with added dummy arguments which forces all
157 * real arguments to be passed on the stack and not in registers. For 32-bit arguments the
158 * upper half of the 64-bit register locations on the stack will now contain junk which will
159 * cause misbehaving functions to either produce incorrect output or segfault. Note that
160 * even though this works extremely well in practice, it's technically not guaranteed
161 * and false negatives is theoretically possible, but there can never be any false positives.
162 */
163 void checkasm_stack_clobber(uint64_t clobber, ...);
164 #define declare_new(ret, ...) ret (*checked_call)(void *, int, int, int, int, int, __VA_ARGS__)\
165 = (void *)checkasm_checked_call;
166 #define declare_new_float(ret, ...) ret (*checked_call)(void *, int, int, int, int, int, __VA_ARGS__)\
167 = (void *)checkasm_checked_call_float;
168 #define declare_new_emms(cpu_flags, ret, ...) \
169 ret (*checked_call)(void *, int, int, int, int, int, __VA_ARGS__) = \
170 ((cpu_flags) & av_get_cpu_flags()) ? (void *)checkasm_checked_call_emms : \
171 (void *)checkasm_checked_call;
172 #define CLOB (UINT64_C(0xdeadbeefdeadbeef))
173 #define call_new(...) (checkasm_stack_clobber(CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,\
174 CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB),\
175 checked_call(func_new, 0, 0, 0, 0, 0, __VA_ARGS__))
176 #elif ARCH_X86_32
177 #define declare_new(ret, ...) ret (*checked_call)(void *, __VA_ARGS__) = (void *)checkasm_checked_call;
178 #define declare_new_float(ret, ...) ret (*checked_call)(void *, __VA_ARGS__) = (void *)checkasm_checked_call_float;
179 #define declare_new_emms(cpu_flags, ret, ...) ret (*checked_call)(void *, __VA_ARGS__) = \
180 ((cpu_flags) & av_get_cpu_flags()) ? (void *)checkasm_checked_call_emms : \
181 (void *)checkasm_checked_call;
182 #define call_new(...) checked_call(func_new, __VA_ARGS__)
183 #endif
184 #elif ARCH_ARM && HAVE_ARMV5TE_EXTERNAL
185 /* Use a dummy argument, to offset the real parameters by 2, not only 1.
186 * This makes sure that potential 8-byte-alignment of parameters is kept the same
187 * even when the extra parameters have been removed. */
188 void checkasm_checked_call_vfp(
void *
func,
int dummy, ...);
189 void checkasm_checked_call_novfp(
void *
func,
int dummy, ...);
190 extern void (*checkasm_checked_call)(
void *
func,
int dummy, ...);
191 #define declare_new(ret, ...) ret (*checked_call)(void *, int dummy, __VA_ARGS__, \
192 int, int, int, int, int, int, int, int, \
193 int, int, int, int, int, int, int) = (void *)checkasm_checked_call;
194 #define call_new(...) checked_call(func_new, 0, __VA_ARGS__, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 0, 0, 0, 0)
195 #elif ARCH_AARCH64 && !defined(__APPLE__)
196 void checkasm_stack_clobber(uint64_t clobber, ...);
197 void checkasm_checked_call(
void *
func, ...);
198 #define declare_new(ret, ...) ret (*checked_call)(void *, int, int, int, int, int, int, int, __VA_ARGS__,\
199 int, int, int, int, int, int, int, int,\
200 int, int, int, int, int, int, int)\
201 = (void *)checkasm_checked_call;
202 #define CLOB (UINT64_C(0xdeadbeefdeadbeef))
203 #define call_new(...) (checkasm_stack_clobber(CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,\
204 CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB,CLOB),\
205 checked_call(func_new, 0, 0, 0, 0, 0, 0, 0, __VA_ARGS__,\
206 7, 6, 5, 4, 3, 2, 1, 0, 0, 0, 0, 0, 0, 0, 0))
207 #elif ARCH_RISCV
208 void checkasm_set_function(void *);
209 void *checkasm_get_wrapper(void);
210
211 #if (__riscv_xlen == 64) && defined (__riscv_d)
212 #define declare_new(ret, ...) \
213 ret (*checked_call)(__VA_ARGS__) = checkasm_get_wrapper();
214 #define call_new(...) \
215 (checkasm_set_function(func_new), checked_call(__VA_ARGS__))
216 #endif
217 #else
218 #define declare_new(ret, ...)
219 #define declare_new_float(ret, ...)
220 #define declare_new_emms(cpu_flags, ret, ...)
221 /* Call the function */
222 #define call_new(...) ((func_type *)func_new)(__VA_ARGS__)
223 #endif
224
225 #ifndef declare_new_emms
226 #define declare_new_emms(cpu_flags, ret, ...) declare_new(ret, __VA_ARGS__)
227 #endif
228 #ifndef declare_new_float
229 #define declare_new_float(ret, ...) declare_new(ret, __VA_ARGS__)
230 #endif
231
237
238 #if defined(AV_READ_TIME) || CONFIG_LINUX_PERF || CONFIG_MACOS_KPERF
239
240 #if CONFIG_LINUX_PERF
241 #define PERF_START(t) do { \
242 ioctl(sysfd, PERF_EVENT_IOC_RESET, 0); \
243 ioctl(sysfd, PERF_EVENT_IOC_ENABLE, 0); \
244 } while (0)
245 #define PERF_STOP(t) do { \
246 int ret; \
247 ioctl(sysfd, PERF_EVENT_IOC_DISABLE, 0); \
248 ret = read(sysfd, &t, sizeof(t)); \
249 (void)ret; \
250 } while (0)
251 #elif CONFIG_MACOS_KPERF
252 #define PERF_START(t) t = ff_kperf_cycles()
253 #define PERF_STOP(t) t = ff_kperf_cycles() - t
254 #else
255 #define PERF_START(t) t = AV_READ_TIME()
256 #define PERF_STOP(t) t = AV_READ_TIME() - t
257 #endif
258
259 /* Benchmark the function */
260 #define bench_new(...)\
261 do {\
262 if (checkasm_bench_func()) {\
263 struct CheckasmPerf *perf = checkasm_get_perf_context();\
264 av_unused const int sysfd = perf->sysfd;\
265 func_type *tfunc = func_new;\
266 uint64_t tsum = 0;\
267 int ti, tcount = 0;\
268 uint64_t t = 0; \
269 for (ti = 0; ti < BENCH_RUNS; ti++) {\
270 PERF_START(t);\
271 tfunc(__VA_ARGS__);\
272 tfunc(__VA_ARGS__);\
273 tfunc(__VA_ARGS__);\
274 tfunc(__VA_ARGS__);\
275 PERF_STOP(t);\
276 if (t*tcount <= tsum*4 && ti > 0) {\
277 tsum += t;\
278 tcount++;\
279 }\
280 }\
281 emms_c();\
282 perf->cycles += t;\
283 perf->iterations++;\
284 }\
285 } while (0)
286 #else
287 #define bench_new(...) while(0)
288 #define PERF_START(t) while(0)
289 #define PERF_STOP(t) while(0)
290 #endif
291
292 #define DECL_CHECKASM_CHECK_FUNC(type) \
293 int checkasm_check_##type(const char *const file, const int line, \
294 const type *const buf1, const ptrdiff_t stride1, \
295 const type *const buf2, const ptrdiff_t stride2, \
296 const int w, const int h, const char *const name)
297
303
304 #define PASTE(a,b) a ## b
305 #define CONCAT(a,b) PASTE(a,b)
306
307 #define checkasm_check(prefix, ...) CONCAT(checkasm_check_, prefix)(__FILE__, __LINE__, __VA_ARGS__)
308
309 #endif /* TESTS_CHECKASM_CHECKASM_H */