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%llx", 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 int store_event_type(const char *orgname) 494 { 495 char filename[PATH_MAX], *c; 496 FILE *file; 497 int id, n; 498 499 sprintf(filename, "%s/", debugfs_path); 500 strncat(filename, orgname, strlen(orgname)); 501 strcat(filename, "/id"); 502 503 c = strchr(filename, ':'); 504 if (c) 505 *c = '/'; 506 507 file = fopen(filename, "r"); 508 if (!file) 509 return 0; 510 n = fscanf(file, "%i", &id); 511 fclose(file); 512 if (n < 1) { 513 pr_err("cannot store event ID\n"); 514 return -EINVAL; 515 } 516 return perf_header__push_event(id, orgname); 517 } 518 519 static enum event_result parse_tracepoint_event(const char **strp, 520 struct perf_event_attr *attr) 521 { 522 const char *evt_name; 523 char *flags = NULL, *comma_loc; 524 char sys_name[MAX_EVENT_LENGTH]; 525 unsigned int sys_length, evt_length; 526 527 if (debugfs_valid_mountpoint(debugfs_path)) 528 return 0; 529 530 evt_name = strchr(*strp, ':'); 531 if (!evt_name) 532 return EVT_FAILED; 533 534 sys_length = evt_name - *strp; 535 if (sys_length >= MAX_EVENT_LENGTH) 536 return 0; 537 538 strncpy(sys_name, *strp, sys_length); 539 sys_name[sys_length] = '\0'; 540 evt_name = evt_name + 1; 541 542 comma_loc = strchr(evt_name, ','); 543 if (comma_loc) { 544 /* take the event name up to the comma */ 545 evt_name = strndup(evt_name, comma_loc - evt_name); 546 } 547 flags = strchr(evt_name, ':'); 548 if (flags) { 549 /* split it out: */ 550 evt_name = strndup(evt_name, flags - evt_name); 551 flags++; 552 } 553 554 evt_length = strlen(evt_name); 555 if (evt_length >= MAX_EVENT_LENGTH) 556 return EVT_FAILED; 557 if (strpbrk(evt_name, "*?")) { 558 *strp += strlen(sys_name) + evt_length; 559 return parse_multiple_tracepoint_event(sys_name, evt_name, 560 flags); 561 } else { 562 if (store_event_type(evt_name) < 0) 563 return EVT_FAILED; 564 565 return parse_single_tracepoint_event(sys_name, evt_name, 566 evt_length, attr, strp); 567 } 568 } 569 570 static enum event_result 571 parse_breakpoint_type(const char *type, const char **strp, 572 struct perf_event_attr *attr) 573 { 574 int i; 575 576 for (i = 0; i < 3; i++) { 577 if (!type[i]) 578 break; 579 580 switch (type[i]) { 581 case 'r': 582 attr->bp_type |= HW_BREAKPOINT_R; 583 break; 584 case 'w': 585 attr->bp_type |= HW_BREAKPOINT_W; 586 break; 587 case 'x': 588 attr->bp_type |= HW_BREAKPOINT_X; 589 break; 590 default: 591 return EVT_FAILED; 592 } 593 } 594 if (!attr->bp_type) /* Default */ 595 attr->bp_type = HW_BREAKPOINT_R | HW_BREAKPOINT_W; 596 597 *strp = type + i; 598 599 return EVT_HANDLED; 600 } 601 602 static enum event_result 603 parse_breakpoint_event(const char **strp, struct perf_event_attr *attr) 604 { 605 const char *target; 606 const char *type; 607 char *endaddr; 608 u64 addr; 609 enum event_result err; 610 611 target = strchr(*strp, ':'); 612 if (!target) 613 return EVT_FAILED; 614 615 if (strncmp(*strp, "mem", target - *strp) != 0) 616 return EVT_FAILED; 617 618 target++; 619 620 addr = strtoull(target, &endaddr, 0); 621 if (target == endaddr) 622 return EVT_FAILED; 623 624 attr->bp_addr = addr; 625 *strp = endaddr; 626 627 type = strchr(target, ':'); 628 629 /* If no type is defined, just rw as default */ 630 if (!type) { 631 attr->bp_type = HW_BREAKPOINT_R | HW_BREAKPOINT_W; 632 } else { 633 err = parse_breakpoint_type(++type, strp, attr); 634 if (err == EVT_FAILED) 635 return EVT_FAILED; 636 } 637 638 /* 639 * We should find a nice way to override the access length 640 * Provide some defaults for now 641 */ 642 if (attr->bp_type == HW_BREAKPOINT_X) 643 attr->bp_len = sizeof(long); 644 else 645 attr->bp_len = HW_BREAKPOINT_LEN_4; 646 647 attr->type = PERF_TYPE_BREAKPOINT; 648 649 return EVT_HANDLED; 650 } 651 652 static int check_events(const char *str, unsigned int i) 653 { 654 int n; 655 656 n = strlen(event_symbols[i].symbol); 657 if (!strncmp(str, event_symbols[i].symbol, n)) 658 return n; 659 660 n = strlen(event_symbols[i].alias); 661 if (n) 662 if (!strncmp(str, event_symbols[i].alias, n)) 663 return n; 664 return 0; 665 } 666 667 static enum event_result 668 parse_symbolic_event(const char **strp, struct perf_event_attr *attr) 669 { 670 const char *str = *strp; 671 unsigned int i; 672 int n; 673 674 for (i = 0; i < ARRAY_SIZE(event_symbols); i++) { 675 n = check_events(str, i); 676 if (n > 0) { 677 attr->type = event_symbols[i].type; 678 attr->config = event_symbols[i].config; 679 *strp = str + n; 680 return EVT_HANDLED; 681 } 682 } 683 return EVT_FAILED; 684 } 685 686 static enum event_result 687 parse_raw_event(const char **strp, struct perf_event_attr *attr) 688 { 689 const char *str = *strp; 690 u64 config; 691 int n; 692 693 if (*str != 'r') 694 return EVT_FAILED; 695 n = hex2u64(str + 1, &config); 696 if (n > 0) { 697 *strp = str + n + 1; 698 attr->type = PERF_TYPE_RAW; 699 attr->config = config; 700 return EVT_HANDLED; 701 } 702 return EVT_FAILED; 703 } 704 705 static enum event_result 706 parse_numeric_event(const char **strp, struct perf_event_attr *attr) 707 { 708 const char *str = *strp; 709 char *endp; 710 unsigned long type; 711 u64 config; 712 713 type = strtoul(str, &endp, 0); 714 if (endp > str && type < PERF_TYPE_MAX && *endp == ':') { 715 str = endp + 1; 716 config = strtoul(str, &endp, 0); 717 if (endp > str) { 718 attr->type = type; 719 attr->config = config; 720 *strp = endp; 721 return EVT_HANDLED; 722 } 723 } 724 return EVT_FAILED; 725 } 726 727 static enum event_result 728 parse_event_modifier(const char **strp, struct perf_event_attr *attr) 729 { 730 const char *str = *strp; 731 int exclude = 0; 732 int eu = 0, ek = 0, eh = 0, precise = 0; 733 734 if (*str++ != ':') 735 return 0; 736 while (*str) { 737 if (*str == 'u') { 738 if (!exclude) 739 exclude = eu = ek = eh = 1; 740 eu = 0; 741 } else if (*str == 'k') { 742 if (!exclude) 743 exclude = eu = ek = eh = 1; 744 ek = 0; 745 } else if (*str == 'h') { 746 if (!exclude) 747 exclude = eu = ek = eh = 1; 748 eh = 0; 749 } else if (*str == 'p') { 750 precise++; 751 } else 752 break; 753 754 ++str; 755 } 756 if (str >= *strp + 2) { 757 *strp = str; 758 attr->exclude_user = eu; 759 attr->exclude_kernel = ek; 760 attr->exclude_hv = eh; 761 attr->precise_ip = precise; 762 return 1; 763 } 764 return 0; 765 } 766 767 /* 768 * Each event can have multiple symbolic names. 769 * Symbolic names are (almost) exactly matched. 770 */ 771 static enum event_result 772 parse_event_symbols(const char **str, struct perf_event_attr *attr) 773 { 774 enum event_result ret; 775 776 ret = parse_tracepoint_event(str, attr); 777 if (ret != EVT_FAILED) 778 goto modifier; 779 780 ret = parse_raw_event(str, attr); 781 if (ret != EVT_FAILED) 782 goto modifier; 783 784 ret = parse_numeric_event(str, attr); 785 if (ret != EVT_FAILED) 786 goto modifier; 787 788 ret = parse_symbolic_event(str, attr); 789 if (ret != EVT_FAILED) 790 goto modifier; 791 792 ret = parse_generic_hw_event(str, attr); 793 if (ret != EVT_FAILED) 794 goto modifier; 795 796 ret = parse_breakpoint_event(str, attr); 797 if (ret != EVT_FAILED) 798 goto modifier; 799 800 fprintf(stderr, "invalid or unsupported event: '%s'\n", *str); 801 fprintf(stderr, "Run 'perf list' for a list of valid events\n"); 802 return EVT_FAILED; 803 804 modifier: 805 parse_event_modifier(str, attr); 806 807 return ret; 808 } 809 810 int parse_events(const struct option *opt __used, const char *str, int unset __used) 811 { 812 struct perf_event_attr attr; 813 enum event_result ret; 814 815 for (;;) { 816 memset(&attr, 0, sizeof(attr)); 817 ret = parse_event_symbols(&str, &attr); 818 if (ret == EVT_FAILED) 819 return -1; 820 821 if (!(*str == 0 || *str == ',' || isspace(*str))) 822 return -1; 823 824 if (ret != EVT_HANDLED_ALL) { 825 struct perf_evsel *evsel; 826 evsel = perf_evsel__new(&attr, 827 nr_counters); 828 if (evsel == NULL) 829 return -1; 830 list_add_tail(&evsel->node, &evsel_list); 831 ++nr_counters; 832 } 833 834 if (*str == 0) 835 break; 836 if (*str == ',') 837 ++str; 838 while (isspace(*str)) 839 ++str; 840 } 841 842 return 0; 843 } 844 845 int parse_filter(const struct option *opt __used, const char *str, 846 int unset __used) 847 { 848 struct perf_evsel *last = NULL; 849 850 if (!list_empty(&evsel_list)) 851 last = list_entry(evsel_list.prev, struct perf_evsel, node); 852 853 if (last == NULL || last->attr.type != PERF_TYPE_TRACEPOINT) { 854 fprintf(stderr, 855 "-F option should follow a -e tracepoint option\n"); 856 return -1; 857 } 858 859 last->filter = strdup(str); 860 if (last->filter == NULL) { 861 fprintf(stderr, "not enough memory to hold filter string\n"); 862 return -1; 863 } 864 865 return 0; 866 } 867 868 static const char * const event_type_descriptors[] = { 869 "Hardware event", 870 "Software event", 871 "Tracepoint event", 872 "Hardware cache event", 873 "Raw hardware event descriptor", 874 "Hardware breakpoint", 875 }; 876 877 /* 878 * Print the events from <debugfs_mount_point>/tracing/events 879 */ 880 881 static void print_tracepoint_events(void) 882 { 883 DIR *sys_dir, *evt_dir; 884 struct dirent *sys_next, *evt_next, sys_dirent, evt_dirent; 885 char evt_path[MAXPATHLEN]; 886 char dir_path[MAXPATHLEN]; 887 888 if (debugfs_valid_mountpoint(debugfs_path)) 889 return; 890 891 sys_dir = opendir(debugfs_path); 892 if (!sys_dir) 893 return; 894 895 for_each_subsystem(sys_dir, sys_dirent, sys_next) { 896 897 snprintf(dir_path, MAXPATHLEN, "%s/%s", debugfs_path, 898 sys_dirent.d_name); 899 evt_dir = opendir(dir_path); 900 if (!evt_dir) 901 continue; 902 903 for_each_event(sys_dirent, evt_dir, evt_dirent, evt_next) { 904 snprintf(evt_path, MAXPATHLEN, "%s:%s", 905 sys_dirent.d_name, evt_dirent.d_name); 906 printf(" %-42s [%s]\n", evt_path, 907 event_type_descriptors[PERF_TYPE_TRACEPOINT]); 908 } 909 closedir(evt_dir); 910 } 911 closedir(sys_dir); 912 } 913 914 /* 915 * Check whether event is in <debugfs_mount_point>/tracing/events 916 */ 917 918 int is_valid_tracepoint(const char *event_string) 919 { 920 DIR *sys_dir, *evt_dir; 921 struct dirent *sys_next, *evt_next, sys_dirent, evt_dirent; 922 char evt_path[MAXPATHLEN]; 923 char dir_path[MAXPATHLEN]; 924 925 if (debugfs_valid_mountpoint(debugfs_path)) 926 return 0; 927 928 sys_dir = opendir(debugfs_path); 929 if (!sys_dir) 930 return 0; 931 932 for_each_subsystem(sys_dir, sys_dirent, sys_next) { 933 934 snprintf(dir_path, MAXPATHLEN, "%s/%s", debugfs_path, 935 sys_dirent.d_name); 936 evt_dir = opendir(dir_path); 937 if (!evt_dir) 938 continue; 939 940 for_each_event(sys_dirent, evt_dir, evt_dirent, evt_next) { 941 snprintf(evt_path, MAXPATHLEN, "%s:%s", 942 sys_dirent.d_name, evt_dirent.d_name); 943 if (!strcmp(evt_path, event_string)) { 944 closedir(evt_dir); 945 closedir(sys_dir); 946 return 1; 947 } 948 } 949 closedir(evt_dir); 950 } 951 closedir(sys_dir); 952 return 0; 953 } 954 955 /* 956 * Print the help text for the event symbols: 957 */ 958 void print_events(void) 959 { 960 struct event_symbol *syms = event_symbols; 961 unsigned int i, type, op, prev_type = -1; 962 char name[40]; 963 964 printf("\n"); 965 printf("List of pre-defined events (to be used in -e):\n"); 966 967 for (i = 0; i < ARRAY_SIZE(event_symbols); i++, syms++) { 968 type = syms->type; 969 970 if (type != prev_type) 971 printf("\n"); 972 973 if (strlen(syms->alias)) 974 sprintf(name, "%s OR %s", syms->symbol, syms->alias); 975 else 976 strcpy(name, syms->symbol); 977 printf(" %-42s [%s]\n", name, 978 event_type_descriptors[type]); 979 980 prev_type = type; 981 } 982 983 printf("\n"); 984 for (type = 0; type < PERF_COUNT_HW_CACHE_MAX; type++) { 985 for (op = 0; op < PERF_COUNT_HW_CACHE_OP_MAX; op++) { 986 /* skip invalid cache type */ 987 if (!is_cache_op_valid(type, op)) 988 continue; 989 990 for (i = 0; i < PERF_COUNT_HW_CACHE_RESULT_MAX; i++) { 991 printf(" %-42s [%s]\n", 992 event_cache_name(type, op, i), 993 event_type_descriptors[PERF_TYPE_HW_CACHE]); 994 } 995 } 996 } 997 998 printf("\n"); 999 printf(" %-42s [%s]\n", 1000 "rNNN (see 'perf list --help' on how to encode it)", 1001 event_type_descriptors[PERF_TYPE_RAW]); 1002 printf("\n"); 1003 1004 printf(" %-42s [%s]\n", 1005 "mem:<addr>[:access]", 1006 event_type_descriptors[PERF_TYPE_BREAKPOINT]); 1007 printf("\n"); 1008 1009 print_tracepoint_events(); 1010 1011 exit(129); 1012 } 1013 1014 int perf_evsel_list__create_default(void) 1015 { 1016 struct perf_evsel *evsel; 1017 struct perf_event_attr attr; 1018 1019 memset(&attr, 0, sizeof(attr)); 1020 attr.type = PERF_TYPE_HARDWARE; 1021 attr.config = PERF_COUNT_HW_CPU_CYCLES; 1022 1023 evsel = perf_evsel__new(&attr, 0); 1024 1025 if (evsel == NULL) 1026 return -ENOMEM; 1027 1028 list_add(&evsel->node, &evsel_list); 1029 ++nr_counters; 1030 return 0; 1031 } 1032 1033 void perf_evsel_list__delete(void) 1034 { 1035 struct perf_evsel *pos, *n; 1036 1037 list_for_each_entry_safe(pos, n, &evsel_list, node) { 1038 list_del_init(&pos->node); 1039 perf_evsel__delete(pos); 1040 } 1041 nr_counters = 0; 1042 } 1043