Loading...
1%define api.pure full
2%parse-param {void *_parse_state}
3%parse-param {void *scanner}
4%lex-param {void* scanner}
5%locations
6
7%{
8
9#ifndef NDEBUG
10#define YYDEBUG 1
11#endif
12
13#include <errno.h>
14#include <linux/compiler.h>
15#include <linux/types.h>
16#include "pmu.h"
17#include "pmus.h"
18#include "evsel.h"
19#include "parse-events.h"
20#include "parse-events-bison.h"
21
22int parse_events_lex(YYSTYPE * yylval_param, YYLTYPE * yylloc_param , void *yyscanner);
23void parse_events_error(YYLTYPE *loc, void *parse_state, void *scanner, char const *msg);
24
25#define PE_ABORT(val) \
26do { \
27 if (val == -ENOMEM) \
28 YYNOMEM; \
29 YYABORT; \
30} while (0)
31
32static struct list_head* alloc_list(void)
33{
34 struct list_head *list;
35
36 list = malloc(sizeof(*list));
37 if (!list)
38 return NULL;
39
40 INIT_LIST_HEAD(list);
41 return list;
42}
43
44static void free_list_evsel(struct list_head* list_evsel)
45{
46 struct evsel *evsel, *tmp;
47
48 list_for_each_entry_safe(evsel, tmp, list_evsel, core.node) {
49 list_del_init(&evsel->core.node);
50 evsel__delete(evsel);
51 }
52 free(list_evsel);
53}
54
55%}
56
57%token PE_START_EVENTS PE_START_TERMS
58%token PE_VALUE PE_VALUE_SYM_HW PE_VALUE_SYM_SW PE_TERM
59%token PE_VALUE_SYM_TOOL
60%token PE_EVENT_NAME
61%token PE_RAW PE_NAME
62%token PE_MODIFIER_EVENT PE_MODIFIER_BP PE_BP_COLON PE_BP_SLASH
63%token PE_LEGACY_CACHE
64%token PE_PREFIX_MEM
65%token PE_ERROR
66%token PE_DRV_CFG_TERM
67%token PE_TERM_HW
68%type <num> PE_VALUE
69%type <num> PE_VALUE_SYM_HW
70%type <num> PE_VALUE_SYM_SW
71%type <num> PE_VALUE_SYM_TOOL
72%type <term_type> PE_TERM
73%type <num> value_sym
74%type <str> PE_RAW
75%type <str> PE_NAME
76%type <str> PE_LEGACY_CACHE
77%type <str> PE_MODIFIER_EVENT
78%type <str> PE_MODIFIER_BP
79%type <str> PE_EVENT_NAME
80%type <str> PE_DRV_CFG_TERM
81%type <str> name_or_raw
82%destructor { free ($$); } <str>
83%type <term> event_term
84%destructor { parse_events_term__delete ($$); } <term>
85%type <list_terms> event_config
86%type <list_terms> opt_event_config
87%type <list_terms> opt_pmu_config
88%destructor { parse_events_terms__delete ($$); } <list_terms>
89%type <list_evsel> event_pmu
90%type <list_evsel> event_legacy_symbol
91%type <list_evsel> event_legacy_cache
92%type <list_evsel> event_legacy_mem
93%type <list_evsel> event_legacy_tracepoint
94%type <list_evsel> event_legacy_numeric
95%type <list_evsel> event_legacy_raw
96%type <list_evsel> event_def
97%type <list_evsel> event_mod
98%type <list_evsel> event_name
99%type <list_evsel> event
100%type <list_evsel> events
101%type <list_evsel> group_def
102%type <list_evsel> group
103%type <list_evsel> groups
104%destructor { free_list_evsel ($$); } <list_evsel>
105%type <tracepoint_name> tracepoint_name
106%destructor { free ($$.sys); free ($$.event); } <tracepoint_name>
107%type <hardware_term> PE_TERM_HW
108%destructor { free ($$.str); } <hardware_term>
109
110%union
111{
112 char *str;
113 u64 num;
114 enum parse_events__term_type term_type;
115 struct list_head *list_evsel;
116 struct parse_events_terms *list_terms;
117 struct parse_events_term *term;
118 struct tracepoint_name {
119 char *sys;
120 char *event;
121 } tracepoint_name;
122 struct hardware_term {
123 char *str;
124 u64 num;
125 } hardware_term;
126}
127%%
128
129start:
130PE_START_EVENTS start_events
131|
132PE_START_TERMS start_terms
133
134start_events: groups
135{
136 struct parse_events_state *parse_state = _parse_state;
137
138 /* frees $1 */
139 parse_events_update_lists($1, &parse_state->list);
140}
141
142groups:
143groups ',' group
144{
145 struct list_head *list = $1;
146 struct list_head *group = $3;
147
148 /* frees $3 */
149 parse_events_update_lists(group, list);
150 $$ = list;
151}
152|
153groups ',' event
154{
155 struct list_head *list = $1;
156 struct list_head *event = $3;
157
158 /* frees $3 */
159 parse_events_update_lists(event, list);
160 $$ = list;
161}
162|
163group
164|
165event
166
167group:
168group_def ':' PE_MODIFIER_EVENT
169{
170 struct list_head *list = $1;
171 int err;
172
173 err = parse_events__modifier_group(list, $3);
174 free($3);
175 if (err) {
176 struct parse_events_state *parse_state = _parse_state;
177 struct parse_events_error *error = parse_state->error;
178
179 parse_events_error__handle(error, @3.first_column,
180 strdup("Bad modifier"), NULL);
181 free_list_evsel(list);
182 YYABORT;
183 }
184 $$ = list;
185}
186|
187group_def
188
189group_def:
190PE_NAME '{' events '}'
191{
192 struct list_head *list = $3;
193
194 /* Takes ownership of $1. */
195 parse_events__set_leader($1, list);
196 $$ = list;
197}
198|
199'{' events '}'
200{
201 struct list_head *list = $2;
202
203 parse_events__set_leader(NULL, list);
204 $$ = list;
205}
206
207events:
208events ',' event
209{
210 struct list_head *event = $3;
211 struct list_head *list = $1;
212
213 /* frees $3 */
214 parse_events_update_lists(event, list);
215 $$ = list;
216}
217|
218event
219
220event: event_mod
221
222event_mod:
223event_name PE_MODIFIER_EVENT
224{
225 struct list_head *list = $1;
226 int err;
227
228 /*
229 * Apply modifier on all events added by single event definition
230 * (there could be more events added for multiple tracepoint
231 * definitions via '*?'.
232 */
233 err = parse_events__modifier_event(list, $2, false);
234 free($2);
235 if (err) {
236 struct parse_events_state *parse_state = _parse_state;
237 struct parse_events_error *error = parse_state->error;
238
239 parse_events_error__handle(error, @2.first_column,
240 strdup("Bad modifier"), NULL);
241 free_list_evsel(list);
242 YYABORT;
243 }
244 $$ = list;
245}
246|
247event_name
248
249event_name:
250PE_EVENT_NAME event_def
251{
252 int err;
253
254 err = parse_events_name($2, $1);
255 free($1);
256 if (err) {
257 free_list_evsel($2);
258 YYNOMEM;
259 }
260 $$ = $2;
261}
262|
263event_def
264
265event_def: event_pmu |
266 event_legacy_symbol |
267 event_legacy_cache sep_dc |
268 event_legacy_mem sep_dc |
269 event_legacy_tracepoint sep_dc |
270 event_legacy_numeric sep_dc |
271 event_legacy_raw sep_dc
272
273event_pmu:
274PE_NAME opt_pmu_config
275{
276 struct parse_events_state *parse_state = _parse_state;
277 /* List of created evsels. */
278 struct list_head *list = NULL;
279 char *pattern = NULL;
280
281#define CLEANUP \
282 do { \
283 parse_events_terms__delete($2); \
284 free(list); \
285 free($1); \
286 free(pattern); \
287 } while(0)
288
289 list = alloc_list();
290 if (!list) {
291 CLEANUP;
292 YYNOMEM;
293 }
294 /* Attempt to add to list assuming $1 is a PMU name. */
295 if (parse_events_add_pmu(parse_state, list, $1, $2, /*auto_merge_stats=*/false, &@1)) {
296 struct perf_pmu *pmu = NULL;
297 int ok = 0;
298
299 /* Failure to add, try wildcard expansion of $1 as a PMU name. */
300 if (asprintf(&pattern, "%s*", $1) < 0) {
301 CLEANUP;
302 YYNOMEM;
303 }
304
305 while ((pmu = perf_pmus__scan(pmu)) != NULL) {
306 const char *name = pmu->name;
307
308 if (parse_events__filter_pmu(parse_state, pmu))
309 continue;
310
311 if (!strncmp(name, "uncore_", 7) &&
312 strncmp($1, "uncore_", 7))
313 name += 7;
314 if (!perf_pmu__match(pattern, name, $1) ||
315 !perf_pmu__match(pattern, pmu->alias_name, $1)) {
316 bool auto_merge_stats = perf_pmu__auto_merge_stats(pmu);
317
318 if (!parse_events_add_pmu(parse_state, list, pmu->name, $2,
319 auto_merge_stats, &@1)) {
320 ok++;
321 parse_state->wild_card_pmus = true;
322 }
323 }
324 }
325
326 if (!ok) {
327 /* Failure to add, assume $1 is an event name. */
328 zfree(&list);
329 ok = !parse_events_multi_pmu_add(parse_state, $1, $2, &list, &@1);
330 }
331 if (!ok) {
332 struct parse_events_error *error = parse_state->error;
333 char *help;
334
335 if (asprintf(&help, "Unable to find PMU or event on a PMU of '%s'", $1) < 0)
336 help = NULL;
337 parse_events_error__handle(error, @1.first_column,
338 strdup("Bad event or PMU"),
339 help);
340 CLEANUP;
341 YYABORT;
342 }
343 }
344 $$ = list;
345 list = NULL;
346 CLEANUP;
347#undef CLEANUP
348}
349|
350PE_NAME sep_dc
351{
352 struct list_head *list;
353 int err;
354
355 err = parse_events_multi_pmu_add(_parse_state, $1, NULL, &list, &@1);
356 if (err < 0) {
357 struct parse_events_state *parse_state = _parse_state;
358 struct parse_events_error *error = parse_state->error;
359 char *help;
360
361 if (asprintf(&help, "Unable to find event on a PMU of '%s'", $1) < 0)
362 help = NULL;
363 parse_events_error__handle(error, @1.first_column, strdup("Bad event name"), help);
364 free($1);
365 PE_ABORT(err);
366 }
367 free($1);
368 $$ = list;
369}
370
371value_sym:
372PE_VALUE_SYM_HW
373|
374PE_VALUE_SYM_SW
375
376event_legacy_symbol:
377value_sym '/' event_config '/'
378{
379 struct list_head *list;
380 int type = $1 >> 16;
381 int config = $1 & 255;
382 int err;
383 bool wildcard = (type == PERF_TYPE_HARDWARE || type == PERF_TYPE_HW_CACHE);
384
385 list = alloc_list();
386 if (!list)
387 YYNOMEM;
388 err = parse_events_add_numeric(_parse_state, list, type, config, $3, wildcard);
389 parse_events_terms__delete($3);
390 if (err) {
391 free_list_evsel(list);
392 PE_ABORT(err);
393 }
394 $$ = list;
395}
396|
397value_sym sep_slash_slash_dc
398{
399 struct list_head *list;
400 int type = $1 >> 16;
401 int config = $1 & 255;
402 bool wildcard = (type == PERF_TYPE_HARDWARE || type == PERF_TYPE_HW_CACHE);
403 int err;
404
405 list = alloc_list();
406 if (!list)
407 YYNOMEM;
408 err = parse_events_add_numeric(_parse_state, list, type, config, /*head_config=*/NULL, wildcard);
409 if (err)
410 PE_ABORT(err);
411 $$ = list;
412}
413|
414PE_VALUE_SYM_TOOL sep_slash_slash_dc
415{
416 struct list_head *list;
417 int err;
418
419 list = alloc_list();
420 if (!list)
421 YYNOMEM;
422 err = parse_events_add_tool(_parse_state, list, $1);
423 if (err)
424 YYNOMEM;
425 $$ = list;
426}
427
428event_legacy_cache:
429PE_LEGACY_CACHE opt_event_config
430{
431 struct parse_events_state *parse_state = _parse_state;
432 struct list_head *list;
433 int err;
434
435 list = alloc_list();
436 if (!list)
437 YYNOMEM;
438
439 err = parse_events_add_cache(list, &parse_state->idx, $1, parse_state, $2);
440
441 parse_events_terms__delete($2);
442 free($1);
443 if (err) {
444 free_list_evsel(list);
445 PE_ABORT(err);
446 }
447 $$ = list;
448}
449
450event_legacy_mem:
451PE_PREFIX_MEM PE_VALUE PE_BP_SLASH PE_VALUE PE_BP_COLON PE_MODIFIER_BP opt_event_config
452{
453 struct list_head *list;
454 int err;
455
456 list = alloc_list();
457 if (!list)
458 YYNOMEM;
459
460 err = parse_events_add_breakpoint(_parse_state, list,
461 $2, $6, $4, $7);
462 parse_events_terms__delete($7);
463 free($6);
464 if (err) {
465 free(list);
466 PE_ABORT(err);
467 }
468 $$ = list;
469}
470|
471PE_PREFIX_MEM PE_VALUE PE_BP_SLASH PE_VALUE opt_event_config
472{
473 struct list_head *list;
474 int err;
475
476 list = alloc_list();
477 if (!list)
478 YYNOMEM;
479
480 err = parse_events_add_breakpoint(_parse_state, list,
481 $2, NULL, $4, $5);
482 parse_events_terms__delete($5);
483 if (err) {
484 free(list);
485 PE_ABORT(err);
486 }
487 $$ = list;
488}
489|
490PE_PREFIX_MEM PE_VALUE PE_BP_COLON PE_MODIFIER_BP opt_event_config
491{
492 struct list_head *list;
493 int err;
494
495 list = alloc_list();
496 if (!list)
497 YYNOMEM;
498
499 err = parse_events_add_breakpoint(_parse_state, list,
500 $2, $4, 0, $5);
501 parse_events_terms__delete($5);
502 free($4);
503 if (err) {
504 free(list);
505 PE_ABORT(err);
506 }
507 $$ = list;
508}
509|
510PE_PREFIX_MEM PE_VALUE opt_event_config
511{
512 struct list_head *list;
513 int err;
514
515 list = alloc_list();
516 if (!list)
517 YYNOMEM;
518 err = parse_events_add_breakpoint(_parse_state, list,
519 $2, NULL, 0, $3);
520 parse_events_terms__delete($3);
521 if (err) {
522 free(list);
523 PE_ABORT(err);
524 }
525 $$ = list;
526}
527
528event_legacy_tracepoint:
529tracepoint_name opt_event_config
530{
531 struct parse_events_state *parse_state = _parse_state;
532 struct parse_events_error *error = parse_state->error;
533 struct list_head *list;
534 int err;
535
536 list = alloc_list();
537 if (!list)
538 YYNOMEM;
539 if (error)
540 error->idx = @1.first_column;
541
542 err = parse_events_add_tracepoint(list, &parse_state->idx, $1.sys, $1.event,
543 error, $2, &@1);
544
545 parse_events_terms__delete($2);
546 free($1.sys);
547 free($1.event);
548 if (err) {
549 free(list);
550 PE_ABORT(err);
551 }
552 $$ = list;
553}
554
555tracepoint_name:
556PE_NAME ':' PE_NAME
557{
558 struct tracepoint_name tracepoint = {$1, $3};
559
560 $$ = tracepoint;
561}
562
563event_legacy_numeric:
564PE_VALUE ':' PE_VALUE opt_event_config
565{
566 struct list_head *list;
567 int err;
568
569 list = alloc_list();
570 if (!list)
571 YYNOMEM;
572 err = parse_events_add_numeric(_parse_state, list, (u32)$1, $3, $4,
573 /*wildcard=*/false);
574 parse_events_terms__delete($4);
575 if (err) {
576 free(list);
577 PE_ABORT(err);
578 }
579 $$ = list;
580}
581
582event_legacy_raw:
583PE_RAW opt_event_config
584{
585 struct list_head *list;
586 int err;
587 u64 num;
588
589 list = alloc_list();
590 if (!list)
591 YYNOMEM;
592 errno = 0;
593 num = strtoull($1 + 1, NULL, 16);
594 /* Given the lexer will only give [a-fA-F0-9]+ a failure here should be impossible. */
595 if (errno)
596 YYABORT;
597 free($1);
598 err = parse_events_add_numeric(_parse_state, list, PERF_TYPE_RAW, num, $2,
599 /*wildcard=*/false);
600 parse_events_terms__delete($2);
601 if (err) {
602 free(list);
603 PE_ABORT(err);
604 }
605 $$ = list;
606}
607
608opt_event_config:
609'/' event_config '/'
610{
611 $$ = $2;
612}
613|
614'/' '/'
615{
616 $$ = NULL;
617}
618|
619{
620 $$ = NULL;
621}
622
623opt_pmu_config:
624'/' event_config '/'
625{
626 $$ = $2;
627}
628|
629'/' '/'
630{
631 $$ = NULL;
632}
633
634start_terms: event_config
635{
636 struct parse_events_state *parse_state = _parse_state;
637 if (parse_state->terms) {
638 parse_events_terms__delete ($1);
639 YYABORT;
640 }
641 parse_state->terms = $1;
642}
643
644event_config:
645event_config ',' event_term
646{
647 struct parse_events_terms *head = $1;
648 struct parse_events_term *term = $3;
649
650 if (!head) {
651 parse_events_term__delete(term);
652 YYABORT;
653 }
654 list_add_tail(&term->list, &head->terms);
655 $$ = $1;
656}
657|
658event_term
659{
660 struct parse_events_terms *head = malloc(sizeof(*head));
661 struct parse_events_term *term = $1;
662
663 if (!head)
664 YYNOMEM;
665 parse_events_terms__init(head);
666 list_add_tail(&term->list, &head->terms);
667 $$ = head;
668}
669
670name_or_raw: PE_RAW | PE_NAME | PE_LEGACY_CACHE
671
672event_term:
673PE_RAW
674{
675 struct parse_events_term *term;
676 int err = parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_RAW,
677 strdup("raw"), $1, &@1, &@1);
678
679 if (err) {
680 free($1);
681 PE_ABORT(err);
682 }
683 $$ = term;
684}
685|
686name_or_raw '=' name_or_raw
687{
688 struct parse_events_term *term;
689 int err = parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_USER, $1, $3, &@1, &@3);
690
691 if (err) {
692 free($1);
693 free($3);
694 PE_ABORT(err);
695 }
696 $$ = term;
697}
698|
699name_or_raw '=' PE_VALUE
700{
701 struct parse_events_term *term;
702 int err = parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER,
703 $1, $3, /*novalue=*/false, &@1, &@3);
704
705 if (err) {
706 free($1);
707 PE_ABORT(err);
708 }
709 $$ = term;
710}
711|
712name_or_raw '=' PE_TERM_HW
713{
714 struct parse_events_term *term;
715 int err = parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_USER,
716 $1, $3.str, &@1, &@3);
717
718 if (err) {
719 free($1);
720 free($3.str);
721 PE_ABORT(err);
722 }
723 $$ = term;
724}
725|
726PE_LEGACY_CACHE
727{
728 struct parse_events_term *term;
729 int err = parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_LEGACY_CACHE,
730 $1, /*num=*/1, /*novalue=*/true, &@1, /*loc_val=*/NULL);
731
732 if (err) {
733 free($1);
734 PE_ABORT(err);
735 }
736 $$ = term;
737}
738|
739PE_NAME
740{
741 struct parse_events_term *term;
742 int err = parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER,
743 $1, /*num=*/1, /*novalue=*/true, &@1, /*loc_val=*/NULL);
744
745 if (err) {
746 free($1);
747 PE_ABORT(err);
748 }
749 $$ = term;
750}
751|
752PE_TERM_HW
753{
754 struct parse_events_term *term;
755 int err = parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_HARDWARE,
756 $1.str, $1.num & 255, /*novalue=*/false,
757 &@1, /*loc_val=*/NULL);
758
759 if (err) {
760 free($1.str);
761 PE_ABORT(err);
762 }
763 $$ = term;
764}
765|
766PE_TERM '=' name_or_raw
767{
768 struct parse_events_term *term;
769 int err = parse_events_term__str(&term, $1, /*config=*/NULL, $3, &@1, &@3);
770
771 if (err) {
772 free($3);
773 PE_ABORT(err);
774 }
775 $$ = term;
776}
777|
778PE_TERM '=' PE_TERM_HW
779{
780 struct parse_events_term *term;
781 int err = parse_events_term__str(&term, $1, /*config=*/NULL, $3.str, &@1, &@3);
782
783 if (err) {
784 free($3.str);
785 PE_ABORT(err);
786 }
787 $$ = term;
788}
789|
790PE_TERM '=' PE_TERM
791{
792 struct parse_events_term *term;
793 int err = parse_events_term__term(&term, $1, $3, &@1, &@3);
794
795 if (err)
796 PE_ABORT(err);
797
798 $$ = term;
799}
800|
801PE_TERM '=' PE_VALUE
802{
803 struct parse_events_term *term;
804 int err = parse_events_term__num(&term, $1,
805 /*config=*/NULL, $3, /*novalue=*/false,
806 &@1, &@3);
807
808 if (err)
809 PE_ABORT(err);
810
811 $$ = term;
812}
813|
814PE_TERM
815{
816 struct parse_events_term *term;
817 int err = parse_events_term__num(&term, $1,
818 /*config=*/NULL, /*num=*/1, /*novalue=*/true,
819 &@1, /*loc_val=*/NULL);
820
821 if (err)
822 PE_ABORT(err);
823
824 $$ = term;
825}
826|
827PE_DRV_CFG_TERM
828{
829 struct parse_events_term *term;
830 char *config = strdup($1);
831 int err;
832
833 if (!config)
834 YYNOMEM;
835 err = parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_DRV_CFG, config, $1, &@1, NULL);
836 if (err) {
837 free($1);
838 free(config);
839 PE_ABORT(err);
840 }
841 $$ = term;
842}
843
844sep_dc: ':' |
845
846sep_slash_slash_dc: '/' '/' | ':' |
847
848%%
849
850void parse_events_error(YYLTYPE *loc, void *parse_state,
851 void *scanner __maybe_unused,
852 char const *msg __maybe_unused)
853{
854 parse_events_evlist_error(parse_state, loc->last_column, "parser error");
855}
1%define api.pure full
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 <stdio.h>
13#include <linux/compiler.h>
14#include <linux/types.h>
15#include <linux/zalloc.h>
16#include "pmu.h"
17#include "evsel.h"
18#include "parse-events.h"
19#include "parse-events-bison.h"
20
21void parse_events_error(YYLTYPE *loc, void *parse_state, void *scanner, char const *msg);
22
23#define ABORT_ON(val) \
24do { \
25 if (val) \
26 YYABORT; \
27} while (0)
28
29static struct list_head* alloc_list(void)
30{
31 struct list_head *list;
32
33 list = malloc(sizeof(*list));
34 if (!list)
35 return NULL;
36
37 INIT_LIST_HEAD(list);
38 return list;
39}
40
41static void free_list_evsel(struct list_head* list_evsel)
42{
43 struct evsel *evsel, *tmp;
44
45 list_for_each_entry_safe(evsel, tmp, list_evsel, core.node) {
46 list_del_init(&evsel->core.node);
47 evsel__delete(evsel);
48 }
49 free(list_evsel);
50}
51
52static void inc_group_count(struct list_head *list,
53 struct parse_events_state *parse_state)
54{
55 /* Count groups only have more than 1 members */
56 if (!list_is_last(list->next, list))
57 parse_state->nr_groups++;
58}
59
60%}
61
62%token PE_START_EVENTS PE_START_TERMS
63%token PE_VALUE PE_VALUE_SYM_HW PE_VALUE_SYM_SW PE_RAW PE_TERM
64%token PE_VALUE_SYM_TOOL
65%token PE_EVENT_NAME
66%token PE_NAME
67%token PE_BPF_OBJECT PE_BPF_SOURCE
68%token PE_MODIFIER_EVENT PE_MODIFIER_BP
69%token PE_NAME_CACHE_TYPE PE_NAME_CACHE_OP_RESULT
70%token PE_PREFIX_MEM PE_PREFIX_RAW PE_PREFIX_GROUP
71%token PE_ERROR
72%token PE_PMU_EVENT_PRE PE_PMU_EVENT_SUF PE_KERNEL_PMU_EVENT PE_PMU_EVENT_FAKE
73%token PE_ARRAY_ALL PE_ARRAY_RANGE
74%token PE_DRV_CFG_TERM
75%type <num> PE_VALUE
76%type <num> PE_VALUE_SYM_HW
77%type <num> PE_VALUE_SYM_SW
78%type <num> PE_VALUE_SYM_TOOL
79%type <num> PE_RAW
80%type <num> PE_TERM
81%type <num> value_sym
82%type <str> PE_NAME
83%type <str> PE_BPF_OBJECT
84%type <str> PE_BPF_SOURCE
85%type <str> PE_NAME_CACHE_TYPE
86%type <str> PE_NAME_CACHE_OP_RESULT
87%type <str> PE_MODIFIER_EVENT
88%type <str> PE_MODIFIER_BP
89%type <str> PE_EVENT_NAME
90%type <str> PE_PMU_EVENT_PRE PE_PMU_EVENT_SUF PE_KERNEL_PMU_EVENT PE_PMU_EVENT_FAKE
91%type <str> PE_DRV_CFG_TERM
92%type <str> event_pmu_name
93%destructor { free ($$); } <str>
94%type <term> event_term
95%destructor { parse_events_term__delete ($$); } <term>
96%type <list_terms> event_config
97%type <list_terms> opt_event_config
98%type <list_terms> opt_pmu_config
99%destructor { parse_events_terms__delete ($$); } <list_terms>
100%type <list_evsel> event_pmu
101%type <list_evsel> event_legacy_symbol
102%type <list_evsel> event_legacy_cache
103%type <list_evsel> event_legacy_mem
104%type <list_evsel> event_legacy_tracepoint
105%type <list_evsel> event_legacy_numeric
106%type <list_evsel> event_legacy_raw
107%type <list_evsel> event_bpf_file
108%type <list_evsel> event_def
109%type <list_evsel> event_mod
110%type <list_evsel> event_name
111%type <list_evsel> event
112%type <list_evsel> events
113%type <list_evsel> group_def
114%type <list_evsel> group
115%type <list_evsel> groups
116%destructor { free_list_evsel ($$); } <list_evsel>
117%type <tracepoint_name> tracepoint_name
118%destructor { free ($$.sys); free ($$.event); } <tracepoint_name>
119%type <array> array
120%type <array> array_term
121%type <array> array_terms
122%destructor { free ($$.ranges); } <array>
123
124%union
125{
126 char *str;
127 u64 num;
128 struct list_head *list_evsel;
129 struct list_head *list_terms;
130 struct parse_events_term *term;
131 struct tracepoint_name {
132 char *sys;
133 char *event;
134 } tracepoint_name;
135 struct parse_events_array array;
136}
137%%
138
139start:
140PE_START_EVENTS start_events
141|
142PE_START_TERMS start_terms
143
144start_events: groups
145{
146 struct parse_events_state *parse_state = _parse_state;
147
148 /* frees $1 */
149 parse_events_update_lists($1, &parse_state->list);
150}
151
152groups:
153groups ',' group
154{
155 struct list_head *list = $1;
156 struct list_head *group = $3;
157
158 /* frees $3 */
159 parse_events_update_lists(group, list);
160 $$ = list;
161}
162|
163groups ',' event
164{
165 struct list_head *list = $1;
166 struct list_head *event = $3;
167
168 /* frees $3 */
169 parse_events_update_lists(event, list);
170 $$ = list;
171}
172|
173group
174|
175event
176
177group:
178group_def ':' PE_MODIFIER_EVENT
179{
180 struct list_head *list = $1;
181 int err;
182
183 err = parse_events__modifier_group(list, $3);
184 free($3);
185 if (err) {
186 free_list_evsel(list);
187 YYABORT;
188 }
189 $$ = list;
190}
191|
192group_def
193
194group_def:
195PE_NAME '{' events '}'
196{
197 struct list_head *list = $3;
198
199 inc_group_count(list, _parse_state);
200 parse_events__set_leader($1, list, _parse_state);
201 free($1);
202 $$ = list;
203}
204|
205'{' events '}'
206{
207 struct list_head *list = $2;
208
209 inc_group_count(list, _parse_state);
210 parse_events__set_leader(NULL, list, _parse_state);
211 $$ = list;
212}
213
214events:
215events ',' event
216{
217 struct list_head *event = $3;
218 struct list_head *list = $1;
219
220 /* frees $3 */
221 parse_events_update_lists(event, list);
222 $$ = list;
223}
224|
225event
226
227event: event_mod
228
229event_mod:
230event_name PE_MODIFIER_EVENT
231{
232 struct list_head *list = $1;
233 int err;
234
235 /*
236 * Apply modifier on all events added by single event definition
237 * (there could be more events added for multiple tracepoint
238 * definitions via '*?'.
239 */
240 err = parse_events__modifier_event(list, $2, false);
241 free($2);
242 if (err) {
243 free_list_evsel(list);
244 YYABORT;
245 }
246 $$ = list;
247}
248|
249event_name
250
251event_name:
252PE_EVENT_NAME event_def
253{
254 int err;
255
256 err = parse_events_name($2, $1);
257 free($1);
258 if (err) {
259 free_list_evsel($2);
260 YYABORT;
261 }
262 $$ = $2;
263}
264|
265event_def
266
267event_def: event_pmu |
268 event_legacy_symbol |
269 event_legacy_cache sep_dc |
270 event_legacy_mem |
271 event_legacy_tracepoint sep_dc |
272 event_legacy_numeric sep_dc |
273 event_legacy_raw sep_dc |
274 event_bpf_file
275
276event_pmu_name:
277PE_NAME | PE_PMU_EVENT_PRE
278
279event_pmu:
280event_pmu_name opt_pmu_config
281{
282 struct parse_events_state *parse_state = _parse_state;
283 struct parse_events_error *error = parse_state->error;
284 struct list_head *list = NULL, *orig_terms = NULL, *terms= NULL;
285 char *pattern = NULL;
286
287#define CLEANUP_YYABORT \
288 do { \
289 parse_events_terms__delete($2); \
290 parse_events_terms__delete(orig_terms); \
291 free(list); \
292 free($1); \
293 free(pattern); \
294 YYABORT; \
295 } while(0)
296
297 if (parse_events_copy_term_list($2, &orig_terms))
298 CLEANUP_YYABORT;
299
300 if (error)
301 error->idx = @1.first_column;
302
303 list = alloc_list();
304 if (!list)
305 CLEANUP_YYABORT;
306 if (parse_events_add_pmu(_parse_state, list, $1, $2, false, false)) {
307 struct perf_pmu *pmu = NULL;
308 int ok = 0;
309
310 if (asprintf(&pattern, "%s*", $1) < 0)
311 CLEANUP_YYABORT;
312
313 while ((pmu = perf_pmu__scan(pmu)) != NULL) {
314 char *name = pmu->name;
315
316 if (!strncmp(name, "uncore_", 7) &&
317 strncmp($1, "uncore_", 7))
318 name += 7;
319 if (!perf_pmu__match(pattern, name, $1)) {
320 if (parse_events_copy_term_list(orig_terms, &terms))
321 CLEANUP_YYABORT;
322 if (!parse_events_add_pmu(_parse_state, list, pmu->name, terms, true, false))
323 ok++;
324 parse_events_terms__delete(terms);
325 }
326 }
327
328 if (!ok)
329 CLEANUP_YYABORT;
330 }
331 parse_events_terms__delete($2);
332 parse_events_terms__delete(orig_terms);
333 free(pattern);
334 free($1);
335 $$ = list;
336#undef CLEANUP_YYABORT
337}
338|
339PE_KERNEL_PMU_EVENT sep_dc
340{
341 struct list_head *list;
342 int err;
343
344 err = parse_events_multi_pmu_add(_parse_state, $1, &list);
345 free($1);
346 if (err < 0)
347 YYABORT;
348 $$ = list;
349}
350|
351PE_PMU_EVENT_PRE '-' PE_PMU_EVENT_SUF sep_dc
352{
353 struct list_head *list;
354 char pmu_name[128];
355
356 snprintf(pmu_name, sizeof(pmu_name), "%s-%s", $1, $3);
357 free($1);
358 free($3);
359 if (parse_events_multi_pmu_add(_parse_state, pmu_name, &list) < 0)
360 YYABORT;
361 $$ = list;
362}
363|
364PE_PMU_EVENT_FAKE sep_dc
365{
366 struct list_head *list;
367 int err;
368
369 list = alloc_list();
370 if (!list)
371 YYABORT;
372
373 err = parse_events_add_pmu(_parse_state, list, $1, NULL, false, false);
374 free($1);
375 if (err < 0) {
376 free(list);
377 YYABORT;
378 }
379 $$ = list;
380}
381|
382PE_PMU_EVENT_FAKE opt_pmu_config
383{
384 struct list_head *list;
385 int err;
386
387 list = alloc_list();
388 if (!list)
389 YYABORT;
390
391 err = parse_events_add_pmu(_parse_state, list, $1, $2, false, false);
392 free($1);
393 parse_events_terms__delete($2);
394 if (err < 0) {
395 free(list);
396 YYABORT;
397 }
398 $$ = list;
399}
400
401value_sym:
402PE_VALUE_SYM_HW
403|
404PE_VALUE_SYM_SW
405
406event_legacy_symbol:
407value_sym '/' event_config '/'
408{
409 struct list_head *list;
410 int type = $1 >> 16;
411 int config = $1 & 255;
412 int err;
413
414 list = alloc_list();
415 ABORT_ON(!list);
416 err = parse_events_add_numeric(_parse_state, list, type, config, $3);
417 parse_events_terms__delete($3);
418 if (err) {
419 free_list_evsel(list);
420 YYABORT;
421 }
422 $$ = list;
423}
424|
425value_sym sep_slash_slash_dc
426{
427 struct list_head *list;
428 int type = $1 >> 16;
429 int config = $1 & 255;
430
431 list = alloc_list();
432 ABORT_ON(!list);
433 ABORT_ON(parse_events_add_numeric(_parse_state, list, type, config, NULL));
434 $$ = list;
435}
436|
437PE_VALUE_SYM_TOOL sep_slash_slash_dc
438{
439 struct list_head *list;
440
441 list = alloc_list();
442 ABORT_ON(!list);
443 ABORT_ON(parse_events_add_tool(_parse_state, list, $1));
444 $$ = list;
445}
446
447event_legacy_cache:
448PE_NAME_CACHE_TYPE '-' PE_NAME_CACHE_OP_RESULT '-' PE_NAME_CACHE_OP_RESULT opt_event_config
449{
450 struct parse_events_state *parse_state = _parse_state;
451 struct parse_events_error *error = parse_state->error;
452 struct list_head *list;
453 int err;
454
455 list = alloc_list();
456 ABORT_ON(!list);
457 err = parse_events_add_cache(list, &parse_state->idx, $1, $3, $5, error, $6,
458 parse_state);
459 parse_events_terms__delete($6);
460 free($1);
461 free($3);
462 free($5);
463 if (err) {
464 free_list_evsel(list);
465 YYABORT;
466 }
467 $$ = list;
468}
469|
470PE_NAME_CACHE_TYPE '-' PE_NAME_CACHE_OP_RESULT opt_event_config
471{
472 struct parse_events_state *parse_state = _parse_state;
473 struct parse_events_error *error = parse_state->error;
474 struct list_head *list;
475 int err;
476
477 list = alloc_list();
478 ABORT_ON(!list);
479 err = parse_events_add_cache(list, &parse_state->idx, $1, $3, NULL, error, $4,
480 parse_state);
481 parse_events_terms__delete($4);
482 free($1);
483 free($3);
484 if (err) {
485 free_list_evsel(list);
486 YYABORT;
487 }
488 $$ = list;
489}
490|
491PE_NAME_CACHE_TYPE opt_event_config
492{
493 struct parse_events_state *parse_state = _parse_state;
494 struct parse_events_error *error = parse_state->error;
495 struct list_head *list;
496 int err;
497
498 list = alloc_list();
499 ABORT_ON(!list);
500 err = parse_events_add_cache(list, &parse_state->idx, $1, NULL, NULL, error, $2,
501 parse_state);
502 parse_events_terms__delete($2);
503 free($1);
504 if (err) {
505 free_list_evsel(list);
506 YYABORT;
507 }
508 $$ = list;
509}
510
511event_legacy_mem:
512PE_PREFIX_MEM PE_VALUE '/' PE_VALUE ':' PE_MODIFIER_BP sep_dc
513{
514 struct parse_events_state *parse_state = _parse_state;
515 struct list_head *list;
516 int err;
517
518 list = alloc_list();
519 ABORT_ON(!list);
520 err = parse_events_add_breakpoint(list, &parse_state->idx,
521 $2, $6, $4);
522 free($6);
523 if (err) {
524 free(list);
525 YYABORT;
526 }
527 $$ = list;
528}
529|
530PE_PREFIX_MEM PE_VALUE '/' PE_VALUE sep_dc
531{
532 struct parse_events_state *parse_state = _parse_state;
533 struct list_head *list;
534
535 list = alloc_list();
536 ABORT_ON(!list);
537 if (parse_events_add_breakpoint(list, &parse_state->idx,
538 $2, NULL, $4)) {
539 free(list);
540 YYABORT;
541 }
542 $$ = list;
543}
544|
545PE_PREFIX_MEM PE_VALUE ':' PE_MODIFIER_BP sep_dc
546{
547 struct parse_events_state *parse_state = _parse_state;
548 struct list_head *list;
549 int err;
550
551 list = alloc_list();
552 ABORT_ON(!list);
553 err = parse_events_add_breakpoint(list, &parse_state->idx,
554 $2, $4, 0);
555 free($4);
556 if (err) {
557 free(list);
558 YYABORT;
559 }
560 $$ = list;
561}
562|
563PE_PREFIX_MEM PE_VALUE sep_dc
564{
565 struct parse_events_state *parse_state = _parse_state;
566 struct list_head *list;
567
568 list = alloc_list();
569 ABORT_ON(!list);
570 if (parse_events_add_breakpoint(list, &parse_state->idx,
571 $2, NULL, 0)) {
572 free(list);
573 YYABORT;
574 }
575 $$ = list;
576}
577
578event_legacy_tracepoint:
579tracepoint_name opt_event_config
580{
581 struct parse_events_state *parse_state = _parse_state;
582 struct parse_events_error *error = parse_state->error;
583 struct list_head *list;
584 int err;
585
586 list = alloc_list();
587 ABORT_ON(!list);
588 if (error)
589 error->idx = @1.first_column;
590
591 err = parse_events_add_tracepoint(list, &parse_state->idx, $1.sys, $1.event,
592 error, $2);
593
594 parse_events_terms__delete($2);
595 free($1.sys);
596 free($1.event);
597 if (err) {
598 free(list);
599 YYABORT;
600 }
601 $$ = list;
602}
603
604tracepoint_name:
605PE_NAME '-' PE_NAME ':' PE_NAME
606{
607 struct tracepoint_name tracepoint;
608
609 ABORT_ON(asprintf(&tracepoint.sys, "%s-%s", $1, $3) < 0);
610 tracepoint.event = $5;
611 free($1);
612 free($3);
613 $$ = tracepoint;
614}
615|
616PE_NAME ':' PE_NAME
617{
618 struct tracepoint_name tracepoint = {$1, $3};
619
620 $$ = tracepoint;
621}
622
623event_legacy_numeric:
624PE_VALUE ':' PE_VALUE opt_event_config
625{
626 struct list_head *list;
627 int err;
628
629 list = alloc_list();
630 ABORT_ON(!list);
631 err = parse_events_add_numeric(_parse_state, list, (u32)$1, $3, $4);
632 parse_events_terms__delete($4);
633 if (err) {
634 free(list);
635 YYABORT;
636 }
637 $$ = list;
638}
639
640event_legacy_raw:
641PE_RAW opt_event_config
642{
643 struct list_head *list;
644 int err;
645
646 list = alloc_list();
647 ABORT_ON(!list);
648 err = parse_events_add_numeric(_parse_state, list, PERF_TYPE_RAW, $1, $2);
649 parse_events_terms__delete($2);
650 if (err) {
651 free(list);
652 YYABORT;
653 }
654 $$ = list;
655}
656
657event_bpf_file:
658PE_BPF_OBJECT opt_event_config
659{
660 struct parse_events_state *parse_state = _parse_state;
661 struct list_head *list;
662 int err;
663
664 list = alloc_list();
665 ABORT_ON(!list);
666 err = parse_events_load_bpf(parse_state, list, $1, false, $2);
667 parse_events_terms__delete($2);
668 free($1);
669 if (err) {
670 free(list);
671 YYABORT;
672 }
673 $$ = list;
674}
675|
676PE_BPF_SOURCE opt_event_config
677{
678 struct list_head *list;
679 int err;
680
681 list = alloc_list();
682 ABORT_ON(!list);
683 err = parse_events_load_bpf(_parse_state, list, $1, true, $2);
684 parse_events_terms__delete($2);
685 if (err) {
686 free(list);
687 YYABORT;
688 }
689 $$ = list;
690}
691
692opt_event_config:
693'/' event_config '/'
694{
695 $$ = $2;
696}
697|
698'/' '/'
699{
700 $$ = NULL;
701}
702|
703{
704 $$ = NULL;
705}
706
707opt_pmu_config:
708'/' event_config '/'
709{
710 $$ = $2;
711}
712|
713'/' '/'
714{
715 $$ = NULL;
716}
717
718start_terms: event_config
719{
720 struct parse_events_state *parse_state = _parse_state;
721 if (parse_state->terms) {
722 parse_events_terms__delete ($1);
723 YYABORT;
724 }
725 parse_state->terms = $1;
726}
727
728event_config:
729event_config ',' event_term
730{
731 struct list_head *head = $1;
732 struct parse_events_term *term = $3;
733
734 if (!head) {
735 parse_events_term__delete(term);
736 YYABORT;
737 }
738 list_add_tail(&term->list, head);
739 $$ = $1;
740}
741|
742event_term
743{
744 struct list_head *head = malloc(sizeof(*head));
745 struct parse_events_term *term = $1;
746
747 ABORT_ON(!head);
748 INIT_LIST_HEAD(head);
749 list_add_tail(&term->list, head);
750 $$ = head;
751}
752
753event_term:
754PE_RAW
755{
756 struct parse_events_term *term;
757
758 ABORT_ON(parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_CONFIG,
759 NULL, $1, false, &@1, NULL));
760 $$ = term;
761}
762|
763PE_NAME '=' PE_NAME
764{
765 struct parse_events_term *term;
766
767 if (parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_USER,
768 $1, $3, &@1, &@3)) {
769 free($1);
770 free($3);
771 YYABORT;
772 }
773 $$ = term;
774}
775|
776PE_NAME '=' PE_VALUE
777{
778 struct parse_events_term *term;
779
780 if (parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER,
781 $1, $3, false, &@1, &@3)) {
782 free($1);
783 YYABORT;
784 }
785 $$ = term;
786}
787|
788PE_NAME '=' PE_VALUE_SYM_HW
789{
790 struct parse_events_term *term;
791 int config = $3 & 255;
792
793 if (parse_events_term__sym_hw(&term, $1, config)) {
794 free($1);
795 YYABORT;
796 }
797 $$ = term;
798}
799|
800PE_NAME
801{
802 struct parse_events_term *term;
803
804 if (parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER,
805 $1, 1, true, &@1, NULL)) {
806 free($1);
807 YYABORT;
808 }
809 $$ = term;
810}
811|
812PE_VALUE_SYM_HW
813{
814 struct parse_events_term *term;
815 int config = $1 & 255;
816
817 ABORT_ON(parse_events_term__sym_hw(&term, NULL, config));
818 $$ = term;
819}
820|
821PE_TERM '=' PE_NAME
822{
823 struct parse_events_term *term;
824
825 if (parse_events_term__str(&term, (int)$1, NULL, $3, &@1, &@3)) {
826 free($3);
827 YYABORT;
828 }
829 $$ = term;
830}
831|
832PE_TERM '=' PE_VALUE
833{
834 struct parse_events_term *term;
835
836 ABORT_ON(parse_events_term__num(&term, (int)$1, NULL, $3, false, &@1, &@3));
837 $$ = term;
838}
839|
840PE_TERM
841{
842 struct parse_events_term *term;
843
844 ABORT_ON(parse_events_term__num(&term, (int)$1, NULL, 1, true, &@1, NULL));
845 $$ = term;
846}
847|
848PE_NAME array '=' PE_NAME
849{
850 struct parse_events_term *term;
851
852 if (parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_USER,
853 $1, $4, &@1, &@4)) {
854 free($1);
855 free($4);
856 free($2.ranges);
857 YYABORT;
858 }
859 term->array = $2;
860 $$ = term;
861}
862|
863PE_NAME array '=' PE_VALUE
864{
865 struct parse_events_term *term;
866
867 if (parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER,
868 $1, $4, false, &@1, &@4)) {
869 free($1);
870 free($2.ranges);
871 YYABORT;
872 }
873 term->array = $2;
874 $$ = term;
875}
876|
877PE_DRV_CFG_TERM
878{
879 struct parse_events_term *term;
880 char *config = strdup($1);
881
882 ABORT_ON(!config);
883 if (parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_DRV_CFG,
884 config, $1, &@1, NULL)) {
885 free($1);
886 free(config);
887 YYABORT;
888 }
889 $$ = term;
890}
891
892array:
893'[' array_terms ']'
894{
895 $$ = $2;
896}
897|
898PE_ARRAY_ALL
899{
900 $$.nr_ranges = 0;
901 $$.ranges = NULL;
902}
903
904array_terms:
905array_terms ',' array_term
906{
907 struct parse_events_array new_array;
908
909 new_array.nr_ranges = $1.nr_ranges + $3.nr_ranges;
910 new_array.ranges = realloc($1.ranges,
911 sizeof(new_array.ranges[0]) *
912 new_array.nr_ranges);
913 ABORT_ON(!new_array.ranges);
914 memcpy(&new_array.ranges[$1.nr_ranges], $3.ranges,
915 $3.nr_ranges * sizeof(new_array.ranges[0]));
916 free($3.ranges);
917 $$ = new_array;
918}
919|
920array_term
921
922array_term:
923PE_VALUE
924{
925 struct parse_events_array array;
926
927 array.nr_ranges = 1;
928 array.ranges = malloc(sizeof(array.ranges[0]));
929 ABORT_ON(!array.ranges);
930 array.ranges[0].start = $1;
931 array.ranges[0].length = 1;
932 $$ = array;
933}
934|
935PE_VALUE PE_ARRAY_RANGE PE_VALUE
936{
937 struct parse_events_array array;
938
939 ABORT_ON($3 < $1);
940 array.nr_ranges = 1;
941 array.ranges = malloc(sizeof(array.ranges[0]));
942 ABORT_ON(!array.ranges);
943 array.ranges[0].start = $1;
944 array.ranges[0].length = $3 - $1 + 1;
945 $$ = array;
946}
947
948sep_dc: ':' |
949
950sep_slash_slash_dc: '/' '/' | ':' |
951
952%%
953
954void parse_events_error(YYLTYPE *loc, void *parse_state,
955 void *scanner __maybe_unused,
956 char const *msg __maybe_unused)
957{
958 parse_events_evlist_error(parse_state, loc->last_column, "parser error");
959}