gecko-dev/include/xp_mem.h

276 строки
8.3 KiB
C

/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*-
*
* The contents of this file are subject to the Netscape Public
* License Version 1.1 (the "License"); you may not use this file
* except in compliance with the License. You may obtain a copy of
* the License at http://www.mozilla.org/NPL/
*
* Software distributed under the License is distributed on an "AS
* IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
* implied. See the License for the specific language governing
* rights and limitations under the License.
*
* The Original Code is mozilla.org code.
*
* The Initial Developer of the Original Code is Netscape
* Communications Corporation. Portions created by Netscape are
* Copyright (C) 1998 Netscape Communications Corporation. All
* Rights Reserved.
*
* Contributor(s):
*/
/*-----------------------------------------------------------------------------
XPMem.h
Cross-Platform Memory API
-----------------------------------------------------------------------------*/
#ifndef _XP_MEM_
#define _XP_MEM_
#include "xp_core.h"
#ifdef XP_WIN16
#include <malloc.h>
#endif
/* global free routine */
#define XP_FREEIF(obj) do { if(obj) { XP_FREE(obj); obj = 0; }} while(0)
/*-----------------------------------------------------------------------------
Allocating Structures
-----------------------------------------------------------------------------*/
#define XP_NEW( x ) (x*)malloc( sizeof( x ) )
#define XP_DELETE( p ) free( p )
/*-----------------------------------------------------------------------------
Mallocs
NOTE: this uses the same malloc as the structure allocator so it is
ok and safe to use XP_DELETE or XP_FREE interchangeably!
-----------------------------------------------------------------------------*/
#ifdef XP_MAC
#define XP_ALLOC( s ) malloc( s )
#define XP_FREE( p ) free( p )
#define XP_REALLOC( p , s ) realloc( p, s )
#define XP_CALLOC( n, s ) calloc( (n), (s) )
#define XP_NEW_ZAP( t ) ((t*)calloc( 1, sizeof(t) ) )
#else /* !XP_MAC */
/* normal win and unix */
#ifdef XP_WIN16
XP_BEGIN_PROTOS
extern void * WIN16_realloc(void * ptr, unsigned long size);
extern void * WIN16_malloc(unsigned long size);
XP_END_PROTOS
#define XP_REALLOC(ptr, size) WIN16_realloc(ptr, size)
#define XP_ALLOC(size) WIN16_malloc(size)
#else
/* this used to check for < 64K for win16, but we don't need it anymore!
I'll leave the define in case someone else has another check they want to try.
*/
#define XP_CHECK_ALLOC_SIZE(size) size
#define XP_REALLOC(ptr, size) realloc(ptr, XP_CHECK_ALLOC_SIZE(size))
#define XP_ALLOC(size) malloc(XP_CHECK_ALLOC_SIZE(size))
#endif
#ifdef DEBUG
#define XP_CALLOC(num, sz) (((num)*(sz))<64000 ? calloc((num),(sz)) : (XP_ASSERT(FALSE), calloc((num),(sz))))
#else
#define XP_CALLOC(num, sz) calloc((num), (sz))
#endif
#define XP_FREE(ptr) free(ptr)
#define XP_NEW_ZAP(TYPE) ( (TYPE*) calloc (1, sizeof (TYPE) ) )
#endif /* !XP_MAC */
/* --------------------------------------------------------------------------
16-bit windows requires space allocated bigger than 32K to be of
type huge. For example:
int HUGE * foo = halloc(100000);
-----------------------------------------------------------------------------*/
/* There's no huge realloc because win16 doesn't have a hrealloc,
* and there's no API to discover the original buffer's size.
*/
#ifdef XP_WIN16
#define XP_HUGE __huge
#define XP_HUGE_ALLOC(SIZE) halloc(SIZE,1)
#define XP_HUGE_FREE(SIZE) hfree(SIZE)
#define XP_HUGE_MEMCPY(DEST, SOURCE, LEN) hmemcpy(DEST, SOURCE, LEN)
#else
#define XP_HUGE
#define XP_HUGE_ALLOC(SIZE) malloc(SIZE)
#define XP_HUGE_FREE(SIZE) free(SIZE)
#define XP_HUGE_MEMCPY(DEST, SOURCE, LEN) memcpy(DEST, SOURCE, LEN)
#endif
#define XP_HUGE_CHAR_PTR char XP_HUGE *
/*-----------------------------------------------------------------------------
Allocating Large Buffers
NOTE: this does not interchange with XP_ALLOC/XP_NEW/XP_FREE/XP_DELETE
-----------------------------------------------------------------------------*/
#if defined(XP_UNIX) || defined(XP_WIN32) || defined(XP_BEOS)
/* don't typedef this to void* unless you want obscure bugs... */
typedef unsigned long * XP_Block;
#define XP_ALLOC_BLOCK(SIZE) malloc ((SIZE))
#define XP_FREE_BLOCK(BLOCK) free ((BLOCK))
#ifdef XP_UNIXu
/* On SunOS, realloc(0,n) ==> 0 */
# define XP_REALLOC_BLOCK(BLOCK,SIZE) ((BLOCK) \
? realloc ((BLOCK), (SIZE)) \
: malloc ((SIZE)))
#else /* !XP_UNIX */
# define XP_REALLOC_BLOCK(BLOCK,SIZE) realloc ((BLOCK), (SIZE))
#endif /* !XP_UNIX */
#define XP_LOCK_BLOCK(PTR,TYPE,BLOCK) PTR = ((TYPE) (BLOCK))
#ifdef DEBUG
#define XP_UNLOCK_BLOCK(BLOCK) (void)BLOCK
#else
#define XP_UNLOCK_BLOCK(BLOCK)
#endif
#endif /* XP_UNIX || XP_WIN32 */
#if defined(XP_OS2)
/* don't typedef this to void* unless you want obscure bugs... */
typedef unsigned long * XP_Block;
#define XP_ALLOC_BLOCK(SIZE) malloc ((SIZE))
#define XP_FREE_BLOCK(BLOCK) free ((BLOCK))
# define XP_REALLOC_BLOCK(BLOCK,SIZE) realloc ((BLOCK), (SIZE))
#define XP_LOCK_BLOCK(PTR,TYPE,BLOCK) PTR = ((TYPE) (BLOCK))
#ifdef DEBUG
#define XP_UNLOCK_BLOCK(BLOCK) (void)BLOCK
#else
#define XP_UNLOCK_BLOCK(BLOCK)
#endif
#ifdef MCW_DEBUG
#include <stdlib.h>
#include <shmalloc.h>
#endif
#endif /* XP_OS2 */
#ifdef XP_WIN16
typedef unsigned char * XP_Block;
#define XP_ALLOC_BLOCK(SIZE) WIN16_malloc((SIZE))
#define XP_FREE_BLOCK(BLOCK) free ((BLOCK))
#define XP_REALLOC_BLOCK(BLOCK,SIZE) ((BLOCK) \
? WIN16_realloc ((BLOCK), (SIZE)) \
: WIN16_malloc ((SIZE)))
#define XP_LOCK_BLOCK(PTR,TYPE,BLOCK) PTR = ((TYPE) (BLOCK))
#ifdef DEBUG
#define XP_UNLOCK_BLOCK(BLOCK) (void)BLOCK
#else
#define XP_UNLOCK_BLOCK(BLOCK)
#endif
#endif /* XP_WIN16 */
#ifdef XP_MAC
typedef float* XP_Block;
#define XP_ALLOC_BLOCK( s ) ((XP_Block)malloc( s ) )
#define XP_FREE_BLOCK( b ) free( b )
#define XP_REALLOC_BLOCK( b, s ) ((XP_Block)realloc( b, s ) )
#define XP_LOCK_BLOCK( p, t, b ) (p = ( t )( b ))
#define XP_UNLOCK_BLOCK( b )
#endif /* XP_MAC */
#define PA_Block XP_Block
#define PA_ALLOC(S) XP_ALLOC_BLOCK(S)
#define PA_FREE(B) XP_FREE_BLOCK(B)
#define PA_REALLOC(B,S) XP_REALLOC_BLOCK(B,S)
#define PA_LOCK(P,T,B) XP_LOCK_BLOCK(P,T,B)
#define PA_UNLOCK(B) XP_UNLOCK_BLOCK(B)
/*-----------------------------------------------------------------------------
Allocating many small structures.
If allocating many small structures, it is often more efficient to allocate
an array of a bunch of them, and maintain a free list of them. These
utilities do that for you.
You must provide a XP_AllocStructInfo structure which describes what
it is you are trying to allocate it. If statically defined, use the
XP_INITIALIZE_ALLOCSTRUCTINFO macro to initialize it; if you prefer to
initialize it at runtime, use the XP_InitAllocStructInfo() routine.
If you free everything you've ever allocated for a given
XP_AllocStructInfo, all the memory used will be freed. Or, if you're
*really sure* you're done with everything you've allocated for a given
XP_AllocStructInfo, you can just call the scary XP_FreeAllStructs() routine.
Don't mix calls to XP_AllocStruct/XP_FreeStruct and XP_ALLOC/XP_FREE !!!
XP_AllocStructZero is the same as XP_AllocStruct, but it also zeros out
the allocated memory.
An example:
struct foo {
int a;
int b;
};
static XP_AllocStructInfo FooAlloc =
{ XP_INITIALIZE_ALLOCSTRUCTINFO(sizeof(struct foo)) };
.
.
.
struct foo* ptr = (struct foo*) XP_AllocStruct(&FooAlloc);
.
.
.
XP_FreeStruct(FooAlloc, ptr);
-----------------------------------------------------------------------------*/
typedef struct XP_AllocStructInfo {
int size;
void* curchunk;
int leftinchunk;
void* firstfree;
void* firstchunk;
int numalloced;
} XP_AllocStructInfo;
#define XP_INITIALIZE_ALLOCSTRUCTINFO(size) ((size + sizeof(void*) - 1) / sizeof(void*)) * sizeof(void*)
XP_BEGIN_PROTOS
void XP_InitAllocStructInfo(XP_AllocStructInfo* info, int size);
void* XP_AllocStruct(XP_AllocStructInfo* info);
void* XP_AllocStructZero(XP_AllocStructInfo* info);
void XP_FreeStruct(XP_AllocStructInfo* info, void* ptr);
void XP_FreeAllStructs(XP_AllocStructInfo* info); /* Danger! Use with care! */
XP_END_PROTOS
#endif /* _XP_MEM_ */