1/* Shared allocation functions for GDB, the GNU debugger.
2
3   Copyright (C) 1986-2023 Free Software Foundation, Inc.
4
5   This file is part of GDB.
6
7   This program is free software; you can redistribute it and/or modify
8   it under the terms of the GNU General Public License as published by
9   the Free Software Foundation; either version 3 of the License, or
10   (at your option) any later version.
11
12   This program is distributed in the hope that it will be useful,
13   but WITHOUT ANY WARRANTY; without even the implied warranty of
14   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15   GNU General Public License for more details.
16
17   You should have received a copy of the GNU General Public License
18   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
19
20/* This file is unusual.
21
22   Because both libiberty and readline define xmalloc and friends, the
23   functions in this file can't appear in a library -- that will cause
24   link errors.
25
26   And, because we want to turn the common code into a library, this
27   file can't live there.
28
29   So, it lives in gdb and is built separately by gdb and gdbserver.
30   Please be aware of this when modifying it.
31
32   This also explains why this file includes common-defs.h and not
33   defs.h or server.h -- we'd prefer to avoid depending on the
34   GDBSERVER define when possible, and for this file it seemed
35   simple to do so.  */
36
37#include "gdbsupport/common-defs.h"
38#include "libiberty.h"
39#include "gdbsupport/errors.h"
40
41/* The xmalloc() (libiberty.h) family of memory management routines.
42
43   These are like the ISO-C malloc() family except that they implement
44   consistent semantics and guard against typical memory management
45   problems.  */
46
47void *
48xmalloc (size_t size)
49{
50  void *val;
51
52  /* See libiberty/xmalloc.c.  This function need's to match that's
53     semantics.  It never returns NULL.  */
54  if (size == 0)
55    size = 1;
56
57  val = malloc (size);         /* ARI: malloc */
58  if (val == NULL)
59    malloc_failure (size);
60
61  return val;
62}
63
64void *
65xrealloc (void *ptr, size_t size)
66{
67  void *val;
68
69  /* See libiberty/xmalloc.c.  This function need's to match that's
70     semantics.  It never returns NULL.  */
71  if (size == 0)
72    size = 1;
73
74  if (ptr != NULL)
75    val = realloc (ptr, size);	/* ARI: realloc */
76  else
77    val = malloc (size);	        /* ARI: malloc */
78  if (val == NULL)
79    malloc_failure (size);
80
81  return val;
82}
83
84void *
85xcalloc (size_t number, size_t size)
86{
87  void *mem;
88
89  /* See libiberty/xmalloc.c.  This function need's to match that's
90     semantics.  It never returns NULL.  */
91  if (number == 0 || size == 0)
92    {
93      number = 1;
94      size = 1;
95    }
96
97  mem = calloc (number, size);      /* ARI: xcalloc */
98  if (mem == NULL)
99    malloc_failure (number * size);
100
101  return mem;
102}
103
104void
105xmalloc_failed (size_t size)
106{
107  malloc_failure (size);
108}
109