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_FPrintf( SYS_WRN, "WARNING: %s\n", str );
  62                 break;
  63
  64         case PICO_ERROR:
  65                 Sys_FPrintf( SYS_ERR, "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 /*              else
 422                         {
 423                                 //fix not requested lightmapping of models :E
 424                                 // else force vertexlit
 425                                 //      ApplySurfaceParm( "pointlight", &si->contentFlags, &si->surfaceFlags, &si->compileFlags );
 426                                 //   si->compileFlags |= C_VERTEXLIT;
 427                                 //ds->type == SURFACE_TRIANGLES;
 428                         }
 429 */
 430                 /* fix the surface's normals (jal: conditioned by shader info) */
 431                 if ( !( spawnFlags & 64 ) && ( shadeAngle == 0.0f || ds->type != SURFACE_FORCED_META ) ) {
 432                         PicoFixSurfaceNormals( surface );
 433                 }
 434
 435                 /* set sample size */
 436                 if ( lightmapSampleSize > 0.0f ) {
 437                         ds->sampleSize = lightmapSampleSize;
 438                 }
 439
 440                 /* set lightmap scale */
 441                 if ( lightmapScale > 0.0f ) {
 442                         ds->lightmapScale = lightmapScale;
 443                 }
 444
 445                 /* set shading angle */
 446                 if ( shadeAngle > 0.0f ) {
 447                         ds->shadeAngleDegrees = shadeAngle;
 448                 }
 449
 450                 /* set particulars */
 451                 ds->numVerts = PicoGetSurfaceNumVertexes( surface );
 452                 ds->verts = safe_malloc( ds->numVerts * sizeof( ds->verts[ 0 ] ) );
 453                 memset( ds->verts, 0, ds->numVerts * sizeof( ds->verts[ 0 ] ) );
 454
 455                 ds->numIndexes = PicoGetSurfaceNumIndexes( surface );
 456                 ds->indexes = safe_malloc( ds->numIndexes * sizeof( ds->indexes[ 0 ] ) );
 457                 memset( ds->indexes, 0, ds->numIndexes * sizeof( ds->indexes[ 0 ] ) );
 458
 459                 /* copy vertexes */
 460                 for ( i = 0; i < ds->numVerts; i++ )
 461                 {
 462                         /* get vertex */
 463                         dv = &ds->verts[ i ];
 464
 465                         /* xyz and normal */
 466                         xyz = PicoGetSurfaceXYZ( surface, i );
 467                         VectorCopy( xyz, dv->xyz );
 468                         m4x4_transform_point( transform, dv->xyz );
 469
 470                         normal = PicoGetSurfaceNormal( surface, i );
 471                         VectorCopy( normal, dv->normal );
 472                         m4x4_transform_normal( nTransform, dv->normal );
 473                         VectorNormalize( dv->normal, dv->normal );
 474
 475                         /* ydnar: tek-fu celshading support for flat shaded shit */
 476                         if ( flat ) {
 477                                 dv->st[ 0 ] = si->stFlat[ 0 ];
 478                                 dv->st[ 1 ] = si->stFlat[ 1 ];
 479                         }
 480
 481                         /* ydnar: gs mods: added support for explicit shader texcoord generation */
 482                         else if ( si->tcGen ) {
 483                                 /* project the texture */
 484                                 dv->st[ 0 ] = DotProduct( si->vecs[ 0 ], dv->xyz );
 485                                 dv->st[ 1 ] = DotProduct( si->vecs[ 1 ], dv->xyz );
 486                         }
 487
 488                         /* normal texture coordinates */
 489                         else
 490                         {
 491                                 st = PicoGetSurfaceST( surface, 0, i );
 492                                 dv->st[ 0 ] = st[ 0 ];
 493                                 dv->st[ 1 ] = st[ 1 ];
 494                         }
 495
 496                         /* set lightmap/color bits */
 497                         color = PicoGetSurfaceColor( surface, 0, i );
 498                         for ( j = 0; j < MAX_LIGHTMAPS; j++ )
 499                         {
 500                                 dv->lightmap[ j ][ 0 ] = 0.0f;
 501                                 dv->lightmap[ j ][ 1 ] = 0.0f;
 502                                 if ( spawnFlags & 32 ) { // spawnflag 32: model color -> alpha hack
 503                                         dv->color[ j ][ 0 ] = 255.0f;
 504                                         dv->color[ j ][ 1 ] = 255.0f;
 505                                         dv->color[ j ][ 2 ] = 255.0f;
 506                                         dv->color[ j ][ 3 ] = RGBTOGRAY( color );
 507                                 }
 508                                 else
 509                                 {
 510                                         dv->color[ j ][ 0 ] = color[ 0 ];
 511                                         dv->color[ j ][ 1 ] = color[ 1 ];
 512                                         dv->color[ j ][ 2 ] = color[ 2 ];
 513                                         dv->color[ j ][ 3 ] = color[ 3 ];
 514                                 }
 515                         }
 516                 }
 517
 518                 /* copy indexes */
 519                 indexes = PicoGetSurfaceIndexes( surface, 0 );
 520                 for ( i = 0; i < ds->numIndexes; i++ )
 521                         ds->indexes[ i ] = indexes[ i ];
 522
 523                 /* set cel shader */
 524                 ds->celShader = celShader;
 525
 526                 /* ydnar: giant hack land: generate clipping brushes for model triangles */
 527                 if ( si->clipModel || ( spawnFlags & 2 ) ) { /* 2nd bit */
 528                         vec3_t points[ 4 ], backs[ 3 ];
 529                         vec4_t plane, reverse, pa, pb, pc;
 530
 531
 532                         /* temp hack */
 533                         if ( !si->clipModel && !( si->compileFlags & C_SOLID ) ) {
 534                                 continue;
 535                         }
 536
 537                         /* walk triangle list */
 538                         for ( i = 0; i < ds->numIndexes; i += 3 )
 539                         {
 540                                 /* overflow hack */
 541                                 AUTOEXPAND_BY_REALLOC( mapplanes, ( nummapplanes + 64 ) << 1, allocatedmapplanes, 1024 );
 542
 543                                 /* make points and back points */
 544                                 for ( j = 0; j < 3; j++ )
 545                                 {
 546                                         /* get vertex */
 547                                         dv = &ds->verts[ ds->indexes[ i + j ] ];
 548
 549                                         /* copy xyz */
 550                                         VectorCopy( dv->xyz, points[ j ] );
 551                                 }
 552
 553                                 VectorCopy( points[0], points[3] ); // for cyclic usage
 554
 555                                 /* make plane for triangle */
 556                                 // div0: add some extra spawnflags:
 557                                 //   0: snap normals to axial planes for extrusion
 558                                 //   8: extrude with the original normals
 559                                 //  16: extrude only with up/down normals (ideal for terrain)
 560                                 //  24: extrude by distance zero (may need engine changes)
 561                                 if ( PlaneFromPoints( plane, points[ 0 ], points[ 1 ], points[ 2 ] ) ) {
 562                                         vec3_t bestNormal;
 563                                         float backPlaneDistance = 2;
 564
 565                                         if ( spawnFlags & 8 ) { // use a DOWN normal
 566                                                 if ( spawnFlags & 16 ) {
 567                                                         // 24: normal as is, and zero width (broken)
 568                                                         VectorCopy( plane, bestNormal );
 569                                                 }
 570                                                 else
 571                                                 {
 572                                                         // 8: normal as is
 573                                                         VectorCopy( plane, bestNormal );
 574                                                 }
 575                                         }
 576                                         else
 577                                         {
 578                                                 if ( spawnFlags & 16 ) {
 579                                                         // 16: UP/DOWN normal
 580                                                         VectorSet( bestNormal, 0, 0, ( plane[2] >= 0 ? 1 : -1 ) );
 581                                                 }
 582                                                 else
 583                                                 {
 584                                                         // 0: axial normal
 585                                                         if ( fabs( plane[0] ) > fabs( plane[1] ) ) { // x>y
 586                                                                 if ( fabs( plane[1] ) > fabs( plane[2] ) ) { // x>y, y>z
 587                                                                         VectorSet( bestNormal, ( plane[0] >= 0 ? 1 : -1 ), 0, 0 );
 588                                                                 }
 589                                                                 else // x>y, z>=y
 590                                                                 if ( fabs( plane[0] ) > fabs( plane[2] ) ) { // x>z, z>=y
 591                                                                         VectorSet( bestNormal, ( plane[0] >= 0 ? 1 : -1 ), 0, 0 );
 592                                                                 }
 593                                                                 else{    // z>=x, x>y
 594                                                                         VectorSet( bestNormal, 0, 0, ( plane[2] >= 0 ? 1 : -1 ) );
 595                                                                 }
 596                                                         }
 597                                                         else // y>=x
 598                                                         if ( fabs( plane[1] ) > fabs( plane[2] ) ) { // y>z, y>=x
 599                                                                 VectorSet( bestNormal, 0, ( plane[1] >= 0 ? 1 : -1 ), 0 );
 600                                                         }
 601                                                         else{    // z>=y, y>=x
 602                                                                 VectorSet( bestNormal, 0, 0, ( plane[2] >= 0 ? 1 : -1 ) );
 603                                                         }
 604                                                 }
 605                                         }
 606
 607                                         /* build a brush */
 608                                         buildBrush = AllocBrush( 48 );
 609                                         buildBrush->entityNum = mapEntityNum;
 610                                         buildBrush->original = buildBrush;
 611                                         buildBrush->contentShader = si;
 612                                         buildBrush->compileFlags = si->compileFlags;
 613                                         buildBrush->contentFlags = si->contentFlags;
 614                                         normalEpsilon_save = normalEpsilon;
 615                                         distanceEpsilon_save = distanceEpsilon;
 616                                         if ( si->compileFlags & C_STRUCTURAL ) { // allow forced structural brushes here
 617                                                 buildBrush->detail = qfalse;
 618
 619                                                 // only allow EXACT matches when snapping for these (this is mostly for caulk brushes inside a model)
 620                                                 if ( normalEpsilon > 0 ) {
 621                                                         normalEpsilon = 0;
 622                                                 }
 623                                                 if ( distanceEpsilon > 0 ) {
 624                                                         distanceEpsilon = 0;
 625                                                 }
 626                                         }
 627                                         else{
 628                                                 buildBrush->detail = qtrue;
 629                                         }
 630
 631                                         /* regenerate back points */
 632                                         for ( j = 0; j < 3; j++ )
 633                                         {
 634                                                 /* get vertex */
 635                                                 dv = &ds->verts[ ds->indexes[ i + j ] ];
 636
 637                                                 // shift by some units
 638                                                 VectorMA( dv->xyz, -64.0f, bestNormal, backs[j] ); // 64 prevents roundoff errors a bit
 639                                         }
 640
 641                                         /* make back plane */
 642                                         VectorScale( plane, -1.0f, reverse );
 643                                         reverse[ 3 ] = -plane[ 3 ];
 644                                         if ( ( spawnFlags & 24 ) != 24 ) {
 645                                                 reverse[3] += DotProduct( bestNormal, plane ) * backPlaneDistance;
 646                                         }
 647                                         // 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)
 648
 649                                         if ( PlaneFromPoints( pa, points[ 2 ], points[ 1 ], backs[ 1 ] ) &&
 650                                                  PlaneFromPoints( pb, points[ 1 ], points[ 0 ], backs[ 0 ] ) &&
 651                                                  PlaneFromPoints( pc, points[ 0 ], points[ 2 ], backs[ 2 ] ) ) {
 652                                                 /* set up brush sides */
 653                                                 buildBrush->numsides = 5;
 654                                                 buildBrush->sides[ 0 ].shaderInfo = si;
 655                                                 for ( j = 1; j < buildBrush->numsides; j++ )
 656                                                         buildBrush->sides[ j ].shaderInfo = NULL;  // don't emit these faces as draw surfaces, should make smaller BSPs; hope this works
 657
 658                                                 buildBrush->sides[ 0 ].planenum = FindFloatPlane( plane, plane[ 3 ], 3, points );
 659                                                 buildBrush->sides[ 1 ].planenum = FindFloatPlane( pa, pa[ 3 ], 2, &points[ 1 ] ); // pa contains points[1] and points[2]
 660                                                 buildBrush->sides[ 2 ].planenum = FindFloatPlane( pb, pb[ 3 ], 2, &points[ 0 ] ); // pb contains points[0] and points[1]
 661                                                 buildBrush->sides[ 3 ].planenum = FindFloatPlane( pc, pc[ 3 ], 2, &points[ 2 ] ); // pc contains points[2] and points[0] (copied to points[3]
 662                                                 buildBrush->sides[ 4 ].planenum = FindFloatPlane( reverse, reverse[ 3 ], 3, backs );
 663                                         }
 664                                         else
 665                                         {
 666                                                 free( buildBrush );
 667                                                 continue;
 668                                         }
 669
 670                                         normalEpsilon = normalEpsilon_save;
 671                                         distanceEpsilon = distanceEpsilon_save;
 672
 673                                         /* add to entity */
 674                                         if ( CreateBrushWindings( buildBrush ) ) {
 675                                                 AddBrushBevels();
 676                                                 //%     EmitBrushes( buildBrush, NULL, NULL );
 677                                                 buildBrush->next = entities[ mapEntityNum ].brushes;
 678                                                 entities[ mapEntityNum ].brushes = buildBrush;
 679                                                 entities[ mapEntityNum ].numBrushes++;
 680                                         }
 681                                         else{
 682                                                 free( buildBrush );
 683                                         }
 684                                 }
 685                         }
 686                 }
 687         }
 688 }
 689
 690
 691
 692 /*
 693    AddTriangleModels()
 694    adds misc_model surfaces to the bsp
 695  */
 696
 697 void AddTriangleModels( entity_t *e ){
 698         int num, frame, skin, castShadows, recvShadows, spawnFlags;
 699         entity_t        *e2;
 700         const char      *targetName;
 701         const char      *target, *model, *value;
 702         char shader[ MAX_QPATH ];
 703         shaderInfo_t    *celShader;
 704         float temp, baseLightmapScale, lightmapScale;
 705         float shadeAngle;
 706         int lightmapSampleSize;
 707         vec3_t origin, scale, angles;
 708         m4x4_t transform;
 709         epair_t         *ep;
 710         remap_t         *remap, *remap2;
 711         char            *split;
 712
 713
 714         /* note it */
 715         Sys_FPrintf( SYS_VRB, "--- AddTriangleModels ---\n" );
 716
 717         /* get current brush entity targetname */
 718         if ( e == entities ) {
 719                 targetName = "";
 720         }
 721         else
 722         {
 723                 targetName = ValueForKey( e, "targetname" );
 724
 725                 /* misc_model entities target non-worldspawn brush model entities */
 726                 if ( targetName[ 0 ] == '\0' ) {
 727                         return;
 728                 }
 729         }
 730
 731         /* get lightmap scale */
 732         /* vortex: added _ls key (short name of lightmapscale) */
 733         baseLightmapScale = 0.0f;
 734         if ( strcmp( "", ValueForKey( e, "lightmapscale" ) ) ||
 735                  strcmp( "", ValueForKey( e, "_lightmapscale" ) ) ||
 736                  strcmp( "", ValueForKey( e, "_ls" ) ) ) {
 737                 baseLightmapScale = FloatForKey( e, "lightmapscale" );
 738                 if ( baseLightmapScale <= 0.0f ) {
 739                         baseLightmapScale = FloatForKey( e, "_lightmapscale" );
 740                 }
 741                 if ( baseLightmapScale <= 0.0f ) {
 742                         baseLightmapScale = FloatForKey( e, "_ls" );
 743                 }
 744                 if ( baseLightmapScale < 0.0f ) {
 745                         baseLightmapScale = 0.0f;
 746                 }
 747                 if ( baseLightmapScale > 0.0f ) {
 748                         Sys_Printf( "World Entity has lightmap scale of %.4f\n", baseLightmapScale );
 749                 }
 750         }
 751
 752         /* walk the entity list */
 753         for ( num = 1; num < numEntities; num++ )
 754         {
 755                 /* get e2 */
 756                 e2 = &entities[ num ];
 757
 758                 /* convert misc_models into raw geometry */
 759                 if ( Q_stricmp( "misc_model", ValueForKey( e2, "classname" ) ) ) {
 760                         continue;
 761                 }
 762
 763                 /* ydnar: added support for md3 models on non-worldspawn models */
 764                 target = ValueForKey( e2, "target" );
 765                 if ( strcmp( target, targetName ) ) {
 766                         continue;
 767                 }
 768
 769                 /* get model name */
 770                 model = ValueForKey( e2, "model" );
 771                 if ( model[ 0 ] == '\0' ) {
 772                         Sys_FPrintf( SYS_WRN, "WARNING: misc_model at %i %i %i without a model key\n",
 773                                                 (int) origin[ 0 ], (int) origin[ 1 ], (int) origin[ 2 ] );
 774                         continue;
 775                 }
 776
 777                 /* get model frame */
 778                 frame = 0;
 779                 if ( strcmp( "", ValueForKey( e2, "_frame" ) ) ) {
 780                         frame = IntForKey( e2, "_frame" );
 781                 }
 782                 else if ( strcmp( "", ValueForKey( e2, "frame" ) ) ) {
 783                         frame = IntForKey( e2, "frame" );
 784                 }
 785
 786                 /* worldspawn (and func_groups) default to cast/recv shadows in worldspawn group */
 787                 if ( e == entities ) {
 788                         castShadows = WORLDSPAWN_CAST_SHADOWS;
 789                         recvShadows = WORLDSPAWN_RECV_SHADOWS;
 790                 }
 791
 792                 /* other entities don't cast any shadows, but recv worldspawn shadows */
 793                 else
 794                 {
 795                         castShadows = ENTITY_CAST_SHADOWS;
 796                         recvShadows = ENTITY_RECV_SHADOWS;
 797                 }
 798
 799                 /* get explicit shadow flags */
 800                 GetEntityShadowFlags( e2, e, &castShadows, &recvShadows );
 801
 802                 /* get spawnflags */
 803                 spawnFlags = IntForKey( e2, "spawnflags" );
 804
 805                 /* get origin */
 806                 GetVectorForKey( e2, "origin", origin );
 807                 VectorSubtract( origin, e->origin, origin );    /* offset by parent */
 808
 809                 /* get scale */
 810                 scale[ 0 ] = scale[ 1 ] = scale[ 2 ] = 1.0f;
 811                 temp = FloatForKey( e2, "modelscale" );
 812                 if ( temp != 0.0f ) {
 813                         scale[ 0 ] = scale[ 1 ] = scale[ 2 ] = temp;
 814                 }
 815                 value = ValueForKey( e2, "modelscale_vec" );
 816                 if ( value[ 0 ] != '\0' ) {
 817                         sscanf( value, "%f %f %f", &scale[ 0 ], &scale[ 1 ], &scale[ 2 ] );
 818                 }
 819
 820                 /* get "angle" (yaw) or "angles" (pitch yaw roll) */
 821                 angles[ 0 ] = angles[ 1 ] = angles[ 2 ] = 0.0f;
 822                 angles[ 2 ] = FloatForKey( e2, "angle" );
 823                 value = ValueForKey( e2, "angles" );
 824                 if ( value[ 0 ] != '\0' ) {
 825                         sscanf( value, "%f %f %f", &angles[ 1 ], &angles[ 2 ], &angles[ 0 ] );
 826                 }
 827
 828                 /* set transform matrix (thanks spog) */
 829                 m4x4_identity( transform );
 830                 m4x4_pivoted_transform_by_vec3( transform, origin, angles, eXYZ, scale, vec3_origin );
 831
 832                 /* get shader remappings */
 833                 remap = NULL;
 834                 for ( ep = e2->epairs; ep != NULL; ep = ep->next )
 835                 {
 836                         /* look for keys prefixed with "_remap" */
 837                         if ( ep->key != NULL && ep->value != NULL &&
 838                                  ep->key[ 0 ] != '\0' && ep->value[ 0 ] != '\0' &&
 839                                  !Q_strncasecmp( ep->key, "_remap", 6 ) ) {
 840                                 /* create new remapping */
 841                                 remap2 = remap;
 842                                 remap = safe_malloc( sizeof( *remap ) );
 843                                 remap->next = remap2;
 844                                 strcpy( remap->from, ep->value );
 845
 846                                 /* split the string */
 847                                 split = strchr( remap->from, ';' );
 848                                 if ( split == NULL ) {
 849                                         Sys_FPrintf( SYS_WRN, "WARNING: Shader _remap key found in misc_model without a ; character\n" );
 850                                         free( remap );
 851                                         remap = remap2;
 852                                         continue;
 853                                 }
 854
 855                                 /* store the split */
 856                                 *split = '\0';
 857                                 strcpy( remap->to, ( split + 1 ) );
 858
 859                                 /* note it */
 860                                 //%     Sys_FPrintf( SYS_VRB, "Remapping %s to %s\n", remap->from, remap->to );
 861                         }
 862                 }
 863
 864                 /* ydnar: cel shader support */
 865                 value = ValueForKey( e2, "_celshader" );
 866                 if ( value[ 0 ] == '\0' ) {
 867                         value = ValueForKey( &entities[ 0 ], "_celshader" );
 868                 }
 869                 if ( value[ 0 ] != '\0' ) {
 870                         sprintf( shader, "textures/%s", value );
 871                         celShader = ShaderInfoForShader( shader );
 872                 }
 873                 else{
 874                         celShader = *globalCelShader ? ShaderInfoForShader( globalCelShader ) : NULL;
 875                 }
 876
 877                 /* jal : entity based _samplesize */
 878                 lightmapSampleSize = 0;
 879                 if ( strcmp( "", ValueForKey( e2, "_lightmapsamplesize" ) ) ) {
 880                         lightmapSampleSize = IntForKey( e2, "_lightmapsamplesize" );
 881                 }
 882                 else if ( strcmp( "", ValueForKey( e2, "_samplesize" ) ) ) {
 883                         lightmapSampleSize = IntForKey( e2, "_samplesize" );
 884                 }
 885                 else if ( strcmp( "", ValueForKey( e2, "_ss" ) ) ) {
 886                         lightmapSampleSize = IntForKey( e2, "_ss" );
 887                 }
 888
 889                 if ( lightmapSampleSize < 0 ) {
 890                         lightmapSampleSize = 0;
 891                 }
 892
 893                 if ( lightmapSampleSize > 0.0f ) {
 894                         Sys_Printf( "misc_model has lightmap sample size of %.d\n", lightmapSampleSize );
 895                 }
 896
 897                 /* get lightmap scale */
 898                 /* vortex: added _ls key (short name of lightmapscale) */
 899                 lightmapScale = 0.0f;
 900                 if ( strcmp( "", ValueForKey( e2, "lightmapscale" ) ) ||
 901                          strcmp( "", ValueForKey( e2, "_lightmapscale" ) ) ||
 902                          strcmp( "", ValueForKey( e2, "_ls" ) ) ) {
 903                         lightmapScale = FloatForKey( e2, "lightmapscale" );
 904                         if ( lightmapScale <= 0.0f ) {
 905                                 lightmapScale = FloatForKey( e2, "_lightmapscale" );
 906                         }
 907                         if ( lightmapScale <= 0.0f ) {
 908                                 lightmapScale = FloatForKey( e2, "_ls" );
 909                         }
 910                         if ( lightmapScale < 0.0f ) {
 911                                 lightmapScale = 0.0f;
 912                         }
 913                         if ( lightmapScale > 0.0f ) {
 914                                 Sys_Printf( "misc_model has lightmap scale of %.4f\n", lightmapScale );
 915                         }
 916                 }
 917
 918                 /* jal : entity based _shadeangle */
 919                 shadeAngle = 0.0f;
 920                 if ( strcmp( "", ValueForKey( e2, "_shadeangle" ) ) ) {
 921                         shadeAngle = FloatForKey( e2, "_shadeangle" );
 922                 }
 923                 /* vortex' aliases */
 924                 else if ( strcmp( "", ValueForKey( e2, "_smoothnormals" ) ) ) {
 925                         shadeAngle = FloatForKey( e2, "_smoothnormals" );
 926                 }
 927                 else if ( strcmp( "", ValueForKey( e2, "_sn" ) ) ) {
 928                         shadeAngle = FloatForKey( e2, "_sn" );
 929                 }
 930                 else if ( strcmp( "", ValueForKey( e2, "_sa" ) ) ) {
 931                         shadeAngle = FloatForKey( e2, "_sa" );
 932                 }
 933                 else if ( strcmp( "", ValueForKey( e2, "_smooth" ) ) ) {
 934                         shadeAngle = FloatForKey( e2, "_smooth" );
 935                 }
 936
 937                 if ( shadeAngle < 0.0f ) {
 938                         shadeAngle = 0.0f;
 939                 }
 940
 941                 if ( shadeAngle > 0.0f ) {
 942                         Sys_Printf( "misc_model has shading angle of %.4f\n", shadeAngle );
 943                 }
 944
 945                 skin = 0;
 946                 if ( strcmp( "", ValueForKey( e2, "_skin" ) ) ) {
 947                         skin = IntForKey( e2, "_skin" );
 948                 }
 949                 else if ( strcmp( "", ValueForKey( e2, "skin" ) ) ) {
 950                         skin = IntForKey( e2, "skin" );
 951                 }
 952
 953                 /* insert the model */
 954                 InsertModel( model, skin, frame, transform, remap, celShader, mapEntityNum, castShadows, recvShadows, spawnFlags, lightmapScale, lightmapSampleSize, shadeAngle );
 955
 956                 /* free shader remappings */
 957                 while ( remap != NULL )
 958                 {
 959                         remap2 = remap->next;
 960                         free( remap );
 961                         remap = remap2;
 962                 }
 963         }
 964 }