blob: 3d7fcdee1865225ffd3a1b895ff546e595fa8542 (
plain) (
blame)
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
72
73
74
75
|
#include <fs/elf.h>
#include <fs/ext2.h>
#include <gdt/gdt.h>
#include <lib/lib.h>
#include <lib/stdio.h>
#include <lib/stdlib.h>
#include <memory/alloc.h>
#include <memory/paging.h>
#include <stddef.h>
#include <stdint.h>
#include <system.h>
#include <tasks/process.h>
int is_elf(struct elf_header *header)
{
if (header->ident[0] == ELF_MAG && header->ident[1] == 'E' && header->ident[2] == 'L' &&
header->ident[3] == 'F' && header->ident[4] == ELF_32 &&
header->ident[5] == ELF_LITTLE && header->ident[6] == ELF_CURRENT &&
header->machine == ELF_386 && (header->type == ET_REL || header->type == ET_EXEC)) {
return 1;
}
return 0;
}
struct process *elf_load(char *path)
{
u8 *file = read_file(path);
if (!file) {
warn("File or directory not found: %s", path);
return NULL;
}
struct elf_header *header = (struct elf_header *)file;
struct elf_program_header *program_header = (void *)header + header->phoff;
if (!is_elf(header)) {
warn("File not valid: %s", path);
return NULL;
} else {
debug("File is valid: %s", path);
}
struct process *proc = process_make_new();
strcpy(proc->name, path);
proc->registers.eip = header->entry;
paging_switch_directory(proc->cr3);
u32 stk = (u32)kmalloc_a(PAGE_S);
proc->registers.useresp = 0x40000000 - (PAGE_S / 2);
proc->registers.ebp = proc->registers.useresp;
proc->registers.esp = proc->registers.useresp;
paging_map_user(proc->cr3, stk, 0x40000000 - PAGE_S);
for (int i = 0; i < header->phnum; i++, program_header++) {
switch (program_header->type) {
case 0:
break;
case 1: {
u32 loc = (u32)kmalloc_a(PAGE_S);
paging_map_user(proc->cr3, loc, program_header->vaddr);
memcpy((void *)program_header->vaddr,
((void *)((u32)file) + program_header->offset),
program_header->filesz);
if (program_header->filesz > PAGE_S)
panic("ELF binary section too large");
break;
}
default:
warn("Unknown header type");
}
}
paging_switch_directory(paging_root_directory);
return proc;
}
|
