GNU Linux-libre 4.14.254-gnu1
[releases.git] / tools / perf / util / parse-events.l
1
2 %option reentrant
3 %option bison-bridge
4 %option prefix="parse_events_"
5 %option stack
6 %option bison-locations
7 %option yylineno
8 %option reject
9
10 %{
11 #include <errno.h>
12 #include <sys/types.h>
13 #include <sys/stat.h>
14 #include <unistd.h>
15 #include "../perf.h"
16 #include "parse-events.h"
17 #include "parse-events-bison.h"
18
19 char *parse_events_get_text(yyscan_t yyscanner);
20 YYSTYPE *parse_events_get_lval(yyscan_t yyscanner);
21
22 static int __value(YYSTYPE *yylval, char *str, int base, int token)
23 {
24         u64 num;
25
26         errno = 0;
27         num = strtoull(str, NULL, base);
28         if (errno)
29                 return PE_ERROR;
30
31         yylval->num = num;
32         return token;
33 }
34
35 static int value(yyscan_t scanner, int base)
36 {
37         YYSTYPE *yylval = parse_events_get_lval(scanner);
38         char *text = parse_events_get_text(scanner);
39
40         return __value(yylval, text, base, PE_VALUE);
41 }
42
43 static int raw(yyscan_t scanner)
44 {
45         YYSTYPE *yylval = parse_events_get_lval(scanner);
46         char *text = parse_events_get_text(scanner);
47
48         return __value(yylval, text + 1, 16, PE_RAW);
49 }
50
51 static int str(yyscan_t scanner, int token)
52 {
53         YYSTYPE *yylval = parse_events_get_lval(scanner);
54         char *text = parse_events_get_text(scanner);
55
56         yylval->str = strdup(text);
57         return token;
58 }
59
60 static bool isbpf_suffix(char *text)
61 {
62         int len = strlen(text);
63
64         if (len < 2)
65                 return false;
66         if ((text[len - 1] == 'c' || text[len - 1] == 'o') &&
67             text[len - 2] == '.')
68                 return true;
69         if (len > 4 && !strcmp(text + len - 4, ".obj"))
70                 return true;
71         return false;
72 }
73
74 static bool isbpf(yyscan_t scanner)
75 {
76         char *text = parse_events_get_text(scanner);
77         struct stat st;
78
79         if (!isbpf_suffix(text))
80                 return false;
81
82         return stat(text, &st) == 0;
83 }
84
85 /*
86  * This function is called when the parser gets two kind of input:
87  *
88  *      @cfg1 or @cfg2=config
89  *
90  * The leading '@' is stripped off before 'cfg1' and 'cfg2=config' are given to
91  * bison.  In the latter case it is necessary to keep the string intact so that
92  * the PMU kernel driver can determine what configurable is associated to
93  * 'config'.
94  */
95 static int drv_str(yyscan_t scanner, int token)
96 {
97         YYSTYPE *yylval = parse_events_get_lval(scanner);
98         char *text = parse_events_get_text(scanner);
99
100         /* Strip off the '@' */
101         yylval->str = strdup(text + 1);
102         return token;
103 }
104
105 #define REWIND(__alloc)                         \
106 do {                                                            \
107         YYSTYPE *__yylval = parse_events_get_lval(yyscanner);   \
108         char *text = parse_events_get_text(yyscanner);          \
109                                                                 \
110         if (__alloc)                                            \
111                 __yylval->str = strdup(text);                   \
112                                                                 \
113         yycolumn -= strlen(text);                               \
114         yyless(0);                                              \
115 } while (0)
116
117 static int pmu_str_check(yyscan_t scanner)
118 {
119         YYSTYPE *yylval = parse_events_get_lval(scanner);
120         char *text = parse_events_get_text(scanner);
121
122         yylval->str = strdup(text);
123         switch (perf_pmu__parse_check(text)) {
124                 case PMU_EVENT_SYMBOL_PREFIX:
125                         return PE_PMU_EVENT_PRE;
126                 case PMU_EVENT_SYMBOL_SUFFIX:
127                         return PE_PMU_EVENT_SUF;
128                 case PMU_EVENT_SYMBOL:
129                         return PE_KERNEL_PMU_EVENT;
130                 default:
131                         return PE_NAME;
132         }
133 }
134
135 static int sym(yyscan_t scanner, int type, int config)
136 {
137         YYSTYPE *yylval = parse_events_get_lval(scanner);
138
139         yylval->num = (type << 16) + config;
140         return type == PERF_TYPE_HARDWARE ? PE_VALUE_SYM_HW : PE_VALUE_SYM_SW;
141 }
142
143 static int term(yyscan_t scanner, int type)
144 {
145         YYSTYPE *yylval = parse_events_get_lval(scanner);
146
147         yylval->num = type;
148         return PE_TERM;
149 }
150
151 #define YY_USER_ACTION                                  \
152 do {                                                    \
153         yylloc->last_column  = yylloc->first_column;    \
154         yylloc->first_column = yycolumn;                \
155         yycolumn += yyleng;                             \
156 } while (0);
157
158 #define USER_REJECT             \
159         yycolumn -= yyleng;     \
160         REJECT
161
162 %}
163
164 %x mem
165 %s config
166 %x event
167 %x array
168
169 group           [^,{}/]*[{][^}]*[}][^,{}/]*
170 event_pmu       [^,{}/]+[/][^/]*[/][^,{}/]*
171 event           [^,{}/]+
172 bpf_object      [^,{}]+\.(o|bpf)[a-zA-Z0-9._]*
173 bpf_source      [^,{}]+\.c[a-zA-Z0-9._]*
174
175 num_dec         [0-9]+
176 num_hex         0x[a-fA-F0-9]+
177 num_raw_hex     [a-fA-F0-9]+
178 name            [a-zA-Z_*?][a-zA-Z0-9_*?.]*
179 name_minus      [a-zA-Z_*?][a-zA-Z0-9\-_*?.:]*
180 drv_cfg_term    [a-zA-Z0-9_\.]+(=[a-zA-Z0-9_*?\.:]+)?
181 /* If you add a modifier you need to update check_modifier() */
182 modifier_event  [ukhpPGHSDI]+
183 modifier_bp     [rwx]{1,3}
184
185 %%
186
187 %{
188         {
189                 int start_token;
190
191                 start_token = parse_events_get_extra(yyscanner);
192
193                 if (start_token == PE_START_TERMS)
194                         BEGIN(config);
195                 else if (start_token == PE_START_EVENTS)
196                         BEGIN(event);
197
198                 if (start_token) {
199                         parse_events_set_extra(NULL, yyscanner);
200                         /*
201                          * The flex parser does not init locations variable
202                          * via the scan_string interface, so we need do the
203                          * init in here.
204                          */
205                         yycolumn = 0;
206                         return start_token;
207                 }
208          }
209 %}
210
211 <event>{
212
213 {group}         {
214                         BEGIN(INITIAL);
215                         REWIND(0);
216                 }
217
218 {event_pmu}     |
219 {bpf_object}    |
220 {bpf_source}    |
221 {event}         {
222                         BEGIN(INITIAL);
223                         REWIND(1);
224                         return PE_EVENT_NAME;
225                 }
226
227 <<EOF>>         {
228                         BEGIN(INITIAL);
229                         REWIND(0);
230                 }
231
232 }
233
234 <array>{
235 "]"                     { BEGIN(config); return ']'; }
236 {num_dec}               { return value(yyscanner, 10); }
237 {num_hex}               { return value(yyscanner, 16); }
238 ,                       { return ','; }
239 "\.\.\."                { return PE_ARRAY_RANGE; }
240 }
241
242 <config>{
243         /*
244          * Please update config_term_names when new static term is added.
245          */
246 config                  { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_CONFIG); }
247 config1                 { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_CONFIG1); }
248 config2                 { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_CONFIG2); }
249 name                    { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_NAME); }
250 period                  { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_SAMPLE_PERIOD); }
251 freq                    { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_SAMPLE_FREQ); }
252 branch_type             { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_BRANCH_SAMPLE_TYPE); }
253 time                    { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_TIME); }
254 call-graph              { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_CALLGRAPH); }
255 stack-size              { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_STACKSIZE); }
256 max-stack               { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_MAX_STACK); }
257 inherit                 { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_INHERIT); }
258 no-inherit              { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_NOINHERIT); }
259 overwrite               { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_OVERWRITE); }
260 no-overwrite            { return term(yyscanner, PARSE_EVENTS__TERM_TYPE_NOOVERWRITE); }
261 ,                       { return ','; }
262 "/"                     { BEGIN(INITIAL); return '/'; }
263 {name_minus}            { return str(yyscanner, PE_NAME); }
264 \[all\]                 { return PE_ARRAY_ALL; }
265 "["                     { BEGIN(array); return '['; }
266 @{drv_cfg_term}         { return drv_str(yyscanner, PE_DRV_CFG_TERM); }
267 }
268
269 <mem>{
270 {modifier_bp}           { return str(yyscanner, PE_MODIFIER_BP); }
271 :                       { return ':'; }
272 "/"                     { return '/'; }
273 {num_dec}               { return value(yyscanner, 10); }
274 {num_hex}               { return value(yyscanner, 16); }
275         /*
276          * We need to separate 'mem:' scanner part, in order to get specific
277          * modifier bits parsed out. Otherwise we would need to handle PE_NAME
278          * and we'd need to parse it manually. During the escape from <mem>
279          * state we need to put the escaping char back, so we dont miss it.
280          */
281 .                       { unput(*yytext); BEGIN(INITIAL); }
282         /*
283          * We destroy the scanner after reaching EOF,
284          * but anyway just to be sure get back to INIT state.
285          */
286 <<EOF>>                 { BEGIN(INITIAL); }
287 }
288
289 cpu-cycles|cycles                               { return sym(yyscanner, PERF_TYPE_HARDWARE, PERF_COUNT_HW_CPU_CYCLES); }
290 stalled-cycles-frontend|idle-cycles-frontend    { return sym(yyscanner, PERF_TYPE_HARDWARE, PERF_COUNT_HW_STALLED_CYCLES_FRONTEND); }
291 stalled-cycles-backend|idle-cycles-backend      { return sym(yyscanner, PERF_TYPE_HARDWARE, PERF_COUNT_HW_STALLED_CYCLES_BACKEND); }
292 instructions                                    { return sym(yyscanner, PERF_TYPE_HARDWARE, PERF_COUNT_HW_INSTRUCTIONS); }
293 cache-references                                { return sym(yyscanner, PERF_TYPE_HARDWARE, PERF_COUNT_HW_CACHE_REFERENCES); }
294 cache-misses                                    { return sym(yyscanner, PERF_TYPE_HARDWARE, PERF_COUNT_HW_CACHE_MISSES); }
295 branch-instructions|branches                    { return sym(yyscanner, PERF_TYPE_HARDWARE, PERF_COUNT_HW_BRANCH_INSTRUCTIONS); }
296 branch-misses                                   { return sym(yyscanner, PERF_TYPE_HARDWARE, PERF_COUNT_HW_BRANCH_MISSES); }
297 bus-cycles                                      { return sym(yyscanner, PERF_TYPE_HARDWARE, PERF_COUNT_HW_BUS_CYCLES); }
298 ref-cycles                                      { return sym(yyscanner, PERF_TYPE_HARDWARE, PERF_COUNT_HW_REF_CPU_CYCLES); }
299 cpu-clock                                       { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_CPU_CLOCK); }
300 task-clock                                      { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_TASK_CLOCK); }
301 page-faults|faults                              { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_PAGE_FAULTS); }
302 minor-faults                                    { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_PAGE_FAULTS_MIN); }
303 major-faults                                    { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_PAGE_FAULTS_MAJ); }
304 context-switches|cs                             { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_CONTEXT_SWITCHES); }
305 cpu-migrations|migrations                       { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_CPU_MIGRATIONS); }
306 alignment-faults                                { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_ALIGNMENT_FAULTS); }
307 emulation-faults                                { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_EMULATION_FAULTS); }
308 dummy                                           { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_DUMMY); }
309 bpf-output                                      { return sym(yyscanner, PERF_TYPE_SOFTWARE, PERF_COUNT_SW_BPF_OUTPUT); }
310
311         /*
312          * We have to handle the kernel PMU event cycles-ct/cycles-t/mem-loads/mem-stores separately.
313          * Because the prefix cycles is mixed up with cpu-cycles.
314          * loads and stores are mixed up with cache event
315          */
316 cycles-ct                                       { return str(yyscanner, PE_KERNEL_PMU_EVENT); }
317 cycles-t                                        { return str(yyscanner, PE_KERNEL_PMU_EVENT); }
318 mem-loads                                       { return str(yyscanner, PE_KERNEL_PMU_EVENT); }
319 mem-stores                                      { return str(yyscanner, PE_KERNEL_PMU_EVENT); }
320 topdown-[a-z-]+                                 { return str(yyscanner, PE_KERNEL_PMU_EVENT); }
321
322 L1-dcache|l1-d|l1d|L1-data              |
323 L1-icache|l1-i|l1i|L1-instruction       |
324 LLC|L2                                  |
325 dTLB|d-tlb|Data-TLB                     |
326 iTLB|i-tlb|Instruction-TLB              |
327 branch|branches|bpu|btb|bpc             |
328 node                                    { return str(yyscanner, PE_NAME_CACHE_TYPE); }
329
330 load|loads|read                         |
331 store|stores|write                      |
332 prefetch|prefetches                     |
333 speculative-read|speculative-load       |
334 refs|Reference|ops|access               |
335 misses|miss                             { return str(yyscanner, PE_NAME_CACHE_OP_RESULT); }
336
337 mem:                    { BEGIN(mem); return PE_PREFIX_MEM; }
338 r{num_raw_hex}          { return raw(yyscanner); }
339 {num_dec}               { return value(yyscanner, 10); }
340 {num_hex}               { return value(yyscanner, 16); }
341
342 {modifier_event}        { return str(yyscanner, PE_MODIFIER_EVENT); }
343 {bpf_object}            { if (!isbpf(yyscanner)) { USER_REJECT }; return str(yyscanner, PE_BPF_OBJECT); }
344 {bpf_source}            { if (!isbpf(yyscanner)) { USER_REJECT }; return str(yyscanner, PE_BPF_SOURCE); }
345 {name}                  { return pmu_str_check(yyscanner); }
346 "/"                     { BEGIN(config); return '/'; }
347 -                       { return '-'; }
348 ,                       { BEGIN(event); return ','; }
349 :                       { return ':'; }
350 "{"                     { BEGIN(event); return '{'; }
351 "}"                     { return '}'; }
352 =                       { return '='; }
353 \n                      { }
354 .                       { }
355
356 %%
357
358 int parse_events_wrap(void *scanner __maybe_unused)
359 {
360         return 1;
361 }