1 #include "../../../include/linux/hw_breakpoint.h" 2 #include "util.h" 3 #include "../perf.h" 4 #include "evsel.h" 5 #include "parse-options.h" 6 #include "parse-events.h" 7 #include "exec_cmd.h" 8 #include "string.h" 9 #include "symbol.h" 10 #include "cache.h" 11 #include "header.h" 12 #include "debugfs.h" 13 14 int nr_counters; 15 16 LIST_HEAD(evsel_list); 17 18 struct event_symbol { 19 u8 type; 20 u64 config; 21 const char *symbol; 22 const char *alias; 23 }; 24 25 enum event_result { 26 EVT_FAILED, 27 EVT_HANDLED, 28 EVT_HANDLED_ALL 29 }; 30 31 char debugfs_path[MAXPATHLEN]; 32 33 #define CHW(x) .type = PERF_TYPE_HARDWARE, .config = PERF_COUNT_HW_##x 34 #define CSW(x) .type = PERF_TYPE_SOFTWARE, .config = PERF_COUNT_SW_##x 35 36 static struct event_symbol event_symbols[] = { 37 { CHW(CPU_CYCLES), "cpu-cycles", "cycles" }, 38 { CHW(INSTRUCTIONS), "instructions", "" }, 39 { CHW(CACHE_REFERENCES), "cache-references", "" }, 40 { CHW(CACHE_MISSES), "cache-misses", "" }, 41 { CHW(BRANCH_INSTRUCTIONS), "branch-instructions", "branches" }, 42 { CHW(BRANCH_MISSES), "branch-misses", "" }, 43 { CHW(BUS_CYCLES), "bus-cycles", "" }, 44 45 { CSW(CPU_CLOCK), "cpu-clock", "" }, 46 { CSW(TASK_CLOCK), "task-clock", "" }, 47 { CSW(PAGE_FAULTS), "page-faults", "faults" }, 48 { CSW(PAGE_FAULTS_MIN), "minor-faults", "" }, 49 { CSW(PAGE_FAULTS_MAJ), "major-faults", "" }, 50 { CSW(CONTEXT_SWITCHES), "context-switches", "cs" }, 51 { CSW(CPU_MIGRATIONS), "cpu-migrations", "migrations" }, 52 { CSW(ALIGNMENT_FAULTS), "alignment-faults", "" }, 53 { CSW(EMULATION_FAULTS), "emulation-faults", "" }, 54 }; 55 56 #define __PERF_EVENT_FIELD(config, name) \ 57 ((config & PERF_EVENT_##name##_MASK) >> PERF_EVENT_##name##_SHIFT) 58 59 #define PERF_EVENT_RAW(config) __PERF_EVENT_FIELD(config, RAW) 60 #define PERF_EVENT_CONFIG(config) __PERF_EVENT_FIELD(config, CONFIG) 61 #define PERF_EVENT_TYPE(config) __PERF_EVENT_FIELD(config, TYPE) 62 #define PERF_EVENT_ID(config) __PERF_EVENT_FIELD(config, EVENT) 63 64 static const char *hw_event_names[] = { 65 "cycles", 66 "instructions", 67 "cache-references", 68 "cache-misses", 69 "branches", 70 "branch-misses", 71 "bus-cycles", 72 }; 73 74 static const char *sw_event_names[] = { 75 "cpu-clock-msecs", 76 "task-clock-msecs", 77 "page-faults", 78 "context-switches", 79 "CPU-migrations", 80 "minor-faults", 81 "major-faults", 82 "alignment-faults", 83 "emulation-faults", 84 }; 85 86 #define MAX_ALIASES 8 87 88 static const char *hw_cache[][MAX_ALIASES] = { 89 { "L1-dcache", "l1-d", "l1d", "L1-data", }, 90 { "L1-icache", "l1-i", "l1i", "L1-instruction", }, 91 { "LLC", "L2" }, 92 { "dTLB", "d-tlb", "Data-TLB", }, 93 { "iTLB", "i-tlb", "Instruction-TLB", }, 94 { "branch", "branches", "bpu", "btb", "bpc", }, 95 }; 96 97 static const char *hw_cache_op[][MAX_ALIASES] = { 98 { "load", "loads", "read", }, 99 { "store", "stores", "write", }, 100 { "prefetch", "prefetches", "speculative-read", "speculative-load", }, 101 }; 102 103 static const char *hw_cache_result[][MAX_ALIASES] = { 104 { "refs", "Reference", "ops", "access", }, 105 { "misses", "miss", }, 106 }; 107 108 #define C(x) PERF_COUNT_HW_CACHE_##x 109 #define CACHE_READ (1 << C(OP_READ)) 110 #define CACHE_WRITE (1 << C(OP_WRITE)) 111 #define CACHE_PREFETCH (1 << C(OP_PREFETCH)) 112 #define COP(x) (1 << x) 113 114 /* 115 * cache operartion stat 116 * L1I : Read and prefetch only 117 * ITLB and BPU : Read-only 118 */ 119 static unsigned long hw_cache_stat[C(MAX)] = { 120 [C(L1D)] = (CACHE_READ | CACHE_WRITE | CACHE_PREFETCH), 121 [C(L1I)] = (CACHE_READ | CACHE_PREFETCH), 122 [C(LL)] = (CACHE_READ | CACHE_WRITE | CACHE_PREFETCH), 123 [C(DTLB)] = (CACHE_READ | CACHE_WRITE | CACHE_PREFETCH), 124 [C(ITLB)] = (CACHE_READ), 125 [C(BPU)] = (CACHE_READ), 126 }; 127 128 #define for_each_subsystem(sys_dir, sys_dirent, sys_next) \ 129 while (!readdir_r(sys_dir, &sys_dirent, &sys_next) && sys_next) \ 130 if (sys_dirent.d_type == DT_DIR && \ 131 (strcmp(sys_dirent.d_name, ".")) && \ 132 (strcmp(sys_dirent.d_name, ".."))) 133 134 static int tp_event_has_id(struct dirent *sys_dir, struct dirent *evt_dir) 135 { 136 char evt_path[MAXPATHLEN]; 137 int fd; 138 139 snprintf(evt_path, MAXPATHLEN, "%s/%s/%s/id", debugfs_path, 140 sys_dir->d_name, evt_dir->d_name); 141 fd = open(evt_path, O_RDONLY); 142 if (fd < 0) 143 return -EINVAL; 144 close(fd); 145 146 return 0; 147 } 148 149 #define for_each_event(sys_dirent, evt_dir, evt_dirent, evt_next) \ 150 while (!readdir_r(evt_dir, &evt_dirent, &evt_next) && evt_next) \ 151 if (evt_dirent.d_type == DT_DIR && \ 152 (strcmp(evt_dirent.d_name, ".")) && \ 153 (strcmp(evt_dirent.d_name, "..")) && \ 154 (!tp_event_has_id(&sys_dirent, &evt_dirent))) 155 156 #define MAX_EVENT_LENGTH 512 157 158 159 struct tracepoint_path *tracepoint_id_to_path(u64 config) 160 { 161 struct tracepoint_path *path = NULL; 162 DIR *sys_dir, *evt_dir; 163 struct dirent *sys_next, *evt_next, sys_dirent, evt_dirent; 164 char id_buf[4]; 165 int fd; 166 u64 id; 167 char evt_path[MAXPATHLEN]; 168 char dir_path[MAXPATHLEN]; 169 170 if (debugfs_valid_mountpoint(debugfs_path)) 171 return NULL; 172 173 sys_dir = opendir(debugfs_path); 174 if (!sys_dir) 175 return NULL; 176 177 for_each_subsystem(sys_dir, sys_dirent, sys_next) { 178 179 snprintf(dir_path, MAXPATHLEN, "%s/%s", debugfs_path, 180 sys_dirent.d_name); 181 evt_dir = opendir(dir_path); 182 if (!evt_dir) 183 continue; 184 185 for_each_event(sys_dirent, evt_dir, evt_dirent, evt_next) { 186 187 snprintf(evt_path, MAXPATHLEN, "%s/%s/id", dir_path, 188 evt_dirent.d_name); 189 fd = open(evt_path, O_RDONLY); 190 if (fd < 0) 191 continue; 192 if (read(fd, id_buf, sizeof(id_buf)) < 0) { 193 close(fd); 194 continue; 195 } 196 close(fd); 197 id = atoll(id_buf); 198 if (id == config) { 199 closedir(evt_dir); 200 closedir(sys_dir); 201 path = zalloc(sizeof(*path)); 202 path->system = malloc(MAX_EVENT_LENGTH); 203 if (!path->system) { 204 free(path); 205 return NULL; 206 } 207 path->name = malloc(MAX_EVENT_LENGTH); 208 if (!path->name) { 209 free(path->system); 210 free(path); 211 return NULL; 212 } 213 strncpy(path->system, sys_dirent.d_name, 214 MAX_EVENT_LENGTH); 215 strncpy(path->name, evt_dirent.d_name, 216 MAX_EVENT_LENGTH); 217 return path; 218 } 219 } 220 closedir(evt_dir); 221 } 222 223 closedir(sys_dir); 224 return NULL; 225 } 226 227 #define TP_PATH_LEN (MAX_EVENT_LENGTH * 2 + 1) 228 static const char *tracepoint_id_to_name(u64 config) 229 { 230 static char buf[TP_PATH_LEN]; 231 struct tracepoint_path *path; 232 233 path = tracepoint_id_to_path(config); 234 if (path) { 235 snprintf(buf, TP_PATH_LEN, "%s:%s", path->system, path->name); 236 free(path->name); 237 free(path->system); 238 free(path); 239 } else 240 snprintf(buf, TP_PATH_LEN, "%s:%s", "unknown", "unknown"); 241 242 return buf; 243 } 244 245 static int is_cache_op_valid(u8 cache_type, u8 cache_op) 246 { 247 if (hw_cache_stat[cache_type] & COP(cache_op)) 248 return 1; /* valid */ 249 else 250 return 0; /* invalid */ 251 } 252 253 static char *event_cache_name(u8 cache_type, u8 cache_op, u8 cache_result) 254 { 255 static char name[50]; 256 257 if (cache_result) { 258 sprintf(name, "%s-%s-%s", hw_cache[cache_type][0], 259 hw_cache_op[cache_op][0], 260 hw_cache_result[cache_result][0]); 261 } else { 262 sprintf(name, "%s-%s", hw_cache[cache_type][0], 263 hw_cache_op[cache_op][1]); 264 } 265 266 return name; 267 } 268 269 const char *event_name(struct perf_evsel *evsel) 270 { 271 u64 config = evsel->attr.config; 272 int type = evsel->attr.type; 273 274 return __event_name(type, config); 275 } 276 277 const char *__event_name(int type, u64 config) 278 { 279 static char buf[32]; 280 281 if (type == PERF_TYPE_RAW) { 282 sprintf(buf, "raw 0x%" PRIx64, config); 283 return buf; 284 } 285 286 switch (type) { 287 case PERF_TYPE_HARDWARE: 288 if (config < PERF_COUNT_HW_MAX) 289 return hw_event_names[config]; 290 return "unknown-hardware"; 291 292 case PERF_TYPE_HW_CACHE: { 293 u8 cache_type, cache_op, cache_result; 294 295 cache_type = (config >> 0) & 0xff; 296 if (cache_type > PERF_COUNT_HW_CACHE_MAX) 297 return "unknown-ext-hardware-cache-type"; 298 299 cache_op = (config >> 8) & 0xff; 300 if (cache_op > PERF_COUNT_HW_CACHE_OP_MAX) 301 return "unknown-ext-hardware-cache-op"; 302 303 cache_result = (config >> 16) & 0xff; 304 if (cache_result > PERF_COUNT_HW_CACHE_RESULT_MAX) 305 return "unknown-ext-hardware-cache-result"; 306 307 if (!is_cache_op_valid(cache_type, cache_op)) 308 return "invalid-cache"; 309 310 return event_cache_name(cache_type, cache_op, cache_result); 311 } 312 313 case PERF_TYPE_SOFTWARE: 314 if (config < PERF_COUNT_SW_MAX) 315 return sw_event_names[config]; 316 return "unknown-software"; 317 318 case PERF_TYPE_TRACEPOINT: 319 return tracepoint_id_to_name(config); 320 321 default: 322 break; 323 } 324 325 return "unknown"; 326 } 327 328 static int parse_aliases(const char **str, const char *names[][MAX_ALIASES], int size) 329 { 330 int i, j; 331 int n, longest = -1; 332 333 for (i = 0; i < size; i++) { 334 for (j = 0; j < MAX_ALIASES && names[i][j]; j++) { 335 n = strlen(names[i][j]); 336 if (n > longest && !strncasecmp(*str, names[i][j], n)) 337 longest = n; 338 } 339 if (longest > 0) { 340 *str += longest; 341 return i; 342 } 343 } 344 345 return -1; 346 } 347 348 static enum event_result 349 parse_generic_hw_event(const char **str, struct perf_event_attr *attr) 350 { 351 const char *s = *str; 352 int cache_type = -1, cache_op = -1, cache_result = -1; 353 354 cache_type = parse_aliases(&s, hw_cache, PERF_COUNT_HW_CACHE_MAX); 355 /* 356 * No fallback - if we cannot get a clear cache type 357 * then bail out: 358 */ 359 if (cache_type == -1) 360 return EVT_FAILED; 361 362 while ((cache_op == -1 || cache_result == -1) && *s == '-') { 363 ++s; 364 365 if (cache_op == -1) { 366 cache_op = parse_aliases(&s, hw_cache_op, 367 PERF_COUNT_HW_CACHE_OP_MAX); 368 if (cache_op >= 0) { 369 if (!is_cache_op_valid(cache_type, cache_op)) 370 return 0; 371 continue; 372 } 373 } 374 375 if (cache_result == -1) { 376 cache_result = parse_aliases(&s, hw_cache_result, 377 PERF_COUNT_HW_CACHE_RESULT_MAX); 378 if (cache_result >= 0) 379 continue; 380 } 381 382 /* 383 * Can't parse this as a cache op or result, so back up 384 * to the '-'. 385 */ 386 --s; 387 break; 388 } 389 390 /* 391 * Fall back to reads: 392 */ 393 if (cache_op == -1) 394 cache_op = PERF_COUNT_HW_CACHE_OP_READ; 395 396 /* 397 * Fall back to accesses: 398 */ 399 if (cache_result == -1) 400 cache_result = PERF_COUNT_HW_CACHE_RESULT_ACCESS; 401 402 attr->config = cache_type | (cache_op << 8) | (cache_result << 16); 403 attr->type = PERF_TYPE_HW_CACHE; 404 405 *str = s; 406 return EVT_HANDLED; 407 } 408 409 static enum event_result 410 parse_single_tracepoint_event(char *sys_name, 411 const char *evt_name, 412 unsigned int evt_length, 413 struct perf_event_attr *attr, 414 const char **strp) 415 { 416 char evt_path[MAXPATHLEN]; 417 char id_buf[4]; 418 u64 id; 419 int fd; 420 421 snprintf(evt_path, MAXPATHLEN, "%s/%s/%s/id", debugfs_path, 422 sys_name, evt_name); 423 424 fd = open(evt_path, O_RDONLY); 425 if (fd < 0) 426 return EVT_FAILED; 427 428 if (read(fd, id_buf, sizeof(id_buf)) < 0) { 429 close(fd); 430 return EVT_FAILED; 431 } 432 433 close(fd); 434 id = atoll(id_buf); 435 attr->config = id; 436 attr->type = PERF_TYPE_TRACEPOINT; 437 *strp += strlen(sys_name) + evt_length + 1; /* + 1 for the ':' */ 438 439 attr->sample_type |= PERF_SAMPLE_RAW; 440 attr->sample_type |= PERF_SAMPLE_TIME; 441 attr->sample_type |= PERF_SAMPLE_CPU; 442 443 attr->sample_period = 1; 444 445 446 return EVT_HANDLED; 447 } 448 449 /* sys + ':' + event + ':' + flags*/ 450 #define MAX_EVOPT_LEN (MAX_EVENT_LENGTH * 2 + 2 + 128) 451 static enum event_result 452 parse_multiple_tracepoint_event(char *sys_name, const char *evt_exp, 453 char *flags) 454 { 455 char evt_path[MAXPATHLEN]; 456 struct dirent *evt_ent; 457 DIR *evt_dir; 458 459 snprintf(evt_path, MAXPATHLEN, "%s/%s", debugfs_path, sys_name); 460 evt_dir = opendir(evt_path); 461 462 if (!evt_dir) { 463 perror("Can't open event dir"); 464 return EVT_FAILED; 465 } 466 467 while ((evt_ent = readdir(evt_dir))) { 468 char event_opt[MAX_EVOPT_LEN + 1]; 469 int len; 470 471 if (!strcmp(evt_ent->d_name, ".") 472 || !strcmp(evt_ent->d_name, "..") 473 || !strcmp(evt_ent->d_name, "enable") 474 || !strcmp(evt_ent->d_name, "filter")) 475 continue; 476 477 if (!strglobmatch(evt_ent->d_name, evt_exp)) 478 continue; 479 480 len = snprintf(event_opt, MAX_EVOPT_LEN, "%s:%s%s%s", sys_name, 481 evt_ent->d_name, flags ? ":" : "", 482 flags ?: ""); 483 if (len < 0) 484 return EVT_FAILED; 485 486 if (parse_events(NULL, event_opt, 0)) 487 return EVT_FAILED; 488 } 489 490 return EVT_HANDLED_ALL; 491 } 492 493 static enum event_result parse_tracepoint_event(const char **strp, 494 struct perf_event_attr *attr) 495 { 496 const char *evt_name; 497 char *flags = NULL, *comma_loc; 498 char sys_name[MAX_EVENT_LENGTH]; 499 unsigned int sys_length, evt_length; 500 501 if (debugfs_valid_mountpoint(debugfs_path)) 502 return 0; 503 504 evt_name = strchr(*strp, ':'); 505 if (!evt_name) 506 return EVT_FAILED; 507 508 sys_length = evt_name - *strp; 509 if (sys_length >= MAX_EVENT_LENGTH) 510 return 0; 511 512 strncpy(sys_name, *strp, sys_length); 513 sys_name[sys_length] = '\0'; 514 evt_name = evt_name + 1; 515 516 comma_loc = strchr(evt_name, ','); 517 if (comma_loc) { 518 /* take the event name up to the comma */ 519 evt_name = strndup(evt_name, comma_loc - evt_name); 520 } 521 flags = strchr(evt_name, ':'); 522 if (flags) { 523 /* split it out: */ 524 evt_name = strndup(evt_name, flags - evt_name); 525 flags++; 526 } 527 528 evt_length = strlen(evt_name); 529 if (evt_length >= MAX_EVENT_LENGTH) 530 return EVT_FAILED; 531 if (strpbrk(evt_name, "*?")) { 532 *strp += strlen(sys_name) + evt_length + 1; /* 1 == the ':' */ 533 return parse_multiple_tracepoint_event(sys_name, evt_name, 534 flags); 535 } else { 536 return parse_single_tracepoint_event(sys_name, evt_name, 537 evt_length, attr, strp); 538 } 539 } 540 541 static enum event_result 542 parse_breakpoint_type(const char *type, const char **strp, 543 struct perf_event_attr *attr) 544 { 545 int i; 546 547 for (i = 0; i < 3; i++) { 548 if (!type[i]) 549 break; 550 551 switch (type[i]) { 552 case 'r': 553 attr->bp_type |= HW_BREAKPOINT_R; 554 break; 555 case 'w': 556 attr->bp_type |= HW_BREAKPOINT_W; 557 break; 558 case 'x': 559 attr->bp_type |= HW_BREAKPOINT_X; 560 break; 561 default: 562 return EVT_FAILED; 563 } 564 } 565 if (!attr->bp_type) /* Default */ 566 attr->bp_type = HW_BREAKPOINT_R | HW_BREAKPOINT_W; 567 568 *strp = type + i; 569 570 return EVT_HANDLED; 571 } 572 573 static enum event_result 574 parse_breakpoint_event(const char **strp, struct perf_event_attr *attr) 575 { 576 const char *target; 577 const char *type; 578 char *endaddr; 579 u64 addr; 580 enum event_result err; 581 582 target = strchr(*strp, ':'); 583 if (!target) 584 return EVT_FAILED; 585 586 if (strncmp(*strp, "mem", target - *strp) != 0) 587 return EVT_FAILED; 588 589 target++; 590 591 addr = strtoull(target, &endaddr, 0); 592 if (target == endaddr) 593 return EVT_FAILED; 594 595 attr->bp_addr = addr; 596 *strp = endaddr; 597 598 type = strchr(target, ':'); 599 600 /* If no type is defined, just rw as default */ 601 if (!type) { 602 attr->bp_type = HW_BREAKPOINT_R | HW_BREAKPOINT_W; 603 } else { 604 err = parse_breakpoint_type(++type, strp, attr); 605 if (err == EVT_FAILED) 606 return EVT_FAILED; 607 } 608 609 /* 610 * We should find a nice way to override the access length 611 * Provide some defaults for now 612 */ 613 if (attr->bp_type == HW_BREAKPOINT_X) 614 attr->bp_len = sizeof(long); 615 else 616 attr->bp_len = HW_BREAKPOINT_LEN_4; 617 618 attr->type = PERF_TYPE_BREAKPOINT; 619 620 return EVT_HANDLED; 621 } 622 623 static int check_events(const char *str, unsigned int i) 624 { 625 int n; 626 627 n = strlen(event_symbols[i].symbol); 628 if (!strncmp(str, event_symbols[i].symbol, n)) 629 return n; 630 631 n = strlen(event_symbols[i].alias); 632 if (n) 633 if (!strncmp(str, event_symbols[i].alias, n)) 634 return n; 635 return 0; 636 } 637 638 static enum event_result 639 parse_symbolic_event(const char **strp, struct perf_event_attr *attr) 640 { 641 const char *str = *strp; 642 unsigned int i; 643 int n; 644 645 for (i = 0; i < ARRAY_SIZE(event_symbols); i++) { 646 n = check_events(str, i); 647 if (n > 0) { 648 attr->type = event_symbols[i].type; 649 attr->config = event_symbols[i].config; 650 *strp = str + n; 651 return EVT_HANDLED; 652 } 653 } 654 return EVT_FAILED; 655 } 656 657 static enum event_result 658 parse_raw_event(const char **strp, struct perf_event_attr *attr) 659 { 660 const char *str = *strp; 661 u64 config; 662 int n; 663 664 if (*str != 'r') 665 return EVT_FAILED; 666 n = hex2u64(str + 1, &config); 667 if (n > 0) { 668 *strp = str + n + 1; 669 attr->type = PERF_TYPE_RAW; 670 attr->config = config; 671 return EVT_HANDLED; 672 } 673 return EVT_FAILED; 674 } 675 676 static enum event_result 677 parse_numeric_event(const char **strp, struct perf_event_attr *attr) 678 { 679 const char *str = *strp; 680 char *endp; 681 unsigned long type; 682 u64 config; 683 684 type = strtoul(str, &endp, 0); 685 if (endp > str && type < PERF_TYPE_MAX && *endp == ':') { 686 str = endp + 1; 687 config = strtoul(str, &endp, 0); 688 if (endp > str) { 689 attr->type = type; 690 attr->config = config; 691 *strp = endp; 692 return EVT_HANDLED; 693 } 694 } 695 return EVT_FAILED; 696 } 697 698 static enum event_result 699 parse_event_modifier(const char **strp, struct perf_event_attr *attr) 700 { 701 const char *str = *strp; 702 int exclude = 0; 703 int eu = 0, ek = 0, eh = 0, precise = 0; 704 705 if (*str++ != ':') 706 return 0; 707 while (*str) { 708 if (*str == 'u') { 709 if (!exclude) 710 exclude = eu = ek = eh = 1; 711 eu = 0; 712 } else if (*str == 'k') { 713 if (!exclude) 714 exclude = eu = ek = eh = 1; 715 ek = 0; 716 } else if (*str == 'h') { 717 if (!exclude) 718 exclude = eu = ek = eh = 1; 719 eh = 0; 720 } else if (*str == 'p') { 721 precise++; 722 } else 723 break; 724 725 ++str; 726 } 727 if (str >= *strp + 2) { 728 *strp = str; 729 attr->exclude_user = eu; 730 attr->exclude_kernel = ek; 731 attr->exclude_hv = eh; 732 attr->precise_ip = precise; 733 return 1; 734 } 735 return 0; 736 } 737 738 /* 739 * Each event can have multiple symbolic names. 740 * Symbolic names are (almost) exactly matched. 741 */ 742 static enum event_result 743 parse_event_symbols(const char **str, struct perf_event_attr *attr) 744 { 745 enum event_result ret; 746 747 ret = parse_tracepoint_event(str, attr); 748 if (ret != EVT_FAILED) 749 goto modifier; 750 751 ret = parse_raw_event(str, attr); 752 if (ret != EVT_FAILED) 753 goto modifier; 754 755 ret = parse_numeric_event(str, attr); 756 if (ret != EVT_FAILED) 757 goto modifier; 758 759 ret = parse_symbolic_event(str, attr); 760 if (ret != EVT_FAILED) 761 goto modifier; 762 763 ret = parse_generic_hw_event(str, attr); 764 if (ret != EVT_FAILED) 765 goto modifier; 766 767 ret = parse_breakpoint_event(str, attr); 768 if (ret != EVT_FAILED) 769 goto modifier; 770 771 fprintf(stderr, "invalid or unsupported event: '%s'\n", *str); 772 fprintf(stderr, "Run 'perf list' for a list of valid events\n"); 773 return EVT_FAILED; 774 775 modifier: 776 parse_event_modifier(str, attr); 777 778 return ret; 779 } 780 781 int parse_events(const struct option *opt __used, const char *str, int unset __used) 782 { 783 struct perf_event_attr attr; 784 enum event_result ret; 785 786 for (;;) { 787 memset(&attr, 0, sizeof(attr)); 788 ret = parse_event_symbols(&str, &attr); 789 if (ret == EVT_FAILED) 790 return -1; 791 792 if (!(*str == 0 || *str == ',' || isspace(*str))) 793 return -1; 794 795 if (ret != EVT_HANDLED_ALL) { 796 struct perf_evsel *evsel; 797 evsel = perf_evsel__new(&attr, 798 nr_counters); 799 if (evsel == NULL) 800 return -1; 801 list_add_tail(&evsel->node, &evsel_list); 802 ++nr_counters; 803 } 804 805 if (*str == 0) 806 break; 807 if (*str == ',') 808 ++str; 809 while (isspace(*str)) 810 ++str; 811 } 812 813 return 0; 814 } 815 816 int parse_filter(const struct option *opt __used, const char *str, 817 int unset __used) 818 { 819 struct perf_evsel *last = NULL; 820 821 if (!list_empty(&evsel_list)) 822 last = list_entry(evsel_list.prev, struct perf_evsel, node); 823 824 if (last == NULL || last->attr.type != PERF_TYPE_TRACEPOINT) { 825 fprintf(stderr, 826 "-F option should follow a -e tracepoint option\n"); 827 return -1; 828 } 829 830 last->filter = strdup(str); 831 if (last->filter == NULL) { 832 fprintf(stderr, "not enough memory to hold filter string\n"); 833 return -1; 834 } 835 836 return 0; 837 } 838 839 static const char * const event_type_descriptors[] = { 840 "Hardware event", 841 "Software event", 842 "Tracepoint event", 843 "Hardware cache event", 844 "Raw hardware event descriptor", 845 "Hardware breakpoint", 846 }; 847 848 /* 849 * Print the events from <debugfs_mount_point>/tracing/events 850 */ 851 852 static void print_tracepoint_events(void) 853 { 854 DIR *sys_dir, *evt_dir; 855 struct dirent *sys_next, *evt_next, sys_dirent, evt_dirent; 856 char evt_path[MAXPATHLEN]; 857 char dir_path[MAXPATHLEN]; 858 859 if (debugfs_valid_mountpoint(debugfs_path)) 860 return; 861 862 sys_dir = opendir(debugfs_path); 863 if (!sys_dir) 864 return; 865 866 for_each_subsystem(sys_dir, sys_dirent, sys_next) { 867 868 snprintf(dir_path, MAXPATHLEN, "%s/%s", debugfs_path, 869 sys_dirent.d_name); 870 evt_dir = opendir(dir_path); 871 if (!evt_dir) 872 continue; 873 874 for_each_event(sys_dirent, evt_dir, evt_dirent, evt_next) { 875 snprintf(evt_path, MAXPATHLEN, "%s:%s", 876 sys_dirent.d_name, evt_dirent.d_name); 877 printf(" %-42s [%s]\n", evt_path, 878 event_type_descriptors[PERF_TYPE_TRACEPOINT]); 879 } 880 closedir(evt_dir); 881 } 882 closedir(sys_dir); 883 } 884 885 /* 886 * Check whether event is in <debugfs_mount_point>/tracing/events 887 */ 888 889 int is_valid_tracepoint(const char *event_string) 890 { 891 DIR *sys_dir, *evt_dir; 892 struct dirent *sys_next, *evt_next, sys_dirent, evt_dirent; 893 char evt_path[MAXPATHLEN]; 894 char dir_path[MAXPATHLEN]; 895 896 if (debugfs_valid_mountpoint(debugfs_path)) 897 return 0; 898 899 sys_dir = opendir(debugfs_path); 900 if (!sys_dir) 901 return 0; 902 903 for_each_subsystem(sys_dir, sys_dirent, sys_next) { 904 905 snprintf(dir_path, MAXPATHLEN, "%s/%s", debugfs_path, 906 sys_dirent.d_name); 907 evt_dir = opendir(dir_path); 908 if (!evt_dir) 909 continue; 910 911 for_each_event(sys_dirent, evt_dir, evt_dirent, evt_next) { 912 snprintf(evt_path, MAXPATHLEN, "%s:%s", 913 sys_dirent.d_name, evt_dirent.d_name); 914 if (!strcmp(evt_path, event_string)) { 915 closedir(evt_dir); 916 closedir(sys_dir); 917 return 1; 918 } 919 } 920 closedir(evt_dir); 921 } 922 closedir(sys_dir); 923 return 0; 924 } 925 926 /* 927 * Print the help text for the event symbols: 928 */ 929 void print_events(void) 930 { 931 struct event_symbol *syms = event_symbols; 932 unsigned int i, type, op, prev_type = -1; 933 char name[40]; 934 935 printf("\n"); 936 printf("List of pre-defined events (to be used in -e):\n"); 937 938 for (i = 0; i < ARRAY_SIZE(event_symbols); i++, syms++) { 939 type = syms->type; 940 941 if (type != prev_type) 942 printf("\n"); 943 944 if (strlen(syms->alias)) 945 sprintf(name, "%s OR %s", syms->symbol, syms->alias); 946 else 947 strcpy(name, syms->symbol); 948 printf(" %-42s [%s]\n", name, 949 event_type_descriptors[type]); 950 951 prev_type = type; 952 } 953 954 printf("\n"); 955 for (type = 0; type < PERF_COUNT_HW_CACHE_MAX; type++) { 956 for (op = 0; op < PERF_COUNT_HW_CACHE_OP_MAX; op++) { 957 /* skip invalid cache type */ 958 if (!is_cache_op_valid(type, op)) 959 continue; 960 961 for (i = 0; i < PERF_COUNT_HW_CACHE_RESULT_MAX; i++) { 962 printf(" %-42s [%s]\n", 963 event_cache_name(type, op, i), 964 event_type_descriptors[PERF_TYPE_HW_CACHE]); 965 } 966 } 967 } 968 969 printf("\n"); 970 printf(" %-42s [%s]\n", 971 "rNNN (see 'perf list --help' on how to encode it)", 972 event_type_descriptors[PERF_TYPE_RAW]); 973 printf("\n"); 974 975 printf(" %-42s [%s]\n", 976 "mem:<addr>[:access]", 977 event_type_descriptors[PERF_TYPE_BREAKPOINT]); 978 printf("\n"); 979 980 print_tracepoint_events(); 981 982 exit(129); 983 } 984 985 int perf_evsel_list__create_default(void) 986 { 987 struct perf_evsel *evsel; 988 struct perf_event_attr attr; 989 990 memset(&attr, 0, sizeof(attr)); 991 attr.type = PERF_TYPE_HARDWARE; 992 attr.config = PERF_COUNT_HW_CPU_CYCLES; 993 994 evsel = perf_evsel__new(&attr, 0); 995 996 if (evsel == NULL) 997 return -ENOMEM; 998 999 list_add(&evsel->node, &evsel_list); 1000 ++nr_counters; 1001 return 0; 1002 } 1003 1004 void perf_evsel_list__delete(void) 1005 { 1006 struct perf_evsel *pos, *n; 1007 1008 list_for_each_entry_safe(pos, n, &evsel_list, node) { 1009 list_del_init(&pos->node); 1010 perf_evsel__delete(pos); 1011 } 1012 nr_counters = 0; 1013 } 1014