diff options
| author | Kimplul <kimi.h.kuparinen@gmail.com> | 2022-01-07 16:32:05 +0200 |
|---|---|---|
| committer | Kimplul <kimi.h.kuparinen@gmail.com> | 2022-01-07 16:32:05 +0200 |
| commit | be78fcb0acc665d4db8edb9cda53f6863d27dd85 (patch) | |
| tree | e9e33e9e48983f630098eedd3d931edbe86e4410 /common | |
| parent | 9cc125fb3cfdc2c8ae7153b5ae0fe705980835fb (diff) | |
| download | kmi-be78fcb0acc665d4db8edb9cda53f6863d27dd85.tar.gz kmi-be78fcb0acc665d4db8edb9cda53f6863d27dd85.zip | |
Improved header dependency tree
Diffstat (limited to 'common')
| -rw-r--r-- | common/dmem.c (renamed from common/dev.c) | 19 | ||||
| -rw-r--r-- | common/main.c | 4 | ||||
| -rw-r--r-- | common/mem_regions.c | 458 | ||||
| -rw-r--r-- | common/pmem.c | 2 | ||||
| -rw-r--r-- | common/proc.c | 3 | ||||
| -rw-r--r-- | common/tcb.c | 2 | ||||
| -rw-r--r-- | common/uapi/mem.c | 2 | ||||
| -rw-r--r-- | common/vmem.c | 483 |
8 files changed, 494 insertions, 479 deletions
diff --git a/common/dev.c b/common/dmem.c index b89fe3a..0cc96e1 100644 --- a/common/dev.c +++ b/common/dmem.c @@ -1,5 +1,4 @@ -#include <apos/dev.h> -#include <apos/vmem.h> +#include <apos/dmem.h> static struct sp_reg_root pre_ram = {0}; static struct sp_reg_root post_ram = {0}; @@ -8,7 +7,7 @@ pm_t __pre_top = 0; pm_t __post_base = 0; pm_t __post_top = 0; -void init_devmem(pm_t ram_base, pm_t ram_top) +stat_t init_devmem(pm_t ram_base, pm_t ram_top) { pm_t mem_top = (pm_t)-1; @@ -23,16 +22,18 @@ void init_devmem(pm_t ram_base, pm_t ram_top) sp_mem_init(&pre_ram, __pre_base, pre_pages); sp_mem_init(&post_ram, __post_base, post_pages); + + return OK; } -static int dev_alloc_wrapper(struct vm_branch *b, pm_t *offset, vm_t vaddr, uint8_t flags, enum mm_order order) +stat_t dev_alloc_wrapper(struct vm_branch *b, pm_t *offset, vm_t vaddr, uint8_t flags, enum mm_order order) { map_vmem(b, *offset, vaddr, flags, order); *offset += __o_size(order); return 0; } -static int dev_free_wrapper(struct vm_branch *b, pm_t *offset, vm_t vaddr, uint8_t flags, enum mm_order order) +stat_t dev_free_wrapper(struct vm_branch *b, pm_t *offset, vm_t vaddr, uint8_t flags, enum mm_order order) { UNUSED(offset); UNUSED(flags); pm_t paddr = 0; @@ -60,13 +61,13 @@ vm_t alloc_devmem(struct tcb *t, pm_t dev_start, size_t bytes, uint8_t flags) return map_fill_region(t->b_r, &dev_alloc_wrapper, dev_start, region, bytes, flags); } -void free_devmem(struct tcb *t, vm_t dev_start) +stat_t free_devmem(struct tcb *t, vm_t dev_start) { pm_t dev_paddr = 0; stat_vmem(t->b_r, dev_start, &dev_paddr, 0, 0); if(dev_paddr >= __pre_top && dev_paddr <= __post_base) - return; + return ERR_ADDR; struct sp_mem *m = 0; if(dev_paddr < __pre_top) @@ -76,7 +77,7 @@ void free_devmem(struct tcb *t, vm_t dev_start) m = sp_used_find(&post_ram, dev_paddr); if(!m) - return; + return ERR_NF; size_t region_size = __addr(m->end - m->start); map_fill_region(t->b_r, &dev_free_wrapper, dev_paddr, dev_start, region_size, 0); @@ -86,4 +87,6 @@ void free_devmem(struct tcb *t, vm_t dev_start) if(dev_paddr > __post_base) free_region(&post_ram, dev_paddr); + + return OK; } diff --git a/common/main.c b/common/main.c index 52987d1..3aabc3c 100644 --- a/common/main.c +++ b/common/main.c @@ -3,8 +3,8 @@ #include <apos/proc.h> #include <apos/debug.h> #include <apos/vmem.h> -#include <apos/arch.h> -#include <apos/irq.h> +#include <arch/arch.h> +#include <arch/irq.h> #include <libfdt.h> #ifdef DEBUG diff --git a/common/mem_regions.c b/common/mem_regions.c new file mode 100644 index 0000000..ebcff50 --- /dev/null +++ b/common/mem_regions.c @@ -0,0 +1,458 @@ +#include <apos/mem_regions.h> +#include <apos/mem_nodes.h> +#include <apos/pmem.h> +#include <apos/mem.h> + +#define mark_region_used(r) ((r) = 1) +#define mark_region_unused(r) ((r) = 0) +#define is_region_used(r) (r) + +static size_t __uvmem_size = 0; + +/* pretty major slowdown when we get to some really massive numbers, not + * entirely sure why. Will need to check up on this at some point, have I + * somehow managed to come up with a _very_ bad situation for my sp_trees? + * + * EDIT: apparently, yeah. Max depth of 106 with a million entries, interesting. + * I guess since in this scenario all sizes are 1, and I just shove everything + * to the right? Maybe? + * + * EDIT upon EDIT: yeah, when taking the start position of the region into + * account we get a much more sensible max depth of 39 for 5 million entries. + * Seems I have found a weakness in sp_trees :D + * + * Duplicate entries don't work well with any trees, I think. Good to know, + * maybe not even anything with sp_trees but more a weakness of binary trees in + * general? + */ +static struct sp_mem *sp_free_insert_region(struct sp_reg_root *r, struct sp_mem *m) +{ + struct sp_node *n = sp_root(r->free_regions), *p = NULL; + size_t start = m->start; + size_t size = m->end - m->start; + enum sp_dir d = LEFT; + + m->sp_n = (struct sp_node){0}; + + while(n){ + struct sp_mem *t = mem_container(n); + size_t nsize = t->end - t->start; + p = n; + + if(size < nsize){ + n = sp_left(n); + d = LEFT; + } + + else if(size > nsize) { + n = sp_right(n); + d = RIGHT; + } + + else if (start < t->start){ + n = sp_left(n); + d = LEFT; + } + + else { + n = sp_right(n); + d = RIGHT; + } + } + + if(sp_root(r->free_regions)) + sp_insert(&sp_root(r->free_regions), p, &m->sp_n, d); + else + sp_root(r->free_regions) = &m->sp_n; + + return m; +} + +static struct sp_mem *sp_used_insert_region(struct sp_reg_root *r, struct sp_mem *m) +{ + struct sp_node *n = sp_root(r->used_regions), *p = NULL; + vm_t start = m->start; + enum sp_dir d = LEFT; + + m->sp_n = (struct sp_node){0}; + + while(n){ + struct sp_mem *t = mem_container(n); + + p = n; + + if(start < t->start){ + n = sp_left(n); + d = LEFT; + } + + else { + /* we should never encounter a situation where start = + * t->start */ + n = sp_right(n); + d = RIGHT; + } + } + + if(sp_root(r->used_regions)) + sp_insert(&sp_root(r->used_regions), p, &m->sp_n, d); + else + sp_root(r->used_regions) = &m->sp_n; + + return m; +} + +stat_t sp_mem_init(struct sp_reg_root *r, vm_t start, size_t arena_size) +{ + /* convert bytes to pages */ + start = __page(start); + arena_size = __page(arena_size); + struct sp_mem *m = get_mem_node(); + m->start = start; + m->end = start + arena_size; + sp_free_insert_region(r, m); + + return OK; +} + +static void __sp_mem_destroy(struct sp_node *n) +{ + if(!n) + return; + + __sp_mem_destroy(sp_left(n)); + __sp_mem_destroy(sp_right(n)); + + struct sp_mem *m = mem_container(n); + free_mem_node(m); +} + +void sp_mem_destroy(struct sp_reg_root *r) +{ + __sp_mem_destroy(sp_root(r->free_regions)); + __sp_mem_destroy(sp_root(r->used_regions)); +} + +/* interestingly this is now the main bottleneck :D + * + * eh, it's not a massive thing I guess, maybe the code could be a bit quicker + * but I mean 10 000 000 memory allocations in 20 s is good enough for now + * */ +struct sp_mem *sp_used_find(struct sp_reg_root *r, vm_t start) +{ + struct sp_node *n = sp_root(r->used_regions); + while(n){ + struct sp_mem *t = mem_container(n); + if(start == t->start) + return t; + + if(start < t->start) + n = sp_left(n); + else + n = sp_right(n); + } + + return 0; +} + +static struct sp_mem *sp_mem_create_region(vm_t start, vm_t end, + struct sp_mem *prev, struct sp_mem *next) +{ + struct sp_mem *m = get_mem_node(); + m->start = start; + m->end = end; + m->prev = prev; + m->next = next; + return m; +} + +/* TODO: should probably check if this actually works :D seems to do, but that's + * just from really quick checking */ +static size_t po_align(size_t s) +{ + for(size_t o = __mm_max_order; o > 0; --o){ + if(s >= __o_size(o)) + return __o_size(o); + } + + return 0; +} + +struct sp_mem *sp_find_used_closest(struct sp_reg_root *r, vm_t start) +{ + struct sp_mem *closest = 0; + size_t md = (size_t)(-1); + struct sp_node *n = sp_root(r->used_regions); + if(!n) + return mem_container(sp_root(r->free_regions)); + + while(n){ + struct sp_mem *t = mem_container(n); + size_t d = ABS((ssize_t)start - (ssize_t)t->start); + + if(d == 0) /* exact match */ + return t; + + if(d < md){ /* closest so far */ + closest = t; + md = d; + } + + if(start < t->start) + n = sp_left(n); + else + n = sp_right(n); + } + + return closest; +} + +/* should probably document this a bit better but in short, look for the "best" + * free block, meaning one that is hopefully aligned so as to allow us to later + * map it to higher order pages. If no block is found such that that is + * possible, also keep track of the smallest block that we found that the region + * still fits in, unaligned. If none of these criteria are met, a NULL is + * returned. Note that this does not check *all* possible memory blocks, only + * going up in increasing size so as to save time. */ +struct sp_mem *sp_find_free(struct sp_reg_root *r, size_t size, size_t *align) +{ + *align = 0; + size_t offset = __page(po_align(__addr(size))); + struct sp_mem *quick_best = 0; + struct sp_node *n = sp_root(r->free_regions); + while(n){ + struct sp_mem *t = mem_container(n); + vm_t start = align_up(t->start, offset); + + size_t qsize = t->end - t->start; + size_t bsize = t->end - start; + + if(!quick_best && size <= qsize) + quick_best = t; + + if(size <= bsize){ + *align = start - t->start; + return t; + } + + n = sp_right(n); + } + + return quick_best; +} + +static size_t sp_use_region(struct sp_reg_root *r, struct sp_mem *m, + size_t pages, size_t align) +{ + sp_remove(&sp_root(r->free_regions), &m->sp_n); + + vm_t pre_start = m->start; + vm_t pre_end = pre_start + align; + + vm_t start = pre_end; + vm_t end = start + pages; + + vm_t post_start = end; + vm_t post_end = m->end; + + if(pre_start != pre_end){ + struct sp_mem *n = sp_mem_create_region(pre_start, pre_end, m->prev, m); + m->prev = n; + if(n->prev) + n->prev->next = n; + + sp_free_insert_region(r, n); + } + + if(post_start != post_end){ + struct sp_mem *n = sp_mem_create_region(post_start, post_end, m, m->next); + m->next = n; + if(n->next) + n->next->prev = n; + + sp_free_insert_region(r, n); + } + + m->end = end; + m->start = start; + mark_region_used(m->flags); + sp_used_insert_region(r, m); + return __addr(start); +} + +/* apparently Linux doesn't necessarily give a shit about mmap hints, so I'll + * just ignore them for now. Note that alloc_region should only be used when + * mmap is called with MAP_ANON, all other situations should be handled in some + * fs server */ +vm_t alloc_region(struct sp_reg_root *r, + size_t size, size_t *actual_size) +{ + *actual_size = align_up(size, BASE_PAGE_SIZE); + size_t pages = __page(*actual_size); + + /* find best fitting, alignment etc. */ + size_t align = 0; + struct sp_mem *m = sp_find_free(r, pages, &align); + if(!m) + return 0; + + return sp_use_region(r, m, pages, align); +} + + +vm_t alloc_fixed_region(struct sp_reg_root *r, + vm_t start, size_t size, size_t *actual_size) +{ + size_t asize = align_up(size, BASE_PAGE_SIZE); + if(actual_size) + *actual_size = asize; + + size_t pages = __page(asize); + start = __page(start); + + struct sp_mem *m = sp_find_used_closest(r, start); + if(!m) + return 0; + + /* locate actual region where start is between the region start and end */ + while(!((m->start <= start) && (start <= m->end))){ + if(start > m->start) + m = m->next; + else + m = m->prev; + } + + /* if region is already in use, forget it */ + if(is_region_used(m->flags)) + return 0; + + /* region is too small */ + if(start + pages > m->end) + return 0; + + /* actually start marking region used */ + return sp_use_region(r, m, pages, start - m->start); +} + +static void __sp_try_coalesce_prev(struct sp_reg_root *r, struct sp_mem *m) +{ + while(m){ + if(!m || is_region_used(m->flags)) + return; + + struct sp_mem *p = m->prev; + if(!p || is_region_used(p->flags)) + return; + + m->start = p->start; + m->prev = p->prev; + + if(m->prev) + m->prev->next = m; + + sp_remove(&sp_root(r->free_regions), &p->sp_n); + free_mem_node(p); + + m = m->prev; + } +} + +static void __sp_try_coalesce_next(struct sp_reg_root *r, struct sp_mem *m) +{ + while(m){ + if(!m || is_region_used(m->flags)) + return; + + struct sp_mem *n = m->next; + if(!n || is_region_used(n->flags)) + return; + + m->end = n->end; + m->next = n->next; + + if(m->next) + m->next->prev = m; + + sp_remove(&sp_root(r->free_regions), &n->sp_n); + free_mem_node(n); + + m = m->next; + } +} + +static void sp_mem_try_coalesce(struct sp_reg_root *r, struct sp_mem *m) +{ + __sp_try_coalesce_prev(r, m); + __sp_try_coalesce_next(r, m); +} + +stat_t free_region(struct sp_reg_root *r, vm_t start) +{ + /* addr not aligned to page boundary, corrupted or incorrect pointer */ + if(!aligned(start, BASE_PAGE_SIZE)) + return ERR_ALIGN; + + struct sp_mem *m = sp_used_find(r, __page(start)); + if(!m) + return ERR_NF; + + sp_remove(&sp_root(r->used_regions), &m->sp_n); + mark_region_unused(m->flags); + + sp_mem_try_coalesce(r, m); + sp_free_insert_region(r, m); + return OK; +} + +void set_uvmem_size(size_t s) +{ + __uvmem_size = s; +} + +size_t uvmem_size() +{ + return __uvmem_size; +} + +/* assuming start is chosen to start on an aligned border, this should choose + * the 'optimal' fit for the mapping. + * + * NOTE: not actually optimal, this doesn't bother to go through possible + * permutations etc. which would be slow and I don't want to implement it. + */ +vm_t map_fill_region(struct vm_branch *b, + stat_t (*vmem_handler)(struct vm_branch *, pm_t *, vm_t, uint8_t, enum mm_order), + pm_t offset, vm_t start, size_t bytes, uint8_t flags) +{ + pm_t runner = __page(start); + size_t pages = __pages(bytes); + enum mm_order top = __mm_max_order; + + /* actual start might not be the same as the user specified start */ + start = __addr(runner); + + for(; pages; top--){ + size_t o_size = __o_size(top); + size_t o_pages = __pages(o_size); + + /* NULL does pass this check, so technically all NULL pages are + * aligned, but they're caught in the while expr so this should + * work even if someone tries to map NULL */ + if(!aligned(runner, o_pages)) + continue; + + while(pages >= o_pages){ + int res = vmem_handler(b, &offset, __addr(runner), flags, top); + if(res > 0) + break; + + if(res < 0) + return 0; + + pages -= o_pages; + runner += o_pages; + } + } + + return start; +} diff --git a/common/pmem.c b/common/pmem.c index ae01175..1246210 100644 --- a/common/pmem.c +++ b/common/pmem.c @@ -1,6 +1,6 @@ #include <apos/mem_nodes.h> #include <apos/pmem.h> -#include <apos/dev.h> +#include <apos/dmem.h> #include <apos/debug.h> #include <apos/initrd.h> #include <apos/string.h> /* memset */ diff --git a/common/proc.c b/common/proc.c index ccd60bd..c272727 100644 --- a/common/proc.c +++ b/common/proc.c @@ -3,6 +3,7 @@ #include <apos/string.h> #include <apos/initrd.h> #include <apos/proc.h> +#include <arch/arch.h> /* TODO: add error checking */ static vm_t setup_call_stack(struct tcb *t, size_t bytes) @@ -34,7 +35,7 @@ void init_proc(void *fdt, struct vm_branch *b) threads_insert(t); - sp_mem_init(&t->sp_r, UVMEM_START, UVMEM_END); + 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)); diff --git a/common/tcb.c b/common/tcb.c index cbbfa47..7f3cf81 100644 --- a/common/tcb.c +++ b/common/tcb.c @@ -1,7 +1,7 @@ #include <apos/tcb.h> -#include <apos/cpu.h> #include <apos/utils.h> #include <apos/sp_tree.h> +#include <arch/cpu.h> static struct sp_root t_root = (struct sp_root){0}; static struct tcb *__tcb_cache[MAX_CPUS] = {0}; diff --git a/common/uapi/mem.c b/common/uapi/mem.c index 8c63a87..0a88eda 100644 --- a/common/uapi/mem.c +++ b/common/uapi/mem.c @@ -1,7 +1,7 @@ -#include <apos/dev.h> #include <apos/uapi.h> #include <apos/utils.h> #include <apos/vmem.h> +#include <apos/dmem.h> vm_t sys_req_mem(vm_t size, vm_t flags, vm_t u0, vm_t u1) { diff --git a/common/vmem.c b/common/vmem.c index 7fe0ab5..bd0cc29 100644 --- a/common/vmem.c +++ b/common/vmem.c @@ -1,461 +1,38 @@ +#include <apos/mem_regions.h> #include <apos/vmem.h> -#include <apos/mem_nodes.h> -#include <vmem.h> -#define mark_region_used(r) ((r) = 1) -#define mark_region_unused(r) ((r) = 0) -#define is_region_used(r) (r) -static size_t __uvmem_size = 0; - -/* pretty major slowdown when we get to some really massive numbers, not - * entirely sure why. Will need to check up on this at some point, have I - * somehow managed to come up with a _very_ bad situation for my sp_trees? - * - * EDIT: apparently, yeah. Max depth of 106 with a million entries, interesting. - * I guess since in this scenario all sizes are 1, and I just shove everything - * to the right? Maybe? - * - * EDIT upon EDIT: yeah, when taking the start position of the region into - * account we get a much more sensible max depth of 39 for 5 million entries. - * Seems I have found a weakness in sp_trees :D - * - * Duplicate entries don't work well with any trees, I think. Good to know, - * maybe not even anything with sp_trees but more a weakness of binary trees in - * general? - */ -static struct sp_mem *sp_free_insert_region(struct sp_reg_root *r, struct sp_mem *m) -{ - struct sp_node *n = sp_root(r->free_regions), *p = NULL; - size_t start = m->start; - size_t size = m->end - m->start; - enum sp_dir d = LEFT; - - m->sp_n = (struct sp_node){0}; - - while(n){ - struct sp_mem *t = mem_container(n); - size_t nsize = t->end - t->start; - p = n; - - if(size < nsize){ - n = sp_left(n); - d = LEFT; - } - - else if(size > nsize) { - n = sp_right(n); - d = RIGHT; - } - - else if (start < t->start){ - n = sp_left(n); - d = LEFT; - } - - else { - n = sp_right(n); - d = RIGHT; - } - } - - if(sp_root(r->free_regions)) - sp_insert(&sp_root(r->free_regions), p, &m->sp_n, d); - else - sp_root(r->free_regions) = &m->sp_n; - - return m; -} - -static struct sp_mem *sp_used_insert_region(struct sp_reg_root *r, struct sp_mem *m) +stat_t init_uvmem(struct tcb *t, vm_t base, vm_t top) { - struct sp_node *n = sp_root(r->used_regions), *p = NULL; - vm_t start = m->start; - enum sp_dir d = LEFT; - - m->sp_n = (struct sp_node){0}; - - while(n){ - struct sp_mem *t = mem_container(n); - - p = n; - - if(start < t->start){ - n = sp_left(n); - d = LEFT; - } - - else { - /* we should never encounter a situation where start = - * t->start */ - n = sp_right(n); - d = RIGHT; - } - } - - if(sp_root(r->used_regions)) - sp_insert(&sp_root(r->used_regions), p, &m->sp_n, d); - else - sp_root(r->used_regions) = &m->sp_n; - - return m; + return sp_mem_init(&t->sp_r, base, top); } -int sp_mem_init(struct sp_reg_root *r, vm_t start, size_t arena_size) -{ - /* convert bytes to pages */ - start = __page(start); - arena_size = __page(arena_size); - struct sp_mem *m = get_mem_node(); - m->start = start; - m->end = start + arena_size; - sp_free_insert_region(r, m); - - return 0; -} - -static void __sp_mem_destroy(struct sp_node *n) -{ - if(!n) - return; - - __sp_mem_destroy(sp_left(n)); - __sp_mem_destroy(sp_right(n)); - - struct sp_mem *m = mem_container(n); - free_mem_node(m); -} - -void sp_mem_destroy(struct sp_reg_root *r) -{ - __sp_mem_destroy(sp_root(r->free_regions)); - __sp_mem_destroy(sp_root(r->used_regions)); -} - -/* interestingly this is now the main bottleneck :D - * - * eh, it's not a massive thing I guess, maybe the code could be a bit quicker - * but I mean 10 000 000 memory allocations in 20 s is good enough for now - * */ -struct sp_mem *sp_used_find(struct sp_reg_root *r, vm_t start) -{ - struct sp_node *n = sp_root(r->used_regions); - while(n){ - struct sp_mem *t = mem_container(n); - if(start == t->start) - return t; - - if(start < t->start) - n = sp_left(n); - else - n = sp_right(n); - } - - return 0; -} - -static struct sp_mem *sp_mem_create_region(vm_t start, vm_t end, - struct sp_mem *prev, struct sp_mem *next) -{ - struct sp_mem *m = get_mem_node(); - m->start = start; - m->end = end; - m->prev = prev; - m->next = next; - return m; -} - -/* TODO: should probably check if this actually works :D seems to do, but that's - * just from really quick checking */ -static size_t po_align(size_t s) -{ - for(size_t o = __mm_max_order; o > 0; --o){ - if(s >= __o_size(o)) - return __o_size(o); - } - - return 0; -} - -static struct sp_mem *sp_find_used_closest(struct sp_reg_root *r, vm_t start) -{ - struct sp_mem *closest = 0; - size_t md = (size_t)(-1); - struct sp_node *n = sp_root(r->used_regions); - if(!n) - return mem_container(sp_root(r->free_regions)); - - while(n){ - struct sp_mem *t = mem_container(n); - size_t d = ABS((ssize_t)start - (ssize_t)t->start); - - if(d == 0) /* exact match */ - return t; - - if(d < md){ /* closest so far */ - closest = t; - md = d; - } - - if(start < t->start) - n = sp_left(n); - else - n = sp_right(n); - } - - return closest; -} - -/* should probably document this a bit better but in short, look for the "best" - * free block, meaning one that is hopefully aligned so as to allow us to later - * map it to higher order pages. If no block is found such that that is - * possible, also keep track of the smallest block that we found that the region - * still fits in, unaligned. If none of these criteria are met, a NULL is - * returned. Note that this does not check *all* possible memory blocks, only - * going up in increasing size so as to save time. */ -static struct sp_mem *sp_find_free_best(struct sp_reg_root *r, size_t size, size_t *align) -{ - *align = 0; - size_t offset = __page(po_align(__addr(size))); - struct sp_mem *quick_best = 0; - struct sp_node *n = sp_root(r->free_regions); - while(n){ - struct sp_mem *t = mem_container(n); - vm_t start = align_up(t->start, offset); - - size_t qsize = t->end - t->start; - size_t bsize = t->end - start; - - if(!quick_best && size <= qsize) - quick_best = t; - - if(size <= bsize){ - *align = start - t->start; - return t; - } - - n = sp_right(n); - } - - return quick_best; -} - -static size_t sp_use_region(struct sp_reg_root *r, struct sp_mem *m, - size_t pages, size_t align) -{ - sp_remove(&sp_root(r->free_regions), &m->sp_n); - - vm_t pre_start = m->start; - vm_t pre_end = pre_start + align; - - vm_t start = pre_end; - vm_t end = start + pages; - - vm_t post_start = end; - vm_t post_end = m->end; - - if(pre_start != pre_end){ - struct sp_mem *n = sp_mem_create_region(pre_start, pre_end, m->prev, m); - m->prev = n; - if(n->prev) - n->prev->next = n; - - sp_free_insert_region(r, n); - } - - if(post_start != post_end){ - struct sp_mem *n = sp_mem_create_region(post_start, post_end, m, m->next); - m->next = n; - if(n->next) - n->next->prev = n; - - sp_free_insert_region(r, n); - } - - m->end = end; - m->start = start; - mark_region_used(m->flags); - sp_used_insert_region(r, m); - return __addr(start); -} - -/* apparently Linux doesn't necessarily give a shit about mmap hints, so I'll - * just ignore them for now. Note that alloc_region should only be used when - * mmap is called with MAP_ANON, all other situations should be handled in some - * fs server */ -vm_t alloc_region(struct sp_reg_root *r, - size_t size, size_t *actual_size) -{ - *actual_size = align_up(size, BASE_PAGE_SIZE); - size_t pages = __page(*actual_size); - - /* find best fitting, alignment etc. */ - size_t align = 0; - struct sp_mem *m = sp_find_free_best(r, pages, &align); - if(!m) - return 0; - - return sp_use_region(r, m, pages, align); -} - - -vm_t alloc_fixed_region(struct sp_reg_root *r, - vm_t start, size_t size, size_t *actual_size) -{ - size_t asize = align_up(size, BASE_PAGE_SIZE); - if(actual_size) - *actual_size = asize; - - size_t pages = __page(asize); - start = __page(start); - - struct sp_mem *m = sp_find_used_closest(r, start); - if(!m) - return 0; - - /* locate actual region where start is between the region start and end */ - while(!((m->start <= start) && (start <= m->end))){ - if(start > m->start) - m = m->next; - else - m = m->prev; - } - - /* if region is already in use, forget it */ - if(is_region_used(m->flags)) - return 0; - - /* region is too small */ - if(start + pages > m->end) - return 0; - - /* actually start marking region used */ - return sp_use_region(r, m, pages, start - m->start); -} - -static void __sp_try_coalesce_prev(struct sp_reg_root *r, struct sp_mem *m) -{ - while(m){ - if(!m || is_region_used(m->flags)) - return; - - struct sp_mem *p = m->prev; - if(!p || is_region_used(p->flags)) - return; - - m->start = p->start; - m->prev = p->prev; - - if(m->prev) - m->prev->next = m; - - sp_remove(&sp_root(r->free_regions), &p->sp_n); - free_mem_node(p); - - m = m->prev; - } -} - -static void __sp_try_coalesce_next(struct sp_reg_root *r, struct sp_mem *m) +vm_t alloc_uvmem(struct tcb *t, size_t size, uint8_t flags) { - while(m){ - if(!m || is_region_used(m->flags)) - return; - - struct sp_mem *n = m->next; - if(!n || is_region_used(n->flags)) - return; - - m->end = n->end; - m->next = n->next; - - if(m->next) - m->next->prev = m; - - sp_remove(&sp_root(r->free_regions), &n->sp_n); - free_mem_node(n); - - m = m->next; - } + vm_t v = alloc_region(&t->sp_r, size, &size); + return map_allocd_region(t->b_r, v, size, flags); } -static void sp_mem_try_coalesce(struct sp_reg_root *r, struct sp_mem *m) +vm_t alloc_fixed_uvmem(struct tcb *t, vm_t start, size_t size, uint8_t flags) { - __sp_try_coalesce_prev(r, m); - __sp_try_coalesce_next(r, m); + vm_t v = alloc_fixed_region(&t->sp_r, start, size, &size); + return map_allocd_region(t->b_r, v, size, flags); } -void free_region(struct sp_reg_root *r, vm_t start) +stat_t free_uvmem(struct tcb *t, vm_t va) { - /* addr not aligned to page boundary, corrupted or incorrect pointer */ - if(!aligned(start, BASE_PAGE_SIZE)) - return; - - struct sp_mem *m = sp_used_find(r, __page(start)); + struct sp_mem *m = sp_used_find(&t->sp_r, va); if(!m) - return; - - sp_remove(&sp_root(r->used_regions), &m->sp_n); - mark_region_unused(m->flags); - - sp_mem_try_coalesce(r, m); - sp_free_insert_region(r, m); -} - -void set_uvmem_size(size_t s) -{ - __uvmem_size = s; -} - -size_t uvmem_size() -{ - return __uvmem_size; -} - -/* assuming start is chosen to start on an aligned border, this should choose - * the 'optimal' fit for the mapping. - * - * NOTE: not actually optimal, this doesn't bother to go through possible - * permutations etc. which would be slow and I don't want to implement it. - */ -vm_t map_fill_region(struct vm_branch *b, - int (*vmem_handler)(struct vm_branch *, pm_t *, vm_t, uint8_t, enum mm_order), - pm_t offset, vm_t start, size_t bytes, uint8_t flags) -{ - pm_t runner = __page(start); - size_t pages = __pages(bytes); - enum mm_order top = __mm_max_order; - - /* actual start might not be the same as the user specified start */ - start = __addr(runner); - - for(; pages; top--){ - size_t o_size = __o_size(top); - size_t o_pages = __pages(o_size); - - /* NULL does pass this check, so technically all NULL pages are - * aligned, but they're caught in the while expr so this should - * work even if someone tries to map NULL */ - if(!aligned(runner, o_pages)) - continue; - - while(pages >= o_pages){ - int res = vmem_handler(b, &offset, __addr(runner), flags, top); - if(res > 0) - break; - - if(res < 0) - return 0; + return -1; - pages -= o_pages; - runner += o_pages; - } - } + pm_t pa = __addr(m->end - m->start); - return start; + free_region(&t->sp_r, va); + unmap_freed_region(t->b_r, va, pa); + return 0; } -int alloc_mem_wrapper(struct vm_branch *b, pm_t *offset, vm_t vaddr, uint8_t flags, enum mm_order order) +stat_t alloc_uvmem_wrapper(struct vm_branch *b, pm_t *offset, vm_t vaddr, uint8_t flags, enum mm_order order) { *offset = alloc_page(order, *offset); if(!*offset) @@ -465,7 +42,7 @@ int alloc_mem_wrapper(struct vm_branch *b, pm_t *offset, vm_t vaddr, uint8_t fla return 0; } -int free_mem_wrapper(struct vm_branch *b, pm_t *offset, vm_t vaddr, uint8_t flags, enum mm_order order) +stat_t free_uvmem_wrapper(struct vm_branch *b, pm_t *offset, vm_t vaddr, uint8_t flags, enum mm_order order) { UNUSED(flags); UNUSED(offset); @@ -479,27 +56,3 @@ int free_mem_wrapper(struct vm_branch *b, pm_t *offset, vm_t vaddr, uint8_t flag free_page(order, paddr); return 0; } - -vm_t alloc_uvmem(struct tcb *t, size_t size, uint8_t flags) -{ - vm_t v = alloc_region(&t->sp_r, size, &size); - return map_allocd_region(t->b_r, v, size, flags); -} - -vm_t alloc_fixed_uvmem(struct tcb *t, vm_t start, size_t size, uint8_t flags) -{ - vm_t v = alloc_fixed_region(&t->sp_r, start, size, &size); - return map_allocd_region(t->b_r, v, size, flags); -} - -void free_uvmem(struct tcb *t, vm_t va) -{ - struct sp_mem *m = sp_used_find(&t->sp_r, va); - if(!m) - return; - - pm_t pa = __addr(m->end - m->start); - - free_region(&t->sp_r, va); - unmap_freed_region(t->b_r, va, pa); -} |
