1 // ATCmgr.cxx - Implementation of FGATCMgr - a global Flightgear ATC manager.
3 // Written by David Luff, started February 2002.
5 // Copyright (C) 2002 David C Luff - david.luff@nottingham.ac.uk
7 // This program is free software; you can redistribute it and/or
8 // modify it under the terms of the GNU General Public License as
9 // published by the Free Software Foundation; either version 2 of the
10 // License, or (at your option) any later version.
12 // This program is distributed in the hope that it will be useful, but
13 // WITHOUT ANY WARRANTY; without even the implied warranty of
14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 // General Public License for more details.
17 // You should have received a copy of the GNU General Public License
18 // along with this program; if not, write to the Free Software
19 // Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
25 #include <simgear/misc/sg_path.hxx>
26 #include <simgear/debug/logstream.hxx>
28 #include <Airports/simple.hxx>
31 #include "commlist.hxx"
32 #include "ATCDialog.hxx"
33 #include "ATCutils.hxx"
34 #include "transmissionlist.hxx"
39 // periodic radio station search wrapper
40 static void fgATCSearch( void ) {
41 globals->get_ATC_mgr()->Search();
43 */ //This wouldn't compile - including Time/event.hxx breaks it :-(
44 // Is this still true?? -EMH-
46 AirportATC::AirportATC() :
55 //airport_atc_map.clear();
59 FGATCMgr::FGATCMgr() :
61 atc_list(new atc_list_type),
62 #ifdef ENABLE_AUDIO_SUPPORT
73 FGATCMgr::~FGATCMgr() {
77 void FGATCMgr::bind() {
80 void FGATCMgr::unbind() {
83 void FGATCMgr::init() {
84 //cout << "ATCMgr::init called..." << endl;
86 lon_node = fgGetNode("/position/longitude-deg", true);
87 lat_node = fgGetNode("/position/latitude-deg", true);
88 elev_node = fgGetNode("/position/altitude-ft", true);
89 atc_list_itr = atc_list->begin();
91 // Search for connected ATC stations once per 0.8 seconds or so
92 // globals->get_event_mgr()->add( "fgATCSearch()", fgATCSearch,
93 // FGEvent::FG_EVENT_READY, 800);
95 // For some reason the above doesn't compile - including Time/event.hxx stops compilation.
96 // Is this still true after the reorganization of the event managar??
99 // Initialise the ATC Dialogs
100 //cout << "Initing Transmissions..." << endl;
101 SG_LOG(SG_ATC, SG_INFO, " ATC Transmissions");
102 current_transmissionlist = new FGTransmissionList;
103 SGPath p_transmission( globals->get_fg_root() );
104 p_transmission.append( "ATC/default.transmissions" );
105 current_transmissionlist->init( p_transmission );
106 //cout << "Done Transmissions" << endl;
108 SG_LOG(SG_ATC, SG_INFO, " ATC Dialog System");
109 current_atcdialog = new FGATCDialog;
110 current_atcdialog->Init();
113 //cout << "ATCmgr::init done!" << endl;
116 void FGATCMgr::update(double dt) {
119 SG_LOG(SG_ATC, SG_WARN, "Warning - ATCMgr::update(...) called before ATCMgr::init()");
122 current_atcdialog->Update(dt);
124 //cout << "Entering update..." << endl;
125 //Traverse the list of active stations.
126 //Only update one class per update step to avoid the whole ATC system having to calculate between frames.
127 //Eventually we should only update every so many steps.
128 //cout << "In FGATCMgr::update - atc_list.size = " << atc_list->size() << endl;
129 if(atc_list->size()) {
130 if(atc_list_itr == atc_list->end()) {
131 atc_list_itr = atc_list->begin();
133 //cout << "Updating " << (*atc_list_itr)->get_ident() << ' ' << (*atc_list_itr)->GetType() << '\n';
134 //cout << "Freq = " << (*atc_list_itr)->get_freq() << '\n';
135 (*atc_list_itr).second->Update(dt * atc_list->size());
136 //cout << "Done ATC update..." << endl;
141 cout << "ATC_LIST: " << atc_list->size() << ' ';
142 for(atc_list_iterator it = atc_list->begin(); it != atc_list->end(); it++) {
143 cout << (*it)->get_ident() << ' ';
148 // Search the tuned frequencies every now and then - this should be done with the event scheduler
149 static int i = 0; // Very ugly - but there should only ever be one instance of FGATCMgr.
150 /*** Area search is defeated. Why?
152 //cout << "About to AreaSearch()" << endl;
157 //cout << "About to search navcomm1" << endl;
158 FreqSearch("comm", 0);
159 FreqSearch("nav", 0);
162 //cout << "About to search navcomm2" << endl;
163 FreqSearch("comm", 1);
164 FreqSearch("nav", 1);
169 //cout << "comm1 type = " << comm_type[0] << '\n';
170 //cout << "Leaving update..." << endl;
174 // Returns frequency in KHz - should I alter this to return in MHz?
175 unsigned short int FGATCMgr::GetFrequency(const string& ident, const atc_type& tp) {
177 bool ok = current_commlist->FindByCode(ident, test, tp);
178 return(ok ? test.freq : 0);
181 // Register the fact that the comm radio is tuned to an airport
182 // Channel is zero based
183 bool FGATCMgr::CommRegisterAirport(const string& ident, int chan, const atc_type& tp) {
184 SG_LOG(SG_ATC, SG_BULK, "Comm channel " << chan << " registered airport " << ident);
185 //cout << "Comm channel " << chan << " registered airport " << ident << ' ' << tp << '\n';
186 if(airport_atc_map.find(ident) != airport_atc_map.end()) {
187 //cout << "IN MAP - flagging set by comm..." << endl;
188 //xx airport_atc_map[ident]->set_by_comm[chan][tp] = true;
189 if(tp == ATIS || tp == AWOS) {
190 airport_atc_map[ident]->atis_active = true;
191 } else if(tp == TOWER) {
192 airport_atc_map[ident]->tower_active = true;
193 } else if(tp == GROUND) {
194 airport_atc_map[ident]->ground_active = true;
195 } else if(tp == APPROACH) {
196 //a->approach_active = true;
197 } // TODO - there *must* be a better way to do this!!!
200 //cout << "NOT IN MAP - creating new..." << endl;
201 const FGAirport *ap = fgFindAirportID(ident);
203 AirportATC *a = new AirportATC;
204 // I'm not entirely sure that this AirportATC structure business is actually needed - it just duplicates what we can find out anyway!
205 a->geod = ap->geod();
206 a->atis_freq = GetFrequency(ident, ATIS)
207 || GetFrequency(ident, AWOS);
208 a->atis_active = false;
209 a->tower_freq = GetFrequency(ident, TOWER);
210 a->tower_active = false;
211 a->ground_freq = GetFrequency(ident, GROUND);
212 a->ground_active = false;
213 if(tp == ATIS || tp == AWOS) {
214 a->atis_active = true;
215 } else if(tp == TOWER) {
216 a->tower_active = true;
217 } else if(tp == GROUND) {
218 a->ground_active = true;
219 } else if(tp == APPROACH) {
220 //a->approach_active = true;
221 } // TODO - there *must* be a better way to do this!!!
222 // TODO - some airports will have a tower/ground frequency but be inactive overnight.
223 a->set_by_AI = false;
225 //xx a->set_by_comm[chan][tp] = true;
226 airport_atc_map[ident] = a;
233 typedef map<string,int> MSI;
235 void FGATCMgr::ZapOtherService(const string ncunit, const string svc_name){
236 for (atc_list_iterator svc = atc_list->begin(); svc != atc_list->end(); svc++) {
238 if (svc->first != svc_name) {
239 MSI &actv = svc->second->active_on;
240 // OK, we have found some OTHER service;
241 // see if it is (was) active on our unit:
242 if (!actv.count(ncunit)) continue;
243 // cout << "Eradicating '" << svc->first << "' from: " << ncunit << endl;
246 //cout << "Eradicating service: '" << svc->first << "'" << endl;
247 svc->second->SetNoDisplay();
248 svc->second->Update(0); // one last update
249 SG_LOG(SG_GENERAL, SG_INFO, "would have erased ATC service:" << svc->second->get_name()<< "/"
250 << svc->second->get_ident());
251 // delete svc->second;
252 atc_list->erase(svc);
253 // ALL pointers into the ATC list are now invalid,
254 // so let's reset them:
255 atc_list_itr = atc_list->begin();
257 break; // cannot be duplicates in the active list
263 // Find in list - return a currently active ATC pointer given ICAO code and type
264 // Return NULL if the given service is not in the list
265 // - *** THE CALLING FUNCTION MUST CHECK FOR THIS ***
266 FGATC* FGATCMgr::FindInList(const string& id, const atc_type& tp) {
267 string ndx = id + decimalNumeral(tp);
268 if (!atc_list->count(ndx)) return 0;
269 return (*atc_list)[ndx];
272 // Returns true if the airport is found in the map
273 bool FGATCMgr::GetAirportATCDetails(const string& icao, AirportATC* a) {
274 if(airport_atc_map.find(icao) != airport_atc_map.end()) {
275 *a = *airport_atc_map[icao];
283 // Return a pointer to a given sort of ATC at a given airport and activate if necessary
284 // Returns NULL if service doesn't exist - calling function should check for this.
285 // We really ought to make this private and call it from the CommRegisterAirport / AIRegisterAirport functions
286 // - at the moment all these GetATC... functions exposed are just too complicated.
287 FGATC* FGATCMgr::GetATCPointer(const string& icao, const atc_type& type) {
288 if(airport_atc_map.find(icao) == airport_atc_map.end()) {
289 //cout << "Unable to find " << icao << ' ' << type << " in the airport_atc_map" << endl;
292 //cout << "In GetATCPointer, found " << icao << ' ' << type << endl;
293 AirportATC *a = airport_atc_map[icao];
294 //cout << "a->lon = " << a->lon << '\n';
295 //cout << "a->elev = " << a->elev << '\n';
296 //cout << "a->tower_freq = " << a->tower_freq << '\n';
299 if(a->tower_active) {
300 // Get the pointer from the list
301 return(FindInList(icao, type));
304 if(current_commlist->FindByFreq(a->geod, a->tower_freq, &data, TOWER)) {
305 FGTower* t = new FGTower;
307 (*atc_list)[icao+decimalNumeral(type)] = t;
308 a->tower_active = true;
309 airport_atc_map[icao] = a;
310 //cout << "Initing tower " << icao << " in GetATCPointer()\n";
314 SG_LOG(SG_ATC, SG_ALERT, "ERROR - tower that should exist in FGATCMgr::GetATCPointer for airport " << icao << " not found");
320 case ATIS: case AWOS:
321 SG_LOG(SG_ATC, SG_ALERT, "ERROR - ATIS station should not be requested from FGATCMgr::GetATCPointer");
324 //cout << "IN CASE GROUND" << endl;
325 if(a->ground_active) {
326 // Get the pointer from the list
327 return(FindInList(icao, type));
330 if(current_commlist->FindByFreq(a->geod, a->ground_freq, &data, GROUND)) {
331 FGGround* g = new FGGround;
333 (*atc_list)[icao+decimalNumeral(type)] = g;
334 a->ground_active = true;
335 airport_atc_map[icao] = a;
339 SG_LOG(SG_ATC, SG_ALERT, "ERROR - ground control that should exist in FGATCMgr::GetATCPointer for airport " << icao << " not found");
351 SG_LOG(SG_ATC, SG_ALERT, "ERROR IN FGATCMgr - reached end of GetATCPointer");
352 //cout << "ERROR IN FGATCMgr - reached end of GetATCPointer" << endl;
357 // Return a pointer to an appropriate voice for a given type of ATC
358 // creating the voice if necessary - ie. make sure exactly one copy
359 // of every voice in use exists in memory.
361 // TODO - in the future this will get more complex and dole out country/airport
362 // specific voices, and possible make sure that the same voice doesn't get used
363 // at different airports in quick succession if a large enough selection are available.
364 FGATCVoice* FGATCMgr::GetVoicePointer(const atc_type& type) {
365 // TODO - implement me better - maintain a list of loaded voices and other voices!!
368 case ATIS: case AWOS:
369 #ifdef ENABLE_AUDIO_SUPPORT
370 // Delayed loading fo all available voices, needed because the
371 // soundmanager might not be initialized (at all) at this point.
372 // For now we'll do one hardwired one
374 /* I've loaded the voice even if /sim/sound/pause is true
375 * since I know no way of forcing load of the voice if the user
376 * subsequently switches /sim/sound/audible to true.
377 * (which is the right thing to do -- CLO) :-)
379 if (!voiceOK && fgGetBool("/sim/sound/working")) {
382 voiceOK = v1->LoadVoice("default");
384 } catch ( sg_io_exception & e) {
386 SG_LOG(SG_ATC, SG_ALERT, "Unable to load default voice : "
387 << e.getFormattedMessage().c_str());
412 // Search for ATC stations by frequency
413 void FGATCMgr::FreqSearch(const string navcomm, const int unit) {
416 string ncunit = navcomm + "[" + decimalNumeral(unit) + "]";
417 string commbase = "/instrumentation/" + ncunit;
418 string commfreq = commbase + "/frequencies/selected-mhz";
419 SGPropertyNode_ptr comm_node = fgGetNode(commfreq.c_str(), false);
421 //cout << "FreqSearch: " << ncunit
422 // << " node: " << comm_node << endl;
423 if (!comm_node) return; // no such radio unit
426 double freq = comm_node->getDoubleValue();
427 _aircraftPos = SGGeod::fromDegFt(lon_node->getDoubleValue(),
428 lat_node->getDoubleValue(), elev_node->getDoubleValue());
430 // Query the data store and get the closest match if any
431 //cout << "Will FindByFreq: " << lat << " " << lon << " " << elev
432 // << " freq: " << freq << endl;
433 if(current_commlist->FindByFreq(_aircraftPos, freq, &data)) {
434 //cout << "FoundByFreq: " << freq
435 // << " ident: " << data.ident
436 // << " type: " << data.type << " ***" << endl;
437 // We are in range of something.
440 // Get rid of any *other* service that was on this radio unit:
441 string svc_name = data.ident+decimalNumeral(data.type);
442 ZapOtherService(ncunit, svc_name);
443 // See if the service already exists, possibly connected to
444 // some other radio unit:
445 if (atc_list->count(svc_name)) {
446 // make sure the service knows it's tuned on this radio:
447 FGATC* svc = (*atc_list)[svc_name];
448 svc->active_on[ncunit] = 1;
450 if (data.type == APPROACH) svc->AddPlane("Player");
454 CommRegisterAirport(data.ident, unit, data.type);
456 // This was a switch-case statement but the compiler didn't like
457 // the new variable creation with it.
458 if (data.type == ATIS
459 || data.type == AWOS) (*atc_list)[svc_name] = new FGATIS;
460 else if (data.type == TOWER) (*atc_list)[svc_name] = new FGTower;
461 else if (data.type == GROUND) (*atc_list)[svc_name] = new FGGround;
462 else if (data.type == APPROACH) (*atc_list)[svc_name] = new FGApproach;
463 FGATC* svc = (*atc_list)[svc_name];
465 svc->active_on[ncunit] = 1;
468 if (data.type == APPROACH) svc->AddPlane("Player");
470 // No services in range. Zap any service on this unit.
471 ZapOtherService(ncunit, "x x x");
476 /* I don't think AreaSearch ever gets called */
477 // Search ATC stations by area in order that we appear 'on the radar'
478 void FGATCMgr::AreaSearch() {
479 const string AREA("AREA");
480 // Search for Approach stations
481 comm_list_type approaches;
482 comm_list_iterator app_itr;
484 lon = lon_node->getDoubleValue();
485 lat = lat_node->getDoubleValue();
486 elev = elev_node->getDoubleValue() * SG_FEET_TO_METER;
487 for (atc_list_iterator svc = atc_list->begin(); svc != atc_list->end(); svc++) {
488 MSI &actv = svc->second->active_on;
489 if (actv.count(AREA)) actv[AREA] = 0; // Mark all as maybe not in range
492 // search stations in range
493 int num_app = current_commlist->FindByPos(lon, lat, elev, 100.0, &approaches, APPROACH);
495 //cout << num_app << " approaches found in area search !!!!" << endl;
497 for(app_itr = approaches.begin(); app_itr != approaches.end(); app_itr++) {
498 FGATC* app = FindInList(app_itr->ident, app_itr->type);
499 string svc_name = app_itr->ident+decimalNumeral(app_itr->type);
501 // The station is already in the ATC list
502 app->AddPlane("Player");
504 // Generate the station and put in the ATC list
505 FGApproach* a = new FGApproach;
506 a->SetData(&(*app_itr));
507 a->AddPlane("Player");
508 (*atc_list)[svc_name] = a;
509 //cout << "New area service: " << svc_name << endl;
511 FGATC* svc = (*atc_list)[svc_name];
512 svc->active_on[AREA] = 1;
516 for (atc_list_iterator svc = atc_list->begin(); svc != atc_list->end(); svc++) {
517 MSI &actv = svc->second->active_on;
518 if (!actv.count(AREA)) continue;
519 if (!actv[AREA]) actv.erase(AREA);
520 if (!actv.size()) { // this service no longer active at all
521 cout << "Eradicating area service: " << svc->first << endl;
522 svc->second->SetNoDisplay();
523 svc->second->Update(0);
524 delete (svc->second);
525 atc_list->erase(svc);
526 // Reset the persistent iterator, since any erase() makes it invalid:
527 atc_list_itr = atc_list->begin();
528 // Hope we only move out of one approach-area;
529 // others will not be noticed until next update: