brintos

brintos / linux-shallow public Read only

0
0
Text · 10.1 KiB · 32ff619 Raw
388 lines · c
1// SPDX-License-Identifier: GPL-2.02/*3 * Test v2 API for perf --dlfilter shared object4 * Copyright (c) 2023, Intel Corporation.5 */6#include <stdio.h>7#include <stdlib.h>8#include <string.h>9#include <stdbool.h>10 11/*12 * Copy v2 API instead of including current API13 */14#include <linux/perf_event.h>15#include <linux/types.h>16 17/*18 * The following macro can be used to determine if this header defines19 * perf_dlfilter_sample machine_pid and vcpu.20 */21#define PERF_DLFILTER_HAS_MACHINE_PID22 23/* Definitions for perf_dlfilter_sample flags */24enum {25	PERF_DLFILTER_FLAG_BRANCH	= 1ULL << 0,26	PERF_DLFILTER_FLAG_CALL		= 1ULL << 1,27	PERF_DLFILTER_FLAG_RETURN	= 1ULL << 2,28	PERF_DLFILTER_FLAG_CONDITIONAL	= 1ULL << 3,29	PERF_DLFILTER_FLAG_SYSCALLRET	= 1ULL << 4,30	PERF_DLFILTER_FLAG_ASYNC	= 1ULL << 5,31	PERF_DLFILTER_FLAG_INTERRUPT	= 1ULL << 6,32	PERF_DLFILTER_FLAG_TX_ABORT	= 1ULL << 7,33	PERF_DLFILTER_FLAG_TRACE_BEGIN	= 1ULL << 8,34	PERF_DLFILTER_FLAG_TRACE_END	= 1ULL << 9,35	PERF_DLFILTER_FLAG_IN_TX	= 1ULL << 10,36	PERF_DLFILTER_FLAG_VMENTRY	= 1ULL << 11,37	PERF_DLFILTER_FLAG_VMEXIT	= 1ULL << 12,38};39 40/*41 * perf sample event information (as per perf script and <linux/perf_event.h>)42 */43struct perf_dlfilter_sample {44	__u32 size; /* Size of this structure (for compatibility checking) */45	__u16 ins_lat;		/* Refer PERF_SAMPLE_WEIGHT_TYPE in <linux/perf_event.h> */46	__u16 p_stage_cyc;	/* Refer PERF_SAMPLE_WEIGHT_TYPE in <linux/perf_event.h> */47	__u64 ip;48	__s32 pid;49	__s32 tid;50	__u64 time;51	__u64 addr;52	__u64 id;53	__u64 stream_id;54	__u64 period;55	__u64 weight;		/* Refer PERF_SAMPLE_WEIGHT_TYPE in <linux/perf_event.h> */56	__u64 transaction;	/* Refer PERF_SAMPLE_TRANSACTION in <linux/perf_event.h> */57	__u64 insn_cnt;	/* For instructions-per-cycle (IPC) */58	__u64 cyc_cnt;		/* For instructions-per-cycle (IPC) */59	__s32 cpu;60	__u32 flags;		/* Refer PERF_DLFILTER_FLAG_* above */61	__u64 data_src;		/* Refer PERF_SAMPLE_DATA_SRC in <linux/perf_event.h> */62	__u64 phys_addr;	/* Refer PERF_SAMPLE_PHYS_ADDR in <linux/perf_event.h> */63	__u64 data_page_size;	/* Refer PERF_SAMPLE_DATA_PAGE_SIZE in <linux/perf_event.h> */64	__u64 code_page_size;	/* Refer PERF_SAMPLE_CODE_PAGE_SIZE in <linux/perf_event.h> */65	__u64 cgroup;		/* Refer PERF_SAMPLE_CGROUP in <linux/perf_event.h> */66	__u8  cpumode;		/* Refer CPUMODE_MASK etc in <linux/perf_event.h> */67	__u8  addr_correlates_sym; /* True => resolve_addr() can be called */68	__u16 misc;		/* Refer perf_event_header in <linux/perf_event.h> */69	__u32 raw_size;		/* Refer PERF_SAMPLE_RAW in <linux/perf_event.h> */70	const void *raw_data;	/* Refer PERF_SAMPLE_RAW in <linux/perf_event.h> */71	__u64 brstack_nr;	/* Number of brstack entries */72	const struct perf_branch_entry *brstack; /* Refer <linux/perf_event.h> */73	__u64 raw_callchain_nr;	/* Number of raw_callchain entries */74	const __u64 *raw_callchain; /* Refer <linux/perf_event.h> */75	const char *event;76	__s32 machine_pid;77	__s32 vcpu;78};79 80/*81 * Address location (as per perf script)82 */83struct perf_dlfilter_al {84	__u32 size; /* Size of this structure (for compatibility checking) */85	__u32 symoff;86	const char *sym;87	__u64 addr; /* Mapped address (from dso) */88	__u64 sym_start;89	__u64 sym_end;90	const char *dso;91	__u8  sym_binding; /* STB_LOCAL, STB_GLOBAL or STB_WEAK, refer <elf.h> */92	__u8  is_64_bit; /* Only valid if dso is not NULL */93	__u8  is_kernel_ip; /* True if in kernel space */94	__u32 buildid_size;95	__u8 *buildid;96	/* Below members are only populated by resolve_ip() */97	__u8 filtered; /* True if this sample event will be filtered out */98	const char *comm;99	void *priv; /* Private data (v2 API) */100};101 102struct perf_dlfilter_fns {103	/* Return information about ip */104	const struct perf_dlfilter_al *(*resolve_ip)(void *ctx);105	/* Return information about addr (if addr_correlates_sym) */106	const struct perf_dlfilter_al *(*resolve_addr)(void *ctx);107	/* Return arguments from --dlarg option */108	char **(*args)(void *ctx, int *dlargc);109	/*110	 * Return information about address (al->size must be set before111	 * calling). Returns 0 on success, -1 otherwise. Call al_cleanup()112	 * when 'al' data is no longer needed.113	 */114	__s32 (*resolve_address)(void *ctx, __u64 address, struct perf_dlfilter_al *al);115	/* Return instruction bytes and length */116	const __u8 *(*insn)(void *ctx, __u32 *length);117	/* Return source file name and line number */118	const char *(*srcline)(void *ctx, __u32 *line_number);119	/* Return perf_event_attr, refer <linux/perf_event.h> */120	struct perf_event_attr *(*attr)(void *ctx);121	/* Read object code, return numbers of bytes read */122	__s32 (*object_code)(void *ctx, __u64 ip, void *buf, __u32 len);123	/*124	 * If present (i.e. must check al_cleanup != NULL), call after125	 * resolve_address() to free any associated resources. (v2 API)126	 */127	void (*al_cleanup)(void *ctx, struct perf_dlfilter_al *al);128	/* Reserved */129	void *(*reserved[119])(void *);130};131 132struct perf_dlfilter_fns perf_dlfilter_fns;133 134static int verbose;135 136#define pr_debug(fmt, ...) do { \137		if (verbose > 0) \138			fprintf(stderr, fmt, ##__VA_ARGS__); \139	} while (0)140 141static int test_fail(const char *msg)142{143	pr_debug("%s\n", msg);144	return -1;145}146 147#define CHECK(x) do { \148		if (!(x)) \149			return test_fail("Check '" #x "' failed\n"); \150	} while (0)151 152struct filter_data {153	__u64 ip;154	__u64 addr;155	int do_early;156	int early_filter_cnt;157	int filter_cnt;158};159 160static struct filter_data *filt_dat;161 162int start(void **data, void *ctx)163{164	int dlargc;165	char **dlargv;166	struct filter_data *d;167	static bool called;168 169	verbose = 1;170 171	CHECK(!filt_dat && !called);172	called = true;173 174	d = calloc(1, sizeof(*d));175	if (!d)176		test_fail("Failed to allocate memory");177	filt_dat = d;178	*data = d;179 180	dlargv = perf_dlfilter_fns.args(ctx, &dlargc);181 182	CHECK(dlargc == 6);183	CHECK(!strcmp(dlargv[0], "first"));184	verbose = strtol(dlargv[1], NULL, 0);185	d->ip = strtoull(dlargv[2], NULL, 0);186	d->addr = strtoull(dlargv[3], NULL, 0);187	d->do_early = strtol(dlargv[4], NULL, 0);188	CHECK(!strcmp(dlargv[5], "last"));189 190	pr_debug("%s API\n", __func__);191 192	return 0;193}194 195#define CHECK_SAMPLE(x) do { \196		if (sample->x != expected.x) \197			return test_fail("'" #x "' not expected value\n"); \198	} while (0)199 200static int check_sample(struct filter_data *d, const struct perf_dlfilter_sample *sample)201{202	struct perf_dlfilter_sample expected = {203		.ip		= d->ip,204		.pid		= 12345,205		.tid		= 12346,206		.time		= 1234567890,207		.addr		= d->addr,208		.id		= 99,209		.stream_id	= 101,210		.period		= 543212345,211		.cpu		= 31,212		.cpumode	= PERF_RECORD_MISC_USER,213		.addr_correlates_sym = 1,214		.misc		= PERF_RECORD_MISC_USER,215	};216 217	CHECK(sample->size >= sizeof(struct perf_dlfilter_sample));218 219	CHECK_SAMPLE(ip);220	CHECK_SAMPLE(pid);221	CHECK_SAMPLE(tid);222	CHECK_SAMPLE(time);223	CHECK_SAMPLE(addr);224	CHECK_SAMPLE(id);225	CHECK_SAMPLE(stream_id);226	CHECK_SAMPLE(period);227	CHECK_SAMPLE(cpu);228	CHECK_SAMPLE(cpumode);229	CHECK_SAMPLE(addr_correlates_sym);230	CHECK_SAMPLE(misc);231 232	CHECK(!sample->raw_data);233	CHECK_SAMPLE(brstack_nr);234	CHECK(!sample->brstack);235	CHECK_SAMPLE(raw_callchain_nr);236	CHECK(!sample->raw_callchain);237 238#define EVENT_NAME "branches:"239	CHECK(!strncmp(sample->event, EVENT_NAME, strlen(EVENT_NAME)));240 241	return 0;242}243 244static int check_al(void *ctx)245{246	const struct perf_dlfilter_al *al;247 248	al = perf_dlfilter_fns.resolve_ip(ctx);249	if (!al)250		return test_fail("resolve_ip() failed");251 252	CHECK(al->sym && !strcmp("foo", al->sym));253	CHECK(!al->symoff);254 255	return 0;256}257 258static int check_addr_al(void *ctx)259{260	const struct perf_dlfilter_al *addr_al;261 262	addr_al = perf_dlfilter_fns.resolve_addr(ctx);263	if (!addr_al)264		return test_fail("resolve_addr() failed");265 266	CHECK(addr_al->sym && !strcmp("bar", addr_al->sym));267	CHECK(!addr_al->symoff);268 269	return 0;270}271 272static int check_address_al(void *ctx, const struct perf_dlfilter_sample *sample)273{274	struct perf_dlfilter_al address_al;275	const struct perf_dlfilter_al *al;276 277	al = perf_dlfilter_fns.resolve_ip(ctx);278	if (!al)279		return test_fail("resolve_ip() failed");280 281	address_al.size = sizeof(address_al);282	if (perf_dlfilter_fns.resolve_address(ctx, sample->ip, &address_al))283		return test_fail("resolve_address() failed");284 285	CHECK(address_al.sym && al->sym);286	CHECK(!strcmp(address_al.sym, al->sym));287	CHECK(address_al.addr == al->addr);288	CHECK(address_al.sym_start == al->sym_start);289	CHECK(address_al.sym_end == al->sym_end);290	CHECK(address_al.dso && al->dso);291	CHECK(!strcmp(address_al.dso, al->dso));292 293	/* al_cleanup() is v2 API so may not be present */294	if (perf_dlfilter_fns.al_cleanup)295		perf_dlfilter_fns.al_cleanup(ctx, &address_al);296 297	return 0;298}299 300static int check_attr(void *ctx)301{302	struct perf_event_attr *attr = perf_dlfilter_fns.attr(ctx);303 304	CHECK(attr);305	CHECK(attr->type == PERF_TYPE_HARDWARE);306	CHECK(attr->config == PERF_COUNT_HW_BRANCH_INSTRUCTIONS);307 308	return 0;309}310 311static int check_object_code(void *ctx, const struct perf_dlfilter_sample *sample)312{313	__u8 buf[15];314 315	CHECK(perf_dlfilter_fns.object_code(ctx, sample->ip, buf, sizeof(buf)) > 0);316 317	return 0;318}319 320static int do_checks(void *data, const struct perf_dlfilter_sample *sample, void *ctx, bool early)321{322	struct filter_data *d = data;323 324	CHECK(data && filt_dat == data);325 326	if (early) {327		CHECK(!d->early_filter_cnt);328		d->early_filter_cnt += 1;329	} else {330		CHECK(!d->filter_cnt);331		CHECK(d->early_filter_cnt);332		CHECK(d->do_early != 2);333		d->filter_cnt += 1;334	}335 336	if (check_sample(data, sample))337		return -1;338 339	if (check_attr(ctx))340		return -1;341 342	if (early && !d->do_early)343		return 0;344 345	if (check_al(ctx) || check_addr_al(ctx) || check_address_al(ctx, sample) ||346	    check_object_code(ctx, sample))347		return -1;348 349	if (early)350		return d->do_early == 2;351 352	return 1;353}354 355int filter_event_early(void *data, const struct perf_dlfilter_sample *sample, void *ctx)356{357	pr_debug("%s API\n", __func__);358 359	return do_checks(data, sample, ctx, true);360}361 362int filter_event(void *data, const struct perf_dlfilter_sample *sample, void *ctx)363{364	pr_debug("%s API\n", __func__);365 366	return do_checks(data, sample, ctx, false);367}368 369int stop(void *data, void *ctx)370{371	static bool called;372 373	pr_debug("%s API\n", __func__);374 375	CHECK(data && filt_dat == data && !called);376	called = true;377 378	free(data);379	filt_dat = NULL;380	return 0;381}382 383const char *filter_description(const char **long_description)384{385	*long_description = "Filter used by the 'dlfilter C API' perf test";386	return "dlfilter to test v2 C API";387}388