Kenji Arai / mbed-dev4BLE

mbed library sources, mbed-dev only for TYBLE16

Fork of mbed-dev by mbed official

Please refer flowing link.
/users/kenjiArai/notebook/tyble16-module-will-become-a-mbed-family--mbedliza/

platform/mbed_alloc_wrappers.cpp@180:96ed750bd169, 2018-01-17 (annotated)

Committer:
Anna Bridge
Date:
Wed Jan 17 15:23:54 2018 +0000
Revision:
180:96ed750bd169
Parent:
174:b96e65c34a4d
Child:
181:57724642e740
mbed-dev libray. Release version 158

Who changed what in which revision?

UserRevisionLine numberNew contents of line
<> 149:156823d33999 1 /* mbed Microcontroller Library
<> 149:156823d33999 2 * Copyright (c) 2006-2016 ARM Limited
<> 149:156823d33999 3 *
<> 149:156823d33999 4 * Licensed under the Apache License, Version 2.0 (the "License");
<> 149:156823d33999 5 * you may not use this file except in compliance with the License.
<> 149:156823d33999 6 * You may obtain a copy of the License at
<> 149:156823d33999 7 *
<> 149:156823d33999 8 * http://www.apache.org/licenses/LICENSE-2.0
<> 149:156823d33999 9 *
<> 149:156823d33999 10 * Unless required by applicable law or agreed to in writing, software
<> 149:156823d33999 11 * distributed under the License is distributed on an "AS IS" BASIS,
<> 149:156823d33999 12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
<> 149:156823d33999 13 * See the License for the specific language governing permissions and
<> 149:156823d33999 14 * limitations under the License.
<> 149:156823d33999 15 */
<> 149:156823d33999 16
<> 149:156823d33999 17 #include "platform/mbed_mem_trace.h"
<> 149:156823d33999 18 #include "platform/mbed_stats.h"
<> 160:d5399cc887bb 19 #include "platform/mbed_toolchain.h"
<> 149:156823d33999 20 #include "platform/SingletonPtr.h"
<> 149:156823d33999 21 #include "platform/PlatformMutex.h"
<> 149:156823d33999 22 #include <stddef.h>
<> 149:156823d33999 23 #include <stdio.h>
<> 149:156823d33999 24 #include <string.h>
<> 149:156823d33999 25 #include <stdlib.h>
<> 149:156823d33999 26
<> 149:156823d33999 27 /* There are two memory tracers in mbed OS:
<> 149:156823d33999 28
<> 149:156823d33999 29 - the first can be used to detect the maximum heap usage at runtime. It is
<> 149:156823d33999 30 activated by defining the MBED_HEAP_STATS_ENABLED macro.
<> 149:156823d33999 31 - the second can be used to trace each memory call by automatically invoking
<> 149:156823d33999 32 a callback on each memory operation (see hal/api/mbed_mem_trace.h). It is
<> 149:156823d33999 33 activated by defining the MBED_MEM_TRACING_ENABLED macro.
<> 149:156823d33999 34
<> 149:156823d33999 35 Both tracers can be activated and deactivated in any combination. If both tracers
<> 149:156823d33999 36 are active, the second one (MBED_MEM_TRACING_ENABLED) will trace the first one's
<> 149:156823d33999 37 (MBED_HEAP_STATS_ENABLED) memory calls.*/
<> 149:156823d33999 38
<> 149:156823d33999 39 /******************************************************************************/
<> 149:156823d33999 40 /* Implementation of the runtime max heap usage checker */
<> 149:156823d33999 41 /******************************************************************************/
<> 149:156823d33999 42
<> 149:156823d33999 43 /* Size must be a multiple of 8 to keep alignment */
<> 149:156823d33999 44 typedef struct {
<> 149:156823d33999 45 uint32_t size;
<> 149:156823d33999 46 uint32_t pad;
<> 149:156823d33999 47 } alloc_info_t;
<> 149:156823d33999 48
<> 149:156823d33999 49 #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 50 static SingletonPtr<PlatformMutex> malloc_stats_mutex;
<> 149:156823d33999 51 static mbed_stats_heap_t heap_stats = {0, 0, 0, 0, 0};
<> 149:156823d33999 52 #endif
<> 149:156823d33999 53
<> 149:156823d33999 54 void mbed_stats_heap_get(mbed_stats_heap_t *stats)
<> 149:156823d33999 55 {
<> 149:156823d33999 56 #ifdef MBED_HEAP_STATS_ENABLED
<> 152:9a67f0b066fc 57 extern uint32_t mbed_heap_size;
<> 152:9a67f0b066fc 58 heap_stats.reserved_size = mbed_heap_size;
<> 152:9a67f0b066fc 59
<> 149:156823d33999 60 malloc_stats_mutex->lock();
<> 149:156823d33999 61 memcpy(stats, &heap_stats, sizeof(mbed_stats_heap_t));
<> 149:156823d33999 62 malloc_stats_mutex->unlock();
<> 149:156823d33999 63 #else
<> 149:156823d33999 64 memset(stats, 0, sizeof(mbed_stats_heap_t));
<> 149:156823d33999 65 #endif
<> 149:156823d33999 66 }
<> 149:156823d33999 67
<> 149:156823d33999 68 /******************************************************************************/
<> 149:156823d33999 69 /* GCC memory allocation wrappers */
<> 149:156823d33999 70 /******************************************************************************/
<> 149:156823d33999 71
<> 149:156823d33999 72 #if defined(TOOLCHAIN_GCC)
<> 149:156823d33999 73
<> 149:156823d33999 74 #ifdef FEATURE_UVISOR
<> 149:156823d33999 75 #include "uvisor-lib/uvisor-lib.h"
<> 149:156823d33999 76 #endif/* FEATURE_UVISOR */
<> 149:156823d33999 77
<> 149:156823d33999 78 extern "C" {
<> 149:156823d33999 79 void * __real__malloc_r(struct _reent * r, size_t size);
AnnaBridge 167:e84263d55307 80 void * __real__memalign_r(struct _reent * r, size_t alignment, size_t bytes);
<> 149:156823d33999 81 void * __real__realloc_r(struct _reent * r, void * ptr, size_t size);
<> 149:156823d33999 82 void __real__free_r(struct _reent * r, void * ptr);
<> 149:156823d33999 83 void* __real__calloc_r(struct _reent * r, size_t nmemb, size_t size);
<> 149:156823d33999 84 }
<> 149:156823d33999 85
<> 149:156823d33999 86 // TODO: memory tracing doesn't work with uVisor enabled.
<> 149:156823d33999 87 #if !defined(FEATURE_UVISOR)
<> 149:156823d33999 88
<> 149:156823d33999 89 extern "C" void * __wrap__malloc_r(struct _reent * r, size_t size) {
<> 149:156823d33999 90 void *ptr = NULL;
Anna Bridge 180:96ed750bd169 91 #ifdef MBED_MEM_TRACING_ENABLED
Anna Bridge 180:96ed750bd169 92 mbed_mem_trace_lock();
Anna Bridge 180:96ed750bd169 93 #endif
<> 149:156823d33999 94 #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 95 malloc_stats_mutex->lock();
<> 149:156823d33999 96 alloc_info_t *alloc_info = (alloc_info_t*)__real__malloc_r(r, size + sizeof(alloc_info_t));
<> 149:156823d33999 97 if (alloc_info != NULL) {
<> 149:156823d33999 98 alloc_info->size = size;
<> 149:156823d33999 99 ptr = (void*)(alloc_info + 1);
<> 149:156823d33999 100 heap_stats.current_size += size;
<> 149:156823d33999 101 heap_stats.total_size += size;
<> 149:156823d33999 102 heap_stats.alloc_cnt += 1;
<> 149:156823d33999 103 if (heap_stats.current_size > heap_stats.max_size) {
<> 149:156823d33999 104 heap_stats.max_size = heap_stats.current_size;
<> 149:156823d33999 105 }
<> 149:156823d33999 106 } else {
<> 149:156823d33999 107 heap_stats.alloc_fail_cnt += 1;
<> 149:156823d33999 108 }
<> 149:156823d33999 109 malloc_stats_mutex->unlock();
<> 149:156823d33999 110 #else // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 111 ptr = __real__malloc_r(r, size);
<> 149:156823d33999 112 #endif // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 113 #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 114 mbed_mem_trace_malloc(ptr, size, MBED_CALLER_ADDR());
Anna Bridge 180:96ed750bd169 115 mbed_mem_trace_unlock();
<> 149:156823d33999 116 #endif // #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 117 return ptr;
<> 149:156823d33999 118 }
<> 149:156823d33999 119
<> 149:156823d33999 120 extern "C" void * __wrap__realloc_r(struct _reent * r, void * ptr, size_t size) {
<> 149:156823d33999 121 void *new_ptr = NULL;
Anna Bridge 180:96ed750bd169 122 #ifdef MBED_MEM_TRACING_ENABLED
Anna Bridge 180:96ed750bd169 123 mbed_mem_trace_lock();
Anna Bridge 180:96ed750bd169 124 #endif
<> 149:156823d33999 125 #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 126 // Implement realloc_r with malloc and free.
<> 149:156823d33999 127 // The function realloc_r can't be used here directly since
<> 149:156823d33999 128 // it can call into __wrap__malloc_r (returns ptr + 4) or
<> 149:156823d33999 129 // resize memory directly (returns ptr + 0).
<> 149:156823d33999 130
<> 149:156823d33999 131 // Note - no lock needed since malloc and free are thread safe
<> 149:156823d33999 132
<> 149:156823d33999 133 // Get old size
<> 149:156823d33999 134 uint32_t old_size = 0;
<> 149:156823d33999 135 if (ptr != NULL) {
<> 149:156823d33999 136 alloc_info_t *alloc_info = ((alloc_info_t*)ptr) - 1;
<> 149:156823d33999 137 old_size = alloc_info->size;
<> 149:156823d33999 138 }
<> 149:156823d33999 139
<> 149:156823d33999 140 // Allocate space
<> 149:156823d33999 141 if (size != 0) {
<> 149:156823d33999 142 new_ptr = malloc(size);
<> 149:156823d33999 143 }
<> 149:156823d33999 144
<> 149:156823d33999 145 // If the new buffer has been allocated copy the data to it
<> 149:156823d33999 146 // and free the old buffer
<> 149:156823d33999 147 if (new_ptr != NULL) {
<> 149:156823d33999 148 uint32_t copy_size = (old_size < size) ? old_size : size;
<> 149:156823d33999 149 memcpy(new_ptr, (void*)ptr, copy_size);
<> 149:156823d33999 150 free(ptr);
<> 149:156823d33999 151 }
<> 149:156823d33999 152 #else // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 153 new_ptr = __real__realloc_r(r, ptr, size);
<> 149:156823d33999 154 #endif // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 155 #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 156 mbed_mem_trace_realloc(new_ptr, ptr, size, MBED_CALLER_ADDR());
Anna Bridge 180:96ed750bd169 157 mbed_mem_trace_unlock();
<> 149:156823d33999 158 #endif // #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 159 return new_ptr;
<> 149:156823d33999 160 }
<> 149:156823d33999 161
<> 149:156823d33999 162 extern "C" void __wrap__free_r(struct _reent * r, void * ptr) {
Anna Bridge 180:96ed750bd169 163 #ifdef MBED_MEM_TRACING_ENABLED
Anna Bridge 180:96ed750bd169 164 mbed_mem_trace_lock();
Anna Bridge 180:96ed750bd169 165 #endif
<> 149:156823d33999 166 #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 167 malloc_stats_mutex->lock();
<> 149:156823d33999 168 alloc_info_t *alloc_info = NULL;
<> 149:156823d33999 169 if (ptr != NULL) {
<> 149:156823d33999 170 alloc_info = ((alloc_info_t*)ptr) - 1;
<> 149:156823d33999 171 heap_stats.current_size -= alloc_info->size;
<> 149:156823d33999 172 heap_stats.alloc_cnt -= 1;
<> 149:156823d33999 173 }
<> 149:156823d33999 174 __real__free_r(r, (void*)alloc_info);
<> 149:156823d33999 175 malloc_stats_mutex->unlock();
<> 149:156823d33999 176 #else // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 177 __real__free_r(r, ptr);
<> 149:156823d33999 178 #endif // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 179 #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 180 mbed_mem_trace_free(ptr, MBED_CALLER_ADDR());
Anna Bridge 180:96ed750bd169 181 mbed_mem_trace_unlock();
<> 149:156823d33999 182 #endif // #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 183 }
<> 149:156823d33999 184
<> 149:156823d33999 185 extern "C" void * __wrap__calloc_r(struct _reent * r, size_t nmemb, size_t size) {
<> 149:156823d33999 186 void *ptr = NULL;
Anna Bridge 180:96ed750bd169 187 #ifdef MBED_MEM_TRACING_ENABLED
Anna Bridge 180:96ed750bd169 188 mbed_mem_trace_lock();
Anna Bridge 180:96ed750bd169 189 #endif
<> 149:156823d33999 190 #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 191 // Note - no lock needed since malloc is thread safe
<> 149:156823d33999 192
<> 149:156823d33999 193 ptr = malloc(nmemb * size);
<> 149:156823d33999 194 if (ptr != NULL) {
<> 149:156823d33999 195 memset(ptr, 0, nmemb * size);
<> 149:156823d33999 196 }
<> 149:156823d33999 197 #else // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 198 ptr = __real__calloc_r(r, nmemb, size);
<> 149:156823d33999 199 #endif // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 200 #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 201 mbed_mem_trace_calloc(ptr, nmemb, size, MBED_CALLER_ADDR());
Anna Bridge 180:96ed750bd169 202 mbed_mem_trace_unlock();
<> 149:156823d33999 203 #endif // #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 204 return ptr;
<> 149:156823d33999 205 }
<> 149:156823d33999 206
AnnaBridge 167:e84263d55307 207 extern "C" void * __wrap__memalign_r(struct _reent * r, size_t alignment, size_t bytes) {
AnnaBridge 167:e84263d55307 208 return __real__memalign_r(r, alignment, bytes);
AnnaBridge 167:e84263d55307 209 }
AnnaBridge 167:e84263d55307 210
AnnaBridge 167:e84263d55307 211 #endif // if !defined(FEATURE_UVISOR)
AnnaBridge 167:e84263d55307 212
<> 149:156823d33999 213
<> 149:156823d33999 214 /******************************************************************************/
AnnaBridge 174:b96e65c34a4d 215 /* ARMCC / IAR memory allocation wrappers */
<> 149:156823d33999 216 /******************************************************************************/
<> 149:156823d33999 217
AnnaBridge 174:b96e65c34a4d 218 #elif defined(TOOLCHAIN_ARM) || defined(__ICCARM__)
AnnaBridge 174:b96e65c34a4d 219
AnnaBridge 174:b96e65c34a4d 220 #if defined(TOOLCHAIN_ARM)
AnnaBridge 174:b96e65c34a4d 221 #define SUPER_MALLOC $Super$$malloc
AnnaBridge 174:b96e65c34a4d 222 #define SUB_MALLOC $Sub$$malloc
AnnaBridge 174:b96e65c34a4d 223 #define SUPER_REALLOC $Super$$realloc
AnnaBridge 174:b96e65c34a4d 224 #define SUB_REALLOC $Sub$$realloc
AnnaBridge 174:b96e65c34a4d 225 #define SUPER_CALLOC $Super$$calloc
AnnaBridge 174:b96e65c34a4d 226 #define SUB_CALLOC $Sub$$calloc
AnnaBridge 174:b96e65c34a4d 227 #define SUPER_FREE $Super$$free
AnnaBridge 174:b96e65c34a4d 228 #define SUB_FREE $Sub$$free
AnnaBridge 174:b96e65c34a4d 229 #elif defined(__ICCARM__)
AnnaBridge 174:b96e65c34a4d 230 #define SUPER_MALLOC $Super$$__iar_dlmalloc
AnnaBridge 174:b96e65c34a4d 231 #define SUB_MALLOC $Sub$$__iar_dlmalloc
AnnaBridge 174:b96e65c34a4d 232 #define SUPER_REALLOC $Super$$__iar_dlrealloc
AnnaBridge 174:b96e65c34a4d 233 #define SUB_REALLOC $Sub$$__iar_dlrealloc
AnnaBridge 174:b96e65c34a4d 234 #define SUPER_CALLOC $Super$$__iar_dlcalloc
AnnaBridge 174:b96e65c34a4d 235 #define SUB_CALLOC $Sub$$__iar_dlcalloc
AnnaBridge 174:b96e65c34a4d 236 #define SUPER_FREE $Super$$__iar_dlfree
AnnaBridge 174:b96e65c34a4d 237 #define SUB_FREE $Sub$$__iar_dlfree
AnnaBridge 174:b96e65c34a4d 238 #endif
<> 149:156823d33999 239
<> 149:156823d33999 240 /* Enable hooking of memory function only if tracing is also enabled */
<> 149:156823d33999 241 #if defined(MBED_MEM_TRACING_ENABLED) || defined(MBED_HEAP_STATS_ENABLED)
<> 149:156823d33999 242
<> 149:156823d33999 243 extern "C" {
AnnaBridge 174:b96e65c34a4d 244 void *SUPER_MALLOC(size_t size);
AnnaBridge 174:b96e65c34a4d 245 void *SUPER_REALLOC(void *ptr, size_t size);
AnnaBridge 174:b96e65c34a4d 246 void *SUPER_CALLOC(size_t nmemb, size_t size);
AnnaBridge 174:b96e65c34a4d 247 void SUPER_FREE(void *ptr);
<> 149:156823d33999 248 }
<> 149:156823d33999 249
AnnaBridge 174:b96e65c34a4d 250 extern "C" void* SUB_MALLOC(size_t size) {
<> 149:156823d33999 251 void *ptr = NULL;
Anna Bridge 180:96ed750bd169 252 #ifdef MBED_MEM_TRACING_ENABLED
Anna Bridge 180:96ed750bd169 253 mbed_mem_trace_lock();
Anna Bridge 180:96ed750bd169 254 #endif
<> 149:156823d33999 255 #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 256 malloc_stats_mutex->lock();
AnnaBridge 174:b96e65c34a4d 257 alloc_info_t *alloc_info = (alloc_info_t*)SUPER_MALLOC(size + sizeof(alloc_info_t));
<> 149:156823d33999 258 if (alloc_info != NULL) {
<> 149:156823d33999 259 alloc_info->size = size;
<> 149:156823d33999 260 ptr = (void*)(alloc_info + 1);
<> 149:156823d33999 261 heap_stats.current_size += size;
<> 149:156823d33999 262 heap_stats.total_size += size;
<> 149:156823d33999 263 heap_stats.alloc_cnt += 1;
<> 149:156823d33999 264 if (heap_stats.current_size > heap_stats.max_size) {
<> 149:156823d33999 265 heap_stats.max_size = heap_stats.current_size;
<> 149:156823d33999 266 }
<> 149:156823d33999 267 } else {
<> 149:156823d33999 268 heap_stats.alloc_fail_cnt += 1;
<> 149:156823d33999 269 }
<> 149:156823d33999 270 malloc_stats_mutex->unlock();
<> 149:156823d33999 271 #else // #ifdef MBED_HEAP_STATS_ENABLED
AnnaBridge 174:b96e65c34a4d 272 ptr = SUPER_MALLOC(size);
<> 149:156823d33999 273 #endif // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 274 #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 275 mbed_mem_trace_malloc(ptr, size, MBED_CALLER_ADDR());
Anna Bridge 180:96ed750bd169 276 mbed_mem_trace_unlock();
<> 149:156823d33999 277 #endif // #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 278 return ptr;
<> 149:156823d33999 279 }
<> 149:156823d33999 280
AnnaBridge 174:b96e65c34a4d 281 extern "C" void* SUB_REALLOC(void *ptr, size_t size) {
<> 149:156823d33999 282 void *new_ptr = NULL;
Anna Bridge 180:96ed750bd169 283 #ifdef MBED_MEM_TRACING_ENABLED
Anna Bridge 180:96ed750bd169 284 mbed_mem_trace_lock();
Anna Bridge 180:96ed750bd169 285 #endif
<> 149:156823d33999 286 #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 287 // Note - no lock needed since malloc and free are thread safe
<> 149:156823d33999 288
<> 149:156823d33999 289 // Get old size
<> 149:156823d33999 290 uint32_t old_size = 0;
<> 149:156823d33999 291 if (ptr != NULL) {
<> 149:156823d33999 292 alloc_info_t *alloc_info = ((alloc_info_t*)ptr) - 1;
<> 149:156823d33999 293 old_size = alloc_info->size;
<> 149:156823d33999 294 }
<> 149:156823d33999 295
<> 149:156823d33999 296 // Allocate space
<> 149:156823d33999 297 if (size != 0) {
<> 149:156823d33999 298 new_ptr = malloc(size);
<> 149:156823d33999 299 }
<> 149:156823d33999 300
<> 149:156823d33999 301 // If the new buffer has been allocated copy the data to it
<> 149:156823d33999 302 // and free the old buffer
<> 149:156823d33999 303 if (new_ptr != NULL) {
<> 149:156823d33999 304 uint32_t copy_size = (old_size < size) ? old_size : size;
<> 149:156823d33999 305 memcpy(new_ptr, (void*)ptr, copy_size);
<> 149:156823d33999 306 free(ptr);
<> 149:156823d33999 307 }
<> 149:156823d33999 308 #else // #ifdef MBED_HEAP_STATS_ENABLED
AnnaBridge 174:b96e65c34a4d 309 new_ptr = SUPER_REALLOC(ptr, size);
<> 149:156823d33999 310 #endif // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 311 #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 312 mbed_mem_trace_realloc(new_ptr, ptr, size, MBED_CALLER_ADDR());
Anna Bridge 180:96ed750bd169 313 mbed_mem_trace_unlock();
<> 149:156823d33999 314 #endif // #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 315 return new_ptr;
<> 149:156823d33999 316 }
<> 149:156823d33999 317
AnnaBridge 174:b96e65c34a4d 318 extern "C" void *SUB_CALLOC(size_t nmemb, size_t size) {
<> 149:156823d33999 319 void *ptr = NULL;
Anna Bridge 180:96ed750bd169 320 #ifdef MBED_MEM_TRACING_ENABLED
Anna Bridge 180:96ed750bd169 321 mbed_mem_trace_lock();
Anna Bridge 180:96ed750bd169 322 #endif
<> 149:156823d33999 323 #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 324 // Note - no lock needed since malloc is thread safe
<> 149:156823d33999 325 ptr = malloc(nmemb * size);
<> 149:156823d33999 326 if (ptr != NULL) {
<> 149:156823d33999 327 memset(ptr, 0, nmemb * size);
<> 149:156823d33999 328 }
<> 149:156823d33999 329 #else // #ifdef MBED_HEAP_STATS_ENABLED
AnnaBridge 174:b96e65c34a4d 330 ptr = SUPER_CALLOC(nmemb, size);
<> 149:156823d33999 331 #endif // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 332 #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 333 mbed_mem_trace_calloc(ptr, nmemb, size, MBED_CALLER_ADDR());
Anna Bridge 180:96ed750bd169 334 mbed_mem_trace_unlock();
<> 149:156823d33999 335 #endif // #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 336 return ptr;
<> 149:156823d33999 337 }
<> 149:156823d33999 338
AnnaBridge 174:b96e65c34a4d 339 extern "C" void SUB_FREE(void *ptr) {
Anna Bridge 180:96ed750bd169 340 #ifdef MBED_MEM_TRACING_ENABLED
Anna Bridge 180:96ed750bd169 341 mbed_mem_trace_lock();
Anna Bridge 180:96ed750bd169 342 #endif
<> 149:156823d33999 343 #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 344 malloc_stats_mutex->lock();
<> 149:156823d33999 345 alloc_info_t *alloc_info = NULL;
<> 149:156823d33999 346 if (ptr != NULL) {
<> 149:156823d33999 347 alloc_info = ((alloc_info_t*)ptr) - 1;
<> 149:156823d33999 348 heap_stats.current_size -= alloc_info->size;
<> 149:156823d33999 349 heap_stats.alloc_cnt -= 1;
<> 149:156823d33999 350 }
AnnaBridge 174:b96e65c34a4d 351 SUPER_FREE((void*)alloc_info);
<> 149:156823d33999 352 malloc_stats_mutex->unlock();
<> 149:156823d33999 353 #else // #ifdef MBED_HEAP_STATS_ENABLED
AnnaBridge 174:b96e65c34a4d 354 SUPER_FREE(ptr);
<> 149:156823d33999 355 #endif // #ifdef MBED_HEAP_STATS_ENABLED
<> 149:156823d33999 356 #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 357 mbed_mem_trace_free(ptr, MBED_CALLER_ADDR());
Anna Bridge 180:96ed750bd169 358 mbed_mem_trace_unlock();
<> 149:156823d33999 359 #endif // #ifdef MBED_MEM_TRACING_ENABLED
<> 149:156823d33999 360 }
<> 149:156823d33999 361
<> 149:156823d33999 362 #endif // #if defined(MBED_MEM_TRACING_ENABLED) || defined(MBED_HEAP_STATS_ENABLED)
<> 149:156823d33999 363
<> 149:156823d33999 364 /******************************************************************************/
<> 149:156823d33999 365 /* Allocation wrappers for other toolchains are not supported yet */
<> 149:156823d33999 366 /******************************************************************************/
<> 149:156823d33999 367
AnnaBridge 174:b96e65c34a4d 368 #else
<> 149:156823d33999 369
<> 149:156823d33999 370 #ifdef MBED_MEM_TRACING_ENABLED
AnnaBridge 174:b96e65c34a4d 371 #error Memory tracing is not supported with the current toolchain.
<> 149:156823d33999 372 #endif
<> 149:156823d33999 373
<> 149:156823d33999 374 #ifdef MBED_HEAP_STATS_ENABLED
AnnaBridge 174:b96e65c34a4d 375 #error Heap statistics are not supported with the current toolchain.
<> 149:156823d33999 376 #endif
<> 149:156823d33999 377
<> 149:156823d33999 378 #endif // #if defined(TOOLCHAIN_GCC)