Linux-libre 5.7.5-gnu
[librecmc/linux-libre.git] / samples / bpf / sock_example.c
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
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_RAW_INSN(BPF_STX | BPF_XADD | BPF_DW, BPF_REG_0, BPF_REG_1, 0, 0), /* xadd r0 += r1 */
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
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 }