readline/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 1, 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, 675 Mass Ave, Cambridge, MA 02139, USA. */
  21
  22 #if defined (ALREADY_HAVE_XMALLOC)
  23 #else
  24 #include <stdio.h>
  25
  26 #if defined (HAVE_STDLIB_H)
  27 #  include <stdlib.h>
  28 #endif /* HAVE_STDLIB_H */
  29
  30 static void memory_error_and_abort ();
  31
  32 /* **************************************************************** */
  33 /*                                                                  */
  34 /*                 Memory Allocation and Deallocation.              */
  35 /*                                                                  */
  36 /* **************************************************************** */
  37
  38 /* Return a pointer to free()able block of memory large enough
  39    to hold BYTES number of bytes.  If the memory cannot be allocated,
  40    print an error message and abort. */
  41 char *
  42 xmalloc (bytes)
  43      int bytes;
  44 {
  45   char *temp = (char *)malloc (bytes);
  46
  47   if (!temp)
  48     memory_error_and_abort ("xmalloc");
  49   return (temp);
  50 }
  51
  52 char *
  53 xrealloc (pointer, bytes)
  54      char *pointer;
  55      int bytes;
  56 {
  57   char *temp;
  58
  59   if (!pointer)
  60     temp = (char *)malloc (bytes);
  61   else
  62     temp = (char *)realloc (pointer, bytes);
  63
  64   if (!temp)
  65     memory_error_and_abort ("xrealloc");
  66   return (temp);
  67 }
  68
  69 static void
  70 memory_error_and_abort (fname)
  71      char *fname;
  72 {
  73   fprintf (stderr, "%s: Out of virtual memory!\n", fname);
  74   abort ();
  75 }
  76 #endif /* !ALREADY_HAVE_XMALLOC */