1 // SPDX-License-Identifier: GPL-2.0-only
2 /* Copyright (c) 2016 Facebook
3 */
4 #define _GNU_SOURCE
5 #include <sched.h>
6 #include <errno.h>
7 #include <stdio.h>
8 #include <sys/types.h>
9 #include <asm/unistd.h>
10 #include <fcntl.h>
11 #include <unistd.h>
12 #include <assert.h>
13 #include <sys/wait.h>
14 #include <sys/socket.h>
15 #include <arpa/inet.h>
16 #include <stdlib.h>
17 #include <signal.h>
18 #include <linux/bpf.h>
19 #include <string.h>
20 #include <time.h>
21 #include <bpf/bpf.h>
22 #include <bpf/libbpf.h>
23
24 #define MAX_CNT 1000000
25 #define DUMMY_IP "127.0.0.1"
26 #define DUMMY_PORT 80
27
28 static struct bpf_link *links[2];
29 static struct bpf_object *obj;
30 static int cnt;
31
time_get_ns(void)32 static __u64 time_get_ns(void)
33 {
34 struct timespec ts;
35
36 clock_gettime(CLOCK_MONOTONIC, &ts);
37 return ts.tv_sec * 1000000000ull + ts.tv_nsec;
38 }
39
test_task_rename(int cpu)40 static void test_task_rename(int cpu)
41 {
42 char buf[] = "test\n";
43 __u64 start_time;
44 int i, fd;
45
46 fd = open("/proc/self/comm", O_WRONLY|O_TRUNC);
47 if (fd < 0) {
48 printf("couldn't open /proc\n");
49 exit(1);
50 }
51 start_time = time_get_ns();
52 for (i = 0; i < MAX_CNT; i++) {
53 if (write(fd, buf, sizeof(buf)) < 0) {
54 printf("task rename failed: %s\n", strerror(errno));
55 close(fd);
56 return;
57 }
58 }
59 printf("task_rename:%d: %lld events per sec\n",
60 cpu, MAX_CNT * 1000000000ll / (time_get_ns() - start_time));
61 close(fd);
62 }
63
test_fib_table_lookup(int cpu)64 static void test_fib_table_lookup(int cpu)
65 {
66 struct sockaddr_in addr;
67 char buf[] = "test\n";
68 __u64 start_time;
69 int i, fd;
70
71 fd = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
72 if (fd < 0) {
73 printf("couldn't open socket\n");
74 exit(1);
75 }
76 memset((char *)&addr, 0, sizeof(addr));
77 addr.sin_addr.s_addr = inet_addr(DUMMY_IP);
78 addr.sin_port = htons(DUMMY_PORT);
79 addr.sin_family = AF_INET;
80 start_time = time_get_ns();
81 for (i = 0; i < MAX_CNT; i++) {
82 if (sendto(fd, buf, strlen(buf), 0,
83 (struct sockaddr *)&addr, sizeof(addr)) < 0) {
84 printf("failed to start ping: %s\n", strerror(errno));
85 close(fd);
86 return;
87 }
88 }
89 printf("fib_table_lookup:%d: %lld events per sec\n",
90 cpu, MAX_CNT * 1000000000ll / (time_get_ns() - start_time));
91 close(fd);
92 }
93
loop(int cpu,int flags)94 static void loop(int cpu, int flags)
95 {
96 cpu_set_t cpuset;
97
98 CPU_ZERO(&cpuset);
99 CPU_SET(cpu, &cpuset);
100 sched_setaffinity(0, sizeof(cpuset), &cpuset);
101
102 if (flags & 1)
103 test_task_rename(cpu);
104 if (flags & 2)
105 test_fib_table_lookup(cpu);
106 }
107
run_perf_test(int tasks,int flags)108 static void run_perf_test(int tasks, int flags)
109 {
110 pid_t pid[tasks];
111 int i;
112
113 for (i = 0; i < tasks; i++) {
114 pid[i] = fork();
115 if (pid[i] == 0) {
116 loop(i, flags);
117 exit(0);
118 } else if (pid[i] == -1) {
119 printf("couldn't spawn #%d process\n", i);
120 exit(1);
121 }
122 }
123 for (i = 0; i < tasks; i++) {
124 int status;
125
126 assert(waitpid(pid[i], &status, 0) == pid[i]);
127 assert(status == 0);
128 }
129 }
130
load_progs(char * filename)131 static int load_progs(char *filename)
132 {
133 struct bpf_program *prog;
134 int err = 0;
135
136 obj = bpf_object__open_file(filename, NULL);
137 err = libbpf_get_error(obj);
138 if (err < 0) {
139 fprintf(stderr, "ERROR: opening BPF object file failed\n");
140 return err;
141 }
142
143 /* load BPF program */
144 err = bpf_object__load(obj);
145 if (err < 0) {
146 fprintf(stderr, "ERROR: loading BPF object file failed\n");
147 return err;
148 }
149
150 bpf_object__for_each_program(prog, obj) {
151 links[cnt] = bpf_program__attach(prog);
152 err = libbpf_get_error(links[cnt]);
153 if (err < 0) {
154 fprintf(stderr, "ERROR: bpf_program__attach failed\n");
155 links[cnt] = NULL;
156 return err;
157 }
158 cnt++;
159 }
160
161 return err;
162 }
163
unload_progs(void)164 static void unload_progs(void)
165 {
166 while (cnt)
167 bpf_link__destroy(links[--cnt]);
168
169 bpf_object__close(obj);
170 }
171
main(int argc,char ** argv)172 int main(int argc, char **argv)
173 {
174 int num_cpu = sysconf(_SC_NPROCESSORS_ONLN);
175 int test_flags = ~0;
176 char filename[256];
177 int err = 0;
178
179
180 if (argc > 1)
181 test_flags = atoi(argv[1]) ? : test_flags;
182 if (argc > 2)
183 num_cpu = atoi(argv[2]) ? : num_cpu;
184
185 if (test_flags & 0x3) {
186 printf("BASE\n");
187 run_perf_test(num_cpu, test_flags);
188 }
189
190 if (test_flags & 0xC) {
191 snprintf(filename, sizeof(filename),
192 "%s_kprobe.bpf.o", argv[0]);
193
194 printf("w/KPROBE\n");
195 err = load_progs(filename);
196 if (!err)
197 run_perf_test(num_cpu, test_flags >> 2);
198
199 unload_progs();
200 }
201
202 if (test_flags & 0x30) {
203 snprintf(filename, sizeof(filename),
204 "%s_tp.bpf.o", argv[0]);
205 printf("w/TRACEPOINT\n");
206 err = load_progs(filename);
207 if (!err)
208 run_perf_test(num_cpu, test_flags >> 4);
209
210 unload_progs();
211 }
212
213 if (test_flags & 0xC0) {
214 snprintf(filename, sizeof(filename),
215 "%s_raw_tp.bpf.o", argv[0]);
216 printf("w/RAW_TRACEPOINT\n");
217 err = load_progs(filename);
218 if (!err)
219 run_perf_test(num_cpu, test_flags >> 6);
220
221 unload_progs();
222 }
223
224 return err;
225 }
226