1 #include <linux/kernel.h> 2 3 #include <byteswap.h> 4 #include <unistd.h> 5 #include <sys/types.h> 6 #include <sys/mman.h> 7 8 #include "evlist.h" 9 #include "evsel.h" 10 #include "session.h" 11 #include "tool.h" 12 #include "sort.h" 13 #include "util.h" 14 #include "cpumap.h" 15 #include "event-parse.h" 16 #include "perf_regs.h" 17 #include "vdso.h" 18 19 static int perf_session__open(struct perf_session *self, bool force) 20 { 21 struct stat input_stat; 22 23 if (!strcmp(self->filename, "-")) { 24 self->fd_pipe = true; 25 self->fd = STDIN_FILENO; 26 27 if (perf_session__read_header(self, self->fd) < 0) 28 pr_err("incompatible file format (rerun with -v to learn more)"); 29 30 return 0; 31 } 32 33 self->fd = open(self->filename, O_RDONLY); 34 if (self->fd < 0) { 35 int err = errno; 36 37 pr_err("failed to open %s: %s", self->filename, strerror(err)); 38 if (err == ENOENT && !strcmp(self->filename, "perf.data")) 39 pr_err(" (try 'perf record' first)"); 40 pr_err("\n"); 41 return -errno; 42 } 43 44 if (fstat(self->fd, &input_stat) < 0) 45 goto out_close; 46 47 if (!force && input_stat.st_uid && (input_stat.st_uid != geteuid())) { 48 pr_err("file %s not owned by current user or root\n", 49 self->filename); 50 goto out_close; 51 } 52 53 if (!input_stat.st_size) { 54 pr_info("zero-sized file (%s), nothing to do!\n", 55 self->filename); 56 goto out_close; 57 } 58 59 if (perf_session__read_header(self, self->fd) < 0) { 60 pr_err("incompatible file format (rerun with -v to learn more)"); 61 goto out_close; 62 } 63 64 if (!perf_evlist__valid_sample_type(self->evlist)) { 65 pr_err("non matching sample_type"); 66 goto out_close; 67 } 68 69 if (!perf_evlist__valid_sample_id_all(self->evlist)) { 70 pr_err("non matching sample_id_all"); 71 goto out_close; 72 } 73 74 self->size = input_stat.st_size; 75 return 0; 76 77 out_close: 78 close(self->fd); 79 self->fd = -1; 80 return -1; 81 } 82 83 void perf_session__set_id_hdr_size(struct perf_session *session) 84 { 85 u16 id_hdr_size = perf_evlist__id_hdr_size(session->evlist); 86 87 machines__set_id_hdr_size(&session->machines, id_hdr_size); 88 } 89 90 int perf_session__create_kernel_maps(struct perf_session *self) 91 { 92 int ret = machine__create_kernel_maps(&self->machines.host); 93 94 if (ret >= 0) 95 ret = machines__create_guest_kernel_maps(&self->machines); 96 return ret; 97 } 98 99 static void perf_session__destroy_kernel_maps(struct perf_session *self) 100 { 101 machines__destroy_kernel_maps(&self->machines); 102 } 103 104 struct perf_session *perf_session__new(const char *filename, int mode, 105 bool force, bool repipe, 106 struct perf_tool *tool) 107 { 108 struct perf_session *self; 109 struct stat st; 110 size_t len; 111 112 if (!filename || !strlen(filename)) { 113 if (!fstat(STDIN_FILENO, &st) && S_ISFIFO(st.st_mode)) 114 filename = "-"; 115 else 116 filename = "perf.data"; 117 } 118 119 len = strlen(filename); 120 self = zalloc(sizeof(*self) + len); 121 122 if (self == NULL) 123 goto out; 124 125 memcpy(self->filename, filename, len); 126 self->repipe = repipe; 127 INIT_LIST_HEAD(&self->ordered_samples.samples); 128 INIT_LIST_HEAD(&self->ordered_samples.sample_cache); 129 INIT_LIST_HEAD(&self->ordered_samples.to_free); 130 machines__init(&self->machines); 131 132 if (mode == O_RDONLY) { 133 if (perf_session__open(self, force) < 0) 134 goto out_delete; 135 perf_session__set_id_hdr_size(self); 136 } else if (mode == O_WRONLY) { 137 /* 138 * In O_RDONLY mode this will be performed when reading the 139 * kernel MMAP event, in perf_event__process_mmap(). 140 */ 141 if (perf_session__create_kernel_maps(self) < 0) 142 goto out_delete; 143 } 144 145 if (tool && tool->ordering_requires_timestamps && 146 tool->ordered_samples && !perf_evlist__sample_id_all(self->evlist)) { 147 dump_printf("WARNING: No sample_id_all support, falling back to unordered processing\n"); 148 tool->ordered_samples = false; 149 } 150 151 out: 152 return self; 153 out_delete: 154 perf_session__delete(self); 155 return NULL; 156 } 157 158 static void perf_session__delete_dead_threads(struct perf_session *session) 159 { 160 machine__delete_dead_threads(&session->machines.host); 161 } 162 163 static void perf_session__delete_threads(struct perf_session *session) 164 { 165 machine__delete_threads(&session->machines.host); 166 } 167 168 static void perf_session_env__delete(struct perf_session_env *env) 169 { 170 free(env->hostname); 171 free(env->os_release); 172 free(env->version); 173 free(env->arch); 174 free(env->cpu_desc); 175 free(env->cpuid); 176 177 free(env->cmdline); 178 free(env->sibling_cores); 179 free(env->sibling_threads); 180 free(env->numa_nodes); 181 free(env->pmu_mappings); 182 } 183 184 void perf_session__delete(struct perf_session *self) 185 { 186 perf_session__destroy_kernel_maps(self); 187 perf_session__delete_dead_threads(self); 188 perf_session__delete_threads(self); 189 perf_session_env__delete(&self->header.env); 190 machines__exit(&self->machines); 191 close(self->fd); 192 free(self); 193 vdso__exit(); 194 } 195 196 static int process_event_synth_tracing_data_stub(union perf_event *event 197 __maybe_unused, 198 struct perf_session *session 199 __maybe_unused) 200 { 201 dump_printf(": unhandled!\n"); 202 return 0; 203 } 204 205 static int process_event_synth_attr_stub(union perf_event *event __maybe_unused, 206 struct perf_evlist **pevlist 207 __maybe_unused) 208 { 209 dump_printf(": unhandled!\n"); 210 return 0; 211 } 212 213 static int process_event_sample_stub(struct perf_tool *tool __maybe_unused, 214 union perf_event *event __maybe_unused, 215 struct perf_sample *sample __maybe_unused, 216 struct perf_evsel *evsel __maybe_unused, 217 struct machine *machine __maybe_unused) 218 { 219 dump_printf(": unhandled!\n"); 220 return 0; 221 } 222 223 static int process_event_stub(struct perf_tool *tool __maybe_unused, 224 union perf_event *event __maybe_unused, 225 struct perf_sample *sample __maybe_unused, 226 struct machine *machine __maybe_unused) 227 { 228 dump_printf(": unhandled!\n"); 229 return 0; 230 } 231 232 static int process_finished_round_stub(struct perf_tool *tool __maybe_unused, 233 union perf_event *event __maybe_unused, 234 struct perf_session *perf_session 235 __maybe_unused) 236 { 237 dump_printf(": unhandled!\n"); 238 return 0; 239 } 240 241 static int process_event_type_stub(struct perf_tool *tool __maybe_unused, 242 union perf_event *event __maybe_unused) 243 { 244 dump_printf(": unhandled!\n"); 245 return 0; 246 } 247 248 static int process_finished_round(struct perf_tool *tool, 249 union perf_event *event, 250 struct perf_session *session); 251 252 static void perf_tool__fill_defaults(struct perf_tool *tool) 253 { 254 if (tool->sample == NULL) 255 tool->sample = process_event_sample_stub; 256 if (tool->mmap == NULL) 257 tool->mmap = process_event_stub; 258 if (tool->comm == NULL) 259 tool->comm = process_event_stub; 260 if (tool->fork == NULL) 261 tool->fork = process_event_stub; 262 if (tool->exit == NULL) 263 tool->exit = process_event_stub; 264 if (tool->lost == NULL) 265 tool->lost = perf_event__process_lost; 266 if (tool->read == NULL) 267 tool->read = process_event_sample_stub; 268 if (tool->throttle == NULL) 269 tool->throttle = process_event_stub; 270 if (tool->unthrottle == NULL) 271 tool->unthrottle = process_event_stub; 272 if (tool->attr == NULL) 273 tool->attr = process_event_synth_attr_stub; 274 if (tool->event_type == NULL) 275 tool->event_type = process_event_type_stub; 276 if (tool->tracing_data == NULL) 277 tool->tracing_data = process_event_synth_tracing_data_stub; 278 if (tool->build_id == NULL) 279 tool->build_id = process_finished_round_stub; 280 if (tool->finished_round == NULL) { 281 if (tool->ordered_samples) 282 tool->finished_round = process_finished_round; 283 else 284 tool->finished_round = process_finished_round_stub; 285 } 286 } 287 288 void mem_bswap_32(void *src, int byte_size) 289 { 290 u32 *m = src; 291 while (byte_size > 0) { 292 *m = bswap_32(*m); 293 byte_size -= sizeof(u32); 294 ++m; 295 } 296 } 297 298 void mem_bswap_64(void *src, int byte_size) 299 { 300 u64 *m = src; 301 302 while (byte_size > 0) { 303 *m = bswap_64(*m); 304 byte_size -= sizeof(u64); 305 ++m; 306 } 307 } 308 309 static void swap_sample_id_all(union perf_event *event, void *data) 310 { 311 void *end = (void *) event + event->header.size; 312 int size = end - data; 313 314 BUG_ON(size % sizeof(u64)); 315 mem_bswap_64(data, size); 316 } 317 318 static void perf_event__all64_swap(union perf_event *event, 319 bool sample_id_all __maybe_unused) 320 { 321 struct perf_event_header *hdr = &event->header; 322 mem_bswap_64(hdr + 1, event->header.size - sizeof(*hdr)); 323 } 324 325 static void perf_event__comm_swap(union perf_event *event, bool sample_id_all) 326 { 327 event->comm.pid = bswap_32(event->comm.pid); 328 event->comm.tid = bswap_32(event->comm.tid); 329 330 if (sample_id_all) { 331 void *data = &event->comm.comm; 332 333 data += PERF_ALIGN(strlen(data) + 1, sizeof(u64)); 334 swap_sample_id_all(event, data); 335 } 336 } 337 338 static void perf_event__mmap_swap(union perf_event *event, 339 bool sample_id_all) 340 { 341 event->mmap.pid = bswap_32(event->mmap.pid); 342 event->mmap.tid = bswap_32(event->mmap.tid); 343 event->mmap.start = bswap_64(event->mmap.start); 344 event->mmap.len = bswap_64(event->mmap.len); 345 event->mmap.pgoff = bswap_64(event->mmap.pgoff); 346 347 if (sample_id_all) { 348 void *data = &event->mmap.filename; 349 350 data += PERF_ALIGN(strlen(data) + 1, sizeof(u64)); 351 swap_sample_id_all(event, data); 352 } 353 } 354 355 static void perf_event__task_swap(union perf_event *event, bool sample_id_all) 356 { 357 event->fork.pid = bswap_32(event->fork.pid); 358 event->fork.tid = bswap_32(event->fork.tid); 359 event->fork.ppid = bswap_32(event->fork.ppid); 360 event->fork.ptid = bswap_32(event->fork.ptid); 361 event->fork.time = bswap_64(event->fork.time); 362 363 if (sample_id_all) 364 swap_sample_id_all(event, &event->fork + 1); 365 } 366 367 static void perf_event__read_swap(union perf_event *event, bool sample_id_all) 368 { 369 event->read.pid = bswap_32(event->read.pid); 370 event->read.tid = bswap_32(event->read.tid); 371 event->read.value = bswap_64(event->read.value); 372 event->read.time_enabled = bswap_64(event->read.time_enabled); 373 event->read.time_running = bswap_64(event->read.time_running); 374 event->read.id = bswap_64(event->read.id); 375 376 if (sample_id_all) 377 swap_sample_id_all(event, &event->read + 1); 378 } 379 380 static u8 revbyte(u8 b) 381 { 382 int rev = (b >> 4) | ((b & 0xf) << 4); 383 rev = ((rev & 0xcc) >> 2) | ((rev & 0x33) << 2); 384 rev = ((rev & 0xaa) >> 1) | ((rev & 0x55) << 1); 385 return (u8) rev; 386 } 387 388 /* 389 * XXX this is hack in attempt to carry flags bitfield 390 * throught endian village. ABI says: 391 * 392 * Bit-fields are allocated from right to left (least to most significant) 393 * on little-endian implementations and from left to right (most to least 394 * significant) on big-endian implementations. 395 * 396 * The above seems to be byte specific, so we need to reverse each 397 * byte of the bitfield. 'Internet' also says this might be implementation 398 * specific and we probably need proper fix and carry perf_event_attr 399 * bitfield flags in separate data file FEAT_ section. Thought this seems 400 * to work for now. 401 */ 402 static void swap_bitfield(u8 *p, unsigned len) 403 { 404 unsigned i; 405 406 for (i = 0; i < len; i++) { 407 *p = revbyte(*p); 408 p++; 409 } 410 } 411 412 /* exported for swapping attributes in file header */ 413 void perf_event__attr_swap(struct perf_event_attr *attr) 414 { 415 attr->type = bswap_32(attr->type); 416 attr->size = bswap_32(attr->size); 417 attr->config = bswap_64(attr->config); 418 attr->sample_period = bswap_64(attr->sample_period); 419 attr->sample_type = bswap_64(attr->sample_type); 420 attr->read_format = bswap_64(attr->read_format); 421 attr->wakeup_events = bswap_32(attr->wakeup_events); 422 attr->bp_type = bswap_32(attr->bp_type); 423 attr->bp_addr = bswap_64(attr->bp_addr); 424 attr->bp_len = bswap_64(attr->bp_len); 425 426 swap_bitfield((u8 *) (&attr->read_format + 1), sizeof(u64)); 427 } 428 429 static void perf_event__hdr_attr_swap(union perf_event *event, 430 bool sample_id_all __maybe_unused) 431 { 432 size_t size; 433 434 perf_event__attr_swap(&event->attr.attr); 435 436 size = event->header.size; 437 size -= (void *)&event->attr.id - (void *)event; 438 mem_bswap_64(event->attr.id, size); 439 } 440 441 static void perf_event__event_type_swap(union perf_event *event, 442 bool sample_id_all __maybe_unused) 443 { 444 event->event_type.event_type.event_id = 445 bswap_64(event->event_type.event_type.event_id); 446 } 447 448 static void perf_event__tracing_data_swap(union perf_event *event, 449 bool sample_id_all __maybe_unused) 450 { 451 event->tracing_data.size = bswap_32(event->tracing_data.size); 452 } 453 454 typedef void (*perf_event__swap_op)(union perf_event *event, 455 bool sample_id_all); 456 457 static perf_event__swap_op perf_event__swap_ops[] = { 458 [PERF_RECORD_MMAP] = perf_event__mmap_swap, 459 [PERF_RECORD_COMM] = perf_event__comm_swap, 460 [PERF_RECORD_FORK] = perf_event__task_swap, 461 [PERF_RECORD_EXIT] = perf_event__task_swap, 462 [PERF_RECORD_LOST] = perf_event__all64_swap, 463 [PERF_RECORD_READ] = perf_event__read_swap, 464 [PERF_RECORD_SAMPLE] = perf_event__all64_swap, 465 [PERF_RECORD_HEADER_ATTR] = perf_event__hdr_attr_swap, 466 [PERF_RECORD_HEADER_EVENT_TYPE] = perf_event__event_type_swap, 467 [PERF_RECORD_HEADER_TRACING_DATA] = perf_event__tracing_data_swap, 468 [PERF_RECORD_HEADER_BUILD_ID] = NULL, 469 [PERF_RECORD_HEADER_MAX] = NULL, 470 }; 471 472 struct sample_queue { 473 u64 timestamp; 474 u64 file_offset; 475 union perf_event *event; 476 struct list_head list; 477 }; 478 479 static void perf_session_free_sample_buffers(struct perf_session *session) 480 { 481 struct ordered_samples *os = &session->ordered_samples; 482 483 while (!list_empty(&os->to_free)) { 484 struct sample_queue *sq; 485 486 sq = list_entry(os->to_free.next, struct sample_queue, list); 487 list_del(&sq->list); 488 free(sq); 489 } 490 } 491 492 static int perf_session_deliver_event(struct perf_session *session, 493 union perf_event *event, 494 struct perf_sample *sample, 495 struct perf_tool *tool, 496 u64 file_offset); 497 498 static int flush_sample_queue(struct perf_session *s, 499 struct perf_tool *tool) 500 { 501 struct ordered_samples *os = &s->ordered_samples; 502 struct list_head *head = &os->samples; 503 struct sample_queue *tmp, *iter; 504 struct perf_sample sample; 505 u64 limit = os->next_flush; 506 u64 last_ts = os->last_sample ? os->last_sample->timestamp : 0ULL; 507 unsigned idx = 0, progress_next = os->nr_samples / 16; 508 int ret; 509 510 if (!tool->ordered_samples || !limit) 511 return 0; 512 513 list_for_each_entry_safe(iter, tmp, head, list) { 514 if (iter->timestamp > limit) 515 break; 516 517 ret = perf_evlist__parse_sample(s->evlist, iter->event, &sample); 518 if (ret) 519 pr_err("Can't parse sample, err = %d\n", ret); 520 else { 521 ret = perf_session_deliver_event(s, iter->event, &sample, tool, 522 iter->file_offset); 523 if (ret) 524 return ret; 525 } 526 527 os->last_flush = iter->timestamp; 528 list_del(&iter->list); 529 list_add(&iter->list, &os->sample_cache); 530 if (++idx >= progress_next) { 531 progress_next += os->nr_samples / 16; 532 ui_progress__update(idx, os->nr_samples, 533 "Processing time ordered events..."); 534 } 535 } 536 537 if (list_empty(head)) { 538 os->last_sample = NULL; 539 } else if (last_ts <= limit) { 540 os->last_sample = 541 list_entry(head->prev, struct sample_queue, list); 542 } 543 544 os->nr_samples = 0; 545 546 return 0; 547 } 548 549 /* 550 * When perf record finishes a pass on every buffers, it records this pseudo 551 * event. 552 * We record the max timestamp t found in the pass n. 553 * Assuming these timestamps are monotonic across cpus, we know that if 554 * a buffer still has events with timestamps below t, they will be all 555 * available and then read in the pass n + 1. 556 * Hence when we start to read the pass n + 2, we can safely flush every 557 * events with timestamps below t. 558 * 559 * ============ PASS n ================= 560 * CPU 0 | CPU 1 561 * | 562 * cnt1 timestamps | cnt2 timestamps 563 * 1 | 2 564 * 2 | 3 565 * - | 4 <--- max recorded 566 * 567 * ============ PASS n + 1 ============== 568 * CPU 0 | CPU 1 569 * | 570 * cnt1 timestamps | cnt2 timestamps 571 * 3 | 5 572 * 4 | 6 573 * 5 | 7 <---- max recorded 574 * 575 * Flush every events below timestamp 4 576 * 577 * ============ PASS n + 2 ============== 578 * CPU 0 | CPU 1 579 * | 580 * cnt1 timestamps | cnt2 timestamps 581 * 6 | 8 582 * 7 | 9 583 * - | 10 584 * 585 * Flush every events below timestamp 7 586 * etc... 587 */ 588 static int process_finished_round(struct perf_tool *tool, 589 union perf_event *event __maybe_unused, 590 struct perf_session *session) 591 { 592 int ret = flush_sample_queue(session, tool); 593 if (!ret) 594 session->ordered_samples.next_flush = session->ordered_samples.max_timestamp; 595 596 return ret; 597 } 598 599 /* The queue is ordered by time */ 600 static void __queue_event(struct sample_queue *new, struct perf_session *s) 601 { 602 struct ordered_samples *os = &s->ordered_samples; 603 struct sample_queue *sample = os->last_sample; 604 u64 timestamp = new->timestamp; 605 struct list_head *p; 606 607 ++os->nr_samples; 608 os->last_sample = new; 609 610 if (!sample) { 611 list_add(&new->list, &os->samples); 612 os->max_timestamp = timestamp; 613 return; 614 } 615 616 /* 617 * last_sample might point to some random place in the list as it's 618 * the last queued event. We expect that the new event is close to 619 * this. 620 */ 621 if (sample->timestamp <= timestamp) { 622 while (sample->timestamp <= timestamp) { 623 p = sample->list.next; 624 if (p == &os->samples) { 625 list_add_tail(&new->list, &os->samples); 626 os->max_timestamp = timestamp; 627 return; 628 } 629 sample = list_entry(p, struct sample_queue, list); 630 } 631 list_add_tail(&new->list, &sample->list); 632 } else { 633 while (sample->timestamp > timestamp) { 634 p = sample->list.prev; 635 if (p == &os->samples) { 636 list_add(&new->list, &os->samples); 637 return; 638 } 639 sample = list_entry(p, struct sample_queue, list); 640 } 641 list_add(&new->list, &sample->list); 642 } 643 } 644 645 #define MAX_SAMPLE_BUFFER (64 * 1024 / sizeof(struct sample_queue)) 646 647 static int perf_session_queue_event(struct perf_session *s, union perf_event *event, 648 struct perf_sample *sample, u64 file_offset) 649 { 650 struct ordered_samples *os = &s->ordered_samples; 651 struct list_head *sc = &os->sample_cache; 652 u64 timestamp = sample->time; 653 struct sample_queue *new; 654 655 if (!timestamp || timestamp == ~0ULL) 656 return -ETIME; 657 658 if (timestamp < s->ordered_samples.last_flush) { 659 printf("Warning: Timestamp below last timeslice flush\n"); 660 return -EINVAL; 661 } 662 663 if (!list_empty(sc)) { 664 new = list_entry(sc->next, struct sample_queue, list); 665 list_del(&new->list); 666 } else if (os->sample_buffer) { 667 new = os->sample_buffer + os->sample_buffer_idx; 668 if (++os->sample_buffer_idx == MAX_SAMPLE_BUFFER) 669 os->sample_buffer = NULL; 670 } else { 671 os->sample_buffer = malloc(MAX_SAMPLE_BUFFER * sizeof(*new)); 672 if (!os->sample_buffer) 673 return -ENOMEM; 674 list_add(&os->sample_buffer->list, &os->to_free); 675 os->sample_buffer_idx = 2; 676 new = os->sample_buffer + 1; 677 } 678 679 new->timestamp = timestamp; 680 new->file_offset = file_offset; 681 new->event = event; 682 683 __queue_event(new, s); 684 685 return 0; 686 } 687 688 static void callchain__printf(struct perf_sample *sample) 689 { 690 unsigned int i; 691 692 printf("... chain: nr:%" PRIu64 "\n", sample->callchain->nr); 693 694 for (i = 0; i < sample->callchain->nr; i++) 695 printf("..... %2d: %016" PRIx64 "\n", 696 i, sample->callchain->ips[i]); 697 } 698 699 static void branch_stack__printf(struct perf_sample *sample) 700 { 701 uint64_t i; 702 703 printf("... branch stack: nr:%" PRIu64 "\n", sample->branch_stack->nr); 704 705 for (i = 0; i < sample->branch_stack->nr; i++) 706 printf("..... %2"PRIu64": %016" PRIx64 " -> %016" PRIx64 "\n", 707 i, sample->branch_stack->entries[i].from, 708 sample->branch_stack->entries[i].to); 709 } 710 711 static void regs_dump__printf(u64 mask, u64 *regs) 712 { 713 unsigned rid, i = 0; 714 715 for_each_set_bit(rid, (unsigned long *) &mask, sizeof(mask) * 8) { 716 u64 val = regs[i++]; 717 718 printf(".... %-5s 0x%" PRIx64 "\n", 719 perf_reg_name(rid), val); 720 } 721 } 722 723 static void regs_user__printf(struct perf_sample *sample, u64 mask) 724 { 725 struct regs_dump *user_regs = &sample->user_regs; 726 727 if (user_regs->regs) { 728 printf("... user regs: mask 0x%" PRIx64 "\n", mask); 729 regs_dump__printf(mask, user_regs->regs); 730 } 731 } 732 733 static void stack_user__printf(struct stack_dump *dump) 734 { 735 printf("... ustack: size %" PRIu64 ", offset 0x%x\n", 736 dump->size, dump->offset); 737 } 738 739 static void perf_session__print_tstamp(struct perf_session *session, 740 union perf_event *event, 741 struct perf_sample *sample) 742 { 743 u64 sample_type = perf_evlist__sample_type(session->evlist); 744 745 if (event->header.type != PERF_RECORD_SAMPLE && 746 !perf_evlist__sample_id_all(session->evlist)) { 747 fputs("-1 -1 ", stdout); 748 return; 749 } 750 751 if ((sample_type & PERF_SAMPLE_CPU)) 752 printf("%u ", sample->cpu); 753 754 if (sample_type & PERF_SAMPLE_TIME) 755 printf("%" PRIu64 " ", sample->time); 756 } 757 758 static void dump_event(struct perf_session *session, union perf_event *event, 759 u64 file_offset, struct perf_sample *sample) 760 { 761 if (!dump_trace) 762 return; 763 764 printf("\n%#" PRIx64 " [%#x]: event: %d\n", 765 file_offset, event->header.size, event->header.type); 766 767 trace_event(event); 768 769 if (sample) 770 perf_session__print_tstamp(session, event, sample); 771 772 printf("%#" PRIx64 " [%#x]: PERF_RECORD_%s", file_offset, 773 event->header.size, perf_event__name(event->header.type)); 774 } 775 776 static void dump_sample(struct perf_evsel *evsel, union perf_event *event, 777 struct perf_sample *sample) 778 { 779 u64 sample_type; 780 781 if (!dump_trace) 782 return; 783 784 printf("(IP, %d): %d/%d: %#" PRIx64 " period: %" PRIu64 " addr: %#" PRIx64 "\n", 785 event->header.misc, sample->pid, sample->tid, sample->ip, 786 sample->period, sample->addr); 787 788 sample_type = evsel->attr.sample_type; 789 790 if (sample_type & PERF_SAMPLE_CALLCHAIN) 791 callchain__printf(sample); 792 793 if (sample_type & PERF_SAMPLE_BRANCH_STACK) 794 branch_stack__printf(sample); 795 796 if (sample_type & PERF_SAMPLE_REGS_USER) 797 regs_user__printf(sample, evsel->attr.sample_regs_user); 798 799 if (sample_type & PERF_SAMPLE_STACK_USER) 800 stack_user__printf(&sample->user_stack); 801 802 if (sample_type & PERF_SAMPLE_WEIGHT) 803 printf("... weight: %" PRIu64 "\n", sample->weight); 804 } 805 806 static struct machine * 807 perf_session__find_machine_for_cpumode(struct perf_session *session, 808 union perf_event *event) 809 { 810 const u8 cpumode = event->header.misc & PERF_RECORD_MISC_CPUMODE_MASK; 811 812 if (perf_guest && 813 ((cpumode == PERF_RECORD_MISC_GUEST_KERNEL) || 814 (cpumode == PERF_RECORD_MISC_GUEST_USER))) { 815 u32 pid; 816 817 if (event->header.type == PERF_RECORD_MMAP) 818 pid = event->mmap.pid; 819 else 820 pid = event->ip.pid; 821 822 return perf_session__findnew_machine(session, pid); 823 } 824 825 return &session->machines.host; 826 } 827 828 static int perf_session_deliver_event(struct perf_session *session, 829 union perf_event *event, 830 struct perf_sample *sample, 831 struct perf_tool *tool, 832 u64 file_offset) 833 { 834 struct perf_evsel *evsel; 835 struct machine *machine; 836 837 dump_event(session, event, file_offset, sample); 838 839 evsel = perf_evlist__id2evsel(session->evlist, sample->id); 840 if (evsel != NULL && event->header.type != PERF_RECORD_SAMPLE) { 841 /* 842 * XXX We're leaving PERF_RECORD_SAMPLE unnacounted here 843 * because the tools right now may apply filters, discarding 844 * some of the samples. For consistency, in the future we 845 * should have something like nr_filtered_samples and remove 846 * the sample->period from total_sample_period, etc, KISS for 847 * now tho. 848 * 849 * Also testing against NULL allows us to handle files without 850 * attr.sample_id_all and/or without PERF_SAMPLE_ID. In the 851 * future probably it'll be a good idea to restrict event 852 * processing via perf_session to files with both set. 853 */ 854 hists__inc_nr_events(&evsel->hists, event->header.type); 855 } 856 857 machine = perf_session__find_machine_for_cpumode(session, event); 858 859 switch (event->header.type) { 860 case PERF_RECORD_SAMPLE: 861 dump_sample(evsel, event, sample); 862 if (evsel == NULL) { 863 ++session->stats.nr_unknown_id; 864 return 0; 865 } 866 if (machine == NULL) { 867 ++session->stats.nr_unprocessable_samples; 868 return 0; 869 } 870 return tool->sample(tool, event, sample, evsel, machine); 871 case PERF_RECORD_MMAP: 872 return tool->mmap(tool, event, sample, machine); 873 case PERF_RECORD_COMM: 874 return tool->comm(tool, event, sample, machine); 875 case PERF_RECORD_FORK: 876 return tool->fork(tool, event, sample, machine); 877 case PERF_RECORD_EXIT: 878 return tool->exit(tool, event, sample, machine); 879 case PERF_RECORD_LOST: 880 if (tool->lost == perf_event__process_lost) 881 session->stats.total_lost += event->lost.lost; 882 return tool->lost(tool, event, sample, machine); 883 case PERF_RECORD_READ: 884 return tool->read(tool, event, sample, evsel, machine); 885 case PERF_RECORD_THROTTLE: 886 return tool->throttle(tool, event, sample, machine); 887 case PERF_RECORD_UNTHROTTLE: 888 return tool->unthrottle(tool, event, sample, machine); 889 default: 890 ++session->stats.nr_unknown_events; 891 return -1; 892 } 893 } 894 895 static int perf_session__preprocess_sample(struct perf_session *session, 896 union perf_event *event, struct perf_sample *sample) 897 { 898 if (event->header.type != PERF_RECORD_SAMPLE || 899 !(perf_evlist__sample_type(session->evlist) & PERF_SAMPLE_CALLCHAIN)) 900 return 0; 901 902 if (!ip_callchain__valid(sample->callchain, event)) { 903 pr_debug("call-chain problem with event, skipping it.\n"); 904 ++session->stats.nr_invalid_chains; 905 session->stats.total_invalid_chains += sample->period; 906 return -EINVAL; 907 } 908 return 0; 909 } 910 911 static int perf_session__process_user_event(struct perf_session *session, union perf_event *event, 912 struct perf_tool *tool, u64 file_offset) 913 { 914 int err; 915 916 dump_event(session, event, file_offset, NULL); 917 918 /* These events are processed right away */ 919 switch (event->header.type) { 920 case PERF_RECORD_HEADER_ATTR: 921 err = tool->attr(event, &session->evlist); 922 if (err == 0) 923 perf_session__set_id_hdr_size(session); 924 return err; 925 case PERF_RECORD_HEADER_EVENT_TYPE: 926 return tool->event_type(tool, event); 927 case PERF_RECORD_HEADER_TRACING_DATA: 928 /* setup for reading amidst mmap */ 929 lseek(session->fd, file_offset, SEEK_SET); 930 return tool->tracing_data(event, session); 931 case PERF_RECORD_HEADER_BUILD_ID: 932 return tool->build_id(tool, event, session); 933 case PERF_RECORD_FINISHED_ROUND: 934 return tool->finished_round(tool, event, session); 935 default: 936 return -EINVAL; 937 } 938 } 939 940 static void event_swap(union perf_event *event, bool sample_id_all) 941 { 942 perf_event__swap_op swap; 943 944 swap = perf_event__swap_ops[event->header.type]; 945 if (swap) 946 swap(event, sample_id_all); 947 } 948 949 static int perf_session__process_event(struct perf_session *session, 950 union perf_event *event, 951 struct perf_tool *tool, 952 u64 file_offset) 953 { 954 struct perf_sample sample; 955 int ret; 956 957 if (session->header.needs_swap) 958 event_swap(event, perf_evlist__sample_id_all(session->evlist)); 959 960 if (event->header.type >= PERF_RECORD_HEADER_MAX) 961 return -EINVAL; 962 963 events_stats__inc(&session->stats, event->header.type); 964 965 if (event->header.type >= PERF_RECORD_USER_TYPE_START) 966 return perf_session__process_user_event(session, event, tool, file_offset); 967 968 /* 969 * For all kernel events we get the sample data 970 */ 971 ret = perf_evlist__parse_sample(session->evlist, event, &sample); 972 if (ret) 973 return ret; 974 975 /* Preprocess sample records - precheck callchains */ 976 if (perf_session__preprocess_sample(session, event, &sample)) 977 return 0; 978 979 if (tool->ordered_samples) { 980 ret = perf_session_queue_event(session, event, &sample, 981 file_offset); 982 if (ret != -ETIME) 983 return ret; 984 } 985 986 return perf_session_deliver_event(session, event, &sample, tool, 987 file_offset); 988 } 989 990 void perf_event_header__bswap(struct perf_event_header *self) 991 { 992 self->type = bswap_32(self->type); 993 self->misc = bswap_16(self->misc); 994 self->size = bswap_16(self->size); 995 } 996 997 struct thread *perf_session__findnew(struct perf_session *session, pid_t pid) 998 { 999 return machine__findnew_thread(&session->machines.host, pid); 1000 } 1001 1002 static struct thread *perf_session__register_idle_thread(struct perf_session *self) 1003 { 1004 struct thread *thread = perf_session__findnew(self, 0); 1005 1006 if (thread == NULL || thread__set_comm(thread, "swapper")) { 1007 pr_err("problem inserting idle task.\n"); 1008 thread = NULL; 1009 } 1010 1011 return thread; 1012 } 1013 1014 static void perf_session__warn_about_errors(const struct perf_session *session, 1015 const struct perf_tool *tool) 1016 { 1017 if (tool->lost == perf_event__process_lost && 1018 session->stats.nr_events[PERF_RECORD_LOST] != 0) { 1019 ui__warning("Processed %d events and lost %d chunks!\n\n" 1020 "Check IO/CPU overload!\n\n", 1021 session->stats.nr_events[0], 1022 session->stats.nr_events[PERF_RECORD_LOST]); 1023 } 1024 1025 if (session->stats.nr_unknown_events != 0) { 1026 ui__warning("Found %u unknown events!\n\n" 1027 "Is this an older tool processing a perf.data " 1028 "file generated by a more recent tool?\n\n" 1029 "If that is not the case, consider " 1030 "reporting to linux-kernel@vger.kernel.org.\n\n", 1031 session->stats.nr_unknown_events); 1032 } 1033 1034 if (session->stats.nr_unknown_id != 0) { 1035 ui__warning("%u samples with id not present in the header\n", 1036 session->stats.nr_unknown_id); 1037 } 1038 1039 if (session->stats.nr_invalid_chains != 0) { 1040 ui__warning("Found invalid callchains!\n\n" 1041 "%u out of %u events were discarded for this reason.\n\n" 1042 "Consider reporting to linux-kernel@vger.kernel.org.\n\n", 1043 session->stats.nr_invalid_chains, 1044 session->stats.nr_events[PERF_RECORD_SAMPLE]); 1045 } 1046 1047 if (session->stats.nr_unprocessable_samples != 0) { 1048 ui__warning("%u unprocessable samples recorded.\n" 1049 "Do you have a KVM guest running and not using 'perf kvm'?\n", 1050 session->stats.nr_unprocessable_samples); 1051 } 1052 } 1053 1054 #define session_done() (*(volatile int *)(&session_done)) 1055 volatile int session_done; 1056 1057 static int __perf_session__process_pipe_events(struct perf_session *self, 1058 struct perf_tool *tool) 1059 { 1060 union perf_event *event; 1061 uint32_t size, cur_size = 0; 1062 void *buf = NULL; 1063 int skip = 0; 1064 u64 head; 1065 int err; 1066 void *p; 1067 1068 perf_tool__fill_defaults(tool); 1069 1070 head = 0; 1071 cur_size = sizeof(union perf_event); 1072 1073 buf = malloc(cur_size); 1074 if (!buf) 1075 return -errno; 1076 more: 1077 event = buf; 1078 err = readn(self->fd, event, sizeof(struct perf_event_header)); 1079 if (err <= 0) { 1080 if (err == 0) 1081 goto done; 1082 1083 pr_err("failed to read event header\n"); 1084 goto out_err; 1085 } 1086 1087 if (self->header.needs_swap) 1088 perf_event_header__bswap(&event->header); 1089 1090 size = event->header.size; 1091 if (size == 0) 1092 size = 8; 1093 1094 if (size > cur_size) { 1095 void *new = realloc(buf, size); 1096 if (!new) { 1097 pr_err("failed to allocate memory to read event\n"); 1098 goto out_err; 1099 } 1100 buf = new; 1101 cur_size = size; 1102 event = buf; 1103 } 1104 p = event; 1105 p += sizeof(struct perf_event_header); 1106 1107 if (size - sizeof(struct perf_event_header)) { 1108 err = readn(self->fd, p, size - sizeof(struct perf_event_header)); 1109 if (err <= 0) { 1110 if (err == 0) { 1111 pr_err("unexpected end of event stream\n"); 1112 goto done; 1113 } 1114 1115 pr_err("failed to read event data\n"); 1116 goto out_err; 1117 } 1118 } 1119 1120 if ((skip = perf_session__process_event(self, event, tool, head)) < 0) { 1121 pr_err("%#" PRIx64 " [%#x]: failed to process type: %d\n", 1122 head, event->header.size, event->header.type); 1123 err = -EINVAL; 1124 goto out_err; 1125 } 1126 1127 head += size; 1128 1129 if (skip > 0) 1130 head += skip; 1131 1132 if (!session_done()) 1133 goto more; 1134 done: 1135 err = 0; 1136 out_err: 1137 free(buf); 1138 perf_session__warn_about_errors(self, tool); 1139 perf_session_free_sample_buffers(self); 1140 return err; 1141 } 1142 1143 static union perf_event * 1144 fetch_mmaped_event(struct perf_session *session, 1145 u64 head, size_t mmap_size, char *buf) 1146 { 1147 union perf_event *event; 1148 1149 /* 1150 * Ensure we have enough space remaining to read 1151 * the size of the event in the headers. 1152 */ 1153 if (head + sizeof(event->header) > mmap_size) 1154 return NULL; 1155 1156 event = (union perf_event *)(buf + head); 1157 1158 if (session->header.needs_swap) 1159 perf_event_header__bswap(&event->header); 1160 1161 if (head + event->header.size > mmap_size) 1162 return NULL; 1163 1164 return event; 1165 } 1166 1167 /* 1168 * On 64bit we can mmap the data file in one go. No need for tiny mmap 1169 * slices. On 32bit we use 32MB. 1170 */ 1171 #if BITS_PER_LONG == 64 1172 #define MMAP_SIZE ULLONG_MAX 1173 #define NUM_MMAPS 1 1174 #else 1175 #define MMAP_SIZE (32 * 1024 * 1024ULL) 1176 #define NUM_MMAPS 128 1177 #endif 1178 1179 int __perf_session__process_events(struct perf_session *session, 1180 u64 data_offset, u64 data_size, 1181 u64 file_size, struct perf_tool *tool) 1182 { 1183 u64 head, page_offset, file_offset, file_pos, progress_next; 1184 int err, mmap_prot, mmap_flags, map_idx = 0; 1185 size_t mmap_size; 1186 char *buf, *mmaps[NUM_MMAPS]; 1187 union perf_event *event; 1188 uint32_t size; 1189 1190 perf_tool__fill_defaults(tool); 1191 1192 page_offset = page_size * (data_offset / page_size); 1193 file_offset = page_offset; 1194 head = data_offset - page_offset; 1195 1196 if (data_offset + data_size < file_size) 1197 file_size = data_offset + data_size; 1198 1199 progress_next = file_size / 16; 1200 1201 mmap_size = MMAP_SIZE; 1202 if (mmap_size > file_size) 1203 mmap_size = file_size; 1204 1205 memset(mmaps, 0, sizeof(mmaps)); 1206 1207 mmap_prot = PROT_READ; 1208 mmap_flags = MAP_SHARED; 1209 1210 if (session->header.needs_swap) { 1211 mmap_prot |= PROT_WRITE; 1212 mmap_flags = MAP_PRIVATE; 1213 } 1214 remap: 1215 buf = mmap(NULL, mmap_size, mmap_prot, mmap_flags, session->fd, 1216 file_offset); 1217 if (buf == MAP_FAILED) { 1218 pr_err("failed to mmap file\n"); 1219 err = -errno; 1220 goto out_err; 1221 } 1222 mmaps[map_idx] = buf; 1223 map_idx = (map_idx + 1) & (ARRAY_SIZE(mmaps) - 1); 1224 file_pos = file_offset + head; 1225 1226 more: 1227 event = fetch_mmaped_event(session, head, mmap_size, buf); 1228 if (!event) { 1229 if (mmaps[map_idx]) { 1230 munmap(mmaps[map_idx], mmap_size); 1231 mmaps[map_idx] = NULL; 1232 } 1233 1234 page_offset = page_size * (head / page_size); 1235 file_offset += page_offset; 1236 head -= page_offset; 1237 goto remap; 1238 } 1239 1240 size = event->header.size; 1241 1242 if (size == 0 || 1243 perf_session__process_event(session, event, tool, file_pos) < 0) { 1244 pr_err("%#" PRIx64 " [%#x]: failed to process type: %d\n", 1245 file_offset + head, event->header.size, 1246 event->header.type); 1247 err = -EINVAL; 1248 goto out_err; 1249 } 1250 1251 head += size; 1252 file_pos += size; 1253 1254 if (file_pos >= progress_next) { 1255 progress_next += file_size / 16; 1256 ui_progress__update(file_pos, file_size, 1257 "Processing events..."); 1258 } 1259 1260 if (file_pos < file_size) 1261 goto more; 1262 1263 err = 0; 1264 /* do the final flush for ordered samples */ 1265 session->ordered_samples.next_flush = ULLONG_MAX; 1266 err = flush_sample_queue(session, tool); 1267 out_err: 1268 ui_progress__finish(); 1269 perf_session__warn_about_errors(session, tool); 1270 perf_session_free_sample_buffers(session); 1271 return err; 1272 } 1273 1274 int perf_session__process_events(struct perf_session *self, 1275 struct perf_tool *tool) 1276 { 1277 int err; 1278 1279 if (perf_session__register_idle_thread(self) == NULL) 1280 return -ENOMEM; 1281 1282 if (!self->fd_pipe) 1283 err = __perf_session__process_events(self, 1284 self->header.data_offset, 1285 self->header.data_size, 1286 self->size, tool); 1287 else 1288 err = __perf_session__process_pipe_events(self, tool); 1289 1290 return err; 1291 } 1292 1293 bool perf_session__has_traces(struct perf_session *session, const char *msg) 1294 { 1295 if (!(perf_evlist__sample_type(session->evlist) & PERF_SAMPLE_RAW)) { 1296 pr_err("No trace sample to read. Did you call 'perf %s'?\n", msg); 1297 return false; 1298 } 1299 1300 return true; 1301 } 1302 1303 int maps__set_kallsyms_ref_reloc_sym(struct map **maps, 1304 const char *symbol_name, u64 addr) 1305 { 1306 char *bracket; 1307 enum map_type i; 1308 struct ref_reloc_sym *ref; 1309 1310 ref = zalloc(sizeof(struct ref_reloc_sym)); 1311 if (ref == NULL) 1312 return -ENOMEM; 1313 1314 ref->name = strdup(symbol_name); 1315 if (ref->name == NULL) { 1316 free(ref); 1317 return -ENOMEM; 1318 } 1319 1320 bracket = strchr(ref->name, ']'); 1321 if (bracket) 1322 *bracket = '\0'; 1323 1324 ref->addr = addr; 1325 1326 for (i = 0; i < MAP__NR_TYPES; ++i) { 1327 struct kmap *kmap = map__kmap(maps[i]); 1328 kmap->ref_reloc_sym = ref; 1329 } 1330 1331 return 0; 1332 } 1333 1334 size_t perf_session__fprintf_dsos(struct perf_session *self, FILE *fp) 1335 { 1336 return machines__fprintf_dsos(&self->machines, fp); 1337 } 1338 1339 size_t perf_session__fprintf_dsos_buildid(struct perf_session *self, FILE *fp, 1340 bool (skip)(struct dso *dso, int parm), int parm) 1341 { 1342 return machines__fprintf_dsos_buildid(&self->machines, fp, skip, parm); 1343 } 1344 1345 size_t perf_session__fprintf_nr_events(struct perf_session *session, FILE *fp) 1346 { 1347 struct perf_evsel *pos; 1348 size_t ret = fprintf(fp, "Aggregated stats:\n"); 1349 1350 ret += events_stats__fprintf(&session->stats, fp); 1351 1352 list_for_each_entry(pos, &session->evlist->entries, node) { 1353 ret += fprintf(fp, "%s stats:\n", perf_evsel__name(pos)); 1354 ret += events_stats__fprintf(&pos->hists.stats, fp); 1355 } 1356 1357 return ret; 1358 } 1359 1360 size_t perf_session__fprintf(struct perf_session *session, FILE *fp) 1361 { 1362 /* 1363 * FIXME: Here we have to actually print all the machines in this 1364 * session, not just the host... 1365 */ 1366 return machine__fprintf(&session->machines.host, fp); 1367 } 1368 1369 struct perf_evsel *perf_session__find_first_evtype(struct perf_session *session, 1370 unsigned int type) 1371 { 1372 struct perf_evsel *pos; 1373 1374 list_for_each_entry(pos, &session->evlist->entries, node) { 1375 if (pos->attr.type == type) 1376 return pos; 1377 } 1378 return NULL; 1379 } 1380 1381 void perf_evsel__print_ip(struct perf_evsel *evsel, union perf_event *event, 1382 struct perf_sample *sample, struct machine *machine, 1383 int print_sym, int print_dso, int print_symoffset) 1384 { 1385 struct addr_location al; 1386 struct callchain_cursor_node *node; 1387 1388 if (perf_event__preprocess_sample(event, machine, &al, sample, 1389 NULL) < 0) { 1390 error("problem processing %d event, skipping it.\n", 1391 event->header.type); 1392 return; 1393 } 1394 1395 if (symbol_conf.use_callchain && sample->callchain) { 1396 1397 1398 if (machine__resolve_callchain(machine, evsel, al.thread, 1399 sample, NULL) != 0) { 1400 if (verbose) 1401 error("Failed to resolve callchain. Skipping\n"); 1402 return; 1403 } 1404 callchain_cursor_commit(&callchain_cursor); 1405 1406 while (1) { 1407 node = callchain_cursor_current(&callchain_cursor); 1408 if (!node) 1409 break; 1410 1411 printf("\t%16" PRIx64, node->ip); 1412 if (print_sym) { 1413 printf(" "); 1414 symbol__fprintf_symname(node->sym, stdout); 1415 } 1416 if (print_dso) { 1417 printf(" ("); 1418 map__fprintf_dsoname(node->map, stdout); 1419 printf(")"); 1420 } 1421 printf("\n"); 1422 1423 callchain_cursor_advance(&callchain_cursor); 1424 } 1425 1426 } else { 1427 printf("%16" PRIx64, sample->ip); 1428 if (print_sym) { 1429 printf(" "); 1430 if (print_symoffset) 1431 symbol__fprintf_symname_offs(al.sym, &al, 1432 stdout); 1433 else 1434 symbol__fprintf_symname(al.sym, stdout); 1435 } 1436 1437 if (print_dso) { 1438 printf(" ("); 1439 map__fprintf_dsoname(al.map, stdout); 1440 printf(")"); 1441 } 1442 } 1443 } 1444 1445 int perf_session__cpu_bitmap(struct perf_session *session, 1446 const char *cpu_list, unsigned long *cpu_bitmap) 1447 { 1448 int i; 1449 struct cpu_map *map; 1450 1451 for (i = 0; i < PERF_TYPE_MAX; ++i) { 1452 struct perf_evsel *evsel; 1453 1454 evsel = perf_session__find_first_evtype(session, i); 1455 if (!evsel) 1456 continue; 1457 1458 if (!(evsel->attr.sample_type & PERF_SAMPLE_CPU)) { 1459 pr_err("File does not contain CPU events. " 1460 "Remove -c option to proceed.\n"); 1461 return -1; 1462 } 1463 } 1464 1465 map = cpu_map__new(cpu_list); 1466 if (map == NULL) { 1467 pr_err("Invalid cpu_list\n"); 1468 return -1; 1469 } 1470 1471 for (i = 0; i < map->nr; i++) { 1472 int cpu = map->map[i]; 1473 1474 if (cpu >= MAX_NR_CPUS) { 1475 pr_err("Requested CPU %d too large. " 1476 "Consider raising MAX_NR_CPUS\n", cpu); 1477 return -1; 1478 } 1479 1480 set_bit(cpu, cpu_bitmap); 1481 } 1482 1483 return 0; 1484 } 1485 1486 void perf_session__fprintf_info(struct perf_session *session, FILE *fp, 1487 bool full) 1488 { 1489 struct stat st; 1490 int ret; 1491 1492 if (session == NULL || fp == NULL) 1493 return; 1494 1495 ret = fstat(session->fd, &st); 1496 if (ret == -1) 1497 return; 1498 1499 fprintf(fp, "# ========\n"); 1500 fprintf(fp, "# captured on: %s", ctime(&st.st_ctime)); 1501 perf_header__fprintf_info(session, fp, full); 1502 fprintf(fp, "# ========\n#\n"); 1503 } 1504 1505 1506 int __perf_session__set_tracepoints_handlers(struct perf_session *session, 1507 const struct perf_evsel_str_handler *assocs, 1508 size_t nr_assocs) 1509 { 1510 struct perf_evlist *evlist = session->evlist; 1511 struct event_format *format; 1512 struct perf_evsel *evsel; 1513 char *tracepoint, *name; 1514 size_t i; 1515 int err; 1516 1517 for (i = 0; i < nr_assocs; i++) { 1518 err = -ENOMEM; 1519 tracepoint = strdup(assocs[i].name); 1520 if (tracepoint == NULL) 1521 goto out; 1522 1523 err = -ENOENT; 1524 name = strchr(tracepoint, ':'); 1525 if (name == NULL) 1526 goto out_free; 1527 1528 *name++ = '\0'; 1529 format = pevent_find_event_by_name(session->pevent, 1530 tracepoint, name); 1531 if (format == NULL) { 1532 /* 1533 * Adding a handler for an event not in the session, 1534 * just ignore it. 1535 */ 1536 goto next; 1537 } 1538 1539 evsel = perf_evlist__find_tracepoint_by_id(evlist, format->id); 1540 if (evsel == NULL) 1541 goto next; 1542 1543 err = -EEXIST; 1544 if (evsel->handler.func != NULL) 1545 goto out_free; 1546 evsel->handler.func = assocs[i].handler; 1547 next: 1548 free(tracepoint); 1549 } 1550 1551 err = 0; 1552 out: 1553 return err; 1554 1555 out_free: 1556 free(tracepoint); 1557 goto out; 1558 } 1559