-/*\r
-Copyright (C) 1999-2007 id Software, Inc. and contributors.\r
-For a list of contributors, see the accompanying CONTRIBUTORS file.\r
-\r
-This file is part of GtkRadiant.\r
-\r
-GtkRadiant is free software; you can redistribute it and/or modify\r
-it under the terms of the GNU General Public License as published by\r
-the Free Software Foundation; either version 2 of the License, or\r
-(at your option) any later version.\r
-\r
-GtkRadiant is distributed in the hope that it will be useful,\r
-but WITHOUT ANY WARRANTY; without even the implied warranty of\r
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
-GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License\r
-along with GtkRadiant; if not, write to the Free Software\r
-Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA\r
-*/\r
-\r
-\r
-#include "aselib.h"\r
-#include "inout.h"\r
-\r
-#include <assert.h>\r
-#include <stdio.h>\r
-#include <stdlib.h>\r
-\r
-#define MAX_ASE_MATERIALS 32\r
-#define MAX_ASE_OBJECTS 64\r
-#define MAX_ASE_ANIMATIONS 32\r
-#define MAX_ASE_ANIMATION_FRAMES 512\r
-\r
-#define VERBOSE( x ) { if ( ase.verbose ) { Sys_Printf x ; } }\r
-\r
-typedef struct\r
-{\r
- float x, y, z;\r
- float nx, ny, nz;\r
- float s, t;\r
-} aseVertex_t;\r
-\r
-typedef struct\r
-{\r
- float s, t;\r
-} aseTVertex_t;\r
-\r
-typedef int aseFace_t[3];\r
-\r
-typedef struct\r
-{\r
- int numFaces;\r
- int numVertexes;\r
- int numTVertexes;\r
-\r
- int timeValue;\r
-\r
- aseVertex_t *vertexes;\r
- aseTVertex_t *tvertexes;\r
- aseFace_t *faces, *tfaces;\r
-\r
- int currentFace, currentVertex;\r
-} aseMesh_t;\r
-\r
-typedef struct\r
-{\r
- int numFrames;\r
- aseMesh_t frames[MAX_ASE_ANIMATION_FRAMES];\r
-\r
- int currentFrame;\r
-} aseMeshAnimation_t;\r
-\r
-typedef struct\r
-{\r
- char name[128];\r
-} aseMaterial_t;\r
-\r
-/*\r
-** contains the animate sequence of a single surface\r
-** using a single material\r
-*/\r
-typedef struct\r
-{\r
- char name[128];\r
-\r
- int materialRef;\r
- int numAnimations;\r
-\r
- aseMeshAnimation_t anim;\r
-\r
-} aseGeomObject_t;\r
-\r
-typedef struct\r
-{\r
- int numMaterials;\r
- aseMaterial_t materials[MAX_ASE_MATERIALS];\r
- aseGeomObject_t objects[MAX_ASE_OBJECTS];\r
-\r
- char *buffer;\r
- char *curpos;\r
- int len;\r
-\r
- int currentObject;\r
- qboolean verbose;\r
- qboolean grabAnims;\r
-\r
-} ase_t;\r
-\r
-static char s_token[1024];\r
-static ase_t ase;\r
-static char gl_filename[1024];\r
-\r
-static void ASE_Process( void );\r
-static void ASE_FreeGeomObject( int ndx );\r
-\r
-#if defined (__linux__) || defined (__APPLE__)\r
-\r
-static char* strlwr (char* string)\r
-{\r
- char *cp;\r
- for (cp = string; *cp; ++cp)\r
- {\r
- if ('A' <= *cp && *cp <= 'Z')\r
- *cp += 'a' - 'A';\r
- }\r
- \r
- return string;\r
-}\r
-\r
-#endif\r
-\r
-/*\r
-** ASE_Load\r
-*/\r
-void ASE_Load( const char *filename, qboolean verbose, qboolean grabAnims )\r
-{\r
- FILE *fp = fopen( filename, "rb" );\r
-\r
- if ( !fp )\r
- Error( "File not found '%s'", filename );\r
-\r
- memset( &ase, 0, sizeof( ase ) );\r
-\r
- ase.verbose = verbose;\r
- ase.grabAnims = grabAnims;\r
- ase.len = Q_filelength( fp );\r
-\r
- ase.curpos = ase.buffer = safe_malloc( ase.len );\r
-\r
- Sys_Printf( "Processing '%s'\n", filename );\r
-\r
- if ( fread( ase.buffer, ase.len, 1, fp ) != 1 )\r
- {\r
- fclose( fp );\r
- Error( "fread() != -1 for '%s'", filename );\r
- }\r
-\r
- fclose( fp );\r
-\r
- strcpy(gl_filename, filename);\r
- \r
- ASE_Process();\r
-}\r
-\r
-/*\r
-** ASE_Free\r
-*/\r
-void ASE_Free( void )\r
-{\r
- int i;\r
-\r
- for ( i = 0; i < ase.currentObject; i++ )\r
- {\r
- ASE_FreeGeomObject( i );\r
- }\r
-}\r
-\r
-/*\r
-** ASE_GetNumSurfaces\r
-*/\r
-int ASE_GetNumSurfaces( void )\r
-{\r
- return ase.currentObject;\r
-}\r
-\r
-/*\r
-** ASE_GetSurfaceName\r
-*/\r
-const char *ASE_GetSurfaceName( int which )\r
-{\r
- aseGeomObject_t *pObject = &ase.objects[which];\r
-\r
- if ( !pObject->anim.numFrames )\r
- return 0;\r
-\r
- return pObject->name;\r
-}\r
-\r
-/*\r
-** ASE_GetSurfaceAnimation\r
-**\r
-** Returns an animation (sequence of polysets)\r
-*/\r
-polyset_t *ASE_GetSurfaceAnimation( int which, int *pNumFrames, int skipFrameStart, int skipFrameEnd, int maxFrames )\r
-{\r
- aseGeomObject_t *pObject = &ase.objects[which];\r
- polyset_t *psets;\r
- int numFramesInAnimation;\r
- int numFramesToKeep;\r
- int i, f;\r
-\r
- if ( !pObject->anim.numFrames )\r
- return 0;\r
-\r
- if ( pObject->anim.numFrames > maxFrames && maxFrames != -1 )\r
- {\r
- numFramesInAnimation = maxFrames;\r
- }\r
- else \r
- {\r
- numFramesInAnimation = pObject->anim.numFrames;\r
- if ( maxFrames != -1 )\r
- Sys_Printf( "WARNING: ASE_GetSurfaceAnimation maxFrames > numFramesInAnimation\n" );\r
- }\r
-\r
- if ( skipFrameEnd != -1 )\r
- numFramesToKeep = numFramesInAnimation - ( skipFrameEnd - skipFrameStart + 1 );\r
- else\r
- numFramesToKeep = numFramesInAnimation;\r
-\r
- *pNumFrames = numFramesToKeep;\r
-\r
- psets = calloc( sizeof( polyset_t ) * numFramesToKeep, 1 );\r
-\r
- for ( f = 0, i = 0; i < numFramesInAnimation; i++ )\r
- {\r
- int t;\r
- aseMesh_t *pMesh = &pObject->anim.frames[i];\r
-\r
- if ( skipFrameStart != -1 )\r
- {\r
- if ( i >= skipFrameStart && i <= skipFrameEnd )\r
- continue;\r
- }\r
-\r
- strcpy( psets[f].name, pObject->name );\r
- strcpy( psets[f].materialname, ase.materials[pObject->materialRef].name );\r
-\r
- psets[f].triangles = calloc( sizeof( triangle_t ) * pObject->anim.frames[i].numFaces, 1 );\r
- psets[f].numtriangles = pObject->anim.frames[i].numFaces;\r
-\r
- for ( t = 0; t < pObject->anim.frames[i].numFaces; t++ )\r
- {\r
- int k;\r
-\r
- for ( k = 0; k < 3; k++ )\r
- {\r
- psets[f].triangles[t].verts[k][0] = pMesh->vertexes[pMesh->faces[t][k]].x;\r
- psets[f].triangles[t].verts[k][1] = pMesh->vertexes[pMesh->faces[t][k]].y;\r
- psets[f].triangles[t].verts[k][2] = pMesh->vertexes[pMesh->faces[t][k]].z;\r
-\r
- if ( pMesh->tvertexes && pMesh->tfaces )\r
- {\r
- psets[f].triangles[t].texcoords[k][0] = pMesh->tvertexes[pMesh->tfaces[t][k]].s;\r
- psets[f].triangles[t].texcoords[k][1] = pMesh->tvertexes[pMesh->tfaces[t][k]].t;\r
- }\r
-\r
- }\r
- }\r
-\r
- f++;\r
- }\r
-\r
- return psets;\r
-}\r
-\r
-static void ASE_FreeGeomObject( int ndx )\r
-{\r
- aseGeomObject_t *pObject;\r
- int i;\r
-\r
- pObject = &ase.objects[ndx];\r
-\r
- for ( i = 0; i < pObject->anim.numFrames; i++ )\r
- {\r
- if ( pObject->anim.frames[i].vertexes )\r
- {\r
- free( pObject->anim.frames[i].vertexes );\r
- }\r
- if ( pObject->anim.frames[i].tvertexes )\r
- {\r
- free( pObject->anim.frames[i].tvertexes );\r
- }\r
- if ( pObject->anim.frames[i].faces )\r
- {\r
- free( pObject->anim.frames[i].faces );\r
- }\r
- if ( pObject->anim.frames[i].tfaces )\r
- {\r
- free( pObject->anim.frames[i].tfaces );\r
- }\r
- }\r
-\r
- memset( pObject, 0, sizeof( *pObject ) );\r
-}\r
-\r
-static aseMesh_t *ASE_GetCurrentMesh( void )\r
-{\r
- aseGeomObject_t *pObject;\r
-\r
- if ( ase.currentObject >= MAX_ASE_OBJECTS )\r
- {\r
- Error( "Too many GEOMOBJECTs" );\r
- return 0; // never called\r
- }\r
-\r
- pObject = &ase.objects[ase.currentObject];\r
-\r
- if ( pObject->anim.currentFrame >= MAX_ASE_ANIMATION_FRAMES )\r
- {\r
- Error( "Too many MESHes" );\r
- return 0;\r
- }\r
-\r
- return &pObject->anim.frames[pObject->anim.currentFrame];\r
-}\r
-\r
-static int CharIsTokenDelimiter( int ch )\r
-{\r
- if ( ch <= 32 )\r
- return 1;\r
- return 0;\r
-}\r
-\r
-static int ASE_GetToken( qboolean restOfLine )\r
-{\r
- int i = 0;\r
-\r
- if ( ase.buffer == 0 )\r
- return 0;\r
-\r
- if ( ( ase.curpos - ase.buffer ) == ase.len )\r
- return 0;\r
-\r
- // skip over crap\r
- while ( ( ( ase.curpos - ase.buffer ) < ase.len ) &&\r
- ( *ase.curpos <= 32 ) )\r
- {\r
- ase.curpos++;\r
- }\r
-\r
- while ( ( ase.curpos - ase.buffer ) < ase.len )\r
- {\r
- s_token[i] = *ase.curpos;\r
-\r
- ase.curpos++;\r
- i++;\r
-\r
- if ( ( CharIsTokenDelimiter( s_token[i-1] ) && !restOfLine ) ||\r
- ( ( s_token[i-1] == '\n' ) || ( s_token[i-1] == '\r' ) ) )\r
- {\r
- s_token[i-1] = 0;\r
- break;\r
- }\r
- }\r
-\r
- s_token[i] = 0;\r
-\r
- return 1;\r
-}\r
-\r
-static void ASE_ParseBracedBlock( void (*parser)( const char *token ) )\r
-{\r
- int indent = 0;\r
-\r
- while ( ASE_GetToken( qfalse ) )\r
- {\r
- if ( !strcmp( s_token, "{" ) )\r
- {\r
- indent++;\r
- }\r
- else if ( !strcmp( s_token, "}" ) )\r
- {\r
- --indent;\r
- if ( indent == 0 )\r
- break;\r
- else if ( indent < 0 )\r
- Error( "Unexpected '}'" );\r
- }\r
- else\r
- {\r
- if ( parser )\r
- parser( s_token );\r
- }\r
- }\r
-}\r
-\r
-static void ASE_SkipEnclosingBraces( void )\r
-{\r
- int indent = 0;\r
-\r
- while ( ASE_GetToken( qfalse ) )\r
- {\r
- if ( !strcmp( s_token, "{" ) )\r
- {\r
- indent++;\r
- }\r
- else if ( !strcmp( s_token, "}" ) )\r
- {\r
- indent--;\r
- if ( indent == 0 )\r
- break;\r
- else if ( indent < 0 )\r
- Error( "Unexpected '}'" );\r
- }\r
- }\r
-}\r
-\r
-static void ASE_SkipRestOfLine( void )\r
-{\r
- ASE_GetToken( qtrue );\r
-}\r
-\r
-static void ASE_KeyMAP_DIFFUSE( const char *token )\r
-{\r
- char fullpath[1024], bitmap[1024], modeldir[1024];\r
- char filename[1024];\r
- int i = 0, count;\r
-\r
- strcpy(filename, gl_filename);\r
-\r
- if ( !strcmp( token, "*BITMAP" ) )\r
- {\r
- ASE_GetToken( qfalse );\r
-\r
- // the purpose of this whole chunk of code below is to extract the relative path\r
- // from a full path in the ASE\r
- \r
- strcpy( bitmap, s_token + 1 );\r
- if ( strchr( bitmap, '"' ) )\r
- *strchr( bitmap, '"' ) = 0;\r
-\r
- /* convert backslash to slash */\r
- while ( bitmap[i] )\r
- {\r
- if ( bitmap[i] == '\\' )\r
- bitmap[i] = '/';\r
- i++;\r
- }\r
-\r
- /* remove filename from path */\r
- for( i=strlen(filename); i>0; i--)\r
- {\r
- if(filename[i] == '/')\r
- {\r
- filename[i] = '\0';\r
- break;\r
- }\r
- }\r
-\r
- /* replaces a relative path with a full path */\r
- if(bitmap[0] == '.' && bitmap[1] == '.' && bitmap[2] == '/')\r
- {\r
- while(bitmap[0] == '.' && bitmap[1] == '.' && bitmap[2] == '/')\r
- {\r
- /* remove last item from path */\r
- for( i=strlen(filename); i>0; i--)\r
- {\r
- if(filename[i] == '/')\r
- {\r
- filename[i] = '\0';\r
- break;\r
- }\r
- }\r
- strcpy(bitmap, &bitmap[3]);\r
- }\r
- strcat(filename, "/");\r
- strcat(filename, bitmap);\r
- strcpy(bitmap, filename);\r
- }\r
-\r
- if ( strstr( bitmap, gamedir ) )\r
- {\r
- strcpy( ase.materials[ase.numMaterials].name, strstr( bitmap, gamedir ) + strlen( gamedir ) );\r
- Sys_Printf("material name: \'%s\'\n", strstr( bitmap, gamedir ) + strlen( gamedir ) );\r
- }\r
- else\r
- {\r
- sprintf( ase.materials[ase.numMaterials].name, "(not converted: '%s')", bitmap );\r
- Sys_Printf( "WARNING: illegal material name '%s'\n", bitmap );\r
- }\r
- }\r
- else\r
- {\r
- }\r
-}\r
-\r
-static void ASE_KeyMATERIAL( const char *token )\r
-{\r
- if ( !strcmp( token, "*MAP_DIFFUSE" ) )\r
- {\r
- ASE_ParseBracedBlock( ASE_KeyMAP_DIFFUSE );\r
- }\r
- else\r
- {\r
- }\r
-}\r
-\r
-static void ASE_KeyMATERIAL_LIST( const char *token )\r
-{\r
- if ( !strcmp( token, "*MATERIAL_COUNT" ) )\r
- {\r
- ASE_GetToken( qfalse );\r
- VERBOSE( ( "..num materials: %s\n", s_token ) );\r
- if ( atoi( s_token ) > MAX_ASE_MATERIALS )\r
- {\r
- Error( "Too many materials!" );\r
- }\r
- ase.numMaterials = 0;\r
- }\r
- else if ( !strcmp( token, "*MATERIAL" ) )\r
- {\r
- VERBOSE( ( "..material %d ", ase.numMaterials ) );\r
- ASE_ParseBracedBlock( ASE_KeyMATERIAL );\r
- ase.numMaterials++;\r
- }\r
-}\r
-\r
-static void ASE_KeyMESH_VERTEX_LIST( const char *token )\r
-{\r
- aseMesh_t *pMesh = ASE_GetCurrentMesh();\r
-\r
- if ( !strcmp( token, "*MESH_VERTEX" ) )\r
- {\r
- ASE_GetToken( qfalse ); // skip number\r
-\r
- ASE_GetToken( qfalse );\r
- pMesh->vertexes[pMesh->currentVertex].y = atof( s_token );\r
-\r
- ASE_GetToken( qfalse );\r
- pMesh->vertexes[pMesh->currentVertex].x = -atof( s_token );\r
-\r
- ASE_GetToken( qfalse );\r
- pMesh->vertexes[pMesh->currentVertex].z = atof( s_token );\r
-\r
- pMesh->currentVertex++;\r
-\r
- if ( pMesh->currentVertex > pMesh->numVertexes )\r
- {\r
- Error( "pMesh->currentVertex >= pMesh->numVertexes" );\r
- }\r
- }\r
- else\r
- {\r
- Error( "Unknown token '%s' while parsing MESH_VERTEX_LIST", token );\r
- }\r
-}\r
-\r
-static void ASE_KeyMESH_FACE_LIST( const char *token )\r
-{\r
- aseMesh_t *pMesh = ASE_GetCurrentMesh();\r
-\r
- if ( !strcmp( token, "*MESH_FACE" ) )\r
- {\r
- ASE_GetToken( qfalse ); // skip face number\r
-\r
- ASE_GetToken( qfalse ); // skip label\r
- ASE_GetToken( qfalse ); // first vertex\r
- pMesh->faces[pMesh->currentFace][0] = atoi( s_token );\r
-\r
- ASE_GetToken( qfalse ); // skip label\r
- ASE_GetToken( qfalse ); // second vertex\r
- pMesh->faces[pMesh->currentFace][2] = atoi( s_token );\r
-\r
- ASE_GetToken( qfalse ); // skip label\r
- ASE_GetToken( qfalse ); // third vertex\r
- pMesh->faces[pMesh->currentFace][1] = atoi( s_token );\r
-\r
- ASE_GetToken( qtrue );\r
-\r
-/*\r
- if ( ( p = strstr( s_token, "*MESH_MTLID" ) ) != 0 )\r
- {\r
- p += strlen( "*MESH_MTLID" ) + 1;\r
- mtlID = atoi( p );\r
- }\r
- else\r
- {\r
- Error( "No *MESH_MTLID found for face!" );\r
- }\r
-*/\r
-\r
- pMesh->currentFace++;\r
- }\r
- else\r
- {\r
- Error( "Unknown token '%s' while parsing MESH_FACE_LIST", token );\r
- }\r
-}\r
-\r
-static void ASE_KeyTFACE_LIST( const char *token )\r
-{\r
- aseMesh_t *pMesh = ASE_GetCurrentMesh();\r
-\r
- if ( !strcmp( token, "*MESH_TFACE" ) )\r
- {\r
- int a, b, c;\r
-\r
- ASE_GetToken( qfalse );\r
-\r
- ASE_GetToken( qfalse );\r
- a = atoi( s_token );\r
- ASE_GetToken( qfalse );\r
- c = atoi( s_token );\r
- ASE_GetToken( qfalse );\r
- b = atoi( s_token );\r
-\r
- pMesh->tfaces[pMesh->currentFace][0] = a;\r
- pMesh->tfaces[pMesh->currentFace][1] = b;\r
- pMesh->tfaces[pMesh->currentFace][2] = c;\r
-\r
- pMesh->currentFace++;\r
- }\r
- else\r
- {\r
- Error( "Unknown token '%s' in MESH_TFACE", token );\r
- }\r
-}\r
-\r
-static void ASE_KeyMESH_TVERTLIST( const char *token )\r
-{\r
- aseMesh_t *pMesh = ASE_GetCurrentMesh();\r
-\r
- if ( !strcmp( token, "*MESH_TVERT" ) )\r
- {\r
- char u[80], v[80], w[80];\r
-\r
- ASE_GetToken( qfalse );\r
-\r
- ASE_GetToken( qfalse );\r
- strcpy( u, s_token );\r
-\r
- ASE_GetToken( qfalse );\r
- strcpy( v, s_token );\r
-\r
- ASE_GetToken( qfalse );\r
- strcpy( w, s_token );\r
-\r
- pMesh->tvertexes[pMesh->currentVertex].s = atof( u );\r
- pMesh->tvertexes[pMesh->currentVertex].t = 1.0f - atof( v );\r
-\r
- pMesh->currentVertex++;\r
-\r
- if ( pMesh->currentVertex > pMesh->numTVertexes )\r
- {\r
- Error( "pMesh->currentVertex > pMesh->numTVertexes" );\r
- }\r
- }\r
- else\r
- {\r
- Error( "Unknown token '%s' while parsing MESH_TVERTLIST" );\r
- }\r
-}\r
-\r
-static void ASE_KeyMESH( const char *token )\r
-{\r
- aseMesh_t *pMesh = ASE_GetCurrentMesh();\r
-\r
- if ( !strcmp( token, "*TIMEVALUE" ) )\r
- {\r
- ASE_GetToken( qfalse );\r
-\r
- pMesh->timeValue = atoi( s_token );\r
- VERBOSE( ( ".....timevalue: %d\n", pMesh->timeValue ) );\r
- }\r
- else if ( !strcmp( token, "*MESH_NUMVERTEX" ) )\r
- {\r
- ASE_GetToken( qfalse );\r
-\r
- pMesh->numVertexes = atoi( s_token );\r
- VERBOSE( ( ".....TIMEVALUE: %d\n", pMesh->timeValue ) );\r
- VERBOSE( ( ".....num vertexes: %d\n", pMesh->numVertexes ) );\r
- }\r
- else if ( !strcmp( token, "*MESH_NUMFACES" ) )\r
- {\r
- ASE_GetToken( qfalse );\r
-\r
- pMesh->numFaces = atoi( s_token );\r
- VERBOSE( ( ".....num faces: %d\n", pMesh->numFaces ) );\r
- }\r
- else if ( !strcmp( token, "*MESH_NUMTVFACES" ) )\r
- {\r
- ASE_GetToken( qfalse );\r
-\r
- if ( atoi( s_token ) != pMesh->numFaces )\r
- {\r
- Error( "MESH_NUMTVFACES != MESH_NUMFACES" );\r
- }\r
- }\r
- else if ( !strcmp( token, "*MESH_NUMTVERTEX" ) )\r
- {\r
- ASE_GetToken( qfalse );\r
-\r
- pMesh->numTVertexes = atoi( s_token );\r
- VERBOSE( ( ".....num tvertexes: %d\n", pMesh->numTVertexes ) );\r
- }\r
- else if ( !strcmp( token, "*MESH_VERTEX_LIST" ) )\r
- {\r
- pMesh->vertexes = calloc( sizeof( aseVertex_t ) * pMesh->numVertexes, 1 );\r
- pMesh->currentVertex = 0;\r
- VERBOSE( ( ".....parsing MESH_VERTEX_LIST\n" ) );\r
- ASE_ParseBracedBlock( ASE_KeyMESH_VERTEX_LIST );\r
- }\r
- else if ( !strcmp( token, "*MESH_TVERTLIST" ) )\r
- {\r
- pMesh->currentVertex = 0;\r
- pMesh->tvertexes = calloc( sizeof( aseTVertex_t ) * pMesh->numTVertexes, 1 );\r
- VERBOSE( ( ".....parsing MESH_TVERTLIST\n" ) );\r
- ASE_ParseBracedBlock( ASE_KeyMESH_TVERTLIST );\r
- }\r
- else if ( !strcmp( token, "*MESH_FACE_LIST" ) )\r
- {\r
- pMesh->faces = calloc( sizeof( aseFace_t ) * pMesh->numFaces, 1 );\r
- pMesh->currentFace = 0;\r
- VERBOSE( ( ".....parsing MESH_FACE_LIST\n" ) );\r
- ASE_ParseBracedBlock( ASE_KeyMESH_FACE_LIST );\r
- }\r
- else if ( !strcmp( token, "*MESH_TFACELIST" ) )\r
- {\r
- pMesh->tfaces = calloc( sizeof( aseFace_t ) * pMesh->numFaces, 1 );\r
- pMesh->currentFace = 0;\r
- VERBOSE( ( ".....parsing MESH_TFACE_LIST\n" ) );\r
- ASE_ParseBracedBlock( ASE_KeyTFACE_LIST );\r
- }\r
- else if ( !strcmp( token, "*MESH_NORMALS" ) )\r
- {\r
- ASE_ParseBracedBlock( 0 );\r
- }\r
-}\r
-\r
-static void ASE_KeyMESH_ANIMATION( const char *token )\r
-{\r
- aseMesh_t *pMesh = ASE_GetCurrentMesh();\r
-\r
- // loads a single animation frame\r
- if ( !strcmp( token, "*MESH" ) )\r
- {\r
- VERBOSE( ( "...found MESH\n" ) );\r
- assert( pMesh->faces == 0 );\r
- assert( pMesh->vertexes == 0 );\r
- assert( pMesh->tvertexes == 0 );\r
- memset( pMesh, 0, sizeof( *pMesh ) );\r
-\r
- ASE_ParseBracedBlock( ASE_KeyMESH );\r
-\r
- if ( ++ase.objects[ase.currentObject].anim.currentFrame == MAX_ASE_ANIMATION_FRAMES )\r
- {\r
- Error( "Too many animation frames" );\r
- }\r
- }\r
- else\r
- {\r
- Error( "Unknown token '%s' while parsing MESH_ANIMATION", token );\r
- }\r
-}\r
-\r
-static void ASE_KeyGEOMOBJECT( const char *token )\r
-{\r
- if ( !strcmp( token, "*NODE_NAME" ) )\r
- {\r
- char *name = ase.objects[ase.currentObject].name;\r
-\r
- ASE_GetToken( qtrue );\r
- VERBOSE( ( " %s\n", s_token ) );\r
- strcpy( ase.objects[ase.currentObject].name, s_token + 1 );\r
- if ( strchr( ase.objects[ase.currentObject].name, '"' ) )\r
- *strchr( ase.objects[ase.currentObject].name, '"' ) = 0;\r
-\r
- if ( strstr( name, "tag" ) == name )\r
- {\r
- while ( strchr( name, '_' ) != strrchr( name, '_' ) )\r
- {\r
- *strrchr( name, '_' ) = 0;\r
- }\r
- while ( strrchr( name, ' ' ) )\r
- {\r
- *strrchr( name, ' ' ) = 0;\r
- }\r
- }\r
- }\r
- else if ( !strcmp( token, "*NODE_PARENT" ) )\r
- {\r
- ASE_SkipRestOfLine();\r
- }\r
- // ignore unused data blocks\r
- else if ( !strcmp( token, "*NODE_TM" ) ||\r
- !strcmp( token, "*TM_ANIMATION" ) )\r
- {\r
- ASE_ParseBracedBlock( 0 );\r
- }\r
- // ignore regular meshes that aren't part of animation\r
- else if ( !strcmp( token, "*MESH" ) && !ase.grabAnims )\r
- {\r
-/*\r
- if ( strstr( ase.objects[ase.currentObject].name, "tag_" ) == ase.objects[ase.currentObject].name ) \r
- {\r
- s_forceStaticMesh = true;\r
- ASE_ParseBracedBlock( ASE_KeyMESH );\r
- s_forceStaticMesh = false;\r
- }\r
-*/\r
- ASE_ParseBracedBlock( ASE_KeyMESH );\r
- if ( ++ase.objects[ase.currentObject].anim.currentFrame == MAX_ASE_ANIMATION_FRAMES )\r
- {\r
- Error( "Too many animation frames" );\r
- }\r
- ase.objects[ase.currentObject].anim.numFrames = ase.objects[ase.currentObject].anim.currentFrame;\r
- ase.objects[ase.currentObject].numAnimations++;\r
-/*\r
- // ignore meshes that aren't part of animations if this object isn't a \r
- // a tag\r
- else\r
- {\r
- ASE_ParseBracedBlock( 0 );\r
- }\r
-*/\r
- }\r
- // according to spec these are obsolete\r
- else if ( !strcmp( token, "*MATERIAL_REF" ) )\r
- {\r
- ASE_GetToken( qfalse );\r
-\r
- ase.objects[ase.currentObject].materialRef = atoi( s_token );\r
- }\r
- // loads a sequence of animation frames\r
- else if ( !strcmp( token, "*MESH_ANIMATION" ) )\r
- {\r
- if ( ase.grabAnims )\r
- {\r
- VERBOSE( ( "..found MESH_ANIMATION\n" ) );\r
-\r
- if ( ase.objects[ase.currentObject].numAnimations )\r
- {\r
- Error( "Multiple MESH_ANIMATIONS within a single GEOM_OBJECT" );\r
- }\r
- ASE_ParseBracedBlock( ASE_KeyMESH_ANIMATION );\r
- ase.objects[ase.currentObject].anim.numFrames = ase.objects[ase.currentObject].anim.currentFrame;\r
- ase.objects[ase.currentObject].numAnimations++;\r
- }\r
- else\r
- {\r
- ASE_SkipEnclosingBraces();\r
- }\r
- }\r
- // skip unused info\r
- else if ( !strcmp( token, "*PROP_MOTIONBLUR" ) ||\r
- !strcmp( token, "*PROP_CASTSHADOW" ) ||\r
- !strcmp( token, "*PROP_RECVSHADOW" ) )\r
- {\r
- ASE_SkipRestOfLine();\r
- }\r
-}\r
-\r
-static void ConcatenateObjects( aseGeomObject_t *pObjA, aseGeomObject_t *pObjB )\r
-{\r
-}\r
-\r
-static void CollapseObjects( void )\r
-{\r
- int i;\r
- int numObjects = ase.currentObject;\r
-\r
- for ( i = 0; i < numObjects; i++ )\r
- {\r
- int j;\r
-\r
- // skip tags\r
- if ( strstr( ase.objects[i].name, "tag" ) == ase.objects[i].name )\r
- {\r
- continue;\r
- }\r
-\r
- if ( !ase.objects[i].numAnimations )\r
- {\r
- continue;\r
- }\r
-\r
- for ( j = i + 1; j < numObjects; j++ )\r
- {\r
- if ( strstr( ase.objects[j].name, "tag" ) == ase.objects[j].name )\r
- {\r
- continue;\r
- }\r
- if ( ase.objects[i].materialRef == ase.objects[j].materialRef )\r
- {\r
- if ( ase.objects[j].numAnimations )\r
- {\r
- ConcatenateObjects( &ase.objects[i], &ase.objects[j] );\r
- }\r
- }\r
- }\r
- }\r
-}\r
-\r
-/*\r
-** ASE_Process\r
-*/\r
-static void ASE_Process( void )\r
-{\r
- while ( ASE_GetToken( qfalse ) )\r
- {\r
- if ( !strcmp( s_token, "*3DSMAX_ASCIIEXPORT" ) ||\r
- !strcmp( s_token, "*COMMENT" ) )\r
- {\r
- ASE_SkipRestOfLine();\r
- }\r
- else if ( !strcmp( s_token, "*SCENE" ) )\r
- ASE_SkipEnclosingBraces();\r
- else if ( !strcmp( s_token, "*MATERIAL_LIST" ) )\r
- {\r
- VERBOSE( ("MATERIAL_LIST\n") );\r
-\r
- ASE_ParseBracedBlock( ASE_KeyMATERIAL_LIST );\r
- }\r
- else if ( !strcmp( s_token, "*GEOMOBJECT" ) )\r
- {\r
- VERBOSE( ("GEOMOBJECT" ) );\r
-\r
- ASE_ParseBracedBlock( ASE_KeyGEOMOBJECT );\r
-\r
- if ( strstr( ase.objects[ase.currentObject].name, "Bip" ) ||\r
- strstr( ase.objects[ase.currentObject].name, "ignore_" ) )\r
- {\r
- ASE_FreeGeomObject( ase.currentObject );\r
- VERBOSE( ( "(discarding BIP/ignore object)\n" ) );\r
- }\r
- else if ( ( strstr( ase.objects[ase.currentObject].name, "h_" ) != ase.objects[ase.currentObject].name ) &&\r
- ( strstr( ase.objects[ase.currentObject].name, "l_" ) != ase.objects[ase.currentObject].name ) &&\r
- ( strstr( ase.objects[ase.currentObject].name, "u_" ) != ase.objects[ase.currentObject].name ) &&\r
- ( strstr( ase.objects[ase.currentObject].name, "tag" ) != ase.objects[ase.currentObject].name ) &&\r
- ase.grabAnims )\r
- {\r
- VERBOSE( ( "(ignoring improperly labeled object '%s')\n", ase.objects[ase.currentObject].name ) );\r
- ASE_FreeGeomObject( ase.currentObject );\r
- }\r
- else\r
- {\r
- if ( ++ase.currentObject == MAX_ASE_OBJECTS )\r
- {\r
- Error( "Too many GEOMOBJECTs" );\r
- }\r
- }\r
- }\r
- else if ( s_token[0] )\r
- {\r
- Sys_Printf( "Unknown token '%s'\n", s_token );\r
- }\r
- }\r
-\r
- if ( !ase.currentObject )\r
- Error( "No animation data!" );\r
-\r
- CollapseObjects();\r
-}\r
+/*
+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 "aselib.h"
+#include "inout.h"
+
+#include <assert.h>
+#include <stdio.h>
+#include <stdlib.h>
+
+#define MAX_ASE_MATERIALS 32
+#define MAX_ASE_OBJECTS 64
+#define MAX_ASE_ANIMATIONS 32
+#define MAX_ASE_ANIMATION_FRAMES 512
+
+#define VERBOSE( x ) { if ( ase.verbose ) { Sys_Printf x ; } }
+
+typedef struct
+{
+ float x, y, z;
+ float nx, ny, nz;
+ float s, t;
+} aseVertex_t;
+
+typedef struct
+{
+ float s, t;
+} aseTVertex_t;
+
+typedef int aseFace_t[3];
+
+typedef struct
+{
+ int numFaces;
+ int numVertexes;
+ int numTVertexes;
+
+ int timeValue;
+
+ aseVertex_t *vertexes;
+ aseTVertex_t *tvertexes;
+ aseFace_t *faces, *tfaces;
+
+ int currentFace, currentVertex;
+} aseMesh_t;
+
+typedef struct
+{
+ int numFrames;
+ aseMesh_t frames[MAX_ASE_ANIMATION_FRAMES];
+
+ int currentFrame;
+} aseMeshAnimation_t;
+
+typedef struct
+{
+ char name[128];
+} aseMaterial_t;
+
+/*
+** contains the animate sequence of a single surface
+** using a single material
+*/
+typedef struct
+{
+ char name[128];
+
+ int materialRef;
+ int numAnimations;
+
+ aseMeshAnimation_t anim;
+
+} aseGeomObject_t;
+
+typedef struct
+{
+ int numMaterials;
+ aseMaterial_t materials[MAX_ASE_MATERIALS];
+ aseGeomObject_t objects[MAX_ASE_OBJECTS];
+
+ char *buffer;
+ char *curpos;
+ int len;
+
+ int currentObject;
+ qboolean verbose;
+ qboolean grabAnims;
+
+} ase_t;
+
+static char s_token[1024];
+static ase_t ase;
+static char gl_filename[1024];
+
+static void ASE_Process( void );
+static void ASE_FreeGeomObject( int ndx );
+
+#if defined (__linux__) || defined (__APPLE__)
+
+static char* strlwr (char* string)
+{
+ char *cp;
+ for (cp = string; *cp; ++cp)
+ {
+ if ('A' <= *cp && *cp <= 'Z')
+ *cp += 'a' - 'A';
+ }
+
+ return string;
+}
+
+#endif
+
+/*
+** ASE_Load
+*/
+void ASE_Load( const char *filename, qboolean verbose, qboolean grabAnims )
+{
+ FILE *fp = fopen( filename, "rb" );
+
+ if ( !fp )
+ Error( "File not found '%s'", filename );
+
+ memset( &ase, 0, sizeof( ase ) );
+
+ ase.verbose = verbose;
+ ase.grabAnims = grabAnims;
+ ase.len = Q_filelength( fp );
+
+ ase.curpos = ase.buffer = safe_malloc( ase.len );
+
+ Sys_Printf( "Processing '%s'\n", filename );
+
+ if ( fread( ase.buffer, ase.len, 1, fp ) != 1 )
+ {
+ fclose( fp );
+ Error( "fread() != -1 for '%s'", filename );
+ }
+
+ fclose( fp );
+
+ strcpy(gl_filename, filename);
+
+ ASE_Process();
+}
+
+/*
+** ASE_Free
+*/
+void ASE_Free( void )
+{
+ int i;
+
+ for ( i = 0; i < ase.currentObject; i++ )
+ {
+ ASE_FreeGeomObject( i );
+ }
+}
+
+/*
+** ASE_GetNumSurfaces
+*/
+int ASE_GetNumSurfaces( void )
+{
+ return ase.currentObject;
+}
+
+/*
+** ASE_GetSurfaceName
+*/
+const char *ASE_GetSurfaceName( int which )
+{
+ aseGeomObject_t *pObject = &ase.objects[which];
+
+ if ( !pObject->anim.numFrames )
+ return 0;
+
+ return pObject->name;
+}
+
+/*
+** ASE_GetSurfaceAnimation
+**
+** Returns an animation (sequence of polysets)
+*/
+polyset_t *ASE_GetSurfaceAnimation( int which, int *pNumFrames, int skipFrameStart, int skipFrameEnd, int maxFrames )
+{
+ aseGeomObject_t *pObject = &ase.objects[which];
+ polyset_t *psets;
+ int numFramesInAnimation;
+ int numFramesToKeep;
+ int i, f;
+
+ if ( !pObject->anim.numFrames )
+ return 0;
+
+ if ( pObject->anim.numFrames > maxFrames && maxFrames != -1 )
+ {
+ numFramesInAnimation = maxFrames;
+ }
+ else
+ {
+ numFramesInAnimation = pObject->anim.numFrames;
+ if ( maxFrames != -1 )
+ Sys_Printf( "WARNING: ASE_GetSurfaceAnimation maxFrames > numFramesInAnimation\n" );
+ }
+
+ if ( skipFrameEnd != -1 )
+ numFramesToKeep = numFramesInAnimation - ( skipFrameEnd - skipFrameStart + 1 );
+ else
+ numFramesToKeep = numFramesInAnimation;
+
+ *pNumFrames = numFramesToKeep;
+
+ psets = calloc( sizeof( polyset_t ) * numFramesToKeep, 1 );
+
+ for ( f = 0, i = 0; i < numFramesInAnimation; i++ )
+ {
+ int t;
+ aseMesh_t *pMesh = &pObject->anim.frames[i];
+
+ if ( skipFrameStart != -1 )
+ {
+ if ( i >= skipFrameStart && i <= skipFrameEnd )
+ continue;
+ }
+
+ strcpy( psets[f].name, pObject->name );
+ strcpy( psets[f].materialname, ase.materials[pObject->materialRef].name );
+
+ psets[f].triangles = calloc( sizeof( triangle_t ) * pObject->anim.frames[i].numFaces, 1 );
+ psets[f].numtriangles = pObject->anim.frames[i].numFaces;
+
+ for ( t = 0; t < pObject->anim.frames[i].numFaces; t++ )
+ {
+ int k;
+
+ for ( k = 0; k < 3; k++ )
+ {
+ psets[f].triangles[t].verts[k][0] = pMesh->vertexes[pMesh->faces[t][k]].x;
+ psets[f].triangles[t].verts[k][1] = pMesh->vertexes[pMesh->faces[t][k]].y;
+ psets[f].triangles[t].verts[k][2] = pMesh->vertexes[pMesh->faces[t][k]].z;
+
+ if ( pMesh->tvertexes && pMesh->tfaces )
+ {
+ psets[f].triangles[t].texcoords[k][0] = pMesh->tvertexes[pMesh->tfaces[t][k]].s;
+ psets[f].triangles[t].texcoords[k][1] = pMesh->tvertexes[pMesh->tfaces[t][k]].t;
+ }
+
+ }
+ }
+
+ f++;
+ }
+
+ return psets;
+}
+
+static void ASE_FreeGeomObject( int ndx )
+{
+ aseGeomObject_t *pObject;
+ int i;
+
+ pObject = &ase.objects[ndx];
+
+ for ( i = 0; i < pObject->anim.numFrames; i++ )
+ {
+ if ( pObject->anim.frames[i].vertexes )
+ {
+ free( pObject->anim.frames[i].vertexes );
+ }
+ if ( pObject->anim.frames[i].tvertexes )
+ {
+ free( pObject->anim.frames[i].tvertexes );
+ }
+ if ( pObject->anim.frames[i].faces )
+ {
+ free( pObject->anim.frames[i].faces );
+ }
+ if ( pObject->anim.frames[i].tfaces )
+ {
+ free( pObject->anim.frames[i].tfaces );
+ }
+ }
+
+ memset( pObject, 0, sizeof( *pObject ) );
+}
+
+static aseMesh_t *ASE_GetCurrentMesh( void )
+{
+ aseGeomObject_t *pObject;
+
+ if ( ase.currentObject >= MAX_ASE_OBJECTS )
+ {
+ Error( "Too many GEOMOBJECTs" );
+ return 0; // never called
+ }
+
+ pObject = &ase.objects[ase.currentObject];
+
+ if ( pObject->anim.currentFrame >= MAX_ASE_ANIMATION_FRAMES )
+ {
+ Error( "Too many MESHes" );
+ return 0;
+ }
+
+ return &pObject->anim.frames[pObject->anim.currentFrame];
+}
+
+static int CharIsTokenDelimiter( int ch )
+{
+ if ( ch <= 32 )
+ return 1;
+ return 0;
+}
+
+static int ASE_GetToken( qboolean restOfLine )
+{
+ int i = 0;
+
+ if ( ase.buffer == 0 )
+ return 0;
+
+ if ( ( ase.curpos - ase.buffer ) == ase.len )
+ return 0;
+
+ // skip over crap
+ while ( ( ( ase.curpos - ase.buffer ) < ase.len ) &&
+ ( *ase.curpos <= 32 ) )
+ {
+ ase.curpos++;
+ }
+
+ while ( ( ase.curpos - ase.buffer ) < ase.len )
+ {
+ s_token[i] = *ase.curpos;
+
+ ase.curpos++;
+ i++;
+
+ if ( ( CharIsTokenDelimiter( s_token[i-1] ) && !restOfLine ) ||
+ ( ( s_token[i-1] == '\n' ) || ( s_token[i-1] == '\r' ) ) )
+ {
+ s_token[i-1] = 0;
+ break;
+ }
+ }
+
+ s_token[i] = 0;
+
+ return 1;
+}
+
+static void ASE_ParseBracedBlock( void (*parser)( const char *token ) )
+{
+ int indent = 0;
+
+ while ( ASE_GetToken( qfalse ) )
+ {
+ if ( !strcmp( s_token, "{" ) )
+ {
+ indent++;
+ }
+ else if ( !strcmp( s_token, "}" ) )
+ {
+ --indent;
+ if ( indent == 0 )
+ break;
+ else if ( indent < 0 )
+ Error( "Unexpected '}'" );
+ }
+ else
+ {
+ if ( parser )
+ parser( s_token );
+ }
+ }
+}
+
+static void ASE_SkipEnclosingBraces( void )
+{
+ int indent = 0;
+
+ while ( ASE_GetToken( qfalse ) )
+ {
+ if ( !strcmp( s_token, "{" ) )
+ {
+ indent++;
+ }
+ else if ( !strcmp( s_token, "}" ) )
+ {
+ indent--;
+ if ( indent == 0 )
+ break;
+ else if ( indent < 0 )
+ Error( "Unexpected '}'" );
+ }
+ }
+}
+
+static void ASE_SkipRestOfLine( void )
+{
+ ASE_GetToken( qtrue );
+}
+
+static void ASE_KeyMAP_DIFFUSE( const char *token )
+{
+ char fullpath[1024], bitmap[1024], modeldir[1024];
+ char filename[1024];
+ int i = 0, count;
+
+ strcpy(filename, gl_filename);
+
+ if ( !strcmp( token, "*BITMAP" ) )
+ {
+ ASE_GetToken( qfalse );
+
+ // the purpose of this whole chunk of code below is to extract the relative path
+ // from a full path in the ASE
+
+ strcpy( bitmap, s_token + 1 );
+ if ( strchr( bitmap, '"' ) )
+ *strchr( bitmap, '"' ) = 0;
+
+ /* convert backslash to slash */
+ while ( bitmap[i] )
+ {
+ if ( bitmap[i] == '\\' )
+ bitmap[i] = '/';
+ i++;
+ }
+
+ /* remove filename from path */
+ for( i=strlen(filename); i>0; i--)
+ {
+ if(filename[i] == '/')
+ {
+ filename[i] = '\0';
+ break;
+ }
+ }
+
+ /* replaces a relative path with a full path */
+ if(bitmap[0] == '.' && bitmap[1] == '.' && bitmap[2] == '/')
+ {
+ while(bitmap[0] == '.' && bitmap[1] == '.' && bitmap[2] == '/')
+ {
+ /* remove last item from path */
+ for( i=strlen(filename); i>0; i--)
+ {
+ if(filename[i] == '/')
+ {
+ filename[i] = '\0';
+ break;
+ }
+ }
+ strcpy(bitmap, &bitmap[3]);
+ }
+ strcat(filename, "/");
+ strcat(filename, bitmap);
+ strcpy(bitmap, filename);
+ }
+
+ if ( strstr( bitmap, gamedir ) )
+ {
+ strcpy( ase.materials[ase.numMaterials].name, strstr( bitmap, gamedir ) + strlen( gamedir ) );
+ Sys_Printf("material name: \'%s\'\n", strstr( bitmap, gamedir ) + strlen( gamedir ) );
+ }
+ else
+ {
+ sprintf( ase.materials[ase.numMaterials].name, "(not converted: '%s')", bitmap );
+ Sys_Printf( "WARNING: illegal material name '%s'\n", bitmap );
+ }
+ }
+ else
+ {
+ }
+}
+
+static void ASE_KeyMATERIAL( const char *token )
+{
+ if ( !strcmp( token, "*MAP_DIFFUSE" ) )
+ {
+ ASE_ParseBracedBlock( ASE_KeyMAP_DIFFUSE );
+ }
+ else
+ {
+ }
+}
+
+static void ASE_KeyMATERIAL_LIST( const char *token )
+{
+ if ( !strcmp( token, "*MATERIAL_COUNT" ) )
+ {
+ ASE_GetToken( qfalse );
+ VERBOSE( ( "..num materials: %s\n", s_token ) );
+ if ( atoi( s_token ) > MAX_ASE_MATERIALS )
+ {
+ Error( "Too many materials!" );
+ }
+ ase.numMaterials = 0;
+ }
+ else if ( !strcmp( token, "*MATERIAL" ) )
+ {
+ VERBOSE( ( "..material %d ", ase.numMaterials ) );
+ ASE_ParseBracedBlock( ASE_KeyMATERIAL );
+ ase.numMaterials++;
+ }
+}
+
+static void ASE_KeyMESH_VERTEX_LIST( const char *token )
+{
+ aseMesh_t *pMesh = ASE_GetCurrentMesh();
+
+ if ( !strcmp( token, "*MESH_VERTEX" ) )
+ {
+ ASE_GetToken( qfalse ); // skip number
+
+ ASE_GetToken( qfalse );
+ pMesh->vertexes[pMesh->currentVertex].y = atof( s_token );
+
+ ASE_GetToken( qfalse );
+ pMesh->vertexes[pMesh->currentVertex].x = -atof( s_token );
+
+ ASE_GetToken( qfalse );
+ pMesh->vertexes[pMesh->currentVertex].z = atof( s_token );
+
+ pMesh->currentVertex++;
+
+ if ( pMesh->currentVertex > pMesh->numVertexes )
+ {
+ Error( "pMesh->currentVertex >= pMesh->numVertexes" );
+ }
+ }
+ else
+ {
+ Error( "Unknown token '%s' while parsing MESH_VERTEX_LIST", token );
+ }
+}
+
+static void ASE_KeyMESH_FACE_LIST( const char *token )
+{
+ aseMesh_t *pMesh = ASE_GetCurrentMesh();
+
+ if ( !strcmp( token, "*MESH_FACE" ) )
+ {
+ ASE_GetToken( qfalse ); // skip face number
+
+ ASE_GetToken( qfalse ); // skip label
+ ASE_GetToken( qfalse ); // first vertex
+ pMesh->faces[pMesh->currentFace][0] = atoi( s_token );
+
+ ASE_GetToken( qfalse ); // skip label
+ ASE_GetToken( qfalse ); // second vertex
+ pMesh->faces[pMesh->currentFace][2] = atoi( s_token );
+
+ ASE_GetToken( qfalse ); // skip label
+ ASE_GetToken( qfalse ); // third vertex
+ pMesh->faces[pMesh->currentFace][1] = atoi( s_token );
+
+ ASE_GetToken( qtrue );
+
+/*
+ if ( ( p = strstr( s_token, "*MESH_MTLID" ) ) != 0 )
+ {
+ p += strlen( "*MESH_MTLID" ) + 1;
+ mtlID = atoi( p );
+ }
+ else
+ {
+ Error( "No *MESH_MTLID found for face!" );
+ }
+*/
+
+ pMesh->currentFace++;
+ }
+ else
+ {
+ Error( "Unknown token '%s' while parsing MESH_FACE_LIST", token );
+ }
+}
+
+static void ASE_KeyTFACE_LIST( const char *token )
+{
+ aseMesh_t *pMesh = ASE_GetCurrentMesh();
+
+ if ( !strcmp( token, "*MESH_TFACE" ) )
+ {
+ int a, b, c;
+
+ ASE_GetToken( qfalse );
+
+ ASE_GetToken( qfalse );
+ a = atoi( s_token );
+ ASE_GetToken( qfalse );
+ c = atoi( s_token );
+ ASE_GetToken( qfalse );
+ b = atoi( s_token );
+
+ pMesh->tfaces[pMesh->currentFace][0] = a;
+ pMesh->tfaces[pMesh->currentFace][1] = b;
+ pMesh->tfaces[pMesh->currentFace][2] = c;
+
+ pMesh->currentFace++;
+ }
+ else
+ {
+ Error( "Unknown token '%s' in MESH_TFACE", token );
+ }
+}
+
+static void ASE_KeyMESH_TVERTLIST( const char *token )
+{
+ aseMesh_t *pMesh = ASE_GetCurrentMesh();
+
+ if ( !strcmp( token, "*MESH_TVERT" ) )
+ {
+ char u[80], v[80], w[80];
+
+ ASE_GetToken( qfalse );
+
+ ASE_GetToken( qfalse );
+ strcpy( u, s_token );
+
+ ASE_GetToken( qfalse );
+ strcpy( v, s_token );
+
+ ASE_GetToken( qfalse );
+ strcpy( w, s_token );
+
+ pMesh->tvertexes[pMesh->currentVertex].s = atof( u );
+ pMesh->tvertexes[pMesh->currentVertex].t = 1.0f - atof( v );
+
+ pMesh->currentVertex++;
+
+ if ( pMesh->currentVertex > pMesh->numTVertexes )
+ {
+ Error( "pMesh->currentVertex > pMesh->numTVertexes" );
+ }
+ }
+ else
+ {
+ Error( "Unknown token '%s' while parsing MESH_TVERTLIST" );
+ }
+}
+
+static void ASE_KeyMESH( const char *token )
+{
+ aseMesh_t *pMesh = ASE_GetCurrentMesh();
+
+ if ( !strcmp( token, "*TIMEVALUE" ) )
+ {
+ ASE_GetToken( qfalse );
+
+ pMesh->timeValue = atoi( s_token );
+ VERBOSE( ( ".....timevalue: %d\n", pMesh->timeValue ) );
+ }
+ else if ( !strcmp( token, "*MESH_NUMVERTEX" ) )
+ {
+ ASE_GetToken( qfalse );
+
+ pMesh->numVertexes = atoi( s_token );
+ VERBOSE( ( ".....TIMEVALUE: %d\n", pMesh->timeValue ) );
+ VERBOSE( ( ".....num vertexes: %d\n", pMesh->numVertexes ) );
+ }
+ else if ( !strcmp( token, "*MESH_NUMFACES" ) )
+ {
+ ASE_GetToken( qfalse );
+
+ pMesh->numFaces = atoi( s_token );
+ VERBOSE( ( ".....num faces: %d\n", pMesh->numFaces ) );
+ }
+ else if ( !strcmp( token, "*MESH_NUMTVFACES" ) )
+ {
+ ASE_GetToken( qfalse );
+
+ if ( atoi( s_token ) != pMesh->numFaces )
+ {
+ Error( "MESH_NUMTVFACES != MESH_NUMFACES" );
+ }
+ }
+ else if ( !strcmp( token, "*MESH_NUMTVERTEX" ) )
+ {
+ ASE_GetToken( qfalse );
+
+ pMesh->numTVertexes = atoi( s_token );
+ VERBOSE( ( ".....num tvertexes: %d\n", pMesh->numTVertexes ) );
+ }
+ else if ( !strcmp( token, "*MESH_VERTEX_LIST" ) )
+ {
+ pMesh->vertexes = calloc( sizeof( aseVertex_t ) * pMesh->numVertexes, 1 );
+ pMesh->currentVertex = 0;
+ VERBOSE( ( ".....parsing MESH_VERTEX_LIST\n" ) );
+ ASE_ParseBracedBlock( ASE_KeyMESH_VERTEX_LIST );
+ }
+ else if ( !strcmp( token, "*MESH_TVERTLIST" ) )
+ {
+ pMesh->currentVertex = 0;
+ pMesh->tvertexes = calloc( sizeof( aseTVertex_t ) * pMesh->numTVertexes, 1 );
+ VERBOSE( ( ".....parsing MESH_TVERTLIST\n" ) );
+ ASE_ParseBracedBlock( ASE_KeyMESH_TVERTLIST );
+ }
+ else if ( !strcmp( token, "*MESH_FACE_LIST" ) )
+ {
+ pMesh->faces = calloc( sizeof( aseFace_t ) * pMesh->numFaces, 1 );
+ pMesh->currentFace = 0;
+ VERBOSE( ( ".....parsing MESH_FACE_LIST\n" ) );
+ ASE_ParseBracedBlock( ASE_KeyMESH_FACE_LIST );
+ }
+ else if ( !strcmp( token, "*MESH_TFACELIST" ) )
+ {
+ pMesh->tfaces = calloc( sizeof( aseFace_t ) * pMesh->numFaces, 1 );
+ pMesh->currentFace = 0;
+ VERBOSE( ( ".....parsing MESH_TFACE_LIST\n" ) );
+ ASE_ParseBracedBlock( ASE_KeyTFACE_LIST );
+ }
+ else if ( !strcmp( token, "*MESH_NORMALS" ) )
+ {
+ ASE_ParseBracedBlock( 0 );
+ }
+}
+
+static void ASE_KeyMESH_ANIMATION( const char *token )
+{
+ aseMesh_t *pMesh = ASE_GetCurrentMesh();
+
+ // loads a single animation frame
+ if ( !strcmp( token, "*MESH" ) )
+ {
+ VERBOSE( ( "...found MESH\n" ) );
+ assert( pMesh->faces == 0 );
+ assert( pMesh->vertexes == 0 );
+ assert( pMesh->tvertexes == 0 );
+ memset( pMesh, 0, sizeof( *pMesh ) );
+
+ ASE_ParseBracedBlock( ASE_KeyMESH );
+
+ if ( ++ase.objects[ase.currentObject].anim.currentFrame == MAX_ASE_ANIMATION_FRAMES )
+ {
+ Error( "Too many animation frames" );
+ }
+ }
+ else
+ {
+ Error( "Unknown token '%s' while parsing MESH_ANIMATION", token );
+ }
+}
+
+static void ASE_KeyGEOMOBJECT( const char *token )
+{
+ if ( !strcmp( token, "*NODE_NAME" ) )
+ {
+ char *name = ase.objects[ase.currentObject].name;
+
+ ASE_GetToken( qtrue );
+ VERBOSE( ( " %s\n", s_token ) );
+ strcpy( ase.objects[ase.currentObject].name, s_token + 1 );
+ if ( strchr( ase.objects[ase.currentObject].name, '"' ) )
+ *strchr( ase.objects[ase.currentObject].name, '"' ) = 0;
+
+ if ( strstr( name, "tag" ) == name )
+ {
+ while ( strchr( name, '_' ) != strrchr( name, '_' ) )
+ {
+ *strrchr( name, '_' ) = 0;
+ }
+ while ( strrchr( name, ' ' ) )
+ {
+ *strrchr( name, ' ' ) = 0;
+ }
+ }
+ }
+ else if ( !strcmp( token, "*NODE_PARENT" ) )
+ {
+ ASE_SkipRestOfLine();
+ }
+ // ignore unused data blocks
+ else if ( !strcmp( token, "*NODE_TM" ) ||
+ !strcmp( token, "*TM_ANIMATION" ) )
+ {
+ ASE_ParseBracedBlock( 0 );
+ }
+ // ignore regular meshes that aren't part of animation
+ else if ( !strcmp( token, "*MESH" ) && !ase.grabAnims )
+ {
+/*
+ if ( strstr( ase.objects[ase.currentObject].name, "tag_" ) == ase.objects[ase.currentObject].name )
+ {
+ s_forceStaticMesh = true;
+ ASE_ParseBracedBlock( ASE_KeyMESH );
+ s_forceStaticMesh = false;
+ }
+*/
+ ASE_ParseBracedBlock( ASE_KeyMESH );
+ if ( ++ase.objects[ase.currentObject].anim.currentFrame == MAX_ASE_ANIMATION_FRAMES )
+ {
+ Error( "Too many animation frames" );
+ }
+ ase.objects[ase.currentObject].anim.numFrames = ase.objects[ase.currentObject].anim.currentFrame;
+ ase.objects[ase.currentObject].numAnimations++;
+/*
+ // ignore meshes that aren't part of animations if this object isn't a
+ // a tag
+ else
+ {
+ ASE_ParseBracedBlock( 0 );
+ }
+*/
+ }
+ // according to spec these are obsolete
+ else if ( !strcmp( token, "*MATERIAL_REF" ) )
+ {
+ ASE_GetToken( qfalse );
+
+ ase.objects[ase.currentObject].materialRef = atoi( s_token );
+ }
+ // loads a sequence of animation frames
+ else if ( !strcmp( token, "*MESH_ANIMATION" ) )
+ {
+ if ( ase.grabAnims )
+ {
+ VERBOSE( ( "..found MESH_ANIMATION\n" ) );
+
+ if ( ase.objects[ase.currentObject].numAnimations )
+ {
+ Error( "Multiple MESH_ANIMATIONS within a single GEOM_OBJECT" );
+ }
+ ASE_ParseBracedBlock( ASE_KeyMESH_ANIMATION );
+ ase.objects[ase.currentObject].anim.numFrames = ase.objects[ase.currentObject].anim.currentFrame;
+ ase.objects[ase.currentObject].numAnimations++;
+ }
+ else
+ {
+ ASE_SkipEnclosingBraces();
+ }
+ }
+ // skip unused info
+ else if ( !strcmp( token, "*PROP_MOTIONBLUR" ) ||
+ !strcmp( token, "*PROP_CASTSHADOW" ) ||
+ !strcmp( token, "*PROP_RECVSHADOW" ) )
+ {
+ ASE_SkipRestOfLine();
+ }
+}
+
+static void ConcatenateObjects( aseGeomObject_t *pObjA, aseGeomObject_t *pObjB )
+{
+}
+
+static void CollapseObjects( void )
+{
+ int i;
+ int numObjects = ase.currentObject;
+
+ for ( i = 0; i < numObjects; i++ )
+ {
+ int j;
+
+ // skip tags
+ if ( strstr( ase.objects[i].name, "tag" ) == ase.objects[i].name )
+ {
+ continue;
+ }
+
+ if ( !ase.objects[i].numAnimations )
+ {
+ continue;
+ }
+
+ for ( j = i + 1; j < numObjects; j++ )
+ {
+ if ( strstr( ase.objects[j].name, "tag" ) == ase.objects[j].name )
+ {
+ continue;
+ }
+ if ( ase.objects[i].materialRef == ase.objects[j].materialRef )
+ {
+ if ( ase.objects[j].numAnimations )
+ {
+ ConcatenateObjects( &ase.objects[i], &ase.objects[j] );
+ }
+ }
+ }
+ }
+}
+
+/*
+** ASE_Process
+*/
+static void ASE_Process( void )
+{
+ while ( ASE_GetToken( qfalse ) )
+ {
+ if ( !strcmp( s_token, "*3DSMAX_ASCIIEXPORT" ) ||
+ !strcmp( s_token, "*COMMENT" ) )
+ {
+ ASE_SkipRestOfLine();
+ }
+ else if ( !strcmp( s_token, "*SCENE" ) )
+ ASE_SkipEnclosingBraces();
+ else if ( !strcmp( s_token, "*MATERIAL_LIST" ) )
+ {
+ VERBOSE( ("MATERIAL_LIST\n") );
+
+ ASE_ParseBracedBlock( ASE_KeyMATERIAL_LIST );
+ }
+ else if ( !strcmp( s_token, "*GEOMOBJECT" ) )
+ {
+ VERBOSE( ("GEOMOBJECT" ) );
+
+ ASE_ParseBracedBlock( ASE_KeyGEOMOBJECT );
+
+ if ( strstr( ase.objects[ase.currentObject].name, "Bip" ) ||
+ strstr( ase.objects[ase.currentObject].name, "ignore_" ) )
+ {
+ ASE_FreeGeomObject( ase.currentObject );
+ VERBOSE( ( "(discarding BIP/ignore object)\n" ) );
+ }
+ else if ( ( strstr( ase.objects[ase.currentObject].name, "h_" ) != ase.objects[ase.currentObject].name ) &&
+ ( strstr( ase.objects[ase.currentObject].name, "l_" ) != ase.objects[ase.currentObject].name ) &&
+ ( strstr( ase.objects[ase.currentObject].name, "u_" ) != ase.objects[ase.currentObject].name ) &&
+ ( strstr( ase.objects[ase.currentObject].name, "tag" ) != ase.objects[ase.currentObject].name ) &&
+ ase.grabAnims )
+ {
+ VERBOSE( ( "(ignoring improperly labeled object '%s')\n", ase.objects[ase.currentObject].name ) );
+ ASE_FreeGeomObject( ase.currentObject );
+ }
+ else
+ {
+ if ( ++ase.currentObject == MAX_ASE_OBJECTS )
+ {
+ Error( "Too many GEOMOBJECTs" );
+ }
+ }
+ }
+ else if ( s_token[0] )
+ {
+ Sys_Printf( "Unknown token '%s'\n", s_token );
+ }
+ }
+
+ if ( !ase.currentObject )
+ Error( "No animation data!" );
+
+ CollapseObjects();
+}