1 /* -------------------------------------------------------------------------------
3 Copyright (C) 1999-2007 id Software, Inc. and contributors.
4 For a list of contributors, see the accompanying CONTRIBUTORS file.
6 This file is part of GtkRadiant.
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.
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.
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
22 ----------------------------------------------------------------------------------
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."
27 ------------------------------------------------------------------------------- */
46 #define SNAP_FLOAT_TO_INT 4
47 #define SNAP_INT_TO_FLOAT (1.0 / SNAP_FLOAT_TO_INT)
49 typedef vec_t vec2_t[2];
51 static vec_t Det3x3(vec_t a00, vec_t a01, vec_t a02,
52 vec_t a10, vec_t a11, vec_t a12,
53 vec_t a20, vec_t a21, vec_t a22)
56 a00 * (a11 * a22 - a12 * a21)
57 - a01 * (a10 * a22 - a12 * a20)
58 + a02 * (a10 * a21 - a11 * a20);
61 void GetBestSurfaceTriangleMatchForBrushside(side_t *buildSide, bspDrawVert_t *bestVert[3])
69 vec3_t v1v0, v2v0, norm;
70 bspDrawVert_t *vert[3];
72 plane_t *buildPlane = &mapplanes[buildSide->planenum];
75 // first, start out with NULLs
76 bestVert[0] = bestVert[1] = bestVert[2] = NULL;
78 // brute force through all surfaces
79 for(s = bspDrawSurfaces; s != bspDrawSurfaces + numBSPDrawSurfaces; ++s)
81 if(s->surfaceType != MST_PLANAR && s->surfaceType != MST_TRIANGLE_SOUP)
83 if(strcmp(buildSide->shaderInfo->shader, bspShaders[s->shaderNum].shader))
85 for(t = 0; t + 3 <= s->numIndexes; t += 3)
87 vert[0] = &bspDrawVerts[s->firstVert + bspDrawIndexes[s->firstIndex + t + 0]];
88 vert[1] = &bspDrawVerts[s->firstVert + bspDrawIndexes[s->firstIndex + t + 1]];
89 vert[2] = &bspDrawVerts[s->firstVert + bspDrawIndexes[s->firstIndex + t + 2]];
90 if(s->surfaceType == MST_PLANAR)
92 VectorSubtract(vert[0]->normal, buildPlane->normal, normdiff); if(VectorLength(normdiff) >= normalEpsilon) continue;
93 VectorSubtract(vert[1]->normal, buildPlane->normal, normdiff); if(VectorLength(normdiff) >= normalEpsilon) continue;
94 VectorSubtract(vert[2]->normal, buildPlane->normal, normdiff); if(VectorLength(normdiff) >= normalEpsilon) continue;
98 // this is more prone to roundoff errors, but with embedded
99 // models, there is no better way
100 VectorSubtract(vert[1]->xyz, vert[0]->xyz, v1v0);
101 VectorSubtract(vert[2]->xyz, vert[0]->xyz, v2v0);
102 CrossProduct(v2v0, v1v0, norm);
103 VectorNormalize(norm, norm);
104 VectorSubtract(norm, buildPlane->normal, normdiff); if(VectorLength(normdiff) >= normalEpsilon) continue;
106 if(abs(DotProduct(vert[0]->xyz, buildPlane->normal) - buildPlane->dist) >= distanceEpsilon) continue;
107 if(abs(DotProduct(vert[1]->xyz, buildPlane->normal) - buildPlane->dist) >= distanceEpsilon) continue;
108 if(abs(DotProduct(vert[2]->xyz, buildPlane->normal) - buildPlane->dist) >= distanceEpsilon) continue;
109 // Okay. Correct surface type, correct shader, correct plane. Let's start with the business...
110 polygon = CopyWinding(buildSide->winding);
111 for(i = 0; i < 3; ++i)
116 vec3_t *v1 = &vert[(i+1)%3]->xyz;
117 vec3_t *v2 = &vert[(i+2)%3]->xyz;
120 vec3_t sideDirection;
121 // we now need to generate triNormal and triDist so that they represent the plane spanned by normal and (v2 - v1).
122 VectorSubtract(*v2, *v1, sideDirection);
123 CrossProduct(sideDirection, buildPlane->normal, triNormal);
124 triDist = DotProduct(*v1, triNormal);
125 ChopWindingInPlace(&polygon, triNormal, triDist, distanceEpsilon);
129 thisarea = WindingArea(polygon);
135 bestVert[0] = vert[0];
136 bestVert[1] = vert[1];
137 bestVert[2] = vert[2];
139 FreeWinding(polygon);
144 //if(strncmp(buildSide->shaderInfo->shader, "textures/common/", 16))
145 // fprintf(stderr, "brushside with %s: %d matches (%f area)\n", buildSide->shaderInfo->shader, matches, best);
148 static void ConvertOriginBrush( FILE *f, int num, vec3_t origin )
150 char pattern[6][5][3] = {
151 { "+++", "+-+", "-++", " - ", "- " },
152 { "+++", "-++", "++-", "+ ", " +" },
153 { "+++", "++-", "+-+", " - ", " +" },
154 { "---", "+--", "-+-", " - ", "+ " },
155 { "---", "--+", "+--", "- ", " +" },
156 { "---", "-+-", "--+", " + ", " +" }
159 #define S(a,b,c) (pattern[a][b][c] == '+' ? +1 : pattern[a][b][c] == '-' ? -1 : 0)
160 #define FRAC(x) ((x) - floor(x))
163 fprintf( f, "\t// brush %d\n", num );
164 fprintf( f, "\t{\n" );
165 fprintf( f, "\tbrushDef\n" );
166 fprintf( f, "\t{\n" );
167 /* print brush side */
168 /* ( 640 24 -224 ) ( 448 24 -224 ) ( 448 -232 -224 ) common/caulk 0 48 0 0.500000 0.500000 0 0 0 */
170 for(i = 0; i < 6; ++i)
171 fprintf( f, "\t\t( %.3f %.3f %.3f ) ( %.3f %.3f %.3f ) ( %.3f %.3f %.3f ) ( ( %.8f %.8f %.8f ) ( %.8f %.8f %.8f ) ) %s %d 0 0\n",
172 origin[0] + 8 * S(i,0,0), origin[1] + 8 * S(i,0,1), origin[2] + 8 * S(i,0,2),
173 origin[0] + 8 * S(i,1,0), origin[1] + 8 * S(i,1,1), origin[2] + 8 * S(i,1,2),
174 origin[0] + 8 * S(i,2,0), origin[1] + 8 * S(i,2,1), origin[2] + 8 * S(i,2,2),
175 1/16.0, 0.0, FRAC((S(i,3,0) * origin[0] + S(i,3,1) * origin[1] + S(i,3,2) * origin[2]) / 16.0 + 0.5),
176 0.0, 1/16.0, FRAC((S(i,4,0) * origin[0] + S(i,4,1) * origin[1] + S(i,4,2) * origin[2]) / 16.0 + 0.5),
184 fprintf( f, "\t}\n" );
185 fprintf( f, "\t}\n\n" );
188 static void ConvertBrush( FILE *f, int num, bspBrush_t *brush, vec3_t origin )
191 bspBrushSide_t *side;
198 bspDrawVert_t *vert[3];
203 fprintf( f, "\t// brush %d\n", num );
204 fprintf( f, "\t{\n" );
205 fprintf( f, "\tbrushDef\n" );
206 fprintf( f, "\t{\n" );
208 /* clear out build brush */
209 for( i = 0; i < buildBrush->numsides; i++ )
211 buildSide = &buildBrush->sides[ i ];
212 if( buildSide->winding != NULL )
214 FreeWinding( buildSide->winding );
215 buildSide->winding = NULL;
218 buildBrush->numsides = 0;
220 /* iterate through bsp brush sides */
221 for( i = 0; i < brush->numSides; i++ )
224 side = &bspBrushSides[ brush->firstSide + i ];
227 if( side->shaderNum < 0 || side->shaderNum >= numBSPShaders )
229 shader = &bspShaders[ side->shaderNum ];
230 if( !Q_stricmp( shader->shader, "default" ) || !Q_stricmp( shader->shader, "noshader" ) )
234 plane = &bspPlanes[ side->planeNum ];
237 buildSide = &buildBrush->sides[ buildBrush->numsides ];
238 buildBrush->numsides++;
241 buildSide->shaderInfo = ShaderInfoForShader( shader->shader );
242 buildSide->planenum = side->planeNum;
243 buildSide->winding = NULL;
246 /* make brush windings */
247 if( !CreateBrushWindings( buildBrush ) )
250 /* iterate through build brush sides */
251 for( i = 0; i < buildBrush->numsides; i++ )
254 buildSide = &buildBrush->sides[ i ];
257 buildPlane = &mapplanes[ buildSide->planenum ];
260 if( buildSide->shaderInfo == NULL || buildSide->winding == NULL )
263 // st-texcoords -> texMat block
264 // start out with dummy
265 VectorSet(buildSide->texMat[0], 1/32.0, 0, 0);
266 VectorSet(buildSide->texMat[1], 0, 1/32.0, 0);
268 // find surface for this side (by brute force)
270 // - meshverts point in pairs of three into verts
272 // - find the triangle that has most in common with our side
273 GetBestSurfaceTriangleMatchForBrushside(buildSide, vert);
276 if(vert[0] && vert[1] && vert[2])
280 vec3_t xy1I, xy1J, xy1K;
281 vec2_t stI, stJ, stK;
284 ComputeAxisBase(buildPlane->normal, texX, texY);
286 VectorSet(xy1I, DotProduct(vert[0]->xyz, texX), DotProduct(vert[0]->xyz, texY), 1);
287 VectorSet(xy1J, DotProduct(vert[1]->xyz, texX), DotProduct(vert[1]->xyz, texY), 1);
288 VectorSet(xy1K, DotProduct(vert[2]->xyz, texX), DotProduct(vert[2]->xyz, texY), 1);
289 stI[0] = vert[0]->st[0]; stI[1] = vert[0]->st[1];
290 stJ[0] = vert[1]->st[0]; stJ[1] = vert[1]->st[1];
291 stK[0] = vert[2]->st[0]; stK[1] = vert[2]->st[1];
293 // - solve linear equations:
294 // - (x, y) := xyz . (texX, texY)
295 // - st[i] = texMat[i][0]*x + texMat[i][1]*y + texMat[i][2]
296 // (for three vertices)
304 for(i = 0; i < 2; ++i)
317 xy1I[0], xy1I[1], stI[i],
318 xy1J[0], xy1J[1], stJ[i],
319 xy1K[0], xy1K[1], stK[i]
321 VectorSet(buildSide->texMat[i], D0 / D, D1 / D, D2 / D);
326 fprintf(stderr, "degenerate triangle found when solving texMat equations for\n(%f %f %f) (%f %f %f) (%f %f %f)\n( %f %f %f )\n( %f %f %f ) -> ( %f %f )\n( %f %f %f ) -> ( %f %f )\n( %f %f %f ) -> ( %f %f )\n",
327 buildPlane->normal[0], buildPlane->normal[1], buildPlane->normal[2],
328 vert[0]->normal[0], vert[0]->normal[1], vert[0]->normal[2],
329 texX[0], texX[1], texX[2], texY[0], texY[1], texY[2],
330 vert[0]->xyz[0], vert[0]->xyz[1], vert[0]->xyz[2], xy1I[0], xy1I[1],
331 vert[1]->xyz[0], vert[1]->xyz[1], vert[1]->xyz[2], xy1J[0], xy1J[1],
332 vert[2]->xyz[0], vert[2]->xyz[1], vert[2]->xyz[2], xy1K[0], xy1K[1]
336 if(strncmp(buildSide->shaderInfo->shader, "textures/common/", 16))
337 fprintf(stderr, "no matching triangle for brushside using %s (hopefully nobody can see this side anyway)\n", buildSide->shaderInfo->shader);
339 /* get texture name */
340 if( !Q_strncasecmp( buildSide->shaderInfo->shader, "textures/", 9 ) )
341 texture = buildSide->shaderInfo->shader + 9;
343 texture = buildSide->shaderInfo->shader;
345 /* get plane points and offset by origin */
346 for( j = 0; j < 3; j++ )
348 VectorAdd( buildSide->winding->p[ j ], origin, pts[ j ] );
349 //% pts[ j ][ 0 ] = SNAP_INT_TO_FLOAT * floor( pts[ j ][ 0 ] * SNAP_FLOAT_TO_INT + 0.5f );
350 //% pts[ j ][ 1 ] = SNAP_INT_TO_FLOAT * floor( pts[ j ][ 1 ] * SNAP_FLOAT_TO_INT + 0.5f );
351 //% pts[ j ][ 2 ] = SNAP_INT_TO_FLOAT * floor( pts[ j ][ 2 ] * SNAP_FLOAT_TO_INT + 0.5f );
354 /* print brush side */
355 /* ( 640 24 -224 ) ( 448 24 -224 ) ( 448 -232 -224 ) common/caulk 0 48 0 0.500000 0.500000 0 0 0 */
356 fprintf( f, "\t\t( %.3f %.3f %.3f ) ( %.3f %.3f %.3f ) ( %.3f %.3f %.3f ) ( ( %.8f %.8f %.8f ) ( %.8f %.8f %.8f ) ) %s %d 0 0\n",
357 pts[ 0 ][ 0 ], pts[ 0 ][ 1 ], pts[ 0 ][ 2 ],
358 pts[ 1 ][ 0 ], pts[ 1 ][ 1 ], pts[ 1 ][ 2 ],
359 pts[ 2 ][ 0 ], pts[ 2 ][ 1 ], pts[ 2 ][ 2 ],
360 buildSide->texMat[0][0], buildSide->texMat[0][1], buildSide->texMat[0][2],
361 buildSide->texMat[1][0], buildSide->texMat[1][1], buildSide->texMat[1][2],
363 // DEBUG: valid ? 0 : C_DETAIL
366 // TODO write brush primitives format here
370 fprintf( f, "\t}\n" );
371 fprintf( f, "\t}\n\n" );
375 /* iterate through the brush sides (ignore the first 6 bevel planes) */
376 for( i = 0; i < brush->numSides; i++ )
379 side = &bspBrushSides[ brush->firstSide + i ];
382 if( side->shaderNum < 0 || side->shaderNum >= numBSPShaders )
384 shader = &bspShaders[ side->shaderNum ];
385 if( !Q_stricmp( shader->shader, "default" ) || !Q_stricmp( shader->shader, "noshader" ) )
388 /* get texture name */
389 if( !Q_strncasecmp( shader->shader, "textures/", 9 ) )
390 texture = shader->shader + 9;
392 texture = shader->shader;
395 plane = &bspPlanes[ side->planeNum ];
397 /* make plane points */
402 MakeNormalVectors( plane->normal, vecs[ 0 ], vecs[ 1 ] );
403 VectorMA( vec3_origin, plane->dist, plane->normal, pts[ 0 ] );
404 VectorMA( pts[ 0 ], 256.0f, vecs[ 0 ], pts[ 1 ] );
405 VectorMA( pts[ 0 ], 256.0f, vecs[ 1 ], pts[ 2 ] );
408 /* offset by origin */
409 for( j = 0; j < 3; j++ )
410 VectorAdd( pts[ j ], origin, pts[ j ] );
412 /* print brush side */
413 /* ( 640 24 -224 ) ( 448 24 -224 ) ( 448 -232 -224 ) common/caulk 0 48 0 0.500000 0.500000 0 0 0 */
414 fprintf( f, "\t\t( %.3f %.3f %.3f ) ( %.3f %.3f %.3f ) ( %.3f %.3f %.3f ) %s 0 0 0 0.5 0.5 0 0 0\n",
415 pts[ 0 ][ 0 ], pts[ 0 ][ 1 ], pts[ 0 ][ 2 ],
416 pts[ 1 ][ 0 ], pts[ 1 ][ 1 ], pts[ 1 ][ 2 ],
417 pts[ 2 ][ 0 ], pts[ 2 ][ 1 ], pts[ 2 ][ 2 ],
426 converts a bsp patch to a map patch
434 ( ( 168 168 -192 0 2 ) ( 168 168 -64 0 1 ) ( 168 168 64 0 0 ) ... )
442 static void ConvertPatch( FILE *f, int num, bspDrawSurface_t *ds, vec3_t origin )
452 if( ds->surfaceType != MST_PATCH )
456 if( ds->shaderNum < 0 || ds->shaderNum >= numBSPShaders )
458 shader = &bspShaders[ ds->shaderNum ];
460 /* get texture name */
461 if( !Q_strncasecmp( shader->shader, "textures/", 9 ) )
462 texture = shader->shader + 9;
464 texture = shader->shader;
467 fprintf( f, "\t// patch %d\n", num );
468 fprintf( f, "\t{\n" );
469 fprintf( f, "\t\tpatchDef2\n" );
470 fprintf( f, "\t\t{\n" );
471 fprintf( f, "\t\t\t%s\n", texture );
472 fprintf( f, "\t\t\t( %d %d 0 0 0 )\n", ds->patchWidth, ds->patchHeight );
473 fprintf( f, "\t\t\t(\n" );
475 /* iterate through the verts */
476 for( x = 0; x < ds->patchWidth; x++ )
479 fprintf( f, "\t\t\t\t(" );
481 /* iterate through the row */
482 for( y = 0; y < ds->patchHeight; y++ )
485 dv = &bspDrawVerts[ ds->firstVert + (y * ds->patchWidth) + x ];
488 VectorAdd( origin, dv->xyz, xyz );
491 fprintf( f, " ( %f %f %f %f %f )", xyz[ 0 ], xyz[ 1 ], xyz[ 2 ], dv->st[ 0 ], dv->st[ 1 ] );
495 fprintf( f, " )\n" );
499 fprintf( f, "\t\t\t)\n" );
500 fprintf( f, "\t\t}\n" );
501 fprintf( f, "\t}\n\n" );
508 exports a bsp model to a map file
511 static void ConvertModel( FILE *f, bspModel_t *model, int modelNum, vec3_t origin )
515 bspDrawSurface_t *ds;
518 /* convert bsp planes to map planes */
519 nummapplanes = numBSPPlanes;
520 AUTOEXPAND_BY_REALLOC(mapplanes, nummapplanes, allocatedmapplanes, 1024);
521 for( i = 0; i < numBSPPlanes; i++ )
523 VectorCopy( bspPlanes[ i ].normal, mapplanes[ i ].normal );
524 mapplanes[ i ].dist = bspPlanes[ i ].dist;
525 mapplanes[ i ].type = PlaneTypeForNormal( mapplanes[ i ].normal );
526 mapplanes[ i ].hash_chain = 0;
529 /* allocate a build brush */
530 buildBrush = AllocBrush( 512 );
531 buildBrush->entityNum = 0;
532 buildBrush->original = buildBrush;
534 if(origin[0] != 0 || origin[1] != 0 || origin[2] != 0)
535 ConvertOriginBrush(f, -1, origin);
537 /* go through each brush in the model */
538 for( i = 0; i < model->numBSPBrushes; i++ )
540 num = i + model->firstBSPBrush;
541 brush = &bspBrushes[ num ];
542 ConvertBrush( f, num, brush, origin );
545 /* free the build brush */
548 /* go through each drawsurf in the model */
549 for( i = 0; i < model->numBSPSurfaces; i++ )
551 num = i + model->firstBSPSurface;
552 ds = &bspDrawSurfaces[ num ];
554 /* we only love patches */
555 if( ds->surfaceType == MST_PATCH )
556 ConvertPatch( f, num, ds, origin );
564 exports entity key/value pairs to a map file
567 static void ConvertEPairs( FILE *f, entity_t *e, qboolean skip_origin )
573 for( ep = e->epairs; ep != NULL; ep = ep->next )
575 /* ignore empty keys/values */
576 if( ep->key[ 0 ] == '\0' || ep->value[ 0 ] == '\0' )
579 /* ignore model keys with * prefixed values */
580 if( !Q_stricmp( ep->key, "model" ) && ep->value[ 0 ] == '*' )
583 /* ignore origin keys if skip_origin is set */
584 if( skip_origin && !Q_stricmp( ep->key, "origin" ) )
588 fprintf( f, "\t\"%s\" \"%s\"\n", ep->key, ep->value );
596 exports an quake map file from the bsp
599 int ConvertBSPToMap( char *bspName )
607 char name[ 1024 ], base[ 1024 ];
611 Sys_Printf( "--- Convert BSP to MAP ---\n" );
613 /* create the bsp filename from the bsp name */
614 strcpy( name, bspName );
615 StripExtension( name );
616 strcat( name, "_converted.map" );
617 Sys_Printf( "writing %s\n", name );
619 ExtractFileBase( bspName, base );
620 strcat( base, ".bsp" );
623 f = fopen( name, "wb" );
625 Error( "Open failed on %s\n", name );
628 fprintf( f, "// Generated by Q3Map2 (ydnar) -convert -format map\n" );
630 /* walk entity list */
631 for( i = 0; i < numEntities; i++ )
637 fprintf( f, "// entity %d\n", i );
645 value = ValueForKey( e, "model" );
646 if( value[ 0 ] == '*' )
647 modelNum = atoi( value + 1 );
653 ConvertEPairs( f, e, modelNum >= 0 );
656 /* only handle bsp models */
660 model = &bspModels[ modelNum ];
662 /* get entity origin */
663 value = ValueForKey( e, "origin" );
664 if( value[ 0 ] == '\0' )
665 VectorClear( origin );
667 GetVectorForKey( e, "origin", origin );
670 ConvertModel( f, model, modelNum, origin );
674 fprintf( f, "}\n\n" );
677 /* close the file and return */
680 /* return to sender */