94a80487451e22086c798d2679b1c8e3c0125cb3
[xonotic/netradiant.git] / tools / quake3 / q3map2 / model.c
1 /* -------------------------------------------------------------------------------
2
3    Copyright (C) 1999-2007 id Software, Inc. and contributors.
4    For a list of contributors, see the accompanying CONTRIBUTORS file.
5
6    This file is part of GtkRadiant.
7
8    GtkRadiant is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12
13    GtkRadiant is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with GtkRadiant; if not, write to the Free Software
20    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
21
22    ----------------------------------------------------------------------------------
23
24    This code has been altered significantly from its original form, to support
25    several games based on the Quake III Arena engine, in the form of "Q3Map2."
26
27    ------------------------------------------------------------------------------- */
28
29
30
31 /* marker */
32 #define MODEL_C
33
34
35
36 /* dependencies */
37 #include "q3map2.h"
38
39
40
41 /*
42    PicoPrintFunc()
43    callback for picomodel.lib
44  */
45
46 void PicoPrintFunc( int level, const char *str ){
47         if ( str == NULL ) {
48                 return;
49         }
50         switch ( level )
51         {
52         case PICO_NORMAL:
53                 Sys_Printf( "%s\n", str );
54                 break;
55
56         case PICO_VERBOSE:
57                 Sys_FPrintf( SYS_VRB, "%s\n", str );
58                 break;
59
60         case PICO_WARNING:
61                 Sys_Printf( "WARNING: %s\n", str );
62                 break;
63
64         case PICO_ERROR:
65                 Sys_Printf( "ERROR: %s\n", str );
66                 break;
67
68         case PICO_FATAL:
69                 Error( "ERROR: %s\n", str );
70                 break;
71         }
72 }
73
74
75
76 /*
77    PicoLoadFileFunc()
78    callback for picomodel.lib
79  */
80
81 void PicoLoadFileFunc( const char *name, byte **buffer, int *bufSize ){
82         *bufSize = vfsLoadFile( name, (void**) buffer, 0 );
83 }
84
85
86
87 /*
88    FindModel() - ydnar
89    finds an existing picoModel and returns a pointer to the picoModel_t struct or NULL if not found
90  */
91
92 picoModel_t *FindModel( const char *name, int frame ){
93         int i;
94
95
96         /* init */
97         if ( numPicoModels <= 0 ) {
98                 memset( picoModels, 0, sizeof( picoModels ) );
99         }
100
101         /* dummy check */
102         if ( name == NULL || name[ 0 ] == '\0' ) {
103                 return NULL;
104         }
105
106         /* search list */
107         for ( i = 0; i < MAX_MODELS; i++ )
108         {
109                 if ( picoModels[ i ] != NULL &&
110                          !strcmp( PicoGetModelName( picoModels[ i ] ), name ) &&
111                          PicoGetModelFrameNum( picoModels[ i ] ) == frame ) {
112                         return picoModels[ i ];
113                 }
114         }
115
116         /* no matching picoModel found */
117         return NULL;
118 }
119
120
121
122 /*
123    LoadModel() - ydnar
124    loads a picoModel and returns a pointer to the picoModel_t struct or NULL if not found
125  */
126
127 picoModel_t *LoadModel( const char *name, int frame ){
128         int i;
129         picoModel_t     *model, **pm;
130
131
132         /* init */
133         if ( numPicoModels <= 0 ) {
134                 memset( picoModels, 0, sizeof( picoModels ) );
135         }
136
137         /* dummy check */
138         if ( name == NULL || name[ 0 ] == '\0' ) {
139                 return NULL;
140         }
141
142         /* try to find existing picoModel */
143         model = FindModel( name, frame );
144         if ( model != NULL ) {
145                 return model;
146         }
147
148         /* none found, so find first non-null picoModel */
149         pm = NULL;
150         for ( i = 0; i < MAX_MODELS; i++ )
151         {
152                 if ( picoModels[ i ] == NULL ) {
153                         pm = &picoModels[ i ];
154                         break;
155                 }
156         }
157
158         /* too many picoModels? */
159         if ( pm == NULL ) {
160                 Error( "MAX_MODELS (%d) exceeded, there are too many model files referenced by the map.", MAX_MODELS );
161         }
162
163         /* attempt to parse model */
164         *pm = PicoLoadModel( name, frame );
165
166         /* if loading failed, make a bogus model to silence the rest of the warnings */
167         if ( *pm == NULL ) {
168                 /* allocate a new model */
169                 *pm = PicoNewModel();
170                 if ( *pm == NULL ) {
171                         return NULL;
172                 }
173
174                 /* set data */
175                 PicoSetModelName( *pm, name );
176                 PicoSetModelFrameNum( *pm, frame );
177         }
178
179         /* debug code */
180         #if 0
181         {
182                 int numSurfaces, numVertexes;
183                 picoSurface_t   *ps;
184
185
186                 Sys_Printf( "Model %s\n", name );
187                 numSurfaces = PicoGetModelNumSurfaces( *pm );
188                 for ( i = 0; i < numSurfaces; i++ )
189                 {
190                         ps = PicoGetModelSurface( *pm, i );
191                         numVertexes = PicoGetSurfaceNumVertexes( ps );
192                         Sys_Printf( "Surface %d has %d vertexes\n", i, numVertexes );
193                 }
194         }
195         #endif
196
197         /* set count */
198         if ( *pm != NULL ) {
199                 numPicoModels++;
200         }
201
202         /* return the picoModel */
203         return *pm;
204 }
205
206
207
208 /*
209    InsertModel() - ydnar
210    adds a picomodel into the bsp
211  */
212
213 void InsertModel( const char *name, int skin, int frame, m4x4_t transform, remap_t *remap, shaderInfo_t *celShader, int eNum, int castShadows, int recvShadows, int spawnFlags, float lightmapScale, int lightmapSampleSize, float shadeAngle ){
214         int i, j, s, numSurfaces;
215         m4x4_t identity, nTransform;
216         picoModel_t         *model;
217         picoShader_t        *shader;
218         picoSurface_t       *surface;
219         shaderInfo_t        *si;
220         mapDrawSurface_t    *ds;
221         bspDrawVert_t       *dv;
222         char                *picoShaderName;
223         char shaderName[ MAX_QPATH ];
224         picoVec_t           *xyz, *normal, *st;
225         byte                *color;
226         picoIndex_t         *indexes;
227         remap_t             *rm, *glob;
228         skinfile_t          *sf, *sf2;
229         double normalEpsilon_save;
230         double distanceEpsilon_save;
231         char skinfilename[ MAX_QPATH ];
232         char                *skinfilecontent;
233         int skinfilesize;
234         char                *skinfileptr, *skinfilenextptr;
235
236
237         /* get model */
238         model = LoadModel( name, frame );
239         if ( model == NULL ) {
240                 return;
241         }
242
243         /* load skin file */
244         snprintf( skinfilename, sizeof( skinfilename ), "%s_%d.skin", name, skin );
245         skinfilename[sizeof( skinfilename ) - 1] = 0;
246         skinfilesize = vfsLoadFile( skinfilename, (void**) &skinfilecontent, 0 );
247         if ( skinfilesize < 0 && skin != 0 ) {
248                 /* fallback to skin 0 if invalid */
249                 snprintf( skinfilename, sizeof( skinfilename ), "%s_0.skin", name );
250                 skinfilename[sizeof( skinfilename ) - 1] = 0;
251                 skinfilesize = vfsLoadFile( skinfilename, (void**) &skinfilecontent, 0 );
252                 if ( skinfilesize >= 0 ) {
253                         Sys_Printf( "Skin %d of %s does not exist, using 0 instead\n", skin, name );
254                 }
255         }
256         sf = NULL;
257         if ( skinfilesize >= 0 ) {
258                 Sys_Printf( "Using skin %d of %s\n", skin, name );
259                 int pos;
260                 for ( skinfileptr = skinfilecontent; *skinfileptr; skinfileptr = skinfilenextptr )
261                 {
262                         // for fscanf
263                         char format[64];
264
265                         skinfilenextptr = strchr( skinfileptr, '\r' );
266                         if ( skinfilenextptr ) {
267                                 *skinfilenextptr++ = 0;
268                         }
269                         else
270                         {
271                                 skinfilenextptr = strchr( skinfileptr, '\n' );
272                                 if ( skinfilenextptr ) {
273                                         *skinfilenextptr++ = 0;
274                                 }
275                                 else{
276                                         skinfilenextptr = skinfileptr + strlen( skinfileptr );
277                                 }
278                         }
279
280                         /* create new item */
281                         sf2 = sf;
282                         sf = safe_malloc( sizeof( *sf ) );
283                         sf->next = sf2;
284
285                         sprintf( format, "replace %%%ds %%%ds", (int)sizeof( sf->name ) - 1, (int)sizeof( sf->to ) - 1 );
286                         if ( sscanf( skinfileptr, format, sf->name, sf->to ) == 2 ) {
287                                 continue;
288                         }
289                         sprintf( format, " %%%d[^,  ] ,%%%ds", (int)sizeof( sf->name ) - 1, (int)sizeof( sf->to ) - 1 );
290                         if ( ( pos = sscanf( skinfileptr, format, sf->name, sf->to ) ) == 2 ) {
291                                 continue;
292                         }
293
294                         /* invalid input line -> discard sf struct */
295                         Sys_Printf( "Discarding skin directive in %s: %s\n", skinfilename, skinfileptr );
296                         free( sf );
297                         sf = sf2;
298                 }
299                 free( skinfilecontent );
300         }
301
302         /* handle null matrix */
303         if ( transform == NULL ) {
304                 m4x4_identity( identity );
305                 transform = identity;
306         }
307
308         /* hack: Stable-1_2 and trunk have differing row/column major matrix order
309            this transpose is necessary with Stable-1_2
310            uncomment the following line with old m4x4_t (non 1.3/spog_branch) code */
311         //%     m4x4_transpose( transform );
312
313         /* create transform matrix for normals */
314         memcpy( nTransform, transform, sizeof( m4x4_t ) );
315         if ( m4x4_invert( nTransform ) ) {
316                 Sys_FPrintf( SYS_VRB, "WARNING: Can't invert model transform matrix, using transpose instead\n" );
317         }
318         m4x4_transpose( nTransform );
319
320         /* fix bogus lightmap scale */
321         if ( lightmapScale <= 0.0f ) {
322                 lightmapScale = 1.0f;
323         }
324
325         /* fix bogus shade angle */
326         if ( shadeAngle <= 0.0f ) {
327                 shadeAngle = 0.0f;
328         }
329
330         /* each surface on the model will become a new map drawsurface */
331         numSurfaces = PicoGetModelNumSurfaces( model );
332         //%     Sys_FPrintf( SYS_VRB, "Model %s has %d surfaces\n", name, numSurfaces );
333         for ( s = 0; s < numSurfaces; s++ )
334         {
335                 /* get surface */
336                 surface = PicoGetModelSurface( model, s );
337                 if ( surface == NULL ) {
338                         continue;
339                 }
340
341                 /* only handle triangle surfaces initially (fixme: support patches) */
342                 if ( PicoGetSurfaceType( surface ) != PICO_TRIANGLES ) {
343                         continue;
344                 }
345
346                 /* get shader name */
347                 shader = PicoGetSurfaceShader( surface );
348                 if ( shader == NULL ) {
349                         picoShaderName = "";
350                 }
351                 else{
352                         picoShaderName = PicoGetShaderName( shader );
353                 }
354
355                 /* handle .skin file */
356                 if ( sf ) {
357                         picoShaderName = NULL;
358                         for ( sf2 = sf; sf2 != NULL; sf2 = sf2->next )
359                         {
360                                 if ( !Q_stricmp( surface->name, sf2->name ) ) {
361                                         Sys_FPrintf( SYS_VRB, "Skin file: mapping %s to %s\n", surface->name, sf2->to );
362                                         picoShaderName = sf2->to;
363                                         break;
364                                 }
365                         }
366                         if ( !picoShaderName ) {
367                                 Sys_FPrintf( SYS_VRB, "Skin file: not mapping %s\n", surface->name );
368                                 continue;
369                         }
370                 }
371
372                 /* handle shader remapping */
373                 glob = NULL;
374                 for ( rm = remap; rm != NULL; rm = rm->next )
375                 {
376                         if ( rm->from[ 0 ] == '*' && rm->from[ 1 ] == '\0' ) {
377                                 glob = rm;
378                         }
379                         else if ( !Q_stricmp( picoShaderName, rm->from ) ) {
380                                 Sys_FPrintf( SYS_VRB, "Remapping %s to %s\n", picoShaderName, rm->to );
381                                 picoShaderName = rm->to;
382                                 glob = NULL;
383                                 break;
384                         }
385                 }
386
387                 if ( glob != NULL ) {
388                         Sys_FPrintf( SYS_VRB, "Globbing %s to %s\n", picoShaderName, glob->to );
389                         picoShaderName = glob->to;
390                 }
391
392                 /* shader renaming for sof2 */
393                 if ( renameModelShaders ) {
394                         strcpy( shaderName, picoShaderName );
395                         StripExtension( shaderName );
396                         if ( spawnFlags & 1 ) {
397                                 strcat( shaderName, "_RMG_BSP" );
398                         }
399                         else{
400                                 strcat( shaderName, "_BSP" );
401                         }
402                         si = ShaderInfoForShader( shaderName );
403                 }
404                 else{
405                         si = ShaderInfoForShader( picoShaderName );
406                 }
407
408                 /* allocate a surface (ydnar: gs mods) */
409                 ds = AllocDrawSurface( SURFACE_TRIANGLES );
410                 ds->entityNum = eNum;
411                 ds->castShadows = castShadows;
412                 ds->recvShadows = recvShadows;
413
414                 /* set shader */
415                 ds->shaderInfo = si;
416
417                 /* force to meta? */
418                 if ( ( si != NULL && si->forceMeta ) || ( spawnFlags & 4 ) ) { /* 3rd bit */
419                         ds->type = SURFACE_FORCED_META;
420                 }
421
422                 /* fix the surface's normals (jal: conditioned by shader info) */
423                 if ( !( spawnFlags & 64 ) && ( shadeAngle == 0.0f || ds->type != SURFACE_FORCED_META ) ) {
424                         PicoFixSurfaceNormals( surface );
425                 }
426
427                 /* set sample size */
428                 if ( lightmapSampleSize > 0.0f ) {
429                         ds->sampleSize = lightmapSampleSize;
430                 }
431
432                 /* set lightmap scale */
433                 if ( lightmapScale > 0.0f ) {
434                         ds->lightmapScale = lightmapScale;
435                 }
436
437                 /* set shading angle */
438                 if ( shadeAngle > 0.0f ) {
439                         ds->shadeAngleDegrees = shadeAngle;
440                 }
441
442                 /* set particulars */
443                 ds->numVerts = PicoGetSurfaceNumVertexes( surface );
444                 ds->verts = safe_malloc( ds->numVerts * sizeof( ds->verts[ 0 ] ) );
445                 memset( ds->verts, 0, ds->numVerts * sizeof( ds->verts[ 0 ] ) );
446
447                 ds->numIndexes = PicoGetSurfaceNumIndexes( surface );
448                 ds->indexes = safe_malloc( ds->numIndexes * sizeof( ds->indexes[ 0 ] ) );
449                 memset( ds->indexes, 0, ds->numIndexes * sizeof( ds->indexes[ 0 ] ) );
450
451                 /* copy vertexes */
452                 for ( i = 0; i < ds->numVerts; i++ )
453                 {
454                         /* get vertex */
455                         dv = &ds->verts[ i ];
456
457                         /* xyz and normal */
458                         xyz = PicoGetSurfaceXYZ( surface, i );
459                         VectorCopy( xyz, dv->xyz );
460                         m4x4_transform_point( transform, dv->xyz );
461
462                         normal = PicoGetSurfaceNormal( surface, i );
463                         VectorCopy( normal, dv->normal );
464                         m4x4_transform_normal( nTransform, dv->normal );
465                         VectorNormalize( dv->normal, dv->normal );
466
467                         /* ydnar: tek-fu celshading support for flat shaded shit */
468                         if ( flat ) {
469                                 dv->st[ 0 ] = si->stFlat[ 0 ];
470                                 dv->st[ 1 ] = si->stFlat[ 1 ];
471                         }
472
473                         /* ydnar: gs mods: added support for explicit shader texcoord generation */
474                         else if ( si->tcGen ) {
475                                 /* project the texture */
476                                 dv->st[ 0 ] = DotProduct( si->vecs[ 0 ], dv->xyz );
477                                 dv->st[ 1 ] = DotProduct( si->vecs[ 1 ], dv->xyz );
478                         }
479
480                         /* normal texture coordinates */
481                         else
482                         {
483                                 st = PicoGetSurfaceST( surface, 0, i );
484                                 dv->st[ 0 ] = st[ 0 ];
485                                 dv->st[ 1 ] = st[ 1 ];
486                         }
487
488                         /* set lightmap/color bits */
489                         color = PicoGetSurfaceColor( surface, 0, i );
490                         for ( j = 0; j < MAX_LIGHTMAPS; j++ )
491                         {
492                                 dv->lightmap[ j ][ 0 ] = 0.0f;
493                                 dv->lightmap[ j ][ 1 ] = 0.0f;
494                                 if ( spawnFlags & 32 ) { // spawnflag 32: model color -> alpha hack
495                                         dv->color[ j ][ 0 ] = 255.0f;
496                                         dv->color[ j ][ 1 ] = 255.0f;
497                                         dv->color[ j ][ 2 ] = 255.0f;
498                                         dv->color[ j ][ 3 ] = RGBTOGRAY( color );
499                                 }
500                                 else
501                                 {
502                                         dv->color[ j ][ 0 ] = color[ 0 ];
503                                         dv->color[ j ][ 1 ] = color[ 1 ];
504                                         dv->color[ j ][ 2 ] = color[ 2 ];
505                                         dv->color[ j ][ 3 ] = color[ 3 ];
506                                 }
507                         }
508                 }
509
510                 /* copy indexes */
511                 indexes = PicoGetSurfaceIndexes( surface, 0 );
512                 for ( i = 0; i < ds->numIndexes; i++ )
513                         ds->indexes[ i ] = indexes[ i ];
514
515                 /* set cel shader */
516                 ds->celShader = celShader;
517
518                 /* ydnar: giant hack land: generate clipping brushes for model triangles */
519                 if ( si->clipModel || ( spawnFlags & 2 ) ) { /* 2nd bit */
520                         vec3_t points[ 4 ], backs[ 3 ];
521                         vec4_t plane, reverse, pa, pb, pc;
522
523
524                         /* temp hack */
525                         if ( !si->clipModel && !( si->compileFlags & C_SOLID ) ) {
526                                 continue;
527                         }
528
529                         /* walk triangle list */
530                         for ( i = 0; i < ds->numIndexes; i += 3 )
531                         {
532                                 /* overflow hack */
533                                 AUTOEXPAND_BY_REALLOC( mapplanes, ( nummapplanes + 64 ) << 1, allocatedmapplanes, 1024 );
534
535                                 /* make points and back points */
536                                 for ( j = 0; j < 3; j++ )
537                                 {
538                                         /* get vertex */
539                                         dv = &ds->verts[ ds->indexes[ i + j ] ];
540
541                                         /* copy xyz */
542                                         VectorCopy( dv->xyz, points[ j ] );
543                                 }
544
545                                 VectorCopy( points[0], points[3] ); // for cyclic usage
546
547                                 /* make plane for triangle */
548                                 // div0: add some extra spawnflags:
549                                 //   0: snap normals to axial planes for extrusion
550                                 //   8: extrude with the original normals
551                                 //  16: extrude only with up/down normals (ideal for terrain)
552                                 //  24: extrude by distance zero (may need engine changes)
553                                 if ( PlaneFromPoints( plane, points[ 0 ], points[ 1 ], points[ 2 ] ) ) {
554                                         vec3_t bestNormal;
555                                         float backPlaneDistance = 2;
556
557                                         if ( spawnFlags & 8 ) { // use a DOWN normal
558                                                 if ( spawnFlags & 16 ) {
559                                                         // 24: normal as is, and zero width (broken)
560                                                         VectorCopy( plane, bestNormal );
561                                                 }
562                                                 else
563                                                 {
564                                                         // 8: normal as is
565                                                         VectorCopy( plane, bestNormal );
566                                                 }
567                                         }
568                                         else
569                                         {
570                                                 if ( spawnFlags & 16 ) {
571                                                         // 16: UP/DOWN normal
572                                                         VectorSet( bestNormal, 0, 0, ( plane[2] >= 0 ? 1 : -1 ) );
573                                                 }
574                                                 else
575                                                 {
576                                                         // 0: axial normal
577                                                         if ( fabs( plane[0] ) > fabs( plane[1] ) ) { // x>y
578                                                                 if ( fabs( plane[1] ) > fabs( plane[2] ) ) { // x>y, y>z
579                                                                         VectorSet( bestNormal, ( plane[0] >= 0 ? 1 : -1 ), 0, 0 );
580                                                                 }
581                                                                 else // x>y, z>=y
582                                                                 if ( fabs( plane[0] ) > fabs( plane[2] ) ) { // x>z, z>=y
583                                                                         VectorSet( bestNormal, ( plane[0] >= 0 ? 1 : -1 ), 0, 0 );
584                                                                 }
585                                                                 else{    // z>=x, x>y
586                                                                         VectorSet( bestNormal, 0, 0, ( plane[2] >= 0 ? 1 : -1 ) );
587                                                                 }
588                                                         }
589                                                         else // y>=x
590                                                         if ( fabs( plane[1] ) > fabs( plane[2] ) ) { // y>z, y>=x
591                                                                 VectorSet( bestNormal, 0, ( plane[1] >= 0 ? 1 : -1 ), 0 );
592                                                         }
593                                                         else{    // z>=y, y>=x
594                                                                 VectorSet( bestNormal, 0, 0, ( plane[2] >= 0 ? 1 : -1 ) );
595                                                         }
596                                                 }
597                                         }
598
599                                         /* build a brush */
600                                         buildBrush = AllocBrush( 48 );
601                                         buildBrush->entityNum = mapEntityNum;
602                                         buildBrush->original = buildBrush;
603                                         buildBrush->contentShader = si;
604                                         buildBrush->compileFlags = si->compileFlags;
605                                         buildBrush->contentFlags = si->contentFlags;
606                                         normalEpsilon_save = normalEpsilon;
607                                         distanceEpsilon_save = distanceEpsilon;
608                                         if ( si->compileFlags & C_STRUCTURAL ) { // allow forced structural brushes here
609                                                 buildBrush->detail = qfalse;
610
611                                                 // only allow EXACT matches when snapping for these (this is mostly for caulk brushes inside a model)
612                                                 if ( normalEpsilon > 0 ) {
613                                                         normalEpsilon = 0;
614                                                 }
615                                                 if ( distanceEpsilon > 0 ) {
616                                                         distanceEpsilon = 0;
617                                                 }
618                                         }
619                                         else{
620                                                 buildBrush->detail = qtrue;
621                                         }
622
623                                         /* regenerate back points */
624                                         for ( j = 0; j < 3; j++ )
625                                         {
626                                                 /* get vertex */
627                                                 dv = &ds->verts[ ds->indexes[ i + j ] ];
628
629                                                 // shift by some units
630                                                 VectorMA( dv->xyz, -64.0f, bestNormal, backs[j] ); // 64 prevents roundoff errors a bit
631                                         }
632
633                                         /* make back plane */
634                                         VectorScale( plane, -1.0f, reverse );
635                                         reverse[ 3 ] = -plane[ 3 ];
636                                         if ( ( spawnFlags & 24 ) != 24 ) {
637                                                 reverse[3] += DotProduct( bestNormal, plane ) * backPlaneDistance;
638                                         }
639                                         // that's at least sqrt(1/3) backPlaneDistance, unless in DOWN mode; in DOWN mode, we are screwed anyway if we encounter a plane that's perpendicular to the xy plane)
640
641                                         if ( PlaneFromPoints( pa, points[ 2 ], points[ 1 ], backs[ 1 ] ) &&
642                                                  PlaneFromPoints( pb, points[ 1 ], points[ 0 ], backs[ 0 ] ) &&
643                                                  PlaneFromPoints( pc, points[ 0 ], points[ 2 ], backs[ 2 ] ) ) {
644                                                 /* set up brush sides */
645                                                 buildBrush->numsides = 5;
646                                                 buildBrush->sides[ 0 ].shaderInfo = si;
647                                                 for ( j = 1; j < buildBrush->numsides; j++ )
648                                                         buildBrush->sides[ j ].shaderInfo = NULL;  // don't emit these faces as draw surfaces, should make smaller BSPs; hope this works
649
650                                                 buildBrush->sides[ 0 ].planenum = FindFloatPlane( plane, plane[ 3 ], 3, points );
651                                                 buildBrush->sides[ 1 ].planenum = FindFloatPlane( pa, pa[ 3 ], 2, &points[ 1 ] ); // pa contains points[1] and points[2]
652                                                 buildBrush->sides[ 2 ].planenum = FindFloatPlane( pb, pb[ 3 ], 2, &points[ 0 ] ); // pb contains points[0] and points[1]
653                                                 buildBrush->sides[ 3 ].planenum = FindFloatPlane( pc, pc[ 3 ], 2, &points[ 2 ] ); // pc contains points[2] and points[0] (copied to points[3]
654                                                 buildBrush->sides[ 4 ].planenum = FindFloatPlane( reverse, reverse[ 3 ], 3, backs );
655                                         }
656                                         else
657                                         {
658                                                 free( buildBrush );
659                                                 continue;
660                                         }
661
662                                         normalEpsilon = normalEpsilon_save;
663                                         distanceEpsilon = distanceEpsilon_save;
664
665                                         /* add to entity */
666                                         if ( CreateBrushWindings( buildBrush ) ) {
667                                                 AddBrushBevels();
668                                                 //%     EmitBrushes( buildBrush, NULL, NULL );
669                                                 buildBrush->next = entities[ mapEntityNum ].brushes;
670                                                 entities[ mapEntityNum ].brushes = buildBrush;
671                                                 entities[ mapEntityNum ].numBrushes++;
672                                         }
673                                         else{
674                                                 free( buildBrush );
675                                         }
676                                 }
677                         }
678                 }
679         }
680 }
681
682
683
684 /*
685    AddTriangleModels()
686    adds misc_model surfaces to the bsp
687  */
688
689 void AddTriangleModels( entity_t *e ){
690         int num, frame, skin, castShadows, recvShadows, spawnFlags;
691         entity_t        *e2;
692         const char      *targetName;
693         const char      *target, *model, *value;
694         char shader[ MAX_QPATH ];
695         shaderInfo_t    *celShader;
696         float temp, baseLightmapScale, lightmapScale;
697         float shadeAngle;
698         int lightmapSampleSize;
699         vec3_t origin, scale, angles;
700         m4x4_t transform;
701         epair_t         *ep;
702         remap_t         *remap, *remap2;
703         char            *split;
704
705
706         /* note it */
707         Sys_FPrintf( SYS_VRB, "--- AddTriangleModels ---\n" );
708
709         /* get current brush entity targetname */
710         if ( e == entities ) {
711                 targetName = "";
712         }
713         else
714         {
715                 targetName = ValueForKey( e, "targetname" );
716
717                 /* misc_model entities target non-worldspawn brush model entities */
718                 if ( targetName[ 0 ] == '\0' ) {
719                         return;
720                 }
721         }
722
723         /* get lightmap scale */
724         /* vortex: added _ls key (short name of lightmapscale) */
725         baseLightmapScale = 0.0f;
726         if ( strcmp( "", ValueForKey( e, "lightmapscale" ) ) ||
727                  strcmp( "", ValueForKey( e, "_lightmapscale" ) ) ||
728                  strcmp( "", ValueForKey( e, "_ls" ) ) ) {
729                 baseLightmapScale = FloatForKey( e, "lightmapscale" );
730                 if ( baseLightmapScale <= 0.0f ) {
731                         baseLightmapScale = FloatForKey( e, "_lightmapscale" );
732                 }
733                 if ( baseLightmapScale <= 0.0f ) {
734                         baseLightmapScale = FloatForKey( e, "_ls" );
735                 }
736                 if ( baseLightmapScale < 0.0f ) {
737                         baseLightmapScale = 0.0f;
738                 }
739                 if ( baseLightmapScale > 0.0f ) {
740                         Sys_Printf( "World Entity has lightmap scale of %.4f\n", baseLightmapScale );
741                 }
742         }
743
744
745         /* walk the entity list */
746         for ( num = 1; num < numEntities; num++ )
747         {
748                 /* get e2 */
749                 e2 = &entities[ num ];
750
751                 /* convert misc_models into raw geometry */
752                 if ( Q_stricmp( "misc_model", ValueForKey( e2, "classname" ) ) ) {
753                         continue;
754                 }
755
756                 /* ydnar: added support for md3 models on non-worldspawn models */
757                 target = ValueForKey( e2, "target" );
758                 if ( strcmp( target, targetName ) ) {
759                         continue;
760                 }
761
762                 /* get model name */
763                 model = ValueForKey( e2, "model" );
764                 if ( model[ 0 ] == '\0' ) {
765                         Sys_Printf( "WARNING: misc_model at %i %i %i without a model key\n",
766                                                 (int) origin[ 0 ], (int) origin[ 1 ], (int) origin[ 2 ] );
767                         continue;
768                 }
769
770                 /* get model frame */
771                 frame = 0;
772                 if ( strcmp( "", ValueForKey( e2, "_frame" ) ) ) {
773                         frame = IntForKey( e2, "_frame" );
774                 }
775                 else if ( strcmp( "", ValueForKey( e2, "frame" ) ) ) {
776                         frame = IntForKey( e2, "frame" );
777                 }
778
779                 /* worldspawn (and func_groups) default to cast/recv shadows in worldspawn group */
780                 if ( e == entities ) {
781                         castShadows = WORLDSPAWN_CAST_SHADOWS;
782                         recvShadows = WORLDSPAWN_RECV_SHADOWS;
783                 }
784
785                 /* other entities don't cast any shadows, but recv worldspawn shadows */
786                 else
787                 {
788                         castShadows = ENTITY_CAST_SHADOWS;
789                         recvShadows = ENTITY_RECV_SHADOWS;
790                 }
791
792                 /* get explicit shadow flags */
793                 GetEntityShadowFlags( e2, e, &castShadows, &recvShadows );
794
795                 /* get spawnflags */
796                 spawnFlags = IntForKey( e2, "spawnflags" );
797
798                 /* get origin */
799                 GetVectorForKey( e2, "origin", origin );
800                 VectorSubtract( origin, e->origin, origin );    /* offset by parent */
801
802                 /* get scale */
803                 scale[ 0 ] = scale[ 1 ] = scale[ 2 ] = 1.0f;
804                 temp = FloatForKey( e2, "modelscale" );
805                 if ( temp != 0.0f ) {
806                         scale[ 0 ] = scale[ 1 ] = scale[ 2 ] = temp;
807                 }
808                 value = ValueForKey( e2, "modelscale_vec" );
809                 if ( value[ 0 ] != '\0' ) {
810                         sscanf( value, "%f %f %f", &scale[ 0 ], &scale[ 1 ], &scale[ 2 ] );
811                 }
812
813                 /* get "angle" (yaw) or "angles" (pitch yaw roll) */
814                 angles[ 0 ] = angles[ 1 ] = angles[ 2 ] = 0.0f;
815                 angles[ 2 ] = FloatForKey( e2, "angle" );
816                 value = ValueForKey( e2, "angles" );
817                 if ( value[ 0 ] != '\0' ) {
818                         sscanf( value, "%f %f %f", &angles[ 1 ], &angles[ 2 ], &angles[ 0 ] );
819                 }
820
821                 /* set transform matrix (thanks spog) */
822                 m4x4_identity( transform );
823                 m4x4_pivoted_transform_by_vec3( transform, origin, angles, eXYZ, scale, vec3_origin );
824
825                 /* get shader remappings */
826                 remap = NULL;
827                 for ( ep = e2->epairs; ep != NULL; ep = ep->next )
828                 {
829                         /* look for keys prefixed with "_remap" */
830                         if ( ep->key != NULL && ep->value != NULL &&
831                                  ep->key[ 0 ] != '\0' && ep->value[ 0 ] != '\0' &&
832                                  !Q_strncasecmp( ep->key, "_remap", 6 ) ) {
833                                 /* create new remapping */
834                                 remap2 = remap;
835                                 remap = safe_malloc( sizeof( *remap ) );
836                                 remap->next = remap2;
837                                 strcpy( remap->from, ep->value );
838
839                                 /* split the string */
840                                 split = strchr( remap->from, ';' );
841                                 if ( split == NULL ) {
842                                         Sys_Printf( "WARNING: Shader _remap key found in misc_model without a ; character\n" );
843                                         free( remap );
844                                         remap = remap2;
845                                         continue;
846                                 }
847
848                                 /* store the split */
849                                 *split = '\0';
850                                 strcpy( remap->to, ( split + 1 ) );
851
852                                 /* note it */
853                                 //%     Sys_FPrintf( SYS_VRB, "Remapping %s to %s\n", remap->from, remap->to );
854                         }
855                 }
856
857                 /* ydnar: cel shader support */
858                 value = ValueForKey( e2, "_celshader" );
859                 if ( value[ 0 ] == '\0' ) {
860                         value = ValueForKey( &entities[ 0 ], "_celshader" );
861                 }
862                 if ( value[ 0 ] != '\0' ) {
863                         sprintf( shader, "textures/%s", value );
864                         celShader = ShaderInfoForShader( shader );
865                 }
866                 else{
867                         celShader = *globalCelShader ? ShaderInfoForShader( globalCelShader ) : NULL;
868                 }
869
870                 /* jal : entity based _samplesize */
871                 lightmapSampleSize = 0;
872                 if ( strcmp( "", ValueForKey( e2, "_lightmapsamplesize" ) ) ) {
873                         lightmapSampleSize = IntForKey( e2, "_lightmapsamplesize" );
874                 }
875                 else if ( strcmp( "", ValueForKey( e2, "_samplesize" ) ) ) {
876                         lightmapSampleSize = IntForKey( e2, "_samplesize" );
877                 }
878
879                 if ( lightmapSampleSize < 0 ) {
880                         lightmapSampleSize = 0;
881                 }
882
883                 if ( lightmapSampleSize > 0.0f ) {
884                         Sys_Printf( "misc_model has lightmap sample size of %.d\n", lightmapSampleSize );
885                 }
886
887                 /* get lightmap scale */
888                 /* vortex: added _ls key (short name of lightmapscale) */
889                 lightmapScale = 0.0f;
890                 if ( strcmp( "", ValueForKey( e2, "lightmapscale" ) ) ||
891                          strcmp( "", ValueForKey( e2, "_lightmapscale" ) ) ||
892                          strcmp( "", ValueForKey( e2, "_ls" ) ) ) {
893                         lightmapScale = FloatForKey( e2, "lightmapscale" );
894                         if ( lightmapScale <= 0.0f ) {
895                                 lightmapScale = FloatForKey( e2, "_lightmapscale" );
896                         }
897                         if ( lightmapScale <= 0.0f ) {
898                                 lightmapScale = FloatForKey( e2, "_ls" );
899                         }
900                         if ( lightmapScale < 0.0f ) {
901                                 lightmapScale = 0.0f;
902                         }
903                         if ( lightmapScale > 0.0f ) {
904                                 Sys_Printf( "misc_model has lightmap scale of %.4f\n", lightmapScale );
905                         }
906                 }
907
908                 /* jal : entity based _shadeangle */
909                 shadeAngle = 0.0f;
910                 if ( strcmp( "", ValueForKey( e2, "_shadeangle" ) ) ) {
911                         shadeAngle = FloatForKey( e2, "_shadeangle" );
912                 }
913                 /* vortex' aliases */
914                 else if ( strcmp( "", ValueForKey( e2, "_smoothnormals" ) ) ) {
915                         shadeAngle = FloatForKey( e2, "_smoothnormals" );
916                 }
917                 else if ( strcmp( "", ValueForKey( e2, "_sn" ) ) ) {
918                         shadeAngle = FloatForKey( e2, "_sn" );
919                 }
920                 else if ( strcmp( "", ValueForKey( e2, "_smooth" ) ) ) {
921                         shadeAngle = FloatForKey( e2, "_smooth" );
922                 }
923
924                 if ( shadeAngle < 0.0f ) {
925                         shadeAngle = 0.0f;
926                 }
927
928                 if ( shadeAngle > 0.0f ) {
929                         Sys_Printf( "misc_model has shading angle of %.4f\n", shadeAngle );
930                 }
931
932                 skin = 0;
933                 if ( strcmp( "", ValueForKey( e2, "_skin" ) ) ) {
934                         skin = IntForKey( e2, "_skin" );
935                 }
936                 else if ( strcmp( "", ValueForKey( e2, "skin" ) ) ) {
937                         skin = IntForKey( e2, "skin" );
938                 }
939
940                 /* insert the model */
941                 InsertModel( model, skin, frame, transform, remap, celShader, mapEntityNum, castShadows, recvShadows, spawnFlags, lightmapScale, lightmapSampleSize, shadeAngle );
942
943                 /* free shader remappings */
944                 while ( remap != NULL )
945                 {
946                         remap2 = remap->next;
947                         free( remap );
948                         remap = remap2;
949                 }
950         }
951 }