Annotation of embedaddon/sudo/common/alloc.c, revision 1.1.1.6

1.1       misho       1: /*
1.1.1.4   misho       2:  * Copyright (c) 1999-2005, 2007, 2010-2013
1.1       misho       3:  *     Todd C. Miller <Todd.Miller@courtesan.com>
                      4:  *
                      5:  * Permission to use, copy, modify, and distribute this software for any
                      6:  * purpose with or without fee is hereby granted, provided that the above
                      7:  * copyright notice and this permission notice appear in all copies.
                      8:  *
                      9:  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
                     10:  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
                     11:  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
                     12:  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
                     13:  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
                     14:  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
                     15:  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
                     16:  *
                     17:  * Sponsored in part by the Defense Advanced Research Projects
                     18:  * Agency (DARPA) and Air Force Research Laboratory, Air Force
                     19:  * Materiel Command, USAF, under agreement number F39502-99-1-0512.
                     20:  */
                     21: 
                     22: #include <config.h>
                     23: 
                     24: #include <sys/types.h>
                     25: #include <stdio.h>
                     26: #ifdef STDC_HEADERS
                     27: # include <stdlib.h>
                     28: # include <stddef.h>
                     29: #else
                     30: # ifdef HAVE_STDLIB_H
                     31: #  include <stdlib.h>
                     32: # endif
                     33: #endif /* STDC_HEADERS */
                     34: #ifdef HAVE_STRING_H
                     35: # if defined(HAVE_MEMORY_H) && !defined(STDC_HEADERS)
                     36: #  include <memory.h>
                     37: # endif
                     38: # include <string.h>
                     39: #endif /* HAVE_STRING_H */
                     40: #ifdef HAVE_STRINGS_H
                     41: # include <strings.h>
                     42: #endif /* HAVE_STRING_H */
                     43: #if defined(HAVE_MALLOC_H) && !defined(STDC_HEADERS)
                     44: # include <malloc.h>
                     45: #endif /* HAVE_MALLOC_H && !STDC_HEADERS */
                     46: #ifdef HAVE_INTTYPES_H
                     47: # include <inttypes.h>
                     48: #endif
1.1.1.6 ! misho      49: #include <limits.h>
        !            50: 
        !            51: #define DEFAULT_TEXT_DOMAIN    "sudo"
        !            52: #include "gettext.h"           /* must be included before missing.h */
1.1       misho      53: 
                     54: #include "missing.h"
                     55: #include "alloc.h"
1.1.1.5   misho      56: #include "fatal.h"
1.1       misho      57: 
                     58: /*
                     59:  * If there is no SIZE_MAX or SIZE_T_MAX we have to assume that size_t
                     60:  * could be signed (as it is on SunOS 4.x).  This just means that
                     61:  * emalloc2() and erealloc3() cannot allocate huge amounts on such a
                     62:  * platform but that is OK since sudo doesn't need to do so anyway.
                     63:  */
                     64: #ifndef SIZE_MAX
                     65: # ifdef SIZE_T_MAX
                     66: #  define SIZE_MAX     SIZE_T_MAX
                     67: # else
                     68: #  define SIZE_MAX     INT_MAX
                     69: # endif /* SIZE_T_MAX */
                     70: #endif /* SIZE_MAX */
                     71: 
                     72: /*
                     73:  * emalloc() calls the system malloc(3) and exits with an error if
                     74:  * malloc(3) fails.
                     75:  */
                     76: void *
                     77: emalloc(size_t size)
                     78: {
                     79:     void *ptr;
                     80: 
                     81:     if (size == 0)
1.1.1.4   misho      82:        fatalx_nodebug(_("internal error, tried to emalloc(0)"));
1.1       misho      83: 
                     84:     if ((ptr = malloc(size)) == NULL)
1.1.1.5   misho      85:        fatal_nodebug(NULL);
1.1       misho      86:     return ptr;
                     87: }
                     88: 
                     89: /*
                     90:  * emalloc2() allocates nmemb * size bytes and exits with an error
                     91:  * if overflow would occur or if the system malloc(3) fails.
                     92:  */
                     93: void *
                     94: emalloc2(size_t nmemb, size_t size)
                     95: {
                     96:     void *ptr;
                     97: 
                     98:     if (nmemb == 0 || size == 0)
1.1.1.4   misho      99:        fatalx_nodebug(_("internal error, tried to emalloc2(0)"));
1.1       misho     100:     if (nmemb > SIZE_MAX / size)
1.1.1.4   misho     101:        fatalx_nodebug(_("internal error, %s overflow"), "emalloc2()");
1.1       misho     102: 
                    103:     size *= nmemb;
                    104:     if ((ptr = malloc(size)) == NULL)
1.1.1.5   misho     105:        fatal_nodebug(NULL);
1.1.1.2   misho     106:     return ptr;
                    107: }
                    108: 
                    109: /*
                    110:  * ecalloc() allocates nmemb * size bytes and exits with an error
                    111:  * if overflow would occur or if the system malloc(3) fails.
                    112:  * On success, the allocated space is zero-filled.
                    113:  */
                    114: void *
                    115: ecalloc(size_t nmemb, size_t size)
                    116: {
                    117:     void *ptr;
                    118: 
                    119:     if (nmemb == 0 || size == 0)
1.1.1.4   misho     120:        fatalx_nodebug(_("internal error, tried to ecalloc(0)"));
1.1.1.2   misho     121:     if (nmemb != 1) {
                    122:        if (nmemb > SIZE_MAX / size)
1.1.1.4   misho     123:            fatalx_nodebug(_("internal error, %s overflow"), "ecalloc()");
1.1.1.2   misho     124:        size *= nmemb;
                    125:     }
                    126:     if ((ptr = malloc(size)) == NULL)
1.1.1.5   misho     127:        fatal_nodebug(NULL);
1.1.1.2   misho     128:     memset(ptr, 0, size);
1.1       misho     129:     return ptr;
                    130: }
                    131: 
                    132: /*
                    133:  * erealloc() calls the system realloc(3) and exits with an error if
                    134:  * realloc(3) fails.  You can call erealloc() with a NULL pointer even
                    135:  * if the system realloc(3) does not support this.
                    136:  */
                    137: void *
                    138: erealloc(void *ptr, size_t size)
                    139: {
                    140: 
                    141:     if (size == 0)
1.1.1.4   misho     142:        fatalx_nodebug(_("internal error, tried to erealloc(0)"));
1.1       misho     143: 
                    144:     ptr = ptr ? realloc(ptr, size) : malloc(size);
                    145:     if (ptr == NULL)
1.1.1.5   misho     146:        fatal_nodebug(NULL);
1.1       misho     147:     return ptr;
                    148: }
                    149: 
                    150: /*
                    151:  * erealloc3() realloc(3)s nmemb * size bytes and exits with an error
                    152:  * if overflow would occur or if the system malloc(3)/realloc(3) fails.
                    153:  * You can call erealloc() with a NULL pointer even if the system realloc(3)
                    154:  * does not support this.
                    155:  */
                    156: void *
                    157: erealloc3(void *ptr, size_t nmemb, size_t size)
                    158: {
                    159: 
                    160:     if (nmemb == 0 || size == 0)
1.1.1.4   misho     161:        fatalx_nodebug(_("internal error, tried to erealloc3(0)"));
1.1       misho     162:     if (nmemb > SIZE_MAX / size)
1.1.1.4   misho     163:        fatalx_nodebug(_("internal error, %s overflow"), "erealloc3()");
1.1       misho     164: 
                    165:     size *= nmemb;
                    166:     ptr = ptr ? realloc(ptr, size) : malloc(size);
                    167:     if (ptr == NULL)
1.1.1.5   misho     168:        fatal_nodebug(NULL);
1.1.1.2   misho     169:     return ptr;
                    170: }
                    171: 
                    172: /*
                    173:  * erecalloc() realloc(3)s nmemb * msize bytes and exits with an error
                    174:  * if overflow would occur or if the system malloc(3)/realloc(3) fails.
1.1.1.6 ! misho     175:  * On success, the new space is zero-filled.  You can call erealloc()
1.1.1.2   misho     176:  * with a NULL pointer even if the system realloc(3) does not support this.
                    177:  */
                    178: void *
                    179: erecalloc(void *ptr, size_t onmemb, size_t nmemb, size_t msize)
                    180: {
                    181:     size_t size;
                    182: 
                    183:     if (nmemb == 0 || msize == 0)
1.1.1.4   misho     184:        fatalx_nodebug(_("internal error, tried to erecalloc(0)"));
1.1.1.2   misho     185:     if (nmemb > SIZE_MAX / msize)
1.1.1.4   misho     186:        fatalx_nodebug(_("internal error, %s overflow"), "erecalloc()");
1.1.1.2   misho     187: 
                    188:     size = nmemb * msize;
                    189:     ptr = ptr ? realloc(ptr, size) : malloc(size);
                    190:     if (ptr == NULL)
1.1.1.5   misho     191:        fatal_nodebug(NULL);
1.1.1.2   misho     192:     if (nmemb > onmemb) {
                    193:        size = (nmemb - onmemb) * msize;
                    194:        memset((char *)ptr + (onmemb * msize), 0, size);
                    195:     }
1.1       misho     196:     return ptr;
                    197: }
                    198: 
                    199: /*
                    200:  * estrdup() is like strdup(3) except that it exits with an error if
                    201:  * malloc(3) fails.  NOTE: unlike strdup(3), estrdup(NULL) is legal.
                    202:  */
                    203: char *
                    204: estrdup(const char *src)
                    205: {
                    206:     char *dst = NULL;
                    207:     size_t len;
                    208: 
                    209:     if (src != NULL) {
                    210:        len = strlen(src);
                    211:        dst = (char *) emalloc(len + 1);
                    212:        (void) memcpy(dst, src, len);
                    213:        dst[len] = '\0';
                    214:     }
                    215:     return dst;
                    216: }
                    217: 
                    218: /*
                    219:  * estrdup() is like strndup(3) except that it exits with an error if
                    220:  * malloc(3) fails.  NOTE: unlike strdup(3), estrdup(NULL) is legal.
                    221:  */
                    222: char *
                    223: estrndup(const char *src, size_t maxlen)
                    224: {
                    225:     char *dst = NULL;
1.1.1.2   misho     226:     size_t len = 0;
1.1       misho     227: 
                    228:     if (src != NULL) {
1.1.1.2   misho     229:        while (maxlen != 0 && src[len] != '\0') {
                    230:            len++;
                    231:            maxlen--;
                    232:        }
1.1       misho     233:        dst = (char *) emalloc(len + 1);
                    234:        (void) memcpy(dst, src, len);
                    235:        dst[len] = '\0';
                    236:     }
                    237:     return dst;
                    238: }
                    239: 
                    240: /*
                    241:  * easprintf() calls vasprintf() and exits with an error if vasprintf()
                    242:  * returns -1 (out of memory).
                    243:  */
                    244: int
                    245: easprintf(char **ret, const char *fmt, ...)
                    246: {
                    247:     int len;
                    248:     va_list ap;
1.1.1.4   misho     249: 
1.1       misho     250:     va_start(ap, fmt);
                    251:     len = vasprintf(ret, fmt, ap);
                    252:     va_end(ap);
                    253: 
                    254:     if (len == -1)
1.1.1.5   misho     255:        fatal_nodebug(NULL);
1.1       misho     256:     return len;
                    257: }
                    258: 
                    259: /*
                    260:  * evasprintf() calls vasprintf() and exits with an error if vasprintf()
                    261:  * returns -1 (out of memory).
                    262:  */
                    263: int
                    264: evasprintf(char **ret, const char *format, va_list args)
                    265: {
                    266:     int len;
                    267: 
                    268:     if ((len = vasprintf(ret, format, args)) == -1)
1.1.1.5   misho     269:        fatal_nodebug(NULL);
1.1       misho     270:     return len;
                    271: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>