alarm: Do not hold the tchain lock during handlers
[akaros.git] / kern / src / pmap.c
index 749f245..9935287 100644 (file)
 #include <string.h>
 #include <assert.h>
 #include <pmap.h>
-#include <kclock.h>
 #include <process.h>
 #include <stdio.h>
 #include <mm.h>
 #include <multiboot.h>
+#include <arena.h>
+#include <init.h>
 
 physaddr_t max_pmem = 0;       /* Total amount of physical memory (bytes) */
 physaddr_t max_paddr = 0;      /* Maximum addressable physical address */
 size_t max_nr_pages = 0;       /* Number of addressable physical memory pages */
-size_t nr_free_pages = 0;      /* TODO: actually track this, after init */
 struct page *pages = 0;
 struct multiboot_info *multiboot_kaddr = 0;
 uintptr_t boot_freemem = 0;
@@ -45,10 +45,18 @@ static void adjust_max_pmem(struct multiboot_mmap_entry *entry, void *data)
        max_pmem = MAX(max_pmem, (size_t)(entry->addr + entry->len));
 }
 
+static void kpages_arena_init(void)
+{
+       void *kpages_pg;
+
+       kpages_pg = arena_alloc(base_arena, PGSIZE, MEM_WAIT);
+       kpages_arena = arena_builder(kpages_pg, "kpages", PGSIZE, arena_alloc,
+                                    arena_free, base_arena, 8 * PGSIZE);
+}
+
 /**
  * @brief Initializes physical memory.  Determines the pmem layout, sets up the
- * array of physical pages and memory free list, and turns on virtual
- * memory/page tables.
+ * base and kpages arenas, and turns on virtual memory/page tables.
  *
  * Regarding max_pmem vs max_paddr and max_nr_pages: max_pmem is the largest
  * physical address that is in a FREE region.  It includes RESERVED regions that
@@ -72,9 +80,16 @@ void pmem_init(struct multiboot_info *mbi)
        printk("Max physical RAM (appx, bytes): %lu\n", max_pmem);
        printk("Max addressable physical RAM (appx): %lu\n", max_paddr);
        printk("Highest page number (including reserved): %lu\n", max_nr_pages);
+       /* We should init the page structs, but zeroing happens to work, except for
+        * the sems.  Those are init'd by the page cache before they are used. */
        pages = (struct page*)boot_zalloc(max_nr_pages * sizeof(struct page),
                                          PGSIZE);
-       page_alloc_init(mbi);
+       base_arena_init(mbi);
+       /* kpages will use some of the basic slab caches.  kmem_cache_init needs to
+        * not do memory allocations (which it doesn't, and it can base_alloc()). */
+       kmem_cache_init();
+       kpages_arena_init();
+       printk("Base arena total mem: %lu\n", arena_amt_total(base_arena));
        vm_init();
 
        static_assert(PROCINFO_NUM_PAGES*PGSIZE <= PTSIZE);
@@ -187,7 +202,7 @@ void *boot_zalloc(size_t amt, size_t align)
  *   - If there is already a page mapped at 'va', it is page_remove()d.
  *   - If necessary, on demand, allocates a page table and inserts it into
  *     'pgdir'.
- *   - page_incref() should be called if the insertion succeeds.
+ *   - This saves your refcnt in the pgdir (refcnts going away soon).
  *   - The TLB must be invalidated if a page was formerly present at 'va'.
  *     (this is handled in page_remove)
  *
@@ -214,15 +229,8 @@ int page_insert(pgdir_t pgdir, struct page *page, void *va, int perm)
        pte_t pte = pgdir_walk(pgdir, va, 1);
        if (!pte_walk_okay(pte))
                return -ENOMEM;
-       /* Two things here:  First, we need to up the ref count of the page we want
-        * to insert in case it is already mapped at va.  In that case we don't want
-        * page_remove to ultimately free it, and then for us to continue as if pp
-        * wasn't freed. (moral = up the ref asap) */
-       kref_get(&page->pg_kref, 1);
-       /* Careful, page remove handles the cases where the page is PAGED_OUT and
-        * any other state. (TODO: review all other states, maybe rm only for P) */
-       if (pte_is_mapped(pte))
-               page_remove(pgdir, va);
+       /* Leftover from older times, but we no longer suppor this: */
+       assert(!pte_is_mapped(pte));
        pte_write(pte, page2pa(page), perm);
        return 0;
 }
@@ -318,6 +326,27 @@ void tlb_invalidate(pgdir_t pgdir, void *va)
        invlpg(va);
 }
 
+static void __tlb_global(uint32_t srcid, long a0, long a1, long a2)
+{
+       tlb_flush_global();
+}
+
+/* Does a global TLB flush on all cores. */
+void tlb_shootdown_global(void)
+{
+       tlb_flush_global();
+       if (booting)
+               return;
+       /* TODO: consider a helper for broadcast messages, though note that we're
+        * doing our flush immediately, which our caller expects from us before it
+        * returns. */
+       for (int i = 0; i < num_cores; i++) {
+               if (i == core_id())
+                       continue;
+               send_kernel_message(i, __tlb_global, 0, 0, 0, KMSG_IMMEDIATE);
+       }
+}
+
 /* Helper, returns true if any part of (start1, end1) is within (start2, end2).
  * Equality of endpoints (like end1 == start2) is okay.
  * Assumes no wrap-around. */
@@ -334,25 +363,3 @@ bool regions_collide_unsafe(uintptr_t start1, uintptr_t end1,
                return TRUE;
        }
 }
-
-void print_free_mem(void)
-{
-       static uint8_t *bm = 0;
-       /* racy, but this is debugging code */
-       if (!bm)
-               bm = kzmalloc((max_nr_pages + 1) / 8, 0);
-
-       long x = 0;
-       for (int i = 0; i < max_nr_pages; i++) {
-               if (page_is_free(i)) {
-                       x++;
-                       SET_BITMASK_BIT(bm, i);
-               } else {
-                       if (GET_BITMASK_BIT(bm, i)) {
-                               print_pageinfo(ppn2page(i));
-                               CLR_BITMASK_BIT(bm, i);
-                       }
-               }
-       }
-       printk("Nr Free pages: %lld\n", x);
-}