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