]> git.proxmox.com Git - mirror_ubuntu-bionic-kernel.git/blob - tools/perf/util/bpf-loader.c
Merge remote-tracking branch 'airlied/drm-next' into drm-misc-next
[mirror_ubuntu-bionic-kernel.git] / tools / perf / util / bpf-loader.c
1 /*
2 * bpf-loader.c
3 *
4 * Copyright (C) 2015 Wang Nan <wangnan0@huawei.com>
5 * Copyright (C) 2015 Huawei Inc.
6 */
7
8 #include <linux/bpf.h>
9 #include <bpf/libbpf.h>
10 #include <bpf/bpf.h>
11 #include <linux/err.h>
12 #include <linux/kernel.h>
13 #include <linux/string.h>
14 #include <errno.h>
15 #include "perf.h"
16 #include "debug.h"
17 #include "bpf-loader.h"
18 #include "bpf-prologue.h"
19 #include "probe-event.h"
20 #include "probe-finder.h" // for MAX_PROBES
21 #include "parse-events.h"
22 #include "strfilter.h"
23 #include "llvm-utils.h"
24 #include "c++/clang-c.h"
25
26 #define DEFINE_PRINT_FN(name, level) \
27 static int libbpf_##name(const char *fmt, ...) \
28 { \
29 va_list args; \
30 int ret; \
31 \
32 va_start(args, fmt); \
33 ret = veprintf(level, verbose, pr_fmt(fmt), args);\
34 va_end(args); \
35 return ret; \
36 }
37
38 DEFINE_PRINT_FN(warning, 1)
39 DEFINE_PRINT_FN(info, 1)
40 DEFINE_PRINT_FN(debug, 1)
41
42 struct bpf_prog_priv {
43 bool is_tp;
44 char *sys_name;
45 char *evt_name;
46 struct perf_probe_event pev;
47 bool need_prologue;
48 struct bpf_insn *insns_buf;
49 int nr_types;
50 int *type_mapping;
51 };
52
53 static bool libbpf_initialized;
54
55 struct bpf_object *
56 bpf__prepare_load_buffer(void *obj_buf, size_t obj_buf_sz, const char *name)
57 {
58 struct bpf_object *obj;
59
60 if (!libbpf_initialized) {
61 libbpf_set_print(libbpf_warning,
62 libbpf_info,
63 libbpf_debug);
64 libbpf_initialized = true;
65 }
66
67 obj = bpf_object__open_buffer(obj_buf, obj_buf_sz, name);
68 if (IS_ERR(obj)) {
69 pr_debug("bpf: failed to load buffer\n");
70 return ERR_PTR(-EINVAL);
71 }
72
73 return obj;
74 }
75
76 struct bpf_object *bpf__prepare_load(const char *filename, bool source)
77 {
78 struct bpf_object *obj;
79
80 if (!libbpf_initialized) {
81 libbpf_set_print(libbpf_warning,
82 libbpf_info,
83 libbpf_debug);
84 libbpf_initialized = true;
85 }
86
87 if (source) {
88 int err;
89 void *obj_buf;
90 size_t obj_buf_sz;
91
92 perf_clang__init();
93 err = perf_clang__compile_bpf(filename, &obj_buf, &obj_buf_sz);
94 perf_clang__cleanup();
95 if (err) {
96 pr_warning("bpf: builtin compilation failed: %d, try external compiler\n", err);
97 err = llvm__compile_bpf(filename, &obj_buf, &obj_buf_sz);
98 if (err)
99 return ERR_PTR(-BPF_LOADER_ERRNO__COMPILE);
100 } else
101 pr_debug("bpf: successfull builtin compilation\n");
102 obj = bpf_object__open_buffer(obj_buf, obj_buf_sz, filename);
103
104 if (!IS_ERR(obj) && llvm_param.dump_obj)
105 llvm__dump_obj(filename, obj_buf, obj_buf_sz);
106
107 free(obj_buf);
108 } else
109 obj = bpf_object__open(filename);
110
111 if (IS_ERR(obj)) {
112 pr_debug("bpf: failed to load %s\n", filename);
113 return obj;
114 }
115
116 return obj;
117 }
118
119 void bpf__clear(void)
120 {
121 struct bpf_object *obj, *tmp;
122
123 bpf_object__for_each_safe(obj, tmp) {
124 bpf__unprobe(obj);
125 bpf_object__close(obj);
126 }
127 }
128
129 static void
130 clear_prog_priv(struct bpf_program *prog __maybe_unused,
131 void *_priv)
132 {
133 struct bpf_prog_priv *priv = _priv;
134
135 cleanup_perf_probe_events(&priv->pev, 1);
136 zfree(&priv->insns_buf);
137 zfree(&priv->type_mapping);
138 zfree(&priv->sys_name);
139 zfree(&priv->evt_name);
140 free(priv);
141 }
142
143 static int
144 prog_config__exec(const char *value, struct perf_probe_event *pev)
145 {
146 pev->uprobes = true;
147 pev->target = strdup(value);
148 if (!pev->target)
149 return -ENOMEM;
150 return 0;
151 }
152
153 static int
154 prog_config__module(const char *value, struct perf_probe_event *pev)
155 {
156 pev->uprobes = false;
157 pev->target = strdup(value);
158 if (!pev->target)
159 return -ENOMEM;
160 return 0;
161 }
162
163 static int
164 prog_config__bool(const char *value, bool *pbool, bool invert)
165 {
166 int err;
167 bool bool_value;
168
169 if (!pbool)
170 return -EINVAL;
171
172 err = strtobool(value, &bool_value);
173 if (err)
174 return err;
175
176 *pbool = invert ? !bool_value : bool_value;
177 return 0;
178 }
179
180 static int
181 prog_config__inlines(const char *value,
182 struct perf_probe_event *pev __maybe_unused)
183 {
184 return prog_config__bool(value, &probe_conf.no_inlines, true);
185 }
186
187 static int
188 prog_config__force(const char *value,
189 struct perf_probe_event *pev __maybe_unused)
190 {
191 return prog_config__bool(value, &probe_conf.force_add, false);
192 }
193
194 static struct {
195 const char *key;
196 const char *usage;
197 const char *desc;
198 int (*func)(const char *, struct perf_probe_event *);
199 } bpf_prog_config_terms[] = {
200 {
201 .key = "exec",
202 .usage = "exec=<full path of file>",
203 .desc = "Set uprobe target",
204 .func = prog_config__exec,
205 },
206 {
207 .key = "module",
208 .usage = "module=<module name> ",
209 .desc = "Set kprobe module",
210 .func = prog_config__module,
211 },
212 {
213 .key = "inlines",
214 .usage = "inlines=[yes|no] ",
215 .desc = "Probe at inline symbol",
216 .func = prog_config__inlines,
217 },
218 {
219 .key = "force",
220 .usage = "force=[yes|no] ",
221 .desc = "Forcibly add events with existing name",
222 .func = prog_config__force,
223 },
224 };
225
226 static int
227 do_prog_config(const char *key, const char *value,
228 struct perf_probe_event *pev)
229 {
230 unsigned int i;
231
232 pr_debug("config bpf program: %s=%s\n", key, value);
233 for (i = 0; i < ARRAY_SIZE(bpf_prog_config_terms); i++)
234 if (strcmp(key, bpf_prog_config_terms[i].key) == 0)
235 return bpf_prog_config_terms[i].func(value, pev);
236
237 pr_debug("BPF: ERROR: invalid program config option: %s=%s\n",
238 key, value);
239
240 pr_debug("\nHint: Valid options are:\n");
241 for (i = 0; i < ARRAY_SIZE(bpf_prog_config_terms); i++)
242 pr_debug("\t%s:\t%s\n", bpf_prog_config_terms[i].usage,
243 bpf_prog_config_terms[i].desc);
244 pr_debug("\n");
245
246 return -BPF_LOADER_ERRNO__PROGCONF_TERM;
247 }
248
249 static const char *
250 parse_prog_config_kvpair(const char *config_str, struct perf_probe_event *pev)
251 {
252 char *text = strdup(config_str);
253 char *sep, *line;
254 const char *main_str = NULL;
255 int err = 0;
256
257 if (!text) {
258 pr_debug("Not enough memory: dup config_str failed\n");
259 return ERR_PTR(-ENOMEM);
260 }
261
262 line = text;
263 while ((sep = strchr(line, ';'))) {
264 char *equ;
265
266 *sep = '\0';
267 equ = strchr(line, '=');
268 if (!equ) {
269 pr_warning("WARNING: invalid config in BPF object: %s\n",
270 line);
271 pr_warning("\tShould be 'key=value'.\n");
272 goto nextline;
273 }
274 *equ = '\0';
275
276 err = do_prog_config(line, equ + 1, pev);
277 if (err)
278 break;
279 nextline:
280 line = sep + 1;
281 }
282
283 if (!err)
284 main_str = config_str + (line - text);
285 free(text);
286
287 return err ? ERR_PTR(err) : main_str;
288 }
289
290 static int
291 parse_prog_config(const char *config_str, const char **p_main_str,
292 bool *is_tp, struct perf_probe_event *pev)
293 {
294 int err;
295 const char *main_str = parse_prog_config_kvpair(config_str, pev);
296
297 if (IS_ERR(main_str))
298 return PTR_ERR(main_str);
299
300 *p_main_str = main_str;
301 if (!strchr(main_str, '=')) {
302 /* Is a tracepoint event? */
303 const char *s = strchr(main_str, ':');
304
305 if (!s) {
306 pr_debug("bpf: '%s' is not a valid tracepoint\n",
307 config_str);
308 return -BPF_LOADER_ERRNO__CONFIG;
309 }
310
311 *is_tp = true;
312 return 0;
313 }
314
315 *is_tp = false;
316 err = parse_perf_probe_command(main_str, pev);
317 if (err < 0) {
318 pr_debug("bpf: '%s' is not a valid config string\n",
319 config_str);
320 /* parse failed, don't need clear pev. */
321 return -BPF_LOADER_ERRNO__CONFIG;
322 }
323 return 0;
324 }
325
326 static int
327 config_bpf_program(struct bpf_program *prog)
328 {
329 struct perf_probe_event *pev = NULL;
330 struct bpf_prog_priv *priv = NULL;
331 const char *config_str, *main_str;
332 bool is_tp = false;
333 int err;
334
335 /* Initialize per-program probing setting */
336 probe_conf.no_inlines = false;
337 probe_conf.force_add = false;
338
339 config_str = bpf_program__title(prog, false);
340 if (IS_ERR(config_str)) {
341 pr_debug("bpf: unable to get title for program\n");
342 return PTR_ERR(config_str);
343 }
344
345 priv = calloc(sizeof(*priv), 1);
346 if (!priv) {
347 pr_debug("bpf: failed to alloc priv\n");
348 return -ENOMEM;
349 }
350 pev = &priv->pev;
351
352 pr_debug("bpf: config program '%s'\n", config_str);
353 err = parse_prog_config(config_str, &main_str, &is_tp, pev);
354 if (err)
355 goto errout;
356
357 if (is_tp) {
358 char *s = strchr(main_str, ':');
359
360 priv->is_tp = true;
361 priv->sys_name = strndup(main_str, s - main_str);
362 priv->evt_name = strdup(s + 1);
363 goto set_priv;
364 }
365
366 if (pev->group && strcmp(pev->group, PERF_BPF_PROBE_GROUP)) {
367 pr_debug("bpf: '%s': group for event is set and not '%s'.\n",
368 config_str, PERF_BPF_PROBE_GROUP);
369 err = -BPF_LOADER_ERRNO__GROUP;
370 goto errout;
371 } else if (!pev->group)
372 pev->group = strdup(PERF_BPF_PROBE_GROUP);
373
374 if (!pev->group) {
375 pr_debug("bpf: strdup failed\n");
376 err = -ENOMEM;
377 goto errout;
378 }
379
380 if (!pev->event) {
381 pr_debug("bpf: '%s': event name is missing. Section name should be 'key=value'\n",
382 config_str);
383 err = -BPF_LOADER_ERRNO__EVENTNAME;
384 goto errout;
385 }
386 pr_debug("bpf: config '%s' is ok\n", config_str);
387
388 set_priv:
389 err = bpf_program__set_priv(prog, priv, clear_prog_priv);
390 if (err) {
391 pr_debug("Failed to set priv for program '%s'\n", config_str);
392 goto errout;
393 }
394
395 return 0;
396
397 errout:
398 if (pev)
399 clear_perf_probe_event(pev);
400 free(priv);
401 return err;
402 }
403
404 static int bpf__prepare_probe(void)
405 {
406 static int err = 0;
407 static bool initialized = false;
408
409 /*
410 * Make err static, so if init failed the first, bpf__prepare_probe()
411 * fails each time without calling init_probe_symbol_maps multiple
412 * times.
413 */
414 if (initialized)
415 return err;
416
417 initialized = true;
418 err = init_probe_symbol_maps(false);
419 if (err < 0)
420 pr_debug("Failed to init_probe_symbol_maps\n");
421 probe_conf.max_probes = MAX_PROBES;
422 return err;
423 }
424
425 static int
426 preproc_gen_prologue(struct bpf_program *prog, int n,
427 struct bpf_insn *orig_insns, int orig_insns_cnt,
428 struct bpf_prog_prep_result *res)
429 {
430 struct bpf_prog_priv *priv = bpf_program__priv(prog);
431 struct probe_trace_event *tev;
432 struct perf_probe_event *pev;
433 struct bpf_insn *buf;
434 size_t prologue_cnt = 0;
435 int i, err;
436
437 if (IS_ERR(priv) || !priv || priv->is_tp)
438 goto errout;
439
440 pev = &priv->pev;
441
442 if (n < 0 || n >= priv->nr_types)
443 goto errout;
444
445 /* Find a tev belongs to that type */
446 for (i = 0; i < pev->ntevs; i++) {
447 if (priv->type_mapping[i] == n)
448 break;
449 }
450
451 if (i >= pev->ntevs) {
452 pr_debug("Internal error: prologue type %d not found\n", n);
453 return -BPF_LOADER_ERRNO__PROLOGUE;
454 }
455
456 tev = &pev->tevs[i];
457
458 buf = priv->insns_buf;
459 err = bpf__gen_prologue(tev->args, tev->nargs,
460 buf, &prologue_cnt,
461 BPF_MAXINSNS - orig_insns_cnt);
462 if (err) {
463 const char *title;
464
465 title = bpf_program__title(prog, false);
466 if (!title)
467 title = "[unknown]";
468
469 pr_debug("Failed to generate prologue for program %s\n",
470 title);
471 return err;
472 }
473
474 memcpy(&buf[prologue_cnt], orig_insns,
475 sizeof(struct bpf_insn) * orig_insns_cnt);
476
477 res->new_insn_ptr = buf;
478 res->new_insn_cnt = prologue_cnt + orig_insns_cnt;
479 res->pfd = NULL;
480 return 0;
481
482 errout:
483 pr_debug("Internal error in preproc_gen_prologue\n");
484 return -BPF_LOADER_ERRNO__PROLOGUE;
485 }
486
487 /*
488 * compare_tev_args is reflexive, transitive and antisymmetric.
489 * I can proof it but this margin is too narrow to contain.
490 */
491 static int compare_tev_args(const void *ptev1, const void *ptev2)
492 {
493 int i, ret;
494 const struct probe_trace_event *tev1 =
495 *(const struct probe_trace_event **)ptev1;
496 const struct probe_trace_event *tev2 =
497 *(const struct probe_trace_event **)ptev2;
498
499 ret = tev2->nargs - tev1->nargs;
500 if (ret)
501 return ret;
502
503 for (i = 0; i < tev1->nargs; i++) {
504 struct probe_trace_arg *arg1, *arg2;
505 struct probe_trace_arg_ref *ref1, *ref2;
506
507 arg1 = &tev1->args[i];
508 arg2 = &tev2->args[i];
509
510 ret = strcmp(arg1->value, arg2->value);
511 if (ret)
512 return ret;
513
514 ref1 = arg1->ref;
515 ref2 = arg2->ref;
516
517 while (ref1 && ref2) {
518 ret = ref2->offset - ref1->offset;
519 if (ret)
520 return ret;
521
522 ref1 = ref1->next;
523 ref2 = ref2->next;
524 }
525
526 if (ref1 || ref2)
527 return ref2 ? 1 : -1;
528 }
529
530 return 0;
531 }
532
533 /*
534 * Assign a type number to each tevs in a pev.
535 * mapping is an array with same slots as tevs in that pev.
536 * nr_types will be set to number of types.
537 */
538 static int map_prologue(struct perf_probe_event *pev, int *mapping,
539 int *nr_types)
540 {
541 int i, type = 0;
542 struct probe_trace_event **ptevs;
543
544 size_t array_sz = sizeof(*ptevs) * pev->ntevs;
545
546 ptevs = malloc(array_sz);
547 if (!ptevs) {
548 pr_debug("Not enough memory: alloc ptevs failed\n");
549 return -ENOMEM;
550 }
551
552 pr_debug("In map_prologue, ntevs=%d\n", pev->ntevs);
553 for (i = 0; i < pev->ntevs; i++)
554 ptevs[i] = &pev->tevs[i];
555
556 qsort(ptevs, pev->ntevs, sizeof(*ptevs),
557 compare_tev_args);
558
559 for (i = 0; i < pev->ntevs; i++) {
560 int n;
561
562 n = ptevs[i] - pev->tevs;
563 if (i == 0) {
564 mapping[n] = type;
565 pr_debug("mapping[%d]=%d\n", n, type);
566 continue;
567 }
568
569 if (compare_tev_args(ptevs + i, ptevs + i - 1) == 0)
570 mapping[n] = type;
571 else
572 mapping[n] = ++type;
573
574 pr_debug("mapping[%d]=%d\n", n, mapping[n]);
575 }
576 free(ptevs);
577 *nr_types = type + 1;
578
579 return 0;
580 }
581
582 static int hook_load_preprocessor(struct bpf_program *prog)
583 {
584 struct bpf_prog_priv *priv = bpf_program__priv(prog);
585 struct perf_probe_event *pev;
586 bool need_prologue = false;
587 int err, i;
588
589 if (IS_ERR(priv) || !priv) {
590 pr_debug("Internal error when hook preprocessor\n");
591 return -BPF_LOADER_ERRNO__INTERNAL;
592 }
593
594 if (priv->is_tp) {
595 priv->need_prologue = false;
596 return 0;
597 }
598
599 pev = &priv->pev;
600 for (i = 0; i < pev->ntevs; i++) {
601 struct probe_trace_event *tev = &pev->tevs[i];
602
603 if (tev->nargs > 0) {
604 need_prologue = true;
605 break;
606 }
607 }
608
609 /*
610 * Since all tevs don't have argument, we don't need generate
611 * prologue.
612 */
613 if (!need_prologue) {
614 priv->need_prologue = false;
615 return 0;
616 }
617
618 priv->need_prologue = true;
619 priv->insns_buf = malloc(sizeof(struct bpf_insn) * BPF_MAXINSNS);
620 if (!priv->insns_buf) {
621 pr_debug("Not enough memory: alloc insns_buf failed\n");
622 return -ENOMEM;
623 }
624
625 priv->type_mapping = malloc(sizeof(int) * pev->ntevs);
626 if (!priv->type_mapping) {
627 pr_debug("Not enough memory: alloc type_mapping failed\n");
628 return -ENOMEM;
629 }
630 memset(priv->type_mapping, -1,
631 sizeof(int) * pev->ntevs);
632
633 err = map_prologue(pev, priv->type_mapping, &priv->nr_types);
634 if (err)
635 return err;
636
637 err = bpf_program__set_prep(prog, priv->nr_types,
638 preproc_gen_prologue);
639 return err;
640 }
641
642 int bpf__probe(struct bpf_object *obj)
643 {
644 int err = 0;
645 struct bpf_program *prog;
646 struct bpf_prog_priv *priv;
647 struct perf_probe_event *pev;
648
649 err = bpf__prepare_probe();
650 if (err) {
651 pr_debug("bpf__prepare_probe failed\n");
652 return err;
653 }
654
655 bpf_object__for_each_program(prog, obj) {
656 err = config_bpf_program(prog);
657 if (err)
658 goto out;
659
660 priv = bpf_program__priv(prog);
661 if (IS_ERR(priv) || !priv) {
662 err = PTR_ERR(priv);
663 goto out;
664 }
665
666 if (priv->is_tp) {
667 bpf_program__set_tracepoint(prog);
668 continue;
669 }
670
671 bpf_program__set_kprobe(prog);
672 pev = &priv->pev;
673
674 err = convert_perf_probe_events(pev, 1);
675 if (err < 0) {
676 pr_debug("bpf_probe: failed to convert perf probe events\n");
677 goto out;
678 }
679
680 err = apply_perf_probe_events(pev, 1);
681 if (err < 0) {
682 pr_debug("bpf_probe: failed to apply perf probe events\n");
683 goto out;
684 }
685
686 /*
687 * After probing, let's consider prologue, which
688 * adds program fetcher to BPF programs.
689 *
690 * hook_load_preprocessorr() hooks pre-processor
691 * to bpf_program, let it generate prologue
692 * dynamically during loading.
693 */
694 err = hook_load_preprocessor(prog);
695 if (err)
696 goto out;
697 }
698 out:
699 return err < 0 ? err : 0;
700 }
701
702 #define EVENTS_WRITE_BUFSIZE 4096
703 int bpf__unprobe(struct bpf_object *obj)
704 {
705 int err, ret = 0;
706 struct bpf_program *prog;
707
708 bpf_object__for_each_program(prog, obj) {
709 struct bpf_prog_priv *priv = bpf_program__priv(prog);
710 int i;
711
712 if (IS_ERR(priv) || !priv || priv->is_tp)
713 continue;
714
715 for (i = 0; i < priv->pev.ntevs; i++) {
716 struct probe_trace_event *tev = &priv->pev.tevs[i];
717 char name_buf[EVENTS_WRITE_BUFSIZE];
718 struct strfilter *delfilter;
719
720 snprintf(name_buf, EVENTS_WRITE_BUFSIZE,
721 "%s:%s", tev->group, tev->event);
722 name_buf[EVENTS_WRITE_BUFSIZE - 1] = '\0';
723
724 delfilter = strfilter__new(name_buf, NULL);
725 if (!delfilter) {
726 pr_debug("Failed to create filter for unprobing\n");
727 ret = -ENOMEM;
728 continue;
729 }
730
731 err = del_perf_probe_events(delfilter);
732 strfilter__delete(delfilter);
733 if (err) {
734 pr_debug("Failed to delete %s\n", name_buf);
735 ret = err;
736 continue;
737 }
738 }
739 }
740 return ret;
741 }
742
743 int bpf__load(struct bpf_object *obj)
744 {
745 int err;
746
747 err = bpf_object__load(obj);
748 if (err) {
749 pr_debug("bpf: load objects failed\n");
750 return err;
751 }
752 return 0;
753 }
754
755 int bpf__foreach_event(struct bpf_object *obj,
756 bpf_prog_iter_callback_t func,
757 void *arg)
758 {
759 struct bpf_program *prog;
760 int err;
761
762 bpf_object__for_each_program(prog, obj) {
763 struct bpf_prog_priv *priv = bpf_program__priv(prog);
764 struct probe_trace_event *tev;
765 struct perf_probe_event *pev;
766 int i, fd;
767
768 if (IS_ERR(priv) || !priv) {
769 pr_debug("bpf: failed to get private field\n");
770 return -BPF_LOADER_ERRNO__INTERNAL;
771 }
772
773 if (priv->is_tp) {
774 fd = bpf_program__fd(prog);
775 err = (*func)(priv->sys_name, priv->evt_name, fd, arg);
776 if (err) {
777 pr_debug("bpf: tracepoint call back failed, stop iterate\n");
778 return err;
779 }
780 continue;
781 }
782
783 pev = &priv->pev;
784 for (i = 0; i < pev->ntevs; i++) {
785 tev = &pev->tevs[i];
786
787 if (priv->need_prologue) {
788 int type = priv->type_mapping[i];
789
790 fd = bpf_program__nth_fd(prog, type);
791 } else {
792 fd = bpf_program__fd(prog);
793 }
794
795 if (fd < 0) {
796 pr_debug("bpf: failed to get file descriptor\n");
797 return fd;
798 }
799
800 err = (*func)(tev->group, tev->event, fd, arg);
801 if (err) {
802 pr_debug("bpf: call back failed, stop iterate\n");
803 return err;
804 }
805 }
806 }
807 return 0;
808 }
809
810 enum bpf_map_op_type {
811 BPF_MAP_OP_SET_VALUE,
812 BPF_MAP_OP_SET_EVSEL,
813 };
814
815 enum bpf_map_key_type {
816 BPF_MAP_KEY_ALL,
817 BPF_MAP_KEY_RANGES,
818 };
819
820 struct bpf_map_op {
821 struct list_head list;
822 enum bpf_map_op_type op_type;
823 enum bpf_map_key_type key_type;
824 union {
825 struct parse_events_array array;
826 } k;
827 union {
828 u64 value;
829 struct perf_evsel *evsel;
830 } v;
831 };
832
833 struct bpf_map_priv {
834 struct list_head ops_list;
835 };
836
837 static void
838 bpf_map_op__delete(struct bpf_map_op *op)
839 {
840 if (!list_empty(&op->list))
841 list_del(&op->list);
842 if (op->key_type == BPF_MAP_KEY_RANGES)
843 parse_events__clear_array(&op->k.array);
844 free(op);
845 }
846
847 static void
848 bpf_map_priv__purge(struct bpf_map_priv *priv)
849 {
850 struct bpf_map_op *pos, *n;
851
852 list_for_each_entry_safe(pos, n, &priv->ops_list, list) {
853 list_del_init(&pos->list);
854 bpf_map_op__delete(pos);
855 }
856 }
857
858 static void
859 bpf_map_priv__clear(struct bpf_map *map __maybe_unused,
860 void *_priv)
861 {
862 struct bpf_map_priv *priv = _priv;
863
864 bpf_map_priv__purge(priv);
865 free(priv);
866 }
867
868 static int
869 bpf_map_op_setkey(struct bpf_map_op *op, struct parse_events_term *term)
870 {
871 op->key_type = BPF_MAP_KEY_ALL;
872 if (!term)
873 return 0;
874
875 if (term->array.nr_ranges) {
876 size_t memsz = term->array.nr_ranges *
877 sizeof(op->k.array.ranges[0]);
878
879 op->k.array.ranges = memdup(term->array.ranges, memsz);
880 if (!op->k.array.ranges) {
881 pr_debug("Not enough memory to alloc indices for map\n");
882 return -ENOMEM;
883 }
884 op->key_type = BPF_MAP_KEY_RANGES;
885 op->k.array.nr_ranges = term->array.nr_ranges;
886 }
887 return 0;
888 }
889
890 static struct bpf_map_op *
891 bpf_map_op__new(struct parse_events_term *term)
892 {
893 struct bpf_map_op *op;
894 int err;
895
896 op = zalloc(sizeof(*op));
897 if (!op) {
898 pr_debug("Failed to alloc bpf_map_op\n");
899 return ERR_PTR(-ENOMEM);
900 }
901 INIT_LIST_HEAD(&op->list);
902
903 err = bpf_map_op_setkey(op, term);
904 if (err) {
905 free(op);
906 return ERR_PTR(err);
907 }
908 return op;
909 }
910
911 static struct bpf_map_op *
912 bpf_map_op__clone(struct bpf_map_op *op)
913 {
914 struct bpf_map_op *newop;
915
916 newop = memdup(op, sizeof(*op));
917 if (!newop) {
918 pr_debug("Failed to alloc bpf_map_op\n");
919 return NULL;
920 }
921
922 INIT_LIST_HEAD(&newop->list);
923 if (op->key_type == BPF_MAP_KEY_RANGES) {
924 size_t memsz = op->k.array.nr_ranges *
925 sizeof(op->k.array.ranges[0]);
926
927 newop->k.array.ranges = memdup(op->k.array.ranges, memsz);
928 if (!newop->k.array.ranges) {
929 pr_debug("Failed to alloc indices for map\n");
930 free(newop);
931 return NULL;
932 }
933 }
934
935 return newop;
936 }
937
938 static struct bpf_map_priv *
939 bpf_map_priv__clone(struct bpf_map_priv *priv)
940 {
941 struct bpf_map_priv *newpriv;
942 struct bpf_map_op *pos, *newop;
943
944 newpriv = zalloc(sizeof(*newpriv));
945 if (!newpriv) {
946 pr_debug("Not enough memory to alloc map private\n");
947 return NULL;
948 }
949 INIT_LIST_HEAD(&newpriv->ops_list);
950
951 list_for_each_entry(pos, &priv->ops_list, list) {
952 newop = bpf_map_op__clone(pos);
953 if (!newop) {
954 bpf_map_priv__purge(newpriv);
955 return NULL;
956 }
957 list_add_tail(&newop->list, &newpriv->ops_list);
958 }
959
960 return newpriv;
961 }
962
963 static int
964 bpf_map__add_op(struct bpf_map *map, struct bpf_map_op *op)
965 {
966 const char *map_name = bpf_map__name(map);
967 struct bpf_map_priv *priv = bpf_map__priv(map);
968
969 if (IS_ERR(priv)) {
970 pr_debug("Failed to get private from map %s\n", map_name);
971 return PTR_ERR(priv);
972 }
973
974 if (!priv) {
975 priv = zalloc(sizeof(*priv));
976 if (!priv) {
977 pr_debug("Not enough memory to alloc map private\n");
978 return -ENOMEM;
979 }
980 INIT_LIST_HEAD(&priv->ops_list);
981
982 if (bpf_map__set_priv(map, priv, bpf_map_priv__clear)) {
983 free(priv);
984 return -BPF_LOADER_ERRNO__INTERNAL;
985 }
986 }
987
988 list_add_tail(&op->list, &priv->ops_list);
989 return 0;
990 }
991
992 static struct bpf_map_op *
993 bpf_map__add_newop(struct bpf_map *map, struct parse_events_term *term)
994 {
995 struct bpf_map_op *op;
996 int err;
997
998 op = bpf_map_op__new(term);
999 if (IS_ERR(op))
1000 return op;
1001
1002 err = bpf_map__add_op(map, op);
1003 if (err) {
1004 bpf_map_op__delete(op);
1005 return ERR_PTR(err);
1006 }
1007 return op;
1008 }
1009
1010 static int
1011 __bpf_map__config_value(struct bpf_map *map,
1012 struct parse_events_term *term)
1013 {
1014 struct bpf_map_op *op;
1015 const char *map_name = bpf_map__name(map);
1016 const struct bpf_map_def *def = bpf_map__def(map);
1017
1018 if (IS_ERR(def)) {
1019 pr_debug("Unable to get map definition from '%s'\n",
1020 map_name);
1021 return -BPF_LOADER_ERRNO__INTERNAL;
1022 }
1023
1024 if (def->type != BPF_MAP_TYPE_ARRAY) {
1025 pr_debug("Map %s type is not BPF_MAP_TYPE_ARRAY\n",
1026 map_name);
1027 return -BPF_LOADER_ERRNO__OBJCONF_MAP_TYPE;
1028 }
1029 if (def->key_size < sizeof(unsigned int)) {
1030 pr_debug("Map %s has incorrect key size\n", map_name);
1031 return -BPF_LOADER_ERRNO__OBJCONF_MAP_KEYSIZE;
1032 }
1033 switch (def->value_size) {
1034 case 1:
1035 case 2:
1036 case 4:
1037 case 8:
1038 break;
1039 default:
1040 pr_debug("Map %s has incorrect value size\n", map_name);
1041 return -BPF_LOADER_ERRNO__OBJCONF_MAP_VALUESIZE;
1042 }
1043
1044 op = bpf_map__add_newop(map, term);
1045 if (IS_ERR(op))
1046 return PTR_ERR(op);
1047 op->op_type = BPF_MAP_OP_SET_VALUE;
1048 op->v.value = term->val.num;
1049 return 0;
1050 }
1051
1052 static int
1053 bpf_map__config_value(struct bpf_map *map,
1054 struct parse_events_term *term,
1055 struct perf_evlist *evlist __maybe_unused)
1056 {
1057 if (!term->err_val) {
1058 pr_debug("Config value not set\n");
1059 return -BPF_LOADER_ERRNO__OBJCONF_CONF;
1060 }
1061
1062 if (term->type_val != PARSE_EVENTS__TERM_TYPE_NUM) {
1063 pr_debug("ERROR: wrong value type for 'value'\n");
1064 return -BPF_LOADER_ERRNO__OBJCONF_MAP_VALUE;
1065 }
1066
1067 return __bpf_map__config_value(map, term);
1068 }
1069
1070 static int
1071 __bpf_map__config_event(struct bpf_map *map,
1072 struct parse_events_term *term,
1073 struct perf_evlist *evlist)
1074 {
1075 struct perf_evsel *evsel;
1076 const struct bpf_map_def *def;
1077 struct bpf_map_op *op;
1078 const char *map_name = bpf_map__name(map);
1079
1080 evsel = perf_evlist__find_evsel_by_str(evlist, term->val.str);
1081 if (!evsel) {
1082 pr_debug("Event (for '%s') '%s' doesn't exist\n",
1083 map_name, term->val.str);
1084 return -BPF_LOADER_ERRNO__OBJCONF_MAP_NOEVT;
1085 }
1086
1087 def = bpf_map__def(map);
1088 if (IS_ERR(def)) {
1089 pr_debug("Unable to get map definition from '%s'\n",
1090 map_name);
1091 return PTR_ERR(def);
1092 }
1093
1094 /*
1095 * No need to check key_size and value_size:
1096 * kernel has already checked them.
1097 */
1098 if (def->type != BPF_MAP_TYPE_PERF_EVENT_ARRAY) {
1099 pr_debug("Map %s type is not BPF_MAP_TYPE_PERF_EVENT_ARRAY\n",
1100 map_name);
1101 return -BPF_LOADER_ERRNO__OBJCONF_MAP_TYPE;
1102 }
1103
1104 op = bpf_map__add_newop(map, term);
1105 if (IS_ERR(op))
1106 return PTR_ERR(op);
1107 op->op_type = BPF_MAP_OP_SET_EVSEL;
1108 op->v.evsel = evsel;
1109 return 0;
1110 }
1111
1112 static int
1113 bpf_map__config_event(struct bpf_map *map,
1114 struct parse_events_term *term,
1115 struct perf_evlist *evlist)
1116 {
1117 if (!term->err_val) {
1118 pr_debug("Config value not set\n");
1119 return -BPF_LOADER_ERRNO__OBJCONF_CONF;
1120 }
1121
1122 if (term->type_val != PARSE_EVENTS__TERM_TYPE_STR) {
1123 pr_debug("ERROR: wrong value type for 'event'\n");
1124 return -BPF_LOADER_ERRNO__OBJCONF_MAP_VALUE;
1125 }
1126
1127 return __bpf_map__config_event(map, term, evlist);
1128 }
1129
1130 struct bpf_obj_config__map_func {
1131 const char *config_opt;
1132 int (*config_func)(struct bpf_map *, struct parse_events_term *,
1133 struct perf_evlist *);
1134 };
1135
1136 struct bpf_obj_config__map_func bpf_obj_config__map_funcs[] = {
1137 {"value", bpf_map__config_value},
1138 {"event", bpf_map__config_event},
1139 };
1140
1141 static int
1142 config_map_indices_range_check(struct parse_events_term *term,
1143 struct bpf_map *map,
1144 const char *map_name)
1145 {
1146 struct parse_events_array *array = &term->array;
1147 const struct bpf_map_def *def;
1148 unsigned int i;
1149
1150 if (!array->nr_ranges)
1151 return 0;
1152 if (!array->ranges) {
1153 pr_debug("ERROR: map %s: array->nr_ranges is %d but range array is NULL\n",
1154 map_name, (int)array->nr_ranges);
1155 return -BPF_LOADER_ERRNO__INTERNAL;
1156 }
1157
1158 def = bpf_map__def(map);
1159 if (IS_ERR(def)) {
1160 pr_debug("ERROR: Unable to get map definition from '%s'\n",
1161 map_name);
1162 return -BPF_LOADER_ERRNO__INTERNAL;
1163 }
1164
1165 for (i = 0; i < array->nr_ranges; i++) {
1166 unsigned int start = array->ranges[i].start;
1167 size_t length = array->ranges[i].length;
1168 unsigned int idx = start + length - 1;
1169
1170 if (idx >= def->max_entries) {
1171 pr_debug("ERROR: index %d too large\n", idx);
1172 return -BPF_LOADER_ERRNO__OBJCONF_MAP_IDX2BIG;
1173 }
1174 }
1175 return 0;
1176 }
1177
1178 static int
1179 bpf__obj_config_map(struct bpf_object *obj,
1180 struct parse_events_term *term,
1181 struct perf_evlist *evlist,
1182 int *key_scan_pos)
1183 {
1184 /* key is "map:<mapname>.<config opt>" */
1185 char *map_name = strdup(term->config + sizeof("map:") - 1);
1186 struct bpf_map *map;
1187 int err = -BPF_LOADER_ERRNO__OBJCONF_OPT;
1188 char *map_opt;
1189 size_t i;
1190
1191 if (!map_name)
1192 return -ENOMEM;
1193
1194 map_opt = strchr(map_name, '.');
1195 if (!map_opt) {
1196 pr_debug("ERROR: Invalid map config: %s\n", map_name);
1197 goto out;
1198 }
1199
1200 *map_opt++ = '\0';
1201 if (*map_opt == '\0') {
1202 pr_debug("ERROR: Invalid map option: %s\n", term->config);
1203 goto out;
1204 }
1205
1206 map = bpf_object__find_map_by_name(obj, map_name);
1207 if (!map) {
1208 pr_debug("ERROR: Map %s doesn't exist\n", map_name);
1209 err = -BPF_LOADER_ERRNO__OBJCONF_MAP_NOTEXIST;
1210 goto out;
1211 }
1212
1213 *key_scan_pos += strlen(map_opt);
1214 err = config_map_indices_range_check(term, map, map_name);
1215 if (err)
1216 goto out;
1217 *key_scan_pos -= strlen(map_opt);
1218
1219 for (i = 0; i < ARRAY_SIZE(bpf_obj_config__map_funcs); i++) {
1220 struct bpf_obj_config__map_func *func =
1221 &bpf_obj_config__map_funcs[i];
1222
1223 if (strcmp(map_opt, func->config_opt) == 0) {
1224 err = func->config_func(map, term, evlist);
1225 goto out;
1226 }
1227 }
1228
1229 pr_debug("ERROR: Invalid map config option '%s'\n", map_opt);
1230 err = -BPF_LOADER_ERRNO__OBJCONF_MAP_OPT;
1231 out:
1232 free(map_name);
1233 if (!err)
1234 key_scan_pos += strlen(map_opt);
1235 return err;
1236 }
1237
1238 int bpf__config_obj(struct bpf_object *obj,
1239 struct parse_events_term *term,
1240 struct perf_evlist *evlist,
1241 int *error_pos)
1242 {
1243 int key_scan_pos = 0;
1244 int err;
1245
1246 if (!obj || !term || !term->config)
1247 return -EINVAL;
1248
1249 if (!prefixcmp(term->config, "map:")) {
1250 key_scan_pos = sizeof("map:") - 1;
1251 err = bpf__obj_config_map(obj, term, evlist, &key_scan_pos);
1252 goto out;
1253 }
1254 err = -BPF_LOADER_ERRNO__OBJCONF_OPT;
1255 out:
1256 if (error_pos)
1257 *error_pos = key_scan_pos;
1258 return err;
1259
1260 }
1261
1262 typedef int (*map_config_func_t)(const char *name, int map_fd,
1263 const struct bpf_map_def *pdef,
1264 struct bpf_map_op *op,
1265 void *pkey, void *arg);
1266
1267 static int
1268 foreach_key_array_all(map_config_func_t func,
1269 void *arg, const char *name,
1270 int map_fd, const struct bpf_map_def *pdef,
1271 struct bpf_map_op *op)
1272 {
1273 unsigned int i;
1274 int err;
1275
1276 for (i = 0; i < pdef->max_entries; i++) {
1277 err = func(name, map_fd, pdef, op, &i, arg);
1278 if (err) {
1279 pr_debug("ERROR: failed to insert value to %s[%u]\n",
1280 name, i);
1281 return err;
1282 }
1283 }
1284 return 0;
1285 }
1286
1287 static int
1288 foreach_key_array_ranges(map_config_func_t func, void *arg,
1289 const char *name, int map_fd,
1290 const struct bpf_map_def *pdef,
1291 struct bpf_map_op *op)
1292 {
1293 unsigned int i, j;
1294 int err;
1295
1296 for (i = 0; i < op->k.array.nr_ranges; i++) {
1297 unsigned int start = op->k.array.ranges[i].start;
1298 size_t length = op->k.array.ranges[i].length;
1299
1300 for (j = 0; j < length; j++) {
1301 unsigned int idx = start + j;
1302
1303 err = func(name, map_fd, pdef, op, &idx, arg);
1304 if (err) {
1305 pr_debug("ERROR: failed to insert value to %s[%u]\n",
1306 name, idx);
1307 return err;
1308 }
1309 }
1310 }
1311 return 0;
1312 }
1313
1314 static int
1315 bpf_map_config_foreach_key(struct bpf_map *map,
1316 map_config_func_t func,
1317 void *arg)
1318 {
1319 int err, map_fd;
1320 struct bpf_map_op *op;
1321 const struct bpf_map_def *def;
1322 const char *name = bpf_map__name(map);
1323 struct bpf_map_priv *priv = bpf_map__priv(map);
1324
1325 if (IS_ERR(priv)) {
1326 pr_debug("ERROR: failed to get private from map %s\n", name);
1327 return -BPF_LOADER_ERRNO__INTERNAL;
1328 }
1329 if (!priv || list_empty(&priv->ops_list)) {
1330 pr_debug("INFO: nothing to config for map %s\n", name);
1331 return 0;
1332 }
1333
1334 def = bpf_map__def(map);
1335 if (IS_ERR(def)) {
1336 pr_debug("ERROR: failed to get definition from map %s\n", name);
1337 return -BPF_LOADER_ERRNO__INTERNAL;
1338 }
1339 map_fd = bpf_map__fd(map);
1340 if (map_fd < 0) {
1341 pr_debug("ERROR: failed to get fd from map %s\n", name);
1342 return map_fd;
1343 }
1344
1345 list_for_each_entry(op, &priv->ops_list, list) {
1346 switch (def->type) {
1347 case BPF_MAP_TYPE_ARRAY:
1348 case BPF_MAP_TYPE_PERF_EVENT_ARRAY:
1349 switch (op->key_type) {
1350 case BPF_MAP_KEY_ALL:
1351 err = foreach_key_array_all(func, arg, name,
1352 map_fd, def, op);
1353 break;
1354 case BPF_MAP_KEY_RANGES:
1355 err = foreach_key_array_ranges(func, arg, name,
1356 map_fd, def,
1357 op);
1358 break;
1359 default:
1360 pr_debug("ERROR: keytype for map '%s' invalid\n",
1361 name);
1362 return -BPF_LOADER_ERRNO__INTERNAL;
1363 }
1364 if (err)
1365 return err;
1366 break;
1367 default:
1368 pr_debug("ERROR: type of '%s' incorrect\n", name);
1369 return -BPF_LOADER_ERRNO__OBJCONF_MAP_TYPE;
1370 }
1371 }
1372
1373 return 0;
1374 }
1375
1376 static int
1377 apply_config_value_for_key(int map_fd, void *pkey,
1378 size_t val_size, u64 val)
1379 {
1380 int err = 0;
1381
1382 switch (val_size) {
1383 case 1: {
1384 u8 _val = (u8)(val);
1385 err = bpf_map_update_elem(map_fd, pkey, &_val, BPF_ANY);
1386 break;
1387 }
1388 case 2: {
1389 u16 _val = (u16)(val);
1390 err = bpf_map_update_elem(map_fd, pkey, &_val, BPF_ANY);
1391 break;
1392 }
1393 case 4: {
1394 u32 _val = (u32)(val);
1395 err = bpf_map_update_elem(map_fd, pkey, &_val, BPF_ANY);
1396 break;
1397 }
1398 case 8: {
1399 err = bpf_map_update_elem(map_fd, pkey, &val, BPF_ANY);
1400 break;
1401 }
1402 default:
1403 pr_debug("ERROR: invalid value size\n");
1404 return -BPF_LOADER_ERRNO__OBJCONF_MAP_VALUESIZE;
1405 }
1406 if (err && errno)
1407 err = -errno;
1408 return err;
1409 }
1410
1411 static int
1412 apply_config_evsel_for_key(const char *name, int map_fd, void *pkey,
1413 struct perf_evsel *evsel)
1414 {
1415 struct xyarray *xy = evsel->fd;
1416 struct perf_event_attr *attr;
1417 unsigned int key, events;
1418 bool check_pass = false;
1419 int *evt_fd;
1420 int err;
1421
1422 if (!xy) {
1423 pr_debug("ERROR: evsel not ready for map %s\n", name);
1424 return -BPF_LOADER_ERRNO__INTERNAL;
1425 }
1426
1427 if (xy->row_size / xy->entry_size != 1) {
1428 pr_debug("ERROR: Dimension of target event is incorrect for map %s\n",
1429 name);
1430 return -BPF_LOADER_ERRNO__OBJCONF_MAP_EVTDIM;
1431 }
1432
1433 attr = &evsel->attr;
1434 if (attr->inherit) {
1435 pr_debug("ERROR: Can't put inherit event into map %s\n", name);
1436 return -BPF_LOADER_ERRNO__OBJCONF_MAP_EVTINH;
1437 }
1438
1439 if (perf_evsel__is_bpf_output(evsel))
1440 check_pass = true;
1441 if (attr->type == PERF_TYPE_RAW)
1442 check_pass = true;
1443 if (attr->type == PERF_TYPE_HARDWARE)
1444 check_pass = true;
1445 if (!check_pass) {
1446 pr_debug("ERROR: Event type is wrong for map %s\n", name);
1447 return -BPF_LOADER_ERRNO__OBJCONF_MAP_EVTTYPE;
1448 }
1449
1450 events = xy->entries / (xy->row_size / xy->entry_size);
1451 key = *((unsigned int *)pkey);
1452 if (key >= events) {
1453 pr_debug("ERROR: there is no event %d for map %s\n",
1454 key, name);
1455 return -BPF_LOADER_ERRNO__OBJCONF_MAP_MAPSIZE;
1456 }
1457 evt_fd = xyarray__entry(xy, key, 0);
1458 err = bpf_map_update_elem(map_fd, pkey, evt_fd, BPF_ANY);
1459 if (err && errno)
1460 err = -errno;
1461 return err;
1462 }
1463
1464 static int
1465 apply_obj_config_map_for_key(const char *name, int map_fd,
1466 const struct bpf_map_def *pdef,
1467 struct bpf_map_op *op,
1468 void *pkey, void *arg __maybe_unused)
1469 {
1470 int err;
1471
1472 switch (op->op_type) {
1473 case BPF_MAP_OP_SET_VALUE:
1474 err = apply_config_value_for_key(map_fd, pkey,
1475 pdef->value_size,
1476 op->v.value);
1477 break;
1478 case BPF_MAP_OP_SET_EVSEL:
1479 err = apply_config_evsel_for_key(name, map_fd, pkey,
1480 op->v.evsel);
1481 break;
1482 default:
1483 pr_debug("ERROR: unknown value type for '%s'\n", name);
1484 err = -BPF_LOADER_ERRNO__INTERNAL;
1485 }
1486 return err;
1487 }
1488
1489 static int
1490 apply_obj_config_map(struct bpf_map *map)
1491 {
1492 return bpf_map_config_foreach_key(map,
1493 apply_obj_config_map_for_key,
1494 NULL);
1495 }
1496
1497 static int
1498 apply_obj_config_object(struct bpf_object *obj)
1499 {
1500 struct bpf_map *map;
1501 int err;
1502
1503 bpf_map__for_each(map, obj) {
1504 err = apply_obj_config_map(map);
1505 if (err)
1506 return err;
1507 }
1508 return 0;
1509 }
1510
1511 int bpf__apply_obj_config(void)
1512 {
1513 struct bpf_object *obj, *tmp;
1514 int err;
1515
1516 bpf_object__for_each_safe(obj, tmp) {
1517 err = apply_obj_config_object(obj);
1518 if (err)
1519 return err;
1520 }
1521
1522 return 0;
1523 }
1524
1525 #define bpf__for_each_map(pos, obj, objtmp) \
1526 bpf_object__for_each_safe(obj, objtmp) \
1527 bpf_map__for_each(pos, obj)
1528
1529 #define bpf__for_each_stdout_map(pos, obj, objtmp) \
1530 bpf__for_each_map(pos, obj, objtmp) \
1531 if (bpf_map__name(pos) && \
1532 (strcmp("__bpf_stdout__", \
1533 bpf_map__name(pos)) == 0))
1534
1535 int bpf__setup_stdout(struct perf_evlist *evlist __maybe_unused)
1536 {
1537 struct bpf_map_priv *tmpl_priv = NULL;
1538 struct bpf_object *obj, *tmp;
1539 struct perf_evsel *evsel = NULL;
1540 struct bpf_map *map;
1541 int err;
1542 bool need_init = false;
1543
1544 bpf__for_each_stdout_map(map, obj, tmp) {
1545 struct bpf_map_priv *priv = bpf_map__priv(map);
1546
1547 if (IS_ERR(priv))
1548 return -BPF_LOADER_ERRNO__INTERNAL;
1549
1550 /*
1551 * No need to check map type: type should have been
1552 * verified by kernel.
1553 */
1554 if (!need_init && !priv)
1555 need_init = !priv;
1556 if (!tmpl_priv && priv)
1557 tmpl_priv = priv;
1558 }
1559
1560 if (!need_init)
1561 return 0;
1562
1563 if (!tmpl_priv) {
1564 err = parse_events(evlist, "bpf-output/no-inherit=1,name=__bpf_stdout__/",
1565 NULL);
1566 if (err) {
1567 pr_debug("ERROR: failed to create bpf-output event\n");
1568 return -err;
1569 }
1570
1571 evsel = perf_evlist__last(evlist);
1572 }
1573
1574 bpf__for_each_stdout_map(map, obj, tmp) {
1575 struct bpf_map_priv *priv = bpf_map__priv(map);
1576
1577 if (IS_ERR(priv))
1578 return -BPF_LOADER_ERRNO__INTERNAL;
1579 if (priv)
1580 continue;
1581
1582 if (tmpl_priv) {
1583 priv = bpf_map_priv__clone(tmpl_priv);
1584 if (!priv)
1585 return -ENOMEM;
1586
1587 err = bpf_map__set_priv(map, priv, bpf_map_priv__clear);
1588 if (err) {
1589 bpf_map_priv__clear(map, priv);
1590 return err;
1591 }
1592 } else if (evsel) {
1593 struct bpf_map_op *op;
1594
1595 op = bpf_map__add_newop(map, NULL);
1596 if (IS_ERR(op))
1597 return PTR_ERR(op);
1598 op->op_type = BPF_MAP_OP_SET_EVSEL;
1599 op->v.evsel = evsel;
1600 }
1601 }
1602
1603 return 0;
1604 }
1605
1606 #define ERRNO_OFFSET(e) ((e) - __BPF_LOADER_ERRNO__START)
1607 #define ERRCODE_OFFSET(c) ERRNO_OFFSET(BPF_LOADER_ERRNO__##c)
1608 #define NR_ERRNO (__BPF_LOADER_ERRNO__END - __BPF_LOADER_ERRNO__START)
1609
1610 static const char *bpf_loader_strerror_table[NR_ERRNO] = {
1611 [ERRCODE_OFFSET(CONFIG)] = "Invalid config string",
1612 [ERRCODE_OFFSET(GROUP)] = "Invalid group name",
1613 [ERRCODE_OFFSET(EVENTNAME)] = "No event name found in config string",
1614 [ERRCODE_OFFSET(INTERNAL)] = "BPF loader internal error",
1615 [ERRCODE_OFFSET(COMPILE)] = "Error when compiling BPF scriptlet",
1616 [ERRCODE_OFFSET(PROGCONF_TERM)] = "Invalid program config term in config string",
1617 [ERRCODE_OFFSET(PROLOGUE)] = "Failed to generate prologue",
1618 [ERRCODE_OFFSET(PROLOGUE2BIG)] = "Prologue too big for program",
1619 [ERRCODE_OFFSET(PROLOGUEOOB)] = "Offset out of bound for prologue",
1620 [ERRCODE_OFFSET(OBJCONF_OPT)] = "Invalid object config option",
1621 [ERRCODE_OFFSET(OBJCONF_CONF)] = "Config value not set (missing '=')",
1622 [ERRCODE_OFFSET(OBJCONF_MAP_OPT)] = "Invalid object map config option",
1623 [ERRCODE_OFFSET(OBJCONF_MAP_NOTEXIST)] = "Target map doesn't exist",
1624 [ERRCODE_OFFSET(OBJCONF_MAP_VALUE)] = "Incorrect value type for map",
1625 [ERRCODE_OFFSET(OBJCONF_MAP_TYPE)] = "Incorrect map type",
1626 [ERRCODE_OFFSET(OBJCONF_MAP_KEYSIZE)] = "Incorrect map key size",
1627 [ERRCODE_OFFSET(OBJCONF_MAP_VALUESIZE)] = "Incorrect map value size",
1628 [ERRCODE_OFFSET(OBJCONF_MAP_NOEVT)] = "Event not found for map setting",
1629 [ERRCODE_OFFSET(OBJCONF_MAP_MAPSIZE)] = "Invalid map size for event setting",
1630 [ERRCODE_OFFSET(OBJCONF_MAP_EVTDIM)] = "Event dimension too large",
1631 [ERRCODE_OFFSET(OBJCONF_MAP_EVTINH)] = "Doesn't support inherit event",
1632 [ERRCODE_OFFSET(OBJCONF_MAP_EVTTYPE)] = "Wrong event type for map",
1633 [ERRCODE_OFFSET(OBJCONF_MAP_IDX2BIG)] = "Index too large",
1634 };
1635
1636 static int
1637 bpf_loader_strerror(int err, char *buf, size_t size)
1638 {
1639 char sbuf[STRERR_BUFSIZE];
1640 const char *msg;
1641
1642 if (!buf || !size)
1643 return -1;
1644
1645 err = err > 0 ? err : -err;
1646
1647 if (err >= __LIBBPF_ERRNO__START)
1648 return libbpf_strerror(err, buf, size);
1649
1650 if (err >= __BPF_LOADER_ERRNO__START && err < __BPF_LOADER_ERRNO__END) {
1651 msg = bpf_loader_strerror_table[ERRNO_OFFSET(err)];
1652 snprintf(buf, size, "%s", msg);
1653 buf[size - 1] = '\0';
1654 return 0;
1655 }
1656
1657 if (err >= __BPF_LOADER_ERRNO__END)
1658 snprintf(buf, size, "Unknown bpf loader error %d", err);
1659 else
1660 snprintf(buf, size, "%s",
1661 str_error_r(err, sbuf, sizeof(sbuf)));
1662
1663 buf[size - 1] = '\0';
1664 return -1;
1665 }
1666
1667 #define bpf__strerror_head(err, buf, size) \
1668 char sbuf[STRERR_BUFSIZE], *emsg;\
1669 if (!size)\
1670 return 0;\
1671 if (err < 0)\
1672 err = -err;\
1673 bpf_loader_strerror(err, sbuf, sizeof(sbuf));\
1674 emsg = sbuf;\
1675 switch (err) {\
1676 default:\
1677 scnprintf(buf, size, "%s", emsg);\
1678 break;
1679
1680 #define bpf__strerror_entry(val, fmt...)\
1681 case val: {\
1682 scnprintf(buf, size, fmt);\
1683 break;\
1684 }
1685
1686 #define bpf__strerror_end(buf, size)\
1687 }\
1688 buf[size - 1] = '\0';
1689
1690 int bpf__strerror_prepare_load(const char *filename, bool source,
1691 int err, char *buf, size_t size)
1692 {
1693 size_t n;
1694 int ret;
1695
1696 n = snprintf(buf, size, "Failed to load %s%s: ",
1697 filename, source ? " from source" : "");
1698 if (n >= size) {
1699 buf[size - 1] = '\0';
1700 return 0;
1701 }
1702 buf += n;
1703 size -= n;
1704
1705 ret = bpf_loader_strerror(err, buf, size);
1706 buf[size - 1] = '\0';
1707 return ret;
1708 }
1709
1710 int bpf__strerror_probe(struct bpf_object *obj __maybe_unused,
1711 int err, char *buf, size_t size)
1712 {
1713 bpf__strerror_head(err, buf, size);
1714 case BPF_LOADER_ERRNO__PROGCONF_TERM: {
1715 scnprintf(buf, size, "%s (add -v to see detail)", emsg);
1716 break;
1717 }
1718 bpf__strerror_entry(EEXIST, "Probe point exist. Try 'perf probe -d \"*\"' and set 'force=yes'");
1719 bpf__strerror_entry(EACCES, "You need to be root");
1720 bpf__strerror_entry(EPERM, "You need to be root, and /proc/sys/kernel/kptr_restrict should be 0");
1721 bpf__strerror_entry(ENOENT, "You need to check probing points in BPF file");
1722 bpf__strerror_end(buf, size);
1723 return 0;
1724 }
1725
1726 int bpf__strerror_load(struct bpf_object *obj,
1727 int err, char *buf, size_t size)
1728 {
1729 bpf__strerror_head(err, buf, size);
1730 case LIBBPF_ERRNO__KVER: {
1731 unsigned int obj_kver = bpf_object__kversion(obj);
1732 unsigned int real_kver;
1733
1734 if (fetch_kernel_version(&real_kver, NULL, 0)) {
1735 scnprintf(buf, size, "Unable to fetch kernel version");
1736 break;
1737 }
1738
1739 if (obj_kver != real_kver) {
1740 scnprintf(buf, size,
1741 "'version' ("KVER_FMT") doesn't match running kernel ("KVER_FMT")",
1742 KVER_PARAM(obj_kver),
1743 KVER_PARAM(real_kver));
1744 break;
1745 }
1746
1747 scnprintf(buf, size, "Failed to load program for unknown reason");
1748 break;
1749 }
1750 bpf__strerror_end(buf, size);
1751 return 0;
1752 }
1753
1754 int bpf__strerror_config_obj(struct bpf_object *obj __maybe_unused,
1755 struct parse_events_term *term __maybe_unused,
1756 struct perf_evlist *evlist __maybe_unused,
1757 int *error_pos __maybe_unused, int err,
1758 char *buf, size_t size)
1759 {
1760 bpf__strerror_head(err, buf, size);
1761 bpf__strerror_entry(BPF_LOADER_ERRNO__OBJCONF_MAP_TYPE,
1762 "Can't use this config term with this map type");
1763 bpf__strerror_end(buf, size);
1764 return 0;
1765 }
1766
1767 int bpf__strerror_apply_obj_config(int err, char *buf, size_t size)
1768 {
1769 bpf__strerror_head(err, buf, size);
1770 bpf__strerror_entry(BPF_LOADER_ERRNO__OBJCONF_MAP_EVTDIM,
1771 "Cannot set event to BPF map in multi-thread tracing");
1772 bpf__strerror_entry(BPF_LOADER_ERRNO__OBJCONF_MAP_EVTINH,
1773 "%s (Hint: use -i to turn off inherit)", emsg);
1774 bpf__strerror_entry(BPF_LOADER_ERRNO__OBJCONF_MAP_EVTTYPE,
1775 "Can only put raw, hardware and BPF output event into a BPF map");
1776 bpf__strerror_end(buf, size);
1777 return 0;
1778 }
1779
1780 int bpf__strerror_setup_stdout(struct perf_evlist *evlist __maybe_unused,
1781 int err, char *buf, size_t size)
1782 {
1783 bpf__strerror_head(err, buf, size);
1784 bpf__strerror_end(buf, size);
1785 return 0;
1786 }