3 * $Id: alloc.c,v 1.4 2000/06/17 10:35:51 mdw Exp $
5 * Memory allocation functions
7 * (c) 1998 Straylight/Edgeware
10 /*----- Licensing notice --------------------------------------------------*
12 * This file is part of the mLib utilities library.
14 * mLib is free software; you can redistribute it and/or modify
15 * it under the terms of the GNU Library General Public License as
16 * published by the Free Software Foundation; either version 2 of the
17 * License, or (at your option) any later version.
19 * mLib is distributed in the hope that it will be useful,
20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 * GNU Library General Public License for more details.
24 * You should have received a copy of the GNU Library General Public
25 * License along with mLib; if not, write to the Free
26 * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
30 /*----- Revision history --------------------------------------------------*
33 * Revision 1.4 2000/06/17 10:35:51 mdw
34 * Major overhaul for arena support.
36 * Revision 1.3 1999/05/06 19:51:35 mdw
37 * Reformatted the LGPL notice a little bit.
39 * Revision 1.2 1999/05/05 18:50:31 mdw
40 * Change licensing conditions to LGPL.
42 * Revision 1.1.1.1 1998/06/17 23:44:42 mdw
43 * Initial version of mLib
47 /*----- Header files ------------------------------------------------------*/
49 /* --- ANSI headers --- */
55 /* --- Local headers --- */
61 /*----- Functions and macros ----------------------------------------------*/
63 /* --- @x_alloc@ --- *
65 * Arguments: @arena *a@ = pointer to underlying arena
66 * @size_t sz@ = size of block to allocate
68 * Returns: Pointer to allocated block.
70 * Use: Allocates memory. If there's not enough memory, the
71 * exception @EXC_NOMEM@ is thrown.
74 void *x_alloc(arena *a, size_t sz)
76 void *p = A_ALLOC(a, sz);
82 /* --- @x_strdup@ --- *
84 * Arguments: @arena *a@ = pointer to underlying arena
85 * @const char *s@ = pointer to a string
87 * Returns: Pointer to a copy of the string.
89 * Use: Copies a string (like @strdup@ would, if it existed). If
90 * there's not enough memory, the exception @EXC_NOMEM@ is
94 char *x_strdup(arena *a, const char *s)
96 size_t sz = strlen(s) + 1;
97 char *p = x_alloc(a, sz);
102 /* --- @x_realloc@ --- *
104 * Arguments: @arena *a@ = pointer to underlying arena
105 * @void *p@ = pointer to a block of memory
106 * @size_t sz@ = new size desired for the block
108 * Returns: Pointer to the resized memory block (which is almost
109 * certainly not in the same place any more).
111 * Use: Resizes a memory block. If there's not enough memory, the
112 * exception @EXC_NOMEM@ is thrown.
115 void *x_realloc(arena *a, void *p, size_t sz)
117 p = A_REALLOC(a, p, sz);
123 /* --- @x_free@ --- *
125 * Arguments: @arena *a@ = pointer to underlying arena
126 * @void *p@ = pointer to a block of memory.
130 * Use: Frees a block of memory.
133 void (x_free)(arena *a, void *p) { x_free(a, p); }
135 /*----- Old functions for the standard arena ------------------------------*/
137 /* --- @xmalloc@ --- *
139 * Arguments: @size_t sz@ = size of block to allocate
141 * Returns: Pointer to allocated block.
143 * Use: Allocates memory. If there's not enough memory, the
144 * exception @EXC_NOMEM@ is thrown.
147 void *(xmalloc)(size_t sz) { return xmalloc(sz); }
149 /* --- @xstrdup@ --- *
151 * Arguments: @const char *s@ = pointer to a string
153 * Returns: Pointer to a copy of the string.
155 * Use: Copies a string (like @strdup@ would, if it existed). If
156 * there's not enough memory, the exception @EXC_NOMEM@ is
160 char *(xstrdup)(const char *s) { return xstrdup(s); }
162 /* --- @xrealloc@ --- *
164 * Arguments: @void *p@ = pointer to a block of memory
165 * @size_t sz@ = new size desired for the block
167 * Returns: Pointer to the resized memory block (which is almost
168 * certainly not in the same place any more).
170 * Use: Resizes a memory block. If there's not enough memory, the
171 * exception @EXC_NOMEM@ is thrown.
174 void *(xrealloc)(void *p, size_t sz) { return xrealloc(p, sz); }
178 * Arguments: @void *p@ = pointer to a block of memory.
182 * Use: Frees a block of memory.
185 void (xfree)(void *p) { xfree(p); }
187 /*----- That's all, folks -------------------------------------------------*/