Imported from ../bash-2.05a.tar.gz.
[platform/upstream/bash.git] / lib / malloc / xmalloc.c
1 /* xmalloc.c -- safe versions of malloc and realloc */
2
3 /* Copyright (C) 1991 Free Software Foundation, Inc.
4
5    This file is part of GNU Readline, a library for reading lines
6    of text with interactive input and history editing.
7
8    Readline is free software; you can redistribute it and/or modify it
9    under the terms of the GNU General Public License as published by the
10    Free Software Foundation; either version 2, or (at your option) any
11    later version.
12
13    Readline is distributed in the hope that it will be useful, but
14    WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16    General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with Readline; see the file COPYING.  If not, write to the Free
20    Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA. */
21
22 #if defined (HAVE_CONFIG_H)
23 #include <config.h>
24 #endif
25
26 #include <stdio.h>
27
28 #if defined (HAVE_STDLIB_H)
29 #  include <stdlib.h>
30 #else
31 #  include "ansi_stdlib.h"
32 #endif /* HAVE_STDLIB_H */
33
34 /* Generic pointer type. */
35 #ifndef PTR_T
36
37 #if defined (__STDC__)
38 #  define PTR_T void *
39 #else
40 #  define PTR_T char *
41 #endif
42
43 #endif /* PTR_T */
44
45 /* **************************************************************** */
46 /*                                                                  */
47 /*                 Memory Allocation and Deallocation.              */
48 /*                                                                  */
49 /* **************************************************************** */
50
51 static void
52 memory_error_and_abort (fname)
53      char *fname;
54 {
55   fprintf (stderr, "%s: out of virtual memory\n", fname);
56   exit (2);
57 }
58
59 /* Return a pointer to free()able block of memory large enough
60    to hold BYTES number of bytes.  If the memory cannot be allocated,
61    print an error message and abort. */
62 PTR_T
63 xmalloc (bytes)
64      size_t bytes;
65 {
66   PTR_T temp;
67
68   temp = malloc (bytes);
69   if (temp == 0)
70     memory_error_and_abort ("xmalloc");
71   return (temp);
72 }
73
74 PTR_T
75 xrealloc (pointer, bytes)
76      PTR_T pointer;
77      size_t bytes;
78 {
79   PTR_T temp;
80
81   temp = pointer ? realloc (pointer, bytes) : malloc (bytes);
82
83   if (temp == 0)
84     memory_error_and_abort ("xrealloc");
85   return (temp);
86 }
87
88 void
89 xfree (string)
90      PTR_T string;
91 {
92   if (string)
93     free (string);
94 }