src/Objects/obj.cxx

   1 // obj.cxx -- routines to handle "sorta" WaveFront .obj format files.
   2 //
   3 // Written by Curtis Olson, started October 1997.
   4 //
   5 // Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
   6 //
   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.
  11 //
  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.
  16 //
  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.
  20 //
  21 // $Id$
  22
  23
  24 #ifdef HAVE_CONFIG_H
  25 #  include <config.h>
  26 #endif
  27
  28 #ifdef FG_MATH_EXCEPTION_CLASH
  29 #  include <math.h>
  30 #endif
  31
  32 #include <stdio.h>
  33 #include <string.h>
  34
  35 // #if defined ( __sun__ )
  36 // extern "C" void *memmove(void *, const void *, size_t);
  37 // extern "C" void *memset(void *, int, size_t);
  38 // #endif
  39
  40 #include <Include/compiler.h>
  41
  42 #include STL_STRING
  43 #include <map>                  // STL
  44 #include <vector>               // STL
  45 #include <ctype.h>              // isdigit()
  46
  47 #include <Debug/logstream.hxx>
  48 #include <Misc/fgstream.hxx>
  49 #include <Include/fg_constants.h>
  50 #include <Main/options.hxx>
  51 #include <Math/mat3.h>
  52 #include <Math/fg_geodesy.hxx>
  53 #include <Math/fg_random.h>
  54 #include <Math/point3d.hxx>
  55 #include <Math/polar3d.hxx>
  56 #include <Misc/stopwatch.hxx>
  57 #include <Misc/texcoord.hxx>
  58 #include <Scenery/tileentry.hxx>
  59
  60 #include "materialmgr.hxx"
  61 #include "obj.hxx"
  62
  63 FG_USING_STD(string);
  64 FG_USING_STD(vector);
  65
  66
  67 typedef vector < int > int_list;
  68 typedef int_list::iterator int_list_iterator;
  69 typedef int_list::const_iterator int_point_list_iterator;
  70
  71
  72 static double normals[FG_MAX_NODES][3];
  73 static double tex_coords[FG_MAX_NODES*3][3];
  74
  75
  76 // given three points defining a triangle, calculate the normal
  77 static void calc_normal(Point3D p1, Point3D p2,
  78                         Point3D p3, double normal[3])
  79 {
  80     double v1[3], v2[3];
  81     double temp;
  82
  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];
  85
  86     MAT3cross_product(normal, v1, v2);
  87     MAT3_NORMALIZE_VEC(normal,temp);
  88
  89     // fgPrintf( FG_TERRAIN, FG_DEBUG, "  Normal = %.2f %.2f %.2f\n",
  90     //           normal[0], normal[1], normal[2]);
  91 }
  92
  93
  94 #define FG_TEX_CONSTANT 69.0
  95
  96 // Calculate texture coordinates for a given point.
  97 static Point3D local_calc_tex_coords(const Point3D& node, const Point3D& ref) {
  98     Point3D cp;
  99     Point3D pp;
 100     // double tmplon, tmplat;
 101
 102     // cout << "-> " << node[0] << " " << node[1] << " " << node[2] << endl;
 103     // cout << "-> " << ref.x() << " " << ref.y() << " " << ref.z() << endl;
 104
 105     cp = Point3D( node[0] + ref.x(),
 106                   node[1] + ref.y(),
 107                   node[2] + ref.z() );
 108
 109     pp = fgCartToPolar3d(cp);
 110
 111     // tmplon = pp.lon() * RAD_TO_DEG;
 112     // tmplat = pp.lat() * RAD_TO_DEG;
 113     // cout << tmplon << " " << tmplat << endl;
 114
 115     pp.setx( fmod(RAD_TO_DEG * FG_TEX_CONSTANT * pp.x(), 11.0) );
 116     pp.sety( fmod(RAD_TO_DEG * FG_TEX_CONSTANT * pp.y(), 11.0) );
 117
 118     if ( pp.x() < 0.0 ) {
 119         pp.setx( pp.x() + 11.0 );
 120     }
 121
 122     if ( pp.y() < 0.0 ) {
 123         pp.sety( pp.y() + 11.0 );
 124     }
 125
 126     // cout << pp << endl;
 127
 128     return(pp);
 129 }
 130
 131
 132 // Generate a generic ocean tile on the fly
 133 ssgBranch *fgGenTile( const string& path, FGTileEntry *t) {
 134     fgFRAGMENT fragment;
 135     fragment.init();
 136     fragment.tile_ptr = t;
 137
 138     ssgSimpleState *state = NULL;
 139
 140     ssgBranch *tile = new ssgBranch () ;
 141     tile -> setName ( (char *)path.c_str() ) ;
 142
 143     // find Ocean material in the properties list
 144     if ( ! material_mgr.find( "Ocean", fragment.material_ptr )) {
 145         FG_LOG( FG_TERRAIN, FG_ALERT,
 146                 "Ack! unknown usemtl name = " << "Ocean"
 147                 << " in " << path );
 148     }
 149
 150     // set the texture width and height values for this
 151     // material
 152     FGMaterial m = fragment.material_ptr->get_m();
 153     double tex_width = m.get_xsize();
 154     double tex_height = m.get_ysize();
 155
 156     // set ssgState
 157     state = fragment.material_ptr->get_state();
 158
 159     // Calculate center point
 160     FGBucket b = t->tile_bucket;
 161     double clon = b.get_center_lon();
 162     double clat = b.get_center_lat();
 163     double height = b.get_height();
 164     double width = b.get_width();
 165
 166     Point3D center = fgGeodToCart(Point3D(clon*DEG_TO_RAD,clat*DEG_TO_RAD,0.0));
 167     t->center = center;
 168     fragment.center = center;
 169     // cout << "center = " << center << endl;;
 170
 171     // Caculate corner vertices
 172     Point3D geod[4];
 173     geod[0] = Point3D( clon - width/2.0, clat - height/2.0, 0.0 );
 174     geod[1] = Point3D( clon + width/2.0, clat - height/2.0, 0.0 );
 175     geod[2] = Point3D( clon + width/2.0, clat + height/2.0, 0.0 );
 176     geod[3] = Point3D( clon - width/2.0, clat + height/2.0, 0.0 );
 177
 178     Point3D rad[4];
 179     int i;
 180     for ( i = 0; i < 4; ++i ) {
 181         rad[i] = Point3D( geod[i].x() * DEG_TO_RAD, geod[i].y() * DEG_TO_RAD,
 182                           geod[i].z() );
 183     }
 184
 185     Point3D cart[4], rel[4];
 186     t->nodes.clear();
 187     for ( i = 0; i < 4; ++i ) {
 188         cart[i] = fgGeodToCart(rad[i]);
 189         rel[i] = cart[i] - center;
 190         t->nodes.push_back( rel[i] );
 191         // cout << "corner " << i << " = " << cart[i] << endl;
 192     }
 193
 194     t->ncount = 4;
 195
 196     // Calculate bounding radius
 197     t->bounding_radius = center.distance3D( cart[0] );
 198     fragment.bounding_radius = t->bounding_radius;
 199     // cout << "bounding radius = " << t->bounding_radius << endl;
 200
 201     // Calculate normals
 202     Point3D normals[4];
 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;
 208     }
 209
 210     // Calculate texture coordinates
 211     point_list geod_nodes;
 212     geod_nodes.clear();
 213     for ( i = 0; i < 4; ++i ) {
 214         geod_nodes.push_back( geod[i] );
 215     }
 216     int_list rectangle;
 217     rectangle.clear();
 218     for ( i = 0; i < 4; ++i ) {
 219         rectangle.push_back( i );
 220     }
 221     point_list texs = calc_tex_coords( b, geod_nodes, rectangle,
 222                                        1000.0 / tex_width );
 223
 224     // Build flight gear structure
 225     fragment.add_face(0, 1, 2);
 226     fragment.add_face(0, 2, 3);
 227     t->fragment_list.push_back(fragment);
 228
 229     // Allocate ssg structure
 230     sgVec3 *vtlist = new sgVec3 [ 4 ];
 231     t->vec3_ptrs.push_back( vtlist );
 232     sgVec3 *vnlist = new sgVec3 [ 4 ];
 233     t->vec3_ptrs.push_back( vnlist );
 234     sgVec2 *tclist = new sgVec2 [ 4 ];
 235     t->vec2_ptrs.push_back( tclist );
 236
 237     for ( i = 0; i < 4; ++i ) {
 238         sgSetVec3( vtlist[i],
 239                    rel[i].x(), rel[i].y(), rel[i].z() );
 240         sgSetVec3( vnlist[i],
 241                    normals[i].x(), normals[i].y(), normals[i].z() );
 242         sgSetVec2( tclist[i], texs[i].x(), texs[i].y() );
 243     }
 244
 245     unsigned short *vindex = new unsigned short [ 4 ];
 246     t->index_ptrs.push_back( vindex );
 247     unsigned short *tindex = new unsigned short [ 4 ];
 248     t->index_ptrs.push_back( tindex );
 249     for ( i = 0; i < 4; ++i ) {
 250         vindex[i] = i;
 251         tindex[i] = i;
 252     }
 253
 254     ssgLeaf *leaf =
 255         new ssgVTable ( GL_TRIANGLE_FAN,
 256                         4, vindex, vtlist,
 257                         4, vindex, vnlist,
 258                         4, tindex, tclist,
 259                         0, NULL, NULL ) ;
 260     leaf->setState( state );
 261
 262     tile->addKid( leaf );
 263     // if ( current_options.get_clouds() ) {
 264     //    fgGenCloudTile(path, t, tile);
 265     // }
 266
 267     return tile;
 268 }
 269
 270
 271 // Load a .obj file and build the fragment list
 272 ssgBranch *fgObjLoad( const string& path, FGTileEntry *t, const bool is_base) {
 273     fgFRAGMENT fragment;
 274     Point3D pp;
 275     double approx_normal[3] /*, normal[3], scale = 0.0 */;
 276     // double x, y, z, xmax, xmin, ymax, ymin, zmax, zmin;
 277     // GLfloat sgenparams[] = { 1.0, 0.0, 0.0, 0.0 };
 278     // GLint display_list = 0;
 279     int shading;
 280     bool in_fragment = false, in_faces = false;
 281     int vncount, vtcount;
 282     int n1 = 0, n2 = 0, n3 = 0, n4 = 0;
 283     int tex;
 284     int last1 = 0, last2 = 0;
 285     bool odd = false;
 286     point_list nodes;
 287     Point3D node;
 288     Point3D center;
 289     double scenery_version = 0.0;
 290     double tex_width = 1000.0, tex_height = 1000.0;
 291     bool shared_done = false;
 292     int_list fan_vertices;
 293     int_list fan_tex_coords;
 294     int i;
 295     ssgSimpleState *state = NULL;
 296     sgVec3 *vtlist, *vnlist;
 297     sgVec2 *tclist;
 298
 299     ssgBranch *tile = new ssgBranch () ;
 300
 301     tile -> setName ( (char *)path.c_str() ) ;
 302
 303     // Attempt to open "path.gz" or "path"
 304     fg_gzifstream in( path );
 305     if ( ! in.is_open() ) {
 306         FG_LOG( FG_TERRAIN, FG_ALERT, "Cannot open file: " << path );
 307         FG_LOG( FG_TERRAIN, FG_ALERT, "default to ocean tile: " << path );
 308
 309         return fgGenTile( path, t );
 310     }
 311
 312     shading = current_options.get_shading();
 313
 314     in_fragment = false;
 315     if ( is_base ) {
 316         t->ncount = 0;
 317     }
 318     vncount = 0;
 319     vtcount = 0;
 320     if ( is_base ) {
 321         t->bounding_radius = 0.0;
 322     }
 323     center = t->center;
 324
 325     StopWatch stopwatch;
 326     stopwatch.start();
 327
 328     // ignore initial comments and blank lines. (priming the pump)
 329     // in >> skipcomment;
 330     // string line;
 331
 332     string token;
 333     char c;
 334
 335 #ifdef __MWERKS__
 336     while ( in.get(c) && c  != '\0' ) {
 337         in.putback(c);
 338 #else
 339     while ( ! in.eof() ) {
 340 #endif
 341
 342 #if defined( MACOS )
 343         in >> ::skipws;
 344 #else
 345         in >> skipws;
 346 #endif
 347
 348         if ( in.get( c ) && c == '#' ) {
 349             // process a comment line
 350
 351             // getline( in, line );
 352             // cout << "comment = " << line << endl;
 353
 354             in >> token;
 355
 356             if ( token == "Version" ) {
 357                 // read scenery versions number
 358                 in >> scenery_version;
 359                 // cout << "scenery_version = " << scenery_version << endl;
 360             } else if ( token == "gbs" ) {
 361                 // reference point (center offset)
 362                 if ( is_base ) {
 363                     in >> t->center >> t->bounding_radius;
 364                 } else {
 365                     Point3D junk1;
 366                     double junk2;
 367                     in >> junk1 >> junk2;
 368                 }
 369                 center = t->center;
 370                 // cout << "center = " << center
 371                 //      << " radius = " << t->bounding_radius << endl;
 372             } else if ( token == "bs" ) {
 373                 // reference point (center offset)
 374                 in >> fragment.center;
 375                 in >> fragment.bounding_radius;
 376
 377                 // cout << "center = " << fragment.center
 378                 //      << " radius = " << fragment.bounding_radius << endl;
 379             } else if ( token == "usemtl" ) {
 380                 // material property specification
 381
 382                 // if first usemtl with shared_done = false, then set
 383                 // shared_done true and build the ssg shared lists
 384                 if ( ! shared_done ) {
 385                     // sanity check
 386                     if ( (int)nodes.size() != vncount ) {
 387                         FG_LOG( FG_TERRAIN, FG_ALERT,
 388                                 "Tile has mismatched nodes and normals: "
 389                                 << path );
 390                         // exit(-1);
 391                     }
 392                     shared_done = true;
 393
 394                     vtlist = new sgVec3 [ nodes.size() ];
 395                     t->vec3_ptrs.push_back( vtlist );
 396                     vnlist = new sgVec3 [ vncount ];
 397                     t->vec3_ptrs.push_back( vnlist );
 398                     tclist = new sgVec2 [ vtcount ];
 399                     t->vec2_ptrs.push_back( tclist );
 400
 401                     for ( i = 0; i < (int)nodes.size(); ++i ) {
 402                         sgSetVec3( vtlist[i],
 403                                    nodes[i][0], nodes[i][1], nodes[i][2] );
 404                     }
 405                     for ( i = 0; i < vncount; ++i ) {
 406                         sgSetVec3( vnlist[i],
 407                                    normals[i][0],
 408                                    normals[i][1],
 409                                    normals[i][2] );
 410                     }
 411                     for ( i = 0; i < vtcount; ++i ) {
 412                         sgSetVec2( tclist[i],
 413                                    tex_coords[i][0],
 414                                    tex_coords[i][1] );
 415                     }
 416                 }
 417
 418                 // series of individual triangles
 419                 // if ( in_faces ) {
 420                 //     xglEnd();
 421                 // }
 422
 423                 // this also signals the start of a new fragment
 424                 if ( in_fragment ) {
 425                     // close out the previous structure and start the next
 426                     // xglEndList();
 427                     // printf("xglEnd(); xglEndList();\n");
 428
 429                     // update fragment
 430                     // fragment.display_list = display_list;
 431
 432                     // push this fragment onto the tile's object list
 433                     t->fragment_list.push_back(fragment);
 434                 } else {
 435                     in_fragment = true;
 436                 }
 437
 438                 // printf("start of fragment (usemtl)\n");
 439
 440                 // display_list = xglGenLists(1);
 441                 // xglNewList(display_list, GL_COMPILE);
 442                 // printf("xglGenLists(); xglNewList();\n");
 443                 in_faces = false;
 444
 445                 // reset the existing face list
 446                 // printf("cleaning a fragment with %d faces\n",
 447                 //        fragment.faces.size());
 448                 fragment.init();
 449
 450                 // scan the material line
 451                 string material;
 452                 in >> material;
 453                 fragment.tile_ptr = t;
 454
 455                 // find this material in the properties list
 456                 if ( ! material_mgr.find( material, fragment.material_ptr )) {
 457                     FG_LOG( FG_TERRAIN, FG_ALERT,
 458                             "Ack! unknown usemtl name = " << material
 459                             << " in " << path );
 460                 }
 461
 462                 // set the texture width and height values for this
 463                 // material
 464                 FGMaterial m = fragment.material_ptr->get_m();
 465                 tex_width = m.get_xsize();
 466                 tex_height = m.get_ysize();
 467                 state = fragment.material_ptr->get_state();
 468                 // cout << "(w) = " << tex_width << " (h) = "
 469                 //      << tex_width << endl;
 470
 471                 // initialize the fragment transformation matrix
 472                 /*
 473                  for ( i = 0; i < 16; i++ ) {
 474                    fragment.matrix[i] = 0.0;
 475                  }
 476                  fragment.matrix[0] = fragment.matrix[5] =
 477                  fragment.matrix[10] = fragment.matrix[15] = 1.0;
 478                 */
 479             } else {
 480                 // unknown comment, just gobble the input untill the
 481                 // end of line
 482
 483                 in >> skipeol;
 484             }
 485         } else {
 486             in.putback( c );
 487
 488             in >> token;
 489
 490             // cout << "token = " << token << endl;
 491
 492             if ( token == "vn" ) {
 493                 // vertex normal
 494                 if ( vncount < FG_MAX_NODES ) {
 495                     in >> normals[vncount][0]
 496                        >> normals[vncount][1]
 497                        >> normals[vncount][2];
 498                     vncount++;
 499                 } else {
 500                     FG_LOG( FG_TERRAIN, FG_ALERT,
 501                             "Read too many vertex normals in " << path
 502                             << " ... dying :-(" );
 503                     exit(-1);
 504                 }
 505             } else if ( token == "vt" ) {
 506                 // vertex texture coordinate
 507                 if ( vtcount < FG_MAX_NODES*3 ) {
 508                     in >> tex_coords[vtcount][0]
 509                        >> tex_coords[vtcount][1];
 510                     vtcount++;
 511                 } else {
 512                     FG_LOG( FG_TERRAIN, FG_ALERT,
 513                             "Read too many vertex texture coords in " << path
 514                             << " ... dying :-("
 515                             );
 516                     exit(-1);
 517                 }
 518             } else if ( token == "v" ) {
 519                 // node (vertex)
 520                 if ( t->ncount < FG_MAX_NODES ) {
 521                     /* in >> nodes[t->ncount][0]
 522                        >> nodes[t->ncount][1]
 523                        >> nodes[t->ncount][2]; */
 524                     in >> node;
 525                     nodes.push_back(node);
 526                     if ( is_base ) {
 527                         t->ncount++;
 528                     }
 529                 } else {
 530                     FG_LOG( FG_TERRAIN, FG_ALERT,
 531                             "Read too many nodes in " << path
 532                             << " ... dying :-(");
 533                     exit(-1);
 534                 }
 535             } else if ( token == "t" ) {
 536                 // start a new triangle strip
 537
 538                 n1 = n2 = n3 = n4 = 0;
 539
 540                 // fgPrintf( FG_TERRAIN, FG_DEBUG,
 541                 //           "    new tri strip = %s", line);
 542                 in >> n1 >> n2 >> n3;
 543                 fragment.add_face(n1, n2, n3);
 544
 545                 // fgPrintf( FG_TERRAIN, FG_DEBUG, "(t) = ");
 546
 547                 // xglBegin(GL_TRIANGLE_STRIP);
 548                 // printf("xglBegin(tristrip) %d %d %d\n", n1, n2, n3);
 549
 550                 odd = true;
 551                 // scale = 1.0;
 552
 553                 if ( shading ) {
 554                     // Shading model is "GL_SMOOTH" so use precalculated
 555                     // (averaged) normals
 556                     // MAT3_SCALE_VEC(normal, normals[n1], scale);
 557                     // xglNormal3dv(normal);
 558                     pp = local_calc_tex_coords(nodes[n1], center);
 559                     // xglTexCoord2f(pp.lon(), pp.lat());
 560                     // xglVertex3dv(nodes[n1].get_n());
 561
 562                     // MAT3_SCALE_VEC(normal, normals[n2], scale);
 563                     // xglNormal3dv(normal);
 564                     pp = local_calc_tex_coords(nodes[n2], center);
 565                     // xglTexCoord2f(pp.lon(), pp.lat());
 566                     // xglVertex3dv(nodes[n2].get_n());
 567
 568                     // MAT3_SCALE_VEC(normal, normals[n3], scale);
 569                     // xglNormal3dv(normal);
 570                     pp = local_calc_tex_coords(nodes[n3], center);
 571                     // xglTexCoord2f(pp.lon(), pp.lat());
 572                     // xglVertex3dv(nodes[n3].get_n());
 573                 } else {
 574                     // Shading model is "GL_FLAT" so calculate per face
 575                     // normals on the fly.
 576                     if ( odd ) {
 577                         calc_normal(nodes[n1], nodes[n2],
 578                                     nodes[n3], approx_normal);
 579                     } else {
 580                         calc_normal(nodes[n2], nodes[n1],
 581                                     nodes[n3], approx_normal);
 582                     }
 583                     // MAT3_SCALE_VEC(normal, approx_normal, scale);
 584                     // xglNormal3dv(normal);
 585
 586                     pp = local_calc_tex_coords(nodes[n1], center);
 587                     // xglTexCoord2f(pp.lon(), pp.lat());
 588                     // xglVertex3dv(nodes[n1].get_n());
 589
 590                     pp = local_calc_tex_coords(nodes[n2], center);
 591                     // xglTexCoord2f(pp.lon(), pp.lat());
 592                     // xglVertex3dv(nodes[n2].get_n());
 593
 594                     pp = local_calc_tex_coords(nodes[n3], center);
 595                     // xglTexCoord2f(pp.lon(), pp.lat());
 596                     // xglVertex3dv(nodes[n3].get_n());
 597                 }
 598                 // printf("some normals, texcoords, and vertices\n");
 599
 600                 odd = !odd;
 601                 last1 = n2;
 602                 last2 = n3;
 603
 604                 // There can be three or four values
 605                 char c;
 606                 while ( in.get(c) ) {
 607                     if ( c == '\n' ) {
 608                         break; // only the one
 609                     }
 610                     if ( isdigit(c) ){
 611                         in.putback(c);
 612                         in >> n4;
 613                         break;
 614                     }
 615                 }
 616
 617                 if ( n4 > 0 ) {
 618                     fragment.add_face(n3, n2, n4);
 619
 620                     if ( shading ) {
 621                         // Shading model is "GL_SMOOTH"
 622                         // MAT3_SCALE_VEC(normal, normals[n4], scale);
 623                     } else {
 624                         // Shading model is "GL_FLAT"
 625                         calc_normal(nodes[n3], nodes[n2], nodes[n4],
 626                                     approx_normal);
 627                         // MAT3_SCALE_VEC(normal, approx_normal, scale);
 628                     }
 629                     // xglNormal3dv(normal);
 630                     pp = local_calc_tex_coords(nodes[n4], center);
 631                     // xglTexCoord2f(pp.lon(), pp.lat());
 632                     // xglVertex3dv(nodes[n4].get_n());
 633
 634                     odd = !odd;
 635                     last1 = n3;
 636                     last2 = n4;
 637                     // printf("a normal, texcoord, and vertex (4th)\n");
 638                 }
 639             } else if ( (token == "tf") || (token == "ts") ) {
 640                 // triangle fan
 641                 // fgPrintf( FG_TERRAIN, FG_DEBUG, "new fan");
 642
 643                 fan_vertices.clear();
 644                 fan_tex_coords.clear();
 645                 odd = true;
 646
 647                 // xglBegin(GL_TRIANGLE_FAN);
 648
 649                 in >> n1;
 650                 fan_vertices.push_back( n1 );
 651                 // xglNormal3dv(normals[n1]);
 652                 if ( in.get( c ) && c == '/' ) {
 653                     in >> tex;
 654                     fan_tex_coords.push_back( tex );
 655                     if ( scenery_version >= 0.4 ) {
 656                         if ( tex_width > 0 ) {
 657                             tclist[tex][0] *= (1000.0 / tex_width);
 658                         }
 659                         if ( tex_height > 0 ) {
 660                             tclist[tex][1] *= (1000.0 / tex_height);
 661                         }
 662                     }
 663                     pp.setx( tex_coords[tex][0] * (1000.0 / tex_width) );
 664                     pp.sety( tex_coords[tex][1] * (1000.0 / tex_height) );
 665                 } else {
 666                     in.putback( c );
 667                     pp = local_calc_tex_coords(nodes[n1], center);
 668                 }
 669                 // xglTexCoord2f(pp.x(), pp.y());
 670                 // xglVertex3dv(nodes[n1].get_n());
 671
 672                 in >> n2;
 673                 fan_vertices.push_back( n2 );
 674                 // xglNormal3dv(normals[n2]);
 675                 if ( in.get( c ) && c == '/' ) {
 676                     in >> tex;
 677                     fan_tex_coords.push_back( tex );
 678                     if ( scenery_version >= 0.4 ) {
 679                         if ( tex_width > 0 ) {
 680                             tclist[tex][0] *= (1000.0 / tex_width);
 681                         }
 682                         if ( tex_height > 0 ) {
 683                             tclist[tex][1] *= (1000.0 / tex_height);
 684                         }
 685                     }
 686                     pp.setx( tex_coords[tex][0] * (1000.0 / tex_width) );
 687                     pp.sety( tex_coords[tex][1] * (1000.0 / tex_height) );
 688                 } else {
 689                     in.putback( c );
 690                     pp = local_calc_tex_coords(nodes[n2], center);
 691                 }
 692                 // xglTexCoord2f(pp.x(), pp.y());
 693                 // xglVertex3dv(nodes[n2].get_n());
 694
 695                 // read all subsequent numbers until next thing isn't a number
 696                 while ( true ) {
 697 #if defined( MACOS )
 698                     in >> ::skipws;
 699 #else
 700                     in >> skipws;
 701 #endif
 702
 703                     char c;
 704                     in.get(c);
 705                     in.putback(c);
 706                     if ( ! isdigit(c) || in.eof() ) {
 707                         break;
 708                     }
 709
 710                     in >> n3;
 711                     fan_vertices.push_back( n3 );
 712                     // cout << "  triangle = "
 713                     //      << n1 << "," << n2 << "," << n3
 714                     //      << endl;
 715                     // xglNormal3dv(normals[n3]);
 716                     if ( in.get( c ) && c == '/' ) {
 717                         in >> tex;
 718                         fan_tex_coords.push_back( tex );
 719                         if ( scenery_version >= 0.4 ) {
 720                             if ( tex_width > 0 ) {
 721                                 tclist[tex][0] *= (1000.0 / tex_width);
 722                             }
 723                             if ( tex_height > 0 ) {
 724                                 tclist[tex][1] *= (1000.0 / tex_height);
 725                             }
 726                         }
 727                         pp.setx( tex_coords[tex][0] * (1000.0 / tex_width) );
 728                         pp.sety( tex_coords[tex][1] * (1000.0 / tex_height) );
 729                     } else {
 730                         in.putback( c );
 731                         pp = local_calc_tex_coords(nodes[n3], center);
 732                     }
 733                     // xglTexCoord2f(pp.x(), pp.y());
 734                     // xglVertex3dv(nodes[n3].get_n());
 735
 736                     if ( token == "tf" ) {
 737                         // triangle fan
 738                         fragment.add_face(n1, n2, n3);
 739                         n2 = n3;
 740                     } else {
 741                         // triangle strip
 742                         if ( odd ) {
 743                             fragment.add_face(n1, n2, n3);
 744                         } else {
 745                             fragment.add_face(n2, n1, n3);
 746                         }
 747                         odd = !odd;
 748                         n1 = n2;
 749                         n2 = n3;
 750                     }
 751                 }
 752
 753                 // xglEnd();
 754
 755                 // build the ssg entity
 756                 unsigned short *vindex =
 757                     new unsigned short [ fan_vertices.size() ];
 758                 t->index_ptrs.push_back( vindex );
 759
 760                 unsigned short *tindex =
 761                     new unsigned short [ fan_tex_coords.size() ];
 762                 t->index_ptrs.push_back( tindex );
 763
 764                 for ( i = 0; i < (int)fan_vertices.size(); ++i ) {
 765                     vindex[i] = fan_vertices[i];
 766                 }
 767                 for ( i = 0; i < (int)fan_tex_coords.size(); ++i ) {
 768                     tindex[i] = fan_tex_coords[i];
 769                 }
 770                 ssgLeaf *leaf;
 771                 if ( token == "tf" ) {
 772                     // triangle fan
 773                     leaf =
 774                         new ssgVTable ( GL_TRIANGLE_FAN,
 775                                         fan_vertices.size(), vindex, vtlist,
 776                                         fan_vertices.size(), vindex, vnlist,
 777                                         fan_tex_coords.size(), tindex, tclist,
 778                                         0, NULL, NULL ) ;
 779                 } else {
 780                     // triangle strip
 781                     leaf =
 782                         new ssgVTable ( GL_TRIANGLE_STRIP,
 783                                         fan_vertices.size(), vindex, vtlist,
 784                                         fan_vertices.size(), vindex, vnlist,
 785                                         fan_tex_coords.size(), tindex, tclist,
 786                                         0, NULL, NULL ) ;
 787                 }
 788                 leaf->setState( state );
 789
 790                 tile->addKid( leaf );
 791
 792             } else if ( token == "f" ) {
 793                 // unoptimized face
 794
 795                 if ( !in_faces ) {
 796                     // xglBegin(GL_TRIANGLES);
 797                     // printf("xglBegin(triangles)\n");
 798                     in_faces = true;
 799                 }
 800
 801                 // fgPrintf( FG_TERRAIN, FG_DEBUG, "new triangle = %s", line);*/
 802                 in >> n1 >> n2 >> n3;
 803                 fragment.add_face(n1, n2, n3);
 804
 805                 // xglNormal3d(normals[n1][0], normals[n1][1], normals[n1][2]);
 806                 // xglNormal3dv(normals[n1]);
 807                 pp = local_calc_tex_coords(nodes[n1], center);
 808                 // xglTexCoord2f(pp.lon(), pp.lat());
 809                 // xglVertex3dv(nodes[n1].get_n());
 810
 811                 // xglNormal3dv(normals[n2]);
 812                 pp = local_calc_tex_coords(nodes[n2], center);
 813                 // xglTexCoord2f(pp.lon(), pp.lat());
 814                 // xglVertex3dv(nodes[n2].get_n());
 815
 816                 // xglNormal3dv(normals[n3]);
 817                 pp = local_calc_tex_coords(nodes[n3], center);
 818                 // xglTexCoord2f(pp.lon(), pp.lat());
 819                 // xglVertex3dv(nodes[n3].get_n());
 820                 // printf("some normals, texcoords, and vertices (tris)\n");
 821             } else if ( token == "q" ) {
 822                 // continue a triangle strip
 823                 n1 = n2 = 0;
 824
 825                 // fgPrintf( FG_TERRAIN, FG_DEBUG, "continued tri strip = %s ",
 826                 //           line);
 827                 in >> n1;
 828
 829                 // There can be one or two values
 830                 char c;
 831                 while ( in.get(c) ) {
 832                     if ( c == '\n' ) {
 833                         break; // only the one
 834                     }
 835
 836                     if ( isdigit(c) ) {
 837                         in.putback(c);
 838                         in >> n2;
 839                         break;
 840                     }
 841                 }
 842                 // fgPrintf( FG_TERRAIN, FG_DEBUG, "read %d %d\n", n1, n2);
 843
 844                 if ( odd ) {
 845                     fragment.add_face(last1, last2, n1);
 846                 } else {
 847                     fragment.add_face(last2, last1, n1);
 848                 }
 849
 850                 if ( shading ) {
 851                     // Shading model is "GL_SMOOTH"
 852                     // MAT3_SCALE_VEC(normal, normals[n1], scale);
 853                 } else {
 854                     // Shading model is "GL_FLAT"
 855                     if ( odd ) {
 856                         calc_normal(nodes[last1], nodes[last2],
 857                                     nodes[n1], approx_normal);
 858                     } else {
 859                         calc_normal(nodes[last2], nodes[last1],
 860                                     nodes[n1], approx_normal);
 861                     }
 862                     // MAT3_SCALE_VEC(normal, approx_normal, scale);
 863                 }
 864                 // xglNormal3dv(normal);
 865
 866                 pp = local_calc_tex_coords(nodes[n1], center);
 867                 // xglTexCoord2f(pp.lon(), pp.lat());
 868                 // xglVertex3dv(nodes[n1].get_n());
 869                 // printf("a normal, texcoord, and vertex (4th)\n");
 870
 871                 odd = !odd;
 872                 last1 = last2;
 873                 last2 = n1;
 874
 875                 if ( n2 > 0 ) {
 876                     // fgPrintf( FG_TERRAIN, FG_DEBUG, " (cont)\n");
 877
 878                     if ( odd ) {
 879                         fragment.add_face(last1, last2, n2);
 880                     } else {
 881                         fragment.add_face(last2, last1, n2);
 882                     }
 883
 884                     if ( shading ) {
 885                         // Shading model is "GL_SMOOTH"
 886                         // MAT3_SCALE_VEC(normal, normals[n2], scale);
 887                     } else {
 888                         // Shading model is "GL_FLAT"
 889                         if ( odd ) {
 890                             calc_normal(nodes[last1], nodes[last2],
 891                                         nodes[n2], approx_normal);
 892                         } else {
 893                             calc_normal(nodes[last2], nodes[last1],
 894                                         nodes[n2], approx_normal);
 895                         }
 896                         // MAT3_SCALE_VEC(normal, approx_normal, scale);
 897                     }
 898                     // xglNormal3dv(normal);
 899
 900                     pp = local_calc_tex_coords(nodes[n2], center);
 901                     // xglTexCoord2f(pp.lon(), pp.lat());
 902                     // xglVertex3dv(nodes[n2].get_n());
 903                     // printf("a normal, texcoord, and vertex (4th)\n");
 904
 905                     odd = !odd;
 906                     last1 = last2;
 907                     last2 = n2;
 908                 }
 909             } else {
 910                 FG_LOG( FG_TERRAIN, FG_WARN, "Unknown token in "
 911                         << path << " = " << token );
 912             }
 913
 914             // eat white space before start of while loop so if we are
 915             // done with useful input it is noticed before hand.
 916 #if defined( MACOS )
 917             in >> ::skipws;
 918 #else
 919             in >> skipws;
 920 #endif
 921         }
 922     }
 923
 924     if ( in_fragment ) {
 925         // close out the previous structure and start the next
 926         // xglEnd();
 927         // xglEndList();
 928         // printf("xglEnd(); xglEndList();\n");
 929
 930         // update fragment
 931         // fragment.display_list = display_list;
 932
 933         // push this fragment onto the tile's object list
 934         t->fragment_list.push_back(fragment);
 935     }
 936
 937 #if 0
 938     // Draw normal vectors (for visually verifying normals)
 939     xglBegin(GL_LINES);
 940     xglColor3f(0.0, 0.0, 0.0);
 941     for ( i = 0; i < t->ncount; i++ ) {
 942         xglVertex3d(nodes[i][0],
 943                     nodes[i][1] ,
 944                     nodes[i][2]);
 945         xglVertex3d(nodes[i][0] + 500*normals[i][0],
 946                     nodes[i][1] + 500*normals[i][1],
 947                     nodes[i][2] + 500*normals[i][2]);
 948     }
 949     xglEnd();
 950 #endif
 951
 952     if ( is_base ) {
 953         t->nodes = nodes;
 954     }
 955
 956     stopwatch.stop();
 957     FG_LOG( FG_TERRAIN, FG_DEBUG,
 958             "Loaded " << path << " in "
 959             << stopwatch.elapsedSeconds() << " seconds" );
 960
 961     // Generate a cloud layer above the tiles
 962     // if ( current_options.get_clouds() ) {
 963     //          fgGenCloudTile(path, t, tile);
 964     // }
 965     return tile;
 966 }
 967
 968