1 /* xmalloc.c -- malloc with out of memory checking
3 Copyright (C) 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 2003,
4 1999, 2000, 2002, 2003 Free Software Foundation, Inc.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software Foundation,
18 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
31 #define _(msgid) gettext (msgid)
32 #define N_(msgid) msgid
38 # define SIZE_MAX ((size_t) -1)
42 "you must run the autoconf test for a GNU libc compatible malloc"
46 "you must run the autoconf test for a GNU libc compatible realloc"
49 /* If non NULL, call this function when memory is exhausted. */
50 void (*xalloc_fail_func) (void) = 0;
52 /* Return true if array of N objects, each of size S, cannot exist due
53 to arithmetic overflow. S must be nonzero. */
56 array_size_overflow (size_t n, size_t s)
58 return SIZE_MAX / s < n;
61 /* If XALLOC_FAIL_FUNC is NULL, or does return, display this message
62 before exiting when memory is exhausted. Goes through gettext. */
63 char const xalloc_msg_memory_exhausted[] = N_("memory exhausted");
69 (*xalloc_fail_func) ();
70 error (exit_failure, 0, "%s", _(xalloc_msg_memory_exhausted));
71 /* The `noreturn' cannot be given to error, since it may return if
72 its first argument is 0. To help compilers understand the
73 xalloc_die does terminate, call abort. */
77 /* Allocate an array of N objects, each with S bytes of memory,
78 dynamically, with error checking. S must be nonzero. */
81 xnmalloc (size_t n, size_t s)
84 if (array_size_overflow (n, s) || ! (p = malloc (n * s)))
89 /* Allocate N bytes of memory dynamically, with error checking. */
94 return xnmalloc (n, 1);
97 /* Change the size of an allocated block of memory P to an array of N
98 objects each of S bytes, with error checking. S must be nonzero. */
101 xnrealloc (void *p, size_t n, size_t s)
103 if (array_size_overflow (n, s) || ! (p = realloc (p, n * s)))
108 /* Change the size of an allocated block of memory P to N bytes,
109 with error checking. */
112 xrealloc (void *p, size_t n)
114 return xnrealloc (p, n, 1);
117 /* Allocate S bytes of zeroed memory dynamically, with error checking.
118 There's no need for xnzalloc (N, S), since it would be equivalent
119 to xcalloc (N, S). */
124 return memset (xmalloc (s), 0, s);
127 /* Allocate zeroed memory for N elements of S bytes, with error
128 checking. S must be nonzero. */
131 xcalloc (size_t n, size_t s)
134 /* Test for overflow, since some calloc implementations don't have
135 proper overflow checks. */
136 if (array_size_overflow (n, s) || ! (p = calloc (n, s)))
141 /* Clone an object P of size S, with error checking. There's no need
142 for xnclone (P, N, S), since xclone (P, N * S) works without any
143 need for an arithmetic overflow check. */
146 xclone (void const *p, size_t s)
148 return memcpy (xmalloc (s), p, s);