gtkradiant/radiant/eclass.cpp

494 lines
12 KiB
C++

/*
Copyright (C) 1999-2007 id Software, Inc. and contributors.
For a list of contributors, see the accompanying CONTRIBUTORS file.
This file is part of GtkRadiant.
GtkRadiant 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.
GtkRadiant 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 GtkRadiant; if not, write to the Free Software
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
*/
#include "stdafx.h"
#include <sys/stat.h>
#if defined (__linux__) || defined (__APPLE__)
#include <dirent.h>
#endif
#include "assert.h"
eclass_t *eclass = NULL;
eclass_t *eclass_bad = NULL;
const vec3_t smallbox[2] = {{-8,-8,-8},{8,8,8}};
char eclass_directory[1024];
qboolean parsing_single = false;
eclass_t *eclass_e;
/*!
implementation of the EClass manager API
*/
eclass_t** Get_EClass_E()
{
return &eclass_e;
}
void Set_Eclass_Found(qboolean b)
{
eclass_found = b;
}
qboolean Get_Parsing_Single()
{
return parsing_single;
}
// md3 cache for misc_models
//eclass_t *g_md3Cache = NULL;
/*
the classname, color triple, and bounding box are parsed out of comments
A ? size means take the exact brush size.
/ *QUAKED <classname> (0 0 0) ?
/ *QUAKED <classname> (0 0 0) (-8 -8 -8) (8 8 8)
Flag names can follow the size description:
/ *QUAKED func_door (0 .5 .8) ? START_OPEN STONE_SOUND DOOR_DONT_LINK GOLD_KEY SILVER_KEY
*/
void CleanEntityList(eclass_t *&pList)
{
while (pList)
{
eclass_t* pTemp = pList->next;
entitymodel *model = pList->model;
while (model != NULL)
{
delete []model->pTriList;
if (model->strSkin)
g_string_free( (GString *)model->strSkin, TRUE );
model->strSkin = NULL;
model = model->pNext;
}
if (pList->modelpath) {
free(pList->modelpath);
pList->modelpath = NULL;
}
if (pList->skinpath) {
free(pList->skinpath);
pList->skinpath = NULL;
}
free(pList->name);
free(pList->comments);
free(pList);
pList = pTemp;
}
pList = NULL;
}
void CleanUpEntities()
{
// NOTE: maybe some leak checks needed .. older versions of Radiant looked like they were freezing more stuff
CleanEntityList(eclass);
//CleanEntityList(g_md3Cache);
if (eclass_bad)
{
free(eclass_bad->name);
free(eclass_bad->comments);
free(eclass_bad);
eclass_bad = NULL;
}
}
void EClass_InsertSortedList(eclass_t *&pList, eclass_t *e)
{
eclass_t *s;
if (!pList)
{
pList = e;
return;
}
s = pList;
if (stricmp (e->name, s->name) < 0)
{
e->next = s;
pList = e;
return;
}
do
{
if (!s->next || stricmp (e->name, s->next->name) < 0)
{
e->next = s->next;
s->next = e;
return;
}
s=s->next;
} while (1);
}
/*
=================
Eclass_InsertAlphabetized
=================
*/
void Eclass_InsertAlphabetized (eclass_t *e)
{
#if 1
EClass_InsertSortedList(eclass, e);
#else
eclass_t *s;
if (!eclass)
{
eclass = e;
return;
}
s = eclass;
if (stricmp (e->name, s->name) < 0)
{
e->next = s;
eclass = e;
return;
}
do
{
if (!s->next || stricmp (e->name, s->next->name) < 0)
{
e->next = s->next;
s->next = e;
return;
}
s=s->next;
} while (1);
#endif
}
/*!
This looks at each eclass_t, if it has a "modelpath" set then it leaves it alone
if it's not set it checks to see if a file called "sprites/<eclassname>.*" exists, and
if it does exist then it sets the "modelpath" to "sprites/<eclassname>.spr"
*/
void Eclass_CreateSpriteModelPaths()
{
int Counts[4] = { 0, 0, 0, 0 };
char filename[512]; // should be big enough, ExtractFileBase doesn't take a buffer size...
eclass_t *e;
// get a list of all sprite/*>* files in all sprite/ directories
Sys_Printf("Searching VFS for files in sprites/*.* that match entity names...\n");
GSList *pFiles = vfsGetFileList("sprites", NULL);
GSList *pFile;
if (pFiles)
{
// find an eclass without a modelpath.
for (e=eclass ; e ; e=e->next)
{
Counts[0]++;
if (e->modelpath)
{
#ifdef _DEBUG
Sys_Printf("Ignoring sprite for entity %s (modelpath: \"%s\")\n",e->name,e->modelpath);
#endif
Counts[1]++;
continue; // ignore this eclass, it's already got a model
}
// TODO: remove this check when we can have sprites for non-fixed size entities.
if (!e->fixedsize)
{
#ifdef _DEBUG
Sys_Printf("Ignoring sprite for non-fixed-size entity %s\n",e->name);
#endif
Counts[2]++;
continue; // can't have sprites for non-fixed size entities (yet!)
}
Sys_Printf("Searching for sprite for fixed-size entity %s...",e->name);
pFile = pFiles; // point to start of list
// look for a file that has the same name, with any extension.
bool Found = FALSE;
while (pFile)
{
// strip the path/ and the .extension.
ExtractFileBase((char *)pFile->data,filename);
// does the eclass name match the filename?
if (stricmp(e->name,filename) == 0)
{
// yes, so generate a sprite filename using the all-encompasing .spr extension
// so that the model wrapper knows the sprite model plugin will be the model
// plugin used to render it.
CString strSpriteName;
strSpriteName.Format("sprites/%s.spr",e->name);
e->modelpath = strdup(strSpriteName.GetBuffer());
Sys_Printf("Found! (\"%s\")\n",(char *)pFile->data);
Counts[3]++;
Found = TRUE;
}
pFile = pFile->next;
}
if (!Found)
Sys_Printf("not found\n");
}
vfsClearFileDirList(&pFiles);
}
Sys_Printf("%d entities were scanned\n"
"%d entities that already had models/sprites were ignored\n"
"%d non-fixed-size entities were ignored\n"
"%d entities did not have matching sprite files\n"
"%d entities had sprite files and have been attached\n",
Counts[0],Counts[1],Counts[2],Counts[0]-Counts[3],Counts[3]);
}
void EClass_InitForFileList(GSList *pFiles, _EClassTable *pTable)
{
GSList *pFile = pFiles;
while (pFile)
{
// for a given name, we grab the first .def in the vfs
// this allows to override baseq3/scripts/entities.def for instance
char relPath[PATH_MAX];
strcpy(relPath, "scripts/");
strcat(relPath, (char*)pFile->data);
if (!vfsGetFullPath(relPath, 0, 0))
{
Sys_FPrintf(SYS_ERR, "Failed to find the full path for '%s' in the VFS\n", relPath);
}
else
pTable->m_pfnScanFile(vfsGetFullPath(relPath, 0, 0));
pFile = pFile->next;
}
}
/*!
Manually create an eclass_t, for when no modules exist.
this replaces and centralizes the eclass_t allocation
*/
eclass_t * EClass_Create( const char *name, float col1, float col2, float col3, const vec3_t *mins, const vec3_t *maxs, const char *comments )
{
eclass_t *e;
char color[128];
e = (eclass_t*)malloc(sizeof(*e));
memset (e, 0, sizeof(*e));
e->name = strdup(name);
// grab the color, reformat as texture name
e->color[0] = col1;
e->color[1] = col2;
e->color[2] = col3;
sprintf (color, "(%f %f %f)", e->color[0], e->color[1], e->color[2]);
e->texdef.SetName(color);
// supplied size ?
if (mins && maxs)
{
// Hydra:
// If we set worldspawn to be a fixed-size all the textures are
// displayed as flat-shaded. This is a KLUDGE now that we have
// multiple game support as the worldspawn entity is game specific.
// Note that this is only ever fixed for the user if a definition
// for the worldspawn entity was not loaded, this can happen for
// several reasons:
// a) no entity definition plugin exists
// b) no entity definition files were found
// c) no entity definition file contained an entry for worldspawn.
if (stricmp(name,"worldspawn") != 0) e->fixedsize = true;
// copy the sizes..
memcpy(e->mins,mins,sizeof(vec3_t));
memcpy(e->maxs,maxs,sizeof(vec3_t));
}
if (comments)
e->comments = strdup(comments);
else
{
e->comments = (char*)malloc(1);
e->comments[0] = '\0';
}
return e;
}
void Eclass_Init ()
{
GSList *pFiles;
// start by creating the default unknown eclass
eclass_bad = EClass_Create("UNKNOWN_CLASS" , 0, 0.5, 0,NULL,NULL,NULL);
// now scan the definitions
_EClassTable *pTable = &g_EClassDefTable;
while (pTable)
{
// read in all scripts/*.<extension>
pFiles = vfsGetFileList("scripts", pTable->m_pfnGetExtension());
if (pFiles)
{
GSList *pFile = pFiles;
while (pFile)
{
/*!
\todo the MP/SP filtering rules need to be CLEANED UP and SANITIZED
*/
// HACK
// JKII SP/MP mapping mode
if (g_pGameDescription->mGameFile == "jk2.game" || g_pGameDescription->mGameFile == "ja.game")
{
if (!strcmp(ValueForKey(g_qeglobals.d_project_entity, "gamemode"), "sp"))
{
// SP mapping, ignore mp_*.def
char *name = (char *)pFile->data;
if (name[0]=='m' && name[1]=='p' && name[2]=='_')
{
Sys_Printf("Single Player mapping mode. Ignoring '%s'\n", name);
pFile = pFile->next;
continue;
}
}
else
{
// MP mapping, ignore sp_*.def
char *name = (char *)pFile->data;
if (name[0]=='s' && name[1]=='p' && name[2]=='_')
{
Sys_Printf("Multiplayer mapping mode. Ignoring '%s'\n", name);
pFile = pFile->next;
continue;
}
}
}
// RIANT
// STVEF SP/MP mapping mode
else if (g_pGameDescription->mGameFile == "stvef.game")
{
if (!strcmp(ValueForKey(g_qeglobals.d_project_entity, "gamemode"), "sp"))
{
// SP mapping, ignore mp_*.def
char *name = (char *)pFile->data;
if (name[0]=='m' && name[1]=='p' && name[2]=='_')
{
Sys_Printf("Single Player mapping mode. Ignoring '%s'\n", name);
pFile = pFile->next;
continue;
}
}
else
{
// HM mapping, ignore sp_*.def
char *name = (char *)pFile->data;
if (name[0]=='h' && name[1]=='m' && name[2]=='_')
{
Sys_Printf("HoloMatch mapping mode. Ignoring '%s'\n", name);
pFile = pFile->next;
continue;
}
}
}
// for a given name, we grab the first .def in the vfs
// this allows to override baseq3/scripts/entities.def for instance
char relPath[PATH_MAX];
strcpy(relPath, "scripts/");
strcat(relPath, (char*)pFile->data);
char *fullpath = vfsGetFullPath(relPath, 0, 0);
if (!fullpath)
{
Sys_FPrintf(SYS_ERR, "Failed to find the full path for \"%s\" in the VFS\n", relPath);
}
else
pTable->m_pfnScanFile(fullpath);
if (g_pGameDescription->mEClassSingleLoad)
break;
pFile = pFile->next;
}
vfsClearFileDirList(&pFiles);
pFiles = NULL;
}
else
Sys_FPrintf(SYS_ERR, "Didn't find any scripts/*.%s files to load EClass information\n", pTable->m_pfnGetExtension());
// we deal with two formats max, if the other table exists, loop again
if (g_bHaveEClassExt && pTable == &g_EClassDefTable)
pTable = &g_EClassExtTable;
else
pTable = NULL; // done, exit
}
Eclass_CreateSpriteModelPaths();
}
eclass_t *Eclass_ForName (const char *name, qboolean has_brushes)
{
eclass_t *e;
if (!name || *name == '\0')
return eclass_bad;
#ifdef _DEBUG
// grouping stuff, not an eclass
if (strcmp(name, "group_info")==0)
Sys_Printf("WARNING: unexpected group_info entity in Eclass_ForName\n");
#endif
if (!name)
return eclass_bad;
for (e=eclass ; e ; e=e->next)
if (!strcmp (name, e->name))
return e;
// create a new class for it
if (has_brushes)
{
e = EClass_Create(name , 0, 0.5, 0,NULL,NULL,"Not found in source.");
}
else
{
e = EClass_Create(name , 0, 0.5, 0,&smallbox[0],&smallbox[1],"Not found in source.");
}
Eclass_InsertAlphabetized (e);
return e;
}