1 %pure-parser 2 %parse-param {void *_parse_state} 3 %parse-param {void *scanner} 4 %lex-param {void* scanner} 5 %locations 6 7 %{ 8 9 #define YYDEBUG 1 10 11 #include <fnmatch.h> 12 #include <linux/compiler.h> 13 #include <linux/list.h> 14 #include <linux/types.h> 15 #include "util.h" 16 #include "pmu.h" 17 #include "debug.h" 18 #include "parse-events.h" 19 #include "parse-events-bison.h" 20 21 void parse_events_error(YYLTYPE *loc, void *parse_state, void *scanner, char const *msg); 22 23 #define ABORT_ON(val) \ 24 do { \ 25 if (val) \ 26 YYABORT; \ 27 } while (0) 28 29 #define ALLOC_LIST(list) \ 30 do { \ 31 list = malloc(sizeof(*list)); \ 32 ABORT_ON(!list); \ 33 INIT_LIST_HEAD(list); \ 34 } while (0) 35 36 static void inc_group_count(struct list_head *list, 37 struct parse_events_state *parse_state) 38 { 39 /* Count groups only have more than 1 members */ 40 if (!list_is_last(list->next, list)) 41 parse_state->nr_groups++; 42 } 43 44 %} 45 46 %token PE_START_EVENTS PE_START_TERMS 47 %token PE_VALUE PE_VALUE_SYM_HW PE_VALUE_SYM_SW PE_RAW PE_TERM 48 %token PE_EVENT_NAME 49 %token PE_NAME 50 %token PE_BPF_OBJECT PE_BPF_SOURCE 51 %token PE_MODIFIER_EVENT PE_MODIFIER_BP 52 %token PE_NAME_CACHE_TYPE PE_NAME_CACHE_OP_RESULT 53 %token PE_PREFIX_MEM PE_PREFIX_RAW PE_PREFIX_GROUP 54 %token PE_ERROR 55 %token PE_PMU_EVENT_PRE PE_PMU_EVENT_SUF PE_KERNEL_PMU_EVENT 56 %token PE_ARRAY_ALL PE_ARRAY_RANGE 57 %token PE_DRV_CFG_TERM 58 %type <num> PE_VALUE 59 %type <num> PE_VALUE_SYM_HW 60 %type <num> PE_VALUE_SYM_SW 61 %type <num> PE_RAW 62 %type <num> PE_TERM 63 %type <str> PE_NAME 64 %type <str> PE_BPF_OBJECT 65 %type <str> PE_BPF_SOURCE 66 %type <str> PE_NAME_CACHE_TYPE 67 %type <str> PE_NAME_CACHE_OP_RESULT 68 %type <str> PE_MODIFIER_EVENT 69 %type <str> PE_MODIFIER_BP 70 %type <str> PE_EVENT_NAME 71 %type <str> PE_PMU_EVENT_PRE PE_PMU_EVENT_SUF PE_KERNEL_PMU_EVENT 72 %type <str> PE_DRV_CFG_TERM 73 %type <num> value_sym 74 %type <head> event_config 75 %type <head> opt_event_config 76 %type <head> opt_pmu_config 77 %type <term> event_term 78 %type <head> event_pmu 79 %type <head> event_legacy_symbol 80 %type <head> event_legacy_cache 81 %type <head> event_legacy_mem 82 %type <head> event_legacy_tracepoint 83 %type <tracepoint_name> tracepoint_name 84 %type <head> event_legacy_numeric 85 %type <head> event_legacy_raw 86 %type <head> event_bpf_file 87 %type <head> event_def 88 %type <head> event_mod 89 %type <head> event_name 90 %type <head> event 91 %type <head> events 92 %type <head> group_def 93 %type <head> group 94 %type <head> groups 95 %type <array> array 96 %type <array> array_term 97 %type <array> array_terms 98 99 %union 100 { 101 char *str; 102 u64 num; 103 struct list_head *head; 104 struct parse_events_term *term; 105 struct tracepoint_name { 106 char *sys; 107 char *event; 108 } tracepoint_name; 109 struct parse_events_array array; 110 } 111 %% 112 113 start: 114 PE_START_EVENTS start_events 115 | 116 PE_START_TERMS start_terms 117 118 start_events: groups 119 { 120 struct parse_events_state *parse_state = _parse_state; 121 122 parse_events_update_lists($1, &parse_state->list); 123 } 124 125 groups: 126 groups ',' group 127 { 128 struct list_head *list = $1; 129 struct list_head *group = $3; 130 131 parse_events_update_lists(group, list); 132 $$ = list; 133 } 134 | 135 groups ',' event 136 { 137 struct list_head *list = $1; 138 struct list_head *event = $3; 139 140 parse_events_update_lists(event, list); 141 $$ = list; 142 } 143 | 144 group 145 | 146 event 147 148 group: 149 group_def ':' PE_MODIFIER_EVENT 150 { 151 struct list_head *list = $1; 152 153 ABORT_ON(parse_events__modifier_group(list, $3)); 154 $$ = list; 155 } 156 | 157 group_def 158 159 group_def: 160 PE_NAME '{' events '}' 161 { 162 struct list_head *list = $3; 163 164 inc_group_count(list, _parse_state); 165 parse_events__set_leader($1, list, _parse_state); 166 $$ = list; 167 } 168 | 169 '{' events '}' 170 { 171 struct list_head *list = $2; 172 173 inc_group_count(list, _parse_state); 174 parse_events__set_leader(NULL, list, _parse_state); 175 $$ = list; 176 } 177 178 events: 179 events ',' event 180 { 181 struct list_head *event = $3; 182 struct list_head *list = $1; 183 184 parse_events_update_lists(event, list); 185 $$ = list; 186 } 187 | 188 event 189 190 event: event_mod 191 192 event_mod: 193 event_name PE_MODIFIER_EVENT 194 { 195 struct list_head *list = $1; 196 197 /* 198 * Apply modifier on all events added by single event definition 199 * (there could be more events added for multiple tracepoint 200 * definitions via '*?'. 201 */ 202 ABORT_ON(parse_events__modifier_event(list, $2, false)); 203 $$ = list; 204 } 205 | 206 event_name 207 208 event_name: 209 PE_EVENT_NAME event_def 210 { 211 ABORT_ON(parse_events_name($2, $1)); 212 free($1); 213 $$ = $2; 214 } 215 | 216 event_def 217 218 event_def: event_pmu | 219 event_legacy_symbol | 220 event_legacy_cache sep_dc | 221 event_legacy_mem | 222 event_legacy_tracepoint sep_dc | 223 event_legacy_numeric sep_dc | 224 event_legacy_raw sep_dc | 225 event_bpf_file 226 227 event_pmu: 228 PE_NAME opt_pmu_config 229 { 230 struct list_head *list, *orig_terms, *terms; 231 232 if (parse_events_copy_term_list($2, &orig_terms)) 233 YYABORT; 234 235 ALLOC_LIST(list); 236 if (parse_events_add_pmu(_parse_state, list, $1, $2, false, false)) { 237 struct perf_pmu *pmu = NULL; 238 int ok = 0; 239 char *pattern; 240 241 if (asprintf(&pattern, "%s*", $1) < 0) 242 YYABORT; 243 244 while ((pmu = perf_pmu__scan(pmu)) != NULL) { 245 char *name = pmu->name; 246 247 if (!strncmp(name, "uncore_", 7) && 248 strncmp($1, "uncore_", 7)) 249 name += 7; 250 if (!fnmatch(pattern, name, 0)) { 251 if (parse_events_copy_term_list(orig_terms, &terms)) { 252 free(pattern); 253 YYABORT; 254 } 255 if (!parse_events_add_pmu(_parse_state, list, pmu->name, terms, true, false)) 256 ok++; 257 parse_events_terms__delete(terms); 258 } 259 } 260 261 free(pattern); 262 263 if (!ok) 264 YYABORT; 265 } 266 parse_events_terms__delete($2); 267 parse_events_terms__delete(orig_terms); 268 $$ = list; 269 } 270 | 271 PE_KERNEL_PMU_EVENT sep_dc 272 { 273 struct list_head *list; 274 275 if (parse_events_multi_pmu_add(_parse_state, $1, &list) < 0) 276 YYABORT; 277 $$ = list; 278 } 279 | 280 PE_PMU_EVENT_PRE '-' PE_PMU_EVENT_SUF sep_dc 281 { 282 struct list_head *list; 283 char pmu_name[128]; 284 285 snprintf(&pmu_name, 128, "%s-%s", $1, $3); 286 if (parse_events_multi_pmu_add(_parse_state, pmu_name, &list) < 0) 287 YYABORT; 288 $$ = list; 289 } 290 291 value_sym: 292 PE_VALUE_SYM_HW 293 | 294 PE_VALUE_SYM_SW 295 296 event_legacy_symbol: 297 value_sym '/' event_config '/' 298 { 299 struct list_head *list; 300 int type = $1 >> 16; 301 int config = $1 & 255; 302 303 ALLOC_LIST(list); 304 ABORT_ON(parse_events_add_numeric(_parse_state, list, type, config, $3)); 305 parse_events_terms__delete($3); 306 $$ = list; 307 } 308 | 309 value_sym sep_slash_dc 310 { 311 struct list_head *list; 312 int type = $1 >> 16; 313 int config = $1 & 255; 314 315 ALLOC_LIST(list); 316 ABORT_ON(parse_events_add_numeric(_parse_state, list, type, config, NULL)); 317 $$ = list; 318 } 319 320 event_legacy_cache: 321 PE_NAME_CACHE_TYPE '-' PE_NAME_CACHE_OP_RESULT '-' PE_NAME_CACHE_OP_RESULT opt_event_config 322 { 323 struct parse_events_state *parse_state = _parse_state; 324 struct parse_events_error *error = parse_state->error; 325 struct list_head *list; 326 327 ALLOC_LIST(list); 328 ABORT_ON(parse_events_add_cache(list, &parse_state->idx, $1, $3, $5, error, $6)); 329 parse_events_terms__delete($6); 330 $$ = list; 331 } 332 | 333 PE_NAME_CACHE_TYPE '-' PE_NAME_CACHE_OP_RESULT opt_event_config 334 { 335 struct parse_events_state *parse_state = _parse_state; 336 struct parse_events_error *error = parse_state->error; 337 struct list_head *list; 338 339 ALLOC_LIST(list); 340 ABORT_ON(parse_events_add_cache(list, &parse_state->idx, $1, $3, NULL, error, $4)); 341 parse_events_terms__delete($4); 342 $$ = list; 343 } 344 | 345 PE_NAME_CACHE_TYPE opt_event_config 346 { 347 struct parse_events_state *parse_state = _parse_state; 348 struct parse_events_error *error = parse_state->error; 349 struct list_head *list; 350 351 ALLOC_LIST(list); 352 ABORT_ON(parse_events_add_cache(list, &parse_state->idx, $1, NULL, NULL, error, $2)); 353 parse_events_terms__delete($2); 354 $$ = list; 355 } 356 357 event_legacy_mem: 358 PE_PREFIX_MEM PE_VALUE '/' PE_VALUE ':' PE_MODIFIER_BP sep_dc 359 { 360 struct parse_events_state *parse_state = _parse_state; 361 struct list_head *list; 362 363 ALLOC_LIST(list); 364 ABORT_ON(parse_events_add_breakpoint(list, &parse_state->idx, 365 (void *) $2, $6, $4)); 366 $$ = list; 367 } 368 | 369 PE_PREFIX_MEM PE_VALUE '/' PE_VALUE sep_dc 370 { 371 struct parse_events_state *parse_state = _parse_state; 372 struct list_head *list; 373 374 ALLOC_LIST(list); 375 ABORT_ON(parse_events_add_breakpoint(list, &parse_state->idx, 376 (void *) $2, NULL, $4)); 377 $$ = list; 378 } 379 | 380 PE_PREFIX_MEM PE_VALUE ':' PE_MODIFIER_BP sep_dc 381 { 382 struct parse_events_state *parse_state = _parse_state; 383 struct list_head *list; 384 385 ALLOC_LIST(list); 386 ABORT_ON(parse_events_add_breakpoint(list, &parse_state->idx, 387 (void *) $2, $4, 0)); 388 $$ = list; 389 } 390 | 391 PE_PREFIX_MEM PE_VALUE sep_dc 392 { 393 struct parse_events_state *parse_state = _parse_state; 394 struct list_head *list; 395 396 ALLOC_LIST(list); 397 ABORT_ON(parse_events_add_breakpoint(list, &parse_state->idx, 398 (void *) $2, NULL, 0)); 399 $$ = list; 400 } 401 402 event_legacy_tracepoint: 403 tracepoint_name opt_event_config 404 { 405 struct parse_events_state *parse_state = _parse_state; 406 struct parse_events_error *error = parse_state->error; 407 struct list_head *list; 408 409 ALLOC_LIST(list); 410 if (error) 411 error->idx = @1.first_column; 412 413 if (parse_events_add_tracepoint(list, &parse_state->idx, $1.sys, $1.event, 414 error, $2)) 415 return -1; 416 417 $$ = list; 418 } 419 420 tracepoint_name: 421 PE_NAME '-' PE_NAME ':' PE_NAME 422 { 423 char sys_name[128]; 424 struct tracepoint_name tracepoint; 425 426 snprintf(&sys_name, 128, "%s-%s", $1, $3); 427 tracepoint.sys = &sys_name; 428 tracepoint.event = $5; 429 430 $$ = tracepoint; 431 } 432 | 433 PE_NAME ':' PE_NAME 434 { 435 struct tracepoint_name tracepoint = {$1, $3}; 436 437 $$ = tracepoint; 438 } 439 440 event_legacy_numeric: 441 PE_VALUE ':' PE_VALUE opt_event_config 442 { 443 struct list_head *list; 444 445 ALLOC_LIST(list); 446 ABORT_ON(parse_events_add_numeric(_parse_state, list, (u32)$1, $3, $4)); 447 parse_events_terms__delete($4); 448 $$ = list; 449 } 450 451 event_legacy_raw: 452 PE_RAW opt_event_config 453 { 454 struct list_head *list; 455 456 ALLOC_LIST(list); 457 ABORT_ON(parse_events_add_numeric(_parse_state, list, PERF_TYPE_RAW, $1, $2)); 458 parse_events_terms__delete($2); 459 $$ = list; 460 } 461 462 event_bpf_file: 463 PE_BPF_OBJECT opt_event_config 464 { 465 struct parse_events_state *parse_state = _parse_state; 466 struct parse_events_error *error = parse_state->error; 467 struct list_head *list; 468 469 ALLOC_LIST(list); 470 ABORT_ON(parse_events_load_bpf(parse_state, list, $1, false, $2)); 471 parse_events_terms__delete($2); 472 $$ = list; 473 } 474 | 475 PE_BPF_SOURCE opt_event_config 476 { 477 struct list_head *list; 478 479 ALLOC_LIST(list); 480 ABORT_ON(parse_events_load_bpf(_parse_state, list, $1, true, $2)); 481 parse_events_terms__delete($2); 482 $$ = list; 483 } 484 485 opt_event_config: 486 '/' event_config '/' 487 { 488 $$ = $2; 489 } 490 | 491 '/' '/' 492 { 493 $$ = NULL; 494 } 495 | 496 { 497 $$ = NULL; 498 } 499 500 opt_pmu_config: 501 '/' event_config '/' 502 { 503 $$ = $2; 504 } 505 | 506 '/' '/' 507 { 508 $$ = NULL; 509 } 510 511 start_terms: event_config 512 { 513 struct parse_events_state *parse_state = _parse_state; 514 parse_state->terms = $1; 515 } 516 517 event_config: 518 event_config ',' event_term 519 { 520 struct list_head *head = $1; 521 struct parse_events_term *term = $3; 522 523 ABORT_ON(!head); 524 list_add_tail(&term->list, head); 525 $$ = $1; 526 } 527 | 528 event_term 529 { 530 struct list_head *head = malloc(sizeof(*head)); 531 struct parse_events_term *term = $1; 532 533 ABORT_ON(!head); 534 INIT_LIST_HEAD(head); 535 list_add_tail(&term->list, head); 536 $$ = head; 537 } 538 539 event_term: 540 PE_NAME '=' PE_NAME 541 { 542 struct parse_events_term *term; 543 544 ABORT_ON(parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_USER, 545 $1, $3, &@1, &@3)); 546 $$ = term; 547 } 548 | 549 PE_NAME '=' PE_VALUE 550 { 551 struct parse_events_term *term; 552 553 ABORT_ON(parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER, 554 $1, $3, false, &@1, &@3)); 555 $$ = term; 556 } 557 | 558 PE_NAME '=' PE_VALUE_SYM_HW 559 { 560 struct parse_events_term *term; 561 int config = $3 & 255; 562 563 ABORT_ON(parse_events_term__sym_hw(&term, $1, config)); 564 $$ = term; 565 } 566 | 567 PE_NAME 568 { 569 struct parse_events_term *term; 570 571 ABORT_ON(parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER, 572 $1, 1, true, &@1, NULL)); 573 $$ = term; 574 } 575 | 576 PE_VALUE_SYM_HW 577 { 578 struct parse_events_term *term; 579 int config = $1 & 255; 580 581 ABORT_ON(parse_events_term__sym_hw(&term, NULL, config)); 582 $$ = term; 583 } 584 | 585 PE_TERM '=' PE_NAME 586 { 587 struct parse_events_term *term; 588 589 ABORT_ON(parse_events_term__str(&term, (int)$1, NULL, $3, &@1, &@3)); 590 $$ = term; 591 } 592 | 593 PE_TERM '=' PE_VALUE 594 { 595 struct parse_events_term *term; 596 597 ABORT_ON(parse_events_term__num(&term, (int)$1, NULL, $3, false, &@1, &@3)); 598 $$ = term; 599 } 600 | 601 PE_TERM 602 { 603 struct parse_events_term *term; 604 605 ABORT_ON(parse_events_term__num(&term, (int)$1, NULL, 1, true, &@1, NULL)); 606 $$ = term; 607 } 608 | 609 PE_NAME array '=' PE_NAME 610 { 611 struct parse_events_term *term; 612 int i; 613 614 ABORT_ON(parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_USER, 615 $1, $4, &@1, &@4)); 616 617 term->array = $2; 618 $$ = term; 619 } 620 | 621 PE_NAME array '=' PE_VALUE 622 { 623 struct parse_events_term *term; 624 625 ABORT_ON(parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER, 626 $1, $4, false, &@1, &@4)); 627 term->array = $2; 628 $$ = term; 629 } 630 | 631 PE_DRV_CFG_TERM 632 { 633 struct parse_events_term *term; 634 635 ABORT_ON(parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_DRV_CFG, 636 $1, $1, &@1, NULL)); 637 $$ = term; 638 } 639 640 array: 641 '[' array_terms ']' 642 { 643 $$ = $2; 644 } 645 | 646 PE_ARRAY_ALL 647 { 648 $$.nr_ranges = 0; 649 $$.ranges = NULL; 650 } 651 652 array_terms: 653 array_terms ',' array_term 654 { 655 struct parse_events_array new_array; 656 657 new_array.nr_ranges = $1.nr_ranges + $3.nr_ranges; 658 new_array.ranges = malloc(sizeof(new_array.ranges[0]) * 659 new_array.nr_ranges); 660 ABORT_ON(!new_array.ranges); 661 memcpy(&new_array.ranges[0], $1.ranges, 662 $1.nr_ranges * sizeof(new_array.ranges[0])); 663 memcpy(&new_array.ranges[$1.nr_ranges], $3.ranges, 664 $3.nr_ranges * sizeof(new_array.ranges[0])); 665 free($1.ranges); 666 free($3.ranges); 667 $$ = new_array; 668 } 669 | 670 array_term 671 672 array_term: 673 PE_VALUE 674 { 675 struct parse_events_array array; 676 677 array.nr_ranges = 1; 678 array.ranges = malloc(sizeof(array.ranges[0])); 679 ABORT_ON(!array.ranges); 680 array.ranges[0].start = $1; 681 array.ranges[0].length = 1; 682 $$ = array; 683 } 684 | 685 PE_VALUE PE_ARRAY_RANGE PE_VALUE 686 { 687 struct parse_events_array array; 688 689 ABORT_ON($3 < $1); 690 array.nr_ranges = 1; 691 array.ranges = malloc(sizeof(array.ranges[0])); 692 ABORT_ON(!array.ranges); 693 array.ranges[0].start = $1; 694 array.ranges[0].length = $3 - $1 + 1; 695 $$ = array; 696 } 697 698 sep_dc: ':' | 699 700 sep_slash_dc: '/' | ':' | 701 702 %% 703 704 void parse_events_error(YYLTYPE *loc, void *parse_state, 705 void *scanner __maybe_unused, 706 char const *msg __maybe_unused) 707 { 708 parse_events_evlist_error(parse_state, loc->last_column, "parser error"); 709 } 710