1077 lines
29 KiB
C++
1077 lines
29 KiB
C++
/*
|
|
* Copyright 2008, 2009, 2010 Free Software Foundation, Inc.
|
|
*
|
|
* This software is distributed under the terms of the GNU Public License.
|
|
* See the COPYING file in the main directory for details.
|
|
*
|
|
* This use of this software may be subject to additional restrictions.
|
|
* See the LEGAL file in the main directory for details.
|
|
|
|
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 3 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 <stdio.h>
|
|
#include <iomanip> // std::setprecision
|
|
#include <fstream>
|
|
#include "Transceiver.h"
|
|
#include <Logger.h>
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include "config.h"
|
|
#endif
|
|
|
|
using namespace GSM;
|
|
|
|
#define USB_LATENCY_INTRVL 10,0
|
|
|
|
#if USE_UHD
|
|
# define USB_LATENCY_MIN 6,7
|
|
#else
|
|
# define USB_LATENCY_MIN 1,1
|
|
#endif
|
|
|
|
/* Number of running values use in noise average */
|
|
#define NOISE_CNT 20
|
|
|
|
TransceiverState::TransceiverState()
|
|
: mRetrans(false), mNoiseLev(0.0), mNoises(NOISE_CNT), mPower(0.0)
|
|
{
|
|
for (int i = 0; i < 8; i++) {
|
|
chanType[i] = Transceiver::NONE;
|
|
fillerModulus[i] = 26;
|
|
chanResponse[i] = NULL;
|
|
DFEForward[i] = NULL;
|
|
DFEFeedback[i] = NULL;
|
|
|
|
for (int n = 0; n < 102; n++)
|
|
fillerTable[n][i] = NULL;
|
|
}
|
|
}
|
|
|
|
TransceiverState::~TransceiverState()
|
|
{
|
|
for (int i = 0; i < 8; i++) {
|
|
delete chanResponse[i];
|
|
delete DFEForward[i];
|
|
delete DFEFeedback[i];
|
|
|
|
for (int n = 0; n < 102; n++)
|
|
delete fillerTable[n][i];
|
|
}
|
|
}
|
|
|
|
bool TransceiverState::init(int filler, size_t sps, float scale, size_t rtsc, unsigned rach_delay)
|
|
{
|
|
signalVector *burst;
|
|
|
|
if ((sps != 1) && (sps != 4))
|
|
return false;
|
|
|
|
for (size_t n = 0; n < 8; n++) {
|
|
for (size_t i = 0; i < 102; i++) {
|
|
switch (filler) {
|
|
case Transceiver::FILLER_DUMMY:
|
|
burst = generateDummyBurst(sps, n);
|
|
break;
|
|
case Transceiver::FILLER_NORM_RAND:
|
|
burst = genRandNormalBurst(rtsc, sps, n);
|
|
break;
|
|
case Transceiver::FILLER_EDGE_RAND:
|
|
burst = generateEdgeBurst(rtsc);
|
|
break;
|
|
case Transceiver::FILLER_ACCESS_RAND:
|
|
burst = genRandAccessBurst(rach_delay, sps, n);
|
|
break;
|
|
case Transceiver::FILLER_ZERO:
|
|
default:
|
|
burst = generateEmptyBurst(sps, n);
|
|
}
|
|
|
|
scaleVector(*burst, scale);
|
|
fillerTable[i][n] = burst;
|
|
}
|
|
|
|
if ((filler == Transceiver::FILLER_NORM_RAND) ||
|
|
(filler == Transceiver::FILLER_EDGE_RAND)) {
|
|
chanType[n] = TSC;
|
|
}
|
|
}
|
|
|
|
return false;
|
|
}
|
|
|
|
Transceiver::Transceiver(int wBasePort,
|
|
const char *TRXAddress,
|
|
const char *GSMcoreAddress,
|
|
size_t tx_sps, size_t rx_sps, size_t chans,
|
|
GSM::Time wTransmitLatency,
|
|
RadioInterface *wRadioInterface,
|
|
double wRssiOffset)
|
|
: mBasePort(wBasePort), mLocalAddr(TRXAddress), mRemoteAddr(GSMcoreAddress),
|
|
mClockSocket(TRXAddress, wBasePort, GSMcoreAddress, wBasePort + 100),
|
|
mTransmitLatency(wTransmitLatency), mRadioInterface(wRadioInterface),
|
|
rssiOffset(wRssiOffset),
|
|
mSPSTx(tx_sps), mSPSRx(rx_sps), mChans(chans), mEdge(false), mOn(false), mForceClockInterface(false),
|
|
mTxFreq(0.0), mRxFreq(0.0), mTSC(0), mMaxExpectedDelayAB(0), mMaxExpectedDelayNB(0),
|
|
mWriteBurstToDiskMask(0)
|
|
{
|
|
txFullScale = mRadioInterface->fullScaleInputValue();
|
|
rxFullScale = mRadioInterface->fullScaleOutputValue();
|
|
|
|
for (int i = 0; i < 8; i++) {
|
|
for (int j = 0; j < 8; j++)
|
|
mHandover[i][j] = false;
|
|
}
|
|
}
|
|
|
|
Transceiver::~Transceiver()
|
|
{
|
|
stop();
|
|
|
|
sigProcLibDestroy();
|
|
|
|
for (size_t i = 0; i < mChans; i++) {
|
|
mControlServiceLoopThreads[i]->cancel();
|
|
mControlServiceLoopThreads[i]->join();
|
|
delete mControlServiceLoopThreads[i];
|
|
|
|
mTxPriorityQueues[i].clear();
|
|
delete mCtrlSockets[i];
|
|
delete mDataSockets[i];
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Initialize transceiver
|
|
*
|
|
* Start or restart the control loop. Any further control is handled through the
|
|
* socket API. Randomize the central radio clock set the downlink burst
|
|
* counters. Note that the clock will not update until the radio starts, but we
|
|
* are still expected to report clock indications through control channel
|
|
* activity.
|
|
*/
|
|
bool Transceiver::init(int filler, size_t rtsc, unsigned rach_delay, bool edge)
|
|
{
|
|
int d_srcport, d_dstport, c_srcport, c_dstport;
|
|
|
|
if (!mChans) {
|
|
LOG(ALERT) << "No channels assigned";
|
|
return false;
|
|
}
|
|
|
|
if (!sigProcLibSetup()) {
|
|
LOG(ALERT) << "Failed to initialize signal processing library";
|
|
return false;
|
|
}
|
|
|
|
mEdge = edge;
|
|
|
|
mDataSockets.resize(mChans);
|
|
mCtrlSockets.resize(mChans);
|
|
mControlServiceLoopThreads.resize(mChans);
|
|
mTxPriorityQueueServiceLoopThreads.resize(mChans);
|
|
mRxServiceLoopThreads.resize(mChans);
|
|
|
|
mTxPriorityQueues.resize(mChans);
|
|
mReceiveFIFO.resize(mChans);
|
|
mStates.resize(mChans);
|
|
|
|
/* Filler table retransmissions - support only on channel 0 */
|
|
if (filler == FILLER_DUMMY)
|
|
mStates[0].mRetrans = true;
|
|
|
|
/* Setup sockets */
|
|
for (size_t i = 0; i < mChans; i++) {
|
|
c_srcport = mBasePort + 2 * i + 1;
|
|
c_dstport = mBasePort + 2 * i + 101;
|
|
d_srcport = mBasePort + 2 * i + 2;
|
|
d_dstport = mBasePort + 2 * i + 102;
|
|
|
|
mCtrlSockets[i] = new UDPSocket(mLocalAddr.c_str(), c_srcport, mRemoteAddr.c_str(), c_dstport);
|
|
mDataSockets[i] = new UDPSocket(mLocalAddr.c_str(), d_srcport, mRemoteAddr.c_str(), d_dstport);
|
|
}
|
|
|
|
/* Randomize the central clock */
|
|
GSM::Time startTime(random() % gHyperframe, 0);
|
|
mRadioInterface->getClock()->set(startTime);
|
|
mTransmitDeadlineClock = startTime;
|
|
mLastClockUpdateTime = startTime;
|
|
mLatencyUpdateTime = startTime;
|
|
|
|
/* Start control threads */
|
|
for (size_t i = 0; i < mChans; i++) {
|
|
TransceiverChannel *chan = new TransceiverChannel(this, i);
|
|
mControlServiceLoopThreads[i] = new Thread(32768);
|
|
mControlServiceLoopThreads[i]->start((void * (*)(void*))
|
|
ControlServiceLoopAdapter, (void*) chan);
|
|
|
|
if (i && filler == FILLER_DUMMY)
|
|
filler = FILLER_ZERO;
|
|
|
|
mStates[i].init(filler, mSPSTx, txFullScale, rtsc, rach_delay);
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* Start the transceiver
|
|
*
|
|
* Submit command(s) to the radio device to commence streaming samples and
|
|
* launch threads to handle sample I/O. Re-synchronize the transmit burst
|
|
* counters to the central radio clock here as well.
|
|
*/
|
|
bool Transceiver::start()
|
|
{
|
|
ScopedLock lock(mLock);
|
|
|
|
if (mOn) {
|
|
LOG(ERR) << "Transceiver already running";
|
|
return true;
|
|
}
|
|
|
|
LOG(NOTICE) << "Starting the transceiver";
|
|
|
|
GSM::Time time = mRadioInterface->getClock()->get();
|
|
mTransmitDeadlineClock = time;
|
|
mLastClockUpdateTime = time;
|
|
mLatencyUpdateTime = time;
|
|
|
|
if (!mRadioInterface->start()) {
|
|
LOG(ALERT) << "Device failed to start";
|
|
return false;
|
|
}
|
|
|
|
/* Device is running - launch I/O threads */
|
|
mRxLowerLoopThread = new Thread(32768);
|
|
mTxLowerLoopThread = new Thread(32768);
|
|
mTxLowerLoopThread->start((void * (*)(void*))
|
|
TxLowerLoopAdapter,(void*) this);
|
|
mRxLowerLoopThread->start((void * (*)(void*))
|
|
RxLowerLoopAdapter,(void*) this);
|
|
|
|
/* Launch uplink and downlink burst processing threads */
|
|
for (size_t i = 0; i < mChans; i++) {
|
|
TransceiverChannel *chan = new TransceiverChannel(this, i);
|
|
mRxServiceLoopThreads[i] = new Thread(32768);
|
|
mRxServiceLoopThreads[i]->start((void * (*)(void*))
|
|
RxUpperLoopAdapter, (void*) chan);
|
|
|
|
chan = new TransceiverChannel(this, i);
|
|
mTxPriorityQueueServiceLoopThreads[i] = new Thread(32768);
|
|
mTxPriorityQueueServiceLoopThreads[i]->start((void * (*)(void*))
|
|
TxUpperLoopAdapter, (void*) chan);
|
|
}
|
|
|
|
mForceClockInterface = true;
|
|
mOn = true;
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* Stop the transceiver
|
|
*
|
|
* Perform stopping by disabling receive streaming and issuing cancellation
|
|
* requests to running threads. Most threads will timeout and terminate once
|
|
* device is disabled, but the transmit loop may block waiting on the central
|
|
* UMTS clock. Explicitly signal the clock to make sure that the transmit loop
|
|
* makes it to the thread cancellation point.
|
|
*/
|
|
void Transceiver::stop()
|
|
{
|
|
ScopedLock lock(mLock);
|
|
|
|
if (!mOn)
|
|
return;
|
|
|
|
LOG(NOTICE) << "Stopping the transceiver";
|
|
mTxLowerLoopThread->cancel();
|
|
mRxLowerLoopThread->cancel();
|
|
mTxLowerLoopThread->join();
|
|
mRxLowerLoopThread->join();
|
|
delete mTxLowerLoopThread;
|
|
delete mRxLowerLoopThread;
|
|
|
|
for (size_t i = 0; i < mChans; i++) {
|
|
mRxServiceLoopThreads[i]->cancel();
|
|
mTxPriorityQueueServiceLoopThreads[i]->cancel();
|
|
}
|
|
|
|
LOG(INFO) << "Stopping the device";
|
|
mRadioInterface->stop();
|
|
|
|
for (size_t i = 0; i < mChans; i++) {
|
|
mRxServiceLoopThreads[i]->join();
|
|
mTxPriorityQueueServiceLoopThreads[i]->join();
|
|
delete mRxServiceLoopThreads[i];
|
|
delete mTxPriorityQueueServiceLoopThreads[i];
|
|
|
|
mTxPriorityQueues[i].clear();
|
|
}
|
|
|
|
mOn = false;
|
|
LOG(NOTICE) << "Transceiver stopped";
|
|
}
|
|
|
|
void Transceiver::addRadioVector(size_t chan, BitVector &bits,
|
|
int RSSI, GSM::Time &wTime)
|
|
{
|
|
signalVector *burst;
|
|
radioVector *radio_burst;
|
|
|
|
if (chan >= mTxPriorityQueues.size()) {
|
|
LOG(ALERT) << "Invalid channel " << chan;
|
|
return;
|
|
}
|
|
|
|
if (wTime.TN() > 7) {
|
|
LOG(ALERT) << "Received burst with invalid slot " << wTime.TN();
|
|
return;
|
|
}
|
|
|
|
/* Use the number of bits as the EDGE burst indicator */
|
|
if (bits.size() == EDGE_BURST_NBITS)
|
|
burst = modulateEdgeBurst(bits, mSPSTx);
|
|
else
|
|
burst = modulateBurst(bits, 8 + (wTime.TN() % 4 == 0), mSPSTx);
|
|
|
|
scaleVector(*burst, txFullScale * pow(10, -RSSI / 10));
|
|
|
|
radio_burst = new radioVector(wTime, burst);
|
|
|
|
mTxPriorityQueues[chan].write(radio_burst);
|
|
}
|
|
|
|
void Transceiver::updateFillerTable(size_t chan, radioVector *burst)
|
|
{
|
|
int TN, modFN;
|
|
TransceiverState *state = &mStates[chan];
|
|
|
|
TN = burst->getTime().TN();
|
|
modFN = burst->getTime().FN() % state->fillerModulus[TN];
|
|
|
|
delete state->fillerTable[modFN][TN];
|
|
state->fillerTable[modFN][TN] = burst->getVector();
|
|
burst->setVector(NULL);
|
|
}
|
|
|
|
void Transceiver::pushRadioVector(GSM::Time &nowTime)
|
|
{
|
|
int TN, modFN;
|
|
radioVector *burst;
|
|
TransceiverState *state;
|
|
std::vector<signalVector *> bursts(mChans);
|
|
std::vector<bool> zeros(mChans);
|
|
std::vector<bool> filler(mChans, true);
|
|
|
|
for (size_t i = 0; i < mChans; i ++) {
|
|
state = &mStates[i];
|
|
|
|
while ((burst = mTxPriorityQueues[i].getStaleBurst(nowTime))) {
|
|
LOG(NOTICE) << "dumping STALE burst in TRX->USRP interface";
|
|
if (state->mRetrans)
|
|
updateFillerTable(i, burst);
|
|
delete burst;
|
|
}
|
|
|
|
TN = nowTime.TN();
|
|
modFN = nowTime.FN() % state->fillerModulus[TN];
|
|
|
|
bursts[i] = state->fillerTable[modFN][TN];
|
|
zeros[i] = state->chanType[TN] == NONE;
|
|
|
|
if ((burst = mTxPriorityQueues[i].getCurrentBurst(nowTime))) {
|
|
bursts[i] = burst->getVector();
|
|
|
|
if (state->mRetrans) {
|
|
updateFillerTable(i, burst);
|
|
} else {
|
|
burst->setVector(NULL);
|
|
filler[i] = false;
|
|
}
|
|
|
|
delete burst;
|
|
}
|
|
}
|
|
|
|
mRadioInterface->driveTransmitRadio(bursts, zeros);
|
|
|
|
for (size_t i = 0; i < mChans; i++) {
|
|
if (!filler[i])
|
|
delete bursts[i];
|
|
}
|
|
}
|
|
|
|
void Transceiver::setModulus(size_t timeslot, size_t chan)
|
|
{
|
|
TransceiverState *state = &mStates[chan];
|
|
|
|
switch (state->chanType[timeslot]) {
|
|
case NONE:
|
|
case I:
|
|
case II:
|
|
case III:
|
|
case FILL:
|
|
state->fillerModulus[timeslot] = 26;
|
|
break;
|
|
case IV:
|
|
case VI:
|
|
case V:
|
|
state->fillerModulus[timeslot] = 51;
|
|
break;
|
|
//case V:
|
|
case VII:
|
|
state->fillerModulus[timeslot] = 102;
|
|
break;
|
|
case XIII:
|
|
state->fillerModulus[timeslot] = 52;
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
|
|
|
|
CorrType Transceiver::expectedCorrType(GSM::Time currTime,
|
|
size_t chan)
|
|
{
|
|
static int tchh_subslot[26] = { 0,1,0,1,0,1,0,1,0,1,0,1,0,0,1,0,1,0,1,0,1,0,1,0,1,1 };
|
|
static int sdcch4_subslot[102] = { 3,3,3,3,0,0,2,2,2,2,3,3,3,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,2,2,2,2,
|
|
3,3,3,3,0,0,0,0,0,0,1,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,1,1,1,0,0,2,2,2,2 };
|
|
static int sdcch8_subslot[102] = { 5,5,5,5,6,6,6,6,7,7,7,7,0,0,0,0,0,0,0,1,1,1,1,2,2,2,2,3,3,3,3,4,4,4,4,5,5,5,5,6,6,6,6,7,7,7,7,0,0,0,0,
|
|
1,1,1,1,2,2,2,2,3,3,3,3,0,0,0,0,0,0,0,1,1,1,1,2,2,2,2,3,3,3,3,4,4,4,4,5,5,5,5,6,6,6,6,7,7,7,7,4,4,4,4 };
|
|
TransceiverState *state = &mStates[chan];
|
|
unsigned burstTN = currTime.TN();
|
|
unsigned burstFN = currTime.FN();
|
|
int subch;
|
|
|
|
switch (state->chanType[burstTN]) {
|
|
case NONE:
|
|
return OFF;
|
|
break;
|
|
case FILL:
|
|
return IDLE;
|
|
break;
|
|
case I:
|
|
// TODO: Are we expecting RACH on an IDLE frame?
|
|
/* if (burstFN % 26 == 25)
|
|
return IDLE;*/
|
|
if (mHandover[burstTN][0])
|
|
return RACH;
|
|
return TSC;
|
|
break;
|
|
case II:
|
|
subch = tchh_subslot[burstFN % 26];
|
|
if (subch == 1)
|
|
return IDLE;
|
|
if (mHandover[burstTN][0])
|
|
return RACH;
|
|
return TSC;
|
|
break;
|
|
case III:
|
|
subch = tchh_subslot[burstFN % 26];
|
|
if (mHandover[burstTN][subch])
|
|
return RACH;
|
|
return TSC;
|
|
break;
|
|
case IV:
|
|
case VI:
|
|
return RACH;
|
|
break;
|
|
case V: {
|
|
int mod51 = burstFN % 51;
|
|
if ((mod51 <= 36) && (mod51 >= 14))
|
|
return RACH;
|
|
else if ((mod51 == 4) || (mod51 == 5))
|
|
return RACH;
|
|
else if ((mod51 == 45) || (mod51 == 46))
|
|
return RACH;
|
|
else if (mHandover[burstTN][sdcch4_subslot[burstFN % 102]])
|
|
return RACH;
|
|
else
|
|
return TSC;
|
|
break;
|
|
}
|
|
case VII:
|
|
if ((burstFN % 51 <= 14) && (burstFN % 51 >= 12))
|
|
return IDLE;
|
|
else if (mHandover[burstTN][sdcch8_subslot[burstFN % 102]])
|
|
return RACH;
|
|
else
|
|
return TSC;
|
|
break;
|
|
case XIII: {
|
|
int mod52 = burstFN % 52;
|
|
if ((mod52 == 12) || (mod52 == 38))
|
|
return RACH;
|
|
else if ((mod52 == 25) || (mod52 == 51))
|
|
return IDLE;
|
|
else
|
|
return TSC;
|
|
break;
|
|
}
|
|
case LOOPBACK:
|
|
if ((burstFN % 51 <= 50) && (burstFN % 51 >=48))
|
|
return IDLE;
|
|
else
|
|
return TSC;
|
|
break;
|
|
default:
|
|
return OFF;
|
|
break;
|
|
}
|
|
}
|
|
|
|
void writeToFile(radioVector *radio_burst, size_t chan)
|
|
{
|
|
GSM::Time time = radio_burst->getTime();
|
|
std::ostringstream fname;
|
|
fname << chan << "_" << time.FN() << "_" << time.TN() << ".fc";
|
|
std::ofstream outfile (fname.str().c_str(), std::ofstream::binary);
|
|
outfile.write((char*)radio_burst->getVector()->begin(), radio_burst->getVector()->size() * 2 * sizeof(float));
|
|
outfile.close();
|
|
}
|
|
|
|
/*
|
|
* Pull bursts from the FIFO and handle according to the slot
|
|
* and burst correlation type. Equalzation is currently disabled.
|
|
*/
|
|
SoftVector *Transceiver::pullRadioVector(GSM::Time &wTime, double &RSSI, bool &isRssiValid,
|
|
double &timingOffset, double &noise,
|
|
size_t chan)
|
|
{
|
|
int rc;
|
|
complex amp;
|
|
float toa, max = -1.0, avg = 0.0;
|
|
int max_i = -1;
|
|
signalVector *burst;
|
|
SoftVector *bits = NULL;
|
|
TransceiverState *state = &mStates[chan];
|
|
isRssiValid = false;
|
|
|
|
/* Blocking FIFO read */
|
|
radioVector *radio_burst = mReceiveFIFO[chan]->read();
|
|
if (!radio_burst)
|
|
return NULL;
|
|
|
|
/* Set time and determine correlation type */
|
|
GSM::Time time = radio_burst->getTime();
|
|
CorrType type = expectedCorrType(time, chan);
|
|
|
|
/* Enable 8-PSK burst detection if EDGE is enabled */
|
|
if (mEdge && (type == TSC))
|
|
type = EDGE;
|
|
|
|
/* Debug: dump bursts to disk */
|
|
/* bits 0-7 - chan 0 timeslots
|
|
* bits 8-15 - chan 1 timeslots */
|
|
if (mWriteBurstToDiskMask & ((1<<time.TN()) << (8*chan)))
|
|
writeToFile(radio_burst, chan);
|
|
|
|
/* No processing if the timeslot is off.
|
|
* Not even power level or noise calculation. */
|
|
if (type == OFF) {
|
|
delete radio_burst;
|
|
return NULL;
|
|
}
|
|
|
|
/* Select the diversity channel with highest energy */
|
|
for (size_t i = 0; i < radio_burst->chans(); i++) {
|
|
float pow = energyDetect(*radio_burst->getVector(i), 20 * mSPSRx);
|
|
if (pow > max) {
|
|
max = pow;
|
|
max_i = i;
|
|
}
|
|
avg += pow;
|
|
}
|
|
|
|
if (max_i < 0) {
|
|
LOG(ALERT) << "Received empty burst";
|
|
delete radio_burst;
|
|
return NULL;
|
|
}
|
|
|
|
/* Average noise on diversity paths and update global levels */
|
|
burst = radio_burst->getVector(max_i);
|
|
avg = sqrt(avg / radio_burst->chans());
|
|
|
|
wTime = time;
|
|
RSSI = 20.0 * log10(rxFullScale / avg);
|
|
|
|
/* RSSI estimation are valid */
|
|
isRssiValid = true;
|
|
|
|
if (type == IDLE) {
|
|
/* Update noise levels */
|
|
state->mNoises.insert(avg);
|
|
state->mNoiseLev = state->mNoises.avg();
|
|
noise = 20.0 * log10(rxFullScale / state->mNoiseLev);
|
|
|
|
delete radio_burst;
|
|
return NULL;
|
|
} else {
|
|
/* Do not update noise levels */
|
|
noise = 20.0 * log10(rxFullScale / state->mNoiseLev);
|
|
}
|
|
|
|
/* Detect normal or RACH bursts */
|
|
rc = detectAnyBurst(*burst, mTSC, BURST_THRESH, mSPSRx, type, amp, toa,
|
|
(type==RACH)?mMaxExpectedDelayAB:mMaxExpectedDelayNB);
|
|
|
|
if (rc > 0) {
|
|
type = (CorrType) rc;
|
|
} else if (rc <= 0) {
|
|
if (rc == -SIGERR_CLIP) {
|
|
LOG(WARNING) << "Clipping detected on received RACH or Normal Burst";
|
|
} else if (rc != SIGERR_NONE) {
|
|
LOG(WARNING) << "Unhandled RACH or Normal Burst detection error";
|
|
}
|
|
|
|
delete radio_burst;
|
|
return NULL;
|
|
}
|
|
|
|
timingOffset = toa;
|
|
|
|
bits = demodAnyBurst(*burst, mSPSRx, amp, toa, type);
|
|
|
|
delete radio_burst;
|
|
return bits;
|
|
}
|
|
|
|
void Transceiver::reset()
|
|
{
|
|
for (size_t i = 0; i < mTxPriorityQueues.size(); i++)
|
|
mTxPriorityQueues[i].clear();
|
|
}
|
|
|
|
|
|
void Transceiver::driveControl(size_t chan)
|
|
{
|
|
int MAX_PACKET_LENGTH = 100;
|
|
|
|
// check control socket
|
|
char buffer[MAX_PACKET_LENGTH];
|
|
int msgLen = -1;
|
|
buffer[0] = '\0';
|
|
|
|
msgLen = mCtrlSockets[chan]->read(buffer, sizeof(buffer));
|
|
|
|
if (msgLen < 1) {
|
|
return;
|
|
}
|
|
|
|
char cmdcheck[4];
|
|
char command[MAX_PACKET_LENGTH];
|
|
char response[MAX_PACKET_LENGTH];
|
|
|
|
sscanf(buffer,"%3s %s",cmdcheck,command);
|
|
|
|
if (strcmp(cmdcheck,"CMD")!=0) {
|
|
LOG(WARNING) << "bogus message on control interface";
|
|
return;
|
|
}
|
|
LOG(INFO) << "command is " << buffer;
|
|
|
|
if (strcmp(command,"POWEROFF")==0) {
|
|
stop();
|
|
sprintf(response,"RSP POWEROFF 0");
|
|
}
|
|
else if (strcmp(command,"POWERON")==0) {
|
|
if (!start()) {
|
|
sprintf(response,"RSP POWERON 1");
|
|
} else {
|
|
sprintf(response,"RSP POWERON 0");
|
|
for (int i = 0; i < 8; i++) {
|
|
for (int j = 0; j < 8; j++)
|
|
mHandover[i][j] = false;
|
|
}
|
|
}
|
|
}
|
|
else if (strcmp(command,"HANDOVER")==0){
|
|
int ts=0,ss=0;
|
|
sscanf(buffer,"%3s %s %d %d",cmdcheck,command,&ts,&ss);
|
|
mHandover[ts][ss] = true;
|
|
sprintf(response,"RSP HANDOVER 0 %d %d",ts,ss);
|
|
}
|
|
else if (strcmp(command,"NOHANDOVER")==0){
|
|
int ts=0,ss=0;
|
|
sscanf(buffer,"%3s %s %d %d",cmdcheck,command,&ts,&ss);
|
|
mHandover[ts][ss] = false;
|
|
sprintf(response,"RSP NOHANDOVER 0 %d %d",ts,ss);
|
|
}
|
|
else if (strcmp(command,"SETMAXDLY")==0) {
|
|
//set expected maximum time-of-arrival
|
|
int maxDelay;
|
|
sscanf(buffer,"%3s %s %d",cmdcheck,command,&maxDelay);
|
|
mMaxExpectedDelayAB = maxDelay; // 1 GSM symbol is approx. 1 km
|
|
sprintf(response,"RSP SETMAXDLY 0 %d",maxDelay);
|
|
}
|
|
else if (strcmp(command,"SETMAXDLYNB")==0) {
|
|
//set expected maximum time-of-arrival
|
|
int maxDelay;
|
|
sscanf(buffer,"%3s %s %d",cmdcheck,command,&maxDelay);
|
|
mMaxExpectedDelayNB = maxDelay; // 1 GSM symbol is approx. 1 km
|
|
sprintf(response,"RSP SETMAXDLYNB 0 %d",maxDelay);
|
|
}
|
|
else if (strcmp(command,"SETRXGAIN")==0) {
|
|
//set expected maximum time-of-arrival
|
|
int newGain;
|
|
sscanf(buffer,"%3s %s %d",cmdcheck,command,&newGain);
|
|
newGain = mRadioInterface->setRxGain(newGain, chan);
|
|
sprintf(response,"RSP SETRXGAIN 0 %d",newGain);
|
|
}
|
|
else if (strcmp(command,"NOISELEV")==0) {
|
|
if (mOn) {
|
|
float lev = mStates[chan].mNoiseLev;
|
|
sprintf(response,"RSP NOISELEV 0 %d",
|
|
(int) round(20.0 * log10(rxFullScale / lev)));
|
|
}
|
|
else {
|
|
sprintf(response,"RSP NOISELEV 1 0");
|
|
}
|
|
}
|
|
else if (!strcmp(command, "SETPOWER")) {
|
|
int power;
|
|
sscanf(buffer, "%3s %s %d", cmdcheck, command, &power);
|
|
power = mRadioInterface->setPowerAttenuation(power, chan);
|
|
mStates[chan].mPower = power;
|
|
sprintf(response, "RSP SETPOWER 0 %d", power);
|
|
}
|
|
else if (!strcmp(command,"ADJPOWER")) {
|
|
int power, step;
|
|
sscanf(buffer, "%3s %s %d", cmdcheck, command, &step);
|
|
power = mStates[chan].mPower + step;
|
|
power = mRadioInterface->setPowerAttenuation(power, chan);
|
|
mStates[chan].mPower = power;
|
|
sprintf(response, "RSP ADJPOWER 0 %d", power);
|
|
}
|
|
else if (strcmp(command,"RXTUNE")==0) {
|
|
// tune receiver
|
|
int freqKhz;
|
|
sscanf(buffer,"%3s %s %d",cmdcheck,command,&freqKhz);
|
|
mRxFreq = freqKhz * 1e3;
|
|
if (!mRadioInterface->tuneRx(mRxFreq, chan)) {
|
|
LOG(ALERT) << "RX failed to tune";
|
|
sprintf(response,"RSP RXTUNE 1 %d",freqKhz);
|
|
}
|
|
else
|
|
sprintf(response,"RSP RXTUNE 0 %d",freqKhz);
|
|
}
|
|
else if (strcmp(command,"TXTUNE")==0) {
|
|
// tune txmtr
|
|
int freqKhz;
|
|
sscanf(buffer,"%3s %s %d",cmdcheck,command,&freqKhz);
|
|
mTxFreq = freqKhz * 1e3;
|
|
if (!mRadioInterface->tuneTx(mTxFreq, chan)) {
|
|
LOG(ALERT) << "TX failed to tune";
|
|
sprintf(response,"RSP TXTUNE 1 %d",freqKhz);
|
|
}
|
|
else
|
|
sprintf(response,"RSP TXTUNE 0 %d",freqKhz);
|
|
}
|
|
else if (!strcmp(command,"SETTSC")) {
|
|
// set TSC
|
|
unsigned TSC;
|
|
sscanf(buffer, "%3s %s %d", cmdcheck, command, &TSC);
|
|
if (TSC > 7) {
|
|
sprintf(response, "RSP SETTSC 1 %d", TSC);
|
|
} else {
|
|
LOG(NOTICE) << "Changing TSC from " << mTSC << " to " << TSC;
|
|
mTSC = TSC;
|
|
sprintf(response,"RSP SETTSC 0 %d", TSC);
|
|
}
|
|
}
|
|
else if (strcmp(command,"SETSLOT")==0) {
|
|
// set slot type
|
|
int corrCode;
|
|
int timeslot;
|
|
sscanf(buffer,"%3s %s %d %d",cmdcheck,command,×lot,&corrCode);
|
|
if ((timeslot < 0) || (timeslot > 7)) {
|
|
LOG(WARNING) << "bogus message on control interface";
|
|
sprintf(response,"RSP SETSLOT 1 %d %d",timeslot,corrCode);
|
|
return;
|
|
}
|
|
mStates[chan].chanType[timeslot] = (ChannelCombination) corrCode;
|
|
setModulus(timeslot, chan);
|
|
sprintf(response,"RSP SETSLOT 0 %d %d",timeslot,corrCode);
|
|
|
|
}
|
|
else if (strcmp(command,"_SETBURSTTODISKMASK")==0) {
|
|
// debug command! may change or disapear without notice
|
|
// set a mask which bursts to dump to disk
|
|
int mask;
|
|
sscanf(buffer,"%3s %s %d",cmdcheck,command,&mask);
|
|
mWriteBurstToDiskMask = mask;
|
|
sprintf(response,"RSP _SETBURSTTODISKMASK 0 %d",mask);
|
|
}
|
|
else {
|
|
LOG(WARNING) << "bogus command " << command << " on control interface.";
|
|
sprintf(response,"RSP ERR 1");
|
|
}
|
|
|
|
mCtrlSockets[chan]->write(response, strlen(response) + 1);
|
|
}
|
|
|
|
bool Transceiver::driveTxPriorityQueue(size_t chan)
|
|
{
|
|
int burstLen;
|
|
char buffer[EDGE_BURST_NBITS + 50];
|
|
|
|
// check data socket
|
|
size_t msgLen = mDataSockets[chan]->read(buffer, sizeof(buffer));
|
|
|
|
if (msgLen == gSlotLen + 1 + 4 + 1) {
|
|
burstLen = gSlotLen;
|
|
} else if (msgLen == EDGE_BURST_NBITS + 1 + 4 + 1) {
|
|
if (mSPSTx != 4)
|
|
return false;
|
|
|
|
burstLen = EDGE_BURST_NBITS;
|
|
} else {
|
|
LOG(ERR) << "badly formatted packet on GSM->TRX interface";
|
|
return false;
|
|
}
|
|
|
|
int timeSlot = (int) buffer[0];
|
|
uint64_t frameNum = 0;
|
|
for (int i = 0; i < 4; i++)
|
|
frameNum = (frameNum << 8) | (0x0ff & buffer[i+1]);
|
|
|
|
LOG(DEBUG) << "rcvd. burst at: " << GSM::Time(frameNum,timeSlot);
|
|
|
|
int RSSI = (int) buffer[5];
|
|
BitVector newBurst(burstLen);
|
|
BitVector::iterator itr = newBurst.begin();
|
|
char *bufferItr = buffer+6;
|
|
while (itr < newBurst.end())
|
|
*itr++ = *bufferItr++;
|
|
|
|
GSM::Time currTime = GSM::Time(frameNum,timeSlot);
|
|
|
|
addRadioVector(chan, newBurst, RSSI, currTime);
|
|
|
|
return true;
|
|
|
|
|
|
}
|
|
|
|
void Transceiver::driveReceiveRadio()
|
|
{
|
|
if (!mRadioInterface->driveReceiveRadio()) {
|
|
usleep(100000);
|
|
} else if (mForceClockInterface || mTransmitDeadlineClock > mLastClockUpdateTime + GSM::Time(216,0)) {
|
|
mForceClockInterface = false;
|
|
writeClockInterface();
|
|
}
|
|
}
|
|
|
|
void Transceiver::logRxBurst(size_t chan, SoftVector *burst, GSM::Time time, double dbm,
|
|
double rssi, double noise, double toa)
|
|
{
|
|
LOG(DEBUG) << std::fixed << std::right
|
|
<< " chan: " << chan
|
|
<< " time: " << time
|
|
<< " RSSI: " << std::setw(5) << std::setprecision(1) << rssi
|
|
<< "dBFS/" << std::setw(6) << -dbm << "dBm"
|
|
<< " noise: " << std::setw(5) << std::setprecision(1) << noise
|
|
<< "dBFS/" << std::setw(6) << -(noise + rssiOffset) << "dBm"
|
|
<< " TOA: " << std::setw(5) << std::setprecision(2) << toa
|
|
<< " bits: " << *burst;
|
|
}
|
|
|
|
void Transceiver::driveReceiveFIFO(size_t chan)
|
|
{
|
|
SoftVector *rxBurst = NULL;
|
|
double RSSI; // in dBFS
|
|
double dBm; // in dBm
|
|
double TOA; // in symbols
|
|
int TOAint; // in 1/256 symbols
|
|
double noise; // noise level in dBFS
|
|
GSM::Time burstTime;
|
|
bool isRssiValid; // are RSSI, noise and burstTime valid
|
|
unsigned nbits = gSlotLen;
|
|
|
|
rxBurst = pullRadioVector(burstTime, RSSI, isRssiValid, TOA, noise, chan);
|
|
if (!rxBurst)
|
|
return;
|
|
|
|
// Convert -1..+1 soft bits to 0..1 soft bits
|
|
vectorSlicer(rxBurst);
|
|
|
|
/*
|
|
* EDGE demodulator returns 444 (148 * 3) bits
|
|
*/
|
|
if (rxBurst->size() == gSlotLen * 3)
|
|
nbits = gSlotLen * 3;
|
|
|
|
dBm = RSSI + rssiOffset;
|
|
logRxBurst(chan, rxBurst, burstTime, dBm, RSSI, noise, TOA);
|
|
|
|
TOAint = (int) (TOA * 256.0 + 0.5); // round to closest integer
|
|
|
|
char burstString[nbits + 10];
|
|
burstString[0] = burstTime.TN();
|
|
for (int i = 0; i < 4; i++)
|
|
burstString[1+i] = (burstTime.FN() >> ((3-i)*8)) & 0x0ff;
|
|
burstString[5] = (int)dBm;
|
|
burstString[6] = (TOAint >> 8) & 0x0ff;
|
|
burstString[7] = TOAint & 0x0ff;
|
|
SoftVector::iterator burstItr = rxBurst->begin();
|
|
|
|
for (unsigned i = 0; i < nbits; i++)
|
|
burstString[8 + i] = (char) round((*burstItr++) * 255.0);
|
|
|
|
burstString[nbits + 9] = '\0';
|
|
delete rxBurst;
|
|
|
|
mDataSockets[chan]->write(burstString, nbits + 10);
|
|
}
|
|
|
|
void Transceiver::driveTxFIFO()
|
|
{
|
|
|
|
/**
|
|
Features a carefully controlled latency mechanism, to
|
|
assure that transmit packets arrive at the radio/USRP
|
|
before they need to be transmitted.
|
|
|
|
Deadline clock indicates the burst that needs to be
|
|
pushed into the FIFO right NOW. If transmit queue does
|
|
not have a burst, stick in filler data.
|
|
*/
|
|
|
|
|
|
RadioClock *radioClock = (mRadioInterface->getClock());
|
|
|
|
if (mOn) {
|
|
//radioClock->wait(); // wait until clock updates
|
|
LOG(DEBUG) << "radio clock " << radioClock->get();
|
|
while (radioClock->get() + mTransmitLatency > mTransmitDeadlineClock) {
|
|
// if underrun, then we're not providing bursts to radio/USRP fast
|
|
// enough. Need to increase latency by one GSM frame.
|
|
if (mRadioInterface->getWindowType() == RadioDevice::TX_WINDOW_USRP1) {
|
|
if (mRadioInterface->isUnderrun()) {
|
|
// only update latency at the defined frame interval
|
|
if (radioClock->get() > mLatencyUpdateTime + GSM::Time(USB_LATENCY_INTRVL)) {
|
|
mTransmitLatency = mTransmitLatency + GSM::Time(1,0);
|
|
LOG(INFO) << "new latency: " << mTransmitLatency;
|
|
mLatencyUpdateTime = radioClock->get();
|
|
}
|
|
}
|
|
else {
|
|
// if underrun hasn't occurred in the last sec (216 frames) drop
|
|
// transmit latency by a timeslot
|
|
if (mTransmitLatency > GSM::Time(USB_LATENCY_MIN)) {
|
|
if (radioClock->get() > mLatencyUpdateTime + GSM::Time(216,0)) {
|
|
mTransmitLatency.decTN();
|
|
LOG(INFO) << "reduced latency: " << mTransmitLatency;
|
|
mLatencyUpdateTime = radioClock->get();
|
|
}
|
|
}
|
|
}
|
|
}
|
|
// time to push burst to transmit FIFO
|
|
pushRadioVector(mTransmitDeadlineClock);
|
|
mTransmitDeadlineClock.incTN();
|
|
}
|
|
}
|
|
|
|
radioClock->wait();
|
|
}
|
|
|
|
|
|
|
|
void Transceiver::writeClockInterface()
|
|
{
|
|
char command[50];
|
|
// FIXME -- This should be adaptive.
|
|
sprintf(command,"IND CLOCK %llu",(unsigned long long) (mTransmitDeadlineClock.FN()+2));
|
|
|
|
LOG(INFO) << "ClockInterface: sending " << command;
|
|
|
|
mClockSocket.write(command, strlen(command) + 1);
|
|
|
|
mLastClockUpdateTime = mTransmitDeadlineClock;
|
|
|
|
}
|
|
|
|
void *RxUpperLoopAdapter(TransceiverChannel *chan)
|
|
{
|
|
Transceiver *trx = chan->trx;
|
|
size_t num = chan->num;
|
|
|
|
delete chan;
|
|
|
|
trx->setPriority(0.42);
|
|
|
|
while (1) {
|
|
trx->driveReceiveFIFO(num);
|
|
pthread_testcancel();
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
void *RxLowerLoopAdapter(Transceiver *transceiver)
|
|
{
|
|
transceiver->setPriority(0.45);
|
|
|
|
while (1) {
|
|
transceiver->driveReceiveRadio();
|
|
pthread_testcancel();
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
void *TxLowerLoopAdapter(Transceiver *transceiver)
|
|
{
|
|
transceiver->setPriority(0.44);
|
|
|
|
while (1) {
|
|
transceiver->driveTxFIFO();
|
|
pthread_testcancel();
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
void *ControlServiceLoopAdapter(TransceiverChannel *chan)
|
|
{
|
|
Transceiver *trx = chan->trx;
|
|
size_t num = chan->num;
|
|
|
|
delete chan;
|
|
|
|
while (1) {
|
|
trx->driveControl(num);
|
|
pthread_testcancel();
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
void *TxUpperLoopAdapter(TransceiverChannel *chan)
|
|
{
|
|
Transceiver *trx = chan->trx;
|
|
size_t num = chan->num;
|
|
|
|
delete chan;
|
|
|
|
trx->setPriority(0.40);
|
|
|
|
while (1) {
|
|
trx->driveTxPriorityQueue(num);
|
|
pthread_testcancel();
|
|
}
|
|
return NULL;
|
|
}
|