1 #include <linux/hw_breakpoint.h> 2 #include <linux/err.h> 3 #include "util.h" 4 #include "../perf.h" 5 #include "evlist.h" 6 #include "evsel.h" 7 #include <subcmd/parse-options.h> 8 #include "parse-events.h" 9 #include <subcmd/exec-cmd.h> 10 #include "string.h" 11 #include "symbol.h" 12 #include "cache.h" 13 #include "header.h" 14 #include "bpf-loader.h" 15 #include "debug.h" 16 #include <api/fs/tracing_path.h> 17 #include "parse-events-bison.h" 18 #define YY_EXTRA_TYPE int 19 #include "parse-events-flex.h" 20 #include "pmu.h" 21 #include "thread_map.h" 22 #include "cpumap.h" 23 #include "asm/bug.h" 24 25 #define MAX_NAME_LEN 100 26 27 #ifdef PARSER_DEBUG 28 extern int parse_events_debug; 29 #endif 30 int parse_events_parse(void *data, void *scanner); 31 static int get_config_terms(struct list_head *head_config, 32 struct list_head *head_terms __maybe_unused); 33 34 static struct perf_pmu_event_symbol *perf_pmu_events_list; 35 /* 36 * The variable indicates the number of supported pmu event symbols. 37 * 0 means not initialized and ready to init 38 * -1 means failed to init, don't try anymore 39 * >0 is the number of supported pmu event symbols 40 */ 41 static int perf_pmu_events_list_num; 42 43 struct event_symbol event_symbols_hw[PERF_COUNT_HW_MAX] = { 44 [PERF_COUNT_HW_CPU_CYCLES] = { 45 .symbol = "cpu-cycles", 46 .alias = "cycles", 47 }, 48 [PERF_COUNT_HW_INSTRUCTIONS] = { 49 .symbol = "instructions", 50 .alias = "", 51 }, 52 [PERF_COUNT_HW_CACHE_REFERENCES] = { 53 .symbol = "cache-references", 54 .alias = "", 55 }, 56 [PERF_COUNT_HW_CACHE_MISSES] = { 57 .symbol = "cache-misses", 58 .alias = "", 59 }, 60 [PERF_COUNT_HW_BRANCH_INSTRUCTIONS] = { 61 .symbol = "branch-instructions", 62 .alias = "branches", 63 }, 64 [PERF_COUNT_HW_BRANCH_MISSES] = { 65 .symbol = "branch-misses", 66 .alias = "", 67 }, 68 [PERF_COUNT_HW_BUS_CYCLES] = { 69 .symbol = "bus-cycles", 70 .alias = "", 71 }, 72 [PERF_COUNT_HW_STALLED_CYCLES_FRONTEND] = { 73 .symbol = "stalled-cycles-frontend", 74 .alias = "idle-cycles-frontend", 75 }, 76 [PERF_COUNT_HW_STALLED_CYCLES_BACKEND] = { 77 .symbol = "stalled-cycles-backend", 78 .alias = "idle-cycles-backend", 79 }, 80 [PERF_COUNT_HW_REF_CPU_CYCLES] = { 81 .symbol = "ref-cycles", 82 .alias = "", 83 }, 84 }; 85 86 struct event_symbol event_symbols_sw[PERF_COUNT_SW_MAX] = { 87 [PERF_COUNT_SW_CPU_CLOCK] = { 88 .symbol = "cpu-clock", 89 .alias = "", 90 }, 91 [PERF_COUNT_SW_TASK_CLOCK] = { 92 .symbol = "task-clock", 93 .alias = "", 94 }, 95 [PERF_COUNT_SW_PAGE_FAULTS] = { 96 .symbol = "page-faults", 97 .alias = "faults", 98 }, 99 [PERF_COUNT_SW_CONTEXT_SWITCHES] = { 100 .symbol = "context-switches", 101 .alias = "cs", 102 }, 103 [PERF_COUNT_SW_CPU_MIGRATIONS] = { 104 .symbol = "cpu-migrations", 105 .alias = "migrations", 106 }, 107 [PERF_COUNT_SW_PAGE_FAULTS_MIN] = { 108 .symbol = "minor-faults", 109 .alias = "", 110 }, 111 [PERF_COUNT_SW_PAGE_FAULTS_MAJ] = { 112 .symbol = "major-faults", 113 .alias = "", 114 }, 115 [PERF_COUNT_SW_ALIGNMENT_FAULTS] = { 116 .symbol = "alignment-faults", 117 .alias = "", 118 }, 119 [PERF_COUNT_SW_EMULATION_FAULTS] = { 120 .symbol = "emulation-faults", 121 .alias = "", 122 }, 123 [PERF_COUNT_SW_DUMMY] = { 124 .symbol = "dummy", 125 .alias = "", 126 }, 127 [PERF_COUNT_SW_BPF_OUTPUT] = { 128 .symbol = "bpf-output", 129 .alias = "", 130 }, 131 }; 132 133 #define __PERF_EVENT_FIELD(config, name) \ 134 ((config & PERF_EVENT_##name##_MASK) >> PERF_EVENT_##name##_SHIFT) 135 136 #define PERF_EVENT_RAW(config) __PERF_EVENT_FIELD(config, RAW) 137 #define PERF_EVENT_CONFIG(config) __PERF_EVENT_FIELD(config, CONFIG) 138 #define PERF_EVENT_TYPE(config) __PERF_EVENT_FIELD(config, TYPE) 139 #define PERF_EVENT_ID(config) __PERF_EVENT_FIELD(config, EVENT) 140 141 #define for_each_subsystem(sys_dir, sys_dirent) \ 142 while ((sys_dirent = readdir(sys_dir)) != NULL) \ 143 if (sys_dirent->d_type == DT_DIR && \ 144 (strcmp(sys_dirent->d_name, ".")) && \ 145 (strcmp(sys_dirent->d_name, ".."))) 146 147 static int tp_event_has_id(struct dirent *sys_dir, struct dirent *evt_dir) 148 { 149 char evt_path[MAXPATHLEN]; 150 int fd; 151 152 snprintf(evt_path, MAXPATHLEN, "%s/%s/%s/id", tracing_events_path, 153 sys_dir->d_name, evt_dir->d_name); 154 fd = open(evt_path, O_RDONLY); 155 if (fd < 0) 156 return -EINVAL; 157 close(fd); 158 159 return 0; 160 } 161 162 #define for_each_event(sys_dirent, evt_dir, evt_dirent) \ 163 while ((evt_dirent = readdir(evt_dir)) != NULL) \ 164 if (evt_dirent->d_type == DT_DIR && \ 165 (strcmp(evt_dirent->d_name, ".")) && \ 166 (strcmp(evt_dirent->d_name, "..")) && \ 167 (!tp_event_has_id(sys_dirent, evt_dirent))) 168 169 #define MAX_EVENT_LENGTH 512 170 171 172 struct tracepoint_path *tracepoint_id_to_path(u64 config) 173 { 174 struct tracepoint_path *path = NULL; 175 DIR *sys_dir, *evt_dir; 176 struct dirent *sys_dirent, *evt_dirent; 177 char id_buf[24]; 178 int fd; 179 u64 id; 180 char evt_path[MAXPATHLEN]; 181 char dir_path[MAXPATHLEN]; 182 183 sys_dir = opendir(tracing_events_path); 184 if (!sys_dir) 185 return NULL; 186 187 for_each_subsystem(sys_dir, sys_dirent) { 188 189 snprintf(dir_path, MAXPATHLEN, "%s/%s", tracing_events_path, 190 sys_dirent->d_name); 191 evt_dir = opendir(dir_path); 192 if (!evt_dir) 193 continue; 194 195 for_each_event(sys_dirent, evt_dir, evt_dirent) { 196 197 snprintf(evt_path, MAXPATHLEN, "%s/%s/id", dir_path, 198 evt_dirent->d_name); 199 fd = open(evt_path, O_RDONLY); 200 if (fd < 0) 201 continue; 202 if (read(fd, id_buf, sizeof(id_buf)) < 0) { 203 close(fd); 204 continue; 205 } 206 close(fd); 207 id = atoll(id_buf); 208 if (id == config) { 209 closedir(evt_dir); 210 closedir(sys_dir); 211 path = zalloc(sizeof(*path)); 212 path->system = malloc(MAX_EVENT_LENGTH); 213 if (!path->system) { 214 free(path); 215 return NULL; 216 } 217 path->name = malloc(MAX_EVENT_LENGTH); 218 if (!path->name) { 219 zfree(&path->system); 220 free(path); 221 return NULL; 222 } 223 strncpy(path->system, sys_dirent->d_name, 224 MAX_EVENT_LENGTH); 225 strncpy(path->name, evt_dirent->d_name, 226 MAX_EVENT_LENGTH); 227 return path; 228 } 229 } 230 closedir(evt_dir); 231 } 232 233 closedir(sys_dir); 234 return NULL; 235 } 236 237 struct tracepoint_path *tracepoint_name_to_path(const char *name) 238 { 239 struct tracepoint_path *path = zalloc(sizeof(*path)); 240 char *str = strchr(name, ':'); 241 242 if (path == NULL || str == NULL) { 243 free(path); 244 return NULL; 245 } 246 247 path->system = strndup(name, str - name); 248 path->name = strdup(str+1); 249 250 if (path->system == NULL || path->name == NULL) { 251 zfree(&path->system); 252 zfree(&path->name); 253 free(path); 254 path = NULL; 255 } 256 257 return path; 258 } 259 260 const char *event_type(int type) 261 { 262 switch (type) { 263 case PERF_TYPE_HARDWARE: 264 return "hardware"; 265 266 case PERF_TYPE_SOFTWARE: 267 return "software"; 268 269 case PERF_TYPE_TRACEPOINT: 270 return "tracepoint"; 271 272 case PERF_TYPE_HW_CACHE: 273 return "hardware-cache"; 274 275 default: 276 break; 277 } 278 279 return "unknown"; 280 } 281 282 static int parse_events__is_name_term(struct parse_events_term *term) 283 { 284 return term->type_term == PARSE_EVENTS__TERM_TYPE_NAME; 285 } 286 287 static char *get_config_name(struct list_head *head_terms) 288 { 289 struct parse_events_term *term; 290 291 if (!head_terms) 292 return NULL; 293 294 list_for_each_entry(term, head_terms, list) 295 if (parse_events__is_name_term(term)) 296 return term->val.str; 297 298 return NULL; 299 } 300 301 static struct perf_evsel * 302 __add_event(struct list_head *list, int *idx, 303 struct perf_event_attr *attr, 304 char *name, struct cpu_map *cpus, 305 struct list_head *config_terms) 306 { 307 struct perf_evsel *evsel; 308 309 event_attr_init(attr); 310 311 evsel = perf_evsel__new_idx(attr, (*idx)++); 312 if (!evsel) 313 return NULL; 314 315 evsel->cpus = cpu_map__get(cpus); 316 evsel->own_cpus = cpu_map__get(cpus); 317 318 if (name) 319 evsel->name = strdup(name); 320 321 if (config_terms) 322 list_splice(config_terms, &evsel->config_terms); 323 324 list_add_tail(&evsel->node, list); 325 return evsel; 326 } 327 328 static int add_event(struct list_head *list, int *idx, 329 struct perf_event_attr *attr, char *name, 330 struct list_head *config_terms) 331 { 332 return __add_event(list, idx, attr, name, NULL, config_terms) ? 0 : -ENOMEM; 333 } 334 335 static int parse_aliases(char *str, const char *names[][PERF_EVSEL__MAX_ALIASES], int size) 336 { 337 int i, j; 338 int n, longest = -1; 339 340 for (i = 0; i < size; i++) { 341 for (j = 0; j < PERF_EVSEL__MAX_ALIASES && names[i][j]; j++) { 342 n = strlen(names[i][j]); 343 if (n > longest && !strncasecmp(str, names[i][j], n)) 344 longest = n; 345 } 346 if (longest > 0) 347 return i; 348 } 349 350 return -1; 351 } 352 353 typedef int config_term_func_t(struct perf_event_attr *attr, 354 struct parse_events_term *term, 355 struct parse_events_error *err); 356 static int config_term_common(struct perf_event_attr *attr, 357 struct parse_events_term *term, 358 struct parse_events_error *err); 359 static int config_attr(struct perf_event_attr *attr, 360 struct list_head *head, 361 struct parse_events_error *err, 362 config_term_func_t config_term); 363 364 int parse_events_add_cache(struct list_head *list, int *idx, 365 char *type, char *op_result1, char *op_result2, 366 struct parse_events_error *err, 367 struct list_head *head_config) 368 { 369 struct perf_event_attr attr; 370 LIST_HEAD(config_terms); 371 char name[MAX_NAME_LEN], *config_name; 372 int cache_type = -1, cache_op = -1, cache_result = -1; 373 char *op_result[2] = { op_result1, op_result2 }; 374 int i, n; 375 376 /* 377 * No fallback - if we cannot get a clear cache type 378 * then bail out: 379 */ 380 cache_type = parse_aliases(type, perf_evsel__hw_cache, 381 PERF_COUNT_HW_CACHE_MAX); 382 if (cache_type == -1) 383 return -EINVAL; 384 385 config_name = get_config_name(head_config); 386 n = snprintf(name, MAX_NAME_LEN, "%s", type); 387 388 for (i = 0; (i < 2) && (op_result[i]); i++) { 389 char *str = op_result[i]; 390 391 n += snprintf(name + n, MAX_NAME_LEN - n, "-%s", str); 392 393 if (cache_op == -1) { 394 cache_op = parse_aliases(str, perf_evsel__hw_cache_op, 395 PERF_COUNT_HW_CACHE_OP_MAX); 396 if (cache_op >= 0) { 397 if (!perf_evsel__is_cache_op_valid(cache_type, cache_op)) 398 return -EINVAL; 399 continue; 400 } 401 } 402 403 if (cache_result == -1) { 404 cache_result = parse_aliases(str, perf_evsel__hw_cache_result, 405 PERF_COUNT_HW_CACHE_RESULT_MAX); 406 if (cache_result >= 0) 407 continue; 408 } 409 } 410 411 /* 412 * Fall back to reads: 413 */ 414 if (cache_op == -1) 415 cache_op = PERF_COUNT_HW_CACHE_OP_READ; 416 417 /* 418 * Fall back to accesses: 419 */ 420 if (cache_result == -1) 421 cache_result = PERF_COUNT_HW_CACHE_RESULT_ACCESS; 422 423 memset(&attr, 0, sizeof(attr)); 424 attr.config = cache_type | (cache_op << 8) | (cache_result << 16); 425 attr.type = PERF_TYPE_HW_CACHE; 426 427 if (head_config) { 428 if (config_attr(&attr, head_config, err, 429 config_term_common)) 430 return -EINVAL; 431 432 if (get_config_terms(head_config, &config_terms)) 433 return -ENOMEM; 434 } 435 return add_event(list, idx, &attr, config_name ? : name, &config_terms); 436 } 437 438 static void tracepoint_error(struct parse_events_error *e, int err, 439 char *sys, char *name) 440 { 441 char help[BUFSIZ]; 442 443 if (!e) 444 return; 445 446 /* 447 * We get error directly from syscall errno ( > 0), 448 * or from encoded pointer's error ( < 0). 449 */ 450 err = abs(err); 451 452 switch (err) { 453 case EACCES: 454 e->str = strdup("can't access trace events"); 455 break; 456 case ENOENT: 457 e->str = strdup("unknown tracepoint"); 458 break; 459 default: 460 e->str = strdup("failed to add tracepoint"); 461 break; 462 } 463 464 tracing_path__strerror_open_tp(err, help, sizeof(help), sys, name); 465 e->help = strdup(help); 466 } 467 468 static int add_tracepoint(struct list_head *list, int *idx, 469 char *sys_name, char *evt_name, 470 struct parse_events_error *err, 471 struct list_head *head_config) 472 { 473 struct perf_evsel *evsel; 474 475 evsel = perf_evsel__newtp_idx(sys_name, evt_name, (*idx)++); 476 if (IS_ERR(evsel)) { 477 tracepoint_error(err, PTR_ERR(evsel), sys_name, evt_name); 478 return PTR_ERR(evsel); 479 } 480 481 if (head_config) { 482 LIST_HEAD(config_terms); 483 484 if (get_config_terms(head_config, &config_terms)) 485 return -ENOMEM; 486 list_splice(&config_terms, &evsel->config_terms); 487 } 488 489 list_add_tail(&evsel->node, list); 490 return 0; 491 } 492 493 static int add_tracepoint_multi_event(struct list_head *list, int *idx, 494 char *sys_name, char *evt_name, 495 struct parse_events_error *err, 496 struct list_head *head_config) 497 { 498 char evt_path[MAXPATHLEN]; 499 struct dirent *evt_ent; 500 DIR *evt_dir; 501 int ret = 0, found = 0; 502 503 snprintf(evt_path, MAXPATHLEN, "%s/%s", tracing_events_path, sys_name); 504 evt_dir = opendir(evt_path); 505 if (!evt_dir) { 506 tracepoint_error(err, errno, sys_name, evt_name); 507 return -1; 508 } 509 510 while (!ret && (evt_ent = readdir(evt_dir))) { 511 if (!strcmp(evt_ent->d_name, ".") 512 || !strcmp(evt_ent->d_name, "..") 513 || !strcmp(evt_ent->d_name, "enable") 514 || !strcmp(evt_ent->d_name, "filter")) 515 continue; 516 517 if (!strglobmatch(evt_ent->d_name, evt_name)) 518 continue; 519 520 found++; 521 522 ret = add_tracepoint(list, idx, sys_name, evt_ent->d_name, 523 err, head_config); 524 } 525 526 if (!found) { 527 tracepoint_error(err, ENOENT, sys_name, evt_name); 528 ret = -1; 529 } 530 531 closedir(evt_dir); 532 return ret; 533 } 534 535 static int add_tracepoint_event(struct list_head *list, int *idx, 536 char *sys_name, char *evt_name, 537 struct parse_events_error *err, 538 struct list_head *head_config) 539 { 540 return strpbrk(evt_name, "*?") ? 541 add_tracepoint_multi_event(list, idx, sys_name, evt_name, 542 err, head_config) : 543 add_tracepoint(list, idx, sys_name, evt_name, 544 err, head_config); 545 } 546 547 static int add_tracepoint_multi_sys(struct list_head *list, int *idx, 548 char *sys_name, char *evt_name, 549 struct parse_events_error *err, 550 struct list_head *head_config) 551 { 552 struct dirent *events_ent; 553 DIR *events_dir; 554 int ret = 0; 555 556 events_dir = opendir(tracing_events_path); 557 if (!events_dir) { 558 tracepoint_error(err, errno, sys_name, evt_name); 559 return -1; 560 } 561 562 while (!ret && (events_ent = readdir(events_dir))) { 563 if (!strcmp(events_ent->d_name, ".") 564 || !strcmp(events_ent->d_name, "..") 565 || !strcmp(events_ent->d_name, "enable") 566 || !strcmp(events_ent->d_name, "header_event") 567 || !strcmp(events_ent->d_name, "header_page")) 568 continue; 569 570 if (!strglobmatch(events_ent->d_name, sys_name)) 571 continue; 572 573 ret = add_tracepoint_event(list, idx, events_ent->d_name, 574 evt_name, err, head_config); 575 } 576 577 closedir(events_dir); 578 return ret; 579 } 580 581 struct __add_bpf_event_param { 582 struct parse_events_evlist *data; 583 struct list_head *list; 584 struct list_head *head_config; 585 }; 586 587 static int add_bpf_event(struct probe_trace_event *tev, int fd, 588 void *_param) 589 { 590 LIST_HEAD(new_evsels); 591 struct __add_bpf_event_param *param = _param; 592 struct parse_events_evlist *evlist = param->data; 593 struct list_head *list = param->list; 594 struct perf_evsel *pos; 595 int err; 596 597 pr_debug("add bpf event %s:%s and attach bpf program %d\n", 598 tev->group, tev->event, fd); 599 600 err = parse_events_add_tracepoint(&new_evsels, &evlist->idx, tev->group, 601 tev->event, evlist->error, 602 param->head_config); 603 if (err) { 604 struct perf_evsel *evsel, *tmp; 605 606 pr_debug("Failed to add BPF event %s:%s\n", 607 tev->group, tev->event); 608 list_for_each_entry_safe(evsel, tmp, &new_evsels, node) { 609 list_del(&evsel->node); 610 perf_evsel__delete(evsel); 611 } 612 return err; 613 } 614 pr_debug("adding %s:%s\n", tev->group, tev->event); 615 616 list_for_each_entry(pos, &new_evsels, node) { 617 pr_debug("adding %s:%s to %p\n", 618 tev->group, tev->event, pos); 619 pos->bpf_fd = fd; 620 } 621 list_splice(&new_evsels, list); 622 return 0; 623 } 624 625 int parse_events_load_bpf_obj(struct parse_events_evlist *data, 626 struct list_head *list, 627 struct bpf_object *obj, 628 struct list_head *head_config) 629 { 630 int err; 631 char errbuf[BUFSIZ]; 632 struct __add_bpf_event_param param = {data, list, head_config}; 633 static bool registered_unprobe_atexit = false; 634 635 if (IS_ERR(obj) || !obj) { 636 snprintf(errbuf, sizeof(errbuf), 637 "Internal error: load bpf obj with NULL"); 638 err = -EINVAL; 639 goto errout; 640 } 641 642 /* 643 * Register atexit handler before calling bpf__probe() so 644 * bpf__probe() don't need to unprobe probe points its already 645 * created when failure. 646 */ 647 if (!registered_unprobe_atexit) { 648 atexit(bpf__clear); 649 registered_unprobe_atexit = true; 650 } 651 652 err = bpf__probe(obj); 653 if (err) { 654 bpf__strerror_probe(obj, err, errbuf, sizeof(errbuf)); 655 goto errout; 656 } 657 658 err = bpf__load(obj); 659 if (err) { 660 bpf__strerror_load(obj, err, errbuf, sizeof(errbuf)); 661 goto errout; 662 } 663 664 err = bpf__foreach_tev(obj, add_bpf_event, ¶m); 665 if (err) { 666 snprintf(errbuf, sizeof(errbuf), 667 "Attach events in BPF object failed"); 668 goto errout; 669 } 670 671 return 0; 672 errout: 673 data->error->help = strdup("(add -v to see detail)"); 674 data->error->str = strdup(errbuf); 675 return err; 676 } 677 678 static int 679 parse_events_config_bpf(struct parse_events_evlist *data, 680 struct bpf_object *obj, 681 struct list_head *head_config) 682 { 683 struct parse_events_term *term; 684 int error_pos; 685 686 if (!head_config || list_empty(head_config)) 687 return 0; 688 689 list_for_each_entry(term, head_config, list) { 690 char errbuf[BUFSIZ]; 691 int err; 692 693 if (term->type_term != PARSE_EVENTS__TERM_TYPE_USER) { 694 snprintf(errbuf, sizeof(errbuf), 695 "Invalid config term for BPF object"); 696 errbuf[BUFSIZ - 1] = '\0'; 697 698 data->error->idx = term->err_term; 699 data->error->str = strdup(errbuf); 700 return -EINVAL; 701 } 702 703 err = bpf__config_obj(obj, term, data->evlist, &error_pos); 704 if (err) { 705 bpf__strerror_config_obj(obj, term, data->evlist, 706 &error_pos, err, errbuf, 707 sizeof(errbuf)); 708 data->error->help = strdup( 709 "Hint:\tValid config terms:\n" 710 " \tmap:[<arraymap>].value<indices>=[value]\n" 711 " \tmap:[<eventmap>].event<indices>=[event]\n" 712 "\n" 713 " \twhere <indices> is something like [0,3...5] or [all]\n" 714 " \t(add -v to see detail)"); 715 data->error->str = strdup(errbuf); 716 if (err == -BPF_LOADER_ERRNO__OBJCONF_MAP_VALUE) 717 data->error->idx = term->err_val; 718 else 719 data->error->idx = term->err_term + error_pos; 720 return err; 721 } 722 } 723 return 0; 724 } 725 726 /* 727 * Split config terms: 728 * perf record -e bpf.c/call-graph=fp,map:array.value[0]=1/ ... 729 * 'call-graph=fp' is 'evt config', should be applied to each 730 * events in bpf.c. 731 * 'map:array.value[0]=1' is 'obj config', should be processed 732 * with parse_events_config_bpf. 733 * 734 * Move object config terms from the first list to obj_head_config. 735 */ 736 static void 737 split_bpf_config_terms(struct list_head *evt_head_config, 738 struct list_head *obj_head_config) 739 { 740 struct parse_events_term *term, *temp; 741 742 /* 743 * Currectly, all possible user config term 744 * belong to bpf object. parse_events__is_hardcoded_term() 745 * happends to be a good flag. 746 * 747 * See parse_events_config_bpf() and 748 * config_term_tracepoint(). 749 */ 750 list_for_each_entry_safe(term, temp, evt_head_config, list) 751 if (!parse_events__is_hardcoded_term(term)) 752 list_move_tail(&term->list, obj_head_config); 753 } 754 755 int parse_events_load_bpf(struct parse_events_evlist *data, 756 struct list_head *list, 757 char *bpf_file_name, 758 bool source, 759 struct list_head *head_config) 760 { 761 int err; 762 struct bpf_object *obj; 763 LIST_HEAD(obj_head_config); 764 765 if (head_config) 766 split_bpf_config_terms(head_config, &obj_head_config); 767 768 obj = bpf__prepare_load(bpf_file_name, source); 769 if (IS_ERR(obj)) { 770 char errbuf[BUFSIZ]; 771 772 err = PTR_ERR(obj); 773 774 if (err == -ENOTSUP) 775 snprintf(errbuf, sizeof(errbuf), 776 "BPF support is not compiled"); 777 else 778 bpf__strerror_prepare_load(bpf_file_name, 779 source, 780 -err, errbuf, 781 sizeof(errbuf)); 782 783 data->error->help = strdup("(add -v to see detail)"); 784 data->error->str = strdup(errbuf); 785 return err; 786 } 787 788 err = parse_events_load_bpf_obj(data, list, obj, head_config); 789 if (err) 790 return err; 791 err = parse_events_config_bpf(data, obj, &obj_head_config); 792 793 /* 794 * Caller doesn't know anything about obj_head_config, 795 * so combine them together again before returnning. 796 */ 797 if (head_config) 798 list_splice_tail(&obj_head_config, head_config); 799 return err; 800 } 801 802 static int 803 parse_breakpoint_type(const char *type, struct perf_event_attr *attr) 804 { 805 int i; 806 807 for (i = 0; i < 3; i++) { 808 if (!type || !type[i]) 809 break; 810 811 #define CHECK_SET_TYPE(bit) \ 812 do { \ 813 if (attr->bp_type & bit) \ 814 return -EINVAL; \ 815 else \ 816 attr->bp_type |= bit; \ 817 } while (0) 818 819 switch (type[i]) { 820 case 'r': 821 CHECK_SET_TYPE(HW_BREAKPOINT_R); 822 break; 823 case 'w': 824 CHECK_SET_TYPE(HW_BREAKPOINT_W); 825 break; 826 case 'x': 827 CHECK_SET_TYPE(HW_BREAKPOINT_X); 828 break; 829 default: 830 return -EINVAL; 831 } 832 } 833 834 #undef CHECK_SET_TYPE 835 836 if (!attr->bp_type) /* Default */ 837 attr->bp_type = HW_BREAKPOINT_R | HW_BREAKPOINT_W; 838 839 return 0; 840 } 841 842 int parse_events_add_breakpoint(struct list_head *list, int *idx, 843 void *ptr, char *type, u64 len) 844 { 845 struct perf_event_attr attr; 846 847 memset(&attr, 0, sizeof(attr)); 848 attr.bp_addr = (unsigned long) ptr; 849 850 if (parse_breakpoint_type(type, &attr)) 851 return -EINVAL; 852 853 /* Provide some defaults if len is not specified */ 854 if (!len) { 855 if (attr.bp_type == HW_BREAKPOINT_X) 856 len = sizeof(long); 857 else 858 len = HW_BREAKPOINT_LEN_4; 859 } 860 861 attr.bp_len = len; 862 863 attr.type = PERF_TYPE_BREAKPOINT; 864 attr.sample_period = 1; 865 866 return add_event(list, idx, &attr, NULL, NULL); 867 } 868 869 static int check_type_val(struct parse_events_term *term, 870 struct parse_events_error *err, 871 int type) 872 { 873 if (type == term->type_val) 874 return 0; 875 876 if (err) { 877 err->idx = term->err_val; 878 if (type == PARSE_EVENTS__TERM_TYPE_NUM) 879 err->str = strdup("expected numeric value"); 880 else 881 err->str = strdup("expected string value"); 882 } 883 return -EINVAL; 884 } 885 886 /* 887 * Update according to parse-events.l 888 */ 889 static const char *config_term_names[__PARSE_EVENTS__TERM_TYPE_NR] = { 890 [PARSE_EVENTS__TERM_TYPE_USER] = "<sysfs term>", 891 [PARSE_EVENTS__TERM_TYPE_CONFIG] = "config", 892 [PARSE_EVENTS__TERM_TYPE_CONFIG1] = "config1", 893 [PARSE_EVENTS__TERM_TYPE_CONFIG2] = "config2", 894 [PARSE_EVENTS__TERM_TYPE_NAME] = "name", 895 [PARSE_EVENTS__TERM_TYPE_SAMPLE_PERIOD] = "period", 896 [PARSE_EVENTS__TERM_TYPE_SAMPLE_FREQ] = "freq", 897 [PARSE_EVENTS__TERM_TYPE_BRANCH_SAMPLE_TYPE] = "branch_type", 898 [PARSE_EVENTS__TERM_TYPE_TIME] = "time", 899 [PARSE_EVENTS__TERM_TYPE_CALLGRAPH] = "call-graph", 900 [PARSE_EVENTS__TERM_TYPE_STACKSIZE] = "stack-size", 901 [PARSE_EVENTS__TERM_TYPE_NOINHERIT] = "no-inherit", 902 [PARSE_EVENTS__TERM_TYPE_INHERIT] = "inherit", 903 }; 904 905 static bool config_term_shrinked; 906 907 static bool 908 config_term_avail(int term_type, struct parse_events_error *err) 909 { 910 if (term_type < 0 || term_type >= __PARSE_EVENTS__TERM_TYPE_NR) { 911 err->str = strdup("Invalid term_type"); 912 return false; 913 } 914 if (!config_term_shrinked) 915 return true; 916 917 switch (term_type) { 918 case PARSE_EVENTS__TERM_TYPE_CONFIG: 919 case PARSE_EVENTS__TERM_TYPE_CONFIG1: 920 case PARSE_EVENTS__TERM_TYPE_CONFIG2: 921 case PARSE_EVENTS__TERM_TYPE_NAME: 922 return true; 923 default: 924 if (!err) 925 return false; 926 927 /* term_type is validated so indexing is safe */ 928 if (asprintf(&err->str, "'%s' is not usable in 'perf stat'", 929 config_term_names[term_type]) < 0) 930 err->str = NULL; 931 return false; 932 } 933 } 934 935 void parse_events__shrink_config_terms(void) 936 { 937 config_term_shrinked = true; 938 } 939 940 static int config_term_common(struct perf_event_attr *attr, 941 struct parse_events_term *term, 942 struct parse_events_error *err) 943 { 944 #define CHECK_TYPE_VAL(type) \ 945 do { \ 946 if (check_type_val(term, err, PARSE_EVENTS__TERM_TYPE_ ## type)) \ 947 return -EINVAL; \ 948 } while (0) 949 950 switch (term->type_term) { 951 case PARSE_EVENTS__TERM_TYPE_CONFIG: 952 CHECK_TYPE_VAL(NUM); 953 attr->config = term->val.num; 954 break; 955 case PARSE_EVENTS__TERM_TYPE_CONFIG1: 956 CHECK_TYPE_VAL(NUM); 957 attr->config1 = term->val.num; 958 break; 959 case PARSE_EVENTS__TERM_TYPE_CONFIG2: 960 CHECK_TYPE_VAL(NUM); 961 attr->config2 = term->val.num; 962 break; 963 case PARSE_EVENTS__TERM_TYPE_SAMPLE_PERIOD: 964 CHECK_TYPE_VAL(NUM); 965 break; 966 case PARSE_EVENTS__TERM_TYPE_SAMPLE_FREQ: 967 CHECK_TYPE_VAL(NUM); 968 break; 969 case PARSE_EVENTS__TERM_TYPE_BRANCH_SAMPLE_TYPE: 970 /* 971 * TODO uncomment when the field is available 972 * attr->branch_sample_type = term->val.num; 973 */ 974 break; 975 case PARSE_EVENTS__TERM_TYPE_TIME: 976 CHECK_TYPE_VAL(NUM); 977 if (term->val.num > 1) { 978 err->str = strdup("expected 0 or 1"); 979 err->idx = term->err_val; 980 return -EINVAL; 981 } 982 break; 983 case PARSE_EVENTS__TERM_TYPE_CALLGRAPH: 984 CHECK_TYPE_VAL(STR); 985 break; 986 case PARSE_EVENTS__TERM_TYPE_STACKSIZE: 987 CHECK_TYPE_VAL(NUM); 988 break; 989 case PARSE_EVENTS__TERM_TYPE_INHERIT: 990 CHECK_TYPE_VAL(NUM); 991 break; 992 case PARSE_EVENTS__TERM_TYPE_NOINHERIT: 993 CHECK_TYPE_VAL(NUM); 994 break; 995 case PARSE_EVENTS__TERM_TYPE_NAME: 996 CHECK_TYPE_VAL(STR); 997 break; 998 default: 999 err->str = strdup("unknown term"); 1000 err->idx = term->err_term; 1001 err->help = parse_events_formats_error_string(NULL); 1002 return -EINVAL; 1003 } 1004 1005 /* 1006 * Check term availbility after basic checking so 1007 * PARSE_EVENTS__TERM_TYPE_USER can be found and filtered. 1008 * 1009 * If check availbility at the entry of this function, 1010 * user will see "'<sysfs term>' is not usable in 'perf stat'" 1011 * if an invalid config term is provided for legacy events 1012 * (for example, instructions/badterm/...), which is confusing. 1013 */ 1014 if (!config_term_avail(term->type_term, err)) 1015 return -EINVAL; 1016 return 0; 1017 #undef CHECK_TYPE_VAL 1018 } 1019 1020 static int config_term_pmu(struct perf_event_attr *attr, 1021 struct parse_events_term *term, 1022 struct parse_events_error *err) 1023 { 1024 if (term->type_term == PARSE_EVENTS__TERM_TYPE_USER) 1025 /* 1026 * Always succeed for sysfs terms, as we dont know 1027 * at this point what type they need to have. 1028 */ 1029 return 0; 1030 else 1031 return config_term_common(attr, term, err); 1032 } 1033 1034 static int config_term_tracepoint(struct perf_event_attr *attr, 1035 struct parse_events_term *term, 1036 struct parse_events_error *err) 1037 { 1038 switch (term->type_term) { 1039 case PARSE_EVENTS__TERM_TYPE_CALLGRAPH: 1040 case PARSE_EVENTS__TERM_TYPE_STACKSIZE: 1041 case PARSE_EVENTS__TERM_TYPE_INHERIT: 1042 case PARSE_EVENTS__TERM_TYPE_NOINHERIT: 1043 return config_term_common(attr, term, err); 1044 default: 1045 if (err) { 1046 err->idx = term->err_term; 1047 err->str = strdup("unknown term"); 1048 err->help = strdup("valid terms: call-graph,stack-size\n"); 1049 } 1050 return -EINVAL; 1051 } 1052 1053 return 0; 1054 } 1055 1056 static int config_attr(struct perf_event_attr *attr, 1057 struct list_head *head, 1058 struct parse_events_error *err, 1059 config_term_func_t config_term) 1060 { 1061 struct parse_events_term *term; 1062 1063 list_for_each_entry(term, head, list) 1064 if (config_term(attr, term, err)) 1065 return -EINVAL; 1066 1067 return 0; 1068 } 1069 1070 static int get_config_terms(struct list_head *head_config, 1071 struct list_head *head_terms __maybe_unused) 1072 { 1073 #define ADD_CONFIG_TERM(__type, __name, __val) \ 1074 do { \ 1075 struct perf_evsel_config_term *__t; \ 1076 \ 1077 __t = zalloc(sizeof(*__t)); \ 1078 if (!__t) \ 1079 return -ENOMEM; \ 1080 \ 1081 INIT_LIST_HEAD(&__t->list); \ 1082 __t->type = PERF_EVSEL__CONFIG_TERM_ ## __type; \ 1083 __t->val.__name = __val; \ 1084 list_add_tail(&__t->list, head_terms); \ 1085 } while (0) 1086 1087 struct parse_events_term *term; 1088 1089 list_for_each_entry(term, head_config, list) { 1090 switch (term->type_term) { 1091 case PARSE_EVENTS__TERM_TYPE_SAMPLE_PERIOD: 1092 ADD_CONFIG_TERM(PERIOD, period, term->val.num); 1093 break; 1094 case PARSE_EVENTS__TERM_TYPE_SAMPLE_FREQ: 1095 ADD_CONFIG_TERM(FREQ, freq, term->val.num); 1096 break; 1097 case PARSE_EVENTS__TERM_TYPE_TIME: 1098 ADD_CONFIG_TERM(TIME, time, term->val.num); 1099 break; 1100 case PARSE_EVENTS__TERM_TYPE_CALLGRAPH: 1101 ADD_CONFIG_TERM(CALLGRAPH, callgraph, term->val.str); 1102 break; 1103 case PARSE_EVENTS__TERM_TYPE_STACKSIZE: 1104 ADD_CONFIG_TERM(STACK_USER, stack_user, term->val.num); 1105 break; 1106 case PARSE_EVENTS__TERM_TYPE_INHERIT: 1107 ADD_CONFIG_TERM(INHERIT, inherit, term->val.num ? 1 : 0); 1108 break; 1109 case PARSE_EVENTS__TERM_TYPE_NOINHERIT: 1110 ADD_CONFIG_TERM(INHERIT, inherit, term->val.num ? 0 : 1); 1111 break; 1112 default: 1113 break; 1114 } 1115 } 1116 #undef ADD_EVSEL_CONFIG 1117 return 0; 1118 } 1119 1120 int parse_events_add_tracepoint(struct list_head *list, int *idx, 1121 char *sys, char *event, 1122 struct parse_events_error *err, 1123 struct list_head *head_config) 1124 { 1125 if (head_config) { 1126 struct perf_event_attr attr; 1127 1128 if (config_attr(&attr, head_config, err, 1129 config_term_tracepoint)) 1130 return -EINVAL; 1131 } 1132 1133 if (strpbrk(sys, "*?")) 1134 return add_tracepoint_multi_sys(list, idx, sys, event, 1135 err, head_config); 1136 else 1137 return add_tracepoint_event(list, idx, sys, event, 1138 err, head_config); 1139 } 1140 1141 int parse_events_add_numeric(struct parse_events_evlist *data, 1142 struct list_head *list, 1143 u32 type, u64 config, 1144 struct list_head *head_config) 1145 { 1146 struct perf_event_attr attr; 1147 LIST_HEAD(config_terms); 1148 1149 memset(&attr, 0, sizeof(attr)); 1150 attr.type = type; 1151 attr.config = config; 1152 1153 if (head_config) { 1154 if (config_attr(&attr, head_config, data->error, 1155 config_term_common)) 1156 return -EINVAL; 1157 1158 if (get_config_terms(head_config, &config_terms)) 1159 return -ENOMEM; 1160 } 1161 1162 return add_event(list, &data->idx, &attr, 1163 get_config_name(head_config), &config_terms); 1164 } 1165 1166 int parse_events_add_pmu(struct parse_events_evlist *data, 1167 struct list_head *list, char *name, 1168 struct list_head *head_config) 1169 { 1170 struct perf_event_attr attr; 1171 struct perf_pmu_info info; 1172 struct perf_pmu *pmu; 1173 struct perf_evsel *evsel; 1174 LIST_HEAD(config_terms); 1175 1176 pmu = perf_pmu__find(name); 1177 if (!pmu) 1178 return -EINVAL; 1179 1180 if (pmu->default_config) { 1181 memcpy(&attr, pmu->default_config, 1182 sizeof(struct perf_event_attr)); 1183 } else { 1184 memset(&attr, 0, sizeof(attr)); 1185 } 1186 1187 if (!head_config) { 1188 attr.type = pmu->type; 1189 evsel = __add_event(list, &data->idx, &attr, NULL, pmu->cpus, NULL); 1190 return evsel ? 0 : -ENOMEM; 1191 } 1192 1193 if (perf_pmu__check_alias(pmu, head_config, &info)) 1194 return -EINVAL; 1195 1196 /* 1197 * Configure hardcoded terms first, no need to check 1198 * return value when called with fail == 0 ;) 1199 */ 1200 if (config_attr(&attr, head_config, data->error, config_term_pmu)) 1201 return -EINVAL; 1202 1203 if (get_config_terms(head_config, &config_terms)) 1204 return -ENOMEM; 1205 1206 if (perf_pmu__config(pmu, &attr, head_config, data->error)) 1207 return -EINVAL; 1208 1209 evsel = __add_event(list, &data->idx, &attr, 1210 get_config_name(head_config), pmu->cpus, 1211 &config_terms); 1212 if (evsel) { 1213 evsel->unit = info.unit; 1214 evsel->scale = info.scale; 1215 evsel->per_pkg = info.per_pkg; 1216 evsel->snapshot = info.snapshot; 1217 } 1218 1219 return evsel ? 0 : -ENOMEM; 1220 } 1221 1222 int parse_events__modifier_group(struct list_head *list, 1223 char *event_mod) 1224 { 1225 return parse_events__modifier_event(list, event_mod, true); 1226 } 1227 1228 void parse_events__set_leader(char *name, struct list_head *list) 1229 { 1230 struct perf_evsel *leader; 1231 1232 if (list_empty(list)) { 1233 WARN_ONCE(true, "WARNING: failed to set leader: empty list"); 1234 return; 1235 } 1236 1237 __perf_evlist__set_leader(list); 1238 leader = list_entry(list->next, struct perf_evsel, node); 1239 leader->group_name = name ? strdup(name) : NULL; 1240 } 1241 1242 /* list_event is assumed to point to malloc'ed memory */ 1243 void parse_events_update_lists(struct list_head *list_event, 1244 struct list_head *list_all) 1245 { 1246 /* 1247 * Called for single event definition. Update the 1248 * 'all event' list, and reinit the 'single event' 1249 * list, for next event definition. 1250 */ 1251 list_splice_tail(list_event, list_all); 1252 free(list_event); 1253 } 1254 1255 struct event_modifier { 1256 int eu; 1257 int ek; 1258 int eh; 1259 int eH; 1260 int eG; 1261 int eI; 1262 int precise; 1263 int precise_max; 1264 int exclude_GH; 1265 int sample_read; 1266 int pinned; 1267 }; 1268 1269 static int get_event_modifier(struct event_modifier *mod, char *str, 1270 struct perf_evsel *evsel) 1271 { 1272 int eu = evsel ? evsel->attr.exclude_user : 0; 1273 int ek = evsel ? evsel->attr.exclude_kernel : 0; 1274 int eh = evsel ? evsel->attr.exclude_hv : 0; 1275 int eH = evsel ? evsel->attr.exclude_host : 0; 1276 int eG = evsel ? evsel->attr.exclude_guest : 0; 1277 int eI = evsel ? evsel->attr.exclude_idle : 0; 1278 int precise = evsel ? evsel->attr.precise_ip : 0; 1279 int precise_max = 0; 1280 int sample_read = 0; 1281 int pinned = evsel ? evsel->attr.pinned : 0; 1282 1283 int exclude = eu | ek | eh; 1284 int exclude_GH = evsel ? evsel->exclude_GH : 0; 1285 1286 memset(mod, 0, sizeof(*mod)); 1287 1288 while (*str) { 1289 if (*str == 'u') { 1290 if (!exclude) 1291 exclude = eu = ek = eh = 1; 1292 eu = 0; 1293 } else if (*str == 'k') { 1294 if (!exclude) 1295 exclude = eu = ek = eh = 1; 1296 ek = 0; 1297 } else if (*str == 'h') { 1298 if (!exclude) 1299 exclude = eu = ek = eh = 1; 1300 eh = 0; 1301 } else if (*str == 'G') { 1302 if (!exclude_GH) 1303 exclude_GH = eG = eH = 1; 1304 eG = 0; 1305 } else if (*str == 'H') { 1306 if (!exclude_GH) 1307 exclude_GH = eG = eH = 1; 1308 eH = 0; 1309 } else if (*str == 'I') { 1310 eI = 1; 1311 } else if (*str == 'p') { 1312 precise++; 1313 /* use of precise requires exclude_guest */ 1314 if (!exclude_GH) 1315 eG = 1; 1316 } else if (*str == 'P') { 1317 precise_max = 1; 1318 } else if (*str == 'S') { 1319 sample_read = 1; 1320 } else if (*str == 'D') { 1321 pinned = 1; 1322 } else 1323 break; 1324 1325 ++str; 1326 } 1327 1328 /* 1329 * precise ip: 1330 * 1331 * 0 - SAMPLE_IP can have arbitrary skid 1332 * 1 - SAMPLE_IP must have constant skid 1333 * 2 - SAMPLE_IP requested to have 0 skid 1334 * 3 - SAMPLE_IP must have 0 skid 1335 * 1336 * See also PERF_RECORD_MISC_EXACT_IP 1337 */ 1338 if (precise > 3) 1339 return -EINVAL; 1340 1341 mod->eu = eu; 1342 mod->ek = ek; 1343 mod->eh = eh; 1344 mod->eH = eH; 1345 mod->eG = eG; 1346 mod->eI = eI; 1347 mod->precise = precise; 1348 mod->precise_max = precise_max; 1349 mod->exclude_GH = exclude_GH; 1350 mod->sample_read = sample_read; 1351 mod->pinned = pinned; 1352 1353 return 0; 1354 } 1355 1356 /* 1357 * Basic modifier sanity check to validate it contains only one 1358 * instance of any modifier (apart from 'p') present. 1359 */ 1360 static int check_modifier(char *str) 1361 { 1362 char *p = str; 1363 1364 /* The sizeof includes 0 byte as well. */ 1365 if (strlen(str) > (sizeof("ukhGHpppPSDI") - 1)) 1366 return -1; 1367 1368 while (*p) { 1369 if (*p != 'p' && strchr(p + 1, *p)) 1370 return -1; 1371 p++; 1372 } 1373 1374 return 0; 1375 } 1376 1377 int parse_events__modifier_event(struct list_head *list, char *str, bool add) 1378 { 1379 struct perf_evsel *evsel; 1380 struct event_modifier mod; 1381 1382 if (str == NULL) 1383 return 0; 1384 1385 if (check_modifier(str)) 1386 return -EINVAL; 1387 1388 if (!add && get_event_modifier(&mod, str, NULL)) 1389 return -EINVAL; 1390 1391 __evlist__for_each(list, evsel) { 1392 if (add && get_event_modifier(&mod, str, evsel)) 1393 return -EINVAL; 1394 1395 evsel->attr.exclude_user = mod.eu; 1396 evsel->attr.exclude_kernel = mod.ek; 1397 evsel->attr.exclude_hv = mod.eh; 1398 evsel->attr.precise_ip = mod.precise; 1399 evsel->attr.exclude_host = mod.eH; 1400 evsel->attr.exclude_guest = mod.eG; 1401 evsel->attr.exclude_idle = mod.eI; 1402 evsel->exclude_GH = mod.exclude_GH; 1403 evsel->sample_read = mod.sample_read; 1404 evsel->precise_max = mod.precise_max; 1405 1406 if (perf_evsel__is_group_leader(evsel)) 1407 evsel->attr.pinned = mod.pinned; 1408 } 1409 1410 return 0; 1411 } 1412 1413 int parse_events_name(struct list_head *list, char *name) 1414 { 1415 struct perf_evsel *evsel; 1416 1417 __evlist__for_each(list, evsel) { 1418 if (!evsel->name) 1419 evsel->name = strdup(name); 1420 } 1421 1422 return 0; 1423 } 1424 1425 static int 1426 comp_pmu(const void *p1, const void *p2) 1427 { 1428 struct perf_pmu_event_symbol *pmu1 = (struct perf_pmu_event_symbol *) p1; 1429 struct perf_pmu_event_symbol *pmu2 = (struct perf_pmu_event_symbol *) p2; 1430 1431 return strcmp(pmu1->symbol, pmu2->symbol); 1432 } 1433 1434 static void perf_pmu__parse_cleanup(void) 1435 { 1436 if (perf_pmu_events_list_num > 0) { 1437 struct perf_pmu_event_symbol *p; 1438 int i; 1439 1440 for (i = 0; i < perf_pmu_events_list_num; i++) { 1441 p = perf_pmu_events_list + i; 1442 free(p->symbol); 1443 } 1444 free(perf_pmu_events_list); 1445 perf_pmu_events_list = NULL; 1446 perf_pmu_events_list_num = 0; 1447 } 1448 } 1449 1450 #define SET_SYMBOL(str, stype) \ 1451 do { \ 1452 p->symbol = str; \ 1453 if (!p->symbol) \ 1454 goto err; \ 1455 p->type = stype; \ 1456 } while (0) 1457 1458 /* 1459 * Read the pmu events list from sysfs 1460 * Save it into perf_pmu_events_list 1461 */ 1462 static void perf_pmu__parse_init(void) 1463 { 1464 1465 struct perf_pmu *pmu = NULL; 1466 struct perf_pmu_alias *alias; 1467 int len = 0; 1468 1469 pmu = perf_pmu__find("cpu"); 1470 if ((pmu == NULL) || list_empty(&pmu->aliases)) { 1471 perf_pmu_events_list_num = -1; 1472 return; 1473 } 1474 list_for_each_entry(alias, &pmu->aliases, list) { 1475 if (strchr(alias->name, '-')) 1476 len++; 1477 len++; 1478 } 1479 perf_pmu_events_list = malloc(sizeof(struct perf_pmu_event_symbol) * len); 1480 if (!perf_pmu_events_list) 1481 return; 1482 perf_pmu_events_list_num = len; 1483 1484 len = 0; 1485 list_for_each_entry(alias, &pmu->aliases, list) { 1486 struct perf_pmu_event_symbol *p = perf_pmu_events_list + len; 1487 char *tmp = strchr(alias->name, '-'); 1488 1489 if (tmp != NULL) { 1490 SET_SYMBOL(strndup(alias->name, tmp - alias->name), 1491 PMU_EVENT_SYMBOL_PREFIX); 1492 p++; 1493 SET_SYMBOL(strdup(++tmp), PMU_EVENT_SYMBOL_SUFFIX); 1494 len += 2; 1495 } else { 1496 SET_SYMBOL(strdup(alias->name), PMU_EVENT_SYMBOL); 1497 len++; 1498 } 1499 } 1500 qsort(perf_pmu_events_list, len, 1501 sizeof(struct perf_pmu_event_symbol), comp_pmu); 1502 1503 return; 1504 err: 1505 perf_pmu__parse_cleanup(); 1506 } 1507 1508 enum perf_pmu_event_symbol_type 1509 perf_pmu__parse_check(const char *name) 1510 { 1511 struct perf_pmu_event_symbol p, *r; 1512 1513 /* scan kernel pmu events from sysfs if needed */ 1514 if (perf_pmu_events_list_num == 0) 1515 perf_pmu__parse_init(); 1516 /* 1517 * name "cpu" could be prefix of cpu-cycles or cpu// events. 1518 * cpu-cycles has been handled by hardcode. 1519 * So it must be cpu// events, not kernel pmu event. 1520 */ 1521 if ((perf_pmu_events_list_num <= 0) || !strcmp(name, "cpu")) 1522 return PMU_EVENT_SYMBOL_ERR; 1523 1524 p.symbol = strdup(name); 1525 r = bsearch(&p, perf_pmu_events_list, 1526 (size_t) perf_pmu_events_list_num, 1527 sizeof(struct perf_pmu_event_symbol), comp_pmu); 1528 free(p.symbol); 1529 return r ? r->type : PMU_EVENT_SYMBOL_ERR; 1530 } 1531 1532 static int parse_events__scanner(const char *str, void *data, int start_token) 1533 { 1534 YY_BUFFER_STATE buffer; 1535 void *scanner; 1536 int ret; 1537 1538 ret = parse_events_lex_init_extra(start_token, &scanner); 1539 if (ret) 1540 return ret; 1541 1542 buffer = parse_events__scan_string(str, scanner); 1543 1544 #ifdef PARSER_DEBUG 1545 parse_events_debug = 1; 1546 #endif 1547 ret = parse_events_parse(data, scanner); 1548 1549 parse_events__flush_buffer(buffer, scanner); 1550 parse_events__delete_buffer(buffer, scanner); 1551 parse_events_lex_destroy(scanner); 1552 return ret; 1553 } 1554 1555 /* 1556 * parse event config string, return a list of event terms. 1557 */ 1558 int parse_events_terms(struct list_head *terms, const char *str) 1559 { 1560 struct parse_events_terms data = { 1561 .terms = NULL, 1562 }; 1563 int ret; 1564 1565 ret = parse_events__scanner(str, &data, PE_START_TERMS); 1566 if (!ret) { 1567 list_splice(data.terms, terms); 1568 zfree(&data.terms); 1569 return 0; 1570 } 1571 1572 parse_events_terms__delete(data.terms); 1573 return ret; 1574 } 1575 1576 int parse_events(struct perf_evlist *evlist, const char *str, 1577 struct parse_events_error *err) 1578 { 1579 struct parse_events_evlist data = { 1580 .list = LIST_HEAD_INIT(data.list), 1581 .idx = evlist->nr_entries, 1582 .error = err, 1583 .evlist = evlist, 1584 }; 1585 int ret; 1586 1587 ret = parse_events__scanner(str, &data, PE_START_EVENTS); 1588 perf_pmu__parse_cleanup(); 1589 if (!ret) { 1590 struct perf_evsel *last; 1591 1592 if (list_empty(&data.list)) { 1593 WARN_ONCE(true, "WARNING: event parser found nothing"); 1594 return -1; 1595 } 1596 1597 perf_evlist__splice_list_tail(evlist, &data.list); 1598 evlist->nr_groups += data.nr_groups; 1599 last = perf_evlist__last(evlist); 1600 last->cmdline_group_boundary = true; 1601 1602 return 0; 1603 } 1604 1605 /* 1606 * There are 2 users - builtin-record and builtin-test objects. 1607 * Both call perf_evlist__delete in case of error, so we dont 1608 * need to bother. 1609 */ 1610 return ret; 1611 } 1612 1613 #define MAX_WIDTH 1000 1614 static int get_term_width(void) 1615 { 1616 struct winsize ws; 1617 1618 get_term_dimensions(&ws); 1619 return ws.ws_col > MAX_WIDTH ? MAX_WIDTH : ws.ws_col; 1620 } 1621 1622 static void parse_events_print_error(struct parse_events_error *err, 1623 const char *event) 1624 { 1625 const char *str = "invalid or unsupported event: "; 1626 char _buf[MAX_WIDTH]; 1627 char *buf = (char *) event; 1628 int idx = 0; 1629 1630 if (err->str) { 1631 /* -2 for extra '' in the final fprintf */ 1632 int width = get_term_width() - 2; 1633 int len_event = strlen(event); 1634 int len_str, max_len, cut = 0; 1635 1636 /* 1637 * Maximum error index indent, we will cut 1638 * the event string if it's bigger. 1639 */ 1640 int max_err_idx = 13; 1641 1642 /* 1643 * Let's be specific with the message when 1644 * we have the precise error. 1645 */ 1646 str = "event syntax error: "; 1647 len_str = strlen(str); 1648 max_len = width - len_str; 1649 1650 buf = _buf; 1651 1652 /* We're cutting from the beginning. */ 1653 if (err->idx > max_err_idx) 1654 cut = err->idx - max_err_idx; 1655 1656 strncpy(buf, event + cut, max_len); 1657 1658 /* Mark cut parts with '..' on both sides. */ 1659 if (cut) 1660 buf[0] = buf[1] = '.'; 1661 1662 if ((len_event - cut) > max_len) { 1663 buf[max_len - 1] = buf[max_len - 2] = '.'; 1664 buf[max_len] = 0; 1665 } 1666 1667 idx = len_str + err->idx - cut; 1668 } 1669 1670 fprintf(stderr, "%s'%s'\n", str, buf); 1671 if (idx) { 1672 fprintf(stderr, "%*s\\___ %s\n", idx + 1, "", err->str); 1673 if (err->help) 1674 fprintf(stderr, "\n%s\n", err->help); 1675 free(err->str); 1676 free(err->help); 1677 } 1678 1679 fprintf(stderr, "Run 'perf list' for a list of valid events\n"); 1680 } 1681 1682 #undef MAX_WIDTH 1683 1684 int parse_events_option(const struct option *opt, const char *str, 1685 int unset __maybe_unused) 1686 { 1687 struct perf_evlist *evlist = *(struct perf_evlist **)opt->value; 1688 struct parse_events_error err = { .idx = 0, }; 1689 int ret = parse_events(evlist, str, &err); 1690 1691 if (ret) 1692 parse_events_print_error(&err, str); 1693 1694 return ret; 1695 } 1696 1697 static int 1698 foreach_evsel_in_last_glob(struct perf_evlist *evlist, 1699 int (*func)(struct perf_evsel *evsel, 1700 const void *arg), 1701 const void *arg) 1702 { 1703 struct perf_evsel *last = NULL; 1704 int err; 1705 1706 /* 1707 * Don't return when list_empty, give func a chance to report 1708 * error when it found last == NULL. 1709 * 1710 * So no need to WARN here, let *func do this. 1711 */ 1712 if (evlist->nr_entries > 0) 1713 last = perf_evlist__last(evlist); 1714 1715 do { 1716 err = (*func)(last, arg); 1717 if (err) 1718 return -1; 1719 if (!last) 1720 return 0; 1721 1722 if (last->node.prev == &evlist->entries) 1723 return 0; 1724 last = list_entry(last->node.prev, struct perf_evsel, node); 1725 } while (!last->cmdline_group_boundary); 1726 1727 return 0; 1728 } 1729 1730 static int set_filter(struct perf_evsel *evsel, const void *arg) 1731 { 1732 const char *str = arg; 1733 1734 if (evsel == NULL || evsel->attr.type != PERF_TYPE_TRACEPOINT) { 1735 fprintf(stderr, 1736 "--filter option should follow a -e tracepoint option\n"); 1737 return -1; 1738 } 1739 1740 if (perf_evsel__append_filter(evsel, "&&", str) < 0) { 1741 fprintf(stderr, 1742 "not enough memory to hold filter string\n"); 1743 return -1; 1744 } 1745 1746 return 0; 1747 } 1748 1749 int parse_filter(const struct option *opt, const char *str, 1750 int unset __maybe_unused) 1751 { 1752 struct perf_evlist *evlist = *(struct perf_evlist **)opt->value; 1753 1754 return foreach_evsel_in_last_glob(evlist, set_filter, 1755 (const void *)str); 1756 } 1757 1758 static int add_exclude_perf_filter(struct perf_evsel *evsel, 1759 const void *arg __maybe_unused) 1760 { 1761 char new_filter[64]; 1762 1763 if (evsel == NULL || evsel->attr.type != PERF_TYPE_TRACEPOINT) { 1764 fprintf(stderr, 1765 "--exclude-perf option should follow a -e tracepoint option\n"); 1766 return -1; 1767 } 1768 1769 snprintf(new_filter, sizeof(new_filter), "common_pid != %d", getpid()); 1770 1771 if (perf_evsel__append_filter(evsel, "&&", new_filter) < 0) { 1772 fprintf(stderr, 1773 "not enough memory to hold filter string\n"); 1774 return -1; 1775 } 1776 1777 return 0; 1778 } 1779 1780 int exclude_perf(const struct option *opt, 1781 const char *arg __maybe_unused, 1782 int unset __maybe_unused) 1783 { 1784 struct perf_evlist *evlist = *(struct perf_evlist **)opt->value; 1785 1786 return foreach_evsel_in_last_glob(evlist, add_exclude_perf_filter, 1787 NULL); 1788 } 1789 1790 static const char * const event_type_descriptors[] = { 1791 "Hardware event", 1792 "Software event", 1793 "Tracepoint event", 1794 "Hardware cache event", 1795 "Raw hardware event descriptor", 1796 "Hardware breakpoint", 1797 }; 1798 1799 static int cmp_string(const void *a, const void *b) 1800 { 1801 const char * const *as = a; 1802 const char * const *bs = b; 1803 1804 return strcmp(*as, *bs); 1805 } 1806 1807 /* 1808 * Print the events from <debugfs_mount_point>/tracing/events 1809 */ 1810 1811 void print_tracepoint_events(const char *subsys_glob, const char *event_glob, 1812 bool name_only) 1813 { 1814 DIR *sys_dir, *evt_dir; 1815 struct dirent *sys_dirent, *evt_dirent; 1816 char evt_path[MAXPATHLEN]; 1817 char dir_path[MAXPATHLEN]; 1818 char **evt_list = NULL; 1819 unsigned int evt_i = 0, evt_num = 0; 1820 bool evt_num_known = false; 1821 1822 restart: 1823 sys_dir = opendir(tracing_events_path); 1824 if (!sys_dir) 1825 return; 1826 1827 if (evt_num_known) { 1828 evt_list = zalloc(sizeof(char *) * evt_num); 1829 if (!evt_list) 1830 goto out_close_sys_dir; 1831 } 1832 1833 for_each_subsystem(sys_dir, sys_dirent) { 1834 if (subsys_glob != NULL && 1835 !strglobmatch(sys_dirent->d_name, subsys_glob)) 1836 continue; 1837 1838 snprintf(dir_path, MAXPATHLEN, "%s/%s", tracing_events_path, 1839 sys_dirent->d_name); 1840 evt_dir = opendir(dir_path); 1841 if (!evt_dir) 1842 continue; 1843 1844 for_each_event(sys_dirent, evt_dir, evt_dirent) { 1845 if (event_glob != NULL && 1846 !strglobmatch(evt_dirent->d_name, event_glob)) 1847 continue; 1848 1849 if (!evt_num_known) { 1850 evt_num++; 1851 continue; 1852 } 1853 1854 snprintf(evt_path, MAXPATHLEN, "%s:%s", 1855 sys_dirent->d_name, evt_dirent->d_name); 1856 1857 evt_list[evt_i] = strdup(evt_path); 1858 if (evt_list[evt_i] == NULL) 1859 goto out_close_evt_dir; 1860 evt_i++; 1861 } 1862 closedir(evt_dir); 1863 } 1864 closedir(sys_dir); 1865 1866 if (!evt_num_known) { 1867 evt_num_known = true; 1868 goto restart; 1869 } 1870 qsort(evt_list, evt_num, sizeof(char *), cmp_string); 1871 evt_i = 0; 1872 while (evt_i < evt_num) { 1873 if (name_only) { 1874 printf("%s ", evt_list[evt_i++]); 1875 continue; 1876 } 1877 printf(" %-50s [%s]\n", evt_list[evt_i++], 1878 event_type_descriptors[PERF_TYPE_TRACEPOINT]); 1879 } 1880 if (evt_num && pager_in_use()) 1881 printf("\n"); 1882 1883 out_free: 1884 evt_num = evt_i; 1885 for (evt_i = 0; evt_i < evt_num; evt_i++) 1886 zfree(&evt_list[evt_i]); 1887 zfree(&evt_list); 1888 return; 1889 1890 out_close_evt_dir: 1891 closedir(evt_dir); 1892 out_close_sys_dir: 1893 closedir(sys_dir); 1894 1895 printf("FATAL: not enough memory to print %s\n", 1896 event_type_descriptors[PERF_TYPE_TRACEPOINT]); 1897 if (evt_list) 1898 goto out_free; 1899 } 1900 1901 /* 1902 * Check whether event is in <debugfs_mount_point>/tracing/events 1903 */ 1904 1905 int is_valid_tracepoint(const char *event_string) 1906 { 1907 DIR *sys_dir, *evt_dir; 1908 struct dirent *sys_dirent, *evt_dirent; 1909 char evt_path[MAXPATHLEN]; 1910 char dir_path[MAXPATHLEN]; 1911 1912 sys_dir = opendir(tracing_events_path); 1913 if (!sys_dir) 1914 return 0; 1915 1916 for_each_subsystem(sys_dir, sys_dirent) { 1917 1918 snprintf(dir_path, MAXPATHLEN, "%s/%s", tracing_events_path, 1919 sys_dirent->d_name); 1920 evt_dir = opendir(dir_path); 1921 if (!evt_dir) 1922 continue; 1923 1924 for_each_event(sys_dirent, evt_dir, evt_dirent) { 1925 snprintf(evt_path, MAXPATHLEN, "%s:%s", 1926 sys_dirent->d_name, evt_dirent->d_name); 1927 if (!strcmp(evt_path, event_string)) { 1928 closedir(evt_dir); 1929 closedir(sys_dir); 1930 return 1; 1931 } 1932 } 1933 closedir(evt_dir); 1934 } 1935 closedir(sys_dir); 1936 return 0; 1937 } 1938 1939 static bool is_event_supported(u8 type, unsigned config) 1940 { 1941 bool ret = true; 1942 int open_return; 1943 struct perf_evsel *evsel; 1944 struct perf_event_attr attr = { 1945 .type = type, 1946 .config = config, 1947 .disabled = 1, 1948 }; 1949 struct { 1950 struct thread_map map; 1951 int threads[1]; 1952 } tmap = { 1953 .map.nr = 1, 1954 .threads = { 0 }, 1955 }; 1956 1957 evsel = perf_evsel__new(&attr); 1958 if (evsel) { 1959 open_return = perf_evsel__open(evsel, NULL, &tmap.map); 1960 ret = open_return >= 0; 1961 1962 if (open_return == -EACCES) { 1963 /* 1964 * This happens if the paranoid value 1965 * /proc/sys/kernel/perf_event_paranoid is set to 2 1966 * Re-run with exclude_kernel set; we don't do that 1967 * by default as some ARM machines do not support it. 1968 * 1969 */ 1970 evsel->attr.exclude_kernel = 1; 1971 ret = perf_evsel__open(evsel, NULL, &tmap.map) >= 0; 1972 } 1973 perf_evsel__delete(evsel); 1974 } 1975 1976 return ret; 1977 } 1978 1979 int print_hwcache_events(const char *event_glob, bool name_only) 1980 { 1981 unsigned int type, op, i, evt_i = 0, evt_num = 0; 1982 char name[64]; 1983 char **evt_list = NULL; 1984 bool evt_num_known = false; 1985 1986 restart: 1987 if (evt_num_known) { 1988 evt_list = zalloc(sizeof(char *) * evt_num); 1989 if (!evt_list) 1990 goto out_enomem; 1991 } 1992 1993 for (type = 0; type < PERF_COUNT_HW_CACHE_MAX; type++) { 1994 for (op = 0; op < PERF_COUNT_HW_CACHE_OP_MAX; op++) { 1995 /* skip invalid cache type */ 1996 if (!perf_evsel__is_cache_op_valid(type, op)) 1997 continue; 1998 1999 for (i = 0; i < PERF_COUNT_HW_CACHE_RESULT_MAX; i++) { 2000 __perf_evsel__hw_cache_type_op_res_name(type, op, i, 2001 name, sizeof(name)); 2002 if (event_glob != NULL && !strglobmatch(name, event_glob)) 2003 continue; 2004 2005 if (!is_event_supported(PERF_TYPE_HW_CACHE, 2006 type | (op << 8) | (i << 16))) 2007 continue; 2008 2009 if (!evt_num_known) { 2010 evt_num++; 2011 continue; 2012 } 2013 2014 evt_list[evt_i] = strdup(name); 2015 if (evt_list[evt_i] == NULL) 2016 goto out_enomem; 2017 evt_i++; 2018 } 2019 } 2020 } 2021 2022 if (!evt_num_known) { 2023 evt_num_known = true; 2024 goto restart; 2025 } 2026 qsort(evt_list, evt_num, sizeof(char *), cmp_string); 2027 evt_i = 0; 2028 while (evt_i < evt_num) { 2029 if (name_only) { 2030 printf("%s ", evt_list[evt_i++]); 2031 continue; 2032 } 2033 printf(" %-50s [%s]\n", evt_list[evt_i++], 2034 event_type_descriptors[PERF_TYPE_HW_CACHE]); 2035 } 2036 if (evt_num && pager_in_use()) 2037 printf("\n"); 2038 2039 out_free: 2040 evt_num = evt_i; 2041 for (evt_i = 0; evt_i < evt_num; evt_i++) 2042 zfree(&evt_list[evt_i]); 2043 zfree(&evt_list); 2044 return evt_num; 2045 2046 out_enomem: 2047 printf("FATAL: not enough memory to print %s\n", event_type_descriptors[PERF_TYPE_HW_CACHE]); 2048 if (evt_list) 2049 goto out_free; 2050 return evt_num; 2051 } 2052 2053 void print_symbol_events(const char *event_glob, unsigned type, 2054 struct event_symbol *syms, unsigned max, 2055 bool name_only) 2056 { 2057 unsigned int i, evt_i = 0, evt_num = 0; 2058 char name[MAX_NAME_LEN]; 2059 char **evt_list = NULL; 2060 bool evt_num_known = false; 2061 2062 restart: 2063 if (evt_num_known) { 2064 evt_list = zalloc(sizeof(char *) * evt_num); 2065 if (!evt_list) 2066 goto out_enomem; 2067 syms -= max; 2068 } 2069 2070 for (i = 0; i < max; i++, syms++) { 2071 2072 if (event_glob != NULL && syms->symbol != NULL && 2073 !(strglobmatch(syms->symbol, event_glob) || 2074 (syms->alias && strglobmatch(syms->alias, event_glob)))) 2075 continue; 2076 2077 if (!is_event_supported(type, i)) 2078 continue; 2079 2080 if (!evt_num_known) { 2081 evt_num++; 2082 continue; 2083 } 2084 2085 if (!name_only && strlen(syms->alias)) 2086 snprintf(name, MAX_NAME_LEN, "%s OR %s", syms->symbol, syms->alias); 2087 else 2088 strncpy(name, syms->symbol, MAX_NAME_LEN); 2089 2090 evt_list[evt_i] = strdup(name); 2091 if (evt_list[evt_i] == NULL) 2092 goto out_enomem; 2093 evt_i++; 2094 } 2095 2096 if (!evt_num_known) { 2097 evt_num_known = true; 2098 goto restart; 2099 } 2100 qsort(evt_list, evt_num, sizeof(char *), cmp_string); 2101 evt_i = 0; 2102 while (evt_i < evt_num) { 2103 if (name_only) { 2104 printf("%s ", evt_list[evt_i++]); 2105 continue; 2106 } 2107 printf(" %-50s [%s]\n", evt_list[evt_i++], event_type_descriptors[type]); 2108 } 2109 if (evt_num && pager_in_use()) 2110 printf("\n"); 2111 2112 out_free: 2113 evt_num = evt_i; 2114 for (evt_i = 0; evt_i < evt_num; evt_i++) 2115 zfree(&evt_list[evt_i]); 2116 zfree(&evt_list); 2117 return; 2118 2119 out_enomem: 2120 printf("FATAL: not enough memory to print %s\n", event_type_descriptors[type]); 2121 if (evt_list) 2122 goto out_free; 2123 } 2124 2125 /* 2126 * Print the help text for the event symbols: 2127 */ 2128 void print_events(const char *event_glob, bool name_only) 2129 { 2130 print_symbol_events(event_glob, PERF_TYPE_HARDWARE, 2131 event_symbols_hw, PERF_COUNT_HW_MAX, name_only); 2132 2133 print_symbol_events(event_glob, PERF_TYPE_SOFTWARE, 2134 event_symbols_sw, PERF_COUNT_SW_MAX, name_only); 2135 2136 print_hwcache_events(event_glob, name_only); 2137 2138 print_pmu_events(event_glob, name_only); 2139 2140 if (event_glob != NULL) 2141 return; 2142 2143 if (!name_only) { 2144 printf(" %-50s [%s]\n", 2145 "rNNN", 2146 event_type_descriptors[PERF_TYPE_RAW]); 2147 printf(" %-50s [%s]\n", 2148 "cpu/t1=v1[,t2=v2,t3 ...]/modifier", 2149 event_type_descriptors[PERF_TYPE_RAW]); 2150 if (pager_in_use()) 2151 printf(" (see 'man perf-list' on how to encode it)\n\n"); 2152 2153 printf(" %-50s [%s]\n", 2154 "mem:<addr>[/len][:access]", 2155 event_type_descriptors[PERF_TYPE_BREAKPOINT]); 2156 if (pager_in_use()) 2157 printf("\n"); 2158 } 2159 2160 print_tracepoint_events(NULL, NULL, name_only); 2161 } 2162 2163 int parse_events__is_hardcoded_term(struct parse_events_term *term) 2164 { 2165 return term->type_term != PARSE_EVENTS__TERM_TYPE_USER; 2166 } 2167 2168 static int new_term(struct parse_events_term **_term, int type_val, 2169 int type_term, char *config, 2170 char *str, u64 num, int err_term, int err_val) 2171 { 2172 struct parse_events_term *term; 2173 2174 term = zalloc(sizeof(*term)); 2175 if (!term) 2176 return -ENOMEM; 2177 2178 INIT_LIST_HEAD(&term->list); 2179 term->type_val = type_val; 2180 term->type_term = type_term; 2181 term->config = config; 2182 term->err_term = err_term; 2183 term->err_val = err_val; 2184 2185 switch (type_val) { 2186 case PARSE_EVENTS__TERM_TYPE_NUM: 2187 term->val.num = num; 2188 break; 2189 case PARSE_EVENTS__TERM_TYPE_STR: 2190 term->val.str = str; 2191 break; 2192 default: 2193 free(term); 2194 return -EINVAL; 2195 } 2196 2197 *_term = term; 2198 return 0; 2199 } 2200 2201 int parse_events_term__num(struct parse_events_term **term, 2202 int type_term, char *config, u64 num, 2203 void *loc_term_, void *loc_val_) 2204 { 2205 YYLTYPE *loc_term = loc_term_; 2206 YYLTYPE *loc_val = loc_val_; 2207 2208 return new_term(term, PARSE_EVENTS__TERM_TYPE_NUM, type_term, 2209 config, NULL, num, 2210 loc_term ? loc_term->first_column : 0, 2211 loc_val ? loc_val->first_column : 0); 2212 } 2213 2214 int parse_events_term__str(struct parse_events_term **term, 2215 int type_term, char *config, char *str, 2216 void *loc_term_, void *loc_val_) 2217 { 2218 YYLTYPE *loc_term = loc_term_; 2219 YYLTYPE *loc_val = loc_val_; 2220 2221 return new_term(term, PARSE_EVENTS__TERM_TYPE_STR, type_term, 2222 config, str, 0, 2223 loc_term ? loc_term->first_column : 0, 2224 loc_val ? loc_val->first_column : 0); 2225 } 2226 2227 int parse_events_term__sym_hw(struct parse_events_term **term, 2228 char *config, unsigned idx) 2229 { 2230 struct event_symbol *sym; 2231 2232 BUG_ON(idx >= PERF_COUNT_HW_MAX); 2233 sym = &event_symbols_hw[idx]; 2234 2235 if (config) 2236 return new_term(term, PARSE_EVENTS__TERM_TYPE_STR, 2237 PARSE_EVENTS__TERM_TYPE_USER, config, 2238 (char *) sym->symbol, 0, 0, 0); 2239 else 2240 return new_term(term, PARSE_EVENTS__TERM_TYPE_STR, 2241 PARSE_EVENTS__TERM_TYPE_USER, 2242 (char *) "event", (char *) sym->symbol, 2243 0, 0, 0); 2244 } 2245 2246 int parse_events_term__clone(struct parse_events_term **new, 2247 struct parse_events_term *term) 2248 { 2249 return new_term(new, term->type_val, term->type_term, term->config, 2250 term->val.str, term->val.num, 2251 term->err_term, term->err_val); 2252 } 2253 2254 void parse_events_terms__purge(struct list_head *terms) 2255 { 2256 struct parse_events_term *term, *h; 2257 2258 list_for_each_entry_safe(term, h, terms, list) { 2259 if (term->array.nr_ranges) 2260 free(term->array.ranges); 2261 list_del_init(&term->list); 2262 free(term); 2263 } 2264 } 2265 2266 void parse_events_terms__delete(struct list_head *terms) 2267 { 2268 if (!terms) 2269 return; 2270 parse_events_terms__purge(terms); 2271 free(terms); 2272 } 2273 2274 void parse_events__clear_array(struct parse_events_array *a) 2275 { 2276 free(a->ranges); 2277 } 2278 2279 void parse_events_evlist_error(struct parse_events_evlist *data, 2280 int idx, const char *str) 2281 { 2282 struct parse_events_error *err = data->error; 2283 2284 if (!err) 2285 return; 2286 err->idx = idx; 2287 err->str = strdup(str); 2288 WARN_ONCE(!err->str, "WARNING: failed to allocate error string"); 2289 } 2290 2291 static void config_terms_list(char *buf, size_t buf_sz) 2292 { 2293 int i; 2294 bool first = true; 2295 2296 buf[0] = '\0'; 2297 for (i = 0; i < __PARSE_EVENTS__TERM_TYPE_NR; i++) { 2298 const char *name = config_term_names[i]; 2299 2300 if (!config_term_avail(i, NULL)) 2301 continue; 2302 if (!name) 2303 continue; 2304 if (name[0] == '<') 2305 continue; 2306 2307 if (strlen(buf) + strlen(name) + 2 >= buf_sz) 2308 return; 2309 2310 if (!first) 2311 strcat(buf, ","); 2312 else 2313 first = false; 2314 strcat(buf, name); 2315 } 2316 } 2317 2318 /* 2319 * Return string contains valid config terms of an event. 2320 * @additional_terms: For terms such as PMU sysfs terms. 2321 */ 2322 char *parse_events_formats_error_string(char *additional_terms) 2323 { 2324 char *str; 2325 /* "branch_type" is the longest name */ 2326 char static_terms[__PARSE_EVENTS__TERM_TYPE_NR * 2327 (sizeof("branch_type") - 1)]; 2328 2329 config_terms_list(static_terms, sizeof(static_terms)); 2330 /* valid terms */ 2331 if (additional_terms) { 2332 if (asprintf(&str, "valid terms: %s,%s", 2333 additional_terms, static_terms) < 0) 2334 goto fail; 2335 } else { 2336 if (asprintf(&str, "valid terms: %s", static_terms) < 0) 2337 goto fail; 2338 } 2339 return str; 2340 2341 fail: 2342 return NULL; 2343 } 2344