+++ /dev/null
-/*
-Copyright (C) 1999-2006 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);
- }
-
- }
-}