1 /*
2 Copyright (C) 1999-2006 Id Software, Inc. and contributors.
3 For a list of contributors, see the accompanying CONTRIBUTORS file.
4
5 This file is part of GtkRadiant.
6
7 GtkRadiant is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
11
12 GtkRadiant is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with GtkRadiant; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
20 */
21
22 //
23 // trilib.c: library for loading triangles from an Alias triangle file
24 //
25
26 #include <stdio.h>
27 #include "cmdlib.h"
28 #include "mathlib.h"
29 #include "polyset.h"
30 #include "trilib.h"
31
32 // on disk representation of a face
33
34
35 #define FLOAT_START 99999.0
36 #define FLOAT_END -FLOAT_START
37 #define MAGIC 123322
38
39 //#define NOISY 1
40
41 #if defined ( __DragonFly__ ) || defined ( __APPLE__ )
42 #define strlwr strlower
43 #endif
44
45 typedef struct {
46 float v[3];
47 } vector;
48
49 typedef struct
50 {
51 vector n; /* normal */
52 vector p; /* point */
53 vector c; /* color */
54 float u; /* u */
55 float v; /* v */
56 } aliaspoint_t;
57
58 typedef struct {
59 aliaspoint_t pt[3];
60 } tf_triangle;
61
62
ByteSwapTri(tf_triangle * tri)63 static void ByteSwapTri( tf_triangle *tri ){
64 int i;
65
66 for ( i = 0 ; i < sizeof( tf_triangle ) / 4 ; i++ )
67 {
68 ( (int *)tri )[i] = BigLong( ( (int *)tri )[i] );
69 }
70 }
71
ReadPolysetGeometry(triangle_t * tripool,FILE * input,int count,triangle_t * ptri)72 static void ReadPolysetGeometry( triangle_t *tripool, FILE *input, int count, triangle_t *ptri ){
73 tf_triangle tri;
74 int i;
75
76 for ( i = 0; i < count; ++i ) {
77 int j;
78
79 fread( &tri, sizeof( tf_triangle ), 1, input );
80 ByteSwapTri( &tri );
81 for ( j = 0 ; j < 3 ; j++ )
82 {
83 int k;
84
85 for ( k = 0 ; k < 3 ; k++ )
86 {
87 ptri->verts[j][k] = tri.pt[j].p.v[k];
88 ptri->normals[j][k] = tri.pt[j].n.v[k];
89 // ptri->colors[j][k] = tri.pt[j].c.v[k];
90 }
91
92 ptri->texcoords[j][0] = tri.pt[j].u;
93 ptri->texcoords[j][1] = tri.pt[j].v;
94 }
95
96 ptri++;
97 if ( ( ptri - tripool ) >= POLYSET_MAXTRIANGLES ) {
98 Error( "Error: too many triangles; increase POLYSET_MAXTRIANGLES\n" );
99 }
100 }
101 }
102
TRI_LoadPolysets(const char * filename,polyset_t ** ppPSET,int * numpsets)103 void TRI_LoadPolysets( const char *filename, polyset_t **ppPSET, int *numpsets ){
104 FILE *input;
105 float start;
106 char name[256], tex[256];
107 int i, count, magic, pset = 0;
108 triangle_t *ptri;
109 polyset_t *pPSET;
110 int iLevel;
111 int exitpattern;
112 float t;
113
114 t = -FLOAT_START;
115 *( (unsigned char *)&exitpattern + 0 ) = *( (unsigned char *)&t + 3 );
116 *( (unsigned char *)&exitpattern + 1 ) = *( (unsigned char *)&t + 2 );
117 *( (unsigned char *)&exitpattern + 2 ) = *( (unsigned char *)&t + 1 );
118 *( (unsigned char *)&exitpattern + 3 ) = *( (unsigned char *)&t + 0 );
119
120 if ( ( input = fopen( filename, "rb" ) ) == 0 ) {
121 Error( "reader: could not open file '%s'", filename );
122 }
123
124 iLevel = 0;
125
126 fread( &magic, sizeof( int ), 1, input );
127 if ( BigLong( magic ) != MAGIC ) {
128 Error( "%s is not a Alias object separated triangle file, magic number is wrong.", filename );
129 }
130
131 pPSET = calloc( 1, POLYSET_MAXPOLYSETS * sizeof( polyset_t ) );
132 ptri = calloc( 1, POLYSET_MAXTRIANGLES * sizeof( triangle_t ) );
133
134 *ppPSET = pPSET;
135
136 while ( feof( input ) == 0 ) {
137 if ( fread( &start, sizeof( float ), 1, input ) < 1 ) {
138 break;
139 }
140 *(int *)&start = BigLong( *(int *)&start );
141 if ( *(int *)&start != exitpattern ) {
142 if ( start == FLOAT_START ) {
143 /* Start of an object or group of objects. */
144 i = -1;
145 do {
146 /* There are probably better ways to read a string from */
147 /* a file, but this does allow you to do error checking */
148 /* (which I'm not doing) on a per character basis. */
149 ++i;
150 fread( &( name[i] ), sizeof( char ), 1, input );
151 } while ( name[i] != '\0' );
152
153 if ( i != 0 ) {
154 strncpy( pPSET[pset].name, name, sizeof( pPSET[pset].name ) - 1 );
155 }
156 else{
157 strcpy( pPSET[pset].name, "(unnamed)" );
158 }
159 strlwr( pPSET[pset].name );
160
161 // indent();
162 // fprintf(stdout,"OBJECT START: %s\n",name);
163 fread( &count, sizeof( int ), 1, input );
164 count = BigLong( count );
165 ++iLevel;
166 if ( count != 0 ) {
167 // indent();
168 // fprintf(stdout,"NUMBER OF TRIANGLES: %d\n",count);
169
170 i = -1;
171 do {
172 ++i;
173 fread( &( tex[i] ), sizeof( char ), 1, input );
174 } while ( tex[i] != '\0' );
175
176 /*
177 if ( i != 0 )
178 strncpy( pPSET[pset].texname, tex, sizeof( pPSET[pset].texname ) - 1 );
179 else
180 strcpy( pPSET[pset].texname, "(unnamed)" );
181 strlwr( pPSET[pset].texname );
182 */
183
184 // indent();
185 // fprintf(stdout," Object texture name: '%s'\n",tex);
186 }
187
188 /* Else (count == 0) this is the start of a group, and */
189 /* no texture name is present. */
190 }
191 else if ( start == FLOAT_END ) {
192 /* End of an object or group. Yes, the name should be */
193 /* obvious from context, but it is in here just to be */
194 /* safe and to provide a little extra information for */
195 /* those who do not wish to write a recursive reader. */
196 /* Mea culpa. */
197 --iLevel;
198 i = -1;
199 do {
200 ++i;
201 fread( &( name[i] ), sizeof( char ), 1, input );
202 } while ( name[i] != '\0' );
203
204 if ( i != 0 ) {
205 strncpy( pPSET[pset].name, name, sizeof( pPSET[pset].name ) - 1 );
206 }
207 else{
208 strcpy( pPSET[pset].name, "(unnamed)" );
209 }
210
211 strlwr( pPSET[pset].name );
212
213 // indent();
214 // fprintf(stdout,"OBJECT END: %s\n",name);
215 continue;
216 }
217 }
218
219 //
220 // read the triangles
221 //
222 if ( count > 0 ) {
223 pPSET[pset].triangles = ptri;
224 ReadPolysetGeometry( pPSET[0].triangles, input, count, ptri );
225 ptri += count;
226 pPSET[pset].numtriangles = count;
227 if ( ++pset >= POLYSET_MAXPOLYSETS ) {
228 Error( "Error: too many polysets; increase POLYSET_MAXPOLYSETS\n" );
229 }
230 }
231 }
232
233 *numpsets = pset;
234
235 fclose( input );
236 }
237