jnlib/xmalloc.c

   1 /* xmalloc.c -  standard malloc wrappers
   2  *      Copyright (C) 1999, 2000, 2001, 2006 Free Software Foundation, Inc.
   3  *
   4  * This file is part of JNLIB.
   5  *
   6  * JNLIB is free software; you can redistribute it and/or modify it
   7  * under the terms of the GNU Lesser General Public License as
   8  * published by the Free Software Foundation; either version 3 of
   9  * the License, or (at your option) any later version.
  10  *
  11  * JNLIB is distributed in the hope that it will be useful, but
  12  * WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this program; if not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include <config.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <stdio.h>
  24
  25 #include "libjnlib-config.h"
  26 #include "xmalloc.h"
  27
  28 static void
  29 out_of_core(void)
  30 {
  31     fputs("\nfatal: out of memory\n", stderr );
  32     exit(2);
  33 }
  34
  35
  36 void *
  37 xmalloc( size_t n )
  38 {
  39     void *p = malloc( n );
  40     if( !p )
  41         out_of_core();
  42     return p;
  43 }
  44
  45 void *
  46 xrealloc( void *a, size_t n )
  47 {
  48     void *p = realloc( a, n );
  49     if( !p )
  50         out_of_core();
  51     return p;
  52 }
  53
  54 void *
  55 xcalloc( size_t n, size_t m )
  56 {
  57     void *p = calloc( n, m );
  58     if( !p )
  59         out_of_core();
  60     return p;
  61 }
  62
  63 char *
  64 xstrdup( const char *string )
  65 {
  66     void *p = xmalloc( strlen(string)+1 );
  67     strcpy( p, string );
  68     return p;
  69 }
  70
  71
  72 char *
  73 xstrcat2( const char *a, const char *b )
  74 {
  75     size_t n1;
  76     char *p;
  77
  78     if( !b )
  79         return xstrdup( a );
  80
  81     n1 = strlen(a);
  82     p = xmalloc( n1 + strlen(b) + 1 );
  83     memcpy(p, a, n1 );
  84     strcpy(p+n1, b );
  85     return p;
  86 }
  87