Loading...
1// SPDX-License-Identifier: GPL-2.0
2/* Copyright (c) 2018 Facebook */
3
4#include <uapi/linux/btf.h>
5#include <uapi/linux/bpf.h>
6#include <uapi/linux/bpf_perf_event.h>
7#include <uapi/linux/types.h>
8#include <linux/seq_file.h>
9#include <linux/compiler.h>
10#include <linux/ctype.h>
11#include <linux/errno.h>
12#include <linux/slab.h>
13#include <linux/anon_inodes.h>
14#include <linux/file.h>
15#include <linux/uaccess.h>
16#include <linux/kernel.h>
17#include <linux/idr.h>
18#include <linux/sort.h>
19#include <linux/bpf_verifier.h>
20#include <linux/btf.h>
21#include <linux/btf_ids.h>
22#include <linux/bpf_lsm.h>
23#include <linux/skmsg.h>
24#include <linux/perf_event.h>
25#include <linux/bsearch.h>
26#include <linux/kobject.h>
27#include <linux/sysfs.h>
28#include <net/sock.h>
29#include "../tools/lib/bpf/relo_core.h"
30
31/* BTF (BPF Type Format) is the meta data format which describes
32 * the data types of BPF program/map. Hence, it basically focus
33 * on the C programming language which the modern BPF is primary
34 * using.
35 *
36 * ELF Section:
37 * ~~~~~~~~~~~
38 * The BTF data is stored under the ".BTF" ELF section
39 *
40 * struct btf_type:
41 * ~~~~~~~~~~~~~~~
42 * Each 'struct btf_type' object describes a C data type.
43 * Depending on the type it is describing, a 'struct btf_type'
44 * object may be followed by more data. F.e.
45 * To describe an array, 'struct btf_type' is followed by
46 * 'struct btf_array'.
47 *
48 * 'struct btf_type' and any extra data following it are
49 * 4 bytes aligned.
50 *
51 * Type section:
52 * ~~~~~~~~~~~~~
53 * The BTF type section contains a list of 'struct btf_type' objects.
54 * Each one describes a C type. Recall from the above section
55 * that a 'struct btf_type' object could be immediately followed by extra
56 * data in order to describe some particular C types.
57 *
58 * type_id:
59 * ~~~~~~~
60 * Each btf_type object is identified by a type_id. The type_id
61 * is implicitly implied by the location of the btf_type object in
62 * the BTF type section. The first one has type_id 1. The second
63 * one has type_id 2...etc. Hence, an earlier btf_type has
64 * a smaller type_id.
65 *
66 * A btf_type object may refer to another btf_type object by using
67 * type_id (i.e. the "type" in the "struct btf_type").
68 *
69 * NOTE that we cannot assume any reference-order.
70 * A btf_type object can refer to an earlier btf_type object
71 * but it can also refer to a later btf_type object.
72 *
73 * For example, to describe "const void *". A btf_type
74 * object describing "const" may refer to another btf_type
75 * object describing "void *". This type-reference is done
76 * by specifying type_id:
77 *
78 * [1] CONST (anon) type_id=2
79 * [2] PTR (anon) type_id=0
80 *
81 * The above is the btf_verifier debug log:
82 * - Each line started with "[?]" is a btf_type object
83 * - [?] is the type_id of the btf_type object.
84 * - CONST/PTR is the BTF_KIND_XXX
85 * - "(anon)" is the name of the type. It just
86 * happens that CONST and PTR has no name.
87 * - type_id=XXX is the 'u32 type' in btf_type
88 *
89 * NOTE: "void" has type_id 0
90 *
91 * String section:
92 * ~~~~~~~~~~~~~~
93 * The BTF string section contains the names used by the type section.
94 * Each string is referred by an "offset" from the beginning of the
95 * string section.
96 *
97 * Each string is '\0' terminated.
98 *
99 * The first character in the string section must be '\0'
100 * which is used to mean 'anonymous'. Some btf_type may not
101 * have a name.
102 */
103
104/* BTF verification:
105 *
106 * To verify BTF data, two passes are needed.
107 *
108 * Pass #1
109 * ~~~~~~~
110 * The first pass is to collect all btf_type objects to
111 * an array: "btf->types".
112 *
113 * Depending on the C type that a btf_type is describing,
114 * a btf_type may be followed by extra data. We don't know
115 * how many btf_type is there, and more importantly we don't
116 * know where each btf_type is located in the type section.
117 *
118 * Without knowing the location of each type_id, most verifications
119 * cannot be done. e.g. an earlier btf_type may refer to a later
120 * btf_type (recall the "const void *" above), so we cannot
121 * check this type-reference in the first pass.
122 *
123 * In the first pass, it still does some verifications (e.g.
124 * checking the name is a valid offset to the string section).
125 *
126 * Pass #2
127 * ~~~~~~~
128 * The main focus is to resolve a btf_type that is referring
129 * to another type.
130 *
131 * We have to ensure the referring type:
132 * 1) does exist in the BTF (i.e. in btf->types[])
133 * 2) does not cause a loop:
134 * struct A {
135 * struct B b;
136 * };
137 *
138 * struct B {
139 * struct A a;
140 * };
141 *
142 * btf_type_needs_resolve() decides if a btf_type needs
143 * to be resolved.
144 *
145 * The needs_resolve type implements the "resolve()" ops which
146 * essentially does a DFS and detects backedge.
147 *
148 * During resolve (or DFS), different C types have different
149 * "RESOLVED" conditions.
150 *
151 * When resolving a BTF_KIND_STRUCT, we need to resolve all its
152 * members because a member is always referring to another
153 * type. A struct's member can be treated as "RESOLVED" if
154 * it is referring to a BTF_KIND_PTR. Otherwise, the
155 * following valid C struct would be rejected:
156 *
157 * struct A {
158 * int m;
159 * struct A *a;
160 * };
161 *
162 * When resolving a BTF_KIND_PTR, it needs to keep resolving if
163 * it is referring to another BTF_KIND_PTR. Otherwise, we cannot
164 * detect a pointer loop, e.g.:
165 * BTF_KIND_CONST -> BTF_KIND_PTR -> BTF_KIND_CONST -> BTF_KIND_PTR +
166 * ^ |
167 * +-----------------------------------------+
168 *
169 */
170
171#define BITS_PER_U128 (sizeof(u64) * BITS_PER_BYTE * 2)
172#define BITS_PER_BYTE_MASK (BITS_PER_BYTE - 1)
173#define BITS_PER_BYTE_MASKED(bits) ((bits) & BITS_PER_BYTE_MASK)
174#define BITS_ROUNDDOWN_BYTES(bits) ((bits) >> 3)
175#define BITS_ROUNDUP_BYTES(bits) \
176 (BITS_ROUNDDOWN_BYTES(bits) + !!BITS_PER_BYTE_MASKED(bits))
177
178#define BTF_INFO_MASK 0x9f00ffff
179#define BTF_INT_MASK 0x0fffffff
180#define BTF_TYPE_ID_VALID(type_id) ((type_id) <= BTF_MAX_TYPE)
181#define BTF_STR_OFFSET_VALID(name_off) ((name_off) <= BTF_MAX_NAME_OFFSET)
182
183/* 16MB for 64k structs and each has 16 members and
184 * a few MB spaces for the string section.
185 * The hard limit is S32_MAX.
186 */
187#define BTF_MAX_SIZE (16 * 1024 * 1024)
188
189#define for_each_member_from(i, from, struct_type, member) \
190 for (i = from, member = btf_type_member(struct_type) + from; \
191 i < btf_type_vlen(struct_type); \
192 i++, member++)
193
194#define for_each_vsi_from(i, from, struct_type, member) \
195 for (i = from, member = btf_type_var_secinfo(struct_type) + from; \
196 i < btf_type_vlen(struct_type); \
197 i++, member++)
198
199DEFINE_IDR(btf_idr);
200DEFINE_SPINLOCK(btf_idr_lock);
201
202enum btf_kfunc_hook {
203 BTF_KFUNC_HOOK_COMMON,
204 BTF_KFUNC_HOOK_XDP,
205 BTF_KFUNC_HOOK_TC,
206 BTF_KFUNC_HOOK_STRUCT_OPS,
207 BTF_KFUNC_HOOK_TRACING,
208 BTF_KFUNC_HOOK_SYSCALL,
209 BTF_KFUNC_HOOK_FMODRET,
210 BTF_KFUNC_HOOK_MAX,
211};
212
213enum {
214 BTF_KFUNC_SET_MAX_CNT = 256,
215 BTF_DTOR_KFUNC_MAX_CNT = 256,
216};
217
218struct btf_kfunc_set_tab {
219 struct btf_id_set8 *sets[BTF_KFUNC_HOOK_MAX];
220};
221
222struct btf_id_dtor_kfunc_tab {
223 u32 cnt;
224 struct btf_id_dtor_kfunc dtors[];
225};
226
227struct btf {
228 void *data;
229 struct btf_type **types;
230 u32 *resolved_ids;
231 u32 *resolved_sizes;
232 const char *strings;
233 void *nohdr_data;
234 struct btf_header hdr;
235 u32 nr_types; /* includes VOID for base BTF */
236 u32 types_size;
237 u32 data_size;
238 refcount_t refcnt;
239 u32 id;
240 struct rcu_head rcu;
241 struct btf_kfunc_set_tab *kfunc_set_tab;
242 struct btf_id_dtor_kfunc_tab *dtor_kfunc_tab;
243 struct btf_struct_metas *struct_meta_tab;
244
245 /* split BTF support */
246 struct btf *base_btf;
247 u32 start_id; /* first type ID in this BTF (0 for base BTF) */
248 u32 start_str_off; /* first string offset (0 for base BTF) */
249 char name[MODULE_NAME_LEN];
250 bool kernel_btf;
251};
252
253enum verifier_phase {
254 CHECK_META,
255 CHECK_TYPE,
256};
257
258struct resolve_vertex {
259 const struct btf_type *t;
260 u32 type_id;
261 u16 next_member;
262};
263
264enum visit_state {
265 NOT_VISITED,
266 VISITED,
267 RESOLVED,
268};
269
270enum resolve_mode {
271 RESOLVE_TBD, /* To Be Determined */
272 RESOLVE_PTR, /* Resolving for Pointer */
273 RESOLVE_STRUCT_OR_ARRAY, /* Resolving for struct/union
274 * or array
275 */
276};
277
278#define MAX_RESOLVE_DEPTH 32
279
280struct btf_sec_info {
281 u32 off;
282 u32 len;
283};
284
285struct btf_verifier_env {
286 struct btf *btf;
287 u8 *visit_states;
288 struct resolve_vertex stack[MAX_RESOLVE_DEPTH];
289 struct bpf_verifier_log log;
290 u32 log_type_id;
291 u32 top_stack;
292 enum verifier_phase phase;
293 enum resolve_mode resolve_mode;
294};
295
296static const char * const btf_kind_str[NR_BTF_KINDS] = {
297 [BTF_KIND_UNKN] = "UNKNOWN",
298 [BTF_KIND_INT] = "INT",
299 [BTF_KIND_PTR] = "PTR",
300 [BTF_KIND_ARRAY] = "ARRAY",
301 [BTF_KIND_STRUCT] = "STRUCT",
302 [BTF_KIND_UNION] = "UNION",
303 [BTF_KIND_ENUM] = "ENUM",
304 [BTF_KIND_FWD] = "FWD",
305 [BTF_KIND_TYPEDEF] = "TYPEDEF",
306 [BTF_KIND_VOLATILE] = "VOLATILE",
307 [BTF_KIND_CONST] = "CONST",
308 [BTF_KIND_RESTRICT] = "RESTRICT",
309 [BTF_KIND_FUNC] = "FUNC",
310 [BTF_KIND_FUNC_PROTO] = "FUNC_PROTO",
311 [BTF_KIND_VAR] = "VAR",
312 [BTF_KIND_DATASEC] = "DATASEC",
313 [BTF_KIND_FLOAT] = "FLOAT",
314 [BTF_KIND_DECL_TAG] = "DECL_TAG",
315 [BTF_KIND_TYPE_TAG] = "TYPE_TAG",
316 [BTF_KIND_ENUM64] = "ENUM64",
317};
318
319const char *btf_type_str(const struct btf_type *t)
320{
321 return btf_kind_str[BTF_INFO_KIND(t->info)];
322}
323
324/* Chunk size we use in safe copy of data to be shown. */
325#define BTF_SHOW_OBJ_SAFE_SIZE 32
326
327/*
328 * This is the maximum size of a base type value (equivalent to a
329 * 128-bit int); if we are at the end of our safe buffer and have
330 * less than 16 bytes space we can't be assured of being able
331 * to copy the next type safely, so in such cases we will initiate
332 * a new copy.
333 */
334#define BTF_SHOW_OBJ_BASE_TYPE_SIZE 16
335
336/* Type name size */
337#define BTF_SHOW_NAME_SIZE 80
338
339/*
340 * Common data to all BTF show operations. Private show functions can add
341 * their own data to a structure containing a struct btf_show and consult it
342 * in the show callback. See btf_type_show() below.
343 *
344 * One challenge with showing nested data is we want to skip 0-valued
345 * data, but in order to figure out whether a nested object is all zeros
346 * we need to walk through it. As a result, we need to make two passes
347 * when handling structs, unions and arrays; the first path simply looks
348 * for nonzero data, while the second actually does the display. The first
349 * pass is signalled by show->state.depth_check being set, and if we
350 * encounter a non-zero value we set show->state.depth_to_show to
351 * the depth at which we encountered it. When we have completed the
352 * first pass, we will know if anything needs to be displayed if
353 * depth_to_show > depth. See btf_[struct,array]_show() for the
354 * implementation of this.
355 *
356 * Another problem is we want to ensure the data for display is safe to
357 * access. To support this, the anonymous "struct {} obj" tracks the data
358 * object and our safe copy of it. We copy portions of the data needed
359 * to the object "copy" buffer, but because its size is limited to
360 * BTF_SHOW_OBJ_COPY_LEN bytes, multiple copies may be required as we
361 * traverse larger objects for display.
362 *
363 * The various data type show functions all start with a call to
364 * btf_show_start_type() which returns a pointer to the safe copy
365 * of the data needed (or if BTF_SHOW_UNSAFE is specified, to the
366 * raw data itself). btf_show_obj_safe() is responsible for
367 * using copy_from_kernel_nofault() to update the safe data if necessary
368 * as we traverse the object's data. skbuff-like semantics are
369 * used:
370 *
371 * - obj.head points to the start of the toplevel object for display
372 * - obj.size is the size of the toplevel object
373 * - obj.data points to the current point in the original data at
374 * which our safe data starts. obj.data will advance as we copy
375 * portions of the data.
376 *
377 * In most cases a single copy will suffice, but larger data structures
378 * such as "struct task_struct" will require many copies. The logic in
379 * btf_show_obj_safe() handles the logic that determines if a new
380 * copy_from_kernel_nofault() is needed.
381 */
382struct btf_show {
383 u64 flags;
384 void *target; /* target of show operation (seq file, buffer) */
385 void (*showfn)(struct btf_show *show, const char *fmt, va_list args);
386 const struct btf *btf;
387 /* below are used during iteration */
388 struct {
389 u8 depth;
390 u8 depth_to_show;
391 u8 depth_check;
392 u8 array_member:1,
393 array_terminated:1;
394 u16 array_encoding;
395 u32 type_id;
396 int status; /* non-zero for error */
397 const struct btf_type *type;
398 const struct btf_member *member;
399 char name[BTF_SHOW_NAME_SIZE]; /* space for member name/type */
400 } state;
401 struct {
402 u32 size;
403 void *head;
404 void *data;
405 u8 safe[BTF_SHOW_OBJ_SAFE_SIZE];
406 } obj;
407};
408
409struct btf_kind_operations {
410 s32 (*check_meta)(struct btf_verifier_env *env,
411 const struct btf_type *t,
412 u32 meta_left);
413 int (*resolve)(struct btf_verifier_env *env,
414 const struct resolve_vertex *v);
415 int (*check_member)(struct btf_verifier_env *env,
416 const struct btf_type *struct_type,
417 const struct btf_member *member,
418 const struct btf_type *member_type);
419 int (*check_kflag_member)(struct btf_verifier_env *env,
420 const struct btf_type *struct_type,
421 const struct btf_member *member,
422 const struct btf_type *member_type);
423 void (*log_details)(struct btf_verifier_env *env,
424 const struct btf_type *t);
425 void (*show)(const struct btf *btf, const struct btf_type *t,
426 u32 type_id, void *data, u8 bits_offsets,
427 struct btf_show *show);
428};
429
430static const struct btf_kind_operations * const kind_ops[NR_BTF_KINDS];
431static struct btf_type btf_void;
432
433static int btf_resolve(struct btf_verifier_env *env,
434 const struct btf_type *t, u32 type_id);
435
436static int btf_func_check(struct btf_verifier_env *env,
437 const struct btf_type *t);
438
439static bool btf_type_is_modifier(const struct btf_type *t)
440{
441 /* Some of them is not strictly a C modifier
442 * but they are grouped into the same bucket
443 * for BTF concern:
444 * A type (t) that refers to another
445 * type through t->type AND its size cannot
446 * be determined without following the t->type.
447 *
448 * ptr does not fall into this bucket
449 * because its size is always sizeof(void *).
450 */
451 switch (BTF_INFO_KIND(t->info)) {
452 case BTF_KIND_TYPEDEF:
453 case BTF_KIND_VOLATILE:
454 case BTF_KIND_CONST:
455 case BTF_KIND_RESTRICT:
456 case BTF_KIND_TYPE_TAG:
457 return true;
458 }
459
460 return false;
461}
462
463bool btf_type_is_void(const struct btf_type *t)
464{
465 return t == &btf_void;
466}
467
468static bool btf_type_is_fwd(const struct btf_type *t)
469{
470 return BTF_INFO_KIND(t->info) == BTF_KIND_FWD;
471}
472
473static bool btf_type_nosize(const struct btf_type *t)
474{
475 return btf_type_is_void(t) || btf_type_is_fwd(t) ||
476 btf_type_is_func(t) || btf_type_is_func_proto(t);
477}
478
479static bool btf_type_nosize_or_null(const struct btf_type *t)
480{
481 return !t || btf_type_nosize(t);
482}
483
484static bool btf_type_is_datasec(const struct btf_type *t)
485{
486 return BTF_INFO_KIND(t->info) == BTF_KIND_DATASEC;
487}
488
489static bool btf_type_is_decl_tag(const struct btf_type *t)
490{
491 return BTF_INFO_KIND(t->info) == BTF_KIND_DECL_TAG;
492}
493
494static bool btf_type_is_decl_tag_target(const struct btf_type *t)
495{
496 return btf_type_is_func(t) || btf_type_is_struct(t) ||
497 btf_type_is_var(t) || btf_type_is_typedef(t);
498}
499
500u32 btf_nr_types(const struct btf *btf)
501{
502 u32 total = 0;
503
504 while (btf) {
505 total += btf->nr_types;
506 btf = btf->base_btf;
507 }
508
509 return total;
510}
511
512s32 btf_find_by_name_kind(const struct btf *btf, const char *name, u8 kind)
513{
514 const struct btf_type *t;
515 const char *tname;
516 u32 i, total;
517
518 total = btf_nr_types(btf);
519 for (i = 1; i < total; i++) {
520 t = btf_type_by_id(btf, i);
521 if (BTF_INFO_KIND(t->info) != kind)
522 continue;
523
524 tname = btf_name_by_offset(btf, t->name_off);
525 if (!strcmp(tname, name))
526 return i;
527 }
528
529 return -ENOENT;
530}
531
532static s32 bpf_find_btf_id(const char *name, u32 kind, struct btf **btf_p)
533{
534 struct btf *btf;
535 s32 ret;
536 int id;
537
538 btf = bpf_get_btf_vmlinux();
539 if (IS_ERR(btf))
540 return PTR_ERR(btf);
541 if (!btf)
542 return -EINVAL;
543
544 ret = btf_find_by_name_kind(btf, name, kind);
545 /* ret is never zero, since btf_find_by_name_kind returns
546 * positive btf_id or negative error.
547 */
548 if (ret > 0) {
549 btf_get(btf);
550 *btf_p = btf;
551 return ret;
552 }
553
554 /* If name is not found in vmlinux's BTF then search in module's BTFs */
555 spin_lock_bh(&btf_idr_lock);
556 idr_for_each_entry(&btf_idr, btf, id) {
557 if (!btf_is_module(btf))
558 continue;
559 /* linear search could be slow hence unlock/lock
560 * the IDR to avoiding holding it for too long
561 */
562 btf_get(btf);
563 spin_unlock_bh(&btf_idr_lock);
564 ret = btf_find_by_name_kind(btf, name, kind);
565 if (ret > 0) {
566 *btf_p = btf;
567 return ret;
568 }
569 spin_lock_bh(&btf_idr_lock);
570 btf_put(btf);
571 }
572 spin_unlock_bh(&btf_idr_lock);
573 return ret;
574}
575
576const struct btf_type *btf_type_skip_modifiers(const struct btf *btf,
577 u32 id, u32 *res_id)
578{
579 const struct btf_type *t = btf_type_by_id(btf, id);
580
581 while (btf_type_is_modifier(t)) {
582 id = t->type;
583 t = btf_type_by_id(btf, t->type);
584 }
585
586 if (res_id)
587 *res_id = id;
588
589 return t;
590}
591
592const struct btf_type *btf_type_resolve_ptr(const struct btf *btf,
593 u32 id, u32 *res_id)
594{
595 const struct btf_type *t;
596
597 t = btf_type_skip_modifiers(btf, id, NULL);
598 if (!btf_type_is_ptr(t))
599 return NULL;
600
601 return btf_type_skip_modifiers(btf, t->type, res_id);
602}
603
604const struct btf_type *btf_type_resolve_func_ptr(const struct btf *btf,
605 u32 id, u32 *res_id)
606{
607 const struct btf_type *ptype;
608
609 ptype = btf_type_resolve_ptr(btf, id, res_id);
610 if (ptype && btf_type_is_func_proto(ptype))
611 return ptype;
612
613 return NULL;
614}
615
616/* Types that act only as a source, not sink or intermediate
617 * type when resolving.
618 */
619static bool btf_type_is_resolve_source_only(const struct btf_type *t)
620{
621 return btf_type_is_var(t) ||
622 btf_type_is_decl_tag(t) ||
623 btf_type_is_datasec(t);
624}
625
626/* What types need to be resolved?
627 *
628 * btf_type_is_modifier() is an obvious one.
629 *
630 * btf_type_is_struct() because its member refers to
631 * another type (through member->type).
632 *
633 * btf_type_is_var() because the variable refers to
634 * another type. btf_type_is_datasec() holds multiple
635 * btf_type_is_var() types that need resolving.
636 *
637 * btf_type_is_array() because its element (array->type)
638 * refers to another type. Array can be thought of a
639 * special case of struct while array just has the same
640 * member-type repeated by array->nelems of times.
641 */
642static bool btf_type_needs_resolve(const struct btf_type *t)
643{
644 return btf_type_is_modifier(t) ||
645 btf_type_is_ptr(t) ||
646 btf_type_is_struct(t) ||
647 btf_type_is_array(t) ||
648 btf_type_is_var(t) ||
649 btf_type_is_func(t) ||
650 btf_type_is_decl_tag(t) ||
651 btf_type_is_datasec(t);
652}
653
654/* t->size can be used */
655static bool btf_type_has_size(const struct btf_type *t)
656{
657 switch (BTF_INFO_KIND(t->info)) {
658 case BTF_KIND_INT:
659 case BTF_KIND_STRUCT:
660 case BTF_KIND_UNION:
661 case BTF_KIND_ENUM:
662 case BTF_KIND_DATASEC:
663 case BTF_KIND_FLOAT:
664 case BTF_KIND_ENUM64:
665 return true;
666 }
667
668 return false;
669}
670
671static const char *btf_int_encoding_str(u8 encoding)
672{
673 if (encoding == 0)
674 return "(none)";
675 else if (encoding == BTF_INT_SIGNED)
676 return "SIGNED";
677 else if (encoding == BTF_INT_CHAR)
678 return "CHAR";
679 else if (encoding == BTF_INT_BOOL)
680 return "BOOL";
681 else
682 return "UNKN";
683}
684
685static u32 btf_type_int(const struct btf_type *t)
686{
687 return *(u32 *)(t + 1);
688}
689
690static const struct btf_array *btf_type_array(const struct btf_type *t)
691{
692 return (const struct btf_array *)(t + 1);
693}
694
695static const struct btf_enum *btf_type_enum(const struct btf_type *t)
696{
697 return (const struct btf_enum *)(t + 1);
698}
699
700static const struct btf_var *btf_type_var(const struct btf_type *t)
701{
702 return (const struct btf_var *)(t + 1);
703}
704
705static const struct btf_decl_tag *btf_type_decl_tag(const struct btf_type *t)
706{
707 return (const struct btf_decl_tag *)(t + 1);
708}
709
710static const struct btf_enum64 *btf_type_enum64(const struct btf_type *t)
711{
712 return (const struct btf_enum64 *)(t + 1);
713}
714
715static const struct btf_kind_operations *btf_type_ops(const struct btf_type *t)
716{
717 return kind_ops[BTF_INFO_KIND(t->info)];
718}
719
720static bool btf_name_offset_valid(const struct btf *btf, u32 offset)
721{
722 if (!BTF_STR_OFFSET_VALID(offset))
723 return false;
724
725 while (offset < btf->start_str_off)
726 btf = btf->base_btf;
727
728 offset -= btf->start_str_off;
729 return offset < btf->hdr.str_len;
730}
731
732static bool __btf_name_char_ok(char c, bool first, bool dot_ok)
733{
734 if ((first ? !isalpha(c) :
735 !isalnum(c)) &&
736 c != '_' &&
737 ((c == '.' && !dot_ok) ||
738 c != '.'))
739 return false;
740 return true;
741}
742
743static const char *btf_str_by_offset(const struct btf *btf, u32 offset)
744{
745 while (offset < btf->start_str_off)
746 btf = btf->base_btf;
747
748 offset -= btf->start_str_off;
749 if (offset < btf->hdr.str_len)
750 return &btf->strings[offset];
751
752 return NULL;
753}
754
755static bool __btf_name_valid(const struct btf *btf, u32 offset, bool dot_ok)
756{
757 /* offset must be valid */
758 const char *src = btf_str_by_offset(btf, offset);
759 const char *src_limit;
760
761 if (!__btf_name_char_ok(*src, true, dot_ok))
762 return false;
763
764 /* set a limit on identifier length */
765 src_limit = src + KSYM_NAME_LEN;
766 src++;
767 while (*src && src < src_limit) {
768 if (!__btf_name_char_ok(*src, false, dot_ok))
769 return false;
770 src++;
771 }
772
773 return !*src;
774}
775
776/* Only C-style identifier is permitted. This can be relaxed if
777 * necessary.
778 */
779static bool btf_name_valid_identifier(const struct btf *btf, u32 offset)
780{
781 return __btf_name_valid(btf, offset, false);
782}
783
784static bool btf_name_valid_section(const struct btf *btf, u32 offset)
785{
786 return __btf_name_valid(btf, offset, true);
787}
788
789static const char *__btf_name_by_offset(const struct btf *btf, u32 offset)
790{
791 const char *name;
792
793 if (!offset)
794 return "(anon)";
795
796 name = btf_str_by_offset(btf, offset);
797 return name ?: "(invalid-name-offset)";
798}
799
800const char *btf_name_by_offset(const struct btf *btf, u32 offset)
801{
802 return btf_str_by_offset(btf, offset);
803}
804
805const struct btf_type *btf_type_by_id(const struct btf *btf, u32 type_id)
806{
807 while (type_id < btf->start_id)
808 btf = btf->base_btf;
809
810 type_id -= btf->start_id;
811 if (type_id >= btf->nr_types)
812 return NULL;
813 return btf->types[type_id];
814}
815EXPORT_SYMBOL_GPL(btf_type_by_id);
816
817/*
818 * Regular int is not a bit field and it must be either
819 * u8/u16/u32/u64 or __int128.
820 */
821static bool btf_type_int_is_regular(const struct btf_type *t)
822{
823 u8 nr_bits, nr_bytes;
824 u32 int_data;
825
826 int_data = btf_type_int(t);
827 nr_bits = BTF_INT_BITS(int_data);
828 nr_bytes = BITS_ROUNDUP_BYTES(nr_bits);
829 if (BITS_PER_BYTE_MASKED(nr_bits) ||
830 BTF_INT_OFFSET(int_data) ||
831 (nr_bytes != sizeof(u8) && nr_bytes != sizeof(u16) &&
832 nr_bytes != sizeof(u32) && nr_bytes != sizeof(u64) &&
833 nr_bytes != (2 * sizeof(u64)))) {
834 return false;
835 }
836
837 return true;
838}
839
840/*
841 * Check that given struct member is a regular int with expected
842 * offset and size.
843 */
844bool btf_member_is_reg_int(const struct btf *btf, const struct btf_type *s,
845 const struct btf_member *m,
846 u32 expected_offset, u32 expected_size)
847{
848 const struct btf_type *t;
849 u32 id, int_data;
850 u8 nr_bits;
851
852 id = m->type;
853 t = btf_type_id_size(btf, &id, NULL);
854 if (!t || !btf_type_is_int(t))
855 return false;
856
857 int_data = btf_type_int(t);
858 nr_bits = BTF_INT_BITS(int_data);
859 if (btf_type_kflag(s)) {
860 u32 bitfield_size = BTF_MEMBER_BITFIELD_SIZE(m->offset);
861 u32 bit_offset = BTF_MEMBER_BIT_OFFSET(m->offset);
862
863 /* if kflag set, int should be a regular int and
864 * bit offset should be at byte boundary.
865 */
866 return !bitfield_size &&
867 BITS_ROUNDUP_BYTES(bit_offset) == expected_offset &&
868 BITS_ROUNDUP_BYTES(nr_bits) == expected_size;
869 }
870
871 if (BTF_INT_OFFSET(int_data) ||
872 BITS_PER_BYTE_MASKED(m->offset) ||
873 BITS_ROUNDUP_BYTES(m->offset) != expected_offset ||
874 BITS_PER_BYTE_MASKED(nr_bits) ||
875 BITS_ROUNDUP_BYTES(nr_bits) != expected_size)
876 return false;
877
878 return true;
879}
880
881/* Similar to btf_type_skip_modifiers() but does not skip typedefs. */
882static const struct btf_type *btf_type_skip_qualifiers(const struct btf *btf,
883 u32 id)
884{
885 const struct btf_type *t = btf_type_by_id(btf, id);
886
887 while (btf_type_is_modifier(t) &&
888 BTF_INFO_KIND(t->info) != BTF_KIND_TYPEDEF) {
889 t = btf_type_by_id(btf, t->type);
890 }
891
892 return t;
893}
894
895#define BTF_SHOW_MAX_ITER 10
896
897#define BTF_KIND_BIT(kind) (1ULL << kind)
898
899/*
900 * Populate show->state.name with type name information.
901 * Format of type name is
902 *
903 * [.member_name = ] (type_name)
904 */
905static const char *btf_show_name(struct btf_show *show)
906{
907 /* BTF_MAX_ITER array suffixes "[]" */
908 const char *array_suffixes = "[][][][][][][][][][]";
909 const char *array_suffix = &array_suffixes[strlen(array_suffixes)];
910 /* BTF_MAX_ITER pointer suffixes "*" */
911 const char *ptr_suffixes = "**********";
912 const char *ptr_suffix = &ptr_suffixes[strlen(ptr_suffixes)];
913 const char *name = NULL, *prefix = "", *parens = "";
914 const struct btf_member *m = show->state.member;
915 const struct btf_type *t;
916 const struct btf_array *array;
917 u32 id = show->state.type_id;
918 const char *member = NULL;
919 bool show_member = false;
920 u64 kinds = 0;
921 int i;
922
923 show->state.name[0] = '\0';
924
925 /*
926 * Don't show type name if we're showing an array member;
927 * in that case we show the array type so don't need to repeat
928 * ourselves for each member.
929 */
930 if (show->state.array_member)
931 return "";
932
933 /* Retrieve member name, if any. */
934 if (m) {
935 member = btf_name_by_offset(show->btf, m->name_off);
936 show_member = strlen(member) > 0;
937 id = m->type;
938 }
939
940 /*
941 * Start with type_id, as we have resolved the struct btf_type *
942 * via btf_modifier_show() past the parent typedef to the child
943 * struct, int etc it is defined as. In such cases, the type_id
944 * still represents the starting type while the struct btf_type *
945 * in our show->state points at the resolved type of the typedef.
946 */
947 t = btf_type_by_id(show->btf, id);
948 if (!t)
949 return "";
950
951 /*
952 * The goal here is to build up the right number of pointer and
953 * array suffixes while ensuring the type name for a typedef
954 * is represented. Along the way we accumulate a list of
955 * BTF kinds we have encountered, since these will inform later
956 * display; for example, pointer types will not require an
957 * opening "{" for struct, we will just display the pointer value.
958 *
959 * We also want to accumulate the right number of pointer or array
960 * indices in the format string while iterating until we get to
961 * the typedef/pointee/array member target type.
962 *
963 * We start by pointing at the end of pointer and array suffix
964 * strings; as we accumulate pointers and arrays we move the pointer
965 * or array string backwards so it will show the expected number of
966 * '*' or '[]' for the type. BTF_SHOW_MAX_ITER of nesting of pointers
967 * and/or arrays and typedefs are supported as a precaution.
968 *
969 * We also want to get typedef name while proceeding to resolve
970 * type it points to so that we can add parentheses if it is a
971 * "typedef struct" etc.
972 */
973 for (i = 0; i < BTF_SHOW_MAX_ITER; i++) {
974
975 switch (BTF_INFO_KIND(t->info)) {
976 case BTF_KIND_TYPEDEF:
977 if (!name)
978 name = btf_name_by_offset(show->btf,
979 t->name_off);
980 kinds |= BTF_KIND_BIT(BTF_KIND_TYPEDEF);
981 id = t->type;
982 break;
983 case BTF_KIND_ARRAY:
984 kinds |= BTF_KIND_BIT(BTF_KIND_ARRAY);
985 parens = "[";
986 if (!t)
987 return "";
988 array = btf_type_array(t);
989 if (array_suffix > array_suffixes)
990 array_suffix -= 2;
991 id = array->type;
992 break;
993 case BTF_KIND_PTR:
994 kinds |= BTF_KIND_BIT(BTF_KIND_PTR);
995 if (ptr_suffix > ptr_suffixes)
996 ptr_suffix -= 1;
997 id = t->type;
998 break;
999 default:
1000 id = 0;
1001 break;
1002 }
1003 if (!id)
1004 break;
1005 t = btf_type_skip_qualifiers(show->btf, id);
1006 }
1007 /* We may not be able to represent this type; bail to be safe */
1008 if (i == BTF_SHOW_MAX_ITER)
1009 return "";
1010
1011 if (!name)
1012 name = btf_name_by_offset(show->btf, t->name_off);
1013
1014 switch (BTF_INFO_KIND(t->info)) {
1015 case BTF_KIND_STRUCT:
1016 case BTF_KIND_UNION:
1017 prefix = BTF_INFO_KIND(t->info) == BTF_KIND_STRUCT ?
1018 "struct" : "union";
1019 /* if it's an array of struct/union, parens is already set */
1020 if (!(kinds & (BTF_KIND_BIT(BTF_KIND_ARRAY))))
1021 parens = "{";
1022 break;
1023 case BTF_KIND_ENUM:
1024 case BTF_KIND_ENUM64:
1025 prefix = "enum";
1026 break;
1027 default:
1028 break;
1029 }
1030
1031 /* pointer does not require parens */
1032 if (kinds & BTF_KIND_BIT(BTF_KIND_PTR))
1033 parens = "";
1034 /* typedef does not require struct/union/enum prefix */
1035 if (kinds & BTF_KIND_BIT(BTF_KIND_TYPEDEF))
1036 prefix = "";
1037
1038 if (!name)
1039 name = "";
1040
1041 /* Even if we don't want type name info, we want parentheses etc */
1042 if (show->flags & BTF_SHOW_NONAME)
1043 snprintf(show->state.name, sizeof(show->state.name), "%s",
1044 parens);
1045 else
1046 snprintf(show->state.name, sizeof(show->state.name),
1047 "%s%s%s(%s%s%s%s%s%s)%s",
1048 /* first 3 strings comprise ".member = " */
1049 show_member ? "." : "",
1050 show_member ? member : "",
1051 show_member ? " = " : "",
1052 /* ...next is our prefix (struct, enum, etc) */
1053 prefix,
1054 strlen(prefix) > 0 && strlen(name) > 0 ? " " : "",
1055 /* ...this is the type name itself */
1056 name,
1057 /* ...suffixed by the appropriate '*', '[]' suffixes */
1058 strlen(ptr_suffix) > 0 ? " " : "", ptr_suffix,
1059 array_suffix, parens);
1060
1061 return show->state.name;
1062}
1063
1064static const char *__btf_show_indent(struct btf_show *show)
1065{
1066 const char *indents = " ";
1067 const char *indent = &indents[strlen(indents)];
1068
1069 if ((indent - show->state.depth) >= indents)
1070 return indent - show->state.depth;
1071 return indents;
1072}
1073
1074static const char *btf_show_indent(struct btf_show *show)
1075{
1076 return show->flags & BTF_SHOW_COMPACT ? "" : __btf_show_indent(show);
1077}
1078
1079static const char *btf_show_newline(struct btf_show *show)
1080{
1081 return show->flags & BTF_SHOW_COMPACT ? "" : "\n";
1082}
1083
1084static const char *btf_show_delim(struct btf_show *show)
1085{
1086 if (show->state.depth == 0)
1087 return "";
1088
1089 if ((show->flags & BTF_SHOW_COMPACT) && show->state.type &&
1090 BTF_INFO_KIND(show->state.type->info) == BTF_KIND_UNION)
1091 return "|";
1092
1093 return ",";
1094}
1095
1096__printf(2, 3) static void btf_show(struct btf_show *show, const char *fmt, ...)
1097{
1098 va_list args;
1099
1100 if (!show->state.depth_check) {
1101 va_start(args, fmt);
1102 show->showfn(show, fmt, args);
1103 va_end(args);
1104 }
1105}
1106
1107/* Macros are used here as btf_show_type_value[s]() prepends and appends
1108 * format specifiers to the format specifier passed in; these do the work of
1109 * adding indentation, delimiters etc while the caller simply has to specify
1110 * the type value(s) in the format specifier + value(s).
1111 */
1112#define btf_show_type_value(show, fmt, value) \
1113 do { \
1114 if ((value) != (__typeof__(value))0 || \
1115 (show->flags & BTF_SHOW_ZERO) || \
1116 show->state.depth == 0) { \
1117 btf_show(show, "%s%s" fmt "%s%s", \
1118 btf_show_indent(show), \
1119 btf_show_name(show), \
1120 value, btf_show_delim(show), \
1121 btf_show_newline(show)); \
1122 if (show->state.depth > show->state.depth_to_show) \
1123 show->state.depth_to_show = show->state.depth; \
1124 } \
1125 } while (0)
1126
1127#define btf_show_type_values(show, fmt, ...) \
1128 do { \
1129 btf_show(show, "%s%s" fmt "%s%s", btf_show_indent(show), \
1130 btf_show_name(show), \
1131 __VA_ARGS__, btf_show_delim(show), \
1132 btf_show_newline(show)); \
1133 if (show->state.depth > show->state.depth_to_show) \
1134 show->state.depth_to_show = show->state.depth; \
1135 } while (0)
1136
1137/* How much is left to copy to safe buffer after @data? */
1138static int btf_show_obj_size_left(struct btf_show *show, void *data)
1139{
1140 return show->obj.head + show->obj.size - data;
1141}
1142
1143/* Is object pointed to by @data of @size already copied to our safe buffer? */
1144static bool btf_show_obj_is_safe(struct btf_show *show, void *data, int size)
1145{
1146 return data >= show->obj.data &&
1147 (data + size) < (show->obj.data + BTF_SHOW_OBJ_SAFE_SIZE);
1148}
1149
1150/*
1151 * If object pointed to by @data of @size falls within our safe buffer, return
1152 * the equivalent pointer to the same safe data. Assumes
1153 * copy_from_kernel_nofault() has already happened and our safe buffer is
1154 * populated.
1155 */
1156static void *__btf_show_obj_safe(struct btf_show *show, void *data, int size)
1157{
1158 if (btf_show_obj_is_safe(show, data, size))
1159 return show->obj.safe + (data - show->obj.data);
1160 return NULL;
1161}
1162
1163/*
1164 * Return a safe-to-access version of data pointed to by @data.
1165 * We do this by copying the relevant amount of information
1166 * to the struct btf_show obj.safe buffer using copy_from_kernel_nofault().
1167 *
1168 * If BTF_SHOW_UNSAFE is specified, just return data as-is; no
1169 * safe copy is needed.
1170 *
1171 * Otherwise we need to determine if we have the required amount
1172 * of data (determined by the @data pointer and the size of the
1173 * largest base type we can encounter (represented by
1174 * BTF_SHOW_OBJ_BASE_TYPE_SIZE). Having that much data ensures
1175 * that we will be able to print some of the current object,
1176 * and if more is needed a copy will be triggered.
1177 * Some objects such as structs will not fit into the buffer;
1178 * in such cases additional copies when we iterate over their
1179 * members may be needed.
1180 *
1181 * btf_show_obj_safe() is used to return a safe buffer for
1182 * btf_show_start_type(); this ensures that as we recurse into
1183 * nested types we always have safe data for the given type.
1184 * This approach is somewhat wasteful; it's possible for example
1185 * that when iterating over a large union we'll end up copying the
1186 * same data repeatedly, but the goal is safety not performance.
1187 * We use stack data as opposed to per-CPU buffers because the
1188 * iteration over a type can take some time, and preemption handling
1189 * would greatly complicate use of the safe buffer.
1190 */
1191static void *btf_show_obj_safe(struct btf_show *show,
1192 const struct btf_type *t,
1193 void *data)
1194{
1195 const struct btf_type *rt;
1196 int size_left, size;
1197 void *safe = NULL;
1198
1199 if (show->flags & BTF_SHOW_UNSAFE)
1200 return data;
1201
1202 rt = btf_resolve_size(show->btf, t, &size);
1203 if (IS_ERR(rt)) {
1204 show->state.status = PTR_ERR(rt);
1205 return NULL;
1206 }
1207
1208 /*
1209 * Is this toplevel object? If so, set total object size and
1210 * initialize pointers. Otherwise check if we still fall within
1211 * our safe object data.
1212 */
1213 if (show->state.depth == 0) {
1214 show->obj.size = size;
1215 show->obj.head = data;
1216 } else {
1217 /*
1218 * If the size of the current object is > our remaining
1219 * safe buffer we _may_ need to do a new copy. However
1220 * consider the case of a nested struct; it's size pushes
1221 * us over the safe buffer limit, but showing any individual
1222 * struct members does not. In such cases, we don't need
1223 * to initiate a fresh copy yet; however we definitely need
1224 * at least BTF_SHOW_OBJ_BASE_TYPE_SIZE bytes left
1225 * in our buffer, regardless of the current object size.
1226 * The logic here is that as we resolve types we will
1227 * hit a base type at some point, and we need to be sure
1228 * the next chunk of data is safely available to display
1229 * that type info safely. We cannot rely on the size of
1230 * the current object here because it may be much larger
1231 * than our current buffer (e.g. task_struct is 8k).
1232 * All we want to do here is ensure that we can print the
1233 * next basic type, which we can if either
1234 * - the current type size is within the safe buffer; or
1235 * - at least BTF_SHOW_OBJ_BASE_TYPE_SIZE bytes are left in
1236 * the safe buffer.
1237 */
1238 safe = __btf_show_obj_safe(show, data,
1239 min(size,
1240 BTF_SHOW_OBJ_BASE_TYPE_SIZE));
1241 }
1242
1243 /*
1244 * We need a new copy to our safe object, either because we haven't
1245 * yet copied and are initializing safe data, or because the data
1246 * we want falls outside the boundaries of the safe object.
1247 */
1248 if (!safe) {
1249 size_left = btf_show_obj_size_left(show, data);
1250 if (size_left > BTF_SHOW_OBJ_SAFE_SIZE)
1251 size_left = BTF_SHOW_OBJ_SAFE_SIZE;
1252 show->state.status = copy_from_kernel_nofault(show->obj.safe,
1253 data, size_left);
1254 if (!show->state.status) {
1255 show->obj.data = data;
1256 safe = show->obj.safe;
1257 }
1258 }
1259
1260 return safe;
1261}
1262
1263/*
1264 * Set the type we are starting to show and return a safe data pointer
1265 * to be used for showing the associated data.
1266 */
1267static void *btf_show_start_type(struct btf_show *show,
1268 const struct btf_type *t,
1269 u32 type_id, void *data)
1270{
1271 show->state.type = t;
1272 show->state.type_id = type_id;
1273 show->state.name[0] = '\0';
1274
1275 return btf_show_obj_safe(show, t, data);
1276}
1277
1278static void btf_show_end_type(struct btf_show *show)
1279{
1280 show->state.type = NULL;
1281 show->state.type_id = 0;
1282 show->state.name[0] = '\0';
1283}
1284
1285static void *btf_show_start_aggr_type(struct btf_show *show,
1286 const struct btf_type *t,
1287 u32 type_id, void *data)
1288{
1289 void *safe_data = btf_show_start_type(show, t, type_id, data);
1290
1291 if (!safe_data)
1292 return safe_data;
1293
1294 btf_show(show, "%s%s%s", btf_show_indent(show),
1295 btf_show_name(show),
1296 btf_show_newline(show));
1297 show->state.depth++;
1298 return safe_data;
1299}
1300
1301static void btf_show_end_aggr_type(struct btf_show *show,
1302 const char *suffix)
1303{
1304 show->state.depth--;
1305 btf_show(show, "%s%s%s%s", btf_show_indent(show), suffix,
1306 btf_show_delim(show), btf_show_newline(show));
1307 btf_show_end_type(show);
1308}
1309
1310static void btf_show_start_member(struct btf_show *show,
1311 const struct btf_member *m)
1312{
1313 show->state.member = m;
1314}
1315
1316static void btf_show_start_array_member(struct btf_show *show)
1317{
1318 show->state.array_member = 1;
1319 btf_show_start_member(show, NULL);
1320}
1321
1322static void btf_show_end_member(struct btf_show *show)
1323{
1324 show->state.member = NULL;
1325}
1326
1327static void btf_show_end_array_member(struct btf_show *show)
1328{
1329 show->state.array_member = 0;
1330 btf_show_end_member(show);
1331}
1332
1333static void *btf_show_start_array_type(struct btf_show *show,
1334 const struct btf_type *t,
1335 u32 type_id,
1336 u16 array_encoding,
1337 void *data)
1338{
1339 show->state.array_encoding = array_encoding;
1340 show->state.array_terminated = 0;
1341 return btf_show_start_aggr_type(show, t, type_id, data);
1342}
1343
1344static void btf_show_end_array_type(struct btf_show *show)
1345{
1346 show->state.array_encoding = 0;
1347 show->state.array_terminated = 0;
1348 btf_show_end_aggr_type(show, "]");
1349}
1350
1351static void *btf_show_start_struct_type(struct btf_show *show,
1352 const struct btf_type *t,
1353 u32 type_id,
1354 void *data)
1355{
1356 return btf_show_start_aggr_type(show, t, type_id, data);
1357}
1358
1359static void btf_show_end_struct_type(struct btf_show *show)
1360{
1361 btf_show_end_aggr_type(show, "}");
1362}
1363
1364__printf(2, 3) static void __btf_verifier_log(struct bpf_verifier_log *log,
1365 const char *fmt, ...)
1366{
1367 va_list args;
1368
1369 va_start(args, fmt);
1370 bpf_verifier_vlog(log, fmt, args);
1371 va_end(args);
1372}
1373
1374__printf(2, 3) static void btf_verifier_log(struct btf_verifier_env *env,
1375 const char *fmt, ...)
1376{
1377 struct bpf_verifier_log *log = &env->log;
1378 va_list args;
1379
1380 if (!bpf_verifier_log_needed(log))
1381 return;
1382
1383 va_start(args, fmt);
1384 bpf_verifier_vlog(log, fmt, args);
1385 va_end(args);
1386}
1387
1388__printf(4, 5) static void __btf_verifier_log_type(struct btf_verifier_env *env,
1389 const struct btf_type *t,
1390 bool log_details,
1391 const char *fmt, ...)
1392{
1393 struct bpf_verifier_log *log = &env->log;
1394 struct btf *btf = env->btf;
1395 va_list args;
1396
1397 if (!bpf_verifier_log_needed(log))
1398 return;
1399
1400 /* btf verifier prints all types it is processing via
1401 * btf_verifier_log_type(..., fmt = NULL).
1402 * Skip those prints for in-kernel BTF verification.
1403 */
1404 if (log->level == BPF_LOG_KERNEL && !fmt)
1405 return;
1406
1407 __btf_verifier_log(log, "[%u] %s %s%s",
1408 env->log_type_id,
1409 btf_type_str(t),
1410 __btf_name_by_offset(btf, t->name_off),
1411 log_details ? " " : "");
1412
1413 if (log_details)
1414 btf_type_ops(t)->log_details(env, t);
1415
1416 if (fmt && *fmt) {
1417 __btf_verifier_log(log, " ");
1418 va_start(args, fmt);
1419 bpf_verifier_vlog(log, fmt, args);
1420 va_end(args);
1421 }
1422
1423 __btf_verifier_log(log, "\n");
1424}
1425
1426#define btf_verifier_log_type(env, t, ...) \
1427 __btf_verifier_log_type((env), (t), true, __VA_ARGS__)
1428#define btf_verifier_log_basic(env, t, ...) \
1429 __btf_verifier_log_type((env), (t), false, __VA_ARGS__)
1430
1431__printf(4, 5)
1432static void btf_verifier_log_member(struct btf_verifier_env *env,
1433 const struct btf_type *struct_type,
1434 const struct btf_member *member,
1435 const char *fmt, ...)
1436{
1437 struct bpf_verifier_log *log = &env->log;
1438 struct btf *btf = env->btf;
1439 va_list args;
1440
1441 if (!bpf_verifier_log_needed(log))
1442 return;
1443
1444 if (log->level == BPF_LOG_KERNEL && !fmt)
1445 return;
1446 /* The CHECK_META phase already did a btf dump.
1447 *
1448 * If member is logged again, it must hit an error in
1449 * parsing this member. It is useful to print out which
1450 * struct this member belongs to.
1451 */
1452 if (env->phase != CHECK_META)
1453 btf_verifier_log_type(env, struct_type, NULL);
1454
1455 if (btf_type_kflag(struct_type))
1456 __btf_verifier_log(log,
1457 "\t%s type_id=%u bitfield_size=%u bits_offset=%u",
1458 __btf_name_by_offset(btf, member->name_off),
1459 member->type,
1460 BTF_MEMBER_BITFIELD_SIZE(member->offset),
1461 BTF_MEMBER_BIT_OFFSET(member->offset));
1462 else
1463 __btf_verifier_log(log, "\t%s type_id=%u bits_offset=%u",
1464 __btf_name_by_offset(btf, member->name_off),
1465 member->type, member->offset);
1466
1467 if (fmt && *fmt) {
1468 __btf_verifier_log(log, " ");
1469 va_start(args, fmt);
1470 bpf_verifier_vlog(log, fmt, args);
1471 va_end(args);
1472 }
1473
1474 __btf_verifier_log(log, "\n");
1475}
1476
1477__printf(4, 5)
1478static void btf_verifier_log_vsi(struct btf_verifier_env *env,
1479 const struct btf_type *datasec_type,
1480 const struct btf_var_secinfo *vsi,
1481 const char *fmt, ...)
1482{
1483 struct bpf_verifier_log *log = &env->log;
1484 va_list args;
1485
1486 if (!bpf_verifier_log_needed(log))
1487 return;
1488 if (log->level == BPF_LOG_KERNEL && !fmt)
1489 return;
1490 if (env->phase != CHECK_META)
1491 btf_verifier_log_type(env, datasec_type, NULL);
1492
1493 __btf_verifier_log(log, "\t type_id=%u offset=%u size=%u",
1494 vsi->type, vsi->offset, vsi->size);
1495 if (fmt && *fmt) {
1496 __btf_verifier_log(log, " ");
1497 va_start(args, fmt);
1498 bpf_verifier_vlog(log, fmt, args);
1499 va_end(args);
1500 }
1501
1502 __btf_verifier_log(log, "\n");
1503}
1504
1505static void btf_verifier_log_hdr(struct btf_verifier_env *env,
1506 u32 btf_data_size)
1507{
1508 struct bpf_verifier_log *log = &env->log;
1509 const struct btf *btf = env->btf;
1510 const struct btf_header *hdr;
1511
1512 if (!bpf_verifier_log_needed(log))
1513 return;
1514
1515 if (log->level == BPF_LOG_KERNEL)
1516 return;
1517 hdr = &btf->hdr;
1518 __btf_verifier_log(log, "magic: 0x%x\n", hdr->magic);
1519 __btf_verifier_log(log, "version: %u\n", hdr->version);
1520 __btf_verifier_log(log, "flags: 0x%x\n", hdr->flags);
1521 __btf_verifier_log(log, "hdr_len: %u\n", hdr->hdr_len);
1522 __btf_verifier_log(log, "type_off: %u\n", hdr->type_off);
1523 __btf_verifier_log(log, "type_len: %u\n", hdr->type_len);
1524 __btf_verifier_log(log, "str_off: %u\n", hdr->str_off);
1525 __btf_verifier_log(log, "str_len: %u\n", hdr->str_len);
1526 __btf_verifier_log(log, "btf_total_size: %u\n", btf_data_size);
1527}
1528
1529static int btf_add_type(struct btf_verifier_env *env, struct btf_type *t)
1530{
1531 struct btf *btf = env->btf;
1532
1533 if (btf->types_size == btf->nr_types) {
1534 /* Expand 'types' array */
1535
1536 struct btf_type **new_types;
1537 u32 expand_by, new_size;
1538
1539 if (btf->start_id + btf->types_size == BTF_MAX_TYPE) {
1540 btf_verifier_log(env, "Exceeded max num of types");
1541 return -E2BIG;
1542 }
1543
1544 expand_by = max_t(u32, btf->types_size >> 2, 16);
1545 new_size = min_t(u32, BTF_MAX_TYPE,
1546 btf->types_size + expand_by);
1547
1548 new_types = kvcalloc(new_size, sizeof(*new_types),
1549 GFP_KERNEL | __GFP_NOWARN);
1550 if (!new_types)
1551 return -ENOMEM;
1552
1553 if (btf->nr_types == 0) {
1554 if (!btf->base_btf) {
1555 /* lazily init VOID type */
1556 new_types[0] = &btf_void;
1557 btf->nr_types++;
1558 }
1559 } else {
1560 memcpy(new_types, btf->types,
1561 sizeof(*btf->types) * btf->nr_types);
1562 }
1563
1564 kvfree(btf->types);
1565 btf->types = new_types;
1566 btf->types_size = new_size;
1567 }
1568
1569 btf->types[btf->nr_types++] = t;
1570
1571 return 0;
1572}
1573
1574static int btf_alloc_id(struct btf *btf)
1575{
1576 int id;
1577
1578 idr_preload(GFP_KERNEL);
1579 spin_lock_bh(&btf_idr_lock);
1580 id = idr_alloc_cyclic(&btf_idr, btf, 1, INT_MAX, GFP_ATOMIC);
1581 if (id > 0)
1582 btf->id = id;
1583 spin_unlock_bh(&btf_idr_lock);
1584 idr_preload_end();
1585
1586 if (WARN_ON_ONCE(!id))
1587 return -ENOSPC;
1588
1589 return id > 0 ? 0 : id;
1590}
1591
1592static void btf_free_id(struct btf *btf)
1593{
1594 unsigned long flags;
1595
1596 /*
1597 * In map-in-map, calling map_delete_elem() on outer
1598 * map will call bpf_map_put on the inner map.
1599 * It will then eventually call btf_free_id()
1600 * on the inner map. Some of the map_delete_elem()
1601 * implementation may have irq disabled, so
1602 * we need to use the _irqsave() version instead
1603 * of the _bh() version.
1604 */
1605 spin_lock_irqsave(&btf_idr_lock, flags);
1606 idr_remove(&btf_idr, btf->id);
1607 spin_unlock_irqrestore(&btf_idr_lock, flags);
1608}
1609
1610static void btf_free_kfunc_set_tab(struct btf *btf)
1611{
1612 struct btf_kfunc_set_tab *tab = btf->kfunc_set_tab;
1613 int hook;
1614
1615 if (!tab)
1616 return;
1617 /* For module BTF, we directly assign the sets being registered, so
1618 * there is nothing to free except kfunc_set_tab.
1619 */
1620 if (btf_is_module(btf))
1621 goto free_tab;
1622 for (hook = 0; hook < ARRAY_SIZE(tab->sets); hook++)
1623 kfree(tab->sets[hook]);
1624free_tab:
1625 kfree(tab);
1626 btf->kfunc_set_tab = NULL;
1627}
1628
1629static void btf_free_dtor_kfunc_tab(struct btf *btf)
1630{
1631 struct btf_id_dtor_kfunc_tab *tab = btf->dtor_kfunc_tab;
1632
1633 if (!tab)
1634 return;
1635 kfree(tab);
1636 btf->dtor_kfunc_tab = NULL;
1637}
1638
1639static void btf_struct_metas_free(struct btf_struct_metas *tab)
1640{
1641 int i;
1642
1643 if (!tab)
1644 return;
1645 for (i = 0; i < tab->cnt; i++) {
1646 btf_record_free(tab->types[i].record);
1647 kfree(tab->types[i].field_offs);
1648 }
1649 kfree(tab);
1650}
1651
1652static void btf_free_struct_meta_tab(struct btf *btf)
1653{
1654 struct btf_struct_metas *tab = btf->struct_meta_tab;
1655
1656 btf_struct_metas_free(tab);
1657 btf->struct_meta_tab = NULL;
1658}
1659
1660static void btf_free(struct btf *btf)
1661{
1662 btf_free_struct_meta_tab(btf);
1663 btf_free_dtor_kfunc_tab(btf);
1664 btf_free_kfunc_set_tab(btf);
1665 kvfree(btf->types);
1666 kvfree(btf->resolved_sizes);
1667 kvfree(btf->resolved_ids);
1668 kvfree(btf->data);
1669 kfree(btf);
1670}
1671
1672static void btf_free_rcu(struct rcu_head *rcu)
1673{
1674 struct btf *btf = container_of(rcu, struct btf, rcu);
1675
1676 btf_free(btf);
1677}
1678
1679void btf_get(struct btf *btf)
1680{
1681 refcount_inc(&btf->refcnt);
1682}
1683
1684void btf_put(struct btf *btf)
1685{
1686 if (btf && refcount_dec_and_test(&btf->refcnt)) {
1687 btf_free_id(btf);
1688 call_rcu(&btf->rcu, btf_free_rcu);
1689 }
1690}
1691
1692static int env_resolve_init(struct btf_verifier_env *env)
1693{
1694 struct btf *btf = env->btf;
1695 u32 nr_types = btf->nr_types;
1696 u32 *resolved_sizes = NULL;
1697 u32 *resolved_ids = NULL;
1698 u8 *visit_states = NULL;
1699
1700 resolved_sizes = kvcalloc(nr_types, sizeof(*resolved_sizes),
1701 GFP_KERNEL | __GFP_NOWARN);
1702 if (!resolved_sizes)
1703 goto nomem;
1704
1705 resolved_ids = kvcalloc(nr_types, sizeof(*resolved_ids),
1706 GFP_KERNEL | __GFP_NOWARN);
1707 if (!resolved_ids)
1708 goto nomem;
1709
1710 visit_states = kvcalloc(nr_types, sizeof(*visit_states),
1711 GFP_KERNEL | __GFP_NOWARN);
1712 if (!visit_states)
1713 goto nomem;
1714
1715 btf->resolved_sizes = resolved_sizes;
1716 btf->resolved_ids = resolved_ids;
1717 env->visit_states = visit_states;
1718
1719 return 0;
1720
1721nomem:
1722 kvfree(resolved_sizes);
1723 kvfree(resolved_ids);
1724 kvfree(visit_states);
1725 return -ENOMEM;
1726}
1727
1728static void btf_verifier_env_free(struct btf_verifier_env *env)
1729{
1730 kvfree(env->visit_states);
1731 kfree(env);
1732}
1733
1734static bool env_type_is_resolve_sink(const struct btf_verifier_env *env,
1735 const struct btf_type *next_type)
1736{
1737 switch (env->resolve_mode) {
1738 case RESOLVE_TBD:
1739 /* int, enum or void is a sink */
1740 return !btf_type_needs_resolve(next_type);
1741 case RESOLVE_PTR:
1742 /* int, enum, void, struct, array, func or func_proto is a sink
1743 * for ptr
1744 */
1745 return !btf_type_is_modifier(next_type) &&
1746 !btf_type_is_ptr(next_type);
1747 case RESOLVE_STRUCT_OR_ARRAY:
1748 /* int, enum, void, ptr, func or func_proto is a sink
1749 * for struct and array
1750 */
1751 return !btf_type_is_modifier(next_type) &&
1752 !btf_type_is_array(next_type) &&
1753 !btf_type_is_struct(next_type);
1754 default:
1755 BUG();
1756 }
1757}
1758
1759static bool env_type_is_resolved(const struct btf_verifier_env *env,
1760 u32 type_id)
1761{
1762 /* base BTF types should be resolved by now */
1763 if (type_id < env->btf->start_id)
1764 return true;
1765
1766 return env->visit_states[type_id - env->btf->start_id] == RESOLVED;
1767}
1768
1769static int env_stack_push(struct btf_verifier_env *env,
1770 const struct btf_type *t, u32 type_id)
1771{
1772 const struct btf *btf = env->btf;
1773 struct resolve_vertex *v;
1774
1775 if (env->top_stack == MAX_RESOLVE_DEPTH)
1776 return -E2BIG;
1777
1778 if (type_id < btf->start_id
1779 || env->visit_states[type_id - btf->start_id] != NOT_VISITED)
1780 return -EEXIST;
1781
1782 env->visit_states[type_id - btf->start_id] = VISITED;
1783
1784 v = &env->stack[env->top_stack++];
1785 v->t = t;
1786 v->type_id = type_id;
1787 v->next_member = 0;
1788
1789 if (env->resolve_mode == RESOLVE_TBD) {
1790 if (btf_type_is_ptr(t))
1791 env->resolve_mode = RESOLVE_PTR;
1792 else if (btf_type_is_struct(t) || btf_type_is_array(t))
1793 env->resolve_mode = RESOLVE_STRUCT_OR_ARRAY;
1794 }
1795
1796 return 0;
1797}
1798
1799static void env_stack_set_next_member(struct btf_verifier_env *env,
1800 u16 next_member)
1801{
1802 env->stack[env->top_stack - 1].next_member = next_member;
1803}
1804
1805static void env_stack_pop_resolved(struct btf_verifier_env *env,
1806 u32 resolved_type_id,
1807 u32 resolved_size)
1808{
1809 u32 type_id = env->stack[--(env->top_stack)].type_id;
1810 struct btf *btf = env->btf;
1811
1812 type_id -= btf->start_id; /* adjust to local type id */
1813 btf->resolved_sizes[type_id] = resolved_size;
1814 btf->resolved_ids[type_id] = resolved_type_id;
1815 env->visit_states[type_id] = RESOLVED;
1816}
1817
1818static const struct resolve_vertex *env_stack_peak(struct btf_verifier_env *env)
1819{
1820 return env->top_stack ? &env->stack[env->top_stack - 1] : NULL;
1821}
1822
1823/* Resolve the size of a passed-in "type"
1824 *
1825 * type: is an array (e.g. u32 array[x][y])
1826 * return type: type "u32[x][y]", i.e. BTF_KIND_ARRAY,
1827 * *type_size: (x * y * sizeof(u32)). Hence, *type_size always
1828 * corresponds to the return type.
1829 * *elem_type: u32
1830 * *elem_id: id of u32
1831 * *total_nelems: (x * y). Hence, individual elem size is
1832 * (*type_size / *total_nelems)
1833 * *type_id: id of type if it's changed within the function, 0 if not
1834 *
1835 * type: is not an array (e.g. const struct X)
1836 * return type: type "struct X"
1837 * *type_size: sizeof(struct X)
1838 * *elem_type: same as return type ("struct X")
1839 * *elem_id: 0
1840 * *total_nelems: 1
1841 * *type_id: id of type if it's changed within the function, 0 if not
1842 */
1843static const struct btf_type *
1844__btf_resolve_size(const struct btf *btf, const struct btf_type *type,
1845 u32 *type_size, const struct btf_type **elem_type,
1846 u32 *elem_id, u32 *total_nelems, u32 *type_id)
1847{
1848 const struct btf_type *array_type = NULL;
1849 const struct btf_array *array = NULL;
1850 u32 i, size, nelems = 1, id = 0;
1851
1852 for (i = 0; i < MAX_RESOLVE_DEPTH; i++) {
1853 switch (BTF_INFO_KIND(type->info)) {
1854 /* type->size can be used */
1855 case BTF_KIND_INT:
1856 case BTF_KIND_STRUCT:
1857 case BTF_KIND_UNION:
1858 case BTF_KIND_ENUM:
1859 case BTF_KIND_FLOAT:
1860 case BTF_KIND_ENUM64:
1861 size = type->size;
1862 goto resolved;
1863
1864 case BTF_KIND_PTR:
1865 size = sizeof(void *);
1866 goto resolved;
1867
1868 /* Modifiers */
1869 case BTF_KIND_TYPEDEF:
1870 case BTF_KIND_VOLATILE:
1871 case BTF_KIND_CONST:
1872 case BTF_KIND_RESTRICT:
1873 case BTF_KIND_TYPE_TAG:
1874 id = type->type;
1875 type = btf_type_by_id(btf, type->type);
1876 break;
1877
1878 case BTF_KIND_ARRAY:
1879 if (!array_type)
1880 array_type = type;
1881 array = btf_type_array(type);
1882 if (nelems && array->nelems > U32_MAX / nelems)
1883 return ERR_PTR(-EINVAL);
1884 nelems *= array->nelems;
1885 type = btf_type_by_id(btf, array->type);
1886 break;
1887
1888 /* type without size */
1889 default:
1890 return ERR_PTR(-EINVAL);
1891 }
1892 }
1893
1894 return ERR_PTR(-EINVAL);
1895
1896resolved:
1897 if (nelems && size > U32_MAX / nelems)
1898 return ERR_PTR(-EINVAL);
1899
1900 *type_size = nelems * size;
1901 if (total_nelems)
1902 *total_nelems = nelems;
1903 if (elem_type)
1904 *elem_type = type;
1905 if (elem_id)
1906 *elem_id = array ? array->type : 0;
1907 if (type_id && id)
1908 *type_id = id;
1909
1910 return array_type ? : type;
1911}
1912
1913const struct btf_type *
1914btf_resolve_size(const struct btf *btf, const struct btf_type *type,
1915 u32 *type_size)
1916{
1917 return __btf_resolve_size(btf, type, type_size, NULL, NULL, NULL, NULL);
1918}
1919
1920static u32 btf_resolved_type_id(const struct btf *btf, u32 type_id)
1921{
1922 while (type_id < btf->start_id)
1923 btf = btf->base_btf;
1924
1925 return btf->resolved_ids[type_id - btf->start_id];
1926}
1927
1928/* The input param "type_id" must point to a needs_resolve type */
1929static const struct btf_type *btf_type_id_resolve(const struct btf *btf,
1930 u32 *type_id)
1931{
1932 *type_id = btf_resolved_type_id(btf, *type_id);
1933 return btf_type_by_id(btf, *type_id);
1934}
1935
1936static u32 btf_resolved_type_size(const struct btf *btf, u32 type_id)
1937{
1938 while (type_id < btf->start_id)
1939 btf = btf->base_btf;
1940
1941 return btf->resolved_sizes[type_id - btf->start_id];
1942}
1943
1944const struct btf_type *btf_type_id_size(const struct btf *btf,
1945 u32 *type_id, u32 *ret_size)
1946{
1947 const struct btf_type *size_type;
1948 u32 size_type_id = *type_id;
1949 u32 size = 0;
1950
1951 size_type = btf_type_by_id(btf, size_type_id);
1952 if (btf_type_nosize_or_null(size_type))
1953 return NULL;
1954
1955 if (btf_type_has_size(size_type)) {
1956 size = size_type->size;
1957 } else if (btf_type_is_array(size_type)) {
1958 size = btf_resolved_type_size(btf, size_type_id);
1959 } else if (btf_type_is_ptr(size_type)) {
1960 size = sizeof(void *);
1961 } else {
1962 if (WARN_ON_ONCE(!btf_type_is_modifier(size_type) &&
1963 !btf_type_is_var(size_type)))
1964 return NULL;
1965
1966 size_type_id = btf_resolved_type_id(btf, size_type_id);
1967 size_type = btf_type_by_id(btf, size_type_id);
1968 if (btf_type_nosize_or_null(size_type))
1969 return NULL;
1970 else if (btf_type_has_size(size_type))
1971 size = size_type->size;
1972 else if (btf_type_is_array(size_type))
1973 size = btf_resolved_type_size(btf, size_type_id);
1974 else if (btf_type_is_ptr(size_type))
1975 size = sizeof(void *);
1976 else
1977 return NULL;
1978 }
1979
1980 *type_id = size_type_id;
1981 if (ret_size)
1982 *ret_size = size;
1983
1984 return size_type;
1985}
1986
1987static int btf_df_check_member(struct btf_verifier_env *env,
1988 const struct btf_type *struct_type,
1989 const struct btf_member *member,
1990 const struct btf_type *member_type)
1991{
1992 btf_verifier_log_basic(env, struct_type,
1993 "Unsupported check_member");
1994 return -EINVAL;
1995}
1996
1997static int btf_df_check_kflag_member(struct btf_verifier_env *env,
1998 const struct btf_type *struct_type,
1999 const struct btf_member *member,
2000 const struct btf_type *member_type)
2001{
2002 btf_verifier_log_basic(env, struct_type,
2003 "Unsupported check_kflag_member");
2004 return -EINVAL;
2005}
2006
2007/* Used for ptr, array struct/union and float type members.
2008 * int, enum and modifier types have their specific callback functions.
2009 */
2010static int btf_generic_check_kflag_member(struct btf_verifier_env *env,
2011 const struct btf_type *struct_type,
2012 const struct btf_member *member,
2013 const struct btf_type *member_type)
2014{
2015 if (BTF_MEMBER_BITFIELD_SIZE(member->offset)) {
2016 btf_verifier_log_member(env, struct_type, member,
2017 "Invalid member bitfield_size");
2018 return -EINVAL;
2019 }
2020
2021 /* bitfield size is 0, so member->offset represents bit offset only.
2022 * It is safe to call non kflag check_member variants.
2023 */
2024 return btf_type_ops(member_type)->check_member(env, struct_type,
2025 member,
2026 member_type);
2027}
2028
2029static int btf_df_resolve(struct btf_verifier_env *env,
2030 const struct resolve_vertex *v)
2031{
2032 btf_verifier_log_basic(env, v->t, "Unsupported resolve");
2033 return -EINVAL;
2034}
2035
2036static void btf_df_show(const struct btf *btf, const struct btf_type *t,
2037 u32 type_id, void *data, u8 bits_offsets,
2038 struct btf_show *show)
2039{
2040 btf_show(show, "<unsupported kind:%u>", BTF_INFO_KIND(t->info));
2041}
2042
2043static int btf_int_check_member(struct btf_verifier_env *env,
2044 const struct btf_type *struct_type,
2045 const struct btf_member *member,
2046 const struct btf_type *member_type)
2047{
2048 u32 int_data = btf_type_int(member_type);
2049 u32 struct_bits_off = member->offset;
2050 u32 struct_size = struct_type->size;
2051 u32 nr_copy_bits;
2052 u32 bytes_offset;
2053
2054 if (U32_MAX - struct_bits_off < BTF_INT_OFFSET(int_data)) {
2055 btf_verifier_log_member(env, struct_type, member,
2056 "bits_offset exceeds U32_MAX");
2057 return -EINVAL;
2058 }
2059
2060 struct_bits_off += BTF_INT_OFFSET(int_data);
2061 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
2062 nr_copy_bits = BTF_INT_BITS(int_data) +
2063 BITS_PER_BYTE_MASKED(struct_bits_off);
2064
2065 if (nr_copy_bits > BITS_PER_U128) {
2066 btf_verifier_log_member(env, struct_type, member,
2067 "nr_copy_bits exceeds 128");
2068 return -EINVAL;
2069 }
2070
2071 if (struct_size < bytes_offset ||
2072 struct_size - bytes_offset < BITS_ROUNDUP_BYTES(nr_copy_bits)) {
2073 btf_verifier_log_member(env, struct_type, member,
2074 "Member exceeds struct_size");
2075 return -EINVAL;
2076 }
2077
2078 return 0;
2079}
2080
2081static int btf_int_check_kflag_member(struct btf_verifier_env *env,
2082 const struct btf_type *struct_type,
2083 const struct btf_member *member,
2084 const struct btf_type *member_type)
2085{
2086 u32 struct_bits_off, nr_bits, nr_int_data_bits, bytes_offset;
2087 u32 int_data = btf_type_int(member_type);
2088 u32 struct_size = struct_type->size;
2089 u32 nr_copy_bits;
2090
2091 /* a regular int type is required for the kflag int member */
2092 if (!btf_type_int_is_regular(member_type)) {
2093 btf_verifier_log_member(env, struct_type, member,
2094 "Invalid member base type");
2095 return -EINVAL;
2096 }
2097
2098 /* check sanity of bitfield size */
2099 nr_bits = BTF_MEMBER_BITFIELD_SIZE(member->offset);
2100 struct_bits_off = BTF_MEMBER_BIT_OFFSET(member->offset);
2101 nr_int_data_bits = BTF_INT_BITS(int_data);
2102 if (!nr_bits) {
2103 /* Not a bitfield member, member offset must be at byte
2104 * boundary.
2105 */
2106 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
2107 btf_verifier_log_member(env, struct_type, member,
2108 "Invalid member offset");
2109 return -EINVAL;
2110 }
2111
2112 nr_bits = nr_int_data_bits;
2113 } else if (nr_bits > nr_int_data_bits) {
2114 btf_verifier_log_member(env, struct_type, member,
2115 "Invalid member bitfield_size");
2116 return -EINVAL;
2117 }
2118
2119 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
2120 nr_copy_bits = nr_bits + BITS_PER_BYTE_MASKED(struct_bits_off);
2121 if (nr_copy_bits > BITS_PER_U128) {
2122 btf_verifier_log_member(env, struct_type, member,
2123 "nr_copy_bits exceeds 128");
2124 return -EINVAL;
2125 }
2126
2127 if (struct_size < bytes_offset ||
2128 struct_size - bytes_offset < BITS_ROUNDUP_BYTES(nr_copy_bits)) {
2129 btf_verifier_log_member(env, struct_type, member,
2130 "Member exceeds struct_size");
2131 return -EINVAL;
2132 }
2133
2134 return 0;
2135}
2136
2137static s32 btf_int_check_meta(struct btf_verifier_env *env,
2138 const struct btf_type *t,
2139 u32 meta_left)
2140{
2141 u32 int_data, nr_bits, meta_needed = sizeof(int_data);
2142 u16 encoding;
2143
2144 if (meta_left < meta_needed) {
2145 btf_verifier_log_basic(env, t,
2146 "meta_left:%u meta_needed:%u",
2147 meta_left, meta_needed);
2148 return -EINVAL;
2149 }
2150
2151 if (btf_type_vlen(t)) {
2152 btf_verifier_log_type(env, t, "vlen != 0");
2153 return -EINVAL;
2154 }
2155
2156 if (btf_type_kflag(t)) {
2157 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
2158 return -EINVAL;
2159 }
2160
2161 int_data = btf_type_int(t);
2162 if (int_data & ~BTF_INT_MASK) {
2163 btf_verifier_log_basic(env, t, "Invalid int_data:%x",
2164 int_data);
2165 return -EINVAL;
2166 }
2167
2168 nr_bits = BTF_INT_BITS(int_data) + BTF_INT_OFFSET(int_data);
2169
2170 if (nr_bits > BITS_PER_U128) {
2171 btf_verifier_log_type(env, t, "nr_bits exceeds %zu",
2172 BITS_PER_U128);
2173 return -EINVAL;
2174 }
2175
2176 if (BITS_ROUNDUP_BYTES(nr_bits) > t->size) {
2177 btf_verifier_log_type(env, t, "nr_bits exceeds type_size");
2178 return -EINVAL;
2179 }
2180
2181 /*
2182 * Only one of the encoding bits is allowed and it
2183 * should be sufficient for the pretty print purpose (i.e. decoding).
2184 * Multiple bits can be allowed later if it is found
2185 * to be insufficient.
2186 */
2187 encoding = BTF_INT_ENCODING(int_data);
2188 if (encoding &&
2189 encoding != BTF_INT_SIGNED &&
2190 encoding != BTF_INT_CHAR &&
2191 encoding != BTF_INT_BOOL) {
2192 btf_verifier_log_type(env, t, "Unsupported encoding");
2193 return -ENOTSUPP;
2194 }
2195
2196 btf_verifier_log_type(env, t, NULL);
2197
2198 return meta_needed;
2199}
2200
2201static void btf_int_log(struct btf_verifier_env *env,
2202 const struct btf_type *t)
2203{
2204 int int_data = btf_type_int(t);
2205
2206 btf_verifier_log(env,
2207 "size=%u bits_offset=%u nr_bits=%u encoding=%s",
2208 t->size, BTF_INT_OFFSET(int_data),
2209 BTF_INT_BITS(int_data),
2210 btf_int_encoding_str(BTF_INT_ENCODING(int_data)));
2211}
2212
2213static void btf_int128_print(struct btf_show *show, void *data)
2214{
2215 /* data points to a __int128 number.
2216 * Suppose
2217 * int128_num = *(__int128 *)data;
2218 * The below formulas shows what upper_num and lower_num represents:
2219 * upper_num = int128_num >> 64;
2220 * lower_num = int128_num & 0xffffffffFFFFFFFFULL;
2221 */
2222 u64 upper_num, lower_num;
2223
2224#ifdef __BIG_ENDIAN_BITFIELD
2225 upper_num = *(u64 *)data;
2226 lower_num = *(u64 *)(data + 8);
2227#else
2228 upper_num = *(u64 *)(data + 8);
2229 lower_num = *(u64 *)data;
2230#endif
2231 if (upper_num == 0)
2232 btf_show_type_value(show, "0x%llx", lower_num);
2233 else
2234 btf_show_type_values(show, "0x%llx%016llx", upper_num,
2235 lower_num);
2236}
2237
2238static void btf_int128_shift(u64 *print_num, u16 left_shift_bits,
2239 u16 right_shift_bits)
2240{
2241 u64 upper_num, lower_num;
2242
2243#ifdef __BIG_ENDIAN_BITFIELD
2244 upper_num = print_num[0];
2245 lower_num = print_num[1];
2246#else
2247 upper_num = print_num[1];
2248 lower_num = print_num[0];
2249#endif
2250
2251 /* shake out un-needed bits by shift/or operations */
2252 if (left_shift_bits >= 64) {
2253 upper_num = lower_num << (left_shift_bits - 64);
2254 lower_num = 0;
2255 } else {
2256 upper_num = (upper_num << left_shift_bits) |
2257 (lower_num >> (64 - left_shift_bits));
2258 lower_num = lower_num << left_shift_bits;
2259 }
2260
2261 if (right_shift_bits >= 64) {
2262 lower_num = upper_num >> (right_shift_bits - 64);
2263 upper_num = 0;
2264 } else {
2265 lower_num = (lower_num >> right_shift_bits) |
2266 (upper_num << (64 - right_shift_bits));
2267 upper_num = upper_num >> right_shift_bits;
2268 }
2269
2270#ifdef __BIG_ENDIAN_BITFIELD
2271 print_num[0] = upper_num;
2272 print_num[1] = lower_num;
2273#else
2274 print_num[0] = lower_num;
2275 print_num[1] = upper_num;
2276#endif
2277}
2278
2279static void btf_bitfield_show(void *data, u8 bits_offset,
2280 u8 nr_bits, struct btf_show *show)
2281{
2282 u16 left_shift_bits, right_shift_bits;
2283 u8 nr_copy_bytes;
2284 u8 nr_copy_bits;
2285 u64 print_num[2] = {};
2286
2287 nr_copy_bits = nr_bits + bits_offset;
2288 nr_copy_bytes = BITS_ROUNDUP_BYTES(nr_copy_bits);
2289
2290 memcpy(print_num, data, nr_copy_bytes);
2291
2292#ifdef __BIG_ENDIAN_BITFIELD
2293 left_shift_bits = bits_offset;
2294#else
2295 left_shift_bits = BITS_PER_U128 - nr_copy_bits;
2296#endif
2297 right_shift_bits = BITS_PER_U128 - nr_bits;
2298
2299 btf_int128_shift(print_num, left_shift_bits, right_shift_bits);
2300 btf_int128_print(show, print_num);
2301}
2302
2303
2304static void btf_int_bits_show(const struct btf *btf,
2305 const struct btf_type *t,
2306 void *data, u8 bits_offset,
2307 struct btf_show *show)
2308{
2309 u32 int_data = btf_type_int(t);
2310 u8 nr_bits = BTF_INT_BITS(int_data);
2311 u8 total_bits_offset;
2312
2313 /*
2314 * bits_offset is at most 7.
2315 * BTF_INT_OFFSET() cannot exceed 128 bits.
2316 */
2317 total_bits_offset = bits_offset + BTF_INT_OFFSET(int_data);
2318 data += BITS_ROUNDDOWN_BYTES(total_bits_offset);
2319 bits_offset = BITS_PER_BYTE_MASKED(total_bits_offset);
2320 btf_bitfield_show(data, bits_offset, nr_bits, show);
2321}
2322
2323static void btf_int_show(const struct btf *btf, const struct btf_type *t,
2324 u32 type_id, void *data, u8 bits_offset,
2325 struct btf_show *show)
2326{
2327 u32 int_data = btf_type_int(t);
2328 u8 encoding = BTF_INT_ENCODING(int_data);
2329 bool sign = encoding & BTF_INT_SIGNED;
2330 u8 nr_bits = BTF_INT_BITS(int_data);
2331 void *safe_data;
2332
2333 safe_data = btf_show_start_type(show, t, type_id, data);
2334 if (!safe_data)
2335 return;
2336
2337 if (bits_offset || BTF_INT_OFFSET(int_data) ||
2338 BITS_PER_BYTE_MASKED(nr_bits)) {
2339 btf_int_bits_show(btf, t, safe_data, bits_offset, show);
2340 goto out;
2341 }
2342
2343 switch (nr_bits) {
2344 case 128:
2345 btf_int128_print(show, safe_data);
2346 break;
2347 case 64:
2348 if (sign)
2349 btf_show_type_value(show, "%lld", *(s64 *)safe_data);
2350 else
2351 btf_show_type_value(show, "%llu", *(u64 *)safe_data);
2352 break;
2353 case 32:
2354 if (sign)
2355 btf_show_type_value(show, "%d", *(s32 *)safe_data);
2356 else
2357 btf_show_type_value(show, "%u", *(u32 *)safe_data);
2358 break;
2359 case 16:
2360 if (sign)
2361 btf_show_type_value(show, "%d", *(s16 *)safe_data);
2362 else
2363 btf_show_type_value(show, "%u", *(u16 *)safe_data);
2364 break;
2365 case 8:
2366 if (show->state.array_encoding == BTF_INT_CHAR) {
2367 /* check for null terminator */
2368 if (show->state.array_terminated)
2369 break;
2370 if (*(char *)data == '\0') {
2371 show->state.array_terminated = 1;
2372 break;
2373 }
2374 if (isprint(*(char *)data)) {
2375 btf_show_type_value(show, "'%c'",
2376 *(char *)safe_data);
2377 break;
2378 }
2379 }
2380 if (sign)
2381 btf_show_type_value(show, "%d", *(s8 *)safe_data);
2382 else
2383 btf_show_type_value(show, "%u", *(u8 *)safe_data);
2384 break;
2385 default:
2386 btf_int_bits_show(btf, t, safe_data, bits_offset, show);
2387 break;
2388 }
2389out:
2390 btf_show_end_type(show);
2391}
2392
2393static const struct btf_kind_operations int_ops = {
2394 .check_meta = btf_int_check_meta,
2395 .resolve = btf_df_resolve,
2396 .check_member = btf_int_check_member,
2397 .check_kflag_member = btf_int_check_kflag_member,
2398 .log_details = btf_int_log,
2399 .show = btf_int_show,
2400};
2401
2402static int btf_modifier_check_member(struct btf_verifier_env *env,
2403 const struct btf_type *struct_type,
2404 const struct btf_member *member,
2405 const struct btf_type *member_type)
2406{
2407 const struct btf_type *resolved_type;
2408 u32 resolved_type_id = member->type;
2409 struct btf_member resolved_member;
2410 struct btf *btf = env->btf;
2411
2412 resolved_type = btf_type_id_size(btf, &resolved_type_id, NULL);
2413 if (!resolved_type) {
2414 btf_verifier_log_member(env, struct_type, member,
2415 "Invalid member");
2416 return -EINVAL;
2417 }
2418
2419 resolved_member = *member;
2420 resolved_member.type = resolved_type_id;
2421
2422 return btf_type_ops(resolved_type)->check_member(env, struct_type,
2423 &resolved_member,
2424 resolved_type);
2425}
2426
2427static int btf_modifier_check_kflag_member(struct btf_verifier_env *env,
2428 const struct btf_type *struct_type,
2429 const struct btf_member *member,
2430 const struct btf_type *member_type)
2431{
2432 const struct btf_type *resolved_type;
2433 u32 resolved_type_id = member->type;
2434 struct btf_member resolved_member;
2435 struct btf *btf = env->btf;
2436
2437 resolved_type = btf_type_id_size(btf, &resolved_type_id, NULL);
2438 if (!resolved_type) {
2439 btf_verifier_log_member(env, struct_type, member,
2440 "Invalid member");
2441 return -EINVAL;
2442 }
2443
2444 resolved_member = *member;
2445 resolved_member.type = resolved_type_id;
2446
2447 return btf_type_ops(resolved_type)->check_kflag_member(env, struct_type,
2448 &resolved_member,
2449 resolved_type);
2450}
2451
2452static int btf_ptr_check_member(struct btf_verifier_env *env,
2453 const struct btf_type *struct_type,
2454 const struct btf_member *member,
2455 const struct btf_type *member_type)
2456{
2457 u32 struct_size, struct_bits_off, bytes_offset;
2458
2459 struct_size = struct_type->size;
2460 struct_bits_off = member->offset;
2461 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
2462
2463 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
2464 btf_verifier_log_member(env, struct_type, member,
2465 "Member is not byte aligned");
2466 return -EINVAL;
2467 }
2468
2469 if (struct_size - bytes_offset < sizeof(void *)) {
2470 btf_verifier_log_member(env, struct_type, member,
2471 "Member exceeds struct_size");
2472 return -EINVAL;
2473 }
2474
2475 return 0;
2476}
2477
2478static int btf_ref_type_check_meta(struct btf_verifier_env *env,
2479 const struct btf_type *t,
2480 u32 meta_left)
2481{
2482 const char *value;
2483
2484 if (btf_type_vlen(t)) {
2485 btf_verifier_log_type(env, t, "vlen != 0");
2486 return -EINVAL;
2487 }
2488
2489 if (btf_type_kflag(t)) {
2490 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
2491 return -EINVAL;
2492 }
2493
2494 if (!BTF_TYPE_ID_VALID(t->type)) {
2495 btf_verifier_log_type(env, t, "Invalid type_id");
2496 return -EINVAL;
2497 }
2498
2499 /* typedef/type_tag type must have a valid name, and other ref types,
2500 * volatile, const, restrict, should have a null name.
2501 */
2502 if (BTF_INFO_KIND(t->info) == BTF_KIND_TYPEDEF) {
2503 if (!t->name_off ||
2504 !btf_name_valid_identifier(env->btf, t->name_off)) {
2505 btf_verifier_log_type(env, t, "Invalid name");
2506 return -EINVAL;
2507 }
2508 } else if (BTF_INFO_KIND(t->info) == BTF_KIND_TYPE_TAG) {
2509 value = btf_name_by_offset(env->btf, t->name_off);
2510 if (!value || !value[0]) {
2511 btf_verifier_log_type(env, t, "Invalid name");
2512 return -EINVAL;
2513 }
2514 } else {
2515 if (t->name_off) {
2516 btf_verifier_log_type(env, t, "Invalid name");
2517 return -EINVAL;
2518 }
2519 }
2520
2521 btf_verifier_log_type(env, t, NULL);
2522
2523 return 0;
2524}
2525
2526static int btf_modifier_resolve(struct btf_verifier_env *env,
2527 const struct resolve_vertex *v)
2528{
2529 const struct btf_type *t = v->t;
2530 const struct btf_type *next_type;
2531 u32 next_type_id = t->type;
2532 struct btf *btf = env->btf;
2533
2534 next_type = btf_type_by_id(btf, next_type_id);
2535 if (!next_type || btf_type_is_resolve_source_only(next_type)) {
2536 btf_verifier_log_type(env, v->t, "Invalid type_id");
2537 return -EINVAL;
2538 }
2539
2540 if (!env_type_is_resolve_sink(env, next_type) &&
2541 !env_type_is_resolved(env, next_type_id))
2542 return env_stack_push(env, next_type, next_type_id);
2543
2544 /* Figure out the resolved next_type_id with size.
2545 * They will be stored in the current modifier's
2546 * resolved_ids and resolved_sizes such that it can
2547 * save us a few type-following when we use it later (e.g. in
2548 * pretty print).
2549 */
2550 if (!btf_type_id_size(btf, &next_type_id, NULL)) {
2551 if (env_type_is_resolved(env, next_type_id))
2552 next_type = btf_type_id_resolve(btf, &next_type_id);
2553
2554 /* "typedef void new_void", "const void"...etc */
2555 if (!btf_type_is_void(next_type) &&
2556 !btf_type_is_fwd(next_type) &&
2557 !btf_type_is_func_proto(next_type)) {
2558 btf_verifier_log_type(env, v->t, "Invalid type_id");
2559 return -EINVAL;
2560 }
2561 }
2562
2563 env_stack_pop_resolved(env, next_type_id, 0);
2564
2565 return 0;
2566}
2567
2568static int btf_var_resolve(struct btf_verifier_env *env,
2569 const struct resolve_vertex *v)
2570{
2571 const struct btf_type *next_type;
2572 const struct btf_type *t = v->t;
2573 u32 next_type_id = t->type;
2574 struct btf *btf = env->btf;
2575
2576 next_type = btf_type_by_id(btf, next_type_id);
2577 if (!next_type || btf_type_is_resolve_source_only(next_type)) {
2578 btf_verifier_log_type(env, v->t, "Invalid type_id");
2579 return -EINVAL;
2580 }
2581
2582 if (!env_type_is_resolve_sink(env, next_type) &&
2583 !env_type_is_resolved(env, next_type_id))
2584 return env_stack_push(env, next_type, next_type_id);
2585
2586 if (btf_type_is_modifier(next_type)) {
2587 const struct btf_type *resolved_type;
2588 u32 resolved_type_id;
2589
2590 resolved_type_id = next_type_id;
2591 resolved_type = btf_type_id_resolve(btf, &resolved_type_id);
2592
2593 if (btf_type_is_ptr(resolved_type) &&
2594 !env_type_is_resolve_sink(env, resolved_type) &&
2595 !env_type_is_resolved(env, resolved_type_id))
2596 return env_stack_push(env, resolved_type,
2597 resolved_type_id);
2598 }
2599
2600 /* We must resolve to something concrete at this point, no
2601 * forward types or similar that would resolve to size of
2602 * zero is allowed.
2603 */
2604 if (!btf_type_id_size(btf, &next_type_id, NULL)) {
2605 btf_verifier_log_type(env, v->t, "Invalid type_id");
2606 return -EINVAL;
2607 }
2608
2609 env_stack_pop_resolved(env, next_type_id, 0);
2610
2611 return 0;
2612}
2613
2614static int btf_ptr_resolve(struct btf_verifier_env *env,
2615 const struct resolve_vertex *v)
2616{
2617 const struct btf_type *next_type;
2618 const struct btf_type *t = v->t;
2619 u32 next_type_id = t->type;
2620 struct btf *btf = env->btf;
2621
2622 next_type = btf_type_by_id(btf, next_type_id);
2623 if (!next_type || btf_type_is_resolve_source_only(next_type)) {
2624 btf_verifier_log_type(env, v->t, "Invalid type_id");
2625 return -EINVAL;
2626 }
2627
2628 if (!env_type_is_resolve_sink(env, next_type) &&
2629 !env_type_is_resolved(env, next_type_id))
2630 return env_stack_push(env, next_type, next_type_id);
2631
2632 /* If the modifier was RESOLVED during RESOLVE_STRUCT_OR_ARRAY,
2633 * the modifier may have stopped resolving when it was resolved
2634 * to a ptr (last-resolved-ptr).
2635 *
2636 * We now need to continue from the last-resolved-ptr to
2637 * ensure the last-resolved-ptr will not referring back to
2638 * the current ptr (t).
2639 */
2640 if (btf_type_is_modifier(next_type)) {
2641 const struct btf_type *resolved_type;
2642 u32 resolved_type_id;
2643
2644 resolved_type_id = next_type_id;
2645 resolved_type = btf_type_id_resolve(btf, &resolved_type_id);
2646
2647 if (btf_type_is_ptr(resolved_type) &&
2648 !env_type_is_resolve_sink(env, resolved_type) &&
2649 !env_type_is_resolved(env, resolved_type_id))
2650 return env_stack_push(env, resolved_type,
2651 resolved_type_id);
2652 }
2653
2654 if (!btf_type_id_size(btf, &next_type_id, NULL)) {
2655 if (env_type_is_resolved(env, next_type_id))
2656 next_type = btf_type_id_resolve(btf, &next_type_id);
2657
2658 if (!btf_type_is_void(next_type) &&
2659 !btf_type_is_fwd(next_type) &&
2660 !btf_type_is_func_proto(next_type)) {
2661 btf_verifier_log_type(env, v->t, "Invalid type_id");
2662 return -EINVAL;
2663 }
2664 }
2665
2666 env_stack_pop_resolved(env, next_type_id, 0);
2667
2668 return 0;
2669}
2670
2671static void btf_modifier_show(const struct btf *btf,
2672 const struct btf_type *t,
2673 u32 type_id, void *data,
2674 u8 bits_offset, struct btf_show *show)
2675{
2676 if (btf->resolved_ids)
2677 t = btf_type_id_resolve(btf, &type_id);
2678 else
2679 t = btf_type_skip_modifiers(btf, type_id, NULL);
2680
2681 btf_type_ops(t)->show(btf, t, type_id, data, bits_offset, show);
2682}
2683
2684static void btf_var_show(const struct btf *btf, const struct btf_type *t,
2685 u32 type_id, void *data, u8 bits_offset,
2686 struct btf_show *show)
2687{
2688 t = btf_type_id_resolve(btf, &type_id);
2689
2690 btf_type_ops(t)->show(btf, t, type_id, data, bits_offset, show);
2691}
2692
2693static void btf_ptr_show(const struct btf *btf, const struct btf_type *t,
2694 u32 type_id, void *data, u8 bits_offset,
2695 struct btf_show *show)
2696{
2697 void *safe_data;
2698
2699 safe_data = btf_show_start_type(show, t, type_id, data);
2700 if (!safe_data)
2701 return;
2702
2703 /* It is a hashed value unless BTF_SHOW_PTR_RAW is specified */
2704 if (show->flags & BTF_SHOW_PTR_RAW)
2705 btf_show_type_value(show, "0x%px", *(void **)safe_data);
2706 else
2707 btf_show_type_value(show, "0x%p", *(void **)safe_data);
2708 btf_show_end_type(show);
2709}
2710
2711static void btf_ref_type_log(struct btf_verifier_env *env,
2712 const struct btf_type *t)
2713{
2714 btf_verifier_log(env, "type_id=%u", t->type);
2715}
2716
2717static struct btf_kind_operations modifier_ops = {
2718 .check_meta = btf_ref_type_check_meta,
2719 .resolve = btf_modifier_resolve,
2720 .check_member = btf_modifier_check_member,
2721 .check_kflag_member = btf_modifier_check_kflag_member,
2722 .log_details = btf_ref_type_log,
2723 .show = btf_modifier_show,
2724};
2725
2726static struct btf_kind_operations ptr_ops = {
2727 .check_meta = btf_ref_type_check_meta,
2728 .resolve = btf_ptr_resolve,
2729 .check_member = btf_ptr_check_member,
2730 .check_kflag_member = btf_generic_check_kflag_member,
2731 .log_details = btf_ref_type_log,
2732 .show = btf_ptr_show,
2733};
2734
2735static s32 btf_fwd_check_meta(struct btf_verifier_env *env,
2736 const struct btf_type *t,
2737 u32 meta_left)
2738{
2739 if (btf_type_vlen(t)) {
2740 btf_verifier_log_type(env, t, "vlen != 0");
2741 return -EINVAL;
2742 }
2743
2744 if (t->type) {
2745 btf_verifier_log_type(env, t, "type != 0");
2746 return -EINVAL;
2747 }
2748
2749 /* fwd type must have a valid name */
2750 if (!t->name_off ||
2751 !btf_name_valid_identifier(env->btf, t->name_off)) {
2752 btf_verifier_log_type(env, t, "Invalid name");
2753 return -EINVAL;
2754 }
2755
2756 btf_verifier_log_type(env, t, NULL);
2757
2758 return 0;
2759}
2760
2761static void btf_fwd_type_log(struct btf_verifier_env *env,
2762 const struct btf_type *t)
2763{
2764 btf_verifier_log(env, "%s", btf_type_kflag(t) ? "union" : "struct");
2765}
2766
2767static struct btf_kind_operations fwd_ops = {
2768 .check_meta = btf_fwd_check_meta,
2769 .resolve = btf_df_resolve,
2770 .check_member = btf_df_check_member,
2771 .check_kflag_member = btf_df_check_kflag_member,
2772 .log_details = btf_fwd_type_log,
2773 .show = btf_df_show,
2774};
2775
2776static int btf_array_check_member(struct btf_verifier_env *env,
2777 const struct btf_type *struct_type,
2778 const struct btf_member *member,
2779 const struct btf_type *member_type)
2780{
2781 u32 struct_bits_off = member->offset;
2782 u32 struct_size, bytes_offset;
2783 u32 array_type_id, array_size;
2784 struct btf *btf = env->btf;
2785
2786 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
2787 btf_verifier_log_member(env, struct_type, member,
2788 "Member is not byte aligned");
2789 return -EINVAL;
2790 }
2791
2792 array_type_id = member->type;
2793 btf_type_id_size(btf, &array_type_id, &array_size);
2794 struct_size = struct_type->size;
2795 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
2796 if (struct_size - bytes_offset < array_size) {
2797 btf_verifier_log_member(env, struct_type, member,
2798 "Member exceeds struct_size");
2799 return -EINVAL;
2800 }
2801
2802 return 0;
2803}
2804
2805static s32 btf_array_check_meta(struct btf_verifier_env *env,
2806 const struct btf_type *t,
2807 u32 meta_left)
2808{
2809 const struct btf_array *array = btf_type_array(t);
2810 u32 meta_needed = sizeof(*array);
2811
2812 if (meta_left < meta_needed) {
2813 btf_verifier_log_basic(env, t,
2814 "meta_left:%u meta_needed:%u",
2815 meta_left, meta_needed);
2816 return -EINVAL;
2817 }
2818
2819 /* array type should not have a name */
2820 if (t->name_off) {
2821 btf_verifier_log_type(env, t, "Invalid name");
2822 return -EINVAL;
2823 }
2824
2825 if (btf_type_vlen(t)) {
2826 btf_verifier_log_type(env, t, "vlen != 0");
2827 return -EINVAL;
2828 }
2829
2830 if (btf_type_kflag(t)) {
2831 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
2832 return -EINVAL;
2833 }
2834
2835 if (t->size) {
2836 btf_verifier_log_type(env, t, "size != 0");
2837 return -EINVAL;
2838 }
2839
2840 /* Array elem type and index type cannot be in type void,
2841 * so !array->type and !array->index_type are not allowed.
2842 */
2843 if (!array->type || !BTF_TYPE_ID_VALID(array->type)) {
2844 btf_verifier_log_type(env, t, "Invalid elem");
2845 return -EINVAL;
2846 }
2847
2848 if (!array->index_type || !BTF_TYPE_ID_VALID(array->index_type)) {
2849 btf_verifier_log_type(env, t, "Invalid index");
2850 return -EINVAL;
2851 }
2852
2853 btf_verifier_log_type(env, t, NULL);
2854
2855 return meta_needed;
2856}
2857
2858static int btf_array_resolve(struct btf_verifier_env *env,
2859 const struct resolve_vertex *v)
2860{
2861 const struct btf_array *array = btf_type_array(v->t);
2862 const struct btf_type *elem_type, *index_type;
2863 u32 elem_type_id, index_type_id;
2864 struct btf *btf = env->btf;
2865 u32 elem_size;
2866
2867 /* Check array->index_type */
2868 index_type_id = array->index_type;
2869 index_type = btf_type_by_id(btf, index_type_id);
2870 if (btf_type_nosize_or_null(index_type) ||
2871 btf_type_is_resolve_source_only(index_type)) {
2872 btf_verifier_log_type(env, v->t, "Invalid index");
2873 return -EINVAL;
2874 }
2875
2876 if (!env_type_is_resolve_sink(env, index_type) &&
2877 !env_type_is_resolved(env, index_type_id))
2878 return env_stack_push(env, index_type, index_type_id);
2879
2880 index_type = btf_type_id_size(btf, &index_type_id, NULL);
2881 if (!index_type || !btf_type_is_int(index_type) ||
2882 !btf_type_int_is_regular(index_type)) {
2883 btf_verifier_log_type(env, v->t, "Invalid index");
2884 return -EINVAL;
2885 }
2886
2887 /* Check array->type */
2888 elem_type_id = array->type;
2889 elem_type = btf_type_by_id(btf, elem_type_id);
2890 if (btf_type_nosize_or_null(elem_type) ||
2891 btf_type_is_resolve_source_only(elem_type)) {
2892 btf_verifier_log_type(env, v->t,
2893 "Invalid elem");
2894 return -EINVAL;
2895 }
2896
2897 if (!env_type_is_resolve_sink(env, elem_type) &&
2898 !env_type_is_resolved(env, elem_type_id))
2899 return env_stack_push(env, elem_type, elem_type_id);
2900
2901 elem_type = btf_type_id_size(btf, &elem_type_id, &elem_size);
2902 if (!elem_type) {
2903 btf_verifier_log_type(env, v->t, "Invalid elem");
2904 return -EINVAL;
2905 }
2906
2907 if (btf_type_is_int(elem_type) && !btf_type_int_is_regular(elem_type)) {
2908 btf_verifier_log_type(env, v->t, "Invalid array of int");
2909 return -EINVAL;
2910 }
2911
2912 if (array->nelems && elem_size > U32_MAX / array->nelems) {
2913 btf_verifier_log_type(env, v->t,
2914 "Array size overflows U32_MAX");
2915 return -EINVAL;
2916 }
2917
2918 env_stack_pop_resolved(env, elem_type_id, elem_size * array->nelems);
2919
2920 return 0;
2921}
2922
2923static void btf_array_log(struct btf_verifier_env *env,
2924 const struct btf_type *t)
2925{
2926 const struct btf_array *array = btf_type_array(t);
2927
2928 btf_verifier_log(env, "type_id=%u index_type_id=%u nr_elems=%u",
2929 array->type, array->index_type, array->nelems);
2930}
2931
2932static void __btf_array_show(const struct btf *btf, const struct btf_type *t,
2933 u32 type_id, void *data, u8 bits_offset,
2934 struct btf_show *show)
2935{
2936 const struct btf_array *array = btf_type_array(t);
2937 const struct btf_kind_operations *elem_ops;
2938 const struct btf_type *elem_type;
2939 u32 i, elem_size = 0, elem_type_id;
2940 u16 encoding = 0;
2941
2942 elem_type_id = array->type;
2943 elem_type = btf_type_skip_modifiers(btf, elem_type_id, NULL);
2944 if (elem_type && btf_type_has_size(elem_type))
2945 elem_size = elem_type->size;
2946
2947 if (elem_type && btf_type_is_int(elem_type)) {
2948 u32 int_type = btf_type_int(elem_type);
2949
2950 encoding = BTF_INT_ENCODING(int_type);
2951
2952 /*
2953 * BTF_INT_CHAR encoding never seems to be set for
2954 * char arrays, so if size is 1 and element is
2955 * printable as a char, we'll do that.
2956 */
2957 if (elem_size == 1)
2958 encoding = BTF_INT_CHAR;
2959 }
2960
2961 if (!btf_show_start_array_type(show, t, type_id, encoding, data))
2962 return;
2963
2964 if (!elem_type)
2965 goto out;
2966 elem_ops = btf_type_ops(elem_type);
2967
2968 for (i = 0; i < array->nelems; i++) {
2969
2970 btf_show_start_array_member(show);
2971
2972 elem_ops->show(btf, elem_type, elem_type_id, data,
2973 bits_offset, show);
2974 data += elem_size;
2975
2976 btf_show_end_array_member(show);
2977
2978 if (show->state.array_terminated)
2979 break;
2980 }
2981out:
2982 btf_show_end_array_type(show);
2983}
2984
2985static void btf_array_show(const struct btf *btf, const struct btf_type *t,
2986 u32 type_id, void *data, u8 bits_offset,
2987 struct btf_show *show)
2988{
2989 const struct btf_member *m = show->state.member;
2990
2991 /*
2992 * First check if any members would be shown (are non-zero).
2993 * See comments above "struct btf_show" definition for more
2994 * details on how this works at a high-level.
2995 */
2996 if (show->state.depth > 0 && !(show->flags & BTF_SHOW_ZERO)) {
2997 if (!show->state.depth_check) {
2998 show->state.depth_check = show->state.depth + 1;
2999 show->state.depth_to_show = 0;
3000 }
3001 __btf_array_show(btf, t, type_id, data, bits_offset, show);
3002 show->state.member = m;
3003
3004 if (show->state.depth_check != show->state.depth + 1)
3005 return;
3006 show->state.depth_check = 0;
3007
3008 if (show->state.depth_to_show <= show->state.depth)
3009 return;
3010 /*
3011 * Reaching here indicates we have recursed and found
3012 * non-zero array member(s).
3013 */
3014 }
3015 __btf_array_show(btf, t, type_id, data, bits_offset, show);
3016}
3017
3018static struct btf_kind_operations array_ops = {
3019 .check_meta = btf_array_check_meta,
3020 .resolve = btf_array_resolve,
3021 .check_member = btf_array_check_member,
3022 .check_kflag_member = btf_generic_check_kflag_member,
3023 .log_details = btf_array_log,
3024 .show = btf_array_show,
3025};
3026
3027static int btf_struct_check_member(struct btf_verifier_env *env,
3028 const struct btf_type *struct_type,
3029 const struct btf_member *member,
3030 const struct btf_type *member_type)
3031{
3032 u32 struct_bits_off = member->offset;
3033 u32 struct_size, bytes_offset;
3034
3035 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
3036 btf_verifier_log_member(env, struct_type, member,
3037 "Member is not byte aligned");
3038 return -EINVAL;
3039 }
3040
3041 struct_size = struct_type->size;
3042 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
3043 if (struct_size - bytes_offset < member_type->size) {
3044 btf_verifier_log_member(env, struct_type, member,
3045 "Member exceeds struct_size");
3046 return -EINVAL;
3047 }
3048
3049 return 0;
3050}
3051
3052static s32 btf_struct_check_meta(struct btf_verifier_env *env,
3053 const struct btf_type *t,
3054 u32 meta_left)
3055{
3056 bool is_union = BTF_INFO_KIND(t->info) == BTF_KIND_UNION;
3057 const struct btf_member *member;
3058 u32 meta_needed, last_offset;
3059 struct btf *btf = env->btf;
3060 u32 struct_size = t->size;
3061 u32 offset;
3062 u16 i;
3063
3064 meta_needed = btf_type_vlen(t) * sizeof(*member);
3065 if (meta_left < meta_needed) {
3066 btf_verifier_log_basic(env, t,
3067 "meta_left:%u meta_needed:%u",
3068 meta_left, meta_needed);
3069 return -EINVAL;
3070 }
3071
3072 /* struct type either no name or a valid one */
3073 if (t->name_off &&
3074 !btf_name_valid_identifier(env->btf, t->name_off)) {
3075 btf_verifier_log_type(env, t, "Invalid name");
3076 return -EINVAL;
3077 }
3078
3079 btf_verifier_log_type(env, t, NULL);
3080
3081 last_offset = 0;
3082 for_each_member(i, t, member) {
3083 if (!btf_name_offset_valid(btf, member->name_off)) {
3084 btf_verifier_log_member(env, t, member,
3085 "Invalid member name_offset:%u",
3086 member->name_off);
3087 return -EINVAL;
3088 }
3089
3090 /* struct member either no name or a valid one */
3091 if (member->name_off &&
3092 !btf_name_valid_identifier(btf, member->name_off)) {
3093 btf_verifier_log_member(env, t, member, "Invalid name");
3094 return -EINVAL;
3095 }
3096 /* A member cannot be in type void */
3097 if (!member->type || !BTF_TYPE_ID_VALID(member->type)) {
3098 btf_verifier_log_member(env, t, member,
3099 "Invalid type_id");
3100 return -EINVAL;
3101 }
3102
3103 offset = __btf_member_bit_offset(t, member);
3104 if (is_union && offset) {
3105 btf_verifier_log_member(env, t, member,
3106 "Invalid member bits_offset");
3107 return -EINVAL;
3108 }
3109
3110 /*
3111 * ">" instead of ">=" because the last member could be
3112 * "char a[0];"
3113 */
3114 if (last_offset > offset) {
3115 btf_verifier_log_member(env, t, member,
3116 "Invalid member bits_offset");
3117 return -EINVAL;
3118 }
3119
3120 if (BITS_ROUNDUP_BYTES(offset) > struct_size) {
3121 btf_verifier_log_member(env, t, member,
3122 "Member bits_offset exceeds its struct size");
3123 return -EINVAL;
3124 }
3125
3126 btf_verifier_log_member(env, t, member, NULL);
3127 last_offset = offset;
3128 }
3129
3130 return meta_needed;
3131}
3132
3133static int btf_struct_resolve(struct btf_verifier_env *env,
3134 const struct resolve_vertex *v)
3135{
3136 const struct btf_member *member;
3137 int err;
3138 u16 i;
3139
3140 /* Before continue resolving the next_member,
3141 * ensure the last member is indeed resolved to a
3142 * type with size info.
3143 */
3144 if (v->next_member) {
3145 const struct btf_type *last_member_type;
3146 const struct btf_member *last_member;
3147 u32 last_member_type_id;
3148
3149 last_member = btf_type_member(v->t) + v->next_member - 1;
3150 last_member_type_id = last_member->type;
3151 if (WARN_ON_ONCE(!env_type_is_resolved(env,
3152 last_member_type_id)))
3153 return -EINVAL;
3154
3155 last_member_type = btf_type_by_id(env->btf,
3156 last_member_type_id);
3157 if (btf_type_kflag(v->t))
3158 err = btf_type_ops(last_member_type)->check_kflag_member(env, v->t,
3159 last_member,
3160 last_member_type);
3161 else
3162 err = btf_type_ops(last_member_type)->check_member(env, v->t,
3163 last_member,
3164 last_member_type);
3165 if (err)
3166 return err;
3167 }
3168
3169 for_each_member_from(i, v->next_member, v->t, member) {
3170 u32 member_type_id = member->type;
3171 const struct btf_type *member_type = btf_type_by_id(env->btf,
3172 member_type_id);
3173
3174 if (btf_type_nosize_or_null(member_type) ||
3175 btf_type_is_resolve_source_only(member_type)) {
3176 btf_verifier_log_member(env, v->t, member,
3177 "Invalid member");
3178 return -EINVAL;
3179 }
3180
3181 if (!env_type_is_resolve_sink(env, member_type) &&
3182 !env_type_is_resolved(env, member_type_id)) {
3183 env_stack_set_next_member(env, i + 1);
3184 return env_stack_push(env, member_type, member_type_id);
3185 }
3186
3187 if (btf_type_kflag(v->t))
3188 err = btf_type_ops(member_type)->check_kflag_member(env, v->t,
3189 member,
3190 member_type);
3191 else
3192 err = btf_type_ops(member_type)->check_member(env, v->t,
3193 member,
3194 member_type);
3195 if (err)
3196 return err;
3197 }
3198
3199 env_stack_pop_resolved(env, 0, 0);
3200
3201 return 0;
3202}
3203
3204static void btf_struct_log(struct btf_verifier_env *env,
3205 const struct btf_type *t)
3206{
3207 btf_verifier_log(env, "size=%u vlen=%u", t->size, btf_type_vlen(t));
3208}
3209
3210enum btf_field_info_type {
3211 BTF_FIELD_SPIN_LOCK,
3212 BTF_FIELD_TIMER,
3213 BTF_FIELD_KPTR,
3214};
3215
3216enum {
3217 BTF_FIELD_IGNORE = 0,
3218 BTF_FIELD_FOUND = 1,
3219};
3220
3221struct btf_field_info {
3222 enum btf_field_type type;
3223 u32 off;
3224 union {
3225 struct {
3226 u32 type_id;
3227 } kptr;
3228 struct {
3229 const char *node_name;
3230 u32 value_btf_id;
3231 } list_head;
3232 };
3233};
3234
3235static int btf_find_struct(const struct btf *btf, const struct btf_type *t,
3236 u32 off, int sz, enum btf_field_type field_type,
3237 struct btf_field_info *info)
3238{
3239 if (!__btf_type_is_struct(t))
3240 return BTF_FIELD_IGNORE;
3241 if (t->size != sz)
3242 return BTF_FIELD_IGNORE;
3243 info->type = field_type;
3244 info->off = off;
3245 return BTF_FIELD_FOUND;
3246}
3247
3248static int btf_find_kptr(const struct btf *btf, const struct btf_type *t,
3249 u32 off, int sz, struct btf_field_info *info)
3250{
3251 enum btf_field_type type;
3252 u32 res_id;
3253
3254 /* Permit modifiers on the pointer itself */
3255 if (btf_type_is_volatile(t))
3256 t = btf_type_by_id(btf, t->type);
3257 /* For PTR, sz is always == 8 */
3258 if (!btf_type_is_ptr(t))
3259 return BTF_FIELD_IGNORE;
3260 t = btf_type_by_id(btf, t->type);
3261
3262 if (!btf_type_is_type_tag(t))
3263 return BTF_FIELD_IGNORE;
3264 /* Reject extra tags */
3265 if (btf_type_is_type_tag(btf_type_by_id(btf, t->type)))
3266 return -EINVAL;
3267 if (!strcmp("kptr", __btf_name_by_offset(btf, t->name_off)))
3268 type = BPF_KPTR_UNREF;
3269 else if (!strcmp("kptr_ref", __btf_name_by_offset(btf, t->name_off)))
3270 type = BPF_KPTR_REF;
3271 else
3272 return -EINVAL;
3273
3274 /* Get the base type */
3275 t = btf_type_skip_modifiers(btf, t->type, &res_id);
3276 /* Only pointer to struct is allowed */
3277 if (!__btf_type_is_struct(t))
3278 return -EINVAL;
3279
3280 info->type = type;
3281 info->off = off;
3282 info->kptr.type_id = res_id;
3283 return BTF_FIELD_FOUND;
3284}
3285
3286static const char *btf_find_decl_tag_value(const struct btf *btf,
3287 const struct btf_type *pt,
3288 int comp_idx, const char *tag_key)
3289{
3290 int i;
3291
3292 for (i = 1; i < btf_nr_types(btf); i++) {
3293 const struct btf_type *t = btf_type_by_id(btf, i);
3294 int len = strlen(tag_key);
3295
3296 if (!btf_type_is_decl_tag(t))
3297 continue;
3298 if (pt != btf_type_by_id(btf, t->type) ||
3299 btf_type_decl_tag(t)->component_idx != comp_idx)
3300 continue;
3301 if (strncmp(__btf_name_by_offset(btf, t->name_off), tag_key, len))
3302 continue;
3303 return __btf_name_by_offset(btf, t->name_off) + len;
3304 }
3305 return NULL;
3306}
3307
3308static int btf_find_list_head(const struct btf *btf, const struct btf_type *pt,
3309 const struct btf_type *t, int comp_idx,
3310 u32 off, int sz, struct btf_field_info *info)
3311{
3312 const char *value_type;
3313 const char *list_node;
3314 s32 id;
3315
3316 if (!__btf_type_is_struct(t))
3317 return BTF_FIELD_IGNORE;
3318 if (t->size != sz)
3319 return BTF_FIELD_IGNORE;
3320 value_type = btf_find_decl_tag_value(btf, pt, comp_idx, "contains:");
3321 if (!value_type)
3322 return -EINVAL;
3323 list_node = strstr(value_type, ":");
3324 if (!list_node)
3325 return -EINVAL;
3326 value_type = kstrndup(value_type, list_node - value_type, GFP_KERNEL | __GFP_NOWARN);
3327 if (!value_type)
3328 return -ENOMEM;
3329 id = btf_find_by_name_kind(btf, value_type, BTF_KIND_STRUCT);
3330 kfree(value_type);
3331 if (id < 0)
3332 return id;
3333 list_node++;
3334 if (str_is_empty(list_node))
3335 return -EINVAL;
3336 info->type = BPF_LIST_HEAD;
3337 info->off = off;
3338 info->list_head.value_btf_id = id;
3339 info->list_head.node_name = list_node;
3340 return BTF_FIELD_FOUND;
3341}
3342
3343static int btf_get_field_type(const char *name, u32 field_mask, u32 *seen_mask,
3344 int *align, int *sz)
3345{
3346 int type = 0;
3347
3348 if (field_mask & BPF_SPIN_LOCK) {
3349 if (!strcmp(name, "bpf_spin_lock")) {
3350 if (*seen_mask & BPF_SPIN_LOCK)
3351 return -E2BIG;
3352 *seen_mask |= BPF_SPIN_LOCK;
3353 type = BPF_SPIN_LOCK;
3354 goto end;
3355 }
3356 }
3357 if (field_mask & BPF_TIMER) {
3358 if (!strcmp(name, "bpf_timer")) {
3359 if (*seen_mask & BPF_TIMER)
3360 return -E2BIG;
3361 *seen_mask |= BPF_TIMER;
3362 type = BPF_TIMER;
3363 goto end;
3364 }
3365 }
3366 if (field_mask & BPF_LIST_HEAD) {
3367 if (!strcmp(name, "bpf_list_head")) {
3368 type = BPF_LIST_HEAD;
3369 goto end;
3370 }
3371 }
3372 if (field_mask & BPF_LIST_NODE) {
3373 if (!strcmp(name, "bpf_list_node")) {
3374 type = BPF_LIST_NODE;
3375 goto end;
3376 }
3377 }
3378 /* Only return BPF_KPTR when all other types with matchable names fail */
3379 if (field_mask & BPF_KPTR) {
3380 type = BPF_KPTR_REF;
3381 goto end;
3382 }
3383 return 0;
3384end:
3385 *sz = btf_field_type_size(type);
3386 *align = btf_field_type_align(type);
3387 return type;
3388}
3389
3390static int btf_find_struct_field(const struct btf *btf,
3391 const struct btf_type *t, u32 field_mask,
3392 struct btf_field_info *info, int info_cnt)
3393{
3394 int ret, idx = 0, align, sz, field_type;
3395 const struct btf_member *member;
3396 struct btf_field_info tmp;
3397 u32 i, off, seen_mask = 0;
3398
3399 for_each_member(i, t, member) {
3400 const struct btf_type *member_type = btf_type_by_id(btf,
3401 member->type);
3402
3403 field_type = btf_get_field_type(__btf_name_by_offset(btf, member_type->name_off),
3404 field_mask, &seen_mask, &align, &sz);
3405 if (field_type == 0)
3406 continue;
3407 if (field_type < 0)
3408 return field_type;
3409
3410 off = __btf_member_bit_offset(t, member);
3411 if (off % 8)
3412 /* valid C code cannot generate such BTF */
3413 return -EINVAL;
3414 off /= 8;
3415 if (off % align)
3416 continue;
3417
3418 switch (field_type) {
3419 case BPF_SPIN_LOCK:
3420 case BPF_TIMER:
3421 case BPF_LIST_NODE:
3422 ret = btf_find_struct(btf, member_type, off, sz, field_type,
3423 idx < info_cnt ? &info[idx] : &tmp);
3424 if (ret < 0)
3425 return ret;
3426 break;
3427 case BPF_KPTR_UNREF:
3428 case BPF_KPTR_REF:
3429 ret = btf_find_kptr(btf, member_type, off, sz,
3430 idx < info_cnt ? &info[idx] : &tmp);
3431 if (ret < 0)
3432 return ret;
3433 break;
3434 case BPF_LIST_HEAD:
3435 ret = btf_find_list_head(btf, t, member_type, i, off, sz,
3436 idx < info_cnt ? &info[idx] : &tmp);
3437 if (ret < 0)
3438 return ret;
3439 break;
3440 default:
3441 return -EFAULT;
3442 }
3443
3444 if (ret == BTF_FIELD_IGNORE)
3445 continue;
3446 if (idx >= info_cnt)
3447 return -E2BIG;
3448 ++idx;
3449 }
3450 return idx;
3451}
3452
3453static int btf_find_datasec_var(const struct btf *btf, const struct btf_type *t,
3454 u32 field_mask, struct btf_field_info *info,
3455 int info_cnt)
3456{
3457 int ret, idx = 0, align, sz, field_type;
3458 const struct btf_var_secinfo *vsi;
3459 struct btf_field_info tmp;
3460 u32 i, off, seen_mask = 0;
3461
3462 for_each_vsi(i, t, vsi) {
3463 const struct btf_type *var = btf_type_by_id(btf, vsi->type);
3464 const struct btf_type *var_type = btf_type_by_id(btf, var->type);
3465
3466 field_type = btf_get_field_type(__btf_name_by_offset(btf, var_type->name_off),
3467 field_mask, &seen_mask, &align, &sz);
3468 if (field_type == 0)
3469 continue;
3470 if (field_type < 0)
3471 return field_type;
3472
3473 off = vsi->offset;
3474 if (vsi->size != sz)
3475 continue;
3476 if (off % align)
3477 continue;
3478
3479 switch (field_type) {
3480 case BPF_SPIN_LOCK:
3481 case BPF_TIMER:
3482 case BPF_LIST_NODE:
3483 ret = btf_find_struct(btf, var_type, off, sz, field_type,
3484 idx < info_cnt ? &info[idx] : &tmp);
3485 if (ret < 0)
3486 return ret;
3487 break;
3488 case BPF_KPTR_UNREF:
3489 case BPF_KPTR_REF:
3490 ret = btf_find_kptr(btf, var_type, off, sz,
3491 idx < info_cnt ? &info[idx] : &tmp);
3492 if (ret < 0)
3493 return ret;
3494 break;
3495 case BPF_LIST_HEAD:
3496 ret = btf_find_list_head(btf, var, var_type, -1, off, sz,
3497 idx < info_cnt ? &info[idx] : &tmp);
3498 if (ret < 0)
3499 return ret;
3500 break;
3501 default:
3502 return -EFAULT;
3503 }
3504
3505 if (ret == BTF_FIELD_IGNORE)
3506 continue;
3507 if (idx >= info_cnt)
3508 return -E2BIG;
3509 ++idx;
3510 }
3511 return idx;
3512}
3513
3514static int btf_find_field(const struct btf *btf, const struct btf_type *t,
3515 u32 field_mask, struct btf_field_info *info,
3516 int info_cnt)
3517{
3518 if (__btf_type_is_struct(t))
3519 return btf_find_struct_field(btf, t, field_mask, info, info_cnt);
3520 else if (btf_type_is_datasec(t))
3521 return btf_find_datasec_var(btf, t, field_mask, info, info_cnt);
3522 return -EINVAL;
3523}
3524
3525static int btf_parse_kptr(const struct btf *btf, struct btf_field *field,
3526 struct btf_field_info *info)
3527{
3528 struct module *mod = NULL;
3529 const struct btf_type *t;
3530 struct btf *kernel_btf;
3531 int ret;
3532 s32 id;
3533
3534 /* Find type in map BTF, and use it to look up the matching type
3535 * in vmlinux or module BTFs, by name and kind.
3536 */
3537 t = btf_type_by_id(btf, info->kptr.type_id);
3538 id = bpf_find_btf_id(__btf_name_by_offset(btf, t->name_off), BTF_INFO_KIND(t->info),
3539 &kernel_btf);
3540 if (id < 0)
3541 return id;
3542
3543 /* Find and stash the function pointer for the destruction function that
3544 * needs to be eventually invoked from the map free path.
3545 */
3546 if (info->type == BPF_KPTR_REF) {
3547 const struct btf_type *dtor_func;
3548 const char *dtor_func_name;
3549 unsigned long addr;
3550 s32 dtor_btf_id;
3551
3552 /* This call also serves as a whitelist of allowed objects that
3553 * can be used as a referenced pointer and be stored in a map at
3554 * the same time.
3555 */
3556 dtor_btf_id = btf_find_dtor_kfunc(kernel_btf, id);
3557 if (dtor_btf_id < 0) {
3558 ret = dtor_btf_id;
3559 goto end_btf;
3560 }
3561
3562 dtor_func = btf_type_by_id(kernel_btf, dtor_btf_id);
3563 if (!dtor_func) {
3564 ret = -ENOENT;
3565 goto end_btf;
3566 }
3567
3568 if (btf_is_module(kernel_btf)) {
3569 mod = btf_try_get_module(kernel_btf);
3570 if (!mod) {
3571 ret = -ENXIO;
3572 goto end_btf;
3573 }
3574 }
3575
3576 /* We already verified dtor_func to be btf_type_is_func
3577 * in register_btf_id_dtor_kfuncs.
3578 */
3579 dtor_func_name = __btf_name_by_offset(kernel_btf, dtor_func->name_off);
3580 addr = kallsyms_lookup_name(dtor_func_name);
3581 if (!addr) {
3582 ret = -EINVAL;
3583 goto end_mod;
3584 }
3585 field->kptr.dtor = (void *)addr;
3586 }
3587
3588 field->kptr.btf_id = id;
3589 field->kptr.btf = kernel_btf;
3590 field->kptr.module = mod;
3591 return 0;
3592end_mod:
3593 module_put(mod);
3594end_btf:
3595 btf_put(kernel_btf);
3596 return ret;
3597}
3598
3599static int btf_parse_list_head(const struct btf *btf, struct btf_field *field,
3600 struct btf_field_info *info)
3601{
3602 const struct btf_type *t, *n = NULL;
3603 const struct btf_member *member;
3604 u32 offset;
3605 int i;
3606
3607 t = btf_type_by_id(btf, info->list_head.value_btf_id);
3608 /* We've already checked that value_btf_id is a struct type. We
3609 * just need to figure out the offset of the list_node, and
3610 * verify its type.
3611 */
3612 for_each_member(i, t, member) {
3613 if (strcmp(info->list_head.node_name, __btf_name_by_offset(btf, member->name_off)))
3614 continue;
3615 /* Invalid BTF, two members with same name */
3616 if (n)
3617 return -EINVAL;
3618 n = btf_type_by_id(btf, member->type);
3619 if (!__btf_type_is_struct(n))
3620 return -EINVAL;
3621 if (strcmp("bpf_list_node", __btf_name_by_offset(btf, n->name_off)))
3622 return -EINVAL;
3623 offset = __btf_member_bit_offset(n, member);
3624 if (offset % 8)
3625 return -EINVAL;
3626 offset /= 8;
3627 if (offset % __alignof__(struct bpf_list_node))
3628 return -EINVAL;
3629
3630 field->list_head.btf = (struct btf *)btf;
3631 field->list_head.value_btf_id = info->list_head.value_btf_id;
3632 field->list_head.node_offset = offset;
3633 }
3634 if (!n)
3635 return -ENOENT;
3636 return 0;
3637}
3638
3639struct btf_record *btf_parse_fields(const struct btf *btf, const struct btf_type *t,
3640 u32 field_mask, u32 value_size)
3641{
3642 struct btf_field_info info_arr[BTF_FIELDS_MAX];
3643 struct btf_record *rec;
3644 u32 next_off = 0;
3645 int ret, i, cnt;
3646
3647 ret = btf_find_field(btf, t, field_mask, info_arr, ARRAY_SIZE(info_arr));
3648 if (ret < 0)
3649 return ERR_PTR(ret);
3650 if (!ret)
3651 return NULL;
3652
3653 cnt = ret;
3654 /* This needs to be kzalloc to zero out padding and unused fields, see
3655 * comment in btf_record_equal.
3656 */
3657 rec = kzalloc(offsetof(struct btf_record, fields[cnt]), GFP_KERNEL | __GFP_NOWARN);
3658 if (!rec)
3659 return ERR_PTR(-ENOMEM);
3660
3661 rec->spin_lock_off = -EINVAL;
3662 rec->timer_off = -EINVAL;
3663 for (i = 0; i < cnt; i++) {
3664 if (info_arr[i].off + btf_field_type_size(info_arr[i].type) > value_size) {
3665 WARN_ONCE(1, "verifier bug off %d size %d", info_arr[i].off, value_size);
3666 ret = -EFAULT;
3667 goto end;
3668 }
3669 if (info_arr[i].off < next_off) {
3670 ret = -EEXIST;
3671 goto end;
3672 }
3673 next_off = info_arr[i].off + btf_field_type_size(info_arr[i].type);
3674
3675 rec->field_mask |= info_arr[i].type;
3676 rec->fields[i].offset = info_arr[i].off;
3677 rec->fields[i].type = info_arr[i].type;
3678
3679 switch (info_arr[i].type) {
3680 case BPF_SPIN_LOCK:
3681 WARN_ON_ONCE(rec->spin_lock_off >= 0);
3682 /* Cache offset for faster lookup at runtime */
3683 rec->spin_lock_off = rec->fields[i].offset;
3684 break;
3685 case BPF_TIMER:
3686 WARN_ON_ONCE(rec->timer_off >= 0);
3687 /* Cache offset for faster lookup at runtime */
3688 rec->timer_off = rec->fields[i].offset;
3689 break;
3690 case BPF_KPTR_UNREF:
3691 case BPF_KPTR_REF:
3692 ret = btf_parse_kptr(btf, &rec->fields[i], &info_arr[i]);
3693 if (ret < 0)
3694 goto end;
3695 break;
3696 case BPF_LIST_HEAD:
3697 ret = btf_parse_list_head(btf, &rec->fields[i], &info_arr[i]);
3698 if (ret < 0)
3699 goto end;
3700 break;
3701 case BPF_LIST_NODE:
3702 break;
3703 default:
3704 ret = -EFAULT;
3705 goto end;
3706 }
3707 rec->cnt++;
3708 }
3709
3710 /* bpf_list_head requires bpf_spin_lock */
3711 if (btf_record_has_field(rec, BPF_LIST_HEAD) && rec->spin_lock_off < 0) {
3712 ret = -EINVAL;
3713 goto end;
3714 }
3715
3716 return rec;
3717end:
3718 btf_record_free(rec);
3719 return ERR_PTR(ret);
3720}
3721
3722int btf_check_and_fixup_fields(const struct btf *btf, struct btf_record *rec)
3723{
3724 int i;
3725
3726 /* There are two owning types, kptr_ref and bpf_list_head. The former
3727 * only supports storing kernel types, which can never store references
3728 * to program allocated local types, atleast not yet. Hence we only need
3729 * to ensure that bpf_list_head ownership does not form cycles.
3730 */
3731 if (IS_ERR_OR_NULL(rec) || !(rec->field_mask & BPF_LIST_HEAD))
3732 return 0;
3733 for (i = 0; i < rec->cnt; i++) {
3734 struct btf_struct_meta *meta;
3735 u32 btf_id;
3736
3737 if (!(rec->fields[i].type & BPF_LIST_HEAD))
3738 continue;
3739 btf_id = rec->fields[i].list_head.value_btf_id;
3740 meta = btf_find_struct_meta(btf, btf_id);
3741 if (!meta)
3742 return -EFAULT;
3743 rec->fields[i].list_head.value_rec = meta->record;
3744
3745 if (!(rec->field_mask & BPF_LIST_NODE))
3746 continue;
3747
3748 /* We need to ensure ownership acyclicity among all types. The
3749 * proper way to do it would be to topologically sort all BTF
3750 * IDs based on the ownership edges, since there can be multiple
3751 * bpf_list_head in a type. Instead, we use the following
3752 * reasoning:
3753 *
3754 * - A type can only be owned by another type in user BTF if it
3755 * has a bpf_list_node.
3756 * - A type can only _own_ another type in user BTF if it has a
3757 * bpf_list_head.
3758 *
3759 * We ensure that if a type has both bpf_list_head and
3760 * bpf_list_node, its element types cannot be owning types.
3761 *
3762 * To ensure acyclicity:
3763 *
3764 * When A only has bpf_list_head, ownership chain can be:
3765 * A -> B -> C
3766 * Where:
3767 * - B has both bpf_list_head and bpf_list_node.
3768 * - C only has bpf_list_node.
3769 *
3770 * When A has both bpf_list_head and bpf_list_node, some other
3771 * type already owns it in the BTF domain, hence it can not own
3772 * another owning type through any of the bpf_list_head edges.
3773 * A -> B
3774 * Where:
3775 * - B only has bpf_list_node.
3776 */
3777 if (meta->record->field_mask & BPF_LIST_HEAD)
3778 return -ELOOP;
3779 }
3780 return 0;
3781}
3782
3783static int btf_field_offs_cmp(const void *_a, const void *_b, const void *priv)
3784{
3785 const u32 a = *(const u32 *)_a;
3786 const u32 b = *(const u32 *)_b;
3787
3788 if (a < b)
3789 return -1;
3790 else if (a > b)
3791 return 1;
3792 return 0;
3793}
3794
3795static void btf_field_offs_swap(void *_a, void *_b, int size, const void *priv)
3796{
3797 struct btf_field_offs *foffs = (void *)priv;
3798 u32 *off_base = foffs->field_off;
3799 u32 *a = _a, *b = _b;
3800 u8 *sz_a, *sz_b;
3801
3802 sz_a = foffs->field_sz + (a - off_base);
3803 sz_b = foffs->field_sz + (b - off_base);
3804
3805 swap(*a, *b);
3806 swap(*sz_a, *sz_b);
3807}
3808
3809struct btf_field_offs *btf_parse_field_offs(struct btf_record *rec)
3810{
3811 struct btf_field_offs *foffs;
3812 u32 i, *off;
3813 u8 *sz;
3814
3815 BUILD_BUG_ON(ARRAY_SIZE(foffs->field_off) != ARRAY_SIZE(foffs->field_sz));
3816 if (IS_ERR_OR_NULL(rec))
3817 return NULL;
3818
3819 foffs = kzalloc(sizeof(*foffs), GFP_KERNEL | __GFP_NOWARN);
3820 if (!foffs)
3821 return ERR_PTR(-ENOMEM);
3822
3823 off = foffs->field_off;
3824 sz = foffs->field_sz;
3825 for (i = 0; i < rec->cnt; i++) {
3826 off[i] = rec->fields[i].offset;
3827 sz[i] = btf_field_type_size(rec->fields[i].type);
3828 }
3829 foffs->cnt = rec->cnt;
3830
3831 if (foffs->cnt == 1)
3832 return foffs;
3833 sort_r(foffs->field_off, foffs->cnt, sizeof(foffs->field_off[0]),
3834 btf_field_offs_cmp, btf_field_offs_swap, foffs);
3835 return foffs;
3836}
3837
3838static void __btf_struct_show(const struct btf *btf, const struct btf_type *t,
3839 u32 type_id, void *data, u8 bits_offset,
3840 struct btf_show *show)
3841{
3842 const struct btf_member *member;
3843 void *safe_data;
3844 u32 i;
3845
3846 safe_data = btf_show_start_struct_type(show, t, type_id, data);
3847 if (!safe_data)
3848 return;
3849
3850 for_each_member(i, t, member) {
3851 const struct btf_type *member_type = btf_type_by_id(btf,
3852 member->type);
3853 const struct btf_kind_operations *ops;
3854 u32 member_offset, bitfield_size;
3855 u32 bytes_offset;
3856 u8 bits8_offset;
3857
3858 btf_show_start_member(show, member);
3859
3860 member_offset = __btf_member_bit_offset(t, member);
3861 bitfield_size = __btf_member_bitfield_size(t, member);
3862 bytes_offset = BITS_ROUNDDOWN_BYTES(member_offset);
3863 bits8_offset = BITS_PER_BYTE_MASKED(member_offset);
3864 if (bitfield_size) {
3865 safe_data = btf_show_start_type(show, member_type,
3866 member->type,
3867 data + bytes_offset);
3868 if (safe_data)
3869 btf_bitfield_show(safe_data,
3870 bits8_offset,
3871 bitfield_size, show);
3872 btf_show_end_type(show);
3873 } else {
3874 ops = btf_type_ops(member_type);
3875 ops->show(btf, member_type, member->type,
3876 data + bytes_offset, bits8_offset, show);
3877 }
3878
3879 btf_show_end_member(show);
3880 }
3881
3882 btf_show_end_struct_type(show);
3883}
3884
3885static void btf_struct_show(const struct btf *btf, const struct btf_type *t,
3886 u32 type_id, void *data, u8 bits_offset,
3887 struct btf_show *show)
3888{
3889 const struct btf_member *m = show->state.member;
3890
3891 /*
3892 * First check if any members would be shown (are non-zero).
3893 * See comments above "struct btf_show" definition for more
3894 * details on how this works at a high-level.
3895 */
3896 if (show->state.depth > 0 && !(show->flags & BTF_SHOW_ZERO)) {
3897 if (!show->state.depth_check) {
3898 show->state.depth_check = show->state.depth + 1;
3899 show->state.depth_to_show = 0;
3900 }
3901 __btf_struct_show(btf, t, type_id, data, bits_offset, show);
3902 /* Restore saved member data here */
3903 show->state.member = m;
3904 if (show->state.depth_check != show->state.depth + 1)
3905 return;
3906 show->state.depth_check = 0;
3907
3908 if (show->state.depth_to_show <= show->state.depth)
3909 return;
3910 /*
3911 * Reaching here indicates we have recursed and found
3912 * non-zero child values.
3913 */
3914 }
3915
3916 __btf_struct_show(btf, t, type_id, data, bits_offset, show);
3917}
3918
3919static struct btf_kind_operations struct_ops = {
3920 .check_meta = btf_struct_check_meta,
3921 .resolve = btf_struct_resolve,
3922 .check_member = btf_struct_check_member,
3923 .check_kflag_member = btf_generic_check_kflag_member,
3924 .log_details = btf_struct_log,
3925 .show = btf_struct_show,
3926};
3927
3928static int btf_enum_check_member(struct btf_verifier_env *env,
3929 const struct btf_type *struct_type,
3930 const struct btf_member *member,
3931 const struct btf_type *member_type)
3932{
3933 u32 struct_bits_off = member->offset;
3934 u32 struct_size, bytes_offset;
3935
3936 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
3937 btf_verifier_log_member(env, struct_type, member,
3938 "Member is not byte aligned");
3939 return -EINVAL;
3940 }
3941
3942 struct_size = struct_type->size;
3943 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
3944 if (struct_size - bytes_offset < member_type->size) {
3945 btf_verifier_log_member(env, struct_type, member,
3946 "Member exceeds struct_size");
3947 return -EINVAL;
3948 }
3949
3950 return 0;
3951}
3952
3953static int btf_enum_check_kflag_member(struct btf_verifier_env *env,
3954 const struct btf_type *struct_type,
3955 const struct btf_member *member,
3956 const struct btf_type *member_type)
3957{
3958 u32 struct_bits_off, nr_bits, bytes_end, struct_size;
3959 u32 int_bitsize = sizeof(int) * BITS_PER_BYTE;
3960
3961 struct_bits_off = BTF_MEMBER_BIT_OFFSET(member->offset);
3962 nr_bits = BTF_MEMBER_BITFIELD_SIZE(member->offset);
3963 if (!nr_bits) {
3964 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
3965 btf_verifier_log_member(env, struct_type, member,
3966 "Member is not byte aligned");
3967 return -EINVAL;
3968 }
3969
3970 nr_bits = int_bitsize;
3971 } else if (nr_bits > int_bitsize) {
3972 btf_verifier_log_member(env, struct_type, member,
3973 "Invalid member bitfield_size");
3974 return -EINVAL;
3975 }
3976
3977 struct_size = struct_type->size;
3978 bytes_end = BITS_ROUNDUP_BYTES(struct_bits_off + nr_bits);
3979 if (struct_size < bytes_end) {
3980 btf_verifier_log_member(env, struct_type, member,
3981 "Member exceeds struct_size");
3982 return -EINVAL;
3983 }
3984
3985 return 0;
3986}
3987
3988static s32 btf_enum_check_meta(struct btf_verifier_env *env,
3989 const struct btf_type *t,
3990 u32 meta_left)
3991{
3992 const struct btf_enum *enums = btf_type_enum(t);
3993 struct btf *btf = env->btf;
3994 const char *fmt_str;
3995 u16 i, nr_enums;
3996 u32 meta_needed;
3997
3998 nr_enums = btf_type_vlen(t);
3999 meta_needed = nr_enums * sizeof(*enums);
4000
4001 if (meta_left < meta_needed) {
4002 btf_verifier_log_basic(env, t,
4003 "meta_left:%u meta_needed:%u",
4004 meta_left, meta_needed);
4005 return -EINVAL;
4006 }
4007
4008 if (t->size > 8 || !is_power_of_2(t->size)) {
4009 btf_verifier_log_type(env, t, "Unexpected size");
4010 return -EINVAL;
4011 }
4012
4013 /* enum type either no name or a valid one */
4014 if (t->name_off &&
4015 !btf_name_valid_identifier(env->btf, t->name_off)) {
4016 btf_verifier_log_type(env, t, "Invalid name");
4017 return -EINVAL;
4018 }
4019
4020 btf_verifier_log_type(env, t, NULL);
4021
4022 for (i = 0; i < nr_enums; i++) {
4023 if (!btf_name_offset_valid(btf, enums[i].name_off)) {
4024 btf_verifier_log(env, "\tInvalid name_offset:%u",
4025 enums[i].name_off);
4026 return -EINVAL;
4027 }
4028
4029 /* enum member must have a valid name */
4030 if (!enums[i].name_off ||
4031 !btf_name_valid_identifier(btf, enums[i].name_off)) {
4032 btf_verifier_log_type(env, t, "Invalid name");
4033 return -EINVAL;
4034 }
4035
4036 if (env->log.level == BPF_LOG_KERNEL)
4037 continue;
4038 fmt_str = btf_type_kflag(t) ? "\t%s val=%d\n" : "\t%s val=%u\n";
4039 btf_verifier_log(env, fmt_str,
4040 __btf_name_by_offset(btf, enums[i].name_off),
4041 enums[i].val);
4042 }
4043
4044 return meta_needed;
4045}
4046
4047static void btf_enum_log(struct btf_verifier_env *env,
4048 const struct btf_type *t)
4049{
4050 btf_verifier_log(env, "size=%u vlen=%u", t->size, btf_type_vlen(t));
4051}
4052
4053static void btf_enum_show(const struct btf *btf, const struct btf_type *t,
4054 u32 type_id, void *data, u8 bits_offset,
4055 struct btf_show *show)
4056{
4057 const struct btf_enum *enums = btf_type_enum(t);
4058 u32 i, nr_enums = btf_type_vlen(t);
4059 void *safe_data;
4060 int v;
4061
4062 safe_data = btf_show_start_type(show, t, type_id, data);
4063 if (!safe_data)
4064 return;
4065
4066 v = *(int *)safe_data;
4067
4068 for (i = 0; i < nr_enums; i++) {
4069 if (v != enums[i].val)
4070 continue;
4071
4072 btf_show_type_value(show, "%s",
4073 __btf_name_by_offset(btf,
4074 enums[i].name_off));
4075
4076 btf_show_end_type(show);
4077 return;
4078 }
4079
4080 if (btf_type_kflag(t))
4081 btf_show_type_value(show, "%d", v);
4082 else
4083 btf_show_type_value(show, "%u", v);
4084 btf_show_end_type(show);
4085}
4086
4087static struct btf_kind_operations enum_ops = {
4088 .check_meta = btf_enum_check_meta,
4089 .resolve = btf_df_resolve,
4090 .check_member = btf_enum_check_member,
4091 .check_kflag_member = btf_enum_check_kflag_member,
4092 .log_details = btf_enum_log,
4093 .show = btf_enum_show,
4094};
4095
4096static s32 btf_enum64_check_meta(struct btf_verifier_env *env,
4097 const struct btf_type *t,
4098 u32 meta_left)
4099{
4100 const struct btf_enum64 *enums = btf_type_enum64(t);
4101 struct btf *btf = env->btf;
4102 const char *fmt_str;
4103 u16 i, nr_enums;
4104 u32 meta_needed;
4105
4106 nr_enums = btf_type_vlen(t);
4107 meta_needed = nr_enums * sizeof(*enums);
4108
4109 if (meta_left < meta_needed) {
4110 btf_verifier_log_basic(env, t,
4111 "meta_left:%u meta_needed:%u",
4112 meta_left, meta_needed);
4113 return -EINVAL;
4114 }
4115
4116 if (t->size > 8 || !is_power_of_2(t->size)) {
4117 btf_verifier_log_type(env, t, "Unexpected size");
4118 return -EINVAL;
4119 }
4120
4121 /* enum type either no name or a valid one */
4122 if (t->name_off &&
4123 !btf_name_valid_identifier(env->btf, t->name_off)) {
4124 btf_verifier_log_type(env, t, "Invalid name");
4125 return -EINVAL;
4126 }
4127
4128 btf_verifier_log_type(env, t, NULL);
4129
4130 for (i = 0; i < nr_enums; i++) {
4131 if (!btf_name_offset_valid(btf, enums[i].name_off)) {
4132 btf_verifier_log(env, "\tInvalid name_offset:%u",
4133 enums[i].name_off);
4134 return -EINVAL;
4135 }
4136
4137 /* enum member must have a valid name */
4138 if (!enums[i].name_off ||
4139 !btf_name_valid_identifier(btf, enums[i].name_off)) {
4140 btf_verifier_log_type(env, t, "Invalid name");
4141 return -EINVAL;
4142 }
4143
4144 if (env->log.level == BPF_LOG_KERNEL)
4145 continue;
4146
4147 fmt_str = btf_type_kflag(t) ? "\t%s val=%lld\n" : "\t%s val=%llu\n";
4148 btf_verifier_log(env, fmt_str,
4149 __btf_name_by_offset(btf, enums[i].name_off),
4150 btf_enum64_value(enums + i));
4151 }
4152
4153 return meta_needed;
4154}
4155
4156static void btf_enum64_show(const struct btf *btf, const struct btf_type *t,
4157 u32 type_id, void *data, u8 bits_offset,
4158 struct btf_show *show)
4159{
4160 const struct btf_enum64 *enums = btf_type_enum64(t);
4161 u32 i, nr_enums = btf_type_vlen(t);
4162 void *safe_data;
4163 s64 v;
4164
4165 safe_data = btf_show_start_type(show, t, type_id, data);
4166 if (!safe_data)
4167 return;
4168
4169 v = *(u64 *)safe_data;
4170
4171 for (i = 0; i < nr_enums; i++) {
4172 if (v != btf_enum64_value(enums + i))
4173 continue;
4174
4175 btf_show_type_value(show, "%s",
4176 __btf_name_by_offset(btf,
4177 enums[i].name_off));
4178
4179 btf_show_end_type(show);
4180 return;
4181 }
4182
4183 if (btf_type_kflag(t))
4184 btf_show_type_value(show, "%lld", v);
4185 else
4186 btf_show_type_value(show, "%llu", v);
4187 btf_show_end_type(show);
4188}
4189
4190static struct btf_kind_operations enum64_ops = {
4191 .check_meta = btf_enum64_check_meta,
4192 .resolve = btf_df_resolve,
4193 .check_member = btf_enum_check_member,
4194 .check_kflag_member = btf_enum_check_kflag_member,
4195 .log_details = btf_enum_log,
4196 .show = btf_enum64_show,
4197};
4198
4199static s32 btf_func_proto_check_meta(struct btf_verifier_env *env,
4200 const struct btf_type *t,
4201 u32 meta_left)
4202{
4203 u32 meta_needed = btf_type_vlen(t) * sizeof(struct btf_param);
4204
4205 if (meta_left < meta_needed) {
4206 btf_verifier_log_basic(env, t,
4207 "meta_left:%u meta_needed:%u",
4208 meta_left, meta_needed);
4209 return -EINVAL;
4210 }
4211
4212 if (t->name_off) {
4213 btf_verifier_log_type(env, t, "Invalid name");
4214 return -EINVAL;
4215 }
4216
4217 if (btf_type_kflag(t)) {
4218 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
4219 return -EINVAL;
4220 }
4221
4222 btf_verifier_log_type(env, t, NULL);
4223
4224 return meta_needed;
4225}
4226
4227static void btf_func_proto_log(struct btf_verifier_env *env,
4228 const struct btf_type *t)
4229{
4230 const struct btf_param *args = (const struct btf_param *)(t + 1);
4231 u16 nr_args = btf_type_vlen(t), i;
4232
4233 btf_verifier_log(env, "return=%u args=(", t->type);
4234 if (!nr_args) {
4235 btf_verifier_log(env, "void");
4236 goto done;
4237 }
4238
4239 if (nr_args == 1 && !args[0].type) {
4240 /* Only one vararg */
4241 btf_verifier_log(env, "vararg");
4242 goto done;
4243 }
4244
4245 btf_verifier_log(env, "%u %s", args[0].type,
4246 __btf_name_by_offset(env->btf,
4247 args[0].name_off));
4248 for (i = 1; i < nr_args - 1; i++)
4249 btf_verifier_log(env, ", %u %s", args[i].type,
4250 __btf_name_by_offset(env->btf,
4251 args[i].name_off));
4252
4253 if (nr_args > 1) {
4254 const struct btf_param *last_arg = &args[nr_args - 1];
4255
4256 if (last_arg->type)
4257 btf_verifier_log(env, ", %u %s", last_arg->type,
4258 __btf_name_by_offset(env->btf,
4259 last_arg->name_off));
4260 else
4261 btf_verifier_log(env, ", vararg");
4262 }
4263
4264done:
4265 btf_verifier_log(env, ")");
4266}
4267
4268static struct btf_kind_operations func_proto_ops = {
4269 .check_meta = btf_func_proto_check_meta,
4270 .resolve = btf_df_resolve,
4271 /*
4272 * BTF_KIND_FUNC_PROTO cannot be directly referred by
4273 * a struct's member.
4274 *
4275 * It should be a function pointer instead.
4276 * (i.e. struct's member -> BTF_KIND_PTR -> BTF_KIND_FUNC_PROTO)
4277 *
4278 * Hence, there is no btf_func_check_member().
4279 */
4280 .check_member = btf_df_check_member,
4281 .check_kflag_member = btf_df_check_kflag_member,
4282 .log_details = btf_func_proto_log,
4283 .show = btf_df_show,
4284};
4285
4286static s32 btf_func_check_meta(struct btf_verifier_env *env,
4287 const struct btf_type *t,
4288 u32 meta_left)
4289{
4290 if (!t->name_off ||
4291 !btf_name_valid_identifier(env->btf, t->name_off)) {
4292 btf_verifier_log_type(env, t, "Invalid name");
4293 return -EINVAL;
4294 }
4295
4296 if (btf_type_vlen(t) > BTF_FUNC_GLOBAL) {
4297 btf_verifier_log_type(env, t, "Invalid func linkage");
4298 return -EINVAL;
4299 }
4300
4301 if (btf_type_kflag(t)) {
4302 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
4303 return -EINVAL;
4304 }
4305
4306 btf_verifier_log_type(env, t, NULL);
4307
4308 return 0;
4309}
4310
4311static int btf_func_resolve(struct btf_verifier_env *env,
4312 const struct resolve_vertex *v)
4313{
4314 const struct btf_type *t = v->t;
4315 u32 next_type_id = t->type;
4316 int err;
4317
4318 err = btf_func_check(env, t);
4319 if (err)
4320 return err;
4321
4322 env_stack_pop_resolved(env, next_type_id, 0);
4323 return 0;
4324}
4325
4326static struct btf_kind_operations func_ops = {
4327 .check_meta = btf_func_check_meta,
4328 .resolve = btf_func_resolve,
4329 .check_member = btf_df_check_member,
4330 .check_kflag_member = btf_df_check_kflag_member,
4331 .log_details = btf_ref_type_log,
4332 .show = btf_df_show,
4333};
4334
4335static s32 btf_var_check_meta(struct btf_verifier_env *env,
4336 const struct btf_type *t,
4337 u32 meta_left)
4338{
4339 const struct btf_var *var;
4340 u32 meta_needed = sizeof(*var);
4341
4342 if (meta_left < meta_needed) {
4343 btf_verifier_log_basic(env, t,
4344 "meta_left:%u meta_needed:%u",
4345 meta_left, meta_needed);
4346 return -EINVAL;
4347 }
4348
4349 if (btf_type_vlen(t)) {
4350 btf_verifier_log_type(env, t, "vlen != 0");
4351 return -EINVAL;
4352 }
4353
4354 if (btf_type_kflag(t)) {
4355 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
4356 return -EINVAL;
4357 }
4358
4359 if (!t->name_off ||
4360 !__btf_name_valid(env->btf, t->name_off, true)) {
4361 btf_verifier_log_type(env, t, "Invalid name");
4362 return -EINVAL;
4363 }
4364
4365 /* A var cannot be in type void */
4366 if (!t->type || !BTF_TYPE_ID_VALID(t->type)) {
4367 btf_verifier_log_type(env, t, "Invalid type_id");
4368 return -EINVAL;
4369 }
4370
4371 var = btf_type_var(t);
4372 if (var->linkage != BTF_VAR_STATIC &&
4373 var->linkage != BTF_VAR_GLOBAL_ALLOCATED) {
4374 btf_verifier_log_type(env, t, "Linkage not supported");
4375 return -EINVAL;
4376 }
4377
4378 btf_verifier_log_type(env, t, NULL);
4379
4380 return meta_needed;
4381}
4382
4383static void btf_var_log(struct btf_verifier_env *env, const struct btf_type *t)
4384{
4385 const struct btf_var *var = btf_type_var(t);
4386
4387 btf_verifier_log(env, "type_id=%u linkage=%u", t->type, var->linkage);
4388}
4389
4390static const struct btf_kind_operations var_ops = {
4391 .check_meta = btf_var_check_meta,
4392 .resolve = btf_var_resolve,
4393 .check_member = btf_df_check_member,
4394 .check_kflag_member = btf_df_check_kflag_member,
4395 .log_details = btf_var_log,
4396 .show = btf_var_show,
4397};
4398
4399static s32 btf_datasec_check_meta(struct btf_verifier_env *env,
4400 const struct btf_type *t,
4401 u32 meta_left)
4402{
4403 const struct btf_var_secinfo *vsi;
4404 u64 last_vsi_end_off = 0, sum = 0;
4405 u32 i, meta_needed;
4406
4407 meta_needed = btf_type_vlen(t) * sizeof(*vsi);
4408 if (meta_left < meta_needed) {
4409 btf_verifier_log_basic(env, t,
4410 "meta_left:%u meta_needed:%u",
4411 meta_left, meta_needed);
4412 return -EINVAL;
4413 }
4414
4415 if (!t->size) {
4416 btf_verifier_log_type(env, t, "size == 0");
4417 return -EINVAL;
4418 }
4419
4420 if (btf_type_kflag(t)) {
4421 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
4422 return -EINVAL;
4423 }
4424
4425 if (!t->name_off ||
4426 !btf_name_valid_section(env->btf, t->name_off)) {
4427 btf_verifier_log_type(env, t, "Invalid name");
4428 return -EINVAL;
4429 }
4430
4431 btf_verifier_log_type(env, t, NULL);
4432
4433 for_each_vsi(i, t, vsi) {
4434 /* A var cannot be in type void */
4435 if (!vsi->type || !BTF_TYPE_ID_VALID(vsi->type)) {
4436 btf_verifier_log_vsi(env, t, vsi,
4437 "Invalid type_id");
4438 return -EINVAL;
4439 }
4440
4441 if (vsi->offset < last_vsi_end_off || vsi->offset >= t->size) {
4442 btf_verifier_log_vsi(env, t, vsi,
4443 "Invalid offset");
4444 return -EINVAL;
4445 }
4446
4447 if (!vsi->size || vsi->size > t->size) {
4448 btf_verifier_log_vsi(env, t, vsi,
4449 "Invalid size");
4450 return -EINVAL;
4451 }
4452
4453 last_vsi_end_off = vsi->offset + vsi->size;
4454 if (last_vsi_end_off > t->size) {
4455 btf_verifier_log_vsi(env, t, vsi,
4456 "Invalid offset+size");
4457 return -EINVAL;
4458 }
4459
4460 btf_verifier_log_vsi(env, t, vsi, NULL);
4461 sum += vsi->size;
4462 }
4463
4464 if (t->size < sum) {
4465 btf_verifier_log_type(env, t, "Invalid btf_info size");
4466 return -EINVAL;
4467 }
4468
4469 return meta_needed;
4470}
4471
4472static int btf_datasec_resolve(struct btf_verifier_env *env,
4473 const struct resolve_vertex *v)
4474{
4475 const struct btf_var_secinfo *vsi;
4476 struct btf *btf = env->btf;
4477 u16 i;
4478
4479 for_each_vsi_from(i, v->next_member, v->t, vsi) {
4480 u32 var_type_id = vsi->type, type_id, type_size = 0;
4481 const struct btf_type *var_type = btf_type_by_id(env->btf,
4482 var_type_id);
4483 if (!var_type || !btf_type_is_var(var_type)) {
4484 btf_verifier_log_vsi(env, v->t, vsi,
4485 "Not a VAR kind member");
4486 return -EINVAL;
4487 }
4488
4489 if (!env_type_is_resolve_sink(env, var_type) &&
4490 !env_type_is_resolved(env, var_type_id)) {
4491 env_stack_set_next_member(env, i + 1);
4492 return env_stack_push(env, var_type, var_type_id);
4493 }
4494
4495 type_id = var_type->type;
4496 if (!btf_type_id_size(btf, &type_id, &type_size)) {
4497 btf_verifier_log_vsi(env, v->t, vsi, "Invalid type");
4498 return -EINVAL;
4499 }
4500
4501 if (vsi->size < type_size) {
4502 btf_verifier_log_vsi(env, v->t, vsi, "Invalid size");
4503 return -EINVAL;
4504 }
4505 }
4506
4507 env_stack_pop_resolved(env, 0, 0);
4508 return 0;
4509}
4510
4511static void btf_datasec_log(struct btf_verifier_env *env,
4512 const struct btf_type *t)
4513{
4514 btf_verifier_log(env, "size=%u vlen=%u", t->size, btf_type_vlen(t));
4515}
4516
4517static void btf_datasec_show(const struct btf *btf,
4518 const struct btf_type *t, u32 type_id,
4519 void *data, u8 bits_offset,
4520 struct btf_show *show)
4521{
4522 const struct btf_var_secinfo *vsi;
4523 const struct btf_type *var;
4524 u32 i;
4525
4526 if (!btf_show_start_type(show, t, type_id, data))
4527 return;
4528
4529 btf_show_type_value(show, "section (\"%s\") = {",
4530 __btf_name_by_offset(btf, t->name_off));
4531 for_each_vsi(i, t, vsi) {
4532 var = btf_type_by_id(btf, vsi->type);
4533 if (i)
4534 btf_show(show, ",");
4535 btf_type_ops(var)->show(btf, var, vsi->type,
4536 data + vsi->offset, bits_offset, show);
4537 }
4538 btf_show_end_type(show);
4539}
4540
4541static const struct btf_kind_operations datasec_ops = {
4542 .check_meta = btf_datasec_check_meta,
4543 .resolve = btf_datasec_resolve,
4544 .check_member = btf_df_check_member,
4545 .check_kflag_member = btf_df_check_kflag_member,
4546 .log_details = btf_datasec_log,
4547 .show = btf_datasec_show,
4548};
4549
4550static s32 btf_float_check_meta(struct btf_verifier_env *env,
4551 const struct btf_type *t,
4552 u32 meta_left)
4553{
4554 if (btf_type_vlen(t)) {
4555 btf_verifier_log_type(env, t, "vlen != 0");
4556 return -EINVAL;
4557 }
4558
4559 if (btf_type_kflag(t)) {
4560 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
4561 return -EINVAL;
4562 }
4563
4564 if (t->size != 2 && t->size != 4 && t->size != 8 && t->size != 12 &&
4565 t->size != 16) {
4566 btf_verifier_log_type(env, t, "Invalid type_size");
4567 return -EINVAL;
4568 }
4569
4570 btf_verifier_log_type(env, t, NULL);
4571
4572 return 0;
4573}
4574
4575static int btf_float_check_member(struct btf_verifier_env *env,
4576 const struct btf_type *struct_type,
4577 const struct btf_member *member,
4578 const struct btf_type *member_type)
4579{
4580 u64 start_offset_bytes;
4581 u64 end_offset_bytes;
4582 u64 misalign_bits;
4583 u64 align_bytes;
4584 u64 align_bits;
4585
4586 /* Different architectures have different alignment requirements, so
4587 * here we check only for the reasonable minimum. This way we ensure
4588 * that types after CO-RE can pass the kernel BTF verifier.
4589 */
4590 align_bytes = min_t(u64, sizeof(void *), member_type->size);
4591 align_bits = align_bytes * BITS_PER_BYTE;
4592 div64_u64_rem(member->offset, align_bits, &misalign_bits);
4593 if (misalign_bits) {
4594 btf_verifier_log_member(env, struct_type, member,
4595 "Member is not properly aligned");
4596 return -EINVAL;
4597 }
4598
4599 start_offset_bytes = member->offset / BITS_PER_BYTE;
4600 end_offset_bytes = start_offset_bytes + member_type->size;
4601 if (end_offset_bytes > struct_type->size) {
4602 btf_verifier_log_member(env, struct_type, member,
4603 "Member exceeds struct_size");
4604 return -EINVAL;
4605 }
4606
4607 return 0;
4608}
4609
4610static void btf_float_log(struct btf_verifier_env *env,
4611 const struct btf_type *t)
4612{
4613 btf_verifier_log(env, "size=%u", t->size);
4614}
4615
4616static const struct btf_kind_operations float_ops = {
4617 .check_meta = btf_float_check_meta,
4618 .resolve = btf_df_resolve,
4619 .check_member = btf_float_check_member,
4620 .check_kflag_member = btf_generic_check_kflag_member,
4621 .log_details = btf_float_log,
4622 .show = btf_df_show,
4623};
4624
4625static s32 btf_decl_tag_check_meta(struct btf_verifier_env *env,
4626 const struct btf_type *t,
4627 u32 meta_left)
4628{
4629 const struct btf_decl_tag *tag;
4630 u32 meta_needed = sizeof(*tag);
4631 s32 component_idx;
4632 const char *value;
4633
4634 if (meta_left < meta_needed) {
4635 btf_verifier_log_basic(env, t,
4636 "meta_left:%u meta_needed:%u",
4637 meta_left, meta_needed);
4638 return -EINVAL;
4639 }
4640
4641 value = btf_name_by_offset(env->btf, t->name_off);
4642 if (!value || !value[0]) {
4643 btf_verifier_log_type(env, t, "Invalid value");
4644 return -EINVAL;
4645 }
4646
4647 if (btf_type_vlen(t)) {
4648 btf_verifier_log_type(env, t, "vlen != 0");
4649 return -EINVAL;
4650 }
4651
4652 if (btf_type_kflag(t)) {
4653 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
4654 return -EINVAL;
4655 }
4656
4657 component_idx = btf_type_decl_tag(t)->component_idx;
4658 if (component_idx < -1) {
4659 btf_verifier_log_type(env, t, "Invalid component_idx");
4660 return -EINVAL;
4661 }
4662
4663 btf_verifier_log_type(env, t, NULL);
4664
4665 return meta_needed;
4666}
4667
4668static int btf_decl_tag_resolve(struct btf_verifier_env *env,
4669 const struct resolve_vertex *v)
4670{
4671 const struct btf_type *next_type;
4672 const struct btf_type *t = v->t;
4673 u32 next_type_id = t->type;
4674 struct btf *btf = env->btf;
4675 s32 component_idx;
4676 u32 vlen;
4677
4678 next_type = btf_type_by_id(btf, next_type_id);
4679 if (!next_type || !btf_type_is_decl_tag_target(next_type)) {
4680 btf_verifier_log_type(env, v->t, "Invalid type_id");
4681 return -EINVAL;
4682 }
4683
4684 if (!env_type_is_resolve_sink(env, next_type) &&
4685 !env_type_is_resolved(env, next_type_id))
4686 return env_stack_push(env, next_type, next_type_id);
4687
4688 component_idx = btf_type_decl_tag(t)->component_idx;
4689 if (component_idx != -1) {
4690 if (btf_type_is_var(next_type) || btf_type_is_typedef(next_type)) {
4691 btf_verifier_log_type(env, v->t, "Invalid component_idx");
4692 return -EINVAL;
4693 }
4694
4695 if (btf_type_is_struct(next_type)) {
4696 vlen = btf_type_vlen(next_type);
4697 } else {
4698 /* next_type should be a function */
4699 next_type = btf_type_by_id(btf, next_type->type);
4700 vlen = btf_type_vlen(next_type);
4701 }
4702
4703 if ((u32)component_idx >= vlen) {
4704 btf_verifier_log_type(env, v->t, "Invalid component_idx");
4705 return -EINVAL;
4706 }
4707 }
4708
4709 env_stack_pop_resolved(env, next_type_id, 0);
4710
4711 return 0;
4712}
4713
4714static void btf_decl_tag_log(struct btf_verifier_env *env, const struct btf_type *t)
4715{
4716 btf_verifier_log(env, "type=%u component_idx=%d", t->type,
4717 btf_type_decl_tag(t)->component_idx);
4718}
4719
4720static const struct btf_kind_operations decl_tag_ops = {
4721 .check_meta = btf_decl_tag_check_meta,
4722 .resolve = btf_decl_tag_resolve,
4723 .check_member = btf_df_check_member,
4724 .check_kflag_member = btf_df_check_kflag_member,
4725 .log_details = btf_decl_tag_log,
4726 .show = btf_df_show,
4727};
4728
4729static int btf_func_proto_check(struct btf_verifier_env *env,
4730 const struct btf_type *t)
4731{
4732 const struct btf_type *ret_type;
4733 const struct btf_param *args;
4734 const struct btf *btf;
4735 u16 nr_args, i;
4736 int err;
4737
4738 btf = env->btf;
4739 args = (const struct btf_param *)(t + 1);
4740 nr_args = btf_type_vlen(t);
4741
4742 /* Check func return type which could be "void" (t->type == 0) */
4743 if (t->type) {
4744 u32 ret_type_id = t->type;
4745
4746 ret_type = btf_type_by_id(btf, ret_type_id);
4747 if (!ret_type) {
4748 btf_verifier_log_type(env, t, "Invalid return type");
4749 return -EINVAL;
4750 }
4751
4752 if (btf_type_is_resolve_source_only(ret_type)) {
4753 btf_verifier_log_type(env, t, "Invalid return type");
4754 return -EINVAL;
4755 }
4756
4757 if (btf_type_needs_resolve(ret_type) &&
4758 !env_type_is_resolved(env, ret_type_id)) {
4759 err = btf_resolve(env, ret_type, ret_type_id);
4760 if (err)
4761 return err;
4762 }
4763
4764 /* Ensure the return type is a type that has a size */
4765 if (!btf_type_id_size(btf, &ret_type_id, NULL)) {
4766 btf_verifier_log_type(env, t, "Invalid return type");
4767 return -EINVAL;
4768 }
4769 }
4770
4771 if (!nr_args)
4772 return 0;
4773
4774 /* Last func arg type_id could be 0 if it is a vararg */
4775 if (!args[nr_args - 1].type) {
4776 if (args[nr_args - 1].name_off) {
4777 btf_verifier_log_type(env, t, "Invalid arg#%u",
4778 nr_args);
4779 return -EINVAL;
4780 }
4781 nr_args--;
4782 }
4783
4784 for (i = 0; i < nr_args; i++) {
4785 const struct btf_type *arg_type;
4786 u32 arg_type_id;
4787
4788 arg_type_id = args[i].type;
4789 arg_type = btf_type_by_id(btf, arg_type_id);
4790 if (!arg_type) {
4791 btf_verifier_log_type(env, t, "Invalid arg#%u", i + 1);
4792 return -EINVAL;
4793 }
4794
4795 if (btf_type_is_resolve_source_only(arg_type)) {
4796 btf_verifier_log_type(env, t, "Invalid arg#%u", i + 1);
4797 return -EINVAL;
4798 }
4799
4800 if (args[i].name_off &&
4801 (!btf_name_offset_valid(btf, args[i].name_off) ||
4802 !btf_name_valid_identifier(btf, args[i].name_off))) {
4803 btf_verifier_log_type(env, t,
4804 "Invalid arg#%u", i + 1);
4805 return -EINVAL;
4806 }
4807
4808 if (btf_type_needs_resolve(arg_type) &&
4809 !env_type_is_resolved(env, arg_type_id)) {
4810 err = btf_resolve(env, arg_type, arg_type_id);
4811 if (err)
4812 return err;
4813 }
4814
4815 if (!btf_type_id_size(btf, &arg_type_id, NULL)) {
4816 btf_verifier_log_type(env, t, "Invalid arg#%u", i + 1);
4817 return -EINVAL;
4818 }
4819 }
4820
4821 return 0;
4822}
4823
4824static int btf_func_check(struct btf_verifier_env *env,
4825 const struct btf_type *t)
4826{
4827 const struct btf_type *proto_type;
4828 const struct btf_param *args;
4829 const struct btf *btf;
4830 u16 nr_args, i;
4831
4832 btf = env->btf;
4833 proto_type = btf_type_by_id(btf, t->type);
4834
4835 if (!proto_type || !btf_type_is_func_proto(proto_type)) {
4836 btf_verifier_log_type(env, t, "Invalid type_id");
4837 return -EINVAL;
4838 }
4839
4840 args = (const struct btf_param *)(proto_type + 1);
4841 nr_args = btf_type_vlen(proto_type);
4842 for (i = 0; i < nr_args; i++) {
4843 if (!args[i].name_off && args[i].type) {
4844 btf_verifier_log_type(env, t, "Invalid arg#%u", i + 1);
4845 return -EINVAL;
4846 }
4847 }
4848
4849 return 0;
4850}
4851
4852static const struct btf_kind_operations * const kind_ops[NR_BTF_KINDS] = {
4853 [BTF_KIND_INT] = &int_ops,
4854 [BTF_KIND_PTR] = &ptr_ops,
4855 [BTF_KIND_ARRAY] = &array_ops,
4856 [BTF_KIND_STRUCT] = &struct_ops,
4857 [BTF_KIND_UNION] = &struct_ops,
4858 [BTF_KIND_ENUM] = &enum_ops,
4859 [BTF_KIND_FWD] = &fwd_ops,
4860 [BTF_KIND_TYPEDEF] = &modifier_ops,
4861 [BTF_KIND_VOLATILE] = &modifier_ops,
4862 [BTF_KIND_CONST] = &modifier_ops,
4863 [BTF_KIND_RESTRICT] = &modifier_ops,
4864 [BTF_KIND_FUNC] = &func_ops,
4865 [BTF_KIND_FUNC_PROTO] = &func_proto_ops,
4866 [BTF_KIND_VAR] = &var_ops,
4867 [BTF_KIND_DATASEC] = &datasec_ops,
4868 [BTF_KIND_FLOAT] = &float_ops,
4869 [BTF_KIND_DECL_TAG] = &decl_tag_ops,
4870 [BTF_KIND_TYPE_TAG] = &modifier_ops,
4871 [BTF_KIND_ENUM64] = &enum64_ops,
4872};
4873
4874static s32 btf_check_meta(struct btf_verifier_env *env,
4875 const struct btf_type *t,
4876 u32 meta_left)
4877{
4878 u32 saved_meta_left = meta_left;
4879 s32 var_meta_size;
4880
4881 if (meta_left < sizeof(*t)) {
4882 btf_verifier_log(env, "[%u] meta_left:%u meta_needed:%zu",
4883 env->log_type_id, meta_left, sizeof(*t));
4884 return -EINVAL;
4885 }
4886 meta_left -= sizeof(*t);
4887
4888 if (t->info & ~BTF_INFO_MASK) {
4889 btf_verifier_log(env, "[%u] Invalid btf_info:%x",
4890 env->log_type_id, t->info);
4891 return -EINVAL;
4892 }
4893
4894 if (BTF_INFO_KIND(t->info) > BTF_KIND_MAX ||
4895 BTF_INFO_KIND(t->info) == BTF_KIND_UNKN) {
4896 btf_verifier_log(env, "[%u] Invalid kind:%u",
4897 env->log_type_id, BTF_INFO_KIND(t->info));
4898 return -EINVAL;
4899 }
4900
4901 if (!btf_name_offset_valid(env->btf, t->name_off)) {
4902 btf_verifier_log(env, "[%u] Invalid name_offset:%u",
4903 env->log_type_id, t->name_off);
4904 return -EINVAL;
4905 }
4906
4907 var_meta_size = btf_type_ops(t)->check_meta(env, t, meta_left);
4908 if (var_meta_size < 0)
4909 return var_meta_size;
4910
4911 meta_left -= var_meta_size;
4912
4913 return saved_meta_left - meta_left;
4914}
4915
4916static int btf_check_all_metas(struct btf_verifier_env *env)
4917{
4918 struct btf *btf = env->btf;
4919 struct btf_header *hdr;
4920 void *cur, *end;
4921
4922 hdr = &btf->hdr;
4923 cur = btf->nohdr_data + hdr->type_off;
4924 end = cur + hdr->type_len;
4925
4926 env->log_type_id = btf->base_btf ? btf->start_id : 1;
4927 while (cur < end) {
4928 struct btf_type *t = cur;
4929 s32 meta_size;
4930
4931 meta_size = btf_check_meta(env, t, end - cur);
4932 if (meta_size < 0)
4933 return meta_size;
4934
4935 btf_add_type(env, t);
4936 cur += meta_size;
4937 env->log_type_id++;
4938 }
4939
4940 return 0;
4941}
4942
4943static bool btf_resolve_valid(struct btf_verifier_env *env,
4944 const struct btf_type *t,
4945 u32 type_id)
4946{
4947 struct btf *btf = env->btf;
4948
4949 if (!env_type_is_resolved(env, type_id))
4950 return false;
4951
4952 if (btf_type_is_struct(t) || btf_type_is_datasec(t))
4953 return !btf_resolved_type_id(btf, type_id) &&
4954 !btf_resolved_type_size(btf, type_id);
4955
4956 if (btf_type_is_decl_tag(t) || btf_type_is_func(t))
4957 return btf_resolved_type_id(btf, type_id) &&
4958 !btf_resolved_type_size(btf, type_id);
4959
4960 if (btf_type_is_modifier(t) || btf_type_is_ptr(t) ||
4961 btf_type_is_var(t)) {
4962 t = btf_type_id_resolve(btf, &type_id);
4963 return t &&
4964 !btf_type_is_modifier(t) &&
4965 !btf_type_is_var(t) &&
4966 !btf_type_is_datasec(t);
4967 }
4968
4969 if (btf_type_is_array(t)) {
4970 const struct btf_array *array = btf_type_array(t);
4971 const struct btf_type *elem_type;
4972 u32 elem_type_id = array->type;
4973 u32 elem_size;
4974
4975 elem_type = btf_type_id_size(btf, &elem_type_id, &elem_size);
4976 return elem_type && !btf_type_is_modifier(elem_type) &&
4977 (array->nelems * elem_size ==
4978 btf_resolved_type_size(btf, type_id));
4979 }
4980
4981 return false;
4982}
4983
4984static int btf_resolve(struct btf_verifier_env *env,
4985 const struct btf_type *t, u32 type_id)
4986{
4987 u32 save_log_type_id = env->log_type_id;
4988 const struct resolve_vertex *v;
4989 int err = 0;
4990
4991 env->resolve_mode = RESOLVE_TBD;
4992 env_stack_push(env, t, type_id);
4993 while (!err && (v = env_stack_peak(env))) {
4994 env->log_type_id = v->type_id;
4995 err = btf_type_ops(v->t)->resolve(env, v);
4996 }
4997
4998 env->log_type_id = type_id;
4999 if (err == -E2BIG) {
5000 btf_verifier_log_type(env, t,
5001 "Exceeded max resolving depth:%u",
5002 MAX_RESOLVE_DEPTH);
5003 } else if (err == -EEXIST) {
5004 btf_verifier_log_type(env, t, "Loop detected");
5005 }
5006
5007 /* Final sanity check */
5008 if (!err && !btf_resolve_valid(env, t, type_id)) {
5009 btf_verifier_log_type(env, t, "Invalid resolve state");
5010 err = -EINVAL;
5011 }
5012
5013 env->log_type_id = save_log_type_id;
5014 return err;
5015}
5016
5017static int btf_check_all_types(struct btf_verifier_env *env)
5018{
5019 struct btf *btf = env->btf;
5020 const struct btf_type *t;
5021 u32 type_id, i;
5022 int err;
5023
5024 err = env_resolve_init(env);
5025 if (err)
5026 return err;
5027
5028 env->phase++;
5029 for (i = btf->base_btf ? 0 : 1; i < btf->nr_types; i++) {
5030 type_id = btf->start_id + i;
5031 t = btf_type_by_id(btf, type_id);
5032
5033 env->log_type_id = type_id;
5034 if (btf_type_needs_resolve(t) &&
5035 !env_type_is_resolved(env, type_id)) {
5036 err = btf_resolve(env, t, type_id);
5037 if (err)
5038 return err;
5039 }
5040
5041 if (btf_type_is_func_proto(t)) {
5042 err = btf_func_proto_check(env, t);
5043 if (err)
5044 return err;
5045 }
5046 }
5047
5048 return 0;
5049}
5050
5051static int btf_parse_type_sec(struct btf_verifier_env *env)
5052{
5053 const struct btf_header *hdr = &env->btf->hdr;
5054 int err;
5055
5056 /* Type section must align to 4 bytes */
5057 if (hdr->type_off & (sizeof(u32) - 1)) {
5058 btf_verifier_log(env, "Unaligned type_off");
5059 return -EINVAL;
5060 }
5061
5062 if (!env->btf->base_btf && !hdr->type_len) {
5063 btf_verifier_log(env, "No type found");
5064 return -EINVAL;
5065 }
5066
5067 err = btf_check_all_metas(env);
5068 if (err)
5069 return err;
5070
5071 return btf_check_all_types(env);
5072}
5073
5074static int btf_parse_str_sec(struct btf_verifier_env *env)
5075{
5076 const struct btf_header *hdr;
5077 struct btf *btf = env->btf;
5078 const char *start, *end;
5079
5080 hdr = &btf->hdr;
5081 start = btf->nohdr_data + hdr->str_off;
5082 end = start + hdr->str_len;
5083
5084 if (end != btf->data + btf->data_size) {
5085 btf_verifier_log(env, "String section is not at the end");
5086 return -EINVAL;
5087 }
5088
5089 btf->strings = start;
5090
5091 if (btf->base_btf && !hdr->str_len)
5092 return 0;
5093 if (!hdr->str_len || hdr->str_len - 1 > BTF_MAX_NAME_OFFSET || end[-1]) {
5094 btf_verifier_log(env, "Invalid string section");
5095 return -EINVAL;
5096 }
5097 if (!btf->base_btf && start[0]) {
5098 btf_verifier_log(env, "Invalid string section");
5099 return -EINVAL;
5100 }
5101
5102 return 0;
5103}
5104
5105static const size_t btf_sec_info_offset[] = {
5106 offsetof(struct btf_header, type_off),
5107 offsetof(struct btf_header, str_off),
5108};
5109
5110static int btf_sec_info_cmp(const void *a, const void *b)
5111{
5112 const struct btf_sec_info *x = a;
5113 const struct btf_sec_info *y = b;
5114
5115 return (int)(x->off - y->off) ? : (int)(x->len - y->len);
5116}
5117
5118static int btf_check_sec_info(struct btf_verifier_env *env,
5119 u32 btf_data_size)
5120{
5121 struct btf_sec_info secs[ARRAY_SIZE(btf_sec_info_offset)];
5122 u32 total, expected_total, i;
5123 const struct btf_header *hdr;
5124 const struct btf *btf;
5125
5126 btf = env->btf;
5127 hdr = &btf->hdr;
5128
5129 /* Populate the secs from hdr */
5130 for (i = 0; i < ARRAY_SIZE(btf_sec_info_offset); i++)
5131 secs[i] = *(struct btf_sec_info *)((void *)hdr +
5132 btf_sec_info_offset[i]);
5133
5134 sort(secs, ARRAY_SIZE(btf_sec_info_offset),
5135 sizeof(struct btf_sec_info), btf_sec_info_cmp, NULL);
5136
5137 /* Check for gaps and overlap among sections */
5138 total = 0;
5139 expected_total = btf_data_size - hdr->hdr_len;
5140 for (i = 0; i < ARRAY_SIZE(btf_sec_info_offset); i++) {
5141 if (expected_total < secs[i].off) {
5142 btf_verifier_log(env, "Invalid section offset");
5143 return -EINVAL;
5144 }
5145 if (total < secs[i].off) {
5146 /* gap */
5147 btf_verifier_log(env, "Unsupported section found");
5148 return -EINVAL;
5149 }
5150 if (total > secs[i].off) {
5151 btf_verifier_log(env, "Section overlap found");
5152 return -EINVAL;
5153 }
5154 if (expected_total - total < secs[i].len) {
5155 btf_verifier_log(env,
5156 "Total section length too long");
5157 return -EINVAL;
5158 }
5159 total += secs[i].len;
5160 }
5161
5162 /* There is data other than hdr and known sections */
5163 if (expected_total != total) {
5164 btf_verifier_log(env, "Unsupported section found");
5165 return -EINVAL;
5166 }
5167
5168 return 0;
5169}
5170
5171static int btf_parse_hdr(struct btf_verifier_env *env)
5172{
5173 u32 hdr_len, hdr_copy, btf_data_size;
5174 const struct btf_header *hdr;
5175 struct btf *btf;
5176
5177 btf = env->btf;
5178 btf_data_size = btf->data_size;
5179
5180 if (btf_data_size < offsetofend(struct btf_header, hdr_len)) {
5181 btf_verifier_log(env, "hdr_len not found");
5182 return -EINVAL;
5183 }
5184
5185 hdr = btf->data;
5186 hdr_len = hdr->hdr_len;
5187 if (btf_data_size < hdr_len) {
5188 btf_verifier_log(env, "btf_header not found");
5189 return -EINVAL;
5190 }
5191
5192 /* Ensure the unsupported header fields are zero */
5193 if (hdr_len > sizeof(btf->hdr)) {
5194 u8 *expected_zero = btf->data + sizeof(btf->hdr);
5195 u8 *end = btf->data + hdr_len;
5196
5197 for (; expected_zero < end; expected_zero++) {
5198 if (*expected_zero) {
5199 btf_verifier_log(env, "Unsupported btf_header");
5200 return -E2BIG;
5201 }
5202 }
5203 }
5204
5205 hdr_copy = min_t(u32, hdr_len, sizeof(btf->hdr));
5206 memcpy(&btf->hdr, btf->data, hdr_copy);
5207
5208 hdr = &btf->hdr;
5209
5210 btf_verifier_log_hdr(env, btf_data_size);
5211
5212 if (hdr->magic != BTF_MAGIC) {
5213 btf_verifier_log(env, "Invalid magic");
5214 return -EINVAL;
5215 }
5216
5217 if (hdr->version != BTF_VERSION) {
5218 btf_verifier_log(env, "Unsupported version");
5219 return -ENOTSUPP;
5220 }
5221
5222 if (hdr->flags) {
5223 btf_verifier_log(env, "Unsupported flags");
5224 return -ENOTSUPP;
5225 }
5226
5227 if (!btf->base_btf && btf_data_size == hdr->hdr_len) {
5228 btf_verifier_log(env, "No data");
5229 return -EINVAL;
5230 }
5231
5232 return btf_check_sec_info(env, btf_data_size);
5233}
5234
5235static const char *alloc_obj_fields[] = {
5236 "bpf_spin_lock",
5237 "bpf_list_head",
5238 "bpf_list_node",
5239};
5240
5241static struct btf_struct_metas *
5242btf_parse_struct_metas(struct bpf_verifier_log *log, struct btf *btf)
5243{
5244 union {
5245 struct btf_id_set set;
5246 struct {
5247 u32 _cnt;
5248 u32 _ids[ARRAY_SIZE(alloc_obj_fields)];
5249 } _arr;
5250 } aof;
5251 struct btf_struct_metas *tab = NULL;
5252 int i, n, id, ret;
5253
5254 BUILD_BUG_ON(offsetof(struct btf_id_set, cnt) != 0);
5255 BUILD_BUG_ON(sizeof(struct btf_id_set) != sizeof(u32));
5256
5257 memset(&aof, 0, sizeof(aof));
5258 for (i = 0; i < ARRAY_SIZE(alloc_obj_fields); i++) {
5259 /* Try to find whether this special type exists in user BTF, and
5260 * if so remember its ID so we can easily find it among members
5261 * of structs that we iterate in the next loop.
5262 */
5263 id = btf_find_by_name_kind(btf, alloc_obj_fields[i], BTF_KIND_STRUCT);
5264 if (id < 0)
5265 continue;
5266 aof.set.ids[aof.set.cnt++] = id;
5267 }
5268
5269 if (!aof.set.cnt)
5270 return NULL;
5271 sort(&aof.set.ids, aof.set.cnt, sizeof(aof.set.ids[0]), btf_id_cmp_func, NULL);
5272
5273 n = btf_nr_types(btf);
5274 for (i = 1; i < n; i++) {
5275 struct btf_struct_metas *new_tab;
5276 const struct btf_member *member;
5277 struct btf_field_offs *foffs;
5278 struct btf_struct_meta *type;
5279 struct btf_record *record;
5280 const struct btf_type *t;
5281 int j, tab_cnt;
5282
5283 t = btf_type_by_id(btf, i);
5284 if (!t) {
5285 ret = -EINVAL;
5286 goto free;
5287 }
5288 if (!__btf_type_is_struct(t))
5289 continue;
5290
5291 cond_resched();
5292
5293 for_each_member(j, t, member) {
5294 if (btf_id_set_contains(&aof.set, member->type))
5295 goto parse;
5296 }
5297 continue;
5298 parse:
5299 tab_cnt = tab ? tab->cnt : 0;
5300 new_tab = krealloc(tab, offsetof(struct btf_struct_metas, types[tab_cnt + 1]),
5301 GFP_KERNEL | __GFP_NOWARN);
5302 if (!new_tab) {
5303 ret = -ENOMEM;
5304 goto free;
5305 }
5306 if (!tab)
5307 new_tab->cnt = 0;
5308 tab = new_tab;
5309
5310 type = &tab->types[tab->cnt];
5311 type->btf_id = i;
5312 record = btf_parse_fields(btf, t, BPF_SPIN_LOCK | BPF_LIST_HEAD | BPF_LIST_NODE, t->size);
5313 /* The record cannot be unset, treat it as an error if so */
5314 if (IS_ERR_OR_NULL(record)) {
5315 ret = PTR_ERR_OR_ZERO(record) ?: -EFAULT;
5316 goto free;
5317 }
5318 foffs = btf_parse_field_offs(record);
5319 /* We need the field_offs to be valid for a valid record,
5320 * either both should be set or both should be unset.
5321 */
5322 if (IS_ERR_OR_NULL(foffs)) {
5323 btf_record_free(record);
5324 ret = -EFAULT;
5325 goto free;
5326 }
5327 type->record = record;
5328 type->field_offs = foffs;
5329 tab->cnt++;
5330 }
5331 return tab;
5332free:
5333 btf_struct_metas_free(tab);
5334 return ERR_PTR(ret);
5335}
5336
5337struct btf_struct_meta *btf_find_struct_meta(const struct btf *btf, u32 btf_id)
5338{
5339 struct btf_struct_metas *tab;
5340
5341 BUILD_BUG_ON(offsetof(struct btf_struct_meta, btf_id) != 0);
5342 tab = btf->struct_meta_tab;
5343 if (!tab)
5344 return NULL;
5345 return bsearch(&btf_id, tab->types, tab->cnt, sizeof(tab->types[0]), btf_id_cmp_func);
5346}
5347
5348static int btf_check_type_tags(struct btf_verifier_env *env,
5349 struct btf *btf, int start_id)
5350{
5351 int i, n, good_id = start_id - 1;
5352 bool in_tags;
5353
5354 n = btf_nr_types(btf);
5355 for (i = start_id; i < n; i++) {
5356 const struct btf_type *t;
5357 int chain_limit = 32;
5358 u32 cur_id = i;
5359
5360 t = btf_type_by_id(btf, i);
5361 if (!t)
5362 return -EINVAL;
5363 if (!btf_type_is_modifier(t))
5364 continue;
5365
5366 cond_resched();
5367
5368 in_tags = btf_type_is_type_tag(t);
5369 while (btf_type_is_modifier(t)) {
5370 if (!chain_limit--) {
5371 btf_verifier_log(env, "Max chain length or cycle detected");
5372 return -ELOOP;
5373 }
5374 if (btf_type_is_type_tag(t)) {
5375 if (!in_tags) {
5376 btf_verifier_log(env, "Type tags don't precede modifiers");
5377 return -EINVAL;
5378 }
5379 } else if (in_tags) {
5380 in_tags = false;
5381 }
5382 if (cur_id <= good_id)
5383 break;
5384 /* Move to next type */
5385 cur_id = t->type;
5386 t = btf_type_by_id(btf, cur_id);
5387 if (!t)
5388 return -EINVAL;
5389 }
5390 good_id = i;
5391 }
5392 return 0;
5393}
5394
5395static struct btf *btf_parse(bpfptr_t btf_data, u32 btf_data_size,
5396 u32 log_level, char __user *log_ubuf, u32 log_size)
5397{
5398 struct btf_struct_metas *struct_meta_tab;
5399 struct btf_verifier_env *env = NULL;
5400 struct bpf_verifier_log *log;
5401 struct btf *btf = NULL;
5402 u8 *data;
5403 int err;
5404
5405 if (btf_data_size > BTF_MAX_SIZE)
5406 return ERR_PTR(-E2BIG);
5407
5408 env = kzalloc(sizeof(*env), GFP_KERNEL | __GFP_NOWARN);
5409 if (!env)
5410 return ERR_PTR(-ENOMEM);
5411
5412 log = &env->log;
5413 if (log_level || log_ubuf || log_size) {
5414 /* user requested verbose verifier output
5415 * and supplied buffer to store the verification trace
5416 */
5417 log->level = log_level;
5418 log->ubuf = log_ubuf;
5419 log->len_total = log_size;
5420
5421 /* log attributes have to be sane */
5422 if (!bpf_verifier_log_attr_valid(log)) {
5423 err = -EINVAL;
5424 goto errout;
5425 }
5426 }
5427
5428 btf = kzalloc(sizeof(*btf), GFP_KERNEL | __GFP_NOWARN);
5429 if (!btf) {
5430 err = -ENOMEM;
5431 goto errout;
5432 }
5433 env->btf = btf;
5434
5435 data = kvmalloc(btf_data_size, GFP_KERNEL | __GFP_NOWARN);
5436 if (!data) {
5437 err = -ENOMEM;
5438 goto errout;
5439 }
5440
5441 btf->data = data;
5442 btf->data_size = btf_data_size;
5443
5444 if (copy_from_bpfptr(data, btf_data, btf_data_size)) {
5445 err = -EFAULT;
5446 goto errout;
5447 }
5448
5449 err = btf_parse_hdr(env);
5450 if (err)
5451 goto errout;
5452
5453 btf->nohdr_data = btf->data + btf->hdr.hdr_len;
5454
5455 err = btf_parse_str_sec(env);
5456 if (err)
5457 goto errout;
5458
5459 err = btf_parse_type_sec(env);
5460 if (err)
5461 goto errout;
5462
5463 err = btf_check_type_tags(env, btf, 1);
5464 if (err)
5465 goto errout;
5466
5467 struct_meta_tab = btf_parse_struct_metas(log, btf);
5468 if (IS_ERR(struct_meta_tab)) {
5469 err = PTR_ERR(struct_meta_tab);
5470 goto errout;
5471 }
5472 btf->struct_meta_tab = struct_meta_tab;
5473
5474 if (struct_meta_tab) {
5475 int i;
5476
5477 for (i = 0; i < struct_meta_tab->cnt; i++) {
5478 err = btf_check_and_fixup_fields(btf, struct_meta_tab->types[i].record);
5479 if (err < 0)
5480 goto errout_meta;
5481 }
5482 }
5483
5484 if (log->level && bpf_verifier_log_full(log)) {
5485 err = -ENOSPC;
5486 goto errout_meta;
5487 }
5488
5489 btf_verifier_env_free(env);
5490 refcount_set(&btf->refcnt, 1);
5491 return btf;
5492
5493errout_meta:
5494 btf_free_struct_meta_tab(btf);
5495errout:
5496 btf_verifier_env_free(env);
5497 if (btf)
5498 btf_free(btf);
5499 return ERR_PTR(err);
5500}
5501
5502extern char __weak __start_BTF[];
5503extern char __weak __stop_BTF[];
5504extern struct btf *btf_vmlinux;
5505
5506#define BPF_MAP_TYPE(_id, _ops)
5507#define BPF_LINK_TYPE(_id, _name)
5508static union {
5509 struct bpf_ctx_convert {
5510#define BPF_PROG_TYPE(_id, _name, prog_ctx_type, kern_ctx_type) \
5511 prog_ctx_type _id##_prog; \
5512 kern_ctx_type _id##_kern;
5513#include <linux/bpf_types.h>
5514#undef BPF_PROG_TYPE
5515 } *__t;
5516 /* 't' is written once under lock. Read many times. */
5517 const struct btf_type *t;
5518} bpf_ctx_convert;
5519enum {
5520#define BPF_PROG_TYPE(_id, _name, prog_ctx_type, kern_ctx_type) \
5521 __ctx_convert##_id,
5522#include <linux/bpf_types.h>
5523#undef BPF_PROG_TYPE
5524 __ctx_convert_unused, /* to avoid empty enum in extreme .config */
5525};
5526static u8 bpf_ctx_convert_map[] = {
5527#define BPF_PROG_TYPE(_id, _name, prog_ctx_type, kern_ctx_type) \
5528 [_id] = __ctx_convert##_id,
5529#include <linux/bpf_types.h>
5530#undef BPF_PROG_TYPE
5531 0, /* avoid empty array */
5532};
5533#undef BPF_MAP_TYPE
5534#undef BPF_LINK_TYPE
5535
5536const struct btf_member *
5537btf_get_prog_ctx_type(struct bpf_verifier_log *log, const struct btf *btf,
5538 const struct btf_type *t, enum bpf_prog_type prog_type,
5539 int arg)
5540{
5541 const struct btf_type *conv_struct;
5542 const struct btf_type *ctx_struct;
5543 const struct btf_member *ctx_type;
5544 const char *tname, *ctx_tname;
5545
5546 conv_struct = bpf_ctx_convert.t;
5547 if (!conv_struct) {
5548 bpf_log(log, "btf_vmlinux is malformed\n");
5549 return NULL;
5550 }
5551 t = btf_type_by_id(btf, t->type);
5552 while (btf_type_is_modifier(t))
5553 t = btf_type_by_id(btf, t->type);
5554 if (!btf_type_is_struct(t)) {
5555 /* Only pointer to struct is supported for now.
5556 * That means that BPF_PROG_TYPE_TRACEPOINT with BTF
5557 * is not supported yet.
5558 * BPF_PROG_TYPE_RAW_TRACEPOINT is fine.
5559 */
5560 return NULL;
5561 }
5562 tname = btf_name_by_offset(btf, t->name_off);
5563 if (!tname) {
5564 bpf_log(log, "arg#%d struct doesn't have a name\n", arg);
5565 return NULL;
5566 }
5567 /* prog_type is valid bpf program type. No need for bounds check. */
5568 ctx_type = btf_type_member(conv_struct) + bpf_ctx_convert_map[prog_type] * 2;
5569 /* ctx_struct is a pointer to prog_ctx_type in vmlinux.
5570 * Like 'struct __sk_buff'
5571 */
5572 ctx_struct = btf_type_by_id(btf_vmlinux, ctx_type->type);
5573 if (!ctx_struct)
5574 /* should not happen */
5575 return NULL;
5576 ctx_tname = btf_name_by_offset(btf_vmlinux, ctx_struct->name_off);
5577 if (!ctx_tname) {
5578 /* should not happen */
5579 bpf_log(log, "Please fix kernel include/linux/bpf_types.h\n");
5580 return NULL;
5581 }
5582 /* only compare that prog's ctx type name is the same as
5583 * kernel expects. No need to compare field by field.
5584 * It's ok for bpf prog to do:
5585 * struct __sk_buff {};
5586 * int socket_filter_bpf_prog(struct __sk_buff *skb)
5587 * { // no fields of skb are ever used }
5588 */
5589 if (strcmp(ctx_tname, tname))
5590 return NULL;
5591 return ctx_type;
5592}
5593
5594static int btf_translate_to_vmlinux(struct bpf_verifier_log *log,
5595 struct btf *btf,
5596 const struct btf_type *t,
5597 enum bpf_prog_type prog_type,
5598 int arg)
5599{
5600 const struct btf_member *prog_ctx_type, *kern_ctx_type;
5601
5602 prog_ctx_type = btf_get_prog_ctx_type(log, btf, t, prog_type, arg);
5603 if (!prog_ctx_type)
5604 return -ENOENT;
5605 kern_ctx_type = prog_ctx_type + 1;
5606 return kern_ctx_type->type;
5607}
5608
5609int get_kern_ctx_btf_id(struct bpf_verifier_log *log, enum bpf_prog_type prog_type)
5610{
5611 const struct btf_member *kctx_member;
5612 const struct btf_type *conv_struct;
5613 const struct btf_type *kctx_type;
5614 u32 kctx_type_id;
5615
5616 conv_struct = bpf_ctx_convert.t;
5617 /* get member for kernel ctx type */
5618 kctx_member = btf_type_member(conv_struct) + bpf_ctx_convert_map[prog_type] * 2 + 1;
5619 kctx_type_id = kctx_member->type;
5620 kctx_type = btf_type_by_id(btf_vmlinux, kctx_type_id);
5621 if (!btf_type_is_struct(kctx_type)) {
5622 bpf_log(log, "kern ctx type id %u is not a struct\n", kctx_type_id);
5623 return -EINVAL;
5624 }
5625
5626 return kctx_type_id;
5627}
5628
5629BTF_ID_LIST(bpf_ctx_convert_btf_id)
5630BTF_ID(struct, bpf_ctx_convert)
5631
5632struct btf *btf_parse_vmlinux(void)
5633{
5634 struct btf_verifier_env *env = NULL;
5635 struct bpf_verifier_log *log;
5636 struct btf *btf = NULL;
5637 int err;
5638
5639 env = kzalloc(sizeof(*env), GFP_KERNEL | __GFP_NOWARN);
5640 if (!env)
5641 return ERR_PTR(-ENOMEM);
5642
5643 log = &env->log;
5644 log->level = BPF_LOG_KERNEL;
5645
5646 btf = kzalloc(sizeof(*btf), GFP_KERNEL | __GFP_NOWARN);
5647 if (!btf) {
5648 err = -ENOMEM;
5649 goto errout;
5650 }
5651 env->btf = btf;
5652
5653 btf->data = __start_BTF;
5654 btf->data_size = __stop_BTF - __start_BTF;
5655 btf->kernel_btf = true;
5656 snprintf(btf->name, sizeof(btf->name), "vmlinux");
5657
5658 err = btf_parse_hdr(env);
5659 if (err)
5660 goto errout;
5661
5662 btf->nohdr_data = btf->data + btf->hdr.hdr_len;
5663
5664 err = btf_parse_str_sec(env);
5665 if (err)
5666 goto errout;
5667
5668 err = btf_check_all_metas(env);
5669 if (err)
5670 goto errout;
5671
5672 err = btf_check_type_tags(env, btf, 1);
5673 if (err)
5674 goto errout;
5675
5676 /* btf_parse_vmlinux() runs under bpf_verifier_lock */
5677 bpf_ctx_convert.t = btf_type_by_id(btf, bpf_ctx_convert_btf_id[0]);
5678
5679 bpf_struct_ops_init(btf, log);
5680
5681 refcount_set(&btf->refcnt, 1);
5682
5683 err = btf_alloc_id(btf);
5684 if (err)
5685 goto errout;
5686
5687 btf_verifier_env_free(env);
5688 return btf;
5689
5690errout:
5691 btf_verifier_env_free(env);
5692 if (btf) {
5693 kvfree(btf->types);
5694 kfree(btf);
5695 }
5696 return ERR_PTR(err);
5697}
5698
5699#ifdef CONFIG_DEBUG_INFO_BTF_MODULES
5700
5701static struct btf *btf_parse_module(const char *module_name, const void *data, unsigned int data_size)
5702{
5703 struct btf_verifier_env *env = NULL;
5704 struct bpf_verifier_log *log;
5705 struct btf *btf = NULL, *base_btf;
5706 int err;
5707
5708 base_btf = bpf_get_btf_vmlinux();
5709 if (IS_ERR(base_btf))
5710 return base_btf;
5711 if (!base_btf)
5712 return ERR_PTR(-EINVAL);
5713
5714 env = kzalloc(sizeof(*env), GFP_KERNEL | __GFP_NOWARN);
5715 if (!env)
5716 return ERR_PTR(-ENOMEM);
5717
5718 log = &env->log;
5719 log->level = BPF_LOG_KERNEL;
5720
5721 btf = kzalloc(sizeof(*btf), GFP_KERNEL | __GFP_NOWARN);
5722 if (!btf) {
5723 err = -ENOMEM;
5724 goto errout;
5725 }
5726 env->btf = btf;
5727
5728 btf->base_btf = base_btf;
5729 btf->start_id = base_btf->nr_types;
5730 btf->start_str_off = base_btf->hdr.str_len;
5731 btf->kernel_btf = true;
5732 snprintf(btf->name, sizeof(btf->name), "%s", module_name);
5733
5734 btf->data = kvmalloc(data_size, GFP_KERNEL | __GFP_NOWARN);
5735 if (!btf->data) {
5736 err = -ENOMEM;
5737 goto errout;
5738 }
5739 memcpy(btf->data, data, data_size);
5740 btf->data_size = data_size;
5741
5742 err = btf_parse_hdr(env);
5743 if (err)
5744 goto errout;
5745
5746 btf->nohdr_data = btf->data + btf->hdr.hdr_len;
5747
5748 err = btf_parse_str_sec(env);
5749 if (err)
5750 goto errout;
5751
5752 err = btf_check_all_metas(env);
5753 if (err)
5754 goto errout;
5755
5756 err = btf_check_type_tags(env, btf, btf_nr_types(base_btf));
5757 if (err)
5758 goto errout;
5759
5760 btf_verifier_env_free(env);
5761 refcount_set(&btf->refcnt, 1);
5762 return btf;
5763
5764errout:
5765 btf_verifier_env_free(env);
5766 if (btf) {
5767 kvfree(btf->data);
5768 kvfree(btf->types);
5769 kfree(btf);
5770 }
5771 return ERR_PTR(err);
5772}
5773
5774#endif /* CONFIG_DEBUG_INFO_BTF_MODULES */
5775
5776struct btf *bpf_prog_get_target_btf(const struct bpf_prog *prog)
5777{
5778 struct bpf_prog *tgt_prog = prog->aux->dst_prog;
5779
5780 if (tgt_prog)
5781 return tgt_prog->aux->btf;
5782 else
5783 return prog->aux->attach_btf;
5784}
5785
5786static bool is_int_ptr(struct btf *btf, const struct btf_type *t)
5787{
5788 /* t comes in already as a pointer */
5789 t = btf_type_by_id(btf, t->type);
5790
5791 /* allow const */
5792 if (BTF_INFO_KIND(t->info) == BTF_KIND_CONST)
5793 t = btf_type_by_id(btf, t->type);
5794
5795 return btf_type_is_int(t);
5796}
5797
5798static u32 get_ctx_arg_idx(struct btf *btf, const struct btf_type *func_proto,
5799 int off)
5800{
5801 const struct btf_param *args;
5802 const struct btf_type *t;
5803 u32 offset = 0, nr_args;
5804 int i;
5805
5806 if (!func_proto)
5807 return off / 8;
5808
5809 nr_args = btf_type_vlen(func_proto);
5810 args = (const struct btf_param *)(func_proto + 1);
5811 for (i = 0; i < nr_args; i++) {
5812 t = btf_type_skip_modifiers(btf, args[i].type, NULL);
5813 offset += btf_type_is_ptr(t) ? 8 : roundup(t->size, 8);
5814 if (off < offset)
5815 return i;
5816 }
5817
5818 t = btf_type_skip_modifiers(btf, func_proto->type, NULL);
5819 offset += btf_type_is_ptr(t) ? 8 : roundup(t->size, 8);
5820 if (off < offset)
5821 return nr_args;
5822
5823 return nr_args + 1;
5824}
5825
5826static bool prog_args_trusted(const struct bpf_prog *prog)
5827{
5828 enum bpf_attach_type atype = prog->expected_attach_type;
5829
5830 switch (prog->type) {
5831 case BPF_PROG_TYPE_TRACING:
5832 return atype == BPF_TRACE_RAW_TP || atype == BPF_TRACE_ITER;
5833 case BPF_PROG_TYPE_LSM:
5834 return bpf_lsm_is_trusted(prog);
5835 case BPF_PROG_TYPE_STRUCT_OPS:
5836 return true;
5837 default:
5838 return false;
5839 }
5840}
5841
5842bool btf_ctx_access(int off, int size, enum bpf_access_type type,
5843 const struct bpf_prog *prog,
5844 struct bpf_insn_access_aux *info)
5845{
5846 const struct btf_type *t = prog->aux->attach_func_proto;
5847 struct bpf_prog *tgt_prog = prog->aux->dst_prog;
5848 struct btf *btf = bpf_prog_get_target_btf(prog);
5849 const char *tname = prog->aux->attach_func_name;
5850 struct bpf_verifier_log *log = info->log;
5851 const struct btf_param *args;
5852 const char *tag_value;
5853 u32 nr_args, arg;
5854 int i, ret;
5855
5856 if (off % 8) {
5857 bpf_log(log, "func '%s' offset %d is not multiple of 8\n",
5858 tname, off);
5859 return false;
5860 }
5861 arg = get_ctx_arg_idx(btf, t, off);
5862 args = (const struct btf_param *)(t + 1);
5863 /* if (t == NULL) Fall back to default BPF prog with
5864 * MAX_BPF_FUNC_REG_ARGS u64 arguments.
5865 */
5866 nr_args = t ? btf_type_vlen(t) : MAX_BPF_FUNC_REG_ARGS;
5867 if (prog->aux->attach_btf_trace) {
5868 /* skip first 'void *__data' argument in btf_trace_##name typedef */
5869 args++;
5870 nr_args--;
5871 }
5872
5873 if (arg > nr_args) {
5874 bpf_log(log, "func '%s' doesn't have %d-th argument\n",
5875 tname, arg + 1);
5876 return false;
5877 }
5878
5879 if (arg == nr_args) {
5880 switch (prog->expected_attach_type) {
5881 case BPF_LSM_CGROUP:
5882 case BPF_LSM_MAC:
5883 case BPF_TRACE_FEXIT:
5884 /* When LSM programs are attached to void LSM hooks
5885 * they use FEXIT trampolines and when attached to
5886 * int LSM hooks, they use MODIFY_RETURN trampolines.
5887 *
5888 * While the LSM programs are BPF_MODIFY_RETURN-like
5889 * the check:
5890 *
5891 * if (ret_type != 'int')
5892 * return -EINVAL;
5893 *
5894 * is _not_ done here. This is still safe as LSM hooks
5895 * have only void and int return types.
5896 */
5897 if (!t)
5898 return true;
5899 t = btf_type_by_id(btf, t->type);
5900 break;
5901 case BPF_MODIFY_RETURN:
5902 /* For now the BPF_MODIFY_RETURN can only be attached to
5903 * functions that return an int.
5904 */
5905 if (!t)
5906 return false;
5907
5908 t = btf_type_skip_modifiers(btf, t->type, NULL);
5909 if (!btf_type_is_small_int(t)) {
5910 bpf_log(log,
5911 "ret type %s not allowed for fmod_ret\n",
5912 btf_type_str(t));
5913 return false;
5914 }
5915 break;
5916 default:
5917 bpf_log(log, "func '%s' doesn't have %d-th argument\n",
5918 tname, arg + 1);
5919 return false;
5920 }
5921 } else {
5922 if (!t)
5923 /* Default prog with MAX_BPF_FUNC_REG_ARGS args */
5924 return true;
5925 t = btf_type_by_id(btf, args[arg].type);
5926 }
5927
5928 /* skip modifiers */
5929 while (btf_type_is_modifier(t))
5930 t = btf_type_by_id(btf, t->type);
5931 if (btf_type_is_small_int(t) || btf_is_any_enum(t) || __btf_type_is_struct(t))
5932 /* accessing a scalar */
5933 return true;
5934 if (!btf_type_is_ptr(t)) {
5935 bpf_log(log,
5936 "func '%s' arg%d '%s' has type %s. Only pointer access is allowed\n",
5937 tname, arg,
5938 __btf_name_by_offset(btf, t->name_off),
5939 btf_type_str(t));
5940 return false;
5941 }
5942
5943 /* check for PTR_TO_RDONLY_BUF_OR_NULL or PTR_TO_RDWR_BUF_OR_NULL */
5944 for (i = 0; i < prog->aux->ctx_arg_info_size; i++) {
5945 const struct bpf_ctx_arg_aux *ctx_arg_info = &prog->aux->ctx_arg_info[i];
5946 u32 type, flag;
5947
5948 type = base_type(ctx_arg_info->reg_type);
5949 flag = type_flag(ctx_arg_info->reg_type);
5950 if (ctx_arg_info->offset == off && type == PTR_TO_BUF &&
5951 (flag & PTR_MAYBE_NULL)) {
5952 info->reg_type = ctx_arg_info->reg_type;
5953 return true;
5954 }
5955 }
5956
5957 if (t->type == 0)
5958 /* This is a pointer to void.
5959 * It is the same as scalar from the verifier safety pov.
5960 * No further pointer walking is allowed.
5961 */
5962 return true;
5963
5964 if (is_int_ptr(btf, t))
5965 return true;
5966
5967 /* this is a pointer to another type */
5968 for (i = 0; i < prog->aux->ctx_arg_info_size; i++) {
5969 const struct bpf_ctx_arg_aux *ctx_arg_info = &prog->aux->ctx_arg_info[i];
5970
5971 if (ctx_arg_info->offset == off) {
5972 if (!ctx_arg_info->btf_id) {
5973 bpf_log(log,"invalid btf_id for context argument offset %u\n", off);
5974 return false;
5975 }
5976
5977 info->reg_type = ctx_arg_info->reg_type;
5978 info->btf = btf_vmlinux;
5979 info->btf_id = ctx_arg_info->btf_id;
5980 return true;
5981 }
5982 }
5983
5984 info->reg_type = PTR_TO_BTF_ID;
5985 if (prog_args_trusted(prog))
5986 info->reg_type |= PTR_TRUSTED;
5987
5988 if (tgt_prog) {
5989 enum bpf_prog_type tgt_type;
5990
5991 if (tgt_prog->type == BPF_PROG_TYPE_EXT)
5992 tgt_type = tgt_prog->aux->saved_dst_prog_type;
5993 else
5994 tgt_type = tgt_prog->type;
5995
5996 ret = btf_translate_to_vmlinux(log, btf, t, tgt_type, arg);
5997 if (ret > 0) {
5998 info->btf = btf_vmlinux;
5999 info->btf_id = ret;
6000 return true;
6001 } else {
6002 return false;
6003 }
6004 }
6005
6006 info->btf = btf;
6007 info->btf_id = t->type;
6008 t = btf_type_by_id(btf, t->type);
6009
6010 if (btf_type_is_type_tag(t)) {
6011 tag_value = __btf_name_by_offset(btf, t->name_off);
6012 if (strcmp(tag_value, "user") == 0)
6013 info->reg_type |= MEM_USER;
6014 if (strcmp(tag_value, "percpu") == 0)
6015 info->reg_type |= MEM_PERCPU;
6016 }
6017
6018 /* skip modifiers */
6019 while (btf_type_is_modifier(t)) {
6020 info->btf_id = t->type;
6021 t = btf_type_by_id(btf, t->type);
6022 }
6023 if (!btf_type_is_struct(t)) {
6024 bpf_log(log,
6025 "func '%s' arg%d type %s is not a struct\n",
6026 tname, arg, btf_type_str(t));
6027 return false;
6028 }
6029 bpf_log(log, "func '%s' arg%d has btf_id %d type %s '%s'\n",
6030 tname, arg, info->btf_id, btf_type_str(t),
6031 __btf_name_by_offset(btf, t->name_off));
6032 return true;
6033}
6034
6035enum bpf_struct_walk_result {
6036 /* < 0 error */
6037 WALK_SCALAR = 0,
6038 WALK_PTR,
6039 WALK_STRUCT,
6040};
6041
6042static int btf_struct_walk(struct bpf_verifier_log *log, const struct btf *btf,
6043 const struct btf_type *t, int off, int size,
6044 u32 *next_btf_id, enum bpf_type_flag *flag)
6045{
6046 u32 i, moff, mtrue_end, msize = 0, total_nelems = 0;
6047 const struct btf_type *mtype, *elem_type = NULL;
6048 const struct btf_member *member;
6049 const char *tname, *mname, *tag_value;
6050 u32 vlen, elem_id, mid;
6051
6052again:
6053 tname = __btf_name_by_offset(btf, t->name_off);
6054 if (!btf_type_is_struct(t)) {
6055 bpf_log(log, "Type '%s' is not a struct\n", tname);
6056 return -EINVAL;
6057 }
6058
6059 vlen = btf_type_vlen(t);
6060 if (off + size > t->size) {
6061 /* If the last element is a variable size array, we may
6062 * need to relax the rule.
6063 */
6064 struct btf_array *array_elem;
6065
6066 if (vlen == 0)
6067 goto error;
6068
6069 member = btf_type_member(t) + vlen - 1;
6070 mtype = btf_type_skip_modifiers(btf, member->type,
6071 NULL);
6072 if (!btf_type_is_array(mtype))
6073 goto error;
6074
6075 array_elem = (struct btf_array *)(mtype + 1);
6076 if (array_elem->nelems != 0)
6077 goto error;
6078
6079 moff = __btf_member_bit_offset(t, member) / 8;
6080 if (off < moff)
6081 goto error;
6082
6083 /* Only allow structure for now, can be relaxed for
6084 * other types later.
6085 */
6086 t = btf_type_skip_modifiers(btf, array_elem->type,
6087 NULL);
6088 if (!btf_type_is_struct(t))
6089 goto error;
6090
6091 off = (off - moff) % t->size;
6092 goto again;
6093
6094error:
6095 bpf_log(log, "access beyond struct %s at off %u size %u\n",
6096 tname, off, size);
6097 return -EACCES;
6098 }
6099
6100 for_each_member(i, t, member) {
6101 /* offset of the field in bytes */
6102 moff = __btf_member_bit_offset(t, member) / 8;
6103 if (off + size <= moff)
6104 /* won't find anything, field is already too far */
6105 break;
6106
6107 if (__btf_member_bitfield_size(t, member)) {
6108 u32 end_bit = __btf_member_bit_offset(t, member) +
6109 __btf_member_bitfield_size(t, member);
6110
6111 /* off <= moff instead of off == moff because clang
6112 * does not generate a BTF member for anonymous
6113 * bitfield like the ":16" here:
6114 * struct {
6115 * int :16;
6116 * int x:8;
6117 * };
6118 */
6119 if (off <= moff &&
6120 BITS_ROUNDUP_BYTES(end_bit) <= off + size)
6121 return WALK_SCALAR;
6122
6123 /* off may be accessing a following member
6124 *
6125 * or
6126 *
6127 * Doing partial access at either end of this
6128 * bitfield. Continue on this case also to
6129 * treat it as not accessing this bitfield
6130 * and eventually error out as field not
6131 * found to keep it simple.
6132 * It could be relaxed if there was a legit
6133 * partial access case later.
6134 */
6135 continue;
6136 }
6137
6138 /* In case of "off" is pointing to holes of a struct */
6139 if (off < moff)
6140 break;
6141
6142 /* type of the field */
6143 mid = member->type;
6144 mtype = btf_type_by_id(btf, member->type);
6145 mname = __btf_name_by_offset(btf, member->name_off);
6146
6147 mtype = __btf_resolve_size(btf, mtype, &msize,
6148 &elem_type, &elem_id, &total_nelems,
6149 &mid);
6150 if (IS_ERR(mtype)) {
6151 bpf_log(log, "field %s doesn't have size\n", mname);
6152 return -EFAULT;
6153 }
6154
6155 mtrue_end = moff + msize;
6156 if (off >= mtrue_end)
6157 /* no overlap with member, keep iterating */
6158 continue;
6159
6160 if (btf_type_is_array(mtype)) {
6161 u32 elem_idx;
6162
6163 /* __btf_resolve_size() above helps to
6164 * linearize a multi-dimensional array.
6165 *
6166 * The logic here is treating an array
6167 * in a struct as the following way:
6168 *
6169 * struct outer {
6170 * struct inner array[2][2];
6171 * };
6172 *
6173 * looks like:
6174 *
6175 * struct outer {
6176 * struct inner array_elem0;
6177 * struct inner array_elem1;
6178 * struct inner array_elem2;
6179 * struct inner array_elem3;
6180 * };
6181 *
6182 * When accessing outer->array[1][0], it moves
6183 * moff to "array_elem2", set mtype to
6184 * "struct inner", and msize also becomes
6185 * sizeof(struct inner). Then most of the
6186 * remaining logic will fall through without
6187 * caring the current member is an array or
6188 * not.
6189 *
6190 * Unlike mtype/msize/moff, mtrue_end does not
6191 * change. The naming difference ("_true") tells
6192 * that it is not always corresponding to
6193 * the current mtype/msize/moff.
6194 * It is the true end of the current
6195 * member (i.e. array in this case). That
6196 * will allow an int array to be accessed like
6197 * a scratch space,
6198 * i.e. allow access beyond the size of
6199 * the array's element as long as it is
6200 * within the mtrue_end boundary.
6201 */
6202
6203 /* skip empty array */
6204 if (moff == mtrue_end)
6205 continue;
6206
6207 msize /= total_nelems;
6208 elem_idx = (off - moff) / msize;
6209 moff += elem_idx * msize;
6210 mtype = elem_type;
6211 mid = elem_id;
6212 }
6213
6214 /* the 'off' we're looking for is either equal to start
6215 * of this field or inside of this struct
6216 */
6217 if (btf_type_is_struct(mtype)) {
6218 /* our field must be inside that union or struct */
6219 t = mtype;
6220
6221 /* return if the offset matches the member offset */
6222 if (off == moff) {
6223 *next_btf_id = mid;
6224 return WALK_STRUCT;
6225 }
6226
6227 /* adjust offset we're looking for */
6228 off -= moff;
6229 goto again;
6230 }
6231
6232 if (btf_type_is_ptr(mtype)) {
6233 const struct btf_type *stype, *t;
6234 enum bpf_type_flag tmp_flag = 0;
6235 u32 id;
6236
6237 if (msize != size || off != moff) {
6238 bpf_log(log,
6239 "cannot access ptr member %s with moff %u in struct %s with off %u size %u\n",
6240 mname, moff, tname, off, size);
6241 return -EACCES;
6242 }
6243
6244 /* check type tag */
6245 t = btf_type_by_id(btf, mtype->type);
6246 if (btf_type_is_type_tag(t)) {
6247 tag_value = __btf_name_by_offset(btf, t->name_off);
6248 /* check __user tag */
6249 if (strcmp(tag_value, "user") == 0)
6250 tmp_flag = MEM_USER;
6251 /* check __percpu tag */
6252 if (strcmp(tag_value, "percpu") == 0)
6253 tmp_flag = MEM_PERCPU;
6254 /* check __rcu tag */
6255 if (strcmp(tag_value, "rcu") == 0)
6256 tmp_flag = MEM_RCU;
6257 }
6258
6259 stype = btf_type_skip_modifiers(btf, mtype->type, &id);
6260 if (btf_type_is_struct(stype)) {
6261 *next_btf_id = id;
6262 *flag = tmp_flag;
6263 return WALK_PTR;
6264 }
6265 }
6266
6267 /* Allow more flexible access within an int as long as
6268 * it is within mtrue_end.
6269 * Since mtrue_end could be the end of an array,
6270 * that also allows using an array of int as a scratch
6271 * space. e.g. skb->cb[].
6272 */
6273 if (off + size > mtrue_end) {
6274 bpf_log(log,
6275 "access beyond the end of member %s (mend:%u) in struct %s with off %u size %u\n",
6276 mname, mtrue_end, tname, off, size);
6277 return -EACCES;
6278 }
6279
6280 return WALK_SCALAR;
6281 }
6282 bpf_log(log, "struct %s doesn't have field at offset %d\n", tname, off);
6283 return -EINVAL;
6284}
6285
6286int btf_struct_access(struct bpf_verifier_log *log,
6287 const struct bpf_reg_state *reg,
6288 int off, int size, enum bpf_access_type atype __maybe_unused,
6289 u32 *next_btf_id, enum bpf_type_flag *flag)
6290{
6291 const struct btf *btf = reg->btf;
6292 enum bpf_type_flag tmp_flag = 0;
6293 const struct btf_type *t;
6294 u32 id = reg->btf_id;
6295 int err;
6296
6297 while (type_is_alloc(reg->type)) {
6298 struct btf_struct_meta *meta;
6299 struct btf_record *rec;
6300 int i;
6301
6302 meta = btf_find_struct_meta(btf, id);
6303 if (!meta)
6304 break;
6305 rec = meta->record;
6306 for (i = 0; i < rec->cnt; i++) {
6307 struct btf_field *field = &rec->fields[i];
6308 u32 offset = field->offset;
6309 if (off < offset + btf_field_type_size(field->type) && offset < off + size) {
6310 bpf_log(log,
6311 "direct access to %s is disallowed\n",
6312 btf_field_type_name(field->type));
6313 return -EACCES;
6314 }
6315 }
6316 break;
6317 }
6318
6319 t = btf_type_by_id(btf, id);
6320 do {
6321 err = btf_struct_walk(log, btf, t, off, size, &id, &tmp_flag);
6322
6323 switch (err) {
6324 case WALK_PTR:
6325 /* For local types, the destination register cannot
6326 * become a pointer again.
6327 */
6328 if (type_is_alloc(reg->type))
6329 return SCALAR_VALUE;
6330 /* If we found the pointer or scalar on t+off,
6331 * we're done.
6332 */
6333 *next_btf_id = id;
6334 *flag = tmp_flag;
6335 return PTR_TO_BTF_ID;
6336 case WALK_SCALAR:
6337 return SCALAR_VALUE;
6338 case WALK_STRUCT:
6339 /* We found nested struct, so continue the search
6340 * by diving in it. At this point the offset is
6341 * aligned with the new type, so set it to 0.
6342 */
6343 t = btf_type_by_id(btf, id);
6344 off = 0;
6345 break;
6346 default:
6347 /* It's either error or unknown return value..
6348 * scream and leave.
6349 */
6350 if (WARN_ONCE(err > 0, "unknown btf_struct_walk return value"))
6351 return -EINVAL;
6352 return err;
6353 }
6354 } while (t);
6355
6356 return -EINVAL;
6357}
6358
6359/* Check that two BTF types, each specified as an BTF object + id, are exactly
6360 * the same. Trivial ID check is not enough due to module BTFs, because we can
6361 * end up with two different module BTFs, but IDs point to the common type in
6362 * vmlinux BTF.
6363 */
6364bool btf_types_are_same(const struct btf *btf1, u32 id1,
6365 const struct btf *btf2, u32 id2)
6366{
6367 if (id1 != id2)
6368 return false;
6369 if (btf1 == btf2)
6370 return true;
6371 return btf_type_by_id(btf1, id1) == btf_type_by_id(btf2, id2);
6372}
6373
6374bool btf_struct_ids_match(struct bpf_verifier_log *log,
6375 const struct btf *btf, u32 id, int off,
6376 const struct btf *need_btf, u32 need_type_id,
6377 bool strict)
6378{
6379 const struct btf_type *type;
6380 enum bpf_type_flag flag;
6381 int err;
6382
6383 /* Are we already done? */
6384 if (off == 0 && btf_types_are_same(btf, id, need_btf, need_type_id))
6385 return true;
6386 /* In case of strict type match, we do not walk struct, the top level
6387 * type match must succeed. When strict is true, off should have already
6388 * been 0.
6389 */
6390 if (strict)
6391 return false;
6392again:
6393 type = btf_type_by_id(btf, id);
6394 if (!type)
6395 return false;
6396 err = btf_struct_walk(log, btf, type, off, 1, &id, &flag);
6397 if (err != WALK_STRUCT)
6398 return false;
6399
6400 /* We found nested struct object. If it matches
6401 * the requested ID, we're done. Otherwise let's
6402 * continue the search with offset 0 in the new
6403 * type.
6404 */
6405 if (!btf_types_are_same(btf, id, need_btf, need_type_id)) {
6406 off = 0;
6407 goto again;
6408 }
6409
6410 return true;
6411}
6412
6413static int __get_type_size(struct btf *btf, u32 btf_id,
6414 const struct btf_type **ret_type)
6415{
6416 const struct btf_type *t;
6417
6418 *ret_type = btf_type_by_id(btf, 0);
6419 if (!btf_id)
6420 /* void */
6421 return 0;
6422 t = btf_type_by_id(btf, btf_id);
6423 while (t && btf_type_is_modifier(t))
6424 t = btf_type_by_id(btf, t->type);
6425 if (!t)
6426 return -EINVAL;
6427 *ret_type = t;
6428 if (btf_type_is_ptr(t))
6429 /* kernel size of pointer. Not BPF's size of pointer*/
6430 return sizeof(void *);
6431 if (btf_type_is_int(t) || btf_is_any_enum(t) || __btf_type_is_struct(t))
6432 return t->size;
6433 return -EINVAL;
6434}
6435
6436int btf_distill_func_proto(struct bpf_verifier_log *log,
6437 struct btf *btf,
6438 const struct btf_type *func,
6439 const char *tname,
6440 struct btf_func_model *m)
6441{
6442 const struct btf_param *args;
6443 const struct btf_type *t;
6444 u32 i, nargs;
6445 int ret;
6446
6447 if (!func) {
6448 /* BTF function prototype doesn't match the verifier types.
6449 * Fall back to MAX_BPF_FUNC_REG_ARGS u64 args.
6450 */
6451 for (i = 0; i < MAX_BPF_FUNC_REG_ARGS; i++) {
6452 m->arg_size[i] = 8;
6453 m->arg_flags[i] = 0;
6454 }
6455 m->ret_size = 8;
6456 m->nr_args = MAX_BPF_FUNC_REG_ARGS;
6457 return 0;
6458 }
6459 args = (const struct btf_param *)(func + 1);
6460 nargs = btf_type_vlen(func);
6461 if (nargs > MAX_BPF_FUNC_ARGS) {
6462 bpf_log(log,
6463 "The function %s has %d arguments. Too many.\n",
6464 tname, nargs);
6465 return -EINVAL;
6466 }
6467 ret = __get_type_size(btf, func->type, &t);
6468 if (ret < 0 || __btf_type_is_struct(t)) {
6469 bpf_log(log,
6470 "The function %s return type %s is unsupported.\n",
6471 tname, btf_type_str(t));
6472 return -EINVAL;
6473 }
6474 m->ret_size = ret;
6475
6476 for (i = 0; i < nargs; i++) {
6477 if (i == nargs - 1 && args[i].type == 0) {
6478 bpf_log(log,
6479 "The function %s with variable args is unsupported.\n",
6480 tname);
6481 return -EINVAL;
6482 }
6483 ret = __get_type_size(btf, args[i].type, &t);
6484
6485 /* No support of struct argument size greater than 16 bytes */
6486 if (ret < 0 || ret > 16) {
6487 bpf_log(log,
6488 "The function %s arg%d type %s is unsupported.\n",
6489 tname, i, btf_type_str(t));
6490 return -EINVAL;
6491 }
6492 if (ret == 0) {
6493 bpf_log(log,
6494 "The function %s has malformed void argument.\n",
6495 tname);
6496 return -EINVAL;
6497 }
6498 m->arg_size[i] = ret;
6499 m->arg_flags[i] = __btf_type_is_struct(t) ? BTF_FMODEL_STRUCT_ARG : 0;
6500 }
6501 m->nr_args = nargs;
6502 return 0;
6503}
6504
6505/* Compare BTFs of two functions assuming only scalars and pointers to context.
6506 * t1 points to BTF_KIND_FUNC in btf1
6507 * t2 points to BTF_KIND_FUNC in btf2
6508 * Returns:
6509 * EINVAL - function prototype mismatch
6510 * EFAULT - verifier bug
6511 * 0 - 99% match. The last 1% is validated by the verifier.
6512 */
6513static int btf_check_func_type_match(struct bpf_verifier_log *log,
6514 struct btf *btf1, const struct btf_type *t1,
6515 struct btf *btf2, const struct btf_type *t2)
6516{
6517 const struct btf_param *args1, *args2;
6518 const char *fn1, *fn2, *s1, *s2;
6519 u32 nargs1, nargs2, i;
6520
6521 fn1 = btf_name_by_offset(btf1, t1->name_off);
6522 fn2 = btf_name_by_offset(btf2, t2->name_off);
6523
6524 if (btf_func_linkage(t1) != BTF_FUNC_GLOBAL) {
6525 bpf_log(log, "%s() is not a global function\n", fn1);
6526 return -EINVAL;
6527 }
6528 if (btf_func_linkage(t2) != BTF_FUNC_GLOBAL) {
6529 bpf_log(log, "%s() is not a global function\n", fn2);
6530 return -EINVAL;
6531 }
6532
6533 t1 = btf_type_by_id(btf1, t1->type);
6534 if (!t1 || !btf_type_is_func_proto(t1))
6535 return -EFAULT;
6536 t2 = btf_type_by_id(btf2, t2->type);
6537 if (!t2 || !btf_type_is_func_proto(t2))
6538 return -EFAULT;
6539
6540 args1 = (const struct btf_param *)(t1 + 1);
6541 nargs1 = btf_type_vlen(t1);
6542 args2 = (const struct btf_param *)(t2 + 1);
6543 nargs2 = btf_type_vlen(t2);
6544
6545 if (nargs1 != nargs2) {
6546 bpf_log(log, "%s() has %d args while %s() has %d args\n",
6547 fn1, nargs1, fn2, nargs2);
6548 return -EINVAL;
6549 }
6550
6551 t1 = btf_type_skip_modifiers(btf1, t1->type, NULL);
6552 t2 = btf_type_skip_modifiers(btf2, t2->type, NULL);
6553 if (t1->info != t2->info) {
6554 bpf_log(log,
6555 "Return type %s of %s() doesn't match type %s of %s()\n",
6556 btf_type_str(t1), fn1,
6557 btf_type_str(t2), fn2);
6558 return -EINVAL;
6559 }
6560
6561 for (i = 0; i < nargs1; i++) {
6562 t1 = btf_type_skip_modifiers(btf1, args1[i].type, NULL);
6563 t2 = btf_type_skip_modifiers(btf2, args2[i].type, NULL);
6564
6565 if (t1->info != t2->info) {
6566 bpf_log(log, "arg%d in %s() is %s while %s() has %s\n",
6567 i, fn1, btf_type_str(t1),
6568 fn2, btf_type_str(t2));
6569 return -EINVAL;
6570 }
6571 if (btf_type_has_size(t1) && t1->size != t2->size) {
6572 bpf_log(log,
6573 "arg%d in %s() has size %d while %s() has %d\n",
6574 i, fn1, t1->size,
6575 fn2, t2->size);
6576 return -EINVAL;
6577 }
6578
6579 /* global functions are validated with scalars and pointers
6580 * to context only. And only global functions can be replaced.
6581 * Hence type check only those types.
6582 */
6583 if (btf_type_is_int(t1) || btf_is_any_enum(t1))
6584 continue;
6585 if (!btf_type_is_ptr(t1)) {
6586 bpf_log(log,
6587 "arg%d in %s() has unrecognized type\n",
6588 i, fn1);
6589 return -EINVAL;
6590 }
6591 t1 = btf_type_skip_modifiers(btf1, t1->type, NULL);
6592 t2 = btf_type_skip_modifiers(btf2, t2->type, NULL);
6593 if (!btf_type_is_struct(t1)) {
6594 bpf_log(log,
6595 "arg%d in %s() is not a pointer to context\n",
6596 i, fn1);
6597 return -EINVAL;
6598 }
6599 if (!btf_type_is_struct(t2)) {
6600 bpf_log(log,
6601 "arg%d in %s() is not a pointer to context\n",
6602 i, fn2);
6603 return -EINVAL;
6604 }
6605 /* This is an optional check to make program writing easier.
6606 * Compare names of structs and report an error to the user.
6607 * btf_prepare_func_args() already checked that t2 struct
6608 * is a context type. btf_prepare_func_args() will check
6609 * later that t1 struct is a context type as well.
6610 */
6611 s1 = btf_name_by_offset(btf1, t1->name_off);
6612 s2 = btf_name_by_offset(btf2, t2->name_off);
6613 if (strcmp(s1, s2)) {
6614 bpf_log(log,
6615 "arg%d %s(struct %s *) doesn't match %s(struct %s *)\n",
6616 i, fn1, s1, fn2, s2);
6617 return -EINVAL;
6618 }
6619 }
6620 return 0;
6621}
6622
6623/* Compare BTFs of given program with BTF of target program */
6624int btf_check_type_match(struct bpf_verifier_log *log, const struct bpf_prog *prog,
6625 struct btf *btf2, const struct btf_type *t2)
6626{
6627 struct btf *btf1 = prog->aux->btf;
6628 const struct btf_type *t1;
6629 u32 btf_id = 0;
6630
6631 if (!prog->aux->func_info) {
6632 bpf_log(log, "Program extension requires BTF\n");
6633 return -EINVAL;
6634 }
6635
6636 btf_id = prog->aux->func_info[0].type_id;
6637 if (!btf_id)
6638 return -EFAULT;
6639
6640 t1 = btf_type_by_id(btf1, btf_id);
6641 if (!t1 || !btf_type_is_func(t1))
6642 return -EFAULT;
6643
6644 return btf_check_func_type_match(log, btf1, t1, btf2, t2);
6645}
6646
6647static int btf_check_func_arg_match(struct bpf_verifier_env *env,
6648 const struct btf *btf, u32 func_id,
6649 struct bpf_reg_state *regs,
6650 bool ptr_to_mem_ok,
6651 bool processing_call)
6652{
6653 enum bpf_prog_type prog_type = resolve_prog_type(env->prog);
6654 struct bpf_verifier_log *log = &env->log;
6655 const char *func_name, *ref_tname;
6656 const struct btf_type *t, *ref_t;
6657 const struct btf_param *args;
6658 u32 i, nargs, ref_id;
6659 int ret;
6660
6661 t = btf_type_by_id(btf, func_id);
6662 if (!t || !btf_type_is_func(t)) {
6663 /* These checks were already done by the verifier while loading
6664 * struct bpf_func_info or in add_kfunc_call().
6665 */
6666 bpf_log(log, "BTF of func_id %u doesn't point to KIND_FUNC\n",
6667 func_id);
6668 return -EFAULT;
6669 }
6670 func_name = btf_name_by_offset(btf, t->name_off);
6671
6672 t = btf_type_by_id(btf, t->type);
6673 if (!t || !btf_type_is_func_proto(t)) {
6674 bpf_log(log, "Invalid BTF of func %s\n", func_name);
6675 return -EFAULT;
6676 }
6677 args = (const struct btf_param *)(t + 1);
6678 nargs = btf_type_vlen(t);
6679 if (nargs > MAX_BPF_FUNC_REG_ARGS) {
6680 bpf_log(log, "Function %s has %d > %d args\n", func_name, nargs,
6681 MAX_BPF_FUNC_REG_ARGS);
6682 return -EINVAL;
6683 }
6684
6685 /* check that BTF function arguments match actual types that the
6686 * verifier sees.
6687 */
6688 for (i = 0; i < nargs; i++) {
6689 enum bpf_arg_type arg_type = ARG_DONTCARE;
6690 u32 regno = i + 1;
6691 struct bpf_reg_state *reg = ®s[regno];
6692
6693 t = btf_type_skip_modifiers(btf, args[i].type, NULL);
6694 if (btf_type_is_scalar(t)) {
6695 if (reg->type == SCALAR_VALUE)
6696 continue;
6697 bpf_log(log, "R%d is not a scalar\n", regno);
6698 return -EINVAL;
6699 }
6700
6701 if (!btf_type_is_ptr(t)) {
6702 bpf_log(log, "Unrecognized arg#%d type %s\n",
6703 i, btf_type_str(t));
6704 return -EINVAL;
6705 }
6706
6707 ref_t = btf_type_skip_modifiers(btf, t->type, &ref_id);
6708 ref_tname = btf_name_by_offset(btf, ref_t->name_off);
6709
6710 ret = check_func_arg_reg_off(env, reg, regno, arg_type);
6711 if (ret < 0)
6712 return ret;
6713
6714 if (btf_get_prog_ctx_type(log, btf, t, prog_type, i)) {
6715 /* If function expects ctx type in BTF check that caller
6716 * is passing PTR_TO_CTX.
6717 */
6718 if (reg->type != PTR_TO_CTX) {
6719 bpf_log(log,
6720 "arg#%d expected pointer to ctx, but got %s\n",
6721 i, btf_type_str(t));
6722 return -EINVAL;
6723 }
6724 } else if (ptr_to_mem_ok && processing_call) {
6725 const struct btf_type *resolve_ret;
6726 u32 type_size;
6727
6728 resolve_ret = btf_resolve_size(btf, ref_t, &type_size);
6729 if (IS_ERR(resolve_ret)) {
6730 bpf_log(log,
6731 "arg#%d reference type('%s %s') size cannot be determined: %ld\n",
6732 i, btf_type_str(ref_t), ref_tname,
6733 PTR_ERR(resolve_ret));
6734 return -EINVAL;
6735 }
6736
6737 if (check_mem_reg(env, reg, regno, type_size))
6738 return -EINVAL;
6739 } else {
6740 bpf_log(log, "reg type unsupported for arg#%d function %s#%d\n", i,
6741 func_name, func_id);
6742 return -EINVAL;
6743 }
6744 }
6745
6746 return 0;
6747}
6748
6749/* Compare BTF of a function declaration with given bpf_reg_state.
6750 * Returns:
6751 * EFAULT - there is a verifier bug. Abort verification.
6752 * EINVAL - there is a type mismatch or BTF is not available.
6753 * 0 - BTF matches with what bpf_reg_state expects.
6754 * Only PTR_TO_CTX and SCALAR_VALUE states are recognized.
6755 */
6756int btf_check_subprog_arg_match(struct bpf_verifier_env *env, int subprog,
6757 struct bpf_reg_state *regs)
6758{
6759 struct bpf_prog *prog = env->prog;
6760 struct btf *btf = prog->aux->btf;
6761 bool is_global;
6762 u32 btf_id;
6763 int err;
6764
6765 if (!prog->aux->func_info)
6766 return -EINVAL;
6767
6768 btf_id = prog->aux->func_info[subprog].type_id;
6769 if (!btf_id)
6770 return -EFAULT;
6771
6772 if (prog->aux->func_info_aux[subprog].unreliable)
6773 return -EINVAL;
6774
6775 is_global = prog->aux->func_info_aux[subprog].linkage == BTF_FUNC_GLOBAL;
6776 err = btf_check_func_arg_match(env, btf, btf_id, regs, is_global, false);
6777
6778 /* Compiler optimizations can remove arguments from static functions
6779 * or mismatched type can be passed into a global function.
6780 * In such cases mark the function as unreliable from BTF point of view.
6781 */
6782 if (err)
6783 prog->aux->func_info_aux[subprog].unreliable = true;
6784 return err;
6785}
6786
6787/* Compare BTF of a function call with given bpf_reg_state.
6788 * Returns:
6789 * EFAULT - there is a verifier bug. Abort verification.
6790 * EINVAL - there is a type mismatch or BTF is not available.
6791 * 0 - BTF matches with what bpf_reg_state expects.
6792 * Only PTR_TO_CTX and SCALAR_VALUE states are recognized.
6793 *
6794 * NOTE: the code is duplicated from btf_check_subprog_arg_match()
6795 * because btf_check_func_arg_match() is still doing both. Once that
6796 * function is split in 2, we can call from here btf_check_subprog_arg_match()
6797 * first, and then treat the calling part in a new code path.
6798 */
6799int btf_check_subprog_call(struct bpf_verifier_env *env, int subprog,
6800 struct bpf_reg_state *regs)
6801{
6802 struct bpf_prog *prog = env->prog;
6803 struct btf *btf = prog->aux->btf;
6804 bool is_global;
6805 u32 btf_id;
6806 int err;
6807
6808 if (!prog->aux->func_info)
6809 return -EINVAL;
6810
6811 btf_id = prog->aux->func_info[subprog].type_id;
6812 if (!btf_id)
6813 return -EFAULT;
6814
6815 if (prog->aux->func_info_aux[subprog].unreliable)
6816 return -EINVAL;
6817
6818 is_global = prog->aux->func_info_aux[subprog].linkage == BTF_FUNC_GLOBAL;
6819 err = btf_check_func_arg_match(env, btf, btf_id, regs, is_global, true);
6820
6821 /* Compiler optimizations can remove arguments from static functions
6822 * or mismatched type can be passed into a global function.
6823 * In such cases mark the function as unreliable from BTF point of view.
6824 */
6825 if (err)
6826 prog->aux->func_info_aux[subprog].unreliable = true;
6827 return err;
6828}
6829
6830/* Convert BTF of a function into bpf_reg_state if possible
6831 * Returns:
6832 * EFAULT - there is a verifier bug. Abort verification.
6833 * EINVAL - cannot convert BTF.
6834 * 0 - Successfully converted BTF into bpf_reg_state
6835 * (either PTR_TO_CTX or SCALAR_VALUE).
6836 */
6837int btf_prepare_func_args(struct bpf_verifier_env *env, int subprog,
6838 struct bpf_reg_state *regs)
6839{
6840 struct bpf_verifier_log *log = &env->log;
6841 struct bpf_prog *prog = env->prog;
6842 enum bpf_prog_type prog_type = prog->type;
6843 struct btf *btf = prog->aux->btf;
6844 const struct btf_param *args;
6845 const struct btf_type *t, *ref_t;
6846 u32 i, nargs, btf_id;
6847 const char *tname;
6848
6849 if (!prog->aux->func_info ||
6850 prog->aux->func_info_aux[subprog].linkage != BTF_FUNC_GLOBAL) {
6851 bpf_log(log, "Verifier bug\n");
6852 return -EFAULT;
6853 }
6854
6855 btf_id = prog->aux->func_info[subprog].type_id;
6856 if (!btf_id) {
6857 bpf_log(log, "Global functions need valid BTF\n");
6858 return -EFAULT;
6859 }
6860
6861 t = btf_type_by_id(btf, btf_id);
6862 if (!t || !btf_type_is_func(t)) {
6863 /* These checks were already done by the verifier while loading
6864 * struct bpf_func_info
6865 */
6866 bpf_log(log, "BTF of func#%d doesn't point to KIND_FUNC\n",
6867 subprog);
6868 return -EFAULT;
6869 }
6870 tname = btf_name_by_offset(btf, t->name_off);
6871
6872 if (log->level & BPF_LOG_LEVEL)
6873 bpf_log(log, "Validating %s() func#%d...\n",
6874 tname, subprog);
6875
6876 if (prog->aux->func_info_aux[subprog].unreliable) {
6877 bpf_log(log, "Verifier bug in function %s()\n", tname);
6878 return -EFAULT;
6879 }
6880 if (prog_type == BPF_PROG_TYPE_EXT)
6881 prog_type = prog->aux->dst_prog->type;
6882
6883 t = btf_type_by_id(btf, t->type);
6884 if (!t || !btf_type_is_func_proto(t)) {
6885 bpf_log(log, "Invalid type of function %s()\n", tname);
6886 return -EFAULT;
6887 }
6888 args = (const struct btf_param *)(t + 1);
6889 nargs = btf_type_vlen(t);
6890 if (nargs > MAX_BPF_FUNC_REG_ARGS) {
6891 bpf_log(log, "Global function %s() with %d > %d args. Buggy compiler.\n",
6892 tname, nargs, MAX_BPF_FUNC_REG_ARGS);
6893 return -EINVAL;
6894 }
6895 /* check that function returns int */
6896 t = btf_type_by_id(btf, t->type);
6897 while (btf_type_is_modifier(t))
6898 t = btf_type_by_id(btf, t->type);
6899 if (!btf_type_is_int(t) && !btf_is_any_enum(t)) {
6900 bpf_log(log,
6901 "Global function %s() doesn't return scalar. Only those are supported.\n",
6902 tname);
6903 return -EINVAL;
6904 }
6905 /* Convert BTF function arguments into verifier types.
6906 * Only PTR_TO_CTX and SCALAR are supported atm.
6907 */
6908 for (i = 0; i < nargs; i++) {
6909 struct bpf_reg_state *reg = ®s[i + 1];
6910
6911 t = btf_type_by_id(btf, args[i].type);
6912 while (btf_type_is_modifier(t))
6913 t = btf_type_by_id(btf, t->type);
6914 if (btf_type_is_int(t) || btf_is_any_enum(t)) {
6915 reg->type = SCALAR_VALUE;
6916 continue;
6917 }
6918 if (btf_type_is_ptr(t)) {
6919 if (btf_get_prog_ctx_type(log, btf, t, prog_type, i)) {
6920 reg->type = PTR_TO_CTX;
6921 continue;
6922 }
6923
6924 t = btf_type_skip_modifiers(btf, t->type, NULL);
6925
6926 ref_t = btf_resolve_size(btf, t, ®->mem_size);
6927 if (IS_ERR(ref_t)) {
6928 bpf_log(log,
6929 "arg#%d reference type('%s %s') size cannot be determined: %ld\n",
6930 i, btf_type_str(t), btf_name_by_offset(btf, t->name_off),
6931 PTR_ERR(ref_t));
6932 return -EINVAL;
6933 }
6934
6935 reg->type = PTR_TO_MEM | PTR_MAYBE_NULL;
6936 reg->id = ++env->id_gen;
6937
6938 continue;
6939 }
6940 bpf_log(log, "Arg#%d type %s in %s() is not supported yet.\n",
6941 i, btf_type_str(t), tname);
6942 return -EINVAL;
6943 }
6944 return 0;
6945}
6946
6947static void btf_type_show(const struct btf *btf, u32 type_id, void *obj,
6948 struct btf_show *show)
6949{
6950 const struct btf_type *t = btf_type_by_id(btf, type_id);
6951
6952 show->btf = btf;
6953 memset(&show->state, 0, sizeof(show->state));
6954 memset(&show->obj, 0, sizeof(show->obj));
6955
6956 btf_type_ops(t)->show(btf, t, type_id, obj, 0, show);
6957}
6958
6959static void btf_seq_show(struct btf_show *show, const char *fmt,
6960 va_list args)
6961{
6962 seq_vprintf((struct seq_file *)show->target, fmt, args);
6963}
6964
6965int btf_type_seq_show_flags(const struct btf *btf, u32 type_id,
6966 void *obj, struct seq_file *m, u64 flags)
6967{
6968 struct btf_show sseq;
6969
6970 sseq.target = m;
6971 sseq.showfn = btf_seq_show;
6972 sseq.flags = flags;
6973
6974 btf_type_show(btf, type_id, obj, &sseq);
6975
6976 return sseq.state.status;
6977}
6978
6979void btf_type_seq_show(const struct btf *btf, u32 type_id, void *obj,
6980 struct seq_file *m)
6981{
6982 (void) btf_type_seq_show_flags(btf, type_id, obj, m,
6983 BTF_SHOW_NONAME | BTF_SHOW_COMPACT |
6984 BTF_SHOW_ZERO | BTF_SHOW_UNSAFE);
6985}
6986
6987struct btf_show_snprintf {
6988 struct btf_show show;
6989 int len_left; /* space left in string */
6990 int len; /* length we would have written */
6991};
6992
6993static void btf_snprintf_show(struct btf_show *show, const char *fmt,
6994 va_list args)
6995{
6996 struct btf_show_snprintf *ssnprintf = (struct btf_show_snprintf *)show;
6997 int len;
6998
6999 len = vsnprintf(show->target, ssnprintf->len_left, fmt, args);
7000
7001 if (len < 0) {
7002 ssnprintf->len_left = 0;
7003 ssnprintf->len = len;
7004 } else if (len >= ssnprintf->len_left) {
7005 /* no space, drive on to get length we would have written */
7006 ssnprintf->len_left = 0;
7007 ssnprintf->len += len;
7008 } else {
7009 ssnprintf->len_left -= len;
7010 ssnprintf->len += len;
7011 show->target += len;
7012 }
7013}
7014
7015int btf_type_snprintf_show(const struct btf *btf, u32 type_id, void *obj,
7016 char *buf, int len, u64 flags)
7017{
7018 struct btf_show_snprintf ssnprintf;
7019
7020 ssnprintf.show.target = buf;
7021 ssnprintf.show.flags = flags;
7022 ssnprintf.show.showfn = btf_snprintf_show;
7023 ssnprintf.len_left = len;
7024 ssnprintf.len = 0;
7025
7026 btf_type_show(btf, type_id, obj, (struct btf_show *)&ssnprintf);
7027
7028 /* If we encountered an error, return it. */
7029 if (ssnprintf.show.state.status)
7030 return ssnprintf.show.state.status;
7031
7032 /* Otherwise return length we would have written */
7033 return ssnprintf.len;
7034}
7035
7036#ifdef CONFIG_PROC_FS
7037static void bpf_btf_show_fdinfo(struct seq_file *m, struct file *filp)
7038{
7039 const struct btf *btf = filp->private_data;
7040
7041 seq_printf(m, "btf_id:\t%u\n", btf->id);
7042}
7043#endif
7044
7045static int btf_release(struct inode *inode, struct file *filp)
7046{
7047 btf_put(filp->private_data);
7048 return 0;
7049}
7050
7051const struct file_operations btf_fops = {
7052#ifdef CONFIG_PROC_FS
7053 .show_fdinfo = bpf_btf_show_fdinfo,
7054#endif
7055 .release = btf_release,
7056};
7057
7058static int __btf_new_fd(struct btf *btf)
7059{
7060 return anon_inode_getfd("btf", &btf_fops, btf, O_RDONLY | O_CLOEXEC);
7061}
7062
7063int btf_new_fd(const union bpf_attr *attr, bpfptr_t uattr)
7064{
7065 struct btf *btf;
7066 int ret;
7067
7068 btf = btf_parse(make_bpfptr(attr->btf, uattr.is_kernel),
7069 attr->btf_size, attr->btf_log_level,
7070 u64_to_user_ptr(attr->btf_log_buf),
7071 attr->btf_log_size);
7072 if (IS_ERR(btf))
7073 return PTR_ERR(btf);
7074
7075 ret = btf_alloc_id(btf);
7076 if (ret) {
7077 btf_free(btf);
7078 return ret;
7079 }
7080
7081 /*
7082 * The BTF ID is published to the userspace.
7083 * All BTF free must go through call_rcu() from
7084 * now on (i.e. free by calling btf_put()).
7085 */
7086
7087 ret = __btf_new_fd(btf);
7088 if (ret < 0)
7089 btf_put(btf);
7090
7091 return ret;
7092}
7093
7094struct btf *btf_get_by_fd(int fd)
7095{
7096 struct btf *btf;
7097 struct fd f;
7098
7099 f = fdget(fd);
7100
7101 if (!f.file)
7102 return ERR_PTR(-EBADF);
7103
7104 if (f.file->f_op != &btf_fops) {
7105 fdput(f);
7106 return ERR_PTR(-EINVAL);
7107 }
7108
7109 btf = f.file->private_data;
7110 refcount_inc(&btf->refcnt);
7111 fdput(f);
7112
7113 return btf;
7114}
7115
7116int btf_get_info_by_fd(const struct btf *btf,
7117 const union bpf_attr *attr,
7118 union bpf_attr __user *uattr)
7119{
7120 struct bpf_btf_info __user *uinfo;
7121 struct bpf_btf_info info;
7122 u32 info_copy, btf_copy;
7123 void __user *ubtf;
7124 char __user *uname;
7125 u32 uinfo_len, uname_len, name_len;
7126 int ret = 0;
7127
7128 uinfo = u64_to_user_ptr(attr->info.info);
7129 uinfo_len = attr->info.info_len;
7130
7131 info_copy = min_t(u32, uinfo_len, sizeof(info));
7132 memset(&info, 0, sizeof(info));
7133 if (copy_from_user(&info, uinfo, info_copy))
7134 return -EFAULT;
7135
7136 info.id = btf->id;
7137 ubtf = u64_to_user_ptr(info.btf);
7138 btf_copy = min_t(u32, btf->data_size, info.btf_size);
7139 if (copy_to_user(ubtf, btf->data, btf_copy))
7140 return -EFAULT;
7141 info.btf_size = btf->data_size;
7142
7143 info.kernel_btf = btf->kernel_btf;
7144
7145 uname = u64_to_user_ptr(info.name);
7146 uname_len = info.name_len;
7147 if (!uname ^ !uname_len)
7148 return -EINVAL;
7149
7150 name_len = strlen(btf->name);
7151 info.name_len = name_len;
7152
7153 if (uname) {
7154 if (uname_len >= name_len + 1) {
7155 if (copy_to_user(uname, btf->name, name_len + 1))
7156 return -EFAULT;
7157 } else {
7158 char zero = '\0';
7159
7160 if (copy_to_user(uname, btf->name, uname_len - 1))
7161 return -EFAULT;
7162 if (put_user(zero, uname + uname_len - 1))
7163 return -EFAULT;
7164 /* let user-space know about too short buffer */
7165 ret = -ENOSPC;
7166 }
7167 }
7168
7169 if (copy_to_user(uinfo, &info, info_copy) ||
7170 put_user(info_copy, &uattr->info.info_len))
7171 return -EFAULT;
7172
7173 return ret;
7174}
7175
7176int btf_get_fd_by_id(u32 id)
7177{
7178 struct btf *btf;
7179 int fd;
7180
7181 rcu_read_lock();
7182 btf = idr_find(&btf_idr, id);
7183 if (!btf || !refcount_inc_not_zero(&btf->refcnt))
7184 btf = ERR_PTR(-ENOENT);
7185 rcu_read_unlock();
7186
7187 if (IS_ERR(btf))
7188 return PTR_ERR(btf);
7189
7190 fd = __btf_new_fd(btf);
7191 if (fd < 0)
7192 btf_put(btf);
7193
7194 return fd;
7195}
7196
7197u32 btf_obj_id(const struct btf *btf)
7198{
7199 return btf->id;
7200}
7201
7202bool btf_is_kernel(const struct btf *btf)
7203{
7204 return btf->kernel_btf;
7205}
7206
7207bool btf_is_module(const struct btf *btf)
7208{
7209 return btf->kernel_btf && strcmp(btf->name, "vmlinux") != 0;
7210}
7211
7212enum {
7213 BTF_MODULE_F_LIVE = (1 << 0),
7214};
7215
7216#ifdef CONFIG_DEBUG_INFO_BTF_MODULES
7217struct btf_module {
7218 struct list_head list;
7219 struct module *module;
7220 struct btf *btf;
7221 struct bin_attribute *sysfs_attr;
7222 int flags;
7223};
7224
7225static LIST_HEAD(btf_modules);
7226static DEFINE_MUTEX(btf_module_mutex);
7227
7228static ssize_t
7229btf_module_read(struct file *file, struct kobject *kobj,
7230 struct bin_attribute *bin_attr,
7231 char *buf, loff_t off, size_t len)
7232{
7233 const struct btf *btf = bin_attr->private;
7234
7235 memcpy(buf, btf->data + off, len);
7236 return len;
7237}
7238
7239static void purge_cand_cache(struct btf *btf);
7240
7241static int btf_module_notify(struct notifier_block *nb, unsigned long op,
7242 void *module)
7243{
7244 struct btf_module *btf_mod, *tmp;
7245 struct module *mod = module;
7246 struct btf *btf;
7247 int err = 0;
7248
7249 if (mod->btf_data_size == 0 ||
7250 (op != MODULE_STATE_COMING && op != MODULE_STATE_LIVE &&
7251 op != MODULE_STATE_GOING))
7252 goto out;
7253
7254 switch (op) {
7255 case MODULE_STATE_COMING:
7256 btf_mod = kzalloc(sizeof(*btf_mod), GFP_KERNEL);
7257 if (!btf_mod) {
7258 err = -ENOMEM;
7259 goto out;
7260 }
7261 btf = btf_parse_module(mod->name, mod->btf_data, mod->btf_data_size);
7262 if (IS_ERR(btf)) {
7263 pr_warn("failed to validate module [%s] BTF: %ld\n",
7264 mod->name, PTR_ERR(btf));
7265 kfree(btf_mod);
7266 if (!IS_ENABLED(CONFIG_MODULE_ALLOW_BTF_MISMATCH))
7267 err = PTR_ERR(btf);
7268 goto out;
7269 }
7270 err = btf_alloc_id(btf);
7271 if (err) {
7272 btf_free(btf);
7273 kfree(btf_mod);
7274 goto out;
7275 }
7276
7277 purge_cand_cache(NULL);
7278 mutex_lock(&btf_module_mutex);
7279 btf_mod->module = module;
7280 btf_mod->btf = btf;
7281 list_add(&btf_mod->list, &btf_modules);
7282 mutex_unlock(&btf_module_mutex);
7283
7284 if (IS_ENABLED(CONFIG_SYSFS)) {
7285 struct bin_attribute *attr;
7286
7287 attr = kzalloc(sizeof(*attr), GFP_KERNEL);
7288 if (!attr)
7289 goto out;
7290
7291 sysfs_bin_attr_init(attr);
7292 attr->attr.name = btf->name;
7293 attr->attr.mode = 0444;
7294 attr->size = btf->data_size;
7295 attr->private = btf;
7296 attr->read = btf_module_read;
7297
7298 err = sysfs_create_bin_file(btf_kobj, attr);
7299 if (err) {
7300 pr_warn("failed to register module [%s] BTF in sysfs: %d\n",
7301 mod->name, err);
7302 kfree(attr);
7303 err = 0;
7304 goto out;
7305 }
7306
7307 btf_mod->sysfs_attr = attr;
7308 }
7309
7310 break;
7311 case MODULE_STATE_LIVE:
7312 mutex_lock(&btf_module_mutex);
7313 list_for_each_entry_safe(btf_mod, tmp, &btf_modules, list) {
7314 if (btf_mod->module != module)
7315 continue;
7316
7317 btf_mod->flags |= BTF_MODULE_F_LIVE;
7318 break;
7319 }
7320 mutex_unlock(&btf_module_mutex);
7321 break;
7322 case MODULE_STATE_GOING:
7323 mutex_lock(&btf_module_mutex);
7324 list_for_each_entry_safe(btf_mod, tmp, &btf_modules, list) {
7325 if (btf_mod->module != module)
7326 continue;
7327
7328 list_del(&btf_mod->list);
7329 if (btf_mod->sysfs_attr)
7330 sysfs_remove_bin_file(btf_kobj, btf_mod->sysfs_attr);
7331 purge_cand_cache(btf_mod->btf);
7332 btf_put(btf_mod->btf);
7333 kfree(btf_mod->sysfs_attr);
7334 kfree(btf_mod);
7335 break;
7336 }
7337 mutex_unlock(&btf_module_mutex);
7338 break;
7339 }
7340out:
7341 return notifier_from_errno(err);
7342}
7343
7344static struct notifier_block btf_module_nb = {
7345 .notifier_call = btf_module_notify,
7346};
7347
7348static int __init btf_module_init(void)
7349{
7350 register_module_notifier(&btf_module_nb);
7351 return 0;
7352}
7353
7354fs_initcall(btf_module_init);
7355#endif /* CONFIG_DEBUG_INFO_BTF_MODULES */
7356
7357struct module *btf_try_get_module(const struct btf *btf)
7358{
7359 struct module *res = NULL;
7360#ifdef CONFIG_DEBUG_INFO_BTF_MODULES
7361 struct btf_module *btf_mod, *tmp;
7362
7363 mutex_lock(&btf_module_mutex);
7364 list_for_each_entry_safe(btf_mod, tmp, &btf_modules, list) {
7365 if (btf_mod->btf != btf)
7366 continue;
7367
7368 /* We must only consider module whose __init routine has
7369 * finished, hence we must check for BTF_MODULE_F_LIVE flag,
7370 * which is set from the notifier callback for
7371 * MODULE_STATE_LIVE.
7372 */
7373 if ((btf_mod->flags & BTF_MODULE_F_LIVE) && try_module_get(btf_mod->module))
7374 res = btf_mod->module;
7375
7376 break;
7377 }
7378 mutex_unlock(&btf_module_mutex);
7379#endif
7380
7381 return res;
7382}
7383
7384/* Returns struct btf corresponding to the struct module.
7385 * This function can return NULL or ERR_PTR.
7386 */
7387static struct btf *btf_get_module_btf(const struct module *module)
7388{
7389#ifdef CONFIG_DEBUG_INFO_BTF_MODULES
7390 struct btf_module *btf_mod, *tmp;
7391#endif
7392 struct btf *btf = NULL;
7393
7394 if (!module) {
7395 btf = bpf_get_btf_vmlinux();
7396 if (!IS_ERR_OR_NULL(btf))
7397 btf_get(btf);
7398 return btf;
7399 }
7400
7401#ifdef CONFIG_DEBUG_INFO_BTF_MODULES
7402 mutex_lock(&btf_module_mutex);
7403 list_for_each_entry_safe(btf_mod, tmp, &btf_modules, list) {
7404 if (btf_mod->module != module)
7405 continue;
7406
7407 btf_get(btf_mod->btf);
7408 btf = btf_mod->btf;
7409 break;
7410 }
7411 mutex_unlock(&btf_module_mutex);
7412#endif
7413
7414 return btf;
7415}
7416
7417BPF_CALL_4(bpf_btf_find_by_name_kind, char *, name, int, name_sz, u32, kind, int, flags)
7418{
7419 struct btf *btf = NULL;
7420 int btf_obj_fd = 0;
7421 long ret;
7422
7423 if (flags)
7424 return -EINVAL;
7425
7426 if (name_sz <= 1 || name[name_sz - 1])
7427 return -EINVAL;
7428
7429 ret = bpf_find_btf_id(name, kind, &btf);
7430 if (ret > 0 && btf_is_module(btf)) {
7431 btf_obj_fd = __btf_new_fd(btf);
7432 if (btf_obj_fd < 0) {
7433 btf_put(btf);
7434 return btf_obj_fd;
7435 }
7436 return ret | (((u64)btf_obj_fd) << 32);
7437 }
7438 if (ret > 0)
7439 btf_put(btf);
7440 return ret;
7441}
7442
7443const struct bpf_func_proto bpf_btf_find_by_name_kind_proto = {
7444 .func = bpf_btf_find_by_name_kind,
7445 .gpl_only = false,
7446 .ret_type = RET_INTEGER,
7447 .arg1_type = ARG_PTR_TO_MEM | MEM_RDONLY,
7448 .arg2_type = ARG_CONST_SIZE,
7449 .arg3_type = ARG_ANYTHING,
7450 .arg4_type = ARG_ANYTHING,
7451};
7452
7453BTF_ID_LIST_GLOBAL(btf_tracing_ids, MAX_BTF_TRACING_TYPE)
7454#define BTF_TRACING_TYPE(name, type) BTF_ID(struct, type)
7455BTF_TRACING_TYPE_xxx
7456#undef BTF_TRACING_TYPE
7457
7458/* Kernel Function (kfunc) BTF ID set registration API */
7459
7460static int btf_populate_kfunc_set(struct btf *btf, enum btf_kfunc_hook hook,
7461 struct btf_id_set8 *add_set)
7462{
7463 bool vmlinux_set = !btf_is_module(btf);
7464 struct btf_kfunc_set_tab *tab;
7465 struct btf_id_set8 *set;
7466 u32 set_cnt;
7467 int ret;
7468
7469 if (hook >= BTF_KFUNC_HOOK_MAX) {
7470 ret = -EINVAL;
7471 goto end;
7472 }
7473
7474 if (!add_set->cnt)
7475 return 0;
7476
7477 tab = btf->kfunc_set_tab;
7478 if (!tab) {
7479 tab = kzalloc(sizeof(*tab), GFP_KERNEL | __GFP_NOWARN);
7480 if (!tab)
7481 return -ENOMEM;
7482 btf->kfunc_set_tab = tab;
7483 }
7484
7485 set = tab->sets[hook];
7486 /* Warn when register_btf_kfunc_id_set is called twice for the same hook
7487 * for module sets.
7488 */
7489 if (WARN_ON_ONCE(set && !vmlinux_set)) {
7490 ret = -EINVAL;
7491 goto end;
7492 }
7493
7494 /* We don't need to allocate, concatenate, and sort module sets, because
7495 * only one is allowed per hook. Hence, we can directly assign the
7496 * pointer and return.
7497 */
7498 if (!vmlinux_set) {
7499 tab->sets[hook] = add_set;
7500 return 0;
7501 }
7502
7503 /* In case of vmlinux sets, there may be more than one set being
7504 * registered per hook. To create a unified set, we allocate a new set
7505 * and concatenate all individual sets being registered. While each set
7506 * is individually sorted, they may become unsorted when concatenated,
7507 * hence re-sorting the final set again is required to make binary
7508 * searching the set using btf_id_set8_contains function work.
7509 */
7510 set_cnt = set ? set->cnt : 0;
7511
7512 if (set_cnt > U32_MAX - add_set->cnt) {
7513 ret = -EOVERFLOW;
7514 goto end;
7515 }
7516
7517 if (set_cnt + add_set->cnt > BTF_KFUNC_SET_MAX_CNT) {
7518 ret = -E2BIG;
7519 goto end;
7520 }
7521
7522 /* Grow set */
7523 set = krealloc(tab->sets[hook],
7524 offsetof(struct btf_id_set8, pairs[set_cnt + add_set->cnt]),
7525 GFP_KERNEL | __GFP_NOWARN);
7526 if (!set) {
7527 ret = -ENOMEM;
7528 goto end;
7529 }
7530
7531 /* For newly allocated set, initialize set->cnt to 0 */
7532 if (!tab->sets[hook])
7533 set->cnt = 0;
7534 tab->sets[hook] = set;
7535
7536 /* Concatenate the two sets */
7537 memcpy(set->pairs + set->cnt, add_set->pairs, add_set->cnt * sizeof(set->pairs[0]));
7538 set->cnt += add_set->cnt;
7539
7540 sort(set->pairs, set->cnt, sizeof(set->pairs[0]), btf_id_cmp_func, NULL);
7541
7542 return 0;
7543end:
7544 btf_free_kfunc_set_tab(btf);
7545 return ret;
7546}
7547
7548static u32 *__btf_kfunc_id_set_contains(const struct btf *btf,
7549 enum btf_kfunc_hook hook,
7550 u32 kfunc_btf_id)
7551{
7552 struct btf_id_set8 *set;
7553 u32 *id;
7554
7555 if (hook >= BTF_KFUNC_HOOK_MAX)
7556 return NULL;
7557 if (!btf->kfunc_set_tab)
7558 return NULL;
7559 set = btf->kfunc_set_tab->sets[hook];
7560 if (!set)
7561 return NULL;
7562 id = btf_id_set8_contains(set, kfunc_btf_id);
7563 if (!id)
7564 return NULL;
7565 /* The flags for BTF ID are located next to it */
7566 return id + 1;
7567}
7568
7569static int bpf_prog_type_to_kfunc_hook(enum bpf_prog_type prog_type)
7570{
7571 switch (prog_type) {
7572 case BPF_PROG_TYPE_UNSPEC:
7573 return BTF_KFUNC_HOOK_COMMON;
7574 case BPF_PROG_TYPE_XDP:
7575 return BTF_KFUNC_HOOK_XDP;
7576 case BPF_PROG_TYPE_SCHED_CLS:
7577 return BTF_KFUNC_HOOK_TC;
7578 case BPF_PROG_TYPE_STRUCT_OPS:
7579 return BTF_KFUNC_HOOK_STRUCT_OPS;
7580 case BPF_PROG_TYPE_TRACING:
7581 case BPF_PROG_TYPE_LSM:
7582 return BTF_KFUNC_HOOK_TRACING;
7583 case BPF_PROG_TYPE_SYSCALL:
7584 return BTF_KFUNC_HOOK_SYSCALL;
7585 default:
7586 return BTF_KFUNC_HOOK_MAX;
7587 }
7588}
7589
7590/* Caution:
7591 * Reference to the module (obtained using btf_try_get_module) corresponding to
7592 * the struct btf *MUST* be held when calling this function from verifier
7593 * context. This is usually true as we stash references in prog's kfunc_btf_tab;
7594 * keeping the reference for the duration of the call provides the necessary
7595 * protection for looking up a well-formed btf->kfunc_set_tab.
7596 */
7597u32 *btf_kfunc_id_set_contains(const struct btf *btf,
7598 enum bpf_prog_type prog_type,
7599 u32 kfunc_btf_id)
7600{
7601 enum btf_kfunc_hook hook;
7602 u32 *kfunc_flags;
7603
7604 kfunc_flags = __btf_kfunc_id_set_contains(btf, BTF_KFUNC_HOOK_COMMON, kfunc_btf_id);
7605 if (kfunc_flags)
7606 return kfunc_flags;
7607
7608 hook = bpf_prog_type_to_kfunc_hook(prog_type);
7609 return __btf_kfunc_id_set_contains(btf, hook, kfunc_btf_id);
7610}
7611
7612u32 *btf_kfunc_is_modify_return(const struct btf *btf, u32 kfunc_btf_id)
7613{
7614 return __btf_kfunc_id_set_contains(btf, BTF_KFUNC_HOOK_FMODRET, kfunc_btf_id);
7615}
7616
7617static int __register_btf_kfunc_id_set(enum btf_kfunc_hook hook,
7618 const struct btf_kfunc_id_set *kset)
7619{
7620 struct btf *btf;
7621 int ret;
7622
7623 btf = btf_get_module_btf(kset->owner);
7624 if (!btf) {
7625 if (!kset->owner && IS_ENABLED(CONFIG_DEBUG_INFO_BTF)) {
7626 pr_err("missing vmlinux BTF, cannot register kfuncs\n");
7627 return -ENOENT;
7628 }
7629 if (kset->owner && IS_ENABLED(CONFIG_DEBUG_INFO_BTF_MODULES)) {
7630 pr_err("missing module BTF, cannot register kfuncs\n");
7631 return -ENOENT;
7632 }
7633 return 0;
7634 }
7635 if (IS_ERR(btf))
7636 return PTR_ERR(btf);
7637
7638 ret = btf_populate_kfunc_set(btf, hook, kset->set);
7639 btf_put(btf);
7640 return ret;
7641}
7642
7643/* This function must be invoked only from initcalls/module init functions */
7644int register_btf_kfunc_id_set(enum bpf_prog_type prog_type,
7645 const struct btf_kfunc_id_set *kset)
7646{
7647 enum btf_kfunc_hook hook;
7648
7649 hook = bpf_prog_type_to_kfunc_hook(prog_type);
7650 return __register_btf_kfunc_id_set(hook, kset);
7651}
7652EXPORT_SYMBOL_GPL(register_btf_kfunc_id_set);
7653
7654/* This function must be invoked only from initcalls/module init functions */
7655int register_btf_fmodret_id_set(const struct btf_kfunc_id_set *kset)
7656{
7657 return __register_btf_kfunc_id_set(BTF_KFUNC_HOOK_FMODRET, kset);
7658}
7659EXPORT_SYMBOL_GPL(register_btf_fmodret_id_set);
7660
7661s32 btf_find_dtor_kfunc(struct btf *btf, u32 btf_id)
7662{
7663 struct btf_id_dtor_kfunc_tab *tab = btf->dtor_kfunc_tab;
7664 struct btf_id_dtor_kfunc *dtor;
7665
7666 if (!tab)
7667 return -ENOENT;
7668 /* Even though the size of tab->dtors[0] is > sizeof(u32), we only need
7669 * to compare the first u32 with btf_id, so we can reuse btf_id_cmp_func.
7670 */
7671 BUILD_BUG_ON(offsetof(struct btf_id_dtor_kfunc, btf_id) != 0);
7672 dtor = bsearch(&btf_id, tab->dtors, tab->cnt, sizeof(tab->dtors[0]), btf_id_cmp_func);
7673 if (!dtor)
7674 return -ENOENT;
7675 return dtor->kfunc_btf_id;
7676}
7677
7678static int btf_check_dtor_kfuncs(struct btf *btf, const struct btf_id_dtor_kfunc *dtors, u32 cnt)
7679{
7680 const struct btf_type *dtor_func, *dtor_func_proto, *t;
7681 const struct btf_param *args;
7682 s32 dtor_btf_id;
7683 u32 nr_args, i;
7684
7685 for (i = 0; i < cnt; i++) {
7686 dtor_btf_id = dtors[i].kfunc_btf_id;
7687
7688 dtor_func = btf_type_by_id(btf, dtor_btf_id);
7689 if (!dtor_func || !btf_type_is_func(dtor_func))
7690 return -EINVAL;
7691
7692 dtor_func_proto = btf_type_by_id(btf, dtor_func->type);
7693 if (!dtor_func_proto || !btf_type_is_func_proto(dtor_func_proto))
7694 return -EINVAL;
7695
7696 /* Make sure the prototype of the destructor kfunc is 'void func(type *)' */
7697 t = btf_type_by_id(btf, dtor_func_proto->type);
7698 if (!t || !btf_type_is_void(t))
7699 return -EINVAL;
7700
7701 nr_args = btf_type_vlen(dtor_func_proto);
7702 if (nr_args != 1)
7703 return -EINVAL;
7704 args = btf_params(dtor_func_proto);
7705 t = btf_type_by_id(btf, args[0].type);
7706 /* Allow any pointer type, as width on targets Linux supports
7707 * will be same for all pointer types (i.e. sizeof(void *))
7708 */
7709 if (!t || !btf_type_is_ptr(t))
7710 return -EINVAL;
7711 }
7712 return 0;
7713}
7714
7715/* This function must be invoked only from initcalls/module init functions */
7716int register_btf_id_dtor_kfuncs(const struct btf_id_dtor_kfunc *dtors, u32 add_cnt,
7717 struct module *owner)
7718{
7719 struct btf_id_dtor_kfunc_tab *tab;
7720 struct btf *btf;
7721 u32 tab_cnt;
7722 int ret;
7723
7724 btf = btf_get_module_btf(owner);
7725 if (!btf) {
7726 if (!owner && IS_ENABLED(CONFIG_DEBUG_INFO_BTF)) {
7727 pr_err("missing vmlinux BTF, cannot register dtor kfuncs\n");
7728 return -ENOENT;
7729 }
7730 if (owner && IS_ENABLED(CONFIG_DEBUG_INFO_BTF_MODULES)) {
7731 pr_err("missing module BTF, cannot register dtor kfuncs\n");
7732 return -ENOENT;
7733 }
7734 return 0;
7735 }
7736 if (IS_ERR(btf))
7737 return PTR_ERR(btf);
7738
7739 if (add_cnt >= BTF_DTOR_KFUNC_MAX_CNT) {
7740 pr_err("cannot register more than %d kfunc destructors\n", BTF_DTOR_KFUNC_MAX_CNT);
7741 ret = -E2BIG;
7742 goto end;
7743 }
7744
7745 /* Ensure that the prototype of dtor kfuncs being registered is sane */
7746 ret = btf_check_dtor_kfuncs(btf, dtors, add_cnt);
7747 if (ret < 0)
7748 goto end;
7749
7750 tab = btf->dtor_kfunc_tab;
7751 /* Only one call allowed for modules */
7752 if (WARN_ON_ONCE(tab && btf_is_module(btf))) {
7753 ret = -EINVAL;
7754 goto end;
7755 }
7756
7757 tab_cnt = tab ? tab->cnt : 0;
7758 if (tab_cnt > U32_MAX - add_cnt) {
7759 ret = -EOVERFLOW;
7760 goto end;
7761 }
7762 if (tab_cnt + add_cnt >= BTF_DTOR_KFUNC_MAX_CNT) {
7763 pr_err("cannot register more than %d kfunc destructors\n", BTF_DTOR_KFUNC_MAX_CNT);
7764 ret = -E2BIG;
7765 goto end;
7766 }
7767
7768 tab = krealloc(btf->dtor_kfunc_tab,
7769 offsetof(struct btf_id_dtor_kfunc_tab, dtors[tab_cnt + add_cnt]),
7770 GFP_KERNEL | __GFP_NOWARN);
7771 if (!tab) {
7772 ret = -ENOMEM;
7773 goto end;
7774 }
7775
7776 if (!btf->dtor_kfunc_tab)
7777 tab->cnt = 0;
7778 btf->dtor_kfunc_tab = tab;
7779
7780 memcpy(tab->dtors + tab->cnt, dtors, add_cnt * sizeof(tab->dtors[0]));
7781 tab->cnt += add_cnt;
7782
7783 sort(tab->dtors, tab->cnt, sizeof(tab->dtors[0]), btf_id_cmp_func, NULL);
7784
7785end:
7786 if (ret)
7787 btf_free_dtor_kfunc_tab(btf);
7788 btf_put(btf);
7789 return ret;
7790}
7791EXPORT_SYMBOL_GPL(register_btf_id_dtor_kfuncs);
7792
7793#define MAX_TYPES_ARE_COMPAT_DEPTH 2
7794
7795/* Check local and target types for compatibility. This check is used for
7796 * type-based CO-RE relocations and follow slightly different rules than
7797 * field-based relocations. This function assumes that root types were already
7798 * checked for name match. Beyond that initial root-level name check, names
7799 * are completely ignored. Compatibility rules are as follows:
7800 * - any two STRUCTs/UNIONs/FWDs/ENUMs/INTs/ENUM64s are considered compatible, but
7801 * kind should match for local and target types (i.e., STRUCT is not
7802 * compatible with UNION);
7803 * - for ENUMs/ENUM64s, the size is ignored;
7804 * - for INT, size and signedness are ignored;
7805 * - for ARRAY, dimensionality is ignored, element types are checked for
7806 * compatibility recursively;
7807 * - CONST/VOLATILE/RESTRICT modifiers are ignored;
7808 * - TYPEDEFs/PTRs are compatible if types they pointing to are compatible;
7809 * - FUNC_PROTOs are compatible if they have compatible signature: same
7810 * number of input args and compatible return and argument types.
7811 * These rules are not set in stone and probably will be adjusted as we get
7812 * more experience with using BPF CO-RE relocations.
7813 */
7814int bpf_core_types_are_compat(const struct btf *local_btf, __u32 local_id,
7815 const struct btf *targ_btf, __u32 targ_id)
7816{
7817 return __bpf_core_types_are_compat(local_btf, local_id, targ_btf, targ_id,
7818 MAX_TYPES_ARE_COMPAT_DEPTH);
7819}
7820
7821#define MAX_TYPES_MATCH_DEPTH 2
7822
7823int bpf_core_types_match(const struct btf *local_btf, u32 local_id,
7824 const struct btf *targ_btf, u32 targ_id)
7825{
7826 return __bpf_core_types_match(local_btf, local_id, targ_btf, targ_id, false,
7827 MAX_TYPES_MATCH_DEPTH);
7828}
7829
7830static bool bpf_core_is_flavor_sep(const char *s)
7831{
7832 /* check X___Y name pattern, where X and Y are not underscores */
7833 return s[0] != '_' && /* X */
7834 s[1] == '_' && s[2] == '_' && s[3] == '_' && /* ___ */
7835 s[4] != '_'; /* Y */
7836}
7837
7838size_t bpf_core_essential_name_len(const char *name)
7839{
7840 size_t n = strlen(name);
7841 int i;
7842
7843 for (i = n - 5; i >= 0; i--) {
7844 if (bpf_core_is_flavor_sep(name + i))
7845 return i + 1;
7846 }
7847 return n;
7848}
7849
7850struct bpf_cand_cache {
7851 const char *name;
7852 u32 name_len;
7853 u16 kind;
7854 u16 cnt;
7855 struct {
7856 const struct btf *btf;
7857 u32 id;
7858 } cands[];
7859};
7860
7861static void bpf_free_cands(struct bpf_cand_cache *cands)
7862{
7863 if (!cands->cnt)
7864 /* empty candidate array was allocated on stack */
7865 return;
7866 kfree(cands);
7867}
7868
7869static void bpf_free_cands_from_cache(struct bpf_cand_cache *cands)
7870{
7871 kfree(cands->name);
7872 kfree(cands);
7873}
7874
7875#define VMLINUX_CAND_CACHE_SIZE 31
7876static struct bpf_cand_cache *vmlinux_cand_cache[VMLINUX_CAND_CACHE_SIZE];
7877
7878#define MODULE_CAND_CACHE_SIZE 31
7879static struct bpf_cand_cache *module_cand_cache[MODULE_CAND_CACHE_SIZE];
7880
7881static DEFINE_MUTEX(cand_cache_mutex);
7882
7883static void __print_cand_cache(struct bpf_verifier_log *log,
7884 struct bpf_cand_cache **cache,
7885 int cache_size)
7886{
7887 struct bpf_cand_cache *cc;
7888 int i, j;
7889
7890 for (i = 0; i < cache_size; i++) {
7891 cc = cache[i];
7892 if (!cc)
7893 continue;
7894 bpf_log(log, "[%d]%s(", i, cc->name);
7895 for (j = 0; j < cc->cnt; j++) {
7896 bpf_log(log, "%d", cc->cands[j].id);
7897 if (j < cc->cnt - 1)
7898 bpf_log(log, " ");
7899 }
7900 bpf_log(log, "), ");
7901 }
7902}
7903
7904static void print_cand_cache(struct bpf_verifier_log *log)
7905{
7906 mutex_lock(&cand_cache_mutex);
7907 bpf_log(log, "vmlinux_cand_cache:");
7908 __print_cand_cache(log, vmlinux_cand_cache, VMLINUX_CAND_CACHE_SIZE);
7909 bpf_log(log, "\nmodule_cand_cache:");
7910 __print_cand_cache(log, module_cand_cache, MODULE_CAND_CACHE_SIZE);
7911 bpf_log(log, "\n");
7912 mutex_unlock(&cand_cache_mutex);
7913}
7914
7915static u32 hash_cands(struct bpf_cand_cache *cands)
7916{
7917 return jhash(cands->name, cands->name_len, 0);
7918}
7919
7920static struct bpf_cand_cache *check_cand_cache(struct bpf_cand_cache *cands,
7921 struct bpf_cand_cache **cache,
7922 int cache_size)
7923{
7924 struct bpf_cand_cache *cc = cache[hash_cands(cands) % cache_size];
7925
7926 if (cc && cc->name_len == cands->name_len &&
7927 !strncmp(cc->name, cands->name, cands->name_len))
7928 return cc;
7929 return NULL;
7930}
7931
7932static size_t sizeof_cands(int cnt)
7933{
7934 return offsetof(struct bpf_cand_cache, cands[cnt]);
7935}
7936
7937static struct bpf_cand_cache *populate_cand_cache(struct bpf_cand_cache *cands,
7938 struct bpf_cand_cache **cache,
7939 int cache_size)
7940{
7941 struct bpf_cand_cache **cc = &cache[hash_cands(cands) % cache_size], *new_cands;
7942
7943 if (*cc) {
7944 bpf_free_cands_from_cache(*cc);
7945 *cc = NULL;
7946 }
7947 new_cands = kmemdup(cands, sizeof_cands(cands->cnt), GFP_KERNEL);
7948 if (!new_cands) {
7949 bpf_free_cands(cands);
7950 return ERR_PTR(-ENOMEM);
7951 }
7952 /* strdup the name, since it will stay in cache.
7953 * the cands->name points to strings in prog's BTF and the prog can be unloaded.
7954 */
7955 new_cands->name = kmemdup_nul(cands->name, cands->name_len, GFP_KERNEL);
7956 bpf_free_cands(cands);
7957 if (!new_cands->name) {
7958 kfree(new_cands);
7959 return ERR_PTR(-ENOMEM);
7960 }
7961 *cc = new_cands;
7962 return new_cands;
7963}
7964
7965#ifdef CONFIG_DEBUG_INFO_BTF_MODULES
7966static void __purge_cand_cache(struct btf *btf, struct bpf_cand_cache **cache,
7967 int cache_size)
7968{
7969 struct bpf_cand_cache *cc;
7970 int i, j;
7971
7972 for (i = 0; i < cache_size; i++) {
7973 cc = cache[i];
7974 if (!cc)
7975 continue;
7976 if (!btf) {
7977 /* when new module is loaded purge all of module_cand_cache,
7978 * since new module might have candidates with the name
7979 * that matches cached cands.
7980 */
7981 bpf_free_cands_from_cache(cc);
7982 cache[i] = NULL;
7983 continue;
7984 }
7985 /* when module is unloaded purge cache entries
7986 * that match module's btf
7987 */
7988 for (j = 0; j < cc->cnt; j++)
7989 if (cc->cands[j].btf == btf) {
7990 bpf_free_cands_from_cache(cc);
7991 cache[i] = NULL;
7992 break;
7993 }
7994 }
7995
7996}
7997
7998static void purge_cand_cache(struct btf *btf)
7999{
8000 mutex_lock(&cand_cache_mutex);
8001 __purge_cand_cache(btf, module_cand_cache, MODULE_CAND_CACHE_SIZE);
8002 mutex_unlock(&cand_cache_mutex);
8003}
8004#endif
8005
8006static struct bpf_cand_cache *
8007bpf_core_add_cands(struct bpf_cand_cache *cands, const struct btf *targ_btf,
8008 int targ_start_id)
8009{
8010 struct bpf_cand_cache *new_cands;
8011 const struct btf_type *t;
8012 const char *targ_name;
8013 size_t targ_essent_len;
8014 int n, i;
8015
8016 n = btf_nr_types(targ_btf);
8017 for (i = targ_start_id; i < n; i++) {
8018 t = btf_type_by_id(targ_btf, i);
8019 if (btf_kind(t) != cands->kind)
8020 continue;
8021
8022 targ_name = btf_name_by_offset(targ_btf, t->name_off);
8023 if (!targ_name)
8024 continue;
8025
8026 /* the resched point is before strncmp to make sure that search
8027 * for non-existing name will have a chance to schedule().
8028 */
8029 cond_resched();
8030
8031 if (strncmp(cands->name, targ_name, cands->name_len) != 0)
8032 continue;
8033
8034 targ_essent_len = bpf_core_essential_name_len(targ_name);
8035 if (targ_essent_len != cands->name_len)
8036 continue;
8037
8038 /* most of the time there is only one candidate for a given kind+name pair */
8039 new_cands = kmalloc(sizeof_cands(cands->cnt + 1), GFP_KERNEL);
8040 if (!new_cands) {
8041 bpf_free_cands(cands);
8042 return ERR_PTR(-ENOMEM);
8043 }
8044
8045 memcpy(new_cands, cands, sizeof_cands(cands->cnt));
8046 bpf_free_cands(cands);
8047 cands = new_cands;
8048 cands->cands[cands->cnt].btf = targ_btf;
8049 cands->cands[cands->cnt].id = i;
8050 cands->cnt++;
8051 }
8052 return cands;
8053}
8054
8055static struct bpf_cand_cache *
8056bpf_core_find_cands(struct bpf_core_ctx *ctx, u32 local_type_id)
8057{
8058 struct bpf_cand_cache *cands, *cc, local_cand = {};
8059 const struct btf *local_btf = ctx->btf;
8060 const struct btf_type *local_type;
8061 const struct btf *main_btf;
8062 size_t local_essent_len;
8063 struct btf *mod_btf;
8064 const char *name;
8065 int id;
8066
8067 main_btf = bpf_get_btf_vmlinux();
8068 if (IS_ERR(main_btf))
8069 return ERR_CAST(main_btf);
8070 if (!main_btf)
8071 return ERR_PTR(-EINVAL);
8072
8073 local_type = btf_type_by_id(local_btf, local_type_id);
8074 if (!local_type)
8075 return ERR_PTR(-EINVAL);
8076
8077 name = btf_name_by_offset(local_btf, local_type->name_off);
8078 if (str_is_empty(name))
8079 return ERR_PTR(-EINVAL);
8080 local_essent_len = bpf_core_essential_name_len(name);
8081
8082 cands = &local_cand;
8083 cands->name = name;
8084 cands->kind = btf_kind(local_type);
8085 cands->name_len = local_essent_len;
8086
8087 cc = check_cand_cache(cands, vmlinux_cand_cache, VMLINUX_CAND_CACHE_SIZE);
8088 /* cands is a pointer to stack here */
8089 if (cc) {
8090 if (cc->cnt)
8091 return cc;
8092 goto check_modules;
8093 }
8094
8095 /* Attempt to find target candidates in vmlinux BTF first */
8096 cands = bpf_core_add_cands(cands, main_btf, 1);
8097 if (IS_ERR(cands))
8098 return ERR_CAST(cands);
8099
8100 /* cands is a pointer to kmalloced memory here if cands->cnt > 0 */
8101
8102 /* populate cache even when cands->cnt == 0 */
8103 cc = populate_cand_cache(cands, vmlinux_cand_cache, VMLINUX_CAND_CACHE_SIZE);
8104 if (IS_ERR(cc))
8105 return ERR_CAST(cc);
8106
8107 /* if vmlinux BTF has any candidate, don't go for module BTFs */
8108 if (cc->cnt)
8109 return cc;
8110
8111check_modules:
8112 /* cands is a pointer to stack here and cands->cnt == 0 */
8113 cc = check_cand_cache(cands, module_cand_cache, MODULE_CAND_CACHE_SIZE);
8114 if (cc)
8115 /* if cache has it return it even if cc->cnt == 0 */
8116 return cc;
8117
8118 /* If candidate is not found in vmlinux's BTF then search in module's BTFs */
8119 spin_lock_bh(&btf_idr_lock);
8120 idr_for_each_entry(&btf_idr, mod_btf, id) {
8121 if (!btf_is_module(mod_btf))
8122 continue;
8123 /* linear search could be slow hence unlock/lock
8124 * the IDR to avoiding holding it for too long
8125 */
8126 btf_get(mod_btf);
8127 spin_unlock_bh(&btf_idr_lock);
8128 cands = bpf_core_add_cands(cands, mod_btf, btf_nr_types(main_btf));
8129 if (IS_ERR(cands)) {
8130 btf_put(mod_btf);
8131 return ERR_CAST(cands);
8132 }
8133 spin_lock_bh(&btf_idr_lock);
8134 btf_put(mod_btf);
8135 }
8136 spin_unlock_bh(&btf_idr_lock);
8137 /* cands is a pointer to kmalloced memory here if cands->cnt > 0
8138 * or pointer to stack if cands->cnd == 0.
8139 * Copy it into the cache even when cands->cnt == 0 and
8140 * return the result.
8141 */
8142 return populate_cand_cache(cands, module_cand_cache, MODULE_CAND_CACHE_SIZE);
8143}
8144
8145int bpf_core_apply(struct bpf_core_ctx *ctx, const struct bpf_core_relo *relo,
8146 int relo_idx, void *insn)
8147{
8148 bool need_cands = relo->kind != BPF_CORE_TYPE_ID_LOCAL;
8149 struct bpf_core_cand_list cands = {};
8150 struct bpf_core_relo_res targ_res;
8151 struct bpf_core_spec *specs;
8152 int err;
8153
8154 /* ~4k of temp memory necessary to convert LLVM spec like "0:1:0:5"
8155 * into arrays of btf_ids of struct fields and array indices.
8156 */
8157 specs = kcalloc(3, sizeof(*specs), GFP_KERNEL);
8158 if (!specs)
8159 return -ENOMEM;
8160
8161 if (need_cands) {
8162 struct bpf_cand_cache *cc;
8163 int i;
8164
8165 mutex_lock(&cand_cache_mutex);
8166 cc = bpf_core_find_cands(ctx, relo->type_id);
8167 if (IS_ERR(cc)) {
8168 bpf_log(ctx->log, "target candidate search failed for %d\n",
8169 relo->type_id);
8170 err = PTR_ERR(cc);
8171 goto out;
8172 }
8173 if (cc->cnt) {
8174 cands.cands = kcalloc(cc->cnt, sizeof(*cands.cands), GFP_KERNEL);
8175 if (!cands.cands) {
8176 err = -ENOMEM;
8177 goto out;
8178 }
8179 }
8180 for (i = 0; i < cc->cnt; i++) {
8181 bpf_log(ctx->log,
8182 "CO-RE relocating %s %s: found target candidate [%d]\n",
8183 btf_kind_str[cc->kind], cc->name, cc->cands[i].id);
8184 cands.cands[i].btf = cc->cands[i].btf;
8185 cands.cands[i].id = cc->cands[i].id;
8186 }
8187 cands.len = cc->cnt;
8188 /* cand_cache_mutex needs to span the cache lookup and
8189 * copy of btf pointer into bpf_core_cand_list,
8190 * since module can be unloaded while bpf_core_calc_relo_insn
8191 * is working with module's btf.
8192 */
8193 }
8194
8195 err = bpf_core_calc_relo_insn((void *)ctx->log, relo, relo_idx, ctx->btf, &cands, specs,
8196 &targ_res);
8197 if (err)
8198 goto out;
8199
8200 err = bpf_core_patch_insn((void *)ctx->log, insn, relo->insn_off / 8, relo, relo_idx,
8201 &targ_res);
8202
8203out:
8204 kfree(specs);
8205 if (need_cands) {
8206 kfree(cands.cands);
8207 mutex_unlock(&cand_cache_mutex);
8208 if (ctx->log->level & BPF_LOG_LEVEL2)
8209 print_cand_cache(ctx->log);
8210 }
8211 return err;
8212}
1/* SPDX-License-Identifier: GPL-2.0 */
2/* Copyright (c) 2018 Facebook */
3
4#include <uapi/linux/btf.h>
5#include <uapi/linux/bpf.h>
6#include <uapi/linux/bpf_perf_event.h>
7#include <uapi/linux/types.h>
8#include <linux/seq_file.h>
9#include <linux/compiler.h>
10#include <linux/ctype.h>
11#include <linux/errno.h>
12#include <linux/slab.h>
13#include <linux/anon_inodes.h>
14#include <linux/file.h>
15#include <linux/uaccess.h>
16#include <linux/kernel.h>
17#include <linux/idr.h>
18#include <linux/sort.h>
19#include <linux/bpf_verifier.h>
20#include <linux/btf.h>
21#include <linux/btf_ids.h>
22#include <linux/skmsg.h>
23#include <linux/perf_event.h>
24#include <net/sock.h>
25
26/* BTF (BPF Type Format) is the meta data format which describes
27 * the data types of BPF program/map. Hence, it basically focus
28 * on the C programming language which the modern BPF is primary
29 * using.
30 *
31 * ELF Section:
32 * ~~~~~~~~~~~
33 * The BTF data is stored under the ".BTF" ELF section
34 *
35 * struct btf_type:
36 * ~~~~~~~~~~~~~~~
37 * Each 'struct btf_type' object describes a C data type.
38 * Depending on the type it is describing, a 'struct btf_type'
39 * object may be followed by more data. F.e.
40 * To describe an array, 'struct btf_type' is followed by
41 * 'struct btf_array'.
42 *
43 * 'struct btf_type' and any extra data following it are
44 * 4 bytes aligned.
45 *
46 * Type section:
47 * ~~~~~~~~~~~~~
48 * The BTF type section contains a list of 'struct btf_type' objects.
49 * Each one describes a C type. Recall from the above section
50 * that a 'struct btf_type' object could be immediately followed by extra
51 * data in order to desribe some particular C types.
52 *
53 * type_id:
54 * ~~~~~~~
55 * Each btf_type object is identified by a type_id. The type_id
56 * is implicitly implied by the location of the btf_type object in
57 * the BTF type section. The first one has type_id 1. The second
58 * one has type_id 2...etc. Hence, an earlier btf_type has
59 * a smaller type_id.
60 *
61 * A btf_type object may refer to another btf_type object by using
62 * type_id (i.e. the "type" in the "struct btf_type").
63 *
64 * NOTE that we cannot assume any reference-order.
65 * A btf_type object can refer to an earlier btf_type object
66 * but it can also refer to a later btf_type object.
67 *
68 * For example, to describe "const void *". A btf_type
69 * object describing "const" may refer to another btf_type
70 * object describing "void *". This type-reference is done
71 * by specifying type_id:
72 *
73 * [1] CONST (anon) type_id=2
74 * [2] PTR (anon) type_id=0
75 *
76 * The above is the btf_verifier debug log:
77 * - Each line started with "[?]" is a btf_type object
78 * - [?] is the type_id of the btf_type object.
79 * - CONST/PTR is the BTF_KIND_XXX
80 * - "(anon)" is the name of the type. It just
81 * happens that CONST and PTR has no name.
82 * - type_id=XXX is the 'u32 type' in btf_type
83 *
84 * NOTE: "void" has type_id 0
85 *
86 * String section:
87 * ~~~~~~~~~~~~~~
88 * The BTF string section contains the names used by the type section.
89 * Each string is referred by an "offset" from the beginning of the
90 * string section.
91 *
92 * Each string is '\0' terminated.
93 *
94 * The first character in the string section must be '\0'
95 * which is used to mean 'anonymous'. Some btf_type may not
96 * have a name.
97 */
98
99/* BTF verification:
100 *
101 * To verify BTF data, two passes are needed.
102 *
103 * Pass #1
104 * ~~~~~~~
105 * The first pass is to collect all btf_type objects to
106 * an array: "btf->types".
107 *
108 * Depending on the C type that a btf_type is describing,
109 * a btf_type may be followed by extra data. We don't know
110 * how many btf_type is there, and more importantly we don't
111 * know where each btf_type is located in the type section.
112 *
113 * Without knowing the location of each type_id, most verifications
114 * cannot be done. e.g. an earlier btf_type may refer to a later
115 * btf_type (recall the "const void *" above), so we cannot
116 * check this type-reference in the first pass.
117 *
118 * In the first pass, it still does some verifications (e.g.
119 * checking the name is a valid offset to the string section).
120 *
121 * Pass #2
122 * ~~~~~~~
123 * The main focus is to resolve a btf_type that is referring
124 * to another type.
125 *
126 * We have to ensure the referring type:
127 * 1) does exist in the BTF (i.e. in btf->types[])
128 * 2) does not cause a loop:
129 * struct A {
130 * struct B b;
131 * };
132 *
133 * struct B {
134 * struct A a;
135 * };
136 *
137 * btf_type_needs_resolve() decides if a btf_type needs
138 * to be resolved.
139 *
140 * The needs_resolve type implements the "resolve()" ops which
141 * essentially does a DFS and detects backedge.
142 *
143 * During resolve (or DFS), different C types have different
144 * "RESOLVED" conditions.
145 *
146 * When resolving a BTF_KIND_STRUCT, we need to resolve all its
147 * members because a member is always referring to another
148 * type. A struct's member can be treated as "RESOLVED" if
149 * it is referring to a BTF_KIND_PTR. Otherwise, the
150 * following valid C struct would be rejected:
151 *
152 * struct A {
153 * int m;
154 * struct A *a;
155 * };
156 *
157 * When resolving a BTF_KIND_PTR, it needs to keep resolving if
158 * it is referring to another BTF_KIND_PTR. Otherwise, we cannot
159 * detect a pointer loop, e.g.:
160 * BTF_KIND_CONST -> BTF_KIND_PTR -> BTF_KIND_CONST -> BTF_KIND_PTR +
161 * ^ |
162 * +-----------------------------------------+
163 *
164 */
165
166#define BITS_PER_U128 (sizeof(u64) * BITS_PER_BYTE * 2)
167#define BITS_PER_BYTE_MASK (BITS_PER_BYTE - 1)
168#define BITS_PER_BYTE_MASKED(bits) ((bits) & BITS_PER_BYTE_MASK)
169#define BITS_ROUNDDOWN_BYTES(bits) ((bits) >> 3)
170#define BITS_ROUNDUP_BYTES(bits) \
171 (BITS_ROUNDDOWN_BYTES(bits) + !!BITS_PER_BYTE_MASKED(bits))
172
173#define BTF_INFO_MASK 0x8f00ffff
174#define BTF_INT_MASK 0x0fffffff
175#define BTF_TYPE_ID_VALID(type_id) ((type_id) <= BTF_MAX_TYPE)
176#define BTF_STR_OFFSET_VALID(name_off) ((name_off) <= BTF_MAX_NAME_OFFSET)
177
178/* 16MB for 64k structs and each has 16 members and
179 * a few MB spaces for the string section.
180 * The hard limit is S32_MAX.
181 */
182#define BTF_MAX_SIZE (16 * 1024 * 1024)
183
184#define for_each_member_from(i, from, struct_type, member) \
185 for (i = from, member = btf_type_member(struct_type) + from; \
186 i < btf_type_vlen(struct_type); \
187 i++, member++)
188
189#define for_each_vsi(i, struct_type, member) \
190 for (i = 0, member = btf_type_var_secinfo(struct_type); \
191 i < btf_type_vlen(struct_type); \
192 i++, member++)
193
194#define for_each_vsi_from(i, from, struct_type, member) \
195 for (i = from, member = btf_type_var_secinfo(struct_type) + from; \
196 i < btf_type_vlen(struct_type); \
197 i++, member++)
198
199DEFINE_IDR(btf_idr);
200DEFINE_SPINLOCK(btf_idr_lock);
201
202struct btf {
203 void *data;
204 struct btf_type **types;
205 u32 *resolved_ids;
206 u32 *resolved_sizes;
207 const char *strings;
208 void *nohdr_data;
209 struct btf_header hdr;
210 u32 nr_types;
211 u32 types_size;
212 u32 data_size;
213 refcount_t refcnt;
214 u32 id;
215 struct rcu_head rcu;
216};
217
218enum verifier_phase {
219 CHECK_META,
220 CHECK_TYPE,
221};
222
223struct resolve_vertex {
224 const struct btf_type *t;
225 u32 type_id;
226 u16 next_member;
227};
228
229enum visit_state {
230 NOT_VISITED,
231 VISITED,
232 RESOLVED,
233};
234
235enum resolve_mode {
236 RESOLVE_TBD, /* To Be Determined */
237 RESOLVE_PTR, /* Resolving for Pointer */
238 RESOLVE_STRUCT_OR_ARRAY, /* Resolving for struct/union
239 * or array
240 */
241};
242
243#define MAX_RESOLVE_DEPTH 32
244
245struct btf_sec_info {
246 u32 off;
247 u32 len;
248};
249
250struct btf_verifier_env {
251 struct btf *btf;
252 u8 *visit_states;
253 struct resolve_vertex stack[MAX_RESOLVE_DEPTH];
254 struct bpf_verifier_log log;
255 u32 log_type_id;
256 u32 top_stack;
257 enum verifier_phase phase;
258 enum resolve_mode resolve_mode;
259};
260
261static const char * const btf_kind_str[NR_BTF_KINDS] = {
262 [BTF_KIND_UNKN] = "UNKNOWN",
263 [BTF_KIND_INT] = "INT",
264 [BTF_KIND_PTR] = "PTR",
265 [BTF_KIND_ARRAY] = "ARRAY",
266 [BTF_KIND_STRUCT] = "STRUCT",
267 [BTF_KIND_UNION] = "UNION",
268 [BTF_KIND_ENUM] = "ENUM",
269 [BTF_KIND_FWD] = "FWD",
270 [BTF_KIND_TYPEDEF] = "TYPEDEF",
271 [BTF_KIND_VOLATILE] = "VOLATILE",
272 [BTF_KIND_CONST] = "CONST",
273 [BTF_KIND_RESTRICT] = "RESTRICT",
274 [BTF_KIND_FUNC] = "FUNC",
275 [BTF_KIND_FUNC_PROTO] = "FUNC_PROTO",
276 [BTF_KIND_VAR] = "VAR",
277 [BTF_KIND_DATASEC] = "DATASEC",
278};
279
280static const char *btf_type_str(const struct btf_type *t)
281{
282 return btf_kind_str[BTF_INFO_KIND(t->info)];
283}
284
285struct btf_kind_operations {
286 s32 (*check_meta)(struct btf_verifier_env *env,
287 const struct btf_type *t,
288 u32 meta_left);
289 int (*resolve)(struct btf_verifier_env *env,
290 const struct resolve_vertex *v);
291 int (*check_member)(struct btf_verifier_env *env,
292 const struct btf_type *struct_type,
293 const struct btf_member *member,
294 const struct btf_type *member_type);
295 int (*check_kflag_member)(struct btf_verifier_env *env,
296 const struct btf_type *struct_type,
297 const struct btf_member *member,
298 const struct btf_type *member_type);
299 void (*log_details)(struct btf_verifier_env *env,
300 const struct btf_type *t);
301 void (*seq_show)(const struct btf *btf, const struct btf_type *t,
302 u32 type_id, void *data, u8 bits_offsets,
303 struct seq_file *m);
304};
305
306static const struct btf_kind_operations * const kind_ops[NR_BTF_KINDS];
307static struct btf_type btf_void;
308
309static int btf_resolve(struct btf_verifier_env *env,
310 const struct btf_type *t, u32 type_id);
311
312static bool btf_type_is_modifier(const struct btf_type *t)
313{
314 /* Some of them is not strictly a C modifier
315 * but they are grouped into the same bucket
316 * for BTF concern:
317 * A type (t) that refers to another
318 * type through t->type AND its size cannot
319 * be determined without following the t->type.
320 *
321 * ptr does not fall into this bucket
322 * because its size is always sizeof(void *).
323 */
324 switch (BTF_INFO_KIND(t->info)) {
325 case BTF_KIND_TYPEDEF:
326 case BTF_KIND_VOLATILE:
327 case BTF_KIND_CONST:
328 case BTF_KIND_RESTRICT:
329 return true;
330 }
331
332 return false;
333}
334
335bool btf_type_is_void(const struct btf_type *t)
336{
337 return t == &btf_void;
338}
339
340static bool btf_type_is_fwd(const struct btf_type *t)
341{
342 return BTF_INFO_KIND(t->info) == BTF_KIND_FWD;
343}
344
345static bool btf_type_nosize(const struct btf_type *t)
346{
347 return btf_type_is_void(t) || btf_type_is_fwd(t) ||
348 btf_type_is_func(t) || btf_type_is_func_proto(t);
349}
350
351static bool btf_type_nosize_or_null(const struct btf_type *t)
352{
353 return !t || btf_type_nosize(t);
354}
355
356/* union is only a special case of struct:
357 * all its offsetof(member) == 0
358 */
359static bool btf_type_is_struct(const struct btf_type *t)
360{
361 u8 kind = BTF_INFO_KIND(t->info);
362
363 return kind == BTF_KIND_STRUCT || kind == BTF_KIND_UNION;
364}
365
366static bool __btf_type_is_struct(const struct btf_type *t)
367{
368 return BTF_INFO_KIND(t->info) == BTF_KIND_STRUCT;
369}
370
371static bool btf_type_is_array(const struct btf_type *t)
372{
373 return BTF_INFO_KIND(t->info) == BTF_KIND_ARRAY;
374}
375
376static bool btf_type_is_var(const struct btf_type *t)
377{
378 return BTF_INFO_KIND(t->info) == BTF_KIND_VAR;
379}
380
381static bool btf_type_is_datasec(const struct btf_type *t)
382{
383 return BTF_INFO_KIND(t->info) == BTF_KIND_DATASEC;
384}
385
386s32 btf_find_by_name_kind(const struct btf *btf, const char *name, u8 kind)
387{
388 const struct btf_type *t;
389 const char *tname;
390 u32 i;
391
392 for (i = 1; i <= btf->nr_types; i++) {
393 t = btf->types[i];
394 if (BTF_INFO_KIND(t->info) != kind)
395 continue;
396
397 tname = btf_name_by_offset(btf, t->name_off);
398 if (!strcmp(tname, name))
399 return i;
400 }
401
402 return -ENOENT;
403}
404
405const struct btf_type *btf_type_skip_modifiers(const struct btf *btf,
406 u32 id, u32 *res_id)
407{
408 const struct btf_type *t = btf_type_by_id(btf, id);
409
410 while (btf_type_is_modifier(t)) {
411 id = t->type;
412 t = btf_type_by_id(btf, t->type);
413 }
414
415 if (res_id)
416 *res_id = id;
417
418 return t;
419}
420
421const struct btf_type *btf_type_resolve_ptr(const struct btf *btf,
422 u32 id, u32 *res_id)
423{
424 const struct btf_type *t;
425
426 t = btf_type_skip_modifiers(btf, id, NULL);
427 if (!btf_type_is_ptr(t))
428 return NULL;
429
430 return btf_type_skip_modifiers(btf, t->type, res_id);
431}
432
433const struct btf_type *btf_type_resolve_func_ptr(const struct btf *btf,
434 u32 id, u32 *res_id)
435{
436 const struct btf_type *ptype;
437
438 ptype = btf_type_resolve_ptr(btf, id, res_id);
439 if (ptype && btf_type_is_func_proto(ptype))
440 return ptype;
441
442 return NULL;
443}
444
445/* Types that act only as a source, not sink or intermediate
446 * type when resolving.
447 */
448static bool btf_type_is_resolve_source_only(const struct btf_type *t)
449{
450 return btf_type_is_var(t) ||
451 btf_type_is_datasec(t);
452}
453
454/* What types need to be resolved?
455 *
456 * btf_type_is_modifier() is an obvious one.
457 *
458 * btf_type_is_struct() because its member refers to
459 * another type (through member->type).
460 *
461 * btf_type_is_var() because the variable refers to
462 * another type. btf_type_is_datasec() holds multiple
463 * btf_type_is_var() types that need resolving.
464 *
465 * btf_type_is_array() because its element (array->type)
466 * refers to another type. Array can be thought of a
467 * special case of struct while array just has the same
468 * member-type repeated by array->nelems of times.
469 */
470static bool btf_type_needs_resolve(const struct btf_type *t)
471{
472 return btf_type_is_modifier(t) ||
473 btf_type_is_ptr(t) ||
474 btf_type_is_struct(t) ||
475 btf_type_is_array(t) ||
476 btf_type_is_var(t) ||
477 btf_type_is_datasec(t);
478}
479
480/* t->size can be used */
481static bool btf_type_has_size(const struct btf_type *t)
482{
483 switch (BTF_INFO_KIND(t->info)) {
484 case BTF_KIND_INT:
485 case BTF_KIND_STRUCT:
486 case BTF_KIND_UNION:
487 case BTF_KIND_ENUM:
488 case BTF_KIND_DATASEC:
489 return true;
490 }
491
492 return false;
493}
494
495static const char *btf_int_encoding_str(u8 encoding)
496{
497 if (encoding == 0)
498 return "(none)";
499 else if (encoding == BTF_INT_SIGNED)
500 return "SIGNED";
501 else if (encoding == BTF_INT_CHAR)
502 return "CHAR";
503 else if (encoding == BTF_INT_BOOL)
504 return "BOOL";
505 else
506 return "UNKN";
507}
508
509static u32 btf_type_int(const struct btf_type *t)
510{
511 return *(u32 *)(t + 1);
512}
513
514static const struct btf_array *btf_type_array(const struct btf_type *t)
515{
516 return (const struct btf_array *)(t + 1);
517}
518
519static const struct btf_enum *btf_type_enum(const struct btf_type *t)
520{
521 return (const struct btf_enum *)(t + 1);
522}
523
524static const struct btf_var *btf_type_var(const struct btf_type *t)
525{
526 return (const struct btf_var *)(t + 1);
527}
528
529static const struct btf_var_secinfo *btf_type_var_secinfo(const struct btf_type *t)
530{
531 return (const struct btf_var_secinfo *)(t + 1);
532}
533
534static const struct btf_kind_operations *btf_type_ops(const struct btf_type *t)
535{
536 return kind_ops[BTF_INFO_KIND(t->info)];
537}
538
539static bool btf_name_offset_valid(const struct btf *btf, u32 offset)
540{
541 return BTF_STR_OFFSET_VALID(offset) &&
542 offset < btf->hdr.str_len;
543}
544
545static bool __btf_name_char_ok(char c, bool first, bool dot_ok)
546{
547 if ((first ? !isalpha(c) :
548 !isalnum(c)) &&
549 c != '_' &&
550 ((c == '.' && !dot_ok) ||
551 c != '.'))
552 return false;
553 return true;
554}
555
556static bool __btf_name_valid(const struct btf *btf, u32 offset, bool dot_ok)
557{
558 /* offset must be valid */
559 const char *src = &btf->strings[offset];
560 const char *src_limit;
561
562 if (!__btf_name_char_ok(*src, true, dot_ok))
563 return false;
564
565 /* set a limit on identifier length */
566 src_limit = src + KSYM_NAME_LEN;
567 src++;
568 while (*src && src < src_limit) {
569 if (!__btf_name_char_ok(*src, false, dot_ok))
570 return false;
571 src++;
572 }
573
574 return !*src;
575}
576
577/* Only C-style identifier is permitted. This can be relaxed if
578 * necessary.
579 */
580static bool btf_name_valid_identifier(const struct btf *btf, u32 offset)
581{
582 return __btf_name_valid(btf, offset, false);
583}
584
585static bool btf_name_valid_section(const struct btf *btf, u32 offset)
586{
587 return __btf_name_valid(btf, offset, true);
588}
589
590static const char *__btf_name_by_offset(const struct btf *btf, u32 offset)
591{
592 if (!offset)
593 return "(anon)";
594 else if (offset < btf->hdr.str_len)
595 return &btf->strings[offset];
596 else
597 return "(invalid-name-offset)";
598}
599
600const char *btf_name_by_offset(const struct btf *btf, u32 offset)
601{
602 if (offset < btf->hdr.str_len)
603 return &btf->strings[offset];
604
605 return NULL;
606}
607
608const struct btf_type *btf_type_by_id(const struct btf *btf, u32 type_id)
609{
610 if (type_id > btf->nr_types)
611 return NULL;
612
613 return btf->types[type_id];
614}
615
616/*
617 * Regular int is not a bit field and it must be either
618 * u8/u16/u32/u64 or __int128.
619 */
620static bool btf_type_int_is_regular(const struct btf_type *t)
621{
622 u8 nr_bits, nr_bytes;
623 u32 int_data;
624
625 int_data = btf_type_int(t);
626 nr_bits = BTF_INT_BITS(int_data);
627 nr_bytes = BITS_ROUNDUP_BYTES(nr_bits);
628 if (BITS_PER_BYTE_MASKED(nr_bits) ||
629 BTF_INT_OFFSET(int_data) ||
630 (nr_bytes != sizeof(u8) && nr_bytes != sizeof(u16) &&
631 nr_bytes != sizeof(u32) && nr_bytes != sizeof(u64) &&
632 nr_bytes != (2 * sizeof(u64)))) {
633 return false;
634 }
635
636 return true;
637}
638
639/*
640 * Check that given struct member is a regular int with expected
641 * offset and size.
642 */
643bool btf_member_is_reg_int(const struct btf *btf, const struct btf_type *s,
644 const struct btf_member *m,
645 u32 expected_offset, u32 expected_size)
646{
647 const struct btf_type *t;
648 u32 id, int_data;
649 u8 nr_bits;
650
651 id = m->type;
652 t = btf_type_id_size(btf, &id, NULL);
653 if (!t || !btf_type_is_int(t))
654 return false;
655
656 int_data = btf_type_int(t);
657 nr_bits = BTF_INT_BITS(int_data);
658 if (btf_type_kflag(s)) {
659 u32 bitfield_size = BTF_MEMBER_BITFIELD_SIZE(m->offset);
660 u32 bit_offset = BTF_MEMBER_BIT_OFFSET(m->offset);
661
662 /* if kflag set, int should be a regular int and
663 * bit offset should be at byte boundary.
664 */
665 return !bitfield_size &&
666 BITS_ROUNDUP_BYTES(bit_offset) == expected_offset &&
667 BITS_ROUNDUP_BYTES(nr_bits) == expected_size;
668 }
669
670 if (BTF_INT_OFFSET(int_data) ||
671 BITS_PER_BYTE_MASKED(m->offset) ||
672 BITS_ROUNDUP_BYTES(m->offset) != expected_offset ||
673 BITS_PER_BYTE_MASKED(nr_bits) ||
674 BITS_ROUNDUP_BYTES(nr_bits) != expected_size)
675 return false;
676
677 return true;
678}
679
680__printf(2, 3) static void __btf_verifier_log(struct bpf_verifier_log *log,
681 const char *fmt, ...)
682{
683 va_list args;
684
685 va_start(args, fmt);
686 bpf_verifier_vlog(log, fmt, args);
687 va_end(args);
688}
689
690__printf(2, 3) static void btf_verifier_log(struct btf_verifier_env *env,
691 const char *fmt, ...)
692{
693 struct bpf_verifier_log *log = &env->log;
694 va_list args;
695
696 if (!bpf_verifier_log_needed(log))
697 return;
698
699 va_start(args, fmt);
700 bpf_verifier_vlog(log, fmt, args);
701 va_end(args);
702}
703
704__printf(4, 5) static void __btf_verifier_log_type(struct btf_verifier_env *env,
705 const struct btf_type *t,
706 bool log_details,
707 const char *fmt, ...)
708{
709 struct bpf_verifier_log *log = &env->log;
710 u8 kind = BTF_INFO_KIND(t->info);
711 struct btf *btf = env->btf;
712 va_list args;
713
714 if (!bpf_verifier_log_needed(log))
715 return;
716
717 /* btf verifier prints all types it is processing via
718 * btf_verifier_log_type(..., fmt = NULL).
719 * Skip those prints for in-kernel BTF verification.
720 */
721 if (log->level == BPF_LOG_KERNEL && !fmt)
722 return;
723
724 __btf_verifier_log(log, "[%u] %s %s%s",
725 env->log_type_id,
726 btf_kind_str[kind],
727 __btf_name_by_offset(btf, t->name_off),
728 log_details ? " " : "");
729
730 if (log_details)
731 btf_type_ops(t)->log_details(env, t);
732
733 if (fmt && *fmt) {
734 __btf_verifier_log(log, " ");
735 va_start(args, fmt);
736 bpf_verifier_vlog(log, fmt, args);
737 va_end(args);
738 }
739
740 __btf_verifier_log(log, "\n");
741}
742
743#define btf_verifier_log_type(env, t, ...) \
744 __btf_verifier_log_type((env), (t), true, __VA_ARGS__)
745#define btf_verifier_log_basic(env, t, ...) \
746 __btf_verifier_log_type((env), (t), false, __VA_ARGS__)
747
748__printf(4, 5)
749static void btf_verifier_log_member(struct btf_verifier_env *env,
750 const struct btf_type *struct_type,
751 const struct btf_member *member,
752 const char *fmt, ...)
753{
754 struct bpf_verifier_log *log = &env->log;
755 struct btf *btf = env->btf;
756 va_list args;
757
758 if (!bpf_verifier_log_needed(log))
759 return;
760
761 if (log->level == BPF_LOG_KERNEL && !fmt)
762 return;
763 /* The CHECK_META phase already did a btf dump.
764 *
765 * If member is logged again, it must hit an error in
766 * parsing this member. It is useful to print out which
767 * struct this member belongs to.
768 */
769 if (env->phase != CHECK_META)
770 btf_verifier_log_type(env, struct_type, NULL);
771
772 if (btf_type_kflag(struct_type))
773 __btf_verifier_log(log,
774 "\t%s type_id=%u bitfield_size=%u bits_offset=%u",
775 __btf_name_by_offset(btf, member->name_off),
776 member->type,
777 BTF_MEMBER_BITFIELD_SIZE(member->offset),
778 BTF_MEMBER_BIT_OFFSET(member->offset));
779 else
780 __btf_verifier_log(log, "\t%s type_id=%u bits_offset=%u",
781 __btf_name_by_offset(btf, member->name_off),
782 member->type, member->offset);
783
784 if (fmt && *fmt) {
785 __btf_verifier_log(log, " ");
786 va_start(args, fmt);
787 bpf_verifier_vlog(log, fmt, args);
788 va_end(args);
789 }
790
791 __btf_verifier_log(log, "\n");
792}
793
794__printf(4, 5)
795static void btf_verifier_log_vsi(struct btf_verifier_env *env,
796 const struct btf_type *datasec_type,
797 const struct btf_var_secinfo *vsi,
798 const char *fmt, ...)
799{
800 struct bpf_verifier_log *log = &env->log;
801 va_list args;
802
803 if (!bpf_verifier_log_needed(log))
804 return;
805 if (log->level == BPF_LOG_KERNEL && !fmt)
806 return;
807 if (env->phase != CHECK_META)
808 btf_verifier_log_type(env, datasec_type, NULL);
809
810 __btf_verifier_log(log, "\t type_id=%u offset=%u size=%u",
811 vsi->type, vsi->offset, vsi->size);
812 if (fmt && *fmt) {
813 __btf_verifier_log(log, " ");
814 va_start(args, fmt);
815 bpf_verifier_vlog(log, fmt, args);
816 va_end(args);
817 }
818
819 __btf_verifier_log(log, "\n");
820}
821
822static void btf_verifier_log_hdr(struct btf_verifier_env *env,
823 u32 btf_data_size)
824{
825 struct bpf_verifier_log *log = &env->log;
826 const struct btf *btf = env->btf;
827 const struct btf_header *hdr;
828
829 if (!bpf_verifier_log_needed(log))
830 return;
831
832 if (log->level == BPF_LOG_KERNEL)
833 return;
834 hdr = &btf->hdr;
835 __btf_verifier_log(log, "magic: 0x%x\n", hdr->magic);
836 __btf_verifier_log(log, "version: %u\n", hdr->version);
837 __btf_verifier_log(log, "flags: 0x%x\n", hdr->flags);
838 __btf_verifier_log(log, "hdr_len: %u\n", hdr->hdr_len);
839 __btf_verifier_log(log, "type_off: %u\n", hdr->type_off);
840 __btf_verifier_log(log, "type_len: %u\n", hdr->type_len);
841 __btf_verifier_log(log, "str_off: %u\n", hdr->str_off);
842 __btf_verifier_log(log, "str_len: %u\n", hdr->str_len);
843 __btf_verifier_log(log, "btf_total_size: %u\n", btf_data_size);
844}
845
846static int btf_add_type(struct btf_verifier_env *env, struct btf_type *t)
847{
848 struct btf *btf = env->btf;
849
850 /* < 2 because +1 for btf_void which is always in btf->types[0].
851 * btf_void is not accounted in btf->nr_types because btf_void
852 * does not come from the BTF file.
853 */
854 if (btf->types_size - btf->nr_types < 2) {
855 /* Expand 'types' array */
856
857 struct btf_type **new_types;
858 u32 expand_by, new_size;
859
860 if (btf->types_size == BTF_MAX_TYPE) {
861 btf_verifier_log(env, "Exceeded max num of types");
862 return -E2BIG;
863 }
864
865 expand_by = max_t(u32, btf->types_size >> 2, 16);
866 new_size = min_t(u32, BTF_MAX_TYPE,
867 btf->types_size + expand_by);
868
869 new_types = kvcalloc(new_size, sizeof(*new_types),
870 GFP_KERNEL | __GFP_NOWARN);
871 if (!new_types)
872 return -ENOMEM;
873
874 if (btf->nr_types == 0)
875 new_types[0] = &btf_void;
876 else
877 memcpy(new_types, btf->types,
878 sizeof(*btf->types) * (btf->nr_types + 1));
879
880 kvfree(btf->types);
881 btf->types = new_types;
882 btf->types_size = new_size;
883 }
884
885 btf->types[++(btf->nr_types)] = t;
886
887 return 0;
888}
889
890static int btf_alloc_id(struct btf *btf)
891{
892 int id;
893
894 idr_preload(GFP_KERNEL);
895 spin_lock_bh(&btf_idr_lock);
896 id = idr_alloc_cyclic(&btf_idr, btf, 1, INT_MAX, GFP_ATOMIC);
897 if (id > 0)
898 btf->id = id;
899 spin_unlock_bh(&btf_idr_lock);
900 idr_preload_end();
901
902 if (WARN_ON_ONCE(!id))
903 return -ENOSPC;
904
905 return id > 0 ? 0 : id;
906}
907
908static void btf_free_id(struct btf *btf)
909{
910 unsigned long flags;
911
912 /*
913 * In map-in-map, calling map_delete_elem() on outer
914 * map will call bpf_map_put on the inner map.
915 * It will then eventually call btf_free_id()
916 * on the inner map. Some of the map_delete_elem()
917 * implementation may have irq disabled, so
918 * we need to use the _irqsave() version instead
919 * of the _bh() version.
920 */
921 spin_lock_irqsave(&btf_idr_lock, flags);
922 idr_remove(&btf_idr, btf->id);
923 spin_unlock_irqrestore(&btf_idr_lock, flags);
924}
925
926static void btf_free(struct btf *btf)
927{
928 kvfree(btf->types);
929 kvfree(btf->resolved_sizes);
930 kvfree(btf->resolved_ids);
931 kvfree(btf->data);
932 kfree(btf);
933}
934
935static void btf_free_rcu(struct rcu_head *rcu)
936{
937 struct btf *btf = container_of(rcu, struct btf, rcu);
938
939 btf_free(btf);
940}
941
942void btf_put(struct btf *btf)
943{
944 if (btf && refcount_dec_and_test(&btf->refcnt)) {
945 btf_free_id(btf);
946 call_rcu(&btf->rcu, btf_free_rcu);
947 }
948}
949
950static int env_resolve_init(struct btf_verifier_env *env)
951{
952 struct btf *btf = env->btf;
953 u32 nr_types = btf->nr_types;
954 u32 *resolved_sizes = NULL;
955 u32 *resolved_ids = NULL;
956 u8 *visit_states = NULL;
957
958 /* +1 for btf_void */
959 resolved_sizes = kvcalloc(nr_types + 1, sizeof(*resolved_sizes),
960 GFP_KERNEL | __GFP_NOWARN);
961 if (!resolved_sizes)
962 goto nomem;
963
964 resolved_ids = kvcalloc(nr_types + 1, sizeof(*resolved_ids),
965 GFP_KERNEL | __GFP_NOWARN);
966 if (!resolved_ids)
967 goto nomem;
968
969 visit_states = kvcalloc(nr_types + 1, sizeof(*visit_states),
970 GFP_KERNEL | __GFP_NOWARN);
971 if (!visit_states)
972 goto nomem;
973
974 btf->resolved_sizes = resolved_sizes;
975 btf->resolved_ids = resolved_ids;
976 env->visit_states = visit_states;
977
978 return 0;
979
980nomem:
981 kvfree(resolved_sizes);
982 kvfree(resolved_ids);
983 kvfree(visit_states);
984 return -ENOMEM;
985}
986
987static void btf_verifier_env_free(struct btf_verifier_env *env)
988{
989 kvfree(env->visit_states);
990 kfree(env);
991}
992
993static bool env_type_is_resolve_sink(const struct btf_verifier_env *env,
994 const struct btf_type *next_type)
995{
996 switch (env->resolve_mode) {
997 case RESOLVE_TBD:
998 /* int, enum or void is a sink */
999 return !btf_type_needs_resolve(next_type);
1000 case RESOLVE_PTR:
1001 /* int, enum, void, struct, array, func or func_proto is a sink
1002 * for ptr
1003 */
1004 return !btf_type_is_modifier(next_type) &&
1005 !btf_type_is_ptr(next_type);
1006 case RESOLVE_STRUCT_OR_ARRAY:
1007 /* int, enum, void, ptr, func or func_proto is a sink
1008 * for struct and array
1009 */
1010 return !btf_type_is_modifier(next_type) &&
1011 !btf_type_is_array(next_type) &&
1012 !btf_type_is_struct(next_type);
1013 default:
1014 BUG();
1015 }
1016}
1017
1018static bool env_type_is_resolved(const struct btf_verifier_env *env,
1019 u32 type_id)
1020{
1021 return env->visit_states[type_id] == RESOLVED;
1022}
1023
1024static int env_stack_push(struct btf_verifier_env *env,
1025 const struct btf_type *t, u32 type_id)
1026{
1027 struct resolve_vertex *v;
1028
1029 if (env->top_stack == MAX_RESOLVE_DEPTH)
1030 return -E2BIG;
1031
1032 if (env->visit_states[type_id] != NOT_VISITED)
1033 return -EEXIST;
1034
1035 env->visit_states[type_id] = VISITED;
1036
1037 v = &env->stack[env->top_stack++];
1038 v->t = t;
1039 v->type_id = type_id;
1040 v->next_member = 0;
1041
1042 if (env->resolve_mode == RESOLVE_TBD) {
1043 if (btf_type_is_ptr(t))
1044 env->resolve_mode = RESOLVE_PTR;
1045 else if (btf_type_is_struct(t) || btf_type_is_array(t))
1046 env->resolve_mode = RESOLVE_STRUCT_OR_ARRAY;
1047 }
1048
1049 return 0;
1050}
1051
1052static void env_stack_set_next_member(struct btf_verifier_env *env,
1053 u16 next_member)
1054{
1055 env->stack[env->top_stack - 1].next_member = next_member;
1056}
1057
1058static void env_stack_pop_resolved(struct btf_verifier_env *env,
1059 u32 resolved_type_id,
1060 u32 resolved_size)
1061{
1062 u32 type_id = env->stack[--(env->top_stack)].type_id;
1063 struct btf *btf = env->btf;
1064
1065 btf->resolved_sizes[type_id] = resolved_size;
1066 btf->resolved_ids[type_id] = resolved_type_id;
1067 env->visit_states[type_id] = RESOLVED;
1068}
1069
1070static const struct resolve_vertex *env_stack_peak(struct btf_verifier_env *env)
1071{
1072 return env->top_stack ? &env->stack[env->top_stack - 1] : NULL;
1073}
1074
1075/* Resolve the size of a passed-in "type"
1076 *
1077 * type: is an array (e.g. u32 array[x][y])
1078 * return type: type "u32[x][y]", i.e. BTF_KIND_ARRAY,
1079 * *type_size: (x * y * sizeof(u32)). Hence, *type_size always
1080 * corresponds to the return type.
1081 * *elem_type: u32
1082 * *total_nelems: (x * y). Hence, individual elem size is
1083 * (*type_size / *total_nelems)
1084 *
1085 * type: is not an array (e.g. const struct X)
1086 * return type: type "struct X"
1087 * *type_size: sizeof(struct X)
1088 * *elem_type: same as return type ("struct X")
1089 * *total_nelems: 1
1090 */
1091const struct btf_type *
1092btf_resolve_size(const struct btf *btf, const struct btf_type *type,
1093 u32 *type_size, const struct btf_type **elem_type,
1094 u32 *total_nelems)
1095{
1096 const struct btf_type *array_type = NULL;
1097 const struct btf_array *array;
1098 u32 i, size, nelems = 1;
1099
1100 for (i = 0; i < MAX_RESOLVE_DEPTH; i++) {
1101 switch (BTF_INFO_KIND(type->info)) {
1102 /* type->size can be used */
1103 case BTF_KIND_INT:
1104 case BTF_KIND_STRUCT:
1105 case BTF_KIND_UNION:
1106 case BTF_KIND_ENUM:
1107 size = type->size;
1108 goto resolved;
1109
1110 case BTF_KIND_PTR:
1111 size = sizeof(void *);
1112 goto resolved;
1113
1114 /* Modifiers */
1115 case BTF_KIND_TYPEDEF:
1116 case BTF_KIND_VOLATILE:
1117 case BTF_KIND_CONST:
1118 case BTF_KIND_RESTRICT:
1119 type = btf_type_by_id(btf, type->type);
1120 break;
1121
1122 case BTF_KIND_ARRAY:
1123 if (!array_type)
1124 array_type = type;
1125 array = btf_type_array(type);
1126 if (nelems && array->nelems > U32_MAX / nelems)
1127 return ERR_PTR(-EINVAL);
1128 nelems *= array->nelems;
1129 type = btf_type_by_id(btf, array->type);
1130 break;
1131
1132 /* type without size */
1133 default:
1134 return ERR_PTR(-EINVAL);
1135 }
1136 }
1137
1138 return ERR_PTR(-EINVAL);
1139
1140resolved:
1141 if (nelems && size > U32_MAX / nelems)
1142 return ERR_PTR(-EINVAL);
1143
1144 *type_size = nelems * size;
1145 if (total_nelems)
1146 *total_nelems = nelems;
1147 if (elem_type)
1148 *elem_type = type;
1149
1150 return array_type ? : type;
1151}
1152
1153/* The input param "type_id" must point to a needs_resolve type */
1154static const struct btf_type *btf_type_id_resolve(const struct btf *btf,
1155 u32 *type_id)
1156{
1157 *type_id = btf->resolved_ids[*type_id];
1158 return btf_type_by_id(btf, *type_id);
1159}
1160
1161const struct btf_type *btf_type_id_size(const struct btf *btf,
1162 u32 *type_id, u32 *ret_size)
1163{
1164 const struct btf_type *size_type;
1165 u32 size_type_id = *type_id;
1166 u32 size = 0;
1167
1168 size_type = btf_type_by_id(btf, size_type_id);
1169 if (btf_type_nosize_or_null(size_type))
1170 return NULL;
1171
1172 if (btf_type_has_size(size_type)) {
1173 size = size_type->size;
1174 } else if (btf_type_is_array(size_type)) {
1175 size = btf->resolved_sizes[size_type_id];
1176 } else if (btf_type_is_ptr(size_type)) {
1177 size = sizeof(void *);
1178 } else {
1179 if (WARN_ON_ONCE(!btf_type_is_modifier(size_type) &&
1180 !btf_type_is_var(size_type)))
1181 return NULL;
1182
1183 size_type_id = btf->resolved_ids[size_type_id];
1184 size_type = btf_type_by_id(btf, size_type_id);
1185 if (btf_type_nosize_or_null(size_type))
1186 return NULL;
1187 else if (btf_type_has_size(size_type))
1188 size = size_type->size;
1189 else if (btf_type_is_array(size_type))
1190 size = btf->resolved_sizes[size_type_id];
1191 else if (btf_type_is_ptr(size_type))
1192 size = sizeof(void *);
1193 else
1194 return NULL;
1195 }
1196
1197 *type_id = size_type_id;
1198 if (ret_size)
1199 *ret_size = size;
1200
1201 return size_type;
1202}
1203
1204static int btf_df_check_member(struct btf_verifier_env *env,
1205 const struct btf_type *struct_type,
1206 const struct btf_member *member,
1207 const struct btf_type *member_type)
1208{
1209 btf_verifier_log_basic(env, struct_type,
1210 "Unsupported check_member");
1211 return -EINVAL;
1212}
1213
1214static int btf_df_check_kflag_member(struct btf_verifier_env *env,
1215 const struct btf_type *struct_type,
1216 const struct btf_member *member,
1217 const struct btf_type *member_type)
1218{
1219 btf_verifier_log_basic(env, struct_type,
1220 "Unsupported check_kflag_member");
1221 return -EINVAL;
1222}
1223
1224/* Used for ptr, array and struct/union type members.
1225 * int, enum and modifier types have their specific callback functions.
1226 */
1227static int btf_generic_check_kflag_member(struct btf_verifier_env *env,
1228 const struct btf_type *struct_type,
1229 const struct btf_member *member,
1230 const struct btf_type *member_type)
1231{
1232 if (BTF_MEMBER_BITFIELD_SIZE(member->offset)) {
1233 btf_verifier_log_member(env, struct_type, member,
1234 "Invalid member bitfield_size");
1235 return -EINVAL;
1236 }
1237
1238 /* bitfield size is 0, so member->offset represents bit offset only.
1239 * It is safe to call non kflag check_member variants.
1240 */
1241 return btf_type_ops(member_type)->check_member(env, struct_type,
1242 member,
1243 member_type);
1244}
1245
1246static int btf_df_resolve(struct btf_verifier_env *env,
1247 const struct resolve_vertex *v)
1248{
1249 btf_verifier_log_basic(env, v->t, "Unsupported resolve");
1250 return -EINVAL;
1251}
1252
1253static void btf_df_seq_show(const struct btf *btf, const struct btf_type *t,
1254 u32 type_id, void *data, u8 bits_offsets,
1255 struct seq_file *m)
1256{
1257 seq_printf(m, "<unsupported kind:%u>", BTF_INFO_KIND(t->info));
1258}
1259
1260static int btf_int_check_member(struct btf_verifier_env *env,
1261 const struct btf_type *struct_type,
1262 const struct btf_member *member,
1263 const struct btf_type *member_type)
1264{
1265 u32 int_data = btf_type_int(member_type);
1266 u32 struct_bits_off = member->offset;
1267 u32 struct_size = struct_type->size;
1268 u32 nr_copy_bits;
1269 u32 bytes_offset;
1270
1271 if (U32_MAX - struct_bits_off < BTF_INT_OFFSET(int_data)) {
1272 btf_verifier_log_member(env, struct_type, member,
1273 "bits_offset exceeds U32_MAX");
1274 return -EINVAL;
1275 }
1276
1277 struct_bits_off += BTF_INT_OFFSET(int_data);
1278 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
1279 nr_copy_bits = BTF_INT_BITS(int_data) +
1280 BITS_PER_BYTE_MASKED(struct_bits_off);
1281
1282 if (nr_copy_bits > BITS_PER_U128) {
1283 btf_verifier_log_member(env, struct_type, member,
1284 "nr_copy_bits exceeds 128");
1285 return -EINVAL;
1286 }
1287
1288 if (struct_size < bytes_offset ||
1289 struct_size - bytes_offset < BITS_ROUNDUP_BYTES(nr_copy_bits)) {
1290 btf_verifier_log_member(env, struct_type, member,
1291 "Member exceeds struct_size");
1292 return -EINVAL;
1293 }
1294
1295 return 0;
1296}
1297
1298static int btf_int_check_kflag_member(struct btf_verifier_env *env,
1299 const struct btf_type *struct_type,
1300 const struct btf_member *member,
1301 const struct btf_type *member_type)
1302{
1303 u32 struct_bits_off, nr_bits, nr_int_data_bits, bytes_offset;
1304 u32 int_data = btf_type_int(member_type);
1305 u32 struct_size = struct_type->size;
1306 u32 nr_copy_bits;
1307
1308 /* a regular int type is required for the kflag int member */
1309 if (!btf_type_int_is_regular(member_type)) {
1310 btf_verifier_log_member(env, struct_type, member,
1311 "Invalid member base type");
1312 return -EINVAL;
1313 }
1314
1315 /* check sanity of bitfield size */
1316 nr_bits = BTF_MEMBER_BITFIELD_SIZE(member->offset);
1317 struct_bits_off = BTF_MEMBER_BIT_OFFSET(member->offset);
1318 nr_int_data_bits = BTF_INT_BITS(int_data);
1319 if (!nr_bits) {
1320 /* Not a bitfield member, member offset must be at byte
1321 * boundary.
1322 */
1323 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
1324 btf_verifier_log_member(env, struct_type, member,
1325 "Invalid member offset");
1326 return -EINVAL;
1327 }
1328
1329 nr_bits = nr_int_data_bits;
1330 } else if (nr_bits > nr_int_data_bits) {
1331 btf_verifier_log_member(env, struct_type, member,
1332 "Invalid member bitfield_size");
1333 return -EINVAL;
1334 }
1335
1336 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
1337 nr_copy_bits = nr_bits + BITS_PER_BYTE_MASKED(struct_bits_off);
1338 if (nr_copy_bits > BITS_PER_U128) {
1339 btf_verifier_log_member(env, struct_type, member,
1340 "nr_copy_bits exceeds 128");
1341 return -EINVAL;
1342 }
1343
1344 if (struct_size < bytes_offset ||
1345 struct_size - bytes_offset < BITS_ROUNDUP_BYTES(nr_copy_bits)) {
1346 btf_verifier_log_member(env, struct_type, member,
1347 "Member exceeds struct_size");
1348 return -EINVAL;
1349 }
1350
1351 return 0;
1352}
1353
1354static s32 btf_int_check_meta(struct btf_verifier_env *env,
1355 const struct btf_type *t,
1356 u32 meta_left)
1357{
1358 u32 int_data, nr_bits, meta_needed = sizeof(int_data);
1359 u16 encoding;
1360
1361 if (meta_left < meta_needed) {
1362 btf_verifier_log_basic(env, t,
1363 "meta_left:%u meta_needed:%u",
1364 meta_left, meta_needed);
1365 return -EINVAL;
1366 }
1367
1368 if (btf_type_vlen(t)) {
1369 btf_verifier_log_type(env, t, "vlen != 0");
1370 return -EINVAL;
1371 }
1372
1373 if (btf_type_kflag(t)) {
1374 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
1375 return -EINVAL;
1376 }
1377
1378 int_data = btf_type_int(t);
1379 if (int_data & ~BTF_INT_MASK) {
1380 btf_verifier_log_basic(env, t, "Invalid int_data:%x",
1381 int_data);
1382 return -EINVAL;
1383 }
1384
1385 nr_bits = BTF_INT_BITS(int_data) + BTF_INT_OFFSET(int_data);
1386
1387 if (nr_bits > BITS_PER_U128) {
1388 btf_verifier_log_type(env, t, "nr_bits exceeds %zu",
1389 BITS_PER_U128);
1390 return -EINVAL;
1391 }
1392
1393 if (BITS_ROUNDUP_BYTES(nr_bits) > t->size) {
1394 btf_verifier_log_type(env, t, "nr_bits exceeds type_size");
1395 return -EINVAL;
1396 }
1397
1398 /*
1399 * Only one of the encoding bits is allowed and it
1400 * should be sufficient for the pretty print purpose (i.e. decoding).
1401 * Multiple bits can be allowed later if it is found
1402 * to be insufficient.
1403 */
1404 encoding = BTF_INT_ENCODING(int_data);
1405 if (encoding &&
1406 encoding != BTF_INT_SIGNED &&
1407 encoding != BTF_INT_CHAR &&
1408 encoding != BTF_INT_BOOL) {
1409 btf_verifier_log_type(env, t, "Unsupported encoding");
1410 return -ENOTSUPP;
1411 }
1412
1413 btf_verifier_log_type(env, t, NULL);
1414
1415 return meta_needed;
1416}
1417
1418static void btf_int_log(struct btf_verifier_env *env,
1419 const struct btf_type *t)
1420{
1421 int int_data = btf_type_int(t);
1422
1423 btf_verifier_log(env,
1424 "size=%u bits_offset=%u nr_bits=%u encoding=%s",
1425 t->size, BTF_INT_OFFSET(int_data),
1426 BTF_INT_BITS(int_data),
1427 btf_int_encoding_str(BTF_INT_ENCODING(int_data)));
1428}
1429
1430static void btf_int128_print(struct seq_file *m, void *data)
1431{
1432 /* data points to a __int128 number.
1433 * Suppose
1434 * int128_num = *(__int128 *)data;
1435 * The below formulas shows what upper_num and lower_num represents:
1436 * upper_num = int128_num >> 64;
1437 * lower_num = int128_num & 0xffffffffFFFFFFFFULL;
1438 */
1439 u64 upper_num, lower_num;
1440
1441#ifdef __BIG_ENDIAN_BITFIELD
1442 upper_num = *(u64 *)data;
1443 lower_num = *(u64 *)(data + 8);
1444#else
1445 upper_num = *(u64 *)(data + 8);
1446 lower_num = *(u64 *)data;
1447#endif
1448 if (upper_num == 0)
1449 seq_printf(m, "0x%llx", lower_num);
1450 else
1451 seq_printf(m, "0x%llx%016llx", upper_num, lower_num);
1452}
1453
1454static void btf_int128_shift(u64 *print_num, u16 left_shift_bits,
1455 u16 right_shift_bits)
1456{
1457 u64 upper_num, lower_num;
1458
1459#ifdef __BIG_ENDIAN_BITFIELD
1460 upper_num = print_num[0];
1461 lower_num = print_num[1];
1462#else
1463 upper_num = print_num[1];
1464 lower_num = print_num[0];
1465#endif
1466
1467 /* shake out un-needed bits by shift/or operations */
1468 if (left_shift_bits >= 64) {
1469 upper_num = lower_num << (left_shift_bits - 64);
1470 lower_num = 0;
1471 } else {
1472 upper_num = (upper_num << left_shift_bits) |
1473 (lower_num >> (64 - left_shift_bits));
1474 lower_num = lower_num << left_shift_bits;
1475 }
1476
1477 if (right_shift_bits >= 64) {
1478 lower_num = upper_num >> (right_shift_bits - 64);
1479 upper_num = 0;
1480 } else {
1481 lower_num = (lower_num >> right_shift_bits) |
1482 (upper_num << (64 - right_shift_bits));
1483 upper_num = upper_num >> right_shift_bits;
1484 }
1485
1486#ifdef __BIG_ENDIAN_BITFIELD
1487 print_num[0] = upper_num;
1488 print_num[1] = lower_num;
1489#else
1490 print_num[0] = lower_num;
1491 print_num[1] = upper_num;
1492#endif
1493}
1494
1495static void btf_bitfield_seq_show(void *data, u8 bits_offset,
1496 u8 nr_bits, struct seq_file *m)
1497{
1498 u16 left_shift_bits, right_shift_bits;
1499 u8 nr_copy_bytes;
1500 u8 nr_copy_bits;
1501 u64 print_num[2] = {};
1502
1503 nr_copy_bits = nr_bits + bits_offset;
1504 nr_copy_bytes = BITS_ROUNDUP_BYTES(nr_copy_bits);
1505
1506 memcpy(print_num, data, nr_copy_bytes);
1507
1508#ifdef __BIG_ENDIAN_BITFIELD
1509 left_shift_bits = bits_offset;
1510#else
1511 left_shift_bits = BITS_PER_U128 - nr_copy_bits;
1512#endif
1513 right_shift_bits = BITS_PER_U128 - nr_bits;
1514
1515 btf_int128_shift(print_num, left_shift_bits, right_shift_bits);
1516 btf_int128_print(m, print_num);
1517}
1518
1519
1520static void btf_int_bits_seq_show(const struct btf *btf,
1521 const struct btf_type *t,
1522 void *data, u8 bits_offset,
1523 struct seq_file *m)
1524{
1525 u32 int_data = btf_type_int(t);
1526 u8 nr_bits = BTF_INT_BITS(int_data);
1527 u8 total_bits_offset;
1528
1529 /*
1530 * bits_offset is at most 7.
1531 * BTF_INT_OFFSET() cannot exceed 128 bits.
1532 */
1533 total_bits_offset = bits_offset + BTF_INT_OFFSET(int_data);
1534 data += BITS_ROUNDDOWN_BYTES(total_bits_offset);
1535 bits_offset = BITS_PER_BYTE_MASKED(total_bits_offset);
1536 btf_bitfield_seq_show(data, bits_offset, nr_bits, m);
1537}
1538
1539static void btf_int_seq_show(const struct btf *btf, const struct btf_type *t,
1540 u32 type_id, void *data, u8 bits_offset,
1541 struct seq_file *m)
1542{
1543 u32 int_data = btf_type_int(t);
1544 u8 encoding = BTF_INT_ENCODING(int_data);
1545 bool sign = encoding & BTF_INT_SIGNED;
1546 u8 nr_bits = BTF_INT_BITS(int_data);
1547
1548 if (bits_offset || BTF_INT_OFFSET(int_data) ||
1549 BITS_PER_BYTE_MASKED(nr_bits)) {
1550 btf_int_bits_seq_show(btf, t, data, bits_offset, m);
1551 return;
1552 }
1553
1554 switch (nr_bits) {
1555 case 128:
1556 btf_int128_print(m, data);
1557 break;
1558 case 64:
1559 if (sign)
1560 seq_printf(m, "%lld", *(s64 *)data);
1561 else
1562 seq_printf(m, "%llu", *(u64 *)data);
1563 break;
1564 case 32:
1565 if (sign)
1566 seq_printf(m, "%d", *(s32 *)data);
1567 else
1568 seq_printf(m, "%u", *(u32 *)data);
1569 break;
1570 case 16:
1571 if (sign)
1572 seq_printf(m, "%d", *(s16 *)data);
1573 else
1574 seq_printf(m, "%u", *(u16 *)data);
1575 break;
1576 case 8:
1577 if (sign)
1578 seq_printf(m, "%d", *(s8 *)data);
1579 else
1580 seq_printf(m, "%u", *(u8 *)data);
1581 break;
1582 default:
1583 btf_int_bits_seq_show(btf, t, data, bits_offset, m);
1584 }
1585}
1586
1587static const struct btf_kind_operations int_ops = {
1588 .check_meta = btf_int_check_meta,
1589 .resolve = btf_df_resolve,
1590 .check_member = btf_int_check_member,
1591 .check_kflag_member = btf_int_check_kflag_member,
1592 .log_details = btf_int_log,
1593 .seq_show = btf_int_seq_show,
1594};
1595
1596static int btf_modifier_check_member(struct btf_verifier_env *env,
1597 const struct btf_type *struct_type,
1598 const struct btf_member *member,
1599 const struct btf_type *member_type)
1600{
1601 const struct btf_type *resolved_type;
1602 u32 resolved_type_id = member->type;
1603 struct btf_member resolved_member;
1604 struct btf *btf = env->btf;
1605
1606 resolved_type = btf_type_id_size(btf, &resolved_type_id, NULL);
1607 if (!resolved_type) {
1608 btf_verifier_log_member(env, struct_type, member,
1609 "Invalid member");
1610 return -EINVAL;
1611 }
1612
1613 resolved_member = *member;
1614 resolved_member.type = resolved_type_id;
1615
1616 return btf_type_ops(resolved_type)->check_member(env, struct_type,
1617 &resolved_member,
1618 resolved_type);
1619}
1620
1621static int btf_modifier_check_kflag_member(struct btf_verifier_env *env,
1622 const struct btf_type *struct_type,
1623 const struct btf_member *member,
1624 const struct btf_type *member_type)
1625{
1626 const struct btf_type *resolved_type;
1627 u32 resolved_type_id = member->type;
1628 struct btf_member resolved_member;
1629 struct btf *btf = env->btf;
1630
1631 resolved_type = btf_type_id_size(btf, &resolved_type_id, NULL);
1632 if (!resolved_type) {
1633 btf_verifier_log_member(env, struct_type, member,
1634 "Invalid member");
1635 return -EINVAL;
1636 }
1637
1638 resolved_member = *member;
1639 resolved_member.type = resolved_type_id;
1640
1641 return btf_type_ops(resolved_type)->check_kflag_member(env, struct_type,
1642 &resolved_member,
1643 resolved_type);
1644}
1645
1646static int btf_ptr_check_member(struct btf_verifier_env *env,
1647 const struct btf_type *struct_type,
1648 const struct btf_member *member,
1649 const struct btf_type *member_type)
1650{
1651 u32 struct_size, struct_bits_off, bytes_offset;
1652
1653 struct_size = struct_type->size;
1654 struct_bits_off = member->offset;
1655 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
1656
1657 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
1658 btf_verifier_log_member(env, struct_type, member,
1659 "Member is not byte aligned");
1660 return -EINVAL;
1661 }
1662
1663 if (struct_size - bytes_offset < sizeof(void *)) {
1664 btf_verifier_log_member(env, struct_type, member,
1665 "Member exceeds struct_size");
1666 return -EINVAL;
1667 }
1668
1669 return 0;
1670}
1671
1672static int btf_ref_type_check_meta(struct btf_verifier_env *env,
1673 const struct btf_type *t,
1674 u32 meta_left)
1675{
1676 if (btf_type_vlen(t)) {
1677 btf_verifier_log_type(env, t, "vlen != 0");
1678 return -EINVAL;
1679 }
1680
1681 if (btf_type_kflag(t)) {
1682 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
1683 return -EINVAL;
1684 }
1685
1686 if (!BTF_TYPE_ID_VALID(t->type)) {
1687 btf_verifier_log_type(env, t, "Invalid type_id");
1688 return -EINVAL;
1689 }
1690
1691 /* typedef type must have a valid name, and other ref types,
1692 * volatile, const, restrict, should have a null name.
1693 */
1694 if (BTF_INFO_KIND(t->info) == BTF_KIND_TYPEDEF) {
1695 if (!t->name_off ||
1696 !btf_name_valid_identifier(env->btf, t->name_off)) {
1697 btf_verifier_log_type(env, t, "Invalid name");
1698 return -EINVAL;
1699 }
1700 } else {
1701 if (t->name_off) {
1702 btf_verifier_log_type(env, t, "Invalid name");
1703 return -EINVAL;
1704 }
1705 }
1706
1707 btf_verifier_log_type(env, t, NULL);
1708
1709 return 0;
1710}
1711
1712static int btf_modifier_resolve(struct btf_verifier_env *env,
1713 const struct resolve_vertex *v)
1714{
1715 const struct btf_type *t = v->t;
1716 const struct btf_type *next_type;
1717 u32 next_type_id = t->type;
1718 struct btf *btf = env->btf;
1719
1720 next_type = btf_type_by_id(btf, next_type_id);
1721 if (!next_type || btf_type_is_resolve_source_only(next_type)) {
1722 btf_verifier_log_type(env, v->t, "Invalid type_id");
1723 return -EINVAL;
1724 }
1725
1726 if (!env_type_is_resolve_sink(env, next_type) &&
1727 !env_type_is_resolved(env, next_type_id))
1728 return env_stack_push(env, next_type, next_type_id);
1729
1730 /* Figure out the resolved next_type_id with size.
1731 * They will be stored in the current modifier's
1732 * resolved_ids and resolved_sizes such that it can
1733 * save us a few type-following when we use it later (e.g. in
1734 * pretty print).
1735 */
1736 if (!btf_type_id_size(btf, &next_type_id, NULL)) {
1737 if (env_type_is_resolved(env, next_type_id))
1738 next_type = btf_type_id_resolve(btf, &next_type_id);
1739
1740 /* "typedef void new_void", "const void"...etc */
1741 if (!btf_type_is_void(next_type) &&
1742 !btf_type_is_fwd(next_type) &&
1743 !btf_type_is_func_proto(next_type)) {
1744 btf_verifier_log_type(env, v->t, "Invalid type_id");
1745 return -EINVAL;
1746 }
1747 }
1748
1749 env_stack_pop_resolved(env, next_type_id, 0);
1750
1751 return 0;
1752}
1753
1754static int btf_var_resolve(struct btf_verifier_env *env,
1755 const struct resolve_vertex *v)
1756{
1757 const struct btf_type *next_type;
1758 const struct btf_type *t = v->t;
1759 u32 next_type_id = t->type;
1760 struct btf *btf = env->btf;
1761
1762 next_type = btf_type_by_id(btf, next_type_id);
1763 if (!next_type || btf_type_is_resolve_source_only(next_type)) {
1764 btf_verifier_log_type(env, v->t, "Invalid type_id");
1765 return -EINVAL;
1766 }
1767
1768 if (!env_type_is_resolve_sink(env, next_type) &&
1769 !env_type_is_resolved(env, next_type_id))
1770 return env_stack_push(env, next_type, next_type_id);
1771
1772 if (btf_type_is_modifier(next_type)) {
1773 const struct btf_type *resolved_type;
1774 u32 resolved_type_id;
1775
1776 resolved_type_id = next_type_id;
1777 resolved_type = btf_type_id_resolve(btf, &resolved_type_id);
1778
1779 if (btf_type_is_ptr(resolved_type) &&
1780 !env_type_is_resolve_sink(env, resolved_type) &&
1781 !env_type_is_resolved(env, resolved_type_id))
1782 return env_stack_push(env, resolved_type,
1783 resolved_type_id);
1784 }
1785
1786 /* We must resolve to something concrete at this point, no
1787 * forward types or similar that would resolve to size of
1788 * zero is allowed.
1789 */
1790 if (!btf_type_id_size(btf, &next_type_id, NULL)) {
1791 btf_verifier_log_type(env, v->t, "Invalid type_id");
1792 return -EINVAL;
1793 }
1794
1795 env_stack_pop_resolved(env, next_type_id, 0);
1796
1797 return 0;
1798}
1799
1800static int btf_ptr_resolve(struct btf_verifier_env *env,
1801 const struct resolve_vertex *v)
1802{
1803 const struct btf_type *next_type;
1804 const struct btf_type *t = v->t;
1805 u32 next_type_id = t->type;
1806 struct btf *btf = env->btf;
1807
1808 next_type = btf_type_by_id(btf, next_type_id);
1809 if (!next_type || btf_type_is_resolve_source_only(next_type)) {
1810 btf_verifier_log_type(env, v->t, "Invalid type_id");
1811 return -EINVAL;
1812 }
1813
1814 if (!env_type_is_resolve_sink(env, next_type) &&
1815 !env_type_is_resolved(env, next_type_id))
1816 return env_stack_push(env, next_type, next_type_id);
1817
1818 /* If the modifier was RESOLVED during RESOLVE_STRUCT_OR_ARRAY,
1819 * the modifier may have stopped resolving when it was resolved
1820 * to a ptr (last-resolved-ptr).
1821 *
1822 * We now need to continue from the last-resolved-ptr to
1823 * ensure the last-resolved-ptr will not referring back to
1824 * the currenct ptr (t).
1825 */
1826 if (btf_type_is_modifier(next_type)) {
1827 const struct btf_type *resolved_type;
1828 u32 resolved_type_id;
1829
1830 resolved_type_id = next_type_id;
1831 resolved_type = btf_type_id_resolve(btf, &resolved_type_id);
1832
1833 if (btf_type_is_ptr(resolved_type) &&
1834 !env_type_is_resolve_sink(env, resolved_type) &&
1835 !env_type_is_resolved(env, resolved_type_id))
1836 return env_stack_push(env, resolved_type,
1837 resolved_type_id);
1838 }
1839
1840 if (!btf_type_id_size(btf, &next_type_id, NULL)) {
1841 if (env_type_is_resolved(env, next_type_id))
1842 next_type = btf_type_id_resolve(btf, &next_type_id);
1843
1844 if (!btf_type_is_void(next_type) &&
1845 !btf_type_is_fwd(next_type) &&
1846 !btf_type_is_func_proto(next_type)) {
1847 btf_verifier_log_type(env, v->t, "Invalid type_id");
1848 return -EINVAL;
1849 }
1850 }
1851
1852 env_stack_pop_resolved(env, next_type_id, 0);
1853
1854 return 0;
1855}
1856
1857static void btf_modifier_seq_show(const struct btf *btf,
1858 const struct btf_type *t,
1859 u32 type_id, void *data,
1860 u8 bits_offset, struct seq_file *m)
1861{
1862 if (btf->resolved_ids)
1863 t = btf_type_id_resolve(btf, &type_id);
1864 else
1865 t = btf_type_skip_modifiers(btf, type_id, NULL);
1866
1867 btf_type_ops(t)->seq_show(btf, t, type_id, data, bits_offset, m);
1868}
1869
1870static void btf_var_seq_show(const struct btf *btf, const struct btf_type *t,
1871 u32 type_id, void *data, u8 bits_offset,
1872 struct seq_file *m)
1873{
1874 t = btf_type_id_resolve(btf, &type_id);
1875
1876 btf_type_ops(t)->seq_show(btf, t, type_id, data, bits_offset, m);
1877}
1878
1879static void btf_ptr_seq_show(const struct btf *btf, const struct btf_type *t,
1880 u32 type_id, void *data, u8 bits_offset,
1881 struct seq_file *m)
1882{
1883 /* It is a hashed value */
1884 seq_printf(m, "%p", *(void **)data);
1885}
1886
1887static void btf_ref_type_log(struct btf_verifier_env *env,
1888 const struct btf_type *t)
1889{
1890 btf_verifier_log(env, "type_id=%u", t->type);
1891}
1892
1893static struct btf_kind_operations modifier_ops = {
1894 .check_meta = btf_ref_type_check_meta,
1895 .resolve = btf_modifier_resolve,
1896 .check_member = btf_modifier_check_member,
1897 .check_kflag_member = btf_modifier_check_kflag_member,
1898 .log_details = btf_ref_type_log,
1899 .seq_show = btf_modifier_seq_show,
1900};
1901
1902static struct btf_kind_operations ptr_ops = {
1903 .check_meta = btf_ref_type_check_meta,
1904 .resolve = btf_ptr_resolve,
1905 .check_member = btf_ptr_check_member,
1906 .check_kflag_member = btf_generic_check_kflag_member,
1907 .log_details = btf_ref_type_log,
1908 .seq_show = btf_ptr_seq_show,
1909};
1910
1911static s32 btf_fwd_check_meta(struct btf_verifier_env *env,
1912 const struct btf_type *t,
1913 u32 meta_left)
1914{
1915 if (btf_type_vlen(t)) {
1916 btf_verifier_log_type(env, t, "vlen != 0");
1917 return -EINVAL;
1918 }
1919
1920 if (t->type) {
1921 btf_verifier_log_type(env, t, "type != 0");
1922 return -EINVAL;
1923 }
1924
1925 /* fwd type must have a valid name */
1926 if (!t->name_off ||
1927 !btf_name_valid_identifier(env->btf, t->name_off)) {
1928 btf_verifier_log_type(env, t, "Invalid name");
1929 return -EINVAL;
1930 }
1931
1932 btf_verifier_log_type(env, t, NULL);
1933
1934 return 0;
1935}
1936
1937static void btf_fwd_type_log(struct btf_verifier_env *env,
1938 const struct btf_type *t)
1939{
1940 btf_verifier_log(env, "%s", btf_type_kflag(t) ? "union" : "struct");
1941}
1942
1943static struct btf_kind_operations fwd_ops = {
1944 .check_meta = btf_fwd_check_meta,
1945 .resolve = btf_df_resolve,
1946 .check_member = btf_df_check_member,
1947 .check_kflag_member = btf_df_check_kflag_member,
1948 .log_details = btf_fwd_type_log,
1949 .seq_show = btf_df_seq_show,
1950};
1951
1952static int btf_array_check_member(struct btf_verifier_env *env,
1953 const struct btf_type *struct_type,
1954 const struct btf_member *member,
1955 const struct btf_type *member_type)
1956{
1957 u32 struct_bits_off = member->offset;
1958 u32 struct_size, bytes_offset;
1959 u32 array_type_id, array_size;
1960 struct btf *btf = env->btf;
1961
1962 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
1963 btf_verifier_log_member(env, struct_type, member,
1964 "Member is not byte aligned");
1965 return -EINVAL;
1966 }
1967
1968 array_type_id = member->type;
1969 btf_type_id_size(btf, &array_type_id, &array_size);
1970 struct_size = struct_type->size;
1971 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
1972 if (struct_size - bytes_offset < array_size) {
1973 btf_verifier_log_member(env, struct_type, member,
1974 "Member exceeds struct_size");
1975 return -EINVAL;
1976 }
1977
1978 return 0;
1979}
1980
1981static s32 btf_array_check_meta(struct btf_verifier_env *env,
1982 const struct btf_type *t,
1983 u32 meta_left)
1984{
1985 const struct btf_array *array = btf_type_array(t);
1986 u32 meta_needed = sizeof(*array);
1987
1988 if (meta_left < meta_needed) {
1989 btf_verifier_log_basic(env, t,
1990 "meta_left:%u meta_needed:%u",
1991 meta_left, meta_needed);
1992 return -EINVAL;
1993 }
1994
1995 /* array type should not have a name */
1996 if (t->name_off) {
1997 btf_verifier_log_type(env, t, "Invalid name");
1998 return -EINVAL;
1999 }
2000
2001 if (btf_type_vlen(t)) {
2002 btf_verifier_log_type(env, t, "vlen != 0");
2003 return -EINVAL;
2004 }
2005
2006 if (btf_type_kflag(t)) {
2007 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
2008 return -EINVAL;
2009 }
2010
2011 if (t->size) {
2012 btf_verifier_log_type(env, t, "size != 0");
2013 return -EINVAL;
2014 }
2015
2016 /* Array elem type and index type cannot be in type void,
2017 * so !array->type and !array->index_type are not allowed.
2018 */
2019 if (!array->type || !BTF_TYPE_ID_VALID(array->type)) {
2020 btf_verifier_log_type(env, t, "Invalid elem");
2021 return -EINVAL;
2022 }
2023
2024 if (!array->index_type || !BTF_TYPE_ID_VALID(array->index_type)) {
2025 btf_verifier_log_type(env, t, "Invalid index");
2026 return -EINVAL;
2027 }
2028
2029 btf_verifier_log_type(env, t, NULL);
2030
2031 return meta_needed;
2032}
2033
2034static int btf_array_resolve(struct btf_verifier_env *env,
2035 const struct resolve_vertex *v)
2036{
2037 const struct btf_array *array = btf_type_array(v->t);
2038 const struct btf_type *elem_type, *index_type;
2039 u32 elem_type_id, index_type_id;
2040 struct btf *btf = env->btf;
2041 u32 elem_size;
2042
2043 /* Check array->index_type */
2044 index_type_id = array->index_type;
2045 index_type = btf_type_by_id(btf, index_type_id);
2046 if (btf_type_nosize_or_null(index_type) ||
2047 btf_type_is_resolve_source_only(index_type)) {
2048 btf_verifier_log_type(env, v->t, "Invalid index");
2049 return -EINVAL;
2050 }
2051
2052 if (!env_type_is_resolve_sink(env, index_type) &&
2053 !env_type_is_resolved(env, index_type_id))
2054 return env_stack_push(env, index_type, index_type_id);
2055
2056 index_type = btf_type_id_size(btf, &index_type_id, NULL);
2057 if (!index_type || !btf_type_is_int(index_type) ||
2058 !btf_type_int_is_regular(index_type)) {
2059 btf_verifier_log_type(env, v->t, "Invalid index");
2060 return -EINVAL;
2061 }
2062
2063 /* Check array->type */
2064 elem_type_id = array->type;
2065 elem_type = btf_type_by_id(btf, elem_type_id);
2066 if (btf_type_nosize_or_null(elem_type) ||
2067 btf_type_is_resolve_source_only(elem_type)) {
2068 btf_verifier_log_type(env, v->t,
2069 "Invalid elem");
2070 return -EINVAL;
2071 }
2072
2073 if (!env_type_is_resolve_sink(env, elem_type) &&
2074 !env_type_is_resolved(env, elem_type_id))
2075 return env_stack_push(env, elem_type, elem_type_id);
2076
2077 elem_type = btf_type_id_size(btf, &elem_type_id, &elem_size);
2078 if (!elem_type) {
2079 btf_verifier_log_type(env, v->t, "Invalid elem");
2080 return -EINVAL;
2081 }
2082
2083 if (btf_type_is_int(elem_type) && !btf_type_int_is_regular(elem_type)) {
2084 btf_verifier_log_type(env, v->t, "Invalid array of int");
2085 return -EINVAL;
2086 }
2087
2088 if (array->nelems && elem_size > U32_MAX / array->nelems) {
2089 btf_verifier_log_type(env, v->t,
2090 "Array size overflows U32_MAX");
2091 return -EINVAL;
2092 }
2093
2094 env_stack_pop_resolved(env, elem_type_id, elem_size * array->nelems);
2095
2096 return 0;
2097}
2098
2099static void btf_array_log(struct btf_verifier_env *env,
2100 const struct btf_type *t)
2101{
2102 const struct btf_array *array = btf_type_array(t);
2103
2104 btf_verifier_log(env, "type_id=%u index_type_id=%u nr_elems=%u",
2105 array->type, array->index_type, array->nelems);
2106}
2107
2108static void btf_array_seq_show(const struct btf *btf, const struct btf_type *t,
2109 u32 type_id, void *data, u8 bits_offset,
2110 struct seq_file *m)
2111{
2112 const struct btf_array *array = btf_type_array(t);
2113 const struct btf_kind_operations *elem_ops;
2114 const struct btf_type *elem_type;
2115 u32 i, elem_size, elem_type_id;
2116
2117 elem_type_id = array->type;
2118 elem_type = btf_type_id_size(btf, &elem_type_id, &elem_size);
2119 elem_ops = btf_type_ops(elem_type);
2120 seq_puts(m, "[");
2121 for (i = 0; i < array->nelems; i++) {
2122 if (i)
2123 seq_puts(m, ",");
2124
2125 elem_ops->seq_show(btf, elem_type, elem_type_id, data,
2126 bits_offset, m);
2127 data += elem_size;
2128 }
2129 seq_puts(m, "]");
2130}
2131
2132static struct btf_kind_operations array_ops = {
2133 .check_meta = btf_array_check_meta,
2134 .resolve = btf_array_resolve,
2135 .check_member = btf_array_check_member,
2136 .check_kflag_member = btf_generic_check_kflag_member,
2137 .log_details = btf_array_log,
2138 .seq_show = btf_array_seq_show,
2139};
2140
2141static int btf_struct_check_member(struct btf_verifier_env *env,
2142 const struct btf_type *struct_type,
2143 const struct btf_member *member,
2144 const struct btf_type *member_type)
2145{
2146 u32 struct_bits_off = member->offset;
2147 u32 struct_size, bytes_offset;
2148
2149 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
2150 btf_verifier_log_member(env, struct_type, member,
2151 "Member is not byte aligned");
2152 return -EINVAL;
2153 }
2154
2155 struct_size = struct_type->size;
2156 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
2157 if (struct_size - bytes_offset < member_type->size) {
2158 btf_verifier_log_member(env, struct_type, member,
2159 "Member exceeds struct_size");
2160 return -EINVAL;
2161 }
2162
2163 return 0;
2164}
2165
2166static s32 btf_struct_check_meta(struct btf_verifier_env *env,
2167 const struct btf_type *t,
2168 u32 meta_left)
2169{
2170 bool is_union = BTF_INFO_KIND(t->info) == BTF_KIND_UNION;
2171 const struct btf_member *member;
2172 u32 meta_needed, last_offset;
2173 struct btf *btf = env->btf;
2174 u32 struct_size = t->size;
2175 u32 offset;
2176 u16 i;
2177
2178 meta_needed = btf_type_vlen(t) * sizeof(*member);
2179 if (meta_left < meta_needed) {
2180 btf_verifier_log_basic(env, t,
2181 "meta_left:%u meta_needed:%u",
2182 meta_left, meta_needed);
2183 return -EINVAL;
2184 }
2185
2186 /* struct type either no name or a valid one */
2187 if (t->name_off &&
2188 !btf_name_valid_identifier(env->btf, t->name_off)) {
2189 btf_verifier_log_type(env, t, "Invalid name");
2190 return -EINVAL;
2191 }
2192
2193 btf_verifier_log_type(env, t, NULL);
2194
2195 last_offset = 0;
2196 for_each_member(i, t, member) {
2197 if (!btf_name_offset_valid(btf, member->name_off)) {
2198 btf_verifier_log_member(env, t, member,
2199 "Invalid member name_offset:%u",
2200 member->name_off);
2201 return -EINVAL;
2202 }
2203
2204 /* struct member either no name or a valid one */
2205 if (member->name_off &&
2206 !btf_name_valid_identifier(btf, member->name_off)) {
2207 btf_verifier_log_member(env, t, member, "Invalid name");
2208 return -EINVAL;
2209 }
2210 /* A member cannot be in type void */
2211 if (!member->type || !BTF_TYPE_ID_VALID(member->type)) {
2212 btf_verifier_log_member(env, t, member,
2213 "Invalid type_id");
2214 return -EINVAL;
2215 }
2216
2217 offset = btf_member_bit_offset(t, member);
2218 if (is_union && offset) {
2219 btf_verifier_log_member(env, t, member,
2220 "Invalid member bits_offset");
2221 return -EINVAL;
2222 }
2223
2224 /*
2225 * ">" instead of ">=" because the last member could be
2226 * "char a[0];"
2227 */
2228 if (last_offset > offset) {
2229 btf_verifier_log_member(env, t, member,
2230 "Invalid member bits_offset");
2231 return -EINVAL;
2232 }
2233
2234 if (BITS_ROUNDUP_BYTES(offset) > struct_size) {
2235 btf_verifier_log_member(env, t, member,
2236 "Member bits_offset exceeds its struct size");
2237 return -EINVAL;
2238 }
2239
2240 btf_verifier_log_member(env, t, member, NULL);
2241 last_offset = offset;
2242 }
2243
2244 return meta_needed;
2245}
2246
2247static int btf_struct_resolve(struct btf_verifier_env *env,
2248 const struct resolve_vertex *v)
2249{
2250 const struct btf_member *member;
2251 int err;
2252 u16 i;
2253
2254 /* Before continue resolving the next_member,
2255 * ensure the last member is indeed resolved to a
2256 * type with size info.
2257 */
2258 if (v->next_member) {
2259 const struct btf_type *last_member_type;
2260 const struct btf_member *last_member;
2261 u16 last_member_type_id;
2262
2263 last_member = btf_type_member(v->t) + v->next_member - 1;
2264 last_member_type_id = last_member->type;
2265 if (WARN_ON_ONCE(!env_type_is_resolved(env,
2266 last_member_type_id)))
2267 return -EINVAL;
2268
2269 last_member_type = btf_type_by_id(env->btf,
2270 last_member_type_id);
2271 if (btf_type_kflag(v->t))
2272 err = btf_type_ops(last_member_type)->check_kflag_member(env, v->t,
2273 last_member,
2274 last_member_type);
2275 else
2276 err = btf_type_ops(last_member_type)->check_member(env, v->t,
2277 last_member,
2278 last_member_type);
2279 if (err)
2280 return err;
2281 }
2282
2283 for_each_member_from(i, v->next_member, v->t, member) {
2284 u32 member_type_id = member->type;
2285 const struct btf_type *member_type = btf_type_by_id(env->btf,
2286 member_type_id);
2287
2288 if (btf_type_nosize_or_null(member_type) ||
2289 btf_type_is_resolve_source_only(member_type)) {
2290 btf_verifier_log_member(env, v->t, member,
2291 "Invalid member");
2292 return -EINVAL;
2293 }
2294
2295 if (!env_type_is_resolve_sink(env, member_type) &&
2296 !env_type_is_resolved(env, member_type_id)) {
2297 env_stack_set_next_member(env, i + 1);
2298 return env_stack_push(env, member_type, member_type_id);
2299 }
2300
2301 if (btf_type_kflag(v->t))
2302 err = btf_type_ops(member_type)->check_kflag_member(env, v->t,
2303 member,
2304 member_type);
2305 else
2306 err = btf_type_ops(member_type)->check_member(env, v->t,
2307 member,
2308 member_type);
2309 if (err)
2310 return err;
2311 }
2312
2313 env_stack_pop_resolved(env, 0, 0);
2314
2315 return 0;
2316}
2317
2318static void btf_struct_log(struct btf_verifier_env *env,
2319 const struct btf_type *t)
2320{
2321 btf_verifier_log(env, "size=%u vlen=%u", t->size, btf_type_vlen(t));
2322}
2323
2324/* find 'struct bpf_spin_lock' in map value.
2325 * return >= 0 offset if found
2326 * and < 0 in case of error
2327 */
2328int btf_find_spin_lock(const struct btf *btf, const struct btf_type *t)
2329{
2330 const struct btf_member *member;
2331 u32 i, off = -ENOENT;
2332
2333 if (!__btf_type_is_struct(t))
2334 return -EINVAL;
2335
2336 for_each_member(i, t, member) {
2337 const struct btf_type *member_type = btf_type_by_id(btf,
2338 member->type);
2339 if (!__btf_type_is_struct(member_type))
2340 continue;
2341 if (member_type->size != sizeof(struct bpf_spin_lock))
2342 continue;
2343 if (strcmp(__btf_name_by_offset(btf, member_type->name_off),
2344 "bpf_spin_lock"))
2345 continue;
2346 if (off != -ENOENT)
2347 /* only one 'struct bpf_spin_lock' is allowed */
2348 return -E2BIG;
2349 off = btf_member_bit_offset(t, member);
2350 if (off % 8)
2351 /* valid C code cannot generate such BTF */
2352 return -EINVAL;
2353 off /= 8;
2354 if (off % __alignof__(struct bpf_spin_lock))
2355 /* valid struct bpf_spin_lock will be 4 byte aligned */
2356 return -EINVAL;
2357 }
2358 return off;
2359}
2360
2361static void btf_struct_seq_show(const struct btf *btf, const struct btf_type *t,
2362 u32 type_id, void *data, u8 bits_offset,
2363 struct seq_file *m)
2364{
2365 const char *seq = BTF_INFO_KIND(t->info) == BTF_KIND_UNION ? "|" : ",";
2366 const struct btf_member *member;
2367 u32 i;
2368
2369 seq_puts(m, "{");
2370 for_each_member(i, t, member) {
2371 const struct btf_type *member_type = btf_type_by_id(btf,
2372 member->type);
2373 const struct btf_kind_operations *ops;
2374 u32 member_offset, bitfield_size;
2375 u32 bytes_offset;
2376 u8 bits8_offset;
2377
2378 if (i)
2379 seq_puts(m, seq);
2380
2381 member_offset = btf_member_bit_offset(t, member);
2382 bitfield_size = btf_member_bitfield_size(t, member);
2383 bytes_offset = BITS_ROUNDDOWN_BYTES(member_offset);
2384 bits8_offset = BITS_PER_BYTE_MASKED(member_offset);
2385 if (bitfield_size) {
2386 btf_bitfield_seq_show(data + bytes_offset, bits8_offset,
2387 bitfield_size, m);
2388 } else {
2389 ops = btf_type_ops(member_type);
2390 ops->seq_show(btf, member_type, member->type,
2391 data + bytes_offset, bits8_offset, m);
2392 }
2393 }
2394 seq_puts(m, "}");
2395}
2396
2397static struct btf_kind_operations struct_ops = {
2398 .check_meta = btf_struct_check_meta,
2399 .resolve = btf_struct_resolve,
2400 .check_member = btf_struct_check_member,
2401 .check_kflag_member = btf_generic_check_kflag_member,
2402 .log_details = btf_struct_log,
2403 .seq_show = btf_struct_seq_show,
2404};
2405
2406static int btf_enum_check_member(struct btf_verifier_env *env,
2407 const struct btf_type *struct_type,
2408 const struct btf_member *member,
2409 const struct btf_type *member_type)
2410{
2411 u32 struct_bits_off = member->offset;
2412 u32 struct_size, bytes_offset;
2413
2414 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
2415 btf_verifier_log_member(env, struct_type, member,
2416 "Member is not byte aligned");
2417 return -EINVAL;
2418 }
2419
2420 struct_size = struct_type->size;
2421 bytes_offset = BITS_ROUNDDOWN_BYTES(struct_bits_off);
2422 if (struct_size - bytes_offset < member_type->size) {
2423 btf_verifier_log_member(env, struct_type, member,
2424 "Member exceeds struct_size");
2425 return -EINVAL;
2426 }
2427
2428 return 0;
2429}
2430
2431static int btf_enum_check_kflag_member(struct btf_verifier_env *env,
2432 const struct btf_type *struct_type,
2433 const struct btf_member *member,
2434 const struct btf_type *member_type)
2435{
2436 u32 struct_bits_off, nr_bits, bytes_end, struct_size;
2437 u32 int_bitsize = sizeof(int) * BITS_PER_BYTE;
2438
2439 struct_bits_off = BTF_MEMBER_BIT_OFFSET(member->offset);
2440 nr_bits = BTF_MEMBER_BITFIELD_SIZE(member->offset);
2441 if (!nr_bits) {
2442 if (BITS_PER_BYTE_MASKED(struct_bits_off)) {
2443 btf_verifier_log_member(env, struct_type, member,
2444 "Member is not byte aligned");
2445 return -EINVAL;
2446 }
2447
2448 nr_bits = int_bitsize;
2449 } else if (nr_bits > int_bitsize) {
2450 btf_verifier_log_member(env, struct_type, member,
2451 "Invalid member bitfield_size");
2452 return -EINVAL;
2453 }
2454
2455 struct_size = struct_type->size;
2456 bytes_end = BITS_ROUNDUP_BYTES(struct_bits_off + nr_bits);
2457 if (struct_size < bytes_end) {
2458 btf_verifier_log_member(env, struct_type, member,
2459 "Member exceeds struct_size");
2460 return -EINVAL;
2461 }
2462
2463 return 0;
2464}
2465
2466static s32 btf_enum_check_meta(struct btf_verifier_env *env,
2467 const struct btf_type *t,
2468 u32 meta_left)
2469{
2470 const struct btf_enum *enums = btf_type_enum(t);
2471 struct btf *btf = env->btf;
2472 u16 i, nr_enums;
2473 u32 meta_needed;
2474
2475 nr_enums = btf_type_vlen(t);
2476 meta_needed = nr_enums * sizeof(*enums);
2477
2478 if (meta_left < meta_needed) {
2479 btf_verifier_log_basic(env, t,
2480 "meta_left:%u meta_needed:%u",
2481 meta_left, meta_needed);
2482 return -EINVAL;
2483 }
2484
2485 if (btf_type_kflag(t)) {
2486 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
2487 return -EINVAL;
2488 }
2489
2490 if (t->size > 8 || !is_power_of_2(t->size)) {
2491 btf_verifier_log_type(env, t, "Unexpected size");
2492 return -EINVAL;
2493 }
2494
2495 /* enum type either no name or a valid one */
2496 if (t->name_off &&
2497 !btf_name_valid_identifier(env->btf, t->name_off)) {
2498 btf_verifier_log_type(env, t, "Invalid name");
2499 return -EINVAL;
2500 }
2501
2502 btf_verifier_log_type(env, t, NULL);
2503
2504 for (i = 0; i < nr_enums; i++) {
2505 if (!btf_name_offset_valid(btf, enums[i].name_off)) {
2506 btf_verifier_log(env, "\tInvalid name_offset:%u",
2507 enums[i].name_off);
2508 return -EINVAL;
2509 }
2510
2511 /* enum member must have a valid name */
2512 if (!enums[i].name_off ||
2513 !btf_name_valid_identifier(btf, enums[i].name_off)) {
2514 btf_verifier_log_type(env, t, "Invalid name");
2515 return -EINVAL;
2516 }
2517
2518 if (env->log.level == BPF_LOG_KERNEL)
2519 continue;
2520 btf_verifier_log(env, "\t%s val=%d\n",
2521 __btf_name_by_offset(btf, enums[i].name_off),
2522 enums[i].val);
2523 }
2524
2525 return meta_needed;
2526}
2527
2528static void btf_enum_log(struct btf_verifier_env *env,
2529 const struct btf_type *t)
2530{
2531 btf_verifier_log(env, "size=%u vlen=%u", t->size, btf_type_vlen(t));
2532}
2533
2534static void btf_enum_seq_show(const struct btf *btf, const struct btf_type *t,
2535 u32 type_id, void *data, u8 bits_offset,
2536 struct seq_file *m)
2537{
2538 const struct btf_enum *enums = btf_type_enum(t);
2539 u32 i, nr_enums = btf_type_vlen(t);
2540 int v = *(int *)data;
2541
2542 for (i = 0; i < nr_enums; i++) {
2543 if (v == enums[i].val) {
2544 seq_printf(m, "%s",
2545 __btf_name_by_offset(btf,
2546 enums[i].name_off));
2547 return;
2548 }
2549 }
2550
2551 seq_printf(m, "%d", v);
2552}
2553
2554static struct btf_kind_operations enum_ops = {
2555 .check_meta = btf_enum_check_meta,
2556 .resolve = btf_df_resolve,
2557 .check_member = btf_enum_check_member,
2558 .check_kflag_member = btf_enum_check_kflag_member,
2559 .log_details = btf_enum_log,
2560 .seq_show = btf_enum_seq_show,
2561};
2562
2563static s32 btf_func_proto_check_meta(struct btf_verifier_env *env,
2564 const struct btf_type *t,
2565 u32 meta_left)
2566{
2567 u32 meta_needed = btf_type_vlen(t) * sizeof(struct btf_param);
2568
2569 if (meta_left < meta_needed) {
2570 btf_verifier_log_basic(env, t,
2571 "meta_left:%u meta_needed:%u",
2572 meta_left, meta_needed);
2573 return -EINVAL;
2574 }
2575
2576 if (t->name_off) {
2577 btf_verifier_log_type(env, t, "Invalid name");
2578 return -EINVAL;
2579 }
2580
2581 if (btf_type_kflag(t)) {
2582 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
2583 return -EINVAL;
2584 }
2585
2586 btf_verifier_log_type(env, t, NULL);
2587
2588 return meta_needed;
2589}
2590
2591static void btf_func_proto_log(struct btf_verifier_env *env,
2592 const struct btf_type *t)
2593{
2594 const struct btf_param *args = (const struct btf_param *)(t + 1);
2595 u16 nr_args = btf_type_vlen(t), i;
2596
2597 btf_verifier_log(env, "return=%u args=(", t->type);
2598 if (!nr_args) {
2599 btf_verifier_log(env, "void");
2600 goto done;
2601 }
2602
2603 if (nr_args == 1 && !args[0].type) {
2604 /* Only one vararg */
2605 btf_verifier_log(env, "vararg");
2606 goto done;
2607 }
2608
2609 btf_verifier_log(env, "%u %s", args[0].type,
2610 __btf_name_by_offset(env->btf,
2611 args[0].name_off));
2612 for (i = 1; i < nr_args - 1; i++)
2613 btf_verifier_log(env, ", %u %s", args[i].type,
2614 __btf_name_by_offset(env->btf,
2615 args[i].name_off));
2616
2617 if (nr_args > 1) {
2618 const struct btf_param *last_arg = &args[nr_args - 1];
2619
2620 if (last_arg->type)
2621 btf_verifier_log(env, ", %u %s", last_arg->type,
2622 __btf_name_by_offset(env->btf,
2623 last_arg->name_off));
2624 else
2625 btf_verifier_log(env, ", vararg");
2626 }
2627
2628done:
2629 btf_verifier_log(env, ")");
2630}
2631
2632static struct btf_kind_operations func_proto_ops = {
2633 .check_meta = btf_func_proto_check_meta,
2634 .resolve = btf_df_resolve,
2635 /*
2636 * BTF_KIND_FUNC_PROTO cannot be directly referred by
2637 * a struct's member.
2638 *
2639 * It should be a funciton pointer instead.
2640 * (i.e. struct's member -> BTF_KIND_PTR -> BTF_KIND_FUNC_PROTO)
2641 *
2642 * Hence, there is no btf_func_check_member().
2643 */
2644 .check_member = btf_df_check_member,
2645 .check_kflag_member = btf_df_check_kflag_member,
2646 .log_details = btf_func_proto_log,
2647 .seq_show = btf_df_seq_show,
2648};
2649
2650static s32 btf_func_check_meta(struct btf_verifier_env *env,
2651 const struct btf_type *t,
2652 u32 meta_left)
2653{
2654 if (!t->name_off ||
2655 !btf_name_valid_identifier(env->btf, t->name_off)) {
2656 btf_verifier_log_type(env, t, "Invalid name");
2657 return -EINVAL;
2658 }
2659
2660 if (btf_type_vlen(t) > BTF_FUNC_GLOBAL) {
2661 btf_verifier_log_type(env, t, "Invalid func linkage");
2662 return -EINVAL;
2663 }
2664
2665 if (btf_type_kflag(t)) {
2666 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
2667 return -EINVAL;
2668 }
2669
2670 btf_verifier_log_type(env, t, NULL);
2671
2672 return 0;
2673}
2674
2675static struct btf_kind_operations func_ops = {
2676 .check_meta = btf_func_check_meta,
2677 .resolve = btf_df_resolve,
2678 .check_member = btf_df_check_member,
2679 .check_kflag_member = btf_df_check_kflag_member,
2680 .log_details = btf_ref_type_log,
2681 .seq_show = btf_df_seq_show,
2682};
2683
2684static s32 btf_var_check_meta(struct btf_verifier_env *env,
2685 const struct btf_type *t,
2686 u32 meta_left)
2687{
2688 const struct btf_var *var;
2689 u32 meta_needed = sizeof(*var);
2690
2691 if (meta_left < meta_needed) {
2692 btf_verifier_log_basic(env, t,
2693 "meta_left:%u meta_needed:%u",
2694 meta_left, meta_needed);
2695 return -EINVAL;
2696 }
2697
2698 if (btf_type_vlen(t)) {
2699 btf_verifier_log_type(env, t, "vlen != 0");
2700 return -EINVAL;
2701 }
2702
2703 if (btf_type_kflag(t)) {
2704 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
2705 return -EINVAL;
2706 }
2707
2708 if (!t->name_off ||
2709 !__btf_name_valid(env->btf, t->name_off, true)) {
2710 btf_verifier_log_type(env, t, "Invalid name");
2711 return -EINVAL;
2712 }
2713
2714 /* A var cannot be in type void */
2715 if (!t->type || !BTF_TYPE_ID_VALID(t->type)) {
2716 btf_verifier_log_type(env, t, "Invalid type_id");
2717 return -EINVAL;
2718 }
2719
2720 var = btf_type_var(t);
2721 if (var->linkage != BTF_VAR_STATIC &&
2722 var->linkage != BTF_VAR_GLOBAL_ALLOCATED) {
2723 btf_verifier_log_type(env, t, "Linkage not supported");
2724 return -EINVAL;
2725 }
2726
2727 btf_verifier_log_type(env, t, NULL);
2728
2729 return meta_needed;
2730}
2731
2732static void btf_var_log(struct btf_verifier_env *env, const struct btf_type *t)
2733{
2734 const struct btf_var *var = btf_type_var(t);
2735
2736 btf_verifier_log(env, "type_id=%u linkage=%u", t->type, var->linkage);
2737}
2738
2739static const struct btf_kind_operations var_ops = {
2740 .check_meta = btf_var_check_meta,
2741 .resolve = btf_var_resolve,
2742 .check_member = btf_df_check_member,
2743 .check_kflag_member = btf_df_check_kflag_member,
2744 .log_details = btf_var_log,
2745 .seq_show = btf_var_seq_show,
2746};
2747
2748static s32 btf_datasec_check_meta(struct btf_verifier_env *env,
2749 const struct btf_type *t,
2750 u32 meta_left)
2751{
2752 const struct btf_var_secinfo *vsi;
2753 u64 last_vsi_end_off = 0, sum = 0;
2754 u32 i, meta_needed;
2755
2756 meta_needed = btf_type_vlen(t) * sizeof(*vsi);
2757 if (meta_left < meta_needed) {
2758 btf_verifier_log_basic(env, t,
2759 "meta_left:%u meta_needed:%u",
2760 meta_left, meta_needed);
2761 return -EINVAL;
2762 }
2763
2764 if (!btf_type_vlen(t)) {
2765 btf_verifier_log_type(env, t, "vlen == 0");
2766 return -EINVAL;
2767 }
2768
2769 if (!t->size) {
2770 btf_verifier_log_type(env, t, "size == 0");
2771 return -EINVAL;
2772 }
2773
2774 if (btf_type_kflag(t)) {
2775 btf_verifier_log_type(env, t, "Invalid btf_info kind_flag");
2776 return -EINVAL;
2777 }
2778
2779 if (!t->name_off ||
2780 !btf_name_valid_section(env->btf, t->name_off)) {
2781 btf_verifier_log_type(env, t, "Invalid name");
2782 return -EINVAL;
2783 }
2784
2785 btf_verifier_log_type(env, t, NULL);
2786
2787 for_each_vsi(i, t, vsi) {
2788 /* A var cannot be in type void */
2789 if (!vsi->type || !BTF_TYPE_ID_VALID(vsi->type)) {
2790 btf_verifier_log_vsi(env, t, vsi,
2791 "Invalid type_id");
2792 return -EINVAL;
2793 }
2794
2795 if (vsi->offset < last_vsi_end_off || vsi->offset >= t->size) {
2796 btf_verifier_log_vsi(env, t, vsi,
2797 "Invalid offset");
2798 return -EINVAL;
2799 }
2800
2801 if (!vsi->size || vsi->size > t->size) {
2802 btf_verifier_log_vsi(env, t, vsi,
2803 "Invalid size");
2804 return -EINVAL;
2805 }
2806
2807 last_vsi_end_off = vsi->offset + vsi->size;
2808 if (last_vsi_end_off > t->size) {
2809 btf_verifier_log_vsi(env, t, vsi,
2810 "Invalid offset+size");
2811 return -EINVAL;
2812 }
2813
2814 btf_verifier_log_vsi(env, t, vsi, NULL);
2815 sum += vsi->size;
2816 }
2817
2818 if (t->size < sum) {
2819 btf_verifier_log_type(env, t, "Invalid btf_info size");
2820 return -EINVAL;
2821 }
2822
2823 return meta_needed;
2824}
2825
2826static int btf_datasec_resolve(struct btf_verifier_env *env,
2827 const struct resolve_vertex *v)
2828{
2829 const struct btf_var_secinfo *vsi;
2830 struct btf *btf = env->btf;
2831 u16 i;
2832
2833 for_each_vsi_from(i, v->next_member, v->t, vsi) {
2834 u32 var_type_id = vsi->type, type_id, type_size = 0;
2835 const struct btf_type *var_type = btf_type_by_id(env->btf,
2836 var_type_id);
2837 if (!var_type || !btf_type_is_var(var_type)) {
2838 btf_verifier_log_vsi(env, v->t, vsi,
2839 "Not a VAR kind member");
2840 return -EINVAL;
2841 }
2842
2843 if (!env_type_is_resolve_sink(env, var_type) &&
2844 !env_type_is_resolved(env, var_type_id)) {
2845 env_stack_set_next_member(env, i + 1);
2846 return env_stack_push(env, var_type, var_type_id);
2847 }
2848
2849 type_id = var_type->type;
2850 if (!btf_type_id_size(btf, &type_id, &type_size)) {
2851 btf_verifier_log_vsi(env, v->t, vsi, "Invalid type");
2852 return -EINVAL;
2853 }
2854
2855 if (vsi->size < type_size) {
2856 btf_verifier_log_vsi(env, v->t, vsi, "Invalid size");
2857 return -EINVAL;
2858 }
2859 }
2860
2861 env_stack_pop_resolved(env, 0, 0);
2862 return 0;
2863}
2864
2865static void btf_datasec_log(struct btf_verifier_env *env,
2866 const struct btf_type *t)
2867{
2868 btf_verifier_log(env, "size=%u vlen=%u", t->size, btf_type_vlen(t));
2869}
2870
2871static void btf_datasec_seq_show(const struct btf *btf,
2872 const struct btf_type *t, u32 type_id,
2873 void *data, u8 bits_offset,
2874 struct seq_file *m)
2875{
2876 const struct btf_var_secinfo *vsi;
2877 const struct btf_type *var;
2878 u32 i;
2879
2880 seq_printf(m, "section (\"%s\") = {", __btf_name_by_offset(btf, t->name_off));
2881 for_each_vsi(i, t, vsi) {
2882 var = btf_type_by_id(btf, vsi->type);
2883 if (i)
2884 seq_puts(m, ",");
2885 btf_type_ops(var)->seq_show(btf, var, vsi->type,
2886 data + vsi->offset, bits_offset, m);
2887 }
2888 seq_puts(m, "}");
2889}
2890
2891static const struct btf_kind_operations datasec_ops = {
2892 .check_meta = btf_datasec_check_meta,
2893 .resolve = btf_datasec_resolve,
2894 .check_member = btf_df_check_member,
2895 .check_kflag_member = btf_df_check_kflag_member,
2896 .log_details = btf_datasec_log,
2897 .seq_show = btf_datasec_seq_show,
2898};
2899
2900static int btf_func_proto_check(struct btf_verifier_env *env,
2901 const struct btf_type *t)
2902{
2903 const struct btf_type *ret_type;
2904 const struct btf_param *args;
2905 const struct btf *btf;
2906 u16 nr_args, i;
2907 int err;
2908
2909 btf = env->btf;
2910 args = (const struct btf_param *)(t + 1);
2911 nr_args = btf_type_vlen(t);
2912
2913 /* Check func return type which could be "void" (t->type == 0) */
2914 if (t->type) {
2915 u32 ret_type_id = t->type;
2916
2917 ret_type = btf_type_by_id(btf, ret_type_id);
2918 if (!ret_type) {
2919 btf_verifier_log_type(env, t, "Invalid return type");
2920 return -EINVAL;
2921 }
2922
2923 if (btf_type_needs_resolve(ret_type) &&
2924 !env_type_is_resolved(env, ret_type_id)) {
2925 err = btf_resolve(env, ret_type, ret_type_id);
2926 if (err)
2927 return err;
2928 }
2929
2930 /* Ensure the return type is a type that has a size */
2931 if (!btf_type_id_size(btf, &ret_type_id, NULL)) {
2932 btf_verifier_log_type(env, t, "Invalid return type");
2933 return -EINVAL;
2934 }
2935 }
2936
2937 if (!nr_args)
2938 return 0;
2939
2940 /* Last func arg type_id could be 0 if it is a vararg */
2941 if (!args[nr_args - 1].type) {
2942 if (args[nr_args - 1].name_off) {
2943 btf_verifier_log_type(env, t, "Invalid arg#%u",
2944 nr_args);
2945 return -EINVAL;
2946 }
2947 nr_args--;
2948 }
2949
2950 err = 0;
2951 for (i = 0; i < nr_args; i++) {
2952 const struct btf_type *arg_type;
2953 u32 arg_type_id;
2954
2955 arg_type_id = args[i].type;
2956 arg_type = btf_type_by_id(btf, arg_type_id);
2957 if (!arg_type) {
2958 btf_verifier_log_type(env, t, "Invalid arg#%u", i + 1);
2959 err = -EINVAL;
2960 break;
2961 }
2962
2963 if (args[i].name_off &&
2964 (!btf_name_offset_valid(btf, args[i].name_off) ||
2965 !btf_name_valid_identifier(btf, args[i].name_off))) {
2966 btf_verifier_log_type(env, t,
2967 "Invalid arg#%u", i + 1);
2968 err = -EINVAL;
2969 break;
2970 }
2971
2972 if (btf_type_needs_resolve(arg_type) &&
2973 !env_type_is_resolved(env, arg_type_id)) {
2974 err = btf_resolve(env, arg_type, arg_type_id);
2975 if (err)
2976 break;
2977 }
2978
2979 if (!btf_type_id_size(btf, &arg_type_id, NULL)) {
2980 btf_verifier_log_type(env, t, "Invalid arg#%u", i + 1);
2981 err = -EINVAL;
2982 break;
2983 }
2984 }
2985
2986 return err;
2987}
2988
2989static int btf_func_check(struct btf_verifier_env *env,
2990 const struct btf_type *t)
2991{
2992 const struct btf_type *proto_type;
2993 const struct btf_param *args;
2994 const struct btf *btf;
2995 u16 nr_args, i;
2996
2997 btf = env->btf;
2998 proto_type = btf_type_by_id(btf, t->type);
2999
3000 if (!proto_type || !btf_type_is_func_proto(proto_type)) {
3001 btf_verifier_log_type(env, t, "Invalid type_id");
3002 return -EINVAL;
3003 }
3004
3005 args = (const struct btf_param *)(proto_type + 1);
3006 nr_args = btf_type_vlen(proto_type);
3007 for (i = 0; i < nr_args; i++) {
3008 if (!args[i].name_off && args[i].type) {
3009 btf_verifier_log_type(env, t, "Invalid arg#%u", i + 1);
3010 return -EINVAL;
3011 }
3012 }
3013
3014 return 0;
3015}
3016
3017static const struct btf_kind_operations * const kind_ops[NR_BTF_KINDS] = {
3018 [BTF_KIND_INT] = &int_ops,
3019 [BTF_KIND_PTR] = &ptr_ops,
3020 [BTF_KIND_ARRAY] = &array_ops,
3021 [BTF_KIND_STRUCT] = &struct_ops,
3022 [BTF_KIND_UNION] = &struct_ops,
3023 [BTF_KIND_ENUM] = &enum_ops,
3024 [BTF_KIND_FWD] = &fwd_ops,
3025 [BTF_KIND_TYPEDEF] = &modifier_ops,
3026 [BTF_KIND_VOLATILE] = &modifier_ops,
3027 [BTF_KIND_CONST] = &modifier_ops,
3028 [BTF_KIND_RESTRICT] = &modifier_ops,
3029 [BTF_KIND_FUNC] = &func_ops,
3030 [BTF_KIND_FUNC_PROTO] = &func_proto_ops,
3031 [BTF_KIND_VAR] = &var_ops,
3032 [BTF_KIND_DATASEC] = &datasec_ops,
3033};
3034
3035static s32 btf_check_meta(struct btf_verifier_env *env,
3036 const struct btf_type *t,
3037 u32 meta_left)
3038{
3039 u32 saved_meta_left = meta_left;
3040 s32 var_meta_size;
3041
3042 if (meta_left < sizeof(*t)) {
3043 btf_verifier_log(env, "[%u] meta_left:%u meta_needed:%zu",
3044 env->log_type_id, meta_left, sizeof(*t));
3045 return -EINVAL;
3046 }
3047 meta_left -= sizeof(*t);
3048
3049 if (t->info & ~BTF_INFO_MASK) {
3050 btf_verifier_log(env, "[%u] Invalid btf_info:%x",
3051 env->log_type_id, t->info);
3052 return -EINVAL;
3053 }
3054
3055 if (BTF_INFO_KIND(t->info) > BTF_KIND_MAX ||
3056 BTF_INFO_KIND(t->info) == BTF_KIND_UNKN) {
3057 btf_verifier_log(env, "[%u] Invalid kind:%u",
3058 env->log_type_id, BTF_INFO_KIND(t->info));
3059 return -EINVAL;
3060 }
3061
3062 if (!btf_name_offset_valid(env->btf, t->name_off)) {
3063 btf_verifier_log(env, "[%u] Invalid name_offset:%u",
3064 env->log_type_id, t->name_off);
3065 return -EINVAL;
3066 }
3067
3068 var_meta_size = btf_type_ops(t)->check_meta(env, t, meta_left);
3069 if (var_meta_size < 0)
3070 return var_meta_size;
3071
3072 meta_left -= var_meta_size;
3073
3074 return saved_meta_left - meta_left;
3075}
3076
3077static int btf_check_all_metas(struct btf_verifier_env *env)
3078{
3079 struct btf *btf = env->btf;
3080 struct btf_header *hdr;
3081 void *cur, *end;
3082
3083 hdr = &btf->hdr;
3084 cur = btf->nohdr_data + hdr->type_off;
3085 end = cur + hdr->type_len;
3086
3087 env->log_type_id = 1;
3088 while (cur < end) {
3089 struct btf_type *t = cur;
3090 s32 meta_size;
3091
3092 meta_size = btf_check_meta(env, t, end - cur);
3093 if (meta_size < 0)
3094 return meta_size;
3095
3096 btf_add_type(env, t);
3097 cur += meta_size;
3098 env->log_type_id++;
3099 }
3100
3101 return 0;
3102}
3103
3104static bool btf_resolve_valid(struct btf_verifier_env *env,
3105 const struct btf_type *t,
3106 u32 type_id)
3107{
3108 struct btf *btf = env->btf;
3109
3110 if (!env_type_is_resolved(env, type_id))
3111 return false;
3112
3113 if (btf_type_is_struct(t) || btf_type_is_datasec(t))
3114 return !btf->resolved_ids[type_id] &&
3115 !btf->resolved_sizes[type_id];
3116
3117 if (btf_type_is_modifier(t) || btf_type_is_ptr(t) ||
3118 btf_type_is_var(t)) {
3119 t = btf_type_id_resolve(btf, &type_id);
3120 return t &&
3121 !btf_type_is_modifier(t) &&
3122 !btf_type_is_var(t) &&
3123 !btf_type_is_datasec(t);
3124 }
3125
3126 if (btf_type_is_array(t)) {
3127 const struct btf_array *array = btf_type_array(t);
3128 const struct btf_type *elem_type;
3129 u32 elem_type_id = array->type;
3130 u32 elem_size;
3131
3132 elem_type = btf_type_id_size(btf, &elem_type_id, &elem_size);
3133 return elem_type && !btf_type_is_modifier(elem_type) &&
3134 (array->nelems * elem_size ==
3135 btf->resolved_sizes[type_id]);
3136 }
3137
3138 return false;
3139}
3140
3141static int btf_resolve(struct btf_verifier_env *env,
3142 const struct btf_type *t, u32 type_id)
3143{
3144 u32 save_log_type_id = env->log_type_id;
3145 const struct resolve_vertex *v;
3146 int err = 0;
3147
3148 env->resolve_mode = RESOLVE_TBD;
3149 env_stack_push(env, t, type_id);
3150 while (!err && (v = env_stack_peak(env))) {
3151 env->log_type_id = v->type_id;
3152 err = btf_type_ops(v->t)->resolve(env, v);
3153 }
3154
3155 env->log_type_id = type_id;
3156 if (err == -E2BIG) {
3157 btf_verifier_log_type(env, t,
3158 "Exceeded max resolving depth:%u",
3159 MAX_RESOLVE_DEPTH);
3160 } else if (err == -EEXIST) {
3161 btf_verifier_log_type(env, t, "Loop detected");
3162 }
3163
3164 /* Final sanity check */
3165 if (!err && !btf_resolve_valid(env, t, type_id)) {
3166 btf_verifier_log_type(env, t, "Invalid resolve state");
3167 err = -EINVAL;
3168 }
3169
3170 env->log_type_id = save_log_type_id;
3171 return err;
3172}
3173
3174static int btf_check_all_types(struct btf_verifier_env *env)
3175{
3176 struct btf *btf = env->btf;
3177 u32 type_id;
3178 int err;
3179
3180 err = env_resolve_init(env);
3181 if (err)
3182 return err;
3183
3184 env->phase++;
3185 for (type_id = 1; type_id <= btf->nr_types; type_id++) {
3186 const struct btf_type *t = btf_type_by_id(btf, type_id);
3187
3188 env->log_type_id = type_id;
3189 if (btf_type_needs_resolve(t) &&
3190 !env_type_is_resolved(env, type_id)) {
3191 err = btf_resolve(env, t, type_id);
3192 if (err)
3193 return err;
3194 }
3195
3196 if (btf_type_is_func_proto(t)) {
3197 err = btf_func_proto_check(env, t);
3198 if (err)
3199 return err;
3200 }
3201
3202 if (btf_type_is_func(t)) {
3203 err = btf_func_check(env, t);
3204 if (err)
3205 return err;
3206 }
3207 }
3208
3209 return 0;
3210}
3211
3212static int btf_parse_type_sec(struct btf_verifier_env *env)
3213{
3214 const struct btf_header *hdr = &env->btf->hdr;
3215 int err;
3216
3217 /* Type section must align to 4 bytes */
3218 if (hdr->type_off & (sizeof(u32) - 1)) {
3219 btf_verifier_log(env, "Unaligned type_off");
3220 return -EINVAL;
3221 }
3222
3223 if (!hdr->type_len) {
3224 btf_verifier_log(env, "No type found");
3225 return -EINVAL;
3226 }
3227
3228 err = btf_check_all_metas(env);
3229 if (err)
3230 return err;
3231
3232 return btf_check_all_types(env);
3233}
3234
3235static int btf_parse_str_sec(struct btf_verifier_env *env)
3236{
3237 const struct btf_header *hdr;
3238 struct btf *btf = env->btf;
3239 const char *start, *end;
3240
3241 hdr = &btf->hdr;
3242 start = btf->nohdr_data + hdr->str_off;
3243 end = start + hdr->str_len;
3244
3245 if (end != btf->data + btf->data_size) {
3246 btf_verifier_log(env, "String section is not at the end");
3247 return -EINVAL;
3248 }
3249
3250 if (!hdr->str_len || hdr->str_len - 1 > BTF_MAX_NAME_OFFSET ||
3251 start[0] || end[-1]) {
3252 btf_verifier_log(env, "Invalid string section");
3253 return -EINVAL;
3254 }
3255
3256 btf->strings = start;
3257
3258 return 0;
3259}
3260
3261static const size_t btf_sec_info_offset[] = {
3262 offsetof(struct btf_header, type_off),
3263 offsetof(struct btf_header, str_off),
3264};
3265
3266static int btf_sec_info_cmp(const void *a, const void *b)
3267{
3268 const struct btf_sec_info *x = a;
3269 const struct btf_sec_info *y = b;
3270
3271 return (int)(x->off - y->off) ? : (int)(x->len - y->len);
3272}
3273
3274static int btf_check_sec_info(struct btf_verifier_env *env,
3275 u32 btf_data_size)
3276{
3277 struct btf_sec_info secs[ARRAY_SIZE(btf_sec_info_offset)];
3278 u32 total, expected_total, i;
3279 const struct btf_header *hdr;
3280 const struct btf *btf;
3281
3282 btf = env->btf;
3283 hdr = &btf->hdr;
3284
3285 /* Populate the secs from hdr */
3286 for (i = 0; i < ARRAY_SIZE(btf_sec_info_offset); i++)
3287 secs[i] = *(struct btf_sec_info *)((void *)hdr +
3288 btf_sec_info_offset[i]);
3289
3290 sort(secs, ARRAY_SIZE(btf_sec_info_offset),
3291 sizeof(struct btf_sec_info), btf_sec_info_cmp, NULL);
3292
3293 /* Check for gaps and overlap among sections */
3294 total = 0;
3295 expected_total = btf_data_size - hdr->hdr_len;
3296 for (i = 0; i < ARRAY_SIZE(btf_sec_info_offset); i++) {
3297 if (expected_total < secs[i].off) {
3298 btf_verifier_log(env, "Invalid section offset");
3299 return -EINVAL;
3300 }
3301 if (total < secs[i].off) {
3302 /* gap */
3303 btf_verifier_log(env, "Unsupported section found");
3304 return -EINVAL;
3305 }
3306 if (total > secs[i].off) {
3307 btf_verifier_log(env, "Section overlap found");
3308 return -EINVAL;
3309 }
3310 if (expected_total - total < secs[i].len) {
3311 btf_verifier_log(env,
3312 "Total section length too long");
3313 return -EINVAL;
3314 }
3315 total += secs[i].len;
3316 }
3317
3318 /* There is data other than hdr and known sections */
3319 if (expected_total != total) {
3320 btf_verifier_log(env, "Unsupported section found");
3321 return -EINVAL;
3322 }
3323
3324 return 0;
3325}
3326
3327static int btf_parse_hdr(struct btf_verifier_env *env)
3328{
3329 u32 hdr_len, hdr_copy, btf_data_size;
3330 const struct btf_header *hdr;
3331 struct btf *btf;
3332 int err;
3333
3334 btf = env->btf;
3335 btf_data_size = btf->data_size;
3336
3337 if (btf_data_size <
3338 offsetof(struct btf_header, hdr_len) + sizeof(hdr->hdr_len)) {
3339 btf_verifier_log(env, "hdr_len not found");
3340 return -EINVAL;
3341 }
3342
3343 hdr = btf->data;
3344 hdr_len = hdr->hdr_len;
3345 if (btf_data_size < hdr_len) {
3346 btf_verifier_log(env, "btf_header not found");
3347 return -EINVAL;
3348 }
3349
3350 /* Ensure the unsupported header fields are zero */
3351 if (hdr_len > sizeof(btf->hdr)) {
3352 u8 *expected_zero = btf->data + sizeof(btf->hdr);
3353 u8 *end = btf->data + hdr_len;
3354
3355 for (; expected_zero < end; expected_zero++) {
3356 if (*expected_zero) {
3357 btf_verifier_log(env, "Unsupported btf_header");
3358 return -E2BIG;
3359 }
3360 }
3361 }
3362
3363 hdr_copy = min_t(u32, hdr_len, sizeof(btf->hdr));
3364 memcpy(&btf->hdr, btf->data, hdr_copy);
3365
3366 hdr = &btf->hdr;
3367
3368 btf_verifier_log_hdr(env, btf_data_size);
3369
3370 if (hdr->magic != BTF_MAGIC) {
3371 btf_verifier_log(env, "Invalid magic");
3372 return -EINVAL;
3373 }
3374
3375 if (hdr->version != BTF_VERSION) {
3376 btf_verifier_log(env, "Unsupported version");
3377 return -ENOTSUPP;
3378 }
3379
3380 if (hdr->flags) {
3381 btf_verifier_log(env, "Unsupported flags");
3382 return -ENOTSUPP;
3383 }
3384
3385 if (btf_data_size == hdr->hdr_len) {
3386 btf_verifier_log(env, "No data");
3387 return -EINVAL;
3388 }
3389
3390 err = btf_check_sec_info(env, btf_data_size);
3391 if (err)
3392 return err;
3393
3394 return 0;
3395}
3396
3397static struct btf *btf_parse(void __user *btf_data, u32 btf_data_size,
3398 u32 log_level, char __user *log_ubuf, u32 log_size)
3399{
3400 struct btf_verifier_env *env = NULL;
3401 struct bpf_verifier_log *log;
3402 struct btf *btf = NULL;
3403 u8 *data;
3404 int err;
3405
3406 if (btf_data_size > BTF_MAX_SIZE)
3407 return ERR_PTR(-E2BIG);
3408
3409 env = kzalloc(sizeof(*env), GFP_KERNEL | __GFP_NOWARN);
3410 if (!env)
3411 return ERR_PTR(-ENOMEM);
3412
3413 log = &env->log;
3414 if (log_level || log_ubuf || log_size) {
3415 /* user requested verbose verifier output
3416 * and supplied buffer to store the verification trace
3417 */
3418 log->level = log_level;
3419 log->ubuf = log_ubuf;
3420 log->len_total = log_size;
3421
3422 /* log attributes have to be sane */
3423 if (log->len_total < 128 || log->len_total > UINT_MAX >> 8 ||
3424 !log->level || !log->ubuf) {
3425 err = -EINVAL;
3426 goto errout;
3427 }
3428 }
3429
3430 btf = kzalloc(sizeof(*btf), GFP_KERNEL | __GFP_NOWARN);
3431 if (!btf) {
3432 err = -ENOMEM;
3433 goto errout;
3434 }
3435 env->btf = btf;
3436
3437 data = kvmalloc(btf_data_size, GFP_KERNEL | __GFP_NOWARN);
3438 if (!data) {
3439 err = -ENOMEM;
3440 goto errout;
3441 }
3442
3443 btf->data = data;
3444 btf->data_size = btf_data_size;
3445
3446 if (copy_from_user(data, btf_data, btf_data_size)) {
3447 err = -EFAULT;
3448 goto errout;
3449 }
3450
3451 err = btf_parse_hdr(env);
3452 if (err)
3453 goto errout;
3454
3455 btf->nohdr_data = btf->data + btf->hdr.hdr_len;
3456
3457 err = btf_parse_str_sec(env);
3458 if (err)
3459 goto errout;
3460
3461 err = btf_parse_type_sec(env);
3462 if (err)
3463 goto errout;
3464
3465 if (log->level && bpf_verifier_log_full(log)) {
3466 err = -ENOSPC;
3467 goto errout;
3468 }
3469
3470 btf_verifier_env_free(env);
3471 refcount_set(&btf->refcnt, 1);
3472 return btf;
3473
3474errout:
3475 btf_verifier_env_free(env);
3476 if (btf)
3477 btf_free(btf);
3478 return ERR_PTR(err);
3479}
3480
3481extern char __weak __start_BTF[];
3482extern char __weak __stop_BTF[];
3483extern struct btf *btf_vmlinux;
3484
3485#define BPF_MAP_TYPE(_id, _ops)
3486#define BPF_LINK_TYPE(_id, _name)
3487static union {
3488 struct bpf_ctx_convert {
3489#define BPF_PROG_TYPE(_id, _name, prog_ctx_type, kern_ctx_type) \
3490 prog_ctx_type _id##_prog; \
3491 kern_ctx_type _id##_kern;
3492#include <linux/bpf_types.h>
3493#undef BPF_PROG_TYPE
3494 } *__t;
3495 /* 't' is written once under lock. Read many times. */
3496 const struct btf_type *t;
3497} bpf_ctx_convert;
3498enum {
3499#define BPF_PROG_TYPE(_id, _name, prog_ctx_type, kern_ctx_type) \
3500 __ctx_convert##_id,
3501#include <linux/bpf_types.h>
3502#undef BPF_PROG_TYPE
3503 __ctx_convert_unused, /* to avoid empty enum in extreme .config */
3504};
3505static u8 bpf_ctx_convert_map[] = {
3506#define BPF_PROG_TYPE(_id, _name, prog_ctx_type, kern_ctx_type) \
3507 [_id] = __ctx_convert##_id,
3508#include <linux/bpf_types.h>
3509#undef BPF_PROG_TYPE
3510 0, /* avoid empty array */
3511};
3512#undef BPF_MAP_TYPE
3513#undef BPF_LINK_TYPE
3514
3515static const struct btf_member *
3516btf_get_prog_ctx_type(struct bpf_verifier_log *log, struct btf *btf,
3517 const struct btf_type *t, enum bpf_prog_type prog_type,
3518 int arg)
3519{
3520 const struct btf_type *conv_struct;
3521 const struct btf_type *ctx_struct;
3522 const struct btf_member *ctx_type;
3523 const char *tname, *ctx_tname;
3524
3525 conv_struct = bpf_ctx_convert.t;
3526 if (!conv_struct) {
3527 bpf_log(log, "btf_vmlinux is malformed\n");
3528 return NULL;
3529 }
3530 t = btf_type_by_id(btf, t->type);
3531 while (btf_type_is_modifier(t))
3532 t = btf_type_by_id(btf, t->type);
3533 if (!btf_type_is_struct(t)) {
3534 /* Only pointer to struct is supported for now.
3535 * That means that BPF_PROG_TYPE_TRACEPOINT with BTF
3536 * is not supported yet.
3537 * BPF_PROG_TYPE_RAW_TRACEPOINT is fine.
3538 */
3539 if (log->level & BPF_LOG_LEVEL)
3540 bpf_log(log, "arg#%d type is not a struct\n", arg);
3541 return NULL;
3542 }
3543 tname = btf_name_by_offset(btf, t->name_off);
3544 if (!tname) {
3545 bpf_log(log, "arg#%d struct doesn't have a name\n", arg);
3546 return NULL;
3547 }
3548 /* prog_type is valid bpf program type. No need for bounds check. */
3549 ctx_type = btf_type_member(conv_struct) + bpf_ctx_convert_map[prog_type] * 2;
3550 /* ctx_struct is a pointer to prog_ctx_type in vmlinux.
3551 * Like 'struct __sk_buff'
3552 */
3553 ctx_struct = btf_type_by_id(btf_vmlinux, ctx_type->type);
3554 if (!ctx_struct)
3555 /* should not happen */
3556 return NULL;
3557 ctx_tname = btf_name_by_offset(btf_vmlinux, ctx_struct->name_off);
3558 if (!ctx_tname) {
3559 /* should not happen */
3560 bpf_log(log, "Please fix kernel include/linux/bpf_types.h\n");
3561 return NULL;
3562 }
3563 /* only compare that prog's ctx type name is the same as
3564 * kernel expects. No need to compare field by field.
3565 * It's ok for bpf prog to do:
3566 * struct __sk_buff {};
3567 * int socket_filter_bpf_prog(struct __sk_buff *skb)
3568 * { // no fields of skb are ever used }
3569 */
3570 if (strcmp(ctx_tname, tname))
3571 return NULL;
3572 return ctx_type;
3573}
3574
3575static const struct bpf_map_ops * const btf_vmlinux_map_ops[] = {
3576#define BPF_PROG_TYPE(_id, _name, prog_ctx_type, kern_ctx_type)
3577#define BPF_LINK_TYPE(_id, _name)
3578#define BPF_MAP_TYPE(_id, _ops) \
3579 [_id] = &_ops,
3580#include <linux/bpf_types.h>
3581#undef BPF_PROG_TYPE
3582#undef BPF_LINK_TYPE
3583#undef BPF_MAP_TYPE
3584};
3585
3586static int btf_vmlinux_map_ids_init(const struct btf *btf,
3587 struct bpf_verifier_log *log)
3588{
3589 const struct bpf_map_ops *ops;
3590 int i, btf_id;
3591
3592 for (i = 0; i < ARRAY_SIZE(btf_vmlinux_map_ops); ++i) {
3593 ops = btf_vmlinux_map_ops[i];
3594 if (!ops || (!ops->map_btf_name && !ops->map_btf_id))
3595 continue;
3596 if (!ops->map_btf_name || !ops->map_btf_id) {
3597 bpf_log(log, "map type %d is misconfigured\n", i);
3598 return -EINVAL;
3599 }
3600 btf_id = btf_find_by_name_kind(btf, ops->map_btf_name,
3601 BTF_KIND_STRUCT);
3602 if (btf_id < 0)
3603 return btf_id;
3604 *ops->map_btf_id = btf_id;
3605 }
3606
3607 return 0;
3608}
3609
3610static int btf_translate_to_vmlinux(struct bpf_verifier_log *log,
3611 struct btf *btf,
3612 const struct btf_type *t,
3613 enum bpf_prog_type prog_type,
3614 int arg)
3615{
3616 const struct btf_member *prog_ctx_type, *kern_ctx_type;
3617
3618 prog_ctx_type = btf_get_prog_ctx_type(log, btf, t, prog_type, arg);
3619 if (!prog_ctx_type)
3620 return -ENOENT;
3621 kern_ctx_type = prog_ctx_type + 1;
3622 return kern_ctx_type->type;
3623}
3624
3625BTF_ID_LIST(bpf_ctx_convert_btf_id)
3626BTF_ID(struct, bpf_ctx_convert)
3627
3628struct btf *btf_parse_vmlinux(void)
3629{
3630 struct btf_verifier_env *env = NULL;
3631 struct bpf_verifier_log *log;
3632 struct btf *btf = NULL;
3633 int err;
3634
3635 env = kzalloc(sizeof(*env), GFP_KERNEL | __GFP_NOWARN);
3636 if (!env)
3637 return ERR_PTR(-ENOMEM);
3638
3639 log = &env->log;
3640 log->level = BPF_LOG_KERNEL;
3641
3642 btf = kzalloc(sizeof(*btf), GFP_KERNEL | __GFP_NOWARN);
3643 if (!btf) {
3644 err = -ENOMEM;
3645 goto errout;
3646 }
3647 env->btf = btf;
3648
3649 btf->data = __start_BTF;
3650 btf->data_size = __stop_BTF - __start_BTF;
3651
3652 err = btf_parse_hdr(env);
3653 if (err)
3654 goto errout;
3655
3656 btf->nohdr_data = btf->data + btf->hdr.hdr_len;
3657
3658 err = btf_parse_str_sec(env);
3659 if (err)
3660 goto errout;
3661
3662 err = btf_check_all_metas(env);
3663 if (err)
3664 goto errout;
3665
3666 /* btf_parse_vmlinux() runs under bpf_verifier_lock */
3667 bpf_ctx_convert.t = btf_type_by_id(btf, bpf_ctx_convert_btf_id[0]);
3668
3669 /* find bpf map structs for map_ptr access checking */
3670 err = btf_vmlinux_map_ids_init(btf, log);
3671 if (err < 0)
3672 goto errout;
3673
3674 bpf_struct_ops_init(btf, log);
3675
3676 btf_verifier_env_free(env);
3677 refcount_set(&btf->refcnt, 1);
3678 return btf;
3679
3680errout:
3681 btf_verifier_env_free(env);
3682 if (btf) {
3683 kvfree(btf->types);
3684 kfree(btf);
3685 }
3686 return ERR_PTR(err);
3687}
3688
3689struct btf *bpf_prog_get_target_btf(const struct bpf_prog *prog)
3690{
3691 struct bpf_prog *tgt_prog = prog->aux->linked_prog;
3692
3693 if (tgt_prog) {
3694 return tgt_prog->aux->btf;
3695 } else {
3696 return btf_vmlinux;
3697 }
3698}
3699
3700static bool is_string_ptr(struct btf *btf, const struct btf_type *t)
3701{
3702 /* t comes in already as a pointer */
3703 t = btf_type_by_id(btf, t->type);
3704
3705 /* allow const */
3706 if (BTF_INFO_KIND(t->info) == BTF_KIND_CONST)
3707 t = btf_type_by_id(btf, t->type);
3708
3709 /* char, signed char, unsigned char */
3710 return btf_type_is_int(t) && t->size == 1;
3711}
3712
3713bool btf_ctx_access(int off, int size, enum bpf_access_type type,
3714 const struct bpf_prog *prog,
3715 struct bpf_insn_access_aux *info)
3716{
3717 const struct btf_type *t = prog->aux->attach_func_proto;
3718 struct bpf_prog *tgt_prog = prog->aux->linked_prog;
3719 struct btf *btf = bpf_prog_get_target_btf(prog);
3720 const char *tname = prog->aux->attach_func_name;
3721 struct bpf_verifier_log *log = info->log;
3722 const struct btf_param *args;
3723 u32 nr_args, arg;
3724 int i, ret;
3725
3726 if (off % 8) {
3727 bpf_log(log, "func '%s' offset %d is not multiple of 8\n",
3728 tname, off);
3729 return false;
3730 }
3731 arg = off / 8;
3732 args = (const struct btf_param *)(t + 1);
3733 /* if (t == NULL) Fall back to default BPF prog with 5 u64 arguments */
3734 nr_args = t ? btf_type_vlen(t) : 5;
3735 if (prog->aux->attach_btf_trace) {
3736 /* skip first 'void *__data' argument in btf_trace_##name typedef */
3737 args++;
3738 nr_args--;
3739 }
3740
3741 if (arg > nr_args) {
3742 bpf_log(log, "func '%s' doesn't have %d-th argument\n",
3743 tname, arg + 1);
3744 return false;
3745 }
3746
3747 if (arg == nr_args) {
3748 switch (prog->expected_attach_type) {
3749 case BPF_LSM_MAC:
3750 case BPF_TRACE_FEXIT:
3751 /* When LSM programs are attached to void LSM hooks
3752 * they use FEXIT trampolines and when attached to
3753 * int LSM hooks, they use MODIFY_RETURN trampolines.
3754 *
3755 * While the LSM programs are BPF_MODIFY_RETURN-like
3756 * the check:
3757 *
3758 * if (ret_type != 'int')
3759 * return -EINVAL;
3760 *
3761 * is _not_ done here. This is still safe as LSM hooks
3762 * have only void and int return types.
3763 */
3764 if (!t)
3765 return true;
3766 t = btf_type_by_id(btf, t->type);
3767 break;
3768 case BPF_MODIFY_RETURN:
3769 /* For now the BPF_MODIFY_RETURN can only be attached to
3770 * functions that return an int.
3771 */
3772 if (!t)
3773 return false;
3774
3775 t = btf_type_skip_modifiers(btf, t->type, NULL);
3776 if (!btf_type_is_small_int(t)) {
3777 bpf_log(log,
3778 "ret type %s not allowed for fmod_ret\n",
3779 btf_kind_str[BTF_INFO_KIND(t->info)]);
3780 return false;
3781 }
3782 break;
3783 default:
3784 bpf_log(log, "func '%s' doesn't have %d-th argument\n",
3785 tname, arg + 1);
3786 return false;
3787 }
3788 } else {
3789 if (!t)
3790 /* Default prog with 5 args */
3791 return true;
3792 t = btf_type_by_id(btf, args[arg].type);
3793 }
3794
3795 /* skip modifiers */
3796 while (btf_type_is_modifier(t))
3797 t = btf_type_by_id(btf, t->type);
3798 if (btf_type_is_small_int(t) || btf_type_is_enum(t))
3799 /* accessing a scalar */
3800 return true;
3801 if (!btf_type_is_ptr(t)) {
3802 bpf_log(log,
3803 "func '%s' arg%d '%s' has type %s. Only pointer access is allowed\n",
3804 tname, arg,
3805 __btf_name_by_offset(btf, t->name_off),
3806 btf_kind_str[BTF_INFO_KIND(t->info)]);
3807 return false;
3808 }
3809
3810 /* check for PTR_TO_RDONLY_BUF_OR_NULL or PTR_TO_RDWR_BUF_OR_NULL */
3811 for (i = 0; i < prog->aux->ctx_arg_info_size; i++) {
3812 const struct bpf_ctx_arg_aux *ctx_arg_info = &prog->aux->ctx_arg_info[i];
3813
3814 if (ctx_arg_info->offset == off &&
3815 (ctx_arg_info->reg_type == PTR_TO_RDONLY_BUF_OR_NULL ||
3816 ctx_arg_info->reg_type == PTR_TO_RDWR_BUF_OR_NULL)) {
3817 info->reg_type = ctx_arg_info->reg_type;
3818 return true;
3819 }
3820 }
3821
3822 if (t->type == 0)
3823 /* This is a pointer to void.
3824 * It is the same as scalar from the verifier safety pov.
3825 * No further pointer walking is allowed.
3826 */
3827 return true;
3828
3829 if (is_string_ptr(btf, t))
3830 return true;
3831
3832 /* this is a pointer to another type */
3833 for (i = 0; i < prog->aux->ctx_arg_info_size; i++) {
3834 const struct bpf_ctx_arg_aux *ctx_arg_info = &prog->aux->ctx_arg_info[i];
3835
3836 if (ctx_arg_info->offset == off) {
3837 info->reg_type = ctx_arg_info->reg_type;
3838 info->btf_id = ctx_arg_info->btf_id;
3839 return true;
3840 }
3841 }
3842
3843 info->reg_type = PTR_TO_BTF_ID;
3844 if (tgt_prog) {
3845 ret = btf_translate_to_vmlinux(log, btf, t, tgt_prog->type, arg);
3846 if (ret > 0) {
3847 info->btf_id = ret;
3848 return true;
3849 } else {
3850 return false;
3851 }
3852 }
3853
3854 info->btf_id = t->type;
3855 t = btf_type_by_id(btf, t->type);
3856 /* skip modifiers */
3857 while (btf_type_is_modifier(t)) {
3858 info->btf_id = t->type;
3859 t = btf_type_by_id(btf, t->type);
3860 }
3861 if (!btf_type_is_struct(t)) {
3862 bpf_log(log,
3863 "func '%s' arg%d type %s is not a struct\n",
3864 tname, arg, btf_kind_str[BTF_INFO_KIND(t->info)]);
3865 return false;
3866 }
3867 bpf_log(log, "func '%s' arg%d has btf_id %d type %s '%s'\n",
3868 tname, arg, info->btf_id, btf_kind_str[BTF_INFO_KIND(t->info)],
3869 __btf_name_by_offset(btf, t->name_off));
3870 return true;
3871}
3872
3873int btf_struct_access(struct bpf_verifier_log *log,
3874 const struct btf_type *t, int off, int size,
3875 enum bpf_access_type atype,
3876 u32 *next_btf_id)
3877{
3878 u32 i, moff, mtrue_end, msize = 0, total_nelems = 0;
3879 const struct btf_type *mtype, *elem_type = NULL;
3880 const struct btf_member *member;
3881 const char *tname, *mname;
3882 u32 vlen;
3883
3884again:
3885 tname = __btf_name_by_offset(btf_vmlinux, t->name_off);
3886 if (!btf_type_is_struct(t)) {
3887 bpf_log(log, "Type '%s' is not a struct\n", tname);
3888 return -EINVAL;
3889 }
3890
3891 vlen = btf_type_vlen(t);
3892 if (off + size > t->size) {
3893 /* If the last element is a variable size array, we may
3894 * need to relax the rule.
3895 */
3896 struct btf_array *array_elem;
3897
3898 if (vlen == 0)
3899 goto error;
3900
3901 member = btf_type_member(t) + vlen - 1;
3902 mtype = btf_type_skip_modifiers(btf_vmlinux, member->type,
3903 NULL);
3904 if (!btf_type_is_array(mtype))
3905 goto error;
3906
3907 array_elem = (struct btf_array *)(mtype + 1);
3908 if (array_elem->nelems != 0)
3909 goto error;
3910
3911 moff = btf_member_bit_offset(t, member) / 8;
3912 if (off < moff)
3913 goto error;
3914
3915 /* Only allow structure for now, can be relaxed for
3916 * other types later.
3917 */
3918 elem_type = btf_type_skip_modifiers(btf_vmlinux,
3919 array_elem->type, NULL);
3920 if (!btf_type_is_struct(elem_type))
3921 goto error;
3922
3923 off = (off - moff) % elem_type->size;
3924 return btf_struct_access(log, elem_type, off, size, atype,
3925 next_btf_id);
3926
3927error:
3928 bpf_log(log, "access beyond struct %s at off %u size %u\n",
3929 tname, off, size);
3930 return -EACCES;
3931 }
3932
3933 for_each_member(i, t, member) {
3934 /* offset of the field in bytes */
3935 moff = btf_member_bit_offset(t, member) / 8;
3936 if (off + size <= moff)
3937 /* won't find anything, field is already too far */
3938 break;
3939
3940 if (btf_member_bitfield_size(t, member)) {
3941 u32 end_bit = btf_member_bit_offset(t, member) +
3942 btf_member_bitfield_size(t, member);
3943
3944 /* off <= moff instead of off == moff because clang
3945 * does not generate a BTF member for anonymous
3946 * bitfield like the ":16" here:
3947 * struct {
3948 * int :16;
3949 * int x:8;
3950 * };
3951 */
3952 if (off <= moff &&
3953 BITS_ROUNDUP_BYTES(end_bit) <= off + size)
3954 return SCALAR_VALUE;
3955
3956 /* off may be accessing a following member
3957 *
3958 * or
3959 *
3960 * Doing partial access at either end of this
3961 * bitfield. Continue on this case also to
3962 * treat it as not accessing this bitfield
3963 * and eventually error out as field not
3964 * found to keep it simple.
3965 * It could be relaxed if there was a legit
3966 * partial access case later.
3967 */
3968 continue;
3969 }
3970
3971 /* In case of "off" is pointing to holes of a struct */
3972 if (off < moff)
3973 break;
3974
3975 /* type of the field */
3976 mtype = btf_type_by_id(btf_vmlinux, member->type);
3977 mname = __btf_name_by_offset(btf_vmlinux, member->name_off);
3978
3979 mtype = btf_resolve_size(btf_vmlinux, mtype, &msize,
3980 &elem_type, &total_nelems);
3981 if (IS_ERR(mtype)) {
3982 bpf_log(log, "field %s doesn't have size\n", mname);
3983 return -EFAULT;
3984 }
3985
3986 mtrue_end = moff + msize;
3987 if (off >= mtrue_end)
3988 /* no overlap with member, keep iterating */
3989 continue;
3990
3991 if (btf_type_is_array(mtype)) {
3992 u32 elem_idx;
3993
3994 /* btf_resolve_size() above helps to
3995 * linearize a multi-dimensional array.
3996 *
3997 * The logic here is treating an array
3998 * in a struct as the following way:
3999 *
4000 * struct outer {
4001 * struct inner array[2][2];
4002 * };
4003 *
4004 * looks like:
4005 *
4006 * struct outer {
4007 * struct inner array_elem0;
4008 * struct inner array_elem1;
4009 * struct inner array_elem2;
4010 * struct inner array_elem3;
4011 * };
4012 *
4013 * When accessing outer->array[1][0], it moves
4014 * moff to "array_elem2", set mtype to
4015 * "struct inner", and msize also becomes
4016 * sizeof(struct inner). Then most of the
4017 * remaining logic will fall through without
4018 * caring the current member is an array or
4019 * not.
4020 *
4021 * Unlike mtype/msize/moff, mtrue_end does not
4022 * change. The naming difference ("_true") tells
4023 * that it is not always corresponding to
4024 * the current mtype/msize/moff.
4025 * It is the true end of the current
4026 * member (i.e. array in this case). That
4027 * will allow an int array to be accessed like
4028 * a scratch space,
4029 * i.e. allow access beyond the size of
4030 * the array's element as long as it is
4031 * within the mtrue_end boundary.
4032 */
4033
4034 /* skip empty array */
4035 if (moff == mtrue_end)
4036 continue;
4037
4038 msize /= total_nelems;
4039 elem_idx = (off - moff) / msize;
4040 moff += elem_idx * msize;
4041 mtype = elem_type;
4042 }
4043
4044 /* the 'off' we're looking for is either equal to start
4045 * of this field or inside of this struct
4046 */
4047 if (btf_type_is_struct(mtype)) {
4048 /* our field must be inside that union or struct */
4049 t = mtype;
4050
4051 /* adjust offset we're looking for */
4052 off -= moff;
4053 goto again;
4054 }
4055
4056 if (btf_type_is_ptr(mtype)) {
4057 const struct btf_type *stype;
4058 u32 id;
4059
4060 if (msize != size || off != moff) {
4061 bpf_log(log,
4062 "cannot access ptr member %s with moff %u in struct %s with off %u size %u\n",
4063 mname, moff, tname, off, size);
4064 return -EACCES;
4065 }
4066
4067 stype = btf_type_skip_modifiers(btf_vmlinux, mtype->type, &id);
4068 if (btf_type_is_struct(stype)) {
4069 *next_btf_id = id;
4070 return PTR_TO_BTF_ID;
4071 }
4072 }
4073
4074 /* Allow more flexible access within an int as long as
4075 * it is within mtrue_end.
4076 * Since mtrue_end could be the end of an array,
4077 * that also allows using an array of int as a scratch
4078 * space. e.g. skb->cb[].
4079 */
4080 if (off + size > mtrue_end) {
4081 bpf_log(log,
4082 "access beyond the end of member %s (mend:%u) in struct %s with off %u size %u\n",
4083 mname, mtrue_end, tname, off, size);
4084 return -EACCES;
4085 }
4086
4087 return SCALAR_VALUE;
4088 }
4089 bpf_log(log, "struct %s doesn't have field at offset %d\n", tname, off);
4090 return -EINVAL;
4091}
4092
4093int btf_resolve_helper_id(struct bpf_verifier_log *log,
4094 const struct bpf_func_proto *fn, int arg)
4095{
4096 int id;
4097
4098 if (fn->arg_type[arg] != ARG_PTR_TO_BTF_ID || !btf_vmlinux)
4099 return -EINVAL;
4100 id = fn->btf_id[arg];
4101 if (!id || id > btf_vmlinux->nr_types)
4102 return -EINVAL;
4103 return id;
4104}
4105
4106static int __get_type_size(struct btf *btf, u32 btf_id,
4107 const struct btf_type **bad_type)
4108{
4109 const struct btf_type *t;
4110
4111 if (!btf_id)
4112 /* void */
4113 return 0;
4114 t = btf_type_by_id(btf, btf_id);
4115 while (t && btf_type_is_modifier(t))
4116 t = btf_type_by_id(btf, t->type);
4117 if (!t) {
4118 *bad_type = btf->types[0];
4119 return -EINVAL;
4120 }
4121 if (btf_type_is_ptr(t))
4122 /* kernel size of pointer. Not BPF's size of pointer*/
4123 return sizeof(void *);
4124 if (btf_type_is_int(t) || btf_type_is_enum(t))
4125 return t->size;
4126 *bad_type = t;
4127 return -EINVAL;
4128}
4129
4130int btf_distill_func_proto(struct bpf_verifier_log *log,
4131 struct btf *btf,
4132 const struct btf_type *func,
4133 const char *tname,
4134 struct btf_func_model *m)
4135{
4136 const struct btf_param *args;
4137 const struct btf_type *t;
4138 u32 i, nargs;
4139 int ret;
4140
4141 if (!func) {
4142 /* BTF function prototype doesn't match the verifier types.
4143 * Fall back to 5 u64 args.
4144 */
4145 for (i = 0; i < 5; i++)
4146 m->arg_size[i] = 8;
4147 m->ret_size = 8;
4148 m->nr_args = 5;
4149 return 0;
4150 }
4151 args = (const struct btf_param *)(func + 1);
4152 nargs = btf_type_vlen(func);
4153 if (nargs >= MAX_BPF_FUNC_ARGS) {
4154 bpf_log(log,
4155 "The function %s has %d arguments. Too many.\n",
4156 tname, nargs);
4157 return -EINVAL;
4158 }
4159 ret = __get_type_size(btf, func->type, &t);
4160 if (ret < 0) {
4161 bpf_log(log,
4162 "The function %s return type %s is unsupported.\n",
4163 tname, btf_kind_str[BTF_INFO_KIND(t->info)]);
4164 return -EINVAL;
4165 }
4166 m->ret_size = ret;
4167
4168 for (i = 0; i < nargs; i++) {
4169 ret = __get_type_size(btf, args[i].type, &t);
4170 if (ret < 0) {
4171 bpf_log(log,
4172 "The function %s arg%d type %s is unsupported.\n",
4173 tname, i, btf_kind_str[BTF_INFO_KIND(t->info)]);
4174 return -EINVAL;
4175 }
4176 m->arg_size[i] = ret;
4177 }
4178 m->nr_args = nargs;
4179 return 0;
4180}
4181
4182/* Compare BTFs of two functions assuming only scalars and pointers to context.
4183 * t1 points to BTF_KIND_FUNC in btf1
4184 * t2 points to BTF_KIND_FUNC in btf2
4185 * Returns:
4186 * EINVAL - function prototype mismatch
4187 * EFAULT - verifier bug
4188 * 0 - 99% match. The last 1% is validated by the verifier.
4189 */
4190static int btf_check_func_type_match(struct bpf_verifier_log *log,
4191 struct btf *btf1, const struct btf_type *t1,
4192 struct btf *btf2, const struct btf_type *t2)
4193{
4194 const struct btf_param *args1, *args2;
4195 const char *fn1, *fn2, *s1, *s2;
4196 u32 nargs1, nargs2, i;
4197
4198 fn1 = btf_name_by_offset(btf1, t1->name_off);
4199 fn2 = btf_name_by_offset(btf2, t2->name_off);
4200
4201 if (btf_func_linkage(t1) != BTF_FUNC_GLOBAL) {
4202 bpf_log(log, "%s() is not a global function\n", fn1);
4203 return -EINVAL;
4204 }
4205 if (btf_func_linkage(t2) != BTF_FUNC_GLOBAL) {
4206 bpf_log(log, "%s() is not a global function\n", fn2);
4207 return -EINVAL;
4208 }
4209
4210 t1 = btf_type_by_id(btf1, t1->type);
4211 if (!t1 || !btf_type_is_func_proto(t1))
4212 return -EFAULT;
4213 t2 = btf_type_by_id(btf2, t2->type);
4214 if (!t2 || !btf_type_is_func_proto(t2))
4215 return -EFAULT;
4216
4217 args1 = (const struct btf_param *)(t1 + 1);
4218 nargs1 = btf_type_vlen(t1);
4219 args2 = (const struct btf_param *)(t2 + 1);
4220 nargs2 = btf_type_vlen(t2);
4221
4222 if (nargs1 != nargs2) {
4223 bpf_log(log, "%s() has %d args while %s() has %d args\n",
4224 fn1, nargs1, fn2, nargs2);
4225 return -EINVAL;
4226 }
4227
4228 t1 = btf_type_skip_modifiers(btf1, t1->type, NULL);
4229 t2 = btf_type_skip_modifiers(btf2, t2->type, NULL);
4230 if (t1->info != t2->info) {
4231 bpf_log(log,
4232 "Return type %s of %s() doesn't match type %s of %s()\n",
4233 btf_type_str(t1), fn1,
4234 btf_type_str(t2), fn2);
4235 return -EINVAL;
4236 }
4237
4238 for (i = 0; i < nargs1; i++) {
4239 t1 = btf_type_skip_modifiers(btf1, args1[i].type, NULL);
4240 t2 = btf_type_skip_modifiers(btf2, args2[i].type, NULL);
4241
4242 if (t1->info != t2->info) {
4243 bpf_log(log, "arg%d in %s() is %s while %s() has %s\n",
4244 i, fn1, btf_type_str(t1),
4245 fn2, btf_type_str(t2));
4246 return -EINVAL;
4247 }
4248 if (btf_type_has_size(t1) && t1->size != t2->size) {
4249 bpf_log(log,
4250 "arg%d in %s() has size %d while %s() has %d\n",
4251 i, fn1, t1->size,
4252 fn2, t2->size);
4253 return -EINVAL;
4254 }
4255
4256 /* global functions are validated with scalars and pointers
4257 * to context only. And only global functions can be replaced.
4258 * Hence type check only those types.
4259 */
4260 if (btf_type_is_int(t1) || btf_type_is_enum(t1))
4261 continue;
4262 if (!btf_type_is_ptr(t1)) {
4263 bpf_log(log,
4264 "arg%d in %s() has unrecognized type\n",
4265 i, fn1);
4266 return -EINVAL;
4267 }
4268 t1 = btf_type_skip_modifiers(btf1, t1->type, NULL);
4269 t2 = btf_type_skip_modifiers(btf2, t2->type, NULL);
4270 if (!btf_type_is_struct(t1)) {
4271 bpf_log(log,
4272 "arg%d in %s() is not a pointer to context\n",
4273 i, fn1);
4274 return -EINVAL;
4275 }
4276 if (!btf_type_is_struct(t2)) {
4277 bpf_log(log,
4278 "arg%d in %s() is not a pointer to context\n",
4279 i, fn2);
4280 return -EINVAL;
4281 }
4282 /* This is an optional check to make program writing easier.
4283 * Compare names of structs and report an error to the user.
4284 * btf_prepare_func_args() already checked that t2 struct
4285 * is a context type. btf_prepare_func_args() will check
4286 * later that t1 struct is a context type as well.
4287 */
4288 s1 = btf_name_by_offset(btf1, t1->name_off);
4289 s2 = btf_name_by_offset(btf2, t2->name_off);
4290 if (strcmp(s1, s2)) {
4291 bpf_log(log,
4292 "arg%d %s(struct %s *) doesn't match %s(struct %s *)\n",
4293 i, fn1, s1, fn2, s2);
4294 return -EINVAL;
4295 }
4296 }
4297 return 0;
4298}
4299
4300/* Compare BTFs of given program with BTF of target program */
4301int btf_check_type_match(struct bpf_verifier_env *env, struct bpf_prog *prog,
4302 struct btf *btf2, const struct btf_type *t2)
4303{
4304 struct btf *btf1 = prog->aux->btf;
4305 const struct btf_type *t1;
4306 u32 btf_id = 0;
4307
4308 if (!prog->aux->func_info) {
4309 bpf_log(&env->log, "Program extension requires BTF\n");
4310 return -EINVAL;
4311 }
4312
4313 btf_id = prog->aux->func_info[0].type_id;
4314 if (!btf_id)
4315 return -EFAULT;
4316
4317 t1 = btf_type_by_id(btf1, btf_id);
4318 if (!t1 || !btf_type_is_func(t1))
4319 return -EFAULT;
4320
4321 return btf_check_func_type_match(&env->log, btf1, t1, btf2, t2);
4322}
4323
4324/* Compare BTF of a function with given bpf_reg_state.
4325 * Returns:
4326 * EFAULT - there is a verifier bug. Abort verification.
4327 * EINVAL - there is a type mismatch or BTF is not available.
4328 * 0 - BTF matches with what bpf_reg_state expects.
4329 * Only PTR_TO_CTX and SCALAR_VALUE states are recognized.
4330 */
4331int btf_check_func_arg_match(struct bpf_verifier_env *env, int subprog,
4332 struct bpf_reg_state *reg)
4333{
4334 struct bpf_verifier_log *log = &env->log;
4335 struct bpf_prog *prog = env->prog;
4336 struct btf *btf = prog->aux->btf;
4337 const struct btf_param *args;
4338 const struct btf_type *t;
4339 u32 i, nargs, btf_id;
4340 const char *tname;
4341
4342 if (!prog->aux->func_info)
4343 return -EINVAL;
4344
4345 btf_id = prog->aux->func_info[subprog].type_id;
4346 if (!btf_id)
4347 return -EFAULT;
4348
4349 if (prog->aux->func_info_aux[subprog].unreliable)
4350 return -EINVAL;
4351
4352 t = btf_type_by_id(btf, btf_id);
4353 if (!t || !btf_type_is_func(t)) {
4354 /* These checks were already done by the verifier while loading
4355 * struct bpf_func_info
4356 */
4357 bpf_log(log, "BTF of func#%d doesn't point to KIND_FUNC\n",
4358 subprog);
4359 return -EFAULT;
4360 }
4361 tname = btf_name_by_offset(btf, t->name_off);
4362
4363 t = btf_type_by_id(btf, t->type);
4364 if (!t || !btf_type_is_func_proto(t)) {
4365 bpf_log(log, "Invalid BTF of func %s\n", tname);
4366 return -EFAULT;
4367 }
4368 args = (const struct btf_param *)(t + 1);
4369 nargs = btf_type_vlen(t);
4370 if (nargs > 5) {
4371 bpf_log(log, "Function %s has %d > 5 args\n", tname, nargs);
4372 goto out;
4373 }
4374 /* check that BTF function arguments match actual types that the
4375 * verifier sees.
4376 */
4377 for (i = 0; i < nargs; i++) {
4378 t = btf_type_by_id(btf, args[i].type);
4379 while (btf_type_is_modifier(t))
4380 t = btf_type_by_id(btf, t->type);
4381 if (btf_type_is_int(t) || btf_type_is_enum(t)) {
4382 if (reg[i + 1].type == SCALAR_VALUE)
4383 continue;
4384 bpf_log(log, "R%d is not a scalar\n", i + 1);
4385 goto out;
4386 }
4387 if (btf_type_is_ptr(t)) {
4388 if (reg[i + 1].type == SCALAR_VALUE) {
4389 bpf_log(log, "R%d is not a pointer\n", i + 1);
4390 goto out;
4391 }
4392 /* If function expects ctx type in BTF check that caller
4393 * is passing PTR_TO_CTX.
4394 */
4395 if (btf_get_prog_ctx_type(log, btf, t, prog->type, i)) {
4396 if (reg[i + 1].type != PTR_TO_CTX) {
4397 bpf_log(log,
4398 "arg#%d expected pointer to ctx, but got %s\n",
4399 i, btf_kind_str[BTF_INFO_KIND(t->info)]);
4400 goto out;
4401 }
4402 if (check_ctx_reg(env, ®[i + 1], i + 1))
4403 goto out;
4404 continue;
4405 }
4406 }
4407 bpf_log(log, "Unrecognized arg#%d type %s\n",
4408 i, btf_kind_str[BTF_INFO_KIND(t->info)]);
4409 goto out;
4410 }
4411 return 0;
4412out:
4413 /* Compiler optimizations can remove arguments from static functions
4414 * or mismatched type can be passed into a global function.
4415 * In such cases mark the function as unreliable from BTF point of view.
4416 */
4417 prog->aux->func_info_aux[subprog].unreliable = true;
4418 return -EINVAL;
4419}
4420
4421/* Convert BTF of a function into bpf_reg_state if possible
4422 * Returns:
4423 * EFAULT - there is a verifier bug. Abort verification.
4424 * EINVAL - cannot convert BTF.
4425 * 0 - Successfully converted BTF into bpf_reg_state
4426 * (either PTR_TO_CTX or SCALAR_VALUE).
4427 */
4428int btf_prepare_func_args(struct bpf_verifier_env *env, int subprog,
4429 struct bpf_reg_state *reg)
4430{
4431 struct bpf_verifier_log *log = &env->log;
4432 struct bpf_prog *prog = env->prog;
4433 enum bpf_prog_type prog_type = prog->type;
4434 struct btf *btf = prog->aux->btf;
4435 const struct btf_param *args;
4436 const struct btf_type *t;
4437 u32 i, nargs, btf_id;
4438 const char *tname;
4439
4440 if (!prog->aux->func_info ||
4441 prog->aux->func_info_aux[subprog].linkage != BTF_FUNC_GLOBAL) {
4442 bpf_log(log, "Verifier bug\n");
4443 return -EFAULT;
4444 }
4445
4446 btf_id = prog->aux->func_info[subprog].type_id;
4447 if (!btf_id) {
4448 bpf_log(log, "Global functions need valid BTF\n");
4449 return -EFAULT;
4450 }
4451
4452 t = btf_type_by_id(btf, btf_id);
4453 if (!t || !btf_type_is_func(t)) {
4454 /* These checks were already done by the verifier while loading
4455 * struct bpf_func_info
4456 */
4457 bpf_log(log, "BTF of func#%d doesn't point to KIND_FUNC\n",
4458 subprog);
4459 return -EFAULT;
4460 }
4461 tname = btf_name_by_offset(btf, t->name_off);
4462
4463 if (log->level & BPF_LOG_LEVEL)
4464 bpf_log(log, "Validating %s() func#%d...\n",
4465 tname, subprog);
4466
4467 if (prog->aux->func_info_aux[subprog].unreliable) {
4468 bpf_log(log, "Verifier bug in function %s()\n", tname);
4469 return -EFAULT;
4470 }
4471 if (prog_type == BPF_PROG_TYPE_EXT)
4472 prog_type = prog->aux->linked_prog->type;
4473
4474 t = btf_type_by_id(btf, t->type);
4475 if (!t || !btf_type_is_func_proto(t)) {
4476 bpf_log(log, "Invalid type of function %s()\n", tname);
4477 return -EFAULT;
4478 }
4479 args = (const struct btf_param *)(t + 1);
4480 nargs = btf_type_vlen(t);
4481 if (nargs > 5) {
4482 bpf_log(log, "Global function %s() with %d > 5 args. Buggy compiler.\n",
4483 tname, nargs);
4484 return -EINVAL;
4485 }
4486 /* check that function returns int */
4487 t = btf_type_by_id(btf, t->type);
4488 while (btf_type_is_modifier(t))
4489 t = btf_type_by_id(btf, t->type);
4490 if (!btf_type_is_int(t) && !btf_type_is_enum(t)) {
4491 bpf_log(log,
4492 "Global function %s() doesn't return scalar. Only those are supported.\n",
4493 tname);
4494 return -EINVAL;
4495 }
4496 /* Convert BTF function arguments into verifier types.
4497 * Only PTR_TO_CTX and SCALAR are supported atm.
4498 */
4499 for (i = 0; i < nargs; i++) {
4500 t = btf_type_by_id(btf, args[i].type);
4501 while (btf_type_is_modifier(t))
4502 t = btf_type_by_id(btf, t->type);
4503 if (btf_type_is_int(t) || btf_type_is_enum(t)) {
4504 reg[i + 1].type = SCALAR_VALUE;
4505 continue;
4506 }
4507 if (btf_type_is_ptr(t) &&
4508 btf_get_prog_ctx_type(log, btf, t, prog_type, i)) {
4509 reg[i + 1].type = PTR_TO_CTX;
4510 continue;
4511 }
4512 bpf_log(log, "Arg#%d type %s in %s() is not supported yet.\n",
4513 i, btf_kind_str[BTF_INFO_KIND(t->info)], tname);
4514 return -EINVAL;
4515 }
4516 return 0;
4517}
4518
4519void btf_type_seq_show(const struct btf *btf, u32 type_id, void *obj,
4520 struct seq_file *m)
4521{
4522 const struct btf_type *t = btf_type_by_id(btf, type_id);
4523
4524 btf_type_ops(t)->seq_show(btf, t, type_id, obj, 0, m);
4525}
4526
4527#ifdef CONFIG_PROC_FS
4528static void bpf_btf_show_fdinfo(struct seq_file *m, struct file *filp)
4529{
4530 const struct btf *btf = filp->private_data;
4531
4532 seq_printf(m, "btf_id:\t%u\n", btf->id);
4533}
4534#endif
4535
4536static int btf_release(struct inode *inode, struct file *filp)
4537{
4538 btf_put(filp->private_data);
4539 return 0;
4540}
4541
4542const struct file_operations btf_fops = {
4543#ifdef CONFIG_PROC_FS
4544 .show_fdinfo = bpf_btf_show_fdinfo,
4545#endif
4546 .release = btf_release,
4547};
4548
4549static int __btf_new_fd(struct btf *btf)
4550{
4551 return anon_inode_getfd("btf", &btf_fops, btf, O_RDONLY | O_CLOEXEC);
4552}
4553
4554int btf_new_fd(const union bpf_attr *attr)
4555{
4556 struct btf *btf;
4557 int ret;
4558
4559 btf = btf_parse(u64_to_user_ptr(attr->btf),
4560 attr->btf_size, attr->btf_log_level,
4561 u64_to_user_ptr(attr->btf_log_buf),
4562 attr->btf_log_size);
4563 if (IS_ERR(btf))
4564 return PTR_ERR(btf);
4565
4566 ret = btf_alloc_id(btf);
4567 if (ret) {
4568 btf_free(btf);
4569 return ret;
4570 }
4571
4572 /*
4573 * The BTF ID is published to the userspace.
4574 * All BTF free must go through call_rcu() from
4575 * now on (i.e. free by calling btf_put()).
4576 */
4577
4578 ret = __btf_new_fd(btf);
4579 if (ret < 0)
4580 btf_put(btf);
4581
4582 return ret;
4583}
4584
4585struct btf *btf_get_by_fd(int fd)
4586{
4587 struct btf *btf;
4588 struct fd f;
4589
4590 f = fdget(fd);
4591
4592 if (!f.file)
4593 return ERR_PTR(-EBADF);
4594
4595 if (f.file->f_op != &btf_fops) {
4596 fdput(f);
4597 return ERR_PTR(-EINVAL);
4598 }
4599
4600 btf = f.file->private_data;
4601 refcount_inc(&btf->refcnt);
4602 fdput(f);
4603
4604 return btf;
4605}
4606
4607int btf_get_info_by_fd(const struct btf *btf,
4608 const union bpf_attr *attr,
4609 union bpf_attr __user *uattr)
4610{
4611 struct bpf_btf_info __user *uinfo;
4612 struct bpf_btf_info info;
4613 u32 info_copy, btf_copy;
4614 void __user *ubtf;
4615 u32 uinfo_len;
4616
4617 uinfo = u64_to_user_ptr(attr->info.info);
4618 uinfo_len = attr->info.info_len;
4619
4620 info_copy = min_t(u32, uinfo_len, sizeof(info));
4621 memset(&info, 0, sizeof(info));
4622 if (copy_from_user(&info, uinfo, info_copy))
4623 return -EFAULT;
4624
4625 info.id = btf->id;
4626 ubtf = u64_to_user_ptr(info.btf);
4627 btf_copy = min_t(u32, btf->data_size, info.btf_size);
4628 if (copy_to_user(ubtf, btf->data, btf_copy))
4629 return -EFAULT;
4630 info.btf_size = btf->data_size;
4631
4632 if (copy_to_user(uinfo, &info, info_copy) ||
4633 put_user(info_copy, &uattr->info.info_len))
4634 return -EFAULT;
4635
4636 return 0;
4637}
4638
4639int btf_get_fd_by_id(u32 id)
4640{
4641 struct btf *btf;
4642 int fd;
4643
4644 rcu_read_lock();
4645 btf = idr_find(&btf_idr, id);
4646 if (!btf || !refcount_inc_not_zero(&btf->refcnt))
4647 btf = ERR_PTR(-ENOENT);
4648 rcu_read_unlock();
4649
4650 if (IS_ERR(btf))
4651 return PTR_ERR(btf);
4652
4653 fd = __btf_new_fd(btf);
4654 if (fd < 0)
4655 btf_put(btf);
4656
4657 return fd;
4658}
4659
4660u32 btf_id(const struct btf *btf)
4661{
4662 return btf->id;
4663}