1993-07-28 09:05:47 +00:00
|
|
|
#ifndef Py_MYMALLOC_H
|
|
|
|
#define Py_MYMALLOC_H
|
1992-08-19 16:46:30 +00:00
|
|
|
/***********************************************************
|
1995-01-04 19:06:22 +00:00
|
|
|
Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam,
|
|
|
|
The Netherlands.
|
1992-08-19 16:46:30 +00:00
|
|
|
|
|
|
|
All Rights Reserved
|
|
|
|
|
1996-10-25 14:44:06 +00:00
|
|
|
Permission to use, copy, modify, and distribute this software and its
|
|
|
|
documentation for any purpose and without fee is hereby granted,
|
1992-08-19 16:46:30 +00:00
|
|
|
provided that the above copyright notice appear in all copies and that
|
1996-10-25 14:44:06 +00:00
|
|
|
both that copyright notice and this permission notice appear in
|
1992-08-19 16:46:30 +00:00
|
|
|
supporting documentation, and that the names of Stichting Mathematisch
|
1996-10-25 14:44:06 +00:00
|
|
|
Centrum or CWI or Corporation for National Research Initiatives or
|
|
|
|
CNRI not be used in advertising or publicity pertaining to
|
|
|
|
distribution of the software without specific, written prior
|
|
|
|
permission.
|
|
|
|
|
|
|
|
While CWI is the initial source for this software, a modified version
|
|
|
|
is made available by the Corporation for National Research Initiatives
|
|
|
|
(CNRI) at the Internet address ftp://ftp.python.org.
|
|
|
|
|
|
|
|
STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH
|
|
|
|
REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
|
|
|
|
MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH
|
|
|
|
CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL
|
|
|
|
DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
|
|
|
|
PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
|
|
|
|
TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
|
|
|
|
PERFORMANCE OF THIS SOFTWARE.
|
1992-08-19 16:46:30 +00:00
|
|
|
|
|
|
|
******************************************************************/
|
|
|
|
|
|
|
|
/* Lowest-level memory allocation interface */
|
|
|
|
|
|
|
|
#ifdef macintosh
|
|
|
|
#define ANY void
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef __STDC__
|
|
|
|
#define ANY void
|
|
|
|
#endif
|
|
|
|
|
1993-10-26 17:58:25 +00:00
|
|
|
#ifdef __TURBOC__
|
|
|
|
#define ANY void
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef __GNUC__
|
|
|
|
#define ANY void
|
|
|
|
#endif
|
|
|
|
|
1992-08-19 16:46:30 +00:00
|
|
|
#ifndef ANY
|
|
|
|
#define ANY char
|
|
|
|
#endif
|
|
|
|
|
1994-08-01 11:34:53 +00:00
|
|
|
#ifdef HAVE_STDLIB_H
|
|
|
|
#include <stdlib.h>
|
1995-01-10 17:43:33 +00:00
|
|
|
#endif
|
|
|
|
|
2000-05-03 23:44:39 +00:00
|
|
|
#include "myproto.h"
|
|
|
|
|
1995-01-10 17:43:33 +00:00
|
|
|
#ifdef __cplusplus
|
1997-08-05 01:59:22 +00:00
|
|
|
/* Move this down here since some C++ #include's don't like to be included
|
|
|
|
inside an extern "C" */
|
1995-01-10 17:43:33 +00:00
|
|
|
extern "C" {
|
|
|
|
#endif
|
|
|
|
|
1995-06-27 13:12:09 +00:00
|
|
|
#ifdef SYMANTEC__CFM68K__
|
1995-02-18 14:50:12 +00:00
|
|
|
#pragma lib_export on
|
|
|
|
#endif
|
|
|
|
|
2000-05-03 23:44:39 +00:00
|
|
|
#ifndef DL_IMPORT /* declarations for DLL import */
|
|
|
|
#define DL_IMPORT(RTYPE) RTYPE
|
1997-08-21 16:13:37 +00:00
|
|
|
#endif
|
1994-08-01 11:34:53 +00:00
|
|
|
|
1992-08-19 16:46:30 +00:00
|
|
|
#ifndef NULL
|
1994-08-01 11:34:53 +00:00
|
|
|
#define NULL ((ANY *)0)
|
1992-08-19 16:46:30 +00:00
|
|
|
#endif
|
|
|
|
|
1997-07-10 22:40:54 +00:00
|
|
|
#ifdef MALLOC_ZERO_RETURNS_NULL
|
* mymalloc.h: always allocate one extra byte, since some malloc's
return NULL for malloc(0) or realloc(p, 0). (This should be done
differently than wasting one byte, but alas...)
* Moved "add'l libraries" option in Makefile to an earlier place.
* Remove argument compatibility hacks (b) and (c).
* Add grey2mono, dither2mono and mono2grey to imageop.
* Dup the fd in socket.fromfd().
* Added new modules mpz, md5 (by JH, requiring GNU MP 1.2). Affects
Makefile and config.c.
* socketmodule.c: added socket.fromfd(fd, family, type, [proto]),
converted socket() to use of getargs().
1992-12-14 16:59:51 +00:00
|
|
|
/* XXX Always allocate one extra byte, since some malloc's return NULL
|
|
|
|
XXX for malloc(0) or realloc(p, 0). */
|
1997-07-10 22:40:54 +00:00
|
|
|
#define _PyMem_EXTRA 1
|
|
|
|
#else
|
|
|
|
#define _PyMem_EXTRA 0
|
|
|
|
#endif
|
|
|
|
|
2000-05-03 23:44:39 +00:00
|
|
|
/*
|
|
|
|
* Core memory allocator
|
|
|
|
* =====================
|
|
|
|
*/
|
1992-08-19 16:46:30 +00:00
|
|
|
|
2000-05-03 23:44:39 +00:00
|
|
|
/* To make sure the interpreter is user-malloc friendly, all memory
|
|
|
|
APIs are implemented on top of this one.
|
1997-08-05 01:59:22 +00:00
|
|
|
|
2000-05-03 23:44:39 +00:00
|
|
|
The PyCore_* macros can be defined to make the interpreter use a
|
|
|
|
custom allocator. Note that they are for internal use only. Both
|
|
|
|
the core and extension modules should use the PyMem_* API. */
|
|
|
|
|
|
|
|
#ifndef PyCore_MALLOC_FUNC
|
|
|
|
#undef PyCore_REALLOC_FUNC
|
|
|
|
#undef PyCore_FREE_FUNC
|
|
|
|
#define PyCore_MALLOC_FUNC malloc
|
|
|
|
#define PyCore_REALLOC_FUNC realloc
|
|
|
|
#define PyCore_FREE_FUNC free
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef PyCore_MALLOC_PROTO
|
|
|
|
#undef PyCore_REALLOC_PROTO
|
|
|
|
#undef PyCore_FREE_PROTO
|
|
|
|
#define PyCore_MALLOC_PROTO Py_PROTO((size_t))
|
|
|
|
#define PyCore_REALLOC_PROTO Py_PROTO((ANY *, size_t))
|
|
|
|
#define PyCore_FREE_PROTO Py_PROTO((ANY *))
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef NEED_TO_DECLARE_MALLOC_AND_FRIEND
|
|
|
|
extern ANY *PyCore_MALLOC_FUNC PyCore_MALLOC_PROTO;
|
|
|
|
extern ANY *PyCore_REALLOC_FUNC PyCore_REALLOC_PROTO;
|
|
|
|
extern void PyCore_FREE_FUNC PyCore_FREE_PROTO;
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifndef PyCore_MALLOC
|
|
|
|
#undef PyCore_REALLOC
|
|
|
|
#undef PyCore_FREE
|
|
|
|
#define PyCore_MALLOC(n) PyCore_MALLOC_FUNC(n)
|
|
|
|
#define PyCore_REALLOC(p, n) PyCore_REALLOC_FUNC((p), (n))
|
|
|
|
#define PyCore_FREE(p) PyCore_FREE_FUNC(p)
|
|
|
|
#endif
|
1997-08-05 01:59:22 +00:00
|
|
|
|
2000-05-03 23:44:39 +00:00
|
|
|
/* BEWARE:
|
1997-08-05 01:59:22 +00:00
|
|
|
|
2000-05-03 23:44:39 +00:00
|
|
|
Each interface exports both functions and macros. Extension modules
|
|
|
|
should normally use the functions for ensuring binary compatibility
|
|
|
|
of the user's code across Python versions. Subsequently, if the
|
|
|
|
Python runtime switches to its own malloc (different from standard
|
|
|
|
malloc), no recompilation is required for the extensions.
|
|
|
|
|
|
|
|
The macro versions trade compatibility for speed. They can be used
|
|
|
|
whenever there is a performance problem, but their use implies
|
|
|
|
recompilation of the code for each new Python release. The Python
|
|
|
|
core uses the macros because it *is* compiled on every upgrade.
|
|
|
|
This might not be the case with 3rd party extensions in a custom
|
|
|
|
setup (for example, a customer does not always have access to the
|
|
|
|
source of 3rd party deliverables). You have been warned! */
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Raw memory interface
|
|
|
|
* ====================
|
|
|
|
*/
|
|
|
|
|
|
|
|
/* Functions */
|
|
|
|
|
|
|
|
/* Function wrappers around PyCore_MALLOC and friends; useful if you
|
|
|
|
need to be sure that you are using the same memory allocator as
|
|
|
|
Python. Note that the wrappers make sure that allocating 0 bytes
|
|
|
|
returns a non-NULL pointer, even if the underlying malloc
|
|
|
|
doesn't. Returned pointers must be checked for NULL explicitly.
|
|
|
|
No action is performed on failure. */
|
1998-12-04 18:48:25 +00:00
|
|
|
extern DL_IMPORT(ANY *) PyMem_Malloc Py_PROTO((size_t));
|
|
|
|
extern DL_IMPORT(ANY *) PyMem_Realloc Py_PROTO((ANY *, size_t));
|
|
|
|
extern DL_IMPORT(void) PyMem_Free Py_PROTO((ANY *));
|
1997-08-05 01:59:22 +00:00
|
|
|
|
2000-05-03 23:44:39 +00:00
|
|
|
/* Starting from Python 1.6, the wrappers Py_{Malloc,Realloc,Free} are
|
|
|
|
no longer supported. They used to call PyErr_NoMemory() on failure. */
|
|
|
|
|
|
|
|
/* Macros */
|
|
|
|
#define PyMem_MALLOC(n) PyCore_MALLOC(n)
|
|
|
|
#define PyMem_REALLOC(p, n) PyCore_REALLOC((ANY *)(p), (n))
|
|
|
|
#define PyMem_FREE(p) PyCore_FREE((ANY *)(p))
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Type-oriented memory interface
|
|
|
|
* ==============================
|
|
|
|
*/
|
|
|
|
|
|
|
|
/* Functions */
|
|
|
|
#define PyMem_New(type, n) \
|
|
|
|
( (type *) PyMem_Malloc((n) * sizeof(type)) )
|
|
|
|
#define PyMem_Resize(p, type, n) \
|
|
|
|
( (p) = (type *) PyMem_Realloc((n) * sizeof(type)) )
|
|
|
|
#define PyMem_Del(p) PyMem_Free(p)
|
|
|
|
|
|
|
|
/* Macros */
|
|
|
|
#define PyMem_NEW(type, n) \
|
|
|
|
( (type *) PyMem_MALLOC(_PyMem_EXTRA + (n) * sizeof(type)) )
|
|
|
|
#define PyMem_RESIZE(p, type, n) \
|
|
|
|
if ((p) == NULL) \
|
|
|
|
(p) = (type *)(PyMem_MALLOC( \
|
|
|
|
_PyMem_EXTRA + (n) * sizeof(type))); \
|
|
|
|
else \
|
|
|
|
(p) = (type *)(PyMem_REALLOC((p), \
|
|
|
|
_PyMem_EXTRA + (n) * sizeof(type)))
|
|
|
|
#define PyMem_DEL(p) PyMem_FREE(p)
|
|
|
|
|
|
|
|
/* PyMem_XDEL is deprecated. To avoid the call when p is NULL,
|
|
|
|
it is recommended to write the test explicitly in the code.
|
|
|
|
Note that according to ANSI C, free(NULL) has no effect. */
|
|
|
|
|
1993-07-28 09:05:47 +00:00
|
|
|
#ifdef __cplusplus
|
|
|
|
}
|
|
|
|
#endif
|
1995-01-12 11:45:45 +00:00
|
|
|
|
1993-07-28 09:05:47 +00:00
|
|
|
#endif /* !Py_MYMALLOC_H */
|