1 #include <linux/hw_breakpoint.h>
6 #include "parse-options.h"
7 #include "parse-events.h"
14 #include <api/fs/debugfs.h>
15 #include "parse-events-bison.h"
16 #define YY_EXTRA_TYPE int
17 #include "parse-events-flex.h"
19 #include "thread_map.h"
23 #define MAX_NAME_LEN 100
26 extern int parse_events_debug
;
28 int parse_events_parse(void *data
, void *scanner
);
30 static struct perf_pmu_event_symbol
*perf_pmu_events_list
;
32 * The variable indicates the number of supported pmu event symbols.
33 * 0 means not initialized and ready to init
34 * -1 means failed to init, don't try anymore
35 * >0 is the number of supported pmu event symbols
37 static int perf_pmu_events_list_num
;
39 struct event_symbol event_symbols_hw
[PERF_COUNT_HW_MAX
] = {
40 [PERF_COUNT_HW_CPU_CYCLES
] = {
41 .symbol
= "cpu-cycles",
44 [PERF_COUNT_HW_INSTRUCTIONS
] = {
45 .symbol
= "instructions",
48 [PERF_COUNT_HW_CACHE_REFERENCES
] = {
49 .symbol
= "cache-references",
52 [PERF_COUNT_HW_CACHE_MISSES
] = {
53 .symbol
= "cache-misses",
56 [PERF_COUNT_HW_BRANCH_INSTRUCTIONS
] = {
57 .symbol
= "branch-instructions",
60 [PERF_COUNT_HW_BRANCH_MISSES
] = {
61 .symbol
= "branch-misses",
64 [PERF_COUNT_HW_BUS_CYCLES
] = {
65 .symbol
= "bus-cycles",
68 [PERF_COUNT_HW_STALLED_CYCLES_FRONTEND
] = {
69 .symbol
= "stalled-cycles-frontend",
70 .alias
= "idle-cycles-frontend",
72 [PERF_COUNT_HW_STALLED_CYCLES_BACKEND
] = {
73 .symbol
= "stalled-cycles-backend",
74 .alias
= "idle-cycles-backend",
76 [PERF_COUNT_HW_REF_CPU_CYCLES
] = {
77 .symbol
= "ref-cycles",
82 struct event_symbol event_symbols_sw
[PERF_COUNT_SW_MAX
] = {
83 [PERF_COUNT_SW_CPU_CLOCK
] = {
84 .symbol
= "cpu-clock",
87 [PERF_COUNT_SW_TASK_CLOCK
] = {
88 .symbol
= "task-clock",
91 [PERF_COUNT_SW_PAGE_FAULTS
] = {
92 .symbol
= "page-faults",
95 [PERF_COUNT_SW_CONTEXT_SWITCHES
] = {
96 .symbol
= "context-switches",
99 [PERF_COUNT_SW_CPU_MIGRATIONS
] = {
100 .symbol
= "cpu-migrations",
101 .alias
= "migrations",
103 [PERF_COUNT_SW_PAGE_FAULTS_MIN
] = {
104 .symbol
= "minor-faults",
107 [PERF_COUNT_SW_PAGE_FAULTS_MAJ
] = {
108 .symbol
= "major-faults",
111 [PERF_COUNT_SW_ALIGNMENT_FAULTS
] = {
112 .symbol
= "alignment-faults",
115 [PERF_COUNT_SW_EMULATION_FAULTS
] = {
116 .symbol
= "emulation-faults",
119 [PERF_COUNT_SW_DUMMY
] = {
125 #define __PERF_EVENT_FIELD(config, name) \
126 ((config & PERF_EVENT_##name##_MASK) >> PERF_EVENT_##name##_SHIFT)
128 #define PERF_EVENT_RAW(config) __PERF_EVENT_FIELD(config, RAW)
129 #define PERF_EVENT_CONFIG(config) __PERF_EVENT_FIELD(config, CONFIG)
130 #define PERF_EVENT_TYPE(config) __PERF_EVENT_FIELD(config, TYPE)
131 #define PERF_EVENT_ID(config) __PERF_EVENT_FIELD(config, EVENT)
133 #define for_each_subsystem(sys_dir, sys_dirent, sys_next) \
134 while (!readdir_r(sys_dir, &sys_dirent, &sys_next) && sys_next) \
135 if (sys_dirent.d_type == DT_DIR && \
136 (strcmp(sys_dirent.d_name, ".")) && \
137 (strcmp(sys_dirent.d_name, "..")))
139 static int tp_event_has_id(struct dirent
*sys_dir
, struct dirent
*evt_dir
)
141 char evt_path
[MAXPATHLEN
];
144 snprintf(evt_path
, MAXPATHLEN
, "%s/%s/%s/id", tracing_events_path
,
145 sys_dir
->d_name
, evt_dir
->d_name
);
146 fd
= open(evt_path
, O_RDONLY
);
154 #define for_each_event(sys_dirent, evt_dir, evt_dirent, evt_next) \
155 while (!readdir_r(evt_dir, &evt_dirent, &evt_next) && evt_next) \
156 if (evt_dirent.d_type == DT_DIR && \
157 (strcmp(evt_dirent.d_name, ".")) && \
158 (strcmp(evt_dirent.d_name, "..")) && \
159 (!tp_event_has_id(&sys_dirent, &evt_dirent)))
161 #define MAX_EVENT_LENGTH 512
164 struct tracepoint_path
*tracepoint_id_to_path(u64 config
)
166 struct tracepoint_path
*path
= NULL
;
167 DIR *sys_dir
, *evt_dir
;
168 struct dirent
*sys_next
, *evt_next
, sys_dirent
, evt_dirent
;
172 char evt_path
[MAXPATHLEN
];
173 char dir_path
[MAXPATHLEN
];
175 sys_dir
= opendir(tracing_events_path
);
179 for_each_subsystem(sys_dir
, sys_dirent
, sys_next
) {
181 snprintf(dir_path
, MAXPATHLEN
, "%s/%s", tracing_events_path
,
183 evt_dir
= opendir(dir_path
);
187 for_each_event(sys_dirent
, evt_dir
, evt_dirent
, evt_next
) {
189 snprintf(evt_path
, MAXPATHLEN
, "%s/%s/id", dir_path
,
191 fd
= open(evt_path
, O_RDONLY
);
194 if (read(fd
, id_buf
, sizeof(id_buf
)) < 0) {
203 path
= zalloc(sizeof(*path
));
204 path
->system
= malloc(MAX_EVENT_LENGTH
);
209 path
->name
= malloc(MAX_EVENT_LENGTH
);
211 zfree(&path
->system
);
215 strncpy(path
->system
, sys_dirent
.d_name
,
217 strncpy(path
->name
, evt_dirent
.d_name
,
229 struct tracepoint_path
*tracepoint_name_to_path(const char *name
)
231 struct tracepoint_path
*path
= zalloc(sizeof(*path
));
232 char *str
= strchr(name
, ':');
234 if (path
== NULL
|| str
== NULL
) {
239 path
->system
= strndup(name
, str
- name
);
240 path
->name
= strdup(str
+1);
242 if (path
->system
== NULL
|| path
->name
== NULL
) {
243 zfree(&path
->system
);
252 const char *event_type(int type
)
255 case PERF_TYPE_HARDWARE
:
258 case PERF_TYPE_SOFTWARE
:
261 case PERF_TYPE_TRACEPOINT
:
264 case PERF_TYPE_HW_CACHE
:
265 return "hardware-cache";
276 static struct perf_evsel
*
277 __add_event(struct list_head
*list
, int *idx
,
278 struct perf_event_attr
*attr
,
279 char *name
, struct cpu_map
*cpus
,
280 struct list_head
*config_terms
)
282 struct perf_evsel
*evsel
;
284 event_attr_init(attr
);
286 evsel
= perf_evsel__new_idx(attr
, (*idx
)++);
291 evsel
->cpus
= cpu_map__get(cpus
);
294 evsel
->name
= strdup(name
);
297 list_splice(config_terms
, &evsel
->config_terms
);
299 list_add_tail(&evsel
->node
, list
);
303 static int add_event(struct list_head
*list
, int *idx
,
304 struct perf_event_attr
*attr
, char *name
,
305 struct list_head
*config_terms
)
307 return __add_event(list
, idx
, attr
, name
, NULL
, config_terms
) ? 0 : -ENOMEM
;
310 static int parse_aliases(char *str
, const char *names
[][PERF_EVSEL__MAX_ALIASES
], int size
)
315 for (i
= 0; i
< size
; i
++) {
316 for (j
= 0; j
< PERF_EVSEL__MAX_ALIASES
&& names
[i
][j
]; j
++) {
317 n
= strlen(names
[i
][j
]);
318 if (n
> longest
&& !strncasecmp(str
, names
[i
][j
], n
))
328 int parse_events_add_cache(struct list_head
*list
, int *idx
,
329 char *type
, char *op_result1
, char *op_result2
)
331 struct perf_event_attr attr
;
332 char name
[MAX_NAME_LEN
];
333 int cache_type
= -1, cache_op
= -1, cache_result
= -1;
334 char *op_result
[2] = { op_result1
, op_result2
};
338 * No fallback - if we cannot get a clear cache type
341 cache_type
= parse_aliases(type
, perf_evsel__hw_cache
,
342 PERF_COUNT_HW_CACHE_MAX
);
343 if (cache_type
== -1)
346 n
= snprintf(name
, MAX_NAME_LEN
, "%s", type
);
348 for (i
= 0; (i
< 2) && (op_result
[i
]); i
++) {
349 char *str
= op_result
[i
];
351 n
+= snprintf(name
+ n
, MAX_NAME_LEN
- n
, "-%s", str
);
353 if (cache_op
== -1) {
354 cache_op
= parse_aliases(str
, perf_evsel__hw_cache_op
,
355 PERF_COUNT_HW_CACHE_OP_MAX
);
357 if (!perf_evsel__is_cache_op_valid(cache_type
, cache_op
))
363 if (cache_result
== -1) {
364 cache_result
= parse_aliases(str
, perf_evsel__hw_cache_result
,
365 PERF_COUNT_HW_CACHE_RESULT_MAX
);
366 if (cache_result
>= 0)
372 * Fall back to reads:
375 cache_op
= PERF_COUNT_HW_CACHE_OP_READ
;
378 * Fall back to accesses:
380 if (cache_result
== -1)
381 cache_result
= PERF_COUNT_HW_CACHE_RESULT_ACCESS
;
383 memset(&attr
, 0, sizeof(attr
));
384 attr
.config
= cache_type
| (cache_op
<< 8) | (cache_result
<< 16);
385 attr
.type
= PERF_TYPE_HW_CACHE
;
386 return add_event(list
, idx
, &attr
, name
, NULL
);
389 static int add_tracepoint(struct list_head
*list
, int *idx
,
390 char *sys_name
, char *evt_name
)
392 struct perf_evsel
*evsel
;
394 evsel
= perf_evsel__newtp_idx(sys_name
, evt_name
, (*idx
)++);
398 list_add_tail(&evsel
->node
, list
);
403 static int add_tracepoint_multi_event(struct list_head
*list
, int *idx
,
404 char *sys_name
, char *evt_name
)
406 char evt_path
[MAXPATHLEN
];
407 struct dirent
*evt_ent
;
411 snprintf(evt_path
, MAXPATHLEN
, "%s/%s", tracing_events_path
, sys_name
);
412 evt_dir
= opendir(evt_path
);
414 perror("Can't open event dir");
418 while (!ret
&& (evt_ent
= readdir(evt_dir
))) {
419 if (!strcmp(evt_ent
->d_name
, ".")
420 || !strcmp(evt_ent
->d_name
, "..")
421 || !strcmp(evt_ent
->d_name
, "enable")
422 || !strcmp(evt_ent
->d_name
, "filter"))
425 if (!strglobmatch(evt_ent
->d_name
, evt_name
))
428 ret
= add_tracepoint(list
, idx
, sys_name
, evt_ent
->d_name
);
435 static int add_tracepoint_event(struct list_head
*list
, int *idx
,
436 char *sys_name
, char *evt_name
)
438 return strpbrk(evt_name
, "*?") ?
439 add_tracepoint_multi_event(list
, idx
, sys_name
, evt_name
) :
440 add_tracepoint(list
, idx
, sys_name
, evt_name
);
443 static int add_tracepoint_multi_sys(struct list_head
*list
, int *idx
,
444 char *sys_name
, char *evt_name
)
446 struct dirent
*events_ent
;
450 events_dir
= opendir(tracing_events_path
);
452 perror("Can't open event dir");
456 while (!ret
&& (events_ent
= readdir(events_dir
))) {
457 if (!strcmp(events_ent
->d_name
, ".")
458 || !strcmp(events_ent
->d_name
, "..")
459 || !strcmp(events_ent
->d_name
, "enable")
460 || !strcmp(events_ent
->d_name
, "header_event")
461 || !strcmp(events_ent
->d_name
, "header_page"))
464 if (!strglobmatch(events_ent
->d_name
, sys_name
))
467 ret
= add_tracepoint_event(list
, idx
, events_ent
->d_name
,
471 closedir(events_dir
);
475 int parse_events_add_tracepoint(struct list_head
*list
, int *idx
,
476 char *sys
, char *event
)
478 if (strpbrk(sys
, "*?"))
479 return add_tracepoint_multi_sys(list
, idx
, sys
, event
);
481 return add_tracepoint_event(list
, idx
, sys
, event
);
485 parse_breakpoint_type(const char *type
, struct perf_event_attr
*attr
)
489 for (i
= 0; i
< 3; i
++) {
490 if (!type
|| !type
[i
])
493 #define CHECK_SET_TYPE(bit) \
495 if (attr->bp_type & bit) \
498 attr->bp_type |= bit; \
503 CHECK_SET_TYPE(HW_BREAKPOINT_R
);
506 CHECK_SET_TYPE(HW_BREAKPOINT_W
);
509 CHECK_SET_TYPE(HW_BREAKPOINT_X
);
516 #undef CHECK_SET_TYPE
518 if (!attr
->bp_type
) /* Default */
519 attr
->bp_type
= HW_BREAKPOINT_R
| HW_BREAKPOINT_W
;
524 int parse_events_add_breakpoint(struct list_head
*list
, int *idx
,
525 void *ptr
, char *type
, u64 len
)
527 struct perf_event_attr attr
;
529 memset(&attr
, 0, sizeof(attr
));
530 attr
.bp_addr
= (unsigned long) ptr
;
532 if (parse_breakpoint_type(type
, &attr
))
535 /* Provide some defaults if len is not specified */
537 if (attr
.bp_type
== HW_BREAKPOINT_X
)
540 len
= HW_BREAKPOINT_LEN_4
;
545 attr
.type
= PERF_TYPE_BREAKPOINT
;
546 attr
.sample_period
= 1;
548 return add_event(list
, idx
, &attr
, NULL
, NULL
);
551 static int check_type_val(struct parse_events_term
*term
,
552 struct parse_events_error
*err
,
555 if (type
== term
->type_val
)
559 err
->idx
= term
->err_val
;
560 if (type
== PARSE_EVENTS__TERM_TYPE_NUM
)
561 err
->str
= strdup("expected numeric value");
563 err
->str
= strdup("expected string value");
568 static int config_term(struct perf_event_attr
*attr
,
569 struct parse_events_term
*term
,
570 struct parse_events_error
*err
)
572 #define CHECK_TYPE_VAL(type) \
574 if (check_type_val(term, err, PARSE_EVENTS__TERM_TYPE_ ## type)) \
578 switch (term
->type_term
) {
579 case PARSE_EVENTS__TERM_TYPE_USER
:
581 * Always succeed for sysfs terms, as we dont know
582 * at this point what type they need to have.
585 case PARSE_EVENTS__TERM_TYPE_CONFIG
:
587 attr
->config
= term
->val
.num
;
589 case PARSE_EVENTS__TERM_TYPE_CONFIG1
:
591 attr
->config1
= term
->val
.num
;
593 case PARSE_EVENTS__TERM_TYPE_CONFIG2
:
595 attr
->config2
= term
->val
.num
;
597 case PARSE_EVENTS__TERM_TYPE_SAMPLE_PERIOD
:
600 case PARSE_EVENTS__TERM_TYPE_BRANCH_SAMPLE_TYPE
:
602 * TODO uncomment when the field is available
603 * attr->branch_sample_type = term->val.num;
606 case PARSE_EVENTS__TERM_TYPE_NAME
:
614 #undef CHECK_TYPE_VAL
617 static int config_attr(struct perf_event_attr
*attr
,
618 struct list_head
*head
,
619 struct parse_events_error
*err
)
621 struct parse_events_term
*term
;
623 list_for_each_entry(term
, head
, list
)
624 if (config_term(attr
, term
, err
))
630 static int get_config_terms(struct list_head
*head_config
,
631 struct list_head
*head_terms __maybe_unused
)
633 #define ADD_CONFIG_TERM(__type, __name, __val) \
635 struct perf_evsel_config_term *__t; \
637 __t = zalloc(sizeof(*__t)); \
641 INIT_LIST_HEAD(&__t->list); \
642 __t->type = PERF_EVSEL__CONFIG_TERM_ ## __type; \
643 __t->val.__name = __val; \
644 list_add_tail(&__t->list, head_terms); \
647 struct parse_events_term
*term
;
649 list_for_each_entry(term
, head_config
, list
) {
650 switch (term
->type_term
) {
651 case PARSE_EVENTS__TERM_TYPE_SAMPLE_PERIOD
:
652 ADD_CONFIG_TERM(PERIOD
, period
, term
->val
.num
);
657 #undef ADD_EVSEL_CONFIG
661 int parse_events_add_numeric(struct parse_events_evlist
*data
,
662 struct list_head
*list
,
663 u32 type
, u64 config
,
664 struct list_head
*head_config
)
666 struct perf_event_attr attr
;
667 LIST_HEAD(config_terms
);
669 memset(&attr
, 0, sizeof(attr
));
671 attr
.config
= config
;
674 if (config_attr(&attr
, head_config
, data
->error
))
677 if (get_config_terms(head_config
, &config_terms
))
681 return add_event(list
, &data
->idx
, &attr
, NULL
, &config_terms
);
684 static int parse_events__is_name_term(struct parse_events_term
*term
)
686 return term
->type_term
== PARSE_EVENTS__TERM_TYPE_NAME
;
689 static char *pmu_event_name(struct list_head
*head_terms
)
691 struct parse_events_term
*term
;
693 list_for_each_entry(term
, head_terms
, list
)
694 if (parse_events__is_name_term(term
))
695 return term
->val
.str
;
700 int parse_events_add_pmu(struct parse_events_evlist
*data
,
701 struct list_head
*list
, char *name
,
702 struct list_head
*head_config
)
704 struct perf_event_attr attr
;
705 struct perf_pmu_info info
;
706 struct perf_pmu
*pmu
;
707 struct perf_evsel
*evsel
;
708 LIST_HEAD(config_terms
);
710 pmu
= perf_pmu__find(name
);
714 if (pmu
->default_config
) {
715 memcpy(&attr
, pmu
->default_config
,
716 sizeof(struct perf_event_attr
));
718 memset(&attr
, 0, sizeof(attr
));
722 attr
.type
= pmu
->type
;
723 evsel
= __add_event(list
, &data
->idx
, &attr
, NULL
, pmu
->cpus
, NULL
);
724 return evsel
? 0 : -ENOMEM
;
727 if (perf_pmu__check_alias(pmu
, head_config
, &info
))
731 * Configure hardcoded terms first, no need to check
732 * return value when called with fail == 0 ;)
734 if (config_attr(&attr
, head_config
, data
->error
))
737 if (get_config_terms(head_config
, &config_terms
))
740 if (perf_pmu__config(pmu
, &attr
, head_config
, data
->error
))
743 evsel
= __add_event(list
, &data
->idx
, &attr
,
744 pmu_event_name(head_config
), pmu
->cpus
,
747 evsel
->unit
= info
.unit
;
748 evsel
->scale
= info
.scale
;
749 evsel
->per_pkg
= info
.per_pkg
;
750 evsel
->snapshot
= info
.snapshot
;
753 return evsel
? 0 : -ENOMEM
;
756 int parse_events__modifier_group(struct list_head
*list
,
759 return parse_events__modifier_event(list
, event_mod
, true);
762 void parse_events__set_leader(char *name
, struct list_head
*list
)
764 struct perf_evsel
*leader
;
766 __perf_evlist__set_leader(list
);
767 leader
= list_entry(list
->next
, struct perf_evsel
, node
);
768 leader
->group_name
= name
? strdup(name
) : NULL
;
771 /* list_event is assumed to point to malloc'ed memory */
772 void parse_events_update_lists(struct list_head
*list_event
,
773 struct list_head
*list_all
)
776 * Called for single event definition. Update the
777 * 'all event' list, and reinit the 'single event'
778 * list, for next event definition.
780 list_splice_tail(list_event
, list_all
);
784 struct event_modifier
{
797 static int get_event_modifier(struct event_modifier
*mod
, char *str
,
798 struct perf_evsel
*evsel
)
800 int eu
= evsel
? evsel
->attr
.exclude_user
: 0;
801 int ek
= evsel
? evsel
->attr
.exclude_kernel
: 0;
802 int eh
= evsel
? evsel
->attr
.exclude_hv
: 0;
803 int eH
= evsel
? evsel
->attr
.exclude_host
: 0;
804 int eG
= evsel
? evsel
->attr
.exclude_guest
: 0;
805 int eI
= evsel
? evsel
->attr
.exclude_idle
: 0;
806 int precise
= evsel
? evsel
->attr
.precise_ip
: 0;
808 int pinned
= evsel
? evsel
->attr
.pinned
: 0;
810 int exclude
= eu
| ek
| eh
;
811 int exclude_GH
= evsel
? evsel
->exclude_GH
: 0;
813 memset(mod
, 0, sizeof(*mod
));
818 exclude
= eu
= ek
= eh
= 1;
820 } else if (*str
== 'k') {
822 exclude
= eu
= ek
= eh
= 1;
824 } else if (*str
== 'h') {
826 exclude
= eu
= ek
= eh
= 1;
828 } else if (*str
== 'G') {
830 exclude_GH
= eG
= eH
= 1;
832 } else if (*str
== 'H') {
834 exclude_GH
= eG
= eH
= 1;
836 } else if (*str
== 'I') {
838 } else if (*str
== 'p') {
840 /* use of precise requires exclude_guest */
843 } else if (*str
== 'S') {
845 } else if (*str
== 'D') {
856 * 0 - SAMPLE_IP can have arbitrary skid
857 * 1 - SAMPLE_IP must have constant skid
858 * 2 - SAMPLE_IP requested to have 0 skid
859 * 3 - SAMPLE_IP must have 0 skid
861 * See also PERF_RECORD_MISC_EXACT_IP
872 mod
->precise
= precise
;
873 mod
->exclude_GH
= exclude_GH
;
874 mod
->sample_read
= sample_read
;
875 mod
->pinned
= pinned
;
881 * Basic modifier sanity check to validate it contains only one
882 * instance of any modifier (apart from 'p') present.
884 static int check_modifier(char *str
)
888 /* The sizeof includes 0 byte as well. */
889 if (strlen(str
) > (sizeof("ukhGHpppSDI") - 1))
893 if (*p
!= 'p' && strchr(p
+ 1, *p
))
901 int parse_events__modifier_event(struct list_head
*list
, char *str
, bool add
)
903 struct perf_evsel
*evsel
;
904 struct event_modifier mod
;
909 if (check_modifier(str
))
912 if (!add
&& get_event_modifier(&mod
, str
, NULL
))
915 __evlist__for_each(list
, evsel
) {
916 if (add
&& get_event_modifier(&mod
, str
, evsel
))
919 evsel
->attr
.exclude_user
= mod
.eu
;
920 evsel
->attr
.exclude_kernel
= mod
.ek
;
921 evsel
->attr
.exclude_hv
= mod
.eh
;
922 evsel
->attr
.precise_ip
= mod
.precise
;
923 evsel
->attr
.exclude_host
= mod
.eH
;
924 evsel
->attr
.exclude_guest
= mod
.eG
;
925 evsel
->attr
.exclude_idle
= mod
.eI
;
926 evsel
->exclude_GH
= mod
.exclude_GH
;
927 evsel
->sample_read
= mod
.sample_read
;
929 if (perf_evsel__is_group_leader(evsel
))
930 evsel
->attr
.pinned
= mod
.pinned
;
936 int parse_events_name(struct list_head
*list
, char *name
)
938 struct perf_evsel
*evsel
;
940 __evlist__for_each(list
, evsel
) {
942 evsel
->name
= strdup(name
);
949 comp_pmu(const void *p1
, const void *p2
)
951 struct perf_pmu_event_symbol
*pmu1
= (struct perf_pmu_event_symbol
*) p1
;
952 struct perf_pmu_event_symbol
*pmu2
= (struct perf_pmu_event_symbol
*) p2
;
954 return strcmp(pmu1
->symbol
, pmu2
->symbol
);
957 static void perf_pmu__parse_cleanup(void)
959 if (perf_pmu_events_list_num
> 0) {
960 struct perf_pmu_event_symbol
*p
;
963 for (i
= 0; i
< perf_pmu_events_list_num
; i
++) {
964 p
= perf_pmu_events_list
+ i
;
967 free(perf_pmu_events_list
);
968 perf_pmu_events_list
= NULL
;
969 perf_pmu_events_list_num
= 0;
973 #define SET_SYMBOL(str, stype) \
982 * Read the pmu events list from sysfs
983 * Save it into perf_pmu_events_list
985 static void perf_pmu__parse_init(void)
988 struct perf_pmu
*pmu
= NULL
;
989 struct perf_pmu_alias
*alias
;
992 pmu
= perf_pmu__find("cpu");
993 if ((pmu
== NULL
) || list_empty(&pmu
->aliases
)) {
994 perf_pmu_events_list_num
= -1;
997 list_for_each_entry(alias
, &pmu
->aliases
, list
) {
998 if (strchr(alias
->name
, '-'))
1002 perf_pmu_events_list
= malloc(sizeof(struct perf_pmu_event_symbol
) * len
);
1003 if (!perf_pmu_events_list
)
1005 perf_pmu_events_list_num
= len
;
1008 list_for_each_entry(alias
, &pmu
->aliases
, list
) {
1009 struct perf_pmu_event_symbol
*p
= perf_pmu_events_list
+ len
;
1010 char *tmp
= strchr(alias
->name
, '-');
1013 SET_SYMBOL(strndup(alias
->name
, tmp
- alias
->name
),
1014 PMU_EVENT_SYMBOL_PREFIX
);
1016 SET_SYMBOL(strdup(++tmp
), PMU_EVENT_SYMBOL_SUFFIX
);
1019 SET_SYMBOL(strdup(alias
->name
), PMU_EVENT_SYMBOL
);
1023 qsort(perf_pmu_events_list
, len
,
1024 sizeof(struct perf_pmu_event_symbol
), comp_pmu
);
1028 perf_pmu__parse_cleanup();
1031 enum perf_pmu_event_symbol_type
1032 perf_pmu__parse_check(const char *name
)
1034 struct perf_pmu_event_symbol p
, *r
;
1036 /* scan kernel pmu events from sysfs if needed */
1037 if (perf_pmu_events_list_num
== 0)
1038 perf_pmu__parse_init();
1040 * name "cpu" could be prefix of cpu-cycles or cpu// events.
1041 * cpu-cycles has been handled by hardcode.
1042 * So it must be cpu// events, not kernel pmu event.
1044 if ((perf_pmu_events_list_num
<= 0) || !strcmp(name
, "cpu"))
1045 return PMU_EVENT_SYMBOL_ERR
;
1047 p
.symbol
= strdup(name
);
1048 r
= bsearch(&p
, perf_pmu_events_list
,
1049 (size_t) perf_pmu_events_list_num
,
1050 sizeof(struct perf_pmu_event_symbol
), comp_pmu
);
1052 return r
? r
->type
: PMU_EVENT_SYMBOL_ERR
;
1055 static int parse_events__scanner(const char *str
, void *data
, int start_token
)
1057 YY_BUFFER_STATE buffer
;
1061 ret
= parse_events_lex_init_extra(start_token
, &scanner
);
1065 buffer
= parse_events__scan_string(str
, scanner
);
1068 parse_events_debug
= 1;
1070 ret
= parse_events_parse(data
, scanner
);
1072 parse_events__flush_buffer(buffer
, scanner
);
1073 parse_events__delete_buffer(buffer
, scanner
);
1074 parse_events_lex_destroy(scanner
);
1079 * parse event config string, return a list of event terms.
1081 int parse_events_terms(struct list_head
*terms
, const char *str
)
1083 struct parse_events_terms data
= {
1088 ret
= parse_events__scanner(str
, &data
, PE_START_TERMS
);
1090 list_splice(data
.terms
, terms
);
1096 parse_events__free_terms(data
.terms
);
1100 int parse_events(struct perf_evlist
*evlist
, const char *str
,
1101 struct parse_events_error
*err
)
1103 struct parse_events_evlist data
= {
1104 .list
= LIST_HEAD_INIT(data
.list
),
1105 .idx
= evlist
->nr_entries
,
1110 ret
= parse_events__scanner(str
, &data
, PE_START_EVENTS
);
1111 perf_pmu__parse_cleanup();
1113 int entries
= data
.idx
- evlist
->nr_entries
;
1114 struct perf_evsel
*last
;
1116 perf_evlist__splice_list_tail(evlist
, &data
.list
, entries
);
1117 evlist
->nr_groups
+= data
.nr_groups
;
1118 last
= perf_evlist__last(evlist
);
1119 last
->cmdline_group_boundary
= true;
1125 * There are 2 users - builtin-record and builtin-test objects.
1126 * Both call perf_evlist__delete in case of error, so we dont
1132 #define MAX_WIDTH 1000
1133 static int get_term_width(void)
1137 get_term_dimensions(&ws
);
1138 return ws
.ws_col
> MAX_WIDTH
? MAX_WIDTH
: ws
.ws_col
;
1141 static void parse_events_print_error(struct parse_events_error
*err
,
1144 const char *str
= "invalid or unsupported event: ";
1145 char _buf
[MAX_WIDTH
];
1146 char *buf
= (char *) event
;
1150 /* -2 for extra '' in the final fprintf */
1151 int width
= get_term_width() - 2;
1152 int len_event
= strlen(event
);
1153 int len_str
, max_len
, cut
= 0;
1156 * Maximum error index indent, we will cut
1157 * the event string if it's bigger.
1159 int max_err_idx
= 10;
1162 * Let's be specific with the message when
1163 * we have the precise error.
1165 str
= "event syntax error: ";
1166 len_str
= strlen(str
);
1167 max_len
= width
- len_str
;
1171 /* We're cutting from the beggining. */
1172 if (err
->idx
> max_err_idx
)
1173 cut
= err
->idx
- max_err_idx
;
1175 strncpy(buf
, event
+ cut
, max_len
);
1177 /* Mark cut parts with '..' on both sides. */
1179 buf
[0] = buf
[1] = '.';
1181 if ((len_event
- cut
) > max_len
) {
1182 buf
[max_len
- 1] = buf
[max_len
- 2] = '.';
1186 idx
= len_str
+ err
->idx
- cut
;
1189 fprintf(stderr
, "%s'%s'\n", str
, buf
);
1191 fprintf(stderr
, "%*s\\___ %s\n", idx
+ 1, "", err
->str
);
1193 fprintf(stderr
, "\n%s\n", err
->help
);
1198 fprintf(stderr
, "Run 'perf list' for a list of valid events\n");
1203 int parse_events_option(const struct option
*opt
, const char *str
,
1204 int unset __maybe_unused
)
1206 struct perf_evlist
*evlist
= *(struct perf_evlist
**)opt
->value
;
1207 struct parse_events_error err
= { .idx
= 0, };
1208 int ret
= parse_events(evlist
, str
, &err
);
1211 parse_events_print_error(&err
, str
);
1217 foreach_evsel_in_last_glob(struct perf_evlist
*evlist
,
1218 int (*func
)(struct perf_evsel
*evsel
,
1222 struct perf_evsel
*last
= NULL
;
1225 if (evlist
->nr_entries
> 0)
1226 last
= perf_evlist__last(evlist
);
1229 err
= (*func
)(last
, arg
);
1235 if (last
->node
.prev
== &evlist
->entries
)
1237 last
= list_entry(last
->node
.prev
, struct perf_evsel
, node
);
1238 } while (!last
->cmdline_group_boundary
);
1243 static int set_filter(struct perf_evsel
*evsel
, const void *arg
)
1245 const char *str
= arg
;
1247 if (evsel
== NULL
|| evsel
->attr
.type
!= PERF_TYPE_TRACEPOINT
) {
1249 "--filter option should follow a -e tracepoint option\n");
1253 if (perf_evsel__append_filter(evsel
, "&&", str
) < 0) {
1255 "not enough memory to hold filter string\n");
1262 int parse_filter(const struct option
*opt
, const char *str
,
1263 int unset __maybe_unused
)
1265 struct perf_evlist
*evlist
= *(struct perf_evlist
**)opt
->value
;
1267 return foreach_evsel_in_last_glob(evlist
, set_filter
,
1271 static int add_exclude_perf_filter(struct perf_evsel
*evsel
,
1272 const void *arg __maybe_unused
)
1274 char new_filter
[64];
1276 if (evsel
== NULL
|| evsel
->attr
.type
!= PERF_TYPE_TRACEPOINT
) {
1278 "--exclude-perf option should follow a -e tracepoint option\n");
1282 snprintf(new_filter
, sizeof(new_filter
), "common_pid != %d", getpid());
1284 if (perf_evsel__append_filter(evsel
, "&&", new_filter
) < 0) {
1286 "not enough memory to hold filter string\n");
1293 int exclude_perf(const struct option
*opt
,
1294 const char *arg __maybe_unused
,
1295 int unset __maybe_unused
)
1297 struct perf_evlist
*evlist
= *(struct perf_evlist
**)opt
->value
;
1299 return foreach_evsel_in_last_glob(evlist
, add_exclude_perf_filter
,
1303 static const char * const event_type_descriptors
[] = {
1307 "Hardware cache event",
1308 "Raw hardware event descriptor",
1309 "Hardware breakpoint",
1312 static int cmp_string(const void *a
, const void *b
)
1314 const char * const *as
= a
;
1315 const char * const *bs
= b
;
1317 return strcmp(*as
, *bs
);
1321 * Print the events from <debugfs_mount_point>/tracing/events
1324 void print_tracepoint_events(const char *subsys_glob
, const char *event_glob
,
1327 DIR *sys_dir
, *evt_dir
;
1328 struct dirent
*sys_next
, *evt_next
, sys_dirent
, evt_dirent
;
1329 char evt_path
[MAXPATHLEN
];
1330 char dir_path
[MAXPATHLEN
];
1331 char **evt_list
= NULL
;
1332 unsigned int evt_i
= 0, evt_num
= 0;
1333 bool evt_num_known
= false;
1336 sys_dir
= opendir(tracing_events_path
);
1340 if (evt_num_known
) {
1341 evt_list
= zalloc(sizeof(char *) * evt_num
);
1343 goto out_close_sys_dir
;
1346 for_each_subsystem(sys_dir
, sys_dirent
, sys_next
) {
1347 if (subsys_glob
!= NULL
&&
1348 !strglobmatch(sys_dirent
.d_name
, subsys_glob
))
1351 snprintf(dir_path
, MAXPATHLEN
, "%s/%s", tracing_events_path
,
1353 evt_dir
= opendir(dir_path
);
1357 for_each_event(sys_dirent
, evt_dir
, evt_dirent
, evt_next
) {
1358 if (event_glob
!= NULL
&&
1359 !strglobmatch(evt_dirent
.d_name
, event_glob
))
1362 if (!evt_num_known
) {
1367 snprintf(evt_path
, MAXPATHLEN
, "%s:%s",
1368 sys_dirent
.d_name
, evt_dirent
.d_name
);
1370 evt_list
[evt_i
] = strdup(evt_path
);
1371 if (evt_list
[evt_i
] == NULL
)
1372 goto out_close_evt_dir
;
1379 if (!evt_num_known
) {
1380 evt_num_known
= true;
1383 qsort(evt_list
, evt_num
, sizeof(char *), cmp_string
);
1385 while (evt_i
< evt_num
) {
1387 printf("%s ", evt_list
[evt_i
++]);
1390 printf(" %-50s [%s]\n", evt_list
[evt_i
++],
1391 event_type_descriptors
[PERF_TYPE_TRACEPOINT
]);
1398 for (evt_i
= 0; evt_i
< evt_num
; evt_i
++)
1399 zfree(&evt_list
[evt_i
]);
1408 printf("FATAL: not enough memory to print %s\n",
1409 event_type_descriptors
[PERF_TYPE_TRACEPOINT
]);
1415 * Check whether event is in <debugfs_mount_point>/tracing/events
1418 int is_valid_tracepoint(const char *event_string
)
1420 DIR *sys_dir
, *evt_dir
;
1421 struct dirent
*sys_next
, *evt_next
, sys_dirent
, evt_dirent
;
1422 char evt_path
[MAXPATHLEN
];
1423 char dir_path
[MAXPATHLEN
];
1425 sys_dir
= opendir(tracing_events_path
);
1429 for_each_subsystem(sys_dir
, sys_dirent
, sys_next
) {
1431 snprintf(dir_path
, MAXPATHLEN
, "%s/%s", tracing_events_path
,
1433 evt_dir
= opendir(dir_path
);
1437 for_each_event(sys_dirent
, evt_dir
, evt_dirent
, evt_next
) {
1438 snprintf(evt_path
, MAXPATHLEN
, "%s:%s",
1439 sys_dirent
.d_name
, evt_dirent
.d_name
);
1440 if (!strcmp(evt_path
, event_string
)) {
1452 static bool is_event_supported(u8 type
, unsigned config
)
1456 struct perf_evsel
*evsel
;
1457 struct perf_event_attr attr
= {
1463 struct thread_map map
;
1470 evsel
= perf_evsel__new(&attr
);
1472 open_return
= perf_evsel__open(evsel
, NULL
, &tmap
.map
);
1473 ret
= open_return
>= 0;
1475 if (open_return
== -EACCES
) {
1477 * This happens if the paranoid value
1478 * /proc/sys/kernel/perf_event_paranoid is set to 2
1479 * Re-run with exclude_kernel set; we don't do that
1480 * by default as some ARM machines do not support it.
1483 evsel
->attr
.exclude_kernel
= 1;
1484 ret
= perf_evsel__open(evsel
, NULL
, &tmap
.map
) >= 0;
1486 perf_evsel__delete(evsel
);
1492 int print_hwcache_events(const char *event_glob
, bool name_only
)
1494 unsigned int type
, op
, i
, evt_i
= 0, evt_num
= 0;
1496 char **evt_list
= NULL
;
1497 bool evt_num_known
= false;
1500 if (evt_num_known
) {
1501 evt_list
= zalloc(sizeof(char *) * evt_num
);
1506 for (type
= 0; type
< PERF_COUNT_HW_CACHE_MAX
; type
++) {
1507 for (op
= 0; op
< PERF_COUNT_HW_CACHE_OP_MAX
; op
++) {
1508 /* skip invalid cache type */
1509 if (!perf_evsel__is_cache_op_valid(type
, op
))
1512 for (i
= 0; i
< PERF_COUNT_HW_CACHE_RESULT_MAX
; i
++) {
1513 __perf_evsel__hw_cache_type_op_res_name(type
, op
, i
,
1514 name
, sizeof(name
));
1515 if (event_glob
!= NULL
&& !strglobmatch(name
, event_glob
))
1518 if (!is_event_supported(PERF_TYPE_HW_CACHE
,
1519 type
| (op
<< 8) | (i
<< 16)))
1522 if (!evt_num_known
) {
1527 evt_list
[evt_i
] = strdup(name
);
1528 if (evt_list
[evt_i
] == NULL
)
1535 if (!evt_num_known
) {
1536 evt_num_known
= true;
1539 qsort(evt_list
, evt_num
, sizeof(char *), cmp_string
);
1541 while (evt_i
< evt_num
) {
1543 printf("%s ", evt_list
[evt_i
++]);
1546 printf(" %-50s [%s]\n", evt_list
[evt_i
++],
1547 event_type_descriptors
[PERF_TYPE_HW_CACHE
]);
1554 for (evt_i
= 0; evt_i
< evt_num
; evt_i
++)
1555 zfree(&evt_list
[evt_i
]);
1560 printf("FATAL: not enough memory to print %s\n", event_type_descriptors
[PERF_TYPE_HW_CACHE
]);
1566 void print_symbol_events(const char *event_glob
, unsigned type
,
1567 struct event_symbol
*syms
, unsigned max
,
1570 unsigned int i
, evt_i
= 0, evt_num
= 0;
1571 char name
[MAX_NAME_LEN
];
1572 char **evt_list
= NULL
;
1573 bool evt_num_known
= false;
1576 if (evt_num_known
) {
1577 evt_list
= zalloc(sizeof(char *) * evt_num
);
1583 for (i
= 0; i
< max
; i
++, syms
++) {
1585 if (event_glob
!= NULL
&&
1586 !(strglobmatch(syms
->symbol
, event_glob
) ||
1587 (syms
->alias
&& strglobmatch(syms
->alias
, event_glob
))))
1590 if (!is_event_supported(type
, i
))
1593 if (!evt_num_known
) {
1598 if (!name_only
&& strlen(syms
->alias
))
1599 snprintf(name
, MAX_NAME_LEN
, "%s OR %s", syms
->symbol
, syms
->alias
);
1601 strncpy(name
, syms
->symbol
, MAX_NAME_LEN
);
1603 evt_list
[evt_i
] = strdup(name
);
1604 if (evt_list
[evt_i
] == NULL
)
1609 if (!evt_num_known
) {
1610 evt_num_known
= true;
1613 qsort(evt_list
, evt_num
, sizeof(char *), cmp_string
);
1615 while (evt_i
< evt_num
) {
1617 printf("%s ", evt_list
[evt_i
++]);
1620 printf(" %-50s [%s]\n", evt_list
[evt_i
++], event_type_descriptors
[type
]);
1627 for (evt_i
= 0; evt_i
< evt_num
; evt_i
++)
1628 zfree(&evt_list
[evt_i
]);
1633 printf("FATAL: not enough memory to print %s\n", event_type_descriptors
[type
]);
1639 * Print the help text for the event symbols:
1641 void print_events(const char *event_glob
, bool name_only
)
1643 print_symbol_events(event_glob
, PERF_TYPE_HARDWARE
,
1644 event_symbols_hw
, PERF_COUNT_HW_MAX
, name_only
);
1646 print_symbol_events(event_glob
, PERF_TYPE_SOFTWARE
,
1647 event_symbols_sw
, PERF_COUNT_SW_MAX
, name_only
);
1649 print_hwcache_events(event_glob
, name_only
);
1651 print_pmu_events(event_glob
, name_only
);
1653 if (event_glob
!= NULL
)
1657 printf(" %-50s [%s]\n",
1659 event_type_descriptors
[PERF_TYPE_RAW
]);
1660 printf(" %-50s [%s]\n",
1661 "cpu/t1=v1[,t2=v2,t3 ...]/modifier",
1662 event_type_descriptors
[PERF_TYPE_RAW
]);
1663 printf(" (see 'man perf-list' on how to encode it)\n");
1666 printf(" %-50s [%s]\n",
1667 "mem:<addr>[/len][:access]",
1668 event_type_descriptors
[PERF_TYPE_BREAKPOINT
]);
1672 print_tracepoint_events(NULL
, NULL
, name_only
);
1675 int parse_events__is_hardcoded_term(struct parse_events_term
*term
)
1677 return term
->type_term
!= PARSE_EVENTS__TERM_TYPE_USER
;
1680 static int new_term(struct parse_events_term
**_term
, int type_val
,
1681 int type_term
, char *config
,
1682 char *str
, u64 num
, int err_term
, int err_val
)
1684 struct parse_events_term
*term
;
1686 term
= zalloc(sizeof(*term
));
1690 INIT_LIST_HEAD(&term
->list
);
1691 term
->type_val
= type_val
;
1692 term
->type_term
= type_term
;
1693 term
->config
= config
;
1694 term
->err_term
= err_term
;
1695 term
->err_val
= err_val
;
1698 case PARSE_EVENTS__TERM_TYPE_NUM
:
1699 term
->val
.num
= num
;
1701 case PARSE_EVENTS__TERM_TYPE_STR
:
1702 term
->val
.str
= str
;
1713 int parse_events_term__num(struct parse_events_term
**term
,
1714 int type_term
, char *config
, u64 num
,
1715 void *loc_term_
, void *loc_val_
)
1717 YYLTYPE
*loc_term
= loc_term_
;
1718 YYLTYPE
*loc_val
= loc_val_
;
1720 return new_term(term
, PARSE_EVENTS__TERM_TYPE_NUM
, type_term
,
1722 loc_term
? loc_term
->first_column
: 0,
1723 loc_val
? loc_val
->first_column
: 0);
1726 int parse_events_term__str(struct parse_events_term
**term
,
1727 int type_term
, char *config
, char *str
,
1728 void *loc_term_
, void *loc_val_
)
1730 YYLTYPE
*loc_term
= loc_term_
;
1731 YYLTYPE
*loc_val
= loc_val_
;
1733 return new_term(term
, PARSE_EVENTS__TERM_TYPE_STR
, type_term
,
1735 loc_term
? loc_term
->first_column
: 0,
1736 loc_val
? loc_val
->first_column
: 0);
1739 int parse_events_term__sym_hw(struct parse_events_term
**term
,
1740 char *config
, unsigned idx
)
1742 struct event_symbol
*sym
;
1744 BUG_ON(idx
>= PERF_COUNT_HW_MAX
);
1745 sym
= &event_symbols_hw
[idx
];
1748 return new_term(term
, PARSE_EVENTS__TERM_TYPE_STR
,
1749 PARSE_EVENTS__TERM_TYPE_USER
, config
,
1750 (char *) sym
->symbol
, 0, 0, 0);
1752 return new_term(term
, PARSE_EVENTS__TERM_TYPE_STR
,
1753 PARSE_EVENTS__TERM_TYPE_USER
,
1754 (char *) "event", (char *) sym
->symbol
,
1758 int parse_events_term__clone(struct parse_events_term
**new,
1759 struct parse_events_term
*term
)
1761 return new_term(new, term
->type_val
, term
->type_term
, term
->config
,
1762 term
->val
.str
, term
->val
.num
,
1763 term
->err_term
, term
->err_val
);
1766 void parse_events__free_terms(struct list_head
*terms
)
1768 struct parse_events_term
*term
, *h
;
1770 list_for_each_entry_safe(term
, h
, terms
, list
)
1774 void parse_events_evlist_error(struct parse_events_evlist
*data
,
1775 int idx
, const char *str
)
1777 struct parse_events_error
*err
= data
->error
;
1782 err
->str
= strdup(str
);
1783 WARN_ONCE(!err
->str
, "WARNING: failed to allocate error string");