Update to linuxemu syscall structure
[akaros.git] / user / vmm / memory.c
1 /* Copyright (c) 2017 Google Inc.
2  * See LICENSE for details.
3  *
4  * Memory, paging, e820, bootparams and other helpers */
5
6 #include <stdio.h>
7 #include <stdlib.h>
8 #include <sys/mman.h>
9 #include <ros/arch/mmu.h>
10 #include <vmm/linux_bootparam.h>
11 #include <vmm/vmm.h>
12 #include <err.h>
13
14 #define ALIGNED(p, a)   (!(((uintptr_t)(p)) & ((a)-1)))
15
16 static char *entrynames[] = {
17         [E820_RAM] "E820_RAM",
18         [E820_RESERVED] "E820_RESERVED",
19         [E820_ACPI] "E820_ACPI",
20         [E820_NVS] "E820_NVS",
21         [E820_UNUSABLE] "E820_UNUSABLE",
22 };
23
24 static void dumpe820(struct e820entry *e, int nr)
25 {
26         for (int i = 0; i < nr; i++) {
27                 fprintf(stderr, "%d:%p %p %p %s\n",
28                         i, e[i].addr, e[i].size, e[i].type,
29                         entrynames[e[i].type]);
30         }
31 }
32
33 // e820map creates an e820 map in the bootparams struct.  If we've
34 // gotten here, then memsize and memstart are valid.  It returns
35 // pointer to the first page after the map for our bump allocator.  We
36 // assume the ranges passed in are validated already.
37 void *init_e820map(struct boot_params *bp,
38                    unsigned long long memstart,
39                    unsigned long long memsize)
40 {
41         unsigned long long lowmem = 0;
42         // Everything in Linux at this level is PGSIZE.
43         memset(bp, 0, PGSIZE);
44
45         bp->e820_entries = 0;
46
47         // The first page is always reserved.
48         bp->e820_map[bp->e820_entries].addr = 0;
49         bp->e820_map[bp->e820_entries].size = PGSIZE;
50         bp->e820_map[bp->e820_entries++].type = E820_RESERVED;
51
52         /* Give it just a tiny bit of memory -- 60k -- at low memory. */
53         bp->e820_map[bp->e820_entries].addr = PGSIZE;
54         bp->e820_map[bp->e820_entries].size = LOW64K - PGSIZE;
55         bp->e820_map[bp->e820_entries++].type = E820_RAM;
56
57         // All other memory from 64k to memstart is reserved.
58         bp->e820_map[bp->e820_entries].addr = LOW64K;
59         bp->e820_map[bp->e820_entries].size = memstart - LOW64K;
60         bp->e820_map[bp->e820_entries++].type = E820_RESERVED;
61
62         // If memory starts below RESERVED, then add an entry for memstart to
63         // the smaller of RESERVED or memsize.
64         if (memstart < RESERVED) {
65                 bp->e820_map[bp->e820_entries].addr = memstart;
66                 if (memstart + memsize > RESERVED)
67                         bp->e820_map[bp->e820_entries].size = RESERVED - memstart;
68                 else
69                         bp->e820_map[bp->e820_entries].size = memsize;
70                 lowmem = bp->e820_map[bp->e820_entries].size;
71                 bp->e820_map[bp->e820_entries++].type = E820_RAM;
72         }
73
74         bp->e820_map[bp->e820_entries].addr = RESERVED;
75         bp->e820_map[bp->e820_entries].size = RESERVEDSIZE;
76         bp->e820_map[bp->e820_entries++].type = E820_RESERVED;
77
78         if ((memstart + memsize) > RESERVED) {
79                 bp->e820_map[bp->e820_entries].addr = MAX(memstart, _4GiB);
80                 bp->e820_map[bp->e820_entries].size = memsize - lowmem;
81                 bp->e820_map[bp->e820_entries++].type = E820_RAM;
82         }
83
84         dumpe820(bp->e820_map, bp->e820_entries);
85         return (void *)bp + PGSIZE;
86 }
87
88 /* checkmemaligned verifies alignment attributes of your memory space.
89  * It terminates your process with extreme prejudice if they are
90  * incorrect in some way. */
91 void checkmemaligned(uintptr_t memstart, size_t memsize)
92 {
93         if (!ALIGNED(memstart, PML1_REACH))
94                 errx(1, "memstart (%#x) wrong: must be aligned to %#x",
95                      memstart, PML1_REACH);
96         if (!ALIGNED(memsize, PML1_REACH))
97                 errx(1, "memsize (%#x) wrong: must be aligned to %#x",
98                      memsize, PML1_REACH);
99 }
100
101 // memory allocates memory for the VM. It's a complicated mess because of the
102 // break for APIC and other things. We just go ahead and leave the region from
103 // RESERVED to _4GiB for that.  The memory is either split, all low, or all
104 // high. This code is designed for a kernel. Dune-style code does not need it
105 // as it does not have the RESERVED restrictions. Dune-style code can use this,
106 // however, by setting memstart to 4 GiB. This code can be called multiple
107 // times with more ranges. It does not check for overlaps.
108 void mmap_memory(struct virtual_machine *vm, uintptr_t memstart, size_t memsize)
109 {
110         void *r1, *r2;
111         unsigned long r1size = memsize;
112
113         // Let's do some minimal validation, so we don't drive
114         // people crazy.
115         checkmemaligned(memstart, memsize);
116         if ((memstart >= RESERVED) && (memstart < _4GiB))
117                 errx(1, "memstart (%#x) wrong: must be < %#x or >= %#x\n",
118                      memstart, RESERVED, _4GiB);
119         if (memstart < MinMemory)
120                 errx(1, "memstart (%#x) wrong: must be > %#x\n",
121                      memstart, MinMemory);
122
123         // Note: this test covers the split case as well as the
124         // 'all above 4G' case.
125         if ((memstart + memsize) > RESERVED) {
126                 unsigned long long r2start = MAX(memstart, _4GiB);
127
128                 r1size = memstart < RESERVED ? RESERVED - memstart : 0;
129                 r2 = mmap((void *)r2start, memsize - r1size,
130                           PROT_READ | PROT_WRITE | PROT_EXEC,
131                           MAP_POPULATE | MAP_ANONYMOUS | MAP_PRIVATE, -1, 0);
132                 if (r2 != (void *)r2start) {
133                         fprintf(stderr,
134                                 "High region: Could not mmap 0x%lx bytes at 0x%lx\n",
135                                 memsize, r2start);
136                         exit(1);
137                 }
138                 if (memstart >= _4GiB)
139                         goto done;
140         }
141
142         r1 = mmap((void *)memstart, r1size,
143                       PROT_READ | PROT_WRITE | PROT_EXEC,
144                       MAP_POPULATE | MAP_ANONYMOUS | MAP_PRIVATE, -1, 0);
145         if (r1 != (void *)memstart) {
146                 fprintf(stderr, "Low region: Could not mmap 0x%lx bytes at 0x%lx\n",
147                         memsize, memstart);
148                 exit(1);
149         }
150
151 done:
152         if ((vm->minphys == 0) || (vm->minphys > memstart))
153                 vm->minphys = memstart;
154
155         if (vm->maxphys < memstart + memsize - 1)
156                 vm->maxphys = memstart + memsize - 1;
157 }