3 * $Id: alloc.c,v 1.5 2000/07/16 12:29:16 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.5 2000/07/16 12:29:16 mdw
34 * Change to arena `realloc' interface, to fix a design bug.
36 * Revision 1.4 2000/06/17 10:35:51 mdw
37 * Major overhaul for arena support.
39 * Revision 1.3 1999/05/06 19:51:35 mdw
40 * Reformatted the LGPL notice a little bit.
42 * Revision 1.2 1999/05/05 18:50:31 mdw
43 * Change licensing conditions to LGPL.
45 * Revision 1.1.1.1 1998/06/17 23:44:42 mdw
46 * Initial version of mLib
50 /*----- Header files ------------------------------------------------------*/
52 /* --- ANSI headers --- */
58 /* --- Local headers --- */
64 /*----- Functions and macros ----------------------------------------------*/
66 /* --- @x_alloc@ --- *
68 * Arguments: @arena *a@ = pointer to underlying arena
69 * @size_t sz@ = size of block to allocate
71 * Returns: Pointer to allocated block.
73 * Use: Allocates memory. If there's not enough memory, the
74 * exception @EXC_NOMEM@ is thrown.
77 void *x_alloc(arena
*a
, size_t sz
)
79 void *p
= A_ALLOC(a
, sz
);
85 /* --- @x_strdup@ --- *
87 * Arguments: @arena *a@ = pointer to underlying arena
88 * @const char *s@ = pointer to a string
90 * Returns: Pointer to a copy of the string.
92 * Use: Copies a string (like @strdup@ would, if it existed). If
93 * there's not enough memory, the exception @EXC_NOMEM@ is
97 char *x_strdup(arena
*a
, const char *s
)
99 size_t sz
= strlen(s
) + 1;
100 char *p
= x_alloc(a
, sz
);
105 /* --- @x_realloc@ --- *
107 * Arguments: @arena *a@ = pointer to underlying arena
108 * @void *p@ = pointer to a block of memory
109 * @size_t sz@ = new size desired for the block
110 * @size_t osz@ = size of the old block
112 * Returns: Pointer to the resized memory block (which is almost
113 * certainly not in the same place any more).
115 * Use: Resizes a memory block. If there's not enough memory, the
116 * exception @EXC_NOMEM@ is thrown.
119 void *x_realloc(arena
*a
, void *p
, size_t sz
, size_t osz
)
121 p
= A_REALLOC(a
, p
, sz
, osz
);
127 /* --- @x_free@ --- *
129 * Arguments: @arena *a@ = pointer to underlying arena
130 * @void *p@ = pointer to a block of memory.
134 * Use: Frees a block of memory.
137 void (x_free
)(arena
*a
, void *p
) { x_free(a
, p
); }
139 /*----- Old functions for the standard arena ------------------------------*/
141 /* --- @xmalloc@ --- *
143 * Arguments: @size_t sz@ = size of block to allocate
145 * Returns: Pointer to allocated block.
147 * Use: Allocates memory. If there's not enough memory, the
148 * exception @EXC_NOMEM@ is thrown.
151 void *(xmalloc
)(size_t sz
) { return xmalloc(sz
); }
153 /* --- @xstrdup@ --- *
155 * Arguments: @const char *s@ = pointer to a string
157 * Returns: Pointer to a copy of the string.
159 * Use: Copies a string (like @strdup@ would, if it existed). If
160 * there's not enough memory, the exception @EXC_NOMEM@ is
164 char *(xstrdup
)(const char *s
) { return xstrdup(s
); }
166 /* --- @xrealloc@ --- *
168 * Arguments: @void *p@ = pointer to a block of memory
169 * @size_t sz@ = new size desired for the block
170 * @size_t osz@ = size of the old block
172 * Returns: Pointer to the resized memory block (which is almost
173 * certainly not in the same place any more).
175 * Use: Resizes a memory block. If there's not enough memory, the
176 * exception @EXC_NOMEM@ is thrown.
179 void *(xrealloc
)(void *p
, size_t sz
, size_t osz
)
180 { return xrealloc(p
, sz
, osz
); }
184 * Arguments: @void *p@ = pointer to a block of memory.
188 * Use: Frees a block of memory.
191 void (xfree
)(void *p
) { xfree(p
); }
193 /*----- That's all, folks -------------------------------------------------*/