SAFE public projects git trees. - safe/jmp/linux-2.6/blob - lib/genalloc.c

   1 /*
   2  * Basic general purpose allocator for managing special purpose memory
   3  * not managed by the regular kmalloc/kfree interface.
   4  * Uses for this includes on-device special memory, uncached memory
   5  * etc.
   6  *
   7  * Copyright 2005 (C) Jes Sorensen <jes@trained-monkey.org>
   8  *
   9  * This source code is licensed under the GNU General Public License,
  10  * Version 2.  See the file COPYING for more details.
  11  */
  12
  13 #include <linux/module.h>
  14 #include <linux/genalloc.h>
  15
  16
  17 /*
  18  * Create a new special memory pool.
  19  *
  20  * @min_alloc_order: log base 2 of number of bytes each bitmap bit represents
  21  * @nid: node id of the node the pool structure should be allocated on, or -1
  22  */
  23 struct gen_pool *gen_pool_create(int min_alloc_order, int nid)
  24 {
  25         struct gen_pool *pool;
  26
  27         pool = kmalloc_node(sizeof(struct gen_pool), GFP_KERNEL, nid);
  28         if (pool != NULL) {
  29                 rwlock_init(&pool->lock);
  30                 INIT_LIST_HEAD(&pool->chunks);
  31                 pool->min_alloc_order = min_alloc_order;
  32         }
  33         return pool;
  34 }
  35 EXPORT_SYMBOL(gen_pool_create);
  36
  37
  38 /*
  39  * Add a new chunk of memory to the specified pool.
  40  *
  41  * @pool: pool to add new memory chunk to
  42  * @addr: starting address of memory chunk to add to pool
  43  * @size: size in bytes of the memory chunk to add to pool
  44  * @nid: node id of the node the chunk structure and bitmap should be
  45  *       allocated on, or -1
  46  */
  47 int gen_pool_add(struct gen_pool *pool, unsigned long addr, size_t size,
  48                  int nid)
  49 {
  50         struct gen_pool_chunk *chunk;
  51         int nbits = size >> pool->min_alloc_order;
  52         int nbytes = sizeof(struct gen_pool_chunk) +
  53                                 (nbits + BITS_PER_BYTE - 1) / BITS_PER_BYTE;
  54
  55         chunk = kmalloc_node(nbytes, GFP_KERNEL, nid);
  56         if (unlikely(chunk == NULL))
  57                 return -1;
  58
  59         memset(chunk, 0, nbytes);
  60         spin_lock_init(&chunk->lock);
  61         chunk->start_addr = addr;
  62         chunk->end_addr = addr + size;
  63
  64         write_lock(&pool->lock);
  65         list_add(&chunk->next_chunk, &pool->chunks);
  66         write_unlock(&pool->lock);
  67
  68         return 0;
  69 }
  70 EXPORT_SYMBOL(gen_pool_add);
  71
  72
  73 /*
  74  * Destroy a memory pool. Verifies that there are no outstanding allocations.
  75  *
  76  * @pool: pool to destroy
  77  */
  78 void gen_pool_destroy(struct gen_pool *pool)
  79 {
  80         struct list_head *_chunk, *_next_chunk;
  81         struct gen_pool_chunk *chunk;
  82         int order = pool->min_alloc_order;
  83         int bit, end_bit;
  84
  85
  86         write_lock(&pool->lock);
  87         list_for_each_safe(_chunk, _next_chunk, &pool->chunks) {
  88                 chunk = list_entry(_chunk, struct gen_pool_chunk, next_chunk);
  89                 list_del(&chunk->next_chunk);
  90
  91                 end_bit = (chunk->end_addr - chunk->start_addr) >> order;
  92                 bit = find_next_bit(chunk->bits, end_bit, 0);
  93                 BUG_ON(bit < end_bit);
  94
  95                 kfree(chunk);
  96         }
  97         kfree(pool);
  98         return;
  99 }
 100 EXPORT_SYMBOL(gen_pool_destroy);
 101
 102
 103 /*
 104  * Allocate the requested number of bytes from the specified pool.
 105  * Uses a first-fit algorithm.
 106  *
 107  * @pool: pool to allocate from
 108  * @size: number of bytes to allocate from the pool
 109  */
 110 unsigned long gen_pool_alloc(struct gen_pool *pool, size_t size)
 111 {
 112         struct list_head *_chunk;
 113         struct gen_pool_chunk *chunk;
 114         unsigned long addr, flags;
 115         int order = pool->min_alloc_order;
 116         int nbits, bit, start_bit, end_bit;
 117
 118         if (size == 0)
 119                 return 0;
 120
 121         nbits = (size + (1UL << order) - 1) >> order;
 122
 123         read_lock(&pool->lock);
 124         list_for_each(_chunk, &pool->chunks) {
 125                 chunk = list_entry(_chunk, struct gen_pool_chunk, next_chunk);
 126
 127                 end_bit = (chunk->end_addr - chunk->start_addr) >> order;
 128                 end_bit -= nbits + 1;
 129
 130                 spin_lock_irqsave(&chunk->lock, flags);
 131                 bit = -1;
 132                 while (bit + 1 < end_bit) {
 133                         bit = find_next_zero_bit(chunk->bits, end_bit, bit + 1);
 134                         if (bit >= end_bit)
 135                                 break;
 136
 137                         start_bit = bit;
 138                         if (nbits > 1) {
 139                                 bit = find_next_bit(chunk->bits, bit + nbits,
 140                                                         bit + 1);
 141                                 if (bit - start_bit < nbits)
 142                                         continue;
 143                         }
 144
 145                         addr = chunk->start_addr +
 146                                             ((unsigned long)start_bit << order);
 147                         while (nbits--)
 148                                 __set_bit(start_bit++, &chunk->bits);
 149                         spin_unlock_irqrestore(&chunk->lock, flags);
 150                         read_unlock(&pool->lock);
 151                         return addr;
 152                 }
 153                 spin_unlock_irqrestore(&chunk->lock, flags);
 154         }
 155         read_unlock(&pool->lock);
 156         return 0;
 157 }
 158 EXPORT_SYMBOL(gen_pool_alloc);
 159
 160
 161 /*
 162  * Free the specified memory back to the specified pool.
 163  *
 164  * @pool: pool to free to
 165  * @addr: starting address of memory to free back to pool
 166  * @size: size in bytes of memory to free
 167  */
 168 void gen_pool_free(struct gen_pool *pool, unsigned long addr, size_t size)
 169 {
 170         struct list_head *_chunk;
 171         struct gen_pool_chunk *chunk;
 172         unsigned long flags;
 173         int order = pool->min_alloc_order;
 174         int bit, nbits;
 175
 176         nbits = (size + (1UL << order) - 1) >> order;
 177
 178         read_lock(&pool->lock);
 179         list_for_each(_chunk, &pool->chunks) {
 180                 chunk = list_entry(_chunk, struct gen_pool_chunk, next_chunk);
 181
 182                 if (addr >= chunk->start_addr && addr < chunk->end_addr) {
 183                         BUG_ON(addr + size > chunk->end_addr);
 184                         spin_lock_irqsave(&chunk->lock, flags);
 185                         bit = (addr - chunk->start_addr) >> order;
 186                         while (nbits--)
 187                                 __clear_bit(bit++, &chunk->bits);
 188                         spin_unlock_irqrestore(&chunk->lock, flags);
 189                         break;
 190                 }
 191         }
 192         BUG_ON(nbits > 0);
 193         read_unlock(&pool->lock);
 194 }
 195 EXPORT_SYMBOL(gen_pool_free);