gecko-dev/lib/xp/xp_alloc.c
1998-03-28 02:44:41 +00:00

108 lines
2.7 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.0 (the "NPL"); you may not use this file except in
* compliance with the NPL. You may obtain a copy of the NPL at
* http://www.mozilla.org/NPL/
*
* Software distributed under the NPL is distributed on an "AS IS" basis,
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
* for the specific language governing rights and limitations under the
* NPL.
*
* The Initial Developer of this code under the NPL is Netscape
* Communications Corporation. Portions created by Netscape are
* Copyright (C) 1998 Netscape Communications Corporation. All Rights
* Reserved.
*/
#include "xp_mem.h"
#include "xp_mcom.h"
#define ALLOCSIZE 4096
void
XP_InitAllocStructInfo(XP_AllocStructInfo* info, int size)
{
info->size = XP_INITIALIZE_ALLOCSTRUCTINFO(size);
info->curchunk = NULL;
info->leftinchunk = 0;
info->firstfree = NULL;
info->firstchunk = NULL;
info->numalloced = 0;
}
void*
XP_AllocStruct(XP_AllocStructInfo* info)
{
void* result;
if (info->firstfree) {
result = info->firstfree;
info->firstfree = *((void**) info->firstfree);
} else {
if (info->curchunk == NULL) {
info->leftinchunk = (ALLOCSIZE - sizeof(void*)) / info->size;
if (info->leftinchunk < 1) info->leftinchunk = 1;
info->curchunk = XP_ALLOC(info->size * info->leftinchunk +
sizeof(void*));
while (info->curchunk == NULL) {
info->leftinchunk /= 2;
if (info->leftinchunk < 1) return NULL;
info->curchunk = XP_ALLOC(info->size * info->leftinchunk +
sizeof(void*));
}
*((void**) info->curchunk) = info->firstchunk;
info->firstchunk = info->curchunk;
info->curchunk = ((uint8*) info->curchunk) + sizeof(void**);
}
result = info->curchunk;
info->leftinchunk--;
if (info->leftinchunk <= 0) {
info->curchunk = NULL;
} else {
info->curchunk = ((uint8*) info->curchunk) + info->size;
}
}
info->numalloced++;
return result;
}
void*
XP_AllocStructZero(XP_AllocStructInfo* info)
{
void* result = XP_AllocStruct(info);
if (result) {
XP_BZERO(result, info->size);
}
return result;
}
void
XP_FreeStruct(XP_AllocStructInfo* info, void* ptr)
{
*((void**) ptr) = info->firstfree;
info->firstfree = ptr;
info->numalloced--;
if (info->numalloced <= 0) {
XP_FreeAllStructs(info);
}
}
void
XP_FreeAllStructs(XP_AllocStructInfo* info)
{
void* next;
for (; info->firstchunk; info->firstchunk = next) {
next = *((void**) info->firstchunk);
XP_FREE(info->firstchunk);
}
info->curchunk = NULL;
info->leftinchunk = 0;
info->firstfree = NULL;
info->numalloced = 0;
}