1 #include <sys/time.h> 2 #include <sys/prctl.h> 3 #include <time.h> 4 #include <stdlib.h> 5 6 #include "parse-events.h" 7 #include "evlist.h" 8 #include "evsel.h" 9 #include "thread_map.h" 10 #include "cpumap.h" 11 #include "tests.h" 12 13 static int spin_sleep(void) 14 { 15 struct timeval start, now, diff, maxtime; 16 struct timespec ts; 17 int err, i; 18 19 maxtime.tv_sec = 0; 20 maxtime.tv_usec = 50000; 21 22 err = gettimeofday(&start, NULL); 23 if (err) 24 return err; 25 26 /* Spin for 50ms */ 27 while (1) { 28 for (i = 0; i < 1000; i++) 29 barrier(); 30 31 err = gettimeofday(&now, NULL); 32 if (err) 33 return err; 34 35 timersub(&now, &start, &diff); 36 if (timercmp(&diff, &maxtime, > /* For checkpatch */)) 37 break; 38 } 39 40 ts.tv_nsec = 50 * 1000 * 1000; 41 ts.tv_sec = 0; 42 43 /* Sleep for 50ms */ 44 err = nanosleep(&ts, NULL); 45 if (err == EINTR) 46 err = 0; 47 48 return err; 49 } 50 51 struct switch_tracking { 52 struct perf_evsel *switch_evsel; 53 struct perf_evsel *cycles_evsel; 54 pid_t *tids; 55 int nr_tids; 56 int comm_seen[4]; 57 int cycles_before_comm_1; 58 int cycles_between_comm_2_and_comm_3; 59 int cycles_after_comm_4; 60 }; 61 62 static int check_comm(struct switch_tracking *switch_tracking, 63 union perf_event *event, const char *comm, int nr) 64 { 65 if (event->header.type == PERF_RECORD_COMM && 66 (pid_t)event->comm.pid == getpid() && 67 (pid_t)event->comm.tid == getpid() && 68 strcmp(event->comm.comm, comm) == 0) { 69 if (switch_tracking->comm_seen[nr]) { 70 pr_debug("Duplicate comm event\n"); 71 return -1; 72 } 73 switch_tracking->comm_seen[nr] = 1; 74 pr_debug3("comm event: %s nr: %d\n", event->comm.comm, nr); 75 return 1; 76 } 77 return 0; 78 } 79 80 static int check_cpu(struct switch_tracking *switch_tracking, int cpu) 81 { 82 int i, nr = cpu + 1; 83 84 if (cpu < 0) 85 return -1; 86 87 if (!switch_tracking->tids) { 88 switch_tracking->tids = calloc(nr, sizeof(pid_t)); 89 if (!switch_tracking->tids) 90 return -1; 91 for (i = 0; i < nr; i++) 92 switch_tracking->tids[i] = -1; 93 switch_tracking->nr_tids = nr; 94 return 0; 95 } 96 97 if (cpu >= switch_tracking->nr_tids) { 98 void *addr; 99 100 addr = realloc(switch_tracking->tids, nr * sizeof(pid_t)); 101 if (!addr) 102 return -1; 103 switch_tracking->tids = addr; 104 for (i = switch_tracking->nr_tids; i < nr; i++) 105 switch_tracking->tids[i] = -1; 106 switch_tracking->nr_tids = nr; 107 return 0; 108 } 109 110 return 0; 111 } 112 113 static int process_sample_event(struct perf_evlist *evlist, 114 union perf_event *event, 115 struct switch_tracking *switch_tracking) 116 { 117 struct perf_sample sample; 118 struct perf_evsel *evsel; 119 pid_t next_tid, prev_tid; 120 int cpu, err; 121 122 if (perf_evlist__parse_sample(evlist, event, &sample)) { 123 pr_debug("perf_evlist__parse_sample failed\n"); 124 return -1; 125 } 126 127 evsel = perf_evlist__id2evsel(evlist, sample.id); 128 if (evsel == switch_tracking->switch_evsel) { 129 next_tid = perf_evsel__intval(evsel, &sample, "next_pid"); 130 prev_tid = perf_evsel__intval(evsel, &sample, "prev_pid"); 131 cpu = sample.cpu; 132 pr_debug3("sched_switch: cpu: %d prev_tid %d next_tid %d\n", 133 cpu, prev_tid, next_tid); 134 err = check_cpu(switch_tracking, cpu); 135 if (err) 136 return err; 137 /* 138 * Check for no missing sched_switch events i.e. that the 139 * evsel->system_wide flag has worked. 140 */ 141 if (switch_tracking->tids[cpu] != -1 && 142 switch_tracking->tids[cpu] != prev_tid) { 143 pr_debug("Missing sched_switch events\n"); 144 return -1; 145 } 146 switch_tracking->tids[cpu] = next_tid; 147 } 148 149 if (evsel == switch_tracking->cycles_evsel) { 150 pr_debug3("cycles event\n"); 151 if (!switch_tracking->comm_seen[0]) 152 switch_tracking->cycles_before_comm_1 = 1; 153 if (switch_tracking->comm_seen[1] && 154 !switch_tracking->comm_seen[2]) 155 switch_tracking->cycles_between_comm_2_and_comm_3 = 1; 156 if (switch_tracking->comm_seen[3]) 157 switch_tracking->cycles_after_comm_4 = 1; 158 } 159 160 return 0; 161 } 162 163 static int process_event(struct perf_evlist *evlist, union perf_event *event, 164 struct switch_tracking *switch_tracking) 165 { 166 if (event->header.type == PERF_RECORD_SAMPLE) 167 return process_sample_event(evlist, event, switch_tracking); 168 169 if (event->header.type == PERF_RECORD_COMM) { 170 int err, done = 0; 171 172 err = check_comm(switch_tracking, event, "Test COMM 1", 0); 173 if (err < 0) 174 return -1; 175 done += err; 176 err = check_comm(switch_tracking, event, "Test COMM 2", 1); 177 if (err < 0) 178 return -1; 179 done += err; 180 err = check_comm(switch_tracking, event, "Test COMM 3", 2); 181 if (err < 0) 182 return -1; 183 done += err; 184 err = check_comm(switch_tracking, event, "Test COMM 4", 3); 185 if (err < 0) 186 return -1; 187 done += err; 188 if (done != 1) { 189 pr_debug("Unexpected comm event\n"); 190 return -1; 191 } 192 } 193 194 return 0; 195 } 196 197 struct event_node { 198 struct list_head list; 199 union perf_event *event; 200 u64 event_time; 201 }; 202 203 static int add_event(struct perf_evlist *evlist, struct list_head *events, 204 union perf_event *event) 205 { 206 struct perf_sample sample; 207 struct event_node *node; 208 209 node = malloc(sizeof(struct event_node)); 210 if (!node) { 211 pr_debug("malloc failed\n"); 212 return -1; 213 } 214 node->event = event; 215 list_add(&node->list, events); 216 217 if (perf_evlist__parse_sample(evlist, event, &sample)) { 218 pr_debug("perf_evlist__parse_sample failed\n"); 219 return -1; 220 } 221 222 if (!sample.time) { 223 pr_debug("event with no time\n"); 224 return -1; 225 } 226 227 node->event_time = sample.time; 228 229 return 0; 230 } 231 232 static void free_event_nodes(struct list_head *events) 233 { 234 struct event_node *node; 235 236 while (!list_empty(events)) { 237 node = list_entry(events->next, struct event_node, list); 238 list_del(&node->list); 239 free(node); 240 } 241 } 242 243 static int compar(const void *a, const void *b) 244 { 245 const struct event_node *nodea = a; 246 const struct event_node *nodeb = b; 247 s64 cmp = nodea->event_time - nodeb->event_time; 248 249 return cmp; 250 } 251 252 static int process_events(struct perf_evlist *evlist, 253 struct switch_tracking *switch_tracking) 254 { 255 union perf_event *event; 256 unsigned pos, cnt = 0; 257 LIST_HEAD(events); 258 struct event_node *events_array, *node; 259 int i, ret; 260 261 for (i = 0; i < evlist->nr_mmaps; i++) { 262 while ((event = perf_evlist__mmap_read(evlist, i)) != NULL) { 263 cnt += 1; 264 ret = add_event(evlist, &events, event); 265 perf_evlist__mmap_consume(evlist, i); 266 if (ret < 0) 267 goto out_free_nodes; 268 } 269 } 270 271 events_array = calloc(cnt, sizeof(struct event_node)); 272 if (!events_array) { 273 pr_debug("calloc failed\n"); 274 ret = -1; 275 goto out_free_nodes; 276 } 277 278 pos = 0; 279 list_for_each_entry(node, &events, list) 280 events_array[pos++] = *node; 281 282 qsort(events_array, cnt, sizeof(struct event_node), compar); 283 284 for (pos = 0; pos < cnt; pos++) { 285 ret = process_event(evlist, events_array[pos].event, 286 switch_tracking); 287 if (ret < 0) 288 goto out_free; 289 } 290 291 ret = 0; 292 out_free: 293 pr_debug("%u events recorded\n", cnt); 294 free(events_array); 295 out_free_nodes: 296 free_event_nodes(&events); 297 return ret; 298 } 299 300 /** 301 * test__switch_tracking - test using sched_switch and tracking events. 302 * 303 * This function implements a test that checks that sched_switch events and 304 * tracking events can be recorded for a workload (current process) using the 305 * evsel->system_wide and evsel->tracking flags (respectively) with other events 306 * sometimes enabled or disabled. 307 */ 308 int test__switch_tracking(void) 309 { 310 const char *sched_switch = "sched:sched_switch"; 311 struct switch_tracking switch_tracking = { .tids = NULL, }; 312 struct record_opts opts = { 313 .mmap_pages = UINT_MAX, 314 .user_freq = UINT_MAX, 315 .user_interval = ULLONG_MAX, 316 .freq = 4000, 317 .target = { 318 .uses_mmap = true, 319 }, 320 }; 321 struct thread_map *threads = NULL; 322 struct cpu_map *cpus = NULL; 323 struct perf_evlist *evlist = NULL; 324 struct perf_evsel *evsel, *cpu_clocks_evsel, *cycles_evsel; 325 struct perf_evsel *switch_evsel, *tracking_evsel; 326 const char *comm; 327 int err = -1; 328 329 threads = thread_map__new(-1, getpid(), UINT_MAX); 330 if (!threads) { 331 pr_debug("thread_map__new failed!\n"); 332 goto out_err; 333 } 334 335 cpus = cpu_map__new(NULL); 336 if (!cpus) { 337 pr_debug("cpu_map__new failed!\n"); 338 goto out_err; 339 } 340 341 evlist = perf_evlist__new(); 342 if (!evlist) { 343 pr_debug("perf_evlist__new failed!\n"); 344 goto out_err; 345 } 346 347 perf_evlist__set_maps(evlist, cpus, threads); 348 349 /* First event */ 350 err = parse_events(evlist, "cpu-clock:u"); 351 if (err) { 352 pr_debug("Failed to parse event dummy:u\n"); 353 goto out_err; 354 } 355 356 cpu_clocks_evsel = perf_evlist__last(evlist); 357 358 /* Second event */ 359 err = parse_events(evlist, "cycles:u"); 360 if (err) { 361 pr_debug("Failed to parse event cycles:u\n"); 362 goto out_err; 363 } 364 365 cycles_evsel = perf_evlist__last(evlist); 366 367 /* Third event */ 368 if (!perf_evlist__can_select_event(evlist, sched_switch)) { 369 fprintf(stderr, " (no sched_switch)"); 370 err = 0; 371 goto out; 372 } 373 374 err = parse_events(evlist, sched_switch); 375 if (err) { 376 pr_debug("Failed to parse event %s\n", sched_switch); 377 goto out_err; 378 } 379 380 switch_evsel = perf_evlist__last(evlist); 381 382 perf_evsel__set_sample_bit(switch_evsel, CPU); 383 perf_evsel__set_sample_bit(switch_evsel, TIME); 384 385 switch_evsel->system_wide = true; 386 switch_evsel->no_aux_samples = true; 387 switch_evsel->immediate = true; 388 389 /* Test moving an event to the front */ 390 if (cycles_evsel == perf_evlist__first(evlist)) { 391 pr_debug("cycles event already at front"); 392 goto out_err; 393 } 394 perf_evlist__to_front(evlist, cycles_evsel); 395 if (cycles_evsel != perf_evlist__first(evlist)) { 396 pr_debug("Failed to move cycles event to front"); 397 goto out_err; 398 } 399 400 perf_evsel__set_sample_bit(cycles_evsel, CPU); 401 perf_evsel__set_sample_bit(cycles_evsel, TIME); 402 403 /* Fourth event */ 404 err = parse_events(evlist, "dummy:u"); 405 if (err) { 406 pr_debug("Failed to parse event dummy:u\n"); 407 goto out_err; 408 } 409 410 tracking_evsel = perf_evlist__last(evlist); 411 412 perf_evlist__set_tracking_event(evlist, tracking_evsel); 413 414 tracking_evsel->attr.freq = 0; 415 tracking_evsel->attr.sample_period = 1; 416 417 perf_evsel__set_sample_bit(tracking_evsel, TIME); 418 419 /* Config events */ 420 perf_evlist__config(evlist, &opts); 421 422 /* Check moved event is still at the front */ 423 if (cycles_evsel != perf_evlist__first(evlist)) { 424 pr_debug("Front event no longer at front"); 425 goto out_err; 426 } 427 428 /* Check tracking event is tracking */ 429 if (!tracking_evsel->attr.mmap || !tracking_evsel->attr.comm) { 430 pr_debug("Tracking event not tracking\n"); 431 goto out_err; 432 } 433 434 /* Check non-tracking events are not tracking */ 435 evlist__for_each(evlist, evsel) { 436 if (evsel != tracking_evsel) { 437 if (evsel->attr.mmap || evsel->attr.comm) { 438 pr_debug("Non-tracking event is tracking\n"); 439 goto out_err; 440 } 441 } 442 } 443 444 if (perf_evlist__open(evlist) < 0) { 445 fprintf(stderr, " (not supported)"); 446 err = 0; 447 goto out; 448 } 449 450 err = perf_evlist__mmap(evlist, UINT_MAX, false); 451 if (err) { 452 pr_debug("perf_evlist__mmap failed!\n"); 453 goto out_err; 454 } 455 456 perf_evlist__enable(evlist); 457 458 err = perf_evlist__disable_event(evlist, cpu_clocks_evsel); 459 if (err) { 460 pr_debug("perf_evlist__disable_event failed!\n"); 461 goto out_err; 462 } 463 464 err = spin_sleep(); 465 if (err) { 466 pr_debug("spin_sleep failed!\n"); 467 goto out_err; 468 } 469 470 comm = "Test COMM 1"; 471 err = prctl(PR_SET_NAME, (unsigned long)comm, 0, 0, 0); 472 if (err) { 473 pr_debug("PR_SET_NAME failed!\n"); 474 goto out_err; 475 } 476 477 err = perf_evlist__disable_event(evlist, cycles_evsel); 478 if (err) { 479 pr_debug("perf_evlist__disable_event failed!\n"); 480 goto out_err; 481 } 482 483 comm = "Test COMM 2"; 484 err = prctl(PR_SET_NAME, (unsigned long)comm, 0, 0, 0); 485 if (err) { 486 pr_debug("PR_SET_NAME failed!\n"); 487 goto out_err; 488 } 489 490 err = spin_sleep(); 491 if (err) { 492 pr_debug("spin_sleep failed!\n"); 493 goto out_err; 494 } 495 496 comm = "Test COMM 3"; 497 err = prctl(PR_SET_NAME, (unsigned long)comm, 0, 0, 0); 498 if (err) { 499 pr_debug("PR_SET_NAME failed!\n"); 500 goto out_err; 501 } 502 503 err = perf_evlist__enable_event(evlist, cycles_evsel); 504 if (err) { 505 pr_debug("perf_evlist__disable_event failed!\n"); 506 goto out_err; 507 } 508 509 comm = "Test COMM 4"; 510 err = prctl(PR_SET_NAME, (unsigned long)comm, 0, 0, 0); 511 if (err) { 512 pr_debug("PR_SET_NAME failed!\n"); 513 goto out_err; 514 } 515 516 err = spin_sleep(); 517 if (err) { 518 pr_debug("spin_sleep failed!\n"); 519 goto out_err; 520 } 521 522 perf_evlist__disable(evlist); 523 524 switch_tracking.switch_evsel = switch_evsel; 525 switch_tracking.cycles_evsel = cycles_evsel; 526 527 err = process_events(evlist, &switch_tracking); 528 529 zfree(&switch_tracking.tids); 530 531 if (err) 532 goto out_err; 533 534 /* Check all 4 comm events were seen i.e. that evsel->tracking works */ 535 if (!switch_tracking.comm_seen[0] || !switch_tracking.comm_seen[1] || 536 !switch_tracking.comm_seen[2] || !switch_tracking.comm_seen[3]) { 537 pr_debug("Missing comm events\n"); 538 goto out_err; 539 } 540 541 /* Check cycles event got enabled */ 542 if (!switch_tracking.cycles_before_comm_1) { 543 pr_debug("Missing cycles events\n"); 544 goto out_err; 545 } 546 547 /* Check cycles event got disabled */ 548 if (switch_tracking.cycles_between_comm_2_and_comm_3) { 549 pr_debug("cycles events even though event was disabled\n"); 550 goto out_err; 551 } 552 553 /* Check cycles event got enabled again */ 554 if (!switch_tracking.cycles_after_comm_4) { 555 pr_debug("Missing cycles events\n"); 556 goto out_err; 557 } 558 out: 559 if (evlist) { 560 perf_evlist__disable(evlist); 561 perf_evlist__delete(evlist); 562 } else { 563 cpu_map__delete(cpus); 564 thread_map__delete(threads); 565 } 566 567 return err; 568 569 out_err: 570 err = -1; 571 goto out; 572 } 573