wolf3d-ios/wolf3d/code/env/zmem.c

192 lines
4.3 KiB
C
Raw Normal View History

/*
Copyright (C) 2004 Michael Liebscher
Copyright (C) 1997-2001 Id Software, Inc.
This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*/
/*
* zmem.c: Zone memory management.
*
* Author: Michael Liebscher <johnnycanuck@users.sourceforge.net>
*
* Acknowledgement:
* This code was derived from Quake II, and was originally
* written by Id Software, Inc.
*
*/
/*
Notes:
Add the following line in your initization function:
z_chain.next = z_chain.prev = &z_chain;
*/
#include "../wolfiphone.h"
// just cleared malloc with counters now...
#define Z_MAGIC 0x1d1d
PRIVATE int z_count, z_bytes;
zhead_t z_chain;
/*
-----------------------------------------------------------------------------
Function: Z_Free -Deallocates or frees a zone memory block.
Parameters: memblock -[in] Previously allocated zone memory block to be freed.
Returns: Nothing.
Notes:
-----------------------------------------------------------------------------
*/
PUBLIC void Z_Free( void *memblock )
{
zhead_t *z;
z = ( (zhead_t *)memblock ) - 1;
if( z->magic != Z_MAGIC )
{
Com_Error( ERR_FATAL, "Z_Free: bad magic" );
}
z->prev->next = z->next;
z->next->prev = z->prev;
z_count--;
z_bytes -= z->size;
MM_FREE( z );
}
/*
-----------------------------------------------------------------------------
Function: Z_Stats_f -Console function to list zone memory usage.
Parameters: Nothing.
Returns: Nothing.
Notes: Lists number of bytes and blocks of zone memory allocated.
-----------------------------------------------------------------------------
*/
PUBLIC void Z_Stats_f( void )
{
Com_Printf( "%i bytes in %i blocks\n", z_bytes, z_count );
}
/*
-----------------------------------------------------------------------------
Function: Z_FreeTags -Free allocated zone memory blocks based on tag.
Parameters: tag -[in] Tag of zone memory blocks to free (see header for tag).
Returns: Nothing.
Notes:
-----------------------------------------------------------------------------
*/
PUBLIC void Z_FreeTags( int tag )
{
zhead_t *z, *next;
for( z = z_chain.next; z != &z_chain; z = next )
{
next = z->next;
if( z->tag == tag )
{
Z_Free( (void *)(z+1) );
}
}
}
/*
-----------------------------------------------------------------------------
Function: Z_TagMalloc -Allocates zone memory blocks.
Parameters:
size -[in] Bytes to allocate.
tag -[in] Tag to associate with memory (see header for tag).
Returns:
A void pointer to the allocated space, or will shutdown application
if there is insufficient memory available.
Notes:
-----------------------------------------------------------------------------
*/
PUBLIC void *Z_TagMalloc( size_t size, int tag )
{
zhead_t *z;
// Allocate memory
size += sizeof( zhead_t );
z = MM_MALLOC( size );
if( ! z )
{
Com_Error( ERR_FATAL, "Z_Malloc: failed on allocation of %i bytes", size );
}
// Set memory block to zero and fill in header.
memset( z, 0, size );
z_count++;
z_bytes += size;
z->magic = Z_MAGIC;
z->tag = tag;
z->size = size;
// Add new memory block to chain.
z->next = z_chain.next;
z->prev = &z_chain;
z_chain.next->prev = z;
z_chain.next = z;
return (void *)(z+1);
}
/*
-----------------------------------------------------------------------------
Function: Z_Malloc -Allocates zone memory blocks.
Parameters: size -[in] Bytes to allocate.
Returns:
A void pointer to the allocated space, or will shutdown application
if there is insufficient memory available.
Notes: Calls Z_TagMalloc() with tag set to zero.
-----------------------------------------------------------------------------
*/
PUBLIC void *Z_Malloc( size_t size )
{
return Z_TagMalloc( size, 0 );
}