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