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