%pure-parser %name-prefix "parse_events_" %parse-param {void *_data} %parse-param {void *scanner} %lex-param {void* scanner} %{ #define YYDEBUG 1 #include #include #include "types.h" #include "util.h" #include "parse-events.h" #include "parse-events-bison.h" extern int parse_events_lex (YYSTYPE* lvalp, void* scanner); #define ABORT_ON(val) \ do { \ if (val) \ YYABORT; \ } while (0) %} %token PE_START_EVENTS PE_START_TERMS %token PE_VALUE PE_VALUE_SYM_HW PE_VALUE_SYM_SW PE_RAW PE_TERM %token PE_NAME %token PE_MODIFIER_EVENT PE_MODIFIER_BP %token PE_NAME_CACHE_TYPE PE_NAME_CACHE_OP_RESULT %token PE_PREFIX_MEM PE_PREFIX_RAW PE_PREFIX_GROUP %token PE_ERROR %type PE_VALUE %type PE_VALUE_SYM_HW %type PE_VALUE_SYM_SW %type PE_RAW %type PE_TERM %type PE_NAME %type PE_NAME_CACHE_TYPE %type PE_NAME_CACHE_OP_RESULT %type PE_MODIFIER_EVENT %type PE_MODIFIER_BP %type value_sym %type event_config %type event_term %type event_pmu %type event_legacy_symbol %type event_legacy_cache %type event_legacy_mem %type event_legacy_tracepoint %type event_legacy_numeric %type event_legacy_raw %type event_def %type event %type events %type group_def %type group %type groups %union { char *str; u64 num; struct list_head *head; struct parse_events__term *term; } %% start: PE_START_EVENTS start_events | PE_START_TERMS start_terms start_events: groups { struct parse_events_data__events *data = _data; 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; parse_events__group($1, list); $$ = list; } | '{' events '}' { struct list_head *list = $2; parse_events__group(NULL, list); $$ = list; } events: events ',' event { struct list_head *event = $3; struct list_head *list = $1; parse_events_update_lists(event, list); $$ = list; } | event event: event_def PE_MODIFIER_EVENT { struct list_head *list = $1; /* * Apply modifier on all events added by single event definition * (there could be more events added for multiple tracepoint * definitions via '*?'. */ ABORT_ON(parse_events__modifier_event(list, $2)); $$ = list; } | event_def event_def: event_pmu | event_legacy_symbol | event_legacy_cache sep_dc | event_legacy_mem | event_legacy_tracepoint sep_dc | event_legacy_numeric sep_dc | event_legacy_raw sep_dc event_pmu: PE_NAME '/' event_config '/' { struct parse_events_data__events *data = _data; struct list_head *list = NULL; ABORT_ON(parse_events_add_pmu(&list, &data->idx, $1, $3)); parse_events__free_terms($3); $$ = list; } value_sym: PE_VALUE_SYM_HW | PE_VALUE_SYM_SW event_legacy_symbol: value_sym '/' event_config '/' { struct parse_events_data__events *data = _data; struct list_head *list = NULL; int type = $1 >> 16; int config = $1 & 255; ABORT_ON(parse_events_add_numeric(&list, &data->idx, type, config, $3)); parse_events__free_terms($3); $$ = list; } | value_sym sep_slash_dc { struct parse_events_data__events *data = _data; struct list_head *list = NULL; int type = $1 >> 16; int config = $1 & 255; ABORT_ON(parse_events_add_numeric(&list, &data->idx, type, config, NULL)); $$ = list; } event_legacy_cache: PE_NAME_CACHE_TYPE '-' PE_NAME_CACHE_OP_RESULT '-' PE_NAME_CACHE_OP_RESULT { struct parse_events_data__events *data = _data; struct list_head *list = NULL; ABORT_ON(parse_events_add_cache(&list, &data->idx, $1, $3, $5)); $$ = list; } | PE_NAME_CACHE_TYPE '-' PE_NAME_CACHE_OP_RESULT { struct parse_events_data__events *data = _data; struct list_head *list = NULL; ABORT_ON(parse_events_add_cache(&list, &data->idx, $1, $3, NULL)); $$ = list; } | PE_NAME_CACHE_TYPE { struct parse_events_data__events *data = _data; struct list_head *list = NULL; ABORT_ON(parse_events_add_cache(&list, &data->idx, $1, NULL, NULL)); $$ = list; } event_legacy_mem: PE_PREFIX_MEM PE_VALUE ':' PE_MODIFIER_BP sep_dc { struct parse_events_data__events *data = _data; struct list_head *list = NULL; ABORT_ON(parse_events_add_breakpoint(&list, &data->idx, (void *) $2, $4)); $$ = list; } | PE_PREFIX_MEM PE_VALUE sep_dc { struct parse_events_data__events *data = _data; struct list_head *list = NULL; ABORT_ON(parse_events_add_breakpoint(&list, &data->idx, (void *) $2, NULL)); $$ = list; } event_legacy_tracepoint: PE_NAME ':' PE_NAME { struct parse_events_data__events *data = _data; struct list_head *list = NULL; ABORT_ON(parse_events_add_tracepoint(&list, &data->idx, $1, $3)); $$ = list; } event_legacy_numeric: PE_VALUE ':' PE_VALUE { struct parse_events_data__events *data = _data; struct list_head *list = NULL; ABORT_ON(parse_events_add_numeric(&list, &data->idx, (u32)$1, $3, NULL)); $$ = list; } event_legacy_raw: PE_RAW { struct parse_events_data__events *data = _data; struct list_head *list = NULL; ABORT_ON(parse_events_add_numeric(&list, &data->idx, PERF_TYPE_RAW, $1, NULL)); $$ = list; } start_terms: event_config { struct parse_events_data__terms *data = _data; data->terms = $1; } event_config: event_config ',' event_term { struct list_head *head = $1; struct parse_events__term *term = $3; ABORT_ON(!head); list_add_tail(&term->list, head); $$ = $1; } | event_term { struct list_head *head = malloc(sizeof(*head)); struct parse_events__term *term = $1; ABORT_ON(!head); INIT_LIST_HEAD(head); list_add_tail(&term->list, head); $$ = head; } event_term: PE_NAME '=' PE_NAME { struct parse_events__term *term; ABORT_ON(parse_events__term_str(&term, PARSE_EVENTS__TERM_TYPE_USER, $1, $3)); $$ = term; } | PE_NAME '=' PE_VALUE { struct parse_events__term *term; ABORT_ON(parse_events__term_num(&term, PARSE_EVENTS__TERM_TYPE_USER, $1, $3)); $$ = term; } | PE_NAME { struct parse_events__term *term; ABORT_ON(parse_events__term_num(&term, PARSE_EVENTS__TERM_TYPE_USER, $1, 1)); $$ = term; } | PE_TERM '=' PE_NAME { struct parse_events__term *term; ABORT_ON(parse_events__term_str(&term, (int)$1, NULL, $3)); $$ = term; } | PE_TERM '=' PE_VALUE { struct parse_events__term *term; ABORT_ON(parse_events__term_num(&term, (int)$1, NULL, $3)); $$ = term; } | PE_TERM { struct parse_events__term *term; ABORT_ON(parse_events__term_num(&term, (int)$1, NULL, 1)); $$ = term; } sep_dc: ':' | sep_slash_dc: '/' | ':' | %% void parse_events_error(void *data __used, void *scanner __used, char const *msg __used) { }