parent
							
								
									d6107bb059
								
							
						
					
					
						commit
						562fd7e8e3
					
				@ -0,0 +1,463 @@ | 
				
			||||
/*
 | 
				
			||||
 * rtl-sdr, turns your Realtek RTL2832 based DVB dongle into a SDR receiver | 
				
			||||
 * Copyright (C) 2012 by Steve Markgraf <steve@steve-m.de> | 
				
			||||
 * Copyright (C) 2012 by Hoernchen <la@tfc-server.de> | 
				
			||||
 * Copyright (C) 2012 by Kyle Keen <keenerd@gmail.com> | 
				
			||||
 * Copyright (C) 2012 by Youssef Touil <youssef@sdrsharp.com> | 
				
			||||
 * Copyright (C) 2012 by Ian Gilmour <ian@sdrsharp.com> | 
				
			||||
 * | 
				
			||||
 * This program 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 2 of the License, or | 
				
			||||
 * (at your option) any later version. | 
				
			||||
 * | 
				
			||||
 * This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.
 | 
				
			||||
 */ | 
				
			||||
 | 
				
			||||
 | 
				
			||||
#include <errno.h> | 
				
			||||
#include <signal.h> | 
				
			||||
#include <string.h> | 
				
			||||
#include <stdio.h> | 
				
			||||
#include <stdlib.h> | 
				
			||||
 | 
				
			||||
#ifndef _WIN32 | 
				
			||||
#include <unistd.h> | 
				
			||||
#else | 
				
			||||
#include <Windows.h> | 
				
			||||
#include <fcntl.h> | 
				
			||||
#include <io.h> | 
				
			||||
#include "getopt/getopt.h" | 
				
			||||
#endif | 
				
			||||
 | 
				
			||||
#include <semaphore.h> | 
				
			||||
#include <pthread.h> | 
				
			||||
#include <libusb.h> | 
				
			||||
 | 
				
			||||
#include "rtl-sdr.h" | 
				
			||||
 | 
				
			||||
#ifdef _WIN32 | 
				
			||||
#define sleep Sleep | 
				
			||||
#undef min | 
				
			||||
#undef max | 
				
			||||
#endif | 
				
			||||
 | 
				
			||||
#define ADSB_RATE			2000000 | 
				
			||||
#define ADSB_FREQ			1090000000 | 
				
			||||
#define DEFAULT_ASYNC_BUF_NUMBER	32 | 
				
			||||
#define DEFAULT_BUF_LENGTH		(128 * 16384) | 
				
			||||
#define AUTO_GAIN			-100 | 
				
			||||
 | 
				
			||||
static pthread_t demod_thread; | 
				
			||||
static sem_t data_ready; | 
				
			||||
static volatile int do_exit = 0; | 
				
			||||
static rtlsdr_dev_t *dev = NULL; | 
				
			||||
 | 
				
			||||
/* todo, bundle these up in a struct */ | 
				
			||||
uint8_t *buffer; | 
				
			||||
int raw_output = 0; | 
				
			||||
int short_output = 0; | 
				
			||||
int allowed_errors = 5; | 
				
			||||
FILE *file; | 
				
			||||
int adsb_frame[14]; | 
				
			||||
#define preamble_len		16 | 
				
			||||
#define long_frame		112 | 
				
			||||
#define short_frame		56 | 
				
			||||
 | 
				
			||||
void usage(void) | 
				
			||||
{ | 
				
			||||
	fprintf(stderr, | 
				
			||||
		"rtl_adsb, a simple ADS-B decoder\n\n" | 
				
			||||
		"Use:\trtl_adsb [-R] [-g gain] [-p ppm] [output file]\n" | 
				
			||||
		"\t[-d device_index (default: 0)]\n" | 
				
			||||
		"\t[-R output raw bitstream (default: off)]\n" | 
				
			||||
		"\t[-S show short frames (default: off)]\n" | 
				
			||||
		"\t[-e allowed_errors (default: 5)]\n" | 
				
			||||
		"\t[-g tuner_gain (default: automatic)]\n" | 
				
			||||
		"\t[-p ppm_error (default: 0)]\n" | 
				
			||||
		"\tfilename (a '-' dumps samples to stdout)\n" | 
				
			||||
		"\t (omitting the filename also uses stdout)\n\n" | 
				
			||||
		"Streaming with netcat:\n" | 
				
			||||
		"\trtl_adsb -R | netcat -lp 8080\n" | 
				
			||||
		"\twhile true; do rtl_adsb -R | nc -lp 8080; done\n" | 
				
			||||
		"\n"); | 
				
			||||
	exit(1); | 
				
			||||
} | 
				
			||||
 | 
				
			||||
#ifdef _WIN32 | 
				
			||||
BOOL WINAPI | 
				
			||||
sighandler(int signum) | 
				
			||||
{ | 
				
			||||
	if (CTRL_C_EVENT == signum) { | 
				
			||||
		fprintf(stderr, "Signal caught, exiting!\n"); | 
				
			||||
		do_exit = 1; | 
				
			||||
		rtlsdr_cancel_async(dev); | 
				
			||||
		return TRUE; | 
				
			||||
	} | 
				
			||||
	return FALSE; | 
				
			||||
} | 
				
			||||
#else | 
				
			||||
static void sighandler(int signum) | 
				
			||||
{ | 
				
			||||
	fprintf(stderr, "Signal caught, exiting!\n"); | 
				
			||||
	do_exit = 1; | 
				
			||||
	rtlsdr_cancel_async(dev); | 
				
			||||
} | 
				
			||||
#endif | 
				
			||||
 | 
				
			||||
void display(int *frame, int len) | 
				
			||||
{ | 
				
			||||
	int i; | 
				
			||||
	if (!short_output && len <= short_frame) { | 
				
			||||
		return;} | 
				
			||||
	if (raw_output) { | 
				
			||||
		fprintf(file, "*"); | 
				
			||||
		for (i=0; i<((len+7)/8); i++) { | 
				
			||||
			fprintf(file, "%02x", frame[i]);} | 
				
			||||
		fprintf(file, ";\r\n"); | 
				
			||||
		return; | 
				
			||||
	} | 
				
			||||
	fprintf(file, "----------\n"); | 
				
			||||
	fprintf(file, "DF=%x CA=%x\n", (frame[0] >> 3) & 0x1f, frame[0] & 0x07); | 
				
			||||
	fprintf(file, "ICAO Address=%06x\n", frame[1] << 16 | frame[2] << 8 | frame[3]); | 
				
			||||
	if (len <= short_frame) { | 
				
			||||
		return;} | 
				
			||||
	fprintf(file, "PI=0x%06x\n",  frame[11] << 16 | frame[12] << 8 | frame[13]); | 
				
			||||
	fprintf(file, "Type Code=%x S.Type/Ant.=%x\n", (frame[4] >> 3) & 0x1f, frame[4] & 0x07); | 
				
			||||
} | 
				
			||||
 | 
				
			||||
int magnitute(unsigned char *buf, int len) | 
				
			||||
/* takes i/q, changes buf in place, returns new len */ | 
				
			||||
{ | 
				
			||||
	int i, mag; | 
				
			||||
	for (i=0; i<len; i+=2) { | 
				
			||||
		mag = abs((int)buf[i]-128) + abs((int)buf[i+1]-128); | 
				
			||||
		if (mag > 255) {  // todo, compression
 | 
				
			||||
			mag = 255;} | 
				
			||||
		buf[i/2] = (unsigned char)mag; | 
				
			||||
	} | 
				
			||||
	return len/2; | 
				
			||||
} | 
				
			||||
 | 
				
			||||
inline unsigned char single_manchester(unsigned char a, unsigned char b, unsigned char c, unsigned char d) | 
				
			||||
/* takes 4 consecutive real samples, return 0 or 1, 255 on error */ | 
				
			||||
{ | 
				
			||||
	int bit, bit_p; | 
				
			||||
	bit_p = a > b; | 
				
			||||
	bit   = c > d; | 
				
			||||
	if ( bit &&  bit_p && c > b && d < a) { | 
				
			||||
		return 1;} | 
				
			||||
	if ( bit && !bit_p && c > a && d < b) { | 
				
			||||
		return 1;} | 
				
			||||
	if (!bit &&  bit_p && c < a && d > b) { | 
				
			||||
		return 0;} | 
				
			||||
	if (!bit && !bit_p && c < b && d > a) { | 
				
			||||
		return 0;} | 
				
			||||
	return 255; | 
				
			||||
} | 
				
			||||
 | 
				
			||||
inline unsigned char min(unsigned char a, unsigned char b) | 
				
			||||
{ | 
				
			||||
	return a<b ? a : b; | 
				
			||||
} | 
				
			||||
 | 
				
			||||
inline unsigned char max(unsigned char a, unsigned char b) | 
				
			||||
{ | 
				
			||||
	return a>b ? a : b; | 
				
			||||
} | 
				
			||||
 | 
				
			||||
inline int preamble(unsigned char *buf, int len, int i) | 
				
			||||
/* returns 0/1 for preamble at index i */ | 
				
			||||
{ | 
				
			||||
	int i2; | 
				
			||||
	unsigned char low  = 0; | 
				
			||||
	unsigned char high = 255; | 
				
			||||
	for (i2=0; i2<preamble_len; i2++) { | 
				
			||||
		switch (i2) { | 
				
			||||
			case 0: | 
				
			||||
			case 2: | 
				
			||||
			case 7: | 
				
			||||
			case 9: | 
				
			||||
				high = min(high, buf[i+i2]); | 
				
			||||
				break; | 
				
			||||
			default: | 
				
			||||
				low  = max(low,  buf[i+i2]); | 
				
			||||
				break; | 
				
			||||
		} | 
				
			||||
		if (high <= low) { | 
				
			||||
			return 0;} | 
				
			||||
	} | 
				
			||||
	return 1; | 
				
			||||
} | 
				
			||||
 | 
				
			||||
void manchester(unsigned char *buf, int len) | 
				
			||||
/* overwrites magnitude buffer with valid bits (255 on errors) */ | 
				
			||||
{ | 
				
			||||
	/* a and b hold old values to verify local manchester */ | 
				
			||||
	unsigned char a=0, b=0; | 
				
			||||
	unsigned char bit; | 
				
			||||
	int i, i2, start, errors; | 
				
			||||
	// todo, allow wrap across buffers
 | 
				
			||||
	i = 0; | 
				
			||||
	while (i < len) { | 
				
			||||
		/* find preamble */ | 
				
			||||
		for ( ; i < (len - preamble_len); i++) { | 
				
			||||
			if (!preamble(buf, len, i)) { | 
				
			||||
				continue;} | 
				
			||||
			a = buf[i]; | 
				
			||||
			b = buf[i+1]; | 
				
			||||
			for (i2=0; i2<preamble_len; i2++) { | 
				
			||||
				buf[i+i2] = 253;} | 
				
			||||
			i += preamble_len; | 
				
			||||
			//printf("preamble found\n");
 | 
				
			||||
			break; | 
				
			||||
		} | 
				
			||||
		i2 = start = i; | 
				
			||||
		errors = 0; | 
				
			||||
		/* mark bits until encoding breaks */ | 
				
			||||
		for ( ; i < len; i+=2, i2++) { | 
				
			||||
			bit = single_manchester(a, b, buf[i], buf[i+1]); | 
				
			||||
			a = buf[i]; | 
				
			||||
			b = buf[i+1]; | 
				
			||||
			if (bit == 255) { | 
				
			||||
				errors += 1; | 
				
			||||
				if (errors > allowed_errors) { | 
				
			||||
					buf[i2] = 255; | 
				
			||||
					break; | 
				
			||||
				} else { | 
				
			||||
					bit = 0; | 
				
			||||
					a = 0; | 
				
			||||
					b = 255; | 
				
			||||
				} | 
				
			||||
			} | 
				
			||||
			buf[i] = buf[i+1] = 254;  /* to be overwritten */ | 
				
			||||
			buf[i2] = bit; | 
				
			||||
		} | 
				
			||||
		// todo, nuke short segments
 | 
				
			||||
		//printf("%i\n", i2 - start);
 | 
				
			||||
	} | 
				
			||||
} | 
				
			||||
 | 
				
			||||
void messages(unsigned char *buf, int len) | 
				
			||||
{ | 
				
			||||
	int i, i2, start, preamble_found; | 
				
			||||
	int data_i, index, shift, frame_len; | 
				
			||||
	// todo, allow wrap across buffers
 | 
				
			||||
	for (i=0; i<len; i++) { | 
				
			||||
		if (buf[i] > 1) { | 
				
			||||
			continue;} | 
				
			||||
		frame_len = long_frame; | 
				
			||||
		data_i = 0; | 
				
			||||
		for (index=0; index<14; index++) { | 
				
			||||
			adsb_frame[index] = 0;} | 
				
			||||
		for(; i<len && buf[i]<=1 && data_i<frame_len; i++, data_i++) { | 
				
			||||
			if (buf[i]) { | 
				
			||||
				index = data_i / 8; | 
				
			||||
				shift = 7 - (data_i % 8); | 
				
			||||
				adsb_frame[index] |= (unsigned char)(1<<shift); | 
				
			||||
			} | 
				
			||||
			if (data_i == 7) { | 
				
			||||
				//if (adsb_frame[0] == 0) {
 | 
				
			||||
				//    break;}
 | 
				
			||||
				if (adsb_frame[0] & 0x80) { | 
				
			||||
					frame_len = long_frame;} | 
				
			||||
				else { | 
				
			||||
					frame_len = short_frame;} | 
				
			||||
			} | 
				
			||||
		} | 
				
			||||
		// todo, check CRC
 | 
				
			||||
		if (data_i < (frame_len-1)) { | 
				
			||||
			continue;} | 
				
			||||
		//fprintf(file, "bits: %i\n", data_i);
 | 
				
			||||
		display(adsb_frame, frame_len); | 
				
			||||
		fflush(file); | 
				
			||||
	} | 
				
			||||
} | 
				
			||||
 | 
				
			||||
static void rtlsdr_callback(unsigned char *buf, uint32_t len, void *ctx) | 
				
			||||
{ | 
				
			||||
	int dr_val; | 
				
			||||
	if (do_exit) { | 
				
			||||
		return;} | 
				
			||||
	memcpy(buffer, buf, len); | 
				
			||||
	sem_getvalue(&data_ready, &dr_val); | 
				
			||||
	if (dr_val <= 0) { | 
				
			||||
		sem_post(&data_ready);} | 
				
			||||
} | 
				
			||||
 | 
				
			||||
static void *demod_thread_fn(void *arg) | 
				
			||||
{ | 
				
			||||
	int len; | 
				
			||||
	while (!do_exit) { | 
				
			||||
		sem_wait(&data_ready); | 
				
			||||
		len = magnitute(buffer, DEFAULT_BUF_LENGTH); | 
				
			||||
		manchester(buffer, len); | 
				
			||||
		messages(buffer, len); | 
				
			||||
		//fsync(file);
 | 
				
			||||
	} | 
				
			||||
	rtlsdr_cancel_async(dev); | 
				
			||||
	return 0; | 
				
			||||
} | 
				
			||||
 | 
				
			||||
int main(int argc, char **argv) | 
				
			||||
{ | 
				
			||||
#ifndef _WIN32 | 
				
			||||
	struct sigaction sigact; | 
				
			||||
#endif | 
				
			||||
	char *filename = NULL; | 
				
			||||
	int n_read, r, opt; | 
				
			||||
	int i, gain = AUTO_GAIN; // tenths of a dB
 | 
				
			||||
	uint32_t dev_index = 0; | 
				
			||||
	int device_count; | 
				
			||||
	int ppm_error = 0; | 
				
			||||
	char vendor[256], product[256], serial[256]; | 
				
			||||
	sem_init(&data_ready, 0, 0); | 
				
			||||
 | 
				
			||||
	while ((opt = getopt(argc, argv, "g:p:e:RS")) != -1) | 
				
			||||
	{ | 
				
			||||
		switch (opt) { | 
				
			||||
		case 'd': | 
				
			||||
			dev_index = atoi(optarg); | 
				
			||||
			break; | 
				
			||||
		case 'g': | 
				
			||||
			gain = (int)(atof(optarg) * 10); | 
				
			||||
			break; | 
				
			||||
		case 'p': | 
				
			||||
			ppm_error = atoi(optarg); | 
				
			||||
			break; | 
				
			||||
		case 'R': | 
				
			||||
			raw_output = 1; | 
				
			||||
			break; | 
				
			||||
		case 'S': | 
				
			||||
			short_output = 1; | 
				
			||||
			break; | 
				
			||||
		case 'e': | 
				
			||||
			allowed_errors = atoi(optarg); | 
				
			||||
			break; | 
				
			||||
		default: | 
				
			||||
			usage(); | 
				
			||||
			return 0; | 
				
			||||
		} | 
				
			||||
	} | 
				
			||||
 | 
				
			||||
	if (argc <= optind) { | 
				
			||||
		//usage();
 | 
				
			||||
		filename = "-"; | 
				
			||||
	} else { | 
				
			||||
		filename = argv[optind]; | 
				
			||||
	} | 
				
			||||
 | 
				
			||||
	buffer = malloc(DEFAULT_BUF_LENGTH * sizeof(uint8_t)); | 
				
			||||
 | 
				
			||||
	device_count = rtlsdr_get_device_count(); | 
				
			||||
	if (!device_count) { | 
				
			||||
		fprintf(stderr, "No supported devices found.\n"); | 
				
			||||
		exit(1); | 
				
			||||
	} | 
				
			||||
 | 
				
			||||
	fprintf(stderr, "Found %d device(s):\n", device_count); | 
				
			||||
	for (i = 0; i < device_count; i++) { | 
				
			||||
		rtlsdr_get_device_usb_strings(i, vendor, product, serial); | 
				
			||||
		fprintf(stderr, "  %d:  %s, %s, SN: %s\n", i, vendor, product, serial); | 
				
			||||
	} | 
				
			||||
	fprintf(stderr, "\n"); | 
				
			||||
 | 
				
			||||
	fprintf(stderr, "Using device %d: %s\n", | 
				
			||||
		dev_index, rtlsdr_get_device_name(dev_index)); | 
				
			||||
 | 
				
			||||
	r = rtlsdr_open(&dev, dev_index); | 
				
			||||
	if (r < 0) { | 
				
			||||
		fprintf(stderr, "Failed to open rtlsdr device #%d.\n", dev_index); | 
				
			||||
		exit(1); | 
				
			||||
	} | 
				
			||||
#ifndef _WIN32 | 
				
			||||
	sigact.sa_handler = sighandler; | 
				
			||||
	sigemptyset(&sigact.sa_mask); | 
				
			||||
	sigact.sa_flags = 0; | 
				
			||||
	sigaction(SIGINT, &sigact, NULL); | 
				
			||||
	sigaction(SIGTERM, &sigact, NULL); | 
				
			||||
	sigaction(SIGQUIT, &sigact, NULL); | 
				
			||||
	sigaction(SIGPIPE, &sigact, NULL); | 
				
			||||
#else | 
				
			||||
	SetConsoleCtrlHandler( (PHANDLER_ROUTINE) sighandler, TRUE ); | 
				
			||||
#endif | 
				
			||||
 | 
				
			||||
	if (strcmp(filename, "-") == 0) { /* Write samples to stdout */ | 
				
			||||
		file = stdout; | 
				
			||||
#ifdef _WIN32 | 
				
			||||
		_setmode(_fileno(file), _O_BINARY); | 
				
			||||
#endif | 
				
			||||
	} else { | 
				
			||||
		file = fopen(filename, "wb"); | 
				
			||||
		if (!file) { | 
				
			||||
			fprintf(stderr, "Failed to open %s\n", filename); | 
				
			||||
			exit(1); | 
				
			||||
		} | 
				
			||||
	} | 
				
			||||
 | 
				
			||||
	/* Set the tuner gain */ | 
				
			||||
	if (gain == AUTO_GAIN) { | 
				
			||||
		r = rtlsdr_set_tuner_gain_mode(dev, 0); | 
				
			||||
	} else { | 
				
			||||
		r = rtlsdr_set_tuner_gain_mode(dev, 1); | 
				
			||||
		r = rtlsdr_set_tuner_gain(dev, gain); | 
				
			||||
	} | 
				
			||||
	if (r != 0) { | 
				
			||||
		fprintf(stderr, "WARNING: Failed to set tuner gain.\n"); | 
				
			||||
	} else if (gain == AUTO_GAIN) { | 
				
			||||
		fprintf(stderr, "Tuner gain set to automatic.\n"); | 
				
			||||
	} else { | 
				
			||||
		fprintf(stderr, "Tuner gain set to %0.2f dB.\n", gain/10.0); | 
				
			||||
	} | 
				
			||||
 | 
				
			||||
	r = rtlsdr_set_freq_correction(dev, ppm_error); | 
				
			||||
	r = rtlsdr_set_agc_mode(dev, 1); | 
				
			||||
 | 
				
			||||
	/* Set the tuner frequency */ | 
				
			||||
	r = rtlsdr_set_center_freq(dev, ADSB_FREQ); | 
				
			||||
	if (r < 0) { | 
				
			||||
		fprintf(stderr, "WARNING: Failed to set center freq.\n");} | 
				
			||||
	else { | 
				
			||||
		fprintf(stderr, "Tuned to %u Hz.\n", ADSB_FREQ);} | 
				
			||||
 | 
				
			||||
	/* Set the sample rate */ | 
				
			||||
	fprintf(stderr, "Sampling at %u Hz.\n", ADSB_RATE); | 
				
			||||
	r = rtlsdr_set_sample_rate(dev, ADSB_RATE); | 
				
			||||
	if (r < 0) { | 
				
			||||
		fprintf(stderr, "WARNING: Failed to set sample rate.\n");} | 
				
			||||
 | 
				
			||||
	/* Reset endpoint before we start reading from it (mandatory) */ | 
				
			||||
	r = rtlsdr_reset_buffer(dev); | 
				
			||||
	if (r < 0) { | 
				
			||||
		fprintf(stderr, "WARNING: Failed to reset buffers.\n");} | 
				
			||||
 | 
				
			||||
	/* flush old junk */ | 
				
			||||
	sleep(1); | 
				
			||||
	rtlsdr_read_sync(dev, NULL, 4096, NULL); | 
				
			||||
 | 
				
			||||
	pthread_create(&demod_thread, NULL, demod_thread_fn, (void *)(NULL)); | 
				
			||||
	rtlsdr_read_async(dev, rtlsdr_callback, (void *)(NULL), | 
				
			||||
			      DEFAULT_ASYNC_BUF_NUMBER, | 
				
			||||
			      DEFAULT_BUF_LENGTH); | 
				
			||||
 | 
				
			||||
 | 
				
			||||
	if (do_exit) { | 
				
			||||
		fprintf(stderr, "\nUser cancel, exiting...\n");} | 
				
			||||
	else { | 
				
			||||
		fprintf(stderr, "\nLibrary error %d, exiting...\n", r);} | 
				
			||||
	rtlsdr_cancel_async(dev); | 
				
			||||
 | 
				
			||||
	if (file != stdout) { | 
				
			||||
		fclose(file);} | 
				
			||||
 | 
				
			||||
	rtlsdr_close(dev); | 
				
			||||
	free(buffer); | 
				
			||||
	return r >= 0 ? r : -r; | 
				
			||||
} | 
				
			||||
 | 
				
			||||
					Loading…
					
					
				
		Reference in new issue