mem.h

   1 /******************************************************************************/
   2 /*          pfixtools: a collection of postfix related tools                  */
   3 /*          ~~~~~~~~~                                                         */
   4 /*  ________________________________________________________________________  */
   5 /*                                                                            */
   6 /*  Redistribution and use in source and binary forms, with or without        */
   7 /*  modification, are permitted provided that the following conditions        */
   8 /*  are met:                                                                  */
   9 /*                                                                            */
  10 /*  1. Redistributions of source code must retain the above copyright         */
  11 /*     notice, this list of conditions and the following disclaimer.          */
  12 /*  2. Redistributions in binary form must reproduce the above copyright      */
  13 /*     notice, this list of conditions and the following disclaimer in the    */
  14 /*     documentation and/or other materials provided with the distribution.   */
  15 /*  3. The names of its contributors may not be used to endorse or promote    */
  16 /*     products derived from this software without specific prior written     */
  17 /*     permission.                                                            */
  18 /*                                                                            */
  19 /*  THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND   */
  20 /*  ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE     */
  21 /*  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR        */
  22 /*  PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS    */
  23 /*  BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR    */
  24 /*  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF      */
  25 /*  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS  */
  26 /*  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN   */
  27 /*  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)   */
  28 /*  ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF    */
  29 /*  THE POSSIBILITY OF SUCH DAMAGE.                                           */
  30 /******************************************************************************/
  31
  32 /*
  33  * Copyright © 2006 Pierre Habouzit
  34  */
  35
  36 #ifndef PFIXTOOLS_MEM_H
  37 #define PFIXTOOLS_MEM_H
  38
  39 #include <assert.h>
  40 #include <ctype.h>
  41 #include <stdlib.h>
  42 #include <string.h>
  43
  44 #define MIN(a, b)               ((a) < (b) ? (a) : (b))
  45 #define MAX(a, b)               ((a) > (b) ? (a) : (b))
  46
  47 #define ssizeof(foo)            (ssize_t)sizeof(foo)
  48 #define countof(foo)            (ssizeof(foo) / ssizeof(foo[0]))
  49
  50 #define p_new(type, count)      ((type *)xmalloc(sizeof(type) * (count)))
  51 #define p_clear(p, count)       ((void)memset((p), 0, sizeof(*(p)) * (count)))
  52 #define p_dup(p, count)         xmemdup((p), sizeof(*(p)) * (count))
  53 #define p_dupstr(p, len)        xmemdupstr((p), (len))
  54 #define p_realloc(pp, count)    xrealloc((void*)(pp), sizeof(**(pp)) * (count))
  55
  56 #  define p_alloc_nr(x) (((x) + 16) * 3 / 2)
  57 #  define p_allocgrow(pp, goalnb, allocnb)                  \
  58     do {                                                    \
  59         if ((goalnb) > *(allocnb)) {                        \
  60             if (p_alloc_nr(goalnb) > *(allocnb)) {          \
  61                 *(allocnb) = (goalnb);                      \
  62             } else {                                        \
  63                 *(allocnb) = p_alloc_nr(goalnb);            \
  64             }                                               \
  65             p_realloc(pp, *(allocnb));                      \
  66         }                                                   \
  67     } while (0)
  68
  69 #ifdef __GNUC__
  70
  71 #  define p_delete(mem_pp)                          \
  72         do {                                        \
  73             typeof(**(mem_pp)) **__ptr = (mem_pp);  \
  74             free(*__ptr);                           \
  75             *__ptr = NULL;                          \
  76         } while(0)
  77
  78 #else
  79
  80 #  define p_delete(mem_p)                           \
  81         do {                                        \
  82             void *__ptr = (mem_p);                  \
  83             free(*__ptr);                           \
  84             *(void **)__ptr = NULL;                 \
  85         } while (0)
  86
  87 #endif
  88
  89 static inline void *xmalloc(ssize_t size) {
  90     void *mem;
  91
  92     if (size <= 0)
  93         return NULL;
  94
  95     mem = calloc(size, 1);
  96     if (!mem)
  97         abort();
  98     return mem;
  99 }
 100
 101 static inline void xmemfree(void **ptr) {
 102     p_delete(ptr);
 103 }
 104
 105 static inline void xrealloc(void **ptr, ssize_t newsize) {
 106     if (newsize <= 0) {
 107         p_delete(ptr);
 108     } else {
 109         *ptr = realloc(*ptr, newsize);
 110         if (!*ptr)
 111             abort();
 112     }
 113 }
 114
 115 static inline void *xmemdup(const void *src, ssize_t size) {
 116     return memcpy(xmalloc(size), src, size);
 117 }
 118
 119 static inline void *xmemdupstr(const void *src, ssize_t len) {
 120     char *res = memcpy(xmalloc(len + 1), src, len);
 121     res[len] = '\0';
 122     return res;
 123 }
 124
 125
 126 #define DO_INIT(type, prefix) \
 127     static inline type * prefix##_init(type *var) {         \
 128         p_clear(var, 1);                                    \
 129         return var;                                         \
 130     }
 131 #define DO_WIPE(type, prefix) \
 132     static inline void prefix##_wipe(type *var __attribute__((unused))) { }
 133
 134 #define DO_NEW(type, prefix) \
 135     static inline type * prefix##_new(void) {               \
 136         return prefix##_init(p_new(type, 1));               \
 137     }
 138 #define DO_DELETE(type, prefix) \
 139     static inline void __attribute__((nonnull))             \
 140     prefix##_delete(type **var) {                           \
 141         if (*var) {                                         \
 142             prefix##_wipe(*var);                            \
 143             p_delete(var);                                  \
 144         }                                                   \
 145     }
 146
 147 #endif /* PFIXTOOLS_MEM_H */