NetServices Stack source

Dependents:   HelloWorld ServoInterfaceBoardExample1 4180_Lab4

Committer:
donatien
Date:
Fri Jun 11 16:05:15 2010 +0000
Revision:
0:632c9925f013
Child:
5:dd63a1e02b1b

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
donatien 0:632c9925f013 1 /**
donatien 0:632c9925f013 2 * @file
donatien 0:632c9925f013 3 * Dynamic pool memory manager
donatien 0:632c9925f013 4 *
donatien 0:632c9925f013 5 * lwIP has dedicated pools for many structures (netconn, protocol control blocks,
donatien 0:632c9925f013 6 * packet buffers, ...). All these pools are managed here.
donatien 0:632c9925f013 7 */
donatien 0:632c9925f013 8
donatien 0:632c9925f013 9 /*
donatien 0:632c9925f013 10 * Copyright (c) 2001-2004 Swedish Institute of Computer Science.
donatien 0:632c9925f013 11 * All rights reserved.
donatien 0:632c9925f013 12 *
donatien 0:632c9925f013 13 * Redistribution and use in source and binary forms, with or without modification,
donatien 0:632c9925f013 14 * are permitted provided that the following conditions are met:
donatien 0:632c9925f013 15 *
donatien 0:632c9925f013 16 * 1. Redistributions of source code must retain the above copyright notice,
donatien 0:632c9925f013 17 * this list of conditions and the following disclaimer.
donatien 0:632c9925f013 18 * 2. Redistributions in binary form must reproduce the above copyright notice,
donatien 0:632c9925f013 19 * this list of conditions and the following disclaimer in the documentation
donatien 0:632c9925f013 20 * and/or other materials provided with the distribution.
donatien 0:632c9925f013 21 * 3. The name of the author may not be used to endorse or promote products
donatien 0:632c9925f013 22 * derived from this software without specific prior written permission.
donatien 0:632c9925f013 23 *
donatien 0:632c9925f013 24 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
donatien 0:632c9925f013 25 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
donatien 0:632c9925f013 26 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
donatien 0:632c9925f013 27 * SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
donatien 0:632c9925f013 28 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT
donatien 0:632c9925f013 29 * OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
donatien 0:632c9925f013 30 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
donatien 0:632c9925f013 31 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
donatien 0:632c9925f013 32 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY
donatien 0:632c9925f013 33 * OF SUCH DAMAGE.
donatien 0:632c9925f013 34 *
donatien 0:632c9925f013 35 * This file is part of the lwIP TCP/IP stack.
donatien 0:632c9925f013 36 *
donatien 0:632c9925f013 37 * Author: Adam Dunkels <adam@sics.se>
donatien 0:632c9925f013 38 *
donatien 0:632c9925f013 39 */
donatien 0:632c9925f013 40
donatien 0:632c9925f013 41 #include "lwip/opt.h"
donatien 0:632c9925f013 42
donatien 0:632c9925f013 43 #include "lwip/memp.h"
donatien 0:632c9925f013 44 #include "lwip/pbuf.h"
donatien 0:632c9925f013 45 #include "lwip/udp.h"
donatien 0:632c9925f013 46 #include "lwip/raw.h"
donatien 0:632c9925f013 47 #include "lwip/tcp_impl.h"
donatien 0:632c9925f013 48 #include "lwip/igmp.h"
donatien 0:632c9925f013 49 #include "lwip/api.h"
donatien 0:632c9925f013 50 #include "lwip/api_msg.h"
donatien 0:632c9925f013 51 #include "lwip/tcpip.h"
donatien 0:632c9925f013 52 #include "lwip/sys.h"
donatien 0:632c9925f013 53 #include "lwip/timers.h"
donatien 0:632c9925f013 54 #include "lwip/stats.h"
donatien 0:632c9925f013 55 #include "netif/etharp.h"
donatien 0:632c9925f013 56 #include "lwip/ip_frag.h"
donatien 0:632c9925f013 57 #include "lwip/snmp_structs.h"
donatien 0:632c9925f013 58 #include "lwip/snmp_msg.h"
donatien 0:632c9925f013 59 #include "lwip/dns.h"
donatien 0:632c9925f013 60
donatien 0:632c9925f013 61 #include <string.h>
donatien 0:632c9925f013 62
donatien 0:632c9925f013 63 #if !MEMP_MEM_MALLOC /* don't build if not configured for use in lwipopts.h */
donatien 0:632c9925f013 64
donatien 0:632c9925f013 65 struct memp {
donatien 0:632c9925f013 66 struct memp *next;
donatien 0:632c9925f013 67 #if MEMP_OVERFLOW_CHECK
donatien 0:632c9925f013 68 const char *file;
donatien 0:632c9925f013 69 int line;
donatien 0:632c9925f013 70 #endif /* MEMP_OVERFLOW_CHECK */
donatien 0:632c9925f013 71 };
donatien 0:632c9925f013 72
donatien 0:632c9925f013 73 #if MEMP_OVERFLOW_CHECK
donatien 0:632c9925f013 74 /* if MEMP_OVERFLOW_CHECK is turned on, we reserve some bytes at the beginning
donatien 0:632c9925f013 75 * and at the end of each element, initialize them as 0xcd and check
donatien 0:632c9925f013 76 * them later. */
donatien 0:632c9925f013 77 /* If MEMP_OVERFLOW_CHECK is >= 2, on every call to memp_malloc or memp_free,
donatien 0:632c9925f013 78 * every single element in each pool is checked!
donatien 0:632c9925f013 79 * This is VERY SLOW but also very helpful. */
donatien 0:632c9925f013 80 /* MEMP_SANITY_REGION_BEFORE and MEMP_SANITY_REGION_AFTER can be overridden in
donatien 0:632c9925f013 81 * lwipopts.h to change the amount reserved for checking. */
donatien 0:632c9925f013 82 #ifndef MEMP_SANITY_REGION_BEFORE
donatien 0:632c9925f013 83 #define MEMP_SANITY_REGION_BEFORE 16
donatien 0:632c9925f013 84 #endif /* MEMP_SANITY_REGION_BEFORE*/
donatien 0:632c9925f013 85 #if MEMP_SANITY_REGION_BEFORE > 0
donatien 0:632c9925f013 86 #define MEMP_SANITY_REGION_BEFORE_ALIGNED LWIP_MEM_ALIGN_SIZE(MEMP_SANITY_REGION_BEFORE)
donatien 0:632c9925f013 87 #else
donatien 0:632c9925f013 88 #define MEMP_SANITY_REGION_BEFORE_ALIGNED 0
donatien 0:632c9925f013 89 #endif /* MEMP_SANITY_REGION_BEFORE*/
donatien 0:632c9925f013 90 #ifndef MEMP_SANITY_REGION_AFTER
donatien 0:632c9925f013 91 #define MEMP_SANITY_REGION_AFTER 16
donatien 0:632c9925f013 92 #endif /* MEMP_SANITY_REGION_AFTER*/
donatien 0:632c9925f013 93 #if MEMP_SANITY_REGION_AFTER > 0
donatien 0:632c9925f013 94 #define MEMP_SANITY_REGION_AFTER_ALIGNED LWIP_MEM_ALIGN_SIZE(MEMP_SANITY_REGION_AFTER)
donatien 0:632c9925f013 95 #else
donatien 0:632c9925f013 96 #define MEMP_SANITY_REGION_AFTER_ALIGNED 0
donatien 0:632c9925f013 97 #endif /* MEMP_SANITY_REGION_AFTER*/
donatien 0:632c9925f013 98
donatien 0:632c9925f013 99 /* MEMP_SIZE: save space for struct memp and for sanity check */
donatien 0:632c9925f013 100 #define MEMP_SIZE (LWIP_MEM_ALIGN_SIZE(sizeof(struct memp)) + MEMP_SANITY_REGION_BEFORE_ALIGNED)
donatien 0:632c9925f013 101 #define MEMP_ALIGN_SIZE(x) (LWIP_MEM_ALIGN_SIZE(x) + MEMP_SANITY_REGION_AFTER_ALIGNED)
donatien 0:632c9925f013 102
donatien 0:632c9925f013 103 #else /* MEMP_OVERFLOW_CHECK */
donatien 0:632c9925f013 104
donatien 0:632c9925f013 105 /* No sanity checks
donatien 0:632c9925f013 106 * We don't need to preserve the struct memp while not allocated, so we
donatien 0:632c9925f013 107 * can save a little space and set MEMP_SIZE to 0.
donatien 0:632c9925f013 108 */
donatien 0:632c9925f013 109 #define MEMP_SIZE 0
donatien 0:632c9925f013 110 #define MEMP_ALIGN_SIZE(x) (LWIP_MEM_ALIGN_SIZE(x))
donatien 0:632c9925f013 111
donatien 0:632c9925f013 112 #endif /* MEMP_OVERFLOW_CHECK */
donatien 0:632c9925f013 113
donatien 0:632c9925f013 114 /** This array holds the first free element of each pool.
donatien 0:632c9925f013 115 * Elements form a linked list. */
donatien 0:632c9925f013 116 static struct memp *memp_tab[MEMP_MAX] MEM_POSITION;
donatien 0:632c9925f013 117
donatien 0:632c9925f013 118 #else /* MEMP_MEM_MALLOC */
donatien 0:632c9925f013 119
donatien 0:632c9925f013 120 #define MEMP_ALIGN_SIZE(x) (LWIP_MEM_ALIGN_SIZE(x))
donatien 0:632c9925f013 121
donatien 0:632c9925f013 122 #endif /* MEMP_MEM_MALLOC */
donatien 0:632c9925f013 123
donatien 0:632c9925f013 124 /** This array holds the element sizes of each pool. */
donatien 0:632c9925f013 125 #if !MEM_USE_POOLS && !MEMP_MEM_MALLOC
donatien 0:632c9925f013 126 static
donatien 0:632c9925f013 127 #endif
donatien 0:632c9925f013 128 const u16_t memp_sizes[MEMP_MAX] = {
donatien 0:632c9925f013 129 #define LWIP_MEMPOOL(name,num,size,desc) LWIP_MEM_ALIGN_SIZE(size),
donatien 0:632c9925f013 130 #include "lwip/memp_std.h"
donatien 0:632c9925f013 131 };
donatien 0:632c9925f013 132
donatien 0:632c9925f013 133 #if !MEMP_MEM_MALLOC /* don't build if not configured for use in lwipopts.h */
donatien 0:632c9925f013 134
donatien 0:632c9925f013 135 /** This array holds the number of elements in each pool. */
donatien 0:632c9925f013 136 static const u16_t memp_num[MEMP_MAX] = {
donatien 0:632c9925f013 137 #define LWIP_MEMPOOL(name,num,size,desc) (num),
donatien 0:632c9925f013 138 #include "lwip/memp_std.h"
donatien 0:632c9925f013 139 };
donatien 0:632c9925f013 140
donatien 0:632c9925f013 141 /** This array holds a textual description of each pool. */
donatien 0:632c9925f013 142 #ifdef LWIP_DEBUG
donatien 0:632c9925f013 143 static const char *memp_desc[MEMP_MAX] = {
donatien 0:632c9925f013 144 #define LWIP_MEMPOOL(name,num,size,desc) (desc),
donatien 0:632c9925f013 145 #include "lwip/memp_std.h"
donatien 0:632c9925f013 146 };
donatien 0:632c9925f013 147 #endif /* LWIP_DEBUG */
donatien 0:632c9925f013 148
donatien 0:632c9925f013 149 #if MEMP_SEPARATE_POOLS
donatien 0:632c9925f013 150
donatien 0:632c9925f013 151 /** This creates each memory pool. These are named memp_memory_XXX_base (where
donatien 0:632c9925f013 152 * XXX is the name of the pool defined in memp_std.h).
donatien 0:632c9925f013 153 * To relocate a pool, declare it as extern in cc.h. Example for GCC:
donatien 0:632c9925f013 154 * extern u8_t __attribute__((section(".onchip_mem"))) memp_memory_UDP_PCB_base[];
donatien 0:632c9925f013 155 */
donatien 0:632c9925f013 156 #define LWIP_MEMPOOL(name,num,size,desc) u8_t memp_memory_ ## name ## _base \
donatien 0:632c9925f013 157 [((num) * (MEMP_SIZE + MEMP_ALIGN_SIZE(size)))];
donatien 0:632c9925f013 158 #include "lwip/memp_std.h"
donatien 0:632c9925f013 159
donatien 0:632c9925f013 160 /** This array holds the base of each memory pool. */
donatien 0:632c9925f013 161 static u8_t *const memp_bases[] = {
donatien 0:632c9925f013 162 #define LWIP_MEMPOOL(name,num,size,desc) memp_memory_ ## name ## _base,
donatien 0:632c9925f013 163 #include "lwip/memp_std.h"
donatien 0:632c9925f013 164 } MEM_POSITION;
donatien 0:632c9925f013 165
donatien 0:632c9925f013 166 #else /* MEMP_SEPARATE_POOLS */
donatien 0:632c9925f013 167
donatien 0:632c9925f013 168 /** This is the actual memory used by the pools (all pools in one big block). */
donatien 0:632c9925f013 169 static u8_t memp_memory[MEM_ALIGNMENT - 1
donatien 0:632c9925f013 170 #define LWIP_MEMPOOL(name,num,size,desc) + ( (num) * (MEMP_SIZE + MEMP_ALIGN_SIZE(size) ) )
donatien 0:632c9925f013 171 #include "lwip/memp_std.h"
donatien 0:632c9925f013 172 ] MEM_POSITION;
donatien 0:632c9925f013 173
donatien 0:632c9925f013 174 #endif /* MEMP_SEPARATE_POOLS */
donatien 0:632c9925f013 175
donatien 0:632c9925f013 176 #if MEMP_SANITY_CHECK
donatien 0:632c9925f013 177 /**
donatien 0:632c9925f013 178 * Check that memp-lists don't form a circle
donatien 0:632c9925f013 179 */
donatien 0:632c9925f013 180 static int
donatien 0:632c9925f013 181 memp_sanity(void)
donatien 0:632c9925f013 182 {
donatien 0:632c9925f013 183 s16_t i, c;
donatien 0:632c9925f013 184 struct memp *m, *n;
donatien 0:632c9925f013 185
donatien 0:632c9925f013 186 for (i = 0; i < MEMP_MAX; i++) {
donatien 0:632c9925f013 187 for (m = memp_tab[i]; m != NULL; m = m->next) {
donatien 0:632c9925f013 188 c = 1;
donatien 0:632c9925f013 189 for (n = memp_tab[i]; n != NULL; n = n->next) {
donatien 0:632c9925f013 190 if (n == m && --c < 0) {
donatien 0:632c9925f013 191 return 0;
donatien 0:632c9925f013 192 }
donatien 0:632c9925f013 193 }
donatien 0:632c9925f013 194 }
donatien 0:632c9925f013 195 }
donatien 0:632c9925f013 196 return 1;
donatien 0:632c9925f013 197 }
donatien 0:632c9925f013 198 #endif /* MEMP_SANITY_CHECK*/
donatien 0:632c9925f013 199 #if MEMP_OVERFLOW_CHECK
donatien 0:632c9925f013 200 /**
donatien 0:632c9925f013 201 * Check if a memp element was victim of an overflow
donatien 0:632c9925f013 202 * (e.g. the restricted area after it has been altered)
donatien 0:632c9925f013 203 *
donatien 0:632c9925f013 204 * @param p the memp element to check
donatien 0:632c9925f013 205 * @param memp_size the element size of the pool p comes from
donatien 0:632c9925f013 206 */
donatien 0:632c9925f013 207 static void
donatien 0:632c9925f013 208 memp_overflow_check_element(struct memp *p, u16_t memp_size)
donatien 0:632c9925f013 209 {
donatien 0:632c9925f013 210 u16_t k;
donatien 0:632c9925f013 211 u8_t *m;
donatien 0:632c9925f013 212 #if MEMP_SANITY_REGION_BEFORE_ALIGNED > 0
donatien 0:632c9925f013 213 m = (u8_t*)p + MEMP_SIZE - MEMP_SANITY_REGION_BEFORE_ALIGNED;
donatien 0:632c9925f013 214 for (k = 0; k < MEMP_SANITY_REGION_BEFORE_ALIGNED; k++) {
donatien 0:632c9925f013 215 if (m[k] != 0xcd) {
donatien 0:632c9925f013 216 LWIP_ASSERT("detected memp underflow!", 0);
donatien 0:632c9925f013 217 }
donatien 0:632c9925f013 218 }
donatien 0:632c9925f013 219 #endif
donatien 0:632c9925f013 220 #if MEMP_SANITY_REGION_AFTER_ALIGNED > 0
donatien 0:632c9925f013 221 m = (u8_t*)p + MEMP_SIZE + memp_size;
donatien 0:632c9925f013 222 for (k = 0; k < MEMP_SANITY_REGION_AFTER_ALIGNED; k++) {
donatien 0:632c9925f013 223 if (m[k] != 0xcd) {
donatien 0:632c9925f013 224 LWIP_ASSERT("detected memp overflow!", 0);
donatien 0:632c9925f013 225 }
donatien 0:632c9925f013 226 }
donatien 0:632c9925f013 227 #endif
donatien 0:632c9925f013 228 }
donatien 0:632c9925f013 229
donatien 0:632c9925f013 230 /**
donatien 0:632c9925f013 231 * Do an overflow check for all elements in every pool.
donatien 0:632c9925f013 232 *
donatien 0:632c9925f013 233 * @see memp_overflow_check_element for a description of the check
donatien 0:632c9925f013 234 */
donatien 0:632c9925f013 235 static void
donatien 0:632c9925f013 236 memp_overflow_check_all(void)
donatien 0:632c9925f013 237 {
donatien 0:632c9925f013 238 u16_t i, j;
donatien 0:632c9925f013 239 struct memp *p;
donatien 0:632c9925f013 240
donatien 0:632c9925f013 241 p = LWIP_MEM_ALIGN(memp_memory);
donatien 0:632c9925f013 242 for (i = 0; i < MEMP_MAX; ++i) {
donatien 0:632c9925f013 243 p = p;
donatien 0:632c9925f013 244 for (j = 0; j < memp_num[i]; ++j) {
donatien 0:632c9925f013 245 memp_overflow_check_element(p, memp_sizes[i]);
donatien 0:632c9925f013 246 p = (struct memp*)((u8_t*)p + MEMP_SIZE + memp_sizes[i] + MEMP_SANITY_REGION_AFTER_ALIGNED);
donatien 0:632c9925f013 247 }
donatien 0:632c9925f013 248 }
donatien 0:632c9925f013 249 }
donatien 0:632c9925f013 250
donatien 0:632c9925f013 251 /**
donatien 0:632c9925f013 252 * Initialize the restricted areas of all memp elements in every pool.
donatien 0:632c9925f013 253 */
donatien 0:632c9925f013 254 static void
donatien 0:632c9925f013 255 memp_overflow_init(void)
donatien 0:632c9925f013 256 {
donatien 0:632c9925f013 257 u16_t i, j;
donatien 0:632c9925f013 258 struct memp *p;
donatien 0:632c9925f013 259 u8_t *m;
donatien 0:632c9925f013 260
donatien 0:632c9925f013 261 p = LWIP_MEM_ALIGN(memp_memory);
donatien 0:632c9925f013 262 for (i = 0; i < MEMP_MAX; ++i) {
donatien 0:632c9925f013 263 p = p;
donatien 0:632c9925f013 264 for (j = 0; j < memp_num[i]; ++j) {
donatien 0:632c9925f013 265 #if MEMP_SANITY_REGION_BEFORE_ALIGNED > 0
donatien 0:632c9925f013 266 m = (u8_t*)p + MEMP_SIZE - MEMP_SANITY_REGION_BEFORE_ALIGNED;
donatien 0:632c9925f013 267 memset(m, 0xcd, MEMP_SANITY_REGION_BEFORE_ALIGNED);
donatien 0:632c9925f013 268 #endif
donatien 0:632c9925f013 269 #if MEMP_SANITY_REGION_AFTER_ALIGNED > 0
donatien 0:632c9925f013 270 m = (u8_t*)p + MEMP_SIZE + memp_sizes[i];
donatien 0:632c9925f013 271 memset(m, 0xcd, MEMP_SANITY_REGION_AFTER_ALIGNED);
donatien 0:632c9925f013 272 #endif
donatien 0:632c9925f013 273 p = (struct memp*)((u8_t*)p + MEMP_SIZE + memp_sizes[i] + MEMP_SANITY_REGION_AFTER_ALIGNED);
donatien 0:632c9925f013 274 }
donatien 0:632c9925f013 275 }
donatien 0:632c9925f013 276 }
donatien 0:632c9925f013 277 #endif /* MEMP_OVERFLOW_CHECK */
donatien 0:632c9925f013 278
donatien 0:632c9925f013 279 /**
donatien 0:632c9925f013 280 * Initialize this module.
donatien 0:632c9925f013 281 *
donatien 0:632c9925f013 282 * Carves out memp_memory into linked lists for each pool-type.
donatien 0:632c9925f013 283 */
donatien 0:632c9925f013 284 void
donatien 0:632c9925f013 285 memp_init(void)
donatien 0:632c9925f013 286 {
donatien 0:632c9925f013 287 struct memp *memp;
donatien 0:632c9925f013 288 u16_t i, j;
donatien 0:632c9925f013 289
donatien 0:632c9925f013 290 for (i = 0; i < MEMP_MAX; ++i) {
donatien 0:632c9925f013 291 MEMP_STATS_AVAIL(used, i, 0);
donatien 0:632c9925f013 292 MEMP_STATS_AVAIL(max, i, 0);
donatien 0:632c9925f013 293 MEMP_STATS_AVAIL(err, i, 0);
donatien 0:632c9925f013 294 MEMP_STATS_AVAIL(avail, i, memp_num[i]);
donatien 0:632c9925f013 295 }
donatien 0:632c9925f013 296
donatien 0:632c9925f013 297 #if !MEMP_SEPARATE_POOLS
donatien 0:632c9925f013 298 memp = (struct memp *)LWIP_MEM_ALIGN(memp_memory);
donatien 0:632c9925f013 299 #endif /* !MEMP_SEPARATE_POOLS */
donatien 0:632c9925f013 300 /* for every pool: */
donatien 0:632c9925f013 301 for (i = 0; i < MEMP_MAX; ++i) {
donatien 0:632c9925f013 302 memp_tab[i] = NULL;
donatien 0:632c9925f013 303 #if MEMP_SEPARATE_POOLS
donatien 0:632c9925f013 304 memp = (struct memp*)memp_bases[i];
donatien 0:632c9925f013 305 #endif /* MEMP_SEPARATE_POOLS */
donatien 0:632c9925f013 306 /* create a linked list of memp elements */
donatien 0:632c9925f013 307 for (j = 0; j < memp_num[i]; ++j) {
donatien 0:632c9925f013 308 memp->next = memp_tab[i];
donatien 0:632c9925f013 309 memp_tab[i] = memp;
donatien 0:632c9925f013 310 memp = (struct memp *)(void *)((u8_t *)memp + MEMP_SIZE + memp_sizes[i]
donatien 0:632c9925f013 311 #if MEMP_OVERFLOW_CHECK
donatien 0:632c9925f013 312 + MEMP_SANITY_REGION_AFTER_ALIGNED
donatien 0:632c9925f013 313 #endif
donatien 0:632c9925f013 314 );
donatien 0:632c9925f013 315 }
donatien 0:632c9925f013 316 }
donatien 0:632c9925f013 317 #if MEMP_OVERFLOW_CHECK
donatien 0:632c9925f013 318 memp_overflow_init();
donatien 0:632c9925f013 319 /* check everything a first time to see if it worked */
donatien 0:632c9925f013 320 memp_overflow_check_all();
donatien 0:632c9925f013 321 #endif /* MEMP_OVERFLOW_CHECK */
donatien 0:632c9925f013 322 }
donatien 0:632c9925f013 323
donatien 0:632c9925f013 324 /**
donatien 0:632c9925f013 325 * Get an element from a specific pool.
donatien 0:632c9925f013 326 *
donatien 0:632c9925f013 327 * @param type the pool to get an element from
donatien 0:632c9925f013 328 *
donatien 0:632c9925f013 329 * the debug version has two more parameters:
donatien 0:632c9925f013 330 * @param file file name calling this function
donatien 0:632c9925f013 331 * @param line number of line where this function is called
donatien 0:632c9925f013 332 *
donatien 0:632c9925f013 333 * @return a pointer to the allocated memory or a NULL pointer on error
donatien 0:632c9925f013 334 */
donatien 0:632c9925f013 335 void *
donatien 0:632c9925f013 336 #if !MEMP_OVERFLOW_CHECK
donatien 0:632c9925f013 337 memp_malloc(memp_t type)
donatien 0:632c9925f013 338 #else
donatien 0:632c9925f013 339 memp_malloc_fn(memp_t type, const char* file, const int line)
donatien 0:632c9925f013 340 #endif
donatien 0:632c9925f013 341 {
donatien 0:632c9925f013 342 struct memp *memp;
donatien 0:632c9925f013 343 SYS_ARCH_DECL_PROTECT(old_level);
donatien 0:632c9925f013 344
donatien 0:632c9925f013 345 LWIP_ERROR("memp_malloc: type < MEMP_MAX", (type < MEMP_MAX), return NULL;);
donatien 0:632c9925f013 346
donatien 0:632c9925f013 347 SYS_ARCH_PROTECT(old_level);
donatien 0:632c9925f013 348 #if MEMP_OVERFLOW_CHECK >= 2
donatien 0:632c9925f013 349 memp_overflow_check_all();
donatien 0:632c9925f013 350 #endif /* MEMP_OVERFLOW_CHECK >= 2 */
donatien 0:632c9925f013 351
donatien 0:632c9925f013 352 memp = memp_tab[type];
donatien 0:632c9925f013 353
donatien 0:632c9925f013 354 if (memp != NULL) {
donatien 0:632c9925f013 355 memp_tab[type] = memp->next;
donatien 0:632c9925f013 356 #if MEMP_OVERFLOW_CHECK
donatien 0:632c9925f013 357 memp->next = NULL;
donatien 0:632c9925f013 358 memp->file = file;
donatien 0:632c9925f013 359 memp->line = line;
donatien 0:632c9925f013 360 #endif /* MEMP_OVERFLOW_CHECK */
donatien 0:632c9925f013 361 MEMP_STATS_INC_USED(used, type);
donatien 0:632c9925f013 362 LWIP_ASSERT("memp_malloc: memp properly aligned",
donatien 0:632c9925f013 363 ((mem_ptr_t)memp % MEM_ALIGNMENT) == 0);
donatien 0:632c9925f013 364 memp = (struct memp*)(void *)((u8_t*)memp + MEMP_SIZE);
donatien 0:632c9925f013 365 } else {
donatien 0:632c9925f013 366 LWIP_DEBUGF(MEMP_DEBUG | LWIP_DBG_LEVEL_SERIOUS, ("memp_malloc: out of memory in pool %s\n", memp_desc[type]));
donatien 0:632c9925f013 367 MEMP_STATS_INC(err, type);
donatien 0:632c9925f013 368 }
donatien 0:632c9925f013 369
donatien 0:632c9925f013 370 SYS_ARCH_UNPROTECT(old_level);
donatien 0:632c9925f013 371
donatien 0:632c9925f013 372 return memp;
donatien 0:632c9925f013 373 }
donatien 0:632c9925f013 374
donatien 0:632c9925f013 375 /**
donatien 0:632c9925f013 376 * Put an element back into its pool.
donatien 0:632c9925f013 377 *
donatien 0:632c9925f013 378 * @param type the pool where to put mem
donatien 0:632c9925f013 379 * @param mem the memp element to free
donatien 0:632c9925f013 380 */
donatien 0:632c9925f013 381 void
donatien 0:632c9925f013 382 memp_free(memp_t type, void *mem)
donatien 0:632c9925f013 383 {
donatien 0:632c9925f013 384 struct memp *memp;
donatien 0:632c9925f013 385 SYS_ARCH_DECL_PROTECT(old_level);
donatien 0:632c9925f013 386
donatien 0:632c9925f013 387 if (mem == NULL) {
donatien 0:632c9925f013 388 return;
donatien 0:632c9925f013 389 }
donatien 0:632c9925f013 390 LWIP_ASSERT("memp_free: mem properly aligned",
donatien 0:632c9925f013 391 ((mem_ptr_t)mem % MEM_ALIGNMENT) == 0);
donatien 0:632c9925f013 392
donatien 0:632c9925f013 393 memp = (struct memp *)(void *)((u8_t*)mem - MEMP_SIZE);
donatien 0:632c9925f013 394
donatien 0:632c9925f013 395 SYS_ARCH_PROTECT(old_level);
donatien 0:632c9925f013 396 #if MEMP_OVERFLOW_CHECK
donatien 0:632c9925f013 397 #if MEMP_OVERFLOW_CHECK >= 2
donatien 0:632c9925f013 398 memp_overflow_check_all();
donatien 0:632c9925f013 399 #else
donatien 0:632c9925f013 400 memp_overflow_check_element(memp, memp_sizes[type]);
donatien 0:632c9925f013 401 #endif /* MEMP_OVERFLOW_CHECK >= 2 */
donatien 0:632c9925f013 402 #endif /* MEMP_OVERFLOW_CHECK */
donatien 0:632c9925f013 403
donatien 0:632c9925f013 404 MEMP_STATS_DEC(used, type);
donatien 0:632c9925f013 405
donatien 0:632c9925f013 406 memp->next = memp_tab[type];
donatien 0:632c9925f013 407 memp_tab[type] = memp;
donatien 0:632c9925f013 408
donatien 0:632c9925f013 409 #if MEMP_SANITY_CHECK
donatien 0:632c9925f013 410 LWIP_ASSERT("memp sanity", memp_sanity());
donatien 0:632c9925f013 411 #endif /* MEMP_SANITY_CHECK */
donatien 0:632c9925f013 412
donatien 0:632c9925f013 413 SYS_ARCH_UNPROTECT(old_level);
donatien 0:632c9925f013 414 }
donatien 0:632c9925f013 415
donatien 0:632c9925f013 416 #endif /* MEMP_MEM_MALLOC */