2010-10-19 00:59:08 +08:00
#
2012-06-13 22:49:22 +08:00
# Copyright 2010, 2012 Nick Foster
2010-10-19 00:59:08 +08:00
#
# This file is part of gr-air-modes
#
# gr-air-modes is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3, or (at your option)
# any later version.
#
# gr-air-modes is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with gr-air-modes; see the file COPYING. If not, write to
# the Free Software Foundation, Inc., 51 Franklin Street,
# Boston, MA 02110-1301, USA.
#
2010-09-15 13:01:56 +08:00
import time , os , sys
from string import split , join
from altitude import decode_alt
2012-06-13 22:49:22 +08:00
import cpr
2010-09-15 13:01:56 +08:00
import math
2010-10-18 10:45:19 +08:00
class modes_parse :
2010-10-24 09:00:58 +08:00
def __init__ ( self , mypos ) :
self . my_location = mypos
2012-06-13 22:49:22 +08:00
self . cpr = cpr . cpr_decoder ( self . my_location )
2010-10-24 09:00:58 +08:00
2012-06-13 22:49:22 +08:00
def parse0 ( self , shortdata ) :
2010-09-15 13:01:56 +08:00
# shortdata = long(shortdata, 16)
2010-10-18 10:45:19 +08:00
#parity = long(parity)
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
vs = bool ( shortdata >> 26 & 0x1 ) #ground sensor -- airborne when 0
cc = bool ( shortdata >> 25 & 0x1 ) #crosslink capability, binary
sl = shortdata >> 21 & 0x07 #operating sensitivity of onboard TCAS system. 0 means no TCAS sensitivity reported, 1-7 give TCAS sensitivity
ri = shortdata >> 15 & 0x0F #speed coding: 0 = no onboard TCAS, 1 = NA, 2 = TCAS w/inhib res, 3 = TCAS w/vert only, 4 = TCAS w/vert+horiz, 5-7 = NA, 8 = no max A/S avail,
2010-09-15 13:01:56 +08:00
#9 = A/S <= 75kt, 10 = A/S (75-150]kt, 11 = (150-300]kt, 12 = (300-600]kt, 13 = (600-1200]kt, 14 = >1200kt, 15 = NA
2010-10-18 10:45:19 +08:00
altitude = decode_alt ( shortdata & 0x1FFF , True ) #bit 13 is set for type 0
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
return [ vs , cc , sl , ri , altitude ]
2010-09-15 13:01:56 +08:00
2012-06-13 22:49:22 +08:00
def parse4 ( self , shortdata ) :
2010-09-15 13:01:56 +08:00
# shortdata = long(shortdata, 16)
2010-10-18 10:45:19 +08:00
fs = shortdata >> 24 & 0x07 #flight status: 0 is airborne normal, 1 is ground normal, 2 is airborne alert, 3 is ground alert, 4 is alert SPI, 5 is normal SPI
dr = shortdata >> 19 & 0x1F #downlink request: 0 means no req, bit 0 is Comm-B msg rdy bit, bit 1 is TCAS info msg rdy, bit 2 is Comm-B bcast #1 msg rdy, bit2+bit0 is Comm-B bcast #2 msg rdy,
2010-09-15 13:01:56 +08:00
#bit2+bit1 is TCAS info and Comm-B bcast #1 msg rdy, bit2+bit1+bit0 is TCAS info and Comm-B bcast #2 msg rdy, 8-15 N/A, 16-31 req to send N-15 segments
2010-10-18 10:45:19 +08:00
um = shortdata >> 13 & 0x3F #transponder status readouts, no decoding information available
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
altitude = decode_alt ( shortdata & 0x1FFF , True )
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
return [ fs , dr , um , altitude ]
2010-09-15 13:01:56 +08:00
2012-06-13 22:49:22 +08:00
def parse5 ( self , shortdata ) :
2010-09-15 13:01:56 +08:00
# shortdata = long(shortdata, 16)
2010-10-18 10:45:19 +08:00
fs = shortdata >> 24 & 0x07 #flight status: 0 is airborne normal, 1 is ground normal, 2 is airborne alert, 3 is ground alert, 4 is alert SPI, 5 is normal SPI
dr = shortdata >> 19 & 0x1F #downlink request: 0 means no req, bit 0 is Comm-B msg rdy bit, bit 1 is TCAS info msg rdy, bit 2 is Comm-B bcast #1 msg rdy, bit2+bit0 is Comm-B bcast #2 msg rdy,
2010-09-15 13:01:56 +08:00
#bit2+bit1 is TCAS info and Comm-B bcast #1 msg rdy, bit2+bit1+bit0 is TCAS info and Comm-B bcast #2 msg rdy, 8-15 N/A, 16-31 req to send N-15 segments
2010-10-18 10:45:19 +08:00
um = shortdata >> 13 & 0x3F #transponder status readouts, no decoding information available
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
return [ fs , dr , um ]
2010-09-15 13:01:56 +08:00
2012-06-13 22:49:22 +08:00
def parse11 ( self , shortdata , ecc ) :
2010-09-15 13:01:56 +08:00
# shortdata = long(shortdata, 16)
2010-10-18 10:45:19 +08:00
interrogator = ecc & 0x0F
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
ca = shortdata >> 13 & 0x3F #capability
icao24 = shortdata & 0xFFFFFF
return [ icao24 , interrogator , ca ]
2010-09-15 13:01:56 +08:00
2012-06-13 22:49:22 +08:00
#the Type 17 subtypes are:
2010-09-15 13:01:56 +08:00
#0: No position information
#1: Identification (Category set D)
#2: Identification (Category set C)
#3: "" (B)
#4: "" (A)
#5: Surface position accurate to 7.5m
#6: "" to 25m
#7: "" to 185.2m (0.1nm)
#8: "" above 185.2m
#9: Airborne position to 7.5m
#10-18: Same with less accuracy
#19: Airborne velocity
#20: Airborne position w/GNSS height above earth
#21: same to 25m
#22: same above 25m
#23: Reserved
#24: Reserved for surface system status
#25-27: Reserved
#28: Extended squitter aircraft status
#29: Current/next trajectory change point
#30: Aircraft operational coordination
#31: Aircraft operational status
2012-06-13 22:49:22 +08:00
categories = [ [ " NO INFO " , " RESERVED " , " RESERVED " , " RESERVED " , " RESERVED " , " RESERVED " , " RESERVED " , " RESERVED " ] , \
[ " NO INFO " , " SURFACE EMERGENCY VEHICLE " , " SURFACE SERVICE VEHICLE " , " FIXED OBSTRUCTION " , " RESERVED " , " RESERVED " , " RESERVED " ] , \
[ " NO INFO " , " GLIDER " , " BALLOON/BLIMP " , " PARACHUTE " , " ULTRALIGHT " , " RESERVED " , " UAV " , " SPACECRAFT " ] , \
[ " NO INFO " , " LIGHT " , " SMALL " , " LARGE " , " LARGE HIGH VORTEX " , " HEAVY " , " HIGH PERFORMANCE " , " ROTORCRAFT " ] ]
2010-09-15 13:01:56 +08:00
2012-06-13 22:49:22 +08:00
def parseBDS08 ( self , shortdata , longdata ) :
2010-10-18 10:45:19 +08:00
icao24 = shortdata & 0xFFFFFF
2012-06-13 22:49:22 +08:00
subtype = ( longdata >> 51 ) & 0x1F
category = ( longdata >> 48 ) & 0x07
catstring = self . categories [ subtype - 1 ] [ category ]
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
msg = " "
for i in range ( 0 , 8 ) :
msg + = self . charmap ( longdata >> ( 42 - 6 * i ) & 0x3F )
2010-09-15 13:01:56 +08:00
#retstr = "Type 17 subtype 04 (ident) from " + "%x" % icao24 + " with data " + msg
2012-06-13 22:49:22 +08:00
return ( msg , catstring )
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
def charmap ( self , d ) :
if d > 0 and d < 27 :
retval = chr ( ord ( " A " ) + d - 1 )
elif d == 32 :
retval = " "
elif d > 47 and d < 58 :
retval = chr ( ord ( " 0 " ) + d - 48 )
else :
retval = " "
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
return retval
2010-09-15 13:01:56 +08:00
2012-06-13 22:49:22 +08:00
def parseBDS05 ( self , shortdata , longdata ) :
2010-10-18 10:45:19 +08:00
icao24 = shortdata & 0xFFFFFF
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
encoded_lon = longdata & 0x1FFFF
encoded_lat = ( longdata >> 17 ) & 0x1FFFF
cpr_format = ( longdata >> 34 ) & 1
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
enc_alt = ( longdata >> 36 ) & 0x0FFF
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
altitude = decode_alt ( enc_alt , False )
2010-09-15 13:01:56 +08:00
2012-02-26 08:50:15 +08:00
[ decoded_lat , decoded_lon , rnge , bearing ] = self . cpr . decode ( icao24 , encoded_lat , encoded_lon , cpr_format , 0 )
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
return [ altitude , decoded_lat , decoded_lon , rnge , bearing ]
2010-09-15 13:01:56 +08:00
2012-02-26 08:50:15 +08:00
#welp turns out it looks like there's only 17 bits in the BDS0,6 ground packet after all.
2012-06-13 22:49:22 +08:00
def parseBDS06 ( self , shortdata , longdata ) :
2010-10-18 10:45:19 +08:00
icao24 = shortdata & 0xFFFFFF
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
encoded_lon = longdata & 0x1FFFF
encoded_lat = ( longdata >> 17 ) & 0x1FFFF
cpr_format = ( longdata >> 34 ) & 1
2010-09-15 13:01:56 +08:00
# enc_alt = (longdata >> 36) & 0x0FFF
2010-10-18 10:45:19 +08:00
altitude = 0
2012-02-26 08:50:15 +08:00
[ decoded_lat , decoded_lon , rnge , bearing ] = self . cpr . decode ( icao24 , encoded_lat , encoded_lon , cpr_format , 1 )
2010-10-18 10:45:19 +08:00
return [ altitude , decoded_lat , decoded_lon , rnge , bearing ]
2012-06-13 22:49:22 +08:00
def parseBDS09_0 ( self , shortdata , longdata ) :
2010-10-18 10:45:19 +08:00
icao24 = shortdata & 0xFFFFFF
vert_spd = ( ( longdata >> 6 ) & 0x1FF ) * 32
ud = bool ( ( longdata >> 15 ) & 1 )
if ud :
vert_spd = 0 - vert_spd
turn_rate = ( longdata >> 16 ) & 0x3F
turn_rate = turn_rate * 15 / 62
rl = bool ( ( longdata >> 22 ) & 1 )
if rl :
turn_rate = 0 - turn_rate
ns_vel = ( longdata >> 23 ) & 0x7FF - 1
ns = bool ( ( longdata >> 34 ) & 1 )
ew_vel = ( longdata >> 35 ) & 0x7FF - 1
ew = bool ( ( longdata >> 46 ) & 1 )
subtype = ( longdata >> 48 ) & 0x07
velocity = math . hypot ( ns_vel , ew_vel )
if ew :
ew_vel = 0 - ew_vel
if ns :
ns_vel = 0 - ns_vel
heading = math . atan2 ( ew_vel , ns_vel ) * ( 180.0 / math . pi )
if heading < 0 :
heading + = 360
2010-09-15 13:01:56 +08:00
#retstr = "Type 17 subtype 09-0 (track report) from " + "%x" % icao24 + " with velocity " + "%.0f" % velocity + "kt heading " + "%.0f" % heading + " VS " + "%.0f" % vert_spd
2012-06-13 22:49:22 +08:00
return [ velocity , heading , vert_spd , turn_rate ]
2010-10-18 10:45:19 +08:00
2012-06-13 22:49:22 +08:00
def parseBDS09_1 ( self , shortdata , longdata ) :
2010-10-18 10:45:19 +08:00
icao24 = shortdata & 0xFFFFFF
alt_geo_diff = longdata & 0x7F - 1
above_below = bool ( ( longdata >> 7 ) & 1 )
if above_below :
alt_geo_diff = 0 - alt_geo_diff ;
vert_spd = float ( ( longdata >> 10 ) & 0x1FF - 1 )
ud = bool ( ( longdata >> 19 ) & 1 )
if ud :
vert_spd = 0 - vert_spd
vert_src = bool ( ( longdata >> 20 ) & 1 )
ns_vel = float ( ( longdata >> 21 ) & 0x3FF - 1 )
ns = bool ( ( longdata >> 31 ) & 1 )
ew_vel = float ( ( longdata >> 32 ) & 0x3FF - 1 )
ew = bool ( ( longdata >> 42 ) & 1 )
subtype = ( longdata >> 48 ) & 0x07
if subtype == 0x02 :
ns_vel * = 4
ew_vel * = 4
vert_spd * = 64
alt_geo_diff * = 25
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
velocity = math . hypot ( ns_vel , ew_vel )
if ew :
ew_vel = 0 - ew_vel
2010-09-15 13:01:56 +08:00
2010-10-18 10:45:19 +08:00
if ns_vel == 0 :
heading = 0
else :
heading = math . atan ( float ( ew_vel ) / float ( ns_vel ) ) * ( 180.0 / math . pi )
if ns :
heading = 180 - heading
if heading < 0 :
heading + = 360
#retstr = "Type 17 subtype 09-1 (track report) from " + "%x" % icao24 + " with velocity " + "%.0f" % velocity + "kt heading " + "%.0f" % heading + " VS " + "%.0f" % vert_spd
return [ velocity , heading , vert_spd ]
2012-06-13 22:49:22 +08:00