Linux Audio

Check our new training course

Loading...
Note: File does not exist in v3.1.
   1// SPDX-License-Identifier: (GPL-2.0-only OR BSD-2-Clause)
   2/* Copyright (C) 2017-2018 Netronome Systems, Inc. */
   3
   4#include <assert.h>
   5#include <errno.h>
   6#include <fcntl.h>
   7#include <linux/err.h>
   8#include <linux/kernel.h>
   9#include <net/if.h>
  10#include <stdbool.h>
  11#include <stdio.h>
  12#include <stdlib.h>
  13#include <string.h>
  14#include <unistd.h>
  15#include <sys/types.h>
  16#include <sys/stat.h>
  17
  18#include <bpf/bpf.h>
  19#include <bpf/btf.h>
  20
  21#include "json_writer.h"
  22#include "main.h"
  23
  24const char * const map_type_name[] = {
  25	[BPF_MAP_TYPE_UNSPEC]			= "unspec",
  26	[BPF_MAP_TYPE_HASH]			= "hash",
  27	[BPF_MAP_TYPE_ARRAY]			= "array",
  28	[BPF_MAP_TYPE_PROG_ARRAY]		= "prog_array",
  29	[BPF_MAP_TYPE_PERF_EVENT_ARRAY]		= "perf_event_array",
  30	[BPF_MAP_TYPE_PERCPU_HASH]		= "percpu_hash",
  31	[BPF_MAP_TYPE_PERCPU_ARRAY]		= "percpu_array",
  32	[BPF_MAP_TYPE_STACK_TRACE]		= "stack_trace",
  33	[BPF_MAP_TYPE_CGROUP_ARRAY]		= "cgroup_array",
  34	[BPF_MAP_TYPE_LRU_HASH]			= "lru_hash",
  35	[BPF_MAP_TYPE_LRU_PERCPU_HASH]		= "lru_percpu_hash",
  36	[BPF_MAP_TYPE_LPM_TRIE]			= "lpm_trie",
  37	[BPF_MAP_TYPE_ARRAY_OF_MAPS]		= "array_of_maps",
  38	[BPF_MAP_TYPE_HASH_OF_MAPS]		= "hash_of_maps",
  39	[BPF_MAP_TYPE_DEVMAP]			= "devmap",
  40	[BPF_MAP_TYPE_DEVMAP_HASH]		= "devmap_hash",
  41	[BPF_MAP_TYPE_SOCKMAP]			= "sockmap",
  42	[BPF_MAP_TYPE_CPUMAP]			= "cpumap",
  43	[BPF_MAP_TYPE_XSKMAP]			= "xskmap",
  44	[BPF_MAP_TYPE_SOCKHASH]			= "sockhash",
  45	[BPF_MAP_TYPE_CGROUP_STORAGE]		= "cgroup_storage",
  46	[BPF_MAP_TYPE_REUSEPORT_SOCKARRAY]	= "reuseport_sockarray",
  47	[BPF_MAP_TYPE_PERCPU_CGROUP_STORAGE]	= "percpu_cgroup_storage",
  48	[BPF_MAP_TYPE_QUEUE]			= "queue",
  49	[BPF_MAP_TYPE_STACK]			= "stack",
  50	[BPF_MAP_TYPE_SK_STORAGE]		= "sk_storage",
  51	[BPF_MAP_TYPE_STRUCT_OPS]		= "struct_ops",
  52	[BPF_MAP_TYPE_RINGBUF]			= "ringbuf",
  53	[BPF_MAP_TYPE_INODE_STORAGE]		= "inode_storage",
  54	[BPF_MAP_TYPE_TASK_STORAGE]		= "task_storage",
  55};
  56
  57const size_t map_type_name_size = ARRAY_SIZE(map_type_name);
  58
  59static bool map_is_per_cpu(__u32 type)
  60{
  61	return type == BPF_MAP_TYPE_PERCPU_HASH ||
  62	       type == BPF_MAP_TYPE_PERCPU_ARRAY ||
  63	       type == BPF_MAP_TYPE_LRU_PERCPU_HASH ||
  64	       type == BPF_MAP_TYPE_PERCPU_CGROUP_STORAGE;
  65}
  66
  67static bool map_is_map_of_maps(__u32 type)
  68{
  69	return type == BPF_MAP_TYPE_ARRAY_OF_MAPS ||
  70	       type == BPF_MAP_TYPE_HASH_OF_MAPS;
  71}
  72
  73static bool map_is_map_of_progs(__u32 type)
  74{
  75	return type == BPF_MAP_TYPE_PROG_ARRAY;
  76}
  77
  78static int map_type_from_str(const char *type)
  79{
  80	unsigned int i;
  81
  82	for (i = 0; i < ARRAY_SIZE(map_type_name); i++)
  83		/* Don't allow prefixing in case of possible future shadowing */
  84		if (map_type_name[i] && !strcmp(map_type_name[i], type))
  85			return i;
  86	return -1;
  87}
  88
  89static void *alloc_value(struct bpf_map_info *info)
  90{
  91	if (map_is_per_cpu(info->type))
  92		return malloc(round_up(info->value_size, 8) *
  93			      get_possible_cpus());
  94	else
  95		return malloc(info->value_size);
  96}
  97
  98static int do_dump_btf(const struct btf_dumper *d,
  99		       struct bpf_map_info *map_info, void *key,
 100		       void *value)
 101{
 102	__u32 value_id;
 103	int ret = 0;
 104
 105	/* start of key-value pair */
 106	jsonw_start_object(d->jw);
 107
 108	if (map_info->btf_key_type_id) {
 109		jsonw_name(d->jw, "key");
 110
 111		ret = btf_dumper_type(d, map_info->btf_key_type_id, key);
 112		if (ret)
 113			goto err_end_obj;
 114	}
 115
 116	value_id = map_info->btf_vmlinux_value_type_id ?
 117		: map_info->btf_value_type_id;
 118
 119	if (!map_is_per_cpu(map_info->type)) {
 120		jsonw_name(d->jw, "value");
 121		ret = btf_dumper_type(d, value_id, value);
 122	} else {
 123		unsigned int i, n, step;
 124
 125		jsonw_name(d->jw, "values");
 126		jsonw_start_array(d->jw);
 127		n = get_possible_cpus();
 128		step = round_up(map_info->value_size, 8);
 129		for (i = 0; i < n; i++) {
 130			jsonw_start_object(d->jw);
 131			jsonw_int_field(d->jw, "cpu", i);
 132			jsonw_name(d->jw, "value");
 133			ret = btf_dumper_type(d, value_id, value + i * step);
 134			jsonw_end_object(d->jw);
 135			if (ret)
 136				break;
 137		}
 138		jsonw_end_array(d->jw);
 139	}
 140
 141err_end_obj:
 142	/* end of key-value pair */
 143	jsonw_end_object(d->jw);
 144
 145	return ret;
 146}
 147
 148static json_writer_t *get_btf_writer(void)
 149{
 150	json_writer_t *jw = jsonw_new(stdout);
 151
 152	if (!jw)
 153		return NULL;
 154	jsonw_pretty(jw, true);
 155
 156	return jw;
 157}
 158
 159static void print_entry_json(struct bpf_map_info *info, unsigned char *key,
 160			     unsigned char *value, struct btf *btf)
 161{
 162	jsonw_start_object(json_wtr);
 163
 164	if (!map_is_per_cpu(info->type)) {
 165		jsonw_name(json_wtr, "key");
 166		print_hex_data_json(key, info->key_size);
 167		jsonw_name(json_wtr, "value");
 168		print_hex_data_json(value, info->value_size);
 169		if (btf) {
 170			struct btf_dumper d = {
 171				.btf = btf,
 172				.jw = json_wtr,
 173				.is_plain_text = false,
 174			};
 175
 176			jsonw_name(json_wtr, "formatted");
 177			do_dump_btf(&d, info, key, value);
 178		}
 179	} else {
 180		unsigned int i, n, step;
 181
 182		n = get_possible_cpus();
 183		step = round_up(info->value_size, 8);
 184
 185		jsonw_name(json_wtr, "key");
 186		print_hex_data_json(key, info->key_size);
 187
 188		jsonw_name(json_wtr, "values");
 189		jsonw_start_array(json_wtr);
 190		for (i = 0; i < n; i++) {
 191			jsonw_start_object(json_wtr);
 192
 193			jsonw_int_field(json_wtr, "cpu", i);
 194
 195			jsonw_name(json_wtr, "value");
 196			print_hex_data_json(value + i * step,
 197					    info->value_size);
 198
 199			jsonw_end_object(json_wtr);
 200		}
 201		jsonw_end_array(json_wtr);
 202		if (btf) {
 203			struct btf_dumper d = {
 204				.btf = btf,
 205				.jw = json_wtr,
 206				.is_plain_text = false,
 207			};
 208
 209			jsonw_name(json_wtr, "formatted");
 210			do_dump_btf(&d, info, key, value);
 211		}
 212	}
 213
 214	jsonw_end_object(json_wtr);
 215}
 216
 217static void
 218print_entry_error_msg(struct bpf_map_info *info, unsigned char *key,
 219		      const char *error_msg)
 220{
 221	int msg_size = strlen(error_msg);
 222	bool single_line, break_names;
 223
 224	break_names = info->key_size > 16 || msg_size > 16;
 225	single_line = info->key_size + msg_size <= 24 && !break_names;
 226
 227	printf("key:%c", break_names ? '\n' : ' ');
 228	fprint_hex(stdout, key, info->key_size, " ");
 229
 230	printf(single_line ? "  " : "\n");
 231
 232	printf("value:%c%s", break_names ? '\n' : ' ', error_msg);
 233
 234	printf("\n");
 235}
 236
 237static void
 238print_entry_error(struct bpf_map_info *map_info, void *key, int lookup_errno)
 239{
 240	/* For prog_array maps or arrays of maps, failure to lookup the value
 241	 * means there is no entry for that key. Do not print an error message
 242	 * in that case.
 243	 */
 244	if ((map_is_map_of_maps(map_info->type) ||
 245	     map_is_map_of_progs(map_info->type)) && lookup_errno == ENOENT)
 246		return;
 247
 248	if (json_output) {
 249		jsonw_start_object(json_wtr);	/* entry */
 250		jsonw_name(json_wtr, "key");
 251		print_hex_data_json(key, map_info->key_size);
 252		jsonw_name(json_wtr, "value");
 253		jsonw_start_object(json_wtr);	/* error */
 254		jsonw_string_field(json_wtr, "error", strerror(lookup_errno));
 255		jsonw_end_object(json_wtr);	/* error */
 256		jsonw_end_object(json_wtr);	/* entry */
 257	} else {
 258		const char *msg = NULL;
 259
 260		if (lookup_errno == ENOENT)
 261			msg = "<no entry>";
 262		else if (lookup_errno == ENOSPC &&
 263			 map_info->type == BPF_MAP_TYPE_REUSEPORT_SOCKARRAY)
 264			msg = "<cannot read>";
 265
 266		print_entry_error_msg(map_info, key,
 267				      msg ? : strerror(lookup_errno));
 268	}
 269}
 270
 271static void print_entry_plain(struct bpf_map_info *info, unsigned char *key,
 272			      unsigned char *value)
 273{
 274	if (!map_is_per_cpu(info->type)) {
 275		bool single_line, break_names;
 276
 277		break_names = info->key_size > 16 || info->value_size > 16;
 278		single_line = info->key_size + info->value_size <= 24 &&
 279			!break_names;
 280
 281		if (info->key_size) {
 282			printf("key:%c", break_names ? '\n' : ' ');
 283			fprint_hex(stdout, key, info->key_size, " ");
 284
 285			printf(single_line ? "  " : "\n");
 286		}
 287
 288		if (info->value_size) {
 289			printf("value:%c", break_names ? '\n' : ' ');
 290			fprint_hex(stdout, value, info->value_size, " ");
 291		}
 292
 293		printf("\n");
 294	} else {
 295		unsigned int i, n, step;
 296
 297		n = get_possible_cpus();
 298		step = round_up(info->value_size, 8);
 299
 300		if (info->key_size) {
 301			printf("key:\n");
 302			fprint_hex(stdout, key, info->key_size, " ");
 303			printf("\n");
 304		}
 305		if (info->value_size) {
 306			for (i = 0; i < n; i++) {
 307				printf("value (CPU %02d):%c",
 308				       i, info->value_size > 16 ? '\n' : ' ');
 309				fprint_hex(stdout, value + i * step,
 310					   info->value_size, " ");
 311				printf("\n");
 312			}
 313		}
 314	}
 315}
 316
 317static char **parse_bytes(char **argv, const char *name, unsigned char *val,
 318			  unsigned int n)
 319{
 320	unsigned int i = 0, base = 0;
 321	char *endptr;
 322
 323	if (is_prefix(*argv, "hex")) {
 324		base = 16;
 325		argv++;
 326	}
 327
 328	while (i < n && argv[i]) {
 329		val[i] = strtoul(argv[i], &endptr, base);
 330		if (*endptr) {
 331			p_err("error parsing byte: %s", argv[i]);
 332			return NULL;
 333		}
 334		i++;
 335	}
 336
 337	if (i != n) {
 338		p_err("%s expected %d bytes got %d", name, n, i);
 339		return NULL;
 340	}
 341
 342	return argv + i;
 343}
 344
 345/* on per cpu maps we must copy the provided value on all value instances */
 346static void fill_per_cpu_value(struct bpf_map_info *info, void *value)
 347{
 348	unsigned int i, n, step;
 349
 350	if (!map_is_per_cpu(info->type))
 351		return;
 352
 353	n = get_possible_cpus();
 354	step = round_up(info->value_size, 8);
 355	for (i = 1; i < n; i++)
 356		memcpy(value + i * step, value, info->value_size);
 357}
 358
 359static int parse_elem(char **argv, struct bpf_map_info *info,
 360		      void *key, void *value, __u32 key_size, __u32 value_size,
 361		      __u32 *flags, __u32 **value_fd)
 362{
 363	if (!*argv) {
 364		if (!key && !value)
 365			return 0;
 366		p_err("did not find %s", key ? "key" : "value");
 367		return -1;
 368	}
 369
 370	if (is_prefix(*argv, "key")) {
 371		if (!key) {
 372			if (key_size)
 373				p_err("duplicate key");
 374			else
 375				p_err("unnecessary key");
 376			return -1;
 377		}
 378
 379		argv = parse_bytes(argv + 1, "key", key, key_size);
 380		if (!argv)
 381			return -1;
 382
 383		return parse_elem(argv, info, NULL, value, key_size, value_size,
 384				  flags, value_fd);
 385	} else if (is_prefix(*argv, "value")) {
 386		int fd;
 387
 388		if (!value) {
 389			if (value_size)
 390				p_err("duplicate value");
 391			else
 392				p_err("unnecessary value");
 393			return -1;
 394		}
 395
 396		argv++;
 397
 398		if (map_is_map_of_maps(info->type)) {
 399			int argc = 2;
 400
 401			if (value_size != 4) {
 402				p_err("value smaller than 4B for map in map?");
 403				return -1;
 404			}
 405			if (!argv[0] || !argv[1]) {
 406				p_err("not enough value arguments for map in map");
 407				return -1;
 408			}
 409
 410			fd = map_parse_fd(&argc, &argv);
 411			if (fd < 0)
 412				return -1;
 413
 414			*value_fd = value;
 415			**value_fd = fd;
 416		} else if (map_is_map_of_progs(info->type)) {
 417			int argc = 2;
 418
 419			if (value_size != 4) {
 420				p_err("value smaller than 4B for map of progs?");
 421				return -1;
 422			}
 423			if (!argv[0] || !argv[1]) {
 424				p_err("not enough value arguments for map of progs");
 425				return -1;
 426			}
 427			if (is_prefix(*argv, "id"))
 428				p_info("Warning: updating program array via MAP_ID, make sure this map is kept open\n"
 429				       "         by some process or pinned otherwise update will be lost");
 430
 431			fd = prog_parse_fd(&argc, &argv);
 432			if (fd < 0)
 433				return -1;
 434
 435			*value_fd = value;
 436			**value_fd = fd;
 437		} else {
 438			argv = parse_bytes(argv, "value", value, value_size);
 439			if (!argv)
 440				return -1;
 441
 442			fill_per_cpu_value(info, value);
 443		}
 444
 445		return parse_elem(argv, info, key, NULL, key_size, value_size,
 446				  flags, NULL);
 447	} else if (is_prefix(*argv, "any") || is_prefix(*argv, "noexist") ||
 448		   is_prefix(*argv, "exist")) {
 449		if (!flags) {
 450			p_err("flags specified multiple times: %s", *argv);
 451			return -1;
 452		}
 453
 454		if (is_prefix(*argv, "any"))
 455			*flags = BPF_ANY;
 456		else if (is_prefix(*argv, "noexist"))
 457			*flags = BPF_NOEXIST;
 458		else if (is_prefix(*argv, "exist"))
 459			*flags = BPF_EXIST;
 460
 461		return parse_elem(argv + 1, info, key, value, key_size,
 462				  value_size, NULL, value_fd);
 463	}
 464
 465	p_err("expected key or value, got: %s", *argv);
 466	return -1;
 467}
 468
 469static void show_map_header_json(struct bpf_map_info *info, json_writer_t *wtr)
 470{
 471	jsonw_uint_field(wtr, "id", info->id);
 472	if (info->type < ARRAY_SIZE(map_type_name))
 473		jsonw_string_field(wtr, "type", map_type_name[info->type]);
 474	else
 475		jsonw_uint_field(wtr, "type", info->type);
 476
 477	if (*info->name)
 478		jsonw_string_field(wtr, "name", info->name);
 479
 480	jsonw_name(wtr, "flags");
 481	jsonw_printf(wtr, "%d", info->map_flags);
 482}
 483
 484static int show_map_close_json(int fd, struct bpf_map_info *info)
 485{
 486	char *memlock, *frozen_str;
 487	int frozen = 0;
 488
 489	memlock = get_fdinfo(fd, "memlock");
 490	frozen_str = get_fdinfo(fd, "frozen");
 491
 492	jsonw_start_object(json_wtr);
 493
 494	show_map_header_json(info, json_wtr);
 495
 496	print_dev_json(info->ifindex, info->netns_dev, info->netns_ino);
 497
 498	jsonw_uint_field(json_wtr, "bytes_key", info->key_size);
 499	jsonw_uint_field(json_wtr, "bytes_value", info->value_size);
 500	jsonw_uint_field(json_wtr, "max_entries", info->max_entries);
 501
 502	if (memlock)
 503		jsonw_int_field(json_wtr, "bytes_memlock", atoi(memlock));
 504	free(memlock);
 505
 506	if (info->type == BPF_MAP_TYPE_PROG_ARRAY) {
 507		char *owner_prog_type = get_fdinfo(fd, "owner_prog_type");
 508		char *owner_jited = get_fdinfo(fd, "owner_jited");
 509
 510		if (owner_prog_type) {
 511			unsigned int prog_type = atoi(owner_prog_type);
 512
 513			if (prog_type < prog_type_name_size)
 514				jsonw_string_field(json_wtr, "owner_prog_type",
 515						   prog_type_name[prog_type]);
 516			else
 517				jsonw_uint_field(json_wtr, "owner_prog_type",
 518						 prog_type);
 519		}
 520		if (owner_jited)
 521			jsonw_bool_field(json_wtr, "owner_jited",
 522					 !!atoi(owner_jited));
 523
 524		free(owner_prog_type);
 525		free(owner_jited);
 526	}
 527	close(fd);
 528
 529	if (frozen_str) {
 530		frozen = atoi(frozen_str);
 531		free(frozen_str);
 532	}
 533	jsonw_int_field(json_wtr, "frozen", frozen);
 534
 535	if (info->btf_id)
 536		jsonw_int_field(json_wtr, "btf_id", info->btf_id);
 537
 538	if (!hash_empty(map_table.table)) {
 539		struct pinned_obj *obj;
 540
 541		jsonw_name(json_wtr, "pinned");
 542		jsonw_start_array(json_wtr);
 543		hash_for_each_possible(map_table.table, obj, hash, info->id) {
 544			if (obj->id == info->id)
 545				jsonw_string(json_wtr, obj->path);
 546		}
 547		jsonw_end_array(json_wtr);
 548	}
 549
 550	emit_obj_refs_json(&refs_table, info->id, json_wtr);
 551
 552	jsonw_end_object(json_wtr);
 553
 554	return 0;
 555}
 556
 557static void show_map_header_plain(struct bpf_map_info *info)
 558{
 559	printf("%u: ", info->id);
 560	if (info->type < ARRAY_SIZE(map_type_name))
 561		printf("%s  ", map_type_name[info->type]);
 562	else
 563		printf("type %u  ", info->type);
 564
 565	if (*info->name)
 566		printf("name %s  ", info->name);
 567
 568	printf("flags 0x%x", info->map_flags);
 569	print_dev_plain(info->ifindex, info->netns_dev, info->netns_ino);
 570	printf("\n");
 571}
 572
 573static int show_map_close_plain(int fd, struct bpf_map_info *info)
 574{
 575	char *memlock, *frozen_str;
 576	int frozen = 0;
 577
 578	memlock = get_fdinfo(fd, "memlock");
 579	frozen_str = get_fdinfo(fd, "frozen");
 580
 581	show_map_header_plain(info);
 582	printf("\tkey %uB  value %uB  max_entries %u",
 583	       info->key_size, info->value_size, info->max_entries);
 584
 585	if (memlock)
 586		printf("  memlock %sB", memlock);
 587	free(memlock);
 588
 589	if (info->type == BPF_MAP_TYPE_PROG_ARRAY) {
 590		char *owner_prog_type = get_fdinfo(fd, "owner_prog_type");
 591		char *owner_jited = get_fdinfo(fd, "owner_jited");
 592
 593		if (owner_prog_type || owner_jited)
 594			printf("\n\t");
 595		if (owner_prog_type) {
 596			unsigned int prog_type = atoi(owner_prog_type);
 597
 598			if (prog_type < prog_type_name_size)
 599				printf("owner_prog_type %s  ",
 600				       prog_type_name[prog_type]);
 601			else
 602				printf("owner_prog_type %d  ", prog_type);
 603		}
 604		if (owner_jited)
 605			printf("owner%s jited",
 606			       atoi(owner_jited) ? "" : " not");
 607
 608		free(owner_prog_type);
 609		free(owner_jited);
 610	}
 611	close(fd);
 612
 613	if (!hash_empty(map_table.table)) {
 614		struct pinned_obj *obj;
 615
 616		hash_for_each_possible(map_table.table, obj, hash, info->id) {
 617			if (obj->id == info->id)
 618				printf("\n\tpinned %s", obj->path);
 619		}
 620	}
 621	printf("\n");
 622
 623	if (frozen_str) {
 624		frozen = atoi(frozen_str);
 625		free(frozen_str);
 626	}
 627
 628	if (!info->btf_id && !frozen)
 629		return 0;
 630
 631	printf("\t");
 632
 633	if (info->btf_id)
 634		printf("btf_id %d", info->btf_id);
 635
 636	if (frozen)
 637		printf("%sfrozen", info->btf_id ? "  " : "");
 638
 639	emit_obj_refs_plain(&refs_table, info->id, "\n\tpids ");
 640
 641	printf("\n");
 642	return 0;
 643}
 644
 645static int do_show_subset(int argc, char **argv)
 646{
 647	struct bpf_map_info info = {};
 648	__u32 len = sizeof(info);
 649	int *fds = NULL;
 650	int nb_fds, i;
 651	int err = -1;
 652
 653	fds = malloc(sizeof(int));
 654	if (!fds) {
 655		p_err("mem alloc failed");
 656		return -1;
 657	}
 658	nb_fds = map_parse_fds(&argc, &argv, &fds);
 659	if (nb_fds < 1)
 660		goto exit_free;
 661
 662	if (json_output && nb_fds > 1)
 663		jsonw_start_array(json_wtr);	/* root array */
 664	for (i = 0; i < nb_fds; i++) {
 665		err = bpf_obj_get_info_by_fd(fds[i], &info, &len);
 666		if (err) {
 667			p_err("can't get map info: %s",
 668			      strerror(errno));
 669			for (; i < nb_fds; i++)
 670				close(fds[i]);
 671			break;
 672		}
 673
 674		if (json_output)
 675			show_map_close_json(fds[i], &info);
 676		else
 677			show_map_close_plain(fds[i], &info);
 678
 679		close(fds[i]);
 680	}
 681	if (json_output && nb_fds > 1)
 682		jsonw_end_array(json_wtr);	/* root array */
 683
 684exit_free:
 685	free(fds);
 686	return err;
 687}
 688
 689static int do_show(int argc, char **argv)
 690{
 691	struct bpf_map_info info = {};
 692	__u32 len = sizeof(info);
 693	__u32 id = 0;
 694	int err;
 695	int fd;
 696
 697	if (show_pinned)
 698		build_pinned_obj_table(&map_table, BPF_OBJ_MAP);
 699	build_obj_refs_table(&refs_table, BPF_OBJ_MAP);
 700
 701	if (argc == 2)
 702		return do_show_subset(argc, argv);
 703
 704	if (argc)
 705		return BAD_ARG();
 706
 707	if (json_output)
 708		jsonw_start_array(json_wtr);
 709	while (true) {
 710		err = bpf_map_get_next_id(id, &id);
 711		if (err) {
 712			if (errno == ENOENT)
 713				break;
 714			p_err("can't get next map: %s%s", strerror(errno),
 715			      errno == EINVAL ? " -- kernel too old?" : "");
 716			break;
 717		}
 718
 719		fd = bpf_map_get_fd_by_id(id);
 720		if (fd < 0) {
 721			if (errno == ENOENT)
 722				continue;
 723			p_err("can't get map by id (%u): %s",
 724			      id, strerror(errno));
 725			break;
 726		}
 727
 728		err = bpf_obj_get_info_by_fd(fd, &info, &len);
 729		if (err) {
 730			p_err("can't get map info: %s", strerror(errno));
 731			close(fd);
 732			break;
 733		}
 734
 735		if (json_output)
 736			show_map_close_json(fd, &info);
 737		else
 738			show_map_close_plain(fd, &info);
 739	}
 740	if (json_output)
 741		jsonw_end_array(json_wtr);
 742
 743	delete_obj_refs_table(&refs_table);
 744
 745	return errno == ENOENT ? 0 : -1;
 746}
 747
 748static int dump_map_elem(int fd, void *key, void *value,
 749			 struct bpf_map_info *map_info, struct btf *btf,
 750			 json_writer_t *btf_wtr)
 751{
 752	if (bpf_map_lookup_elem(fd, key, value)) {
 753		print_entry_error(map_info, key, errno);
 754		return -1;
 755	}
 756
 757	if (json_output) {
 758		print_entry_json(map_info, key, value, btf);
 759	} else if (btf) {
 760		struct btf_dumper d = {
 761			.btf = btf,
 762			.jw = btf_wtr,
 763			.is_plain_text = true,
 764		};
 765
 766		do_dump_btf(&d, map_info, key, value);
 767	} else {
 768		print_entry_plain(map_info, key, value);
 769	}
 770
 771	return 0;
 772}
 773
 774static int maps_have_btf(int *fds, int nb_fds)
 775{
 776	struct bpf_map_info info = {};
 777	__u32 len = sizeof(info);
 778	int err, i;
 779
 780	for (i = 0; i < nb_fds; i++) {
 781		err = bpf_obj_get_info_by_fd(fds[i], &info, &len);
 782		if (err) {
 783			p_err("can't get map info: %s", strerror(errno));
 784			return -1;
 785		}
 786
 787		if (!info.btf_id)
 788			return 0;
 789	}
 790
 791	return 1;
 792}
 793
 794static struct btf *btf_vmlinux;
 795
 796static struct btf *get_map_kv_btf(const struct bpf_map_info *info)
 797{
 798	struct btf *btf = NULL;
 799
 800	if (info->btf_vmlinux_value_type_id) {
 801		if (!btf_vmlinux) {
 802			btf_vmlinux = libbpf_find_kernel_btf();
 803			if (IS_ERR(btf_vmlinux))
 804				p_err("failed to get kernel btf");
 805		}
 806		return btf_vmlinux;
 807	} else if (info->btf_value_type_id) {
 808		int err;
 809
 810		err = btf__get_from_id(info->btf_id, &btf);
 811		if (err || !btf) {
 812			p_err("failed to get btf");
 813			btf = err ? ERR_PTR(err) : ERR_PTR(-ESRCH);
 814		}
 815	}
 816
 817	return btf;
 818}
 819
 820static void free_map_kv_btf(struct btf *btf)
 821{
 822	if (!IS_ERR(btf) && btf != btf_vmlinux)
 823		btf__free(btf);
 824}
 825
 826static void free_btf_vmlinux(void)
 827{
 828	if (!IS_ERR(btf_vmlinux))
 829		btf__free(btf_vmlinux);
 830}
 831
 832static int
 833map_dump(int fd, struct bpf_map_info *info, json_writer_t *wtr,
 834	 bool show_header)
 835{
 836	void *key, *value, *prev_key;
 837	unsigned int num_elems = 0;
 838	struct btf *btf = NULL;
 839	int err;
 840
 841	key = malloc(info->key_size);
 842	value = alloc_value(info);
 843	if (!key || !value) {
 844		p_err("mem alloc failed");
 845		err = -1;
 846		goto exit_free;
 847	}
 848
 849	prev_key = NULL;
 850
 851	if (wtr) {
 852		btf = get_map_kv_btf(info);
 853		if (IS_ERR(btf)) {
 854			err = PTR_ERR(btf);
 855			goto exit_free;
 856		}
 857
 858		if (show_header) {
 859			jsonw_start_object(wtr);	/* map object */
 860			show_map_header_json(info, wtr);
 861			jsonw_name(wtr, "elements");
 862		}
 863		jsonw_start_array(wtr);		/* elements */
 864	} else if (show_header) {
 865		show_map_header_plain(info);
 866	}
 867
 868	if (info->type == BPF_MAP_TYPE_REUSEPORT_SOCKARRAY &&
 869	    info->value_size != 8)
 870		p_info("Warning: cannot read values from %s map with value_size != 8",
 871		       map_type_name[info->type]);
 872	while (true) {
 873		err = bpf_map_get_next_key(fd, prev_key, key);
 874		if (err) {
 875			if (errno == ENOENT)
 876				err = 0;
 877			break;
 878		}
 879		if (!dump_map_elem(fd, key, value, info, btf, wtr))
 880			num_elems++;
 881		prev_key = key;
 882	}
 883
 884	if (wtr) {
 885		jsonw_end_array(wtr);	/* elements */
 886		if (show_header)
 887			jsonw_end_object(wtr);	/* map object */
 888	} else {
 889		printf("Found %u element%s\n", num_elems,
 890		       num_elems != 1 ? "s" : "");
 891	}
 892
 893exit_free:
 894	free(key);
 895	free(value);
 896	close(fd);
 897	free_map_kv_btf(btf);
 898
 899	return err;
 900}
 901
 902static int do_dump(int argc, char **argv)
 903{
 904	json_writer_t *wtr = NULL, *btf_wtr = NULL;
 905	struct bpf_map_info info = {};
 906	int nb_fds, i = 0;
 907	__u32 len = sizeof(info);
 908	int *fds = NULL;
 909	int err = -1;
 910
 911	if (argc != 2)
 912		usage();
 913
 914	fds = malloc(sizeof(int));
 915	if (!fds) {
 916		p_err("mem alloc failed");
 917		return -1;
 918	}
 919	nb_fds = map_parse_fds(&argc, &argv, &fds);
 920	if (nb_fds < 1)
 921		goto exit_free;
 922
 923	if (json_output) {
 924		wtr = json_wtr;
 925	} else {
 926		int do_plain_btf;
 927
 928		do_plain_btf = maps_have_btf(fds, nb_fds);
 929		if (do_plain_btf < 0)
 930			goto exit_close;
 931
 932		if (do_plain_btf) {
 933			btf_wtr = get_btf_writer();
 934			wtr = btf_wtr;
 935			if (!btf_wtr)
 936				p_info("failed to create json writer for btf. falling back to plain output");
 937		}
 938	}
 939
 940	if (wtr && nb_fds > 1)
 941		jsonw_start_array(wtr);	/* root array */
 942	for (i = 0; i < nb_fds; i++) {
 943		if (bpf_obj_get_info_by_fd(fds[i], &info, &len)) {
 944			p_err("can't get map info: %s", strerror(errno));
 945			break;
 946		}
 947		err = map_dump(fds[i], &info, wtr, nb_fds > 1);
 948		if (!wtr && i != nb_fds - 1)
 949			printf("\n");
 950
 951		if (err)
 952			break;
 953		close(fds[i]);
 954	}
 955	if (wtr && nb_fds > 1)
 956		jsonw_end_array(wtr);	/* root array */
 957
 958	if (btf_wtr)
 959		jsonw_destroy(&btf_wtr);
 960exit_close:
 961	for (; i < nb_fds; i++)
 962		close(fds[i]);
 963exit_free:
 964	free(fds);
 965	free_btf_vmlinux();
 966	return err;
 967}
 968
 969static int alloc_key_value(struct bpf_map_info *info, void **key, void **value)
 970{
 971	*key = NULL;
 972	*value = NULL;
 973
 974	if (info->key_size) {
 975		*key = malloc(info->key_size);
 976		if (!*key) {
 977			p_err("key mem alloc failed");
 978			return -1;
 979		}
 980	}
 981
 982	if (info->value_size) {
 983		*value = alloc_value(info);
 984		if (!*value) {
 985			p_err("value mem alloc failed");
 986			free(*key);
 987			*key = NULL;
 988			return -1;
 989		}
 990	}
 991
 992	return 0;
 993}
 994
 995static int do_update(int argc, char **argv)
 996{
 997	struct bpf_map_info info = {};
 998	__u32 len = sizeof(info);
 999	__u32 *value_fd = NULL;
1000	__u32 flags = BPF_ANY;
1001	void *key, *value;
1002	int fd, err;
1003
1004	if (argc < 2)
1005		usage();
1006
1007	fd = map_parse_fd_and_info(&argc, &argv, &info, &len);
1008	if (fd < 0)
1009		return -1;
1010
1011	err = alloc_key_value(&info, &key, &value);
1012	if (err)
1013		goto exit_free;
1014
1015	err = parse_elem(argv, &info, key, value, info.key_size,
1016			 info.value_size, &flags, &value_fd);
1017	if (err)
1018		goto exit_free;
1019
1020	err = bpf_map_update_elem(fd, key, value, flags);
1021	if (err) {
1022		p_err("update failed: %s", strerror(errno));
1023		goto exit_free;
1024	}
1025
1026exit_free:
1027	if (value_fd)
1028		close(*value_fd);
1029	free(key);
1030	free(value);
1031	close(fd);
1032
1033	if (!err && json_output)
1034		jsonw_null(json_wtr);
1035	return err;
1036}
1037
1038static void print_key_value(struct bpf_map_info *info, void *key,
1039			    void *value)
1040{
1041	json_writer_t *btf_wtr;
1042	struct btf *btf = NULL;
1043	int err;
1044
1045	err = btf__get_from_id(info->btf_id, &btf);
1046	if (err) {
1047		p_err("failed to get btf");
1048		return;
1049	}
1050
1051	if (json_output) {
1052		print_entry_json(info, key, value, btf);
1053	} else if (btf) {
1054		/* if here json_wtr wouldn't have been initialised,
1055		 * so let's create separate writer for btf
1056		 */
1057		btf_wtr = get_btf_writer();
1058		if (!btf_wtr) {
1059			p_info("failed to create json writer for btf. falling back to plain output");
1060			btf__free(btf);
1061			btf = NULL;
1062			print_entry_plain(info, key, value);
1063		} else {
1064			struct btf_dumper d = {
1065				.btf = btf,
1066				.jw = btf_wtr,
1067				.is_plain_text = true,
1068			};
1069
1070			do_dump_btf(&d, info, key, value);
1071			jsonw_destroy(&btf_wtr);
1072		}
1073	} else {
1074		print_entry_plain(info, key, value);
1075	}
1076	btf__free(btf);
1077}
1078
1079static int do_lookup(int argc, char **argv)
1080{
1081	struct bpf_map_info info = {};
1082	__u32 len = sizeof(info);
1083	void *key, *value;
1084	int err;
1085	int fd;
1086
1087	if (argc < 2)
1088		usage();
1089
1090	fd = map_parse_fd_and_info(&argc, &argv, &info, &len);
1091	if (fd < 0)
1092		return -1;
1093
1094	err = alloc_key_value(&info, &key, &value);
1095	if (err)
1096		goto exit_free;
1097
1098	err = parse_elem(argv, &info, key, NULL, info.key_size, 0, NULL, NULL);
1099	if (err)
1100		goto exit_free;
1101
1102	err = bpf_map_lookup_elem(fd, key, value);
1103	if (err) {
1104		if (errno == ENOENT) {
1105			if (json_output) {
1106				jsonw_null(json_wtr);
1107			} else {
1108				printf("key:\n");
1109				fprint_hex(stdout, key, info.key_size, " ");
1110				printf("\n\nNot found\n");
1111			}
1112		} else {
1113			p_err("lookup failed: %s", strerror(errno));
1114		}
1115
1116		goto exit_free;
1117	}
1118
1119	/* here means bpf_map_lookup_elem() succeeded */
1120	print_key_value(&info, key, value);
1121
1122exit_free:
1123	free(key);
1124	free(value);
1125	close(fd);
1126
1127	return err;
1128}
1129
1130static int do_getnext(int argc, char **argv)
1131{
1132	struct bpf_map_info info = {};
1133	__u32 len = sizeof(info);
1134	void *key, *nextkey;
1135	int err;
1136	int fd;
1137
1138	if (argc < 2)
1139		usage();
1140
1141	fd = map_parse_fd_and_info(&argc, &argv, &info, &len);
1142	if (fd < 0)
1143		return -1;
1144
1145	key = malloc(info.key_size);
1146	nextkey = malloc(info.key_size);
1147	if (!key || !nextkey) {
1148		p_err("mem alloc failed");
1149		err = -1;
1150		goto exit_free;
1151	}
1152
1153	if (argc) {
1154		err = parse_elem(argv, &info, key, NULL, info.key_size, 0,
1155				 NULL, NULL);
1156		if (err)
1157			goto exit_free;
1158	} else {
1159		free(key);
1160		key = NULL;
1161	}
1162
1163	err = bpf_map_get_next_key(fd, key, nextkey);
1164	if (err) {
1165		p_err("can't get next key: %s", strerror(errno));
1166		goto exit_free;
1167	}
1168
1169	if (json_output) {
1170		jsonw_start_object(json_wtr);
1171		if (key) {
1172			jsonw_name(json_wtr, "key");
1173			print_hex_data_json(key, info.key_size);
1174		} else {
1175			jsonw_null_field(json_wtr, "key");
1176		}
1177		jsonw_name(json_wtr, "next_key");
1178		print_hex_data_json(nextkey, info.key_size);
1179		jsonw_end_object(json_wtr);
1180	} else {
1181		if (key) {
1182			printf("key:\n");
1183			fprint_hex(stdout, key, info.key_size, " ");
1184			printf("\n");
1185		} else {
1186			printf("key: None\n");
1187		}
1188		printf("next key:\n");
1189		fprint_hex(stdout, nextkey, info.key_size, " ");
1190		printf("\n");
1191	}
1192
1193exit_free:
1194	free(nextkey);
1195	free(key);
1196	close(fd);
1197
1198	return err;
1199}
1200
1201static int do_delete(int argc, char **argv)
1202{
1203	struct bpf_map_info info = {};
1204	__u32 len = sizeof(info);
1205	void *key;
1206	int err;
1207	int fd;
1208
1209	if (argc < 2)
1210		usage();
1211
1212	fd = map_parse_fd_and_info(&argc, &argv, &info, &len);
1213	if (fd < 0)
1214		return -1;
1215
1216	key = malloc(info.key_size);
1217	if (!key) {
1218		p_err("mem alloc failed");
1219		err = -1;
1220		goto exit_free;
1221	}
1222
1223	err = parse_elem(argv, &info, key, NULL, info.key_size, 0, NULL, NULL);
1224	if (err)
1225		goto exit_free;
1226
1227	err = bpf_map_delete_elem(fd, key);
1228	if (err)
1229		p_err("delete failed: %s", strerror(errno));
1230
1231exit_free:
1232	free(key);
1233	close(fd);
1234
1235	if (!err && json_output)
1236		jsonw_null(json_wtr);
1237	return err;
1238}
1239
1240static int do_pin(int argc, char **argv)
1241{
1242	int err;
1243
1244	err = do_pin_any(argc, argv, map_parse_fd);
1245	if (!err && json_output)
1246		jsonw_null(json_wtr);
1247	return err;
1248}
1249
1250static int do_create(int argc, char **argv)
1251{
1252	struct bpf_create_map_attr attr = { NULL, };
1253	const char *pinfile;
1254	int err = -1, fd;
1255
1256	if (!REQ_ARGS(7))
1257		return -1;
1258	pinfile = GET_ARG();
1259
1260	while (argc) {
1261		if (!REQ_ARGS(2))
1262			return -1;
1263
1264		if (is_prefix(*argv, "type")) {
1265			NEXT_ARG();
1266
1267			if (attr.map_type) {
1268				p_err("map type already specified");
1269				goto exit;
1270			}
1271
1272			attr.map_type = map_type_from_str(*argv);
1273			if ((int)attr.map_type < 0) {
1274				p_err("unrecognized map type: %s", *argv);
1275				goto exit;
1276			}
1277			NEXT_ARG();
1278		} else if (is_prefix(*argv, "name")) {
1279			NEXT_ARG();
1280			attr.name = GET_ARG();
1281		} else if (is_prefix(*argv, "key")) {
1282			if (parse_u32_arg(&argc, &argv, &attr.key_size,
1283					  "key size"))
1284				goto exit;
1285		} else if (is_prefix(*argv, "value")) {
1286			if (parse_u32_arg(&argc, &argv, &attr.value_size,
1287					  "value size"))
1288				goto exit;
1289		} else if (is_prefix(*argv, "entries")) {
1290			if (parse_u32_arg(&argc, &argv, &attr.max_entries,
1291					  "max entries"))
1292				goto exit;
1293		} else if (is_prefix(*argv, "flags")) {
1294			if (parse_u32_arg(&argc, &argv, &attr.map_flags,
1295					  "flags"))
1296				goto exit;
1297		} else if (is_prefix(*argv, "dev")) {
1298			NEXT_ARG();
1299
1300			if (attr.map_ifindex) {
1301				p_err("offload device already specified");
1302				goto exit;
1303			}
1304
1305			attr.map_ifindex = if_nametoindex(*argv);
1306			if (!attr.map_ifindex) {
1307				p_err("unrecognized netdevice '%s': %s",
1308				      *argv, strerror(errno));
1309				goto exit;
1310			}
1311			NEXT_ARG();
1312		} else if (is_prefix(*argv, "inner_map")) {
1313			struct bpf_map_info info = {};
1314			__u32 len = sizeof(info);
1315			int inner_map_fd;
1316
1317			NEXT_ARG();
1318			if (!REQ_ARGS(2))
1319				usage();
1320			inner_map_fd = map_parse_fd_and_info(&argc, &argv,
1321							     &info, &len);
1322			if (inner_map_fd < 0)
1323				return -1;
1324			attr.inner_map_fd = inner_map_fd;
1325		} else {
1326			p_err("unknown arg %s", *argv);
1327			goto exit;
1328		}
1329	}
1330
1331	if (!attr.name) {
1332		p_err("map name not specified");
1333		goto exit;
1334	}
1335
1336	set_max_rlimit();
1337
1338	fd = bpf_create_map_xattr(&attr);
1339	if (fd < 0) {
1340		p_err("map create failed: %s", strerror(errno));
1341		goto exit;
1342	}
1343
1344	err = do_pin_fd(fd, pinfile);
1345	close(fd);
1346	if (err)
1347		goto exit;
1348
1349	if (json_output)
1350		jsonw_null(json_wtr);
1351
1352exit:
1353	if (attr.inner_map_fd > 0)
1354		close(attr.inner_map_fd);
1355
1356	return err;
1357}
1358
1359static int do_pop_dequeue(int argc, char **argv)
1360{
1361	struct bpf_map_info info = {};
1362	__u32 len = sizeof(info);
1363	void *key, *value;
1364	int err;
1365	int fd;
1366
1367	if (argc < 2)
1368		usage();
1369
1370	fd = map_parse_fd_and_info(&argc, &argv, &info, &len);
1371	if (fd < 0)
1372		return -1;
1373
1374	err = alloc_key_value(&info, &key, &value);
1375	if (err)
1376		goto exit_free;
1377
1378	err = bpf_map_lookup_and_delete_elem(fd, key, value);
1379	if (err) {
1380		if (errno == ENOENT) {
1381			if (json_output)
1382				jsonw_null(json_wtr);
1383			else
1384				printf("Error: empty map\n");
1385		} else {
1386			p_err("pop failed: %s", strerror(errno));
1387		}
1388
1389		goto exit_free;
1390	}
1391
1392	print_key_value(&info, key, value);
1393
1394exit_free:
1395	free(key);
1396	free(value);
1397	close(fd);
1398
1399	return err;
1400}
1401
1402static int do_freeze(int argc, char **argv)
1403{
1404	int err, fd;
1405
1406	if (!REQ_ARGS(2))
1407		return -1;
1408
1409	fd = map_parse_fd(&argc, &argv);
1410	if (fd < 0)
1411		return -1;
1412
1413	if (argc) {
1414		close(fd);
1415		return BAD_ARG();
1416	}
1417
1418	err = bpf_map_freeze(fd);
1419	close(fd);
1420	if (err) {
1421		p_err("failed to freeze map: %s", strerror(errno));
1422		return err;
1423	}
1424
1425	if (json_output)
1426		jsonw_null(json_wtr);
1427
1428	return 0;
1429}
1430
1431static int do_help(int argc, char **argv)
1432{
1433	if (json_output) {
1434		jsonw_null(json_wtr);
1435		return 0;
1436	}
1437
1438	fprintf(stderr,
1439		"Usage: %1$s %2$s { show | list }   [MAP]\n"
1440		"       %1$s %2$s create     FILE type TYPE key KEY_SIZE value VALUE_SIZE \\\n"
1441		"                                  entries MAX_ENTRIES name NAME [flags FLAGS] \\\n"
1442		"                                  [inner_map MAP] [dev NAME]\n"
1443		"       %1$s %2$s dump       MAP\n"
1444		"       %1$s %2$s update     MAP [key DATA] [value VALUE] [UPDATE_FLAGS]\n"
1445		"       %1$s %2$s lookup     MAP [key DATA]\n"
1446		"       %1$s %2$s getnext    MAP [key DATA]\n"
1447		"       %1$s %2$s delete     MAP  key DATA\n"
1448		"       %1$s %2$s pin        MAP  FILE\n"
1449		"       %1$s %2$s event_pipe MAP [cpu N index M]\n"
1450		"       %1$s %2$s peek       MAP\n"
1451		"       %1$s %2$s push       MAP value VALUE\n"
1452		"       %1$s %2$s pop        MAP\n"
1453		"       %1$s %2$s enqueue    MAP value VALUE\n"
1454		"       %1$s %2$s dequeue    MAP\n"
1455		"       %1$s %2$s freeze     MAP\n"
1456		"       %1$s %2$s help\n"
1457		"\n"
1458		"       " HELP_SPEC_MAP "\n"
1459		"       DATA := { [hex] BYTES }\n"
1460		"       " HELP_SPEC_PROGRAM "\n"
1461		"       VALUE := { DATA | MAP | PROG }\n"
1462		"       UPDATE_FLAGS := { any | exist | noexist }\n"
1463		"       TYPE := { hash | array | prog_array | perf_event_array | percpu_hash |\n"
1464		"                 percpu_array | stack_trace | cgroup_array | lru_hash |\n"
1465		"                 lru_percpu_hash | lpm_trie | array_of_maps | hash_of_maps |\n"
1466		"                 devmap | devmap_hash | sockmap | cpumap | xskmap | sockhash |\n"
1467		"                 cgroup_storage | reuseport_sockarray | percpu_cgroup_storage |\n"
1468		"                 queue | stack | sk_storage | struct_ops | ringbuf | inode_storage |\n"
1469		"		  task_storage }\n"
1470		"       " HELP_SPEC_OPTIONS "\n"
1471		"",
1472		bin_name, argv[-2]);
1473
1474	return 0;
1475}
1476
1477static const struct cmd cmds[] = {
1478	{ "show",	do_show },
1479	{ "list",	do_show },
1480	{ "help",	do_help },
1481	{ "dump",	do_dump },
1482	{ "update",	do_update },
1483	{ "lookup",	do_lookup },
1484	{ "getnext",	do_getnext },
1485	{ "delete",	do_delete },
1486	{ "pin",	do_pin },
1487	{ "event_pipe",	do_event_pipe },
1488	{ "create",	do_create },
1489	{ "peek",	do_lookup },
1490	{ "push",	do_update },
1491	{ "enqueue",	do_update },
1492	{ "pop",	do_pop_dequeue },
1493	{ "dequeue",	do_pop_dequeue },
1494	{ "freeze",	do_freeze },
1495	{ 0 }
1496};
1497
1498int do_map(int argc, char **argv)
1499{
1500	return cmd_select(cmds, argc, argv, do_help);
1501}