lib/bigalloc.c

   1 /*
   2  *      UCW Library -- Allocation of Large Aligned Buffers
   3  *
   4  *      (c) 2006--2007 Martin Mares <mj@ucw.cz>
   5  *      (c) 2007 Pavel Charvat <char@ucw.cz>
   6  *
   7  *      This software may be freely distributed and used according to the terms
   8  *      of the GNU Lesser General Public License.
   9  */
  10
  11 #include "lib/lib.h"
  12
  13 #include <sys/mman.h>
  14 #include <string.h>
  15 #include <limits.h>
  16
  17 void *
  18 page_alloc(u64 len)
  19 {
  20   if (len > SIZE_MAX)
  21     die("page_alloc: Size %llu is too large for the current architecture", (long long) len);
  22   ASSERT(!(len & (CPU_PAGE_SIZE-1)));
  23   byte *p = mmap(NULL, len, PROT_READ | PROT_WRITE, MAP_PRIVATE | MAP_ANON, -1, 0);
  24   if (p == (byte*) MAP_FAILED)
  25     die("Cannot mmap %llu bytes of memory: %m", (long long)len);
  26   return p;
  27 }
  28
  29 void *
  30 page_alloc_zero(u64 len)
  31 {
  32   void *p = page_alloc(len);
  33   bzero(p, len);
  34   return p;
  35 }
  36
  37 void
  38 page_free(void *start, u64 len)
  39 {
  40   ASSERT(!(len & (CPU_PAGE_SIZE-1)));
  41   ASSERT(!((uintptr_t) start & (CPU_PAGE_SIZE-1)));
  42   munmap(start, len);
  43 }
  44
  45 void *
  46 page_realloc(void *start, u64 old_len, u64 new_len)
  47 {
  48   void *p = page_alloc(new_len);
  49   memcpy(p, start, MIN(old_len, new_len));
  50   page_free(start, old_len);
  51   return p;
  52 }
  53
  54 static u64
  55 big_round(u64 len)
  56 {
  57   return ALIGN_TO(len, (u64)CPU_PAGE_SIZE);
  58 }
  59
  60 void *
  61 big_alloc(u64 len)
  62 {
  63   len = big_round(len);
  64   if (len > SIZE_MAX - 2*CPU_PAGE_SIZE)
  65     die("big_alloc: Size %llu is too large for the current architecture", (long long) len);
  66 #ifdef CONFIG_DEBUG
  67   len += 2*CPU_PAGE_SIZE;
  68 #endif
  69   byte *p = page_alloc(len);
  70 #ifdef CONFIG_DEBUG
  71   mprotect(p, CPU_PAGE_SIZE, PROT_NONE);
  72   mprotect(p+len-CPU_PAGE_SIZE, CPU_PAGE_SIZE, PROT_NONE);
  73   p += CPU_PAGE_SIZE;
  74 #endif
  75   return p;
  76 }
  77
  78 void *
  79 big_alloc_zero(u64 len)
  80 {
  81   void *p = big_alloc(len);
  82   bzero(p, big_round(len));
  83   return p;
  84 }
  85
  86 void
  87 big_free(void *start, u64 len)
  88 {
  89   byte *p = start;
  90   len = big_round(len);
  91 #ifdef CONFIG_DEBUG
  92   p -= CPU_PAGE_SIZE;
  93   len += 2*CPU_PAGE_SIZE;
  94 #endif
  95   page_free(p, len);
  96 }
  97
  98 #ifdef TEST
  99
 100 int main(void)
 101 {
 102   byte *p = big_alloc(123456);
 103   // p[-1] = 1;
 104   big_free(p, 123456);
 105   return 0;
 106 }
 107
 108 #endif