1 /* eBPF example program:
2  * - creates arraymap in kernel with key 4 bytes and value 8 bytes
3  *
4  * - loads eBPF program:
5  *   r0 = skb->data[ETH_HLEN + offsetof(struct iphdr, protocol)];
6  *   *(u32*)(fp - 4) = r0;
7  *   // assuming packet is IPv4, lookup ip->proto in a map
8  *   value = bpf_map_lookup_elem(map_fd, fp - 4);
9  *   if (value)
10  *        (*(u64*)value) += 1;
11  *
12  * - attaches this program to loopback interface "lo" raw socket
13  *
14  * - every second user space reads map[tcp], map[udp], map[icmp] to see
15  *   how many packets of given protocol were seen on "lo"
16  */
17 #include <stdio.h>
18 #include <unistd.h>
19 #include <assert.h>
20 #include <linux/bpf.h>
21 #include <string.h>
22 #include <stdlib.h>
23 #include <errno.h>
24 #include <sys/socket.h>
25 #include <arpa/inet.h>
26 #include <linux/if_ether.h>
27 #include <linux/ip.h>
28 #include <stddef.h>
29 #include <bpf/bpf.h>
30 #include "bpf_insn.h"
31 #include "sock_example.h"
32 
33 char bpf_log_buf[BPF_LOG_BUF_SIZE];
34 
test_sock(void)35 static int test_sock(void)
36 {
37 	int sock = -1, map_fd, prog_fd, i, key;
38 	long long value = 0, tcp_cnt, udp_cnt, icmp_cnt;
39 
40 	map_fd = bpf_create_map(BPF_MAP_TYPE_ARRAY, sizeof(key), sizeof(value),
41 				256, 0);
42 	if (map_fd < 0) {
43 		printf("failed to create map '%s'\n", strerror(errno));
44 		goto cleanup;
45 	}
46 
47 	struct bpf_insn prog[] = {
48 		BPF_MOV64_REG(BPF_REG_6, BPF_REG_1),
49 		BPF_LD_ABS(BPF_B, ETH_HLEN + offsetof(struct iphdr, protocol) /* R0 = ip->proto */),
50 		BPF_STX_MEM(BPF_W, BPF_REG_10, BPF_REG_0, -4), /* *(u32 *)(fp - 4) = r0 */
51 		BPF_MOV64_REG(BPF_REG_2, BPF_REG_10),
52 		BPF_ALU64_IMM(BPF_ADD, BPF_REG_2, -4), /* r2 = fp - 4 */
53 		BPF_LD_MAP_FD(BPF_REG_1, map_fd),
54 		BPF_RAW_INSN(BPF_JMP | BPF_CALL, 0, 0, 0, BPF_FUNC_map_lookup_elem),
55 		BPF_JMP_IMM(BPF_JEQ, BPF_REG_0, 0, 2),
56 		BPF_MOV64_IMM(BPF_REG_1, 1), /* r1 = 1 */
57 		BPF_ATOMIC_OP(BPF_DW, BPF_ADD, BPF_REG_0, BPF_REG_1, 0),
58 		BPF_MOV64_IMM(BPF_REG_0, 0), /* r0 = 0 */
59 		BPF_EXIT_INSN(),
60 	};
61 	size_t insns_cnt = sizeof(prog) / sizeof(struct bpf_insn);
62 
63 	prog_fd = bpf_load_program(BPF_PROG_TYPE_SOCKET_FILTER, prog, insns_cnt,
64 				   "GPL", 0, bpf_log_buf, BPF_LOG_BUF_SIZE);
65 	if (prog_fd < 0) {
66 		printf("failed to load prog '%s'\n", strerror(errno));
67 		goto cleanup;
68 	}
69 
70 	sock = open_raw_sock("lo");
71 
72 	if (setsockopt(sock, SOL_SOCKET, SO_ATTACH_BPF, &prog_fd,
73 		       sizeof(prog_fd)) < 0) {
74 		printf("setsockopt %s\n", strerror(errno));
75 		goto cleanup;
76 	}
77 
78 	for (i = 0; i < 10; i++) {
79 		key = IPPROTO_TCP;
80 		assert(bpf_map_lookup_elem(map_fd, &key, &tcp_cnt) == 0);
81 
82 		key = IPPROTO_UDP;
83 		assert(bpf_map_lookup_elem(map_fd, &key, &udp_cnt) == 0);
84 
85 		key = IPPROTO_ICMP;
86 		assert(bpf_map_lookup_elem(map_fd, &key, &icmp_cnt) == 0);
87 
88 		printf("TCP %lld UDP %lld ICMP %lld packets\n",
89 		       tcp_cnt, udp_cnt, icmp_cnt);
90 		sleep(1);
91 	}
92 
93 cleanup:
94 	/* maps, programs, raw sockets will auto cleanup on process exit */
95 	return 0;
96 }
97 
main(void)98 int main(void)
99 {
100 	FILE *f;
101 
102 	f = popen("ping -4 -c5 localhost", "r");
103 	(void)f;
104 
105 	return test_sock();
106 }
107