-/*\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
-// trilib.c: library for loading triangles from an Alias triangle file\r
-//\r
-\r
-#include <stdio.h>\r
-#include "cmdlib.h"\r
-#include "inout.h"\r
-#include "mathlib.h"\r
-#include "trilib.h"\r
-#include "token.h"\r
-#include "l3dslib.h"\r
-#include "fmodel.h"\r
-#if 1\r
-#include "qd_skeletons.h"\r
-#endif\r
-\r
-// on disk representation of a face\r
-#define FLOAT_START 99999.0\r
-#define FLOAT_END -FLOAT_START\r
-#define MAGIC 123322\r
-#ifndef M_PI\r
- #define M_PI 3.14159265\r
-#endif\r
-\r
-float FixHTRRotateX = 0.0;\r
-float FixHTRRotateY = 0.0;\r
-float FixHTRRotateZ = 0.0;\r
-float FixHTRTranslateX = 0.0;\r
-float FixHTRTranslateY = 0.0;\r
-float FixHTRTranslateZ = 0.0;\r
-\r
-//#define NOISY 1\r
-\r
-typedef struct {\r
- float v[3];\r
-} vector;\r
-\r
-typedef struct\r
-{\r
- vector n; /* normal */\r
- vector p; /* point */\r
- vector c; /* color */\r
- float u; /* u */\r
- float v; /* v */\r
-} aliaspoint_t;\r
-\r
-typedef struct {\r
- aliaspoint_t pt[3];\r
-} tf_triangle;\r
-\r
-\r
-void ByteSwapTri (tf_triangle *tri)\r
-{\r
- int i;\r
- \r
- for (i=0 ; i<sizeof(tf_triangle)/4 ; i++)\r
- {\r
- ((int *)tri)[i] = BigLong (((int *)tri)[i]);\r
- }\r
-}\r
-\r
-void LoadTRI (char *filename, triangle_t **pptri, int *numtriangles, mesh_node_t **nodesList, int *num_mesh_nodes)\r
-{\r
- FILE *input;\r
- float start;\r
- char name[256], tex[256];\r
- int i, count, magic;\r
- tf_triangle tri;\r
- triangle_t *ptri;\r
- int iLevel;\r
- int exitpattern;\r
- float t;\r
-\r
- if (nodesList)\r
- {\r
- *num_mesh_nodes = 0;\r
- *nodesList = (mesh_node_t *) SafeMalloc(MAX_FM_MESH_NODES * sizeof(mesh_node_t), "Mesh Node List");\r
- }\r
-\r
- t = -FLOAT_START;\r
- *((unsigned char *)&exitpattern + 0) = *((unsigned char *)&t + 3);\r
- *((unsigned char *)&exitpattern + 1) = *((unsigned char *)&t + 2);\r
- *((unsigned char *)&exitpattern + 2) = *((unsigned char *)&t + 1);\r
- *((unsigned char *)&exitpattern + 3) = *((unsigned char *)&t + 0);\r
-\r
- if ((input = fopen(filename, "rb")) == 0)\r
- Error ("reader: could not open file '%s'", filename);\r
-\r
- iLevel = 0;\r
-\r
- fread(&magic, sizeof(int), 1, input);\r
- if (BigLong(magic) != MAGIC)\r
- Error ("%s is not a Alias object separated triangle file, magic number is wrong.", filename);\r
-\r
- ptri = malloc (MAXTRIANGLES * sizeof(triangle_t));\r
-\r
- *pptri = ptri;\r
-\r
- while (feof(input) == 0) {\r
- if (fread(&start, sizeof(float), 1, input) < 1)\r
- break;\r
- *(int *)&start = BigLong(*(int *)&start);\r
- if (*(int *)&start != exitpattern)\r
- {\r
- if (start == FLOAT_START) {\r
- /* Start of an object or group of objects. */\r
- i = -1;\r
- do {\r
- /* There are probably better ways to read a string from */\r
- /* a file, but this does allow you to do error checking */\r
- /* (which I'm not doing) on a per character basis. */\r
- ++i;\r
- fread( &(name[i]), sizeof( char ), 1, input);\r
- } while( name[i] != '\0' );\r
- \r
-// indent();\r
-// fprintf(stdout,"OBJECT START: %s\n",name);\r
- fread( &count, sizeof(int), 1, input);\r
- count = BigLong(count);\r
- ++iLevel;\r
- if (count != 0) {\r
-// indent();\r
-// fprintf(stdout,"NUMBER OF TRIANGLES: %d\n",count);\r
- \r
- i = -1;\r
- do {\r
- ++i;\r
- fread( &(tex[i]), sizeof( char ), 1, input);\r
- } while( tex[i] != '\0' );\r
- \r
-// indent();\r
-// fprintf(stdout," Object texture name: '%s'\n",tex);\r
- }\r
- \r
- /* Else (count == 0) this is the start of a group, and */\r
- /* no texture name is present. */\r
- }\r
- else if (start == FLOAT_END) {\r
- /* End of an object or group. Yes, the name should be */\r
- /* obvious from context, but it is in here just to be */\r
- /* safe and to provide a little extra information for */\r
- /* those who do not wish to write a recursive reader. */\r
- /* Mia culpa. */\r
- --iLevel;\r
- i = -1;\r
- do {\r
- ++i;\r
- fread( &(name[i]), sizeof( char ), 1, input);\r
- } while( name[i] != '\0' );\r
- \r
-// indent();\r
-// fprintf(stdout,"OBJECT END: %s\n",name);\r
- continue;\r
- }\r
- }\r
-\r
-//\r
-// read the triangles\r
-// \r
- for (i = 0; i < count; ++i) {\r
- int j;\r
-\r
- fread( &tri, sizeof(tf_triangle), 1, input );\r
- ByteSwapTri (&tri);\r
- for (j=0 ; j<3 ; j++)\r
- {\r
- int k;\r
-\r
- for (k=0 ; k<3 ; k++)\r
- {\r
- ptri->verts[j][k] = tri.pt[j].p.v[k];\r
- }\r
- }\r
-\r
- ptri++;\r
-\r
- if ((ptri - *pptri) >= MAXTRIANGLES)\r
- Error ("Error: too many triangles; increase MAXTRIANGLES\n");\r
- }\r
- }\r
-\r
- *numtriangles = ptri - *pptri;\r
-\r
- fclose (input);\r
-\r
- DefaultNodesList(nodesList,num_mesh_nodes,numtriangles);\r
-}\r
-\r
-\r
-//==========================================================================\r
-//\r
-// LoadHRC\r
-//\r
-//==========================================================================\r
-\r
-float scaling[3];\r
-float rotation[3];\r
-float translation[3];\r
-static char *hrc_name;\r
-\r
-struct\r
-{\r
- float v[3];\r
-} vList[8192];\r
-\r
-void HandleHRCModel(triangle_t **triList, int *triangleCount, mesh_node_t **nodesList, int *num_mesh_nodes,\r
- int ActiveNode, int Depth, int numVerts)\r
-{\r
- void ReadHRCClusterList(mesh_node_t *meshNode, int baseIndex);\r
-\r
- int i, j;\r
- int vertexCount;\r
- int triCount;\r
- triangle_t *tList;\r
- mesh_node_t *meshNode;\r
- float x, y, z;\r
- float x2, y2, z2;\r
- float rx, ry, rz;\r
- tokenType_t nextToken;\r
- float orig_scaling[3];\r
- float orig_rotation[3];\r
- float orig_translation[3];\r
- int start_tri;\r
- int pos,bit;\r
- int vertIndexBase;\r
-\r
- // Update Node Info\r
- if (nodesList)\r
- {\r
- TK_BeyondRequire(TK_NAME, TK_STRING);\r
-\r
- if (Depth == 0 || tk_String[0] == '_')\r
- { // Root\r
- ActiveNode = *num_mesh_nodes;\r
- (*num_mesh_nodes)++;\r
- if ((*num_mesh_nodes) > MAX_FM_MESH_NODES)\r
- {\r
- Error("Too many mesh nodes in file %s\n", hrc_name);\r
- }\r
- meshNode = &(*nodesList)[ActiveNode];\r
-\r
-// memset(meshNode, 0, sizeof(mesh_node_t));\r
- strcpy(meshNode->name, tk_String);\r
-\r
- memset(meshNode->tris, 0, sizeof(meshNode->tris));\r
- memset(meshNode->verts, 0, sizeof(meshNode->verts));\r
-\r
- meshNode->start_glcmds = 0;\r
- meshNode->num_glcmds = 0;\r
- vertIndexBase = 0;\r
- }\r
- else\r
- { // Childs under the children\r
- meshNode = &(*nodesList)[ActiveNode];\r
- vertIndexBase = numVerts;\r
- }\r
- }\r
- else \r
- {\r
- meshNode = NULL;\r
- }\r
-\r
-\r
- // Get the scaling, rotation, and translation values\r
- TK_Beyond(TK_SCALING);\r
- for(i = 0; i < 3; i++)\r
- {\r
- orig_scaling[i] = scaling[i];\r
-\r
- TK_Require(TK_FLOATNUMBER);\r
- scaling[i] *= tk_FloatNumber;\r
-\r
- TK_Fetch();\r
- }\r
- TK_Beyond(TK_ROTATION);\r
- for(i = 0; i < 3; i++)\r
- {\r
- orig_rotation[i] = rotation[i];\r
-\r
- TK_Require(TK_FLOATNUMBER);\r
- rotation[i] = tk_FloatNumber;\r
-\r
- TK_Fetch();\r
- }\r
- TK_Beyond(TK_TRANSLATION);\r
- for(i = 0; i < 3; i++)\r
- {\r
- orig_translation[i] = translation[i];\r
-\r
- TK_Require(TK_FLOATNUMBER);\r
- translation[i] += tk_FloatNumber;\r
-\r
- TK_Fetch();\r
- }\r
-\r
- rx = ((rotation[0]-90.0)/360.0)*2.0*M_PI;\r
- ry = (rotation[2]/360.0)*2.0*M_PI;\r
- rz = (rotation[1]/360.0)*2.0*M_PI;\r
-\r
- // rjr - might not work if there an item doesn't have a mesh\r
- nextToken = tk_Token;\r
- if (nextToken == TK_ACTOR_DATA)\r
- {\r
- while (nextToken != TK_MODEL && nextToken != TK_RBRACE)\r
- {\r
- nextToken = TK_Fetch();\r
- }\r
- }\r
-\r
- while (nextToken == TK_SPLINE)\r
- { // spline node has two right braces\r
- nextToken = TK_Beyond(TK_RBRACE);\r
- nextToken = TK_Beyond(TK_RBRACE);\r
- }\r
-\r
- while (nextToken == TK_MATERIAL)\r
- {\r
- nextToken = TK_Beyond(TK_RBRACE);\r
- }\r
-\r
- while(nextToken == TK_MODEL)\r
- {\r
- HandleHRCModel(triList,triangleCount,nodesList,num_mesh_nodes,ActiveNode, Depth+1, 0);\r
-\r
- nextToken = TK_Fetch();\r
- }\r
-\r
- if (nextToken == TK_MESH)\r
- {\r
- // Get all the tri and vertex info\r
- TK_BeyondRequire(TK_VERTICES, TK_INTNUMBER);\r
- vertexCount = tk_IntNumber;\r
- for(i = 0; i < vertexCount; i++)\r
- {\r
- TK_BeyondRequire(TK_LBRACKET, TK_INTNUMBER);\r
- if(tk_IntNumber != i)\r
- {\r
- Error("File '%s', line %d:\nVertex index mismatch.\n",\r
- tk_SourceName, tk_Line);\r
- }\r
- TK_Beyond(TK_POSITION);\r
- // Apply the scaling, rotation, and translation in the order\r
- // specified in the HRC file. This could be wrong.\r
- TK_Require(TK_FLOATNUMBER);\r
- x = tk_FloatNumber*scaling[0];\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- y = tk_FloatNumber*scaling[1];\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- z = tk_FloatNumber*scaling[2];\r
-\r
- y2 = y*cos(rx)+z*sin(rx);\r
- z2 = -y*sin(rx)+z*cos(rx);\r
- y = y2;\r
- z = z2;\r
-\r
- x2 = x*cos(ry)-z*sin(ry);\r
- z2 = x*sin(ry)+z*cos(ry);\r
- x = x2;\r
- z = z2;\r
-\r
- x2 = x*cos(rz)+y*sin(rz);\r
- y2 = -x*sin(rz)+y*cos(rz);\r
- x = x2;\r
- y = y2;\r
-\r
- vList[i].v[0] = x+translation[0];\r
- vList[i].v[1] = y-translation[2];\r
- vList[i].v[2] = z+translation[1];\r
- }\r
- TK_BeyondRequire(TK_POLYGONS, TK_INTNUMBER);\r
- triCount = tk_IntNumber;\r
- if(triCount >= MAXTRIANGLES)\r
- {\r
- Error("Too many triangles in file %s\n", hrc_name);\r
- }\r
-\r
- start_tri = *triangleCount;\r
- *triangleCount += triCount;\r
-\r
- tList = *triList;\r
-\r
- for(i = 0; i < triCount; i++)\r
- {\r
- if (meshNode)\r
- { // Update the node\r
- pos = (i + start_tri) >> 3;\r
- bit = 1 << ((i + start_tri) & 7 );\r
- meshNode->tris[pos] |= bit;\r
- }\r
-\r
- TK_BeyondRequire(TK_LBRACKET, TK_INTNUMBER);\r
- if(tk_IntNumber != i)\r
- {\r
- Error("File '%s', line %d:\nTriangle index mismatch.\n",\r
- tk_SourceName, tk_Line);\r
- }\r
- TK_BeyondRequire(TK_NODES, TK_INTNUMBER);\r
- if(tk_IntNumber != 3)\r
- {\r
- Error("File '%s', line %d:\nBad polygon vertex count: %d.",\r
- tk_SourceName, tk_Line, tk_IntNumber);\r
- }\r
- tList[i+start_tri].HasUV = true;\r
- for(j = 0; j < 3; j++)\r
- {\r
- TK_BeyondRequire(TK_LBRACKET, TK_INTNUMBER);\r
- if(tk_IntNumber != j)\r
- {\r
- Error("File '%s', line %d:\nTriangle vertex index"\r
- " mismatch. %d should be %d\n", tk_SourceName, tk_Line,\r
- tk_IntNumber, j);\r
- }\r
- TK_BeyondRequire(TK_VERTEX, TK_INTNUMBER);\r
-\r
- tList[i+start_tri].verts[2-j][0] = vList[tk_IntNumber].v[0];\r
- tList[i+start_tri].verts[2-j][1] = vList[tk_IntNumber].v[1];\r
- tList[i+start_tri].verts[2-j][2] = vList[tk_IntNumber].v[2];\r
-#if 1\r
- tList[i+start_tri].indicies[2-j] = tk_IntNumber+vertIndexBase;\r
-#endif\r
- TK_BeyondRequire(TK_UVTEXTURE, TK_FLOATNUMBER);\r
- tList[i+start_tri].uv[2-j][0] = tk_FloatNumber;\r
- TK_Fetch();\r
- TK_Require(TK_FLOATNUMBER);\r
- tList[i+start_tri].uv[2-j][1] = tk_FloatNumber;\r
- }\r
-\r
- /* printf("Face %i:\n v0: %f, %f, %f\n v1: %f, %f, %f\n"\r
- " v2: %f, %f, %f\n", i,\r
- tList[i].verts[0][0],\r
- tList[i].verts[0][1],\r
- tList[i].verts[0][2],\r
- tList[i].verts[1][0],\r
- tList[i].verts[1][1],\r
- tList[i].verts[1][2],\r
- tList[i].verts[2][0],\r
- tList[i].verts[2][1],\r
- tList[i].verts[2][2]);\r
- */\r
- }\r
-\r
- TK_Beyond(TK_RBRACE);\r
- TK_Beyond(TK_RBRACE);\r
-\r
- if (tk_Token == TK_EDGES)\r
- {\r
- // TK_Beyond(TK_EDGES);\r
- TK_Beyond(TK_RBRACE);\r
- }\r
-\r
- scaling[0] = scaling[1] = scaling[2] = 1.0;\r
- // rotation[0] = rotation[1] = rotation[2] = 0.0;\r
- // translation[0] = translation[1] = translation[2] = 0.0;\r
-\r
- // See if there are any other models belonging to this node\r
-\r
-#if 1\r
- TK_Fetch();\r
-\r
- nextToken = tk_Token;\r
- if(nextToken == TK_CLUSTERS)\r
- {\r
- if(g_skelModel.clustered == -1)\r
- {\r
- ReadHRCClusterList(meshNode, vertIndexBase);\r
- }\r
- else\r
- {\r
- nextToken = TK_Get(TK_CLUSTER_NAME);\r
-\r
- while (nextToken == TK_CLUSTER_NAME)\r
- {\r
- TK_BeyondRequire(TK_CLUSTER_STATE, TK_INTNUMBER);\r
- nextToken = TK_Fetch();\r
- }\r
- }\r
-\r
- // one right brace follow the list of clusters\r
- nextToken = TK_Beyond(TK_RBRACE);\r
- }\r
- else\r
- {\r
- if(g_skelModel.clustered == -1 && !vertIndexBase)\r
- {\r
- meshNode->clustered = false;\r
- }\r
- }\r
-#endif\r
-\r
- nextToken = tk_Token;\r
- if(nextToken == TK_SPLINE)\r
- {\r
- while (nextToken == TK_SPLINE)\r
- { // spline node has two right braces\r
- nextToken = TK_Beyond(TK_RBRACE);\r
- nextToken = TK_Beyond(TK_RBRACE);\r
- }\r
-\r
- nextToken = TK_Beyond(TK_RBRACE);\r
- }\r
-\r
- while (nextToken == TK_MATERIAL)\r
- {\r
- nextToken = TK_Beyond(TK_RBRACE);\r
- }\r
-\r
- while(nextToken == TK_MODEL)\r
- {\r
- HandleHRCModel(triList,triangleCount,nodesList, num_mesh_nodes, ActiveNode, Depth+1, vertexCount+vertIndexBase);\r
-\r
- nextToken = TK_Fetch();\r
- }\r
- }\r
-\r
- for(i=0;i<3;i++)\r
- {\r
- scaling[i] = orig_scaling[i];\r
- rotation[i] = orig_rotation[i];\r
- translation[i] = orig_translation[i];\r
- }\r
-}\r
-\r
-static void LoadHRC(char *fileName, triangle_t **triList, int *triangleCount, mesh_node_t **nodesList, int *num_mesh_nodes)\r
-{\r
- if (nodesList)\r
- {\r
- *num_mesh_nodes = 0;\r
-\r
- if(!*nodesList)\r
- {\r
- *nodesList = (mesh_node_t *) SafeMalloc(MAX_FM_MESH_NODES * sizeof(mesh_node_t), "Mesh Node List");\r
- }\r
- }\r
-\r
- hrc_name = fileName;\r
-\r
- scaling[0] = scaling[1] = scaling[2] = 1.0;\r
- rotation[0] = rotation[1] = rotation[2] = 0.0;\r
- translation[0] = translation[1] = translation[2] = 0.0;\r
-\r
- *triangleCount = 0;\r
- *triList = (triangle_t *) SafeMalloc(MAXTRIANGLES*sizeof(triangle_t), "Triangle list");\r
- memset(*triList,0,MAXTRIANGLES*sizeof(triangle_t));\r
-\r
- TK_OpenSource(fileName);\r
- TK_FetchRequire(TK_HRCH);\r
- TK_FetchRequire(TK_COLON);\r
- TK_FetchRequire(TK_SOFTIMAGE);\r
-\r
- // prime it\r
- TK_Beyond(TK_MODEL);\r
-\r
- HandleHRCModel(triList, triangleCount, nodesList, num_mesh_nodes, 0, 0, 0);\r
- TK_CloseSource();\r
-}\r
-\r
-//==========================================================================\r
-//\r
-// LoadHTR\r
-//\r
-//==========================================================================\r
-/*\r
-static int Version2;\r
-\r
-void HandleHTRModel(triangle_t **triList, int *triangleCount, mesh_node_t **nodesList, int *num_mesh_nodes,\r
- int ActiveNode, int Depth, int numVerts)\r
-{\r
- int i, j;\r
- int vertexCount;\r
- int vertexNum;\r
- int triCount;\r
- float origin[3];\r
- triangle_t *tList;\r
- float x, y, z;\r
- float x2, y2, z2;\r
- float rx, ry, rz;\r
- mesh_node_t *meshNode;\r
- int pos,bit;\r
- int vertIndexBase;\r
- int start_tri;\r
-\r
- if (nodesList)\r
- {\r
- TK_BeyondRequire(TK_NAME, TK_STRING);\r
-\r
- if (Depth == 0 || tk_String[0] == '_')\r
- { // Root\r
- ActiveNode = *num_mesh_nodes;\r
- (*num_mesh_nodes)++;\r
- if ((*num_mesh_nodes) > MAX_FM_MESH_NODES)\r
- {\r
- Error("Too many mesh nodes in file %s\n", hrc_name);\r
- }\r
- meshNode = &(*nodesList)[ActiveNode];\r
-\r
-// memset(meshNode, 0, sizeof(mesh_node_t));\r
- strcpy(meshNode->name, tk_String);\r
-\r
- memset(meshNode->tris, 0, sizeof(meshNode->tris));\r
- memset(meshNode->verts, 0, sizeof(meshNode->verts));\r
-\r
- meshNode->start_glcmds = 0;\r
- meshNode->num_glcmds = 0;\r
- vertIndexBase = 0;\r
- }\r
- else\r
- { // Childs under the children\r
- meshNode = &(*nodesList)[ActiveNode];\r
- vertIndexBase = numVerts;\r
- }\r
- }\r
- else \r
- {\r
- meshNode = NULL;\r
- }\r
-\r
- // Get vertex count\r
- TK_BeyondRequire(TK_VERTICES, TK_INTNUMBER);\r
- vertexCount = tk_IntNumber;\r
- \r
- // Get triangle count\r
- TK_BeyondRequire(TK_FACES, TK_INTNUMBER);\r
- triCount = tk_IntNumber;\r
- if(triCount >= MAXTRIANGLES)\r
- {\r
- Error("Too many triangles in file %s\n", hrc_name);\r
- }\r
-\r
- // Get origin\r
- TK_Beyond(TK_ORIGIN);\r
- TK_Require(TK_FLOATNUMBER);\r
- origin[0] = tk_FloatNumber;\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- origin[1] = tk_FloatNumber;\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- origin[2] = tk_FloatNumber;\r
-\r
- //rx = 90.0/360.0*2.0*M_PI;\r
- rx = FixHTRRotateX/360.0*2.0*M_PI;\r
- ry = FixHTRRotateY/360.0*2.0*M_PI;\r
- rz = FixHTRRotateZ/360.0*2.0*M_PI;\r
-\r
- // Get vertex list\r
- for(i = 0; i < vertexCount; i++)\r
- {\r
- TK_FetchRequire(TK_VERTEX);\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- x = tk_FloatNumber-origin[0];\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- y = tk_FloatNumber-origin[1];\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- z = tk_FloatNumber-origin[2];\r
-\r
- x += FixHTRTranslateX;\r
- y += FixHTRTranslateY;\r
- z += FixHTRTranslateZ;\r
-\r
- y2 = y*cos(rx)-z*sin(rx);\r
- z2 = y*sin(rx)+z*cos(rx);\r
- y = y2;\r
- z = z2;\r
- x2 = x*cos(ry)+z*sin(ry);\r
- z2 = -x*sin(ry)+z*cos(ry);\r
- x = x2;\r
- z = z2;\r
- x2 = x*cos(rz)-y*sin(rz);\r
- y2 = x*sin(rz)+y*cos(rz);\r
- x = x2;\r
- y = y2;\r
-\r
- vList[i].v[0] = x;\r
- vList[i].v[1] = y;\r
- vList[i].v[2] = z;\r
- }\r
-\r
- start_tri = *triangleCount;\r
- *triangleCount += triCount;\r
-\r
- tList = *triList;\r
-\r
- // Get face list\r
- for(i = 0; i < triCount; i++)\r
- {\r
- if (meshNode)\r
- { // Update the node\r
- pos = (i + start_tri) >> 3;\r
- bit = 1 << ((i + start_tri) & 7 );\r
- meshNode->tris[pos] |= bit;\r
- }\r
-\r
- TK_FetchRequire(TK_FACE);\r
- TK_FetchRequire(TK_LPAREN);\r
- for(j = 0; j < 3; j++)\r
- {\r
- TK_FetchRequire(TK_INTNUMBER);\r
- vertexNum = tk_IntNumber-1;\r
- if(vertexNum >= vertexCount)\r
- {\r
- Error("File '%s', line %d:\nVertex number"\r
- " >= vertexCount: %d\n", tk_SourceName, tk_Line,\r
- tk_IntNumber);\r
- }\r
- tList[i+start_tri].verts[2-j][0] = vList[vertexNum].v[0];\r
- tList[i+start_tri].verts[2-j][1] = vList[vertexNum].v[1];\r
- tList[i+start_tri].verts[2-j][2] = vList[vertexNum].v[2];\r
- }\r
- TK_FetchRequire(TK_RPAREN);\r
-#ifdef _QDATA\r
- if (Version2)\r
- {\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i+start_tri].uv[0][0]=tk_FloatNumber;\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i+start_tri].uv[0][1]=tk_FloatNumber;\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i+start_tri].uv[1][0]=tk_FloatNumber;\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i+start_tri].uv[1][1]=tk_FloatNumber;\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i+start_tri].uv[2][0]=tk_FloatNumber;\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i+start_tri].uv[2][1]=tk_FloatNumber;\r
- tList[i+start_tri].HasUV=1;\r
- }\r
- else\r
- tList[i+start_tri].HasUV=0;\r
-#endif\r
-// printf("Face %i:\n v0: %f, %f, %f\n v1: %f, %f, %f\n"\r
-// " v2: %f, %f, %f\n", i,\r
-// tList[i].verts[0][0],\r
-// tList[i].verts[0][1],\r
-// tList[i].verts[0][2],\r
-// tList[i].verts[1][0],\r
-// tList[i].verts[1][1],\r
-// tList[i].verts[1][2],\r
-// tList[i].verts[2][0],\r
-// tList[i].verts[2][1],\r
-// tList[i].verts[2][2]);\r
-\r
- }\r
-\r
- TK_Fetch();\r
-\r
- if (tk_Token == TK_VERTICES) \r
- {\r
- HandleHTRModel(triList,triangleCount,nodesList, num_mesh_nodes, ActiveNode, Depth+1, vertexCount+vertIndexBase);\r
- }\r
-}\r
-\r
-static void LoadHTR(char *fileName, triangle_t **triList, int *triangleCount, mesh_node_t **nodesList, int *num_mesh_nodes)\r
-{\r
- if (nodesList)\r
- {\r
- *num_mesh_nodes = 0;\r
-\r
- if(!*nodesList)\r
- {\r
- *nodesList = SafeMalloc(MAX_FM_MESH_NODES * sizeof(mesh_node_t), "Mesh Node List");\r
- }\r
- }\r
-\r
- hrc_name = fileName;\r
-\r
- scaling[0] = scaling[1] = scaling[2] = 1.0;\r
- rotation[0] = rotation[1] = rotation[2] = 0.0;\r
- translation[0] = translation[1] = translation[2] = 0.0;\r
-\r
- *triangleCount = 0;\r
- *triList = SafeMalloc(MAXTRIANGLES*sizeof(triangle_t), "Triangle list");\r
- memset(*triList,0,MAXTRIANGLES*sizeof(triangle_t));\r
-\r
- TK_OpenSource(fileName);\r
-\r
- TK_Beyond(TK_C_HEXEN);\r
- TK_Beyond(TK_C_TRIANGLES);\r
- TK_BeyondRequire(TK_C_VERSION, TK_INTNUMBER);\r
- if(tk_IntNumber != 1&&tk_IntNumber != 2)\r
- {\r
- Error("Unsupported version (%d) in file %s\n", tk_IntNumber,\r
- fileName);\r
- }\r
- Version2=(tk_IntNumber==2);\r
-\r
-\r
- HandleHTRModel(triList, triangleCount, nodesList, num_mesh_nodes, 0, 0, 0);\r
-}\r
-\r
-*/\r
-\r
-static void LoadHTR(char *fileName, triangle_t **triList, int *triangleCount, mesh_node_t **nodesList, int *num_mesh_nodes)\r
-{\r
- int Version2=0;\r
- int i, j;\r
- int vertexCount;\r
- int vertexNum;\r
- struct\r
- {\r
- float v[3];\r
- } *vList;\r
- int triCount;\r
- float origin[3];\r
- triangle_t *tList;\r
- float x, y, z;\r
- float x2, y2, z2;\r
- float rx, ry, rz;\r
-\r
- if (nodesList)\r
- {\r
- *num_mesh_nodes = 0;\r
- *nodesList = (mesh_node_t *) SafeMalloc(MAX_FM_MESH_NODES * sizeof(mesh_node_t), "Mesh Node List");\r
- }\r
-\r
- TK_OpenSource(fileName);\r
-\r
- TK_Beyond(TK_C_HEXEN);\r
- TK_Beyond(TK_C_TRIANGLES);\r
- TK_BeyondRequire(TK_C_VERSION, TK_INTNUMBER);\r
- if(tk_IntNumber != 1&&tk_IntNumber != 2)\r
- {\r
- Error("Unsupported version (%d) in file %s\n", tk_IntNumber,\r
- fileName);\r
- }\r
- Version2=(tk_IntNumber==2);\r
-\r
-\r
- // Get vertex count\r
- TK_BeyondRequire(TK_VERTICES, TK_INTNUMBER);\r
- vertexCount = tk_IntNumber;\r
- vList = (void *) SafeMalloc(vertexCount*sizeof vList[0], "Vertex list");\r
- \r
- // Get triangle count\r
- TK_BeyondRequire(TK_FACES, TK_INTNUMBER);\r
- triCount = tk_IntNumber;\r
- if(triCount >= MAXTRIANGLES)\r
- {\r
- Error("Too many triangles in file %s\n", fileName);\r
- }\r
- *triangleCount = triCount;\r
- tList = (triangle_t *) SafeMalloc(MAXTRIANGLES*sizeof(triangle_t), "Triangle list");\r
- *triList = tList;\r
- memset(*triList,0,MAXTRIANGLES*sizeof(triangle_t));\r
-\r
- // Get origin\r
- TK_Beyond(TK_ORIGIN);\r
- TK_Require(TK_FLOATNUMBER);\r
- origin[0] = tk_FloatNumber;\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- origin[1] = tk_FloatNumber;\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- origin[2] = tk_FloatNumber;\r
-\r
- //rx = 90.0/360.0*2.0*M_PI;\r
- rx = FixHTRRotateX/360.0*2.0*M_PI;\r
- ry = FixHTRRotateY/360.0*2.0*M_PI;\r
- rz = FixHTRRotateZ/360.0*2.0*M_PI;\r
-\r
- // Get vertex list\r
- for(i = 0; i < vertexCount; i++)\r
- {\r
- TK_FetchRequire(TK_VERTEX);\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- x = tk_FloatNumber-origin[0];\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- y = tk_FloatNumber-origin[1];\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- z = tk_FloatNumber-origin[2];\r
-\r
- x += FixHTRTranslateX;\r
- y += FixHTRTranslateY;\r
- z += FixHTRTranslateZ;\r
-\r
- y2 = y*cos(rx)-z*sin(rx);\r
- z2 = y*sin(rx)+z*cos(rx);\r
- y = y2;\r
- z = z2;\r
- x2 = x*cos(ry)+z*sin(ry);\r
- z2 = -x*sin(ry)+z*cos(ry);\r
- x = x2;\r
- z = z2;\r
- x2 = x*cos(rz)-y*sin(rz);\r
- y2 = x*sin(rz)+y*cos(rz);\r
- x = x2;\r
- y = y2;\r
-\r
- vList[i].v[0] = x;\r
- vList[i].v[1] = y;\r
- vList[i].v[2] = z;\r
- }\r
-\r
- // Get face list\r
- for(i = 0; i < triCount; i++)\r
- {\r
- TK_FetchRequire(TK_FACE);\r
- TK_FetchRequire(TK_LPAREN);\r
- for(j = 0; j < 3; j++)\r
- {\r
- TK_FetchRequire(TK_INTNUMBER);\r
- vertexNum = tk_IntNumber-1;\r
- if(vertexNum >= vertexCount)\r
- {\r
- Error("File '%s', line %d:\nVertex number"\r
- " >= vertexCount: %d\n", tk_SourceName, tk_Line,\r
- tk_IntNumber);\r
- }\r
- tList[i].verts[2-j][0] = vList[vertexNum].v[0];\r
- tList[i].verts[2-j][1] = vList[vertexNum].v[1];\r
- tList[i].verts[2-j][2] = vList[vertexNum].v[2];\r
- }\r
- TK_FetchRequire(TK_RPAREN);\r
-#if 1\r
- if (Version2)\r
- {\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i].uv[2][0]= fmod(1000+tk_FloatNumber,1);\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i].uv[2][1]=fmod(1000+tk_FloatNumber,1);\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i].uv[1][0]=fmod(1000+tk_FloatNumber,1);\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i].uv[1][1]=fmod(1000+tk_FloatNumber,1);\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i].uv[0][0]=fmod(1000+tk_FloatNumber,1);\r
- TK_FetchRequire(TK_FLOATNUMBER);\r
- tList[i].uv[0][1]=fmod(1000+tk_FloatNumber,1);\r
- tList[i].HasUV=1;\r
- }\r
- else\r
- tList[i].HasUV=0;\r
-#endif\r
-/* printf("Face %i:\n v0: %f, %f, %f\n v1: %f, %f, %f\n"\r
- " v2: %f, %f, %f\n", i,\r
- tList[i].verts[0][0],\r
- tList[i].verts[0][1],\r
- tList[i].verts[0][2],\r
- tList[i].verts[1][0],\r
- tList[i].verts[1][1],\r
- tList[i].verts[1][2],\r
- tList[i].verts[2][0],\r
- tList[i].verts[2][1],\r
- tList[i].verts[2][2]);\r
-*/\r
- }\r
-\r
- free(vList);\r
- TK_CloseSource();\r
- DefaultNodesList(nodesList,num_mesh_nodes,triangleCount);\r
-}\r
-\r
-//==========================================================================\r
-//\r
-// LoadTriangleList\r
-//\r
-//==========================================================================\r
-\r
-void LoadTriangleList(char *fileName, triangle_t **triList, int *triangleCount, mesh_node_t **ppmnodes, int *num_mesh_nodes)\r
-{\r
- FILE *file1;\r
- int dot = '.';\r
- char *dotstart;\r
- char InputFileName[256];\r
-\r
- dotstart = strrchr(fileName,dot); // Does it already have an extension on the file name?\r
-\r
- if (!dotstart)\r
- {\r
- strcpy(InputFileName, fileName);\r
- strcat(InputFileName, ".hrc");\r
- if((file1 = fopen(InputFileName, "rb")) != NULL)\r
- {\r
- fclose(file1);\r
- LoadHRC(InputFileName, triList, triangleCount, ppmnodes, num_mesh_nodes);\r
- printf(" - assuming .HRC\n");\r
- return;\r
- }\r
-\r
- strcpy(InputFileName, fileName);\r
- strcat(InputFileName, ".asc");\r
- if((file1 = fopen(InputFileName, "rb")) != NULL)\r
- {\r
- fclose(file1);\r
- LoadASC(InputFileName, triList, triangleCount, ppmnodes, num_mesh_nodes);\r
- printf(" - assuming .ASC\n");\r
- return;\r
- }\r
-\r
- strcpy(InputFileName, fileName);\r
- strcat(InputFileName, ".tri");\r
- if((file1 = fopen(InputFileName, "rb")) != NULL)\r
- { \r
- fclose(file1);\r
- LoadTRI(InputFileName, triList, triangleCount, ppmnodes, num_mesh_nodes);\r
- printf(" - assuming .TRI\n");\r
- return;\r
- }\r
-\r
- strcpy(InputFileName, fileName);\r
- strcat(InputFileName, ".3ds");\r
- if((file1 = fopen(InputFileName, "rb")) != NULL)\r
- { \r
- fclose(file1);\r
- Load3DSTriangleList (InputFileName, triList, triangleCount, ppmnodes, num_mesh_nodes);\r
- printf(" - assuming .3DS\n");\r
- return;\r
- }\r
-\r
- strcpy(InputFileName, fileName);\r
- strcat(InputFileName, ".htr");\r
- if((file1 = fopen(InputFileName, "rb")) != NULL)\r
- { \r
- fclose(file1);\r
- LoadHTR (InputFileName, triList, triangleCount, ppmnodes, num_mesh_nodes);\r
- printf(" - assuming .HTR\n");\r
- return;\r
- }\r
- Error("\n Could not open file '%s':\n"\r
- "No HRC, ASC, 3DS, HTR, or TRI match.\n", fileName);\r
- }\r
- else\r
- {\r
- if((file1 = fopen(fileName, "rb")) != NULL)\r
- {\r
- printf("\n");\r
- fclose(file1);\r
- if (strcmp(dotstart,".hrc") == 0 || strcmp(dotstart,".HRC") == 0)\r
- {\r
- LoadHRC(fileName, triList, triangleCount, ppmnodes, num_mesh_nodes);\r
- }\r
- else if (strcmp(dotstart,".asc") == 0 || strcmp(dotstart,".ASC") == 0)\r
- {\r
- LoadASC(fileName, triList, triangleCount, ppmnodes, num_mesh_nodes);\r
- }\r
- else if (strcmp(dotstart,".tri") == 0 || strcmp(dotstart,".TRI") == 0)\r
- {\r
- LoadTRI(fileName, triList, triangleCount, ppmnodes, num_mesh_nodes);\r
- }\r
- else if (strcmp(dotstart,".3ds") == 0 || strcmp(dotstart,".3DS") == 0)\r
- {\r
- Load3DSTriangleList (fileName, triList, triangleCount, ppmnodes, num_mesh_nodes);\r
- }\r
- else if (strcmp(dotstart,".htr") == 0 || strcmp(dotstart,".HTR") == 0)\r
- {\r
- LoadHTR (fileName, triList, triangleCount, ppmnodes, num_mesh_nodes);\r
- }\r
- else\r
- {\r
- Error("Could not open file '%s':\n",fileName);\r
- return;\r
- }\r
- }\r
- else //failed to load file\r
- {\r
- Error("Could not open file '%s':\n",fileName);\r
- }\r
-\r
- }\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
+*/
+
+//
+// trilib.c: library for loading triangles from an Alias triangle file
+//
+
+#include <stdio.h>
+#include "cmdlib.h"
+#include "inout.h"
+#include "mathlib.h"
+#include "trilib.h"
+#include "token.h"
+#include "l3dslib.h"
+#include "fmodel.h"
+#if 1
+#include "qd_skeletons.h"
+#endif
+
+// on disk representation of a face
+#define FLOAT_START 99999.0
+#define FLOAT_END -FLOAT_START
+#define MAGIC 123322
+#ifndef M_PI
+ #define M_PI 3.14159265
+#endif
+
+float FixHTRRotateX = 0.0;
+float FixHTRRotateY = 0.0;
+float FixHTRRotateZ = 0.0;
+float FixHTRTranslateX = 0.0;
+float FixHTRTranslateY = 0.0;
+float FixHTRTranslateZ = 0.0;
+
+//#define NOISY 1
+
+typedef struct {
+ float v[3];
+} vector;
+
+typedef struct
+{
+ vector n; /* normal */
+ vector p; /* point */
+ vector c; /* color */
+ float u; /* u */
+ float v; /* v */
+} aliaspoint_t;
+
+typedef struct {
+ aliaspoint_t pt[3];
+} tf_triangle;
+
+
+void ByteSwapTri (tf_triangle *tri)
+{
+ int i;
+
+ for (i=0 ; i<sizeof(tf_triangle)/4 ; i++)
+ {
+ ((int *)tri)[i] = BigLong (((int *)tri)[i]);
+ }
+}
+
+void LoadTRI (char *filename, triangle_t **pptri, int *numtriangles, mesh_node_t **nodesList, int *num_mesh_nodes)
+{
+ FILE *input;
+ float start;
+ char name[256], tex[256];
+ int i, count, magic;
+ tf_triangle tri;
+ triangle_t *ptri;
+ int iLevel;
+ int exitpattern;
+ float t;
+
+ if (nodesList)
+ {
+ *num_mesh_nodes = 0;
+ *nodesList = (mesh_node_t *) SafeMalloc(MAX_FM_MESH_NODES * sizeof(mesh_node_t), "Mesh Node List");
+ }
+
+ t = -FLOAT_START;
+ *((unsigned char *)&exitpattern + 0) = *((unsigned char *)&t + 3);
+ *((unsigned char *)&exitpattern + 1) = *((unsigned char *)&t + 2);
+ *((unsigned char *)&exitpattern + 2) = *((unsigned char *)&t + 1);
+ *((unsigned char *)&exitpattern + 3) = *((unsigned char *)&t + 0);
+
+ if ((input = fopen(filename, "rb")) == 0)
+ Error ("reader: could not open file '%s'", filename);
+
+ iLevel = 0;
+
+ fread(&magic, sizeof(int), 1, input);
+ if (BigLong(magic) != MAGIC)
+ Error ("%s is not a Alias object separated triangle file, magic number is wrong.", filename);
+
+ ptri = malloc (MAXTRIANGLES * sizeof(triangle_t));
+
+ *pptri = ptri;
+
+ while (feof(input) == 0) {
+ if (fread(&start, sizeof(float), 1, input) < 1)
+ break;
+ *(int *)&start = BigLong(*(int *)&start);
+ if (*(int *)&start != exitpattern)
+ {
+ if (start == FLOAT_START) {
+ /* Start of an object or group of objects. */
+ i = -1;
+ do {
+ /* There are probably better ways to read a string from */
+ /* a file, but this does allow you to do error checking */
+ /* (which I'm not doing) on a per character basis. */
+ ++i;
+ fread( &(name[i]), sizeof( char ), 1, input);
+ } while( name[i] != '\0' );
+
+// indent();
+// fprintf(stdout,"OBJECT START: %s\n",name);
+ fread( &count, sizeof(int), 1, input);
+ count = BigLong(count);
+ ++iLevel;
+ if (count != 0) {
+// indent();
+// fprintf(stdout,"NUMBER OF TRIANGLES: %d\n",count);
+
+ i = -1;
+ do {
+ ++i;
+ fread( &(tex[i]), sizeof( char ), 1, input);
+ } while( tex[i] != '\0' );
+
+// indent();
+// fprintf(stdout," Object texture name: '%s'\n",tex);
+ }
+
+ /* Else (count == 0) this is the start of a group, and */
+ /* no texture name is present. */
+ }
+ else if (start == FLOAT_END) {
+ /* End of an object or group. Yes, the name should be */
+ /* obvious from context, but it is in here just to be */
+ /* safe and to provide a little extra information for */
+ /* those who do not wish to write a recursive reader. */
+ /* Mia culpa. */
+ --iLevel;
+ i = -1;
+ do {
+ ++i;
+ fread( &(name[i]), sizeof( char ), 1, input);
+ } while( name[i] != '\0' );
+
+// indent();
+// fprintf(stdout,"OBJECT END: %s\n",name);
+ continue;
+ }
+ }
+
+//
+// read the triangles
+//
+ for (i = 0; i < count; ++i) {
+ int j;
+
+ fread( &tri, sizeof(tf_triangle), 1, input );
+ ByteSwapTri (&tri);
+ for (j=0 ; j<3 ; j++)
+ {
+ int k;
+
+ for (k=0 ; k<3 ; k++)
+ {
+ ptri->verts[j][k] = tri.pt[j].p.v[k];
+ }
+ }
+
+ ptri++;
+
+ if ((ptri - *pptri) >= MAXTRIANGLES)
+ Error ("Error: too many triangles; increase MAXTRIANGLES\n");
+ }
+ }
+
+ *numtriangles = ptri - *pptri;
+
+ fclose (input);
+
+ DefaultNodesList(nodesList,num_mesh_nodes,numtriangles);
+}
+
+
+//==========================================================================
+//
+// LoadHRC
+//
+//==========================================================================
+
+float scaling[3];
+float rotation[3];
+float translation[3];
+static char *hrc_name;
+
+struct
+{
+ float v[3];
+} vList[8192];
+
+void HandleHRCModel(triangle_t **triList, int *triangleCount, mesh_node_t **nodesList, int *num_mesh_nodes,
+ int ActiveNode, int Depth, int numVerts)
+{
+ void ReadHRCClusterList(mesh_node_t *meshNode, int baseIndex);
+
+ int i, j;
+ int vertexCount;
+ int triCount;
+ triangle_t *tList;
+ mesh_node_t *meshNode;
+ float x, y, z;
+ float x2, y2, z2;
+ float rx, ry, rz;
+ tokenType_t nextToken;
+ float orig_scaling[3];
+ float orig_rotation[3];
+ float orig_translation[3];
+ int start_tri;
+ int pos,bit;
+ int vertIndexBase;
+
+ // Update Node Info
+ if (nodesList)
+ {
+ TK_BeyondRequire(TK_NAME, TK_STRING);
+
+ if (Depth == 0 || tk_String[0] == '_')
+ { // Root
+ ActiveNode = *num_mesh_nodes;
+ (*num_mesh_nodes)++;
+ if ((*num_mesh_nodes) > MAX_FM_MESH_NODES)
+ {
+ Error("Too many mesh nodes in file %s\n", hrc_name);
+ }
+ meshNode = &(*nodesList)[ActiveNode];
+
+// memset(meshNode, 0, sizeof(mesh_node_t));
+ strcpy(meshNode->name, tk_String);
+
+ memset(meshNode->tris, 0, sizeof(meshNode->tris));
+ memset(meshNode->verts, 0, sizeof(meshNode->verts));
+
+ meshNode->start_glcmds = 0;
+ meshNode->num_glcmds = 0;
+ vertIndexBase = 0;
+ }
+ else
+ { // Childs under the children
+ meshNode = &(*nodesList)[ActiveNode];
+ vertIndexBase = numVerts;
+ }
+ }
+ else
+ {
+ meshNode = NULL;
+ }
+
+
+ // Get the scaling, rotation, and translation values
+ TK_Beyond(TK_SCALING);
+ for(i = 0; i < 3; i++)
+ {
+ orig_scaling[i] = scaling[i];
+
+ TK_Require(TK_FLOATNUMBER);
+ scaling[i] *= tk_FloatNumber;
+
+ TK_Fetch();
+ }
+ TK_Beyond(TK_ROTATION);
+ for(i = 0; i < 3; i++)
+ {
+ orig_rotation[i] = rotation[i];
+
+ TK_Require(TK_FLOATNUMBER);
+ rotation[i] = tk_FloatNumber;
+
+ TK_Fetch();
+ }
+ TK_Beyond(TK_TRANSLATION);
+ for(i = 0; i < 3; i++)
+ {
+ orig_translation[i] = translation[i];
+
+ TK_Require(TK_FLOATNUMBER);
+ translation[i] += tk_FloatNumber;
+
+ TK_Fetch();
+ }
+
+ rx = ((rotation[0]-90.0)/360.0)*2.0*M_PI;
+ ry = (rotation[2]/360.0)*2.0*M_PI;
+ rz = (rotation[1]/360.0)*2.0*M_PI;
+
+ // rjr - might not work if there an item doesn't have a mesh
+ nextToken = tk_Token;
+ if (nextToken == TK_ACTOR_DATA)
+ {
+ while (nextToken != TK_MODEL && nextToken != TK_RBRACE)
+ {
+ nextToken = TK_Fetch();
+ }
+ }
+
+ while (nextToken == TK_SPLINE)
+ { // spline node has two right braces
+ nextToken = TK_Beyond(TK_RBRACE);
+ nextToken = TK_Beyond(TK_RBRACE);
+ }
+
+ while (nextToken == TK_MATERIAL)
+ {
+ nextToken = TK_Beyond(TK_RBRACE);
+ }
+
+ while(nextToken == TK_MODEL)
+ {
+ HandleHRCModel(triList,triangleCount,nodesList,num_mesh_nodes,ActiveNode, Depth+1, 0);
+
+ nextToken = TK_Fetch();
+ }
+
+ if (nextToken == TK_MESH)
+ {
+ // Get all the tri and vertex info
+ TK_BeyondRequire(TK_VERTICES, TK_INTNUMBER);
+ vertexCount = tk_IntNumber;
+ for(i = 0; i < vertexCount; i++)
+ {
+ TK_BeyondRequire(TK_LBRACKET, TK_INTNUMBER);
+ if(tk_IntNumber != i)
+ {
+ Error("File '%s', line %d:\nVertex index mismatch.\n",
+ tk_SourceName, tk_Line);
+ }
+ TK_Beyond(TK_POSITION);
+ // Apply the scaling, rotation, and translation in the order
+ // specified in the HRC file. This could be wrong.
+ TK_Require(TK_FLOATNUMBER);
+ x = tk_FloatNumber*scaling[0];
+ TK_FetchRequire(TK_FLOATNUMBER);
+ y = tk_FloatNumber*scaling[1];
+ TK_FetchRequire(TK_FLOATNUMBER);
+ z = tk_FloatNumber*scaling[2];
+
+ y2 = y*cos(rx)+z*sin(rx);
+ z2 = -y*sin(rx)+z*cos(rx);
+ y = y2;
+ z = z2;
+
+ x2 = x*cos(ry)-z*sin(ry);
+ z2 = x*sin(ry)+z*cos(ry);
+ x = x2;
+ z = z2;
+
+ x2 = x*cos(rz)+y*sin(rz);
+ y2 = -x*sin(rz)+y*cos(rz);
+ x = x2;
+ y = y2;
+
+ vList[i].v[0] = x+translation[0];
+ vList[i].v[1] = y-translation[2];
+ vList[i].v[2] = z+translation[1];
+ }
+ TK_BeyondRequire(TK_POLYGONS, TK_INTNUMBER);
+ triCount = tk_IntNumber;
+ if(triCount >= MAXTRIANGLES)
+ {
+ Error("Too many triangles in file %s\n", hrc_name);
+ }
+
+ start_tri = *triangleCount;
+ *triangleCount += triCount;
+
+ tList = *triList;
+
+ for(i = 0; i < triCount; i++)
+ {
+ if (meshNode)
+ { // Update the node
+ pos = (i + start_tri) >> 3;
+ bit = 1 << ((i + start_tri) & 7 );
+ meshNode->tris[pos] |= bit;
+ }
+
+ TK_BeyondRequire(TK_LBRACKET, TK_INTNUMBER);
+ if(tk_IntNumber != i)
+ {
+ Error("File '%s', line %d:\nTriangle index mismatch.\n",
+ tk_SourceName, tk_Line);
+ }
+ TK_BeyondRequire(TK_NODES, TK_INTNUMBER);
+ if(tk_IntNumber != 3)
+ {
+ Error("File '%s', line %d:\nBad polygon vertex count: %d.",
+ tk_SourceName, tk_Line, tk_IntNumber);
+ }
+ tList[i+start_tri].HasUV = true;
+ for(j = 0; j < 3; j++)
+ {
+ TK_BeyondRequire(TK_LBRACKET, TK_INTNUMBER);
+ if(tk_IntNumber != j)
+ {
+ Error("File '%s', line %d:\nTriangle vertex index"
+ " mismatch. %d should be %d\n", tk_SourceName, tk_Line,
+ tk_IntNumber, j);
+ }
+ TK_BeyondRequire(TK_VERTEX, TK_INTNUMBER);
+
+ tList[i+start_tri].verts[2-j][0] = vList[tk_IntNumber].v[0];
+ tList[i+start_tri].verts[2-j][1] = vList[tk_IntNumber].v[1];
+ tList[i+start_tri].verts[2-j][2] = vList[tk_IntNumber].v[2];
+#if 1
+ tList[i+start_tri].indicies[2-j] = tk_IntNumber+vertIndexBase;
+#endif
+ TK_BeyondRequire(TK_UVTEXTURE, TK_FLOATNUMBER);
+ tList[i+start_tri].uv[2-j][0] = tk_FloatNumber;
+ TK_Fetch();
+ TK_Require(TK_FLOATNUMBER);
+ tList[i+start_tri].uv[2-j][1] = tk_FloatNumber;
+ }
+
+ /* printf("Face %i:\n v0: %f, %f, %f\n v1: %f, %f, %f\n"
+ " v2: %f, %f, %f\n", i,
+ tList[i].verts[0][0],
+ tList[i].verts[0][1],
+ tList[i].verts[0][2],
+ tList[i].verts[1][0],
+ tList[i].verts[1][1],
+ tList[i].verts[1][2],
+ tList[i].verts[2][0],
+ tList[i].verts[2][1],
+ tList[i].verts[2][2]);
+ */
+ }
+
+ TK_Beyond(TK_RBRACE);
+ TK_Beyond(TK_RBRACE);
+
+ if (tk_Token == TK_EDGES)
+ {
+ // TK_Beyond(TK_EDGES);
+ TK_Beyond(TK_RBRACE);
+ }
+
+ scaling[0] = scaling[1] = scaling[2] = 1.0;
+ // rotation[0] = rotation[1] = rotation[2] = 0.0;
+ // translation[0] = translation[1] = translation[2] = 0.0;
+
+ // See if there are any other models belonging to this node
+
+#if 1
+ TK_Fetch();
+
+ nextToken = tk_Token;
+ if(nextToken == TK_CLUSTERS)
+ {
+ if(g_skelModel.clustered == -1)
+ {
+ ReadHRCClusterList(meshNode, vertIndexBase);
+ }
+ else
+ {
+ nextToken = TK_Get(TK_CLUSTER_NAME);
+
+ while (nextToken == TK_CLUSTER_NAME)
+ {
+ TK_BeyondRequire(TK_CLUSTER_STATE, TK_INTNUMBER);
+ nextToken = TK_Fetch();
+ }
+ }
+
+ // one right brace follow the list of clusters
+ nextToken = TK_Beyond(TK_RBRACE);
+ }
+ else
+ {
+ if(g_skelModel.clustered == -1 && !vertIndexBase)
+ {
+ meshNode->clustered = false;
+ }
+ }
+#endif
+
+ nextToken = tk_Token;
+ if(nextToken == TK_SPLINE)
+ {
+ while (nextToken == TK_SPLINE)
+ { // spline node has two right braces
+ nextToken = TK_Beyond(TK_RBRACE);
+ nextToken = TK_Beyond(TK_RBRACE);
+ }
+
+ nextToken = TK_Beyond(TK_RBRACE);
+ }
+
+ while (nextToken == TK_MATERIAL)
+ {
+ nextToken = TK_Beyond(TK_RBRACE);
+ }
+
+ while(nextToken == TK_MODEL)
+ {
+ HandleHRCModel(triList,triangleCount,nodesList, num_mesh_nodes, ActiveNode, Depth+1, vertexCount+vertIndexBase);
+
+ nextToken = TK_Fetch();
+ }
+ }
+
+ for(i=0;i<3;i++)
+ {
+ scaling[i] = orig_scaling[i];
+ rotation[i] = orig_rotation[i];
+ translation[i] = orig_translation[i];
+ }
+}
+
+static void LoadHRC(char *fileName, triangle_t **triList, int *triangleCount, mesh_node_t **nodesList, int *num_mesh_nodes)
+{
+ if (nodesList)
+ {
+ *num_mesh_nodes = 0;
+
+ if(!*nodesList)
+ {
+ *nodesList = (mesh_node_t *) SafeMalloc(MAX_FM_MESH_NODES * sizeof(mesh_node_t), "Mesh Node List");
+ }
+ }
+
+ hrc_name = fileName;
+
+ scaling[0] = scaling[1] = scaling[2] = 1.0;
+ rotation[0] = rotation[1] = rotation[2] = 0.0;
+ translation[0] = translation[1] = translation[2] = 0.0;
+
+ *triangleCount = 0;
+ *triList = (triangle_t *) SafeMalloc(MAXTRIANGLES*sizeof(triangle_t), "Triangle list");
+ memset(*triList,0,MAXTRIANGLES*sizeof(triangle_t));
+
+ TK_OpenSource(fileName);
+ TK_FetchRequire(TK_HRCH);
+ TK_FetchRequire(TK_COLON);
+ TK_FetchRequire(TK_SOFTIMAGE);
+
+ // prime it
+ TK_Beyond(TK_MODEL);
+
+ HandleHRCModel(triList, triangleCount, nodesList, num_mesh_nodes, 0, 0, 0);
+ TK_CloseSource();
+}
+
+//==========================================================================
+//
+// LoadHTR
+//
+//==========================================================================
+/*
+static int Version2;
+
+void HandleHTRModel(triangle_t **triList, int *triangleCount, mesh_node_t **nodesList, int *num_mesh_nodes,
+ int ActiveNode, int Depth, int numVerts)
+{
+ int i, j;
+ int vertexCount;
+ int vertexNum;
+ int triCount;
+ float origin[3];
+ triangle_t *tList;
+ float x, y, z;
+ float x2, y2, z2;
+ float rx, ry, rz;
+ mesh_node_t *meshNode;
+ int pos,bit;
+ int vertIndexBase;
+ int start_tri;
+
+ if (nodesList)
+ {
+ TK_BeyondRequire(TK_NAME, TK_STRING);
+
+ if (Depth == 0 || tk_String[0] == '_')
+ { // Root
+ ActiveNode = *num_mesh_nodes;
+ (*num_mesh_nodes)++;
+ if ((*num_mesh_nodes) > MAX_FM_MESH_NODES)
+ {
+ Error("Too many mesh nodes in file %s\n", hrc_name);
+ }
+ meshNode = &(*nodesList)[ActiveNode];
+
+// memset(meshNode, 0, sizeof(mesh_node_t));
+ strcpy(meshNode->name, tk_String);
+
+ memset(meshNode->tris, 0, sizeof(meshNode->tris));
+ memset(meshNode->verts, 0, sizeof(meshNode->verts));
+
+ meshNode->start_glcmds = 0;
+ meshNode->num_glcmds = 0;
+ vertIndexBase = 0;
+ }
+ else
+ { // Childs under the children
+ meshNode = &(*nodesList)[ActiveNode];
+ vertIndexBase = numVerts;
+ }
+ }
+ else
+ {
+ meshNode = NULL;
+ }
+
+ // Get vertex count
+ TK_BeyondRequire(TK_VERTICES, TK_INTNUMBER);
+ vertexCount = tk_IntNumber;
+
+ // Get triangle count
+ TK_BeyondRequire(TK_FACES, TK_INTNUMBER);
+ triCount = tk_IntNumber;
+ if(triCount >= MAXTRIANGLES)
+ {
+ Error("Too many triangles in file %s\n", hrc_name);
+ }
+
+ // Get origin
+ TK_Beyond(TK_ORIGIN);
+ TK_Require(TK_FLOATNUMBER);
+ origin[0] = tk_FloatNumber;
+ TK_FetchRequire(TK_FLOATNUMBER);
+ origin[1] = tk_FloatNumber;
+ TK_FetchRequire(TK_FLOATNUMBER);
+ origin[2] = tk_FloatNumber;
+
+ //rx = 90.0/360.0*2.0*M_PI;
+ rx = FixHTRRotateX/360.0*2.0*M_PI;
+ ry = FixHTRRotateY/360.0*2.0*M_PI;
+ rz = FixHTRRotateZ/360.0*2.0*M_PI;
+
+ // Get vertex list
+ for(i = 0; i < vertexCount; i++)
+ {
+ TK_FetchRequire(TK_VERTEX);
+ TK_FetchRequire(TK_FLOATNUMBER);
+ x = tk_FloatNumber-origin[0];
+ TK_FetchRequire(TK_FLOATNUMBER);
+ y = tk_FloatNumber-origin[1];
+ TK_FetchRequire(TK_FLOATNUMBER);
+ z = tk_FloatNumber-origin[2];
+
+ x += FixHTRTranslateX;
+ y += FixHTRTranslateY;
+ z += FixHTRTranslateZ;
+
+ y2 = y*cos(rx)-z*sin(rx);
+ z2 = y*sin(rx)+z*cos(rx);
+ y = y2;
+ z = z2;
+ x2 = x*cos(ry)+z*sin(ry);
+ z2 = -x*sin(ry)+z*cos(ry);
+ x = x2;
+ z = z2;
+ x2 = x*cos(rz)-y*sin(rz);
+ y2 = x*sin(rz)+y*cos(rz);
+ x = x2;
+ y = y2;
+
+ vList[i].v[0] = x;
+ vList[i].v[1] = y;
+ vList[i].v[2] = z;
+ }
+
+ start_tri = *triangleCount;
+ *triangleCount += triCount;
+
+ tList = *triList;
+
+ // Get face list
+ for(i = 0; i < triCount; i++)
+ {
+ if (meshNode)
+ { // Update the node
+ pos = (i + start_tri) >> 3;
+ bit = 1 << ((i + start_tri) & 7 );
+ meshNode->tris[pos] |= bit;
+ }
+
+ TK_FetchRequire(TK_FACE);
+ TK_FetchRequire(TK_LPAREN);
+ for(j = 0; j < 3; j++)
+ {
+ TK_FetchRequire(TK_INTNUMBER);
+ vertexNum = tk_IntNumber-1;
+ if(vertexNum >= vertexCount)
+ {
+ Error("File '%s', line %d:\nVertex number"
+ " >= vertexCount: %d\n", tk_SourceName, tk_Line,
+ tk_IntNumber);
+ }
+ tList[i+start_tri].verts[2-j][0] = vList[vertexNum].v[0];
+ tList[i+start_tri].verts[2-j][1] = vList[vertexNum].v[1];
+ tList[i+start_tri].verts[2-j][2] = vList[vertexNum].v[2];
+ }
+ TK_FetchRequire(TK_RPAREN);
+#ifdef _QDATA
+ if (Version2)
+ {
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i+start_tri].uv[0][0]=tk_FloatNumber;
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i+start_tri].uv[0][1]=tk_FloatNumber;
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i+start_tri].uv[1][0]=tk_FloatNumber;
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i+start_tri].uv[1][1]=tk_FloatNumber;
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i+start_tri].uv[2][0]=tk_FloatNumber;
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i+start_tri].uv[2][1]=tk_FloatNumber;
+ tList[i+start_tri].HasUV=1;
+ }
+ else
+ tList[i+start_tri].HasUV=0;
+#endif
+// printf("Face %i:\n v0: %f, %f, %f\n v1: %f, %f, %f\n"
+// " v2: %f, %f, %f\n", i,
+// tList[i].verts[0][0],
+// tList[i].verts[0][1],
+// tList[i].verts[0][2],
+// tList[i].verts[1][0],
+// tList[i].verts[1][1],
+// tList[i].verts[1][2],
+// tList[i].verts[2][0],
+// tList[i].verts[2][1],
+// tList[i].verts[2][2]);
+
+ }
+
+ TK_Fetch();
+
+ if (tk_Token == TK_VERTICES)
+ {
+ HandleHTRModel(triList,triangleCount,nodesList, num_mesh_nodes, ActiveNode, Depth+1, vertexCount+vertIndexBase);
+ }
+}
+
+static void LoadHTR(char *fileName, triangle_t **triList, int *triangleCount, mesh_node_t **nodesList, int *num_mesh_nodes)
+{
+ if (nodesList)
+ {
+ *num_mesh_nodes = 0;
+
+ if(!*nodesList)
+ {
+ *nodesList = SafeMalloc(MAX_FM_MESH_NODES * sizeof(mesh_node_t), "Mesh Node List");
+ }
+ }
+
+ hrc_name = fileName;
+
+ scaling[0] = scaling[1] = scaling[2] = 1.0;
+ rotation[0] = rotation[1] = rotation[2] = 0.0;
+ translation[0] = translation[1] = translation[2] = 0.0;
+
+ *triangleCount = 0;
+ *triList = SafeMalloc(MAXTRIANGLES*sizeof(triangle_t), "Triangle list");
+ memset(*triList,0,MAXTRIANGLES*sizeof(triangle_t));
+
+ TK_OpenSource(fileName);
+
+ TK_Beyond(TK_C_HEXEN);
+ TK_Beyond(TK_C_TRIANGLES);
+ TK_BeyondRequire(TK_C_VERSION, TK_INTNUMBER);
+ if(tk_IntNumber != 1&&tk_IntNumber != 2)
+ {
+ Error("Unsupported version (%d) in file %s\n", tk_IntNumber,
+ fileName);
+ }
+ Version2=(tk_IntNumber==2);
+
+
+ HandleHTRModel(triList, triangleCount, nodesList, num_mesh_nodes, 0, 0, 0);
+}
+
+*/
+
+static void LoadHTR(char *fileName, triangle_t **triList, int *triangleCount, mesh_node_t **nodesList, int *num_mesh_nodes)
+{
+ int Version2=0;
+ int i, j;
+ int vertexCount;
+ int vertexNum;
+ struct
+ {
+ float v[3];
+ } *vList;
+ int triCount;
+ float origin[3];
+ triangle_t *tList;
+ float x, y, z;
+ float x2, y2, z2;
+ float rx, ry, rz;
+
+ if (nodesList)
+ {
+ *num_mesh_nodes = 0;
+ *nodesList = (mesh_node_t *) SafeMalloc(MAX_FM_MESH_NODES * sizeof(mesh_node_t), "Mesh Node List");
+ }
+
+ TK_OpenSource(fileName);
+
+ TK_Beyond(TK_C_HEXEN);
+ TK_Beyond(TK_C_TRIANGLES);
+ TK_BeyondRequire(TK_C_VERSION, TK_INTNUMBER);
+ if(tk_IntNumber != 1&&tk_IntNumber != 2)
+ {
+ Error("Unsupported version (%d) in file %s\n", tk_IntNumber,
+ fileName);
+ }
+ Version2=(tk_IntNumber==2);
+
+
+ // Get vertex count
+ TK_BeyondRequire(TK_VERTICES, TK_INTNUMBER);
+ vertexCount = tk_IntNumber;
+ vList = (void *) SafeMalloc(vertexCount*sizeof vList[0], "Vertex list");
+
+ // Get triangle count
+ TK_BeyondRequire(TK_FACES, TK_INTNUMBER);
+ triCount = tk_IntNumber;
+ if(triCount >= MAXTRIANGLES)
+ {
+ Error("Too many triangles in file %s\n", fileName);
+ }
+ *triangleCount = triCount;
+ tList = (triangle_t *) SafeMalloc(MAXTRIANGLES*sizeof(triangle_t), "Triangle list");
+ *triList = tList;
+ memset(*triList,0,MAXTRIANGLES*sizeof(triangle_t));
+
+ // Get origin
+ TK_Beyond(TK_ORIGIN);
+ TK_Require(TK_FLOATNUMBER);
+ origin[0] = tk_FloatNumber;
+ TK_FetchRequire(TK_FLOATNUMBER);
+ origin[1] = tk_FloatNumber;
+ TK_FetchRequire(TK_FLOATNUMBER);
+ origin[2] = tk_FloatNumber;
+
+ //rx = 90.0/360.0*2.0*M_PI;
+ rx = FixHTRRotateX/360.0*2.0*M_PI;
+ ry = FixHTRRotateY/360.0*2.0*M_PI;
+ rz = FixHTRRotateZ/360.0*2.0*M_PI;
+
+ // Get vertex list
+ for(i = 0; i < vertexCount; i++)
+ {
+ TK_FetchRequire(TK_VERTEX);
+ TK_FetchRequire(TK_FLOATNUMBER);
+ x = tk_FloatNumber-origin[0];
+ TK_FetchRequire(TK_FLOATNUMBER);
+ y = tk_FloatNumber-origin[1];
+ TK_FetchRequire(TK_FLOATNUMBER);
+ z = tk_FloatNumber-origin[2];
+
+ x += FixHTRTranslateX;
+ y += FixHTRTranslateY;
+ z += FixHTRTranslateZ;
+
+ y2 = y*cos(rx)-z*sin(rx);
+ z2 = y*sin(rx)+z*cos(rx);
+ y = y2;
+ z = z2;
+ x2 = x*cos(ry)+z*sin(ry);
+ z2 = -x*sin(ry)+z*cos(ry);
+ x = x2;
+ z = z2;
+ x2 = x*cos(rz)-y*sin(rz);
+ y2 = x*sin(rz)+y*cos(rz);
+ x = x2;
+ y = y2;
+
+ vList[i].v[0] = x;
+ vList[i].v[1] = y;
+ vList[i].v[2] = z;
+ }
+
+ // Get face list
+ for(i = 0; i < triCount; i++)
+ {
+ TK_FetchRequire(TK_FACE);
+ TK_FetchRequire(TK_LPAREN);
+ for(j = 0; j < 3; j++)
+ {
+ TK_FetchRequire(TK_INTNUMBER);
+ vertexNum = tk_IntNumber-1;
+ if(vertexNum >= vertexCount)
+ {
+ Error("File '%s', line %d:\nVertex number"
+ " >= vertexCount: %d\n", tk_SourceName, tk_Line,
+ tk_IntNumber);
+ }
+ tList[i].verts[2-j][0] = vList[vertexNum].v[0];
+ tList[i].verts[2-j][1] = vList[vertexNum].v[1];
+ tList[i].verts[2-j][2] = vList[vertexNum].v[2];
+ }
+ TK_FetchRequire(TK_RPAREN);
+#if 1
+ if (Version2)
+ {
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i].uv[2][0]= fmod(1000+tk_FloatNumber,1);
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i].uv[2][1]=fmod(1000+tk_FloatNumber,1);
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i].uv[1][0]=fmod(1000+tk_FloatNumber,1);
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i].uv[1][1]=fmod(1000+tk_FloatNumber,1);
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i].uv[0][0]=fmod(1000+tk_FloatNumber,1);
+ TK_FetchRequire(TK_FLOATNUMBER);
+ tList[i].uv[0][1]=fmod(1000+tk_FloatNumber,1);
+ tList[i].HasUV=1;
+ }
+ else
+ tList[i].HasUV=0;
+#endif
+/* printf("Face %i:\n v0: %f, %f, %f\n v1: %f, %f, %f\n"
+ " v2: %f, %f, %f\n", i,
+ tList[i].verts[0][0],
+ tList[i].verts[0][1],
+ tList[i].verts[0][2],
+ tList[i].verts[1][0],
+ tList[i].verts[1][1],
+ tList[i].verts[1][2],
+ tList[i].verts[2][0],
+ tList[i].verts[2][1],
+ tList[i].verts[2][2]);
+*/
+ }
+
+ free(vList);
+ TK_CloseSource();
+ DefaultNodesList(nodesList,num_mesh_nodes,triangleCount);
+}
+
+//==========================================================================
+//
+// LoadTriangleList
+//
+//==========================================================================
+
+void LoadTriangleList(char *fileName, triangle_t **triList, int *triangleCount, mesh_node_t **ppmnodes, int *num_mesh_nodes)
+{
+ FILE *file1;
+ int dot = '.';
+ char *dotstart;
+ char InputFileName[256];
+
+ dotstart = strrchr(fileName,dot); // Does it already have an extension on the file name?
+
+ if (!dotstart)
+ {
+ strcpy(InputFileName, fileName);
+ strcat(InputFileName, ".hrc");
+ if((file1 = fopen(InputFileName, "rb")) != NULL)
+ {
+ fclose(file1);
+ LoadHRC(InputFileName, triList, triangleCount, ppmnodes, num_mesh_nodes);
+ printf(" - assuming .HRC\n");
+ return;
+ }
+
+ strcpy(InputFileName, fileName);
+ strcat(InputFileName, ".asc");
+ if((file1 = fopen(InputFileName, "rb")) != NULL)
+ {
+ fclose(file1);
+ LoadASC(InputFileName, triList, triangleCount, ppmnodes, num_mesh_nodes);
+ printf(" - assuming .ASC\n");
+ return;
+ }
+
+ strcpy(InputFileName, fileName);
+ strcat(InputFileName, ".tri");
+ if((file1 = fopen(InputFileName, "rb")) != NULL)
+ {
+ fclose(file1);
+ LoadTRI(InputFileName, triList, triangleCount, ppmnodes, num_mesh_nodes);
+ printf(" - assuming .TRI\n");
+ return;
+ }
+
+ strcpy(InputFileName, fileName);
+ strcat(InputFileName, ".3ds");
+ if((file1 = fopen(InputFileName, "rb")) != NULL)
+ {
+ fclose(file1);
+ Load3DSTriangleList (InputFileName, triList, triangleCount, ppmnodes, num_mesh_nodes);
+ printf(" - assuming .3DS\n");
+ return;
+ }
+
+ strcpy(InputFileName, fileName);
+ strcat(InputFileName, ".htr");
+ if((file1 = fopen(InputFileName, "rb")) != NULL)
+ {
+ fclose(file1);
+ LoadHTR (InputFileName, triList, triangleCount, ppmnodes, num_mesh_nodes);
+ printf(" - assuming .HTR\n");
+ return;
+ }
+ Error("\n Could not open file '%s':\n"
+ "No HRC, ASC, 3DS, HTR, or TRI match.\n", fileName);
+ }
+ else
+ {
+ if((file1 = fopen(fileName, "rb")) != NULL)
+ {
+ printf("\n");
+ fclose(file1);
+ if (strcmp(dotstart,".hrc") == 0 || strcmp(dotstart,".HRC") == 0)
+ {
+ LoadHRC(fileName, triList, triangleCount, ppmnodes, num_mesh_nodes);
+ }
+ else if (strcmp(dotstart,".asc") == 0 || strcmp(dotstart,".ASC") == 0)
+ {
+ LoadASC(fileName, triList, triangleCount, ppmnodes, num_mesh_nodes);
+ }
+ else if (strcmp(dotstart,".tri") == 0 || strcmp(dotstart,".TRI") == 0)
+ {
+ LoadTRI(fileName, triList, triangleCount, ppmnodes, num_mesh_nodes);
+ }
+ else if (strcmp(dotstart,".3ds") == 0 || strcmp(dotstart,".3DS") == 0)
+ {
+ Load3DSTriangleList (fileName, triList, triangleCount, ppmnodes, num_mesh_nodes);
+ }
+ else if (strcmp(dotstart,".htr") == 0 || strcmp(dotstart,".HTR") == 0)
+ {
+ LoadHTR (fileName, triList, triangleCount, ppmnodes, num_mesh_nodes);
+ }
+ else
+ {
+ Error("Could not open file '%s':\n",fileName);
+ return;
+ }
+ }
+ else //failed to load file
+ {
+ Error("Could not open file '%s':\n",fileName);
+ }
+
+ }
+}