1  /* SPDX-License-Identifier: GPL-2.0 */
2  /*
3   * kselftest.h:	low-level kselftest framework to include from
4   *		selftest programs. When possible, please use
5   *		kselftest_harness.h instead.
6   *
7   * Copyright (c) 2014 Shuah Khan <shuahkh@osg.samsung.com>
8   * Copyright (c) 2014 Samsung Electronics Co., Ltd.
9   *
10   * Using this API consists of first counting how many tests your code
11   * has to run, and then starting up the reporting:
12   *
13   *     ksft_print_header();
14   *     ksft_set_plan(total_number_of_tests);
15   *
16   * For each test, report any progress, debugging, etc with:
17   *
18   *     ksft_print_msg(fmt, ...);
19   *     ksft_perror(msg);
20   *
21   * and finally report the pass/fail/skip/xfail state of the test with one of:
22   *
23   *     ksft_test_result(condition, fmt, ...);
24   *     ksft_test_result_report(result, fmt, ...);
25   *     ksft_test_result_pass(fmt, ...);
26   *     ksft_test_result_fail(fmt, ...);
27   *     ksft_test_result_skip(fmt, ...);
28   *     ksft_test_result_xfail(fmt, ...);
29   *     ksft_test_result_error(fmt, ...);
30   *     ksft_test_result_code(exit_code, test_name, fmt, ...);
31   *
32   * When all tests are finished, clean up and exit the program with one of:
33   *
34   *    ksft_finished();
35   *    ksft_exit(condition);
36   *    ksft_exit_pass();
37   *    ksft_exit_fail();
38   *
39   * If the program wants to report details on why the entire program has
40   * failed, it can instead exit with a message (this is usually done when
41   * the program is aborting before finishing all tests):
42   *
43   *    ksft_exit_fail_msg(fmt, ...);
44   *    ksft_exit_fail_perror(msg);
45   *
46   */
47  #ifndef __KSELFTEST_H
48  #define __KSELFTEST_H
49  
50  #ifndef NOLIBC
51  #include <errno.h>
52  #include <stdlib.h>
53  #include <unistd.h>
54  #include <stdarg.h>
55  #include <string.h>
56  #include <stdio.h>
57  #include <sys/utsname.h>
58  #endif
59  
60  #ifndef ARRAY_SIZE
61  #define ARRAY_SIZE(arr) (sizeof(arr) / sizeof((arr)[0]))
62  #endif
63  
64  #if defined(__i386__) || defined(__x86_64__) /* arch */
65  /*
66   * gcc cpuid.h provides __cpuid_count() since v4.4.
67   * Clang/LLVM cpuid.h provides  __cpuid_count() since v3.4.0.
68   *
69   * Provide local define for tests needing __cpuid_count() because
70   * selftests need to work in older environments that do not yet
71   * have __cpuid_count().
72   */
73  #ifndef __cpuid_count
74  #define __cpuid_count(level, count, a, b, c, d)				\
75  	__asm__ __volatile__ ("cpuid\n\t"				\
76  			      : "=a" (a), "=b" (b), "=c" (c), "=d" (d)	\
77  			      : "0" (level), "2" (count))
78  #endif
79  #endif /* end arch */
80  
81  /* define kselftest exit codes */
82  #define KSFT_PASS  0
83  #define KSFT_FAIL  1
84  #define KSFT_XFAIL 2
85  #define KSFT_XPASS 3
86  #define KSFT_SKIP  4
87  
88  #ifndef __noreturn
89  #define __noreturn       __attribute__((__noreturn__))
90  #endif
91  #define __printf(a, b)   __attribute__((format(printf, a, b)))
92  
93  /* counters */
94  struct ksft_count {
95  	unsigned int ksft_pass;
96  	unsigned int ksft_fail;
97  	unsigned int ksft_xfail;
98  	unsigned int ksft_xpass;
99  	unsigned int ksft_xskip;
100  	unsigned int ksft_error;
101  };
102  
103  static struct ksft_count ksft_cnt;
104  static unsigned int ksft_plan;
105  
ksft_test_num(void)106  static inline unsigned int ksft_test_num(void)
107  {
108  	return ksft_cnt.ksft_pass + ksft_cnt.ksft_fail +
109  		ksft_cnt.ksft_xfail + ksft_cnt.ksft_xpass +
110  		ksft_cnt.ksft_xskip + ksft_cnt.ksft_error;
111  }
112  
ksft_inc_pass_cnt(void)113  static inline void ksft_inc_pass_cnt(void) { ksft_cnt.ksft_pass++; }
ksft_inc_fail_cnt(void)114  static inline void ksft_inc_fail_cnt(void) { ksft_cnt.ksft_fail++; }
ksft_inc_xfail_cnt(void)115  static inline void ksft_inc_xfail_cnt(void) { ksft_cnt.ksft_xfail++; }
ksft_inc_xpass_cnt(void)116  static inline void ksft_inc_xpass_cnt(void) { ksft_cnt.ksft_xpass++; }
ksft_inc_xskip_cnt(void)117  static inline void ksft_inc_xskip_cnt(void) { ksft_cnt.ksft_xskip++; }
ksft_inc_error_cnt(void)118  static inline void ksft_inc_error_cnt(void) { ksft_cnt.ksft_error++; }
119  
ksft_get_pass_cnt(void)120  static inline int ksft_get_pass_cnt(void) { return ksft_cnt.ksft_pass; }
ksft_get_fail_cnt(void)121  static inline int ksft_get_fail_cnt(void) { return ksft_cnt.ksft_fail; }
ksft_get_xfail_cnt(void)122  static inline int ksft_get_xfail_cnt(void) { return ksft_cnt.ksft_xfail; }
ksft_get_xpass_cnt(void)123  static inline int ksft_get_xpass_cnt(void) { return ksft_cnt.ksft_xpass; }
ksft_get_xskip_cnt(void)124  static inline int ksft_get_xskip_cnt(void) { return ksft_cnt.ksft_xskip; }
ksft_get_error_cnt(void)125  static inline int ksft_get_error_cnt(void) { return ksft_cnt.ksft_error; }
126  
ksft_print_header(void)127  static inline void ksft_print_header(void)
128  {
129  	/*
130  	 * Force line buffering; If stdout is not connected to a terminal, it
131  	 * will otherwise default to fully buffered, which can cause output
132  	 * duplication if there is content in the buffer when fork()ing. If
133  	 * there is a crash, line buffering also means the most recent output
134  	 * line will be visible.
135  	 */
136  	setvbuf(stdout, NULL, _IOLBF, 0);
137  
138  	if (!(getenv("KSFT_TAP_LEVEL")))
139  		printf("TAP version 13\n");
140  }
141  
ksft_set_plan(unsigned int plan)142  static inline void ksft_set_plan(unsigned int plan)
143  {
144  	ksft_plan = plan;
145  	printf("1..%u\n", ksft_plan);
146  }
147  
ksft_print_cnts(void)148  static inline void ksft_print_cnts(void)
149  {
150  	if (ksft_plan != ksft_test_num())
151  		printf("# Planned tests != run tests (%u != %u)\n",
152  			ksft_plan, ksft_test_num());
153  	printf("# Totals: pass:%u fail:%u xfail:%u xpass:%u skip:%u error:%u\n",
154  		ksft_cnt.ksft_pass, ksft_cnt.ksft_fail,
155  		ksft_cnt.ksft_xfail, ksft_cnt.ksft_xpass,
156  		ksft_cnt.ksft_xskip, ksft_cnt.ksft_error);
157  }
158  
ksft_print_msg(const char * msg,...)159  static inline __printf(1, 2) void ksft_print_msg(const char *msg, ...)
160  {
161  	int saved_errno = errno;
162  	va_list args;
163  
164  	va_start(args, msg);
165  	printf("# ");
166  	errno = saved_errno;
167  	vprintf(msg, args);
168  	va_end(args);
169  }
170  
ksft_perror(const char * msg)171  static inline void ksft_perror(const char *msg)
172  {
173  	ksft_print_msg("%s: %s (%d)\n", msg, strerror(errno), errno);
174  }
175  
ksft_test_result_pass(const char * msg,...)176  static inline __printf(1, 2) void ksft_test_result_pass(const char *msg, ...)
177  {
178  	int saved_errno = errno;
179  	va_list args;
180  
181  	ksft_cnt.ksft_pass++;
182  
183  	va_start(args, msg);
184  	printf("ok %u ", ksft_test_num());
185  	errno = saved_errno;
186  	vprintf(msg, args);
187  	va_end(args);
188  }
189  
ksft_test_result_fail(const char * msg,...)190  static inline __printf(1, 2) void ksft_test_result_fail(const char *msg, ...)
191  {
192  	int saved_errno = errno;
193  	va_list args;
194  
195  	ksft_cnt.ksft_fail++;
196  
197  	va_start(args, msg);
198  	printf("not ok %u ", ksft_test_num());
199  	errno = saved_errno;
200  	vprintf(msg, args);
201  	va_end(args);
202  }
203  
204  /**
205   * ksft_test_result() - Report test success based on truth of condition
206   *
207   * @condition: if true, report test success, otherwise failure.
208   */
209  #define ksft_test_result(condition, fmt, ...) do {	\
210  	if (!!(condition))				\
211  		ksft_test_result_pass(fmt, ##__VA_ARGS__);\
212  	else						\
213  		ksft_test_result_fail(fmt, ##__VA_ARGS__);\
214  	} while (0)
215  
ksft_test_result_xfail(const char * msg,...)216  static inline __printf(1, 2) void ksft_test_result_xfail(const char *msg, ...)
217  {
218  	int saved_errno = errno;
219  	va_list args;
220  
221  	ksft_cnt.ksft_xfail++;
222  
223  	va_start(args, msg);
224  	printf("ok %u # XFAIL ", ksft_test_num());
225  	errno = saved_errno;
226  	vprintf(msg, args);
227  	va_end(args);
228  }
229  
ksft_test_result_skip(const char * msg,...)230  static inline __printf(1, 2) void ksft_test_result_skip(const char *msg, ...)
231  {
232  	int saved_errno = errno;
233  	va_list args;
234  
235  	ksft_cnt.ksft_xskip++;
236  
237  	va_start(args, msg);
238  	printf("ok %u # SKIP ", ksft_test_num());
239  	errno = saved_errno;
240  	vprintf(msg, args);
241  	va_end(args);
242  }
243  
244  /* TODO: how does "error" differ from "fail" or "skip"? */
ksft_test_result_error(const char * msg,...)245  static inline __printf(1, 2) void ksft_test_result_error(const char *msg, ...)
246  {
247  	int saved_errno = errno;
248  	va_list args;
249  
250  	ksft_cnt.ksft_error++;
251  
252  	va_start(args, msg);
253  	printf("not ok %u # error ", ksft_test_num());
254  	errno = saved_errno;
255  	vprintf(msg, args);
256  	va_end(args);
257  }
258  
259  static inline __printf(3, 4)
ksft_test_result_code(int exit_code,const char * test_name,const char * msg,...)260  void ksft_test_result_code(int exit_code, const char *test_name,
261  			   const char *msg, ...)
262  {
263  	const char *tap_code = "ok";
264  	const char *directive = "";
265  	int saved_errno = errno;
266  	va_list args;
267  
268  	switch (exit_code) {
269  	case KSFT_PASS:
270  		ksft_cnt.ksft_pass++;
271  		break;
272  	case KSFT_XFAIL:
273  		directive = " # XFAIL ";
274  		ksft_cnt.ksft_xfail++;
275  		break;
276  	case KSFT_XPASS:
277  		directive = " # XPASS ";
278  		ksft_cnt.ksft_xpass++;
279  		break;
280  	case KSFT_SKIP:
281  		directive = " # SKIP ";
282  		ksft_cnt.ksft_xskip++;
283  		break;
284  	case KSFT_FAIL:
285  	default:
286  		tap_code = "not ok";
287  		ksft_cnt.ksft_fail++;
288  		break;
289  	}
290  
291  	/* Docs seem to call for double space if directive is absent */
292  	if (!directive[0] && msg)
293  		directive = " #  ";
294  
295  	printf("%s %u %s%s", tap_code, ksft_test_num(), test_name, directive);
296  	errno = saved_errno;
297  	if (msg) {
298  		va_start(args, msg);
299  		vprintf(msg, args);
300  		va_end(args);
301  	}
302  	printf("\n");
303  }
304  
305  /**
306   * ksft_test_result() - Report test success based on truth of condition
307   *
308   * @condition: if true, report test success, otherwise failure.
309   */
310  #define ksft_test_result_report(result, fmt, ...) do {		\
311  	switch (result) {					\
312  	case KSFT_PASS:						\
313  		ksft_test_result_pass(fmt, ##__VA_ARGS__);	\
314  		break;						\
315  	case KSFT_FAIL:						\
316  		ksft_test_result_fail(fmt, ##__VA_ARGS__);	\
317  		break;						\
318  	case KSFT_XFAIL:					\
319  		ksft_test_result_xfail(fmt, ##__VA_ARGS__);	\
320  		break;						\
321  	case KSFT_SKIP:						\
322  		ksft_test_result_skip(fmt, ##__VA_ARGS__);	\
323  		break;						\
324  	} } while (0)
325  
ksft_exit_pass(void)326  static inline __noreturn void ksft_exit_pass(void)
327  {
328  	ksft_print_cnts();
329  	exit(KSFT_PASS);
330  }
331  
ksft_exit_fail(void)332  static inline __noreturn void ksft_exit_fail(void)
333  {
334  	ksft_print_cnts();
335  	exit(KSFT_FAIL);
336  }
337  
338  /**
339   * ksft_exit() - Exit selftest based on truth of condition
340   *
341   * @condition: if true, exit self test with success, otherwise fail.
342   */
343  #define ksft_exit(condition) do {	\
344  	if (!!(condition))		\
345  		ksft_exit_pass();	\
346  	else				\
347  		ksft_exit_fail();	\
348  	} while (0)
349  
350  /**
351   * ksft_finished() - Exit selftest with success if all tests passed
352   */
353  #define ksft_finished()			\
354  	ksft_exit(ksft_plan ==		\
355  		  ksft_cnt.ksft_pass +	\
356  		  ksft_cnt.ksft_xfail +	\
357  		  ksft_cnt.ksft_xskip)
358  
ksft_exit_fail_msg(const char * msg,...)359  static inline __noreturn __printf(1, 2) void ksft_exit_fail_msg(const char *msg, ...)
360  {
361  	int saved_errno = errno;
362  	va_list args;
363  
364  	va_start(args, msg);
365  	printf("Bail out! ");
366  	errno = saved_errno;
367  	vprintf(msg, args);
368  	va_end(args);
369  
370  	ksft_print_cnts();
371  	exit(KSFT_FAIL);
372  }
373  
ksft_exit_fail_perror(const char * msg)374  static inline __noreturn void ksft_exit_fail_perror(const char *msg)
375  {
376  	ksft_exit_fail_msg("%s: %s (%d)\n", msg, strerror(errno), errno);
377  }
378  
ksft_exit_xfail(void)379  static inline __noreturn void ksft_exit_xfail(void)
380  {
381  	ksft_print_cnts();
382  	exit(KSFT_XFAIL);
383  }
384  
ksft_exit_xpass(void)385  static inline __noreturn void ksft_exit_xpass(void)
386  {
387  	ksft_print_cnts();
388  	exit(KSFT_XPASS);
389  }
390  
ksft_exit_skip(const char * msg,...)391  static inline __noreturn __printf(1, 2) void ksft_exit_skip(const char *msg, ...)
392  {
393  	int saved_errno = errno;
394  	va_list args;
395  
396  	va_start(args, msg);
397  
398  	/*
399  	 * FIXME: several tests misuse ksft_exit_skip so produce
400  	 * something sensible if some tests have already been run
401  	 * or a plan has been printed.  Those tests should use
402  	 * ksft_test_result_skip or ksft_exit_fail_msg instead.
403  	 */
404  	if (ksft_plan || ksft_test_num()) {
405  		ksft_cnt.ksft_xskip++;
406  		printf("ok %d # SKIP ", 1 + ksft_test_num());
407  	} else {
408  		printf("1..0 # SKIP ");
409  	}
410  	if (msg) {
411  		errno = saved_errno;
412  		vprintf(msg, args);
413  		va_end(args);
414  	}
415  	if (ksft_test_num())
416  		ksft_print_cnts();
417  	exit(KSFT_SKIP);
418  }
419  
ksft_min_kernel_version(unsigned int min_major,unsigned int min_minor)420  static inline int ksft_min_kernel_version(unsigned int min_major,
421  					  unsigned int min_minor)
422  {
423  #ifdef NOLIBC
424  	ksft_print_msg("NOLIBC: Can't check kernel version: Function not implemented\n");
425  	return 0;
426  #else
427  	unsigned int major, minor;
428  	struct utsname info;
429  
430  	if (uname(&info) || sscanf(info.release, "%u.%u.", &major, &minor) != 2)
431  		ksft_exit_fail_msg("Can't parse kernel version\n");
432  
433  	return major > min_major || (major == min_major && minor >= min_minor);
434  #endif
435  }
436  
437  #endif /* __KSELFTEST_H */
438