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

#include "symbol.h"
#include "util.h"

#include <stdio.h>
#include <fcntl.h>
#include <string.h>
#include <byteswap.h>
#include <sys/stat.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, void *bf,
			 size_t size, bool need_swap)
{
	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(bf, ptr, sz);
				memset(bf + sz, 0, 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, void *bf, size_t size)
{
	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, bf, size, need_swap);
			if (ret == 0)
				ret = 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, bf, size, need_swap);
			if (ret == 0)
				ret = size;
			break;
		}
	}
out_free:
	free(buf);
out:
	fclose(fp);
	return ret;
}

int sysfs__read_build_id(const char *filename, void *build_id, size_t size)
{
	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, build_id, size, 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:
	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,
				struct map *map __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)
{
	unsigned char build_id[BUILD_ID_SIZE];
	int ret;

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

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