1 // SPDX-License-Identifier: GPL-2.0
2 #include <linux/list.h>
3 #include <linux/compiler.h>
12 #include <api/fs/fs.h>
16 #include "parse-events.h"
19 #include "pmu-events/pmu-events.h"
23 struct perf_pmu_format
{
26 DECLARE_BITMAP(bits
, PERF_PMU_FORMAT_BITS
);
27 struct list_head list
;
30 #define EVENT_SOURCE_DEVICE_PATH "/bus/event_source/devices/"
32 int perf_pmu_parse(struct list_head
*list
, char *name
);
33 extern FILE *perf_pmu_in
;
35 static LIST_HEAD(pmus
);
38 * Parse & process all the sysfs attributes located under
39 * the directory specified in 'dir' parameter.
41 int perf_pmu__format_parse(char *dir
, struct list_head
*head
)
43 struct dirent
*evt_ent
;
47 format_dir
= opendir(dir
);
51 while (!ret
&& (evt_ent
= readdir(format_dir
))) {
53 char *name
= evt_ent
->d_name
;
56 if (!strcmp(name
, ".") || !strcmp(name
, ".."))
59 snprintf(path
, PATH_MAX
, "%s/%s", dir
, name
);
62 file
= fopen(path
, "r");
67 ret
= perf_pmu_parse(head
, name
);
76 * Reading/parsing the default pmu format definition, which should be
78 * /sys/bus/event_source/devices/<dev>/format as sysfs group attributes.
80 static int pmu_format(const char *name
, struct list_head
*format
)
84 const char *sysfs
= sysfs__mountpoint();
89 snprintf(path
, PATH_MAX
,
90 "%s" EVENT_SOURCE_DEVICE_PATH
"%s/format", sysfs
, name
);
92 if (stat(path
, &st
) < 0)
93 return 0; /* no error if format does not exist */
95 if (perf_pmu__format_parse(path
, format
))
101 static int convert_scale(const char *scale
, char **end
, double *sval
)
107 * save current locale
109 lc
= setlocale(LC_NUMERIC
, NULL
);
112 * The lc string may be allocated in static storage,
113 * so get a dynamic copy to make it survive setlocale
123 * force to C locale to ensure kernel
124 * scale string is converted correctly.
125 * kernel uses default C locale.
127 setlocale(LC_NUMERIC
, "C");
129 *sval
= strtod(scale
, end
);
133 setlocale(LC_NUMERIC
, lc
);
138 static int perf_pmu__parse_scale(struct perf_pmu_alias
*alias
, char *dir
, char *name
)
146 snprintf(path
, PATH_MAX
, "%s/%s.scale", dir
, name
);
148 fd
= open(path
, O_RDONLY
);
152 if (fstat(fd
, &st
) < 0)
155 sret
= read(fd
, scale
, sizeof(scale
)-1);
159 if (scale
[sret
- 1] == '\n')
160 scale
[sret
- 1] = '\0';
164 ret
= convert_scale(scale
, NULL
, &alias
->scale
);
170 static int perf_pmu__parse_unit(struct perf_pmu_alias
*alias
, char *dir
, char *name
)
176 snprintf(path
, PATH_MAX
, "%s/%s.unit", dir
, name
);
178 fd
= open(path
, O_RDONLY
);
182 sret
= read(fd
, alias
->unit
, UNIT_MAX_LEN
);
188 if (alias
->unit
[sret
- 1] == '\n')
189 alias
->unit
[sret
- 1] = '\0';
191 alias
->unit
[sret
] = '\0';
196 alias
->unit
[0] = '\0';
201 perf_pmu__parse_per_pkg(struct perf_pmu_alias
*alias
, char *dir
, char *name
)
206 snprintf(path
, PATH_MAX
, "%s/%s.per-pkg", dir
, name
);
208 fd
= open(path
, O_RDONLY
);
214 alias
->per_pkg
= true;
218 static int perf_pmu__parse_snapshot(struct perf_pmu_alias
*alias
,
219 char *dir
, char *name
)
224 snprintf(path
, PATH_MAX
, "%s/%s.snapshot", dir
, name
);
226 fd
= open(path
, O_RDONLY
);
230 alias
->snapshot
= true;
235 static int __perf_pmu__new_alias(struct list_head
*list
, char *dir
, char *name
,
236 char *desc
, char *val
,
237 char *long_desc
, char *topic
,
238 char *unit
, char *perpkg
,
242 struct perf_pmu_alias
*alias
;
246 alias
= malloc(sizeof(*alias
));
250 INIT_LIST_HEAD(&alias
->terms
);
252 alias
->unit
[0] = '\0';
253 alias
->per_pkg
= false;
254 alias
->snapshot
= false;
256 ret
= parse_events_terms(&alias
->terms
, val
);
258 pr_err("Cannot parse alias %s: %d\n", val
, ret
);
263 alias
->name
= strdup(name
);
266 * load unit name and scale if available
268 perf_pmu__parse_unit(alias
, dir
, name
);
269 perf_pmu__parse_scale(alias
, dir
, name
);
270 perf_pmu__parse_per_pkg(alias
, dir
, name
);
271 perf_pmu__parse_snapshot(alias
, dir
, name
);
274 alias
->metric_expr
= metric_expr
? strdup(metric_expr
) : NULL
;
275 alias
->metric_name
= metric_name
? strdup(metric_name
): NULL
;
276 alias
->desc
= desc
? strdup(desc
) : NULL
;
277 alias
->long_desc
= long_desc
? strdup(long_desc
) :
278 desc
? strdup(desc
) : NULL
;
279 alias
->topic
= topic
? strdup(topic
) : NULL
;
281 if (convert_scale(unit
, &unit
, &alias
->scale
) < 0)
283 snprintf(alias
->unit
, sizeof(alias
->unit
), "%s", unit
);
285 alias
->per_pkg
= perpkg
&& sscanf(perpkg
, "%d", &num
) == 1 && num
== 1;
286 alias
->str
= strdup(val
);
288 list_add_tail(&alias
->list
, list
);
293 static int perf_pmu__new_alias(struct list_head
*list
, char *dir
, char *name
, FILE *file
)
298 ret
= fread(buf
, 1, sizeof(buf
), file
);
304 return __perf_pmu__new_alias(list
, dir
, name
, NULL
, buf
, NULL
, NULL
, NULL
,
308 static inline bool pmu_alias_info_file(char *name
)
313 if (len
> 5 && !strcmp(name
+ len
- 5, ".unit"))
315 if (len
> 6 && !strcmp(name
+ len
- 6, ".scale"))
317 if (len
> 8 && !strcmp(name
+ len
- 8, ".per-pkg"))
319 if (len
> 9 && !strcmp(name
+ len
- 9, ".snapshot"))
326 * Process all the sysfs attributes located under the directory
327 * specified in 'dir' parameter.
329 static int pmu_aliases_parse(char *dir
, struct list_head
*head
)
331 struct dirent
*evt_ent
;
334 event_dir
= opendir(dir
);
338 while ((evt_ent
= readdir(event_dir
))) {
340 char *name
= evt_ent
->d_name
;
343 if (!strcmp(name
, ".") || !strcmp(name
, ".."))
347 * skip info files parsed in perf_pmu__new_alias()
349 if (pmu_alias_info_file(name
))
352 snprintf(path
, PATH_MAX
, "%s/%s", dir
, name
);
354 file
= fopen(path
, "r");
356 pr_debug("Cannot open %s\n", path
);
360 if (perf_pmu__new_alias(head
, dir
, name
, file
) < 0)
361 pr_debug("Cannot set up %s\n", name
);
370 * Reading the pmu event aliases definition, which should be located at:
371 * /sys/bus/event_source/devices/<dev>/events as sysfs group attributes.
373 static int pmu_aliases(const char *name
, struct list_head
*head
)
377 const char *sysfs
= sysfs__mountpoint();
382 snprintf(path
, PATH_MAX
,
383 "%s/bus/event_source/devices/%s/events", sysfs
, name
);
385 if (stat(path
, &st
) < 0)
386 return 0; /* no error if 'events' does not exist */
388 if (pmu_aliases_parse(path
, head
))
394 static int pmu_alias_terms(struct perf_pmu_alias
*alias
,
395 struct list_head
*terms
)
397 struct parse_events_term
*term
, *cloned
;
401 list_for_each_entry(term
, &alias
->terms
, list
) {
402 ret
= parse_events_term__clone(&cloned
, term
);
404 parse_events_terms__purge(&list
);
407 list_add_tail(&cloned
->list
, &list
);
409 list_splice(&list
, terms
);
414 * Reading/parsing the default pmu type value, which should be
416 * /sys/bus/event_source/devices/<dev>/type as sysfs attribute.
418 static int pmu_type(const char *name
, __u32
*type
)
424 const char *sysfs
= sysfs__mountpoint();
429 snprintf(path
, PATH_MAX
,
430 "%s" EVENT_SOURCE_DEVICE_PATH
"%s/type", sysfs
, name
);
432 if (stat(path
, &st
) < 0)
435 file
= fopen(path
, "r");
439 if (1 != fscanf(file
, "%u", type
))
446 /* Add all pmus in sysfs to pmu list: */
447 static void pmu_read_sysfs(void)
452 const char *sysfs
= sysfs__mountpoint();
457 snprintf(path
, PATH_MAX
,
458 "%s" EVENT_SOURCE_DEVICE_PATH
, sysfs
);
464 while ((dent
= readdir(dir
))) {
465 if (!strcmp(dent
->d_name
, ".") || !strcmp(dent
->d_name
, ".."))
467 /* add to static LIST_HEAD(pmus): */
468 perf_pmu__find(dent
->d_name
);
474 static struct cpu_map
*__pmu_cpumask(const char *path
)
477 struct cpu_map
*cpus
;
479 file
= fopen(path
, "r");
483 cpus
= cpu_map__read(file
);
489 * Uncore PMUs have a "cpumask" file under sysfs. CPU PMUs (e.g. on arm/arm64)
490 * may have a "cpus" file.
492 #define CPUS_TEMPLATE_UNCORE "%s/bus/event_source/devices/%s/cpumask"
493 #define CPUS_TEMPLATE_CPU "%s/bus/event_source/devices/%s/cpus"
495 static struct cpu_map
*pmu_cpumask(const char *name
)
498 struct cpu_map
*cpus
;
499 const char *sysfs
= sysfs__mountpoint();
500 const char *templates
[] = {
501 CPUS_TEMPLATE_UNCORE
,
505 const char **template;
510 for (template = templates
; *template; template++) {
511 snprintf(path
, PATH_MAX
, *template, sysfs
, name
);
512 cpus
= __pmu_cpumask(path
);
520 static bool pmu_is_uncore(const char *name
)
523 struct cpu_map
*cpus
;
524 const char *sysfs
= sysfs__mountpoint();
526 snprintf(path
, PATH_MAX
, CPUS_TEMPLATE_UNCORE
, sysfs
, name
);
527 cpus
= __pmu_cpumask(path
);
534 * Return the CPU id as a raw string.
536 * Each architecture should provide a more precise id string that
537 * can be use to match the architecture's "mapfile".
539 char * __weak
get_cpuid_str(void)
545 * From the pmu_events_map, find the table of PMU events that corresponds
546 * to the current running CPU. Then, add all PMU events from that table
549 static void pmu_add_cpu_aliases(struct list_head
*head
, const char *name
)
552 struct pmu_events_map
*map
;
553 struct pmu_event
*pe
;
557 cpuid
= getenv("PERF_CPUID");
559 cpuid
= strdup(cpuid
);
561 cpuid
= get_cpuid_str();
566 pr_debug("Using CPUID %s\n", cpuid
);
572 map
= &pmu_events_map
[i
++];
576 if (!strcmp(map
->cpuid
, cpuid
))
581 * Found a matching PMU events table. Create aliases
587 pe
= &map
->table
[i
++];
591 pname
= pe
->pmu
? pe
->pmu
: "cpu";
592 if (strncmp(pname
, name
, strlen(pname
)))
595 /* need type casts to override 'const' */
596 __perf_pmu__new_alias(head
, NULL
, (char *)pe
->name
,
597 (char *)pe
->desc
, (char *)pe
->event
,
598 (char *)pe
->long_desc
, (char *)pe
->topic
,
599 (char *)pe
->unit
, (char *)pe
->perpkg
,
600 (char *)pe
->metric_expr
,
601 (char *)pe
->metric_name
);
608 struct perf_event_attr
* __weak
609 perf_pmu__get_default_config(struct perf_pmu
*pmu __maybe_unused
)
614 static struct perf_pmu
*pmu_lookup(const char *name
)
616 struct perf_pmu
*pmu
;
622 * The pmu data we store & need consists of the pmu
623 * type value and format definitions. Load both right
626 if (pmu_format(name
, &format
))
630 * Check the type first to avoid unnecessary work.
632 if (pmu_type(name
, &type
))
635 if (pmu_aliases(name
, &aliases
))
638 pmu_add_cpu_aliases(&aliases
, name
);
639 pmu
= zalloc(sizeof(*pmu
));
643 pmu
->cpus
= pmu_cpumask(name
);
645 pmu
->is_uncore
= pmu_is_uncore(name
);
647 INIT_LIST_HEAD(&pmu
->format
);
648 INIT_LIST_HEAD(&pmu
->aliases
);
649 list_splice(&format
, &pmu
->format
);
650 list_splice(&aliases
, &pmu
->aliases
);
651 pmu
->name
= strdup(name
);
653 list_add_tail(&pmu
->list
, &pmus
);
655 pmu
->default_config
= perf_pmu__get_default_config(pmu
);
660 static struct perf_pmu
*pmu_find(const char *name
)
662 struct perf_pmu
*pmu
;
664 list_for_each_entry(pmu
, &pmus
, list
)
665 if (!strcmp(pmu
->name
, name
))
671 struct perf_pmu
*perf_pmu__scan(struct perf_pmu
*pmu
)
674 * pmu iterator: If pmu is NULL, we start at the begin,
675 * otherwise return the next pmu. Returns NULL on end.
679 pmu
= list_prepare_entry(pmu
, &pmus
, list
);
681 list_for_each_entry_continue(pmu
, &pmus
, list
)
686 struct perf_pmu
*perf_pmu__find(const char *name
)
688 struct perf_pmu
*pmu
;
691 * Once PMU is loaded it stays in the list,
692 * so we keep us from multiple reading/parsing
693 * the pmu format definitions.
695 pmu
= pmu_find(name
);
699 return pmu_lookup(name
);
702 static struct perf_pmu_format
*
703 pmu_find_format(struct list_head
*formats
, const char *name
)
705 struct perf_pmu_format
*format
;
707 list_for_each_entry(format
, formats
, list
)
708 if (!strcmp(format
->name
, name
))
714 __u64
perf_pmu__format_bits(struct list_head
*formats
, const char *name
)
716 struct perf_pmu_format
*format
= pmu_find_format(formats
, name
);
723 for_each_set_bit(fbit
, format
->bits
, PERF_PMU_FORMAT_BITS
)
724 bits
|= 1ULL << fbit
;
730 * Sets value based on the format definition (format parameter)
731 * and unformated value (value parameter).
733 static void pmu_format_value(unsigned long *format
, __u64 value
, __u64
*v
,
736 unsigned long fbit
, vbit
;
738 for (fbit
= 0, vbit
= 0; fbit
< PERF_PMU_FORMAT_BITS
; fbit
++) {
740 if (!test_bit(fbit
, format
))
743 if (value
& (1llu << vbit
++))
744 *v
|= (1llu << fbit
);
746 *v
&= ~(1llu << fbit
);
750 static __u64
pmu_format_max_value(const unsigned long *format
)
755 for_each_set_bit(fbit
, format
, PERF_PMU_FORMAT_BITS
)
762 * Term is a string term, and might be a param-term. Try to look up it's value
763 * in the remaining terms.
764 * - We have a term like "base-or-format-term=param-term",
765 * - We need to find the value supplied for "param-term" (with param-term named
766 * in a config string) later on in the term list.
768 static int pmu_resolve_param_term(struct parse_events_term
*term
,
769 struct list_head
*head_terms
,
772 struct parse_events_term
*t
;
774 list_for_each_entry(t
, head_terms
, list
) {
775 if (t
->type_val
== PARSE_EVENTS__TERM_TYPE_NUM
) {
776 if (!strcmp(t
->config
, term
->config
)) {
785 printf("Required parameter '%s' not specified\n", term
->config
);
790 static char *pmu_formats_string(struct list_head
*formats
)
792 struct perf_pmu_format
*format
;
794 struct strbuf buf
= STRBUF_INIT
;
800 /* sysfs exported terms */
801 list_for_each_entry(format
, formats
, list
)
802 if (strbuf_addf(&buf
, i
++ ? ",%s" : "%s", format
->name
) < 0)
805 str
= strbuf_detach(&buf
, NULL
);
807 strbuf_release(&buf
);
813 * Setup one of config[12] attr members based on the
814 * user input data - term parameter.
816 static int pmu_config_term(struct list_head
*formats
,
817 struct perf_event_attr
*attr
,
818 struct parse_events_term
*term
,
819 struct list_head
*head_terms
,
820 bool zero
, struct parse_events_error
*err
)
822 struct perf_pmu_format
*format
;
827 * If this is a parameter we've already used for parameterized-eval,
828 * skip it in normal eval.
834 * Hardcoded terms should be already in, so nothing
835 * to be done for them.
837 if (parse_events__is_hardcoded_term(term
))
840 format
= pmu_find_format(formats
, term
->config
);
843 printf("Invalid event/parameter '%s'\n", term
->config
);
845 char *pmu_term
= pmu_formats_string(formats
);
847 err
->idx
= term
->err_term
;
848 err
->str
= strdup("unknown term");
849 err
->help
= parse_events_formats_error_string(pmu_term
);
855 switch (format
->value
) {
856 case PERF_PMU_FORMAT_VALUE_CONFIG
:
859 case PERF_PMU_FORMAT_VALUE_CONFIG1
:
862 case PERF_PMU_FORMAT_VALUE_CONFIG2
:
870 * Either directly use a numeric term, or try to translate string terms
871 * using event parameters.
873 if (term
->type_val
== PARSE_EVENTS__TERM_TYPE_NUM
) {
874 if (term
->no_value
&&
875 bitmap_weight(format
->bits
, PERF_PMU_FORMAT_BITS
) > 1) {
877 err
->idx
= term
->err_val
;
878 err
->str
= strdup("no value assigned for term");
884 } else if (term
->type_val
== PARSE_EVENTS__TERM_TYPE_STR
) {
885 if (strcmp(term
->val
.str
, "?")) {
887 pr_info("Invalid sysfs entry %s=%s\n",
888 term
->config
, term
->val
.str
);
891 err
->idx
= term
->err_val
;
892 err
->str
= strdup("expected numeric value");
897 if (pmu_resolve_param_term(term
, head_terms
, &val
))
902 max_val
= pmu_format_max_value(format
->bits
);
905 err
->idx
= term
->err_val
;
906 if (asprintf(&err
->str
,
907 "value too big for format, maximum is %llu",
908 (unsigned long long)max_val
) < 0)
909 err
->str
= strdup("value too big for format");
913 * Assume we don't care if !err, in which case the value will be
914 * silently truncated.
918 pmu_format_value(format
->bits
, val
, vp
, zero
);
922 int perf_pmu__config_terms(struct list_head
*formats
,
923 struct perf_event_attr
*attr
,
924 struct list_head
*head_terms
,
925 bool zero
, struct parse_events_error
*err
)
927 struct parse_events_term
*term
;
929 list_for_each_entry(term
, head_terms
, list
) {
930 if (pmu_config_term(formats
, attr
, term
, head_terms
,
939 * Configures event's 'attr' parameter based on the:
940 * 1) users input - specified in terms parameter
941 * 2) pmu format definitions - specified by pmu parameter
943 int perf_pmu__config(struct perf_pmu
*pmu
, struct perf_event_attr
*attr
,
944 struct list_head
*head_terms
,
945 struct parse_events_error
*err
)
947 bool zero
= !!pmu
->default_config
;
949 attr
->type
= pmu
->type
;
950 return perf_pmu__config_terms(&pmu
->format
, attr
, head_terms
,
954 static struct perf_pmu_alias
*pmu_find_alias(struct perf_pmu
*pmu
,
955 struct parse_events_term
*term
)
957 struct perf_pmu_alias
*alias
;
960 if (parse_events__is_hardcoded_term(term
))
963 if (term
->type_val
== PARSE_EVENTS__TERM_TYPE_NUM
) {
964 if (term
->val
.num
!= 1)
966 if (pmu_find_format(&pmu
->format
, term
->config
))
969 } else if (term
->type_val
== PARSE_EVENTS__TERM_TYPE_STR
) {
970 if (strcasecmp(term
->config
, "event"))
972 name
= term
->val
.str
;
977 list_for_each_entry(alias
, &pmu
->aliases
, list
) {
978 if (!strcasecmp(alias
->name
, name
))
985 static int check_info_data(struct perf_pmu_alias
*alias
,
986 struct perf_pmu_info
*info
)
989 * Only one term in event definition can
990 * define unit, scale and snapshot, fail
991 * if there's more than one.
993 if ((info
->unit
&& alias
->unit
[0]) ||
994 (info
->scale
&& alias
->scale
) ||
995 (info
->snapshot
&& alias
->snapshot
))
999 info
->unit
= alias
->unit
;
1002 info
->scale
= alias
->scale
;
1004 if (alias
->snapshot
)
1005 info
->snapshot
= alias
->snapshot
;
1011 * Find alias in the terms list and replace it with the terms
1012 * defined for the alias
1014 int perf_pmu__check_alias(struct perf_pmu
*pmu
, struct list_head
*head_terms
,
1015 struct perf_pmu_info
*info
)
1017 struct parse_events_term
*term
, *h
;
1018 struct perf_pmu_alias
*alias
;
1021 info
->per_pkg
= false;
1024 * Mark unit and scale as not set
1025 * (different from default values, see below)
1029 info
->snapshot
= false;
1030 info
->metric_expr
= NULL
;
1031 info
->metric_name
= NULL
;
1033 list_for_each_entry_safe(term
, h
, head_terms
, list
) {
1034 alias
= pmu_find_alias(pmu
, term
);
1037 ret
= pmu_alias_terms(alias
, &term
->list
);
1041 ret
= check_info_data(alias
, info
);
1046 info
->per_pkg
= true;
1047 info
->metric_expr
= alias
->metric_expr
;
1048 info
->metric_name
= alias
->metric_name
;
1050 list_del(&term
->list
);
1055 * if no unit or scale foundin aliases, then
1056 * set defaults as for evsel
1057 * unit cannot left to NULL
1059 if (info
->unit
== NULL
)
1062 if (info
->scale
== 0.0)
1068 int perf_pmu__new_format(struct list_head
*list
, char *name
,
1069 int config
, unsigned long *bits
)
1071 struct perf_pmu_format
*format
;
1073 format
= zalloc(sizeof(*format
));
1077 format
->name
= strdup(name
);
1078 format
->value
= config
;
1079 memcpy(format
->bits
, bits
, sizeof(format
->bits
));
1081 list_add_tail(&format
->list
, list
);
1085 void perf_pmu__set_format(unsigned long *bits
, long from
, long to
)
1092 memset(bits
, 0, BITS_TO_BYTES(PERF_PMU_FORMAT_BITS
));
1093 for (b
= from
; b
<= to
; b
++)
1097 static int sub_non_neg(int a
, int b
)
1104 static char *format_alias(char *buf
, int len
, struct perf_pmu
*pmu
,
1105 struct perf_pmu_alias
*alias
)
1107 struct parse_events_term
*term
;
1108 int used
= snprintf(buf
, len
, "%s/%s", pmu
->name
, alias
->name
);
1110 list_for_each_entry(term
, &alias
->terms
, list
) {
1111 if (term
->type_val
== PARSE_EVENTS__TERM_TYPE_STR
)
1112 used
+= snprintf(buf
+ used
, sub_non_neg(len
, used
),
1113 ",%s=%s", term
->config
,
1117 if (sub_non_neg(len
, used
) > 0) {
1121 if (sub_non_neg(len
, used
) > 0) {
1125 buf
[len
- 1] = '\0';
1130 static char *format_alias_or(char *buf
, int len
, struct perf_pmu
*pmu
,
1131 struct perf_pmu_alias
*alias
)
1133 snprintf(buf
, len
, "%s OR %s/%s/", alias
->name
, pmu
->name
, alias
->name
);
1147 static int cmp_sevent(const void *a
, const void *b
)
1149 const struct sevent
*as
= a
;
1150 const struct sevent
*bs
= b
;
1152 /* Put extra events last */
1153 if (!!as
->desc
!= !!bs
->desc
)
1154 return !!as
->desc
- !!bs
->desc
;
1155 if (as
->topic
&& bs
->topic
) {
1156 int n
= strcmp(as
->topic
, bs
->topic
);
1161 return strcmp(as
->name
, bs
->name
);
1164 static void wordwrap(char *s
, int start
, int max
, int corr
)
1170 int wlen
= strcspn(s
, " \t");
1172 if (column
+ wlen
>= max
&& column
> start
) {
1173 printf("\n%*s", start
, "");
1174 column
= start
+ corr
;
1176 n
= printf("%s%.*s", column
> start
? " " : "", wlen
, s
);
1185 void print_pmu_events(const char *event_glob
, bool name_only
, bool quiet_flag
,
1186 bool long_desc
, bool details_flag
)
1188 struct perf_pmu
*pmu
;
1189 struct perf_pmu_alias
*alias
;
1193 struct sevent
*aliases
;
1195 int columns
= pager_get_columns();
1200 while ((pmu
= perf_pmu__scan(pmu
)) != NULL
) {
1201 list_for_each_entry(alias
, &pmu
->aliases
, list
)
1203 if (pmu
->selectable
)
1206 aliases
= zalloc(sizeof(struct sevent
) * len
);
1211 while ((pmu
= perf_pmu__scan(pmu
)) != NULL
) {
1212 list_for_each_entry(alias
, &pmu
->aliases
, list
) {
1213 char *name
= alias
->desc
? alias
->name
:
1214 format_alias(buf
, sizeof(buf
), pmu
, alias
);
1215 bool is_cpu
= !strcmp(pmu
->name
, "cpu");
1217 if (event_glob
!= NULL
&&
1218 !(strglobmatch_nocase(name
, event_glob
) ||
1219 (!is_cpu
&& strglobmatch_nocase(alias
->name
,
1222 strglobmatch_nocase(alias
->topic
, event_glob
))))
1225 if (is_cpu
&& !name_only
&& !alias
->desc
)
1226 name
= format_alias_or(buf
, sizeof(buf
), pmu
, alias
);
1228 aliases
[j
].name
= name
;
1229 if (is_cpu
&& !name_only
&& !alias
->desc
)
1230 aliases
[j
].name
= format_alias_or(buf
,
1233 aliases
[j
].name
= strdup(aliases
[j
].name
);
1234 if (!aliases
[j
].name
)
1237 aliases
[j
].desc
= long_desc
? alias
->long_desc
:
1239 aliases
[j
].topic
= alias
->topic
;
1240 aliases
[j
].str
= alias
->str
;
1241 aliases
[j
].pmu
= pmu
->name
;
1242 aliases
[j
].metric_expr
= alias
->metric_expr
;
1243 aliases
[j
].metric_name
= alias
->metric_name
;
1246 if (pmu
->selectable
&&
1247 (event_glob
== NULL
|| strglobmatch(pmu
->name
, event_glob
))) {
1249 if (asprintf(&s
, "%s//", pmu
->name
) < 0)
1251 aliases
[j
].name
= s
;
1256 qsort(aliases
, len
, sizeof(struct sevent
), cmp_sevent
);
1257 for (j
= 0; j
< len
; j
++) {
1258 /* Skip duplicates */
1259 if (j
> 0 && !strcmp(aliases
[j
].name
, aliases
[j
- 1].name
))
1262 printf("%s ", aliases
[j
].name
);
1265 if (aliases
[j
].desc
&& !quiet_flag
) {
1268 if (aliases
[j
].topic
&& (!topic
||
1269 strcmp(topic
, aliases
[j
].topic
))) {
1270 printf("%s%s:\n", topic
? "\n" : "",
1272 topic
= aliases
[j
].topic
;
1274 printf(" %-50s\n", aliases
[j
].name
);
1275 printf("%*s", 8, "[");
1276 wordwrap(aliases
[j
].desc
, 8, columns
, 0);
1279 printf("%*s%s/%s/ ", 8, "", aliases
[j
].pmu
, aliases
[j
].str
);
1280 if (aliases
[j
].metric_name
)
1281 printf(" MetricName: %s", aliases
[j
].metric_name
);
1282 if (aliases
[j
].metric_expr
)
1283 printf(" MetricExpr: %s", aliases
[j
].metric_expr
);
1287 printf(" %-50s [Kernel PMU event]\n", aliases
[j
].name
);
1290 if (printed
&& pager_in_use())
1293 for (j
= 0; j
< len
; j
++)
1294 zfree(&aliases
[j
].name
);
1299 printf("FATAL: not enough memory to print PMU events\n");
1304 bool pmu_have_event(const char *pname
, const char *name
)
1306 struct perf_pmu
*pmu
;
1307 struct perf_pmu_alias
*alias
;
1310 while ((pmu
= perf_pmu__scan(pmu
)) != NULL
) {
1311 if (strcmp(pname
, pmu
->name
))
1313 list_for_each_entry(alias
, &pmu
->aliases
, list
)
1314 if (!strcmp(alias
->name
, name
))
1320 static FILE *perf_pmu__open_file(struct perf_pmu
*pmu
, const char *name
)
1323 char path
[PATH_MAX
];
1326 sysfs
= sysfs__mountpoint();
1330 snprintf(path
, PATH_MAX
,
1331 "%s" EVENT_SOURCE_DEVICE_PATH
"%s/%s", sysfs
, pmu
->name
, name
);
1333 if (stat(path
, &st
) < 0)
1336 return fopen(path
, "r");
1339 int perf_pmu__scan_file(struct perf_pmu
*pmu
, const char *name
, const char *fmt
,
1346 va_start(args
, fmt
);
1347 file
= perf_pmu__open_file(pmu
, name
);
1349 ret
= vfscanf(file
, fmt
, args
);