zmalloc.c

   1 /* zmalloc - total amount of allocated memory aware version of malloc()
   2  *
   3  * Copyright (c) 2006-2009, Salvatore Sanfilippo <antirez at gmail dot com>
   4  * All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions are met:
   8  *
   9  *   * Redistributions of source code must retain the above copyright notice,
  10  *     this list of conditions and the following disclaimer.
  11  *   * Redistributions in binary form must reproduce the above copyright
  12  *     notice, this list of conditions and the following disclaimer in the
  13  *     documentation and/or other materials provided with the distribution.
  14  *   * Neither the name of Redis nor the names of its contributors may be used
  15  *     to endorse or promote products derived from this software without
  16  *     specific prior written permission.
  17  *
  18  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  19  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  21  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  22  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  23  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  24  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  25  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  26  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  27  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  28  * POSSIBILITY OF SUCH DAMAGE.
  29  */
  30
  31 #include <stdio.h>
  32 #include <stdlib.h>
  33 #include <string.h>
  34 #include "config.h"
  35
  36 static size_t used_memory = 0;
  37
  38 static void zmalloc_oom(size_t size) {
  39     fprintf(stderr, "zmalloc: Out of memory trying to allocate %lu bytes\n",
  40         size);
  41     fflush(stderr);
  42     abort();
  43 }
  44
  45 void *zmalloc(size_t size) {
  46     void *ptr = malloc(size+sizeof(size_t));
  47
  48     if (!ptr) zmalloc_oom(size);
  49 #ifdef HAVE_MALLOC_SIZE
  50     used_memory += redis_malloc_size(ptr);
  51     return ptr;
  52 #else
  53     *((size_t*)ptr) = size;
  54     used_memory += size+sizeof(size_t);
  55     return (char*)ptr+sizeof(size_t);
  56 #endif
  57 }
  58
  59 void *zrealloc(void *ptr, size_t size) {
  60 #ifndef HAVE_MALLOC_SIZE
  61     void *realptr;
  62 #endif
  63     size_t oldsize;
  64     void *newptr;
  65
  66     if (ptr == NULL) return zmalloc(size);
  67 #ifdef HAVE_MALLOC_SIZE
  68     oldsize = redis_malloc_size(ptr);
  69     newptr = realloc(ptr,size);
  70     if (!newptr) zmalloc_oom(size);
  71
  72     used_memory -= oldsize;
  73     used_memory += redis_malloc_size(newptr);
  74     return newptr;
  75 #else
  76     realptr = (char*)ptr-sizeof(size_t);
  77     oldsize = *((size_t*)realptr);
  78     newptr = realloc(realptr,size+sizeof(size_t));
  79     if (!newptr) zmalloc_oom(size);
  80
  81     *((size_t*)newptr) = size;
  82     used_memory -= oldsize;
  83     used_memory += size;
  84     return (char*)newptr+sizeof(size_t);
  85 #endif
  86 }
  87
  88 void zfree(void *ptr) {
  89 #ifndef HAVE_MALLOC_SIZE
  90     void *realptr;
  91     size_t oldsize;
  92 #endif
  93
  94     if (ptr == NULL) return;
  95 #ifdef HAVE_MALLOC_SIZE
  96     used_memory -= redis_malloc_size(ptr);
  97     free(ptr);
  98 #else
  99     realptr = (char*)ptr-sizeof(size_t);
 100     oldsize = *((size_t*)realptr);
 101     used_memory -= oldsize+sizeof(size_t);
 102     free(realptr);
 103 #endif
 104 }
 105
 106 char *zstrdup(const char *s) {
 107     size_t l = strlen(s)+1;
 108     char *p = zmalloc(l);
 109
 110     memcpy(p,s,l);
 111     return p;
 112 }
 113
 114 size_t zmalloc_used_memory(void) {
 115     return used_memory;
 116 }