1 // SPDX-License-Identifier: GPL-2.0-only
2 /* Copyright (c) 2019 Facebook */
5 #include <linux/bpf_verifier.h>
7 #include <linux/filter.h>
8 #include <linux/slab.h>
9 #include <linux/numa.h>
10 #include <linux/seq_file.h>
11 #include <linux/refcount.h>
12 #include <linux/mutex.h>
14 enum bpf_struct_ops_state {
15 BPF_STRUCT_OPS_STATE_INIT,
16 BPF_STRUCT_OPS_STATE_INUSE,
17 BPF_STRUCT_OPS_STATE_TOBEFREE,
20 #define BPF_STRUCT_OPS_COMMON_VALUE \
22 enum bpf_struct_ops_state state
24 struct bpf_struct_ops_value {
25 BPF_STRUCT_OPS_COMMON_VALUE;
26 char data[] ____cacheline_aligned_in_smp;
29 struct bpf_struct_ops_map {
32 const struct bpf_struct_ops *st_ops;
33 /* protect map_update */
35 /* progs has all the bpf_prog that is populated
36 * to the func ptr of the kernel's struct
39 struct bpf_prog **progs;
40 /* image is a page that has all the trampolines
41 * that stores the func args before calling the bpf_prog.
42 * A PAGE_SIZE "image" is enough to store all trampoline for
46 /* uvalue->data stores the kernel struct
47 * (e.g. tcp_congestion_ops) that is more useful
48 * to userspace than the kvalue. For example,
49 * the bpf_prog's id is stored instead of the kernel
50 * address of a func ptr.
52 struct bpf_struct_ops_value *uvalue;
53 /* kvalue.data stores the actual kernel's struct
54 * (e.g. tcp_congestion_ops) that will be
55 * registered to the kernel subsystem.
57 struct bpf_struct_ops_value kvalue;
60 #define VALUE_PREFIX "bpf_struct_ops_"
61 #define VALUE_PREFIX_LEN (sizeof(VALUE_PREFIX) - 1)
63 /* bpf_struct_ops_##_name (e.g. bpf_struct_ops_tcp_congestion_ops) is
64 * the map's value exposed to the userspace and its btf-type-id is
65 * stored at the map->btf_vmlinux_value_type_id.
68 #define BPF_STRUCT_OPS_TYPE(_name) \
69 extern struct bpf_struct_ops bpf_##_name; \
71 struct bpf_struct_ops_##_name { \
72 BPF_STRUCT_OPS_COMMON_VALUE; \
73 struct _name data ____cacheline_aligned_in_smp; \
75 #include "bpf_struct_ops_types.h"
76 #undef BPF_STRUCT_OPS_TYPE
79 #define BPF_STRUCT_OPS_TYPE(_name) BPF_STRUCT_OPS_TYPE_##_name,
80 #include "bpf_struct_ops_types.h"
81 #undef BPF_STRUCT_OPS_TYPE
82 __NR_BPF_STRUCT_OPS_TYPE,
85 static struct bpf_struct_ops * const bpf_struct_ops[] = {
86 #define BPF_STRUCT_OPS_TYPE(_name) \
87 [BPF_STRUCT_OPS_TYPE_##_name] = &bpf_##_name,
88 #include "bpf_struct_ops_types.h"
89 #undef BPF_STRUCT_OPS_TYPE
92 const struct bpf_verifier_ops bpf_struct_ops_verifier_ops = {
95 const struct bpf_prog_ops bpf_struct_ops_prog_ops = {
98 static const struct btf_type *module_type;
100 void bpf_struct_ops_init(struct btf *btf, struct bpf_verifier_log *log)
102 s32 type_id, value_id, module_id;
103 const struct btf_member *member;
104 struct bpf_struct_ops *st_ops;
105 const struct btf_type *t;
106 char value_name[128];
110 /* Ensure BTF type is emitted for "struct bpf_struct_ops_##_name" */
111 #define BPF_STRUCT_OPS_TYPE(_name) BTF_TYPE_EMIT(struct bpf_struct_ops_##_name);
112 #include "bpf_struct_ops_types.h"
113 #undef BPF_STRUCT_OPS_TYPE
115 module_id = btf_find_by_name_kind(btf, "module", BTF_KIND_STRUCT);
117 pr_warn("Cannot find struct module in btf_vmlinux\n");
120 module_type = btf_type_by_id(btf, module_id);
122 for (i = 0; i < ARRAY_SIZE(bpf_struct_ops); i++) {
123 st_ops = bpf_struct_ops[i];
125 if (strlen(st_ops->name) + VALUE_PREFIX_LEN >=
126 sizeof(value_name)) {
127 pr_warn("struct_ops name %s is too long\n",
131 sprintf(value_name, "%s%s", VALUE_PREFIX, st_ops->name);
133 value_id = btf_find_by_name_kind(btf, value_name,
136 pr_warn("Cannot find struct %s in btf_vmlinux\n",
141 type_id = btf_find_by_name_kind(btf, st_ops->name,
144 pr_warn("Cannot find struct %s in btf_vmlinux\n",
148 t = btf_type_by_id(btf, type_id);
149 if (btf_type_vlen(t) > BPF_STRUCT_OPS_MAX_NR_MEMBERS) {
150 pr_warn("Cannot support #%u members in struct %s\n",
151 btf_type_vlen(t), st_ops->name);
155 for_each_member(j, t, member) {
156 const struct btf_type *func_proto;
158 mname = btf_name_by_offset(btf, member->name_off);
160 pr_warn("anon member in struct %s is not supported\n",
165 if (btf_member_bitfield_size(t, member)) {
166 pr_warn("bit field member %s in struct %s is not supported\n",
167 mname, st_ops->name);
171 func_proto = btf_type_resolve_func_ptr(btf,
175 btf_distill_func_proto(log, btf,
177 &st_ops->func_models[j])) {
178 pr_warn("Error in parsing func ptr %s in struct %s\n",
179 mname, st_ops->name);
184 if (j == btf_type_vlen(t)) {
185 if (st_ops->init(btf)) {
186 pr_warn("Error in init bpf_struct_ops %s\n",
189 st_ops->type_id = type_id;
191 st_ops->value_id = value_id;
192 st_ops->value_type = btf_type_by_id(btf,
199 extern struct btf *btf_vmlinux;
201 static const struct bpf_struct_ops *
202 bpf_struct_ops_find_value(u32 value_id)
206 if (!value_id || !btf_vmlinux)
209 for (i = 0; i < ARRAY_SIZE(bpf_struct_ops); i++) {
210 if (bpf_struct_ops[i]->value_id == value_id)
211 return bpf_struct_ops[i];
217 const struct bpf_struct_ops *bpf_struct_ops_find(u32 type_id)
221 if (!type_id || !btf_vmlinux)
224 for (i = 0; i < ARRAY_SIZE(bpf_struct_ops); i++) {
225 if (bpf_struct_ops[i]->type_id == type_id)
226 return bpf_struct_ops[i];
232 static int bpf_struct_ops_map_get_next_key(struct bpf_map *map, void *key,
235 if (key && *(u32 *)key == 0)
238 *(u32 *)next_key = 0;
242 int bpf_struct_ops_map_sys_lookup_elem(struct bpf_map *map, void *key,
245 struct bpf_struct_ops_map *st_map = (struct bpf_struct_ops_map *)map;
246 struct bpf_struct_ops_value *uvalue, *kvalue;
247 enum bpf_struct_ops_state state;
249 if (unlikely(*(u32 *)key != 0))
252 kvalue = &st_map->kvalue;
253 /* Pair with smp_store_release() during map_update */
254 state = smp_load_acquire(&kvalue->state);
255 if (state == BPF_STRUCT_OPS_STATE_INIT) {
256 memset(value, 0, map->value_size);
260 /* No lock is needed. state and refcnt do not need
261 * to be updated together under atomic context.
263 uvalue = (struct bpf_struct_ops_value *)value;
264 memcpy(uvalue, st_map->uvalue, map->value_size);
265 uvalue->state = state;
266 refcount_set(&uvalue->refcnt, refcount_read(&kvalue->refcnt));
271 static void *bpf_struct_ops_map_lookup_elem(struct bpf_map *map, void *key)
273 return ERR_PTR(-EINVAL);
276 static void bpf_struct_ops_map_put_progs(struct bpf_struct_ops_map *st_map)
278 const struct btf_type *t = st_map->st_ops->type;
281 for (i = 0; i < btf_type_vlen(t); i++) {
282 if (st_map->progs[i]) {
283 bpf_prog_put(st_map->progs[i]);
284 st_map->progs[i] = NULL;
289 static int check_zero_holes(const struct btf_type *t, void *data)
291 const struct btf_member *member;
292 u32 i, moff, msize, prev_mend = 0;
293 const struct btf_type *mtype;
295 for_each_member(i, t, member) {
296 moff = btf_member_bit_offset(t, member) / 8;
297 if (moff > prev_mend &&
298 memchr_inv(data + prev_mend, 0, moff - prev_mend))
301 mtype = btf_type_by_id(btf_vmlinux, member->type);
302 mtype = btf_resolve_size(btf_vmlinux, mtype, &msize);
304 return PTR_ERR(mtype);
305 prev_mend = moff + msize;
308 if (t->size > prev_mend &&
309 memchr_inv(data + prev_mend, 0, t->size - prev_mend))
315 static int bpf_struct_ops_map_update_elem(struct bpf_map *map, void *key,
316 void *value, u64 flags)
318 struct bpf_struct_ops_map *st_map = (struct bpf_struct_ops_map *)map;
319 const struct bpf_struct_ops *st_ops = st_map->st_ops;
320 struct bpf_struct_ops_value *uvalue, *kvalue;
321 const struct btf_member *member;
322 const struct btf_type *t = st_ops->type;
323 struct bpf_tramp_progs *tprogs = NULL;
325 int prog_fd, err = 0;
332 if (*(u32 *)key != 0)
335 err = check_zero_holes(st_ops->value_type, value);
339 uvalue = (struct bpf_struct_ops_value *)value;
340 err = check_zero_holes(t, uvalue->data);
344 if (uvalue->state || refcount_read(&uvalue->refcnt))
347 tprogs = kcalloc(BPF_TRAMP_MAX, sizeof(*tprogs), GFP_KERNEL);
351 uvalue = (struct bpf_struct_ops_value *)st_map->uvalue;
352 kvalue = (struct bpf_struct_ops_value *)&st_map->kvalue;
354 mutex_lock(&st_map->lock);
356 if (kvalue->state != BPF_STRUCT_OPS_STATE_INIT) {
361 memcpy(uvalue, value, map->value_size);
363 udata = &uvalue->data;
364 kdata = &kvalue->data;
365 image = st_map->image;
367 for_each_member(i, t, member) {
368 const struct btf_type *mtype, *ptype;
369 struct bpf_prog *prog;
373 moff = btf_member_bit_offset(t, member) / 8;
374 ptype = btf_type_resolve_ptr(btf_vmlinux, member->type, NULL);
375 if (ptype == module_type) {
376 if (*(void **)(udata + moff))
378 *(void **)(kdata + moff) = BPF_MODULE_OWNER;
382 err = st_ops->init_member(t, member, kdata, udata);
386 /* The ->init_member() has handled this member */
390 /* If st_ops->init_member does not handle it,
391 * we will only handle func ptrs and zero-ed members
392 * here. Reject everything else.
395 /* All non func ptr member must be 0 */
396 if (!ptype || !btf_type_is_func_proto(ptype)) {
399 mtype = btf_type_by_id(btf_vmlinux, member->type);
400 mtype = btf_resolve_size(btf_vmlinux, mtype, &msize);
402 err = PTR_ERR(mtype);
406 if (memchr_inv(udata + moff, 0, msize)) {
414 prog_fd = (int)(*(unsigned long *)(udata + moff));
415 /* Similar check as the attr->attach_prog_fd */
419 prog = bpf_prog_get(prog_fd);
424 st_map->progs[i] = prog;
426 if (prog->type != BPF_PROG_TYPE_STRUCT_OPS ||
427 prog->aux->attach_btf_id != st_ops->type_id ||
428 prog->expected_attach_type != i) {
433 tprogs[BPF_TRAMP_FENTRY].progs[0] = prog;
434 tprogs[BPF_TRAMP_FENTRY].nr_progs = 1;
435 flags = st_ops->func_models[i].ret_size > 0 ?
436 BPF_TRAMP_F_RET_FENTRY_RET : 0;
437 err = arch_prepare_bpf_trampoline(NULL, image,
438 st_map->image + PAGE_SIZE,
439 &st_ops->func_models[i],
440 flags, tprogs, NULL);
444 *(void **)(kdata + moff) = image;
447 /* put prog_id to udata */
448 *(unsigned long *)(udata + moff) = prog->aux->id;
451 refcount_set(&kvalue->refcnt, 1);
454 set_memory_ro((long)st_map->image, 1);
455 set_memory_x((long)st_map->image, 1);
456 err = st_ops->reg(kdata);
458 /* Pair with smp_load_acquire() during lookup_elem().
459 * It ensures the above udata updates (e.g. prog->aux->id)
460 * can be seen once BPF_STRUCT_OPS_STATE_INUSE is set.
462 smp_store_release(&kvalue->state, BPF_STRUCT_OPS_STATE_INUSE);
466 /* Error during st_ops->reg(). It is very unlikely since
467 * the above init_member() should have caught it earlier
468 * before reg(). The only possibility is if there was a race
469 * in registering the struct_ops (under the same name) to
470 * a sub-system through different struct_ops's maps.
472 set_memory_nx((long)st_map->image, 1);
473 set_memory_rw((long)st_map->image, 1);
477 bpf_struct_ops_map_put_progs(st_map);
478 memset(uvalue, 0, map->value_size);
479 memset(kvalue, 0, map->value_size);
482 mutex_unlock(&st_map->lock);
486 static int bpf_struct_ops_map_delete_elem(struct bpf_map *map, void *key)
488 enum bpf_struct_ops_state prev_state;
489 struct bpf_struct_ops_map *st_map;
491 st_map = (struct bpf_struct_ops_map *)map;
492 prev_state = cmpxchg(&st_map->kvalue.state,
493 BPF_STRUCT_OPS_STATE_INUSE,
494 BPF_STRUCT_OPS_STATE_TOBEFREE);
495 switch (prev_state) {
496 case BPF_STRUCT_OPS_STATE_INUSE:
497 st_map->st_ops->unreg(&st_map->kvalue.data);
498 if (refcount_dec_and_test(&st_map->kvalue.refcnt))
501 case BPF_STRUCT_OPS_STATE_TOBEFREE:
503 case BPF_STRUCT_OPS_STATE_INIT:
507 /* Should never happen. Treat it as not found. */
512 static void bpf_struct_ops_map_seq_show_elem(struct bpf_map *map, void *key,
518 value = kmalloc(map->value_size, GFP_USER | __GFP_NOWARN);
522 err = bpf_struct_ops_map_sys_lookup_elem(map, key, value);
524 btf_type_seq_show(btf_vmlinux, map->btf_vmlinux_value_type_id,
532 static void bpf_struct_ops_map_free(struct bpf_map *map)
534 struct bpf_struct_ops_map *st_map = (struct bpf_struct_ops_map *)map;
537 bpf_struct_ops_map_put_progs(st_map);
538 bpf_map_area_free(st_map->progs);
539 bpf_jit_free_exec(st_map->image);
540 bpf_map_area_free(st_map->uvalue);
541 bpf_map_area_free(st_map);
544 static int bpf_struct_ops_map_alloc_check(union bpf_attr *attr)
546 if (attr->key_size != sizeof(unsigned int) || attr->max_entries != 1 ||
547 attr->map_flags || !attr->btf_vmlinux_value_type_id)
552 static struct bpf_map *bpf_struct_ops_map_alloc(union bpf_attr *attr)
554 const struct bpf_struct_ops *st_ops;
556 struct bpf_struct_ops_map *st_map;
557 const struct btf_type *t, *vt;
561 return ERR_PTR(-EPERM);
563 st_ops = bpf_struct_ops_find_value(attr->btf_vmlinux_value_type_id);
565 return ERR_PTR(-ENOTSUPP);
567 vt = st_ops->value_type;
568 if (attr->value_size != vt->size)
569 return ERR_PTR(-EINVAL);
573 st_map_size = sizeof(*st_map) +
575 * struct bpf_struct_ops_tcp_congestions_ops
577 (vt->size - sizeof(struct bpf_struct_ops_value));
579 st_map = bpf_map_area_alloc(st_map_size, NUMA_NO_NODE);
581 return ERR_PTR(-ENOMEM);
583 st_map->st_ops = st_ops;
586 st_map->uvalue = bpf_map_area_alloc(vt->size, NUMA_NO_NODE);
588 bpf_map_area_alloc(btf_type_vlen(t) * sizeof(struct bpf_prog *),
590 st_map->image = bpf_jit_alloc_exec(PAGE_SIZE);
591 if (!st_map->uvalue || !st_map->progs || !st_map->image) {
592 bpf_struct_ops_map_free(map);
593 return ERR_PTR(-ENOMEM);
596 mutex_init(&st_map->lock);
597 set_vm_flush_reset_perms(st_map->image);
598 bpf_map_init_from_attr(map, attr);
603 static int bpf_struct_ops_map_btf_id;
604 const struct bpf_map_ops bpf_struct_ops_map_ops = {
605 .map_alloc_check = bpf_struct_ops_map_alloc_check,
606 .map_alloc = bpf_struct_ops_map_alloc,
607 .map_free = bpf_struct_ops_map_free,
608 .map_get_next_key = bpf_struct_ops_map_get_next_key,
609 .map_lookup_elem = bpf_struct_ops_map_lookup_elem,
610 .map_delete_elem = bpf_struct_ops_map_delete_elem,
611 .map_update_elem = bpf_struct_ops_map_update_elem,
612 .map_seq_show_elem = bpf_struct_ops_map_seq_show_elem,
613 .map_btf_name = "bpf_struct_ops_map",
614 .map_btf_id = &bpf_struct_ops_map_btf_id,
617 /* "const void *" because some subsystem is
618 * passing a const (e.g. const struct tcp_congestion_ops *)
620 bool bpf_struct_ops_get(const void *kdata)
622 struct bpf_struct_ops_value *kvalue;
624 kvalue = container_of(kdata, struct bpf_struct_ops_value, data);
626 return refcount_inc_not_zero(&kvalue->refcnt);
629 static void bpf_struct_ops_put_rcu(struct rcu_head *head)
631 struct bpf_struct_ops_map *st_map;
633 st_map = container_of(head, struct bpf_struct_ops_map, rcu);
634 bpf_map_put(&st_map->map);
637 void bpf_struct_ops_put(const void *kdata)
639 struct bpf_struct_ops_value *kvalue;
641 kvalue = container_of(kdata, struct bpf_struct_ops_value, data);
642 if (refcount_dec_and_test(&kvalue->refcnt)) {
643 struct bpf_struct_ops_map *st_map;
645 st_map = container_of(kvalue, struct bpf_struct_ops_map,
647 /* The struct_ops's function may switch to another struct_ops.
649 * For example, bpf_tcp_cc_x->init() may switch to
650 * another tcp_cc_y by calling
651 * setsockopt(TCP_CONGESTION, "tcp_cc_y").
652 * During the switch, bpf_struct_ops_put(tcp_cc_x) is called
653 * and its map->refcnt may reach 0 which then free its
654 * trampoline image while tcp_cc_x is still running.
656 * Thus, a rcu grace period is needed here.
658 call_rcu(&st_map->rcu, bpf_struct_ops_put_rcu);