blob: deb7b44c6d34cde31cb35831697349459a5ebbaa (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
|
#include <shared/flags.h>
#include <shared/syscalls.h>
#include <user/lib/elf.h>
#include <user/lib/elfload.h>
void elf_execf(libc_file *f) {
const size_t cap = 0x60000;
size_t pos = 0;
void *buf = malloc(cap); // TODO a way to get file size
if (!buf) goto fail;
while (!f->eof) {
long ret = file_read(f, buf, cap - pos);
if (ret < 0) goto fail;
pos += ret;
if (pos >= cap) goto fail;
}
elf_exec(buf);
fail:
free(buf);
}
static bool valid_ehdr(const struct Elf64_Ehdr *h) {
return h->e_ident[0] == 0x7f
&& h->e_ident[1] == 'E'
&& h->e_ident[2] == 'L'
&& h->e_ident[3] == 'F'
&& h->e_machine == EM_X86_64
&& h->e_version == 1;
}
static bool load_phdr(const void *elf, void *exebase, size_t idx) {
const struct Elf64_Ehdr *ehdr = elf;
const struct Elf64_Phdr *phdr = elf + ehdr->e_phoff + idx * ehdr->e_phentsize;
if (phdr->p_type == PT_DYNAMIC) return true;
if (phdr->p_type != PT_LOAD) {
printf("unknown type %x\n", phdr->p_type);
return false;
}
// TODO overlap check
// TODO don't ignore flags
_syscall_memflag(exebase + phdr->p_vaddr, phdr->p_memsz, MEMFLAG_PRESENT);
// TODO check that filesz <= memsz
memcpy(exebase + phdr->p_vaddr, elf + phdr->p_offset, phdr->p_filesz);
return true;
}
void elf_exec(void *base) {
struct Elf64_Ehdr *ehdr = base;
void *exebase;
if (!valid_ehdr(ehdr)) return;
switch (ehdr->e_type) {
case ET_EXEC:
exebase = (void*)0;
break;
case ET_DYN:
exebase = (void*)0x800000; // TODO search for free memory
break;
default:
return;
}
for (size_t phi = 0; phi < ehdr->e_phnum; phi++) {
if (!load_phdr(base, exebase, phi))
return;
}
((void(*)())exebase + ehdr->e_entry)();
_syscall_exit(1);
}
|
