Add proc_global_info (XCC)
[akaros.git] / kern / src / env.c
1 /* See COPYRIGHT for copyright information. */
2
3 #include <arch/arch.h>
4 #include <arch/mmu.h>
5 #include <bitmask.h>
6 #include <elf.h>
7 #include <smp.h>
8 #include <atomic.h>
9 #include <string.h>
10 #include <assert.h>
11 #include <process.h>
12 #include <pmap.h>
13 #include <trap.h>
14 #include <monitor.h>
15 #include <manager.h>
16 #include <stdio.h>
17 #include <schedule.h>
18 #include <kmalloc.h>
19 #include <mm.h>
20
21 #include <ros/syscall.h>
22 #include <error.h>
23
24 atomic_t num_envs;
25
26 // Initialize the kernel virtual memory layout for environment e.
27 // Allocate a page directory, set e->env_pgdir and e->env_cr3 accordingly,
28 // and initialize the kernel portion of the new environment's address space.
29 // Do NOT (yet) map anything into the user portion
30 // of the environment's virtual address space.
31 //
32 // Returns 0 on success, < 0 on error.  Errors include:
33 //      -ENOMEM if page directory or table could not be allocated.
34 //
35 int env_setup_vm(env_t *e)
36 {
37         int i, ret;
38         static page_t *shared_page = 0;
39
40         if ((ret = arch_pgdir_setup(boot_pgdir, &e->env_pgdir)))
41                 return ret;
42         /* TODO: verify there is nothing below ULIM */
43         e->env_cr3 = arch_pgdir_get_cr3(e->env_pgdir);
44
45         /* These need to be contiguous, so the kernel can alias them.  Note the
46          * pages return with a refcnt, but it's okay to insert them since we free
47          * them manually when the process is cleaned up. */
48         if (!(e->procinfo = get_cont_pages(LOG2_UP(PROCINFO_NUM_PAGES), 0)))
49                 goto env_setup_vm_error_i;
50         if (!(e->procdata = get_cont_pages(LOG2_UP(PROCDATA_NUM_PAGES), 0)))
51                 goto env_setup_vm_error_d;
52         /* Normally we'd 0 the pages here.  We handle it in proc_init_proc*.  Don't
53          * start the process without calling those. */
54         for (int i = 0; i < PROCINFO_NUM_PAGES; i++) {
55                 if (page_insert(e->env_pgdir, kva2page((void*)e->procinfo + i *
56                                 PGSIZE), (void*)(UINFO + i*PGSIZE), PTE_USER_RO) < 0)
57                         goto env_setup_vm_error;
58         }
59         for (int i = 0; i < PROCDATA_NUM_PAGES; i++) {
60                 if (page_insert(e->env_pgdir, kva2page((void*)e->procdata + i *
61                                 PGSIZE), (void*)(UDATA + i*PGSIZE), PTE_USER_RW) < 0)
62                         goto env_setup_vm_error;
63         }
64         for (int i = 0; i < PROCGINFO_NUM_PAGES; i++) {
65                 if (page_insert(e->env_pgdir,
66                                 kva2page((void*)&__proc_global_info + i * PGSIZE),
67                                 (void*)(UGINFO + i * PGSIZE), PTE_USER_RO) < 0)
68                         goto env_setup_vm_error;
69         }
70         /* Finally, set up the Global Shared Data page for all processes.  Can't be
71          * trusted, but still very useful at this stage for us.  Consider removing
72          * when we have real processes (TODO). 
73          *
74          * Note the page is alloced only the first time through, and its ref is
75          * stored in shared_page. */
76         if (!shared_page) {
77                 if (upage_alloc(e, &shared_page, 1) < 0)
78                         goto env_setup_vm_error;
79         }
80         if (page_insert(e->env_pgdir, shared_page, (void*)UGDATA, PTE_USER_RW) < 0)
81                 goto env_setup_vm_error;
82
83         return 0;
84
85 env_setup_vm_error:
86         free_cont_pages(e->procdata, LOG2_UP(PROCDATA_NUM_PAGES));
87 env_setup_vm_error_d:
88         free_cont_pages(e->procinfo, LOG2_UP(PROCINFO_NUM_PAGES));
89 env_setup_vm_error_i:
90         page_decref(shared_page);
91         env_user_mem_free(e, 0, UVPT);
92         env_pagetable_free(e);
93         return -ENOMEM;
94 }
95
96 #define PER_CPU_THING(type,name)\
97 type SLOCKED(name##_lock) * RWPROTECT name;\
98 type SLOCKED(name##_lock) *\
99 (get_per_cpu_##name)()\
100 {\
101         { R_PERMITTED(global(name))\
102                 return &name[core_id()];\
103         }\
104 }
105
106 /* Frees (decrefs) all memory mapped in the given range */
107 void env_user_mem_free(env_t* e, void* start, size_t len)
108 {
109         assert((uintptr_t)start + len <= UVPT); //since this keeps fucking happening
110         int user_page_free(env_t* e, pte_t pte, void* va, void* arg)
111         {
112                 if (!pte_is_mapped(pte))
113                         return 0;
114                 page_t *page = pa2page(pte_get_paddr(pte));
115                 pte_clear(pte);
116                 page_decref(page);
117                 /* TODO: consider other states here (like !P, yet still tracking a page,
118                  * for VM tricks, page map stuff, etc.  Should be okay: once we're
119                  * freeing, everything else about this proc is dead. */
120                 return 0;
121         }
122
123         env_user_mem_walk(e,start,len,&user_page_free,NULL);
124         tlbflush();
125 }
126