1 // SPDX-License-Identifier: GPL-2.0 2 /* 3 * builtin-test.c 4 * 5 * Builtin regression testing command: ever growing number of sanity tests 6 */ 7 #include <fcntl.h> 8 #include <errno.h> 9 #include <unistd.h> 10 #include <string.h> 11 #include <stdlib.h> 12 #include <sys/types.h> 13 #include <dirent.h> 14 #include <sys/wait.h> 15 #include <sys/stat.h> 16 #include "builtin.h" 17 #include "hist.h" 18 #include "intlist.h" 19 #include "tests.h" 20 #include "debug.h" 21 #include "color.h" 22 #include <subcmd/parse-options.h> 23 #include "string2.h" 24 #include "symbol.h" 25 #include "util/rlimit.h" 26 #include <linux/kernel.h> 27 #include <linux/string.h> 28 #include <subcmd/exec-cmd.h> 29 #include <linux/zalloc.h> 30 31 #include "builtin-test-list.h" 32 33 static bool dont_fork; 34 const char *dso_to_test; 35 36 struct test_suite *__weak arch_tests[] = { 37 NULL, 38 }; 39 40 static struct test_suite *generic_tests[] = { 41 &suite__vmlinux_matches_kallsyms, 42 #ifdef HAVE_LIBTRACEEVENT 43 &suite__openat_syscall_event, 44 &suite__openat_syscall_event_on_all_cpus, 45 &suite__basic_mmap, 46 #endif 47 &suite__mem, 48 &suite__parse_events, 49 &suite__expr, 50 &suite__PERF_RECORD, 51 &suite__pmu, 52 &suite__pmu_events, 53 &suite__dso_data, 54 &suite__dso_data_cache, 55 &suite__dso_data_reopen, 56 &suite__perf_evsel__roundtrip_name_test, 57 #ifdef HAVE_LIBTRACEEVENT 58 &suite__perf_evsel__tp_sched_test, 59 &suite__syscall_openat_tp_fields, 60 #endif 61 &suite__attr, 62 &suite__hists_link, 63 &suite__python_use, 64 &suite__bp_signal, 65 &suite__bp_signal_overflow, 66 &suite__bp_accounting, 67 &suite__wp, 68 &suite__task_exit, 69 &suite__sw_clock_freq, 70 &suite__code_reading, 71 &suite__sample_parsing, 72 &suite__keep_tracking, 73 &suite__parse_no_sample_id_all, 74 &suite__hists_filter, 75 &suite__mmap_thread_lookup, 76 &suite__thread_maps_share, 77 &suite__hists_output, 78 &suite__hists_cumulate, 79 #ifdef HAVE_LIBTRACEEVENT 80 &suite__switch_tracking, 81 #endif 82 &suite__fdarray__filter, 83 &suite__fdarray__add, 84 &suite__kmod_path__parse, 85 &suite__thread_map, 86 &suite__llvm, 87 &suite__session_topology, 88 &suite__bpf, 89 &suite__thread_map_synthesize, 90 &suite__thread_map_remove, 91 &suite__cpu_map, 92 &suite__synthesize_stat_config, 93 &suite__synthesize_stat, 94 &suite__synthesize_stat_round, 95 &suite__event_update, 96 &suite__event_times, 97 &suite__backward_ring_buffer, 98 &suite__sdt_event, 99 &suite__is_printable_array, 100 &suite__bitmap_print, 101 &suite__perf_hooks, 102 &suite__clang, 103 &suite__unit_number__scnprint, 104 &suite__mem2node, 105 &suite__time_utils, 106 &suite__jit_write_elf, 107 &suite__pfm, 108 &suite__api_io, 109 &suite__maps__merge_in, 110 &suite__demangle_java, 111 &suite__demangle_ocaml, 112 &suite__parse_metric, 113 &suite__pe_file_parsing, 114 &suite__expand_cgroup_events, 115 &suite__perf_time_to_tsc, 116 &suite__dlfilter, 117 &suite__sigtrap, 118 &suite__event_groups, 119 &suite__symbols, 120 NULL, 121 }; 122 123 static struct test_suite **tests[] = { 124 generic_tests, 125 arch_tests, 126 }; 127 128 static struct test_workload *workloads[] = { 129 &workload__noploop, 130 &workload__thloop, 131 &workload__leafloop, 132 &workload__sqrtloop, 133 &workload__brstack, 134 &workload__datasym, 135 }; 136 137 static int num_subtests(const struct test_suite *t) 138 { 139 int num; 140 141 if (!t->test_cases) 142 return 0; 143 144 num = 0; 145 while (t->test_cases[num].name) 146 num++; 147 148 return num; 149 } 150 151 static bool has_subtests(const struct test_suite *t) 152 { 153 return num_subtests(t) > 1; 154 } 155 156 static const char *skip_reason(const struct test_suite *t, int subtest) 157 { 158 if (!t->test_cases) 159 return NULL; 160 161 return t->test_cases[subtest >= 0 ? subtest : 0].skip_reason; 162 } 163 164 static const char *test_description(const struct test_suite *t, int subtest) 165 { 166 if (t->test_cases && subtest >= 0) 167 return t->test_cases[subtest].desc; 168 169 return t->desc; 170 } 171 172 static test_fnptr test_function(const struct test_suite *t, int subtest) 173 { 174 if (subtest <= 0) 175 return t->test_cases[0].run_case; 176 177 return t->test_cases[subtest].run_case; 178 } 179 180 static bool perf_test__matches(const char *desc, int curr, int argc, const char *argv[]) 181 { 182 int i; 183 184 if (argc == 0) 185 return true; 186 187 for (i = 0; i < argc; ++i) { 188 char *end; 189 long nr = strtoul(argv[i], &end, 10); 190 191 if (*end == '\0') { 192 if (nr == curr + 1) 193 return true; 194 continue; 195 } 196 197 if (strcasestr(desc, argv[i])) 198 return true; 199 } 200 201 return false; 202 } 203 204 static int run_test(struct test_suite *test, int subtest) 205 { 206 int status, err = -1, child = dont_fork ? 0 : fork(); 207 char sbuf[STRERR_BUFSIZE]; 208 209 if (child < 0) { 210 pr_err("failed to fork test: %s\n", 211 str_error_r(errno, sbuf, sizeof(sbuf))); 212 return -1; 213 } 214 215 if (!child) { 216 if (!dont_fork) { 217 pr_debug("test child forked, pid %d\n", getpid()); 218 219 if (verbose <= 0) { 220 int nullfd = open("/dev/null", O_WRONLY); 221 222 if (nullfd >= 0) { 223 close(STDERR_FILENO); 224 close(STDOUT_FILENO); 225 226 dup2(nullfd, STDOUT_FILENO); 227 dup2(STDOUT_FILENO, STDERR_FILENO); 228 close(nullfd); 229 } 230 } else { 231 signal(SIGSEGV, sighandler_dump_stack); 232 signal(SIGFPE, sighandler_dump_stack); 233 } 234 } 235 236 err = test_function(test, subtest)(test, subtest); 237 if (!dont_fork) 238 exit(err); 239 } 240 241 if (!dont_fork) { 242 wait(&status); 243 244 if (WIFEXITED(status)) { 245 err = (signed char)WEXITSTATUS(status); 246 pr_debug("test child finished with %d\n", err); 247 } else if (WIFSIGNALED(status)) { 248 err = -1; 249 pr_debug("test child interrupted\n"); 250 } 251 } 252 253 return err; 254 } 255 256 #define for_each_test(j, k, t) \ 257 for (j = 0, k = 0; j < ARRAY_SIZE(tests); j++, k = 0) \ 258 while ((t = tests[j][k++]) != NULL) 259 260 static int test_and_print(struct test_suite *t, int subtest) 261 { 262 int err; 263 264 pr_debug("\n--- start ---\n"); 265 err = run_test(t, subtest); 266 pr_debug("---- end ----\n"); 267 268 if (!has_subtests(t)) 269 pr_debug("%s:", t->desc); 270 else 271 pr_debug("%s subtest %d:", t->desc, subtest + 1); 272 273 switch (err) { 274 case TEST_OK: 275 pr_info(" Ok\n"); 276 break; 277 case TEST_SKIP: { 278 const char *reason = skip_reason(t, subtest); 279 280 if (reason) 281 color_fprintf(stderr, PERF_COLOR_YELLOW, " Skip (%s)\n", reason); 282 else 283 color_fprintf(stderr, PERF_COLOR_YELLOW, " Skip\n"); 284 } 285 break; 286 case TEST_FAIL: 287 default: 288 color_fprintf(stderr, PERF_COLOR_RED, " FAILED!\n"); 289 break; 290 } 291 292 return err; 293 } 294 295 struct shell_test { 296 const char *dir; 297 const char *file; 298 }; 299 300 static int shell_test__run(struct test_suite *test, int subdir __maybe_unused) 301 { 302 int err; 303 char script[PATH_MAX]; 304 struct shell_test *st = test->priv; 305 306 path__join(script, sizeof(script) - 3, st->dir, st->file); 307 308 if (verbose > 0) 309 strncat(script, " -v", sizeof(script) - strlen(script) - 1); 310 311 err = system(script); 312 if (!err) 313 return TEST_OK; 314 315 return WEXITSTATUS(err) == 2 ? TEST_SKIP : TEST_FAIL; 316 } 317 318 static int run_shell_tests(int argc, const char *argv[], int i, int width, 319 struct intlist *skiplist) 320 { 321 struct shell_test st; 322 const struct script_file *files, *file; 323 324 files = list_script_files(); 325 if (!files) 326 return 0; 327 for (file = files; file->dir; file++) { 328 int curr = i++; 329 struct test_case test_cases[] = { 330 { 331 .desc = file->desc, 332 .run_case = shell_test__run, 333 }, 334 { .name = NULL, } 335 }; 336 struct test_suite test_suite = { 337 .desc = test_cases[0].desc, 338 .test_cases = test_cases, 339 .priv = &st, 340 }; 341 st.dir = file->dir; 342 343 if (test_suite.desc == NULL || 344 !perf_test__matches(test_suite.desc, curr, argc, argv)) 345 continue; 346 347 st.file = file->file; 348 pr_info("%3d: %-*s:", i, width, test_suite.desc); 349 350 if (intlist__find(skiplist, i)) { 351 color_fprintf(stderr, PERF_COLOR_YELLOW, " Skip (user override)\n"); 352 continue; 353 } 354 355 test_and_print(&test_suite, 0); 356 } 357 return 0; 358 } 359 360 static int __cmd_test(int argc, const char *argv[], struct intlist *skiplist) 361 { 362 struct test_suite *t; 363 unsigned int j, k; 364 int i = 0; 365 int width = list_script_max_width(); 366 367 for_each_test(j, k, t) { 368 int len = strlen(test_description(t, -1)); 369 370 if (width < len) 371 width = len; 372 } 373 374 for_each_test(j, k, t) { 375 int curr = i++; 376 int subi; 377 378 if (!perf_test__matches(test_description(t, -1), curr, argc, argv)) { 379 bool skip = true; 380 int subn; 381 382 subn = num_subtests(t); 383 384 for (subi = 0; subi < subn; subi++) { 385 if (perf_test__matches(test_description(t, subi), 386 curr, argc, argv)) 387 skip = false; 388 } 389 390 if (skip) 391 continue; 392 } 393 394 pr_info("%3d: %-*s:", i, width, test_description(t, -1)); 395 396 if (intlist__find(skiplist, i)) { 397 color_fprintf(stderr, PERF_COLOR_YELLOW, " Skip (user override)\n"); 398 continue; 399 } 400 401 if (!has_subtests(t)) { 402 test_and_print(t, -1); 403 } else { 404 int subn = num_subtests(t); 405 /* 406 * minus 2 to align with normal testcases. 407 * For subtest we print additional '.x' in number. 408 * for example: 409 * 410 * 35: Test LLVM searching and compiling : 411 * 35.1: Basic BPF llvm compiling test : Ok 412 */ 413 int subw = width > 2 ? width - 2 : width; 414 415 if (subn <= 0) { 416 color_fprintf(stderr, PERF_COLOR_YELLOW, 417 " Skip (not compiled in)\n"); 418 continue; 419 } 420 pr_info("\n"); 421 422 for (subi = 0; subi < subn; subi++) { 423 int len = strlen(test_description(t, subi)); 424 425 if (subw < len) 426 subw = len; 427 } 428 429 for (subi = 0; subi < subn; subi++) { 430 if (!perf_test__matches(test_description(t, subi), 431 curr, argc, argv)) 432 continue; 433 434 pr_info("%3d.%1d: %-*s:", i, subi + 1, subw, 435 test_description(t, subi)); 436 test_and_print(t, subi); 437 } 438 } 439 } 440 441 return run_shell_tests(argc, argv, i, width, skiplist); 442 } 443 444 static int perf_test__list_shell(int argc, const char **argv, int i) 445 { 446 const struct script_file *files, *file; 447 448 files = list_script_files(); 449 if (!files) 450 return 0; 451 for (file = files; file->dir; file++) { 452 int curr = i++; 453 struct test_suite t = { 454 .desc = file->desc 455 }; 456 457 if (!perf_test__matches(t.desc, curr, argc, argv)) 458 continue; 459 460 pr_info("%3d: %s\n", i, t.desc); 461 } 462 return 0; 463 } 464 465 static int perf_test__list(int argc, const char **argv) 466 { 467 unsigned int j, k; 468 struct test_suite *t; 469 int i = 0; 470 471 for_each_test(j, k, t) { 472 int curr = i++; 473 474 if (!perf_test__matches(test_description(t, -1), curr, argc, argv)) 475 continue; 476 477 pr_info("%3d: %s\n", i, test_description(t, -1)); 478 479 if (has_subtests(t)) { 480 int subn = num_subtests(t); 481 int subi; 482 483 for (subi = 0; subi < subn; subi++) 484 pr_info("%3d:%1d: %s\n", i, subi + 1, 485 test_description(t, subi)); 486 } 487 } 488 489 perf_test__list_shell(argc, argv, i); 490 491 return 0; 492 } 493 494 static int run_workload(const char *work, int argc, const char **argv) 495 { 496 unsigned int i = 0; 497 struct test_workload *twl; 498 499 for (i = 0; i < ARRAY_SIZE(workloads); i++) { 500 twl = workloads[i]; 501 if (!strcmp(twl->name, work)) 502 return twl->func(argc, argv); 503 } 504 505 pr_info("No workload found: %s\n", work); 506 return -1; 507 } 508 509 int cmd_test(int argc, const char **argv) 510 { 511 const char *test_usage[] = { 512 "perf test [<options>] [{list <test-name-fragment>|[<test-name-fragments>|<test-numbers>]}]", 513 NULL, 514 }; 515 const char *skip = NULL; 516 const char *workload = NULL; 517 const struct option test_options[] = { 518 OPT_STRING('s', "skip", &skip, "tests", "tests to skip"), 519 OPT_INCR('v', "verbose", &verbose, 520 "be more verbose (show symbol address, etc)"), 521 OPT_BOOLEAN('F', "dont-fork", &dont_fork, 522 "Do not fork for testcase"), 523 OPT_STRING('w', "workload", &workload, "work", "workload to run for testing"), 524 OPT_STRING(0, "dso", &dso_to_test, "dso", "dso to test"), 525 OPT_END() 526 }; 527 const char * const test_subcommands[] = { "list", NULL }; 528 struct intlist *skiplist = NULL; 529 int ret = hists__init(); 530 531 if (ret < 0) 532 return ret; 533 534 /* Unbuffered output */ 535 setvbuf(stdout, NULL, _IONBF, 0); 536 537 argc = parse_options_subcommand(argc, argv, test_options, test_subcommands, test_usage, 0); 538 if (argc >= 1 && !strcmp(argv[0], "list")) 539 return perf_test__list(argc - 1, argv + 1); 540 541 if (workload) 542 return run_workload(workload, argc, argv); 543 544 symbol_conf.priv_size = sizeof(int); 545 symbol_conf.sort_by_name = true; 546 symbol_conf.try_vmlinux_path = true; 547 548 if (symbol__init(NULL) < 0) 549 return -1; 550 551 if (skip != NULL) 552 skiplist = intlist__new(skip); 553 /* 554 * Tests that create BPF maps, for instance, need more than the 64K 555 * default: 556 */ 557 rlimit__bump_memlock(); 558 559 return __cmd_test(argc, argv, skiplist); 560 } 561