GNU Radio block for interfacing with various radio hardware
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
gr-osmosdr/lib/xtrx/xtrx_source_c.cc

583 lines
15 KiB

/* -*- c++ -*- */
/*
* Copyright 2016,2017 Sergey Kostanbaev <sergey.kostanbaev@fairwaves.co>
*
* GNU Radio 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.
*
* GNU Radio 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 GNU Radio; see the file COPYING. If not, write to
* the Free Software Foundation, Inc., 51 Franklin Street,
* Boston, MA 02110-1301, USA.
*/
#include <fstream>
#include <string>
#include <sstream>
#include <map>
#include <boost/assign.hpp>
#include <boost/algorithm/string.hpp>
#include <boost/thread.hpp>
#include <boost/thread/thread.hpp>
#include <boost/thread/mutex.hpp>
#include <gnuradio/io_signature.h>
#include <gnuradio/blocks/deinterleave.h>
#include <gnuradio/blocks/float_to_complex.h>
#include "xtrx_source_c.h"
#include "arg_helpers.h"
using namespace boost::assign;
xtrx_source_c_sptr make_xtrx_source_c(const std::string &args)
{
return gnuradio::get_initial_sptr(new xtrx_source_c(args));
}
static size_t parse_nchan(const std::string &args)
{
size_t nchan = 1;
dict_t dict = params_to_dict(args);
if (dict.count("nchan"))
nchan = boost::lexical_cast< size_t >( dict["nchan"] );
if (nchan < 1)
nchan = 1;
return nchan;
}
xtrx_source_c::xtrx_source_c(const std::string &args) :
gr::sync_block("xtrx_source_c",
gr::io_signature::make(0, 0, 0),
gr::io_signature::make(parse_nchan(args),
parse_nchan(args),
sizeof(gr_complex))),
_sample_flags(0),
_rate(0),
_master(0),
_freq(0),
_corr(0),
_bandwidth(0),
_auto_gain(false),
_otw(XTRX_WF_16),
_mimo_mode(false),
_gain_lna(0),
_gain_tia(0),
_gain_pga(0),
_channels(parse_nchan(args)),
_swap_ab(false),
_swap_iq(false),
_loopback(false),
_tdd(false),
_fbctrl(false),
_timekey(false),
_dsp(0)
{
_id = pmt::string_to_symbol(args);
dict_t dict = params_to_dict(args);
if (dict.count("otw_format")) {
const std::string& otw = dict["otw_format"];
if (otw == "sc16" || otw == "16") {
_otw = XTRX_WF_16;
} else if (otw == "sc12" || otw == "12") {
_otw = XTRX_WF_12;
} else if (otw == "sc8" || otw == "8") {
_otw = XTRX_WF_8;
} else {
throw std::runtime_error("Parameter `otw_format` should be {sc16,sc12,sc8}");
}
}
if (dict.count("master")) {
_master = boost::lexical_cast< double >( dict["master"]);
}
std::cerr << args.c_str() << std::endl;
int loglevel = 4;
if (dict.count("loglevel")) {
loglevel = boost::lexical_cast< int >( dict["loglevel"] );
}
bool lmsreset = 0;
if (dict.count("lmsreset")) {
lmsreset = boost::lexical_cast< bool >( dict["lmsreset"] );
}
if (dict.count("fbctrl")) {
_fbctrl = boost::lexical_cast< bool >( dict["fbctrl"] );
}
if (dict.count("swap_ab")) {
_swap_ab = true;
std::cerr << "xtrx_source_c: swap AB channels";
}
if (dict.count("swap_iq")) {
_swap_iq = true;
std::cerr << "xtrx_source_c: swap IQ";
}
if (dict.count("sfl")) {
_sample_flags = boost::lexical_cast< unsigned >( dict["sfl"] );
}
if (dict.count("loopback")) {
_loopback = true;
std::cerr << "xtrx_source_c: loopback";
}
if (dict.count("tdd")) {
_tdd = true;
std::cerr << "xtrx_source_c: TDD mode";
}
if (dict.count("dsp")) {
_dsp = boost::lexical_cast< double >( dict["dsp"] );
std::cerr << "xtrx_source_c: DSP:" << _dsp;
}
if (dict.count("dev")) {
_dev = dict["dev"];
std::cerr << "xtrx_source_c: XTRX device: %s" << _dev.c_str();
}
_xtrx = xtrx_obj::get(_dev.c_str(), loglevel, lmsreset);
if (_xtrx->dev_count() * 2 == _channels) {
_mimo_mode = true;
} else if (_xtrx->dev_count() != _channels) {
throw std::runtime_error("Number of requested channels != number of devices");
}
if (dict.count("refclk")) {
xtrx_set_ref_clk(_xtrx->dev(), boost::lexical_cast< unsigned >( dict["refclk"] ), XTRX_CLKSRC_INT);
}
if (dict.count("extclk")) {
xtrx_set_ref_clk(_xtrx->dev(), boost::lexical_cast< unsigned >( dict["extclk"] ), XTRX_CLKSRC_EXT);
}
if (dict.count("vio")) {
unsigned vio = boost::lexical_cast< unsigned >( dict["vio"] );
_xtrx->set_vio(vio);
}
if (dict.count("dac")) {
unsigned dac = boost::lexical_cast< unsigned >( dict["dac"] );
xtrx_val_set(_xtrx->dev(), XTRX_TRX, XTRX_CH_ALL, XTRX_VCTCXO_DAC_VAL, dac);
}
if (dict.count("pmode")) {
unsigned pmode = boost::lexical_cast< unsigned >( dict["pmode"] );
xtrx_val_set(_xtrx->dev(), XTRX_TRX, XTRX_CH_ALL, XTRX_LMS7_PWR_MODE, pmode);
}
if (dict.count("timekey")) {
_timekey = boost::lexical_cast< bool >( dict["timekey"] );
}
std::cerr << "xtrx_source_c::xtrx_source_c()" << std::endl;
set_alignment(32);
if (_otw == XTRX_WF_16) {
if (_mimo_mode)
set_output_multiple(4096);
else
set_output_multiple(8192);
} else if (_otw == XTRX_WF_8) {
if (_mimo_mode)
set_output_multiple(8192);
else
set_output_multiple(16384);
}
}
xtrx_source_c::~xtrx_source_c()
{
std::cerr << "xtrx_source_c::~xtrx_source_c()" << std::endl;
}
std::string xtrx_source_c::name()
{
return "GrLibXTRX";
}
size_t xtrx_source_c::get_num_channels( void )
{
return output_signature()->max_streams();
}
osmosdr::meta_range_t xtrx_source_c::get_sample_rates( void )
{
osmosdr::meta_range_t range;
range += osmosdr::range_t( 200000, 160000000, 1 );
return range;
}
double xtrx_source_c::set_sample_rate( double rate )
{
std::cerr << "Set sample rate " << rate << std::endl;
_rate = _xtrx->set_smaplerate(rate, _master, false, _sample_flags);
return get_sample_rate();
}
double xtrx_source_c::get_sample_rate( void )
{
return _rate;
}
osmosdr::freq_range_t xtrx_source_c::get_freq_range( size_t chan )
{
osmosdr::freq_range_t range;
range += osmosdr::range_t( double(0.03e9), double(3.8e9), 1); // as far as we know
return range;
}
double xtrx_source_c::set_center_freq( double freq, size_t chan )
{
boost::mutex::scoped_lock lock(_xtrx->mtx);
_freq = freq;
double corr_freq = (freq)*(1.0 + (_corr) * 0.000001);
if (_tdd)
return get_center_freq(chan);
xtrx_channel_t xchan = (xtrx_channel_t)(XTRX_CH_A << chan);
std::cerr << "Set freq " << freq << std::endl;
int res = xtrx_tune_ex(_xtrx->dev(), XTRX_TUNE_RX_FDD, xchan, corr_freq - _dsp, &_freq);
if (res) {
std::cerr << "Unable to deliver frequency " << corr_freq << std::endl;
}
res = xtrx_tune_ex(_xtrx->dev(), XTRX_TUNE_BB_RX, xchan, _dsp, NULL);
return get_center_freq(chan);
}
double xtrx_source_c::get_center_freq( size_t chan )
{
return _freq;
}
double xtrx_source_c::set_freq_corr( double ppm, size_t chan )
{
_corr = ppm;
set_center_freq(_freq, chan);
return get_freq_corr( chan );
}
double xtrx_source_c::get_freq_corr( size_t chan )
{
return _corr;
}
static const std::map<std::string, xtrx_gain_type_t> s_lna_map = boost::assign::map_list_of
("LNA", XTRX_RX_LNA_GAIN)
("TIA", XTRX_RX_TIA_GAIN)
("PGA", XTRX_RX_PGA_GAIN)
("LB", XTRX_RX_LB_GAIN)
;
static xtrx_gain_type_t get_gain_type(const std::string& name)
{
std::map<std::string, xtrx_gain_type_t>::const_iterator it;
it = s_lna_map.find(name);
if (it != s_lna_map.end()) {
return it->second;
}
return XTRX_RX_LNA_GAIN;
}
static const std::vector<std::string> s_lna_list = boost::assign::list_of
("LNA")("TIA")("PGA")("LB")
;
std::vector<std::string> xtrx_source_c::get_gain_names( size_t chan )
{
return s_lna_list;
}
osmosdr::gain_range_t xtrx_source_c::get_gain_range( size_t chan )
{
return get_gain_range("LNA", chan);
}
osmosdr::gain_range_t xtrx_source_c::get_gain_range( const std::string & name, size_t chan )
{
osmosdr::gain_range_t range;
if (name == "LNA") {
range += osmosdr::range_t( 0, 24, 3 );
range += osmosdr::range_t( 25, 30, 1 );
} else if (name == "TIA") {
range += osmosdr::range_t( 0 );
range += osmosdr::range_t( 9 );
range += osmosdr::range_t( 12 );
} else if (name == "PGA") {
range += osmosdr::range_t( -12.5, 12.5, 1 );
} else if (name == "LB") {
range += osmosdr::range_t( -40, 0, 1 );
}
return range;
}
bool xtrx_source_c::set_gain_mode( bool automatic, size_t chan )
{
_auto_gain = automatic;
return get_gain_mode(chan);
}
bool xtrx_source_c::get_gain_mode( size_t chan )
{
return _auto_gain;
}
double xtrx_source_c::set_gain( double gain, size_t chan )
{
return set_gain(gain, "LNA", chan);
}
double xtrx_source_c::set_gain( double igain, const std::string & name, size_t chan )
{
boost::mutex::scoped_lock lock(_xtrx->mtx);
osmosdr::gain_range_t gains = xtrx_source_c::get_gain_range( name, chan );
double gain = gains.clip(igain);
double actual_gain;
xtrx_gain_type_t gt = get_gain_type(name);
std::cerr << "Set gain " << name << " (" << gt << "): " << igain << std::endl;
int res = xtrx_set_gain(_xtrx->dev(), (xtrx_channel_t)(XTRX_CH_A << chan),
gt, gain, &actual_gain);
if (res) {
std::cerr << "Unable to set gain `" << name.c_str() << "`; err=" << res << std::endl;
}
switch (gt) {
case XTRX_RX_LNA_GAIN: _gain_lna = actual_gain; break;
case XTRX_RX_TIA_GAIN: _gain_tia = actual_gain; break;
case XTRX_RX_PGA_GAIN: _gain_pga = actual_gain; break;
default: break;
}
return actual_gain;
}
double xtrx_source_c::get_gain( size_t chan )
{
return get_gain("LNA");
}
double xtrx_source_c::get_gain( const std::string & name, size_t chan )
{
xtrx_gain_type_t gt = get_gain_type(name);
switch (gt) {
case XTRX_RX_LNA_GAIN: return _gain_lna;
case XTRX_RX_TIA_GAIN: return _gain_tia;
case XTRX_RX_PGA_GAIN: return _gain_pga;
default: return 0;
}
}
double xtrx_source_c::set_if_gain(double gain, size_t chan)
{
return set_gain(gain, "PGA", chan);
}
double xtrx_source_c::set_bandwidth( double bandwidth, size_t chan )
{
boost::mutex::scoped_lock lock(_xtrx->mtx);
std::cerr << "Set bandwidth " << bandwidth << " chan " << chan << std::endl;
if (bandwidth <= 0.0) {
bandwidth = get_sample_rate() * 0.75;
if (bandwidth < 0.5e6) {
bandwidth = 0.5e6;
}
}
int res = xtrx_tune_rx_bandwidth(_xtrx->dev(), (xtrx_channel_t)(XTRX_CH_A << chan),
bandwidth, &_bandwidth);
if (res) {
std::cerr << "Can't set bandwidth: " << res << std::endl;
}
return get_bandwidth(chan);
}
double xtrx_source_c::get_bandwidth( size_t chan )
{
return _bandwidth;
}
osmosdr::freq_range_t xtrx_source_c::get_bandwidth_range( size_t chan )
{
return osmosdr::freq_range_t(500e3, 140e6, 0);
}
static const std::map<std::string, xtrx_antenna_t> s_ant_map = boost::assign::map_list_of
("AUTO", XTRX_RX_AUTO)
("RXL", XTRX_RX_L)
("RXH", XTRX_RX_H)
("RXW", XTRX_RX_W)
("RXL_LB", XTRX_RX_L_LB)
("RXW_LB", XTRX_RX_W_LB)
;
static const std::map<xtrx_antenna_t, std::string> s_ant_map_r = boost::assign::map_list_of
(XTRX_RX_AUTO, "AUTO")
(XTRX_RX_L, "RXL")
(XTRX_RX_H, "RXH")
(XTRX_RX_W, "RXW")
(XTRX_RX_L_LB, "RXL_LB")
(XTRX_RX_W_LB, "RXW_LB")
;
static xtrx_antenna_t get_ant_type(const std::string& name)
{
std::map<std::string, xtrx_antenna_t>::const_iterator it;
it = s_ant_map.find(name);
if (it != s_ant_map.end()) {
return it->second;
}
return XTRX_RX_AUTO;
}
static const std::vector<std::string> s_ant_list = boost::assign::list_of
("AUTO")("RXL")("RXH")("RXW")
;
std::vector< std::string > xtrx_source_c::get_antennas( size_t chan )
{
return s_ant_list;
}
std::string xtrx_source_c::set_antenna( const std::string & antenna, size_t chan )
{
boost::mutex::scoped_lock lock(_xtrx->mtx);
_ant = get_ant_type(antenna);
std::cerr << "Set antenna " << antenna << " type:" << _ant << std::endl;
int res = xtrx_set_antenna_ex(_xtrx->dev(), (xtrx_channel_t)(XTRX_CH_A << chan),
_ant);
if (res) {
std::cerr << "Can't set antenna: " << antenna << std::endl;
}
return get_antenna( chan );
}
std::string xtrx_source_c::get_antenna( size_t chan )
{
return s_ant_map_r.find(_ant)->second;
}
int xtrx_source_c::work (int noutput_items,
gr_vector_const_void_star &input_items,
gr_vector_void_star &output_items)
{
xtrx_recv_ex_info_t ri;
ri.samples = noutput_items;
ri.buffer_count = output_items.size();
ri.buffers = &output_items[0];
ri.flags = RCVEX_DONT_INSER_ZEROS | RCVEX_DROP_OLD_ON_OVERFLOW;
ri.timeout = 1000;
int res = xtrx_recv_sync_ex(_xtrx->dev(), &ri);
if (res) {
std::stringstream message;
message << "xtrx_recv_sync error: " << -res;
throw std::runtime_error( message.str() );
}
if (_timekey) {
uint64_t seconds = (ri.out_first_sample / _rate);
double fractional = (ri.out_first_sample - (uint64_t)(_rate * seconds)) / _rate;
//std::cerr << "Time " << seconds << ":" << fractional << std::endl;
const pmt::pmt_t val = pmt::make_tuple
(pmt::from_uint64(seconds),
pmt::from_double(fractional));
for(size_t i = 0; i < output_items.size(); i++) {
this->add_item_tag(i, nitems_written(0), TIME_KEY,
val, _id);
this->add_item_tag(i, nitems_written(0), RATE_KEY,
pmt::from_double(_rate), _id);
this->add_item_tag(i, nitems_written(0), FREQ_KEY,
pmt::from_double(this->get_center_freq(i)), _id);
}
}
return ri.out_samples;
}
bool xtrx_source_c::start()
{
boost::mutex::scoped_lock lock(_xtrx->mtx);
xtrx_run_params_t params;
xtrx_run_params_init(&params);
params.dir = XTRX_RX;
if (!_mimo_mode)
params.rx.flags |= XTRX_RSP_SISO_MODE;
if (_swap_ab)
params.rx.flags |= XTRX_RSP_SWAP_AB;
if (_swap_iq)
params.rx.flags |= XTRX_RSP_SWAP_IQ;
params.rx.hfmt = XTRX_IQ_FLOAT32;
params.rx.wfmt = _otw;
params.rx.chs = XTRX_CH_AB;
params.rx.paketsize = 0;
params.rx_stream_start = 256*1024;
params.nflags = (_loopback) ? XTRX_RUN_DIGLOOPBACK : 0;
int res = xtrx_run_ex(_xtrx->dev(), &params);
if (res) {
std::cerr << "Got error: " << res << std::endl;
}
res = xtrx_tune_ex(_xtrx->dev(), XTRX_TUNE_BB_RX, XTRX_CH_ALL, _dsp, NULL);
return res == 0;
}
bool xtrx_source_c::stop()
{
boost::mutex::scoped_lock lock(_xtrx->mtx);
//TODO:
std::cerr << "xtrx_source_c::stop()" << std::endl;
int res = xtrx_stop(_xtrx->dev(), XTRX_RX);
if (res) {
std::cerr << "Got error: " << res << std::endl;
}
return res == 0;
}