jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

*** empty log message ***

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@1025 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Dave Beazley 2001-02-24 00:08:23 +00:00
commit 8628790f3c
7 changed files with 147 additions and 51 deletions
Download patch file Download diff file Expand all files Collapse all files

41
SWIG/Tools/WAD/Wad/memory.c
View file

@ -26,6 +26,7 @@ static WadMemory *current = 0; /* Current memory block */
static WadMemory *persistent = 0; /* Persistent memory data */
static int pagesize = 0; /* System page size */
static int devzero = 0;
static int npalloc = 8; /* Number of pages per alloc */
/* -----------------------------------------------------------------------------
* wad_memory_init()
@ -72,14 +73,14 @@ void *wad_malloc(int nbytes) {
char *c;
int npages;
/* wad_printf("wad_malloc: %d\n", nbytes); */
if (nbytes >= (pagesize >> 2)) {
if (nbytes >= ((npalloc*pagesize) >> 2)) {
/* Large allocation. */
npages = ((nbytes + sizeof(WadMemory))/pagesize) + 1;
ptr = wad_page_alloc(npages);
if (!ptr) return 0;
wm = (WadMemory *)ptr;
wm->npages = npages;
wm->last = sizeof(WadMemory);
wm->last = sizeof(WadMemory) + 8;
wm->next = current;
current = wm;
c = (char *) current + (current->last);
@ -97,9 +98,9 @@ void *wad_malloc(int nbytes) {
}
if (!wm) {
/* wad_printf("wad_malloc: new page\n", nbytes);*/
wm = (WadMemory *) wad_page_alloc(1);
wm = (WadMemory *) wad_page_alloc(npalloc);
if (!wm) return 0;
wm->npages = 1;
wm->npages = npalloc;
wm->last = sizeof(WadMemory);
wm->next = current;
current = wm;
@ -109,33 +110,17 @@ void *wad_malloc(int nbytes) {
return c;
}
/* -----------------------------------------------------------------------------
* wad_pmalloc()
*
* Persistent memory allocation. Allocates memory that will never be reclaimed.
* This is only really used to store information pertaining to object files.
* ----------------------------------------------------------------------------- */
void *wad_pmalloc(int nbytes) {
void *ptr;
WadMemory *tmp;
tmp = current;
current = persistent;
ptr = wad_malloc(nbytes);
persistent = current;
current = tmp;
return ptr;
}
/* -----------------------------------------------------------------------------
* wad_release_memory()
*
* Releases all memory previously allocated by wad_malloc()
* Releases all memory previously allocated by wad_malloc(). This is inherently
* dangerous.
* ----------------------------------------------------------------------------- */
void wad_release_memory() {
WadMemory *wm, *next;
return;
wm = current;
while (wm) {
next = wm->next;
@ -159,11 +144,3 @@ char *wad_strdup(const char *c) {
return t;
}
char *wad_pstrdup(const char *c) {
char *t;
if (!c) c = "";
t = (char *) wad_pmalloc(strlen(c)+1);
strcpy(t,c);
return t;
}