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
|
/**
* @file proc.c
* Process handling, might be merged into \ref common/tcb.c.
*/
#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 vmem *b)
{
init_tcbs();
/* TODO: cleanup or something */
struct tcb *t = create_thread(NULL);
if (!t)
return ERR_OOMEM;
/* use existing branch */
t->b_r = b;
init_uvmem(t, UVMEM_START, UVMEM_END);
/* TODO: this stuff should be placed in __sys_exec */
/* the binary gets to choose first what memory regions it requires */
t->entry = load_elf(t, get_init_base(fdt), 0);
if (!t->entry)
return ERR_ADDR;
t->proc_stack = __setup_proc_stack(t, __proc_stack_size);
if (!t->proc_stack)
return ERR_ADDR;
t->proc_stack_top = t->proc_stack + __proc_stack_size;
t->call_stack = __setup_call_stack(t, __call_stack_size);
if (!t->call_stack)
return ERR_ADDR;
t->call_stack_top = t->call_stack + __call_stack_size;
flush_tlb();
/* set current tcb */
use_tcb(t);
/* TODO: move fdt into process space */
return jump_to_userspace(t, 1, 0);
}
|
