Linux Audio

Check our new training course

Loading...
v3.5.6
 
   1#include <dirent.h>
   2#include <errno.h>
   3#include <stdlib.h>
   4#include <stdio.h>
   5#include <string.h>
 
 
 
 
 
   6#include <sys/types.h>
   7#include <sys/stat.h>
   8#include <sys/param.h>
   9#include <fcntl.h>
  10#include <unistd.h>
  11#include <inttypes.h>
 
  12#include "build-id.h"
  13#include "util.h"
 
 
  14#include "debug.h"
 
 
 
  15#include "symbol.h"
 
 
 
  16#include "strlist.h"
 
 
 
 
 
 
  17
  18#include <libelf.h>
  19#include <gelf.h>
  20#include <elf.h>
  21#include <limits.h>
 
  22#include <sys/utsname.h>
  23
  24#ifndef KSYM_NAME_LEN
  25#define KSYM_NAME_LEN 256
  26#endif
  27
  28#ifndef NT_GNU_BUILD_ID
  29#define NT_GNU_BUILD_ID 3
  30#endif
  31
  32static bool dso__build_id_equal(const struct dso *dso, u8 *build_id);
  33static int elf_read_build_id(Elf *elf, void *bf, size_t size);
  34static void dsos__add(struct list_head *head, struct dso *dso);
  35static struct map *map__new2(u64 start, struct dso *dso, enum map_type type);
  36static int dso__load_kernel_sym(struct dso *dso, struct map *map,
  37				symbol_filter_t filter);
  38static int dso__load_guest_kernel_sym(struct dso *dso, struct map *map,
  39			symbol_filter_t filter);
  40static int vmlinux_path__nr_entries;
  41static char **vmlinux_path;
  42
  43struct symbol_conf symbol_conf = {
  44	.exclude_other	  = true,
  45	.use_modules	  = true,
  46	.try_vmlinux_path = true,
  47	.annotate_src	  = true,
  48	.symfs            = "",
 
 
 
 
 
 
 
  49};
  50
  51int dso__name_len(const struct dso *dso)
  52{
  53	if (!dso)
  54		return strlen("[unknown]");
  55	if (verbose)
  56		return dso->long_name_len;
 
 
 
 
 
 
 
 
 
 
 
 
 
  57
  58	return dso->short_name_len;
  59}
  60
  61bool dso__loaded(const struct dso *dso, enum map_type type)
  62{
  63	return dso->loaded & (1 << type);
 
  64}
  65
  66bool dso__sorted_by_name(const struct dso *dso, enum map_type type)
  67{
  68	return dso->sorted_by_name & (1 << type);
 
 
 
 
 
  69}
  70
  71static void dso__set_sorted_by_name(struct dso *dso, enum map_type type)
  72{
  73	dso->sorted_by_name |= (1 << type);
  74}
  75
  76bool symbol_type__is_a(char symbol_type, enum map_type map_type)
  77{
  78	symbol_type = toupper(symbol_type);
 
  79
  80	switch (map_type) {
  81	case MAP__FUNCTION:
  82		return symbol_type == 'T' || symbol_type == 'W';
  83	case MAP__VARIABLE:
  84		return symbol_type == 'D';
  85	default:
  86		return false;
  87	}
  88}
  89
  90static int prefix_underscores_count(const char *str)
 
  91{
  92	const char *tail = str;
 
  93
  94	while (*tail == '_')
  95		tail++;
 
 
 
 
 
 
  96
  97	return tail - str;
  98}
  99
 100#define SYMBOL_A 0
 101#define SYMBOL_B 1
 102
 103static int choose_best_symbol(struct symbol *syma, struct symbol *symb)
 104{
 105	s64 a;
 106	s64 b;
 
 107
 108	/* Prefer a symbol with non zero length */
 109	a = syma->end - syma->start;
 110	b = symb->end - symb->start;
 111	if ((b == 0) && (a > 0))
 112		return SYMBOL_A;
 113	else if ((a == 0) && (b > 0))
 114		return SYMBOL_B;
 115
 116	/* Prefer a non weak symbol over a weak one */
 117	a = syma->binding == STB_WEAK;
 118	b = symb->binding == STB_WEAK;
 119	if (b && !a)
 120		return SYMBOL_A;
 121	if (a && !b)
 122		return SYMBOL_B;
 123
 124	/* Prefer a global symbol over a non global one */
 125	a = syma->binding == STB_GLOBAL;
 126	b = symb->binding == STB_GLOBAL;
 127	if (a && !b)
 128		return SYMBOL_A;
 129	if (b && !a)
 130		return SYMBOL_B;
 131
 132	/* Prefer a symbol with less underscores */
 133	a = prefix_underscores_count(syma->name);
 134	b = prefix_underscores_count(symb->name);
 135	if (b > a)
 136		return SYMBOL_A;
 137	else if (a > b)
 138		return SYMBOL_B;
 139
 140	/* If all else fails, choose the symbol with the longest name */
 141	if (strlen(syma->name) >= strlen(symb->name))
 
 
 142		return SYMBOL_A;
 143	else
 144		return SYMBOL_B;
 
 
 145}
 146
 147static void symbols__fixup_duplicate(struct rb_root *symbols)
 148{
 149	struct rb_node *nd;
 150	struct symbol *curr, *next;
 151
 152	nd = rb_first(symbols);
 
 
 
 153
 154	while (nd) {
 155		curr = rb_entry(nd, struct symbol, rb_node);
 156again:
 157		nd = rb_next(&curr->rb_node);
 158		next = rb_entry(nd, struct symbol, rb_node);
 159
 160		if (!nd)
 161			break;
 162
 163		if (curr->start != next->start)
 164			continue;
 165
 166		if (choose_best_symbol(curr, next) == SYMBOL_A) {
 167			rb_erase(&next->rb_node, symbols);
 
 168			goto again;
 169		} else {
 170			nd = rb_next(&curr->rb_node);
 171			rb_erase(&curr->rb_node, symbols);
 
 172		}
 173	}
 174}
 175
 176static void symbols__fixup_end(struct rb_root *symbols)
 177{
 178	struct rb_node *nd, *prevnd = rb_first(symbols);
 179	struct symbol *curr, *prev;
 180
 181	if (prevnd == NULL)
 182		return;
 183
 184	curr = rb_entry(prevnd, struct symbol, rb_node);
 185
 186	for (nd = rb_next(prevnd); nd; nd = rb_next(nd)) {
 187		prev = curr;
 188		curr = rb_entry(nd, struct symbol, rb_node);
 189
 190		if (prev->end == prev->start && prev->end != curr->start)
 191			prev->end = curr->start - 1;
 192	}
 193
 194	/* Last entry */
 195	if (curr->end == curr->start)
 196		curr->end = roundup(curr->start, 4096);
 197}
 198
 199static void __map_groups__fixup_end(struct map_groups *mg, enum map_type type)
 200{
 201	struct map *prev, *curr;
 202	struct rb_node *nd, *prevnd = rb_first(&mg->maps[type]);
 203
 204	if (prevnd == NULL)
 205		return;
 206
 207	curr = rb_entry(prevnd, struct map, rb_node);
 
 
 208
 209	for (nd = rb_next(prevnd); nd; nd = rb_next(nd)) {
 210		prev = curr;
 211		curr = rb_entry(nd, struct map, rb_node);
 212		prev->end = curr->start - 1;
 213	}
 214
 215	/*
 216	 * We still haven't the actual symbols, so guess the
 217	 * last map final address.
 218	 */
 219	curr->end = ~0ULL;
 220}
 221
 222static void map_groups__fixup_end(struct map_groups *mg)
 223{
 224	int i;
 225	for (i = 0; i < MAP__NR_TYPES; ++i)
 226		__map_groups__fixup_end(mg, i);
 227}
 228
 229static struct symbol *symbol__new(u64 start, u64 len, u8 binding,
 230				  const char *name)
 231{
 232	size_t namelen = strlen(name) + 1;
 233	struct symbol *sym = calloc(1, (symbol_conf.priv_size +
 234					sizeof(*sym) + namelen));
 235	if (sym == NULL)
 236		return NULL;
 237
 238	if (symbol_conf.priv_size)
 
 
 
 
 239		sym = ((void *)sym) + symbol_conf.priv_size;
 
 240
 241	sym->start   = start;
 242	sym->end     = len ? start + len - 1 : start;
 
 243	sym->binding = binding;
 244	sym->namelen = namelen - 1;
 245
 246	pr_debug4("%s: %s %#" PRIx64 "-%#" PRIx64 "\n",
 247		  __func__, name, start, sym->end);
 248	memcpy(sym->name, name, namelen);
 249
 250	return sym;
 251}
 252
 253void symbol__delete(struct symbol *sym)
 254{
 255	free(((void *)sym) - symbol_conf.priv_size);
 256}
 257
 258static size_t symbol__fprintf(struct symbol *sym, FILE *fp)
 259{
 260	return fprintf(fp, " %" PRIx64 "-%" PRIx64 " %c %s\n",
 261		       sym->start, sym->end,
 262		       sym->binding == STB_GLOBAL ? 'g' :
 263		       sym->binding == STB_LOCAL  ? 'l' : 'w',
 264		       sym->name);
 265}
 266
 267size_t symbol__fprintf_symname_offs(const struct symbol *sym,
 268				    const struct addr_location *al, FILE *fp)
 269{
 270	unsigned long offset;
 271	size_t length;
 272
 273	if (sym && sym->name) {
 274		length = fprintf(fp, "%s", sym->name);
 275		if (al) {
 276			offset = al->addr - sym->start;
 277			length += fprintf(fp, "+0x%lx", offset);
 278		}
 279		return length;
 280	} else
 281		return fprintf(fp, "[unknown]");
 282}
 283
 284size_t symbol__fprintf_symname(const struct symbol *sym, FILE *fp)
 285{
 286	return symbol__fprintf_symname_offs(sym, NULL, fp);
 287}
 288
 289void dso__set_long_name(struct dso *dso, char *name)
 290{
 291	if (name == NULL)
 292		return;
 293	dso->long_name = name;
 294	dso->long_name_len = strlen(name);
 295}
 296
 297static void dso__set_short_name(struct dso *dso, const char *name)
 298{
 299	if (name == NULL)
 300		return;
 301	dso->short_name = name;
 302	dso->short_name_len = strlen(name);
 303}
 304
 305static void dso__set_basename(struct dso *dso)
 306{
 307	dso__set_short_name(dso, basename(dso->long_name));
 308}
 309
 310struct dso *dso__new(const char *name)
 311{
 312	struct dso *dso = calloc(1, sizeof(*dso) + strlen(name) + 1);
 313
 314	if (dso != NULL) {
 315		int i;
 316		strcpy(dso->name, name);
 317		dso__set_long_name(dso, dso->name);
 318		dso__set_short_name(dso, dso->name);
 319		for (i = 0; i < MAP__NR_TYPES; ++i)
 320			dso->symbols[i] = dso->symbol_names[i] = RB_ROOT;
 321		dso->symtab_type = SYMTAB__NOT_FOUND;
 322		dso->loaded = 0;
 323		dso->sorted_by_name = 0;
 324		dso->has_build_id = 0;
 325		dso->kernel = DSO_TYPE_USER;
 326		dso->needs_swap = DSO_SWAP__UNSET;
 327		INIT_LIST_HEAD(&dso->node);
 328	}
 329
 330	return dso;
 331}
 332
 333static void symbols__delete(struct rb_root *symbols)
 334{
 335	struct symbol *pos;
 336	struct rb_node *next = rb_first(symbols);
 337
 338	while (next) {
 339		pos = rb_entry(next, struct symbol, rb_node);
 340		next = rb_next(&pos->rb_node);
 341		rb_erase(&pos->rb_node, symbols);
 342		symbol__delete(pos);
 343	}
 344}
 345
 346void dso__delete(struct dso *dso)
 
 347{
 348	int i;
 349	for (i = 0; i < MAP__NR_TYPES; ++i)
 350		symbols__delete(&dso->symbols[i]);
 351	if (dso->sname_alloc)
 352		free((char *)dso->short_name);
 353	if (dso->lname_alloc)
 354		free(dso->long_name);
 355	free(dso);
 356}
 357
 358void dso__set_build_id(struct dso *dso, void *build_id)
 359{
 360	memcpy(dso->build_id, build_id, sizeof(dso->build_id));
 361	dso->has_build_id = 1;
 362}
 363
 364static void symbols__insert(struct rb_root *symbols, struct symbol *sym)
 365{
 366	struct rb_node **p = &symbols->rb_node;
 367	struct rb_node *parent = NULL;
 368	const u64 ip = sym->start;
 369	struct symbol *s;
 
 
 
 
 
 
 
 
 
 
 
 
 370
 371	while (*p != NULL) {
 372		parent = *p;
 373		s = rb_entry(parent, struct symbol, rb_node);
 374		if (ip < s->start)
 375			p = &(*p)->rb_left;
 376		else
 377			p = &(*p)->rb_right;
 
 
 378	}
 379	rb_link_node(&sym->rb_node, parent, p);
 380	rb_insert_color(&sym->rb_node, symbols);
 381}
 382
 383static struct symbol *symbols__find(struct rb_root *symbols, u64 ip)
 
 
 
 
 
 384{
 385	struct rb_node *n;
 386
 387	if (symbols == NULL)
 388		return NULL;
 389
 390	n = symbols->rb_node;
 391
 392	while (n) {
 393		struct symbol *s = rb_entry(n, struct symbol, rb_node);
 394
 395		if (ip < s->start)
 396			n = n->rb_left;
 397		else if (ip > s->end)
 398			n = n->rb_right;
 399		else
 400			return s;
 401	}
 402
 403	return NULL;
 404}
 405
 406struct symbol_name_rb_node {
 407	struct rb_node	rb_node;
 408	struct symbol	sym;
 409};
 410
 411static void symbols__insert_by_name(struct rb_root *symbols, struct symbol *sym)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 412{
 413	struct rb_node **p = &symbols->rb_node;
 
 
 
 
 
 
 
 
 
 
 414	struct rb_node *parent = NULL;
 415	struct symbol_name_rb_node *symn, *s;
 
 416
 417	symn = container_of(sym, struct symbol_name_rb_node, sym);
 418
 419	while (*p != NULL) {
 420		parent = *p;
 421		s = rb_entry(parent, struct symbol_name_rb_node, rb_node);
 422		if (strcmp(sym->name, s->sym.name) < 0)
 423			p = &(*p)->rb_left;
 424		else
 425			p = &(*p)->rb_right;
 
 
 426	}
 427	rb_link_node(&symn->rb_node, parent, p);
 428	rb_insert_color(&symn->rb_node, symbols);
 429}
 430
 431static void symbols__sort_by_name(struct rb_root *symbols,
 432				  struct rb_root *source)
 433{
 434	struct rb_node *nd;
 435
 436	for (nd = rb_first(source); nd; nd = rb_next(nd)) {
 437		struct symbol *pos = rb_entry(nd, struct symbol, rb_node);
 438		symbols__insert_by_name(symbols, pos);
 439	}
 440}
 441
 442static struct symbol *symbols__find_by_name(struct rb_root *symbols,
 443					    const char *name)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 444{
 445	struct rb_node *n;
 
 446
 447	if (symbols == NULL)
 448		return NULL;
 449
 450	n = symbols->rb_node;
 451
 452	while (n) {
 453		struct symbol_name_rb_node *s;
 454		int cmp;
 455
 456		s = rb_entry(n, struct symbol_name_rb_node, rb_node);
 457		cmp = strcmp(name, s->sym.name);
 458
 459		if (cmp < 0)
 460			n = n->rb_left;
 461		else if (cmp > 0)
 462			n = n->rb_right;
 463		else
 464			return &s->sym;
 465	}
 466
 467	return NULL;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 468}
 469
 470struct symbol *dso__find_symbol(struct dso *dso,
 471				enum map_type type, u64 addr)
 472{
 473	return symbols__find(&dso->symbols[type], addr);
 
 474}
 475
 476struct symbol *dso__find_symbol_by_name(struct dso *dso, enum map_type type,
 477					const char *name)
 478{
 479	return symbols__find_by_name(&dso->symbol_names[type], name);
 
 
 
 
 
 
 
 480}
 481
 482void dso__sort_by_name(struct dso *dso, enum map_type type)
 483{
 484	dso__set_sorted_by_name(dso, type);
 485	return symbols__sort_by_name(&dso->symbol_names[type],
 486				     &dso->symbols[type]);
 487}
 488
 489int build_id__sprintf(const u8 *build_id, int len, char *bf)
 490{
 491	char *bid = bf;
 492	const u8 *raw = build_id;
 493	int i;
 494
 495	for (i = 0; i < len; ++i) {
 496		sprintf(bid, "%02x", *raw);
 497		++raw;
 498		bid += 2;
 499	}
 500
 501	return raw - build_id;
 502}
 503
 504size_t dso__fprintf_buildid(struct dso *dso, FILE *fp)
 505{
 506	char sbuild_id[BUILD_ID_SIZE * 2 + 1];
 
 507
 508	build_id__sprintf(dso->build_id, sizeof(dso->build_id), sbuild_id);
 509	return fprintf(fp, "%s", sbuild_id);
 
 510}
 511
 512size_t dso__fprintf_symbols_by_name(struct dso *dso,
 513				    enum map_type type, FILE *fp)
 514{
 515	size_t ret = 0;
 516	struct rb_node *nd;
 517	struct symbol_name_rb_node *pos;
 518
 519	for (nd = rb_first(&dso->symbol_names[type]); nd; nd = rb_next(nd)) {
 520		pos = rb_entry(nd, struct symbol_name_rb_node, rb_node);
 521		fprintf(fp, "%s\n", pos->sym.name);
 522	}
 523
 524	return ret;
 525}
 526
 527size_t dso__fprintf(struct dso *dso, enum map_type type, FILE *fp)
 
 
 
 528{
 529	struct rb_node *nd;
 530	size_t ret = fprintf(fp, "dso: %s (", dso->short_name);
 
 
 
 
 
 531
 532	if (dso->short_name != dso->long_name)
 533		ret += fprintf(fp, "%s, ", dso->long_name);
 534	ret += fprintf(fp, "%s, %sloaded, ", map_type__name[type],
 535		       dso->loaded ? "" : "NOT ");
 536	ret += dso__fprintf_buildid(dso, fp);
 537	ret += fprintf(fp, ")\n");
 538	for (nd = rb_first(&dso->symbols[type]); nd; nd = rb_next(nd)) {
 539		struct symbol *pos = rb_entry(nd, struct symbol, rb_node);
 540		ret += symbol__fprintf(pos, fp);
 541	}
 542
 543	return ret;
 
 
 
 
 
 
 
 
 
 
 544}
 545
 546int kallsyms__parse(const char *filename, void *arg,
 547		    int (*process_symbol)(void *arg, const char *name,
 548					  char type, u64 start, u64 end))
 
 549{
 550	char *line = NULL;
 551	size_t n;
 552	int err = -1;
 553	FILE *file = fopen(filename, "r");
 554
 
 555	if (file == NULL)
 556		goto out_failure;
 557
 558	err = 0;
 559
 560	while (!feof(file)) {
 561		u64 start;
 562		int line_len, len;
 563		char symbol_type;
 564		char *symbol_name;
 565
 566		line_len = getline(&line, &n, file);
 567		if (line_len < 0 || !line)
 568			break;
 
 
 
 
 
 
 
 
 
 569
 570		line[--line_len] = '\0'; /* \n */
 571
 572		len = hex2u64(line, &start);
 
 
 573
 574		len++;
 575		if (len + 2 >= line_len)
 
 
 576			continue;
 577
 578		symbol_type = line[len];
 579		len += 2;
 580		symbol_name = line + len;
 581		len = line_len - len;
 582
 583		if (len >= KSYM_NAME_LEN) {
 584			err = -1;
 585			break;
 586		}
 587
 588		/*
 589		 * module symbols are not sorted so we add all
 590		 * symbols with zero length and rely on
 591		 * symbols__fixup_end() to fix it up.
 592		 */
 593		err = process_symbol(arg, symbol_name,
 594				     symbol_type, start, start);
 595		if (err)
 596			break;
 597	}
 598
 599	free(line);
 600	fclose(file);
 601	return err;
 602
 603out_failure:
 604	return -1;
 605}
 606
 607struct process_kallsyms_args {
 608	struct map *map;
 609	struct dso *dso;
 610};
 611
 612static u8 kallsyms2elf_type(char type)
 613{
 614	if (type == 'W')
 615		return STB_WEAK;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 616
 617	return isupper(type) ? STB_GLOBAL : STB_LOCAL;
 
 
 
 618}
 619
 620static int map__process_kallsym_symbol(void *arg, const char *name,
 621				       char type, u64 start, u64 end)
 622{
 623	struct symbol *sym;
 624	struct process_kallsyms_args *a = arg;
 625	struct rb_root *root = &a->dso->symbols[a->map->type];
 626
 627	if (!symbol_type__is_a(type, a->map->type))
 628		return 0;
 629
 630	sym = symbol__new(start, end - start + 1,
 631			  kallsyms2elf_type(type), name);
 
 
 
 
 632	if (sym == NULL)
 633		return -ENOMEM;
 634	/*
 635	 * We will pass the symbols to the filter later, in
 636	 * map__split_kallsyms, when we have split the maps per module
 637	 */
 638	symbols__insert(root, sym);
 639
 640	return 0;
 641}
 642
 643/*
 644 * Loads the function entries in /proc/kallsyms into kernel_map->dso,
 645 * so that we can in the next step set the symbol ->end address and then
 646 * call kernel_maps__split_kallsyms.
 647 */
 648static int dso__load_all_kallsyms(struct dso *dso, const char *filename,
 649				  struct map *map)
 650{
 651	struct process_kallsyms_args args = { .map = map, .dso = dso, };
 652	return kallsyms__parse(filename, &args, map__process_kallsym_symbol);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 653}
 654
 655/*
 656 * Split the symbols into maps, making sure there are no overlaps, i.e. the
 657 * kernel range is broken in several maps, named [kernel].N, as we don't have
 658 * the original ELF section names vmlinux have.
 659 */
 660static int dso__split_kallsyms(struct dso *dso, struct map *map,
 661			       symbol_filter_t filter)
 662{
 663	struct map_groups *kmaps = map__kmap(map)->kmaps;
 664	struct machine *machine = kmaps->machine;
 665	struct map *curr_map = map;
 666	struct symbol *pos;
 667	int count = 0, moved = 0;	
 668	struct rb_root *root = &dso->symbols[map->type];
 669	struct rb_node *next = rb_first(root);
 670	int kernel_range = 0;
 
 
 
 
 
 
 
 
 671
 672	while (next) {
 673		char *module;
 674
 675		pos = rb_entry(next, struct symbol, rb_node);
 676		next = rb_next(&pos->rb_node);
 677
 678		module = strchr(pos->name, '\t');
 679		if (module) {
 680			if (!symbol_conf.use_modules)
 681				goto discard_symbol;
 682
 683			*module++ = '\0';
 684
 685			if (strcmp(curr_map->dso->short_name, module)) {
 686				if (curr_map != map &&
 687				    dso->kernel == DSO_TYPE_GUEST_KERNEL &&
 688				    machine__is_default_guest(machine)) {
 689					/*
 690					 * We assume all symbols of a module are
 691					 * continuous in * kallsyms, so curr_map
 692					 * points to a module and all its
 693					 * symbols are in its kmap. Mark it as
 694					 * loaded.
 695					 */
 696					dso__set_loaded(curr_map->dso,
 697							curr_map->type);
 698				}
 699
 700				curr_map = map_groups__find_by_name(kmaps,
 701							map->type, module);
 702				if (curr_map == NULL) {
 703					pr_debug("%s/proc/{kallsyms,modules} "
 704					         "inconsistency while looking "
 705						 "for \"%s\" module!\n",
 706						 machine->root_dir, module);
 707					curr_map = map;
 708					goto discard_symbol;
 709				}
 710
 711				if (curr_map->dso->loaded &&
 712				    !machine__is_default_guest(machine))
 713					goto discard_symbol;
 714			}
 715			/*
 716			 * So that we look just like we get from .ko files,
 717			 * i.e. not prelinked, relative to map->start.
 718			 */
 719			pos->start = curr_map->map_ip(curr_map, pos->start);
 720			pos->end   = curr_map->map_ip(curr_map, pos->end);
 721		} else if (curr_map != map) {
 
 
 
 
 
 
 
 
 
 
 722			char dso_name[PATH_MAX];
 723			struct dso *ndso;
 724
 
 
 
 
 
 
 725			if (count == 0) {
 726				curr_map = map;
 727				goto filter_symbol;
 728			}
 729
 730			if (dso->kernel == DSO_TYPE_GUEST_KERNEL)
 731				snprintf(dso_name, sizeof(dso_name),
 732					"[guest.kernel].%d",
 733					kernel_range++);
 734			else
 735				snprintf(dso_name, sizeof(dso_name),
 736					"[kernel].%d",
 737					kernel_range++);
 738
 739			ndso = dso__new(dso_name);
 740			if (ndso == NULL)
 741				return -1;
 742
 743			ndso->kernel = dso->kernel;
 744
 745			curr_map = map__new2(pos->start, ndso, map->type);
 746			if (curr_map == NULL) {
 747				dso__delete(ndso);
 748				return -1;
 749			}
 750
 751			curr_map->map_ip = curr_map->unmap_ip = identity__map_ip;
 752			map_groups__insert(kmaps, curr_map);
 753			++kernel_range;
 754		}
 755filter_symbol:
 756		if (filter && filter(curr_map, pos)) {
 757discard_symbol:		rb_erase(&pos->rb_node, root);
 758			symbol__delete(pos);
 759		} else {
 760			if (curr_map != map) {
 761				rb_erase(&pos->rb_node, root);
 762				symbols__insert(&curr_map->dso->symbols[curr_map->type], pos);
 763				++moved;
 764			} else
 765				++count;
 766		}
 
 
 
 
 767	}
 768
 769	if (curr_map != map &&
 770	    dso->kernel == DSO_TYPE_GUEST_KERNEL &&
 771	    machine__is_default_guest(kmaps->machine)) {
 772		dso__set_loaded(curr_map->dso, curr_map->type);
 773	}
 774
 775	return count + moved;
 776}
 777
 778static bool symbol__restricted_filename(const char *filename,
 779					const char *restricted_filename)
 780{
 781	bool restricted = false;
 782
 783	if (symbol_conf.kptr_restrict) {
 784		char *r = realpath(filename, NULL);
 785
 786		if (r != NULL) {
 787			restricted = strcmp(r, restricted_filename) == 0;
 788			free(r);
 789			return restricted;
 790		}
 791	}
 792
 793	return restricted;
 794}
 795
 796int dso__load_kallsyms(struct dso *dso, const char *filename,
 797		       struct map *map, symbol_filter_t filter)
 798{
 799	if (symbol__restricted_filename(filename, "/proc/kallsyms"))
 800		return -1;
 801
 802	if (dso__load_all_kallsyms(dso, filename, map) < 0)
 803		return -1;
 
 
 
 804
 805	symbols__fixup_duplicate(&dso->symbols[map->type]);
 806	symbols__fixup_end(&dso->symbols[map->type]);
 
 
 
 
 
 
 
 
 
 807
 808	if (dso->kernel == DSO_TYPE_GUEST_KERNEL)
 809		dso->symtab_type = SYMTAB__GUEST_KALLSYMS;
 810	else
 811		dso->symtab_type = SYMTAB__KALLSYMS;
 812
 813	return dso__split_kallsyms(dso, map, filter);
 
 
 
 
 
 
 814}
 815
 816static int dso__load_perf_map(struct dso *dso, struct map *map,
 817			      symbol_filter_t filter)
 818{
 819	char *line = NULL;
 820	size_t n;
 821	FILE *file;
 822	int nr_syms = 0;
 823
 824	file = fopen(dso->long_name, "r");
 825	if (file == NULL)
 826		goto out_failure;
 827
 828	while (!feof(file)) {
 829		u64 start, size;
 830		struct symbol *sym;
 831		int line_len, len;
 832
 833		line_len = getline(&line, &n, file);
 834		if (line_len < 0)
 835			break;
 
 
 
 
 
 
 836
 837		if (!line)
 838			goto out_failure;
 839
 840		line[--line_len] = '\0'; /* \n */
 
 
 
 
 841
 842		len = hex2u64(line, &start);
 
 
 843
 844		len++;
 845		if (len + 2 >= line_len)
 846			continue;
 847
 848		len += hex2u64(line + len, &size);
 
 
 
 849
 850		len++;
 851		if (len + 2 >= line_len)
 852			continue;
 853
 854		sym = symbol__new(start, size, STB_GLOBAL, line + len);
 
 855
 856		if (sym == NULL)
 857			goto out_delete_line;
 
 
 858
 859		if (filter && filter(map, sym))
 860			symbol__delete(sym);
 861		else {
 862			symbols__insert(&dso->symbols[map->type], sym);
 863			nr_syms++;
 864		}
 865	}
 866
 867	free(line);
 868	fclose(file);
 869
 870	return nr_syms;
 
 
 
 
 
 
 871
 872out_delete_line:
 873	free(line);
 874out_failure:
 875	return -1;
 876}
 877
 878/**
 879 * elf_symtab__for_each_symbol - iterate thru all the symbols
 880 *
 881 * @syms: struct elf_symtab instance to iterate
 882 * @idx: uint32_t idx
 883 * @sym: GElf_Sym iterator
 884 */
 885#define elf_symtab__for_each_symbol(syms, nr_syms, idx, sym) \
 886	for (idx = 0, gelf_getsym(syms, idx, &sym);\
 887	     idx < nr_syms; \
 888	     idx++, gelf_getsym(syms, idx, &sym))
 889
 890static inline uint8_t elf_sym__type(const GElf_Sym *sym)
 891{
 892	return GELF_ST_TYPE(sym->st_info);
 893}
 
 894
 895static inline int elf_sym__is_function(const GElf_Sym *sym)
 896{
 897	return elf_sym__type(sym) == STT_FUNC &&
 898	       sym->st_name != 0 &&
 899	       sym->st_shndx != SHN_UNDEF;
 900}
 901
 902static inline bool elf_sym__is_object(const GElf_Sym *sym)
 903{
 904	return elf_sym__type(sym) == STT_OBJECT &&
 905		sym->st_name != 0 &&
 906		sym->st_shndx != SHN_UNDEF;
 907}
 908
 909static inline int elf_sym__is_label(const GElf_Sym *sym)
 910{
 911	return elf_sym__type(sym) == STT_NOTYPE &&
 912		sym->st_name != 0 &&
 913		sym->st_shndx != SHN_UNDEF &&
 914		sym->st_shndx != SHN_ABS;
 915}
 916
 917static inline const char *elf_sec__name(const GElf_Shdr *shdr,
 918					const Elf_Data *secstrs)
 919{
 920	return secstrs->d_buf + shdr->sh_name;
 921}
 922
 923static inline int elf_sec__is_text(const GElf_Shdr *shdr,
 924					const Elf_Data *secstrs)
 925{
 926	return strstr(elf_sec__name(shdr, secstrs), "text") != NULL;
 927}
 928
 929static inline bool elf_sec__is_data(const GElf_Shdr *shdr,
 930				    const Elf_Data *secstrs)
 931{
 932	return strstr(elf_sec__name(shdr, secstrs), "data") != NULL;
 933}
 934
 935static inline const char *elf_sym__name(const GElf_Sym *sym,
 936					const Elf_Data *symstrs)
 937{
 938	return symstrs->d_buf + sym->st_name;
 939}
 
 940
 941static Elf_Scn *elf_section_by_name(Elf *elf, GElf_Ehdr *ep,
 942				    GElf_Shdr *shp, const char *name,
 943				    size_t *idx)
 944{
 945	Elf_Scn *sec = NULL;
 946	size_t cnt = 1;
 947
 948	while ((sec = elf_nextscn(elf, sec)) != NULL) {
 949		char *str;
 950
 951		gelf_getshdr(sec, shp);
 952		str = elf_strptr(elf, ep->e_shstrndx, shp->sh_name);
 953		if (!strcmp(name, str)) {
 954			if (idx)
 955				*idx = cnt;
 956			break;
 957		}
 958		++cnt;
 959	}
 960
 961	return sec;
 
 
 
 
 
 
 
 
 
 962}
 963
 964#define elf_section__for_each_rel(reldata, pos, pos_mem, idx, nr_entries) \
 965	for (idx = 0, pos = gelf_getrel(reldata, 0, &pos_mem); \
 966	     idx < nr_entries; \
 967	     ++idx, pos = gelf_getrel(reldata, idx, &pos_mem))
 968
 969#define elf_section__for_each_rela(reldata, pos, pos_mem, idx, nr_entries) \
 970	for (idx = 0, pos = gelf_getrela(reldata, 0, &pos_mem); \
 971	     idx < nr_entries; \
 972	     ++idx, pos = gelf_getrela(reldata, idx, &pos_mem))
 973
 974/*
 975 * We need to check if we have a .dynsym, so that we can handle the
 976 * .plt, synthesizing its symbols, that aren't on the symtabs (be it
 977 * .dynsym or .symtab).
 978 * And always look at the original dso, not at debuginfo packages, that
 979 * have the PLT data stripped out (shdr_rel_plt.sh_type == SHT_NOBITS).
 980 */
 981static int
 982dso__synthesize_plt_symbols(struct dso *dso, char *name, struct map *map,
 983			    symbol_filter_t filter)
 984{
 985	uint32_t nr_rel_entries, idx;
 986	GElf_Sym sym;
 987	u64 plt_offset;
 988	GElf_Shdr shdr_plt;
 989	struct symbol *f;
 990	GElf_Shdr shdr_rel_plt, shdr_dynsym;
 991	Elf_Data *reldata, *syms, *symstrs;
 992	Elf_Scn *scn_plt_rel, *scn_symstrs, *scn_dynsym;
 993	size_t dynsym_idx;
 994	GElf_Ehdr ehdr;
 995	char sympltname[1024];
 996	Elf *elf;
 997	int nr = 0, symidx, fd, err = 0;
 998
 999	fd = open(name, O_RDONLY);
1000	if (fd < 0)
1001		goto out;
1002
1003	elf = elf_begin(fd, PERF_ELF_C_READ_MMAP, NULL);
1004	if (elf == NULL)
1005		goto out_close;
 
1006
1007	if (gelf_getehdr(elf, &ehdr) == NULL)
1008		goto out_elf_end;
1009
1010	scn_dynsym = elf_section_by_name(elf, &ehdr, &shdr_dynsym,
1011					 ".dynsym", &dynsym_idx);
1012	if (scn_dynsym == NULL)
1013		goto out_elf_end;
1014
1015	scn_plt_rel = elf_section_by_name(elf, &ehdr, &shdr_rel_plt,
1016					  ".rela.plt", NULL);
1017	if (scn_plt_rel == NULL) {
1018		scn_plt_rel = elf_section_by_name(elf, &ehdr, &shdr_rel_plt,
1019						  ".rel.plt", NULL);
1020		if (scn_plt_rel == NULL)
1021			goto out_elf_end;
1022	}
1023
1024	err = -1;
 
1025
1026	if (shdr_rel_plt.sh_link != dynsym_idx)
1027		goto out_elf_end;
 
 
 
1028
1029	if (elf_section_by_name(elf, &ehdr, &shdr_plt, ".plt", NULL) == NULL)
1030		goto out_elf_end;
1031
1032	/*
1033	 * Fetch the relocation section to find the idxes to the GOT
1034	 * and the symbols in the .dynsym they refer to.
1035	 */
1036	reldata = elf_getdata(scn_plt_rel, NULL);
1037	if (reldata == NULL)
1038		goto out_elf_end;
1039
1040	syms = elf_getdata(scn_dynsym, NULL);
1041	if (syms == NULL)
1042		goto out_elf_end;
1043
1044	scn_symstrs = elf_getscn(elf, shdr_dynsym.sh_link);
1045	if (scn_symstrs == NULL)
1046		goto out_elf_end;
1047
1048	symstrs = elf_getdata(scn_symstrs, NULL);
1049	if (symstrs == NULL)
1050		goto out_elf_end;
1051
1052	nr_rel_entries = shdr_rel_plt.sh_size / shdr_rel_plt.sh_entsize;
1053	plt_offset = shdr_plt.sh_offset;
1054
1055	if (shdr_rel_plt.sh_type == SHT_RELA) {
1056		GElf_Rela pos_mem, *pos;
1057
1058		elf_section__for_each_rela(reldata, pos, pos_mem, idx,
1059					   nr_rel_entries) {
1060			symidx = GELF_R_SYM(pos->r_info);
1061			plt_offset += shdr_plt.sh_entsize;
1062			gelf_getsym(syms, symidx, &sym);
1063			snprintf(sympltname, sizeof(sympltname),
1064				 "%s@plt", elf_sym__name(&sym, symstrs));
1065
1066			f = symbol__new(plt_offset, shdr_plt.sh_entsize,
1067					STB_GLOBAL, sympltname);
1068			if (!f)
1069				goto out_elf_end;
1070
1071			if (filter && filter(map, f))
1072				symbol__delete(f);
1073			else {
1074				symbols__insert(&dso->symbols[map->type], f);
1075				++nr;
1076			}
1077		}
1078	} else if (shdr_rel_plt.sh_type == SHT_REL) {
1079		GElf_Rel pos_mem, *pos;
1080		elf_section__for_each_rel(reldata, pos, pos_mem, idx,
1081					  nr_rel_entries) {
1082			symidx = GELF_R_SYM(pos->r_info);
1083			plt_offset += shdr_plt.sh_entsize;
1084			gelf_getsym(syms, symidx, &sym);
1085			snprintf(sympltname, sizeof(sympltname),
1086				 "%s@plt", elf_sym__name(&sym, symstrs));
1087
1088			f = symbol__new(plt_offset, shdr_plt.sh_entsize,
1089					STB_GLOBAL, sympltname);
1090			if (!f)
1091				goto out_elf_end;
1092
1093			if (filter && filter(map, f))
1094				symbol__delete(f);
1095			else {
1096				symbols__insert(&dso->symbols[map->type], f);
1097				++nr;
1098			}
1099		}
1100	}
1101
1102	err = 0;
1103out_elf_end:
1104	elf_end(elf);
1105out_close:
1106	close(fd);
1107
1108	if (err == 0)
1109		return nr;
1110out:
1111	pr_debug("%s: problems reading %s PLT info.\n",
1112		 __func__, dso->long_name);
1113	return 0;
1114}
1115
1116static bool elf_sym__is_a(GElf_Sym *sym, enum map_type type)
 
1117{
1118	switch (type) {
1119	case MAP__FUNCTION:
1120		return elf_sym__is_function(sym);
1121	case MAP__VARIABLE:
1122		return elf_sym__is_object(sym);
1123	default:
1124		return false;
 
 
 
 
 
 
1125	}
 
 
1126}
1127
1128static bool elf_sec__is_a(GElf_Shdr *shdr, Elf_Data *secstrs,
1129			  enum map_type type)
 
 
 
 
1130{
1131	switch (type) {
1132	case MAP__FUNCTION:
1133		return elf_sec__is_text(shdr, secstrs);
1134	case MAP__VARIABLE:
1135		return elf_sec__is_data(shdr, secstrs);
1136	default:
1137		return false;
1138	}
 
 
 
 
 
1139}
1140
1141static size_t elf_addr_to_index(Elf *elf, GElf_Addr addr)
 
 
 
 
1142{
1143	Elf_Scn *sec = NULL;
1144	GElf_Shdr shdr;
1145	size_t cnt = 1;
1146
1147	while ((sec = elf_nextscn(elf, sec)) != NULL) {
1148		gelf_getshdr(sec, &shdr);
 
 
 
1149
1150		if ((addr >= shdr.sh_addr) &&
1151		    (addr < (shdr.sh_addr + shdr.sh_size)))
1152			return cnt;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1153
1154		++cnt;
 
 
 
 
1155	}
1156
1157	return -1;
 
 
 
 
1158}
1159
1160static int dso__swap_init(struct dso *dso, unsigned char eidata)
 
1161{
1162	static unsigned int const endian = 1;
 
 
 
 
 
 
 
1163
1164	dso->needs_swap = DSO_SWAP__NO;
 
1165
1166	switch (eidata) {
1167	case ELFDATA2LSB:
1168		/* We are big endian, DSO is little endian. */
1169		if (*(unsigned char const *)&endian != 1)
1170			dso->needs_swap = DSO_SWAP__YES;
1171		break;
1172
1173	case ELFDATA2MSB:
1174		/* We are little endian, DSO is big endian. */
1175		if (*(unsigned char const *)&endian != 0)
1176			dso->needs_swap = DSO_SWAP__YES;
1177		break;
1178
1179	default:
1180		pr_err("unrecognized DSO data encoding %d\n", eidata);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1181		return -EINVAL;
1182	}
1183
1184	return 0;
1185}
 
 
 
 
 
 
 
 
 
1186
1187static int dso__load_sym(struct dso *dso, struct map *map, const char *name,
1188			 int fd, symbol_filter_t filter, int kmodule,
1189			 int want_symtab)
1190{
1191	struct kmap *kmap = dso->kernel ? map__kmap(map) : NULL;
1192	struct map *curr_map = map;
1193	struct dso *curr_dso = dso;
1194	Elf_Data *symstrs, *secstrs;
1195	uint32_t nr_syms;
1196	int err = -1;
1197	uint32_t idx;
1198	GElf_Ehdr ehdr;
1199	GElf_Shdr shdr, opdshdr;
1200	Elf_Data *syms, *opddata = NULL;
1201	GElf_Sym sym;
1202	Elf_Scn *sec, *sec_strndx, *opdsec;
1203	Elf *elf;
1204	int nr = 0;
1205	size_t opdidx = 0;
1206
1207	elf = elf_begin(fd, PERF_ELF_C_READ_MMAP, NULL);
1208	if (elf == NULL) {
1209		pr_debug("%s: cannot read %s ELF file.\n", __func__, name);
1210		goto out_close;
1211	}
 
1212
1213	if (gelf_getehdr(elf, &ehdr) == NULL) {
1214		pr_debug("%s: cannot get elf header.\n", __func__);
1215		goto out_elf_end;
 
 
 
 
 
1216	}
1217
1218	if (dso__swap_init(dso, ehdr.e_ident[EI_DATA]))
1219		goto out_elf_end;
1220
1221	/* Always reject images with a mismatched build-id: */
1222	if (dso->has_build_id) {
1223		u8 build_id[BUILD_ID_SIZE];
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1224
1225		if (elf_read_build_id(elf, build_id, BUILD_ID_SIZE) < 0)
1226			goto out_elf_end;
1227
1228		if (!dso__build_id_equal(dso, build_id))
1229			goto out_elf_end;
 
 
 
 
 
 
1230	}
1231
1232	sec = elf_section_by_name(elf, &ehdr, &shdr, ".symtab", NULL);
1233	if (sec == NULL) {
1234		if (want_symtab)
1235			goto out_elf_end;
 
 
 
 
 
 
 
1236
1237		sec = elf_section_by_name(elf, &ehdr, &shdr, ".dynsym", NULL);
1238		if (sec == NULL)
1239			goto out_elf_end;
 
 
 
 
 
 
 
 
 
1240	}
 
 
 
1241
1242	opdsec = elf_section_by_name(elf, &ehdr, &opdshdr, ".opd", &opdidx);
1243	if (opdshdr.sh_type != SHT_PROGBITS)
1244		opdsec = NULL;
1245	if (opdsec)
1246		opddata = elf_rawdata(opdsec, NULL);
 
 
1247
1248	syms = elf_getdata(sec, NULL);
1249	if (syms == NULL)
1250		goto out_elf_end;
1251
1252	sec = elf_getscn(elf, shdr.sh_link);
1253	if (sec == NULL)
1254		goto out_elf_end;
1255
1256	symstrs = elf_getdata(sec, NULL);
1257	if (symstrs == NULL)
1258		goto out_elf_end;
1259
1260	sec_strndx = elf_getscn(elf, ehdr.e_shstrndx);
1261	if (sec_strndx == NULL)
1262		goto out_elf_end;
 
 
1263
1264	secstrs = elf_getdata(sec_strndx, NULL);
1265	if (secstrs == NULL)
1266		goto out_elf_end;
1267
1268	nr_syms = shdr.sh_size / shdr.sh_entsize;
 
1269
1270	memset(&sym, 0, sizeof(sym));
1271	if (dso->kernel == DSO_TYPE_USER) {
1272		dso->adjust_symbols = (ehdr.e_type == ET_EXEC ||
1273				elf_section_by_name(elf, &ehdr, &shdr,
1274						     ".gnu.prelink_undo",
1275						     NULL) != NULL);
1276	} else {
1277		dso->adjust_symbols = 0;
1278	}
1279	elf_symtab__for_each_symbol(syms, nr_syms, idx, sym) {
1280		struct symbol *f;
1281		const char *elf_name = elf_sym__name(&sym, symstrs);
1282		char *demangled = NULL;
1283		int is_label = elf_sym__is_label(&sym);
1284		const char *section_name;
1285
1286		if (kmap && kmap->ref_reloc_sym && kmap->ref_reloc_sym->name &&
1287		    strcmp(elf_name, kmap->ref_reloc_sym->name) == 0)
1288			kmap->ref_reloc_sym->unrelocated_addr = sym.st_value;
1289
1290		if (!is_label && !elf_sym__is_a(&sym, map->type))
1291			continue;
1292
1293		/* Reject ARM ELF "mapping symbols": these aren't unique and
1294		 * don't identify functions, so will confuse the profile
1295		 * output: */
1296		if (ehdr.e_machine == EM_ARM) {
1297			if (!strcmp(elf_name, "$a") ||
1298			    !strcmp(elf_name, "$d") ||
1299			    !strcmp(elf_name, "$t"))
1300				continue;
1301		}
1302
1303		if (opdsec && sym.st_shndx == opdidx) {
1304			u32 offset = sym.st_value - opdshdr.sh_addr;
1305			u64 *opd = opddata->d_buf + offset;
1306			sym.st_value = DSO__SWAP(dso, u64, *opd);
1307			sym.st_shndx = elf_addr_to_index(elf, sym.st_value);
1308		}
1309
1310		sec = elf_getscn(elf, sym.st_shndx);
1311		if (!sec)
1312			goto out_elf_end;
 
 
1313
1314		gelf_getshdr(sec, &shdr);
 
 
 
 
1315
1316		if (is_label && !elf_sec__is_a(&shdr, secstrs, map->type))
1317			continue;
 
 
 
 
1318
1319		section_name = elf_sec__name(&shdr, secstrs);
 
 
1320
1321		/* On ARM, symbols for thumb functions have 1 added to
1322		 * the symbol address as a flag - remove it */
1323		if ((ehdr.e_machine == EM_ARM) &&
1324		    (map->type == MAP__FUNCTION) &&
1325		    (sym.st_value & 1))
1326			--sym.st_value;
1327
1328		if (dso->kernel != DSO_TYPE_USER || kmodule) {
1329			char dso_name[PATH_MAX];
 
1330
1331			if (strcmp(section_name,
1332				   (curr_dso->short_name +
1333				    dso->short_name_len)) == 0)
1334				goto new_symbol;
1335
1336			if (strcmp(section_name, ".text") == 0) {
1337				curr_map = map;
1338				curr_dso = dso;
1339				goto new_symbol;
1340			}
1341
1342			snprintf(dso_name, sizeof(dso_name),
1343				 "%s%s", dso->short_name, section_name);
1344
1345			curr_map = map_groups__find_by_name(kmap->kmaps, map->type, dso_name);
1346			if (curr_map == NULL) {
1347				u64 start = sym.st_value;
1348
1349				if (kmodule)
1350					start += map->start + shdr.sh_offset;
 
1351
1352				curr_dso = dso__new(dso_name);
1353				if (curr_dso == NULL)
1354					goto out_elf_end;
1355				curr_dso->kernel = dso->kernel;
1356				curr_dso->long_name = dso->long_name;
1357				curr_dso->long_name_len = dso->long_name_len;
1358				curr_map = map__new2(start, curr_dso,
1359						     map->type);
1360				if (curr_map == NULL) {
1361					dso__delete(curr_dso);
1362					goto out_elf_end;
1363				}
1364				curr_map->map_ip = identity__map_ip;
1365				curr_map->unmap_ip = identity__map_ip;
1366				curr_dso->symtab_type = dso->symtab_type;
1367				map_groups__insert(kmap->kmaps, curr_map);
1368				dsos__add(&dso->node, curr_dso);
1369				dso__set_loaded(curr_dso, map->type);
1370			} else
1371				curr_dso = curr_map->dso;
1372
1373			goto new_symbol;
1374		}
1375
1376		if (curr_dso->adjust_symbols) {
1377			pr_debug4("%s: adjusting symbol: st_value: %#" PRIx64 " "
1378				  "sh_addr: %#" PRIx64 " sh_offset: %#" PRIx64 "\n", __func__,
1379				  (u64)sym.st_value, (u64)shdr.sh_addr,
1380				  (u64)shdr.sh_offset);
1381			sym.st_value -= shdr.sh_addr - shdr.sh_offset;
1382		}
1383		/*
1384		 * We need to figure out if the object was created from C++ sources
1385		 * DWARF DW_compile_unit has this, but we don't always have access
1386		 * to it...
1387		 */
1388		demangled = bfd_demangle(NULL, elf_name, DMGL_PARAMS | DMGL_ANSI);
1389		if (demangled != NULL)
1390			elf_name = demangled;
1391new_symbol:
1392		f = symbol__new(sym.st_value, sym.st_size,
1393				GELF_ST_BIND(sym.st_info), elf_name);
1394		free(demangled);
1395		if (!f)
1396			goto out_elf_end;
1397
1398		if (filter && filter(curr_map, f))
1399			symbol__delete(f);
1400		else {
1401			symbols__insert(&curr_dso->symbols[curr_map->type], f);
1402			nr++;
1403		}
1404	}
1405
1406	/*
1407	 * For misannotated, zeroed, ASM function sizes.
1408	 */
1409	if (nr > 0) {
1410		symbols__fixup_duplicate(&dso->symbols[map->type]);
1411		symbols__fixup_end(&dso->symbols[map->type]);
1412		if (kmap) {
1413			/*
1414			 * We need to fixup this here too because we create new
1415			 * maps here, for things like vsyscall sections.
1416			 */
1417			__map_groups__fixup_end(kmap->kmaps, map->type);
1418		}
1419	}
1420	err = nr;
1421out_elf_end:
1422	elf_end(elf);
1423out_close:
1424	return err;
1425}
1426
1427static bool dso__build_id_equal(const struct dso *dso, u8 *build_id)
1428{
1429	return memcmp(dso->build_id, build_id, sizeof(dso->build_id)) == 0;
 
 
 
 
 
 
1430}
1431
1432bool __dsos__read_build_ids(struct list_head *head, bool with_hits)
 
 
 
 
1433{
1434	bool have_build_id = false;
1435	struct dso *pos;
1436
1437	list_for_each_entry(pos, head, node) {
1438		if (with_hits && !pos->hit)
1439			continue;
1440		if (pos->has_build_id) {
1441			have_build_id = true;
1442			continue;
1443		}
1444		if (filename__read_build_id(pos->long_name, pos->build_id,
1445					    sizeof(pos->build_id)) > 0) {
1446			have_build_id	  = true;
1447			pos->has_build_id = true;
1448		}
1449	}
1450
1451	return have_build_id;
1452}
1453
1454/*
1455 * Align offset to 4 bytes as needed for note name and descriptor data.
1456 */
1457#define NOTE_ALIGN(n) (((n) + 3) & -4U)
 
 
 
 
 
 
1458
1459static int elf_read_build_id(Elf *elf, void *bf, size_t size)
1460{
1461	int err = -1;
1462	GElf_Ehdr ehdr;
1463	GElf_Shdr shdr;
1464	Elf_Data *data;
1465	Elf_Scn *sec;
1466	Elf_Kind ek;
1467	void *ptr;
1468
1469	if (size < BUILD_ID_SIZE)
1470		goto out;
1471
1472	ek = elf_kind(elf);
1473	if (ek != ELF_K_ELF)
1474		goto out;
1475
1476	if (gelf_getehdr(elf, &ehdr) == NULL) {
1477		pr_err("%s: cannot get elf header.\n", __func__);
1478		goto out;
 
1479	}
1480
1481	sec = elf_section_by_name(elf, &ehdr, &shdr,
1482				  ".note.gnu.build-id", NULL);
1483	if (sec == NULL) {
1484		sec = elf_section_by_name(elf, &ehdr, &shdr,
1485					  ".notes", NULL);
1486		if (sec == NULL)
1487			goto out;
1488	}
1489
1490	data = elf_getdata(sec, NULL);
1491	if (data == NULL)
1492		goto out;
 
 
 
1493
1494	ptr = data->d_buf;
1495	while (ptr < (data->d_buf + data->d_size)) {
1496		GElf_Nhdr *nhdr = ptr;
1497		size_t namesz = NOTE_ALIGN(nhdr->n_namesz),
1498		       descsz = NOTE_ALIGN(nhdr->n_descsz);
1499		const char *name;
1500
1501		ptr += sizeof(*nhdr);
1502		name = ptr;
1503		ptr += namesz;
1504		if (nhdr->n_type == NT_GNU_BUILD_ID &&
1505		    nhdr->n_namesz == sizeof("GNU")) {
1506			if (memcmp(name, "GNU", sizeof("GNU")) == 0) {
1507				size_t sz = min(size, descsz);
1508				memcpy(bf, ptr, sz);
1509				memset(bf + sz, 0, size - sz);
1510				err = descsz;
1511				break;
1512			}
1513		}
1514		ptr += descsz;
 
 
 
 
 
 
1515	}
1516
1517out:
1518	return err;
1519}
1520
1521int filename__read_build_id(const char *filename, void *bf, size_t size)
1522{
1523	int fd, err = -1;
1524	Elf *elf;
 
 
 
 
1525
1526	if (size < BUILD_ID_SIZE)
1527		goto out;
 
 
 
 
 
 
 
 
1528
1529	fd = open(filename, O_RDONLY);
1530	if (fd < 0)
1531		goto out;
 
 
1532
1533	elf = elf_begin(fd, PERF_ELF_C_READ_MMAP, NULL);
1534	if (elf == NULL) {
1535		pr_debug2("%s: cannot read %s ELF file.\n", __func__, filename);
1536		goto out_close;
1537	}
 
 
 
1538
1539	err = elf_read_build_id(elf, bf, size);
 
 
1540
1541	elf_end(elf);
 
 
1542out_close:
1543	close(fd);
1544out:
1545	return err;
1546}
 
1547
1548int sysfs__read_build_id(const char *filename, void *build_id, size_t size)
 
1549{
1550	int fd, err = -1;
1551
1552	if (size < BUILD_ID_SIZE)
1553		goto out;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1554
1555	fd = open(filename, O_RDONLY);
1556	if (fd < 0)
1557		goto out;
 
 
 
 
 
 
 
 
 
1558
1559	while (1) {
1560		char bf[BUFSIZ];
1561		GElf_Nhdr nhdr;
1562		size_t namesz, descsz;
 
 
 
 
 
 
 
 
 
1563
1564		if (read(fd, &nhdr, sizeof(nhdr)) != sizeof(nhdr))
1565			break;
1566
1567		namesz = NOTE_ALIGN(nhdr.n_namesz);
1568		descsz = NOTE_ALIGN(nhdr.n_descsz);
1569		if (nhdr.n_type == NT_GNU_BUILD_ID &&
1570		    nhdr.n_namesz == sizeof("GNU")) {
1571			if (read(fd, bf, namesz) != (ssize_t)namesz)
1572				break;
1573			if (memcmp(bf, "GNU", sizeof("GNU")) == 0) {
1574				size_t sz = min(descsz, size);
1575				if (read(fd, build_id, sz) == (ssize_t)sz) {
1576					memset(build_id + sz, 0, size - sz);
1577					err = 0;
1578					break;
1579				}
1580			} else if (read(fd, bf, descsz) != (ssize_t)descsz)
1581				break;
1582		} else {
1583			int n = namesz + descsz;
1584			if (read(fd, bf, n) != n)
1585				break;
1586		}
1587	}
1588	close(fd);
1589out:
1590	return err;
1591}
1592
1593char dso__symtab_origin(const struct dso *dso)
1594{
1595	static const char origin[] = {
1596		[SYMTAB__KALLSYMS]	      = 'k',
1597		[SYMTAB__JAVA_JIT]	      = 'j',
1598		[SYMTAB__BUILD_ID_CACHE]      = 'B',
1599		[SYMTAB__FEDORA_DEBUGINFO]    = 'f',
1600		[SYMTAB__UBUNTU_DEBUGINFO]    = 'u',
1601		[SYMTAB__BUILDID_DEBUGINFO]   = 'b',
1602		[SYMTAB__SYSTEM_PATH_DSO]     = 'd',
1603		[SYMTAB__SYSTEM_PATH_KMODULE] = 'K',
1604		[SYMTAB__GUEST_KALLSYMS]      =  'g',
1605		[SYMTAB__GUEST_KMODULE]	      =  'G',
1606	};
1607
1608	if (dso == NULL || dso->symtab_type == SYMTAB__NOT_FOUND)
1609		return '!';
1610	return origin[dso->symtab_type];
 
 
 
 
1611}
1612
1613int dso__load(struct dso *dso, struct map *map, symbol_filter_t filter)
1614{
1615	int size = PATH_MAX;
1616	char *name;
1617	int ret = -1;
1618	int fd;
1619	struct machine *machine;
1620	const char *root_dir;
1621	int want_symtab;
1622
1623	dso__set_loaded(dso, map->type);
1624
1625	if (dso->kernel == DSO_TYPE_KERNEL)
1626		return dso__load_kernel_sym(dso, map, filter);
1627	else if (dso->kernel == DSO_TYPE_GUEST_KERNEL)
1628		return dso__load_guest_kernel_sym(dso, map, filter);
 
 
 
 
 
 
 
 
 
1629
1630	if (map->groups && map->groups->machine)
1631		machine = map->groups->machine;
1632	else
1633		machine = NULL;
 
 
 
 
1634
1635	name = malloc(size);
1636	if (!name)
1637		return -1;
 
 
 
 
 
 
 
 
 
 
 
 
 
1638
1639	dso->adjust_symbols = 0;
1640
1641	if (strncmp(dso->name, "/tmp/perf-", 10) == 0) {
1642		struct stat st;
 
 
 
 
1643
1644		if (lstat(dso->name, &st) < 0)
1645			return -1;
1646
1647		if (st.st_uid && (st.st_uid != geteuid())) {
1648			pr_warning("File %s not owned by current user or root, "
1649				"ignoring it.\n", dso->name);
1650			return -1;
1651		}
1652
1653		ret = dso__load_perf_map(dso, map, filter);
1654		dso->symtab_type = ret > 0 ? SYMTAB__JAVA_JIT :
1655					      SYMTAB__NOT_FOUND;
1656		return ret;
 
 
 
 
 
1657	}
1658
1659	/* Iterate over candidate debug images.
1660	 * On the first pass, only load images if they have a full symtab.
1661	 * Failing that, do a second pass where we accept .dynsym also
 
1662	 */
1663	want_symtab = 1;
1664restart:
1665	for (dso->symtab_type = SYMTAB__BUILD_ID_CACHE;
1666	     dso->symtab_type != SYMTAB__NOT_FOUND;
1667	     dso->symtab_type++) {
1668		switch (dso->symtab_type) {
1669		case SYMTAB__BUILD_ID_CACHE:
1670			/* skip the locally configured cache if a symfs is given */
1671			if (symbol_conf.symfs[0] ||
1672			    (dso__build_id_filename(dso, name, size) == NULL)) {
1673				continue;
1674			}
1675			break;
1676		case SYMTAB__FEDORA_DEBUGINFO:
1677			snprintf(name, size, "%s/usr/lib/debug%s.debug",
1678				 symbol_conf.symfs, dso->long_name);
1679			break;
1680		case SYMTAB__UBUNTU_DEBUGINFO:
1681			snprintf(name, size, "%s/usr/lib/debug%s",
1682				 symbol_conf.symfs, dso->long_name);
1683			break;
1684		case SYMTAB__BUILDID_DEBUGINFO: {
1685			char build_id_hex[BUILD_ID_SIZE * 2 + 1];
1686
1687			if (!dso->has_build_id)
1688				continue;
1689
1690			build_id__sprintf(dso->build_id,
1691					  sizeof(dso->build_id),
1692					  build_id_hex);
1693			snprintf(name, size,
1694				 "%s/usr/lib/debug/.build-id/%.2s/%s.debug",
1695				 symbol_conf.symfs, build_id_hex, build_id_hex + 2);
1696			}
1697			break;
1698		case SYMTAB__SYSTEM_PATH_DSO:
1699			snprintf(name, size, "%s%s",
1700			     symbol_conf.symfs, dso->long_name);
1701			break;
1702		case SYMTAB__GUEST_KMODULE:
1703			if (map->groups && machine)
1704				root_dir = machine->root_dir;
1705			else
1706				root_dir = "";
1707			snprintf(name, size, "%s%s%s", symbol_conf.symfs,
1708				 root_dir, dso->long_name);
1709			break;
1710
1711		case SYMTAB__SYSTEM_PATH_KMODULE:
1712			snprintf(name, size, "%s%s", symbol_conf.symfs,
1713				 dso->long_name);
1714			break;
1715		default:;
1716		}
1717
1718		/* Name is now the name of the next image to try */
1719		fd = open(name, O_RDONLY);
1720		if (fd < 0)
1721			continue;
1722
1723		ret = dso__load_sym(dso, map, name, fd, filter, 0,
1724				    want_symtab);
1725		close(fd);
1726
1727		/*
1728		 * Some people seem to have debuginfo files _WITHOUT_ debug
1729		 * info!?!?
1730		 */
1731		if (!ret)
1732			continue;
 
1733
1734		if (ret > 0) {
1735			int nr_plt;
1736
1737			nr_plt = dso__synthesize_plt_symbols(dso, name, map, filter);
1738			if (nr_plt > 0)
1739				ret += nr_plt;
1740			break;
1741		}
1742	}
1743
1744	/*
1745	 * If we wanted a full symtab but no image had one,
1746	 * relax our requirements and repeat the search.
1747	 */
1748	if (ret <= 0 && want_symtab) {
1749		want_symtab = 0;
1750		goto restart;
1751	}
1752
1753	free(name);
1754	if (ret < 0 && strstr(dso->name, " (deleted)") != NULL)
1755		return 0;
1756	return ret;
1757}
1758
1759struct map *map_groups__find_by_name(struct map_groups *mg,
1760				     enum map_type type, const char *name)
1761{
1762	struct rb_node *nd;
1763
1764	for (nd = rb_first(&mg->maps[type]); nd; nd = rb_next(nd)) {
1765		struct map *map = rb_entry(nd, struct map, rb_node);
1766
1767		if (map->dso && strcmp(map->dso->short_name, name) == 0)
1768			return map;
1769	}
1770
1771	return NULL;
1772}
1773
1774static int dso__kernel_module_get_build_id(struct dso *dso,
1775					   const char *root_dir)
1776{
1777	char filename[PATH_MAX];
1778	/*
1779	 * kernel module short names are of the form "[module]" and
1780	 * we need just "module" here.
1781	 */
1782	const char *name = dso->short_name + 1;
1783
1784	snprintf(filename, sizeof(filename),
1785		 "%s/sys/module/%.*s/notes/.note.gnu.build-id",
1786		 root_dir, (int)strlen(name) - 1, name);
1787
1788	if (sysfs__read_build_id(filename, dso->build_id,
1789				 sizeof(dso->build_id)) == 0)
1790		dso->has_build_id = true;
1791
1792	return 0;
1793}
1794
1795static int map_groups__set_modules_path_dir(struct map_groups *mg,
1796				const char *dir_name)
1797{
1798	struct dirent *dent;
1799	DIR *dir = opendir(dir_name);
1800	int ret = 0;
1801
1802	if (!dir) {
1803		pr_debug("%s: cannot open %s dir\n", __func__, dir_name);
1804		return -1;
1805	}
1806
1807	while ((dent = readdir(dir)) != NULL) {
1808		char path[PATH_MAX];
1809		struct stat st;
1810
1811		/*sshfs might return bad dent->d_type, so we have to stat*/
1812		snprintf(path, sizeof(path), "%s/%s", dir_name, dent->d_name);
1813		if (stat(path, &st))
1814			continue;
1815
1816		if (S_ISDIR(st.st_mode)) {
1817			if (!strcmp(dent->d_name, ".") ||
1818			    !strcmp(dent->d_name, ".."))
1819				continue;
1820
1821			ret = map_groups__set_modules_path_dir(mg, path);
1822			if (ret < 0)
1823				goto out;
1824		} else {
1825			char *dot = strrchr(dent->d_name, '.'),
1826			     dso_name[PATH_MAX];
1827			struct map *map;
1828			char *long_name;
1829
1830			if (dot == NULL || strcmp(dot, ".ko"))
1831				continue;
1832			snprintf(dso_name, sizeof(dso_name), "[%.*s]",
1833				 (int)(dot - dent->d_name), dent->d_name);
1834
1835			strxfrchar(dso_name, '-', '_');
1836			map = map_groups__find_by_name(mg, MAP__FUNCTION,
1837						       dso_name);
1838			if (map == NULL)
1839				continue;
1840
1841			long_name = strdup(path);
1842			if (long_name == NULL) {
1843				ret = -1;
1844				goto out;
1845			}
1846			dso__set_long_name(map->dso, long_name);
1847			map->dso->lname_alloc = 1;
1848			dso__kernel_module_get_build_id(map->dso, "");
1849		}
1850	}
1851
 
 
 
 
 
 
1852out:
1853	closedir(dir);
 
 
 
1854	return ret;
1855}
1856
1857static char *get_kernel_version(const char *root_dir)
1858{
1859	char version[PATH_MAX];
1860	FILE *file;
1861	char *name, *tmp;
1862	const char *prefix = "Linux version ";
1863
1864	sprintf(version, "%s/proc/version", root_dir);
1865	file = fopen(version, "r");
1866	if (!file)
1867		return NULL;
1868
1869	version[0] = '\0';
1870	tmp = fgets(version, sizeof(version), file);
1871	fclose(file);
1872
1873	name = strstr(version, prefix);
1874	if (!name)
1875		return NULL;
1876	name += strlen(prefix);
1877	tmp = strchr(name, ' ');
1878	if (tmp)
1879		*tmp = '\0';
1880
1881	return strdup(name);
 
 
1882}
1883
1884static int machine__set_modules_path(struct machine *machine)
1885{
1886	char *version;
1887	char modules_path[PATH_MAX];
 
1888
1889	version = get_kernel_version(machine->root_dir);
1890	if (!version)
1891		return -1;
1892
1893	snprintf(modules_path, sizeof(modules_path), "%s/lib/modules/%s/kernel",
1894		 machine->root_dir, version);
1895	free(version);
1896
1897	return map_groups__set_modules_path_dir(&machine->kmaps, modules_path);
1898}
1899
1900/*
1901 * Constructor variant for modules (where we know from /proc/modules where
1902 * they are loaded) and for vmlinux, where only after we load all the
1903 * symbols we'll know where it starts and ends.
1904 */
1905static struct map *map__new2(u64 start, struct dso *dso, enum map_type type)
1906{
1907	struct map *map = calloc(1, (sizeof(*map) +
1908				     (dso->kernel ? sizeof(struct kmap) : 0)));
1909	if (map != NULL) {
1910		/*
1911		 * ->end will be filled after we load all the symbols
1912		 */
1913		map__init(map, type, start, 0, 0, dso);
1914	}
1915
1916	return map;
 
1917}
1918
1919struct map *machine__new_module(struct machine *machine, u64 start,
1920				const char *filename)
1921{
1922	struct map *map;
1923	struct dso *dso = __dsos__findnew(&machine->kernel_dsos, filename);
1924
1925	if (dso == NULL)
1926		return NULL;
1927
1928	map = map__new2(start, dso, MAP__FUNCTION);
1929	if (map == NULL)
1930		return NULL;
1931
1932	if (machine__is_host(machine))
1933		dso->symtab_type = SYMTAB__SYSTEM_PATH_KMODULE;
1934	else
1935		dso->symtab_type = SYMTAB__GUEST_KMODULE;
1936	map_groups__insert(&machine->kmaps, map);
1937	return map;
1938}
1939
1940static int machine__create_modules(struct machine *machine)
1941{
1942	char *line = NULL;
1943	size_t n;
1944	FILE *file;
1945	struct map *map;
1946	const char *modules;
1947	char path[PATH_MAX];
1948
1949	if (machine__is_default_guest(machine))
1950		modules = symbol_conf.default_guest_modules;
1951	else {
1952		sprintf(path, "%s/proc/modules", machine->root_dir);
1953		modules = path;
1954	}
1955
1956	if (symbol__restricted_filename(path, "/proc/modules"))
1957		return -1;
1958
1959	file = fopen(modules, "r");
1960	if (file == NULL)
1961		return -1;
1962
1963	while (!feof(file)) {
1964		char name[PATH_MAX];
1965		u64 start;
1966		char *sep;
1967		int line_len;
1968
1969		line_len = getline(&line, &n, file);
1970		if (line_len < 0)
1971			break;
1972
1973		if (!line)
1974			goto out_failure;
1975
1976		line[--line_len] = '\0'; /* \n */
1977
1978		sep = strrchr(line, 'x');
1979		if (sep == NULL)
1980			continue;
1981
1982		hex2u64(sep + 1, &start);
1983
1984		sep = strchr(line, ' ');
1985		if (sep == NULL)
1986			continue;
1987
1988		*sep = '\0';
1989
1990		snprintf(name, sizeof(name), "[%s]", line);
1991		map = machine__new_module(machine, start, name);
1992		if (map == NULL)
1993			goto out_delete_line;
1994		dso__kernel_module_get_build_id(map->dso, machine->root_dir);
1995	}
 
 
 
 
 
 
 
 
1996
1997	free(line);
1998	fclose(file);
 
 
 
 
1999
2000	return machine__set_modules_path(machine);
2001
2002out_delete_line:
2003	free(line);
2004out_failure:
2005	return -1;
2006}
2007
2008int dso__load_vmlinux(struct dso *dso, struct map *map,
2009		      const char *vmlinux, symbol_filter_t filter)
2010{
2011	int err = -1, fd;
 
2012	char symfs_vmlinux[PATH_MAX];
 
2013
2014	snprintf(symfs_vmlinux, sizeof(symfs_vmlinux), "%s%s",
2015		 symbol_conf.symfs, vmlinux);
2016	fd = open(symfs_vmlinux, O_RDONLY);
2017	if (fd < 0)
 
 
 
 
 
 
 
2018		return -1;
2019
2020	dso__set_long_name(dso, (char *)vmlinux);
2021	dso__set_loaded(dso, map->type);
2022	err = dso__load_sym(dso, map, symfs_vmlinux, fd, filter, 0, 0);
2023	close(fd);
2024
2025	if (err > 0)
 
 
 
 
 
 
2026		pr_debug("Using %s for symbols\n", symfs_vmlinux);
 
2027
2028	return err;
2029}
2030
2031int dso__load_vmlinux_path(struct dso *dso, struct map *map,
2032			   symbol_filter_t filter)
2033{
2034	int i, err = 0;
2035	char *filename;
2036
2037	pr_debug("Looking at the vmlinux_path (%d entries long)\n",
2038		 vmlinux_path__nr_entries + 1);
2039
2040	filename = dso__build_id_filename(dso, NULL, 0);
 
 
 
 
 
 
 
2041	if (filename != NULL) {
2042		err = dso__load_vmlinux(dso, map, filename, filter);
2043		if (err > 0) {
2044			dso__set_long_name(dso, filename);
2045			goto out;
2046		}
2047		free(filename);
2048	}
 
 
 
2049
2050	for (i = 0; i < vmlinux_path__nr_entries; ++i) {
2051		err = dso__load_vmlinux(dso, map, vmlinux_path[i], filter);
2052		if (err > 0) {
2053			dso__set_long_name(dso, strdup(vmlinux_path[i]));
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2054			break;
2055		}
2056	}
2057out:
2058	return err;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2059}
2060
2061static int dso__load_kernel_sym(struct dso *dso, struct map *map,
2062				symbol_filter_t filter)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2063{
2064	int err;
2065	const char *kallsyms_filename = NULL;
2066	char *kallsyms_allocated_filename = NULL;
 
 
2067	/*
2068	 * Step 1: if the user specified a kallsyms or vmlinux filename, use
2069	 * it and only it, reporting errors to the user if it cannot be used.
2070	 *
2071	 * For instance, try to analyse an ARM perf.data file _without_ a
2072	 * build-id, or if the user specifies the wrong path to the right
2073	 * vmlinux file, obviously we can't fallback to another vmlinux (a
2074	 * x86_86 one, on the machine where analysis is being performed, say),
2075	 * or worse, /proc/kallsyms.
2076	 *
2077	 * If the specified file _has_ a build-id and there is a build-id
2078	 * section in the perf.data file, we will still do the expected
2079	 * validation in dso__load_vmlinux and will bail out if they don't
2080	 * match.
2081	 */
2082	if (symbol_conf.kallsyms_name != NULL) {
2083		kallsyms_filename = symbol_conf.kallsyms_name;
2084		goto do_kallsyms;
2085	}
2086
2087	if (symbol_conf.vmlinux_name != NULL) {
2088		err = dso__load_vmlinux(dso, map,
2089					symbol_conf.vmlinux_name, filter);
2090		if (err > 0) {
2091			dso__set_long_name(dso,
2092					   strdup(symbol_conf.vmlinux_name));
2093			goto out_fixup;
2094		}
2095		return err;
 
 
 
 
 
 
 
2096	}
2097
2098	if (vmlinux_path != NULL) {
2099		err = dso__load_vmlinux_path(dso, map, filter);
2100		if (err > 0)
2101			goto out_fixup;
2102	}
2103
2104	/* do not try local files if a symfs was given */
2105	if (symbol_conf.symfs[0] != 0)
2106		return -1;
2107
2108	/*
2109	 * Say the kernel DSO was created when processing the build-id header table,
2110	 * we have a build-id, so check if it is the same as the running kernel,
2111	 * using it if it is.
2112	 */
2113	if (dso->has_build_id) {
2114		u8 kallsyms_build_id[BUILD_ID_SIZE];
2115		char sbuild_id[BUILD_ID_SIZE * 2 + 1];
2116
2117		if (sysfs__read_build_id("/sys/kernel/notes", kallsyms_build_id,
2118					 sizeof(kallsyms_build_id)) == 0) {
2119			if (dso__build_id_equal(dso, kallsyms_build_id)) {
2120				kallsyms_filename = "/proc/kallsyms";
2121				goto do_kallsyms;
2122			}
2123		}
2124		/*
2125		 * Now look if we have it on the build-id cache in
2126		 * $HOME/.debug/[kernel.kallsyms].
2127		 */
2128		build_id__sprintf(dso->build_id, sizeof(dso->build_id),
2129				  sbuild_id);
2130
2131		if (asprintf(&kallsyms_allocated_filename,
2132			     "%s/.debug/[kernel.kallsyms]/%s",
2133			     getenv("HOME"), sbuild_id) == -1) {
2134			pr_err("Not enough memory for kallsyms file lookup\n");
2135			return -1;
2136		}
2137
2138		kallsyms_filename = kallsyms_allocated_filename;
2139
2140		if (access(kallsyms_filename, F_OK)) {
2141			pr_err("No kallsyms or vmlinux with build-id %s "
2142			       "was found\n", sbuild_id);
2143			free(kallsyms_allocated_filename);
2144			return -1;
2145		}
2146	} else {
2147		/*
2148		 * Last resort, if we don't have a build-id and couldn't find
2149		 * any vmlinux file, try the running kernel kallsyms table.
2150		 */
2151		kallsyms_filename = "/proc/kallsyms";
2152	}
2153
2154do_kallsyms:
2155	err = dso__load_kallsyms(dso, kallsyms_filename, map, filter);
2156	if (err > 0)
2157		pr_debug("Using %s for symbols\n", kallsyms_filename);
2158	free(kallsyms_allocated_filename);
2159
2160	if (err > 0) {
2161out_fixup:
2162		if (kallsyms_filename != NULL)
2163			dso__set_long_name(dso, strdup("[kernel.kallsyms]"));
2164		map__fixup_start(map);
2165		map__fixup_end(map);
2166	}
2167
2168	return err;
2169}
2170
2171static int dso__load_guest_kernel_sym(struct dso *dso, struct map *map,
2172				      symbol_filter_t filter)
2173{
2174	int err;
2175	const char *kallsyms_filename = NULL;
2176	struct machine *machine;
2177	char path[PATH_MAX];
2178
2179	if (!map->groups) {
2180		pr_debug("Guest kernel map hasn't the point to groups\n");
2181		return -1;
2182	}
2183	machine = map->groups->machine;
2184
2185	if (machine__is_default_guest(machine)) {
2186		/*
2187		 * if the user specified a vmlinux filename, use it and only
2188		 * it, reporting errors to the user if it cannot be used.
2189		 * Or use file guest_kallsyms inputted by user on commandline
2190		 */
2191		if (symbol_conf.default_guest_vmlinux_name != NULL) {
2192			err = dso__load_vmlinux(dso, map,
2193				symbol_conf.default_guest_vmlinux_name, filter);
2194			goto out_try_fixup;
 
2195		}
2196
2197		kallsyms_filename = symbol_conf.default_guest_kallsyms;
2198		if (!kallsyms_filename)
2199			return -1;
2200	} else {
2201		sprintf(path, "%s/proc/kallsyms", machine->root_dir);
2202		kallsyms_filename = path;
2203	}
2204
2205	err = dso__load_kallsyms(dso, kallsyms_filename, map, filter);
2206	if (err > 0)
2207		pr_debug("Using %s for symbols\n", kallsyms_filename);
2208
2209out_try_fixup:
2210	if (err > 0) {
2211		if (kallsyms_filename != NULL) {
2212			machine__mmap_name(machine, path, sizeof(path));
2213			dso__set_long_name(dso, strdup(path));
2214		}
2215		map__fixup_start(map);
2216		map__fixup_end(map);
2217	}
2218
2219	return err;
2220}
2221
2222static void dsos__add(struct list_head *head, struct dso *dso)
2223{
2224	list_add_tail(&dso->node, head);
2225}
2226
2227static struct dso *dsos__find(struct list_head *head, const char *name)
2228{
2229	struct dso *pos;
2230
2231	list_for_each_entry(pos, head, node)
2232		if (strcmp(pos->long_name, name) == 0)
2233			return pos;
2234	return NULL;
2235}
2236
2237struct dso *__dsos__findnew(struct list_head *head, const char *name)
2238{
2239	struct dso *dso = dsos__find(head, name);
2240
2241	if (!dso) {
2242		dso = dso__new(name);
2243		if (dso != NULL) {
2244			dsos__add(head, dso);
2245			dso__set_basename(dso);
2246		}
2247	}
2248
2249	return dso;
2250}
2251
2252size_t __dsos__fprintf(struct list_head *head, FILE *fp)
2253{
2254	struct dso *pos;
2255	size_t ret = 0;
2256
2257	list_for_each_entry(pos, head, node) {
2258		int i;
2259		for (i = 0; i < MAP__NR_TYPES; ++i)
2260			ret += dso__fprintf(pos, i, fp);
2261	}
2262
2263	return ret;
2264}
2265
2266size_t machines__fprintf_dsos(struct rb_root *machines, FILE *fp)
2267{
2268	struct rb_node *nd;
2269	size_t ret = 0;
2270
2271	for (nd = rb_first(machines); nd; nd = rb_next(nd)) {
2272		struct machine *pos = rb_entry(nd, struct machine, rb_node);
2273		ret += __dsos__fprintf(&pos->kernel_dsos, fp);
2274		ret += __dsos__fprintf(&pos->user_dsos, fp);
2275	}
2276
2277	return ret;
2278}
2279
2280static size_t __dsos__fprintf_buildid(struct list_head *head, FILE *fp,
2281				      bool with_hits)
2282{
2283	struct dso *pos;
2284	size_t ret = 0;
2285
2286	list_for_each_entry(pos, head, node) {
2287		if (with_hits && !pos->hit)
2288			continue;
2289		ret += dso__fprintf_buildid(pos, fp);
2290		ret += fprintf(fp, " %s\n", pos->long_name);
2291	}
2292	return ret;
2293}
2294
2295size_t machine__fprintf_dsos_buildid(struct machine *machine, FILE *fp,
2296				     bool with_hits)
2297{
2298	return __dsos__fprintf_buildid(&machine->kernel_dsos, fp, with_hits) +
2299	       __dsos__fprintf_buildid(&machine->user_dsos, fp, with_hits);
2300}
2301
2302size_t machines__fprintf_dsos_buildid(struct rb_root *machines,
2303				      FILE *fp, bool with_hits)
2304{
2305	struct rb_node *nd;
2306	size_t ret = 0;
2307
2308	for (nd = rb_first(machines); nd; nd = rb_next(nd)) {
2309		struct machine *pos = rb_entry(nd, struct machine, rb_node);
2310		ret += machine__fprintf_dsos_buildid(pos, fp, with_hits);
2311	}
2312	return ret;
2313}
 
2314
2315static struct dso*
2316dso__kernel_findnew(struct machine *machine, const char *name,
2317		    const char *short_name, int dso_type)
2318{
2319	/*
2320	 * The kernel dso could be created by build_id processing.
2321	 */
2322	struct dso *dso = __dsos__findnew(&machine->kernel_dsos, name);
2323
2324	/*
2325	 * We need to run this in all cases, since during the build_id
2326	 * processing we had no idea this was the kernel dso.
2327	 */
2328	if (dso != NULL) {
2329		dso__set_short_name(dso, short_name);
2330		dso->kernel = dso_type;
2331	}
2332
2333	return dso;
2334}
2335
2336void dso__read_running_kernel_build_id(struct dso *dso, struct machine *machine)
2337{
2338	char path[PATH_MAX];
 
 
 
2339
2340	if (machine__is_default_guest(machine))
2341		return;
2342	sprintf(path, "%s/sys/kernel/notes", machine->root_dir);
2343	if (sysfs__read_build_id(path, dso->build_id,
2344				 sizeof(dso->build_id)) == 0)
2345		dso->has_build_id = true;
2346}
2347
2348static struct dso *machine__get_kernel(struct machine *machine)
2349{
2350	const char *vmlinux_name = NULL;
2351	struct dso *kernel;
2352
2353	if (machine__is_host(machine)) {
2354		vmlinux_name = symbol_conf.vmlinux_name;
2355		if (!vmlinux_name)
2356			vmlinux_name = "[kernel.kallsyms]";
2357
2358		kernel = dso__kernel_findnew(machine, vmlinux_name,
2359					     "[kernel]",
2360					     DSO_TYPE_KERNEL);
2361	} else {
2362		char bf[PATH_MAX];
 
2363
2364		if (machine__is_default_guest(machine))
2365			vmlinux_name = symbol_conf.default_guest_vmlinux_name;
2366		if (!vmlinux_name)
2367			vmlinux_name = machine__mmap_name(machine, bf,
2368							  sizeof(bf));
2369
2370		kernel = dso__kernel_findnew(machine, vmlinux_name,
2371					     "[guest.kernel]",
2372					     DSO_TYPE_GUEST_KERNEL);
 
2373	}
2374
2375	if (kernel != NULL && (!kernel->has_build_id))
2376		dso__read_running_kernel_build_id(kernel, machine);
2377
2378	return kernel;
 
 
2379}
2380
2381struct process_args {
2382	u64 start;
2383};
2384
2385static int symbol__in_kernel(void *arg, const char *name,
2386			     char type __used, u64 start, u64 end __used)
2387{
2388	struct process_args *args = arg;
2389
2390	if (strchr(name, '['))
2391		return 0;
2392
2393	args->start = start;
2394	return 1;
2395}
2396
2397/* Figure out the start address of kernel map from /proc/kallsyms */
2398static u64 machine__get_kernel_start_addr(struct machine *machine)
2399{
2400	const char *filename;
2401	char path[PATH_MAX];
2402	struct process_args args;
2403
2404	if (machine__is_host(machine)) {
2405		filename = "/proc/kallsyms";
2406	} else {
2407		if (machine__is_default_guest(machine))
2408			filename = (char *)symbol_conf.default_guest_kallsyms;
2409		else {
2410			sprintf(path, "%s/proc/kallsyms", machine->root_dir);
2411			filename = path;
2412		}
2413	}
2414
2415	if (symbol__restricted_filename(filename, "/proc/kallsyms"))
2416		return 0;
2417
2418	if (kallsyms__parse(filename, &args, symbol__in_kernel) <= 0)
2419		return 0;
2420
2421	return args.start;
2422}
2423
2424int __machine__create_kernel_maps(struct machine *machine, struct dso *kernel)
 
2425{
2426	enum map_type type;
2427	u64 start = machine__get_kernel_start_addr(machine);
2428
2429	for (type = 0; type < MAP__NR_TYPES; ++type) {
2430		struct kmap *kmap;
2431
2432		machine->vmlinux_maps[type] = map__new2(start, kernel, type);
2433		if (machine->vmlinux_maps[type] == NULL)
2434			return -1;
2435
2436		machine->vmlinux_maps[type]->map_ip =
2437			machine->vmlinux_maps[type]->unmap_ip =
2438				identity__map_ip;
2439		kmap = map__kmap(machine->vmlinux_maps[type]);
2440		kmap->kmaps = &machine->kmaps;
2441		map_groups__insert(&machine->kmaps,
2442				   machine->vmlinux_maps[type]);
2443	}
2444
2445	return 0;
2446}
2447
2448void machine__destroy_kernel_maps(struct machine *machine)
2449{
2450	enum map_type type;
 
 
 
 
2451
2452	for (type = 0; type < MAP__NR_TYPES; ++type) {
2453		struct kmap *kmap;
 
2454
2455		if (machine->vmlinux_maps[type] == NULL)
 
 
 
2456			continue;
2457
2458		kmap = map__kmap(machine->vmlinux_maps[type]);
2459		map_groups__remove(&machine->kmaps,
2460				   machine->vmlinux_maps[type]);
2461		if (kmap->ref_reloc_sym) {
2462			/*
2463			 * ref_reloc_sym is shared among all maps, so free just
2464			 * on one of them.
2465			 */
2466			if (type == MAP__FUNCTION) {
2467				free((char *)kmap->ref_reloc_sym->name);
2468				kmap->ref_reloc_sym->name = NULL;
2469				free(kmap->ref_reloc_sym);
2470			}
2471			kmap->ref_reloc_sym = NULL;
2472		}
2473
2474		map__delete(machine->vmlinux_maps[type]);
2475		machine->vmlinux_maps[type] = NULL;
2476	}
2477}
2478
2479int machine__create_kernel_maps(struct machine *machine)
2480{
2481	struct dso *kernel = machine__get_kernel(machine);
2482
2483	if (kernel == NULL ||
2484	    __machine__create_kernel_maps(machine, kernel) < 0)
2485		return -1;
2486
2487	if (symbol_conf.use_modules && machine__create_modules(machine) < 0)
2488		pr_debug("Problems creating module maps, continuing anyway...\n");
2489	/*
2490	 * Now that we have all the maps created, just set the ->end of them:
2491	 */
2492	map_groups__fixup_end(&machine->kmaps);
2493	return 0;
2494}
2495
2496static void vmlinux_path__exit(void)
2497{
2498	while (--vmlinux_path__nr_entries >= 0) {
2499		free(vmlinux_path[vmlinux_path__nr_entries]);
2500		vmlinux_path[vmlinux_path__nr_entries] = NULL;
2501	}
2502
2503	free(vmlinux_path);
2504	vmlinux_path = NULL;
2505}
2506
2507static int vmlinux_path__init(void)
2508{
2509	struct utsname uts;
2510	char bf[PATH_MAX];
2511
2512	vmlinux_path = malloc(sizeof(char *) * 5);
2513	if (vmlinux_path == NULL)
2514		return -1;
2515
2516	vmlinux_path[vmlinux_path__nr_entries] = strdup("vmlinux");
2517	if (vmlinux_path[vmlinux_path__nr_entries] == NULL)
2518		goto out_fail;
2519	++vmlinux_path__nr_entries;
2520	vmlinux_path[vmlinux_path__nr_entries] = strdup("/boot/vmlinux");
2521	if (vmlinux_path[vmlinux_path__nr_entries] == NULL)
2522		goto out_fail;
2523	++vmlinux_path__nr_entries;
2524
2525	/* only try running kernel version if no symfs was given */
2526	if (symbol_conf.symfs[0] != 0)
2527		return 0;
2528
2529	if (uname(&uts) < 0)
2530		return -1;
2531
2532	snprintf(bf, sizeof(bf), "/boot/vmlinux-%s", uts.release);
2533	vmlinux_path[vmlinux_path__nr_entries] = strdup(bf);
2534	if (vmlinux_path[vmlinux_path__nr_entries] == NULL)
2535		goto out_fail;
2536	++vmlinux_path__nr_entries;
2537	snprintf(bf, sizeof(bf), "/lib/modules/%s/build/vmlinux", uts.release);
2538	vmlinux_path[vmlinux_path__nr_entries] = strdup(bf);
2539	if (vmlinux_path[vmlinux_path__nr_entries] == NULL)
2540		goto out_fail;
2541	++vmlinux_path__nr_entries;
2542	snprintf(bf, sizeof(bf), "/usr/lib/debug/lib/modules/%s/vmlinux",
2543		 uts.release);
2544	vmlinux_path[vmlinux_path__nr_entries] = strdup(bf);
2545	if (vmlinux_path[vmlinux_path__nr_entries] == NULL)
2546		goto out_fail;
2547	++vmlinux_path__nr_entries;
2548
2549	return 0;
2550
2551out_fail:
2552	vmlinux_path__exit();
2553	return -1;
2554}
2555
2556size_t machine__fprintf_vmlinux_path(struct machine *machine, FILE *fp)
2557{
2558	int i;
2559	size_t printed = 0;
2560	struct dso *kdso = machine->vmlinux_maps[MAP__FUNCTION]->dso;
2561
2562	if (kdso->has_build_id) {
2563		char filename[PATH_MAX];
2564		if (dso__build_id_filename(kdso, filename, sizeof(filename)))
2565			printed += fprintf(fp, "[0] %s\n", filename);
2566	}
2567
2568	for (i = 0; i < vmlinux_path__nr_entries; ++i)
2569		printed += fprintf(fp, "[%d] %s\n",
2570				   i + kdso->has_build_id, vmlinux_path[i]);
 
 
2571
2572	return printed;
2573}
2574
2575static int setup_list(struct strlist **list, const char *list_str,
2576		      const char *list_name)
2577{
2578	if (list_str == NULL)
2579		return 0;
2580
2581	*list = strlist__new(true, list_str);
2582	if (!*list) {
2583		pr_err("problems parsing %s list\n", list_name);
2584		return -1;
2585	}
2586	return 0;
2587}
2588
2589static bool symbol__read_kptr_restrict(void)
2590{
2591	bool value = false;
2592
2593	if (geteuid() != 0) {
2594		FILE *fp = fopen("/proc/sys/kernel/kptr_restrict", "r");
2595		if (fp != NULL) {
2596			char line[8];
2597
2598			if (fgets(line, sizeof(line), fp) != NULL)
2599				value = atoi(line) != 0;
2600
2601			fclose(fp);
2602		}
2603	}
2604
2605	return value;
2606}
2607
2608int symbol__init(void)
2609{
2610	const char *symfs;
2611
2612	if (symbol_conf.initialized)
2613		return 0;
2614
2615	symbol_conf.priv_size = ALIGN(symbol_conf.priv_size, sizeof(u64));
 
 
2616
2617	elf_version(EV_CURRENT);
2618	if (symbol_conf.sort_by_name)
2619		symbol_conf.priv_size += (sizeof(struct symbol_name_rb_node) -
2620					  sizeof(struct symbol));
2621
2622	if (symbol_conf.try_vmlinux_path && vmlinux_path__init() < 0)
2623		return -1;
2624
2625	if (symbol_conf.field_sep && *symbol_conf.field_sep == '.') {
2626		pr_err("'.' is the only non valid --field-separator argument\n");
2627		return -1;
2628	}
2629
2630	if (setup_list(&symbol_conf.dso_list,
2631		       symbol_conf.dso_list_str, "dso") < 0)
2632		return -1;
2633
2634	if (setup_list(&symbol_conf.comm_list,
2635		       symbol_conf.comm_list_str, "comm") < 0)
2636		goto out_free_dso_list;
2637
 
 
 
 
 
 
 
 
2638	if (setup_list(&symbol_conf.sym_list,
2639		       symbol_conf.sym_list_str, "symbol") < 0)
2640		goto out_free_comm_list;
 
 
 
 
 
 
 
 
2641
2642	/*
2643	 * A path to symbols of "/" is identical to ""
2644	 * reset here for simplicity.
2645	 */
2646	symfs = realpath(symbol_conf.symfs, NULL);
2647	if (symfs == NULL)
2648		symfs = symbol_conf.symfs;
2649	if (strcmp(symfs, "/") == 0)
2650		symbol_conf.symfs = "";
2651	if (symfs != symbol_conf.symfs)
2652		free((void *)symfs);
2653
2654	symbol_conf.kptr_restrict = symbol__read_kptr_restrict();
2655
2656	symbol_conf.initialized = true;
2657	return 0;
2658
 
 
 
 
 
 
 
2659out_free_comm_list:
2660	strlist__delete(symbol_conf.comm_list);
2661out_free_dso_list:
2662	strlist__delete(symbol_conf.dso_list);
2663	return -1;
2664}
2665
2666void symbol__exit(void)
2667{
2668	if (!symbol_conf.initialized)
2669		return;
 
2670	strlist__delete(symbol_conf.sym_list);
2671	strlist__delete(symbol_conf.dso_list);
2672	strlist__delete(symbol_conf.comm_list);
 
 
 
2673	vmlinux_path__exit();
2674	symbol_conf.sym_list = symbol_conf.dso_list = symbol_conf.comm_list = NULL;
 
2675	symbol_conf.initialized = false;
2676}
2677
2678int machines__create_kernel_maps(struct rb_root *machines, pid_t pid)
2679{
2680	struct machine *machine = machines__findnew(machines, pid);
2681
2682	if (machine == NULL)
2683		return -1;
2684
2685	return machine__create_kernel_maps(machine);
2686}
2687
2688static int hex(char ch)
2689{
2690	if ((ch >= '0') && (ch <= '9'))
2691		return ch - '0';
2692	if ((ch >= 'a') && (ch <= 'f'))
2693		return ch - 'a' + 10;
2694	if ((ch >= 'A') && (ch <= 'F'))
2695		return ch - 'A' + 10;
2696	return -1;
2697}
2698
2699/*
2700 * While we find nice hex chars, build a long_val.
2701 * Return number of chars processed.
2702 */
2703int hex2u64(const char *ptr, u64 *long_val)
2704{
2705	const char *p = ptr;
2706	*long_val = 0;
2707
2708	while (*p) {
2709		const int hex_val = hex(*p);
2710
2711		if (hex_val < 0)
2712			break;
2713
2714		*long_val = (*long_val << 4) | hex_val;
2715		p++;
2716	}
2717
2718	return p - ptr;
2719}
2720
2721char *strxfrchar(char *s, char from, char to)
2722{
2723	char *p = s;
2724
2725	while ((p = strchr(p, from)) != NULL)
2726		*p++ = to;
2727
2728	return s;
2729}
2730
2731int machines__create_guest_kernel_maps(struct rb_root *machines)
2732{
2733	int ret = 0;
2734	struct dirent **namelist = NULL;
2735	int i, items = 0;
2736	char path[PATH_MAX];
2737	pid_t pid;
2738
2739	if (symbol_conf.default_guest_vmlinux_name ||
2740	    symbol_conf.default_guest_modules ||
2741	    symbol_conf.default_guest_kallsyms) {
2742		machines__create_kernel_maps(machines, DEFAULT_GUEST_KERNEL_ID);
2743	}
2744
2745	if (symbol_conf.guestmount) {
2746		items = scandir(symbol_conf.guestmount, &namelist, NULL, NULL);
2747		if (items <= 0)
2748			return -ENOENT;
2749		for (i = 0; i < items; i++) {
2750			if (!isdigit(namelist[i]->d_name[0])) {
2751				/* Filter out . and .. */
2752				continue;
2753			}
2754			pid = atoi(namelist[i]->d_name);
2755			sprintf(path, "%s/%s/proc/kallsyms",
2756				symbol_conf.guestmount,
2757				namelist[i]->d_name);
2758			ret = access(path, R_OK);
2759			if (ret) {
2760				pr_debug("Can't access file %s\n", path);
2761				goto failure;
2762			}
2763			machines__create_kernel_maps(machines, pid);
2764		}
2765failure:
2766		free(namelist);
2767	}
2768
2769	return ret;
2770}
2771
2772void machines__destroy_guest_kernel_maps(struct rb_root *machines)
2773{
2774	struct rb_node *next = rb_first(machines);
 
 
 
2775
2776	while (next) {
2777		struct machine *pos = rb_entry(next, struct machine, rb_node);
2778
2779		next = rb_next(&pos->rb_node);
2780		rb_erase(&pos->rb_node, machines);
2781		machine__delete(pos);
2782	}
2783}
2784
2785int machine__load_kallsyms(struct machine *machine, const char *filename,
2786			   enum map_type type, symbol_filter_t filter)
2787{
2788	struct map *map = machine->vmlinux_maps[type];
2789	int ret = dso__load_kallsyms(map->dso, filename, map, filter);
2790
2791	if (ret > 0) {
2792		dso__set_loaded(map->dso, type);
2793		/*
2794		 * Since /proc/kallsyms will have multiple sessions for the
2795		 * kernel, with modules between them, fixup the end of all
2796		 * sections.
2797		 */
2798		__map_groups__fixup_end(&machine->kmaps, type);
2799	}
2800
2801	return ret;
2802}
2803
2804int machine__load_vmlinux_path(struct machine *machine, enum map_type type,
2805			       symbol_filter_t filter)
2806{
2807	struct map *map = machine->vmlinux_maps[type];
2808	int ret = dso__load_vmlinux_path(map->dso, map, filter);
2809
2810	if (ret > 0) {
2811		dso__set_loaded(map->dso, type);
2812		map__reloc_vmlinux(map);
2813	}
2814
2815	return ret;
2816}
2817
2818struct map *dso__new_map(const char *name)
2819{
2820	struct map *map = NULL;
2821	struct dso *dso = dso__new(name);
2822
2823	if (dso)
2824		map = map__new2(0, dso, MAP__FUNCTION);
2825
2826	return map;
2827}
v5.14.15
   1// SPDX-License-Identifier: GPL-2.0
   2#include <dirent.h>
   3#include <errno.h>
   4#include <stdlib.h>
   5#include <stdio.h>
   6#include <string.h>
   7#include <linux/capability.h>
   8#include <linux/kernel.h>
   9#include <linux/mman.h>
  10#include <linux/string.h>
  11#include <linux/time64.h>
  12#include <sys/types.h>
  13#include <sys/stat.h>
  14#include <sys/param.h>
  15#include <fcntl.h>
  16#include <unistd.h>
  17#include <inttypes.h>
  18#include "annotate.h"
  19#include "build-id.h"
  20#include "cap.h"
  21#include "dso.h"
  22#include "util.h" // lsdir()
  23#include "debug.h"
  24#include "event.h"
  25#include "machine.h"
  26#include "map.h"
  27#include "symbol.h"
  28#include "map_symbol.h"
  29#include "mem-events.h"
  30#include "symsrc.h"
  31#include "strlist.h"
  32#include "intlist.h"
  33#include "namespaces.h"
  34#include "header.h"
  35#include "path.h"
  36#include <linux/ctype.h>
  37#include <linux/zalloc.h>
  38
 
 
  39#include <elf.h>
  40#include <limits.h>
  41#include <symbol/kallsyms.h>
  42#include <sys/utsname.h>
  43
  44static int dso__load_kernel_sym(struct dso *dso, struct map *map);
  45static int dso__load_guest_kernel_sym(struct dso *dso, struct map *map);
  46static bool symbol__is_idle(const char *name);
 
 
 
 
  47
  48int vmlinux_path__nr_entries;
  49char **vmlinux_path;
 
 
 
 
 
 
 
 
  50
  51struct symbol_conf symbol_conf = {
  52	.nanosecs		= false,
  53	.use_modules		= true,
  54	.try_vmlinux_path	= true,
  55	.demangle		= true,
  56	.demangle_kernel	= false,
  57	.cumulate_callchain	= true,
  58	.time_quantum		= 100 * NSEC_PER_MSEC, /* 100ms */
  59	.show_hist_headers	= true,
  60	.symfs			= "",
  61	.event_group		= true,
  62	.inline_name		= true,
  63	.res_sample		= 0,
  64};
  65
  66static enum dso_binary_type binary_type_symtab[] = {
  67	DSO_BINARY_TYPE__KALLSYMS,
  68	DSO_BINARY_TYPE__GUEST_KALLSYMS,
  69	DSO_BINARY_TYPE__JAVA_JIT,
  70	DSO_BINARY_TYPE__DEBUGLINK,
  71	DSO_BINARY_TYPE__BUILD_ID_CACHE,
  72	DSO_BINARY_TYPE__BUILD_ID_CACHE_DEBUGINFO,
  73	DSO_BINARY_TYPE__FEDORA_DEBUGINFO,
  74	DSO_BINARY_TYPE__UBUNTU_DEBUGINFO,
  75	DSO_BINARY_TYPE__BUILDID_DEBUGINFO,
  76	DSO_BINARY_TYPE__SYSTEM_PATH_DSO,
  77	DSO_BINARY_TYPE__GUEST_KMODULE,
  78	DSO_BINARY_TYPE__GUEST_KMODULE_COMP,
  79	DSO_BINARY_TYPE__SYSTEM_PATH_KMODULE,
  80	DSO_BINARY_TYPE__SYSTEM_PATH_KMODULE_COMP,
  81	DSO_BINARY_TYPE__OPENEMBEDDED_DEBUGINFO,
  82	DSO_BINARY_TYPE__MIXEDUP_UBUNTU_DEBUGINFO,
  83	DSO_BINARY_TYPE__NOT_FOUND,
  84};
  85
  86#define DSO_BINARY_TYPE__SYMTAB_CNT ARRAY_SIZE(binary_type_symtab)
 
  87
  88static bool symbol_type__filter(char symbol_type)
  89{
  90	symbol_type = toupper(symbol_type);
  91	return symbol_type == 'T' || symbol_type == 'W' || symbol_type == 'D' || symbol_type == 'B';
  92}
  93
  94static int prefix_underscores_count(const char *str)
  95{
  96	const char *tail = str;
  97
  98	while (*tail == '_')
  99		tail++;
 100
 101	return tail - str;
 102}
 103
 104void __weak arch__symbols__fixup_end(struct symbol *p, struct symbol *c)
 105{
 106	p->end = c->start;
 107}
 108
 109const char * __weak arch__normalize_symbol_name(const char *name)
 110{
 111	return name;
 112}
 113
 114int __weak arch__compare_symbol_names(const char *namea, const char *nameb)
 115{
 116	return strcmp(namea, nameb);
 
 
 
 
 
 117}
 118
 119int __weak arch__compare_symbol_names_n(const char *namea, const char *nameb,
 120					unsigned int n)
 121{
 122	return strncmp(namea, nameb, n);
 123}
 124
 125int __weak arch__choose_best_symbol(struct symbol *syma,
 126				    struct symbol *symb __maybe_unused)
 127{
 128	/* Avoid "SyS" kernel syscall aliases */
 129	if (strlen(syma->name) >= 3 && !strncmp(syma->name, "SyS", 3))
 130		return SYMBOL_B;
 131	if (strlen(syma->name) >= 10 && !strncmp(syma->name, "compat_SyS", 10))
 132		return SYMBOL_B;
 133
 134	return SYMBOL_A;
 135}
 136
 
 
 
 137static int choose_best_symbol(struct symbol *syma, struct symbol *symb)
 138{
 139	s64 a;
 140	s64 b;
 141	size_t na, nb;
 142
 143	/* Prefer a symbol with non zero length */
 144	a = syma->end - syma->start;
 145	b = symb->end - symb->start;
 146	if ((b == 0) && (a > 0))
 147		return SYMBOL_A;
 148	else if ((a == 0) && (b > 0))
 149		return SYMBOL_B;
 150
 151	/* Prefer a non weak symbol over a weak one */
 152	a = syma->binding == STB_WEAK;
 153	b = symb->binding == STB_WEAK;
 154	if (b && !a)
 155		return SYMBOL_A;
 156	if (a && !b)
 157		return SYMBOL_B;
 158
 159	/* Prefer a global symbol over a non global one */
 160	a = syma->binding == STB_GLOBAL;
 161	b = symb->binding == STB_GLOBAL;
 162	if (a && !b)
 163		return SYMBOL_A;
 164	if (b && !a)
 165		return SYMBOL_B;
 166
 167	/* Prefer a symbol with less underscores */
 168	a = prefix_underscores_count(syma->name);
 169	b = prefix_underscores_count(symb->name);
 170	if (b > a)
 171		return SYMBOL_A;
 172	else if (a > b)
 173		return SYMBOL_B;
 174
 175	/* Choose the symbol with the longest name */
 176	na = strlen(syma->name);
 177	nb = strlen(symb->name);
 178	if (na > nb)
 179		return SYMBOL_A;
 180	else if (na < nb)
 181		return SYMBOL_B;
 182
 183	return arch__choose_best_symbol(syma, symb);
 184}
 185
 186void symbols__fixup_duplicate(struct rb_root_cached *symbols)
 187{
 188	struct rb_node *nd;
 189	struct symbol *curr, *next;
 190
 191	if (symbol_conf.allow_aliases)
 192		return;
 193
 194	nd = rb_first_cached(symbols);
 195
 196	while (nd) {
 197		curr = rb_entry(nd, struct symbol, rb_node);
 198again:
 199		nd = rb_next(&curr->rb_node);
 200		next = rb_entry(nd, struct symbol, rb_node);
 201
 202		if (!nd)
 203			break;
 204
 205		if (curr->start != next->start)
 206			continue;
 207
 208		if (choose_best_symbol(curr, next) == SYMBOL_A) {
 209			rb_erase_cached(&next->rb_node, symbols);
 210			symbol__delete(next);
 211			goto again;
 212		} else {
 213			nd = rb_next(&curr->rb_node);
 214			rb_erase_cached(&curr->rb_node, symbols);
 215			symbol__delete(curr);
 216		}
 217	}
 218}
 219
 220void symbols__fixup_end(struct rb_root_cached *symbols)
 221{
 222	struct rb_node *nd, *prevnd = rb_first_cached(symbols);
 223	struct symbol *curr, *prev;
 224
 225	if (prevnd == NULL)
 226		return;
 227
 228	curr = rb_entry(prevnd, struct symbol, rb_node);
 229
 230	for (nd = rb_next(prevnd); nd; nd = rb_next(nd)) {
 231		prev = curr;
 232		curr = rb_entry(nd, struct symbol, rb_node);
 233
 234		if (prev->end == prev->start && prev->end != curr->start)
 235			arch__symbols__fixup_end(prev, curr);
 236	}
 237
 238	/* Last entry */
 239	if (curr->end == curr->start)
 240		curr->end = roundup(curr->start, 4096) + 4096;
 241}
 242
 243void maps__fixup_end(struct maps *maps)
 244{
 245	struct map *prev = NULL, *curr;
 
 246
 247	down_write(&maps->lock);
 
 248
 249	maps__for_each_entry(maps, curr) {
 250		if (prev != NULL && !prev->end)
 251			prev->end = curr->start;
 252
 
 253		prev = curr;
 
 
 254	}
 255
 256	/*
 257	 * We still haven't the actual symbols, so guess the
 258	 * last map final address.
 259	 */
 260	if (curr && !curr->end)
 261		curr->end = ~0ULL;
 262
 263	up_write(&maps->lock);
 
 
 
 
 264}
 265
 266struct symbol *symbol__new(u64 start, u64 len, u8 binding, u8 type, const char *name)
 
 267{
 268	size_t namelen = strlen(name) + 1;
 269	struct symbol *sym = calloc(1, (symbol_conf.priv_size +
 270					sizeof(*sym) + namelen));
 271	if (sym == NULL)
 272		return NULL;
 273
 274	if (symbol_conf.priv_size) {
 275		if (symbol_conf.init_annotation) {
 276			struct annotation *notes = (void *)sym;
 277			pthread_mutex_init(&notes->lock, NULL);
 278		}
 279		sym = ((void *)sym) + symbol_conf.priv_size;
 280	}
 281
 282	sym->start   = start;
 283	sym->end     = len ? start + len : start;
 284	sym->type    = type;
 285	sym->binding = binding;
 286	sym->namelen = namelen - 1;
 287
 288	pr_debug4("%s: %s %#" PRIx64 "-%#" PRIx64 "\n",
 289		  __func__, name, start, sym->end);
 290	memcpy(sym->name, name, namelen);
 291
 292	return sym;
 293}
 294
 295void symbol__delete(struct symbol *sym)
 296{
 297	free(((void *)sym) - symbol_conf.priv_size);
 298}
 299
 300void symbols__delete(struct rb_root_cached *symbols)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 301{
 302	struct symbol *pos;
 303	struct rb_node *next = rb_first_cached(symbols);
 304
 305	while (next) {
 306		pos = rb_entry(next, struct symbol, rb_node);
 307		next = rb_next(&pos->rb_node);
 308		rb_erase_cached(&pos->rb_node, symbols);
 309		symbol__delete(pos);
 310	}
 311}
 312
 313void __symbols__insert(struct rb_root_cached *symbols,
 314		       struct symbol *sym, bool kernel)
 315{
 316	struct rb_node **p = &symbols->rb_root.rb_node;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 317	struct rb_node *parent = NULL;
 318	const u64 ip = sym->start;
 319	struct symbol *s;
 320	bool leftmost = true;
 321
 322	if (kernel) {
 323		const char *name = sym->name;
 324		/*
 325		 * ppc64 uses function descriptors and appends a '.' to the
 326		 * start of every instruction address. Remove it.
 327		 */
 328		if (name[0] == '.')
 329			name++;
 330		sym->idle = symbol__is_idle(name);
 331	}
 332
 333	while (*p != NULL) {
 334		parent = *p;
 335		s = rb_entry(parent, struct symbol, rb_node);
 336		if (ip < s->start)
 337			p = &(*p)->rb_left;
 338		else {
 339			p = &(*p)->rb_right;
 340			leftmost = false;
 341		}
 342	}
 343	rb_link_node(&sym->rb_node, parent, p);
 344	rb_insert_color_cached(&sym->rb_node, symbols, leftmost);
 345}
 346
 347void symbols__insert(struct rb_root_cached *symbols, struct symbol *sym)
 348{
 349	__symbols__insert(symbols, sym, false);
 350}
 351
 352static struct symbol *symbols__find(struct rb_root_cached *symbols, u64 ip)
 353{
 354	struct rb_node *n;
 355
 356	if (symbols == NULL)
 357		return NULL;
 358
 359	n = symbols->rb_root.rb_node;
 360
 361	while (n) {
 362		struct symbol *s = rb_entry(n, struct symbol, rb_node);
 363
 364		if (ip < s->start)
 365			n = n->rb_left;
 366		else if (ip > s->end || (ip == s->end && ip != s->start))
 367			n = n->rb_right;
 368		else
 369			return s;
 370	}
 371
 372	return NULL;
 373}
 374
 375static struct symbol *symbols__first(struct rb_root_cached *symbols)
 376{
 377	struct rb_node *n = rb_first_cached(symbols);
 
 378
 379	if (n)
 380		return rb_entry(n, struct symbol, rb_node);
 381
 382	return NULL;
 383}
 384
 385static struct symbol *symbols__last(struct rb_root_cached *symbols)
 386{
 387	struct rb_node *n = rb_last(&symbols->rb_root);
 388
 389	if (n)
 390		return rb_entry(n, struct symbol, rb_node);
 391
 392	return NULL;
 393}
 394
 395static struct symbol *symbols__next(struct symbol *sym)
 396{
 397	struct rb_node *n = rb_next(&sym->rb_node);
 398
 399	if (n)
 400		return rb_entry(n, struct symbol, rb_node);
 401
 402	return NULL;
 403}
 404
 405static void symbols__insert_by_name(struct rb_root_cached *symbols, struct symbol *sym)
 406{
 407	struct rb_node **p = &symbols->rb_root.rb_node;
 408	struct rb_node *parent = NULL;
 409	struct symbol_name_rb_node *symn, *s;
 410	bool leftmost = true;
 411
 412	symn = container_of(sym, struct symbol_name_rb_node, sym);
 413
 414	while (*p != NULL) {
 415		parent = *p;
 416		s = rb_entry(parent, struct symbol_name_rb_node, rb_node);
 417		if (strcmp(sym->name, s->sym.name) < 0)
 418			p = &(*p)->rb_left;
 419		else {
 420			p = &(*p)->rb_right;
 421			leftmost = false;
 422		}
 423	}
 424	rb_link_node(&symn->rb_node, parent, p);
 425	rb_insert_color_cached(&symn->rb_node, symbols, leftmost);
 426}
 427
 428static void symbols__sort_by_name(struct rb_root_cached *symbols,
 429				  struct rb_root_cached *source)
 430{
 431	struct rb_node *nd;
 432
 433	for (nd = rb_first_cached(source); nd; nd = rb_next(nd)) {
 434		struct symbol *pos = rb_entry(nd, struct symbol, rb_node);
 435		symbols__insert_by_name(symbols, pos);
 436	}
 437}
 438
 439int symbol__match_symbol_name(const char *name, const char *str,
 440			      enum symbol_tag_include includes)
 441{
 442	const char *versioning;
 443
 444	if (includes == SYMBOL_TAG_INCLUDE__DEFAULT_ONLY &&
 445	    (versioning = strstr(name, "@@"))) {
 446		int len = strlen(str);
 447
 448		if (len < versioning - name)
 449			len = versioning - name;
 450
 451		return arch__compare_symbol_names_n(name, str, len);
 452	} else
 453		return arch__compare_symbol_names(name, str);
 454}
 455
 456static struct symbol *symbols__find_by_name(struct rb_root_cached *symbols,
 457					    const char *name,
 458					    enum symbol_tag_include includes)
 459{
 460	struct rb_node *n;
 461	struct symbol_name_rb_node *s = NULL;
 462
 463	if (symbols == NULL)
 464		return NULL;
 465
 466	n = symbols->rb_root.rb_node;
 467
 468	while (n) {
 
 469		int cmp;
 470
 471		s = rb_entry(n, struct symbol_name_rb_node, rb_node);
 472		cmp = symbol__match_symbol_name(s->sym.name, name, includes);
 473
 474		if (cmp > 0)
 475			n = n->rb_left;
 476		else if (cmp < 0)
 477			n = n->rb_right;
 478		else
 479			break;
 480	}
 481
 482	if (n == NULL)
 483		return NULL;
 484
 485	if (includes != SYMBOL_TAG_INCLUDE__DEFAULT_ONLY)
 486		/* return first symbol that has same name (if any) */
 487		for (n = rb_prev(n); n; n = rb_prev(n)) {
 488			struct symbol_name_rb_node *tmp;
 489
 490			tmp = rb_entry(n, struct symbol_name_rb_node, rb_node);
 491			if (arch__compare_symbol_names(tmp->sym.name, s->sym.name))
 492				break;
 493
 494			s = tmp;
 495		}
 496
 497	return &s->sym;
 498}
 499
 500void dso__reset_find_symbol_cache(struct dso *dso)
 
 501{
 502	dso->last_find_result.addr   = 0;
 503	dso->last_find_result.symbol = NULL;
 504}
 505
 506void dso__insert_symbol(struct dso *dso, struct symbol *sym)
 
 507{
 508	__symbols__insert(&dso->symbols, sym, dso->kernel);
 509
 510	/* update the symbol cache if necessary */
 511	if (dso->last_find_result.addr >= sym->start &&
 512	    (dso->last_find_result.addr < sym->end ||
 513	    sym->start == sym->end)) {
 514		dso->last_find_result.symbol = sym;
 515	}
 516}
 517
 518void dso__delete_symbol(struct dso *dso, struct symbol *sym)
 519{
 520	rb_erase_cached(&sym->rb_node, &dso->symbols);
 521	symbol__delete(sym);
 522	dso__reset_find_symbol_cache(dso);
 523}
 524
 525struct symbol *dso__find_symbol(struct dso *dso, u64 addr)
 526{
 527	if (dso->last_find_result.addr != addr || dso->last_find_result.symbol == NULL) {
 528		dso->last_find_result.addr   = addr;
 529		dso->last_find_result.symbol = symbols__find(&dso->symbols, addr);
 
 
 
 
 
 530	}
 531
 532	return dso->last_find_result.symbol;
 533}
 534
 535struct symbol *dso__first_symbol(struct dso *dso)
 536{
 537	return symbols__first(&dso->symbols);
 538}
 539
 540struct symbol *dso__last_symbol(struct dso *dso)
 541{
 542	return symbols__last(&dso->symbols);
 543}
 544
 545struct symbol *dso__next_symbol(struct symbol *sym)
 
 546{
 547	return symbols__next(sym);
 548}
 
 549
 550struct symbol *symbol__next_by_name(struct symbol *sym)
 551{
 552	struct symbol_name_rb_node *s = container_of(sym, struct symbol_name_rb_node, sym);
 553	struct rb_node *n = rb_next(&s->rb_node);
 554
 555	return n ? &rb_entry(n, struct symbol_name_rb_node, rb_node)->sym : NULL;
 556}
 557
 558 /*
 559  * Returns first symbol that matched with @name.
 560  */
 561struct symbol *dso__find_symbol_by_name(struct dso *dso, const char *name)
 562{
 563	struct symbol *s = symbols__find_by_name(&dso->symbol_names, name,
 564						 SYMBOL_TAG_INCLUDE__NONE);
 565	if (!s)
 566		s = symbols__find_by_name(&dso->symbol_names, name,
 567					  SYMBOL_TAG_INCLUDE__DEFAULT_ONLY);
 568	return s;
 569}
 570
 571void dso__sort_by_name(struct dso *dso)
 572{
 573	dso__set_sorted_by_name(dso);
 574	return symbols__sort_by_name(&dso->symbol_names, &dso->symbols);
 575}
 
 
 
 
 
 576
 577/*
 578 * While we find nice hex chars, build a long_val.
 579 * Return number of chars processed.
 580 */
 581static int hex2u64(const char *ptr, u64 *long_val)
 582{
 583	char *p;
 584
 585	*long_val = strtoull(ptr, &p, 16);
 586
 587	return p - ptr;
 588}
 589
 590
 591int modules__parse(const char *filename, void *arg,
 592		   int (*process_module)(void *arg, const char *name,
 593					 u64 start, u64 size))
 594{
 595	char *line = NULL;
 596	size_t n;
 597	FILE *file;
 598	int err = 0;
 599
 600	file = fopen(filename, "r");
 601	if (file == NULL)
 602		return -1;
 
 
 603
 604	while (1) {
 605		char name[PATH_MAX];
 606		u64 start, size;
 607		char *sep, *endptr;
 608		ssize_t line_len;
 609
 610		line_len = getline(&line, &n, file);
 611		if (line_len < 0) {
 612			if (feof(file))
 613				break;
 614			err = -1;
 615			goto out;
 616		}
 617
 618		if (!line) {
 619			err = -1;
 620			goto out;
 621		}
 622
 623		line[--line_len] = '\0'; /* \n */
 624
 625		sep = strrchr(line, 'x');
 626		if (sep == NULL)
 627			continue;
 628
 629		hex2u64(sep + 1, &start);
 630
 631		sep = strchr(line, ' ');
 632		if (sep == NULL)
 633			continue;
 634
 635		*sep = '\0';
 
 
 
 636
 637		scnprintf(name, sizeof(name), "[%s]", line);
 
 
 
 638
 639		size = strtoul(sep + 1, &endptr, 0);
 640		if (*endptr != ' ' && *endptr != '\t')
 641			continue;
 642
 643		err = process_module(arg, name, start, size);
 
 
 644		if (err)
 645			break;
 646	}
 647out:
 648	free(line);
 649	fclose(file);
 650	return err;
 
 
 
 651}
 652
 653/*
 654 * These are symbols in the kernel image, so make sure that
 655 * sym is from a kernel DSO.
 656 */
 657static bool symbol__is_idle(const char *name)
 
 658{
 659	const char * const idle_symbols[] = {
 660		"acpi_idle_do_entry",
 661		"acpi_processor_ffh_cstate_enter",
 662		"arch_cpu_idle",
 663		"cpu_idle",
 664		"cpu_startup_entry",
 665		"idle_cpu",
 666		"intel_idle",
 667		"default_idle",
 668		"native_safe_halt",
 669		"enter_idle",
 670		"exit_idle",
 671		"mwait_idle",
 672		"mwait_idle_with_hints",
 673		"mwait_idle_with_hints.constprop.0",
 674		"poll_idle",
 675		"ppc64_runlatch_off",
 676		"pseries_dedicated_idle_sleep",
 677		"psw_idle",
 678		"psw_idle_exit",
 679		NULL
 680	};
 681	int i;
 682	static struct strlist *idle_symbols_list;
 683
 684	if (idle_symbols_list)
 685		return strlist__has_entry(idle_symbols_list, name);
 686
 687	idle_symbols_list = strlist__new(NULL, NULL);
 688
 689	for (i = 0; idle_symbols[i]; i++)
 690		strlist__add(idle_symbols_list, idle_symbols[i]);
 691
 692	return strlist__has_entry(idle_symbols_list, name);
 693}
 694
 695static int map__process_kallsym_symbol(void *arg, const char *name,
 696				       char type, u64 start)
 697{
 698	struct symbol *sym;
 699	struct dso *dso = arg;
 700	struct rb_root_cached *root = &dso->symbols;
 701
 702	if (!symbol_type__filter(type))
 703		return 0;
 704
 705	/*
 706	 * module symbols are not sorted so we add all
 707	 * symbols, setting length to 0, and rely on
 708	 * symbols__fixup_end() to fix it up.
 709	 */
 710	sym = symbol__new(start, 0, kallsyms2elf_binding(type), kallsyms2elf_type(type), name);
 711	if (sym == NULL)
 712		return -ENOMEM;
 713	/*
 714	 * We will pass the symbols to the filter later, in
 715	 * map__split_kallsyms, when we have split the maps per module
 716	 */
 717	__symbols__insert(root, sym, !strchr(name, '['));
 718
 719	return 0;
 720}
 721
 722/*
 723 * Loads the function entries in /proc/kallsyms into kernel_map->dso,
 724 * so that we can in the next step set the symbol ->end address and then
 725 * call kernel_maps__split_kallsyms.
 726 */
 727static int dso__load_all_kallsyms(struct dso *dso, const char *filename)
 
 728{
 729	return kallsyms__parse(filename, dso, map__process_kallsym_symbol);
 730}
 731
 732static int maps__split_kallsyms_for_kcore(struct maps *kmaps, struct dso *dso)
 733{
 734	struct map *curr_map;
 735	struct symbol *pos;
 736	int count = 0;
 737	struct rb_root_cached old_root = dso->symbols;
 738	struct rb_root_cached *root = &dso->symbols;
 739	struct rb_node *next = rb_first_cached(root);
 740
 741	if (!kmaps)
 742		return -1;
 743
 744	*root = RB_ROOT_CACHED;
 745
 746	while (next) {
 747		char *module;
 748
 749		pos = rb_entry(next, struct symbol, rb_node);
 750		next = rb_next(&pos->rb_node);
 751
 752		rb_erase_cached(&pos->rb_node, &old_root);
 753		RB_CLEAR_NODE(&pos->rb_node);
 754		module = strchr(pos->name, '\t');
 755		if (module)
 756			*module = '\0';
 757
 758		curr_map = maps__find(kmaps, pos->start);
 759
 760		if (!curr_map) {
 761			symbol__delete(pos);
 762			continue;
 763		}
 764
 765		pos->start -= curr_map->start - curr_map->pgoff;
 766		if (pos->end > curr_map->end)
 767			pos->end = curr_map->end;
 768		if (pos->end)
 769			pos->end -= curr_map->start - curr_map->pgoff;
 770		symbols__insert(&curr_map->dso->symbols, pos);
 771		++count;
 772	}
 773
 774	/* Symbols have been adjusted */
 775	dso->adjust_symbols = 1;
 776
 777	return count;
 778}
 779
 780/*
 781 * Split the symbols into maps, making sure there are no overlaps, i.e. the
 782 * kernel range is broken in several maps, named [kernel].N, as we don't have
 783 * the original ELF section names vmlinux have.
 784 */
 785static int maps__split_kallsyms(struct maps *kmaps, struct dso *dso, u64 delta,
 786				struct map *initial_map)
 787{
 788	struct machine *machine;
 789	struct map *curr_map = initial_map;
 
 790	struct symbol *pos;
 791	int count = 0, moved = 0;
 792	struct rb_root_cached *root = &dso->symbols;
 793	struct rb_node *next = rb_first_cached(root);
 794	int kernel_range = 0;
 795	bool x86_64;
 796
 797	if (!kmaps)
 798		return -1;
 799
 800	machine = kmaps->machine;
 801
 802	x86_64 = machine__is(machine, "x86_64");
 803
 804	while (next) {
 805		char *module;
 806
 807		pos = rb_entry(next, struct symbol, rb_node);
 808		next = rb_next(&pos->rb_node);
 809
 810		module = strchr(pos->name, '\t');
 811		if (module) {
 812			if (!symbol_conf.use_modules)
 813				goto discard_symbol;
 814
 815			*module++ = '\0';
 816
 817			if (strcmp(curr_map->dso->short_name, module)) {
 818				if (curr_map != initial_map &&
 819				    dso->kernel == DSO_SPACE__KERNEL_GUEST &&
 820				    machine__is_default_guest(machine)) {
 821					/*
 822					 * We assume all symbols of a module are
 823					 * continuous in * kallsyms, so curr_map
 824					 * points to a module and all its
 825					 * symbols are in its kmap. Mark it as
 826					 * loaded.
 827					 */
 828					dso__set_loaded(curr_map->dso);
 
 829				}
 830
 831				curr_map = maps__find_by_name(kmaps, module);
 
 832				if (curr_map == NULL) {
 833					pr_debug("%s/proc/{kallsyms,modules} "
 834					         "inconsistency while looking "
 835						 "for \"%s\" module!\n",
 836						 machine->root_dir, module);
 837					curr_map = initial_map;
 838					goto discard_symbol;
 839				}
 840
 841				if (curr_map->dso->loaded &&
 842				    !machine__is_default_guest(machine))
 843					goto discard_symbol;
 844			}
 845			/*
 846			 * So that we look just like we get from .ko files,
 847			 * i.e. not prelinked, relative to initial_map->start.
 848			 */
 849			pos->start = curr_map->map_ip(curr_map, pos->start);
 850			pos->end   = curr_map->map_ip(curr_map, pos->end);
 851		} else if (x86_64 && is_entry_trampoline(pos->name)) {
 852			/*
 853			 * These symbols are not needed anymore since the
 854			 * trampoline maps refer to the text section and it's
 855			 * symbols instead. Avoid having to deal with
 856			 * relocations, and the assumption that the first symbol
 857			 * is the start of kernel text, by simply removing the
 858			 * symbols at this point.
 859			 */
 860			goto discard_symbol;
 861		} else if (curr_map != initial_map) {
 862			char dso_name[PATH_MAX];
 863			struct dso *ndso;
 864
 865			if (delta) {
 866				/* Kernel was relocated at boot time */
 867				pos->start -= delta;
 868				pos->end -= delta;
 869			}
 870
 871			if (count == 0) {
 872				curr_map = initial_map;
 873				goto add_symbol;
 874			}
 875
 876			if (dso->kernel == DSO_SPACE__KERNEL_GUEST)
 877				snprintf(dso_name, sizeof(dso_name),
 878					"[guest.kernel].%d",
 879					kernel_range++);
 880			else
 881				snprintf(dso_name, sizeof(dso_name),
 882					"[kernel].%d",
 883					kernel_range++);
 884
 885			ndso = dso__new(dso_name);
 886			if (ndso == NULL)
 887				return -1;
 888
 889			ndso->kernel = dso->kernel;
 890
 891			curr_map = map__new2(pos->start, ndso);
 892			if (curr_map == NULL) {
 893				dso__put(ndso);
 894				return -1;
 895			}
 896
 897			curr_map->map_ip = curr_map->unmap_ip = identity__map_ip;
 898			maps__insert(kmaps, curr_map);
 899			++kernel_range;
 900		} else if (delta) {
 901			/* Kernel was relocated at boot time */
 902			pos->start -= delta;
 903			pos->end -= delta;
 904		}
 905add_symbol:
 906		if (curr_map != initial_map) {
 907			rb_erase_cached(&pos->rb_node, root);
 908			symbols__insert(&curr_map->dso->symbols, pos);
 909			++moved;
 910		} else
 911			++count;
 912
 913		continue;
 914discard_symbol:
 915		rb_erase_cached(&pos->rb_node, root);
 916		symbol__delete(pos);
 917	}
 918
 919	if (curr_map != initial_map &&
 920	    dso->kernel == DSO_SPACE__KERNEL_GUEST &&
 921	    machine__is_default_guest(kmaps->machine)) {
 922		dso__set_loaded(curr_map->dso);
 923	}
 924
 925	return count + moved;
 926}
 927
 928bool symbol__restricted_filename(const char *filename,
 929				 const char *restricted_filename)
 930{
 931	bool restricted = false;
 932
 933	if (symbol_conf.kptr_restrict) {
 934		char *r = realpath(filename, NULL);
 935
 936		if (r != NULL) {
 937			restricted = strcmp(r, restricted_filename) == 0;
 938			free(r);
 939			return restricted;
 940		}
 941	}
 942
 943	return restricted;
 944}
 945
 946struct module_info {
 947	struct rb_node rb_node;
 948	char *name;
 949	u64 start;
 950};
 951
 952static void add_module(struct module_info *mi, struct rb_root *modules)
 953{
 954	struct rb_node **p = &modules->rb_node;
 955	struct rb_node *parent = NULL;
 956	struct module_info *m;
 957
 958	while (*p != NULL) {
 959		parent = *p;
 960		m = rb_entry(parent, struct module_info, rb_node);
 961		if (strcmp(mi->name, m->name) < 0)
 962			p = &(*p)->rb_left;
 963		else
 964			p = &(*p)->rb_right;
 965	}
 966	rb_link_node(&mi->rb_node, parent, p);
 967	rb_insert_color(&mi->rb_node, modules);
 968}
 969
 970static void delete_modules(struct rb_root *modules)
 971{
 972	struct module_info *mi;
 973	struct rb_node *next = rb_first(modules);
 974
 975	while (next) {
 976		mi = rb_entry(next, struct module_info, rb_node);
 977		next = rb_next(&mi->rb_node);
 978		rb_erase(&mi->rb_node, modules);
 979		zfree(&mi->name);
 980		free(mi);
 981	}
 982}
 983
 984static struct module_info *find_module(const char *name,
 985				       struct rb_root *modules)
 986{
 987	struct rb_node *n = modules->rb_node;
 
 
 
 988
 989	while (n) {
 990		struct module_info *m;
 991		int cmp;
 
 
 
 
 
 992
 993		m = rb_entry(n, struct module_info, rb_node);
 994		cmp = strcmp(name, m->name);
 995		if (cmp < 0)
 996			n = n->rb_left;
 997		else if (cmp > 0)
 998			n = n->rb_right;
 999		else
1000			return m;
1001	}
1002
1003	return NULL;
1004}
1005
1006static int __read_proc_modules(void *arg, const char *name, u64 start,
1007			       u64 size __maybe_unused)
1008{
1009	struct rb_root *modules = arg;
1010	struct module_info *mi;
1011
1012	mi = zalloc(sizeof(struct module_info));
1013	if (!mi)
1014		return -ENOMEM;
1015
1016	mi->name = strdup(name);
1017	mi->start = start;
 
1018
1019	if (!mi->name) {
1020		free(mi);
1021		return -ENOMEM;
1022	}
1023
1024	add_module(mi, modules);
 
 
1025
1026	return 0;
1027}
1028
1029static int read_proc_modules(const char *filename, struct rb_root *modules)
1030{
1031	if (symbol__restricted_filename(filename, "/proc/modules"))
1032		return -1;
1033
1034	if (modules__parse(filename, modules, __read_proc_modules)) {
1035		delete_modules(modules);
1036		return -1;
 
 
 
1037	}
1038
1039	return 0;
1040}
1041
1042int compare_proc_modules(const char *from, const char *to)
1043{
1044	struct rb_root from_modules = RB_ROOT;
1045	struct rb_root to_modules = RB_ROOT;
1046	struct rb_node *from_node, *to_node;
1047	struct module_info *from_m, *to_m;
1048	int ret = -1;
1049
1050	if (read_proc_modules(from, &from_modules))
1051		return -1;
 
 
 
1052
1053	if (read_proc_modules(to, &to_modules))
1054		goto out_delete_from;
 
 
 
 
 
 
 
 
 
1055
1056	from_node = rb_first(&from_modules);
1057	to_node = rb_first(&to_modules);
1058	while (from_node) {
1059		if (!to_node)
1060			break;
1061
1062		from_m = rb_entry(from_node, struct module_info, rb_node);
1063		to_m = rb_entry(to_node, struct module_info, rb_node);
 
 
 
 
1064
1065		if (from_m->start != to_m->start ||
1066		    strcmp(from_m->name, to_m->name))
1067			break;
 
 
 
1068
1069		from_node = rb_next(from_node);
1070		to_node = rb_next(to_node);
1071	}
 
 
 
 
1072
1073	if (!from_node && !to_node)
1074		ret = 0;
 
 
 
1075
1076	delete_modules(&to_modules);
1077out_delete_from:
1078	delete_modules(&from_modules);
 
 
1079
1080	return ret;
 
 
 
1081}
1082
1083static int do_validate_kcore_modules(const char *filename, struct maps *kmaps)
 
1084{
1085	struct rb_root modules = RB_ROOT;
1086	struct map *old_map;
1087	int err;
1088
1089	err = read_proc_modules(filename, &modules);
1090	if (err)
1091		return err;
 
 
 
1092
1093	maps__for_each_entry(kmaps, old_map) {
1094		struct module_info *mi;
1095
1096		if (!__map__is_kmodule(old_map)) {
1097			continue;
 
 
 
 
1098		}
 
 
1099
1100		/* Module must be in memory at the same address */
1101		mi = find_module(old_map->dso->short_name, &modules);
1102		if (!mi || mi->start != old_map->start) {
1103			err = -EINVAL;
1104			goto out;
1105		}
1106	}
1107out:
1108	delete_modules(&modules);
1109	return err;
1110}
1111
 
 
 
 
 
 
 
 
 
 
1112/*
1113 * If kallsyms is referenced by name then we look for filename in the same
1114 * directory.
 
 
 
1115 */
1116static bool filename_from_kallsyms_filename(char *filename,
1117					    const char *base_name,
1118					    const char *kallsyms_filename)
1119{
1120	char *name;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1121
1122	strcpy(filename, kallsyms_filename);
1123	name = strrchr(filename, '/');
1124	if (!name)
1125		return false;
1126
1127	name += 1;
 
1128
1129	if (!strcmp(name, "kallsyms")) {
1130		strcpy(name, base_name);
1131		return true;
 
 
 
 
 
 
 
 
 
1132	}
1133
1134	return false;
1135}
1136
1137static int validate_kcore_modules(const char *kallsyms_filename,
1138				  struct map *map)
1139{
1140	struct maps *kmaps = map__kmaps(map);
1141	char modules_filename[PATH_MAX];
1142
1143	if (!kmaps)
1144		return -EINVAL;
1145
1146	if (!filename_from_kallsyms_filename(modules_filename, "modules",
1147					     kallsyms_filename))
1148		return -EINVAL;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1149
1150	if (do_validate_kcore_modules(modules_filename, kmaps))
1151		return -EINVAL;
 
 
 
1152
 
 
 
 
 
1153	return 0;
1154}
1155
1156static int validate_kcore_addresses(const char *kallsyms_filename,
1157				    struct map *map)
1158{
1159	struct kmap *kmap = map__kmap(map);
1160
1161	if (!kmap)
1162		return -EINVAL;
1163
1164	if (kmap->ref_reloc_sym && kmap->ref_reloc_sym->name) {
1165		u64 start;
1166
1167		if (kallsyms__get_function_start(kallsyms_filename,
1168						 kmap->ref_reloc_sym->name, &start))
1169			return -ENOENT;
1170		if (start != kmap->ref_reloc_sym->addr)
1171			return -EINVAL;
1172	}
1173
1174	return validate_kcore_modules(kallsyms_filename, map);
1175}
1176
1177struct kcore_mapfn_data {
1178	struct dso *dso;
1179	struct list_head maps;
1180};
1181
1182static int kcore_mapfn(u64 start, u64 len, u64 pgoff, void *data)
1183{
1184	struct kcore_mapfn_data *md = data;
1185	struct map *map;
1186
1187	map = map__new2(start, md->dso);
1188	if (map == NULL)
1189		return -ENOMEM;
1190
1191	map->end = map->start + len;
1192	map->pgoff = pgoff;
1193
1194	list_add(&map->node, &md->maps);
1195
1196	return 0;
1197}
1198
1199/*
1200 * Merges map into maps by splitting the new map within the existing map
1201 * regions.
1202 */
1203int maps__merge_in(struct maps *kmaps, struct map *new_map)
1204{
1205	struct map *old_map;
1206	LIST_HEAD(merged);
 
1207
1208	maps__for_each_entry(kmaps, old_map) {
1209		/* no overload with this one */
1210		if (new_map->end < old_map->start ||
1211		    new_map->start >= old_map->end)
1212			continue;
1213
1214		if (new_map->start < old_map->start) {
1215			/*
1216			 * |new......
1217			 *       |old....
1218			 */
1219			if (new_map->end < old_map->end) {
1220				/*
1221				 * |new......|     -> |new..|
1222				 *       |old....| ->       |old....|
1223				 */
1224				new_map->end = old_map->start;
1225			} else {
1226				/*
1227				 * |new.............| -> |new..|       |new..|
1228				 *       |old....|    ->       |old....|
1229				 */
1230				struct map *m = map__clone(new_map);
1231
1232				if (!m)
1233					return -ENOMEM;
1234
1235				m->end = old_map->start;
1236				list_add_tail(&m->node, &merged);
1237				new_map->pgoff += old_map->end - new_map->start;
1238				new_map->start = old_map->end;
1239			}
1240		} else {
1241			/*
1242			 *      |new......
1243			 * |old....
1244			 */
1245			if (new_map->end < old_map->end) {
1246				/*
1247				 *      |new..|   -> x
1248				 * |old.........| -> |old.........|
1249				 */
1250				map__put(new_map);
1251				new_map = NULL;
1252				break;
1253			} else {
1254				/*
1255				 *      |new......| ->         |new...|
1256				 * |old....|        -> |old....|
1257				 */
1258				new_map->pgoff += old_map->end - new_map->start;
1259				new_map->start = old_map->end;
1260			}
1261		}
1262	}
1263
1264	while (!list_empty(&merged)) {
1265		old_map = list_entry(merged.next, struct map, node);
1266		list_del_init(&old_map->node);
1267		maps__insert(kmaps, old_map);
1268		map__put(old_map);
1269	}
1270
1271	if (new_map) {
1272		maps__insert(kmaps, new_map);
1273		map__put(new_map);
1274	}
1275	return 0;
1276}
1277
1278static int dso__load_kcore(struct dso *dso, struct map *map,
1279			   const char *kallsyms_filename)
1280{
1281	struct maps *kmaps = map__kmaps(map);
1282	struct kcore_mapfn_data md;
1283	struct map *old_map, *new_map, *replacement_map = NULL, *next;
1284	struct machine *machine;
1285	bool is_64_bit;
1286	int err, fd;
1287	char kcore_filename[PATH_MAX];
1288	u64 stext;
1289
1290	if (!kmaps)
1291		return -EINVAL;
1292
1293	machine = kmaps->machine;
 
 
 
 
 
 
 
 
 
 
 
1294
1295	/* This function requires that the map is the kernel map */
1296	if (!__map__is_kernel(map))
1297		return -EINVAL;
1298
1299	if (!filename_from_kallsyms_filename(kcore_filename, "kcore",
1300					     kallsyms_filename))
1301		return -EINVAL;
1302
1303	/* Modules and kernel must be present at their original addresses */
1304	if (validate_kcore_addresses(kallsyms_filename, map))
1305		return -EINVAL;
1306
1307	md.dso = dso;
1308	INIT_LIST_HEAD(&md.maps);
1309
1310	fd = open(kcore_filename, O_RDONLY);
1311	if (fd < 0) {
1312		pr_debug("Failed to open %s. Note /proc/kcore requires CAP_SYS_RAWIO capability to access.\n",
1313			 kcore_filename);
1314		return -EINVAL;
1315	}
1316
1317	/* Read new maps into temporary lists */
1318	err = file__read_maps(fd, map->prot & PROT_EXEC, kcore_mapfn, &md,
1319			      &is_64_bit);
1320	if (err)
1321		goto out_err;
1322	dso->is_64_bit = is_64_bit;
1323
1324	if (list_empty(&md.maps)) {
1325		err = -EINVAL;
1326		goto out_err;
1327	}
1328
1329	/* Remove old maps */
1330	maps__for_each_entry_safe(kmaps, old_map, next) {
1331		/*
1332		 * We need to preserve eBPF maps even if they are
1333		 * covered by kcore, because we need to access
1334		 * eBPF dso for source data.
1335		 */
1336		if (old_map != map && !__map__is_bpf_prog(old_map))
1337			maps__remove(kmaps, old_map);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1338	}
1339	machine->trampolines_mapped = false;
1340
1341	/* Find the kernel map using the '_stext' symbol */
1342	if (!kallsyms__get_function_start(kallsyms_filename, "_stext", &stext)) {
1343		list_for_each_entry(new_map, &md.maps, node) {
1344			if (stext >= new_map->start && stext < new_map->end) {
1345				replacement_map = new_map;
1346				break;
1347			}
1348		}
1349	}
1350
1351	if (!replacement_map)
1352		replacement_map = list_entry(md.maps.next, struct map, node);
1353
1354	/* Add new maps */
1355	while (!list_empty(&md.maps)) {
1356		new_map = list_entry(md.maps.next, struct map, node);
1357		list_del_init(&new_map->node);
1358		if (new_map == replacement_map) {
1359			map->start	= new_map->start;
1360			map->end	= new_map->end;
1361			map->pgoff	= new_map->pgoff;
1362			map->map_ip	= new_map->map_ip;
1363			map->unmap_ip	= new_map->unmap_ip;
1364			/* Ensure maps are correctly ordered */
1365			map__get(map);
1366			maps__remove(kmaps, map);
1367			maps__insert(kmaps, map);
1368			map__put(map);
1369			map__put(new_map);
1370		} else {
1371			/*
1372			 * Merge kcore map into existing maps,
1373			 * and ensure that current maps (eBPF)
1374			 * stay intact.
1375			 */
1376			if (maps__merge_in(kmaps, new_map))
1377				goto out_err;
1378		}
1379	}
1380
1381	if (machine__is(machine, "x86_64")) {
1382		u64 addr;
1383
1384		/*
1385		 * If one of the corresponding symbols is there, assume the
1386		 * entry trampoline maps are too.
1387		 */
1388		if (!kallsyms__get_function_start(kallsyms_filename,
1389						  ENTRY_TRAMPOLINE_NAME,
1390						  &addr))
1391			machine->trampolines_mapped = true;
1392	}
1393
1394	/*
1395	 * Set the data type and long name so that kcore can be read via
1396	 * dso__data_read_addr().
1397	 */
1398	if (dso->kernel == DSO_SPACE__KERNEL_GUEST)
1399		dso->binary_type = DSO_BINARY_TYPE__GUEST_KCORE;
1400	else
1401		dso->binary_type = DSO_BINARY_TYPE__KCORE;
1402	dso__set_long_name(dso, strdup(kcore_filename), true);
1403
1404	close(fd);
1405
1406	if (map->prot & PROT_EXEC)
1407		pr_debug("Using %s for kernel object code\n", kcore_filename);
1408	else
1409		pr_debug("Using %s for kernel data\n", kcore_filename);
1410
1411	return 0;
1412
1413out_err:
1414	while (!list_empty(&md.maps)) {
1415		map = list_entry(md.maps.next, struct map, node);
1416		list_del_init(&map->node);
1417		map__put(map);
1418	}
1419	close(fd);
1420	return -EINVAL;
1421}
1422
1423/*
1424 * If the kernel is relocated at boot time, kallsyms won't match.  Compute the
1425 * delta based on the relocation reference symbol.
1426 */
1427static int kallsyms__delta(struct kmap *kmap, const char *filename, u64 *delta)
1428{
1429	u64 addr;
1430
1431	if (!kmap->ref_reloc_sym || !kmap->ref_reloc_sym->name)
1432		return 0;
 
1433
1434	if (kallsyms__get_function_start(filename, kmap->ref_reloc_sym->name, &addr))
1435		return -1;
 
1436
1437	*delta = addr - kmap->ref_reloc_sym->addr;
1438	return 0;
1439}
1440
1441int __dso__load_kallsyms(struct dso *dso, const char *filename,
1442			 struct map *map, bool no_kcore)
1443{
1444	struct kmap *kmap = map__kmap(map);
1445	u64 delta = 0;
1446
1447	if (symbol__restricted_filename(filename, "/proc/kallsyms"))
1448		return -1;
 
1449
1450	if (!kmap || !kmap->kmaps)
1451		return -1;
1452
1453	if (dso__load_all_kallsyms(dso, filename) < 0)
1454		return -1;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1455
1456	if (kallsyms__delta(kmap, filename, &delta))
1457		return -1;
1458
1459	symbols__fixup_end(&dso->symbols);
1460	symbols__fixup_duplicate(&dso->symbols);
 
 
 
 
 
 
 
1461
1462	if (dso->kernel == DSO_SPACE__KERNEL_GUEST)
1463		dso->symtab_type = DSO_BINARY_TYPE__GUEST_KALLSYMS;
1464	else
1465		dso->symtab_type = DSO_BINARY_TYPE__KALLSYMS;
 
 
1466
1467	if (!no_kcore && !dso__load_kcore(dso, map, filename))
1468		return maps__split_kallsyms_for_kcore(kmap->kmaps, dso);
1469	else
1470		return maps__split_kallsyms(kmap->kmaps, dso, delta, map);
1471}
1472
1473int dso__load_kallsyms(struct dso *dso, const char *filename,
1474		       struct map *map)
1475{
1476	return __dso__load_kallsyms(dso, filename, map, false);
1477}
1478
1479static int dso__load_perf_map(const char *map_path, struct dso *dso)
1480{
1481	char *line = NULL;
1482	size_t n;
1483	FILE *file;
1484	int nr_syms = 0;
1485
1486	file = fopen(map_path, "r");
1487	if (file == NULL)
1488		goto out_failure;
1489
1490	while (!feof(file)) {
1491		u64 start, size;
1492		struct symbol *sym;
1493		int line_len, len;
 
 
1494
1495		line_len = getline(&line, &n, file);
1496		if (line_len < 0)
1497			break;
1498
1499		if (!line)
1500			goto out_failure;
 
 
 
 
 
 
 
 
1501
1502		line[--line_len] = '\0'; /* \n */
 
1503
1504		len = hex2u64(line, &start);
 
 
1505
1506		len++;
1507		if (len + 2 >= line_len)
1508			continue;
1509
1510		len += hex2u64(line + len, &size);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1511
1512		len++;
1513		if (len + 2 >= line_len)
1514			continue;
 
 
 
 
1515
1516		sym = symbol__new(start, size, STB_GLOBAL, STT_FUNC, line + len);
1517
1518		if (sym == NULL)
1519			goto out_delete_line;
1520
1521		symbols__insert(&dso->symbols, sym);
1522		nr_syms++;
 
 
 
 
 
 
1523	}
 
 
 
 
 
 
1524
1525	free(line);
1526	fclose(file);
1527
1528	return nr_syms;
1529
1530out_delete_line:
1531	free(line);
1532out_failure:
1533	return -1;
1534}
1535
1536#ifdef HAVE_LIBBFD_SUPPORT
1537#define PACKAGE 'perf'
1538#include <bfd.h>
1539
1540static int bfd_symbols__cmpvalue(const void *a, const void *b)
1541{
1542	const asymbol *as = *(const asymbol **)a, *bs = *(const asymbol **)b;
 
1543
1544	if (bfd_asymbol_value(as) != bfd_asymbol_value(bs))
1545		return bfd_asymbol_value(as) - bfd_asymbol_value(bs);
 
 
 
 
 
 
 
 
 
 
 
1546
1547	return bfd_asymbol_name(as)[0] - bfd_asymbol_name(bs)[0];
1548}
1549
1550static int bfd2elf_binding(asymbol *symbol)
1551{
1552	if (symbol->flags & BSF_WEAK)
1553		return STB_WEAK;
1554	if (symbol->flags & BSF_GLOBAL)
1555		return STB_GLOBAL;
1556	if (symbol->flags & BSF_LOCAL)
1557		return STB_LOCAL;
1558	return -1;
1559}
1560
1561int dso__load_bfd_symbols(struct dso *dso, const char *debugfile)
1562{
1563	int err = -1;
1564	long symbols_size, symbols_count, i;
1565	asection *section;
1566	asymbol **symbols, *sym;
1567	struct symbol *symbol;
1568	bfd *abfd;
1569	u64 start, len;
1570
1571	abfd = bfd_openr(debugfile, NULL);
1572	if (!abfd)
1573		return -1;
 
 
 
1574
1575	if (!bfd_check_format(abfd, bfd_object)) {
1576		pr_debug2("%s: cannot read %s bfd file.\n", __func__,
1577			  dso->long_name);
1578		goto out_close;
1579	}
1580
1581	if (bfd_get_flavour(abfd) == bfd_target_elf_flavour)
1582		goto out_close;
1583
1584	symbols_size = bfd_get_symtab_upper_bound(abfd);
1585	if (symbols_size == 0) {
1586		bfd_close(abfd);
1587		return 0;
1588	}
1589
1590	if (symbols_size < 0)
1591		goto out_close;
1592
1593	symbols = malloc(symbols_size);
1594	if (!symbols)
1595		goto out_close;
1596
1597	symbols_count = bfd_canonicalize_symtab(abfd, symbols);
1598	if (symbols_count < 0)
1599		goto out_free;
1600
1601	section = bfd_get_section_by_name(abfd, ".text");
1602	if (section) {
1603		for (i = 0; i < symbols_count; ++i) {
1604			if (!strcmp(bfd_asymbol_name(symbols[i]), "__ImageBase") ||
1605			    !strcmp(bfd_asymbol_name(symbols[i]), "__image_base__"))
 
 
 
 
 
 
 
 
1606				break;
 
1607		}
1608		if (i < symbols_count) {
1609			/* PE symbols can only have 4 bytes, so use .text high bits */
1610			dso->text_offset = section->vma - (u32)section->vma;
1611			dso->text_offset += (u32)bfd_asymbol_value(symbols[i]);
1612		} else {
1613			dso->text_offset = section->vma - section->filepos;
1614		}
1615	}
1616
1617	qsort(symbols, symbols_count, sizeof(asymbol *), bfd_symbols__cmpvalue);
 
 
1618
1619#ifdef bfd_get_section
1620#define bfd_asymbol_section bfd_get_section
1621#endif
1622	for (i = 0; i < symbols_count; ++i) {
1623		sym = symbols[i];
1624		section = bfd_asymbol_section(sym);
1625		if (bfd2elf_binding(sym) < 0)
1626			continue;
1627
1628		while (i + 1 < symbols_count &&
1629		       bfd_asymbol_section(symbols[i + 1]) == section &&
1630		       bfd2elf_binding(symbols[i + 1]) < 0)
1631			i++;
1632
1633		if (i + 1 < symbols_count &&
1634		    bfd_asymbol_section(symbols[i + 1]) == section)
1635			len = symbols[i + 1]->value - sym->value;
1636		else
1637			len = section->size - sym->value;
1638
1639		start = bfd_asymbol_value(sym) - dso->text_offset;
1640		symbol = symbol__new(start, len, bfd2elf_binding(sym), STT_FUNC,
1641				     bfd_asymbol_name(sym));
1642		if (!symbol)
1643			goto out_free;
1644
1645		symbols__insert(&dso->symbols, symbol);
 
 
 
1646	}
1647#ifdef bfd_get_section
1648#undef bfd_asymbol_section
1649#endif
1650
1651	symbols__fixup_end(&dso->symbols);
1652	symbols__fixup_duplicate(&dso->symbols);
1653	dso->adjust_symbols = 1;
1654
1655	err = 0;
1656out_free:
1657	free(symbols);
1658out_close:
1659	bfd_close(abfd);
 
1660	return err;
1661}
1662#endif
1663
1664static bool dso__is_compatible_symtab_type(struct dso *dso, bool kmod,
1665					   enum dso_binary_type type)
1666{
1667	switch (type) {
1668	case DSO_BINARY_TYPE__JAVA_JIT:
1669	case DSO_BINARY_TYPE__DEBUGLINK:
1670	case DSO_BINARY_TYPE__SYSTEM_PATH_DSO:
1671	case DSO_BINARY_TYPE__FEDORA_DEBUGINFO:
1672	case DSO_BINARY_TYPE__UBUNTU_DEBUGINFO:
1673	case DSO_BINARY_TYPE__MIXEDUP_UBUNTU_DEBUGINFO:
1674	case DSO_BINARY_TYPE__BUILDID_DEBUGINFO:
1675	case DSO_BINARY_TYPE__OPENEMBEDDED_DEBUGINFO:
1676		return !kmod && dso->kernel == DSO_SPACE__USER;
1677
1678	case DSO_BINARY_TYPE__KALLSYMS:
1679	case DSO_BINARY_TYPE__VMLINUX:
1680	case DSO_BINARY_TYPE__KCORE:
1681		return dso->kernel == DSO_SPACE__KERNEL;
1682
1683	case DSO_BINARY_TYPE__GUEST_KALLSYMS:
1684	case DSO_BINARY_TYPE__GUEST_VMLINUX:
1685	case DSO_BINARY_TYPE__GUEST_KCORE:
1686		return dso->kernel == DSO_SPACE__KERNEL_GUEST;
1687
1688	case DSO_BINARY_TYPE__GUEST_KMODULE:
1689	case DSO_BINARY_TYPE__GUEST_KMODULE_COMP:
1690	case DSO_BINARY_TYPE__SYSTEM_PATH_KMODULE:
1691	case DSO_BINARY_TYPE__SYSTEM_PATH_KMODULE_COMP:
1692		/*
1693		 * kernel modules know their symtab type - it's set when
1694		 * creating a module dso in machine__addnew_module_map().
1695		 */
1696		return kmod && dso->symtab_type == type;
1697
1698	case DSO_BINARY_TYPE__BUILD_ID_CACHE:
1699	case DSO_BINARY_TYPE__BUILD_ID_CACHE_DEBUGINFO:
1700		return true;
1701
1702	case DSO_BINARY_TYPE__BPF_PROG_INFO:
1703	case DSO_BINARY_TYPE__BPF_IMAGE:
1704	case DSO_BINARY_TYPE__OOL:
1705	case DSO_BINARY_TYPE__NOT_FOUND:
1706	default:
1707		return false;
1708	}
1709}
1710
1711/* Checks for the existence of the perf-<pid>.map file in two different
1712 * locations.  First, if the process is a separate mount namespace, check in
1713 * that namespace using the pid of the innermost pid namespace.  If's not in a
1714 * namespace, or the file can't be found there, try in the mount namespace of
1715 * the tracing process using our view of its pid.
1716 */
1717static int dso__find_perf_map(char *filebuf, size_t bufsz,
1718			      struct nsinfo **nsip)
1719{
1720	struct nscookie nsc;
1721	struct nsinfo *nsi;
1722	struct nsinfo *nnsi;
1723	int rc = -1;
1724
1725	nsi = *nsip;
 
1726
1727	if (nsi->need_setns) {
1728		snprintf(filebuf, bufsz, "/tmp/perf-%d.map", nsi->nstgid);
1729		nsinfo__mountns_enter(nsi, &nsc);
1730		rc = access(filebuf, R_OK);
1731		nsinfo__mountns_exit(&nsc);
1732		if (rc == 0)
1733			return rc;
 
 
 
 
 
 
 
 
 
 
 
 
 
1734	}
 
 
 
 
1735
1736	nnsi = nsinfo__copy(nsi);
1737	if (nnsi) {
1738		nsinfo__put(nsi);
 
 
 
 
 
 
 
 
 
 
 
1739
1740		nnsi->need_setns = false;
1741		snprintf(filebuf, bufsz, "/tmp/perf-%d.map", nnsi->tgid);
1742		*nsip = nnsi;
1743		rc = 0;
1744	}
1745
1746	return rc;
1747}
1748
1749int dso__load(struct dso *dso, struct map *map)
1750{
 
1751	char *name;
1752	int ret = -1;
1753	u_int i;
1754	struct machine *machine = NULL;
1755	char *root_dir = (char *) "";
1756	int ss_pos = 0;
1757	struct symsrc ss_[2];
1758	struct symsrc *syms_ss = NULL, *runtime_ss = NULL;
1759	bool kmod;
1760	bool perfmap;
1761	struct build_id bid;
1762	struct nscookie nsc;
1763	char newmapname[PATH_MAX];
1764	const char *map_path = dso->long_name;
1765
1766	perfmap = strncmp(dso->name, "/tmp/perf-", 10) == 0;
1767	if (perfmap) {
1768		if (dso->nsinfo && (dso__find_perf_map(newmapname,
1769		    sizeof(newmapname), &dso->nsinfo) == 0)) {
1770			map_path = newmapname;
1771		}
1772	}
1773
1774	nsinfo__mountns_enter(dso->nsinfo, &nsc);
1775	pthread_mutex_lock(&dso->lock);
1776
1777	/* check again under the dso->lock */
1778	if (dso__loaded(dso)) {
1779		ret = 1;
1780		goto out;
1781	}
1782
1783	kmod = dso->symtab_type == DSO_BINARY_TYPE__SYSTEM_PATH_KMODULE ||
1784		dso->symtab_type == DSO_BINARY_TYPE__SYSTEM_PATH_KMODULE_COMP ||
1785		dso->symtab_type == DSO_BINARY_TYPE__GUEST_KMODULE ||
1786		dso->symtab_type == DSO_BINARY_TYPE__GUEST_KMODULE_COMP;
1787
1788	if (dso->kernel && !kmod) {
1789		if (dso->kernel == DSO_SPACE__KERNEL)
1790			ret = dso__load_kernel_sym(dso, map);
1791		else if (dso->kernel == DSO_SPACE__KERNEL_GUEST)
1792			ret = dso__load_guest_kernel_sym(dso, map);
1793
1794		machine = map__kmaps(map)->machine;
1795		if (machine__is(machine, "x86_64"))
1796			machine__map_x86_64_entry_trampolines(machine, dso);
1797		goto out;
1798	}
1799
1800	dso->adjust_symbols = 0;
1801
1802	if (perfmap) {
1803		ret = dso__load_perf_map(map_path, dso);
1804		dso->symtab_type = ret > 0 ? DSO_BINARY_TYPE__JAVA_JIT :
1805					     DSO_BINARY_TYPE__NOT_FOUND;
1806		goto out;
1807	}
1808
1809	if (machine)
1810		root_dir = machine->root_dir;
1811
1812	name = malloc(PATH_MAX);
1813	if (!name)
1814		goto out;
 
 
1815
1816	/*
1817	 * Read the build id if possible. This is required for
1818	 * DSO_BINARY_TYPE__BUILDID_DEBUGINFO to work
1819	 */
1820	if (!dso->has_build_id &&
1821	    is_regular_file(dso->long_name)) {
1822	    __symbol__join_symfs(name, PATH_MAX, dso->long_name);
1823		if (filename__read_build_id(name, &bid) > 0)
1824			dso__set_build_id(dso, &bid);
1825	}
1826
1827	/*
1828	 * Iterate over candidate debug images.
1829	 * Keep track of "interesting" ones (those which have a symtab, dynsym,
1830	 * and/or opd section) for processing.
1831	 */
1832	for (i = 0; i < DSO_BINARY_TYPE__SYMTAB_CNT; i++) {
1833		struct symsrc *ss = &ss_[ss_pos];
1834		bool next_slot = false;
1835		bool is_reg;
1836		bool nsexit;
1837		int bfdrc = -1;
1838		int sirc = -1;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1839
1840		enum dso_binary_type symtab_type = binary_type_symtab[i];
 
1841
1842		nsexit = (symtab_type == DSO_BINARY_TYPE__BUILD_ID_CACHE ||
1843		    symtab_type == DSO_BINARY_TYPE__BUILD_ID_CACHE_DEBUGINFO);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1844
1845		if (!dso__is_compatible_symtab_type(dso, kmod, symtab_type))
1846			continue;
 
 
 
 
1847
1848		if (dso__read_binary_type_filename(dso, symtab_type,
1849						   root_dir, name, PATH_MAX))
 
1850			continue;
1851
1852		if (nsexit)
1853			nsinfo__mountns_exit(&nsc);
 
1854
1855		is_reg = is_regular_file(name);
1856#ifdef HAVE_LIBBFD_SUPPORT
1857		if (is_reg)
1858			bfdrc = dso__load_bfd_symbols(dso, name);
1859#endif
1860		if (is_reg && bfdrc < 0)
1861			sirc = symsrc__init(ss, dso, name, symtab_type);
1862
1863		if (nsexit)
1864			nsinfo__mountns_enter(dso->nsinfo, &nsc);
1865
1866		if (bfdrc == 0) {
1867			ret = 0;
 
1868			break;
1869		}
 
1870
1871		if (!is_reg || sirc < 0)
1872			continue;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1873
1874		if (!syms_ss && symsrc__has_symtab(ss)) {
1875			syms_ss = ss;
1876			next_slot = true;
1877			if (!dso->symsrc_filename)
1878				dso->symsrc_filename = strdup(name);
1879		}
 
 
 
1880
1881		if (!runtime_ss && symsrc__possibly_runtime(ss)) {
1882			runtime_ss = ss;
1883			next_slot = true;
1884		}
 
 
 
1885
1886		if (next_slot) {
1887			ss_pos++;
1888
1889			if (syms_ss && runtime_ss)
1890				break;
1891		} else {
1892			symsrc__destroy(ss);
1893		}
 
1894
 
 
 
1895	}
1896
1897	if (!runtime_ss && !syms_ss)
1898		goto out_free;
 
1899
1900	if (runtime_ss && !syms_ss) {
1901		syms_ss = runtime_ss;
1902	}
 
 
 
 
 
 
1903
1904	/* We'll have to hope for the best */
1905	if (!runtime_ss && syms_ss)
1906		runtime_ss = syms_ss;
 
 
 
 
 
1907
1908	if (syms_ss)
1909		ret = dso__load_sym(dso, map, syms_ss, runtime_ss, kmod);
1910	else
1911		ret = -1;
1912
1913	if (ret > 0) {
1914		int nr_plt;
 
 
 
1915
1916		nr_plt = dso__synthesize_plt_symbols(dso, runtime_ss);
1917		if (nr_plt > 0)
1918			ret += nr_plt;
 
 
 
 
 
 
1919	}
1920
1921	for (; ss_pos > 0; ss_pos--)
1922		symsrc__destroy(&ss_[ss_pos - 1]);
1923out_free:
1924	free(name);
1925	if (ret < 0 && strstr(dso->name, " (deleted)") != NULL)
1926		ret = 0;
1927out:
1928	dso__set_loaded(dso);
1929	pthread_mutex_unlock(&dso->lock);
1930	nsinfo__mountns_exit(&nsc);
1931
1932	return ret;
1933}
1934
1935static int map__strcmp(const void *a, const void *b)
1936{
1937	const struct map *ma = *(const struct map **)a, *mb = *(const struct map **)b;
1938	return strcmp(ma->dso->short_name, mb->dso->short_name);
1939}
 
 
 
 
 
 
 
 
 
 
1940
1941static int map__strcmp_name(const void *name, const void *b)
1942{
1943	const struct map *map = *(const struct map **)b;
1944	return strcmp(name, map->dso->short_name);
1945}
 
 
1946
1947void __maps__sort_by_name(struct maps *maps)
1948{
1949	qsort(maps->maps_by_name, maps->nr_maps, sizeof(struct map *), map__strcmp);
1950}
1951
1952static int map__groups__sort_by_name_from_rbtree(struct maps *maps)
1953{
1954	struct map *map;
1955	struct map **maps_by_name = realloc(maps->maps_by_name, maps->nr_maps * sizeof(map));
1956	int i = 0;
1957
1958	if (maps_by_name == NULL)
 
1959		return -1;
1960
1961	maps->maps_by_name = maps_by_name;
1962	maps->nr_maps_allocated = maps->nr_maps;
 
1963
1964	maps__for_each_entry(maps, map)
1965		maps_by_name[i++] = map;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1966
1967	__maps__sort_by_name(maps);
1968	return 0;
1969}
1970
1971static struct map *__maps__find_by_name(struct maps *maps, const char *name)
 
1972{
1973	struct map **mapp;
 
 
 
 
1974
1975	if (maps->maps_by_name == NULL &&
1976	    map__groups__sort_by_name_from_rbtree(maps))
1977		return NULL;
1978
1979	mapp = bsearch(name, maps->maps_by_name, maps->nr_maps, sizeof(*mapp), map__strcmp_name);
1980	if (mapp)
1981		return *mapp;
1982	return NULL;
 
 
1983}
1984
1985struct map *maps__find_by_name(struct maps *maps, const char *name)
1986{
 
 
 
1987	struct map *map;
 
 
1988
1989	down_read(&maps->lock);
 
 
 
 
 
1990
1991	if (maps->last_search_by_name && strcmp(maps->last_search_by_name->dso->short_name, name) == 0) {
1992		map = maps->last_search_by_name;
1993		goto out_unlock;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1994	}
1995	/*
1996	 * If we have maps->maps_by_name, then the name isn't in the rbtree,
1997	 * as maps->maps_by_name mirrors the rbtree when lookups by name are
1998	 * made.
1999	 */
2000	map = __maps__find_by_name(maps, name);
2001	if (map || maps->maps_by_name != NULL)
2002		goto out_unlock;
2003
2004	/* Fallback to traversing the rbtree... */
2005	maps__for_each_entry(maps, map)
2006		if (strcmp(map->dso->short_name, name) == 0) {
2007			maps->last_search_by_name = map;
2008			goto out_unlock;
2009		}
2010
2011	map = NULL;
2012
2013out_unlock:
2014	up_read(&maps->lock);
2015	return map;
 
2016}
2017
2018int dso__load_vmlinux(struct dso *dso, struct map *map,
2019		      const char *vmlinux, bool vmlinux_allocated)
2020{
2021	int err = -1;
2022	struct symsrc ss;
2023	char symfs_vmlinux[PATH_MAX];
2024	enum dso_binary_type symtab_type;
2025
2026	if (vmlinux[0] == '/')
2027		snprintf(symfs_vmlinux, sizeof(symfs_vmlinux), "%s", vmlinux);
2028	else
2029		symbol__join_symfs(symfs_vmlinux, vmlinux);
2030
2031	if (dso->kernel == DSO_SPACE__KERNEL_GUEST)
2032		symtab_type = DSO_BINARY_TYPE__GUEST_VMLINUX;
2033	else
2034		symtab_type = DSO_BINARY_TYPE__VMLINUX;
2035
2036	if (symsrc__init(&ss, dso, symfs_vmlinux, symtab_type))
2037		return -1;
2038
2039	err = dso__load_sym(dso, map, &ss, &ss, 0);
2040	symsrc__destroy(&ss);
 
 
2041
2042	if (err > 0) {
2043		if (dso->kernel == DSO_SPACE__KERNEL_GUEST)
2044			dso->binary_type = DSO_BINARY_TYPE__GUEST_VMLINUX;
2045		else
2046			dso->binary_type = DSO_BINARY_TYPE__VMLINUX;
2047		dso__set_long_name(dso, vmlinux, vmlinux_allocated);
2048		dso__set_loaded(dso);
2049		pr_debug("Using %s for symbols\n", symfs_vmlinux);
2050	}
2051
2052	return err;
2053}
2054
2055int dso__load_vmlinux_path(struct dso *dso, struct map *map)
 
2056{
2057	int i, err = 0;
2058	char *filename = NULL;
2059
2060	pr_debug("Looking at the vmlinux_path (%d entries long)\n",
2061		 vmlinux_path__nr_entries + 1);
2062
2063	for (i = 0; i < vmlinux_path__nr_entries; ++i) {
2064		err = dso__load_vmlinux(dso, map, vmlinux_path[i], false);
2065		if (err > 0)
2066			goto out;
2067	}
2068
2069	if (!symbol_conf.ignore_vmlinux_buildid)
2070		filename = dso__build_id_filename(dso, NULL, 0, false);
2071	if (filename != NULL) {
2072		err = dso__load_vmlinux(dso, map, filename, true);
2073		if (err > 0)
 
2074			goto out;
 
2075		free(filename);
2076	}
2077out:
2078	return err;
2079}
2080
2081static bool visible_dir_filter(const char *name, struct dirent *d)
2082{
2083	if (d->d_type != DT_DIR)
2084		return false;
2085	return lsdir_no_dot_filter(name, d);
2086}
2087
2088static int find_matching_kcore(struct map *map, char *dir, size_t dir_sz)
2089{
2090	char kallsyms_filename[PATH_MAX];
2091	int ret = -1;
2092	struct strlist *dirs;
2093	struct str_node *nd;
2094
2095	dirs = lsdir(dir, visible_dir_filter);
2096	if (!dirs)
2097		return -1;
2098
2099	strlist__for_each_entry(nd, dirs) {
2100		scnprintf(kallsyms_filename, sizeof(kallsyms_filename),
2101			  "%s/%s/kallsyms", dir, nd->s);
2102		if (!validate_kcore_addresses(kallsyms_filename, map)) {
2103			strlcpy(dir, kallsyms_filename, dir_sz);
2104			ret = 0;
2105			break;
2106		}
2107	}
2108
2109	strlist__delete(dirs);
2110
2111	return ret;
2112}
2113
2114/*
2115 * Use open(O_RDONLY) to check readability directly instead of access(R_OK)
2116 * since access(R_OK) only checks with real UID/GID but open() use effective
2117 * UID/GID and actual capabilities (e.g. /proc/kcore requires CAP_SYS_RAWIO).
2118 */
2119static bool filename__readable(const char *file)
2120{
2121	int fd = open(file, O_RDONLY);
2122	if (fd < 0)
2123		return false;
2124	close(fd);
2125	return true;
2126}
2127
2128static char *dso__find_kallsyms(struct dso *dso, struct map *map)
2129{
2130	struct build_id bid;
2131	char sbuild_id[SBUILD_ID_SIZE];
2132	bool is_host = false;
2133	char path[PATH_MAX];
2134
2135	if (!dso->has_build_id) {
2136		/*
2137		 * Last resort, if we don't have a build-id and couldn't find
2138		 * any vmlinux file, try the running kernel kallsyms table.
2139		 */
2140		goto proc_kallsyms;
2141	}
2142
2143	if (sysfs__read_build_id("/sys/kernel/notes", &bid) == 0)
2144		is_host = dso__build_id_equal(dso, &bid);
2145
2146	/* Try a fast path for /proc/kallsyms if possible */
2147	if (is_host) {
2148		/*
2149		 * Do not check the build-id cache, unless we know we cannot use
2150		 * /proc/kcore or module maps don't match to /proc/kallsyms.
2151		 * To check readability of /proc/kcore, do not use access(R_OK)
2152		 * since /proc/kcore requires CAP_SYS_RAWIO to read and access
2153		 * can't check it.
2154		 */
2155		if (filename__readable("/proc/kcore") &&
2156		    !validate_kcore_addresses("/proc/kallsyms", map))
2157			goto proc_kallsyms;
2158	}
2159
2160	build_id__sprintf(&dso->bid, sbuild_id);
2161
2162	/* Find kallsyms in build-id cache with kcore */
2163	scnprintf(path, sizeof(path), "%s/%s/%s",
2164		  buildid_dir, DSO__NAME_KCORE, sbuild_id);
2165
2166	if (!find_matching_kcore(map, path, sizeof(path)))
2167		return strdup(path);
2168
2169	/* Use current /proc/kallsyms if possible */
2170	if (is_host) {
2171proc_kallsyms:
2172		return strdup("/proc/kallsyms");
2173	}
2174
2175	/* Finally, find a cache of kallsyms */
2176	if (!build_id_cache__kallsyms_path(sbuild_id, path, sizeof(path))) {
2177		pr_err("No kallsyms or vmlinux with build-id %s was found\n",
2178		       sbuild_id);
2179		return NULL;
2180	}
2181
2182	return strdup(path);
2183}
2184
2185static int dso__load_kernel_sym(struct dso *dso, struct map *map)
2186{
2187	int err;
2188	const char *kallsyms_filename = NULL;
2189	char *kallsyms_allocated_filename = NULL;
2190	char *filename = NULL;
2191
2192	/*
2193	 * Step 1: if the user specified a kallsyms or vmlinux filename, use
2194	 * it and only it, reporting errors to the user if it cannot be used.
2195	 *
2196	 * For instance, try to analyse an ARM perf.data file _without_ a
2197	 * build-id, or if the user specifies the wrong path to the right
2198	 * vmlinux file, obviously we can't fallback to another vmlinux (a
2199	 * x86_86 one, on the machine where analysis is being performed, say),
2200	 * or worse, /proc/kallsyms.
2201	 *
2202	 * If the specified file _has_ a build-id and there is a build-id
2203	 * section in the perf.data file, we will still do the expected
2204	 * validation in dso__load_vmlinux and will bail out if they don't
2205	 * match.
2206	 */
2207	if (symbol_conf.kallsyms_name != NULL) {
2208		kallsyms_filename = symbol_conf.kallsyms_name;
2209		goto do_kallsyms;
2210	}
2211
2212	if (!symbol_conf.ignore_vmlinux && symbol_conf.vmlinux_name != NULL) {
2213		return dso__load_vmlinux(dso, map, symbol_conf.vmlinux_name, false);
2214	}
2215
2216	/*
2217	 * Before checking on common vmlinux locations, check if it's
2218	 * stored as standard build id binary (not kallsyms) under
2219	 * .debug cache.
2220	 */
2221	if (!symbol_conf.ignore_vmlinux_buildid)
2222		filename = __dso__build_id_filename(dso, NULL, 0, false, false);
2223	if (filename != NULL) {
2224		err = dso__load_vmlinux(dso, map, filename, true);
2225		if (err > 0)
2226			return err;
2227		free(filename);
2228	}
2229
2230	if (!symbol_conf.ignore_vmlinux && vmlinux_path != NULL) {
2231		err = dso__load_vmlinux_path(dso, map);
2232		if (err > 0)
2233			return err;
2234	}
2235
2236	/* do not try local files if a symfs was given */
2237	if (symbol_conf.symfs[0] != 0)
2238		return -1;
2239
2240	kallsyms_allocated_filename = dso__find_kallsyms(dso, map);
2241	if (!kallsyms_allocated_filename)
2242		return -1;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2243
2244	kallsyms_filename = kallsyms_allocated_filename;
 
 
 
 
 
 
 
 
 
 
 
 
2245
2246do_kallsyms:
2247	err = dso__load_kallsyms(dso, kallsyms_filename, map);
2248	if (err > 0)
2249		pr_debug("Using %s for symbols\n", kallsyms_filename);
2250	free(kallsyms_allocated_filename);
2251
2252	if (err > 0 && !dso__is_kcore(dso)) {
2253		dso->binary_type = DSO_BINARY_TYPE__KALLSYMS;
2254		dso__set_long_name(dso, DSO__NAME_KALLSYMS, false);
 
2255		map__fixup_start(map);
2256		map__fixup_end(map);
2257	}
2258
2259	return err;
2260}
2261
2262static int dso__load_guest_kernel_sym(struct dso *dso, struct map *map)
 
2263{
2264	int err;
2265	const char *kallsyms_filename = NULL;
2266	struct machine *machine = map__kmaps(map)->machine;
2267	char path[PATH_MAX];
2268
 
 
 
 
 
 
2269	if (machine__is_default_guest(machine)) {
2270		/*
2271		 * if the user specified a vmlinux filename, use it and only
2272		 * it, reporting errors to the user if it cannot be used.
2273		 * Or use file guest_kallsyms inputted by user on commandline
2274		 */
2275		if (symbol_conf.default_guest_vmlinux_name != NULL) {
2276			err = dso__load_vmlinux(dso, map,
2277						symbol_conf.default_guest_vmlinux_name,
2278						false);
2279			return err;
2280		}
2281
2282		kallsyms_filename = symbol_conf.default_guest_kallsyms;
2283		if (!kallsyms_filename)
2284			return -1;
2285	} else {
2286		sprintf(path, "%s/proc/kallsyms", machine->root_dir);
2287		kallsyms_filename = path;
2288	}
2289
2290	err = dso__load_kallsyms(dso, kallsyms_filename, map);
2291	if (err > 0)
2292		pr_debug("Using %s for symbols\n", kallsyms_filename);
2293	if (err > 0 && !dso__is_kcore(dso)) {
2294		dso->binary_type = DSO_BINARY_TYPE__GUEST_KALLSYMS;
2295		dso__set_long_name(dso, machine->mmap_name, false);
 
 
 
 
2296		map__fixup_start(map);
2297		map__fixup_end(map);
2298	}
2299
2300	return err;
2301}
2302
2303static void vmlinux_path__exit(void)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2304{
2305	while (--vmlinux_path__nr_entries >= 0)
2306		zfree(&vmlinux_path[vmlinux_path__nr_entries]);
2307	vmlinux_path__nr_entries = 0;
 
 
 
 
 
 
 
 
2308
2309	zfree(&vmlinux_path);
 
 
 
 
2310}
2311
2312static const char * const vmlinux_paths[] = {
2313	"vmlinux",
2314	"/boot/vmlinux"
2315};
 
2316
2317static const char * const vmlinux_paths_upd[] = {
2318	"/boot/vmlinux-%s",
2319	"/usr/lib/debug/boot/vmlinux-%s",
2320	"/lib/modules/%s/build/vmlinux",
2321	"/usr/lib/debug/lib/modules/%s/vmlinux",
2322	"/usr/lib/debug/boot/vmlinux-%s.debug"
2323};
2324
2325static int vmlinux_path__add(const char *new_entry)
 
 
2326{
2327	vmlinux_path[vmlinux_path__nr_entries] = strdup(new_entry);
2328	if (vmlinux_path[vmlinux_path__nr_entries] == NULL)
2329		return -1;
2330	++vmlinux_path__nr_entries;
 
 
 
 
 
 
 
 
 
2331
2332	return 0;
2333}
2334
2335static int vmlinux_path__init(struct perf_env *env)
2336{
2337	struct utsname uts;
2338	char bf[PATH_MAX];
2339	char *kernel_version;
2340	unsigned int i;
2341
2342	vmlinux_path = malloc(sizeof(char *) * (ARRAY_SIZE(vmlinux_paths) +
2343			      ARRAY_SIZE(vmlinux_paths_upd)));
2344	if (vmlinux_path == NULL)
2345		return -1;
 
 
 
2346
2347	for (i = 0; i < ARRAY_SIZE(vmlinux_paths); i++)
2348		if (vmlinux_path__add(vmlinux_paths[i]) < 0)
2349			goto out_fail;
 
2350
2351	/* only try kernel version if no symfs was given */
2352	if (symbol_conf.symfs[0] != 0)
2353		return 0;
 
2354
2355	if (env) {
2356		kernel_version = env->os_release;
 
2357	} else {
2358		if (uname(&uts) < 0)
2359			goto out_fail;
2360
2361		kernel_version = uts.release;
2362	}
 
 
 
2363
2364	for (i = 0; i < ARRAY_SIZE(vmlinux_paths_upd); i++) {
2365		snprintf(bf, sizeof(bf), vmlinux_paths_upd[i], kernel_version);
2366		if (vmlinux_path__add(bf) < 0)
2367			goto out_fail;
2368	}
2369
2370	return 0;
 
2371
2372out_fail:
2373	vmlinux_path__exit();
2374	return -1;
2375}
2376
2377int setup_list(struct strlist **list, const char *list_str,
2378		      const char *list_name)
 
 
 
 
2379{
2380	if (list_str == NULL)
 
 
2381		return 0;
2382
2383	*list = strlist__new(list_str, NULL);
2384	if (!*list) {
2385		pr_err("problems parsing %s list\n", list_name);
2386		return -1;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2387	}
2388
2389	symbol_conf.has_filter = true;
2390	return 0;
 
 
 
 
 
2391}
2392
2393int setup_intlist(struct intlist **list, const char *list_str,
2394		  const char *list_name)
2395{
2396	if (list_str == NULL)
2397		return 0;
 
 
 
 
 
 
 
2398
2399	*list = intlist__new(list_str);
2400	if (!*list) {
2401		pr_err("problems parsing %s list\n", list_name);
2402		return -1;
 
 
 
2403	}
 
2404	return 0;
2405}
2406
2407static int setup_addrlist(struct intlist **addr_list, struct strlist *sym_list)
2408{
2409	struct str_node *pos, *tmp;
2410	unsigned long val;
2411	char *sep;
2412	const char *end;
2413	int i = 0, err;
2414
2415	*addr_list = intlist__new(NULL);
2416	if (!*addr_list)
2417		return -1;
2418
2419	strlist__for_each_entry_safe(pos, tmp, sym_list) {
2420		errno = 0;
2421		val = strtoul(pos->s, &sep, 16);
2422		if (errno || (sep == pos->s))
2423			continue;
2424
2425		if (*sep != '\0') {
2426			end = pos->s + strlen(pos->s) - 1;
2427			while (end >= sep && isspace(*end))
2428				end--;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2429
2430			if (end >= sep)
2431				continue;
2432		}
2433
2434		err = intlist__add(*addr_list, val);
2435		if (err)
2436			break;
2437
2438		strlist__remove(sym_list, pos);
2439		i++;
2440	}
 
 
 
 
 
2441
2442	if (i == 0) {
2443		intlist__delete(*addr_list);
2444		*addr_list = NULL;
 
 
2445	}
2446
2447	return 0;
 
2448}
2449
2450static bool symbol__read_kptr_restrict(void)
2451{
2452	bool value = false;
2453	FILE *fp = fopen("/proc/sys/kernel/kptr_restrict", "r");
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2454
2455	if (fp != NULL) {
2456		char line[8];
 
 
2457
2458		if (fgets(line, sizeof(line), fp) != NULL)
2459			value = perf_cap__capable(CAP_SYSLOG) ?
2460					(atoi(line) >= 2) :
2461					(atoi(line) != 0);
 
2462
2463		fclose(fp);
 
 
 
2464	}
2465
2466	/* Per kernel/kallsyms.c:
2467	 * we also restrict when perf_event_paranoid > 1 w/o CAP_SYSLOG
2468	 */
2469	if (perf_event_paranoid() > 1 && !perf_cap__capable(CAP_SYSLOG))
2470		value = true;
2471
2472	return value;
2473}
2474
2475int symbol__annotation_init(void)
 
2476{
2477	if (symbol_conf.init_annotation)
2478		return 0;
2479
2480	if (symbol_conf.initialized) {
2481		pr_err("Annotation needs to be init before symbol__init()\n");
 
2482		return -1;
2483	}
 
 
2484
2485	symbol_conf.priv_size += sizeof(struct annotation);
2486	symbol_conf.init_annotation = true;
2487	return 0;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2488}
2489
2490int symbol__init(struct perf_env *env)
2491{
2492	const char *symfs;
2493
2494	if (symbol_conf.initialized)
2495		return 0;
2496
2497	symbol_conf.priv_size = PERF_ALIGN(symbol_conf.priv_size, sizeof(u64));
2498
2499	symbol__elf_init();
2500
 
2501	if (symbol_conf.sort_by_name)
2502		symbol_conf.priv_size += (sizeof(struct symbol_name_rb_node) -
2503					  sizeof(struct symbol));
2504
2505	if (symbol_conf.try_vmlinux_path && vmlinux_path__init(env) < 0)
2506		return -1;
2507
2508	if (symbol_conf.field_sep && *symbol_conf.field_sep == '.') {
2509		pr_err("'.' is the only non valid --field-separator argument\n");
2510		return -1;
2511	}
2512
2513	if (setup_list(&symbol_conf.dso_list,
2514		       symbol_conf.dso_list_str, "dso") < 0)
2515		return -1;
2516
2517	if (setup_list(&symbol_conf.comm_list,
2518		       symbol_conf.comm_list_str, "comm") < 0)
2519		goto out_free_dso_list;
2520
2521	if (setup_intlist(&symbol_conf.pid_list,
2522		       symbol_conf.pid_list_str, "pid") < 0)
2523		goto out_free_comm_list;
2524
2525	if (setup_intlist(&symbol_conf.tid_list,
2526		       symbol_conf.tid_list_str, "tid") < 0)
2527		goto out_free_pid_list;
2528
2529	if (setup_list(&symbol_conf.sym_list,
2530		       symbol_conf.sym_list_str, "symbol") < 0)
2531		goto out_free_tid_list;
2532
2533	if (symbol_conf.sym_list &&
2534	    setup_addrlist(&symbol_conf.addr_list, symbol_conf.sym_list) < 0)
2535		goto out_free_sym_list;
2536
2537	if (setup_list(&symbol_conf.bt_stop_list,
2538		       symbol_conf.bt_stop_list_str, "symbol") < 0)
2539		goto out_free_sym_list;
2540
2541	/*
2542	 * A path to symbols of "/" is identical to ""
2543	 * reset here for simplicity.
2544	 */
2545	symfs = realpath(symbol_conf.symfs, NULL);
2546	if (symfs == NULL)
2547		symfs = symbol_conf.symfs;
2548	if (strcmp(symfs, "/") == 0)
2549		symbol_conf.symfs = "";
2550	if (symfs != symbol_conf.symfs)
2551		free((void *)symfs);
2552
2553	symbol_conf.kptr_restrict = symbol__read_kptr_restrict();
2554
2555	symbol_conf.initialized = true;
2556	return 0;
2557
2558out_free_sym_list:
2559	strlist__delete(symbol_conf.sym_list);
2560	intlist__delete(symbol_conf.addr_list);
2561out_free_tid_list:
2562	intlist__delete(symbol_conf.tid_list);
2563out_free_pid_list:
2564	intlist__delete(symbol_conf.pid_list);
2565out_free_comm_list:
2566	strlist__delete(symbol_conf.comm_list);
2567out_free_dso_list:
2568	strlist__delete(symbol_conf.dso_list);
2569	return -1;
2570}
2571
2572void symbol__exit(void)
2573{
2574	if (!symbol_conf.initialized)
2575		return;
2576	strlist__delete(symbol_conf.bt_stop_list);
2577	strlist__delete(symbol_conf.sym_list);
2578	strlist__delete(symbol_conf.dso_list);
2579	strlist__delete(symbol_conf.comm_list);
2580	intlist__delete(symbol_conf.tid_list);
2581	intlist__delete(symbol_conf.pid_list);
2582	intlist__delete(symbol_conf.addr_list);
2583	vmlinux_path__exit();
2584	symbol_conf.sym_list = symbol_conf.dso_list = symbol_conf.comm_list = NULL;
2585	symbol_conf.bt_stop_list = NULL;
2586	symbol_conf.initialized = false;
2587}
2588
2589int symbol__config_symfs(const struct option *opt __maybe_unused,
2590			 const char *dir, int unset __maybe_unused)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2591{
2592	char *bf = NULL;
2593	int ret;
 
 
2594
2595	symbol_conf.symfs = strdup(dir);
2596	if (symbol_conf.symfs == NULL)
2597		return -ENOMEM;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2598
2599	/* skip the locally configured cache if a symfs is given, and
2600	 * config buildid dir to symfs/.debug
2601	 */
2602	ret = asprintf(&bf, "%s/%s", dir, ".debug");
2603	if (ret < 0)
2604		return -ENOMEM;
2605
2606	set_buildid_dir(bf);
 
2607
2608	free(bf);
2609	return 0;
 
 
2610}
2611
2612struct mem_info *mem_info__get(struct mem_info *mi)
 
2613{
2614	if (mi)
2615		refcount_inc(&mi->refcnt);
2616	return mi;
 
 
 
 
 
 
 
 
 
 
 
2617}
2618
2619void mem_info__put(struct mem_info *mi)
 
2620{
2621	if (mi && refcount_dec_and_test(&mi->refcnt))
2622		free(mi);
 
 
 
 
 
 
 
2623}
2624
2625struct mem_info *mem_info__new(void)
2626{
2627	struct mem_info *mi = zalloc(sizeof(*mi));
 
2628
2629	if (mi)
2630		refcount_set(&mi->refcnt, 1);
2631	return mi;
 
2632}