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
|
#include <apos/elf.h>
#include <apos/proc.h>
#include <apos/conf.h>
#include <apos/string.h>
#include <apos/initrd.h>
#include <arch/arch.h>
/* TODO: add error checking */
static vm_t setup_call_stack(struct tcb *t, size_t bytes)
{
pm_t offset = 0;
size_t pages = __pages(bytes);
vmflags_t flags = VM_V | VM_R | VM_W | VM_U;
for(size_t i = 1; i <= pages; ++i)
{
offset = alloc_page(BASE_PAGE, offset);
map_vpage(t->b_r, offset, PROC_STACK_TOP - BASE_PAGE_SIZE * i, flags, BASE_PAGE);
}
return PROC_STACK_TOP - BASE_PAGE_SIZE * pages;
}
static vm_t setup_proc_stack(struct tcb *t, size_t bytes)
{
return alloc_uvmem(t, bytes, VM_V | VM_R | VM_W | VM_U);
}
stat_t init_proc(void *fdt, struct vm_branch *b)
{
/* todo: cleanup or something */
struct tcb *t = (struct tcb *)alloc_page(BASE_PAGE, 0);
if(!t)
return ERR_OOMEM;
memset(t, 0, sizeof(struct tcb));
t->b_r = b;
t->pid = 0;
t->tid = 0;
threads_insert(t);
init_uvmem(t, UVMEM_START, UVMEM_END);
/* the binary gets to choose first what memory regions it requires */
t->entry = load_elf(t, get_init_base(fdt));
if(!t->entry)
return ERR_ADDR;
t->proc_stack = setup_proc_stack(t, __proc_stack_size);
if(!t->proc_stack)
return ERR_ADDR;
t->call_stack = setup_call_stack(t, __call_stack_size);
if(!t->call_stack)
return ERR_ADDR;
flush_tlb();
/* TODO: move fdt into process space */
return jump_to_userspace(t, 1, 0);
}
|
