Source release of Wolfenstein 3D Classic Platinum for iOS, 1.1

wolf3d/code/env/zmem.c

@@ -0,0 +1,191 @@
+/*
+
+	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 );
+}