1 // atis.cxx - routines to generate the ATIS info string
3 // Written by David Luff, started October 2001.
5 // Copyright (C) 2001 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., 675 Mass Ave, Cambridge, MA 02139, USA.
26 #include <simgear/compiler.h>
28 #include <stdlib.h> // atoi()
29 #include <stdio.h> // sprintf
34 #if !defined(SG_HAVE_NATIVE_SGI_COMPILERS)
38 //#include <simgear/debug/logstream.hxx>
39 //#include <simgear/misc/sgstream.hxx>
40 #include <simgear/misc/sg_path.hxx>
42 //#ifndef FG_OLD_WEATHER
43 //sorry, that works only with the new weather system
44 #include <WeatherCM/FGLocalWeatherDatabase.h>
46 //# include <Weather/weather.hxx>
49 #include <Main/fg_props.hxx>
50 #include <Airports/runways.hxx>
53 #include "atislist.hxx"
55 string GetPhoneticIdent(int i) {
56 // TODO - Check i is between 1 and 26 and wrap if necessary
58 case 1 : return("Alpha");
59 case 2 : return("Bravo");
60 case 3 : return("Charlie");
61 case 4 : return("Delta");
62 case 5 : return("Echo");
63 case 6 : return("Foxtrot");
64 case 7 : return("Golf");
65 case 8 : return("Hotel");
66 case 9 : return("Indigo");
67 case 10 : return("Juliet");
68 case 11 : return("Kilo");
69 case 12 : return("Lima");
70 case 13 : return("Mike");
71 case 14 : return("November");
72 case 15 : return("Oscar");
73 case 16 : return("Papa");
74 case 17 : return("Quebec");
75 case 18 : return("Romeo");
76 case 19 : return("Sierra");
77 case 20 : return("Tango");
78 case 21 : return("Uniform");
79 case 22 : return("Victor");
80 case 23 : return("Whiskey");
81 case 24 : return("X-ray");
82 case 25 : return("Yankee");
83 case 26 : return("Zulu");
85 // We shouldn't get here
97 string FGATIS::get_transmission() {
98 //void FGATIS::get_transmission() {
100 string transmission = "";
104 string phonetic_id_string;
105 string time_str = fgGetString("sim/time/gmt-string");
108 sgVec3 position = { lat, lon, elev };
109 FGPhysicalProperty stationweather = WeatherDatabase->get(position);
111 // Only update every so-many loops - FIXME - possibly register this with the event scheduler
112 // Ack this doesn't work since the static counter is shared between all instances of FGATIS
113 // OK, for now the radiostack is handling only calling this every-so-often but that is not really
114 // a proper solution since the atis knows when the transmission is going to change not the radio.
119 // Start with the transmitted station name.
120 transmission += name;
122 transmission += " Information";
124 //cout << "In atis.cxx, time_str = " << time_str << '\n';
125 // Add the recording identifier
126 // For now we will assume we only transmit every hour
127 hours = atoi((time_str.substr(1,2)).c_str()); //Warning - this is fragile if the
128 //time string format changes
129 //cout << "In atis.cxx, hours = " << hours << endl;
130 phonetic_id = current_atislist->GetCallSign(ident, hours, 0);
131 phonetic_id_string = GetPhoneticIdent(phonetic_id);
133 transmission += phonetic_id_string;
135 // Output the recording time. - we'll just output the last whole hour for now.
136 // FIXME - this only gets GMT time but that appears to be all the clock outputs for now
137 //cout << "in atis.cxx, time = " << time_str << endl;
138 transmission = transmission + " Weather " + time_str.substr(0,3) + "00 hours Zulu";
140 // Get the temperature
141 // (Hardwire it for now since the global property returns the temperature at the current altitude
142 //temperature = fgGetDouble("/environment/weather/temperature-K");
143 sprintf(buf, "%i", int(stationweather.Temperature - 273.15));
144 transmission += " Temperature ";
146 transmission += " degrees Celcius";
148 // Get the pressure / altimeter
149 // pressure is: stationweather.AirPressure in Pascal
151 // Get the visibility
152 visibility = fgGetDouble("/environment/visibility-m");
153 sprintf(buf, "%i", int(visibility/1600));
154 transmission += " Visibility ";
156 transmission += " miles";
159 if(fgGetBool("/environment/clouds/status")) {
160 double cloudbase = fgGetDouble("/environment/clouds/altitude-ft");
161 // For some reason the altitude returned doesn't seem to correspond to the actual cloud altitude.
163 // cout << "cloudbase = " << cloudbase << endl;
164 sprintf(buf3, "%i", int(cloudbase));
165 transmission = transmission + " Cloudbase " + buf3 + " feet";
168 // Based on the airport-id and wind get the active runway
170 SGPath path( globals->get_fg_root() );
171 path.append( "Airports" );
172 path.append( "runways.mk4" );
173 FGRunways runways( path.c_str() );
175 //Set the heading to into the wind
176 double wind_x = stationweather.Wind[0];
177 double wind_y = stationweather.Wind[1];
179 double speed = sqrt( wind_x*wind_x + wind_y*wind_y ) * SG_METER_TO_NM / (60.0*60.0);
182 //If no wind use 270degrees
185 transmission += " Winds light and variable";
187 // //normalize the wind to get the direction
188 //wind_x /= speed; wind_y /= speed;
190 hdg = - atan2 ( wind_x, wind_y ) * SG_RADIANS_TO_DEGREES ;
194 //add a description of the wind to the transmission
196 sprintf(buf2, "%s %i %s %i %s", " Winds ", int(speed), " knots from ", int(hdg), " degrees");
197 transmission += buf2;
200 string rwy_no = runways.search(ident, hdg);
201 if(rwy_no != (string)"NN") {
202 transmission += " Landing and departing runway ";
203 transmission += rwy_no;
204 //cout << "in atis.cxx, r.rwy_no = " << rwy_no << " r.id = " << r->id << " r.heading = " << r->heading << endl;
209 // TODO - unhardwire the identifier
210 transmission += " Advise controller on initial contact you have ";
211 transmission += phonetic_id_string;
220 return(transmission);