xref: /openbmc/linux/samples/bpf/sampleip_user.c (revision f125e2d4)
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * sampleip: sample instruction pointer and frequency count in a BPF map.
4  *
5  * Copyright 2016 Netflix, Inc.
6  */
7 #include <stdio.h>
8 #include <stdlib.h>
9 #include <unistd.h>
10 #include <errno.h>
11 #include <signal.h>
12 #include <string.h>
13 #include <assert.h>
14 #include <linux/perf_event.h>
15 #include <linux/ptrace.h>
16 #include <linux/bpf.h>
17 #include <sys/ioctl.h>
18 #include <bpf/libbpf.h>
19 #include "bpf_load.h"
20 #include "perf-sys.h"
21 #include "trace_helpers.h"
22 
23 #define DEFAULT_FREQ	99
24 #define DEFAULT_SECS	5
25 #define MAX_IPS		8192
26 #define PAGE_OFFSET	0xffff880000000000
27 
28 static int nr_cpus;
29 
30 static void usage(void)
31 {
32 	printf("USAGE: sampleip [-F freq] [duration]\n");
33 	printf("       -F freq    # sample frequency (Hertz), default 99\n");
34 	printf("       duration   # sampling duration (seconds), default 5\n");
35 }
36 
37 static int sampling_start(int *pmu_fd, int freq)
38 {
39 	int i;
40 
41 	struct perf_event_attr pe_sample_attr = {
42 		.type = PERF_TYPE_SOFTWARE,
43 		.freq = 1,
44 		.sample_period = freq,
45 		.config = PERF_COUNT_SW_CPU_CLOCK,
46 		.inherit = 1,
47 	};
48 
49 	for (i = 0; i < nr_cpus; i++) {
50 		pmu_fd[i] = sys_perf_event_open(&pe_sample_attr, -1 /* pid */, i,
51 					    -1 /* group_fd */, 0 /* flags */);
52 		if (pmu_fd[i] < 0) {
53 			fprintf(stderr, "ERROR: Initializing perf sampling\n");
54 			return 1;
55 		}
56 		assert(ioctl(pmu_fd[i], PERF_EVENT_IOC_SET_BPF,
57 			     prog_fd[0]) == 0);
58 		assert(ioctl(pmu_fd[i], PERF_EVENT_IOC_ENABLE, 0) == 0);
59 	}
60 
61 	return 0;
62 }
63 
64 static void sampling_end(int *pmu_fd)
65 {
66 	int i;
67 
68 	for (i = 0; i < nr_cpus; i++)
69 		close(pmu_fd[i]);
70 }
71 
72 struct ipcount {
73 	__u64 ip;
74 	__u32 count;
75 };
76 
77 /* used for sorting */
78 struct ipcount counts[MAX_IPS];
79 
80 static int count_cmp(const void *p1, const void *p2)
81 {
82 	return ((struct ipcount *)p1)->count - ((struct ipcount *)p2)->count;
83 }
84 
85 static void print_ip_map(int fd)
86 {
87 	struct ksym *sym;
88 	__u64 key, next_key;
89 	__u32 value;
90 	int i, max;
91 
92 	printf("%-19s %-32s %s\n", "ADDR", "KSYM", "COUNT");
93 
94 	/* fetch IPs and counts */
95 	key = 0, i = 0;
96 	while (bpf_map_get_next_key(fd, &key, &next_key) == 0) {
97 		bpf_map_lookup_elem(fd, &next_key, &value);
98 		counts[i].ip = next_key;
99 		counts[i++].count = value;
100 		key = next_key;
101 	}
102 	max = i;
103 
104 	/* sort and print */
105 	qsort(counts, max, sizeof(struct ipcount), count_cmp);
106 	for (i = 0; i < max; i++) {
107 		if (counts[i].ip > PAGE_OFFSET) {
108 			sym = ksym_search(counts[i].ip);
109 			if (!sym) {
110 				printf("ksym not found. Is kallsyms loaded?\n");
111 				continue;
112 			}
113 
114 			printf("0x%-17llx %-32s %u\n", counts[i].ip, sym->name,
115 			       counts[i].count);
116 		} else {
117 			printf("0x%-17llx %-32s %u\n", counts[i].ip, "(user)",
118 			       counts[i].count);
119 		}
120 	}
121 
122 	if (max == MAX_IPS) {
123 		printf("WARNING: IP hash was full (max %d entries); ", max);
124 		printf("may have dropped samples\n");
125 	}
126 }
127 
128 static void int_exit(int sig)
129 {
130 	printf("\n");
131 	print_ip_map(map_fd[0]);
132 	exit(0);
133 }
134 
135 int main(int argc, char **argv)
136 {
137 	char filename[256];
138 	int *pmu_fd, opt, freq = DEFAULT_FREQ, secs = DEFAULT_SECS;
139 
140 	/* process arguments */
141 	while ((opt = getopt(argc, argv, "F:h")) != -1) {
142 		switch (opt) {
143 		case 'F':
144 			freq = atoi(optarg);
145 			break;
146 		case 'h':
147 		default:
148 			usage();
149 			return 0;
150 		}
151 	}
152 	if (argc - optind == 1)
153 		secs = atoi(argv[optind]);
154 	if (freq == 0 || secs == 0) {
155 		usage();
156 		return 1;
157 	}
158 
159 	/* initialize kernel symbol translation */
160 	if (load_kallsyms()) {
161 		fprintf(stderr, "ERROR: loading /proc/kallsyms\n");
162 		return 2;
163 	}
164 
165 	/* create perf FDs for each CPU */
166 	nr_cpus = sysconf(_SC_NPROCESSORS_CONF);
167 	pmu_fd = malloc(nr_cpus * sizeof(int));
168 	if (pmu_fd == NULL) {
169 		fprintf(stderr, "ERROR: malloc of pmu_fd\n");
170 		return 1;
171 	}
172 
173 	/* load BPF program */
174 	snprintf(filename, sizeof(filename), "%s_kern.o", argv[0]);
175 	if (load_bpf_file(filename)) {
176 		fprintf(stderr, "ERROR: loading BPF program (errno %d):\n",
177 			errno);
178 		if (strcmp(bpf_log_buf, "") == 0)
179 			fprintf(stderr, "Try: ulimit -l unlimited\n");
180 		else
181 			fprintf(stderr, "%s", bpf_log_buf);
182 		return 1;
183 	}
184 	signal(SIGINT, int_exit);
185 	signal(SIGTERM, int_exit);
186 
187 	/* do sampling */
188 	printf("Sampling at %d Hertz for %d seconds. Ctrl-C also ends.\n",
189 	       freq, secs);
190 	if (sampling_start(pmu_fd, freq) != 0)
191 		return 1;
192 	sleep(secs);
193 	sampling_end(pmu_fd);
194 	free(pmu_fd);
195 
196 	/* output sample counts */
197 	print_ip_map(map_fd[0]);
198 
199 	return 0;
200 }
201