/tools/quake2/qdata_heretic2/common/trilib.c
C | 1039 lines | 591 code | 116 blank | 332 comment | 136 complexity | 6efcfa1bd4e29c880ceddae666c3fb72 MD5 | raw file
Possible License(s): GPL-2.0, LGPL-2.1, LGPL-2.0
- /*
- 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 );
- }
- }
- }