2012-06-15 14:31:39 +08:00
%pure-parser
2012-06-15 14:31:38 +08:00
%parse-param {void *_data}
2012-06-15 14:31:39 +08:00
%parse-param {void *scanner}
%lex-param {void* scanner}
2015-04-22 21:10:17 +02:00
%locations
2012-03-15 20:09:15 +01:00
%{
#define YYDEBUG 1
#include <linux/compiler.h>
#include <linux/list.h>
2014-04-25 21:31:02 +02:00
#include <linux/types.h>
2012-03-15 20:09:15 +01:00
#include "util.h"
#include "parse-events.h"
2012-06-15 14:31:39 +08:00
#include "parse-events-bison.h"
2012-03-15 20:09:15 +01:00
#define ABORT_ON(val) \
do { \
if (val) \
YYABORT; \
} while (0)
2013-07-02 13:27:25 -06:00
#define ALLOC_LIST(list) \
do { \
list = malloc(sizeof(*list)); \
ABORT_ON(!list); \
INIT_LIST_HEAD(list); \
} while (0)
2013-01-22 18:09:29 +09:00
static inc_group_count(struct list_head *list,
struct parse_events_evlist *data)
{
/* Count groups only have more than 1 members */
if (!list_is_last(list->next, list))
data->nr_groups++;
}
2012-03-15 20:09:15 +01:00
%}
2012-06-15 14:31:40 +08:00
%token PE_START_EVENTS PE_START_TERMS
2012-07-04 00:00:43 +02:00
%token PE_VALUE PE_VALUE_SYM_HW PE_VALUE_SYM_SW PE_RAW PE_TERM
2012-08-16 21:10:21 +02:00
%token PE_EVENT_NAME
2012-03-15 20:09:15 +01:00
%token PE_NAME
%token PE_MODIFIER_EVENT PE_MODIFIER_BP
%token PE_NAME_CACHE_TYPE PE_NAME_CACHE_OP_RESULT
2012-08-08 12:14:14 +02:00
%token PE_PREFIX_MEM PE_PREFIX_RAW PE_PREFIX_GROUP
2012-03-15 20:09:15 +01:00
%token PE_ERROR
2014-10-07 11:08:51 -04:00
%token PE_PMU_EVENT_PRE PE_PMU_EVENT_SUF PE_KERNEL_PMU_EVENT
2012-03-15 20:09:15 +01:00
%type <num> PE_VALUE
2012-07-04 00:00:43 +02:00
%type <num> PE_VALUE_SYM_HW
%type <num> PE_VALUE_SYM_SW
2012-03-15 20:09:15 +01:00
%type <num> PE_RAW
2012-03-15 20:09:16 +01:00
%type <num> PE_TERM
2012-03-15 20:09:15 +01:00
%type <str> PE_NAME
%type <str> PE_NAME_CACHE_TYPE
%type <str> PE_NAME_CACHE_OP_RESULT
%type <str> PE_MODIFIER_EVENT
%type <str> PE_MODIFIER_BP
2012-08-16 21:10:21 +02:00
%type <str> PE_EVENT_NAME
2014-10-07 11:08:51 -04:00
%type <str> PE_PMU_EVENT_PRE PE_PMU_EVENT_SUF PE_KERNEL_PMU_EVENT
2012-07-04 00:00:43 +02:00
%type <num> value_sym
2012-03-15 20:09:16 +01:00
%type <head> event_config
%type <term> event_term
2012-05-21 09:12:51 +02:00
%type <head> event_pmu
%type <head> event_legacy_symbol
%type <head> event_legacy_cache
%type <head> event_legacy_mem
%type <head> event_legacy_tracepoint
2015-09-28 03:52:15 +00:00
%type <tracepoint_name> tracepoint_name
2012-05-21 09:12:51 +02:00
%type <head> event_legacy_numeric
%type <head> event_legacy_raw
%type <head> event_def
2012-08-16 21:10:21 +02:00
%type <head> event_mod
%type <head> event_name
2012-08-08 12:14:14 +02:00
%type <head> event
%type <head> events
%type <head> group_def
%type <head> group
%type <head> groups
2012-03-15 20:09:15 +01:00
%union
{
char *str;
2012-08-07 19:43:13 +02:00
u64 num;
2012-03-15 20:09:16 +01:00
struct list_head *head;
2013-01-18 16:29:49 -03:00
struct parse_events_term *term;
2015-09-28 03:52:15 +00:00
struct tracepoint_name {
char *sys;
char *event;
} tracepoint_name;
2012-03-15 20:09:15 +01:00
}
%%
2012-06-15 14:31:40 +08:00
start:
2012-08-08 12:14:14 +02:00
PE_START_EVENTS start_events
2012-06-15 14:31:40 +08:00
|
2012-08-08 12:14:14 +02:00
PE_START_TERMS start_terms
start_events: groups
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2012-08-08 12:14:14 +02:00
parse_events_update_lists($1, &data->list);
}
groups:
groups ',' group
{
struct list_head *list = $1;
struct list_head *group = $3;
parse_events_update_lists(group, list);
$$ = list;
}
|
groups ',' event
{
struct list_head *list = $1;
struct list_head *event = $3;
parse_events_update_lists(event, list);
$$ = list;
}
|
group
|
event
group:
group_def ':' PE_MODIFIER_EVENT
{
struct list_head *list = $1;
ABORT_ON(parse_events__modifier_group(list, $3));
$$ = list;
}
|
group_def
group_def:
PE_NAME '{' events '}'
{
struct list_head *list = $3;
2013-01-22 18:09:29 +09:00
inc_group_count(list, _data);
2012-08-14 16:35:48 -03:00
parse_events__set_leader($1, list);
2012-08-08 12:14:14 +02:00
$$ = list;
}
|
'{' events '}'
{
struct list_head *list = $2;
2013-01-22 18:09:29 +09:00
inc_group_count(list, _data);
2012-08-14 16:35:48 -03:00
parse_events__set_leader(NULL, list);
2012-08-08 12:14:14 +02:00
$$ = list;
}
2012-06-15 14:31:40 +08:00
2012-03-15 20:09:15 +01:00
events:
2012-08-08 12:14:14 +02:00
events ',' event
{
struct list_head *event = $3;
struct list_head *list = $1;
parse_events_update_lists(event, list);
$$ = list;
}
|
event
2012-03-15 20:09:15 +01:00
2012-08-16 21:10:21 +02:00
event: event_mod
event_mod:
event_name PE_MODIFIER_EVENT
2012-03-15 20:09:15 +01:00
{
2012-08-08 12:14:14 +02:00
struct list_head *list = $1;
2012-06-15 14:31:38 +08:00
2012-03-20 19:15:40 +01:00
/*
* Apply modifier on all events added by single event definition
* (there could be more events added for multiple tracepoint
* definitions via '*?'.
*/
2012-08-08 12:21:54 +02:00
ABORT_ON(parse_events__modifier_event(list, $2, false));
2012-08-08 12:14:14 +02:00
$$ = list;
2012-03-15 20:09:15 +01:00
}
|
2012-08-16 21:10:21 +02:00
event_name
event_name:
PE_EVENT_NAME event_def
{
ABORT_ON(parse_events_name($2, $1));
free($1);
$$ = $2;
}
|
2012-03-15 20:09:15 +01:00
event_def
2012-03-15 20:09:18 +01:00
event_def: event_pmu |
event_legacy_symbol |
2012-03-15 20:09:15 +01:00
event_legacy_cache sep_dc |
event_legacy_mem |
event_legacy_tracepoint sep_dc |
event_legacy_numeric sep_dc |
event_legacy_raw sep_dc
2012-03-15 20:09:18 +01:00
event_pmu:
PE_NAME '/' event_config '/'
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2013-07-02 13:27:25 -06:00
struct list_head *list;
2012-05-21 09:12:51 +02:00
2013-07-02 13:27:25 -06:00
ALLOC_LIST(list);
2015-04-22 21:10:19 +02:00
ABORT_ON(parse_events_add_pmu(data, list, $1, $3));
2012-03-15 20:09:18 +01:00
parse_events__free_terms($3);
2012-05-21 09:12:51 +02:00
$$ = list;
2012-03-15 20:09:18 +01:00
}
2014-08-15 22:08:40 +03:00
|
PE_NAME '/' '/'
{
struct parse_events_evlist *data = _data;
struct list_head *list;
ALLOC_LIST(list);
2015-04-22 21:10:19 +02:00
ABORT_ON(parse_events_add_pmu(data, list, $1, NULL));
2014-08-15 22:08:40 +03:00
$$ = list;
}
2014-10-07 11:08:51 -04:00
|
PE_KERNEL_PMU_EVENT sep_dc
{
struct parse_events_evlist *data = _data;
struct list_head *head;
struct parse_events_term *term;
struct list_head *list;
ALLOC_LIST(head);
ABORT_ON(parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER,
2015-04-22 21:10:20 +02:00
$1, 1, &@1, NULL));
2014-10-07 11:08:51 -04:00
list_add_tail(&term->list, head);
ALLOC_LIST(list);
2015-04-22 21:10:19 +02:00
ABORT_ON(parse_events_add_pmu(data, list, "cpu", head));
2014-10-07 11:08:51 -04:00
parse_events__free_terms(head);
$$ = list;
}
|
PE_PMU_EVENT_PRE '-' PE_PMU_EVENT_SUF sep_dc
{
struct parse_events_evlist *data = _data;
struct list_head *head;
struct parse_events_term *term;
struct list_head *list;
char pmu_name[128];
snprintf(&pmu_name, 128, "%s-%s", $1, $3);
ALLOC_LIST(head);
ABORT_ON(parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER,
2015-04-22 21:10:20 +02:00
&pmu_name, 1, &@1, NULL));
2014-10-07 11:08:51 -04:00
list_add_tail(&term->list, head);
ALLOC_LIST(list);
2015-09-02 09:56:31 +02:00
ABORT_ON(parse_events_add_pmu(data, list, "cpu", head));
2014-10-07 11:08:51 -04:00
parse_events__free_terms(head);
$$ = list;
}
2012-03-15 20:09:18 +01:00
2012-07-04 00:00:43 +02:00
value_sym:
PE_VALUE_SYM_HW
|
PE_VALUE_SYM_SW
2012-03-15 20:09:15 +01:00
event_legacy_symbol:
2012-07-04 00:00:43 +02:00
value_sym '/' event_config '/'
2012-03-15 20:09:15 +01:00
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2013-07-02 13:27:25 -06:00
struct list_head *list;
2012-03-15 20:09:15 +01:00
int type = $1 >> 16;
int config = $1 & 255;
2013-07-02 13:27:25 -06:00
ALLOC_LIST(list);
2015-04-22 21:10:24 +02:00
ABORT_ON(parse_events_add_numeric(data, list, type, config, $3));
2012-03-15 20:09:16 +01:00
parse_events__free_terms($3);
2012-05-21 09:12:51 +02:00
$$ = list;
2012-03-15 20:09:16 +01:00
}
|
2012-07-04 00:00:43 +02:00
value_sym sep_slash_dc
2012-03-15 20:09:16 +01:00
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2013-07-02 13:27:25 -06:00
struct list_head *list;
2012-03-15 20:09:16 +01:00
int type = $1 >> 16;
int config = $1 & 255;
2013-07-02 13:27:25 -06:00
ALLOC_LIST(list);
2015-04-22 21:10:24 +02:00
ABORT_ON(parse_events_add_numeric(data, list, type, config, NULL));
2012-05-21 09:12:51 +02:00
$$ = list;
2012-03-15 20:09:15 +01:00
}
event_legacy_cache:
PE_NAME_CACHE_TYPE '-' PE_NAME_CACHE_OP_RESULT '-' PE_NAME_CACHE_OP_RESULT
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2013-07-02 13:27:25 -06:00
struct list_head *list;
2012-05-21 09:12:51 +02:00
2013-07-02 13:27:25 -06:00
ALLOC_LIST(list);
ABORT_ON(parse_events_add_cache(list, &data->idx, $1, $3, $5));
2012-05-21 09:12:51 +02:00
$$ = list;
2012-03-15 20:09:15 +01:00
}
|
PE_NAME_CACHE_TYPE '-' PE_NAME_CACHE_OP_RESULT
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2013-07-02 13:27:25 -06:00
struct list_head *list;
2012-05-21 09:12:51 +02:00
2013-07-02 13:27:25 -06:00
ALLOC_LIST(list);
ABORT_ON(parse_events_add_cache(list, &data->idx, $1, $3, NULL));
2012-05-21 09:12:51 +02:00
$$ = list;
2012-03-15 20:09:15 +01:00
}
|
PE_NAME_CACHE_TYPE
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2013-07-02 13:27:25 -06:00
struct list_head *list;
2012-05-21 09:12:51 +02:00
2013-07-02 13:27:25 -06:00
ALLOC_LIST(list);
ABORT_ON(parse_events_add_cache(list, &data->idx, $1, NULL, NULL));
2012-05-21 09:12:51 +02:00
$$ = list;
2012-03-15 20:09:15 +01:00
}
event_legacy_mem:
2014-05-29 17:26:51 +02:00
PE_PREFIX_MEM PE_VALUE '/' PE_VALUE ':' PE_MODIFIER_BP sep_dc
{
struct parse_events_evlist *data = _data;
struct list_head *list;
ALLOC_LIST(list);
ABORT_ON(parse_events_add_breakpoint(list, &data->idx,
(void *) $2, $6, $4));
$$ = list;
}
|
PE_PREFIX_MEM PE_VALUE '/' PE_VALUE sep_dc
{
struct parse_events_evlist *data = _data;
struct list_head *list;
ALLOC_LIST(list);
ABORT_ON(parse_events_add_breakpoint(list, &data->idx,
(void *) $2, NULL, $4));
$$ = list;
}
|
2012-03-15 20:09:15 +01:00
PE_PREFIX_MEM PE_VALUE ':' PE_MODIFIER_BP sep_dc
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2013-07-02 13:27:25 -06:00
struct list_head *list;
2012-05-21 09:12:51 +02:00
2013-07-02 13:27:25 -06:00
ALLOC_LIST(list);
ABORT_ON(parse_events_add_breakpoint(list, &data->idx,
2014-05-29 17:26:51 +02:00
(void *) $2, $4, 0));
2012-05-21 09:12:51 +02:00
$$ = list;
2012-03-15 20:09:15 +01:00
}
|
PE_PREFIX_MEM PE_VALUE sep_dc
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2013-07-02 13:27:25 -06:00
struct list_head *list;
2012-05-21 09:12:51 +02:00
2013-07-02 13:27:25 -06:00
ALLOC_LIST(list);
ABORT_ON(parse_events_add_breakpoint(list, &data->idx,
2014-05-29 17:26:51 +02:00
(void *) $2, NULL, 0));
2012-05-21 09:12:51 +02:00
$$ = list;
2012-03-15 20:09:15 +01:00
}
event_legacy_tracepoint:
2015-09-28 03:52:15 +00:00
tracepoint_name
2014-04-25 17:34:05 +02:00
{
struct parse_events_evlist *data = _data;
2015-09-07 10:38:07 +02:00
struct parse_events_error *error = data->error;
2014-04-25 17:34:05 +02:00
struct list_head *list;
ALLOC_LIST(list);
2015-09-28 03:52:16 +00:00
if (error)
error->idx = @1.first_column;
2015-09-28 03:52:15 +00:00
if (parse_events_add_tracepoint(list, &data->idx, $1.sys, $1.event,
2015-09-28 03:52:16 +00:00
error, NULL))
2015-09-07 10:38:07 +02:00
return -1;
2015-09-28 03:52:16 +00:00
$$ = list;
}
|
tracepoint_name '/' event_config '/'
{
struct parse_events_evlist *data = _data;
struct parse_events_error *error = data->error;
struct list_head *list;
ALLOC_LIST(list);
if (error)
error->idx = @1.first_column;
if (parse_events_add_tracepoint(list, &data->idx, $1.sys, $1.event,
error, $3))
return -1;
2014-04-25 17:34:05 +02:00
$$ = list;
}
2015-09-28 03:52:15 +00:00
tracepoint_name:
PE_NAME '-' PE_NAME ':' PE_NAME
{
char sys_name[128];
struct tracepoint_name tracepoint;
snprintf(&sys_name, 128, "%s-%s", $1, $3);
tracepoint.sys = &sys_name;
tracepoint.event = $5;
$$ = tracepoint;
}
2014-04-25 17:34:05 +02:00
|
2012-03-15 20:09:15 +01:00
PE_NAME ':' PE_NAME
{
2015-09-28 03:52:15 +00:00
struct tracepoint_name tracepoint = {$1, $3};
2012-05-21 09:12:51 +02:00
2015-09-28 03:52:15 +00:00
$$ = tracepoint;
2012-03-15 20:09:15 +01:00
}
event_legacy_numeric:
PE_VALUE ':' PE_VALUE
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2013-07-02 13:27:25 -06:00
struct list_head *list;
2012-05-21 09:12:51 +02:00
2013-07-02 13:27:25 -06:00
ALLOC_LIST(list);
2015-04-22 21:10:24 +02:00
ABORT_ON(parse_events_add_numeric(data, list, (u32)$1, $3, NULL));
2012-05-21 09:12:51 +02:00
$$ = list;
2012-03-15 20:09:15 +01:00
}
event_legacy_raw:
PE_RAW
{
2013-01-18 16:56:57 -03:00
struct parse_events_evlist *data = _data;
2013-07-02 13:27:25 -06:00
struct list_head *list;
2012-05-21 09:12:51 +02:00
2013-07-02 13:27:25 -06:00
ALLOC_LIST(list);
2015-04-22 21:10:24 +02:00
ABORT_ON(parse_events_add_numeric(data, list, PERF_TYPE_RAW, $1, NULL));
2012-05-21 09:12:51 +02:00
$$ = list;
2012-03-15 20:09:16 +01:00
}
2012-08-08 12:14:14 +02:00
start_terms: event_config
2012-06-15 14:31:40 +08:00
{
2013-01-18 16:56:57 -03:00
struct parse_events_terms *data = _data;
2012-06-15 14:31:40 +08:00
data->terms = $1;
}
2012-03-15 20:09:16 +01:00
event_config:
event_config ',' event_term
{
struct list_head *head = $1;
2013-01-18 16:29:49 -03:00
struct parse_events_term *term = $3;
2012-03-15 20:09:16 +01:00
ABORT_ON(!head);
list_add_tail(&term->list, head);
$$ = $1;
}
|
event_term
{
struct list_head *head = malloc(sizeof(*head));
2013-01-18 16:29:49 -03:00
struct parse_events_term *term = $1;
2012-03-15 20:09:16 +01:00
ABORT_ON(!head);
INIT_LIST_HEAD(head);
list_add_tail(&term->list, head);
$$ = head;
}
event_term:
PE_NAME '=' PE_NAME
{
2013-01-18 16:29:49 -03:00
struct parse_events_term *term;
2012-03-15 20:09:16 +01:00
2013-01-18 16:29:49 -03:00
ABORT_ON(parse_events_term__str(&term, PARSE_EVENTS__TERM_TYPE_USER,
2015-04-22 21:10:20 +02:00
$1, $3, &@1, &@3));
2012-03-15 20:09:16 +01:00
$$ = term;
}
|
PE_NAME '=' PE_VALUE
{
2013-01-18 16:29:49 -03:00
struct parse_events_term *term;
2012-03-15 20:09:16 +01:00
2013-01-18 16:29:49 -03:00
ABORT_ON(parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER,
2015-04-22 21:10:20 +02:00
$1, $3, &@1, &@3));
2012-03-15 20:09:16 +01:00
$$ = term;
}
|
2012-10-10 14:53:17 +02:00
PE_NAME '=' PE_VALUE_SYM_HW
{
2013-01-18 16:29:49 -03:00
struct parse_events_term *term;
2012-10-10 14:53:17 +02:00
int config = $3 & 255;
2013-01-18 16:29:49 -03:00
ABORT_ON(parse_events_term__sym_hw(&term, $1, config));
2012-10-10 14:53:17 +02:00
$$ = term;
}
|
2012-03-15 20:09:16 +01:00
PE_NAME
{
2013-01-18 16:29:49 -03:00
struct parse_events_term *term;
2012-03-15 20:09:16 +01:00
2013-01-18 16:29:49 -03:00
ABORT_ON(parse_events_term__num(&term, PARSE_EVENTS__TERM_TYPE_USER,
2015-04-22 21:10:20 +02:00
$1, 1, &@1, NULL));
2012-03-15 20:09:16 +01:00
$$ = term;
}
|
2012-10-10 14:53:17 +02:00
PE_VALUE_SYM_HW
{
2013-01-18 16:29:49 -03:00
struct parse_events_term *term;
2012-10-10 14:53:17 +02:00
int config = $1 & 255;
2013-01-18 16:29:49 -03:00
ABORT_ON(parse_events_term__sym_hw(&term, NULL, config));
2012-10-10 14:53:17 +02:00
$$ = term;
}
|
2012-05-21 09:12:53 +02:00
PE_TERM '=' PE_NAME
{
2013-01-18 16:29:49 -03:00
struct parse_events_term *term;
2012-05-21 09:12:53 +02:00
2015-04-22 21:10:20 +02:00
ABORT_ON(parse_events_term__str(&term, (int)$1, NULL, $3, &@1, &@3));
2012-05-21 09:12:53 +02:00
$$ = term;
}
|
2012-03-15 20:09:16 +01:00
PE_TERM '=' PE_VALUE
{
2013-01-18 16:29:49 -03:00
struct parse_events_term *term;
2012-03-15 20:09:16 +01:00
2015-04-22 21:10:20 +02:00
ABORT_ON(parse_events_term__num(&term, (int)$1, NULL, $3, &@1, &@3));
2012-03-15 20:09:16 +01:00
$$ = term;
}
|
PE_TERM
{
2013-01-18 16:29:49 -03:00
struct parse_events_term *term;
2012-03-15 20:09:16 +01:00
2015-04-22 21:10:20 +02:00
ABORT_ON(parse_events_term__num(&term, (int)$1, NULL, 1, &@1, NULL));
2012-03-15 20:09:16 +01:00
$$ = term;
2012-03-15 20:09:15 +01:00
}
sep_dc: ':' |
2012-03-15 20:09:16 +01:00
sep_slash_dc: '/' | ':' |
2012-03-15 20:09:15 +01:00
%%
2015-04-22 21:10:17 +02:00
void parse_events_error(YYLTYPE *loc, void *data,
void *scanner __maybe_unused,
2012-09-11 01:15:03 +03:00
char const *msg __maybe_unused)
2012-03-15 20:09:15 +01:00
{
2015-04-22 21:10:17 +02:00
parse_events_evlist_error(data, loc->last_column, "parser error");
2012-03-15 20:09:15 +01:00
}
