1 /* $NetBSD: xmalloc.c,v 1.1.1.1 2016/01/10 21:36:19 christos Exp $ */ 2 3 /* xmalloc.c -- malloc with out of memory checking 4 Copyright (C) 1990-1999, 2000 Free Software Foundation, Inc. 5 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) 9 any later version. 10 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. 15 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. */ 19 20 #if HAVE_CONFIG_H 21 # include <config.h> 22 #endif 23 24 #include <sys/types.h> 25 26 #if STDC_HEADERS 27 # include <stdlib.h> 28 #else 29 void *calloc (); 30 void *malloc (); 31 void *realloc (); 32 void free (); 33 #endif 34 35 #if ENABLE_NLS 36 # include <libintl.h> 37 # define _(Text) gettext (Text) 38 #else 39 # define textdomain(Domain) 40 # define _(Text) Text 41 #endif 42 #define N_(Text) Text 43 44 #include "error.h" 45 #include "xalloc.h" 46 47 #ifndef EXIT_FAILURE 48 # define EXIT_FAILURE 1 49 #endif 50 51 #ifndef HAVE_DONE_WORKING_MALLOC_CHECK 52 "you must run the autoconf test for a properly working malloc -- see malloc.m4" 53 #endif 54 55 #ifndef HAVE_DONE_WORKING_REALLOC_CHECK 56 "you must run the autoconf test for a properly working realloc --see realloc.m4" 57 #endif 58 59 /* Exit value when the requested amount of memory is not available. 60 The caller may set it to some other value. */ 61 int xalloc_exit_failure = EXIT_FAILURE; 62 63 /* If non NULL, call this function when memory is exhausted. */ 64 void (*xalloc_fail_func) PARAMS ((void)) = 0; 65 66 /* If XALLOC_FAIL_FUNC is NULL, or does return, display this message 67 before exiting when memory is exhausted. Goes through gettext. */ 68 char const xalloc_msg_memory_exhausted[] = N_("memory exhausted"); 69 70 void 71 xalloc_die (void) 72 { 73 if (xalloc_fail_func) 74 (*xalloc_fail_func) (); 75 error (xalloc_exit_failure, 0, "%s", _(xalloc_msg_memory_exhausted)); 76 /* The `noreturn' cannot be given to error, since it may return if 77 its first argument is 0. To help compilers understand the 78 xalloc_die does terminate, call exit. */ 79 exit (EXIT_FAILURE); 80 } 81 82 /* Allocate N bytes of memory dynamically, with error checking. */ 83 84 void * 85 xmalloc (size_t n) 86 { 87 void *p; 88 89 p = malloc (n); 90 if (p == 0) 91 xalloc_die (); 92 return p; 93 } 94 95 /* Change the size of an allocated block of memory P to N bytes, 96 with error checking. */ 97 98 void * 99 xrealloc (void *p, size_t n) 100 { 101 p = realloc (p, n); 102 if (p == 0) 103 xalloc_die (); 104 return p; 105 } 106 107 /* Allocate memory for N elements of S bytes, with error checking. */ 108 109 void * 110 xcalloc (size_t n, size_t s) 111 { 112 void *p; 113 114 p = calloc (n, s); 115 if (p == 0) 116 xalloc_die (); 117 return p; 118 } 119