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 sgTriArea( 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 sgTriArea() 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();
340 short int n1, n2, n3;
344 for ( int i = 0; i < num; ++i ) {
345 leaf->getTriangle( i, &n1, &n2, &n3 );
346 p1 = leaf->getVertex(n1);
347 p2 = leaf->getVertex(n2);
348 p3 = leaf->getVertex(n3);
349 double area = sgTriArea( p1, p2, p3 );
350 double num = area / factor;
352 // generate a light point for each unit of area
353 while ( num > 1.0 ) {
354 random_pt_inside_tri( result, p1, p2, p3 );
355 lights->add( result );
358 // for partial units of area, use a zombie door method to
359 // create the proper random chance of a light being created
362 if ( sg_random() <= num ) {
363 // a zombie made it through our door
364 random_pt_inside_tri( result, p1, p2, p3 );
365 lights->add( result );
373 ssgBranch *fgObjLoad( const string& path, FGTileEntry *t,
374 ssgVertexArray *lights, const bool is_base)
376 FGNewMat *newmat = NULL;
380 // sgVec3 approx_normal;
381 // double normal[3], scale = 0.0;
382 // double x, y, z, xmax, xmin, ymax, ymin, zmax, zmin;
383 // GLfloat sgenparams[] = { 1.0, 0.0, 0.0, 0.0 };
384 // GLint display_list = 0;
386 bool in_faces = false;
387 int vncount, vtcount;
388 int n1 = 0, n2 = 0, n3 = 0;
390 // int last1 = 0, last2 = 0;
395 double scenery_version = 0.0;
396 double tex_width = 1000.0, tex_height = 1000.0;
397 bool shared_done = false;
398 int_list fan_vertices;
399 int_list fan_tex_coords;
401 ssgSimpleState *state = NULL;
402 sgVec3 *vtlist, *vnlist;
405 ssgBranch *tile = new ssgBranch () ;
407 tile -> setName ( (char *)path.c_str() ) ;
409 // Attempt to open "path.gz" or "path"
410 fg_gzifstream in( path );
411 if ( ! in.is_open() ) {
412 FG_LOG( FG_TERRAIN, FG_ALERT, "Cannot open file: " << path );
413 FG_LOG( FG_TERRAIN, FG_ALERT, "default to ocean tile: " << path );
415 return fgGenTile( path, t );
418 shading = globals->get_options()->get_shading();
426 t->bounding_radius = 0.0;
433 // ignore initial comments and blank lines. (priming the pump)
434 // in >> skipcomment;
441 while ( in.get(c) && c != '\0' ) {
444 while ( ! in.eof() ) {
447 #if defined( macintosh ) || defined( _MSC_VER )
453 if ( in.get( c ) && c == '#' ) {
454 // process a comment line
456 // getline( in, line );
457 // cout << "comment = " << line << endl;
461 if ( token == "Version" ) {
462 // read scenery versions number
463 in >> scenery_version;
464 // cout << "scenery_version = " << scenery_version << endl;
465 } else if ( token == "gbs" ) {
466 // reference point (center offset)
468 in >> t->center >> t->bounding_radius;
472 in >> junk1 >> junk2;
475 // cout << "center = " << center
476 // << " radius = " << t->bounding_radius << endl;
477 } else if ( token == "bs" ) {
478 // reference point (center offset)
482 in >> junk1 >> junk2;
483 } else if ( token == "usemtl" ) {
484 // material property specification
486 // if first usemtl with shared_done = false, then set
487 // shared_done true and build the ssg shared lists
488 if ( ! shared_done ) {
490 if ( (int)nodes.size() != vncount ) {
491 FG_LOG( FG_TERRAIN, FG_ALERT,
492 "Tile has mismatched nodes = " << nodes.size()
493 << " and normals = " << vncount << " : "
499 vtlist = new sgVec3 [ nodes.size() ];
500 t->vec3_ptrs.push_back( vtlist );
501 vnlist = new sgVec3 [ vncount ];
502 t->vec3_ptrs.push_back( vnlist );
503 tclist = new sgVec2 [ vtcount ];
504 t->vec2_ptrs.push_back( tclist );
506 for ( i = 0; i < (int)nodes.size(); ++i ) {
507 sgSetVec3( vtlist[i],
508 nodes[i][0], nodes[i][1], nodes[i][2] );
510 for ( i = 0; i < vncount; ++i ) {
511 sgSetVec3( vnlist[i],
516 for ( i = 0; i < vtcount; ++i ) {
517 sgSetVec2( tclist[i],
523 // display_list = xglGenLists(1);
524 // xglNewList(display_list, GL_COMPILE);
525 // printf("xglGenLists(); xglNewList();\n");
528 // scan the material line
531 // find this material in the properties list
533 newmat = material_lib.find( material );
534 if ( newmat == NULL ) {
535 // see if this is an on the fly texture
537 int pos = file.rfind( "/" );
538 file = file.substr( 0, pos );
539 cout << "current file = " << file << endl;
542 cout << "current file = " << file << endl;
543 if ( ! material_lib.add_item( file ) ) {
544 FG_LOG( FG_TERRAIN, FG_ALERT,
545 "Ack! unknown usemtl name = " << material
548 // locate our newly created material
549 newmat = material_lib.find( material );
550 if ( newmat == NULL ) {
551 FG_LOG( FG_TERRAIN, FG_ALERT,
552 "Ack! bad on the fly materia create = "
553 << material << " in " << path );
558 if ( newmat != NULL ) {
559 // set the texture width and height values for this
561 tex_width = newmat->get_xsize();
562 tex_height = newmat->get_ysize();
563 state = newmat->get_state();
564 coverage = newmat->get_light_coverage();
565 // cout << "(w) = " << tex_width << " (h) = "
566 // << tex_width << endl;
571 // unknown comment, just gobble the input until the
581 // cout << "token = " << token << endl;
583 if ( token == "vn" ) {
585 if ( vncount < FG_MAX_NODES ) {
586 in >> normals[vncount][0]
587 >> normals[vncount][1]
588 >> normals[vncount][2];
591 FG_LOG( FG_TERRAIN, FG_ALERT,
592 "Read too many vertex normals in " << path
593 << " ... dying :-(" );
596 } else if ( token == "vt" ) {
597 // vertex texture coordinate
598 if ( vtcount < FG_MAX_NODES*3 ) {
599 in >> tex_coords[vtcount][0]
600 >> tex_coords[vtcount][1];
603 FG_LOG( FG_TERRAIN, FG_ALERT,
604 "Read too many vertex texture coords in " << path
609 } else if ( token == "v" ) {
611 if ( t->ncount < FG_MAX_NODES ) {
612 /* in >> nodes[t->ncount][0]
613 >> nodes[t->ncount][1]
614 >> nodes[t->ncount][2]; */
616 nodes.push_back(node);
621 FG_LOG( FG_TERRAIN, FG_ALERT,
622 "Read too many nodes in " << path
623 << " ... dying :-(");
626 } else if ( (token == "tf") || (token == "ts") || (token == "f") ) {
627 // triangle fan, strip, or individual face
628 // FG_LOG( FG_TERRAIN, FG_INFO, "new fan or strip");
630 fan_vertices.clear();
631 fan_tex_coords.clear();
634 // xglBegin(GL_TRIANGLE_FAN);
637 fan_vertices.push_back( n1 );
638 // xglNormal3dv(normals[n1]);
639 if ( in.get( c ) && c == '/' ) {
641 fan_tex_coords.push_back( tex );
642 if ( scenery_version >= 0.4 ) {
643 if ( tex_width > 0 ) {
644 tclist[tex][0] *= (1000.0 / tex_width);
646 if ( tex_height > 0 ) {
647 tclist[tex][1] *= (1000.0 / tex_height);
650 pp.setx( tex_coords[tex][0] * (1000.0 / tex_width) );
651 pp.sety( tex_coords[tex][1] * (1000.0 / tex_height) );
654 pp = local_calc_tex_coords(nodes[n1], center);
656 // xglTexCoord2f(pp.x(), pp.y());
657 // xglVertex3dv(nodes[n1].get_n());
660 fan_vertices.push_back( n2 );
661 // xglNormal3dv(normals[n2]);
662 if ( in.get( c ) && c == '/' ) {
664 fan_tex_coords.push_back( tex );
665 if ( scenery_version >= 0.4 ) {
666 if ( tex_width > 0 ) {
667 tclist[tex][0] *= (1000.0 / tex_width);
669 if ( tex_height > 0 ) {
670 tclist[tex][1] *= (1000.0 / tex_height);
673 pp.setx( tex_coords[tex][0] * (1000.0 / tex_width) );
674 pp.sety( tex_coords[tex][1] * (1000.0 / tex_height) );
677 pp = local_calc_tex_coords(nodes[n2], center);
679 // xglTexCoord2f(pp.x(), pp.y());
680 // xglVertex3dv(nodes[n2].get_n());
682 // read all subsequent numbers until next thing isn't a number
684 #if defined( macintosh ) || defined( _MSC_VER )
693 if ( ! isdigit(c) || in.eof() ) {
698 fan_vertices.push_back( n3 );
699 // cout << " triangle = "
700 // << n1 << "," << n2 << "," << n3
702 // xglNormal3dv(normals[n3]);
703 if ( in.get( c ) && c == '/' ) {
705 fan_tex_coords.push_back( tex );
706 if ( scenery_version >= 0.4 ) {
707 if ( tex_width > 0 ) {
708 tclist[tex][0] *= (1000.0 / tex_width);
710 if ( tex_height > 0 ) {
711 tclist[tex][1] *= (1000.0 / tex_height);
714 pp.setx( tex_coords[tex][0] * (1000.0 / tex_width) );
715 pp.sety( tex_coords[tex][1] * (1000.0 / tex_height) );
718 pp = local_calc_tex_coords(nodes[n3], center);
720 // xglTexCoord2f(pp.x(), pp.y());
721 // xglVertex3dv(nodes[n3].get_n());
723 if ( (token == "tf") || (token == "f") ) {
736 // build the ssg entity
737 int size = (int)fan_vertices.size();
738 ssgVertexArray *vl = new ssgVertexArray( size );
739 ssgNormalArray *nl = new ssgNormalArray( size );
740 ssgTexCoordArray *tl = new ssgTexCoordArray( size );
741 ssgColourArray *cl = new ssgColourArray( 1 );
744 sgSetVec4( color, 1.0, 1.0, 1.0, 1.0 );
749 for ( i = 0; i < size; ++i ) {
750 sgCopyVec3( tmp3, vtlist[ fan_vertices[i] ] );
753 sgCopyVec3( tmp3, vnlist[ fan_vertices[i] ] );
756 sgCopyVec2( tmp2, tclist[ fan_tex_coords[i] ] );
760 ssgLeaf *leaf = NULL;
761 if ( token == "tf" ) {
764 new ssgVtxTable ( GL_TRIANGLE_FAN, vl, nl, tl, cl );
765 } else if ( token == "ts" ) {
768 new ssgVtxTable ( GL_TRIANGLE_STRIP, vl, nl, tl, cl );
769 } else if ( token == "f" ) {
772 new ssgVtxTable ( GL_TRIANGLES, vl, nl, tl, cl );
774 // leaf->makeDList();
775 leaf->setState( state );
777 tile->addKid( leaf );
780 if ( coverage > 0.0 ) {
781 if ( coverage < 10000.0 ) {
782 FG_LOG(FG_INPUT, FG_ALERT, "Light coverage is "
783 << coverage << ", pushing up to 10000");
786 gen_random_surface_points(leaf, lights, coverage);
788 // // generate lighting
789 // if ( material == "Urban" || material == "BuiltUpCover" ) {
790 // gen_random_surface_points( leaf, lights, 100000.0 );
791 // } else if ( material == "EvergreenBroadCover" ||
792 // material == "Default" || material == "Island" ||
793 // material == "SomeSort" ||
794 // material == "DeciduousBroadCover" ||
795 // material == "EvergreenNeedleCover" ||
796 // material == "DeciduousNeedleCover" ) {
797 // gen_random_surface_points( leaf, lights, 10000000.0 );
798 // } else if ( material == "Road") {
799 // gen_random_surface_points( leaf, lights, 10000.0);
800 // } else if ( material == "MixedForestCover" ) {
801 // gen_random_surface_points( leaf, lights, 5000000.0 );
802 // } else if ( material == "WoodedTundraCover" ||
803 // material == "BareTundraCover" ||
804 // material == "HerbTundraCover" ||
805 // material == "MixedTundraCover" ||
806 // material == "Marsh" ||
807 // material == "HerbWetlandCover" ||
808 // material == "WoodedWetlandCover" ) {
809 // gen_random_surface_points( leaf, lights, 20000000.0 );
810 // } else if ( material == "ShrubCover" ||
811 // material == "ShrubGrassCover" ) {
812 // gen_random_surface_points( leaf, lights, 4000000.0 );
813 // } else if ( material == "GrassCover" ||
814 // material == "SavannaCover" ) {
815 // gen_random_surface_points( leaf, lights, 4000000.0 );
816 // } else if ( material == "MixedCropPastureCover" ||
817 // material == "IrrCropPastureCover" ||
818 // material == "DryCropPastureCover" ||
819 // material == "CropGrassCover" ||
820 // material == "CropWoodCover" ) {
821 // gen_random_surface_points( leaf, lights, 2000000.0 );
825 FG_LOG( FG_TERRAIN, FG_WARN, "Unknown token in "
826 << path << " = " << token );
829 // eat white space before start of while loop so if we are
830 // done with useful input it is noticed before hand.
831 #if defined( macintosh ) || defined( _MSC_VER )
844 FG_LOG( FG_TERRAIN, FG_DEBUG,
845 "Loaded " << path << " in "
846 << stopwatch.elapsedSeconds() << " seconds" );
848 // Generate a cloud layer above the tiles
849 // if ( globals->get_options()->get_clouds() ) {
850 // fgGenCloudTile(path, t, tile);