]> git.mxchange.org Git - flightgear.git/blob - src/Main/fg_init.cxx
6edb7a66dc5f8fa65a17dfa6b44711bcf1e6273a
[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  - http://www.flightgear.org/~curt
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., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
20 //
21 // $Id$
22
23
24 #ifdef HAVE_CONFIG_H
25 #  include <config.h>
26 #endif
27
28 #include <stdio.h>
29 #include <stdlib.h>
30 #include <string.h>             // strcmp()
31
32 #if defined( unix ) || defined( __CYGWIN__ )
33 #  include <unistd.h>           // for gethostname()
34 #endif
35 #ifdef _WIN32
36 #  include <direct.h>           // for getcwd()
37 #  define getcwd _getcwd
38 #  include <io.h>               // isatty()
39 #  define isatty _isatty
40 #  include "winsock2.h"         // for gethostname()
41 #endif
42
43 // work around a stdc++ lib bug in some versions of linux, but doesn't
44 // seem to hurt to have this here for all versions of Linux.
45 #ifdef linux
46 #  define _G_NO_EXTERN_TEMPLATES
47 #endif
48
49 #include <simgear/compiler.h>
50
51 #include <string>
52 #include <boost/algorithm/string/compare.hpp>
53 #include <boost/algorithm/string/predicate.hpp>
54
55 #include <simgear/constants.h>
56 #include <simgear/debug/logstream.hxx>
57 #include <simgear/structure/exception.hxx>
58 #include <simgear/structure/event_mgr.hxx>
59 #include <simgear/misc/sg_path.hxx>
60 #include <simgear/misc/sg_dir.hxx>
61 #include <simgear/misc/sgstream.hxx>
62 #include <simgear/misc/strutils.hxx>
63 #include <simgear/props/props_io.hxx>
64
65 #include <simgear/misc/interpolator.hxx>
66 #include <simgear/scene/material/matlib.hxx>
67 #include <simgear/scene/model/particles.hxx>
68 #include <simgear/sound/soundmgr_openal.hxx>
69
70 #include <Aircraft/controls.hxx>
71 #include <Aircraft/replay.hxx>
72 #include <Airports/apt_loader.hxx>
73 #include <Airports/runways.hxx>
74 #include <Airports/simple.hxx>
75 #include <Airports/dynamics.hxx>
76
77 #include <AIModel/AIManager.hxx>
78
79 #include <ATCDCL/ATCmgr.hxx>
80 #include <ATC/atc_mgr.hxx>
81
82 #include <Autopilot/route_mgr.hxx>
83 #include <Autopilot/autopilotgroup.hxx>
84
85 #include <Cockpit/panel.hxx>
86 #include <Cockpit/panel_io.hxx>
87
88 #include <GUI/new_gui.hxx>
89 #include <Input/input.hxx>
90 #include <Instrumentation/instrument_mgr.hxx>
91 #include <Model/acmodel.hxx>
92 #include <Model/modelmgr.hxx>
93 #include <AIModel/submodel.hxx>
94 #include <AIModel/AIManager.hxx>
95 #include <Navaids/navdb.hxx>
96 #include <Navaids/navlist.hxx>
97 #include <Navaids/fix.hxx>
98 #include <Navaids/fixlist.hxx>
99 #include <Navaids/airways.hxx>
100 #include <Scenery/scenery.hxx>
101 #include <Scenery/tilemgr.hxx>
102 #include <Scripting/NasalSys.hxx>
103 #include <Sound/voice.hxx>
104 #include <Systems/system_mgr.hxx>
105 #include <Time/light.hxx>
106 #include <Traffic/TrafficMgr.hxx>
107 #include <MultiPlayer/multiplaymgr.hxx>
108 #include <FDM/fdm_shell.hxx>
109
110 #include <Environment/environment_mgr.hxx>
111
112 #include "fg_init.hxx"
113 #include "fg_io.hxx"
114 #include "fg_commands.hxx"
115 #include "fg_props.hxx"
116 #include "options.hxx"
117 #include "globals.hxx"
118 #include "logger.hxx"
119 #include "renderer.hxx"
120 #include "viewmgr.hxx"
121 #include "main.hxx"
122
123
124 using std::string;
125 using namespace boost::algorithm;
126
127
128 // Return the current base package version
129 string fgBasePackageVersion() {
130     SGPath base_path( globals->get_fg_root() );
131     base_path.append("version");
132
133     sg_gzifstream in( base_path.str() );
134     if ( !in.is_open() ) {
135         SGPath old_path( globals->get_fg_root() );
136         old_path.append( "Thanks" );
137         sg_gzifstream old( old_path.str() );
138         if ( !old.is_open() ) {
139             return "[none]";
140         } else {
141             return "[old version]";
142         }
143     }
144
145     string version;
146     in >> version;
147
148     return version;
149 }
150
151
152 // Initialize the localization
153 SGPropertyNode *fgInitLocale(const char *language) {
154    SGPropertyNode *c_node = NULL, *d_node = NULL;
155    SGPropertyNode *intl = fgGetNode("/sim/intl");
156
157    SG_LOG(SG_GENERAL, SG_INFO, "Selecting language: " << language );
158
159    // localization not defined
160    if (!intl)
161       return NULL;
162
163    //
164    // Select the proper language from the list
165    //
166    vector<SGPropertyNode_ptr> locale = intl->getChildren("locale");
167    for (unsigned int i = 0; i < locale.size(); i++) {
168
169       vector<SGPropertyNode_ptr> lang = locale[i]->getChildren("lang");
170       for (unsigned int j = 0; j < lang.size(); j++) {
171
172          if (!strcmp(lang[j]->getStringValue(), language)) {
173             c_node = locale[i];
174             break;
175          }
176       }
177    }
178
179
180    // Get the defaults
181    d_node = intl->getChild("locale");
182    if (!c_node)
183       c_node = d_node;
184
185    // Check for localized font
186    SGPropertyNode *font_n = c_node->getNode("font", true);
187    if ( !strcmp(font_n->getStringValue(), "") )
188       font_n->setStringValue(d_node->getStringValue("font", "typewriter.txf"));
189
190
191    //
192    // Load the default strings
193    //
194    SGPath d_path( globals->get_fg_root() );
195
196    const char *d_path_str = d_node->getStringValue("strings");
197    if (!d_path_str) {
198       SG_LOG(SG_GENERAL, SG_ALERT, "No path in " << d_node->getPath() << "/strings.");
199       return NULL;
200    }
201
202    d_path.append(d_path_str);
203    SG_LOG(SG_GENERAL, SG_INFO, "Reading localized strings from " << d_path.str());
204
205    SGPropertyNode *strings = c_node->getNode("strings");
206    try {
207       readProperties(d_path.str(), strings);
208    } catch (const sg_exception &) {
209       SG_LOG(SG_GENERAL, SG_ALERT, "Unable to read the localized strings");
210       return NULL;
211    }
212
213    //
214    // Load the language specific strings
215    //
216    if (c_node != d_node) {
217       SGPath c_path( globals->get_fg_root() );
218
219       const char *c_path_str = c_node->getStringValue("strings");
220       if (!c_path_str) {
221          SG_LOG(SG_GENERAL, SG_ALERT, "No path in " << c_node->getPath() << "/strings");
222          return NULL;
223       }
224
225       c_path.append(c_path_str);
226       SG_LOG(SG_GENERAL, SG_INFO, "Reading localized strings from " << c_path.str());
227
228       try {
229          readProperties(c_path.str(), strings);
230       } catch (const sg_exception &) {
231          SG_LOG(SG_GENERAL, SG_ALERT,
232                  "Unable to read the localized strings from " << c_path.str());
233          return NULL;
234       }
235    }
236
237    return c_node;
238 }
239
240
241
242 // Initialize the localization routines
243 bool fgDetectLanguage() {
244     const char *language = ::getenv("LANG");
245
246     if (language == NULL) {
247         SG_LOG(SG_GENERAL, SG_INFO, "Unable to detect the language" );
248         language = "C";
249     }
250
251     SGPropertyNode *locale = fgInitLocale(language);
252     if (!locale) {
253        SG_LOG(SG_GENERAL, SG_ALERT,
254               "No internationalization settings specified in preferences.xml" );
255
256        return false;
257     }
258
259     globals->set_locale( locale );
260
261     return true;
262 }
263
264 template <class T>
265 bool fgFindAircraftInDir(const SGPath& dirPath, T* obj, bool (T::*pred)(const SGPath& p))
266 {
267   if (!dirPath.exists()) {
268     SG_LOG(SG_GENERAL, SG_WARN, "fgFindAircraftInDir: no such path:" << dirPath.str());
269     return false;
270   }
271     
272   bool recurse = true;
273   simgear::Dir dir(dirPath);
274   simgear::PathList setFiles(dir.children(simgear::Dir::TYPE_FILE, "-set.xml"));
275   simgear::PathList::iterator p;
276   for (p = setFiles.begin(); p != setFiles.end(); ++p) {
277     // check file name ends with -set.xml
278     
279     // if we found a -set.xml at this level, don't recurse any deeper
280     recurse = false;
281     
282     bool done = (obj->*pred)(*p);
283     if (done) {
284       return true;
285     }
286   } // of -set.xml iteration
287   
288   if (!recurse) {
289     return false;
290   }
291   
292   simgear::PathList subdirs(dir.children(simgear::Dir::TYPE_DIR | simgear::Dir::NO_DOT_OR_DOTDOT));
293   for (p = subdirs.begin(); p != subdirs.end(); ++p) {
294     if (p->file() == "CVS") {
295       continue;
296     }
297     
298     if (fgFindAircraftInDir(*p, obj, pred)) {
299       return true;
300     }
301   } // of subdirs iteration
302   
303   return false;
304 }
305
306 template <class T>
307 void fgFindAircraft(T* obj, bool (T::*pred)(const SGPath& p))
308 {
309   const string_list& paths(globals->get_aircraft_paths());
310   string_list::const_iterator it = paths.begin();
311   for (; it != paths.end(); ++it) {
312     bool done = fgFindAircraftInDir(SGPath(*it), obj, pred);
313     if (done) {
314       return;
315     }
316   } // of aircraft paths iteration
317   
318   // if we reach this point, search the default location (always last)
319   SGPath rootAircraft(globals->get_fg_root());
320   rootAircraft.append("Aircraft");
321   fgFindAircraftInDir(rootAircraft, obj, pred);
322 }
323
324 class FindAndCacheAircraft
325 {
326 public:
327   FindAndCacheAircraft(SGPropertyNode* autoSave)
328   {
329     _cache = autoSave->getNode("sim/startup/path-cache", true);
330   }
331   
332   bool loadAircraft()
333   {
334     std::string aircraft = fgGetString( "/sim/aircraft", "");
335     if (aircraft.empty()) {
336       SG_LOG(SG_GENERAL, SG_ALERT, "no aircraft specified");
337       return false;
338     }
339     
340     _searchAircraft = aircraft + "-set.xml";
341     std::string aircraftDir = fgGetString("/sim/aircraft-dir", "");
342     if (!aircraftDir.empty()) {
343       // aircraft-dir was set, skip any searching at all, if it's valid
344       simgear::Dir acPath(aircraftDir);
345       SGPath setFile = acPath.file(_searchAircraft);
346       if (setFile.exists()) {
347         SG_LOG(SG_GENERAL, SG_INFO, "found aircraft in dir: " << aircraftDir );
348         
349         try {
350           readProperties(setFile.str(), globals->get_props());
351         } catch ( const sg_exception &e ) {
352           SG_LOG(SG_INPUT, SG_ALERT, "Error reading aircraft: " << e.getFormattedMessage());
353           return false;
354         }
355         
356         return true;
357       } else {
358         SG_LOG(SG_GENERAL, SG_ALERT, "aircraft '" << _searchAircraft << 
359                "' not found in specified dir:" << aircraftDir);
360         return false;
361       }
362     }
363     
364     if (!checkCache()) {
365       // prepare cache for re-scan
366       SGPropertyNode *n = _cache->getNode("fg-root", true);
367       n->setStringValue(globals->get_fg_root().c_str());
368       n->setAttribute(SGPropertyNode::USERARCHIVE, true);
369       n = _cache->getNode("fg-aircraft", true);
370       n->setStringValue(getAircraftPaths().c_str());
371       n->setAttribute(SGPropertyNode::USERARCHIVE, true);
372       _cache->removeChildren("aircraft");
373   
374       fgFindAircraft(this, &FindAndCacheAircraft::checkAircraft);
375     }
376     
377     if (_foundPath.str().empty()) {
378       SG_LOG(SG_GENERAL, SG_ALERT, "Cannot find specified aircraft: " << aircraft );
379       return false;
380     }
381     
382     SG_LOG(SG_GENERAL, SG_INFO, "Loading aircraft -set file from:" << _foundPath.str());
383     fgSetString( "/sim/aircraft-dir", _foundPath.dir().c_str());
384     if (!_foundPath.exists()) {
385       SG_LOG(SG_GENERAL, SG_ALERT, "Unable to find -set file:" << _foundPath.str());
386       return false;
387     }
388     
389     try {
390       readProperties(_foundPath.str(), globals->get_props());
391     } catch ( const sg_exception &e ) {
392       SG_LOG(SG_INPUT, SG_ALERT, "Error reading aircraft: " << e.getFormattedMessage());
393       return false;
394     }
395     
396     return true;
397   }
398   
399 private:
400   SGPath getAircraftPaths() {
401     string_list pathList = globals->get_aircraft_paths();
402     SGPath aircraftPaths;
403     string_list::const_iterator it = pathList.begin();
404     if (it != pathList.end()) {
405         aircraftPaths.set(*it);
406         it++;
407     }
408     for (; it != pathList.end(); ++it) {
409         aircraftPaths.add(*it);
410     }
411     return aircraftPaths;
412   }
413   
414   bool checkCache()
415   {
416     if (globals->get_fg_root() != _cache->getStringValue("fg-root", "")) {
417       return false; // cache mismatch
418     }
419
420     if (getAircraftPaths().str() != _cache->getStringValue("fg-aircraft", "")) {
421       return false; // cache mismatch
422     }
423     
424     vector<SGPropertyNode_ptr> cache = _cache->getChildren("aircraft");
425     for (unsigned int i = 0; i < cache.size(); i++) {
426       const char *name = cache[i]->getStringValue("file", "");
427       if (!boost::equals(_searchAircraft, name, is_iequal())) {
428         continue;
429       }
430       
431       SGPath xml(cache[i]->getStringValue("path", ""));
432       xml.append(name);
433       if (xml.exists()) {
434         _foundPath = xml;
435         return true;
436       } 
437       
438       return false;
439     } // of aircraft in cache iteration
440     
441     return false;
442   }
443   
444   bool checkAircraft(const SGPath& p)
445   {
446     // create cache node
447     int i = 0;
448     while (1) {
449         if (!_cache->getChild("aircraft", i++, false))
450             break;
451     }
452     
453     SGPropertyNode *n, *entry = _cache->getChild("aircraft", --i, true);
454
455     std::string fileName(p.file());
456     n = entry->getNode("file", true);
457     n->setStringValue(fileName);
458     n->setAttribute(SGPropertyNode::USERARCHIVE, true);
459
460     n = entry->getNode("path", true);
461     n->setStringValue(p.dir());
462     n->setAttribute(SGPropertyNode::USERARCHIVE, true);
463
464     if ( boost::equals(fileName, _searchAircraft.c_str(), is_iequal()) ) {
465         _foundPath = p;
466         return true;
467     }
468
469     return false;
470   }
471   
472   std::string _searchAircraft;
473   SGPath _foundPath;
474   SGPropertyNode* _cache;
475 };
476
477 #ifdef _WIN32
478 static SGPath platformDefaultDataPath()
479 {
480   char *envp = ::getenv( "APPDATA" );
481   SGPath config( envp );
482   config.append( "flightgear.org" );
483   return config;
484 }
485 #elif __APPLE__
486
487 #include <CoreServices/CoreServices.h>
488
489 static SGPath platformDefaultDataPath()
490 {
491   FSRef ref;
492   OSErr err = FSFindFolder(kUserDomain, kApplicationSupportFolderType, false, &ref);
493   if (err) {
494     return SGPath();
495   }
496   
497   unsigned char path[1024];
498   if (FSRefMakePath(&ref, path, 1024) != noErr) {
499     return SGPath();
500   }
501   
502   SGPath appData;
503   appData.set((const char*) path);
504   appData.append("flightgear.org");
505   return appData;
506 }
507 #else
508 static SGPath platformDefaultDataPath()
509 {
510   SGPath config( homedir );
511   config.append( ".fgfs" );
512   return config;
513 }
514 #endif
515
516 // Read in configuration (file and command line)
517 bool fgInitConfig ( int argc, char **argv ) {
518
519     flightgear::Options::sharedInstance()->init(argc, argv);
520   
521     // Read global preferences from $FG_ROOT/preferences.xml
522     SG_LOG(SG_INPUT, SG_INFO, "Reading global preferences");
523     fgLoadProps("preferences.xml", globals->get_props());
524     SG_LOG(SG_INPUT, SG_INFO, "Finished Reading global preferences");
525
526     // Detect the required language as early as possible
527     if ( !fgDetectLanguage() ) {
528         return false;
529     }
530
531     SGPropertyNode autosave;
532     SGPath dataPath = platformDefaultDataPath();
533   
534     const char *fg_home = getenv("FG_HOME");
535     if (fg_home)
536         dataPath = fg_home;
537   
538     simgear::Dir exportDir(simgear::Dir(dataPath).file("Export"));
539     if (!exportDir.exists()) {
540       exportDir.create(0777);
541     }
542
543     // Set /sim/fg-home and don't allow malign code to override it until
544     // Nasal security is set up.  Use FG_HOME if necessary.
545     SGPropertyNode *home = fgGetNode("/sim", true);
546     home->removeChild("fg-home", 0, false);
547     home = home->getChild("fg-home", 0, true);
548     home->setStringValue(dataPath.c_str());
549     home->setAttribute(SGPropertyNode::WRITE, false);
550
551     SGPath autosaveFile = simgear::Dir(dataPath).file("autosave.xml");
552     if (autosaveFile.exists()) {
553       SG_LOG(SG_INPUT, SG_INFO, "Reading user settings from " << autosaveFile.str());
554       try {
555           readProperties(autosaveFile.str(), &autosave, SGPropertyNode::USERARCHIVE);
556       } catch (sg_exception& e) {
557           SG_LOG(SG_INPUT, SG_WARN, "failed to read user settings:" << e.getMessage()
558             << "(from " << e.getOrigin() << ")");
559       }
560     }
561     
562   // check for a config file in app data
563     SGPath appDataConfig(dataPath);
564     appDataConfig.append("fgfsrc");
565     if (appDataConfig.exists()) {
566       flightgear::Options::sharedInstance()->readConfig(appDataConfig);
567     }
568   
569   // Scan user config files and command line for a specified aircraft.
570     flightgear::Options::sharedInstance()->initAircraft();
571       
572     FindAndCacheAircraft f(&autosave);
573     if (!f.loadAircraft()) {
574       return false;
575     }
576
577     copyProperties(&autosave, globals->get_props());
578
579     // parse options after loading aircraft to ensure any user
580     // overrides of defaults are honored.
581     flightgear::Options::sharedInstance()->processOptions();
582       
583     return true;
584 }
585
586 // Set current tower position lon/lat given an airport id
587 static bool fgSetTowerPosFromAirportID( const string& id) {
588     const FGAirport *a = fgFindAirportID( id);
589     if (a) {
590         SGGeod tower = a->getTowerLocation();
591         fgSetDouble("/sim/tower/longitude-deg",  tower.getLongitudeDeg());
592         fgSetDouble("/sim/tower/latitude-deg",  tower.getLatitudeDeg());
593         fgSetDouble("/sim/tower/altitude-ft", tower.getElevationFt());
594         return true;
595     } else {
596         return false;
597     }
598
599 }
600
601 struct FGTowerLocationListener : SGPropertyChangeListener {
602     void valueChanged(SGPropertyNode* node) {
603         string id(node->getStringValue());
604         if (fgGetBool("/sim/tower/auto-position",true))
605         {
606             // enforce using closest airport when auto-positioning is enabled 
607             const char* closest_airport = fgGetString("/sim/airport/closest-airport-id", "");
608             if (closest_airport && (id != closest_airport))
609             {
610                 id = closest_airport;
611                 node->setStringValue(id);
612             }
613         }
614         fgSetTowerPosFromAirportID(id);
615     }
616 };
617
618 struct FGClosestTowerLocationListener : SGPropertyChangeListener
619 {
620     void valueChanged(SGPropertyNode* )
621     {
622         // closest airport has changed
623         if (fgGetBool("/sim/tower/auto-position",true))
624         {
625             // update tower position
626             const char* id = fgGetString("/sim/airport/closest-airport-id", "");
627             if (id && *id!=0)
628                 fgSetString("/sim/tower/airport-id", id);
629         }
630     }
631 };
632
633 void fgInitTowerLocationListener() {
634     fgGetNode("/sim/tower/airport-id",  true)
635         ->addChangeListener( new FGTowerLocationListener(), true );
636     FGClosestTowerLocationListener* ntcl = new FGClosestTowerLocationListener();
637     fgGetNode("/sim/airport/closest-airport-id", true)
638         ->addChangeListener(ntcl , true );
639     fgGetNode("/sim/tower/auto-position", true)
640            ->addChangeListener(ntcl, true );
641 }
642
643 static void fgApplyStartOffset(const SGGeod& aStartPos, double aHeading, double aTargetHeading = HUGE_VAL)
644 {
645   SGGeod startPos(aStartPos);
646   if (aTargetHeading == HUGE_VAL) {
647     aTargetHeading = aHeading;
648   }
649   
650   if ( fabs( fgGetDouble("/sim/presets/offset-distance-nm") ) > SG_EPSILON ) {
651     double offsetDistance = fgGetDouble("/sim/presets/offset-distance-nm");
652     offsetDistance *= SG_NM_TO_METER;
653     double offsetAzimuth = aHeading;
654     if ( fabs(fgGetDouble("/sim/presets/offset-azimuth-deg")) > SG_EPSILON ) {
655       offsetAzimuth = fgGetDouble("/sim/presets/offset-azimuth-deg");
656       aHeading = aTargetHeading;
657     }
658
659     SGGeod offset;
660     double az2; // dummy
661     SGGeodesy::direct(startPos, offsetAzimuth + 180, offsetDistance, offset, az2);
662     startPos = offset;
663   }
664
665   // presets
666   fgSetDouble("/sim/presets/longitude-deg", startPos.getLongitudeDeg() );
667   fgSetDouble("/sim/presets/latitude-deg", startPos.getLatitudeDeg() );
668   fgSetDouble("/sim/presets/heading-deg", aHeading );
669
670   // other code depends on the actual values being set ...
671   fgSetDouble("/position/longitude-deg",  startPos.getLongitudeDeg() );
672   fgSetDouble("/position/latitude-deg",  startPos.getLatitudeDeg() );
673   fgSetDouble("/orientation/heading-deg", aHeading );
674 }
675
676 // Set current_options lon/lat given an airport id and heading (degrees)
677 bool fgSetPosFromAirportIDandHdg( const string& id, double tgt_hdg ) {
678     if ( id.empty() )
679         return false;
680
681     // set initial position from runway and heading
682     SG_LOG( SG_GENERAL, SG_INFO,
683             "Attempting to set starting position from airport code "
684             << id << " heading " << tgt_hdg );
685
686     const FGAirport* apt = fgFindAirportID(id);
687     if (!apt) return false;
688     FGRunway* r = apt->findBestRunwayForHeading(tgt_hdg);
689     fgSetString("/sim/atc/runway", r->ident().c_str());
690
691     SGGeod startPos = r->pointOnCenterline(fgGetDouble("/sim/airport/runways/start-offset-m", 5.0));
692           fgApplyStartOffset(startPos, r->headingDeg(), tgt_hdg);
693     return true;
694 }
695
696 // Set current_options lon/lat given an airport id and parkig position name
697 static bool fgSetPosFromAirportIDandParkpos( const string& id, const string& parkpos ) {
698     if ( id.empty() )
699         return false;
700
701     // can't see an easy way around this const_cast at the moment
702     FGAirport* apt = const_cast<FGAirport*>(fgFindAirportID(id));
703     if (!apt) {
704         SG_LOG( SG_GENERAL, SG_ALERT, "Failed to find airport " << id );
705         return false;
706     }
707     FGAirportDynamics* dcs = apt->getDynamics();
708     if (!dcs) {
709         SG_LOG( SG_GENERAL, SG_ALERT,
710                 "Airport " << id << "does not appear to have parking information available");
711         return false;
712     }
713     
714     int park_index = dcs->getNrOfParkings() - 1;
715     bool succes;
716     double radius = fgGetDouble("/sim/dimensions/radius-m");
717     if ((parkpos == string("AVAILABLE")) && (radius > 0)) {
718         double lat, lon, heading;
719         string fltType;
720         string acOperator;
721         SGPath acData;
722         try {
723             acData = fgGetString("/sim/fg-home");
724             acData.append("aircraft-data");
725             string acfile = fgGetString("/sim/aircraft") + string(".xml");
726             acData.append(acfile);
727             SGPropertyNode root;
728             readProperties(acData.str(), &root);
729             SGPropertyNode * node = root.getNode("sim");
730             fltType    = node->getStringValue("aircraft-class", "NONE"     );
731             acOperator = node->getStringValue("aircraft-operator", "NONE"     );
732         } catch (const sg_exception &) {
733             SG_LOG(SG_GENERAL, SG_INFO,
734                 "Could not load aircraft aircrat type and operator information from: " << acData.str() << ". Using defaults");
735
736        // cout << path.str() << endl;
737         }
738         if (fltType.empty() || fltType == "NONE") {
739             SG_LOG(SG_GENERAL, SG_INFO,
740                 "Aircraft type information not found in: " << acData.str() << ". Using default value");
741                 fltType = fgGetString("/sim/aircraft-class"   );
742         }
743         if (acOperator.empty() || fltType == "NONE") {
744             SG_LOG(SG_GENERAL, SG_INFO,
745                 "Aircraft operator information not found in: " << acData.str() << ". Using default value");
746                 acOperator = fgGetString("/sim/aircraft-operator"   );
747         }
748
749         cerr << "Running aircraft " << fltType << " of livery " << acOperator << endl;
750         string acType; // Currently not used by findAvailable parking, so safe to leave empty. 
751         succes = dcs->getAvailableParking(&lat, &lon, &heading, &park_index, radius, fltType, acType, acOperator);
752         if (succes) {
753             fgGetString("/sim/presets/parkpos");
754             fgSetString("/sim/presets/parkpos", dcs->getParking(park_index)->getName());
755         } else {
756             SG_LOG( SG_GENERAL, SG_ALERT,
757                     "Failed to find a suitable parking at airport " << id );
758             return false;
759         }
760     } else {
761         //cerr << "We shouldn't get here when AVAILABLE" << endl;
762         while (park_index >= 0 && dcs->getParkingName(park_index) != parkpos) park_index--;
763         if (park_index < 0) {
764             SG_LOG( SG_GENERAL, SG_ALERT,
765                     "Failed to find parking position " << parkpos <<
766                     " at airport " << id );
767             return false;
768         }
769     }
770     FGParking* parking = dcs->getParking(park_index);
771     parking->setAvailable(false);
772     fgApplyStartOffset(
773       SGGeod::fromDeg(parking->getLongitude(), parking->getLatitude()),
774       parking->getHeading());
775     return true;
776 }
777
778
779 // Set current_options lon/lat given an airport id and runway number
780 static bool fgSetPosFromAirportIDandRwy( const string& id, const string& rwy, bool rwy_req ) {
781     if ( id.empty() )
782         return false;
783
784     // set initial position from airport and runway number
785     SG_LOG( SG_GENERAL, SG_INFO,
786             "Attempting to set starting position for "
787             << id << ":" << rwy );
788
789     const FGAirport* apt = fgFindAirportID(id);
790     if (!apt) {
791       SG_LOG( SG_GENERAL, SG_ALERT, "Failed to find airport:" << id);
792       return false;
793     }
794     
795     if (!apt->hasRunwayWithIdent(rwy)) {
796       SG_LOG( SG_GENERAL, rwy_req ? SG_ALERT : SG_INFO,
797                 "Failed to find runway " << rwy <<
798                 " at airport " << id << ". Using default runway." );
799       return false;
800     }
801     
802     FGRunway* r(apt->getRunwayByIdent(rwy));
803     fgSetString("/sim/atc/runway", r->ident().c_str());
804     SGGeod startPos = r->pointOnCenterline( fgGetDouble("/sim/airport/runways/start-offset-m", 5.0));
805           fgApplyStartOffset(startPos, r->headingDeg());
806     return true;
807 }
808
809
810 static void fgSetDistOrAltFromGlideSlope() {
811     // cout << "fgSetDistOrAltFromGlideSlope()" << endl;
812     string apt_id = fgGetString("/sim/presets/airport-id");
813     double gs = fgGetDouble("/sim/presets/glideslope-deg")
814         * SG_DEGREES_TO_RADIANS ;
815     double od = fgGetDouble("/sim/presets/offset-distance-nm");
816     double alt = fgGetDouble("/sim/presets/altitude-ft");
817
818     double apt_elev = 0.0;
819     if ( ! apt_id.empty() ) {
820         apt_elev = fgGetAirportElev( apt_id );
821         if ( apt_elev < -9990.0 ) {
822             apt_elev = 0.0;
823         }
824     } else {
825         apt_elev = 0.0;
826     }
827
828     if( fabs(gs) > 0.01 && fabs(od) > 0.1 && alt < -9990 ) {
829         // set altitude from glideslope and offset-distance
830         od *= SG_NM_TO_METER * SG_METER_TO_FEET;
831         alt = fabs(od*tan(gs)) + apt_elev;
832         fgSetDouble("/sim/presets/altitude-ft", alt);
833         fgSetBool("/sim/presets/onground", false);
834         SG_LOG( SG_GENERAL, SG_INFO, "Calculated altitude as: "
835                 << alt  << " ft" );
836     } else if( fabs(gs) > 0.01 && alt > 0 && fabs(od) < 0.1) {
837         // set offset-distance from glideslope and altitude
838         od  = (alt - apt_elev) / tan(gs);
839         od *= -1*SG_FEET_TO_METER * SG_METER_TO_NM;
840         fgSetDouble("/sim/presets/offset-distance-nm", od);
841         fgSetBool("/sim/presets/onground", false);
842         SG_LOG( SG_GENERAL, SG_INFO, "Calculated offset distance as: " 
843                 << od  << " nm" );
844     } else if( fabs(gs) > 0.01 ) {
845         SG_LOG( SG_GENERAL, SG_ALERT,
846                 "Glideslope given but not altitude or offset-distance." );
847         SG_LOG( SG_GENERAL, SG_ALERT, "Resetting glideslope to zero" );
848         fgSetDouble("/sim/presets/glideslope-deg", 0);
849         fgSetBool("/sim/presets/onground", true);
850     }
851 }
852
853
854 // Set current_options lon/lat given an airport id and heading (degrees)
855 static bool fgSetPosFromNAV( const string& id, const double& freq, FGPositioned::Type type ) {
856
857     const nav_list_type navlist
858         = globals->get_navlist()->findByIdentAndFreq( id.c_str(), freq, type );
859
860     if (navlist.size() == 0 ) {
861         SG_LOG( SG_GENERAL, SG_ALERT, "Failed to locate NAV = "
862             << id << ":" << freq );
863         return false;
864     }
865
866     if( navlist.size() > 1 ) {
867         ostringstream buf;
868         buf << "Ambigous NAV-ID: '" << id << "'. Specify id and frequency. Available stations:" << endl;
869         for( nav_list_type::const_iterator it = navlist.begin(); it != navlist.end(); ++it ) {
870             // NDB stored in kHz, VOR stored in MHz * 100 :-P
871             double factor = (*it)->type() == FGPositioned::NDB ? 1.0 : 1/100.0;
872             string unit = (*it)->type() == FGPositioned::NDB ? "kHz" : "MHz";
873             buf << (*it)->ident() << " "
874                 << setprecision(5) << (double)((*it)->get_freq() * factor) << " "
875                 << (*it)->get_lat() << "/" << (*it)->get_lon()
876                 << endl;
877         }
878
879         SG_LOG( SG_GENERAL, SG_ALERT, buf.str() );
880         return false;
881     }
882
883     FGNavRecord *nav = navlist[0];
884     fgApplyStartOffset(nav->geod(), fgGetDouble("/sim/presets/heading-deg"));
885     return true;
886 }
887
888 // Set current_options lon/lat given an aircraft carrier id
889 static bool fgSetPosFromCarrier( const string& carrier, const string& posid ) {
890
891     // set initial position from runway and heading
892     SGGeod geodPos;
893     double heading;
894     SGVec3d uvw;
895     if (FGAIManager::getStartPosition(carrier, posid, geodPos, heading, uvw)) {
896         double lon = geodPos.getLongitudeDeg();
897         double lat = geodPos.getLatitudeDeg();
898         double alt = geodPos.getElevationFt();
899
900         SG_LOG( SG_GENERAL, SG_INFO, "Attempting to set starting position for "
901                 << carrier << " at lat = " << lat << ", lon = " << lon
902                 << ", alt = " << alt << ", heading = " << heading);
903
904         fgSetDouble("/sim/presets/longitude-deg",  lon);
905         fgSetDouble("/sim/presets/latitude-deg",  lat);
906         fgSetDouble("/sim/presets/altitude-ft", alt);
907         fgSetDouble("/sim/presets/heading-deg", heading);
908         fgSetDouble("/position/longitude-deg",  lon);
909         fgSetDouble("/position/latitude-deg",  lat);
910         fgSetDouble("/position/altitude-ft", alt);
911         fgSetDouble("/orientation/heading-deg", heading);
912
913         fgSetString("/sim/presets/speed-set", "UVW");
914         fgSetDouble("/velocities/uBody-fps", uvw(0));
915         fgSetDouble("/velocities/vBody-fps", uvw(1));
916         fgSetDouble("/velocities/wBody-fps", uvw(2));
917         fgSetDouble("/sim/presets/uBody-fps", uvw(0));
918         fgSetDouble("/sim/presets/vBody-fps", uvw(1));
919         fgSetDouble("/sim/presets/wBody-fps", uvw(2));
920
921         fgSetBool("/sim/presets/onground", true);
922
923         return true;
924     } else {
925         SG_LOG( SG_GENERAL, SG_ALERT, "Failed to locate aircraft carrier = "
926                 << carrier );
927         return false;
928     }
929 }
930  
931 // Set current_options lon/lat given an airport id and heading (degrees)
932 static bool fgSetPosFromFix( const string& id )
933 {
934   FGPositioned::TypeFilter fixFilter(FGPositioned::FIX);
935   FGPositioned* fix = FGPositioned::findNextWithPartialId(NULL, id, &fixFilter);
936   if (!fix) {
937     SG_LOG( SG_GENERAL, SG_ALERT, "Failed to locate fix = " << id );
938     return false;
939   }
940   
941   fgApplyStartOffset(fix->geod(), fgGetDouble("/sim/presets/heading-deg"));
942   return true;
943 }
944
945 /**
946  * Initialize vor/ndb/ils/fix list management and query systems (as
947  * well as simple airport db list)
948  */
949 bool
950 fgInitNav ()
951 {
952     SG_LOG(SG_GENERAL, SG_INFO, "Loading Airport Database ...");
953
954     SGPath aptdb( globals->get_fg_root() );
955     aptdb.append( "Airports/apt.dat" );
956
957     SGPath p_metar( globals->get_fg_root() );
958     p_metar.append( "Airports/metar.dat" );
959
960     fgAirportDBLoad( aptdb.str(), p_metar.str() );
961     FGAirport::installPropertyListener();
962     FGPositioned::installCommands();
963     
964     FGNavList *navlist = new FGNavList;
965     FGNavList *loclist = new FGNavList;
966     FGNavList *gslist = new FGNavList;
967     FGNavList *dmelist = new FGNavList;
968     FGNavList *tacanlist = new FGNavList;
969     FGNavList *carrierlist = new FGNavList;
970     FGTACANList *channellist = new FGTACANList;
971
972     globals->set_navlist( navlist );
973     globals->set_loclist( loclist );
974     globals->set_gslist( gslist );
975     globals->set_dmelist( dmelist );
976     globals->set_tacanlist( tacanlist );
977     globals->set_carrierlist( carrierlist );
978     globals->set_channellist( channellist );
979
980     if ( !fgNavDBInit(navlist, loclist, gslist, dmelist, tacanlist, carrierlist, channellist) ) {
981         SG_LOG( SG_GENERAL, SG_ALERT,
982                 "Problems loading one or more navigational database" );
983     }
984     
985     SG_LOG(SG_GENERAL, SG_INFO, "  Fixes");
986     SGPath p_fix( globals->get_fg_root() );
987     p_fix.append( "Navaids/fix.dat" );
988     FGFixList fixlist;
989     fixlist.init( p_fix );  // adds fixes to the DB in positioned.cxx
990
991     SG_LOG(SG_GENERAL, SG_INFO, "  Airways");
992     flightgear::Airway::load();
993     
994     return true;
995 }
996
997
998 // Set the initial position based on presets (or defaults)
999 bool fgInitPosition() {
1000     // cout << "fgInitPosition()" << endl;
1001     double gs = fgGetDouble("/sim/presets/glideslope-deg")
1002         * SG_DEGREES_TO_RADIANS ;
1003     double od = fgGetDouble("/sim/presets/offset-distance-nm");
1004     double alt = fgGetDouble("/sim/presets/altitude-ft");
1005
1006     bool set_pos = false;
1007
1008     // If glideslope is specified, then calculate offset-distance or
1009     // altitude relative to glide slope if either of those was not
1010     // specified.
1011     if ( fabs( gs ) > 0.01 ) {
1012         fgSetDistOrAltFromGlideSlope();
1013     }
1014
1015
1016     // If we have an explicit, in-range lon/lat, don't change it, just use it.
1017     // If not, check for an airport-id and use that.
1018     // If not, default to the middle of the KSFO field.
1019     // The default values for lon/lat are deliberately out of range
1020     // so that the airport-id can take effect; valid lon/lat will
1021     // override airport-id, however.
1022     double lon_deg = fgGetDouble("/sim/presets/longitude-deg");
1023     double lat_deg = fgGetDouble("/sim/presets/latitude-deg");
1024     if ( lon_deg >= -180.0 && lon_deg <= 180.0
1025          && lat_deg >= -90.0 && lat_deg <= 90.0 )
1026     {
1027         set_pos = true;
1028     }
1029
1030     string apt = fgGetString("/sim/presets/airport-id");
1031     string rwy_no = fgGetString("/sim/presets/runway");
1032     bool rwy_req = fgGetBool("/sim/presets/runway-requested");
1033     string vor = fgGetString("/sim/presets/vor-id");
1034     double vor_freq = fgGetDouble("/sim/presets/vor-freq");
1035     string ndb = fgGetString("/sim/presets/ndb-id");
1036     double ndb_freq = fgGetDouble("/sim/presets/ndb-freq");
1037     string carrier = fgGetString("/sim/presets/carrier");
1038     string parkpos = fgGetString("/sim/presets/parkpos");
1039     string fix = fgGetString("/sim/presets/fix");
1040     SGPropertyNode *hdg_preset = fgGetNode("/sim/presets/heading-deg", true);
1041     double hdg = hdg_preset->getDoubleValue();
1042
1043     // save some start parameters, so that we can later say what the
1044     // user really requested. TODO generalize that and move it to options.cxx
1045     static bool start_options_saved = false;
1046     if (!start_options_saved) {
1047         start_options_saved = true;
1048         SGPropertyNode *opt = fgGetNode("/sim/startup/options", true);
1049
1050         opt->setDoubleValue("latitude-deg", lat_deg);
1051         opt->setDoubleValue("longitude-deg", lon_deg);
1052         opt->setDoubleValue("heading-deg", hdg);
1053         opt->setStringValue("airport", apt.c_str());
1054         opt->setStringValue("runway", rwy_no.c_str());
1055     }
1056
1057     if (hdg > 9990.0)
1058         hdg = fgGetDouble("/environment/config/boundary/entry/wind-from-heading-deg", 270);
1059
1060     if ( !set_pos && !apt.empty() && !parkpos.empty() ) {
1061         // An airport + parking position is requested
1062         if ( fgSetPosFromAirportIDandParkpos( apt, parkpos ) ) {
1063             // set tower position
1064             fgSetString("/sim/airport/closest-airport-id",  apt.c_str());
1065             fgSetString("/sim/tower/airport-id",  apt.c_str());
1066             set_pos = true;
1067         }
1068     }
1069
1070     if ( !set_pos && !apt.empty() && !rwy_no.empty() ) {
1071         // An airport + runway is requested
1072         if ( fgSetPosFromAirportIDandRwy( apt, rwy_no, rwy_req ) ) {
1073             // set tower position (a little off the heading for single
1074             // runway airports)
1075             fgSetString("/sim/airport/closest-airport-id",  apt.c_str());
1076             fgSetString("/sim/tower/airport-id",  apt.c_str());
1077             set_pos = true;
1078         }
1079     }
1080
1081     if ( !set_pos && !apt.empty() ) {
1082         // An airport is requested (find runway closest to hdg)
1083         if ( fgSetPosFromAirportIDandHdg( apt, hdg ) ) {
1084             // set tower position (a little off the heading for single
1085             // runway airports)
1086             fgSetString("/sim/airport/closest-airport-id",  apt.c_str());
1087             fgSetString("/sim/tower/airport-id",  apt.c_str());
1088             set_pos = true;
1089         }
1090     }
1091
1092     if (hdg_preset->getDoubleValue() > 9990.0)
1093         hdg_preset->setDoubleValue(hdg);
1094
1095     if ( !set_pos && !vor.empty() ) {
1096         // a VOR is requested
1097         if ( fgSetPosFromNAV( vor, vor_freq, FGPositioned::VOR ) ) {
1098             set_pos = true;
1099         }
1100     }
1101
1102     if ( !set_pos && !ndb.empty() ) {
1103         // an NDB is requested
1104         if ( fgSetPosFromNAV( ndb, ndb_freq, FGPositioned::NDB ) ) {
1105             set_pos = true;
1106         }
1107     }
1108
1109     if ( !set_pos && !carrier.empty() ) {
1110         // an aircraft carrier is requested
1111         if ( fgSetPosFromCarrier( carrier, parkpos ) ) {
1112             set_pos = true;
1113         }
1114     }
1115
1116     if ( !set_pos && !fix.empty() ) {
1117         // a Fix is requested
1118         if ( fgSetPosFromFix( fix ) ) {
1119             set_pos = true;
1120         }
1121     }
1122
1123     if ( !set_pos ) {
1124         // No lon/lat specified, no airport specified, default to
1125         // middle of KSFO field.
1126         fgSetDouble("/sim/presets/longitude-deg", -122.374843);
1127         fgSetDouble("/sim/presets/latitude-deg", 37.619002);
1128     }
1129
1130     fgSetDouble( "/position/longitude-deg",
1131                  fgGetDouble("/sim/presets/longitude-deg") );
1132     fgSetDouble( "/position/latitude-deg",
1133                  fgGetDouble("/sim/presets/latitude-deg") );
1134     fgSetDouble( "/orientation/heading-deg", hdg_preset->getDoubleValue());
1135
1136     // determine if this should be an on-ground or in-air start
1137     if ((fabs(gs) > 0.01 || fabs(od) > 0.1 || alt > 0.1) && carrier.empty()) {
1138         fgSetBool("/sim/presets/onground", false);
1139     } else {
1140         fgSetBool("/sim/presets/onground", true);
1141     }
1142
1143     return true;
1144 }
1145
1146
1147 // General house keeping initializations
1148 bool fgInitGeneral() {
1149     string root;
1150
1151     SG_LOG( SG_GENERAL, SG_INFO, "General Initialization" );
1152     SG_LOG( SG_GENERAL, SG_INFO, "======= ==============" );
1153
1154     root = globals->get_fg_root();
1155     if ( ! root.length() ) {
1156         // No root path set? Then bail ...
1157         SG_LOG( SG_GENERAL, SG_ALERT,
1158                 "Cannot continue without a path to the base package "
1159                 << "being defined." );
1160         exit(-1);
1161     }
1162     SG_LOG( SG_GENERAL, SG_INFO, "FG_ROOT = " << '"' << root << '"' << endl );
1163
1164     globals->set_browser(fgGetString("/sim/startup/browser-app", "firefox %u"));
1165
1166     char buf[512], *cwd = getcwd(buf, 511);
1167     buf[511] = '\0';
1168     SGPropertyNode *curr = fgGetNode("/sim", true);
1169     curr->removeChild("fg-current", 0, false);
1170     curr = curr->getChild("fg-current", 0, true);
1171     curr->setStringValue(cwd ? cwd : "");
1172     curr->setAttribute(SGPropertyNode::WRITE, false);
1173
1174     fgSetBool("/sim/startup/stdout-to-terminal", isatty(1) != 0 );
1175     fgSetBool("/sim/startup/stderr-to-terminal", isatty(2) != 0 );
1176     return true;
1177 }
1178
1179 // This is the top level init routine which calls all the other
1180 // initialization routines.  If you are adding a subsystem to flight
1181 // gear, its initialization call should located in this routine.
1182 // Returns non-zero if a problem encountered.
1183 bool fgInitSubsystems() {
1184     // static const SGPropertyNode *longitude
1185     //     = fgGetNode("/sim/presets/longitude-deg");
1186     // static const SGPropertyNode *latitude
1187     //     = fgGetNode("/sim/presets/latitude-deg");
1188     // static const SGPropertyNode *altitude
1189     //     = fgGetNode("/sim/presets/altitude-ft");
1190
1191     SG_LOG( SG_GENERAL, SG_INFO, "Initialize Subsystems");
1192     SG_LOG( SG_GENERAL, SG_INFO, "========== ==========");
1193
1194     ////////////////////////////////////////////////////////////////////
1195     // Initialize the event manager subsystem.
1196     ////////////////////////////////////////////////////////////////////
1197
1198     globals->get_event_mgr()->init();
1199     globals->get_event_mgr()->setRealtimeProperty(fgGetNode("/sim/time/delta-realtime-sec", true));
1200
1201     ////////////////////////////////////////////////////////////////////
1202     // Initialize the property interpolator subsystem. Put into the INIT
1203     // group because the "nasal" subsystem may need it at GENERAL take-down.
1204     ////////////////////////////////////////////////////////////////////
1205     globals->add_subsystem("interpolator", new SGInterpolator, SGSubsystemMgr::INIT);
1206
1207
1208     ////////////////////////////////////////////////////////////////////
1209     // Add the FlightGear property utilities.
1210     ////////////////////////////////////////////////////////////////////
1211     globals->add_subsystem("properties", new FGProperties);
1212
1213     ////////////////////////////////////////////////////////////////////
1214     // Initialize the material property subsystem.
1215     ////////////////////////////////////////////////////////////////////
1216
1217     SGPath mpath( globals->get_fg_root() );
1218     mpath.append( fgGetString("/sim/rendering/materials-file") );
1219     if ( ! globals->get_matlib()->load(globals->get_fg_root(), mpath.str(),
1220             globals->get_props()) ) {
1221         SG_LOG( SG_GENERAL, SG_ALERT,
1222                 "Error loading materials file " << mpath.str() );
1223         exit(-1);
1224     }
1225
1226
1227     ////////////////////////////////////////////////////////////////////
1228     // Initialize the scenery management subsystem.
1229     ////////////////////////////////////////////////////////////////////
1230
1231     globals->get_scenery()->get_scene_graph()
1232         ->addChild(simgear::Particles::getCommonRoot());
1233     simgear::GlobalParticleCallback::setSwitch(fgGetNode("/sim/rendering/particles", true));
1234
1235     ////////////////////////////////////////////////////////////////////
1236     // Initialize the flight model subsystem.
1237     ////////////////////////////////////////////////////////////////////
1238
1239     globals->add_subsystem("flight", new FDMShell, SGSubsystemMgr::FDM);
1240
1241     ////////////////////////////////////////////////////////////////////
1242     // Initialize the weather subsystem.
1243     ////////////////////////////////////////////////////////////////////
1244
1245     // Initialize the weather modeling subsystem
1246     globals->add_subsystem("environment", new FGEnvironmentMgr);
1247
1248     ////////////////////////////////////////////////////////////////////
1249     // Initialize the aircraft systems and instrumentation (before the
1250     // autopilot.)
1251     ////////////////////////////////////////////////////////////////////
1252
1253     globals->add_subsystem("instrumentation", new FGInstrumentMgr, SGSubsystemMgr::FDM);
1254     globals->add_subsystem("systems", new FGSystemMgr, SGSubsystemMgr::FDM);
1255
1256     ////////////////////////////////////////////////////////////////////
1257     // Initialize the XML Autopilot subsystem.
1258     ////////////////////////////////////////////////////////////////////
1259
1260     globals->add_subsystem( "xml-autopilot", FGXMLAutopilotGroup::createInstance(), SGSubsystemMgr::FDM );
1261     globals->add_subsystem( "route-manager", new FGRouteMgr );
1262
1263     ////////////////////////////////////////////////////////////////////
1264     // Initialize the Input-Output subsystem
1265     ////////////////////////////////////////////////////////////////////
1266     globals->add_subsystem( "io", new FGIO );
1267
1268     ////////////////////////////////////////////////////////////////////
1269     // Create and register the logger.
1270     ////////////////////////////////////////////////////////////////////
1271     
1272     globals->add_subsystem("logger", new FGLogger);
1273
1274     ////////////////////////////////////////////////////////////////////
1275     // Create and register the XML GUI.
1276     ////////////////////////////////////////////////////////////////////
1277
1278     globals->add_subsystem("gui", new NewGUI, SGSubsystemMgr::INIT);
1279
1280     //////////////////////////////////////////////////////////////////////
1281     // Initialize the 2D cloud subsystem.
1282     ////////////////////////////////////////////////////////////////////
1283     fgGetBool("/sim/rendering/bump-mapping", false);
1284
1285
1286
1287     ////////////////////////////////////////////////////////////////////
1288     // Initialise the ATC Manager
1289     // Note that this is old stuff, but might be necessesary for the 
1290     // current ATIS implementation. Therefore, leave it in here
1291     // until the ATIS system is ported over to make use of the ATIS 
1292     // sub system infrastructure.
1293     ////////////////////////////////////////////////////////////////////
1294
1295     SG_LOG(SG_GENERAL, SG_INFO, "  ATC Manager");
1296     globals->set_ATC_mgr(new FGATCMgr);
1297     globals->get_ATC_mgr()->init(); 
1298
1299     ////////////////////////////////////////////////////////////////////
1300    // Initialize the ATC subsystem
1301     ////////////////////////////////////////////////////////////////////
1302     globals->add_subsystem("ATC", new FGATCManager, SGSubsystemMgr::POST_FDM);
1303     ////////////////////////////////////////////////////////////////////
1304     // Initialise the ATIS Subsystem
1305     ////////////////////////////////////////////////////////////////////
1306     //globals->add_subsystem("atis", new FGAtisManager, SGSubsystemMgr::POST_FDM);
1307
1308
1309     ////////////////////////////////////////////////////////////////////
1310     // Initialize multiplayer subsystem
1311     ////////////////////////////////////////////////////////////////////
1312
1313     globals->add_subsystem("mp", new FGMultiplayMgr, SGSubsystemMgr::POST_FDM);
1314
1315     ////////////////////////////////////////////////////////////////////
1316     // Initialise the AI Model Manager
1317     ////////////////////////////////////////////////////////////////////
1318     SG_LOG(SG_GENERAL, SG_INFO, "  AI Model Manager");
1319     globals->add_subsystem("ai_model", new FGAIManager, SGSubsystemMgr::POST_FDM);
1320     globals->add_subsystem("submodel_mgr", new FGSubmodelMgr, SGSubsystemMgr::POST_FDM);
1321
1322
1323     // It's probably a good idea to initialize the top level traffic manager
1324     // After the AI and ATC systems have been initialized properly.
1325     // AI Traffic manager
1326     globals->add_subsystem("Traffic Manager", new FGTrafficManager, SGSubsystemMgr::POST_FDM);
1327
1328     ////////////////////////////////////////////////////////////////////
1329     // Add a new 2D panel.
1330     ////////////////////////////////////////////////////////////////////
1331
1332     string panel_path(fgGetString("/sim/panel/path"));
1333     if (!panel_path.empty()) {
1334       FGPanel* p = fgReadPanel(panel_path);
1335       if (p) {
1336         globals->set_current_panel(p);
1337         p->init();
1338         p->bind();
1339         SG_LOG( SG_INPUT, SG_INFO, "Loaded new panel from " << panel_path );
1340       } else {
1341         SG_LOG( SG_INPUT, SG_ALERT,
1342                 "Error reading new panel from " << panel_path );
1343       }
1344     }
1345
1346     ////////////////////////////////////////////////////////////////////
1347     // Initialize the controls subsystem.
1348     ////////////////////////////////////////////////////////////////////
1349
1350     globals->get_controls()->init();
1351     globals->get_controls()->bind();
1352
1353
1354     ////////////////////////////////////////////////////////////////////
1355     // Initialize the input subsystem.
1356     ////////////////////////////////////////////////////////////////////
1357
1358     globals->add_subsystem("input", new FGInput);
1359
1360
1361     ////////////////////////////////////////////////////////////////////
1362     // Initialize the replay subsystem
1363     ////////////////////////////////////////////////////////////////////
1364     globals->add_subsystem("replay", new FGReplay);
1365
1366 #ifdef ENABLE_AUDIO_SUPPORT
1367     ////////////////////////////////////////////////////////////////////
1368     // Initialize the sound-effects subsystem.
1369     ////////////////////////////////////////////////////////////////////
1370     globals->add_subsystem("voice", new FGVoiceMgr, SGSubsystemMgr::DISPLAY);
1371 #endif
1372
1373     ////////////////////////////////////////////////////////////////////
1374     // Initialize the lighting subsystem.
1375     ////////////////////////////////////////////////////////////////////
1376
1377     globals->add_subsystem("lighting", new FGLight, SGSubsystemMgr::DISPLAY);
1378     
1379     // ordering here is important : Nasal (via events), then models, then views
1380     globals->add_subsystem("events", globals->get_event_mgr(), SGSubsystemMgr::DISPLAY);
1381     
1382     FGAircraftModel* acm = new FGAircraftModel;
1383     globals->set_aircraft_model(acm);
1384     globals->add_subsystem("aircraft-model", acm, SGSubsystemMgr::DISPLAY);
1385
1386     FGModelMgr* mm = new FGModelMgr;
1387     globals->set_model_mgr(mm);
1388     globals->add_subsystem("model-manager", mm, SGSubsystemMgr::DISPLAY);
1389
1390     FGViewMgr *viewmgr = new FGViewMgr;
1391     globals->set_viewmgr( viewmgr );
1392     globals->add_subsystem("view-manager", viewmgr, SGSubsystemMgr::DISPLAY);
1393
1394     globals->add_subsystem("tile-manager", globals->get_tile_mgr(), 
1395       SGSubsystemMgr::DISPLAY);
1396       
1397     ////////////////////////////////////////////////////////////////////
1398     // Bind and initialize subsystems.
1399     ////////////////////////////////////////////////////////////////////
1400
1401     globals->get_subsystem_mgr()->bind();
1402     globals->get_subsystem_mgr()->init();
1403
1404     ////////////////////////////////////////////////////////////////////////
1405     // Initialize the Nasal interpreter.
1406     // Do this last, so that the loaded scripts see initialized state
1407     ////////////////////////////////////////////////////////////////////////
1408     FGNasalSys* nasal = new FGNasalSys();
1409     globals->add_subsystem("nasal", nasal, SGSubsystemMgr::INIT);
1410     nasal->init();
1411
1412     // initialize methods that depend on other subsystems.
1413     globals->get_subsystem_mgr()->postinit();
1414
1415     ////////////////////////////////////////////////////////////////////////
1416     // End of subsystem initialization.
1417     ////////////////////////////////////////////////////////////////////
1418
1419     fgSetBool("/sim/initialized", true);
1420
1421     SG_LOG( SG_GENERAL, SG_INFO, endl);
1422
1423                                 // Save the initial state for future
1424                                 // reference.
1425     globals->saveInitialState();
1426     
1427     return true;
1428 }
1429
1430 // Reset: this is what the 'reset' command (and hence, GUI) is attached to
1431 void fgReInitSubsystems()
1432 {
1433     static const SGPropertyNode *master_freeze
1434         = fgGetNode("/sim/freeze/master");
1435
1436     SG_LOG( SG_GENERAL, SG_INFO, "fgReInitSubsystems()");
1437
1438 // setup state to begin re-init
1439     bool freeze = master_freeze->getBoolValue();
1440     if ( !freeze ) {
1441         fgSetBool("/sim/freeze/master", true);
1442     }
1443     
1444     fgSetBool("/sim/signals/reinit", true);
1445     fgSetBool("/sim/crashed", false);
1446
1447 // do actual re-init steps
1448     globals->get_subsystem("flight")->unbind();
1449     
1450   // reset control state, before restoring initial state; -set or config files
1451   // may specify values for flaps, trim tabs, magnetos, etc
1452     globals->get_controls()->reset_all();
1453         
1454     globals->restoreInitialState();
1455
1456     // update our position based on current presets
1457     fgInitPosition();
1458     
1459     // Force reupdating the positions of the ai 3d models. They are used for
1460     // initializing ground level for the FDM.
1461     globals->get_subsystem("ai_model")->reinit();
1462
1463     // Initialize the FDM
1464     globals->get_subsystem("flight")->reinit();
1465
1466     // reset replay buffers
1467     globals->get_subsystem("replay")->reinit();
1468     
1469     // reload offsets from config defaults
1470     globals->get_viewmgr()->reinit();
1471
1472     globals->get_subsystem("time")->reinit();
1473
1474     // need to bind FDMshell again, since we manually unbound it above...
1475     globals->get_subsystem("flight")->bind();
1476
1477 // setup state to end re-init
1478     fgSetBool("/sim/signals/reinit", false);
1479     if ( !freeze ) {
1480         fgSetBool("/sim/freeze/master", false);
1481     }
1482     fgSetBool("/sim/sceneryloaded",false);
1483 }
1484
1485
1486 ///////////////////////////////////////////////////////////////////////////////
1487 // helper object to implement the --show-aircraft command.
1488 // resides here so we can share the fgFindAircraftInDir template above,
1489 // and hence ensure this command lists exectly the same aircraft as the normal
1490 // loading path.
1491 class ShowAircraft 
1492 {
1493 public:
1494   ShowAircraft()
1495   {
1496     _minStatus = getNumMaturity(fgGetString("/sim/aircraft-min-status", "all"));
1497   }
1498   
1499   
1500   void show(const SGPath& path)
1501   {
1502     fgFindAircraftInDir(path, this, &ShowAircraft::processAircraft);
1503   
1504     std::sort(_aircraft.begin(), _aircraft.end(), ciLessLibC());
1505     SG_LOG( SG_GENERAL, SG_ALERT, "" ); // To popup the console on Windows
1506     cout << "Available aircraft:" << endl;
1507     for ( unsigned int i = 0; i < _aircraft.size(); i++ ) {
1508         cout << _aircraft[i] << endl;
1509     }
1510   }
1511   
1512 private:
1513   bool processAircraft(const SGPath& path)
1514   {
1515     SGPropertyNode root;
1516     try {
1517        readProperties(path.str(), &root);
1518     } catch (sg_exception& ) {
1519        return false;
1520     }
1521   
1522     int maturity = 0;
1523     string descStr("   ");
1524     descStr += path.file();
1525   // trim common suffix from file names
1526     int nPos = descStr.rfind("-set.xml");
1527     if (nPos == (int)(descStr.size() - 8)) {
1528       descStr.resize(nPos);
1529     }
1530     
1531     SGPropertyNode *node = root.getNode("sim");
1532     if (node) {
1533       SGPropertyNode* desc = node->getNode("description");
1534       // if a status tag is found, read it in
1535       if (node->hasValue("status")) {
1536         maturity = getNumMaturity(node->getStringValue("status"));
1537       }
1538       
1539       if (desc) {
1540         if (descStr.size() <= 27+3) {
1541           descStr.append(29+3-descStr.size(), ' ');
1542         } else {
1543           descStr += '\n';
1544           descStr.append( 32, ' ');
1545         }
1546         descStr += desc->getStringValue();
1547       }
1548     } // of have 'sim' node
1549     
1550     if (maturity < _minStatus) {
1551       return false;
1552     }
1553
1554     _aircraft.push_back(descStr);
1555     return false;
1556   }
1557
1558
1559   int getNumMaturity(const char * str) 
1560   {
1561     // changes should also be reflected in $FG_ROOT/data/options.xml & 
1562     // $FG_ROOT/data/Translations/string-default.xml
1563     const char* levels[] = {"alpha","beta","early-production","production"}; 
1564
1565     if (!strcmp(str, "all")) {
1566       return 0;
1567     }
1568
1569     for (size_t i=0; i<(sizeof(levels)/sizeof(levels[0]));i++) 
1570       if (strcmp(str,levels[i])==0)
1571         return i;
1572
1573     return 0;
1574   }
1575
1576   // recommended in Meyers, Effective STL when internationalization and embedded
1577   // NULLs aren't an issue.  Much faster than the STL or Boost lex versions.
1578   struct ciLessLibC : public std::binary_function<string, string, bool>
1579   {
1580     bool operator()(const std::string &lhs, const std::string &rhs) const
1581     {
1582       return strcasecmp(lhs.c_str(), rhs.c_str()) < 0 ? 1 : 0;
1583     }
1584   };
1585
1586   int _minStatus;
1587   string_list _aircraft;
1588 };
1589
1590 void fgShowAircraft(const SGPath &path)
1591 {
1592     ShowAircraft s;
1593     s.show(path);
1594         
1595 #ifdef _MSC_VER
1596     cout << "Hit a key to continue..." << endl;
1597     cin.get();
1598 #endif
1599 }
1600
1601