[linux-block.git] / tools / perf / util / symbol-minimal.c

#include "dso.h"
#include "symbol.h"
#include "symsrc.h"

#include <errno.h>
#include <unistd.h>
#include <stdio.h>
#include <fcntl.h>
#include <string.h>
#include <stdlib.h>
#include <byteswap.h>
#include <sys/stat.h>
#include <linux/zalloc.h>
#include <internal/lib.h>

static bool check_need_swap(int file_endian)
{
	const int data = 1;
	u8 *check = (u8 *)&data;
	int host_endian;

	if (check[0] == 1)
		host_endian = ELFDATA2LSB;
	else
		host_endian = ELFDATA2MSB;

	return host_endian != file_endian;
}

#define NOTE_ALIGN(sz) (((sz) + 3) & ~3)

#define NT_GNU_BUILD_ID	3

static int read_build_id(void *note_data, size_t note_len, struct build_id *bid,
			 bool need_swap)
{
	size_t size = sizeof(bid->data);
	struct {
		u32 n_namesz;
		u32 n_descsz;
		u32 n_type;
	} *nhdr;
	void *ptr;

	ptr = note_data;
	while (ptr < (note_data + note_len)) {
		const char *name;
		size_t namesz, descsz;

		nhdr = ptr;
		if (need_swap) {
			nhdr->n_namesz = bswap_32(nhdr->n_namesz);
			nhdr->n_descsz = bswap_32(nhdr->n_descsz);
			nhdr->n_type = bswap_32(nhdr->n_type);
		}

		namesz = NOTE_ALIGN(nhdr->n_namesz);
		descsz = NOTE_ALIGN(nhdr->n_descsz);

		ptr += sizeof(*nhdr);
		name = ptr;
		ptr += namesz;
		if (nhdr->n_type == NT_GNU_BUILD_ID &&
		    nhdr->n_namesz == sizeof("GNU")) {
			if (memcmp(name, "GNU", sizeof("GNU")) == 0) {
				size_t sz = min(size, descsz);
				memcpy(bid->data, ptr, sz);
				memset(bid->data + sz, 0, size - sz);
				bid->size = sz;
				return 0;
			}
		}
		ptr += descsz;
	}

	return -1;
}

int filename__read_debuglink(const char *filename __maybe_unused,
			     char *debuglink __maybe_unused,
			     size_t size __maybe_unused)
{
	return -1;
}

/*
 * Just try PT_NOTE header otherwise fails
 */
int filename__read_build_id(const char *filename, struct build_id *bid)
{
	FILE *fp;
	int ret = -1;
	bool need_swap = false;
	u8 e_ident[EI_NIDENT];
	size_t buf_size;
	void *buf;
	int i;

	fp = fopen(filename, "r");
	if (fp == NULL)
		return -1;

	if (fread(e_ident, sizeof(e_ident), 1, fp) != 1)
		goto out;

	if (memcmp(e_ident, ELFMAG, SELFMAG) ||
	    e_ident[EI_VERSION] != EV_CURRENT)
		goto out;

	need_swap = check_need_swap(e_ident[EI_DATA]);

	/* for simplicity */
	fseek(fp, 0, SEEK_SET);

	if (e_ident[EI_CLASS] == ELFCLASS32) {
		Elf32_Ehdr ehdr;
		Elf32_Phdr *phdr;

		if (fread(&ehdr, sizeof(ehdr), 1, fp) != 1)
			goto out;

		if (need_swap) {
			ehdr.e_phoff = bswap_32(ehdr.e_phoff);
			ehdr.e_phentsize = bswap_16(ehdr.e_phentsize);
			ehdr.e_phnum = bswap_16(ehdr.e_phnum);
		}

		buf_size = ehdr.e_phentsize * ehdr.e_phnum;
		buf = malloc(buf_size);
		if (buf == NULL)
			goto out;

		fseek(fp, ehdr.e_phoff, SEEK_SET);
		if (fread(buf, buf_size, 1, fp) != 1)
			goto out_free;

		for (i = 0, phdr = buf; i < ehdr.e_phnum; i++, phdr++) {
			void *tmp;
			long offset;

			if (need_swap) {
				phdr->p_type = bswap_32(phdr->p_type);
				phdr->p_offset = bswap_32(phdr->p_offset);
				phdr->p_filesz = bswap_32(phdr->p_filesz);
			}

			if (phdr->p_type != PT_NOTE)
				continue;

			buf_size = phdr->p_filesz;
			offset = phdr->p_offset;
			tmp = realloc(buf, buf_size);
			if (tmp == NULL)
				goto out_free;

			buf = tmp;
			fseek(fp, offset, SEEK_SET);
			if (fread(buf, buf_size, 1, fp) != 1)
				goto out_free;

			ret = read_build_id(buf, buf_size, bid, need_swap);
			if (ret == 0) {
				ret = bid->size;
				break;
			}
		}
	} else {
		Elf64_Ehdr ehdr;
		Elf64_Phdr *phdr;

		if (fread(&ehdr, sizeof(ehdr), 1, fp) != 1)
			goto out;

		if (need_swap) {
			ehdr.e_phoff = bswap_64(ehdr.e_phoff);
			ehdr.e_phentsize = bswap_16(ehdr.e_phentsize);
			ehdr.e_phnum = bswap_16(ehdr.e_phnum);
		}

		buf_size = ehdr.e_phentsize * ehdr.e_phnum;
		buf = malloc(buf_size);
		if (buf == NULL)
			goto out;

		fseek(fp, ehdr.e_phoff, SEEK_SET);
		if (fread(buf, buf_size, 1, fp) != 1)
			goto out_free;

		for (i = 0, phdr = buf; i < ehdr.e_phnum; i++, phdr++) {
			void *tmp;
			long offset;

			if (need_swap) {
				phdr->p_type = bswap_32(phdr->p_type);
				phdr->p_offset = bswap_64(phdr->p_offset);
				phdr->p_filesz = bswap_64(phdr->p_filesz);
			}

			if (phdr->p_type != PT_NOTE)
				continue;

			buf_size = phdr->p_filesz;
			offset = phdr->p_offset;
			tmp = realloc(buf, buf_size);
			if (tmp == NULL)
				goto out_free;

			buf = tmp;
			fseek(fp, offset, SEEK_SET);
			if (fread(buf, buf_size, 1, fp) != 1)
				goto out_free;

			ret = read_build_id(buf, buf_size, bid, need_swap);
			if (ret == 0) {
				ret = bid->size;
				break;
			}
		}
	}
out_free:
	free(buf);
out:
	fclose(fp);
	return ret;
}

int sysfs__read_build_id(const char *filename, struct build_id *bid)
{
	int fd;
	int ret = -1;
	struct stat stbuf;
	size_t buf_size;
	void *buf;

	fd = open(filename, O_RDONLY);
	if (fd < 0)
		return -1;

	if (fstat(fd, &stbuf) < 0)
		goto out;

	buf_size = stbuf.st_size;
	buf = malloc(buf_size);
	if (buf == NULL)
		goto out;

	if (read(fd, buf, buf_size) != (ssize_t) buf_size)
		goto out_free;

	ret = read_build_id(buf, buf_size, bid, false);
out_free:
	free(buf);
out:
	close(fd);
	return ret;
}

int symsrc__init(struct symsrc *ss, struct dso *dso, const char *name,
	         enum dso_binary_type type)
{
	int fd = open(name, O_RDONLY);
	if (fd < 0)
		goto out_errno;

	ss->name = strdup(name);
	if (!ss->name)
		goto out_close;

	ss->fd = fd;
	ss->type = type;

	return 0;
out_close:
	close(fd);
out_errno:
	RC_CHK_ACCESS(dso)->load_errno = errno;
	return -1;
}

bool symsrc__possibly_runtime(struct symsrc *ss __maybe_unused)
{
	/* Assume all sym sources could be a runtime image. */
	return true;
}

bool symsrc__has_symtab(struct symsrc *ss __maybe_unused)
{
	return false;
}

void symsrc__destroy(struct symsrc *ss)
{
	zfree(&ss->name);
	close(ss->fd);
}

int dso__synthesize_plt_symbols(struct dso *dso __maybe_unused,
				struct symsrc *ss __maybe_unused)
{
	return 0;
}

static int fd__is_64_bit(int fd)
{
	u8 e_ident[EI_NIDENT];

	if (lseek(fd, 0, SEEK_SET))
		return -1;

	if (readn(fd, e_ident, sizeof(e_ident)) != sizeof(e_ident))
		return -1;

	if (memcmp(e_ident, ELFMAG, SELFMAG) ||
	    e_ident[EI_VERSION] != EV_CURRENT)
		return -1;

	return e_ident[EI_CLASS] == ELFCLASS64;
}

enum dso_type dso__type_fd(int fd)
{
	Elf64_Ehdr ehdr;
	int ret;

	ret = fd__is_64_bit(fd);
	if (ret < 0)
		return DSO__TYPE_UNKNOWN;

	if (ret)
		return DSO__TYPE_64BIT;

	if (readn(fd, &ehdr, sizeof(ehdr)) != sizeof(ehdr))
		return DSO__TYPE_UNKNOWN;

	if (ehdr.e_machine == EM_X86_64)
		return DSO__TYPE_X32BIT;

	return DSO__TYPE_32BIT;
}

int dso__load_sym(struct dso *dso, struct map *map __maybe_unused,
		  struct symsrc *ss,
		  struct symsrc *runtime_ss __maybe_unused,
		  int kmodule __maybe_unused)
{
	struct build_id bid;
	int ret;

	ret = fd__is_64_bit(ss->fd);
	if (ret >= 0)
		RC_CHK_ACCESS(dso)->is_64_bit = ret;

	if (filename__read_build_id(ss->name, &bid) > 0)
		dso__set_build_id(dso, &bid);
	return 0;
}

int file__read_maps(int fd __maybe_unused, bool exe __maybe_unused,
		    mapfn_t mapfn __maybe_unused, void *data __maybe_unused,
		    bool *is_64_bit __maybe_unused)
{
	return -1;
}

int kcore_extract__create(struct kcore_extract *kce __maybe_unused)
{
	return -1;
}

void kcore_extract__delete(struct kcore_extract *kce __maybe_unused)
{
}

int kcore_copy(const char *from_dir __maybe_unused,
	       const char *to_dir __maybe_unused)
{
	return -1;
}

void symbol__elf_init(void)
{
}

char *dso__demangle_sym(struct dso *dso __maybe_unused,
			int kmodule __maybe_unused,
			const char *elf_name __maybe_unused)
{
	return NULL;
}

bool filename__has_section(const char *filename __maybe_unused, const char *sec __maybe_unused)
{
	return false;
}
Commit	Line	Data
b1d1b094	1	#include "dso.h"
393be2e3	2	#include "symbol.h"
b1d1b094	3	#include "symsrc.h"
393be2e3	4
a43783ae	5	#include <errno.h>
68c0188e	6	#include <unistd.h>
b691f643 NK	7	#include <stdio.h>
	8	#include <fcntl.h>
	9	#include <string.h>
215a0d30	10	#include <stdlib.h>
b691f643 NK	11	#include <byteswap.h>
b691f643 NK	12	#include <sys/stat.h>
7f7c536f	13	#include <linux/zalloc.h>
fb71c86c	14	#include <internal/lib.h>
b691f643 NK	15
b691f643 NK	16	static bool check_need_swap(int file_endian)
393be2e3	17	{
b691f643 NK	18	const int data = 1;
	19	u8 check = (u8 )&data;
	20	int host_endian;
	21
	22	if (check[0] == 1)
	23	host_endian = ELFDATA2LSB;
	24	else
	25	host_endian = ELFDATA2MSB;
	26
	27	return host_endian != file_endian;
393be2e3 NK	28	}
393be2e3 NK	29
b691f643 NK	30	#define NOTE_ALIGN(sz) (((sz) + 3) & ~3)
	31
	32	#define NT_GNU_BUILD_ID 3
	33
f766819c JO	34	static int read_build_id(void note_data, size_t note_len, struct build_id bid,
f766819c JO	35	bool need_swap)
393be2e3	36	{
f766819c	37	size_t size = sizeof(bid->data);
b691f643 NK	38	struct {
	39	u32 n_namesz;
	40	u32 n_descsz;
	41	u32 n_type;
	42	} *nhdr;
	43	void *ptr;
	44
	45	ptr = note_data;
	46	while (ptr < (note_data + note_len)) {
	47	const char *name;
	48	size_t namesz, descsz;
	49
	50	nhdr = ptr;
	51	if (need_swap) {
	52	nhdr->n_namesz = bswap_32(nhdr->n_namesz);
	53	nhdr->n_descsz = bswap_32(nhdr->n_descsz);
	54	nhdr->n_type = bswap_32(nhdr->n_type);
	55	}
	56
	57	namesz = NOTE_ALIGN(nhdr->n_namesz);
	58	descsz = NOTE_ALIGN(nhdr->n_descsz);
	59
	60	ptr += sizeof(*nhdr);
	61	name = ptr;
	62	ptr += namesz;
	63	if (nhdr->n_type == NT_GNU_BUILD_ID &&
	64	nhdr->n_namesz == sizeof("GNU")) {
	65	if (memcmp(name, "GNU", sizeof("GNU")) == 0) {
	66	size_t sz = min(size, descsz);
f766819c JO	67	memcpy(bid->data, ptr, sz);
	68	memset(bid->data + sz, 0, size - sz);
	69	bid->size = sz;
b691f643 NK	70	return 0;
	71	}
	72	}
	73	ptr += descsz;
	74	}
	75
393be2e3 NK	76	return -1;
	77	}
	78
1d037ca1 IT	79	int filename__read_debuglink(const char *filename __maybe_unused,
	80	char *debuglink __maybe_unused,
	81	size_t size __maybe_unused)
393be2e3 NK	82	{
	83	return -1;
	84	}
	85
b691f643 NK	86	/*
	87	* Just try PT_NOTE header otherwise fails
	88	*/
f766819c	89	int filename__read_build_id(const char filename, struct build_id bid)
b691f643 NK	90	{
	91	FILE *fp;
	92	int ret = -1;
	93	bool need_swap = false;
	94	u8 e_ident[EI_NIDENT];
	95	size_t buf_size;
	96	void *buf;
	97	int i;
	98
	99	fp = fopen(filename, "r");
	100	if (fp == NULL)
	101	return -1;
	102
	103	if (fread(e_ident, sizeof(e_ident), 1, fp) != 1)
	104	goto out;
	105
	106	if (memcmp(e_ident, ELFMAG, SELFMAG) \|\|
	107	e_ident[EI_VERSION] != EV_CURRENT)
	108	goto out;
	109
	110	need_swap = check_need_swap(e_ident[EI_DATA]);
	111
	112	/* for simplicity */
	113	fseek(fp, 0, SEEK_SET);
	114
	115	if (e_ident[EI_CLASS] == ELFCLASS32) {
	116	Elf32_Ehdr ehdr;
	117	Elf32_Phdr *phdr;
	118
	119	if (fread(&ehdr, sizeof(ehdr), 1, fp) != 1)
	120	goto out;
	121
	122	if (need_swap) {
	123	ehdr.e_phoff = bswap_32(ehdr.e_phoff);
	124	ehdr.e_phentsize = bswap_16(ehdr.e_phentsize);
	125	ehdr.e_phnum = bswap_16(ehdr.e_phnum);
	126	}
	127
	128	buf_size = ehdr.e_phentsize * ehdr.e_phnum;
	129	buf = malloc(buf_size);
	130	if (buf == NULL)
	131	goto out;
	132
	133	fseek(fp, ehdr.e_phoff, SEEK_SET);
	134	if (fread(buf, buf_size, 1, fp) != 1)
	135	goto out_free;
	136
	137	for (i = 0, phdr = buf; i < ehdr.e_phnum; i++, phdr++) {
	138	void *tmp;
7ad74b41	139	long offset;
b691f643 NK	140
	141	if (need_swap) {
	142	phdr->p_type = bswap_32(phdr->p_type);
	143	phdr->p_offset = bswap_32(phdr->p_offset);
	144	phdr->p_filesz = bswap_32(phdr->p_filesz);
	145	}
	146
	147	if (phdr->p_type != PT_NOTE)
	148	continue;
	149
	150	buf_size = phdr->p_filesz;
7ad74b41	151	offset = phdr->p_offset;
b691f643 NK	152	tmp = realloc(buf, buf_size);
	153	if (tmp == NULL)
	154	goto out_free;
	155
	156	buf = tmp;
7ad74b41	157	fseek(fp, offset, SEEK_SET);
b691f643 NK	158	if (fread(buf, buf_size, 1, fp) != 1)
	159	goto out_free;
	160
f766819c	161	ret = read_build_id(buf, buf_size, bid, need_swap);
d0acce68	162	if (ret == 0) {
f766819c	163	ret = bid->size;
d0acce68 CD	164	break;
d0acce68 CD	165	}
b691f643 NK	166	}
	167	} else {
	168	Elf64_Ehdr ehdr;
	169	Elf64_Phdr *phdr;
	170
	171	if (fread(&ehdr, sizeof(ehdr), 1, fp) != 1)
	172	goto out;
	173
	174	if (need_swap) {
	175	ehdr.e_phoff = bswap_64(ehdr.e_phoff);
	176	ehdr.e_phentsize = bswap_16(ehdr.e_phentsize);
	177	ehdr.e_phnum = bswap_16(ehdr.e_phnum);
	178	}
	179
	180	buf_size = ehdr.e_phentsize * ehdr.e_phnum;
	181	buf = malloc(buf_size);
	182	if (buf == NULL)
	183	goto out;
	184
	185	fseek(fp, ehdr.e_phoff, SEEK_SET);
	186	if (fread(buf, buf_size, 1, fp) != 1)
	187	goto out_free;
	188
	189	for (i = 0, phdr = buf; i < ehdr.e_phnum; i++, phdr++) {
	190	void *tmp;
7ad74b41	191	long offset;
b691f643 NK	192
	193	if (need_swap) {
	194	phdr->p_type = bswap_32(phdr->p_type);
	195	phdr->p_offset = bswap_64(phdr->p_offset);
	196	phdr->p_filesz = bswap_64(phdr->p_filesz);
	197	}
	198
	199	if (phdr->p_type != PT_NOTE)
	200	continue;
	201
	202	buf_size = phdr->p_filesz;
7ad74b41	203	offset = phdr->p_offset;
b691f643 NK	204	tmp = realloc(buf, buf_size);
	205	if (tmp == NULL)
	206	goto out_free;
	207
	208	buf = tmp;
7ad74b41	209	fseek(fp, offset, SEEK_SET);
b691f643 NK	210	if (fread(buf, buf_size, 1, fp) != 1)
	211	goto out_free;
	212
f766819c	213	ret = read_build_id(buf, buf_size, bid, need_swap);
d0acce68	214	if (ret == 0) {
f766819c	215	ret = bid->size;
d0acce68 CD	216	break;
d0acce68 CD	217	}
b691f643 NK	218	}
	219	}
	220	out_free:
	221	free(buf);
	222	out:
	223	fclose(fp);
	224	return ret;
	225	}
	226
3ff1b8c8	227	int sysfs__read_build_id(const char filename, struct build_id bid)
b691f643 NK	228	{
	229	int fd;
	230	int ret = -1;
	231	struct stat stbuf;
	232	size_t buf_size;
	233	void *buf;
	234
	235	fd = open(filename, O_RDONLY);
	236	if (fd < 0)
	237	return -1;
	238
	239	if (fstat(fd, &stbuf) < 0)
	240	goto out;
	241
	242	buf_size = stbuf.st_size;
	243	buf = malloc(buf_size);
	244	if (buf == NULL)
	245	goto out;
	246
	247	if (read(fd, buf, buf_size) != (ssize_t) buf_size)
	248	goto out_free;
	249
3ff1b8c8	250	ret = read_build_id(buf, buf_size, bid, false);
b691f643 NK	251	out_free:
	252	free(buf);
	253	out:
	254	close(fd);
	255	return ret;
	256	}
	257
18425f13	258	int symsrc__init(struct symsrc ss, struct dso dso, const char *name,
b68e2f91 CS	259	enum dso_binary_type type)
	260	{
	261	int fd = open(name, O_RDONLY);
	262	if (fd < 0)
18425f13	263	goto out_errno;
b68e2f91 CS	264
	265	ss->name = strdup(name);
	266	if (!ss->name)
	267	goto out_close;
	268
779e24e2	269	ss->fd = fd;
b68e2f91 CS	270	ss->type = type;
	271
	272	return 0;
	273	out_close:
	274	close(fd);
18425f13	275	out_errno:
ee756ef7	276	RC_CHK_ACCESS(dso)->load_errno = errno;
b68e2f91 CS	277	return -1;
	278	}
	279
1d037ca1	280	bool symsrc__possibly_runtime(struct symsrc *ss __maybe_unused)
3aafe5ae CS	281	{
	282	/* Assume all sym sources could be a runtime image. */
	283	return true;
	284	}
	285
1d037ca1	286	bool symsrc__has_symtab(struct symsrc *ss __maybe_unused)
d26cd12b CS	287	{
	288	return false;
	289	}
	290
b68e2f91 CS	291	void symsrc__destroy(struct symsrc *ss)
b68e2f91 CS	292	{
74cf249d	293	zfree(&ss->name);
b68e2f91 CS	294	close(ss->fd);
	295	}
	296
1d037ca1	297	int dso__synthesize_plt_symbols(struct dso *dso __maybe_unused,
3183f8ca	298	struct symsrc *ss __maybe_unused)
393be2e3 NK	299	{
	300	return 0;
	301	}
	302
c6d8f2a4 AH	303	static int fd__is_64_bit(int fd)
	304	{
	305	u8 e_ident[EI_NIDENT];
	306
	307	if (lseek(fd, 0, SEEK_SET))
	308	return -1;
	309
	310	if (readn(fd, e_ident, sizeof(e_ident)) != sizeof(e_ident))
	311	return -1;
	312
	313	if (memcmp(e_ident, ELFMAG, SELFMAG) \|\|
	314	e_ident[EI_VERSION] != EV_CURRENT)
	315	return -1;
	316
	317	return e_ident[EI_CLASS] == ELFCLASS64;
	318	}
	319
2b5b8bb2 AH	320	enum dso_type dso__type_fd(int fd)
	321	{
	322	Elf64_Ehdr ehdr;
	323	int ret;
	324
	325	ret = fd__is_64_bit(fd);
	326	if (ret < 0)
	327	return DSO__TYPE_UNKNOWN;
	328
	329	if (ret)
	330	return DSO__TYPE_64BIT;
	331
	332	if (readn(fd, &ehdr, sizeof(ehdr)) != sizeof(ehdr))
	333	return DSO__TYPE_UNKNOWN;
	334
	335	if (ehdr.e_machine == EM_X86_64)
	336	return DSO__TYPE_X32BIT;
	337
	338	return DSO__TYPE_32BIT;
	339	}
	340
1d037ca1 IT	341	int dso__load_sym(struct dso dso, struct map map __maybe_unused,
	342	struct symsrc *ss,
	343	struct symsrc *runtime_ss __maybe_unused,
1d037ca1	344	int kmodule __maybe_unused)
393be2e3	345	{
f766819c	346	struct build_id bid;
c6d8f2a4 AH	347	int ret;
	348
	349	ret = fd__is_64_bit(ss->fd);
	350	if (ret >= 0)
ee756ef7	351	RC_CHK_ACCESS(dso)->is_64_bit = ret;
b691f643	352
f766819c	353	if (filename__read_build_id(ss->name, &bid) > 0)
8dfdf440	354	dso__set_build_id(dso, &bid);
393be2e3 NK	355	return 0;
	356	}
	357
8e0cf965 AH	358	int file__read_maps(int fd __maybe_unused, bool exe __maybe_unused,
	359	mapfn_t mapfn __maybe_unused, void *data __maybe_unused,
	360	bool *is_64_bit __maybe_unused)
	361	{
	362	return -1;
	363	}
	364
afba19d9 AH	365	int kcore_extract__create(struct kcore_extract *kce __maybe_unused)
	366	{
	367	return -1;
	368	}
	369
	370	void kcore_extract__delete(struct kcore_extract *kce __maybe_unused)
	371	{
	372	}
	373
fc1b691d AH	374	int kcore_copy(const char *from_dir __maybe_unused,
	375	const char *to_dir __maybe_unused)
	376	{
	377	return -1;
	378	}
	379
393be2e3 NK	380	void symbol__elf_init(void)
	381	{
	382	}
a64489c5 JY	383
	384	char dso__demangle_sym(struct dso dso __maybe_unused,
	385	int kmodule __maybe_unused,
80c345b2	386	const char *elf_name __maybe_unused)
a64489c5 JY	387	{
	388	return NULL;
	389	}
06ea72a4 NK	390
	391	bool filename__has_section(const char filename __maybe_unused, const char sec __maybe_unused)
	392	{
	393	return false;
	394	}