]> git.mxchange.org Git - flightgear.git/blob - src/Main/fg_init.cxx
1b301b8d8d801c688340cabe7ad9273a41e42205
[flightgear.git] / src / Main / fg_init.cxx
1 // fg_init.cxx -- Flight Gear top level initialization routines
2 //
3 // Written by Curtis Olson, started August 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 //
22 // $Id$
23
24
25 #ifdef HAVE_CONFIG_H
26 #  include <config.h>
27 #endif
28
29 // For BC 5.01 this must be included before OpenGL includes.
30 #ifdef SG_MATH_EXCEPTION_CLASH
31 #  include <math.h>
32 #endif
33
34 #ifdef HAVE_WINDOWS_H
35 #  include <windows.h>
36 #endif
37
38 #include <GL/glut.h>
39
40 #include <stdio.h>
41 #include <stdlib.h>
42
43
44 #if defined( unix ) || defined( __CYGWIN__ )
45 #  include <unistd.h>           // for gethostname()
46 #endif
47
48 // work around a stdc++ lib bug in some versions of linux, but doesn't
49 // seem to hurt to have this here for all versions of Linux.
50 #ifdef linux
51 #  define _G_NO_EXTERN_TEMPLATES
52 #endif
53
54 #include <simgear/compiler.h>
55 #include <simgear/misc/exception.hxx>
56
57 #include STL_STRING
58
59 #include <simgear/constants.h>
60 #include <simgear/debug/logstream.hxx>
61 #include <simgear/math/point3d.hxx>
62 #include <simgear/math/polar3d.hxx>
63 #include <simgear/math/sg_geodesy.hxx>
64 #include <simgear/misc/sg_path.hxx>
65 #include <simgear/timing/sg_time.hxx>
66
67 #include <Aircraft/aircraft.hxx>
68 #include <FDM/UIUCModel/uiuc_aircraftdir.h>
69 #include <Airports/runways.hxx>
70 #include <Airports/simple.hxx>
71 #include <Autopilot/auto_gui.hxx>
72 #include <Autopilot/newauto.hxx>
73 #include <Cockpit/cockpit.hxx>
74 #include <Cockpit/radiostack.hxx>
75 #include <Cockpit/panel.hxx>
76 #include <Cockpit/panel_io.hxx>
77 #include <FDM/ADA.hxx>
78 #include <FDM/Balloon.h>
79 #include <FDM/External.hxx>
80 #include <FDM/JSBSim.hxx>
81 #include <FDM/LaRCsim.hxx>
82 #include <FDM/MagicCarpet.hxx>
83 #include <Include/general.hxx>
84 #include <Input/input.hxx>
85 // #include <Joystick/joystick.hxx>
86 #include <Objects/matlib.hxx>
87 #include <Navaids/fixlist.hxx>
88 #include <Navaids/ilslist.hxx>
89 #include <Navaids/mkrbeacons.hxx>
90 #include <Navaids/navlist.hxx>
91 #include <Scenery/scenery.hxx>
92 #include <Scenery/tilemgr.hxx>
93 #include <Time/event.hxx>
94 #include <Time/light.hxx>
95 #include <Time/sunpos.hxx>
96 #include <Time/moonpos.hxx>
97 #include <Time/tmp.hxx>
98
99 #ifndef FG_OLD_WEATHER
100 #  include <WeatherCM/FGLocalWeatherDatabase.h>
101 #else
102 #  include <Weather/weather.hxx>
103 #endif
104
105 #include "fg_init.hxx"
106 #include "fg_io.hxx"
107 #include "fg_commands.hxx"
108 #include "fg_props.hxx"
109 #include "options.hxx"
110 #include "globals.hxx"
111 #include "viewmgr.hxx"
112
113 #if defined(FX) && defined(XMESA)
114 #include <GL/xmesa.h>
115 #endif
116
117 SG_USING_STD(string);
118
119 extern const char *default_root;
120
121
122 // Read in configuration (file and command line) and just set fg_root
123 bool fgInitFGRoot ( int argc, char **argv ) {
124     string root;
125     char* envp;
126
127     // First parse command line options looking for fg-root, this will
128     // override anything specified in a config file
129     root = fgScanForRoot(argc, argv);
130
131 #if defined( unix ) || defined( __CYGWIN__ )
132     // Next check home directory for .fgfsrc.hostname file
133     if ( root == "" ) {
134         envp = ::getenv( "HOME" );
135         if ( envp != NULL ) {
136             SGPath config( envp );
137             config.append( ".fgfsrc" );
138             char name[256];
139             gethostname( name, 256 );
140             config.concat( "." );
141             config.concat( name );
142             root = fgScanForRoot(config.str());
143         }
144     }
145 #endif
146
147     // Next check home directory for .fgfsrc file
148     if ( root == "" ) {
149         envp = ::getenv( "HOME" );
150         if ( envp != NULL ) {
151             SGPath config( envp );
152             config.append( ".fgfsrc" );
153             root = fgScanForRoot(config.str());
154         }
155     }
156     
157     // Next check if fg-root is set as an env variable
158     if ( root == "" ) {
159         envp = ::getenv( "FG_ROOT" );
160         if ( envp != NULL ) {
161             root = envp;
162         }
163     }
164
165     // Otherwise, default to a random compiled-in location if we can't
166     // find fg-root any other way.
167     if ( root == "" ) {
168 #if defined( __CYGWIN__ )
169         root = "/FlightGear";
170 #elif defined( WIN32 )
171         root = "\\FlightGear";
172 #elif defined( macintosh )
173         root = "";
174 #else
175         root = PKGLIBDIR;
176 #endif
177     }
178
179     SG_LOG(SG_INPUT, SG_INFO, "fg_root = " << root );
180     globals->set_fg_root(root);
181
182     return true;
183 }
184
185
186 // Return the current base package version
187 string fgBasePackageVersion() {
188     SGPath base_path( globals->get_fg_root() );
189     base_path.append("version");
190
191     sg_gzifstream in( base_path.str() );
192     if ( !in.is_open() ) {
193         SGPath old_path( globals->get_fg_root() );
194         old_path.append( "Thanks" );
195         sg_gzifstream old( old_path.str() );
196         if ( !old.is_open() ) {
197             return "[none]";
198         } else {
199             return "[old version]";
200         }
201     }
202
203     string version;
204     in >> version;
205
206     return version;
207 }
208
209
210 // Read in configuration (file and command line)
211 bool fgInitConfig ( int argc, char **argv ) {
212
213                                 // First, set some sane default values
214     fgSetDefaults();
215
216     // Read global preferences from $FG_ROOT/preferences.xml
217     SGPath props_path(globals->get_fg_root());
218     props_path.append("preferences.xml");
219     SG_LOG(SG_INPUT, SG_INFO, "Reading global preferences");
220     try {
221       readProperties(props_path.str(), globals->get_props());
222     } catch (const sg_io_exception &e) {
223       string message = "Error reading global preferences: ";
224       message += e.getMessage();
225       message += "\n at ";
226       message += e.getLocation().asString();
227       SG_LOG(SG_INPUT, SG_ALERT, message);
228       exit(2);
229     }
230     SG_LOG(SG_INPUT, SG_INFO, "Finished Reading global preferences");
231
232     // Attempt to locate and parse the various config files in order
233     // from least precidence to greatest precidence
234
235     // Check for $fg_root/system.fgfsrc
236     SGPath config( globals->get_fg_root() );
237     config.append( "system.fgfsrc" );
238     fgParseOptions(config.str());
239
240     char name[256];
241 #if defined( unix ) || defined( __CYGWIN__ )
242     // Check for $fg_root/system.fgfsrc.hostname
243     gethostname( name, 256 );
244     config.concat( "." );
245     config.concat( name );
246     fgParseOptions(config.str());
247 #endif
248
249     // Check for ~/.fgfsrc
250     char* envp = ::getenv( "HOME" );
251     if ( envp != NULL ) {
252         config.set( envp );
253         config.append( ".fgfsrc" );
254         fgParseOptions(config.str());
255     }
256
257 #if defined( unix ) || defined( __CYGWIN__ )
258     // Check for ~/.fgfsrc.hostname
259     gethostname( name, 256 );
260     config.concat( "." );
261     config.concat( name );
262     fgParseOptions(config.str());
263 #endif
264
265     // Parse remaining command line options
266     // These will override anything specified in a config file
267     fgParseOptions(argc, argv);
268
269     return true;
270 }
271
272
273 // find basic airport location info from airport database
274 bool fgFindAirportID( const string& id, FGAirport *a ) {
275     if ( id.length() ) {
276         SGPath path( globals->get_fg_root() );
277         path.append( "Airports" );
278         path.append( "simple.mk4" );
279         FGAirports airports( path.c_str() );
280
281         SG_LOG( SG_GENERAL, SG_INFO, "Searching for airport code = " << id );
282
283         if ( ! airports.search( id, a ) ) {
284             SG_LOG( SG_GENERAL, SG_ALERT,
285                     "Failed to find " << id << " in " << path.str() );
286             return false;
287         }
288     } else {
289         return false;
290     }
291
292     SG_LOG( SG_GENERAL, SG_INFO,
293             "Position for " << id << " is ("
294             << a->longitude << ", "
295             << a->latitude << ")" );
296
297     return true;
298 }
299
300
301 // Set current_options lon/lat given an airport id
302 bool fgSetPosFromAirportID( const string& id ) {
303     FGAirport a;
304     // double lon, lat;
305
306     SG_LOG( SG_GENERAL, SG_INFO,
307             "Attempting to set starting position from airport code " << id );
308
309     if ( fgFindAirportID( id, &a ) ) {
310         fgSetDouble("/position/longitude-deg",  a.longitude );
311         fgSetDouble("/position/latitude-deg",  a.latitude );
312         SG_LOG( SG_GENERAL, SG_INFO,
313                 "Position for " << id << " is ("
314                 << a.longitude << ", "
315                 << a.latitude << ")" );
316
317         return true;
318     } else {
319         return false;
320     }
321
322 }
323
324
325 // Set current_options lon/lat given an airport id and heading (degrees)
326 bool fgSetPosFromAirportIDandHdg( const string& id, double tgt_hdg ) {
327     FGRunway r;
328     FGRunway found_r;
329     double found_dir = 0.0;
330
331     if ( id.length() ) {
332         // set initial position from runway and heading
333
334         SGPath path( globals->get_fg_root() );
335         path.append( "Airports" );
336         path.append( "runways.mk4" );
337         FGRunways runways( path.c_str() );
338
339         SG_LOG( SG_GENERAL, SG_INFO,
340                 "Attempting to set starting position from runway code "
341                 << id << " heading " << tgt_hdg );
342
343         // SGPath inpath( globals->get_fg_root() );
344         // inpath.append( "Airports" );
345         // inpath.append( "apt_simple" );
346         // airports.load( inpath.c_str() );
347
348         // SGPath outpath( globals->get_fg_root() );
349         // outpath.append( "Airports" );
350         // outpath.append( "simple.gdbm" );
351         // airports.dump_gdbm( outpath.c_str() );
352
353         if ( ! runways.search( id, &r ) ) {
354             SG_LOG( SG_GENERAL, SG_ALERT,
355                     "Failed to find " << id << " in database." );
356             return false;
357         }
358
359         double diff;
360         double min_diff = 360.0;
361
362         while ( r.id == id ) {
363             // forward direction
364             diff = tgt_hdg - r.heading;
365             while ( diff < -180.0 ) { diff += 360.0; }
366             while ( diff >  180.0 ) { diff -= 360.0; }
367             diff = fabs(diff);
368             SG_LOG( SG_GENERAL, SG_INFO,
369                     "Runway " << r.rwy_no << " heading = " << r.heading <<
370                     " diff = " << diff );
371             if ( diff < min_diff ) {
372                 min_diff = diff;
373                 found_r = r;
374                 found_dir = 0;
375             }
376
377             // reverse direction
378             diff = tgt_hdg - r.heading - 180.0;
379             while ( diff < -180.0 ) { diff += 360.0; }
380             while ( diff >  180.0 ) { diff -= 360.0; }
381             diff = fabs(diff);
382             SG_LOG( SG_GENERAL, SG_INFO,
383                     "Runway -" << r.rwy_no << " heading = " <<
384                     r.heading + 180.0 <<
385                     " diff = " << diff );
386             if ( diff < min_diff ) {
387                 min_diff = diff;
388                 found_r = r;
389                 found_dir = 180.0;
390             }
391
392             runways.next( &r );
393         }
394
395         SG_LOG( SG_GENERAL, SG_INFO, "closest runway = " << found_r.rwy_no
396                 << " + " << found_dir );
397
398     } else {
399         return false;
400     }
401
402     double heading = found_r.heading + found_dir;
403     while ( heading >= 360.0 ) { heading -= 360.0; }
404
405     double lat2, lon2, az2;
406     double azimuth = found_r.heading + found_dir + 180.0;
407     while ( azimuth >= 360.0 ) { azimuth -= 360.0; }
408
409     SG_LOG( SG_GENERAL, SG_INFO,
410             "runway =  " << found_r.lon << ", " << found_r.lat
411             << " length = " << found_r.length * SG_FEET_TO_METER * 0.5 
412             << " heading = " << azimuth );
413     
414     geo_direct_wgs_84 ( 0, found_r.lat, found_r.lon, 
415                         azimuth, found_r.length * SG_FEET_TO_METER * 0.5 - 5.0,
416                         &lat2, &lon2, &az2 );
417
418     if ( fabs( fgGetDouble("/sim/startup/offset-distance") ) > SG_EPSILON ) {
419         double olat, olon;
420         double odist = fgGetDouble("/sim/startup/offset-distance");
421         odist *= SG_NM_TO_METER;
422         double oaz = azimuth;
423         if ( fabs(fgGetDouble("/sim/startup/offset-azimuth")) > SG_EPSILON ) {
424             oaz = fgGetDouble("/sim/startup/offset-azimuth") + 180;
425         }
426         while ( oaz >= 360.0 ) { oaz -= 360.0; }
427         geo_direct_wgs_84 ( 0, lat2, lon2, oaz, odist, &olat, &olon, &az2 );
428         lat2=olat;
429         lon2=olon;
430     }
431     fgSetDouble("/position/longitude-deg",  lon2 );
432     fgSetDouble("/position/latitude-deg",  lat2 );
433     fgSetDouble("/orientation/heading-deg", heading );
434
435     SG_LOG( SG_GENERAL, SG_INFO,
436             "Position for " << id << " is ("
437             << lon2 << ", "
438             << lat2 << ") new heading is "
439             << heading );
440
441     return true;
442 }
443
444
445 // General house keeping initializations
446 bool fgInitGeneral( void ) {
447     string root;
448
449 #if defined(FX) && defined(XMESA)
450     char *mesa_win_state;
451 #endif
452
453     SG_LOG( SG_GENERAL, SG_INFO, "General Initialization" );
454     SG_LOG( SG_GENERAL, SG_INFO, "======= ==============" );
455
456     root = globals->get_fg_root();
457     if ( ! root.length() ) {
458         // No root path set? Then bail ...
459         SG_LOG( SG_GENERAL, SG_ALERT,
460                 "Cannot continue without environment variable FG_ROOT"
461                 << "being defined." );
462         exit(-1);
463     }
464     SG_LOG( SG_GENERAL, SG_INFO, "FG_ROOT = " << '"' << root << '"' << endl );
465
466 #if defined(FX) && defined(XMESA)
467     // initialize full screen flag
468     global_fullscreen = false;
469     if ( strstr ( general.get_glRenderer(), "Glide" ) ) {
470         // Test for the MESA_GLX_FX env variable
471         if ( (mesa_win_state = getenv( "MESA_GLX_FX" )) != NULL) {
472             // test if we are fullscreen mesa/glide
473             if ( (mesa_win_state[0] == 'f') ||
474                  (mesa_win_state[0] == 'F') ) {
475                 global_fullscreen = true;
476             }
477         }
478     }
479 #endif
480
481     return true;
482 }
483
484
485 // This is the top level init routine which calls all the other
486 // initialization routines.  If you are adding a subsystem to flight
487 // gear, its initialization call should located in this routine.
488 // Returns non-zero if a problem encountered.
489 bool fgInitSubsystems( void ) {
490     fgLIGHT *l = &cur_light_params;
491
492     SG_LOG( SG_GENERAL, SG_INFO, "Initialize Subsystems");
493     SG_LOG( SG_GENERAL, SG_INFO, "========== ==========");
494
495
496     ////////////////////////////////////////////////////////////////////
497     // Initialize the material property subsystem.
498     ////////////////////////////////////////////////////////////////////
499
500     SGPath mpath( globals->get_fg_root() );
501     mpath.append( "materials" );
502     if ( material_lib.load( mpath.str() ) ) {
503     } else {
504         SG_LOG( SG_GENERAL, SG_ALERT, "Error loading material lib!" );
505         exit(-1);
506     }
507
508
509     ////////////////////////////////////////////////////////////////////
510     // Initialize the scenery management subsystem.
511     ////////////////////////////////////////////////////////////////////
512
513     if ( fgSceneryInit() ) {
514         // Material lib initialized ok.
515     } else {
516         SG_LOG( SG_GENERAL, SG_ALERT, "Error in Scenery initialization!" );
517         exit(-1);
518     }
519
520     if ( global_tile_mgr.init() ) {
521         // Load the local scenery data
522         global_tile_mgr.update( fgGetDouble("/position/longitude-deg"),
523                                 fgGetDouble("/position/latitude-deg") );
524     } else {
525         SG_LOG( SG_GENERAL, SG_ALERT, "Error in Tile Manager initialization!" );
526         exit(-1);
527     }
528
529     SG_LOG( SG_GENERAL, SG_DEBUG,
530             "Current terrain elevation after tile mgr init " <<
531             scenery.cur_elev );
532
533
534     ////////////////////////////////////////////////////////////////////
535     // Initialize the flight model subsystem.
536     ////////////////////////////////////////////////////////////////////
537
538     double dt = 1.0 / fgGetInt("/sim/model-hz");
539     // cout << "dt = " << dt << endl;
540
541     aircraft_dir = fgGetString("/sim/aircraft-dir");
542     const string &model = fgGetString("/sim/flight-model");
543     try {
544         if (model == "larcsim") {
545             cur_fdm_state = new FGLaRCsim( dt );
546         } else if (model == "jsb") {
547             cur_fdm_state = new FGJSBsim( dt );
548         } else if (model == "ada") {
549             cur_fdm_state = new FGADA( dt );
550         } else if (model == "balloon") {
551             cur_fdm_state = new FGBalloonSim( dt );
552         } else if (model == "magic") {
553             cur_fdm_state = new FGMagicCarpet( dt );
554         } else if (model == "external") {
555             cur_fdm_state = new FGExternal( dt );
556         } else {
557             SG_LOG(SG_GENERAL, SG_ALERT,
558                    "Unrecognized flight model '" << model
559                    << ", can't init aircraft");
560             exit(-1);
561         }
562     } catch ( ... ) {
563         SG_LOG(SG_GENERAL, SG_ALERT, "FlightGear aborting\n\n");
564         exit(-1);
565     }
566
567     cur_fdm_state->init();
568     cur_fdm_state->bind();
569     
570     // allocates structures so must happen before any of the flight
571     // model or control parameters are set
572     fgAircraftInit();   // In the future this might not be the case.
573
574
575     ////////////////////////////////////////////////////////////////////
576     // Initialize the event manager subsystem.
577     ////////////////////////////////////////////////////////////////////
578
579     global_events.Init();
580
581     // Output event stats every 60 seconds
582     global_events.Register( "fgEVENT_MGR::PrintStats()",
583                             fgMethodCallback<fgEVENT_MGR>( &global_events,
584                                                    &fgEVENT_MGR::PrintStats),
585                             fgEVENT::FG_EVENT_READY, 60000 );
586
587
588     ////////////////////////////////////////////////////////////////////
589     // Initialize the view manager subsystem.
590     ////////////////////////////////////////////////////////////////////
591
592     // Initialize win_ratio parameters
593     for ( int i = 0; i < globals->get_viewmgr()->size(); ++i ) {
594         globals->get_viewmgr()->get_view(i)->
595             set_win_ratio( fgGetInt("/sim/startup/xsize") /
596                            fgGetInt("/sim/startup/ysize") );
597     }
598
599     // Initialize pilot view
600     FGViewerRPH *pilot_view =
601         (FGViewerRPH *)globals->get_viewmgr()->get_view( 0 );
602
603     pilot_view->set_geod_view_pos( cur_fdm_state->get_Longitude(), 
604                                    cur_fdm_state->get_Lat_geocentric(), 
605                                    cur_fdm_state->get_Altitude() *
606                                    SG_FEET_TO_METER );
607     pilot_view->set_sea_level_radius( cur_fdm_state->get_Sea_level_radius() *
608                                       SG_FEET_TO_METER ); 
609     pilot_view->set_rph( cur_fdm_state->get_Phi(),
610                          cur_fdm_state->get_Theta(),
611                          cur_fdm_state->get_Psi() );
612
613     // set current view to 0 (first) which is our main pilot view
614     globals->set_current_view( pilot_view );
615
616     SG_LOG( SG_GENERAL, SG_DEBUG, "  abs_view_pos = "
617             << globals->get_current_view()->get_abs_view_pos());
618
619
620     ////////////////////////////////////////////////////////////////////
621     // Initialize the lighting subsystem.
622     ////////////////////////////////////////////////////////////////////
623
624     // fgUpdateSunPos() needs a few position and view parameters set
625     // so it can calculate local relative sun angle and a few other
626     // things for correctly orienting the sky.
627     fgUpdateSunPos();
628     fgUpdateMoonPos();
629     global_events.Register( "fgUpdateSunPos()", fgUpdateSunPos,
630                             fgEVENT::FG_EVENT_READY, 60000);
631     global_events.Register( "fgUpdateMoonPos()", fgUpdateMoonPos,
632                             fgEVENT::FG_EVENT_READY, 60000);
633
634     // Initialize Lighting interpolation tables
635     l->Init();
636
637     // update the lighting parameters (based on sun angle)
638     global_events.Register( "fgLight::Update()",
639                             fgMethodCallback<fgLIGHT>( &cur_light_params,
640                                                        &fgLIGHT::Update),
641                             fgEVENT::FG_EVENT_READY, 30000 );
642
643
644     ////////////////////////////////////////////////////////////////////
645     // Initialize the local time subsystem.
646     ////////////////////////////////////////////////////////////////////
647
648     // update the current timezone each 30 minutes
649     global_events.Register( "fgUpdateLocalTime()", fgUpdateLocalTime,
650                             fgEVENT::FG_EVENT_READY, 1800000);
651
652
653     ////////////////////////////////////////////////////////////////////
654     // Initialize the weather subsystem.
655     ////////////////////////////////////////////////////////////////////
656
657     // Initialize the weather modeling subsystem
658 #ifndef FG_OLD_WEATHER
659     // Initialize the WeatherDatabase
660     SG_LOG(SG_GENERAL, SG_INFO, "Creating LocalWeatherDatabase");
661     sgVec3 position;
662     sgSetVec3( position, current_aircraft.fdm_state->get_Latitude(),
663                current_aircraft.fdm_state->get_Longitude(),
664                current_aircraft.fdm_state->get_Altitude() * SG_FEET_TO_METER );
665     double init_vis = fgGetDouble("/environment/visibility-m");
666
667     FGLocalWeatherDatabase::DatabaseWorkingType working_type;
668
669     if (fgGetString("/environment/weather/working-type") == "internet")
670     {
671       working_type = FGLocalWeatherDatabase::use_internet;
672     } else {
673       working_type = FGLocalWeatherDatabase::default_mode;
674     }
675     
676     if ( init_vis > 0 ) {
677       FGLocalWeatherDatabase::theFGLocalWeatherDatabase = 
678         new FGLocalWeatherDatabase( position,
679                                     globals->get_fg_root(),
680                                     working_type,
681                                     init_vis );
682     } else {
683       FGLocalWeatherDatabase::theFGLocalWeatherDatabase = 
684         new FGLocalWeatherDatabase( position,
685                                     globals->get_fg_root(),
686                                     working_type );
687     }
688
689     // cout << theFGLocalWeatherDatabase << endl;
690     // cout << "visibility = " 
691     //      << theFGLocalWeatherDatabase->getWeatherVisibility() << endl;
692
693     WeatherDatabase = FGLocalWeatherDatabase::theFGLocalWeatherDatabase;
694
695     // register the periodic update of the weather
696     global_events.Register( "weather update", fgUpdateWeatherDatabase,
697                             fgEVENT::FG_EVENT_READY, 30000);
698 #else
699     current_weather.Init();
700 #endif
701
702     ////////////////////////////////////////////////////////////////////
703     // Initialize vor/ndb/ils/fix list management and query systems
704     ////////////////////////////////////////////////////////////////////
705
706     SG_LOG(SG_GENERAL, SG_INFO, "Loading Navaids");
707
708     SG_LOG(SG_GENERAL, SG_INFO, "  VOR/NDB");
709     current_navlist = new FGNavList;
710     SGPath p_nav( globals->get_fg_root() );
711     p_nav.append( "Navaids/default.nav" );
712     current_navlist->init( p_nav );
713
714     SG_LOG(SG_GENERAL, SG_INFO, "  ILS and Marker Beacons");
715     current_beacons = new FGMarkerBeacons;
716     current_beacons->init();
717     current_ilslist = new FGILSList;
718     SGPath p_ils( globals->get_fg_root() );
719     p_ils.append( "Navaids/default.ils" );
720     current_ilslist->init( p_ils );
721
722     SG_LOG(SG_GENERAL, SG_INFO, "  Fixes");
723     current_fixlist = new FGFixList;
724     SGPath p_fix( globals->get_fg_root() );
725     p_fix.append( "Navaids/default.fix" );
726     current_fixlist->init( p_fix );
727
728
729     ////////////////////////////////////////////////////////////////////
730     // Initialize the built-in commands.
731     ////////////////////////////////////////////////////////////////////
732     fgInitCommands();
733
734
735     ////////////////////////////////////////////////////////////////////
736     // Initialize the radio stack subsystem.
737     ////////////////////////////////////////////////////////////////////
738
739                                 // A textbook example of how FGSubsystem
740                                 // should work...
741     current_radiostack = new FGRadioStack;
742     current_radiostack->init();
743     current_radiostack->bind();
744
745
746     ////////////////////////////////////////////////////////////////////
747     // Initialize the cockpit subsystem
748     ////////////////////////////////////////////////////////////////////
749
750     if( fgCockpitInit( &current_aircraft )) {
751         // Cockpit initialized ok.
752     } else {
753         SG_LOG( SG_GENERAL, SG_ALERT, "Error in Cockpit initialization!" );
754         exit(-1);
755     }
756
757
758     ////////////////////////////////////////////////////////////////////
759     // Initialize the joystick subsystem.
760     ////////////////////////////////////////////////////////////////////
761
762     // if ( ! fgJoystickInit() ) {
763     //   SG_LOG( SG_GENERAL, SG_ALERT, "Error in Joystick initialization!" );
764     // }
765
766
767     ////////////////////////////////////////////////////////////////////
768     // Initialize the autopilot subsystem.
769     ////////////////////////////////////////////////////////////////////
770
771     current_autopilot = new FGAutopilot;
772     current_autopilot->init();
773
774     // initialize the gui parts of the autopilot
775     NewTgtAirportInit();
776     fgAPAdjustInit() ;
777     NewHeadingInit();
778     NewAltitudeInit();
779
780     
781     ////////////////////////////////////////////////////////////////////
782     // Initialize I/O subsystem.
783     ////////////////////////////////////////////////////////////////////
784
785 #if ! defined( macintosh )
786     fgIOInit();
787 #endif
788
789     // Initialize the 2D panel.
790     string panel_path = fgGetString("/sim/panel/path",
791                                     "Panels/Default/default.xml");
792     current_panel = fgReadPanel(panel_path);
793     if (current_panel == 0) {
794         SG_LOG( SG_INPUT, SG_ALERT, 
795                 "Error reading new panel from " << panel_path );
796     } else {
797         SG_LOG( SG_INPUT, SG_INFO, "Loaded new panel from " << panel_path );
798         current_panel->init();
799         current_panel->bind();
800     }
801
802     
803     ////////////////////////////////////////////////////////////////////
804     // Initialize the default (kludged) properties.
805     ////////////////////////////////////////////////////////////////////
806
807     fgInitProps();
808
809
810     ////////////////////////////////////////////////////////////////////
811     // Initialize the controls subsystem.
812     ////////////////////////////////////////////////////////////////////
813
814     globals->get_controls()->init();
815     globals->get_controls()->bind();
816
817
818     ////////////////////////////////////////////////////////////////////
819     // Initialize the input subsystem.
820     ////////////////////////////////////////////////////////////////////
821
822     current_input.init();
823     current_input.bind();
824
825
826     ////////////////////////////////////////////////////////////////////////
827     // End of subsystem initialization.
828     ////////////////////////////////////////////////////////////////////
829
830     SG_LOG( SG_GENERAL, SG_INFO, endl);
831
832                                 // Save the initial state for future
833                                 // reference.
834     globals->saveInitialState();
835
836     return true;
837 }
838
839
840 void fgReInitSubsystems( void )
841 {
842     SG_LOG( SG_GENERAL, SG_INFO,
843             "/position/altitude = " << fgGetDouble("/position/altitude-ft") );
844
845     bool freeze = globals->get_freeze();
846     if( !freeze )
847         globals->set_freeze( true );
848     
849     // Initialize the Scenery Management subsystem
850     if ( ! fgSceneryInit() ) {
851         SG_LOG( SG_GENERAL, SG_ALERT, "Error in Scenery initialization!" );
852         exit(-1);
853     }
854
855     if( global_tile_mgr.init() ) {
856         // Load the local scenery data
857         global_tile_mgr.update( fgGetDouble("/position/longitude-deg"),
858                                 fgGetDouble("/position/latitude-deg") );
859     } else {
860         SG_LOG( SG_GENERAL, SG_ALERT, "Error in Tile Manager initialization!" );
861                 exit(-1);
862     }
863
864     // Initialize view parameters
865     FGViewerRPH *pilot_view =
866         (FGViewerRPH *)globals->get_viewmgr()->get_view( 0 );
867
868     pilot_view->set_view_offset( 0.0 );
869     pilot_view->set_goal_view_offset( 0.0 );
870
871     pilot_view->set_geod_view_pos( cur_fdm_state->get_Longitude(), 
872                                    cur_fdm_state->get_Lat_geocentric(), 
873                                    cur_fdm_state->get_Altitude() *
874                                    SG_FEET_TO_METER );
875     pilot_view->set_sea_level_radius( cur_fdm_state->get_Sea_level_radius() *
876                                       SG_FEET_TO_METER ); 
877     pilot_view->set_rph( cur_fdm_state->get_Phi(),
878                          cur_fdm_state->get_Theta(),
879                          cur_fdm_state->get_Psi() );
880
881     // set current view to 0 (first) which is our main pilot view
882     globals->set_current_view( pilot_view );
883
884     SG_LOG( SG_GENERAL, SG_DEBUG, "  abs_view_pos = "
885             << globals->get_current_view()->get_abs_view_pos());
886
887     cur_fdm_state->init();
888
889     globals->get_controls()->reset_all();
890     current_autopilot->reset();
891
892     fgUpdateSunPos();
893     fgUpdateMoonPos();
894     cur_light_params.Update();
895     fgUpdateLocalTime();
896
897     if( !freeze )
898         globals->set_freeze( false );
899 }