src/FDM/JSBSim.cxx

   1 // JSBsim.cxx -- interface to the JSBsim flight model
   2 //
   3 // Written by Curtis Olson, started February 1999.
   4 //
   5 // Copyright (C) 1999  Curtis L. Olson  - curt@flightgear.org
   6 //
   7 // This program is free software; you can redistribute it and/or
   8 // modify it under the terms of the GNU General Public License as
   9 // published by the Free Software Foundation; either version 2 of the
  10 // License, or (at your option) any later version.
  11 //
  12 // This program is distributed in the hope that it will be useful, but
  13 // WITHOUT ANY WARRANTY; without even the implied warranty of
  14 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15 // General Public License for more details.
  16 //
  17 // You should have received a copy of the GNU General Public License
  18 // along with this program; if not, write to the Free Software
  19 // Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20 //
  21 // $Id$
  22
  23
  24 #include <simgear/compiler.h>
  25
  26 #ifdef FG_MATH_EXCEPTION_CLASH
  27 #  include <math.h>
  28 #endif
  29
  30 #include STL_STRING
  31
  32 #include <simgear/constants.h>
  33 #include <simgear/debug/logstream.hxx>
  34 #include <simgear/math/fg_geodesy.hxx>
  35 #include <simgear/misc/fgpath.hxx>
  36
  37 #include <Scenery/scenery.hxx>
  38
  39 #include <Aircraft/aircraft.hxx>
  40 #include <Controls/controls.hxx>
  41 #include <Main/options.hxx>
  42
  43 #include <FDM/JSBsim/FGFDMExec.h>
  44 #include <FDM/JSBsim/FGAircraft.h>
  45 #include <FDM/JSBsim/FGFCS.h>
  46 #include <FDM/JSBsim/FGPosition.h>
  47 #include <FDM/JSBsim/FGRotation.h>
  48 #include <FDM/JSBsim/FGState.h>
  49 #include <FDM/JSBsim/FGTranslation.h>
  50 #include <FDM/JSBsim/FGAuxiliary.h>
  51 #include <FDM/JSBsim/FGDefs.h>
  52 #include <FDM/JSBsim/FGInitialCondition.h>
  53 #include <FDM/JSBsim/FGTrimLong.h>
  54 #include <FDM/JSBsim/FGAtmosphere.h>
  55
  56 #include "JSBsim.hxx"
  57
  58 /******************************************************************************/
  59
  60 // Initialize the JSBsim flight model, dt is the time increment for
  61 // each subsequent iteration through the EOM
  62
  63 int FGJSBsim::init( double dt ) {
  64
  65
  66
  67   FG_LOG( FG_FLIGHT, FG_INFO, "Starting and initializing JSBsim" );
  68   FG_LOG( FG_FLIGHT, FG_INFO, "  created FDMExec" );
  69
  70   FGPath aircraft_path( current_options.get_fg_root() );
  71   aircraft_path.append( "Aircraft" );
  72
  73   FGPath engine_path( current_options.get_fg_root() );
  74   engine_path.append( "Engine" );
  75
  76   FDMExec.GetState()->Setdt( dt );
  77
  78   FDMExec.GetAircraft()->LoadAircraft( aircraft_path.str(),
  79                                        engine_path.str(),
  80                                        current_options.get_aircraft() );
  81
  82   FG_LOG( FG_FLIGHT, FG_INFO, "  loaded aircraft" <<
  83           current_options.get_aircraft() );
  84
  85   FDMExec.GetAtmosphere()->UseInternal();
  86
  87   FG_LOG( FG_FLIGHT, FG_INFO, "  Initializing JSBsim with:" );
  88
  89   FGInitialCondition *fgic = new FGInitialCondition(&FDMExec);
  90   fgic->SetAltitudeFtIC(get_Altitude());
  91   if((current_options.get_mach() < 0) && (current_options.get_vc() < 0 )) {
  92     fgic->SetUBodyFpsIC(current_options.get_uBody());
  93     fgic->SetVBodyFpsIC(current_options.get_vBody());
  94     fgic->SetWBodyFpsIC(current_options.get_wBody());
  95     FG_LOG(FG_FLIGHT,FG_INFO, "  u,v,w= " << current_options.get_uBody()
  96            << ", " << current_options.get_vBody()
  97            << ", " << current_options.get_wBody());
  98   } else if (current_options.get_vc() < 0) {
  99     fgic->SetMachIC(current_options.get_mach());
 100     FG_LOG(FG_FLIGHT,FG_INFO, "  mach: " << current_options.get_mach() );
 101   } else {
 102     fgic->SetVcalibratedKtsIC(current_options.get_vc());
 103     FG_LOG(FG_FLIGHT,FG_INFO, "  vc: " << current_options.get_vc() );
 104     //this should cover the case in which no speed switches are used
 105     //current_options.get_vc() will return zero by default
 106   }
 107
 108
 109   fgic->SetRollAngleRadIC(get_Phi());
 110   fgic->SetPitchAngleRadIC(get_Theta());
 111   fgic->SetHeadingRadIC(get_Psi());
 112   fgic->SetLatitudeRadIC(get_Latitude());
 113   fgic->SetLongitudeRadIC(get_Longitude());
 114
 115   FDMExec.GetPosition()->SetRunwayRadius(scenery.cur_radius);
 116
 117   FG_LOG( FG_FLIGHT, FG_INFO, "  phi: " <<  get_Phi());
 118   FG_LOG( FG_FLIGHT, FG_INFO, "  theta: " <<  get_Theta() );
 119   FG_LOG( FG_FLIGHT, FG_INFO, "  psi: " <<  get_Psi() );
 120   FG_LOG( FG_FLIGHT, FG_INFO, "  lat: " <<  get_Latitude() );
 121   FG_LOG( FG_FLIGHT, FG_INFO, "  lon: " <<  get_Longitude() );
 122   FG_LOG( FG_FLIGHT, FG_INFO, "  alt: " <<  get_Altitude() );
 123
 124   //must check > 0, != 0 will give bad result if --notrim set
 125   if(current_options.get_trim_mode() == true) {
 126     FG_LOG( FG_FLIGHT, FG_INFO, "  Starting trim..." );
 127     FGTrimLong *fgtrim=new FGTrimLong(&FDMExec,fgic);
 128     fgtrim->DoTrim();
 129     fgtrim->Report();
 130     fgtrim->TrimStats();
 131     fgtrim->ReportState();
 132
 133     controls.set_elevator_trim(FDMExec.GetFCS()->GetPitchTrimCmd());
 134     controls.set_throttle(FGControls::ALL_ENGINES,FDMExec.GetFCS()->GetThrottleCmd(0)/100);
 135
 136     delete fgtrim;
 137     FG_LOG( FG_FLIGHT, FG_INFO, "  Trim complete." );
 138   } else {
 139     FG_LOG( FG_FLIGHT, FG_INFO, "  Initializing without trim" );
 140     FDMExec.GetState()->Initialize(fgic);
 141
 142   }
 143
 144   delete fgic;
 145
 146   FG_LOG( FG_FLIGHT, FG_INFO, "  loaded initial conditions" );
 147
 148   FG_LOG( FG_FLIGHT, FG_INFO, "  set dt" );
 149
 150   FG_LOG( FG_FLIGHT, FG_INFO, "Finished initializing JSBsim" );
 151
 152   copy_from_JSBsim();
 153
 154   return 1;
 155 }
 156
 157 /******************************************************************************/
 158
 159 // Run an iteration of the EOM (equations of motion)
 160
 161 int FGJSBsim::update( int multiloop ) {
 162   double save_alt = 0.0;
 163   double time_step = (1.0 / current_options.get_model_hz()) * multiloop;
 164   double start_elev = get_Altitude();
 165
 166   // lets try to avoid really screwing up the JSBsim model
 167   if ( get_Altitude() < -9000 ) {
 168     save_alt = get_Altitude();
 169     set_Altitude( 0.0 );
 170   }
 171
 172   // copy control positions into the JSBsim structure
 173
 174   FDMExec.GetFCS()->SetDaCmd( controls.get_aileron());
 175   FDMExec.GetFCS()->SetDeCmd( controls.get_elevator());
 176   FDMExec.GetFCS()->SetPitchTrimCmd(controls.get_elevator_trim());
 177   FDMExec.GetFCS()->SetDrCmd( controls.get_rudder());
 178   FDMExec.GetFCS()->SetDfCmd( controls.get_flaps() );
 179   FDMExec.GetFCS()->SetDsbCmd( 0.0 );
 180   FDMExec.GetFCS()->SetDspCmd( 0.0 );
 181   FDMExec.GetFCS()->SetThrottleCmd( FGControls::ALL_ENGINES,
 182                                     controls.get_throttle( 0 ) * 100.0 );
 183
 184   // FCS->SetBrake( controls.get_brake( 0 ) );
 185
 186   // Inform JSBsim of the local terrain altitude; uncommented 5/3/00
 187   //  FDMExec.GetPosition()->SetRunwayElevation(get_Runway_altitude()); // seems to work
 188   FDMExec.GetPosition()->SetRunwayRadius(scenery.cur_radius);
 189
 190   FDMExec.GetAtmosphere()->SetExTemperature(get_Static_temperature());
 191   FDMExec.GetAtmosphere()->SetExPressure(get_Static_pressure());
 192   FDMExec.GetAtmosphere()->SetExDensity(get_Density());
 193   FDMExec.GetAtmosphere()->SetWindNED(get_V_north_airmass(),
 194                                       get_V_east_airmass(),
 195                                       get_V_down_airmass());
 196
 197   for ( int i = 0; i < multiloop; i++ ) {
 198     FDMExec.Run();
 199   }
 200
 201   // printf("%d FG_Altitude = %.2f\n", i, FG_Altitude * 0.3048);
 202   // printf("%d Altitude = %.2f\n", i, Altitude * 0.3048);
 203
 204   // translate JSBsim back to FG structure so that the
 205   // autopilot (and the rest of the sim can use the updated values
 206
 207   copy_from_JSBsim();
 208
 209   // but lets restore our original bogus altitude when we are done
 210
 211   if ( save_alt < -9000.0 ) {
 212     set_Altitude( save_alt );
 213   }
 214
 215   double end_elev = get_Altitude();
 216   if ( time_step > 0.0 ) {
 217     // feet per second
 218     set_Climb_Rate( (end_elev - start_elev) / time_step );
 219   }
 220
 221   return 1;
 222 }
 223
 224 /******************************************************************************/
 225
 226 // Convert from the FGInterface struct to the JSBsim generic_ struct
 227
 228 int FGJSBsim::copy_to_JSBsim() {
 229   return 1;
 230 }
 231
 232 /******************************************************************************/
 233
 234 // Convert from the JSBsim generic_ struct to the FGInterface struct
 235
 236 int FGJSBsim::copy_from_JSBsim() {
 237
 238   // Velocities
 239
 240   set_Velocities_Local( FDMExec.GetPosition()->GetVn(),
 241                         FDMExec.GetPosition()->GetVe(),
 242                         FDMExec.GetPosition()->GetVd() );
 243
 244   set_V_equiv_kts( FDMExec.GetAuxiliary()->GetVequivalentKTS() );
 245
 246   //set_V_calibrated( FDMExec.GetAuxiliary()->GetVcalibratedFPS() );
 247
 248   set_V_calibrated_kts( FDMExec.GetAuxiliary()->GetVcalibratedKTS() );
 249
 250   set_Omega_Body( FDMExec.GetState()->GetParameter(FG_ROLLRATE),
 251                   FDMExec.GetState()->GetParameter(FG_PITCHRATE),
 252                   FDMExec.GetState()->GetParameter(FG_YAWRATE) );
 253
 254   set_Euler_Rates( FDMExec.GetRotation()->Getphi(),
 255                    FDMExec.GetRotation()->Gettht(),
 256                    FDMExec.GetRotation()->Getpsi() );
 257
 258   // ***FIXME*** set_Geocentric_Rates( Latitude_dot, Longitude_dot, Radius_dot );
 259
 260   set_Mach_number( FDMExec.GetTranslation()->GetMach());
 261
 262   // Positions
 263
 264   double lat_geoc = FDMExec.GetPosition()->GetLatitude();
 265   double lon = FDMExec.GetPosition()->GetLongitude();
 266   double alt = FDMExec.GetPosition()->Geth();
 267   double lat_geod, tmp_alt, sl_radius1, sl_radius2, tmp_lat_geoc;
 268
 269   fgGeocToGeod( lat_geoc, EQUATORIAL_RADIUS_M + alt * FEET_TO_METER,
 270                 &lat_geod, &tmp_alt, &sl_radius1 );
 271   fgGeodToGeoc( lat_geod, alt * FEET_TO_METER, &sl_radius2, &tmp_lat_geoc );
 272
 273   FG_LOG( FG_FLIGHT, FG_DEBUG, "lon = " << lon << " lat_geod = " << lat_geod
 274           << " lat_geoc = " << lat_geoc
 275           << " alt = " << alt << " tmp_alt = " << tmp_alt * METER_TO_FEET
 276           << " sl_radius1 = " << sl_radius1 * METER_TO_FEET
 277           << " sl_radius2 = " << sl_radius2 * METER_TO_FEET
 278           << " Equator = " << EQUATORIAL_RADIUS_FT );
 279
 280   set_Geocentric_Position( lat_geoc, lon,
 281                            sl_radius2 * METER_TO_FEET + alt );
 282   set_Geodetic_Position( lat_geod, lon, alt );
 283   set_Euler_Angles( FDMExec.GetRotation()->Getphi(),
 284                     FDMExec.GetRotation()->Gettht(),
 285                     FDMExec.GetRotation()->Getpsi() );
 286
 287   set_Alpha( FDMExec.GetTranslation()->Getalpha() );
 288   set_Beta( FDMExec.GetTranslation()->Getbeta() );
 289
 290   set_Gamma_vert_rad( FDMExec.GetPosition()->GetGamma() );
 291   // set_Gamma_horiz_rad( Gamma_horiz_rad );
 292
 293   /* **FIXME*** */ set_Sea_level_radius( sl_radius2 * METER_TO_FEET );
 294   /* **FIXME*** */ set_Earth_position_angle( 0.0 );
 295
 296   // /* ***FIXME*** */ set_Runway_altitude( 0.0 );
 297
 298   set_sin_lat_geocentric( lat_geoc );
 299   set_cos_lat_geocentric( lat_geoc );
 300   set_sin_cos_longitude( lon );
 301   set_sin_cos_latitude( lat_geod );
 302
 303   return 1;
 304 }
 305
 306 /******************************************************************************/
 307