/*
===========================================================================

Wolfenstein: Enemy Territory GPL Source Code
Copyright (C) 1999-2010 id Software LLC, a ZeniMax Media company. 

This file is part of the Wolfenstein: Enemy Territory GPL Source Code (Wolf ET Source Code).  

Wolf ET Source Code 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 3 of the License, or
(at your option) any later version.

Wolf ET Source Code 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 Wolf ET Source Code.  If not, see <http://www.gnu.org/licenses/>.

In addition, the Wolf: ET Source Code is also subject to certain additional terms. You should have received a copy of these additional terms immediately following the terms and conditions of the GNU General Public License which accompanied the Wolf ET Source Code.  If not, please request a copy in writing from id Software at the address below.

If you have questions concerning this license or the applicable additional terms, you may contact in writing id Software LLC, c/o ZeniMax Media Inc., Suite 120, Rockville, Maryland 20850 USA.

===========================================================================
*/


#include "l_cmd.h"
#include "l_math.h"
#include "l_mem.h"
#include "l_log.h"
#include "../botlib/l_script.h"
#include "l_bsp_q1.h"
#include "l_bsp_ent.h"

//=============================================================================

int q1_nummodels;
q1_dmodel_t     *q1_dmodels; //[MAX_MAP_MODELS];

int q1_visdatasize;
byte                *q1_dvisdata; //[MAX_MAP_VISIBILITY];

int q1_lightdatasize;
byte                *q1_dlightdata; //[MAX_MAP_LIGHTING];

int q1_texdatasize;
byte                *q1_dtexdata; //[MAX_MAP_MIPTEX]; // (dmiptexlump_t)

int q1_entdatasize;
char                *q1_dentdata; //[MAX_MAP_ENTSTRING];

int q1_numleafs;
q1_dleaf_t      *q1_dleafs; //[MAX_MAP_LEAFS];

int q1_numplanes;
q1_dplane_t     *q1_dplanes; //[MAX_MAP_PLANES];

int q1_numvertexes;
q1_dvertex_t    *q1_dvertexes; //[MAX_MAP_VERTS];

int q1_numnodes;
q1_dnode_t      *q1_dnodes; //[MAX_MAP_NODES];

int q1_numtexinfo;
q1_texinfo_t    *q1_texinfo; //[MAX_MAP_TEXINFO];

int q1_numfaces;
q1_dface_t      *q1_dfaces; //[MAX_MAP_FACES];

int q1_numclipnodes;
q1_dclipnode_t  *q1_dclipnodes; //[MAX_MAP_CLIPNODES];

int q1_numedges;
q1_dedge_t      *q1_dedges; //[MAX_MAP_EDGES];

int q1_nummarksurfaces;
unsigned short  *q1_dmarksurfaces; //[MAX_MAP_MARKSURFACES];

int q1_numsurfedges;
int             *q1_dsurfedges; //[MAX_MAP_SURFEDGES];

//=============================================================================

int q1_bspallocated = false;
int q1_allocatedbspmem = 0;

void Q1_AllocMaxBSP( void ) {
	//models
	q1_nummodels = 0;
	q1_dmodels = (q1_dmodel_t *) GetMemory( Q1_MAX_MAP_MODELS * sizeof( q1_dmodel_t ) );
	q1_allocatedbspmem = Q1_MAX_MAP_MODELS * sizeof( q1_dmodel_t );
	//visibility
	q1_visdatasize = 0;
	q1_dvisdata = (byte *) GetMemory( Q1_MAX_MAP_VISIBILITY * sizeof( byte ) );
	q1_allocatedbspmem += Q1_MAX_MAP_VISIBILITY * sizeof( byte );
	//light data
	q1_lightdatasize = 0;
	q1_dlightdata = (byte *) GetMemory( Q1_MAX_MAP_LIGHTING * sizeof( byte ) );
	q1_allocatedbspmem += Q1_MAX_MAP_LIGHTING * sizeof( byte );
	//texture data
	q1_texdatasize = 0;
	q1_dtexdata = (byte *) GetMemory( Q1_MAX_MAP_MIPTEX * sizeof( byte ) ); // (dmiptexlump_t)
	q1_allocatedbspmem += Q1_MAX_MAP_MIPTEX * sizeof( byte );
	//entities
	q1_entdatasize = 0;
	q1_dentdata = (char *) GetMemory( Q1_MAX_MAP_ENTSTRING * sizeof( char ) );
	q1_allocatedbspmem += Q1_MAX_MAP_ENTSTRING * sizeof( char );
	//leaves
	q1_numleafs = 0;
	q1_dleafs = (q1_dleaf_t *) GetMemory( Q1_MAX_MAP_LEAFS * sizeof( q1_dleaf_t ) );
	q1_allocatedbspmem += Q1_MAX_MAP_LEAFS * sizeof( q1_dleaf_t );
	//planes
	q1_numplanes = 0;
	q1_dplanes = (q1_dplane_t *) GetMemory( Q1_MAX_MAP_PLANES * sizeof( q1_dplane_t ) );
	q1_allocatedbspmem += Q1_MAX_MAP_PLANES * sizeof( q1_dplane_t );
	//vertexes
	q1_numvertexes = 0;
	q1_dvertexes = (q1_dvertex_t *) GetMemory( Q1_MAX_MAP_VERTS * sizeof( q1_dvertex_t ) );
	q1_allocatedbspmem += Q1_MAX_MAP_VERTS * sizeof( q1_dvertex_t );
	//nodes
	q1_numnodes = 0;
	q1_dnodes = (q1_dnode_t *) GetMemory( Q1_MAX_MAP_NODES * sizeof( q1_dnode_t ) );
	q1_allocatedbspmem += Q1_MAX_MAP_NODES * sizeof( q1_dnode_t );
	//texture info
	q1_numtexinfo = 0;
	q1_texinfo = (q1_texinfo_t *) GetMemory( Q1_MAX_MAP_TEXINFO * sizeof( q1_texinfo_t ) );
	q1_allocatedbspmem += Q1_MAX_MAP_TEXINFO * sizeof( q1_texinfo_t );
	//faces
	q1_numfaces = 0;
	q1_dfaces = (q1_dface_t *) GetMemory( Q1_MAX_MAP_FACES * sizeof( q1_dface_t ) );
	q1_allocatedbspmem += Q1_MAX_MAP_FACES * sizeof( q1_dface_t );
	//clip nodes
	q1_numclipnodes = 0;
	q1_dclipnodes = (q1_dclipnode_t *) GetMemory( Q1_MAX_MAP_CLIPNODES * sizeof( q1_dclipnode_t ) );
	q1_allocatedbspmem += Q1_MAX_MAP_CLIPNODES * sizeof( q1_dclipnode_t );
	//edges
	q1_numedges = 0;
	q1_dedges = (q1_dedge_t *) GetMemory( Q1_MAX_MAP_EDGES * sizeof( q1_dedge_t ) );
	q1_allocatedbspmem += Q1_MAX_MAP_EDGES, sizeof( q1_dedge_t );
	//mark surfaces
	q1_nummarksurfaces = 0;
	q1_dmarksurfaces = (unsigned short *) GetMemory( Q1_MAX_MAP_MARKSURFACES * sizeof( unsigned short ) );
	q1_allocatedbspmem += Q1_MAX_MAP_MARKSURFACES * sizeof( unsigned short );
	//surface edges
	q1_numsurfedges = 0;
	q1_dsurfedges = (int *) GetMemory( Q1_MAX_MAP_SURFEDGES * sizeof( int ) );
	q1_allocatedbspmem += Q1_MAX_MAP_SURFEDGES * sizeof( int );
	//print allocated memory
	Log_Print( "allocated " );
	PrintMemorySize( q1_allocatedbspmem );
	Log_Print( " of BSP memory\n" );
} //end of the function Q1_AllocMaxBSP

void Q1_FreeMaxBSP( void ) {
	//models
	q1_nummodels = 0;
	FreeMemory( q1_dmodels );
	q1_dmodels = NULL;
	//visibility
	q1_visdatasize = 0;
	FreeMemory( q1_dvisdata );
	q1_dvisdata = NULL;
	//light data
	q1_lightdatasize = 0;
	FreeMemory( q1_dlightdata );
	q1_dlightdata = NULL;
	//texture data
	q1_texdatasize = 0;
	FreeMemory( q1_dtexdata );
	q1_dtexdata = NULL;
	//entities
	q1_entdatasize = 0;
	FreeMemory( q1_dentdata );
	q1_dentdata = NULL;
	//leaves
	q1_numleafs = 0;
	FreeMemory( q1_dleafs );
	q1_dleafs = NULL;
	//planes
	q1_numplanes = 0;
	FreeMemory( q1_dplanes );
	q1_dplanes = NULL;
	//vertexes
	q1_numvertexes = 0;
	FreeMemory( q1_dvertexes );
	q1_dvertexes = NULL;
	//nodes
	q1_numnodes = 0;
	FreeMemory( q1_dnodes );
	q1_dnodes = NULL;
	//texture info
	q1_numtexinfo = 0;
	FreeMemory( q1_texinfo );
	q1_texinfo = NULL;
	//faces
	q1_numfaces = 0;
	FreeMemory( q1_dfaces );
	q1_dfaces = NULL;
	//clip nodes
	q1_numclipnodes = 0;
	FreeMemory( q1_dclipnodes );
	q1_dclipnodes = NULL;
	//edges
	q1_numedges = 0;
	FreeMemory( q1_dedges );
	q1_dedges = NULL;
	//mark surfaces
	q1_nummarksurfaces = 0;
	FreeMemory( q1_dmarksurfaces );
	q1_dmarksurfaces = NULL;
	//surface edges
	q1_numsurfedges = 0;
	FreeMemory( q1_dsurfedges );
	q1_dsurfedges = NULL;
	//
	Log_Print( "freed " );
	PrintMemorySize( q1_allocatedbspmem );
	Log_Print( " of BSP memory\n" );
	q1_allocatedbspmem = 0;
} //end of the function Q1_FreeMaxBSP
//#endif //ME

/*
=============
Q1_SwapBSPFile

Byte swaps all data in a bsp file.
=============
*/
void Q1_SwapBSPFile( qboolean todisk ) {
	int i, j, c;
	q1_dmodel_t *d;
	q1_dmiptexlump_t *mtl;


// models
	for ( i = 0 ; i < q1_nummodels ; i++ )
	{
		d = &q1_dmodels[i];

		for ( j = 0 ; j < Q1_MAX_MAP_HULLS ; j++ )
			d->headnode[j] = LittleLong( d->headnode[j] );

		d->visleafs = LittleLong( d->visleafs );
		d->firstface = LittleLong( d->firstface );
		d->numfaces = LittleLong( d->numfaces );

		for ( j = 0 ; j < 3 ; j++ )
		{
			d->mins[j] = LittleFloat( d->mins[j] );
			d->maxs[j] = LittleFloat( d->maxs[j] );
			d->origin[j] = LittleFloat( d->origin[j] );
		}
	}

//
// vertexes
//
	for ( i = 0 ; i < q1_numvertexes ; i++ )
	{
		for ( j = 0 ; j < 3 ; j++ )
			q1_dvertexes[i].point[j] = LittleFloat( q1_dvertexes[i].point[j] );
	}

//
// planes
//
	for ( i = 0 ; i < q1_numplanes ; i++ )
	{
		for ( j = 0 ; j < 3 ; j++ )
			q1_dplanes[i].normal[j] = LittleFloat( q1_dplanes[i].normal[j] );
		q1_dplanes[i].dist = LittleFloat( q1_dplanes[i].dist );
		q1_dplanes[i].type = LittleLong( q1_dplanes[i].type );
	}

//
// texinfos
//
	for ( i = 0 ; i < q1_numtexinfo ; i++ )
	{
		for ( j = 0 ; j < 8 ; j++ )
			q1_texinfo[i].vecs[0][j] = LittleFloat( q1_texinfo[i].vecs[0][j] );
		q1_texinfo[i].miptex = LittleLong( q1_texinfo[i].miptex );
		q1_texinfo[i].flags = LittleLong( q1_texinfo[i].flags );
	}

//
// faces
//
	for ( i = 0 ; i < q1_numfaces ; i++ )
	{
		q1_dfaces[i].texinfo = LittleShort( q1_dfaces[i].texinfo );
		q1_dfaces[i].planenum = LittleShort( q1_dfaces[i].planenum );
		q1_dfaces[i].side = LittleShort( q1_dfaces[i].side );
		q1_dfaces[i].lightofs = LittleLong( q1_dfaces[i].lightofs );
		q1_dfaces[i].firstedge = LittleLong( q1_dfaces[i].firstedge );
		q1_dfaces[i].numedges = LittleShort( q1_dfaces[i].numedges );
	}

//
// nodes
//
	for ( i = 0 ; i < q1_numnodes ; i++ )
	{
		q1_dnodes[i].planenum = LittleLong( q1_dnodes[i].planenum );
		for ( j = 0 ; j < 3 ; j++ )
		{
			q1_dnodes[i].mins[j] = LittleShort( q1_dnodes[i].mins[j] );
			q1_dnodes[i].maxs[j] = LittleShort( q1_dnodes[i].maxs[j] );
		}
		q1_dnodes[i].children[0] = LittleShort( q1_dnodes[i].children[0] );
		q1_dnodes[i].children[1] = LittleShort( q1_dnodes[i].children[1] );
		q1_dnodes[i].firstface = LittleShort( q1_dnodes[i].firstface );
		q1_dnodes[i].numfaces = LittleShort( q1_dnodes[i].numfaces );
	}

//
// leafs
//
	for ( i = 0 ; i < q1_numleafs ; i++ )
	{
		q1_dleafs[i].contents = LittleLong( q1_dleafs[i].contents );
		for ( j = 0 ; j < 3 ; j++ )
		{
			q1_dleafs[i].mins[j] = LittleShort( q1_dleafs[i].mins[j] );
			q1_dleafs[i].maxs[j] = LittleShort( q1_dleafs[i].maxs[j] );
		}

		q1_dleafs[i].firstmarksurface = LittleShort( q1_dleafs[i].firstmarksurface );
		q1_dleafs[i].nummarksurfaces = LittleShort( q1_dleafs[i].nummarksurfaces );
		q1_dleafs[i].visofs = LittleLong( q1_dleafs[i].visofs );
	}

//
// clipnodes
//
	for ( i = 0 ; i < q1_numclipnodes ; i++ )
	{
		q1_dclipnodes[i].planenum = LittleLong( q1_dclipnodes[i].planenum );
		q1_dclipnodes[i].children[0] = LittleShort( q1_dclipnodes[i].children[0] );
		q1_dclipnodes[i].children[1] = LittleShort( q1_dclipnodes[i].children[1] );
	}

//
// miptex
//
	if ( q1_texdatasize ) {
		mtl = (q1_dmiptexlump_t *)q1_dtexdata;
		if ( todisk ) {
			c = mtl->nummiptex;
		} else {
			c = LittleLong( mtl->nummiptex );
		}
		mtl->nummiptex = LittleLong( mtl->nummiptex );
		for ( i = 0 ; i < c ; i++ )
			mtl->dataofs[i] = LittleLong( mtl->dataofs[i] );
	}

//
// marksurfaces
//
	for ( i = 0 ; i < q1_nummarksurfaces ; i++ )
		q1_dmarksurfaces[i] = LittleShort( q1_dmarksurfaces[i] );

//
// surfedges
//
	for ( i = 0 ; i < q1_numsurfedges ; i++ )
		q1_dsurfedges[i] = LittleLong( q1_dsurfedges[i] );

//
// edges
//
	for ( i = 0 ; i < q1_numedges ; i++ )
	{
		q1_dedges[i].v[0] = LittleShort( q1_dedges[i].v[0] );
		q1_dedges[i].v[1] = LittleShort( q1_dedges[i].v[1] );
	}
}


q1_dheader_t *q1_header;

int Q1_CopyLump( int lump, void *dest, int size ) {
	int length, ofs;

	length = q1_header->lumps[lump].filelen;
	ofs = q1_header->lumps[lump].fileofs;

	if ( length % size ) {
		Error( "Q1_LoadBSPFile: odd lump size" );
	}

	memcpy( dest, (byte *)q1_header + ofs, length );

	return length / size;
}

/*
=============
Q1_LoadBSPFile
=============
*/
void    Q1_LoadBSPFile( char *filename, int offset, int length ) {
	int i;

//
// load the file header
//
	LoadFile( filename, (void **)&q1_header, offset, length );

// swap the header
	for ( i = 0 ; i < sizeof( q1_dheader_t ) / 4 ; i++ )
		( (int *)q1_header )[i] = LittleLong( ( (int *)q1_header )[i] );

	if ( q1_header->version != Q1_BSPVERSION ) {
		Error( "%s is version %i, not %i", filename, i, Q1_BSPVERSION );
	}

	q1_nummodels = Q1_CopyLump( Q1_LUMP_MODELS, q1_dmodels, sizeof( q1_dmodel_t ) );
	q1_numvertexes = Q1_CopyLump( Q1_LUMP_VERTEXES, q1_dvertexes, sizeof( q1_dvertex_t ) );
	q1_numplanes = Q1_CopyLump( Q1_LUMP_PLANES, q1_dplanes, sizeof( q1_dplane_t ) );
	q1_numleafs = Q1_CopyLump( Q1_LUMP_LEAFS, q1_dleafs, sizeof( q1_dleaf_t ) );
	q1_numnodes = Q1_CopyLump( Q1_LUMP_NODES, q1_dnodes, sizeof( q1_dnode_t ) );
	q1_numtexinfo = Q1_CopyLump( Q1_LUMP_TEXINFO, q1_texinfo, sizeof( q1_texinfo_t ) );
	q1_numclipnodes = Q1_CopyLump( Q1_LUMP_CLIPNODES, q1_dclipnodes, sizeof( q1_dclipnode_t ) );
	q1_numfaces = Q1_CopyLump( Q1_LUMP_FACES, q1_dfaces, sizeof( q1_dface_t ) );
	q1_nummarksurfaces = Q1_CopyLump( Q1_LUMP_MARKSURFACES, q1_dmarksurfaces, sizeof( q1_dmarksurfaces[0] ) );
	q1_numsurfedges = Q1_CopyLump( Q1_LUMP_SURFEDGES, q1_dsurfedges, sizeof( q1_dsurfedges[0] ) );
	q1_numedges = Q1_CopyLump( Q1_LUMP_EDGES, q1_dedges, sizeof( q1_dedge_t ) );

	q1_texdatasize = Q1_CopyLump( Q1_LUMP_TEXTURES, q1_dtexdata, 1 );
	q1_visdatasize = Q1_CopyLump( Q1_LUMP_VISIBILITY, q1_dvisdata, 1 );
	q1_lightdatasize = Q1_CopyLump( Q1_LUMP_LIGHTING, q1_dlightdata, 1 );
	q1_entdatasize = Q1_CopyLump( Q1_LUMP_ENTITIES, q1_dentdata, 1 );

	FreeMemory( q1_header );      // everything has been copied out

//
// swap everything
//
	Q1_SwapBSPFile( false );
}

//============================================================================

FILE *q1_wadfile;
q1_dheader_t q1_outheader;

void Q1_AddLump( int lumpnum, void *data, int len ) {
	q1_lump_t *lump;

	lump = &q1_header->lumps[lumpnum];

	lump->fileofs = LittleLong( ftell( q1_wadfile ) );
	lump->filelen = LittleLong( len );
	SafeWrite( q1_wadfile, data, ( len + 3 ) & ~3 );
}

/*
=============
Q1_WriteBSPFile

Swaps the bsp file in place, so it should not be referenced again
=============
*/
void    Q1_WriteBSPFile( char *filename ) {
	q1_header = &q1_outheader;
	memset( q1_header, 0, sizeof( q1_dheader_t ) );

	Q1_SwapBSPFile( true );

	q1_header->version = LittleLong( Q1_BSPVERSION );

	q1_wadfile = SafeOpenWrite( filename );
	SafeWrite( q1_wadfile, q1_header, sizeof( q1_dheader_t ) );    // overwritten later

	Q1_AddLump( Q1_LUMP_PLANES, q1_dplanes, q1_numplanes * sizeof( q1_dplane_t ) );
	Q1_AddLump( Q1_LUMP_LEAFS, q1_dleafs, q1_numleafs * sizeof( q1_dleaf_t ) );
	Q1_AddLump( Q1_LUMP_VERTEXES, q1_dvertexes, q1_numvertexes * sizeof( q1_dvertex_t ) );
	Q1_AddLump( Q1_LUMP_NODES, q1_dnodes, q1_numnodes * sizeof( q1_dnode_t ) );
	Q1_AddLump( Q1_LUMP_TEXINFO, q1_texinfo, q1_numtexinfo * sizeof( q1_texinfo_t ) );
	Q1_AddLump( Q1_LUMP_FACES, q1_dfaces, q1_numfaces * sizeof( q1_dface_t ) );
	Q1_AddLump( Q1_LUMP_CLIPNODES, q1_dclipnodes, q1_numclipnodes * sizeof( q1_dclipnode_t ) );
	Q1_AddLump( Q1_LUMP_MARKSURFACES, q1_dmarksurfaces, q1_nummarksurfaces * sizeof( q1_dmarksurfaces[0] ) );
	Q1_AddLump( Q1_LUMP_SURFEDGES, q1_dsurfedges, q1_numsurfedges * sizeof( q1_dsurfedges[0] ) );
	Q1_AddLump( Q1_LUMP_EDGES, q1_dedges, q1_numedges * sizeof( q1_dedge_t ) );
	Q1_AddLump( Q1_LUMP_MODELS, q1_dmodels, q1_nummodels * sizeof( q1_dmodel_t ) );

	Q1_AddLump( Q1_LUMP_LIGHTING, q1_dlightdata, q1_lightdatasize );
	Q1_AddLump( Q1_LUMP_VISIBILITY, q1_dvisdata, q1_visdatasize );
	Q1_AddLump( Q1_LUMP_ENTITIES, q1_dentdata, q1_entdatasize );
	Q1_AddLump( Q1_LUMP_TEXTURES, q1_dtexdata, q1_texdatasize );

	fseek( q1_wadfile, 0, SEEK_SET );
	SafeWrite( q1_wadfile, q1_header, sizeof( q1_dheader_t ) );
	fclose( q1_wadfile );
}

//============================================================================

/*
=============
Q1_PrintBSPFileSizes

Dumps info about current file
=============
*/
void Q1_PrintBSPFileSizes( void ) {
	printf( "%5i planes       %6i\n"
			,q1_numplanes, (int)( q1_numplanes * sizeof( q1_dplane_t ) ) );
	printf( "%5i vertexes     %6i\n"
			,q1_numvertexes, (int)( q1_numvertexes * sizeof( q1_dvertex_t ) ) );
	printf( "%5i nodes        %6i\n"
			,q1_numnodes, (int)( q1_numnodes * sizeof( q1_dnode_t ) ) );
	printf( "%5i texinfo      %6i\n"
			,q1_numtexinfo, (int)( q1_numtexinfo * sizeof( q1_texinfo_t ) ) );
	printf( "%5i faces        %6i\n"
			,q1_numfaces, (int)( q1_numfaces * sizeof( q1_dface_t ) ) );
	printf( "%5i clipnodes    %6i\n"
			,q1_numclipnodes, (int)( q1_numclipnodes * sizeof( q1_dclipnode_t ) ) );
	printf( "%5i leafs        %6i\n"
			,q1_numleafs, (int)( q1_numleafs * sizeof( q1_dleaf_t ) ) );
	printf( "%5i marksurfaces %6i\n"
			,q1_nummarksurfaces, (int)( q1_nummarksurfaces * sizeof( q1_dmarksurfaces[0] ) ) );
	printf( "%5i surfedges    %6i\n"
			,q1_numsurfedges, (int)( q1_numsurfedges * sizeof( q1_dmarksurfaces[0] ) ) );
	printf( "%5i edges        %6i\n"
			,q1_numedges, (int)( q1_numedges * sizeof( q1_dedge_t ) ) );
	if ( !q1_texdatasize ) {
		printf( "    0 textures          0\n" );
	} else {
		printf( "%5i textures     %6i\n",( (q1_dmiptexlump_t*)q1_dtexdata )->nummiptex, q1_texdatasize );
	}
	printf( "      lightdata    %6i\n", q1_lightdatasize );
	printf( "      visdata      %6i\n", q1_visdatasize );
	printf( "      entdata      %6i\n", q1_entdatasize );
} //end of the function Q1_PrintBSPFileSizes


/*
================
Q1_ParseEntities

Parses the dentdata string into entities
================
*/
void Q1_ParseEntities( void ) {
	script_t *script;

	num_entities = 0;
	script = LoadScriptMemory( q1_dentdata, q1_entdatasize, "*Quake1 bsp file" );
	SetScriptFlags( script, SCFL_NOSTRINGWHITESPACES |
					SCFL_NOSTRINGESCAPECHARS );

	while ( ParseEntity( script ) )
	{
	} //end while

	FreeScript( script );
} //end of the function Q1_ParseEntities


/*
================
Q1_UnparseEntities

Generates the dentdata string from all the entities
================
*/
void Q1_UnparseEntities( void ) {
	char *buf, *end;
	epair_t *ep;
	char line[2048];
	int i;

	buf = q1_dentdata;
	end = buf;
	*end = 0;

	for ( i = 0 ; i < num_entities ; i++ )
	{
		ep = entities[i].epairs;
		if ( !ep ) {
			continue;   // ent got removed

		}
		strcat( end,"{\n" );
		end += 2;

		for ( ep = entities[i].epairs ; ep ; ep = ep->next )
		{
			sprintf( line, "\"%s\" \"%s\"\n", ep->key, ep->value );
			strcat( end, line );
			end += strlen( line );
		}
		strcat( end,"}\n" );
		end += 2;

		if ( end > buf + Q1_MAX_MAP_ENTSTRING ) {
			Error( "Entity text too long" );
		}
	}
	q1_entdatasize = end - buf + 1;
} //end of the function Q1_UnparseEntities
