]>
Commit | Line | Data |
---|---|---|
1 | /* xmalloc.c -- malloc with out of memory checking | |
2 | Copyright (C) 1990-1999, 2000, 2002 Free Software Foundation, Inc. | |
3 | ||
4 | This program is free software; you can redistribute it and/or modify | |
5 | it under the terms of the GNU General Public License as published by | |
6 | the Free Software Foundation; either version 2, or (at your option) | |
7 | any later version. | |
8 | ||
9 | This program is distributed in the hope that it will be useful, | |
10 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
11 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
12 | GNU General Public License for more details. | |
13 | ||
14 | You should have received a copy of the GNU General Public License | |
15 | along with this program; if not, write to the Free Software Foundation, | |
16 | Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ | |
17 | ||
18 | #if HAVE_CONFIG_H | |
19 | # include <config.h> | |
20 | #endif | |
21 | ||
22 | #include <sys/types.h> | |
23 | ||
24 | #if STDC_HEADERS | |
25 | # include <stdlib.h> | |
26 | #else | |
27 | void *calloc (); | |
28 | void *malloc (); | |
29 | void *realloc (); | |
30 | void free (); | |
31 | #endif | |
32 | ||
33 | #include "gettext.h" | |
34 | #define _(msgid) gettext (msgid) | |
35 | #define N_(msgid) msgid | |
36 | ||
37 | #include "error.h" | |
38 | #include "xalloc.h" | |
39 | ||
40 | #ifndef EXIT_FAILURE | |
41 | # define EXIT_FAILURE 1 | |
42 | #endif | |
43 | ||
44 | /* The following tests require AC_PREREQ(2.54). */ | |
45 | ||
46 | #ifndef HAVE_MALLOC | |
47 | "you must run the autoconf test for a GNU libc compatible malloc" | |
48 | #endif | |
49 | ||
50 | #ifndef HAVE_REALLOC | |
51 | "you must run the autoconf test for a GNU libc compatible realloc" | |
52 | #endif | |
53 | ||
54 | /* Exit value when the requested amount of memory is not available. | |
55 | The caller may set it to some other value. */ | |
56 | int xalloc_exit_failure = EXIT_FAILURE; | |
57 | ||
58 | /* If non NULL, call this function when memory is exhausted. */ | |
59 | void (*xalloc_fail_func) PARAMS ((void)) = 0; | |
60 | ||
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"); | |
64 | ||
65 | void | |
66 | xalloc_die (void) | |
67 | { | |
68 | if (xalloc_fail_func) | |
69 | (*xalloc_fail_func) (); | |
70 | error (xalloc_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 exit. */ | |
74 | exit (EXIT_FAILURE); | |
75 | } | |
76 | ||
77 | /* Allocate N bytes of memory dynamically, with error checking. */ | |
78 | ||
79 | void * | |
80 | xmalloc (size_t n) | |
81 | { | |
82 | void *p; | |
83 | ||
84 | p = malloc (n); | |
85 | if (p == 0) | |
86 | xalloc_die (); | |
87 | return p; | |
88 | } | |
89 | ||
90 | /* Change the size of an allocated block of memory P to N bytes, | |
91 | with error checking. */ | |
92 | ||
93 | void * | |
94 | xrealloc (void *p, size_t n) | |
95 | { | |
96 | p = realloc (p, n); | |
97 | if (p == 0) | |
98 | xalloc_die (); | |
99 | return p; | |
100 | } | |
101 | ||
102 | /* Allocate memory for N elements of S bytes, with error checking. */ | |
103 | ||
104 | void * | |
105 | xcalloc (size_t n, size_t s) | |
106 | { | |
107 | void *p; | |
108 | ||
109 | p = calloc (n, s); | |
110 | if (p == 0) | |
111 | xalloc_die (); | |
112 | return p; | |
113 | } |