src/AIModel/AIManager.cxx

   1 // AIManager.cxx  Based on David Luff's AIMgr:
   2 // - a global management type for AI objects
   3 //
   4 // Written by David Culp, started October 2003.
   5 // - davidculp2@comcast.net
   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 #include <cstring>
  22
  23 #include <simgear/math/sg_geodesy.hxx>
  24 #include <simgear/props/props_io.hxx>
  25 #include <simgear/structure/exception.hxx>
  26
  27 #include <Main/globals.hxx>
  28
  29 #include <Airports/simple.hxx>
  30 #include <Traffic/TrafficMgr.hxx>
  31
  32 #include "AIManager.hxx"
  33 #include "AIAircraft.hxx"
  34 #include "AIShip.hxx"
  35 #include "AIBallistic.hxx"
  36 #include "AIStorm.hxx"
  37 #include "AIThermal.hxx"
  38 #include "AICarrier.hxx"
  39 #include "AIStatic.hxx"
  40 #include "AIMultiplayer.hxx"
  41 #include "AITanker.hxx"
  42 #include "AIWingman.hxx"
  43 #include "AIGroundVehicle.hxx"
  44 #include "AIEscort.hxx"
  45
  46 FGAIManager::FGAIManager() {
  47     _dt = 0.0;
  48     mNumAiModels = 0;
  49
  50     for (unsigned i = 0; i < FGAIBase::MAX_OBJECTS; ++i)
  51         mNumAiTypeModels[i] = 0;
  52 }
  53
  54 FGAIManager::~FGAIManager() {
  55     ai_list_iterator ai_list_itr = ai_list.begin();
  56
  57     while(ai_list_itr != ai_list.end()) {
  58         (*ai_list_itr)->unbind();
  59         ++ai_list_itr;
  60     }
  61 }
  62
  63 void
  64 FGAIManager::init() {
  65     root = fgGetNode("sim/ai", true);
  66
  67     enabled = root->getNode("enabled", true)->getBoolValue();
  68
  69     if (!enabled)
  70         return;
  71
  72     thermal_lift_node = fgGetNode("/environment/thermal-lift-fps", true);
  73     wind_from_east_node  = fgGetNode("/environment/wind-from-east-fps",true);
  74     wind_from_north_node = fgGetNode("/environment/wind-from-north-fps",true);
  75
  76     user_latitude_node  = fgGetNode("/position/latitude-deg", true);
  77     user_longitude_node = fgGetNode("/position/longitude-deg", true);
  78     user_altitude_node  = fgGetNode("/position/altitude-ft", true);
  79     user_altitude_agl_node  = fgGetNode("/position/altitude-agl-ft", true);
  80     user_heading_node   = fgGetNode("/orientation/heading-deg", true);
  81     user_pitch_node     = fgGetNode("/orientation/pitch-deg", true);
  82     user_yaw_node       = fgGetNode("/orientation/side-slip-deg", true);
  83     user_roll_node      = fgGetNode("/orientation/roll-deg", true);
  84     user_speed_node     = fgGetNode("/velocities/uBody-fps", true);
  85 }
  86
  87 void
  88 FGAIManager::postinit() {
  89     // postinit, so that it can access the Nasal subsystem
  90     map<string, bool> scenarios;
  91     for (int i = 0 ; i < root->nChildren() ; i++) {
  92         SGPropertyNode *n = root->getChild(i);
  93         if (strcmp(n->getName(), "scenario"))
  94             continue;
  95
  96         string name = n->getStringValue();
  97         if (name.empty())
  98             continue;
  99
 100         if (scenarios.find(name) != scenarios.end()) {
 101             SG_LOG(SG_GENERAL, SG_DEBUG, "won't load scenario '" << name << "' twice");
 102             continue;
 103         }
 104
 105         SG_LOG(SG_GENERAL, SG_ALERT, "loading scenario '" << name << '\'');
 106         processScenario(name);
 107         scenarios[name] = true;
 108     }
 109 }
 110
 111 void
 112 FGAIManager::reinit() {
 113     update(0.0);
 114
 115     ai_list_iterator ai_list_itr = ai_list.begin();
 116
 117     while(ai_list_itr != ai_list.end()) {
 118         (*ai_list_itr)->reinit();
 119         ++ai_list_itr;
 120     }
 121 }
 122
 123 void
 124 FGAIManager::bind() {
 125     root = globals->get_props()->getNode("ai/models", true);
 126     root->tie("count", SGRawValueMethods<FGAIManager, int>(*this,
 127         &FGAIManager::getNumAiObjects));
 128 }
 129
 130 void
 131 FGAIManager::unbind() {
 132     root->untie("count");
 133 }
 134
 135 void
 136 FGAIManager::update(double dt) {
 137     // initialize these for finding nearest thermals
 138     range_nearest = 10000.0;
 139     strength = 0.0;
 140
 141     if (!enabled)
 142         return;
 143
 144     FGTrafficManager *tmgr = (FGTrafficManager*) globals->get_subsystem("Traffic Manager");
 145     _dt = dt;
 146
 147     ai_list_iterator ai_list_itr = ai_list.begin();
 148
 149     while(ai_list_itr != ai_list.end()) {
 150
 151         if ((*ai_list_itr)->getDie()) {
 152             tmgr->release((*ai_list_itr)->getID());
 153             --mNumAiModels;
 154             --(mNumAiTypeModels[(*ai_list_itr)->getType()]);
 155             FGAIBase *base = (*ai_list_itr).get();
 156             SGPropertyNode *props = base->_getProps();
 157
 158             props->setBoolValue("valid", false);
 159             base->unbind();
 160
 161             // for backward compatibility reset properties, so that aircraft,
 162             // which don't know the <valid> property, keep working
 163             // TODO: remove after a while
 164             props->setIntValue("id", -1);
 165             props->setBoolValue("radar/in-range", false);
 166             props->setIntValue("refuel/tanker", false);
 167
 168             ai_list_itr = ai_list.erase(ai_list_itr);
 169         } else {
 170             fetchUserState();
 171             if ((*ai_list_itr)->isa(FGAIBase::otThermal)) {
 172                 FGAIBase *base = (*ai_list_itr).get();
 173                 processThermal((FGAIThermal*)base);
 174             } else {
 175                 (*ai_list_itr)->update(_dt);
 176             }
 177             ++ai_list_itr;
 178         }
 179     }
 180
 181     thermal_lift_node->setDoubleValue( strength );  // for thermals
 182 }
 183
 184 void
 185 FGAIManager::attach(FGAIBase *model)
 186 {
 187     //unsigned idx = mNumAiTypeModels[model->getType()];
 188     const char* typeString = model->getTypeString();
 189     SGPropertyNode* root = globals->get_props()->getNode("ai/models", true);
 190     SGPropertyNode* p;
 191     int i;
 192
 193     // find free index in the property tree, if we have
 194     // more than 10000 mp-aircrafts in the property tree we should optimize the mp-server
 195     for (i = 0; i < 10000; i++) {
 196         p = root->getNode(typeString, i, false);
 197
 198         if (!p || !p->getBoolValue("valid", false))
 199             break;
 200
 201         if (p->getIntValue("id",-1)==model->getID()) {
 202             p->setStringValue("callsign","***invalid node***"); //debug only, should never set!
 203         }
 204     }
 205
 206     p = root->getNode(typeString, i, true);
 207     model->setManager(this, p);
 208     ai_list.push_back(model);
 209     ++mNumAiModels;
 210     ++(mNumAiTypeModels[model->getType()]);
 211     model->init(model->getType()==FGAIBase::otAircraft
 212         || model->getType()==FGAIBase::otMultiplayer
 213         || model->getType()==FGAIBase::otStatic);
 214     model->bind();
 215     p->setBoolValue("valid", true);
 216 }
 217
 218 void
 219 FGAIManager::destroyObject( int ID ) {
 220     ai_list_iterator ai_list_itr = ai_list.begin();
 221
 222     while(ai_list_itr != ai_list.end()) {
 223
 224         if ((*ai_list_itr)->getID() == ID) {
 225             --mNumAiModels;
 226             --(mNumAiTypeModels[(*ai_list_itr)->getType()]);
 227             (*ai_list_itr)->unbind();
 228             ai_list_itr = ai_list.erase(ai_list_itr);
 229         } else
 230             ++ai_list_itr;
 231     }
 232
 233 }
 234
 235 int
 236 FGAIManager::getNumAiObjects(void) const
 237 {
 238     return mNumAiModels;
 239 }
 240
 241 void
 242 FGAIManager::fetchUserState( void ) {
 243
 244     user_latitude  = user_latitude_node->getDoubleValue();
 245     user_longitude = user_longitude_node->getDoubleValue();
 246     user_altitude  = user_altitude_node->getDoubleValue();
 247     user_heading   = user_heading_node->getDoubleValue();
 248     user_pitch     = user_pitch_node->getDoubleValue();
 249     user_yaw       = user_yaw_node->getDoubleValue();
 250     user_speed     = user_speed_node->getDoubleValue() * 0.592484;
 251     user_roll      = user_roll_node->getDoubleValue();
 252     wind_from_east = wind_from_east_node->getDoubleValue();
 253     wind_from_north   = wind_from_north_node->getDoubleValue();
 254     user_altitude_agl = user_altitude_agl_node->getDoubleValue();
 255
 256 }
 257
 258 // only keep the results from the nearest thermal
 259 void
 260 FGAIManager::processThermal( FGAIThermal* thermal ) {
 261     thermal->update(_dt);
 262
 263     if ( thermal->_getRange() < range_nearest ) {
 264         range_nearest = thermal->_getRange();
 265         strength = thermal->getStrength();
 266     }
 267
 268 }
 269
 270
 271
 272 void
 273 FGAIManager::processScenario( const string &filename ) {
 274
 275     SGPropertyNode_ptr scenarioTop = loadScenarioFile(filename);
 276
 277     if (!scenarioTop)
 278         return;
 279
 280     SGPropertyNode* scenarios = scenarioTop->getChild("scenario");
 281
 282     if (!scenarios)
 283         return;
 284
 285     for (int i = 0; i < scenarios->nChildren(); i++) {
 286         SGPropertyNode* scEntry = scenarios->getChild(i);
 287
 288         if (strcmp(scEntry->getName(), "entry"))
 289             continue;
 290         std::string type = scEntry->getStringValue("type", "aircraft");
 291
 292         if (type == "tanker") { // refueling scenarios
 293             FGAITanker* tanker = new FGAITanker;
 294             tanker->readFromScenario(scEntry);
 295             attach(tanker);
 296
 297         } else if (type == "wingman") {
 298             FGAIWingman* wingman = new FGAIWingman;
 299             wingman->readFromScenario(scEntry);
 300             attach(wingman);
 301
 302         } else if (type == "aircraft") {
 303             FGAIAircraft* aircraft = new FGAIAircraft;
 304             aircraft->readFromScenario(scEntry);
 305             attach(aircraft);
 306
 307         } else if (type == "ship") {
 308             FGAIShip* ship = new FGAIShip;
 309             ship->readFromScenario(scEntry);
 310             attach(ship);
 311
 312         } else if (type == "carrier") {
 313             FGAICarrier* carrier = new FGAICarrier;
 314             carrier->readFromScenario(scEntry);
 315             attach(carrier);
 316
 317         } else if (type == "groundvehicle") {
 318             FGAIGroundVehicle* groundvehicle = new FGAIGroundVehicle;
 319             groundvehicle->readFromScenario(scEntry);
 320             attach(groundvehicle);
 321
 322         } else if (type == "escort") {
 323             FGAIEscort* escort = new FGAIEscort;
 324             escort->readFromScenario(scEntry);
 325             attach(escort);
 326
 327         } else if (type == "thunderstorm") {
 328             FGAIStorm* storm = new FGAIStorm;
 329             storm->readFromScenario(scEntry);
 330             attach(storm);
 331
 332         } else if (type == "thermal") {
 333             FGAIThermal* thermal = new FGAIThermal;
 334             thermal->readFromScenario(scEntry);
 335             attach(thermal);
 336
 337         } else if (type == "ballistic") {
 338             FGAIBallistic* ballistic = new FGAIBallistic;
 339             ballistic->readFromScenario(scEntry);
 340             attach(ballistic);
 341
 342         } else if (type == "static") {
 343             FGAIStatic* aistatic = new FGAIStatic;
 344             aistatic->readFromScenario(scEntry);
 345             attach(aistatic);
 346         }
 347
 348     }
 349
 350 }
 351
 352 SGPropertyNode_ptr
 353 FGAIManager::loadScenarioFile(const std::string& filename)
 354 {
 355     SGPath path(globals->get_fg_root());
 356     path.append("AI/" + filename + ".xml");
 357     try {
 358         SGPropertyNode_ptr root = new SGPropertyNode;
 359         readProperties(path.str(), root);
 360         return root;
 361     } catch (const sg_exception &) {
 362         SG_LOG(SG_GENERAL, SG_DEBUG, "Incorrect path specified for AI "
 363             "scenario: \"" << path.str() << "\"");
 364         return 0;
 365     }
 366 }
 367
 368 bool
 369 FGAIManager::getStartPosition(const string& id, const string& pid,
 370                               SGGeod& geodPos, double& hdng, SGVec3d& uvw)
 371 {
 372     bool found = false;
 373     SGPropertyNode* root = fgGetNode("sim/ai", true);
 374     if (!root->getNode("enabled", true)->getBoolValue())
 375         return found;
 376
 377     for (int i = 0 ; (!found) && i < root->nChildren() ; i++) {
 378         SGPropertyNode *aiEntry = root->getChild( i );
 379         if ( !strcmp( aiEntry->getName(), "scenario" ) ) {
 380             string filename = aiEntry->getStringValue();
 381             SGPropertyNode_ptr scenarioTop = loadScenarioFile(filename);
 382             if (scenarioTop) {
 383                 SGPropertyNode* scenarios = scenarioTop->getChild("scenario");
 384                 if (scenarios) {
 385                     for (int i = 0; i < scenarios->nChildren(); i++) {
 386                         SGPropertyNode* scEntry = scenarios->getChild(i);
 387                         std::string type = scEntry->getStringValue("type");
 388                         std::string pnumber = scEntry->getStringValue("pennant-number");
 389                         std::string name = scEntry->getStringValue("name");
 390                         if (type == "carrier" && (pnumber == id || name == id)) {
 391                             SGSharedPtr<FGAICarrier> carrier = new FGAICarrier;
 392                             carrier->readFromScenario(scEntry);
 393
 394                             if (carrier->getParkPosition(pid, geodPos, hdng, uvw)) {
 395                                 found = true;
 396                                 break;
 397                             }
 398                         }
 399                     }
 400                 }
 401             }
 402         }
 403     }
 404     return found;
 405 }
 406
 407 const FGAIBase *
 408 FGAIManager::calcCollision(double alt, double lat, double lon, double fuse_range)
 409 {
 410     // we specify tgt extent (ft) according to the AIObject type
 411     double tgt_ht[]     = {0,  50, 100, 250, 0, 100, 0, 0,  50,  50, 20, 100,  50};
 412     double tgt_length[] = {0, 100, 200, 750, 0,  50, 0, 0, 200, 100, 40, 200, 100};
 413     ai_list_iterator ai_list_itr = ai_list.begin();
 414     ai_list_iterator end = ai_list.end();
 415
 416     while (ai_list_itr != end) {
 417         double tgt_alt = (*ai_list_itr)->_getAltitude();
 418         int type       = (*ai_list_itr)->getType();
 419         tgt_ht[type] += fuse_range;
 420
 421         if (fabs(tgt_alt - alt) > tgt_ht[type] || type == FGAIBase::otBallistic
 422             || type == FGAIBase::otStorm || type == FGAIBase::otThermal ) {
 423                 //SG_LOG(SG_GENERAL, SG_DEBUG, "AIManager: skipping "
 424                 //    << fabs(tgt_alt - alt)
 425                 //    << " "
 426                 //    << type
 427                 //    );
 428                 ++ai_list_itr;
 429                 continue;
 430         }
 431
 432         double tgt_lat = (*ai_list_itr)->_getLatitude();
 433         double tgt_lon = (*ai_list_itr)->_getLongitude();
 434         int id         = (*ai_list_itr)->getID();
 435
 436         double range = calcRange(lat, lon, tgt_lat, tgt_lon);
 437
 438         //SG_LOG(SG_GENERAL, SG_DEBUG, "AIManager:  AI list size "
 439         //    << ai_list.size()
 440         //    << " type " << type
 441         //    << " ID " << id
 442         //    << " range " << range
 443         //    //<< " bearing " << bearing
 444         //    << " alt " << tgt_alt
 445         //    );
 446
 447         tgt_length[type] += fuse_range;
 448
 449         if (range < tgt_length[type]){
 450             SG_LOG(SG_GENERAL, SG_DEBUG, "AIManager: HIT! "
 451                 << " type " << type
 452                 << " ID " << id
 453                 << " range " << range
 454                 << " alt " << tgt_alt
 455                 );
 456             return (*ai_list_itr).get();
 457         }
 458         ++ai_list_itr;
 459     }
 460     return 0;
 461 }
 462
 463 double
 464 FGAIManager::calcRange(double lat, double lon, double lat2, double lon2) const
 465 {
 466     double course, az2, distance;
 467
 468     //calculate the bearing and range of the second pos from the first
 469     geo_inverse_wgs_84(lat, lon, lat2, lon2, &course, &az2, &distance);
 470     distance *= SG_METER_TO_FEET;
 471     return distance;
 472 }
 473
 474 //end AIManager.cxx