123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664 |
- // SPDX-License-Identifier: GPL-2.0
- #include "math.h"
- #include "parse-events.h"
- #include "pmu.h"
- #include "tests.h"
- #include <errno.h>
- #include <stdio.h>
- #include <linux/kernel.h>
- #include <linux/zalloc.h>
- #include "debug.h"
- #include "../pmu-events/pmu-events.h"
- #include "util/evlist.h"
- #include "util/expr.h"
- #include "util/parse-events.h"
- struct perf_pmu_test_event {
- struct pmu_event event;
- /* extra events for aliases */
- const char *alias_str;
- /*
- * Note: For when PublicDescription does not exist in the JSON, we
- * will have no long_desc in pmu_event.long_desc, but long_desc may
- * be set in the alias.
- */
- const char *alias_long_desc;
- };
- static struct perf_pmu_test_event test_cpu_events[] = {
- {
- .event = {
- .name = "bp_l1_btb_correct",
- .event = "event=0x8a",
- .desc = "L1 BTB Correction",
- .topic = "branch",
- },
- .alias_str = "event=0x8a",
- .alias_long_desc = "L1 BTB Correction",
- },
- {
- .event = {
- .name = "bp_l2_btb_correct",
- .event = "event=0x8b",
- .desc = "L2 BTB Correction",
- .topic = "branch",
- },
- .alias_str = "event=0x8b",
- .alias_long_desc = "L2 BTB Correction",
- },
- {
- .event = {
- .name = "segment_reg_loads.any",
- .event = "umask=0x80,period=200000,event=0x6",
- .desc = "Number of segment register loads",
- .topic = "other",
- },
- .alias_str = "umask=0x80,(null)=0x30d40,event=0x6",
- .alias_long_desc = "Number of segment register loads",
- },
- {
- .event = {
- .name = "dispatch_blocked.any",
- .event = "umask=0x20,period=200000,event=0x9",
- .desc = "Memory cluster signals to block micro-op dispatch for any reason",
- .topic = "other",
- },
- .alias_str = "umask=0x20,(null)=0x30d40,event=0x9",
- .alias_long_desc = "Memory cluster signals to block micro-op dispatch for any reason",
- },
- {
- .event = {
- .name = "eist_trans",
- .event = "umask=0x0,period=200000,event=0x3a",
- .desc = "Number of Enhanced Intel SpeedStep(R) Technology (EIST) transitions",
- .topic = "other",
- },
- .alias_str = "umask=0,(null)=0x30d40,event=0x3a",
- .alias_long_desc = "Number of Enhanced Intel SpeedStep(R) Technology (EIST) transitions",
- },
- { /* sentinel */
- .event = {
- .name = NULL,
- },
- },
- };
- static struct perf_pmu_test_event test_uncore_events[] = {
- {
- .event = {
- .name = "uncore_hisi_ddrc.flux_wcmd",
- .event = "event=0x2",
- .desc = "DDRC write commands. Unit: hisi_sccl,ddrc ",
- .topic = "uncore",
- .long_desc = "DDRC write commands",
- .pmu = "hisi_sccl,ddrc",
- },
- .alias_str = "event=0x2",
- .alias_long_desc = "DDRC write commands",
- },
- {
- .event = {
- .name = "unc_cbo_xsnp_response.miss_eviction",
- .event = "umask=0x81,event=0x22",
- .desc = "Unit: uncore_cbox A cross-core snoop resulted from L3 Eviction which misses in some processor core",
- .topic = "uncore",
- .long_desc = "A cross-core snoop resulted from L3 Eviction which misses in some processor core",
- .pmu = "uncore_cbox",
- },
- .alias_str = "umask=0x81,event=0x22",
- .alias_long_desc = "A cross-core snoop resulted from L3 Eviction which misses in some processor core",
- },
- { /* sentinel */
- .event = {
- .name = NULL,
- },
- }
- };
- const int total_test_events_size = ARRAY_SIZE(test_uncore_events);
- static bool is_same(const char *reference, const char *test)
- {
- if (!reference && !test)
- return true;
- if (reference && !test)
- return false;
- if (!reference && test)
- return false;
- return !strcmp(reference, test);
- }
- static struct pmu_events_map *__test_pmu_get_events_map(void)
- {
- struct pmu_events_map *map;
- for (map = &pmu_events_map[0]; map->cpuid; map++) {
- if (!strcmp(map->cpuid, "testcpu"))
- return map;
- }
- pr_err("could not find test events map\n");
- return NULL;
- }
- /* Verify generated events from pmu-events.c is as expected */
- static int test_pmu_event_table(void)
- {
- struct pmu_events_map *map = __test_pmu_get_events_map();
- struct pmu_event *table;
- int map_events = 0, expected_events;
- /* ignore 2x sentinels */
- expected_events = ARRAY_SIZE(test_cpu_events) +
- ARRAY_SIZE(test_uncore_events) - 2;
- if (!map)
- return -1;
- for (table = map->table; table->name; table++) {
- struct perf_pmu_test_event *test;
- struct pmu_event *te;
- bool found = false;
- if (table->pmu)
- test = &test_uncore_events[0];
- else
- test = &test_cpu_events[0];
- te = &test->event;
- for (; te->name; test++, te = &test->event) {
- if (strcmp(table->name, te->name))
- continue;
- found = true;
- map_events++;
- if (!is_same(table->desc, te->desc)) {
- pr_debug2("testing event table %s: mismatched desc, %s vs %s\n",
- table->name, table->desc, te->desc);
- return -1;
- }
- if (!is_same(table->topic, te->topic)) {
- pr_debug2("testing event table %s: mismatched topic, %s vs %s\n",
- table->name, table->topic,
- te->topic);
- return -1;
- }
- if (!is_same(table->long_desc, te->long_desc)) {
- pr_debug2("testing event table %s: mismatched long_desc, %s vs %s\n",
- table->name, table->long_desc,
- te->long_desc);
- return -1;
- }
- if (!is_same(table->unit, te->unit)) {
- pr_debug2("testing event table %s: mismatched unit, %s vs %s\n",
- table->name, table->unit,
- te->unit);
- return -1;
- }
- if (!is_same(table->perpkg, te->perpkg)) {
- pr_debug2("testing event table %s: mismatched perpkg, %s vs %s\n",
- table->name, table->perpkg,
- te->perpkg);
- return -1;
- }
- if (!is_same(table->metric_expr, te->metric_expr)) {
- pr_debug2("testing event table %s: mismatched metric_expr, %s vs %s\n",
- table->name, table->metric_expr,
- te->metric_expr);
- return -1;
- }
- if (!is_same(table->metric_name, te->metric_name)) {
- pr_debug2("testing event table %s: mismatched metric_name, %s vs %s\n",
- table->name, table->metric_name,
- te->metric_name);
- return -1;
- }
- if (!is_same(table->deprecated, te->deprecated)) {
- pr_debug2("testing event table %s: mismatched deprecated, %s vs %s\n",
- table->name, table->deprecated,
- te->deprecated);
- return -1;
- }
- pr_debug("testing event table %s: pass\n", table->name);
- }
- if (!found) {
- pr_err("testing event table: could not find event %s\n",
- table->name);
- return -1;
- }
- }
- if (map_events != expected_events) {
- pr_err("testing event table: found %d, but expected %d\n",
- map_events, expected_events);
- return -1;
- }
- return 0;
- }
- static struct perf_pmu_alias *find_alias(const char *test_event, struct list_head *aliases)
- {
- struct perf_pmu_alias *alias;
- list_for_each_entry(alias, aliases, list)
- if (!strcmp(test_event, alias->name))
- return alias;
- return NULL;
- }
- /* Verify aliases are as expected */
- static int __test__pmu_event_aliases(char *pmu_name, int *count)
- {
- struct perf_pmu_test_event *test;
- struct pmu_event *te;
- struct perf_pmu *pmu;
- LIST_HEAD(aliases);
- int res = 0;
- bool use_uncore_table;
- struct pmu_events_map *map = __test_pmu_get_events_map();
- struct perf_pmu_alias *a, *tmp;
- if (!map)
- return -1;
- if (is_pmu_core(pmu_name)) {
- test = &test_cpu_events[0];
- use_uncore_table = false;
- } else {
- test = &test_uncore_events[0];
- use_uncore_table = true;
- }
- pmu = zalloc(sizeof(*pmu));
- if (!pmu)
- return -1;
- pmu->name = pmu_name;
- pmu_add_cpu_aliases_map(&aliases, pmu, map);
- for (te = &test->event; te->name; test++, te = &test->event) {
- struct perf_pmu_alias *alias = find_alias(te->name, &aliases);
- if (!alias) {
- bool uncore_match = pmu_uncore_alias_match(pmu_name,
- te->pmu);
- if (use_uncore_table && !uncore_match) {
- pr_debug3("testing aliases PMU %s: skip matching alias %s\n",
- pmu_name, te->name);
- continue;
- }
- pr_debug2("testing aliases PMU %s: no alias, alias_table->name=%s\n",
- pmu_name, te->name);
- res = -1;
- break;
- }
- if (!is_same(alias->desc, te->desc)) {
- pr_debug2("testing aliases PMU %s: mismatched desc, %s vs %s\n",
- pmu_name, alias->desc, te->desc);
- res = -1;
- break;
- }
- if (!is_same(alias->long_desc, test->alias_long_desc)) {
- pr_debug2("testing aliases PMU %s: mismatched long_desc, %s vs %s\n",
- pmu_name, alias->long_desc,
- test->alias_long_desc);
- res = -1;
- break;
- }
- if (!is_same(alias->str, test->alias_str)) {
- pr_debug2("testing aliases PMU %s: mismatched str, %s vs %s\n",
- pmu_name, alias->str, test->alias_str);
- res = -1;
- break;
- }
- if (!is_same(alias->topic, te->topic)) {
- pr_debug2("testing aliases PMU %s: mismatched topic, %s vs %s\n",
- pmu_name, alias->topic, te->topic);
- res = -1;
- break;
- }
- (*count)++;
- pr_debug2("testing aliases PMU %s: matched event %s\n",
- pmu_name, alias->name);
- }
- list_for_each_entry_safe(a, tmp, &aliases, list) {
- list_del(&a->list);
- perf_pmu_free_alias(a);
- }
- free(pmu);
- return res;
- }
- static int test_aliases(void)
- {
- struct perf_pmu *pmu = NULL;
- while ((pmu = perf_pmu__scan(pmu)) != NULL) {
- int count = 0;
- if (list_empty(&pmu->format)) {
- pr_debug2("skipping testing PMU %s\n", pmu->name);
- continue;
- }
- if (__test__pmu_event_aliases(pmu->name, &count)) {
- pr_debug("testing PMU %s aliases: failed\n", pmu->name);
- return -1;
- }
- if (count == 0)
- pr_debug3("testing PMU %s aliases: no events to match\n",
- pmu->name);
- else
- pr_debug("testing PMU %s aliases: pass\n", pmu->name);
- }
- return 0;
- }
- static bool is_number(const char *str)
- {
- char *end_ptr;
- double v;
- errno = 0;
- v = strtod(str, &end_ptr);
- (void)v; // We're not interested in this value, only if it is valid
- return errno == 0 && end_ptr != str;
- }
- static int check_parse_id(const char *id, struct parse_events_error *error,
- struct perf_pmu *fake_pmu)
- {
- struct evlist *evlist;
- int ret;
- /* Numbers are always valid. */
- if (is_number(id))
- return 0;
- evlist = evlist__new();
- if (!evlist)
- return -ENOMEM;
- ret = __parse_events(evlist, id, error, fake_pmu);
- evlist__delete(evlist);
- return ret;
- }
- static int check_parse_cpu(const char *id, bool same_cpu, struct pmu_event *pe)
- {
- struct parse_events_error error = { .idx = 0, };
- int ret = check_parse_id(id, &error, NULL);
- if (ret && same_cpu) {
- pr_warning("Parse event failed metric '%s' id '%s' expr '%s'\n",
- pe->metric_name, id, pe->metric_expr);
- pr_warning("Error string '%s' help '%s'\n", error.str,
- error.help);
- } else if (ret) {
- pr_debug3("Parse event failed, but for an event that may not be supported by this CPU.\nid '%s' metric '%s' expr '%s'\n",
- id, pe->metric_name, pe->metric_expr);
- ret = 0;
- }
- free(error.str);
- free(error.help);
- free(error.first_str);
- free(error.first_help);
- return ret;
- }
- static int check_parse_fake(const char *id)
- {
- struct parse_events_error error = { .idx = 0, };
- int ret = check_parse_id(id, &error, &perf_pmu__fake);
- free(error.str);
- free(error.help);
- free(error.first_str);
- free(error.first_help);
- return ret;
- }
- static void expr_failure(const char *msg,
- const struct pmu_events_map *map,
- const struct pmu_event *pe)
- {
- pr_debug("%s for map %s %s %s\n",
- msg, map->cpuid, map->version, map->type);
- pr_debug("On metric %s\n", pe->metric_name);
- pr_debug("On expression %s\n", pe->metric_expr);
- }
- static int test_parsing(void)
- {
- struct pmu_events_map *cpus_map = perf_pmu__find_map(NULL);
- struct pmu_events_map *map;
- struct pmu_event *pe;
- int i, j, k;
- int ret = 0;
- struct expr_parse_ctx ctx;
- double result;
- i = 0;
- for (;;) {
- map = &pmu_events_map[i++];
- if (!map->table)
- break;
- j = 0;
- for (;;) {
- struct hashmap_entry *cur;
- size_t bkt;
- pe = &map->table[j++];
- if (!pe->name && !pe->metric_group && !pe->metric_name)
- break;
- if (!pe->metric_expr)
- continue;
- expr__ctx_init(&ctx);
- if (expr__find_other(pe->metric_expr, NULL, &ctx, 0)
- < 0) {
- expr_failure("Parse other failed", map, pe);
- ret++;
- continue;
- }
- /*
- * Add all ids with a made up value. The value may
- * trigger divide by zero when subtracted and so try to
- * make them unique.
- */
- k = 1;
- hashmap__for_each_entry((&ctx.ids), cur, bkt)
- expr__add_id_val(&ctx, strdup(cur->key), k++);
- hashmap__for_each_entry((&ctx.ids), cur, bkt) {
- if (check_parse_cpu(cur->key, map == cpus_map,
- pe))
- ret++;
- }
- if (expr__parse(&result, &ctx, pe->metric_expr, 0)) {
- expr_failure("Parse failed", map, pe);
- ret++;
- }
- expr__ctx_clear(&ctx);
- }
- }
- /* TODO: fail when not ok */
- return ret == 0 ? TEST_OK : TEST_SKIP;
- }
- struct test_metric {
- const char *str;
- };
- static struct test_metric metrics[] = {
- { "(unc_p_power_state_occupancy.cores_c0 / unc_p_clockticks) * 100." },
- { "imx8_ddr0@read\\-cycles@ * 4 * 4", },
- { "imx8_ddr0@axid\\-read\\,axi_mask\\=0xffff\\,axi_id\\=0x0000@ * 4", },
- { "(cstate_pkg@c2\\-residency@ / msr@tsc@) * 100", },
- { "(imx8_ddr0@read\\-cycles@ + imx8_ddr0@write\\-cycles@)", },
- };
- static int metric_parse_fake(const char *str)
- {
- struct expr_parse_ctx ctx;
- struct hashmap_entry *cur;
- double result;
- int ret = -1;
- size_t bkt;
- int i;
- pr_debug("parsing '%s'\n", str);
- expr__ctx_init(&ctx);
- if (expr__find_other(str, NULL, &ctx, 0) < 0) {
- pr_err("expr__find_other failed\n");
- return -1;
- }
- /*
- * Add all ids with a made up value. The value may
- * trigger divide by zero when subtracted and so try to
- * make them unique.
- */
- i = 1;
- hashmap__for_each_entry((&ctx.ids), cur, bkt)
- expr__add_id_val(&ctx, strdup(cur->key), i++);
- hashmap__for_each_entry((&ctx.ids), cur, bkt) {
- if (check_parse_fake(cur->key)) {
- pr_err("check_parse_fake failed\n");
- goto out;
- }
- }
- if (expr__parse(&result, &ctx, str, 0))
- pr_err("expr__parse failed\n");
- else
- ret = 0;
- out:
- expr__ctx_clear(&ctx);
- return ret;
- }
- /*
- * Parse all the metrics for current architecture,
- * or all defined cpus via the 'fake_pmu'
- * in parse_events.
- */
- static int test_parsing_fake(void)
- {
- struct pmu_events_map *map;
- struct pmu_event *pe;
- unsigned int i, j;
- int err = 0;
- for (i = 0; i < ARRAY_SIZE(metrics); i++) {
- err = metric_parse_fake(metrics[i].str);
- if (err)
- return err;
- }
- i = 0;
- for (;;) {
- map = &pmu_events_map[i++];
- if (!map->table)
- break;
- j = 0;
- for (;;) {
- pe = &map->table[j++];
- if (!pe->name && !pe->metric_group && !pe->metric_name)
- break;
- if (!pe->metric_expr)
- continue;
- err = metric_parse_fake(pe->metric_expr);
- if (err)
- return err;
- }
- }
- return 0;
- }
- static const struct {
- int (*func)(void);
- const char *desc;
- } pmu_events_testcase_table[] = {
- {
- .func = test_pmu_event_table,
- .desc = "PMU event table sanity",
- },
- {
- .func = test_aliases,
- .desc = "PMU event map aliases",
- },
- {
- .func = test_parsing,
- .desc = "Parsing of PMU event table metrics",
- },
- {
- .func = test_parsing_fake,
- .desc = "Parsing of PMU event table metrics with fake PMUs",
- },
- };
- const char *test__pmu_events_subtest_get_desc(int subtest)
- {
- if (subtest < 0 ||
- subtest >= (int)ARRAY_SIZE(pmu_events_testcase_table))
- return NULL;
- return pmu_events_testcase_table[subtest].desc;
- }
- const char *test__pmu_events_subtest_skip_reason(int subtest)
- {
- if (subtest < 0 ||
- subtest >= (int)ARRAY_SIZE(pmu_events_testcase_table))
- return NULL;
- if (pmu_events_testcase_table[subtest].func != test_parsing)
- return NULL;
- return "some metrics failed";
- }
- int test__pmu_events_subtest_get_nr(void)
- {
- return (int)ARRAY_SIZE(pmu_events_testcase_table);
- }
- int test__pmu_events(struct test *test __maybe_unused, int subtest)
- {
- if (subtest < 0 ||
- subtest >= (int)ARRAY_SIZE(pmu_events_testcase_table))
- return TEST_FAIL;
- return pmu_events_testcase_table[subtest].func();
- }
|