private string DeliverPropagationPath(string paramstr)
{
string json = "";
// set default values
string mycallstr = "";
string mylocstr = "";
string dxcallstr = "";
string dxlocstr = "";
string bandstr = "";
BAND band = Properties.Settings.Default.Band;
// get parameters
try
{
if (paramstr.Contains("?"))
{
// OK, we have parameters --> cut them out and make all uppercase
paramstr = paramstr.Substring(paramstr.IndexOf("?") + 1).ToUpper();
var pars = System.Web.HttpUtility.ParseQueryString(paramstr);
mycallstr = pars.Get("MYCALL");
mylocstr = pars.Get("MYLOC");
dxcallstr = pars.Get("DXCALL");
dxlocstr = pars.Get("DXLOC");
bandstr = pars.Get("BAND");
}
}
catch (Exception ex)
{
// return error
return("Error while parsing parameters!");
}
// check parameters
if (!Callsign.Check(mycallstr))
{
return("Error: " + mycallstr + " is not a valid callsign!");
}
if (!Callsign.Check(dxcallstr))
{
return("Error: " + dxcallstr + " is not a valid callsign!");
}
if (!String.IsNullOrEmpty(mylocstr) && !MaidenheadLocator.Check(mylocstr))
{
return("Error: " + mylocstr + " is not a valid Maidenhead locator!");
}
if (!String.IsNullOrEmpty(dxlocstr) && !MaidenheadLocator.Check(dxlocstr))
{
return("Error: " + dxlocstr + " is not a valid Maidenhead locator!");
}
// set band to currently selected if empty
if (string.IsNullOrEmpty(bandstr))
{
band = Properties.Settings.Default.Band;
}
else
{
band = Bands.ParseStringValue(bandstr);
}
if (band == BAND.BNONE)
{
return("Error: " + bandstr + " is not a valid band value!");
}
// search call in station database, return empty string if not found
LocationDesignator myloc = LocationFind(mycallstr, mylocstr);
if (myloc == null)
{
return("Error: MyLocation not found in database!");
}
LocationDesignator dxloc = LocationFind(dxcallstr, dxlocstr);
if (dxloc == null)
{
return("Error: DXLocation not found in database!");
}
// get qrv info or create default
QRVDesignator myqrv = StationData.Database.QRVFindOrCreateDefault(myloc.Call, myloc.Loc, band);
// set qrv defaults if zero
if (myqrv.AntennaHeight == 0)
{
myqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (myqrv.AntennaGain == 0)
{
myqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (myqrv.Power == 0)
{
myqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// get qrv info or create default
QRVDesignator dxqrv = StationData.Database.QRVFindOrCreateDefault(dxloc.Call, dxloc.Loc, band);
// set qrv defaults if zero
if (dxqrv.AntennaHeight == 0)
{
dxqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (dxqrv.AntennaGain == 0)
{
dxqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (dxqrv.Power == 0)
{
dxqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// find local obstruction, if any
LocalObstructionDesignator o = ElevationData.Database.LocalObstructionFind(myloc.Lat, myloc.Lon, Properties.Settings.Default.ElevationModel);
double mybearing = LatLon.Bearing(myloc.Lat, myloc.Lon, dxloc.Lat, dxloc.Lon);
double myobstr = (o != null) ? o.GetObstruction(myqrv.AntennaHeight, mybearing) : double.MinValue;
// get or calculate propagation path
PropagationPathDesignator ppath = PropagationData.Database.PropagationPathFindOrCreateFromLatLon(
this,
myloc.Lat,
myloc.Lon,
GetElevation(myloc.Lat, myloc.Lon) + myqrv.AntennaHeight,
dxloc.Lat,
dxloc.Lon,
GetElevation(dxloc.Lat, dxloc.Lon) + dxqrv.AntennaHeight,
Bands.ToGHz(band),
LatLon.Earth.Radius * Properties.Settings.Default.Path_Band_Settings[band].K_Factor,
Properties.Settings.Default.Path_Band_Settings[band].F1_Clearance,
ElevationData.Database.GetDefaultStepWidth(Properties.Settings.Default.ElevationModel),
Properties.Settings.Default.ElevationModel,
myobstr);
if (ppath == null)
{
return(json);
}
// add additional info to ppath
ppath.Location1 = myloc;
ppath.Location2 = dxloc;
ppath.QRV1 = myqrv;
ppath.QRV2 = dxqrv;
// convert path to json
json = ppath.ToJSON();
return(json);
}
private string DeliverNearestPlanes(string paramstr, List <PlaneInfo> allplanes)
{
string json = "";
// set default values
string mycallstr = "";
string mylocstr = "";
string dxcallstr = "";
string dxlocstr = "";
string bandstr = "";
BAND band = Properties.Settings.Default.Band;
// get parameters
try
{
if (paramstr.Contains("?"))
{
// OK, we have parameters --> cut them out and make all uppercase
paramstr = paramstr.Substring(paramstr.IndexOf("?") + 1).ToUpper();
var pars = System.Web.HttpUtility.ParseQueryString(paramstr);
mycallstr = pars.Get("MYCALL");
mylocstr = pars.Get("MYLOC");
dxcallstr = pars.Get("DXCALL");
dxlocstr = pars.Get("DXLOC");
bandstr = pars.Get("BAND");
}
}
catch (Exception ex)
{
// return error
return("Error while parsing parameters!");
}
// check parameters
if (!Callsign.Check(mycallstr))
{
return("Error: " + mycallstr + " is not a valid callsign!");
}
if (!Callsign.Check(dxcallstr))
{
return("Error: " + dxcallstr + " is not a valid callsign!");
}
if (!String.IsNullOrEmpty(mylocstr) && !MaidenheadLocator.Check(mylocstr))
{
return("Error: " + mylocstr + " is not a valid Maidenhead locator!");
}
if (!String.IsNullOrEmpty(dxlocstr) && !MaidenheadLocator.Check(dxlocstr))
{
return("Error: " + dxlocstr + " is not a valid Maidenhead locator!");
}
// set band to currently selected if empty
if (string.IsNullOrEmpty(bandstr))
{
band = Properties.Settings.Default.Band;
}
else
{
band = Bands.ParseStringValue(bandstr);
}
if (band == BAND.BNONE)
{
return("Error: " + bandstr + " is not a valid band value!");
}
// search call in station database, return empty string if not found
LocationDesignator myloc = LocationFind(mycallstr, mylocstr);
if (myloc == null)
{
return("Error: MyLocation not found in database!");
}
LocationDesignator dxloc = LocationFind(dxcallstr, dxlocstr);
if (dxloc == null)
{
return("Error: DXLocation not found in database!");
}
// get qrv info or create default
QRVDesignator myqrv = StationData.Database.QRVFindOrCreateDefault(myloc.Call, myloc.Loc, band);
// set qrv defaults if zero
if (myqrv.AntennaHeight == 0)
{
myqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (myqrv.AntennaGain == 0)
{
myqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (myqrv.Power == 0)
{
myqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// get qrv info or create default
QRVDesignator dxqrv = StationData.Database.QRVFindOrCreateDefault(dxloc.Call, dxloc.Loc, band);
// set qrv defaults if zero
if (dxqrv.AntennaHeight == 0)
{
dxqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (dxqrv.AntennaGain == 0)
{
dxqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (dxqrv.Power == 0)
{
dxqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// find local obstruction, if any
LocalObstructionDesignator o = ElevationData.Database.LocalObstructionFind(myloc.Lat, myloc.Lon, Properties.Settings.Default.ElevationModel);
double mybearing = LatLon.Bearing(myloc.Lat, myloc.Lon, dxloc.Lat, dxloc.Lon);
double myobstr = (o != null) ? o.GetObstruction(myqrv.AntennaHeight, mybearing) : double.MinValue;
// get or calculate propagation path
PropagationPathDesignator ppath = PropagationData.Database.PropagationPathFindOrCreateFromLatLon(
this,
myloc.Lat,
myloc.Lon,
GetElevation(myloc.Lat, myloc.Lon) + myqrv.AntennaHeight,
dxloc.Lat,
dxloc.Lon,
GetElevation(dxloc.Lat, dxloc.Lon) + dxqrv.AntennaHeight,
Bands.ToGHz(band),
LatLon.Earth.Radius * Properties.Settings.Default.Path_Band_Settings[band].K_Factor,
Properties.Settings.Default.Path_Band_Settings[band].F1_Clearance,
ElevationData.Database.GetDefaultStepWidth(Properties.Settings.Default.ElevationModel),
Properties.Settings.Default.ElevationModel,
myobstr);
if (ppath == null)
{
return(json);
}
// add additional info to ppath
ppath.Location1 = myloc;
ppath.Location2 = dxloc;
ppath.QRV1 = myqrv;
ppath.QRV2 = dxqrv;
/*
* // estimate positions according to time
* DateTime time = DateTime.UtcNow;
* foreach(PlaneInfo plane in allplanes.Planes)
* {
* // change speed to km/h
* double speed = plane.Speed_kmh;
* // calculate distance after timespan
* double dist = speed * (time - allplanes.At).TotalHours;
* LatLon.GPoint newpos = LatLon.DestinationPoint(plane.Lat, plane.Lon, plane.Track, dist);
* plane.Lat = newpos.Lat;
* plane.Lon = newpos.Lon;
* plane.Time = time;
* }
*/
// get nearest planes
List <PlaneInfo> nearestplanes = AircraftData.Database.GetNearestPlanes(DateTime.UtcNow, ppath, allplanes, Properties.Settings.Default.Planes_Filter_Max_Circumcircle, Properties.Settings.Default.Path_Band_Settings[band].MaxDistance, Properties.Settings.Default.Planes_MaxAlt);
// convert nearestplanes to json
JsonSerializerSettings settings = new JsonSerializerSettings();
settings.DateTimeZoneHandling = DateTimeZoneHandling.Utc;
settings.FloatFormatHandling = FloatFormatHandling.String;
settings.Formatting = Newtonsoft.Json.Formatting.Indented;
json = JsonConvert.SerializeObject(nearestplanes, settings);
return(json);
}
private string DeliverElevationPath(string paramstr)
{
string json = "";
// set default values
string mycallstr = "";
string mylocstr = "";
string dxcallstr = "";
string dxlocstr = "";
BAND band = Properties.Settings.Default.Band;
// get parameters
try
{
if (paramstr.Contains("?"))
{
// OK, we have parameters --> cut them out and make all uppercase
paramstr = paramstr.Substring(paramstr.IndexOf("?") + 1).ToUpper();
var pars = System.Web.HttpUtility.ParseQueryString(paramstr);
mycallstr = pars.Get("MYCALL");
mylocstr = pars.Get("MYLOC");
dxcallstr = pars.Get("DXCALL");
dxlocstr = pars.Get("DXLOC");
}
}
catch (Exception ex)
{
// return error
return("Error while parsing parameters!");
}
// check parameters
if (!Callsign.Check(mycallstr))
{
return("Error: " + mycallstr + " is not a valid callsign!");
}
if (!Callsign.Check(dxcallstr))
{
return("Error: " + dxcallstr + " is not a valid callsign!");
}
if (!String.IsNullOrEmpty(mylocstr) && !MaidenheadLocator.Check(mylocstr))
{
return("Error: " + mylocstr + " is not a valid Maidenhead locator!");
}
if (!String.IsNullOrEmpty(dxlocstr) && !MaidenheadLocator.Check(dxlocstr))
{
return("Error: " + dxlocstr + " is not a valid Maidenhead locator!");
}
// search call in station database, return empty string if not found
LocationDesignator myloc = LocationFind(mycallstr, mylocstr);
if (myloc == null)
{
return("Error: MyLocation not found in database!");
}
LocationDesignator dxloc = LocationFind(dxcallstr, dxlocstr);
if (dxloc == null)
{
return("Error: DXLocation not found in database!");
}
// get qrv info or create default
QRVDesignator myqrv = StationData.Database.QRVFindOrCreateDefault(myloc.Call, myloc.Loc, band);
// set qrv defaults if zero
if (myqrv.AntennaHeight == 0)
{
myqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (myqrv.AntennaGain == 0)
{
myqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (myqrv.Power == 0)
{
myqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// get qrv info or create default
QRVDesignator dxqrv = StationData.Database.QRVFindOrCreateDefault(dxloc.Call, dxloc.Loc, band);
// set qrv defaults if zero
if (dxqrv.AntennaHeight == 0)
{
dxqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(band);
}
if (dxqrv.AntennaGain == 0)
{
dxqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(band);
}
if (dxqrv.Power == 0)
{
dxqrv.Power = StationData.Database.QRVGetDefaultPower(band);
}
// get or calculate elevation path
ElevationPathDesignator epath = ElevationData.Database.ElevationPathFindOrCreateFromLatLon(
this,
myloc.Lat,
myloc.Lon,
dxloc.Lat,
dxloc.Lon,
ElevationData.Database.GetDefaultStepWidth(Properties.Settings.Default.ElevationModel),
Properties.Settings.Default.ElevationModel);
if (epath == null)
{
return(json);
}
// add additional info to ppath
epath.Location1 = myloc;
epath.Location2 = dxloc;
epath.QRV1 = myqrv;
epath.QRV2 = dxqrv;
// convert path to json
json = epath.ToJSON();
return(json);
}
private string DeliverQRV(string paramstr)
{
string json = "";
// set default values
string callstr = "";
string locstr = "";
string bandstr = "";
BAND band = Properties.Settings.Default.Band;
// get parameters
try
{
if (paramstr.Contains("?"))
{
// OK, we have parameters --> cut them out and make all uppercase
paramstr = paramstr.Substring(paramstr.IndexOf("?") + 1).ToUpper();
var pars = System.Web.HttpUtility.ParseQueryString(paramstr);
callstr = pars.Get("CALL");
locstr = pars.Get("LOC");
bandstr = pars.Get("BAND");
}
}
catch (Exception ex)
{
// return error
return("Error while parsing parameters!");
}
// check parameters
if (!Callsign.Check(callstr))
{
return("Error: " + callstr + " is not a valid callsign!");
}
if (!MaidenheadLocator.Check(locstr))
{
return("Error: " + locstr + " is not a valid Maidenhead locator!");
}
// set band to currently selected if empty
if (string.IsNullOrEmpty(bandstr))
{
band = Properties.Settings.Default.Band;
}
else
{
band = Bands.ParseStringValue(bandstr);
}
if (band == BAND.BNONE)
{
return("Error: " + bandstr + " is not a valid band value!");
}
// search call in station database, return empty string if not found
if (band != BAND.BALL)
{
QRVDesignator qrv = StationData.Database.QRVFind(callstr, locstr, band);
if (qrv == null)
{
return("Error: QRV info not found in database!");
}
json = qrv.ToJSON();
return(json);
}
List <QRVDesignator> qrvs = StationData.Database.QRVFind(callstr, locstr);
if ((qrvs == null) || (qrvs.Count() == 0))
{
return("Error: QRV info not found in database!");
}
JsonSerializerSettings settings = new JsonSerializerSettings();
settings.DateTimeZoneHandling = DateTimeZoneHandling.Utc;
settings.FloatFormatHandling = FloatFormatHandling.String;
settings.Formatting = Newtonsoft.Json.Formatting.Indented;
json = JsonConvert.SerializeObject(qrvs, settings);
return(json);
}
protected override void OnDoWork(DoWorkEventArgs e)
{
// get all parameters
BACKGROUNDUPDATERSTARTOPTIONS Options = (BACKGROUNDUPDATERSTARTOPTIONS)e.Argument;
// get update interval
int interval = (int)Properties.Settings.Default.Background_Update_Period * 60;
do
{
if (Properties.Settings.Default.Background_Calculations_Enable)
{
// get all parameters
// set name and stepwidth according to model
switch (Model)
{
case ELEVATIONMODEL.GLOBE:
Name = "GLOBE";
StepWidth = ElevationData.Database.GetDefaultStepWidth(ELEVATIONMODEL.GLOBE);
break;
case ELEVATIONMODEL.SRTM3:
Name = "SRTM3";
StepWidth = ElevationData.Database.GetDefaultStepWidth(ELEVATIONMODEL.SRTM3);
break;
case ELEVATIONMODEL.SRTM1:
Name = "SRTM1";
StepWidth = ElevationData.Database.GetDefaultStepWidth(ELEVATIONMODEL.SRTM1);
break;
}
// name the thread for debugging
if (String.IsNullOrEmpty(Thread.CurrentThread.Name))
{
Thread.CurrentThread.Name = Name + "_" + this.GetType().Name;
}
this.ReportProgress(0, Name + " started.");
try
{
// iterate through all locations in the database and calculate the propagation path
// chek if databases are ready and changes reported first
while (!ElevationData.Database.GetDBStatusBit(Model, DATABASESTATUS.UPTODATE) || !StationData.Database.GetDBStatusBit(DATABASESTATUS.UPTODATE) || !HasDatabaseChanged())
{
// sleep 10 sec
int i = 0;
while (!this.CancellationPending && (i < 10))
{
Thread.Sleep(1000);
i++;
if (this.CancellationPending)
{
break;
}
}
if (this.CancellationPending)
{
break;
}
}
if (this.CancellationPending)
{
break;
}
this.ReportProgress(0, Name + " getting locations...");
// get all locations in covered area but don't report progress
this.WorkerReportsProgress = false;
List <LocationDesignator> lds = StationData.Database.LocationGetAll(this, Properties.Settings.Default.MinLat, Properties.Settings.Default.MinLon, Properties.Settings.Default.MaxLat, Properties.Settings.Default.MaxLon);
this.WorkerReportsProgress = true;
// start over again with main loog when lds = null for some reason
if (lds == null)
{
continue;
}
// iterate through locations
QRVDesignator myqrv = null;
QRVDesignator dxqrv = null;
this.ReportProgress(0, Name + " checking locations...");
foreach (LocationDesignator ld in lds)
{
Stopwatch st = new Stopwatch();
st.Start();
try
{
// leave the iteration when something went wrong --> start new
if (ld == null)
{
break;
}
// check lat/lon if valid
if (!GeographicalPoint.Check(Properties.Settings.Default.MyLat, Properties.Settings.Default.MyLon))
{
continue;
}
// check lat/lon if valid
if (!GeographicalPoint.Check(ld.Lat, ld.Lon))
{
continue;
}
// chek for path < MaxDistance
double dist = LatLon.Distance(Properties.Settings.Default.MyLat, Properties.Settings.Default.MyLon, ld.Lat, ld.Lon);
if (dist <= Properties.Settings.Default.Path_MaxLength)
{
// start calculation for each band
foreach (BAND band in Bands.GetValuesExceptNoneAndAll())
{
PropagationPathDesignator pp;
// get my lat/lon from settings
string mycall = Properties.Settings.Default.MyCall;
double mylat = Properties.Settings.Default.MyLat;
double mylon = Properties.Settings.Default.MyLon;
string myloc = MaidenheadLocator.LocFromLatLon(mylat, mylon, false, 3);
double myelv = ElevationData.Database[mylat, mylon, Model];
// modify location in case of best case elevation is selected --> but do not store in database or settings!
if (Properties.Settings.Default.Path_BestCaseElevation)
{
if (!MaidenheadLocator.IsPrecise(mylat, mylon, 3))
{
ElvMinMaxInfo maxinfo = ElevationData.Database.ElevationTileFindMinMaxInfo(myloc, Model);
if (maxinfo != null)
{
mylat = maxinfo.MaxLat;
mylon = maxinfo.MaxLon;
myelv = maxinfo.MaxElv;
}
}
}
myqrv = StationData.Database.QRVFind(mycall, myloc, band);
double myheight = ((myqrv != null) && (myqrv.AntennaHeight != 0)) ? myqrv.AntennaHeight : StationData.Database.QRVGetDefaultAntennaHeight(band);
string dxcall = ld.Call;
// get my lat/lon from settings
double dxlat = ld.Lat;
double dxlon = ld.Lon;
string dxloc = MaidenheadLocator.LocFromLatLon(dxlat, dxlon, false, 3);
double dxelv = ElevationData.Database[dxlat, dxlon, Model];
// modify location in case of best case elevation is selected --> but do not store in database or settings!
if (Properties.Settings.Default.Path_BestCaseElevation)
{
if (!MaidenheadLocator.IsPrecise(dxlat, dxlon, 3))
{
ElvMinMaxInfo maxinfo = ElevationData.Database.ElevationTileFindMinMaxInfo(dxloc, Model);
if (maxinfo != null)
{
dxlat = maxinfo.MaxLat;
dxlon = maxinfo.MaxLon;
dxelv = maxinfo.MaxElv;
}
}
}
dxqrv = StationData.Database.QRVFind(dxcall, dxloc, band);
double dxheight = ((dxqrv != null) && (dxqrv.AntennaHeight != 0)) ? dxqrv.AntennaHeight : StationData.Database.QRVGetDefaultAntennaHeight(band);
LocalObstructionDesignator o = ElevationData.Database.LocalObstructionFind(mylat, mylon, Model);
double myobstr = (o != null) ? o.GetObstruction(myheight, LatLon.Bearing(mylat, mylon, dxlat, dxlon)) : double.MinValue;
pp = PropagationData.Database.PropagationPathFind(
mylat,
mylon,
myelv + myheight,
dxlat,
dxlon,
dxelv + dxheight,
Bands.ToGHz(band),
LatLon.Earth.Radius * Properties.Settings.Default.Path_Band_Settings[band].K_Factor,
Properties.Settings.Default.Path_Band_Settings[band].F1_Clearance,
ElevationData.Database.GetDefaultStepWidth(Model),
Model,
myobstr);
// skip if path already in database
if (pp != null)
{
Thread.Sleep(Properties.Settings.Default.Background_Calculations_ThreadWait);
continue;
}
// create new propagation path
pp = PropagationData.Database.PropagationPathCreateFromLatLon(
this,
mylat,
mylon,
myelv + myheight,
dxlat,
dxlon,
dxelv + dxheight,
Bands.ToGHz(band),
LatLon.Earth.Radius * Properties.Settings.Default.Path_Band_Settings[band].K_Factor,
Properties.Settings.Default.Path_Band_Settings[band].F1_Clearance,
ElevationData.Database.GetDefaultStepWidth(Model),
Model,
myobstr);
st.Stop();
this.ReportProgress(0, Name + " calculating path[ " + Bands.GetStringValue(band) + "]: " + Properties.Settings.Default.MyCall + "<>" + ld.Call + ", " + st.ElapsedMilliseconds.ToString() + " ms.");
}
if (this.CancellationPending)
{
break;
}
}
if (this.CancellationPending)
{
break;
}
}
catch (Exception ex)
{
Log.WriteMessage(Name + " error processing call [" + ld.Call + "]: " + ex.ToString());
}
// keep cpu load low --> TODO: find better solution here
Thread.Sleep(10);
}
// save station database timestamp
SaveDatabaseTimeStamp();
// wait to keep cpu load low
Thread.Sleep(Properties.Settings.Default.Background_Calculations_ThreadWait);
this.ReportProgress(0, Name + " finished.");
}
catch (Exception ex)
{
Log.WriteMessage(ex.ToString(), LogLevel.Error);
}
}
// sleep when running periodically
if (Options == BACKGROUNDUPDATERSTARTOPTIONS.RUNPERIODICALLY)
{
int i = 0;
while (!this.CancellationPending && (i < interval))
{
Thread.Sleep(1000);
i++;
}
}
}while (Options == BACKGROUNDUPDATERSTARTOPTIONS.RUNPERIODICALLY);
if (this.CancellationPending)
{
this.ReportProgress(0, Name + " cancelled.");
Log.WriteMessage(Name + " cancelled.");
}
else
{
this.ReportProgress(0, Name + " finished.");
Log.WriteMessage(Name + " finished.");
}
}
public HorizonDlg(string call, double lat, double lon, LocalObstructionDesignator localobstruction)
{
InitializeComponent();
Location = StationData.Database.LocationFindOrCreate(call, MaidenheadLocator.LocFromLatLon(lat, lon, false, 3));
QRV = StationData.Database.QRVFindOrCreateDefault(call, MaidenheadLocator.LocFromLatLon(lat, lon, false, 3), Properties.Settings.Default.Band);
LocalObstruction = localobstruction;
Elevation = ElevationData.Database[Location.Lat, Location.Lon, Properties.Settings.Default.ElevationModel];
AntennaHeight = (QRV.AntennaHeight != 0) ? QRV.AntennaHeight : StationData.Database.QRVGetDefaultAntennaHeight(Properties.Settings.Default.Band);
NumberFormatInfo provider = new NumberFormatInfo();
provider.NumberDecimalSeparator = ".";
provider.NumberGroupSeparator = ",";
tb_Horizon_Lat.Text = Location.Lat.ToString("F8", provider);
tb_Horizon_Lon.Text = Location.Lon.ToString("F8", provider);
tb_Horizon_Elevation.Text = ElevationData.Database[Location.Lat, Location.Lon, Properties.Settings.Default.ElevationModel].ToString("F0", provider);
tb_Horizon_Height.Text = AntennaHeight.ToString("F0", provider);
tb_Horizon_K_Factor.Text = Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].K_Factor.ToString("F2", provider);
tb_Horizon_QRG.Text = Bands.GetStringValue(Properties.Settings.Default.Band);
tb_Horizon_F1_Clearance.Text = Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].F1_Clearance.ToString("F2", provider);
tb_Horizon_ElevationModel.Text = Properties.Settings.Default.ElevationModel.ToString();
// setting User Agent to fix Open Street Map issue 2016-09-20
GMap.NET.MapProviders.GMapProvider.UserAgent = "AirScout";
// clearing referrer URL issue 2019-12-14
gm_Horizon.MapProvider.RefererUrl = "";
// set initial settings for main map
gm_Horizon.MapProvider = GMapProviders.Find(Properties.Settings.Default.Map_Provider);
gm_Horizon.IgnoreMarkerOnMouseWheel = true;
gm_Horizon.MinZoom = 0;
gm_Horizon.MaxZoom = 20;
gm_Horizon.Zoom = 8;
gm_Horizon.DragButton = System.Windows.Forms.MouseButtons.Left;
gm_Horizon.CanDragMap = true;
gm_Horizon.ScalePen = new Pen(Color.Black, 3);
gm_Horizon.MapScaleInfoEnabled = true;
gm_Horizon.Overlays.Add(horizons);
GMarkerGoogle gm = new GMarkerGoogle(new PointLatLng(Location.Lat, Location.Lon), GMarkerGoogleType.red_dot);
gm.ToolTipText = Location.Call;
horizons.Markers.Add(gm);
horizon.Stroke = new Pen(Color.Red, 3);
horizons.Routes.Add(horizon);
this.Text = "Radio Horizon of " + Location.Call;
// initialize charts
InitializeCharts();
// activate Polar if nothing checked
if (!Properties.Settings.Default.Horizon_Plot_Polar && !Properties.Settings.Default.Horizon_Plot_Cartesian && !Properties.Settings.Default.Horizon_Plot_Map)
{
Properties.Settings.Default.Horizon_Plot_Polar = true;
}
// show according child windows
UpdateCharts();
// create ToolTip on this window
TT = new ToolTip();
OwnerWin = gm_Horizon;
HorizonDlg_SizeChanged(this, null);
// set map bounds
Map_Left = Location.Lon;
Map_Right = Location.Lon;
Map_Top = Location.Lat;
Map_Bottom = Location.Lat;
}
private void bw_History_DoWork(object sender, DoWorkEventArgs e)
{
// check that Stepwidth ist positive in any case
if (Properties.Settings.Default.Path_History_StepWidth <= 0)
{
Properties.Settings.Default.Path_History_StepWidth = 1;
}
bw_History.ReportProgress(0, "Calculating Path....");
LocationDesignator mycall = StationData.Database.LocationFindOrCreate(Properties.Settings.Default.MyCall, MaidenheadLocator.LocFromLatLon(Properties.Settings.Default.MyLat, Properties.Settings.Default.MyLon, false, 3));
QRVDesignator myqrv = StationData.Database.QRVFindOrCreateDefault(mycall.Call, mycall.Loc, Properties.Settings.Default.Band);
// set qrv defaults if zero
if (myqrv.AntennaHeight == 0)
{
myqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(Properties.Settings.Default.Band);
}
if (myqrv.AntennaGain == 0)
{
myqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(Properties.Settings.Default.Band);
}
if (myqrv.Power == 0)
{
myqrv.Power = StationData.Database.QRVGetDefaultPower(Properties.Settings.Default.Band);
}
if (Properties.Settings.Default.Path_BestCaseElevation)
{
if (!MaidenheadLocator.IsPrecise(mycall.Lat, mycall.Lon, 3))
{
ElvMinMaxInfo maxinfo = ElevationData.Database.ElevationTileFindMinMaxInfo(mycall.Loc, Properties.Settings.Default.ElevationModel);
if (maxinfo != null)
{
mycall.Lat = maxinfo.MaxLat;
mycall.Lon = maxinfo.MaxLon;
}
}
}
LocationDesignator dxcall = StationData.Database.LocationFindOrCreate(Properties.Settings.Default.DXCall, MaidenheadLocator.LocFromLatLon(Properties.Settings.Default.DXLat, Properties.Settings.Default.DXLon, false, 3));
QRVDesignator dxqrv = StationData.Database.QRVFindOrCreateDefault(dxcall.Call, dxcall.Loc, Properties.Settings.Default.Band);
// set qrv defaults if zero
if (dxqrv.AntennaHeight == 0)
{
dxqrv.AntennaHeight = StationData.Database.QRVGetDefaultAntennaHeight(Properties.Settings.Default.Band);
}
if (dxqrv.AntennaGain == 0)
{
dxqrv.AntennaGain = StationData.Database.QRVGetDefaultAntennaGain(Properties.Settings.Default.Band);
}
if (dxqrv.Power == 0)
{
dxqrv.Power = StationData.Database.QRVGetDefaultPower(Properties.Settings.Default.Band);
}
if (Properties.Settings.Default.Path_BestCaseElevation)
{
if (!MaidenheadLocator.IsPrecise(dxcall.Lat, dxcall.Lon, 3))
{
ElvMinMaxInfo maxinfo = ElevationData.Database.ElevationTileFindMinMaxInfo(dxcall.Loc, Properties.Settings.Default.ElevationModel);
if (maxinfo != null)
{
dxcall.Lat = maxinfo.MaxLat;
dxcall.Lon = maxinfo.MaxLon;
}
}
}
// find local obstruction, if any
LocalObstructionDesignator o = ElevationData.Database.LocalObstructionFind(mycall.Lat, mycall.Lon, Properties.Settings.Default.ElevationModel);
double mybearing = LatLon.Bearing(mycall.Lat, mycall.Lon, dxcall.Lat, dxcall.Lon);
double myobstr = (o != null) ? o.GetObstruction(myqrv.AntennaHeight, mybearing) : double.MinValue;
// try to find propagation path in database or create new one and store
PPath = PropagationData.Database.PropagationPathFindOrCreateFromLatLon(
bw_History,
mycall.Lat,
mycall.Lon,
ElevationData.Database[mycall.Lat, mycall.Lon, Properties.Settings.Default.ElevationModel] + myqrv.AntennaHeight,
dxcall.Lat,
dxcall.Lon,
ElevationData.Database[dxcall.Lat, dxcall.Lon, Properties.Settings.Default.ElevationModel] + dxqrv.AntennaHeight,
Bands.ToGHz(Properties.Settings.Default.Band),
LatLon.Earth.Radius * Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].K_Factor,
Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].F1_Clearance,
ElevationData.Database.GetDefaultStepWidth(Properties.Settings.Default.ElevationModel),
Properties.Settings.Default.ElevationModel,
myobstr);
DateTime time = From;
lock (Crossings)
{
Crossings.Clear();
}
lock (NearestPositions)
{
NearestPositions.Clear();
}
// pre-select nearest positions only
bw_History.ReportProgress(0, "Pre-selecting nearest positions...");
LatLon.GPoint midpoint = PPath.GetMidPoint();
double maxdist = PPath.Distance / 2;
foreach (AircraftPositionDesignator ap in AllPositions)
{
if ((ap.LastUpdated >= From) && (ap.LastUpdated <= To) && (LatLon.Distance(ap.Lat, ap.Lon, midpoint.Lat, midpoint.Lon) <= maxdist))
{
AircraftDesignator ac = null;
AircraftTypeDesignator at = null;
ac = AircraftData.Database.AircraftFindByHex(ap.Hex);
if (ac != null)
{
at = AircraftData.Database.AircraftTypeFindByICAO(ac.TypeCode);
}
PlaneInfo plane = new PlaneInfo(ap.LastUpdated, ap.Call, ((ac != null) && (!String.IsNullOrEmpty(ac.TypeCode)))? ac.Reg : "[unknown]", ap.Hex, ap.Lat, ap.Lon, ap.Track, ap.Alt, ap.Speed, (ac != null) && (!String.IsNullOrEmpty(ac.TypeCode)) ? ac.TypeCode : "[unkomwn]", ((at != null) && (!String.IsNullOrEmpty(at.Manufacturer))) ? at.Manufacturer : "[unknown]", ((at != null) && (!String.IsNullOrEmpty(at.Model))) ? at.Model : "[unknown]", (at != null) ? at.Category : PLANECATEGORY.NONE);
lock (NearestPositions)
{
NearestPositions.Add(plane);
}
if (NearestPositions.Count % 1000 == 0)
{
bw_History.ReportProgress(0, "Pre-selecting nearest positions..." + "[" + NearestPositions.Count.ToString() + "]");
}
}
if (bw_History.CancellationPending)
{
break;
}
}
bw_History.ReportProgress(0, "Pre-selecting nearest positions finished, " + NearestPositions.Count.ToString() + " positions.");
// return if no positions left over
if (NearestPositions.Count == 0)
{
return;
}
int startindex = 0;
// set timeline to first reported position
time = NearestPositions[0].Time;
while ((!bw_History.CancellationPending) && (time <= To))
{
if (Crossings.Count % 1000 == 0)
{
bw_History.ReportProgress(0, "Calculating at " + time.ToString("yyyy-MM-dd HH:mm:ss") + ", " + Crossings.Count.ToString() + " crossings so far.");
}
// calculate from timestamp
DateTime from = time.AddMinutes(-Properties.Settings.Default.Planes_Position_TTL);
// fill plane position cache
PlaneInfoCache ac = new PlaneInfoCache();
int i = startindex;
startindex = -1;
while ((!bw_History.CancellationPending) && (i < NearestPositions.Count))
{
// update ap in cache if relevant
if (NearestPositions[i].Time >= from)
{
// store first index as startindex for next iteration
if (startindex == -1)
{
startindex = i;
}
lock (ac)
{
ac.InsertOrUpdateIfNewer(NearestPositions[i]);
}
}
// stop if position is newer than current time
if (NearestPositions[i].Time > time)
{
break;
}
i++;
}
List <PlaneInfo> allplanes = ac.GetAll(time, Properties.Settings.Default.Planes_Position_TTL);
// get nearest planes
List <PlaneInfo> nearestplanes = AircraftData.Database.GetNearestPlanes(time, PPath, allplanes, Properties.Settings.Default.Planes_Filter_Max_Circumcircle, Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].MaxDistance, Properties.Settings.Default.Planes_MaxAlt);
if ((nearestplanes != null) && (nearestplanes.Count() > 0))
{
// get all planes crossing the path
foreach (PlaneInfo plane in nearestplanes)
{
if (plane.IntQRB <= Properties.Settings.Default.Path_Band_Settings[Properties.Settings.Default.Band].MaxDistance)
{
// check if level value is available
SignalLevelDesignator ad = SignalData.Database.SignalLevelFind(plane.Time);
if (ad != null)
{
plane.SignalStrength = ad.Level;
}
else
{
plane.SignalStrength = double.MinValue;
}
lock (Crossings)
{
if (!Properties.Settings.Default.Analysis_CrossingHistory_WithSignalLevel || (ad != null))
{
Crossings.Add(plane);
}
}
}
bw_History.ReportProgress(0, "Calculating at " + time.ToString("yyyy-MM-dd HH:mm:ss") + ", " + Crossings.Count.ToString() + " crossings so far.");
}
}
time = time.AddSeconds(Stepwidth);
}
bw_History.ReportProgress(100, "Calculation done.");
}
