src/ATC/AIMgr.cxx

   1 // AIMgr.cxx - implementation of FGAIMgr
   2 // - a global management class for FlightGear generated AI traffic
   3 //
   4 // Written by David Luff, started March 2002.
   5 //
   6 // Copyright (C) 2002  David C Luff - david.luff@nottingham.ac.uk
   7 //
   8 // This program is free software; you can redistribute it and/or
   9 // modify it under the terms of the GNU General Public License as
  10 // published by the Free Software Foundation; either version 2 of the
  11 // License, or (at your option) any later version.
  12 //
  13 // This program is distributed in the hope that it will be useful, but
  14 // WITHOUT ANY WARRANTY; without even the implied warranty of
  15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16 // General Public License for more details.
  17 //
  18 // You should have received a copy of the GNU General Public License
  19 // along with this program; if not, write to the Free Software
  20 // Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21
  22 #include <simgear/misc/sg_path.hxx>
  23
  24 #include <Main/fg_props.hxx>
  25 #include <Main/globals.hxx>
  26 #include <simgear/math/sg_random.h>
  27
  28 #include <list>
  29
  30 #ifdef _MSC_VER
  31 #  include <io.h>
  32 #else
  33 #  include <sys/types.h>        // for directory reading
  34 #  include <dirent.h>           // for directory reading
  35 #endif
  36
  37 #include <Environment/environment_mgr.hxx>
  38 #include <Environment/environment.hxx>
  39
  40 #include "AIMgr.hxx"
  41 #include "AILocalTraffic.hxx"
  42 #include "AIGAVFRTraffic.hxx"
  43 #include "ATCutils.hxx"
  44 #include "commlist.hxx"
  45
  46 SG_USING_STD(list);
  47 SG_USING_STD(cout);
  48
  49 FGAIMgr::FGAIMgr() {
  50         ATC = globals->get_ATC_mgr();
  51         initDone = false;
  52         ai_callsigns_used["CFGFS"] = 1; // so we don't inadvertently use this
  53         // TODO - use the proper user callsign when it becomes user settable.
  54         removalList.clear();
  55         activated.clear();
  56         _havePiperModel = true;
  57 }
  58
  59 FGAIMgr::~FGAIMgr() {
  60         _defaultModel->deRef();
  61         if(_havePiperModel) _piperModel->deRef();
  62 }
  63
  64 void FGAIMgr::init() {
  65         //cout << "AIMgr::init called..." << endl;
  66
  67         // Pointers to user's position
  68         lon_node = fgGetNode("/position/longitude-deg", true);
  69         lat_node = fgGetNode("/position/latitude-deg", true);
  70         elev_node = fgGetNode("/position/altitude-ft", true);
  71
  72         lon = lon_node->getDoubleValue();
  73         lat = lat_node->getDoubleValue();
  74         elev = elev_node->getDoubleValue();
  75
  76         // Load up models at the start to avoid pausing later
  77         // Hack alert - Hardwired paths!!
  78         string planepath = "Aircraft/c172r/Models/c172-dpm.ac";
  79         bool _loadedDefaultOK = true;
  80         try {
  81                 _defaultModel = sgLoad3DModel( globals->get_fg_root(),
  82                                            planepath.c_str(),
  83                                                                            globals->get_props(),
  84                                                                            globals->get_sim_time_sec() );
  85         } catch(sg_exception& e) {
  86                 _loadedDefaultOK = false;
  87         }
  88
  89         if(!_loadedDefaultOK ) {
  90                 // Just load the same 3D model as the default user plane - that's *bound* to exist!
  91                 // TODO - implement robust determination of availability of GA AI aircraft models
  92                 planepath = "Aircraft/c172p/Models/c172p.ac";
  93                 _defaultModel = sgLoad3DModel( globals->get_fg_root(),
  94                                            planepath.c_str(),
  95                                                                            globals->get_props(),
  96                                                                            globals->get_sim_time_sec() );
  97         }
  98
  99         planepath = "Aircraft/pa28-161/Models/pa28-161.ac";
 100         try {
 101                 _piperModel = sgLoad3DModel( globals->get_fg_root(),
 102                                          planepath.c_str(),
 103                                                                          globals->get_props(),
 104                                                                          globals->get_sim_time_sec() );
 105         } catch(sg_exception& e) {
 106                 _havePiperModel = false;
 107         }
 108
 109         // We need to keep one ref of the models open to stop ssg deleting them behind our back!
 110         _defaultModel->ref();
 111         if(_havePiperModel) _piperModel->ref();
 112
 113         // go through the $FG_ROOT/ATC directory and find all *.taxi files
 114         SGPath path(globals->get_fg_root());
 115         path.append("ATC/");
 116         string dir = path.dir();
 117         string ext;
 118         string file, f_ident;
 119         int pos;
 120
 121         ulDir *d;
 122         struct ulDirEnt *de;
 123
 124         if ( (d = ulOpenDir( dir.c_str() )) == NULL ) {
 125                 SG_LOG(SG_ATC, SG_WARN, "cannot open directory " << dir);
 126         } else {
 127                 // load all .taxi files
 128                 while ( (de = ulReadDir(d)) != NULL ) {
 129                         file = de->d_name;
 130                         pos = file.find(".");
 131                         ext = file.substr(pos + 1);
 132                         if(ext == "taxi") {
 133                                 f_ident = file.substr(0, pos);
 134                                 FGAirport a;
 135                                 if(dclFindAirportID(f_ident, &a)) {
 136                                         SGBucket sgb(a.getLongitude(), a.getLatitude());
 137                                         int idx = sgb.gen_index();
 138                                         if(facilities.find(idx) != facilities.end()) {
 139                                                 facilities[idx]->push_back(f_ident);
 140                                         } else {
 141                                                 ID_list_type* apts = new ID_list_type;
 142                                                 apts->push_back(f_ident);
 143                                                 facilities[idx] = apts;
 144                                         }
 145                                         SG_LOG(SG_ATC, SG_BULK, "Mapping " << f_ident << " to bucket " << idx);
 146                                 }
 147                         }
 148                 }
 149                 ulCloseDir(d);
 150         }
 151
 152         // See if are in range at startup and activate if necessary
 153         SearchByPos(15.0);
 154
 155         initDone = true;
 156
 157         //cout << "AIMgr::init done..." << endl;
 158
 159         /*
 160         // TESTING
 161         FGATCAlignedProjection ortho;
 162         ortho.Init(dclGetAirportPos("KEMT"), 205.0);    // Guess of rwy19 heading
 163         //Point3D ip = ortho.ConvertFromLocal(Point3D(6000, 1000, 1000));       // 90 deg entry
 164         //Point3D ip = ortho.ConvertFromLocal(Point3D(-7000, 3000, 1000));      // 45 deg entry
 165         Point3D ip = ortho.ConvertFromLocal(Point3D(1000, -7000, 1000));        // straight-in
 166         ATC->AIRegisterAirport("KEMT");
 167         FGAIGAVFRTraffic* p = new FGAIGAVFRTraffic();
 168         p->SetModel(_defaultModel);
 169         p->Init(ip, "KEMT", GenerateShortForm(GenerateUniqueCallsign()));
 170         ai_list.push_back(p);
 171         traffic[ident].push_back(p);
 172         activated["KEMT"] = 1;
 173         */
 174 }
 175
 176 void FGAIMgr::bind() {
 177 }
 178
 179 void FGAIMgr::unbind() {
 180 }
 181
 182 void FGAIMgr::update(double dt) {
 183         if(!initDone) {
 184                 init();
 185                 SG_LOG(SG_ATC, SG_WARN, "Warning - AIMgr::update(...) called before AIMgr::init()");
 186         }
 187
 188         //cout << activated.size() << '\n';
 189
 190         Point3D userPos = Point3D(lon_node->getDoubleValue(), lat_node->getDoubleValue(), elev_node->getDoubleValue());
 191
 192         // TODO - make these class variables!!
 193         static int i = 0;
 194         static int j = 0;
 195
 196         // Don't update any planes for first 50 runs through - this avoids some possible initialisation anomalies
 197         // Might not need it now we have fade-in though?
 198         if(i < 50) {
 199                 ++i;
 200                 return;
 201         }
 202
 203         if(j == 215) {
 204                 SearchByPos(25.0);
 205                 j = 0;
 206         } else if(j == 200) {
 207                 // Go through the list of activated airports and remove those out of range
 208                 //cout << "The following airports have been activated by the AI system:\n";
 209                 ai_activated_map_iterator apt_itr = activated.begin();
 210                 while(apt_itr != activated.end()) {
 211                         //cout << "FIRST IS " << (*apt_itr).first << '\n';
 212                         if(dclGetHorizontalSeparation(userPos, dclGetAirportPos((*apt_itr).first)) > (35.0 * 1600.0)) {
 213                                 // Then get rid of it and make sure the iterator is left pointing to the next one!
 214                                 string s = (*apt_itr).first;
 215                                 if(traffic.find(s) != traffic.end()) {
 216                                         //cout << "s = " << s << ", traffic[s].size() = " << traffic[s].size() << '\n';
 217                                         if(traffic[s].size()) {
 218                                                 apt_itr++;
 219                                         } else {
 220                                                 //cout << "Erasing " << (*apt_itr).first << " and traffic" << '\n';
 221                                                 activated.erase(apt_itr++);
 222                                                 traffic.erase(s);
 223                                         }
 224                                 } else {
 225                                                 //cout << "Erasing " << (*apt_itr).first << ' ' << (*apt_itr).second << '\n';
 226                                                 activated.erase(apt_itr++);
 227                                 }
 228                         } else {
 229                                 apt_itr++;
 230                         }
 231                 }
 232         } else if(j == 180) {
 233                 // Go through the list of activated airports and do the random airplane generation
 234                 ai_traffic_map_iterator it = traffic.begin();
 235                 while(it != traffic.end()) {
 236                         string s = (*it).first;
 237                         //cout << "s = " << s << " size = " << (*it).second.size() << '\n';
 238                         // Only generate extra traffic if within a certain distance of the user,
 239                         // TODO - maybe take users's tuned freq into account as well.
 240                         double d = dclGetHorizontalSeparation(userPos, dclGetAirportPos(s));
 241                         if(d < (15.0 * 1600.0)) {
 242                                 double cd = 0.0;
 243                                 bool gen = false;
 244                                 //cout << "Size of list is " << (*it).second.size() << " at " << s << '\n';
 245                                 if((*it).second.size()) {
 246                                         FGAIEntity* e = *((*it).second.rbegin());       // Get the last airplane currently scheduled to arrive at this airport.
 247                                         cd = dclGetHorizontalSeparation(e->GetPos(), dclGetAirportPos(s));
 248                                         if(cd < (d < 5000 ? 10000 : d + 5000)) {
 249                                                 gen = true;
 250                                         }
 251                                 } else {
 252                                         gen = true;
 253                                         cd = 0.0;
 254                                 }
 255                                 if(gen) {
 256                                         //cout << "Generating extra traffic at airport " << s << ", at least " << cd << " meters out\n";
 257                                         //GenerateSimpleAirportTraffic(s, cd);
 258                                         GenerateSimpleAirportTraffic(s, cd + 3000.0);   // The random seems a bit wierd - traffic could get far too bunched without the +3000.
 259                                         // TODO - make the anti-random constant variable depending on the ai-traffic level.
 260                                 }
 261                         }
 262                         ++it;
 263                 }
 264         }
 265
 266         ++j;
 267
 268         //cout << "Size of AI list is " << ai_list.size() << '\n';
 269
 270         // TODO - need to add a check of if any activated airports have gone out of range
 271
 272         string rs;      // plane to be removed, if one.
 273         if(removalList.size()) {
 274                 rs = *(removalList.begin());
 275                 removalList.pop_front();
 276         } else {
 277                 rs = "";
 278         }
 279
 280         // Traverse the list of active planes and run all their update methods
 281         // TODO - spread the load - not all planes should need updating every frame.
 282         // Note that this will require dt to be calculated for each plane though
 283         // since they rely on it to calculate distance travelled.
 284         ai_list_itr = ai_list.begin();
 285         while(ai_list_itr != ai_list.end()) {
 286                 FGAIEntity *e = *ai_list_itr;
 287                 if(rs.size() && e->GetCallsign() == rs) {
 288                         //cout << "Removing " << rs << " from ai_list\n";
 289                         ai_list_itr = ai_list.erase(ai_list_itr);
 290                         delete e;
 291                         // This is a hack - we should deref this plane from the airport count!
 292                 } else {
 293                         e->Update(dt);
 294                         ++ai_list_itr;
 295                 }
 296         }
 297
 298         //cout << "Size of AI list is " << ai_list.size() << '\n';
 299 }
 300
 301 void FGAIMgr::ScheduleRemoval(string s) {
 302         //cout << "Scheduling removal of plane " << s << " from AIMgr\n";
 303         removalList.push_back(s);
 304 }
 305
 306 // Activate AI traffic at an airport
 307 void FGAIMgr::ActivateAirport(string ident) {
 308         ATC->AIRegisterAirport(ident);
 309         // TODO - need to start the traffic more randomly
 310         FGAILocalTraffic* local_traffic = new FGAILocalTraffic;
 311         local_traffic->SetModel(_defaultModel); // currently hardwired to cessna.
 312         //local_traffic->Init(ident, IN_PATTERN, TAKEOFF_ROLL);
 313         local_traffic->Init(GenerateShortForm(GenerateUniqueCallsign()), ident);
 314         local_traffic->FlyCircuits(1, true);    // Fly 2 circuits with touch & go in between
 315         ai_list.push_back(local_traffic);
 316         traffic[ident].push_back(local_traffic);
 317         //cout << "******** ACTIVATING AIRPORT, ident = " << ident << '\n';
 318         activated[ident] = 1;
 319 }
 320
 321 // Hack - Generate AI traffic at an airport with no facilities file
 322 void FGAIMgr::GenerateSimpleAirportTraffic(string ident, double min_dist) {
 323         // Ugly hack - don't let VFR Cessnas operate at a hardwired list of major airports
 324         // This will go eventually once airport .xml files specify the traffic profile
 325         if(ident == "KSFO" || ident == "KDFW" || ident == "EGLL" || ident == "KORD" || ident == "KJFK"
 326                            || ident == "KMSP" || ident == "KLAX" || ident == "KBOS" || ident == "KEDW"
 327                                            || ident == "KSEA" || ident == "EHAM") {
 328                 return;
 329         }
 330
 331         /*
 332         // TODO - check for military airports - this should be in the current data.
 333         // UGGH - there's no point at the moment - everything is labelled civil in basic.dat!
 334         FGAirport a;
 335         if(dclFindAirportID(ident, &a)) {
 336                 cout << "CODE IS " << a.code << '\n';
 337         } else {
 338                 // UG - can't find the airport!
 339                 return;
 340         }
 341         */
 342
 343         Point3D aptpos = dclGetAirportPos(ident);       // TODO - check for elev of -9999
 344         //cout << "ident = " << ident << ", elev = " << aptpos.elev() << '\n';
 345
 346         // Operate from airports at 3000ft and below only to avoid the default cloud layers and since we don't degrade AI performance with altitude.
 347         if(aptpos.elev() > 3000) {
 348                 //cout << "High alt airports not yet supported - returning\n";
 349                 return;
 350         }
 351
 352         // Rough hack for plane type - make 70% of the planes cessnas, the rest pipers.
 353         bool cessna = true;
 354
 355         // Get the time and only operate VFR in the (approximate) daytime.
 356         struct tm *t = globals->get_time_params()->getGmt();
 357         int loc_time = t->tm_hour + int(aptpos.lon() / (360.0 / 24.0));
 358         while (loc_time < 0)
 359                 loc_time += 24;
 360         while (loc_time >= 24)
 361                 loc_time -= 24;
 362
 363         //cout << "loc_time = " << loc_time << '\n';
 364         if(loc_time < 7 || loc_time > 19) return;
 365
 366         // Check that the visibility is OK for IFR operation.
 367         double visibility;
 368         FGEnvironment stationweather =
 369             ((FGEnvironmentMgr *)globals->get_subsystem("environment"))
 370               ->getEnvironment(aptpos.lat(), aptpos.lon(), aptpos.elev());      // TODO - check whether this should take ft or m for elev.
 371         visibility = stationweather.get_visibility_m();
 372         // Technically we can do VFR down to 1 mile (1600m) but that's pretty murky!
 373         //cout << "vis = " << visibility << '\n';
 374         if(visibility < 3000) return;
 375
 376         ATC->AIRegisterAirport(ident);
 377
 378         // Next - get the distance from user to the airport.
 379         Point3D userpos = Point3D(lon_node->getDoubleValue(), lat_node->getDoubleValue(), elev_node->getDoubleValue());
 380         double d = dclGetHorizontalSeparation(userpos, aptpos); // in meters
 381
 382         int lev = fgGetInt("/sim/ai-traffic/level");
 383         if(lev < 1 || lev > 3) lev = 2;
 384         if(visibility < 6000) lev = 1;
 385         //cout << "level = " << lev << '\n';
 386
 387         // Next - generate any local / circuit traffic
 388
 389         /*
 390         // --------------------------- THIS BLOCK IS JUST FOR TESTING - COMMENT OUT BEFORE RELEASE ---------------
 391         // Finally - generate VFR approaching traffic
 392         //if(d > 2000) {
 393         if(ident == "KPOC") {
 394                 double ad = 2000.0;
 395                 double avd = 3000.0;    // average spacing of arriving traffic in meters - relate to airport business and AI density setting one day!
 396                 //while(ad < (d < 10000 ? 12000 : d + 2000)) {
 397                 for(int i=0; i<8; ++i) {
 398                         double dd = sg_random() * avd;
 399                         // put a minimum spacing in for now since I don't think tower will cope otherwise!
 400                         if(dd < 1500) dd = 1500;
 401                         //ad += dd;
 402                         ad += dd;
 403                         double dir = int(sg_random() * 36);
 404                         if(dir == 36) dir--;
 405                         dir *= 10;
 406                         //dir = 180;
 407                         if(sg_random() < 0.3) cessna = false;
 408                         else cessna = true;
 409                         string s = GenerateShortForm(GenerateUniqueCallsign(), (cessna ? "Cessna-" : "Piper-"));
 410                         FGAIGAVFRTraffic* t = new FGAIGAVFRTraffic();
 411                         t->SetModel(cessna ? _defaultModel : _piperModel);
 412                         //cout << "Generating VFR traffic " << s << " inbound to " << ident << " " << ad << " meters out from " << dir << " degrees\n";
 413                         Point3D tpos = dclUpdatePosition(aptpos, dir, 6.0, ad);
 414                         if(tpos.elev() > (aptpos.elev() + 3000.0)) tpos.setelev(aptpos.elev() + 3000.0);
 415                         t->Init(tpos, ident, s);
 416                         ai_list.push_back(t);
 417                 }
 418         }
 419         activated[ident] = 1;
 420         return;
 421         //---------------------------------------------------------------------------------------------------
 422         */
 423
 424         double ad;   // Minimum distance out of first arriving plane in meters.
 425         double mind; // Minimum spacing of traffic in meters
 426         double avd;  // average spacing of arriving traffic in meters - relate to airport business and AI density setting one day!
 427         // Finally - generate VFR approaching traffic
 428         //if(d > 2000) {
 429         if(1) {
 430                 if(lev == 3) {
 431                         ad = 5000.0;
 432                         mind = 2000.0;
 433                         avd = 6000.0;
 434                 } else if(lev == 2) {
 435                         ad = 8000.0;
 436                         mind = 4000.0;
 437                         avd = 10000.0;
 438                 } else {
 439                         ad = 9000.0;    // Start the first aircraft at least 9K out for now.
 440                         mind = 6000.0;
 441                         avd = 15000.0;
 442                 }
 443                 /*
 444                 // Check if there is already arriving traffic at this airport
 445                 cout << "BING A " << ident << '\n';
 446                 if(traffic.find(ident) != traffic.end()) {
 447                         cout << "BING B " << ident << '\n';
 448                         ai_list_type lst = traffic[ident];
 449                         cout << "BING C " << ident << '\n';
 450                         if(lst.size()) {
 451                                 cout << "BING D " << ident << '\n';
 452                                 double cd = dclGetHorizontalSeparation(aptpos, (*lst.rbegin())->GetPos());
 453                                 cout << "ident = " << ident << ", cd = " << cd << '\n';
 454                                 if(cd > ad) ad = cd;
 455                         }
 456                 }
 457                 */
 458                 if(min_dist != 0) ad = min_dist;
 459                 //cout << "ident = " << ident << ", ad = " << ad << '\n';
 460                 while(ad < (d < 5000 ? 15000 : d + 10000)) {
 461                         double dd = mind + (sg_random() * (avd - mind));
 462                         ad += dd;
 463                         double dir = int(sg_random() * 36);
 464                         if(dir == 36) dir--;
 465                         dir *= 10;
 466
 467                         if(sg_random() < 0.3) cessna = false;
 468                         else cessna = true;
 469                         string s = GenerateShortForm(GenerateUniqueCallsign(), (cessna ? "Cessna-" : "Piper-"));
 470                         FGAIGAVFRTraffic* t = new FGAIGAVFRTraffic();
 471                         t->SetModel(cessna ? _defaultModel : (_havePiperModel ? _piperModel : _defaultModel));
 472                         //cout << "Generating VFR traffic " << s << " inbound to " << ident << " " << ad << " meters out from " << dir << " degrees\n";
 473                         Point3D tpos = dclUpdatePosition(aptpos, dir, 6.0, ad);
 474                         if(tpos.elev() > (aptpos.elev() + 3000.0)) tpos.setelev(aptpos.elev() + 3000.0);        // FEET yuk :-(
 475                         t->Init(tpos, ident, s);
 476                         ai_list.push_back(t);
 477                         traffic[ident].push_back(t);
 478                 }
 479         }
 480 }
 481
 482 /*
 483 // Generate a VFR arrival at airport apt, at least distance d (meters) out.
 484 void FGAIMgr::GenerateVFRArrival(string apt, double d) {
 485 }
 486 */
 487
 488 // Search for valid airports in the vicinity of the user and activate them if necessary
 489 void FGAIMgr::SearchByPos(double range) {
 490         //cout << "In SearchByPos(...)" << endl;
 491
 492         // get bucket number for plane position
 493         lon = lon_node->getDoubleValue();
 494         lat = lat_node->getDoubleValue();
 495         elev = elev_node->getDoubleValue() * SG_FEET_TO_METER;
 496         SGBucket buck(lon, lat);
 497
 498         // get neigboring buckets
 499         int bx = (int)( range*SG_NM_TO_METER / buck.get_width_m() / 2);
 500         //cout << "bx = " << bx << endl;
 501         int by = (int)( range*SG_NM_TO_METER / buck.get_height_m() / 2 );
 502         //cout << "by = " << by << endl;
 503
 504         // Search for airports with facitities files --------------------------
 505         // loop over bucket range
 506         for ( int i=-bx; i<=bx; i++) {
 507                 //cout << "i loop\n";
 508                 for ( int j=-by; j<=by; j++) {
 509                         //cout << "j loop\n";
 510                         buck = sgBucketOffset(lon, lat, i, j);
 511                         long int bucket = buck.gen_index();
 512                         //cout << "bucket is " << bucket << endl;
 513                         if(facilities.find(bucket) != facilities.end()) {
 514                                 ID_list_type* apts = facilities[bucket];
 515                                 ID_list_iterator current = apts->begin();
 516                                 ID_list_iterator last = apts->end();
 517
 518                                 //cout << "Size of apts is " << apts->size() << endl;
 519
 520                                 //double rlon = lon * SGD_DEGREES_TO_RADIANS;
 521                                 //double rlat = lat * SGD_DEGREES_TO_RADIANS;
 522                                 //Point3D aircraft = sgGeodToCart( Point3D(rlon, rlat, elev) );
 523                                 //Point3D airport;
 524                                 for(; current != last; ++current) {
 525                                         //cout << "Found " << *current << endl;;
 526                                         if(activated.find(*current) == activated.end()) {
 527                                                 //cout << "Activating " << *current << endl;
 528                                                 //FGAirport a;
 529                                                 //if(dclFindAirportID(*current, &a)) {
 530                                                         //      // We can do something here based on distance from the user if we wish.
 531                                                 //}
 532                                                 //string s = *current;
 533                                                 //cout << "s = " << s << '\n';
 534                                                 ActivateAirport(*current);
 535                                                 //ActivateSimpleAirport(*current);      // TODO - put this back to ActivateAirport when that code is done.
 536                                                 //cout << "Activation done" << endl;
 537                                         } else {
 538                                                 //cout << *current << " already activated" << endl;
 539                                         }
 540                                 }
 541                         }
 542                 }
 543         }
 544         //-------------------------------------------------------------
 545
 546         // Search for any towered airports in the vicinity ------------
 547         comm_list_type towered;
 548         comm_list_iterator twd_itr;
 549
 550         int num_twd = current_commlist->FindByPos(lon, lat, elev, range, &towered, TOWER);
 551         if (num_twd != 0) {
 552                 double closest = 1000000;
 553                 string s = "";
 554                 for(twd_itr = towered.begin(); twd_itr != towered.end(); twd_itr++) {
 555                         // Only activate the closest airport not already activated each time.
 556                         if(activated.find(twd_itr->ident) == activated.end()) {
 557                                 double sep = dclGetHorizontalSeparation(Point3D(lon, lat, elev), dclGetAirportPos(twd_itr->ident));
 558                                 if(sep < closest) {
 559                                         closest = sep;
 560                                         s = twd_itr->ident;
 561                                 }
 562
 563                         }
 564                 }
 565                 if(s.size()) {
 566                         // TODO - find out why empty strings come through here when all in-range airports done.
 567                         GenerateSimpleAirportTraffic(s);
 568                         //cout << "**************ACTIVATING SIMPLE AIRPORT, ident = " << s << '\n';
 569                         activated[s] = 1;
 570                 }
 571         }
 572 }
 573
 574 string FGAIMgr::GenerateCallsign() {
 575         // For now we'll just generate US callsigns until we can regionally identify airports.
 576         string s = "N";
 577         // Add 3 to 5 numbers and make up to 5 with letters.
 578         //sg_srandom_time();
 579         double d = sg_random();
 580         int n = int(d * 3);
 581         if(n == 3) --n;
 582         //cout << "First n, n = " << n << '\n';
 583         int j = 3 + n;
 584         //cout << "j = " << j << '\n';
 585         for(int i=0; i<j; ++i) {
 586                 int n = int(sg_random() * 10);
 587                 if(n == 10) --n;
 588                 s += (char)('0' + n);
 589         }
 590         for(int i=j; i<5; ++i) {
 591                 int n = int(sg_random() * 26);
 592                 if(n == 26) --n;
 593                 //cout << "Alpha, n = " << n << '\n';
 594                 s += (char)('A' + n);
 595         }
 596         //cout << "s = " << s << '\n';
 597         return(s);
 598 }
 599
 600 string FGAIMgr::GenerateUniqueCallsign() {
 601         while(1) {
 602                 string s = GenerateCallsign();
 603                 if(!ai_callsigns_used[s]) {
 604                         ai_callsigns_used[s] = 1;
 605                         return(s);
 606                 }
 607         }
 608 }
 609
 610 // This will be moved somewhere else eventually!!!!
 611 string FGAIMgr::GenerateShortForm(string callsign, string plane_str, bool local) {
 612         //cout << callsign << '\n';
 613         string s;
 614         if(local) s = "Trainer-";
 615         else s = plane_str;
 616         for(int i=3; i>0; --i) {
 617                 char c = callsign[callsign.size() - i];
 618                 //cout << c << '\n';
 619                 string tmp = "";
 620                 tmp += c;
 621                 if(isalpha(c)) s += GetPhoneticIdent(c);
 622                 else s += ConvertNumToSpokenDigits(tmp);
 623                 if(i > 1) s += '-';
 624         }
 625         return(s);
 626 }