Linux Audio

Check our new training course

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