Improve cake allocator's memory utilisation (#43)
[lunaix-os.git] / lunaix-os / kernel / mm / dmm.c
index ae899086d79fcd00f91bb1eb6faca4b8aa04dc04..50804dbf47ee46523e89e3003d2f1e6a532248fe 100644 (file)
@@ -1,71 +1,62 @@
-/**
- * @file dmm.c
- * @author Lunaixsky
- * @brief Dynamic memory manager for heap. This design do not incorporate any\
- * specific implementation of malloc family. The main purpose of this routines is to
- * provide handy method to initialize & grow the heap as needed by upstream implementation.
- * 
- * This is designed to be portable, so it can serve as syscalls to malloc/free in the c std lib. 
- * 
- * @version 0.2
- * @date 2022-03-3
- *
- * @copyright Copyright (c) Lunaixsky 2022
- *
- */
-
-#include <lunaix/mm/dmm.h>
+#include <lunaix/mm/mmap.h>
 #include <lunaix/mm/vmm.h>
-#include <lunaix/mm/page.h>
+#include <lunaix/process.h>
+#include <lunaix/status.h>
 
 #include <lunaix/spike.h>
+#include <lunaix/syscall.h>
+#include <lunaix/syscall_utils.h>
 
-int
-dmm_init(heap_context_t* heap)
+void
+__heap_copied(struct mm_region* region)
 {
-    assert((uintptr_t)heap->start % BOUNDARY == 0);
-
-    heap->brk = heap->start;
-
-    return vmm_alloc_page(heap->brk, PG_PREM_RW) != NULL;
+    mm_index((void**)&region->proc_vms->heap, region);
 }
 
 int
-lxsbrk(heap_context_t* heap, void* addr)
-{
-    return lxbrk(heap, addr - heap->brk) != NULL;
-}
-
-void*
-lxbrk(heap_context_t* heap, size_t size)
+create_heap(struct proc_mm* pvms, ptr_t addr)
 {
-    if (size == 0) {
-        return heap->brk;
+    struct mmap_param map_param = { .pvms = pvms,
+                                    .vms_mnt = VMS_SELF,
+                                    .flags = MAP_ANON | MAP_PRIVATE,
+                                    .type = REGION_TYPE_HEAP,
+                                    .proct = PROT_READ | PROT_WRITE,
+                                    .mlen = PAGE_SIZE };
+    int status = 0;
+    struct mm_region* heap;
+    if ((status = mmap_user(NULL, &heap, addr, NULL, &map_param))) {
+        return status;
     }
 
-    void* current_brk = heap->brk;
+    heap->region_copied = __heap_copied;
+    mm_index((void**)&pvms->heap, heap);
 
-    // The upper bound of our next brk of heap given the size.
-    // This will be used to calculate the page we need to allocate.
-    void* next = current_brk + ROUNDUP(size, BOUNDARY);
+    return status;
+}
+
+__DEFINE_LXSYSCALL1(void*, sbrk, ssize_t, incr)
+{
+    struct proc_mm* pvms = vmspace(__current);
+    struct mm_region* heap = pvms->heap;
 
-    // any invalid situations
-    if (next >= heap->max_addr || next < current_brk) {
-        return NULL;
+    assert(heap);
+    int err = mem_adjust_inplace(&pvms->regions, heap, heap->end + incr);
+    if (err) {
+        return (void*)__ptr(DO_STATUS(err));
     }
+    return (void*)heap->end;
+}
+
+__DEFINE_LXSYSCALL1(int, brk, void*, addr)
+{
+    struct proc_mm* pvms = vmspace(__current);
+    struct mm_region* heap = pvms->heap;
 
-    uintptr_t diff = PG_ALIGN(next) - PG_ALIGN(current_brk);
-    if (diff) {
-        // if next do require new pages to be allocated
-        if (!vmm_alloc_pages((void*)(PG_ALIGN(current_brk) + PG_SIZE),
-                             diff,
-                             PG_PREM_RW)) {
-            // for debugging
-            assert_msg(0, "unable to brk");
-            return NULL;
-        }
+    if (!heap) {
+        return DO_STATUS(create_heap(pvms, (ptr_t)addr));
     }
 
-    heap->brk += size;
-    return current_brk;
+    assert(heap);
+    int err = mem_adjust_inplace(&pvms->regions, heap, (ptr_t)addr);
+    return DO_STATUS(err);
 }
\ No newline at end of file