1 // obj.cxx -- routines to handle "sorta" WaveFront .obj format files.
3 // Written by Curtis Olson, started October 1997.
5 // Copyright (C) 1997 Curtis L. Olson - curt@infoplane.com
7 // This program is free software; you can redistribute it and/or
8 // modify it under the terms of the GNU General Public License as
9 // published by the Free Software Foundation; either version 2 of the
10 // License, or (at your option) any later version.
12 // This program is distributed in the hope that it will be useful, but
13 // WITHOUT ANY WARRANTY; without even the implied warranty of
14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 // General Public License for more details.
17 // You should have received a copy of the GNU General Public License
18 // along with this program; if not, write to the Free Software
19 // Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
28 #ifdef FG_MATH_EXCEPTION_CLASH
35 // #if defined ( __sun__ )
36 // extern "C" void *memmove(void *, const void *, size_t);
37 // extern "C" void *memset(void *, int, size_t);
40 #include <simgear/compiler.h>
44 #include <vector> // STL
45 #include <ctype.h> // isdigit()
47 #include <simgear/constants.h>
48 #include <simgear/debug/logstream.hxx>
49 #include <simgear/math/point3d.hxx>
50 #include <simgear/math/polar3d.hxx>
51 #include <simgear/math/sg_geodesy.hxx>
52 #include <simgear/math/sg_random.h>
53 #include <simgear/misc/fgstream.hxx>
54 #include <simgear/misc/stopwatch.hxx>
55 #include <simgear/misc/texcoord.hxx>
57 #include <Main/globals.hxx>
58 #include <Scenery/tileentry.hxx>
67 typedef vector < int > int_list;
68 typedef int_list::iterator int_list_iterator;
69 typedef int_list::const_iterator int_point_list_iterator;
72 static double normals[FG_MAX_NODES][3];
73 static double tex_coords[FG_MAX_NODES*3][3];
77 // given three points defining a triangle, calculate the normal
78 static void calc_normal(Point3D p1, Point3D p2,
79 Point3D p3, sgVec3 normal)
83 v1[0] = p2[0] - p1[0]; v1[1] = p2[1] - p1[1]; v1[2] = p2[2] - p1[2];
84 v2[0] = p3[0] - p1[0]; v2[1] = p3[1] - p1[1]; v2[2] = p3[2] - p1[2];
86 sgVectorProductVec3( normal, v1, v2 );
87 sgNormalizeVec3( normal );
89 // fgPrintf( FG_TERRAIN, FG_DEBUG, " Normal = %.2f %.2f %.2f\n",
90 // normal[0], normal[1], normal[2]);
95 #define FG_TEX_CONSTANT 69.0
97 // Calculate texture coordinates for a given point.
98 static Point3D local_calc_tex_coords(const Point3D& node, const Point3D& ref) {
101 // double tmplon, tmplat;
103 // cout << "-> " << node[0] << " " << node[1] << " " << node[2] << endl;
104 // cout << "-> " << ref.x() << " " << ref.y() << " " << ref.z() << endl;
106 cp = Point3D( node[0] + ref.x(),
110 pp = sgCartToPolar3d(cp);
112 // tmplon = pp.lon() * RAD_TO_DEG;
113 // tmplat = pp.lat() * RAD_TO_DEG;
114 // cout << tmplon << " " << tmplat << endl;
116 pp.setx( fmod(RAD_TO_DEG * FG_TEX_CONSTANT * pp.x(), 11.0) );
117 pp.sety( fmod(RAD_TO_DEG * FG_TEX_CONSTANT * pp.y(), 11.0) );
119 if ( pp.x() < 0.0 ) {
120 pp.setx( pp.x() + 11.0 );
123 if ( pp.y() < 0.0 ) {
124 pp.sety( pp.y() + 11.0 );
127 // cout << pp << endl;
133 // Generate a generic ocean tile on the fly
134 ssgBranch *fgGenTile( const string& path, FGTileEntry *t) {
137 ssgSimpleState *state = NULL;
139 ssgBranch *tile = new ssgBranch () ;
140 tile -> setName ( (char *)path.c_str() ) ;
142 double tex_width = 1000.0;
143 // double tex_height;
145 // find Ocean material in the properties list
146 newmat = material_lib.find( "Ocean" );
147 if ( newmat != NULL ) {
148 // set the texture width and height values for this
150 tex_width = newmat->get_xsize();
151 // tex_height = newmat->get_ysize();
154 state = newmat->get_state();
156 FG_LOG( FG_TERRAIN, FG_ALERT,
157 "Ack! unknown usemtl name = " << "Ocean"
161 // Calculate center point
162 FGBucket b = t->tile_bucket;
163 double clon = b.get_center_lon();
164 double clat = b.get_center_lat();
165 double height = b.get_height();
166 double width = b.get_width();
168 Point3D center = sgGeodToCart(Point3D(clon*DEG_TO_RAD,clat*DEG_TO_RAD,0.0));
170 // cout << "center = " << center << endl;;
172 // Caculate corner vertices
174 geod[0] = Point3D( clon - width/2.0, clat - height/2.0, 0.0 );
175 geod[1] = Point3D( clon + width/2.0, clat - height/2.0, 0.0 );
176 geod[2] = Point3D( clon + width/2.0, clat + height/2.0, 0.0 );
177 geod[3] = Point3D( clon - width/2.0, clat + height/2.0, 0.0 );
181 for ( i = 0; i < 4; ++i ) {
182 rad[i] = Point3D( geod[i].x() * DEG_TO_RAD, geod[i].y() * DEG_TO_RAD,
186 Point3D cart[4], rel[4];
188 for ( i = 0; i < 4; ++i ) {
189 cart[i] = sgGeodToCart(rad[i]);
190 rel[i] = cart[i] - center;
191 t->nodes.push_back( rel[i] );
192 // cout << "corner " << i << " = " << cart[i] << endl;
197 // Calculate bounding radius
198 t->bounding_radius = center.distance3D( cart[0] );
199 // cout << "bounding radius = " << t->bounding_radius << endl;
203 for ( i = 0; i < 4; ++i ) {
204 normals[i] = cart[i];
205 double length = normals[i].distance3D( Point3D(0.0) );
206 normals[i] /= length;
207 // cout << "normal = " << normals[i] << endl;
210 // Calculate texture coordinates
211 point_list geod_nodes;
213 for ( i = 0; i < 4; ++i ) {
214 geod_nodes.push_back( geod[i] );
218 for ( i = 0; i < 4; ++i ) {
219 rectangle.push_back( i );
221 point_list texs = calc_tex_coords( b, geod_nodes, rectangle,
222 1000.0 / tex_width );
224 // Allocate ssg structure
225 ssgVertexArray *vl = new ssgVertexArray( 4 );
226 ssgNormalArray *nl = new ssgNormalArray( 4 );
227 ssgTexCoordArray *tl = new ssgTexCoordArray( 4 );
228 ssgColourArray *cl = new ssgColourArray( 1 );
231 sgSetVec4( color, 1.0, 1.0, 1.0, 1.0 );
234 // sgVec3 *vtlist = new sgVec3 [ 4 ];
235 // t->vec3_ptrs.push_back( vtlist );
236 // sgVec3 *vnlist = new sgVec3 [ 4 ];
237 // t->vec3_ptrs.push_back( vnlist );
238 // sgVec2 *tclist = new sgVec2 [ 4 ];
239 // t->vec2_ptrs.push_back( tclist );
243 for ( i = 0; i < 4; ++i ) {
245 rel[i].x(), rel[i].y(), rel[i].z() );
249 normals[i].x(), normals[i].y(), normals[i].z() );
252 sgSetVec2( tmp2, texs[i].x(), texs[i].y());
257 new ssgVtxTable ( GL_TRIANGLE_FAN, vl, nl, tl, cl );
259 leaf->setState( state );
261 tile->addKid( leaf );
262 // if ( globals->get_options()->get_clouds() ) {
263 // fgGenCloudTile(path, t, tile);
270 static float fgTriArea( sgVec3 p0, sgVec3 p1, sgVec3 p2 ) {
272 From comp.graph.algorithms FAQ
273 2A(P) = abs(N.(sum_{i=0}^{n-1}(v_i x v_{i+1})))
279 sgMakeNormal( norm, p0, p1, p2 );
286 for( int i=0; i<3; i++ ) {
288 sum[0] += (vv[i][1] * vv[ii][2] - vv[i][2] * vv[ii][1]) ;
289 sum[1] += (vv[i][2] * vv[ii][0] - vv[i][0] * vv[ii][2]) ;
290 sum[2] += (vv[i][0] * vv[ii][1] - vv[i][1] * vv[ii][0]) ;
293 return( sgAbs(sgScalarProductVec3( norm, sum )) * SG_HALF );
298 // this works too, but Norman claims fgTriArea() is more efficient :-)
299 static double triangle_area_3d( float *p1, float *p2, float *p3 ) {
300 // Heron's formula: A^2 = s(s-a)(s-b)(s-c) where A is the area,
301 // a,b,c are the side lengths, s=(a+b+c)/2. In R^3 you can compute
302 // the lengths of the sides with the distance formula, of course.
304 double a = sgDistanceVec3( p1, p2 );
305 double b = sgDistanceVec3( p2, p3 );
306 double c = sgDistanceVec3( p3, p1 );
308 double s = (a + b + c) / 2.0;
310 return sqrt( s * ( s - a ) * ( s - b ) * ( s - c ) );
315 static void random_pt_inside_tri( float *res,
316 float *n1, float *n2, float *n3 )
320 double a = sg_random();
321 double b = sg_random();
326 double c = 1 - a - b;
328 sgScaleVec3( p1, n1, a );
329 sgScaleVec3( p2, n2, b );
330 sgScaleVec3( p3, n3, c );
332 sgAddVec3( res, p1, p2 );
333 sgAddVec3( res, p3 );
337 static void gen_random_surface_points( ssgLeaf *leaf, ssgVertexArray *lights,
339 int num = leaf->getNumTriangles();
341 short int n1, n2, n3;
345 // generate a repeatable random seed
346 p1 = leaf->getVertex( 0 );
347 unsigned int *seed = (unsigned int *)p1;
350 for ( int i = 0; i < num; ++i ) {
351 leaf->getTriangle( i, &n1, &n2, &n3 );
352 p1 = leaf->getVertex(n1);
353 p2 = leaf->getVertex(n2);
354 p3 = leaf->getVertex(n3);
355 double area = fgTriArea( p1, p2, p3 );
356 double num = area / factor;
358 // generate a light point for each unit of area
359 while ( num > 1.0 ) {
360 random_pt_inside_tri( result, p1, p2, p3 );
361 lights->add( result );
364 // for partial units of area, use a zombie door method to
365 // create the proper random chance of a light being created
368 if ( sg_random() <= num ) {
369 // a zombie made it through our door
370 random_pt_inside_tri( result, p1, p2, p3 );
371 lights->add( result );
380 ssgBranch *fgObjLoad( const string& path, FGTileEntry *t,
381 ssgVertexArray *lights, const bool is_base)
383 FGNewMat *newmat = NULL;
387 // sgVec3 approx_normal;
388 // double normal[3], scale = 0.0;
389 // double x, y, z, xmax, xmin, ymax, ymin, zmax, zmin;
390 // GLfloat sgenparams[] = { 1.0, 0.0, 0.0, 0.0 };
391 // GLint display_list = 0;
393 bool in_faces = false;
394 int vncount, vtcount;
395 int n1 = 0, n2 = 0, n3 = 0;
397 // int last1 = 0, last2 = 0;
402 double scenery_version = 0.0;
403 double tex_width = 1000.0, tex_height = 1000.0;
404 bool shared_done = false;
405 int_list fan_vertices;
406 int_list fan_tex_coords;
408 ssgSimpleState *state = NULL;
409 sgVec3 *vtlist, *vnlist;
412 ssgBranch *tile = new ssgBranch () ;
414 tile -> setName ( (char *)path.c_str() ) ;
416 // Attempt to open "path.gz" or "path"
417 fg_gzifstream in( path );
418 if ( ! in.is_open() ) {
419 FG_LOG( FG_TERRAIN, FG_ALERT, "Cannot open file: " << path );
420 FG_LOG( FG_TERRAIN, FG_ALERT, "default to ocean tile: " << path );
422 return fgGenTile( path, t );
425 shading = globals->get_options()->get_shading();
433 t->bounding_radius = 0.0;
440 // ignore initial comments and blank lines. (priming the pump)
441 // in >> skipcomment;
448 while ( in.get(c) && c != '\0' ) {
451 while ( ! in.eof() ) {
454 #if defined( macintosh ) || defined( _MSC_VER )
460 if ( in.get( c ) && c == '#' ) {
461 // process a comment line
463 // getline( in, line );
464 // cout << "comment = " << line << endl;
468 if ( token == "Version" ) {
469 // read scenery versions number
470 in >> scenery_version;
471 // cout << "scenery_version = " << scenery_version << endl;
472 } else if ( token == "gbs" ) {
473 // reference point (center offset)
475 in >> t->center >> t->bounding_radius;
479 in >> junk1 >> junk2;
482 // cout << "center = " << center
483 // << " radius = " << t->bounding_radius << endl;
484 } else if ( token == "bs" ) {
485 // reference point (center offset)
489 in >> junk1 >> junk2;
490 } else if ( token == "usemtl" ) {
491 // material property specification
493 // if first usemtl with shared_done = false, then set
494 // shared_done true and build the ssg shared lists
495 if ( ! shared_done ) {
497 if ( (int)nodes.size() != vncount ) {
498 FG_LOG( FG_TERRAIN, FG_ALERT,
499 "Tile has mismatched nodes = " << nodes.size()
500 << " and normals = " << vncount << " : "
506 vtlist = new sgVec3 [ nodes.size() ];
507 t->vec3_ptrs.push_back( vtlist );
508 vnlist = new sgVec3 [ vncount ];
509 t->vec3_ptrs.push_back( vnlist );
510 tclist = new sgVec2 [ vtcount ];
511 t->vec2_ptrs.push_back( tclist );
513 for ( i = 0; i < (int)nodes.size(); ++i ) {
514 sgSetVec3( vtlist[i],
515 nodes[i][0], nodes[i][1], nodes[i][2] );
517 for ( i = 0; i < vncount; ++i ) {
518 sgSetVec3( vnlist[i],
523 for ( i = 0; i < vtcount; ++i ) {
524 sgSetVec2( tclist[i],
530 // display_list = xglGenLists(1);
531 // xglNewList(display_list, GL_COMPILE);
532 // printf("xglGenLists(); xglNewList();\n");
535 // scan the material line
538 // find this material in the properties list
540 newmat = material_lib.find( material );
541 if ( newmat == NULL ) {
542 // see if this is an on the fly texture
544 int pos = file.rfind( "/" );
545 file = file.substr( 0, pos );
546 cout << "current file = " << file << endl;
549 cout << "current file = " << file << endl;
550 if ( ! material_lib.add_item( file ) ) {
551 FG_LOG( FG_TERRAIN, FG_ALERT,
552 "Ack! unknown usemtl name = " << material
555 // locate our newly created material
556 newmat = material_lib.find( material );
557 if ( newmat == NULL ) {
558 FG_LOG( FG_TERRAIN, FG_ALERT,
559 "Ack! bad on the fly materia create = "
560 << material << " in " << path );
565 if ( newmat != NULL ) {
566 // set the texture width and height values for this
568 tex_width = newmat->get_xsize();
569 tex_height = newmat->get_ysize();
570 state = newmat->get_state();
571 coverage = newmat->get_light_coverage();
572 // cout << "(w) = " << tex_width << " (h) = "
573 // << tex_width << endl;
578 // unknown comment, just gobble the input until the
588 // cout << "token = " << token << endl;
590 if ( token == "vn" ) {
592 if ( vncount < FG_MAX_NODES ) {
593 in >> normals[vncount][0]
594 >> normals[vncount][1]
595 >> normals[vncount][2];
598 FG_LOG( FG_TERRAIN, FG_ALERT,
599 "Read too many vertex normals in " << path
600 << " ... dying :-(" );
603 } else if ( token == "vt" ) {
604 // vertex texture coordinate
605 if ( vtcount < FG_MAX_NODES*3 ) {
606 in >> tex_coords[vtcount][0]
607 >> tex_coords[vtcount][1];
610 FG_LOG( FG_TERRAIN, FG_ALERT,
611 "Read too many vertex texture coords in " << path
616 } else if ( token == "v" ) {
618 if ( t->ncount < FG_MAX_NODES ) {
619 /* in >> nodes[t->ncount][0]
620 >> nodes[t->ncount][1]
621 >> nodes[t->ncount][2]; */
623 nodes.push_back(node);
628 FG_LOG( FG_TERRAIN, FG_ALERT,
629 "Read too many nodes in " << path
630 << " ... dying :-(");
633 } else if ( (token == "tf") || (token == "ts") || (token == "f") ) {
634 // triangle fan, strip, or individual face
635 // FG_LOG( FG_TERRAIN, FG_INFO, "new fan or strip");
637 fan_vertices.clear();
638 fan_tex_coords.clear();
641 // xglBegin(GL_TRIANGLE_FAN);
644 fan_vertices.push_back( n1 );
645 // xglNormal3dv(normals[n1]);
646 if ( in.get( c ) && c == '/' ) {
648 fan_tex_coords.push_back( tex );
649 if ( scenery_version >= 0.4 ) {
650 if ( tex_width > 0 ) {
651 tclist[tex][0] *= (1000.0 / tex_width);
653 if ( tex_height > 0 ) {
654 tclist[tex][1] *= (1000.0 / tex_height);
657 pp.setx( tex_coords[tex][0] * (1000.0 / tex_width) );
658 pp.sety( tex_coords[tex][1] * (1000.0 / tex_height) );
661 pp = local_calc_tex_coords(nodes[n1], center);
663 // xglTexCoord2f(pp.x(), pp.y());
664 // xglVertex3dv(nodes[n1].get_n());
667 fan_vertices.push_back( n2 );
668 // xglNormal3dv(normals[n2]);
669 if ( in.get( c ) && c == '/' ) {
671 fan_tex_coords.push_back( tex );
672 if ( scenery_version >= 0.4 ) {
673 if ( tex_width > 0 ) {
674 tclist[tex][0] *= (1000.0 / tex_width);
676 if ( tex_height > 0 ) {
677 tclist[tex][1] *= (1000.0 / tex_height);
680 pp.setx( tex_coords[tex][0] * (1000.0 / tex_width) );
681 pp.sety( tex_coords[tex][1] * (1000.0 / tex_height) );
684 pp = local_calc_tex_coords(nodes[n2], center);
686 // xglTexCoord2f(pp.x(), pp.y());
687 // xglVertex3dv(nodes[n2].get_n());
689 // read all subsequent numbers until next thing isn't a number
691 #if defined( macintosh ) || defined( _MSC_VER )
700 if ( ! isdigit(c) || in.eof() ) {
705 fan_vertices.push_back( n3 );
706 // cout << " triangle = "
707 // << n1 << "," << n2 << "," << n3
709 // xglNormal3dv(normals[n3]);
710 if ( in.get( c ) && c == '/' ) {
712 fan_tex_coords.push_back( tex );
713 if ( scenery_version >= 0.4 ) {
714 if ( tex_width > 0 ) {
715 tclist[tex][0] *= (1000.0 / tex_width);
717 if ( tex_height > 0 ) {
718 tclist[tex][1] *= (1000.0 / tex_height);
721 pp.setx( tex_coords[tex][0] * (1000.0 / tex_width) );
722 pp.sety( tex_coords[tex][1] * (1000.0 / tex_height) );
725 pp = local_calc_tex_coords(nodes[n3], center);
727 // xglTexCoord2f(pp.x(), pp.y());
728 // xglVertex3dv(nodes[n3].get_n());
730 if ( (token == "tf") || (token == "f") ) {
743 // build the ssg entity
744 int size = (int)fan_vertices.size();
745 ssgVertexArray *vl = new ssgVertexArray( size );
746 ssgNormalArray *nl = new ssgNormalArray( size );
747 ssgTexCoordArray *tl = new ssgTexCoordArray( size );
748 ssgColourArray *cl = new ssgColourArray( 1 );
751 sgSetVec4( color, 1.0, 1.0, 1.0, 1.0 );
756 for ( i = 0; i < size; ++i ) {
757 sgCopyVec3( tmp3, vtlist[ fan_vertices[i] ] );
760 sgCopyVec3( tmp3, vnlist[ fan_vertices[i] ] );
763 sgCopyVec2( tmp2, tclist[ fan_tex_coords[i] ] );
767 ssgLeaf *leaf = NULL;
768 if ( token == "tf" ) {
771 new ssgVtxTable ( GL_TRIANGLE_FAN, vl, nl, tl, cl );
772 } else if ( token == "ts" ) {
775 new ssgVtxTable ( GL_TRIANGLE_STRIP, vl, nl, tl, cl );
776 } else if ( token == "f" ) {
779 new ssgVtxTable ( GL_TRIANGLES, vl, nl, tl, cl );
781 // leaf->makeDList();
782 leaf->setState( state );
784 tile->addKid( leaf );
787 if ( coverage > 0.0 ) {
788 if ( coverage < 10000.0 ) {
789 FG_LOG(FG_INPUT, FG_ALERT, "Light coverage is "
790 << coverage << ", pushing up to 10000");
793 gen_random_surface_points(leaf, lights, coverage);
795 // // generate lighting
796 // if ( material == "Urban" || material == "BuiltUpCover" ) {
797 // gen_random_surface_points( leaf, lights, 100000.0 );
798 // } else if ( material == "EvergreenBroadCover" ||
799 // material == "Default" || material == "Island" ||
800 // material == "SomeSort" ||
801 // material == "DeciduousBroadCover" ||
802 // material == "EvergreenNeedleCover" ||
803 // material == "DeciduousNeedleCover" ) {
804 // gen_random_surface_points( leaf, lights, 10000000.0 );
805 // } else if ( material == "Road") {
806 // gen_random_surface_points( leaf, lights, 10000.0);
807 // } else if ( material == "MixedForestCover" ) {
808 // gen_random_surface_points( leaf, lights, 5000000.0 );
809 // } else if ( material == "WoodedTundraCover" ||
810 // material == "BareTundraCover" ||
811 // material == "HerbTundraCover" ||
812 // material == "MixedTundraCover" ||
813 // material == "Marsh" ||
814 // material == "HerbWetlandCover" ||
815 // material == "WoodedWetlandCover" ) {
816 // gen_random_surface_points( leaf, lights, 20000000.0 );
817 // } else if ( material == "ShrubCover" ||
818 // material == "ShrubGrassCover" ) {
819 // gen_random_surface_points( leaf, lights, 4000000.0 );
820 // } else if ( material == "GrassCover" ||
821 // material == "SavannaCover" ) {
822 // gen_random_surface_points( leaf, lights, 4000000.0 );
823 // } else if ( material == "MixedCropPastureCover" ||
824 // material == "IrrCropPastureCover" ||
825 // material == "DryCropPastureCover" ||
826 // material == "CropGrassCover" ||
827 // material == "CropWoodCover" ) {
828 // gen_random_surface_points( leaf, lights, 2000000.0 );
832 FG_LOG( FG_TERRAIN, FG_WARN, "Unknown token in "
833 << path << " = " << token );
836 // eat white space before start of while loop so if we are
837 // done with useful input it is noticed before hand.
838 #if defined( macintosh ) || defined( _MSC_VER )
851 FG_LOG( FG_TERRAIN, FG_DEBUG,
852 "Loaded " << path << " in "
853 << stopwatch.elapsedSeconds() << " seconds" );
855 // Generate a cloud layer above the tiles
856 // if ( globals->get_options()->get_clouds() ) {
857 // fgGenCloudTile(path, t, tile);