MMDVMHost-Private/DMRSlot.cpp

/*
 *	Copyright (C) 2015,2016,2017,2018 Jonathan Naylor, G4KLX
 *
 *	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; version 2 of the License.
 *
 *	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.
 */

#include "DMRAccessControl.h"
#include "DMRDataHeader.h"
#include "DMRSlotType.h"
#include "DMRShortLC.h"
#include "DMRTrellis.h"
#include "DMRFullLC.h"
#include "BPTC19696.h"
#include "DMRSlot.h"
#include "DMRCSBK.h"
#include "DMREMB.h"
#include "Utils.h"
#include "Sync.h"
#include "CRC.h"
#include "Log.h"

#include <cassert>
#include <ctime>
#include <algorithm>
#include <cstdint>
#include <cmath>

unsigned int   CDMRSlot::m_colorCode = 0U;

bool           CDMRSlot::m_embeddedLCOnly = false;
bool           CDMRSlot::m_dumpTAData = true;

CModem*        CDMRSlot::m_modem = NULL;
CDMRNetwork*   CDMRSlot::m_network = NULL;
CDisplay*      CDMRSlot::m_display = NULL;
bool           CDMRSlot::m_duplex = true;
CDMRLookup*    CDMRSlot::m_lookup = NULL;
unsigned int   CDMRSlot::m_hangCount = 3U * 17U;

CRSSIInterpolator* CDMRSlot::m_rssiMapper = NULL;

unsigned int   CDMRSlot::m_jitterTime  = 360U;
unsigned int   CDMRSlot::m_jitterSlots = 6U;

unsigned char* CDMRSlot::m_idle = NULL;

FLCO           CDMRSlot::m_flco1;
unsigned char  CDMRSlot::m_id1 = 0U;
ACTIVITY_TYPE  CDMRSlot::m_activity1 = ACTIVITY_NONE;
FLCO           CDMRSlot::m_flco2;
unsigned char  CDMRSlot::m_id2 = 0U;
ACTIVITY_TYPE  CDMRSlot::m_activity2 = ACTIVITY_NONE;

const unsigned char TALKER_ID_NONE   = 0x00U;
const unsigned char TALKER_ID_HEADER = 0x01U;
const unsigned char TALKER_ID_BLOCK1 = 0x02U;
const unsigned char TALKER_ID_BLOCK2 = 0x04U;
const unsigned char TALKER_ID_BLOCK3 = 0x08U;

const unsigned int NO_HEADERS_SIMPLEX = 8U;
const unsigned int NO_HEADERS_DUPLEX  = 3U;

// #define	DUMP_DMR

CDMRSlot::CDMRSlot(unsigned int slotNo, unsigned int timeout) :
m_slotNo(slotNo),
m_queue(5000U, "DMR Slot"),
m_rfState(RS_RF_LISTENING),
m_netState(RS_NET_IDLE),
m_rfEmbeddedLC(),
m_rfEmbeddedData(NULL),
m_rfEmbeddedReadN(0U),
m_rfEmbeddedWriteN(1U),
m_rfTalkerId(TALKER_ID_NONE),
m_rfTalkerAlias(NULL),
m_netEmbeddedLC(),
m_netEmbeddedData(NULL),
m_netEmbeddedReadN(0U),
m_netEmbeddedWriteN(1U),
m_netTalkerId(TALKER_ID_NONE),
m_rfLC(NULL),
m_netLC(NULL),
m_rfSeqNo(0U),
m_rfN(0U),
m_netN(0U),
m_networkWatchdog(1000U, 0U, 1500U),
m_rfTimeoutTimer(1000U, timeout),
m_netTimeoutTimer(1000U, timeout),
m_packetTimer(1000U, 0U, 50U),
m_interval(),
m_elapsed(),
m_rfFrames(0U),
m_netFrames(0U),
m_netLost(0U),
m_fec(),
m_rfBits(1U),
m_netBits(1U),
m_rfErrs(0U),
m_netErrs(0U),
m_rfTimeout(false),
m_netTimeout(false),
m_lastFrame(NULL),
m_lastFrameValid(false),
m_rssi(0U),
m_maxRSSI(0U),
m_minRSSI(0U),
m_aveRSSI(0U),
m_rssiCount(0U),
m_fp(NULL)
{
	m_rfTalkerAlias = new unsigned char[32U];

	m_lastFrame = new unsigned char[DMR_FRAME_LENGTH_BYTES + 2U];

	m_rfEmbeddedData  = new CDMREmbeddedData[2U];
	m_netEmbeddedData = new CDMREmbeddedData[2U];

	m_interval.start();
}

CDMRSlot::~CDMRSlot()
{
	delete[] m_rfEmbeddedData;
	delete[] m_netEmbeddedData;
	delete[] m_lastFrame;
	delete[] m_rfTalkerAlias;
}

bool CDMRSlot::writeModem(unsigned char *data, unsigned int len)
{
	assert(data != NULL);

	if (data[0U] == TAG_LOST && m_rfState == RS_RF_AUDIO) {
		if (m_rssi != 0U)
			LogMessage("DMR Slot %u, RF voice transmission lost, %.1f seconds, BER: %.1f%%, RSSI: -%u/-%u/-%u dBm", m_slotNo, float(m_rfFrames) / 16.667F, float(m_rfErrs * 100U) / float(m_rfBits), m_minRSSI, m_maxRSSI, m_aveRSSI / m_rssiCount);
		else
			LogMessage("DMR Slot %u, RF voice transmission lost, %.1f seconds, BER: %.1f%%", m_slotNo, float(m_rfFrames) / 16.667F, float(m_rfErrs * 100U) / float(m_rfBits));
		if (m_rfTimeout) {
			writeEndRF();
			return false;
		} else {
			writeEndRF(true);
			return true;
		}
	}

	if (data[0U] == TAG_LOST && m_rfState == RS_RF_DATA) {
		LogMessage("DMR Slot %u, RF data transmission lost", m_slotNo);
		writeEndRF();
		return false;
	}

	if (data[0U] == TAG_LOST) {
		m_rfState = RS_RF_LISTENING;
		return false;
	}

	// Have we got RSSI bytes on the end?
	if (len == (DMR_FRAME_LENGTH_BYTES + 4U)) {
		uint16_t raw = 0U;
		raw |= (data[35U] << 8) & 0xFF00U;
		raw |= (data[36U] << 0) & 0x00FFU;
		
		// Convert the raw RSSI to dBm
		int rssi = m_rssiMapper->interpolate(raw);
		if (rssi != 0)
			LogDebug("DMR Slot %u, raw RSSI: %u, reported RSSI: %d dBm", m_slotNo, raw, rssi);

		// RSSI is always reported as positive
		m_rssi = (rssi >= 0) ? rssi : -rssi;

		if (m_rssi > m_minRSSI)
			m_minRSSI = m_rssi;
		if (m_rssi < m_maxRSSI)
			m_maxRSSI = m_rssi;

		m_aveRSSI += m_rssi;
		m_rssiCount++;
	}

	bool dataSync  = (data[1U] & DMR_SYNC_DATA)  == DMR_SYNC_DATA;
	bool audioSync = (data[1U] & DMR_SYNC_AUDIO) == DMR_SYNC_AUDIO;

	if (dataSync) {
		// Get the type from the packet metadata
		unsigned char dataType = data[1U] & 0x0FU;

		CDMRSlotType slotType;
		slotType.setColorCode(m_colorCode);
		slotType.setDataType(dataType);

		if (dataType == DT_VOICE_LC_HEADER) {
			if (m_rfState == RS_RF_AUDIO)
				return true;

			CDMRFullLC fullLC;
			CDMRLC* lc = fullLC.decode(data + 2U, DT_VOICE_LC_HEADER);
			if (lc == NULL)
				return false;

			unsigned int srcId = lc->getSrcId();
			unsigned int dstId = lc->getDstId();
			FLCO flco = lc->getFLCO();

			if (!CDMRAccessControl::validateSrcId(srcId)) {
				LogMessage("DMR Slot %u, RF user %u rejected", m_slotNo, srcId);
			    delete lc;
			    return false;
			}

			if (!CDMRAccessControl::validateTGId(m_slotNo, flco == FLCO_GROUP, dstId)) {
				LogMessage("DMR Slot %u, RF user %u rejected for using TG %u", m_slotNo, srcId, dstId);
				delete lc;
				return false;
			}

			m_rfLC = lc;

			// The standby LC data
			m_rfEmbeddedLC.setLC(*m_rfLC);
			m_rfEmbeddedData[0U].setLC(*m_rfLC);
			m_rfEmbeddedData[1U].setLC(*m_rfLC);

			// Regenerate the LC data
			fullLC.encode(*m_rfLC, data + 2U, DT_VOICE_LC_HEADER);

			// Regenerate the Slot Type
			slotType.getData(data + 2U);

			// Convert the Data Sync to be from the BS or MS as needed
			CSync::addDMRDataSync(data + 2U, m_duplex);

			data[0U] = TAG_DATA;
			data[1U] = 0x00U;

			m_rfTimeoutTimer.start();
			m_rfTimeout = false;

			m_rfFrames = 0U;
			m_rfSeqNo  = 0U;
			m_rfBits   = 1U;
			m_rfErrs   = 0U;

			m_rfEmbeddedReadN  = 0U;
			m_rfEmbeddedWriteN = 1U;
			m_rfTalkerId       = TALKER_ID_NONE;

			m_minRSSI = m_rssi;
			m_maxRSSI = m_rssi;
			m_aveRSSI = m_rssi;
			m_rssiCount = 1U;

			if (m_duplex) {
				m_queue.clear();
				m_modem->writeDMRAbort(m_slotNo);

				for (unsigned int i = 0U; i < NO_HEADERS_DUPLEX; i++)
					writeQueueRF(data);
			}

			writeNetworkRF(data, DT_VOICE_LC_HEADER);

			m_rfState = RS_RF_AUDIO;

			std::string src = m_lookup->find(srcId);
			std::string dst = m_lookup->find(dstId);

			if (m_netState == RS_NET_IDLE) {
				setShortLC(m_slotNo, dstId, flco, ACTIVITY_VOICE);
				m_display->writeDMR(m_slotNo, src, flco == FLCO_GROUP, dst, "R");
				m_display->writeDMRRSSI(m_slotNo, m_rssi);
			}

			LogMessage("DMR Slot %u, received RF voice header from %s to %s%s", m_slotNo, src.c_str(), flco == FLCO_GROUP ? "TG " : "", dst.c_str());

			return true;
		} else if (dataType == DT_VOICE_PI_HEADER) {
			if (m_rfState != RS_RF_AUDIO)
				return false;

			// Regenerate the Slot Type
			slotType.getData(data + 2U);

			// Convert the Data Sync to be from the BS or MS as needed
			CSync::addDMRDataSync(data + 2U, m_duplex);

			// Regenerate the payload
			CBPTC19696 bptc;
			unsigned char payload[12U];
			bptc.decode(data + 2U, payload);
			bptc.encode(payload, data + 2U);

			data[0U] = TAG_DATA;
			data[1U] = 0x00U;

			if (m_duplex)
				writeQueueRF(data);

			writeNetworkRF(data, DT_VOICE_PI_HEADER);

			return true;
		} else if (dataType == DT_TERMINATOR_WITH_LC) {
			if (m_rfState != RS_RF_AUDIO)
				return false;

			// Regenerate the LC data
			CDMRFullLC fullLC;
			fullLC.encode(*m_rfLC, data + 2U, DT_TERMINATOR_WITH_LC);

			// Regenerate the Slot Type
			slotType.getData(data + 2U);

			// Convert the Data Sync to be from the BS or MS as needed
			CSync::addDMRDataSync(data + 2U, m_duplex);

			if (!m_rfTimeout) {
				data[0U] = TAG_EOT;
				data[1U] = 0x00U;

				writeNetworkRF(data, DT_TERMINATOR_WITH_LC);
				writeNetworkRF(data, DT_TERMINATOR_WITH_LC);

				if (m_duplex) {
					for (unsigned int i = 0U; i < m_hangCount; i++)
						writeQueueRF(data);
				}
			}

			if (m_rssi != 0U)
				LogMessage("DMR Slot %u, received RF end of voice transmission, %.1f seconds, BER: %.1f%%, RSSI: -%u/-%u/-%u dBm", m_slotNo, float(m_rfFrames) / 16.667F, float(m_rfErrs * 100U) / float(m_rfBits), m_minRSSI, m_maxRSSI, m_aveRSSI / m_rssiCount);
			else
				LogMessage("DMR Slot %u, received RF end of voice transmission, %.1f seconds, BER: %.1f%%", m_slotNo, float(m_rfFrames) / 16.667F, float(m_rfErrs * 100U) / float(m_rfBits));

			m_display->writeDMRTA(m_slotNo, NULL, " ");

			if (m_rfTimeout) {
				writeEndRF();
				return false;
			} else {
				writeEndRF();
				return true;
			}
		} else if (dataType == DT_DATA_HEADER) {
			if (m_rfState == RS_RF_DATA)
				return true;

			CDMRDataHeader dataHeader;
			bool valid = dataHeader.put(data + 2U);
			if (!valid)
				return false;

			bool gi = dataHeader.getGI();
			unsigned int srcId = dataHeader.getSrcId();
			unsigned int dstId = dataHeader.getDstId();

			if (!CDMRAccessControl::validateSrcId(srcId)) {
				LogMessage("DMR Slot %u, RF user %u rejected", m_slotNo, srcId);
				return false;
			}

			if (!CDMRAccessControl::validateTGId(m_slotNo, gi, dstId)) {
				LogMessage("DMR Slot %u, RF user %u rejected for using TG %u", m_slotNo, srcId, dstId);
				return false;
			}

			m_rfFrames = dataHeader.getBlocks();

			m_rfLC = new CDMRLC(gi ? FLCO_GROUP : FLCO_USER_USER, srcId, dstId);

			// Regenerate the data header
			dataHeader.get(data + 2U);

			// Regenerate the Slot Type
			slotType.getData(data + 2U);

			// Convert the Data Sync to be from the BS or MS as needed
			CSync::addDMRDataSync(data + 2U, m_duplex);

			data[0U] = m_rfFrames == 0U ? TAG_EOT : TAG_DATA;
			data[1U] = 0x00U;

			if (m_duplex)
				writeQueueRF(data);

			writeNetworkRF(data, DT_DATA_HEADER);

			m_rfState = RS_RF_DATA;

			std::string src = m_lookup->find(srcId);
			std::string dst = m_lookup->find(dstId);

			if (m_netState == RS_NET_IDLE) {
				setShortLC(m_slotNo, dstId, gi ? FLCO_GROUP : FLCO_USER_USER, ACTIVITY_DATA);
				m_display->writeDMR(m_slotNo, src, gi, dst, "R");
				m_display->writeDMRRSSI(m_slotNo, m_rssi);
			}

			LogMessage("DMR Slot %u, received RF data header from %s to %s%s, %u blocks", m_slotNo, src.c_str(), gi ? "TG ": "", dst.c_str(), m_rfFrames);

			if (m_rfFrames == 0U) {
				LogMessage("DMR Slot %u, ended RF data transmission", m_slotNo);
				writeEndRF();
			}

			return true;
		} else if (dataType == DT_CSBK) {
			CDMRCSBK csbk;
			bool valid = csbk.put(data + 2U);
			if (!valid)
				return false;

			CSBKO csbko = csbk.getCSBKO();
			if (csbko == CSBKO_BSDWNACT)
				return false;

			bool gi = csbk.getGI();
			unsigned int srcId = csbk.getSrcId();
			unsigned int dstId = csbk.getDstId();

			if (srcId != 0U || dstId != 0U) {
				if (!CDMRAccessControl::validateSrcId(srcId)) {
					LogMessage("DMR Slot %u, RF user %u rejected", m_slotNo, srcId);
					return false;
				}

				if (!CDMRAccessControl::validateTGId(m_slotNo, gi, dstId)) {
					LogMessage("DMR Slot %u, RF user %u rejected for using TG %u", m_slotNo, srcId, dstId);
					return false;
				}
			}
			
			// Regenerate the CSBK data
			csbk.get(data + 2U);

			// Regenerate the Slot Type
			slotType.getData(data + 2U);

			// Convert the Data Sync to be from the BS or MS as needed
			CSync::addDMRDataSync(data + 2U, m_duplex);

			data[0U] = TAG_DATA;
			data[1U] = 0x00U;

			if (m_duplex)
				writeQueueRF(data);

			writeNetworkRF(data, DT_CSBK, gi ? FLCO_GROUP : FLCO_USER_USER, srcId, dstId);

			std::string src = m_lookup->find(srcId);
			std::string dst = m_lookup->find(dstId);

			switch (csbko) {
			case CSBKO_UUVREQ:
				LogMessage("DMR Slot %u, received RF Unit to Unit Voice Service Request CSBK from %s to %s%s", m_slotNo, src.c_str(), gi ? "TG ": "", dst.c_str());
				break;
			case CSBKO_UUANSRSP:
				LogMessage("DMR Slot %u, received RF Unit to Unit Voice Service Answer Response CSBK from %s to %s%s", m_slotNo, src.c_str(), gi ? "TG ": "", dst.c_str());
				break;
			case CSBKO_NACKRSP:
				LogMessage("DMR Slot %u, received RF Negative Acknowledgment Response CSBK from %s to %s%s", m_slotNo, src.c_str(), gi ? "TG ": "", dst.c_str());
				break;
			case CSBKO_PRECCSBK:
				LogMessage("DMR Slot %u, received RF %s Preamble CSBK (%u to follow) from %s to %s%s", m_slotNo, csbk.getDataContent() ? "Data" : "CSBK", csbk.getCBF(), src.c_str(), gi ? "TG ": "", dst.c_str());
				break;
			default:
				LogWarning("DMR Slot %u, unhandled RF CSBK type - 0x%02X", m_slotNo, csbko);
				break;
			}

			// If data preamble, signal its existence
			if (m_netState == RS_NET_IDLE && csbko == CSBKO_PRECCSBK && csbk.getDataContent()) {
				setShortLC(m_slotNo, dstId, gi ? FLCO_GROUP : FLCO_USER_USER, ACTIVITY_DATA);
				m_display->writeDMR(m_slotNo, src, gi, dst, "R");
				m_display->writeDMRRSSI(m_slotNo, m_rssi);
			}

            return true;
		} else if (dataType == DT_RATE_12_DATA || dataType == DT_RATE_34_DATA || dataType == DT_RATE_1_DATA) {
			if (m_rfState != RS_RF_DATA || m_rfFrames == 0U)
				return false;

			// Regenerate the rate 1/2 payload
			if (dataType == DT_RATE_12_DATA) {
				CBPTC19696 bptc;
				unsigned char payload[12U];
				bptc.decode(data + 2U, payload);
				bptc.encode(payload, data + 2U);
			} else if (dataType == DT_RATE_34_DATA) {
				CDMRTrellis trellis;
				unsigned char payload[18U];
				bool ret = trellis.decode(data + 2U, payload);
				if (ret) {
					trellis.encode(payload, data + 2U);
				} else {
					LogMessage("DMR Slot %u, unfixable RF rate 3/4 data", m_slotNo);
					CUtils::dump(1U, "Data", data + 2U, DMR_FRAME_LENGTH_BYTES);
				}
			}

			// Regenerate the Slot Type
			slotType.getData(data + 2U);

			// Convert the Data Sync to be from the BS or MS as needed
			CSync::addDMRDataSync(data + 2U, m_duplex);

			m_rfFrames--;

			data[0U] = m_rfFrames == 0U ? TAG_EOT : TAG_DATA;
			data[1U] = 0x00U;

			if (m_duplex)
				writeQueueRF(data);

			writeNetworkRF(data, dataType);

			if (m_rfFrames == 0U) {
				LogMessage("DMR Slot %u, ended RF data transmission", m_slotNo);
				writeEndRF();
			}

			return true;
		}
	} else if (audioSync) {
		if (m_rfState == RS_RF_AUDIO) {
			// Convert the Audio Sync to be from the BS or MS as needed
			CSync::addDMRAudioSync(data + 2U, m_duplex);

			unsigned int errors = 0U;
			unsigned char fid = m_rfLC->getFID();
			if (fid == FID_ETSI || fid == FID_DMRA) {
				errors = m_fec.regenerateDMR(data + 2U);
				LogDebug("DMR Slot %u, audio sequence no. 0, errs: %u/141 (%.1f%%)", m_slotNo, errors, float(errors) / 1.41F);
				m_display->writeDMRBER(m_slotNo, float(errors) / 1.41F);
				m_rfErrs += errors;
			}

			m_rfBits += 141U;
			m_rfFrames++;

			m_rfEmbeddedReadN  = (m_rfEmbeddedReadN  + 1U) % 2U;
			m_rfEmbeddedWriteN = (m_rfEmbeddedWriteN + 1U) % 2U;

			m_rfEmbeddedData[m_rfEmbeddedWriteN].reset();

			m_display->writeDMRRSSI(m_slotNo, m_rssi);

			if (!m_rfTimeout) {
				data[0U] = TAG_DATA;
				data[1U] = 0x00U;

				if (m_duplex)
					writeQueueRF(data);

				writeNetworkRF(data, DT_VOICE_SYNC, errors);

				return true;
			}

			return false;
		} else if (m_rfState == RS_RF_LISTENING) {
			m_rfEmbeddedLC.reset();
			m_rfState = RS_RF_LATE_ENTRY;
			return false;
		}
	} else {
		if (m_rfState == RS_RF_AUDIO) {
			m_rfN = data[1U] & 0x0FU;
			if (m_rfN > 5U)
				return false;

			unsigned int errors = 0U;
			unsigned char fid = m_rfLC->getFID();
			if (fid == FID_ETSI || fid == FID_DMRA) {
				errors = m_fec.regenerateDMR(data + 2U);
				LogDebug("DMR Slot %u, audio sequence no. %u, errs: %u/141 (%.1f%%)", m_slotNo, m_rfN, errors, float(errors) / 1.41F);
				m_display->writeDMRBER(m_slotNo, float(errors) / 1.41F);
				m_rfErrs += errors;
			}

			m_rfBits += 141U;
			m_rfFrames++;

			// Get the LCSS from the EMB
			CDMREMB emb;
			emb.putData(data + 2U);
			unsigned char lcss = emb.getLCSS();

			// Dump any interesting Embedded Data
			bool ret = m_rfEmbeddedData[m_rfEmbeddedWriteN].addData(data + 2U, lcss);
			if (ret) {
				FLCO flco = m_rfEmbeddedData[m_rfEmbeddedWriteN].getFLCO();

				unsigned char data[9U];
				m_rfEmbeddedData[m_rfEmbeddedWriteN].getRawData(data);

				char text[80U];
				switch (flco) {
				case FLCO_GROUP:
				case FLCO_USER_USER:
					// ::sprintf(text, "DMR Slot %u, Embedded LC", m_slotNo);
					// CUtils::dump(1U, text, data, 9U);
					break;

				case FLCO_GPS_INFO:
					if (m_dumpTAData) {
						::sprintf(text, "DMR Slot %u, Embedded GPS Info", m_slotNo);
						CUtils::dump(2U, text, data, 9U);
						logGPSPosition(data);
					}
					if (m_network != NULL)
						m_network->writePosition(m_rfLC->getSrcId(), data);
					break;

				case FLCO_TALKER_ALIAS_HEADER:
					if (m_network != NULL)
						m_network->writeTalkerAlias(m_rfLC->getSrcId(), 0U, data);

					if (!(m_rfTalkerId & TALKER_ID_HEADER)) {
						if (m_rfTalkerId == TALKER_ID_NONE)
							::memset(m_rfTalkerAlias, '\0', 32U);
						::memcpy(m_rfTalkerAlias, data, 6U);
						m_display->writeDMRTA(m_slotNo, m_rfTalkerAlias, "R");

						if (m_dumpTAData) {
							::sprintf(text, "DMR Slot %u, Embedded Talker Alias Header", m_slotNo);
							CUtils::dump(2U, text, data, 9U);
						}

						m_rfTalkerId |= TALKER_ID_HEADER;
					}
					break;

				case FLCO_TALKER_ALIAS_BLOCK1:
					if (m_network != NULL)
						m_network->writeTalkerAlias(m_rfLC->getSrcId(), 1U, data);

					if (!(m_rfTalkerId & TALKER_ID_BLOCK1)) {
						if (m_rfTalkerId == TALKER_ID_NONE)
							::memset(m_rfTalkerAlias, '\0', 32U);
						::memcpy(m_rfTalkerAlias + 6U, data, 7U);
						m_display->writeDMRTA(m_slotNo, m_rfTalkerAlias, "R");

						if (m_dumpTAData) {
							::sprintf(text, "DMR Slot %u, Embedded Talker Alias Block 1", m_slotNo);
							CUtils::dump(2U, text, data, 9U);
						}

						m_rfTalkerId |= TALKER_ID_BLOCK1;
					}
					break;

				case FLCO_TALKER_ALIAS_BLOCK2:
					if (m_network != NULL)
						m_network->writeTalkerAlias(m_rfLC->getSrcId(), 2U, data);

					if (!(m_rfTalkerId & TALKER_ID_BLOCK2)) {
						if (m_rfTalkerId == TALKER_ID_NONE)
							::memset(m_rfTalkerAlias, 0, 32U);
						::memcpy(m_rfTalkerAlias + 6U + 7U, data, 7U);
						m_display->writeDMRTA(m_slotNo, m_rfTalkerAlias, "R");

						if (m_dumpTAData) {
							::sprintf(text, "DMR Slot %u, Embedded Talker Alias Block 2", m_slotNo);
							CUtils::dump(2U, text, data, 9U);
						}

						m_rfTalkerId |= TALKER_ID_BLOCK2;
					}
					break;

				case FLCO_TALKER_ALIAS_BLOCK3:
					if (m_network != NULL)
						m_network->writeTalkerAlias(m_rfLC->getSrcId(), 3U, data);

					if (!(m_rfTalkerId & TALKER_ID_BLOCK3)) {
						if (m_rfTalkerId == TALKER_ID_NONE)
							::memset(m_rfTalkerAlias, '\0', 32U);
						::memcpy(m_rfTalkerAlias + 6U + 7U + 7U, data, 7U);
						m_display->writeDMRTA(m_slotNo, m_rfTalkerAlias, "R");

						if (m_dumpTAData) {
							::sprintf(text, "DMR Slot %u, Embedded Talker Alias Block 3", m_slotNo);
							CUtils::dump(2U, text, data, 9U);
						}

						m_rfTalkerId |= TALKER_ID_BLOCK3;
					}
					break;

				default:
					::sprintf(text, "DMR Slot %u, Unknown Embedded Data", m_slotNo);
					CUtils::dump(1U, text, data, 9U);
					break;
				}
			}

			// Regenerate the previous super blocks Embedded Data or substitude the LC for it
			if (m_rfEmbeddedData[m_rfEmbeddedReadN].isValid())
				lcss = m_rfEmbeddedData[m_rfEmbeddedReadN].getData(data + 2U, m_rfN);
			else
				lcss = m_rfEmbeddedLC.getData(data + 2U, m_rfN);

			// Regenerate the EMB
			emb.setColorCode(m_colorCode);
			emb.setLCSS(lcss);
			emb.getData(data + 2U);

			if (!m_rfTimeout) {
				data[0U] = TAG_DATA;
				data[1U] = 0x00U;

				writeNetworkRF(data, DT_VOICE, errors);

				if (m_embeddedLCOnly) {
					// Only send the previously received LC
					lcss = m_rfEmbeddedLC.getData(data + 2U, m_rfN);

					// Regenerate the EMB
					emb.setColorCode(m_colorCode);
					emb.setLCSS(lcss);
					emb.getData(data + 2U);
				}

				if (m_duplex)
					writeQueueRF(data);

				return true;
			}

			return false;
		} else if (m_rfState == RS_RF_LATE_ENTRY) {
			CDMREMB emb;
			emb.putData(data + 2U);

			// If we haven't received an LC yet, then be strict on the color code
			unsigned char colorCode = emb.getColorCode();
			if (colorCode != m_colorCode)
				return false;

			m_rfEmbeddedLC.addData(data + 2U, emb.getLCSS());
			CDMRLC* lc = m_rfEmbeddedLC.getLC();
			if (lc != NULL) {
				unsigned int srcId = lc->getSrcId();
				unsigned int dstId = lc->getDstId();
				FLCO flco = lc->getFLCO();

				if (!CDMRAccessControl::validateSrcId(srcId)) {
					LogMessage("DMR Slot %u, RF user %u rejected", m_slotNo, srcId);
					delete lc;
				    return false;
				}

				if (!CDMRAccessControl::validateTGId(m_slotNo, flco == FLCO_GROUP, dstId)) {
					LogMessage("DMR Slot %u, RF user %u rejected for using TG %u", m_slotNo, srcId, dstId);
					delete lc;
					return false;
				}

				m_rfLC = lc;

				// The standby LC data
				m_rfEmbeddedLC.setLC(*m_rfLC);
				m_rfEmbeddedData[0U].setLC(*m_rfLC);
				m_rfEmbeddedData[1U].setLC(*m_rfLC);

				// Create a dummy start frame to replace the received frame
				unsigned char start[DMR_FRAME_LENGTH_BYTES + 2U];

				CSync::addDMRDataSync(start + 2U, m_duplex);

				CDMRFullLC fullLC;
				fullLC.encode(*m_rfLC, start + 2U, DT_VOICE_LC_HEADER);

				CDMRSlotType slotType;
				slotType.setColorCode(m_colorCode);
				slotType.setDataType(DT_VOICE_LC_HEADER);
				slotType.getData(start + 2U);

				start[0U] = TAG_DATA;
				start[1U] = 0x00U;

				m_rfTimeoutTimer.start();
				m_rfTimeout = false;

				m_rfFrames = 0U;
				m_rfSeqNo  = 0U;
				m_rfBits   = 1U;
				m_rfErrs   = 0U;

				m_rfEmbeddedReadN  = 0U;
				m_rfEmbeddedWriteN = 1U;
				m_rfTalkerId       = TALKER_ID_NONE;

				m_minRSSI = m_rssi;
				m_maxRSSI = m_rssi;
				m_aveRSSI = m_rssi;
				m_rssiCount = 1U;

				if (m_duplex) {
					m_queue.clear();
					m_modem->writeDMRAbort(m_slotNo);

					for (unsigned int i = 0U; i < NO_HEADERS_DUPLEX; i++)
						writeQueueRF(start);
				}

				writeNetworkRF(start, DT_VOICE_LC_HEADER);

				m_rfN = data[1U] & 0x0FU;
				if (m_rfN > 5U)
					return false;

				// Regenerate the EMB
				emb.getData(data + 2U);

				// Send the original audio frame out
				unsigned int errors = 0U;
				unsigned char fid = m_rfLC->getFID();
				if (fid == FID_ETSI || fid == FID_DMRA) {
					errors = m_fec.regenerateDMR(data + 2U);
					LogDebug("DMR Slot %u, audio sequence no. %u, errs: %u/141 (%.1f%%)", m_slotNo, m_rfN, errors, float(errors) / 1.41F);
					m_rfErrs += errors;
				}

				m_rfBits += 141U;
				m_rfFrames++;

				data[0U] = TAG_DATA;
				data[1U] = 0x00U;

				if (m_duplex)
					writeQueueRF(data);

				writeNetworkRF(data, DT_VOICE, errors);

				m_rfState = RS_RF_AUDIO;

				std::string src = m_lookup->find(srcId);
				std::string dst = m_lookup->find(dstId);

				if (m_netState == RS_NET_IDLE) {
					setShortLC(m_slotNo, dstId, flco, ACTIVITY_VOICE);
					m_display->writeDMR(m_slotNo, src, flco == FLCO_GROUP, dst, "R");
					m_display->writeDMRRSSI(m_slotNo, m_rssi);
					m_display->writeDMRBER(m_slotNo, float(errors) / 1.41F);
				}

				LogMessage("DMR Slot %u, received RF late entry from %s to %s%s", m_slotNo, src.c_str(), flco == FLCO_GROUP ? "TG " : "", dst.c_str());

				return true;
			}
		}
	}

	return false;
}

unsigned int CDMRSlot::readModem(unsigned char* data)
{
	assert(data != NULL);

	if (m_queue.isEmpty())
		return 0U;

	unsigned char len = 0U;
	m_queue.getData(&len, 1U);

	m_queue.getData(data, len);

	return len;
}

void CDMRSlot::writeEndRF(bool writeEnd)
{
	m_rfState = RS_RF_LISTENING;

	if (m_netState == RS_NET_IDLE) {
		setShortLC(m_slotNo, 0U);
		m_display->clearDMR(m_slotNo);
	}

	if (writeEnd) {
		if (m_netState == RS_NET_IDLE && m_duplex && !m_rfTimeout) {
			// Create a dummy start end frame
			unsigned char data[DMR_FRAME_LENGTH_BYTES + 2U];

			CSync::addDMRDataSync(data + 2U, m_duplex);

			CDMRFullLC fullLC;
			fullLC.encode(*m_rfLC, data + 2U, DT_TERMINATOR_WITH_LC);

			CDMRSlotType slotType;
			slotType.setColorCode(m_colorCode);
			slotType.setDataType(DT_TERMINATOR_WITH_LC);
			slotType.getData(data + 2U);

			data[0U] = TAG_EOT;
			data[1U] = 0x00U;

			for (unsigned int i = 0U; i < m_hangCount; i++)
				writeQueueRF(data);
		}
	}

	m_rfTimeoutTimer.stop();
	m_rfTimeout = false;

	m_rfFrames = 0U;
	m_rfErrs = 0U;
	m_rfBits = 1U;

	m_rfSeqNo = 0U;
	m_rfN = 0U;

	delete m_rfLC;
	m_rfLC = NULL;
}

void CDMRSlot::writeEndNet(bool writeEnd)
{
	m_netState = RS_NET_IDLE;

	setShortLC(m_slotNo, 0U);

	m_display->clearDMR(m_slotNo);

	m_lastFrameValid = false;

	if (writeEnd && !m_netTimeout) {
		// Create a dummy start end frame
		unsigned char data[DMR_FRAME_LENGTH_BYTES + 2U];

		CSync::addDMRDataSync(data + 2U, m_duplex);

		CDMRFullLC fullLC;
		fullLC.encode(*m_netLC, data + 2U, DT_TERMINATOR_WITH_LC);

		CDMRSlotType slotType;
		slotType.setColorCode(m_colorCode);
		slotType.setDataType(DT_TERMINATOR_WITH_LC);
		slotType.getData(data + 2U);

		data[0U] = TAG_EOT;
		data[1U] = 0x00U;

		if (m_duplex) {
			for (unsigned int i = 0U; i < m_hangCount; i++)
				writeQueueNet(data);
		} else {
			for (unsigned int i = 0U; i < 3U; i++)
				writeQueueNet(data);
		}
	}

	m_networkWatchdog.stop();
	m_netTimeoutTimer.stop();
	m_packetTimer.stop();
	m_netTimeout = false;

	m_netFrames = 0U;
	m_netLost = 0U;

	m_netErrs = 0U;
	m_netBits = 1U;

	m_netN = 0U;

	delete m_netLC;
	m_netLC = NULL;

#if defined(DUMP_DMR)
	closeFile();
#endif
}

void CDMRSlot::writeNetwork(const CDMRData& dmrData)
{
	if (m_rfState != RS_RF_LISTENING && m_netState == RS_NET_IDLE)
		return;

	m_networkWatchdog.start();

	unsigned char dataType = dmrData.getDataType();

	unsigned char data[DMR_FRAME_LENGTH_BYTES + 2U];
	dmrData.getData(data + 2U);

	if (dataType == DT_VOICE_LC_HEADER) {
		if (m_netState == RS_NET_AUDIO)
			return;

		CDMRFullLC fullLC;
		CDMRLC* lc = fullLC.decode(data + 2U, DT_VOICE_LC_HEADER);
		if (lc == NULL) {
			LogMessage("DMR Slot %u, bad LC received from the network, replacing", m_slotNo);
			lc = new CDMRLC(dmrData.getFLCO(), dmrData.getSrcId(), dmrData.getDstId());
		}

		unsigned int dstId = lc->getDstId();
		unsigned int srcId = lc->getSrcId();
		FLCO flco          = lc->getFLCO();

		if (dstId != dmrData.getDstId() || srcId != dmrData.getSrcId() || flco != dmrData.getFLCO())
			LogWarning("DMR Slot %u, DMRD header doesn't match the DMR RF header: %u->%s%u %u->%s%u", m_slotNo,
				dmrData.getSrcId(), dmrData.getFLCO() == FLCO_GROUP ? "TG" : "", dmrData.getDstId(),
				srcId, flco == FLCO_GROUP ? "TG" : "", dstId);

		m_netLC = lc;

		// The standby LC data
		m_netEmbeddedLC.setLC(*m_netLC);
		m_netEmbeddedData[0U].setLC(*m_netLC);
		m_netEmbeddedData[1U].setLC(*m_netLC);

		// Regenerate the LC data
		fullLC.encode(*m_netLC, data + 2U, DT_VOICE_LC_HEADER);

		// Regenerate the Slot Type
		CDMRSlotType slotType;
		slotType.setColorCode(m_colorCode);
		slotType.setDataType(DT_VOICE_LC_HEADER);
		slotType.getData(data + 2U);

		// Convert the Data Sync to be from the BS or MS as needed
		CSync::addDMRDataSync(data + 2U, m_duplex);

		data[0U] = TAG_DATA;
		data[1U] = 0x00U;

		m_lastFrameValid = false;

		m_netTimeoutTimer.start();
		m_netTimeout = false;

		m_netFrames = 0U;
		m_netLost = 0U;
		m_netBits = 1U;
		m_netErrs = 0U;

		m_netEmbeddedReadN  = 0U;
		m_netEmbeddedWriteN = 1U;
		m_netTalkerId       = TALKER_ID_NONE;

		if (m_duplex) {
			m_queue.clear();
			m_modem->writeDMRAbort(m_slotNo);
		}

		for (unsigned int i = 0U; i < m_jitterSlots; i++)
			writeQueueNet(m_idle);

		if (m_duplex) {
			for (unsigned int i = 0U; i < NO_HEADERS_DUPLEX; i++)
				writeQueueNet(data);
		} else {
			for (unsigned int i = 0U; i < NO_HEADERS_SIMPLEX; i++)
				writeQueueNet(data);
		}

		m_netState = RS_NET_AUDIO;

		setShortLC(m_slotNo, dstId, flco, ACTIVITY_VOICE);
		std::string src = m_lookup->find(srcId);
		std::string dst = m_lookup->find(dstId);
		std::string cn = m_lookup->findwithname(srcId);
		m_display->writeDMR(m_slotNo, cn, flco == FLCO_GROUP, dst, "N");

#if defined(DUMP_DMR)
		openFile();
		writeFile(data);
#endif

		LogMessage("DMR Slot %u, received network voice header from %s to %s%s", m_slotNo, src.c_str(), flco == FLCO_GROUP ? "TG " : "", dst.c_str());
	} else if (dataType == DT_VOICE_PI_HEADER) {
		if (m_netState != RS_NET_AUDIO) {
			CDMRLC* lc = new CDMRLC(dmrData.getFLCO(), dmrData.getSrcId(), dmrData.getDstId());

			unsigned int dstId = lc->getDstId();
			unsigned int srcId = lc->getSrcId();

			m_netLC = lc;

			m_lastFrameValid = false;

			m_netTimeoutTimer.start();
			m_netTimeout = false;

			if (m_duplex) {
				m_queue.clear();
				m_modem->writeDMRAbort(m_slotNo);
			}

			for (unsigned int i = 0U; i < m_jitterSlots; i++)
				writeQueueNet(m_idle);

			// Create a dummy start frame
			unsigned char start[DMR_FRAME_LENGTH_BYTES + 2U];

			CSync::addDMRDataSync(start + 2U, m_duplex);

			CDMRFullLC fullLC;
			fullLC.encode(*m_netLC, start + 2U, DT_VOICE_LC_HEADER);

			CDMRSlotType slotType;
			slotType.setColorCode(m_colorCode);
			slotType.setDataType(DT_VOICE_LC_HEADER);
			slotType.getData(start + 2U);

			start[0U] = TAG_DATA;
			start[1U] = 0x00U;

			if (m_duplex) {
				for (unsigned int i = 0U; i < NO_HEADERS_DUPLEX; i++)
					writeQueueRF(start);
			} else {
				for (unsigned int i = 0U; i < NO_HEADERS_SIMPLEX; i++)
					writeQueueRF(start);
			}

#if defined(DUMP_DMR)
			openFile();
#endif
			m_netFrames = 0U;
			m_netLost = 0U;
			m_netBits = 1U;
			m_netErrs = 0U;

			m_netState = RS_NET_AUDIO;

			setShortLC(m_slotNo, dstId, m_netLC->getFLCO(), ACTIVITY_VOICE);

			std::string src = m_lookup->find(srcId);
			std::string dst = m_lookup->find(dstId);

			m_display->writeDMR(m_slotNo, src, m_netLC->getFLCO() == FLCO_GROUP, dst, "N");

			LogMessage("DMR Slot %u, received network late entry from %s to %s%s", m_slotNo, src.c_str(), m_netLC->getFLCO() == FLCO_GROUP ? "TG " : "", dst.c_str());
		}

		// Regenerate the Slot Type
		CDMRSlotType slotType;
		slotType.setColorCode(m_colorCode);
		slotType.setDataType(DT_VOICE_PI_HEADER);
		slotType.getData(data + 2U);

		// Convert the Data Sync to be from the BS or MS as needed
		CSync::addDMRDataSync(data + 2U, m_duplex);

		// Regenerate the payload
		CBPTC19696 bptc;
		unsigned char payload[12U];
		bptc.decode(data + 2U, payload);
		bptc.encode(payload, data + 2U);

		data[0U] = TAG_DATA;
		data[1U] = 0x00U;

		writeQueueNet(data);

#if defined(DUMP_DMR)
		writeFile(data);
#endif
	} else if (dataType == DT_TERMINATOR_WITH_LC) {
		if (m_netState != RS_NET_AUDIO)
			return;

		// Regenerate the LC data
		CDMRFullLC fullLC;
		fullLC.encode(*m_netLC, data + 2U, DT_TERMINATOR_WITH_LC);

		// Regenerate the Slot Type
		CDMRSlotType slotType;
		slotType.setColorCode(m_colorCode);
		slotType.setDataType(DT_TERMINATOR_WITH_LC);
		slotType.getData(data + 2U);

		// Convert the Data Sync to be from the BS or MS as needed
		CSync::addDMRDataSync(data + 2U, m_duplex);

		if (!m_netTimeout) {
			data[0U] = TAG_EOT;
			data[1U] = 0x00U;

			if (m_duplex) {
				for (unsigned int i = 0U; i < m_hangCount; i++)
					writeQueueNet(data);
			} else {
				for (unsigned int i = 0U; i < 3U; i++)
					writeQueueNet(data);
			}
		}

#if defined(DUMP_DMR)
		writeFile(data);
		closeFile();
#endif
		// We've received the voice header and terminator haven't we?
		m_netFrames += 2U;
		LogMessage("DMR Slot %u, received network end of voice transmission, %.1f seconds, %u%% packet loss, BER: %.1f%%", m_slotNo, float(m_netFrames) / 16.667F, (m_netLost * 100U) / m_netFrames, float(m_netErrs * 100U) / float(m_netBits));
		m_display->writeDMRTA(m_slotNo, NULL, " ");
		writeEndNet();
	} else if (dataType == DT_DATA_HEADER) {
		if (m_netState == RS_NET_DATA)
			return;

		CDMRDataHeader dataHeader;
		bool valid = dataHeader.put(data + 2U);
		if (!valid) {
			LogMessage("DMR Slot %u, unable to decode the network data header", m_slotNo);
			return;
		}

		bool gi = dataHeader.getGI();
		unsigned int srcId = dataHeader.getSrcId();
		unsigned int dstId = dataHeader.getDstId();

		m_netFrames = dataHeader.getBlocks();

		// Regenerate the data header
		dataHeader.get(data + 2U);

		// Regenerate the Slot Type
		CDMRSlotType slotType;
		slotType.setColorCode(m_colorCode);
		slotType.setDataType(DT_DATA_HEADER);
		slotType.getData(data + 2U);

		// Convert the Data Sync to be from the BS or MS as needed
		CSync::addDMRDataSync(data + 2U, m_duplex);

		data[0U] = m_netFrames == 0U ? TAG_EOT : TAG_DATA;
		data[1U] = 0x00U;

		// Put a small delay into starting transmission
		writeQueueNet(m_idle);
		writeQueueNet(m_idle);

		writeQueueNet(data);

		m_netState = RS_NET_DATA;

		setShortLC(m_slotNo, dstId, gi ? FLCO_GROUP : FLCO_USER_USER, ACTIVITY_DATA);

		std::string src = m_lookup->find(srcId);
		std::string dst = m_lookup->find(dstId);

		m_display->writeDMR(m_slotNo, src, gi, dst, "N");

		LogMessage("DMR Slot %u, received network data header from %s to %s%s, %u blocks", m_slotNo, src.c_str(), gi ? "TG ": "", dst.c_str(), m_netFrames);

		if (m_netFrames == 0U) {
			LogMessage("DMR Slot %u, ended network data transmission", m_slotNo);
			writeEndNet();
		}
	} else if (dataType == DT_VOICE_SYNC) {
		if (m_netState == RS_NET_IDLE) {
			CDMRLC* lc = new CDMRLC(dmrData.getFLCO(), dmrData.getSrcId(), dmrData.getDstId());

			unsigned int dstId = lc->getDstId();
			unsigned int srcId = lc->getSrcId();

			m_netLC = lc;

			// The standby LC data
			m_netEmbeddedLC.setLC(*m_netLC);
			m_netEmbeddedData[0U].setLC(*m_netLC);
			m_netEmbeddedData[1U].setLC(*m_netLC);

			m_lastFrameValid = false;

			m_netTimeoutTimer.start();
			m_netTimeout = false;

			if (m_duplex) {
				m_queue.clear();
				m_modem->writeDMRAbort(m_slotNo);
			}

			for (unsigned int i = 0U; i < m_jitterSlots; i++)
				writeQueueNet(m_idle);

			// Create a dummy start frame
			unsigned char start[DMR_FRAME_LENGTH_BYTES + 2U];

			CSync::addDMRDataSync(start + 2U, m_duplex);

			CDMRFullLC fullLC;
			fullLC.encode(*m_netLC, start + 2U, DT_VOICE_LC_HEADER);

			CDMRSlotType slotType;
			slotType.setColorCode(m_colorCode);
			slotType.setDataType(DT_VOICE_LC_HEADER);
			slotType.getData(start + 2U);

			start[0U] = TAG_DATA;
			start[1U] = 0x00U;

			if (m_duplex) {
				for (unsigned int i = 0U; i < NO_HEADERS_DUPLEX; i++)
					writeQueueRF(start);
			} else {
				for (unsigned int i = 0U; i < NO_HEADERS_SIMPLEX; i++)
					writeQueueRF(start);
			}

#if defined(DUMP_DMR)
			openFile();
#endif
			m_netFrames = 0U;
			m_netLost = 0U;
			m_netBits = 1U;
			m_netErrs = 0U;

			m_netEmbeddedReadN  = 0U;
			m_netEmbeddedWriteN = 1U;
			m_netTalkerId       = TALKER_ID_NONE;

			m_netState = RS_NET_AUDIO;

			setShortLC(m_slotNo, dstId, m_netLC->getFLCO(), ACTIVITY_VOICE);
	
			std::string src = m_lookup->find(srcId);
			std::string dst = m_lookup->find(dstId);

			m_display->writeDMR(m_slotNo, src, m_netLC->getFLCO() == FLCO_GROUP, dst, "N");

			LogMessage("DMR Slot %u, received network late entry from %s to %s%s", m_slotNo, src.c_str(), m_netLC->getFLCO() == FLCO_GROUP ? "TG " : "", dst.c_str());
		}

		if (m_netState == RS_NET_AUDIO) {
			unsigned char fid = m_netLC->getFID();
			if (fid == FID_ETSI || fid == FID_DMRA)
				m_netErrs += m_fec.regenerateDMR(data + 2U);
			m_netBits += 141U;

			data[0U] = TAG_DATA;
			data[1U] = 0x00U;

			// Convert the Audio Sync to be from the BS or MS as needed
			CSync::addDMRAudioSync(data + 2U, m_duplex);

			// Initialise the lost packet data
			if (m_netFrames == 0U) {
				::memcpy(m_lastFrame, data, DMR_FRAME_LENGTH_BYTES + 2U);
				m_lastFrameValid = true;
				m_netN = 5U;
				m_netLost = 0U;
			}

			if (insertSilence(data, dmrData.getN())) {
				if (!m_netTimeout)
					writeQueueNet(data);
			}

			m_netEmbeddedReadN  = (m_netEmbeddedReadN  + 1U) % 2U;
			m_netEmbeddedWriteN = (m_netEmbeddedWriteN + 1U) % 2U;

			m_netEmbeddedData[m_netEmbeddedWriteN].reset();

			m_packetTimer.start();
			m_elapsed.start();

			m_netFrames++;

			// Save details in case we need to infill data
			m_netN = dmrData.getN();

#if defined(DUMP_DMR)
			writeFile(data);
#endif
		}
	} else if (dataType == DT_VOICE) {
		if (m_netState != RS_NET_AUDIO)
			return;

		unsigned char fid = m_netLC->getFID();
		if (fid == FID_ETSI || fid == FID_DMRA)
			m_netErrs += m_fec.regenerateDMR(data + 2U);
		m_netBits += 141U;

		// Get the LCSS from the EMB
		CDMREMB emb;
		emb.putData(data + 2U);
		unsigned char lcss = emb.getLCSS();

		// Dump any interesting Embedded Data
		bool ret = m_netEmbeddedData[m_netEmbeddedWriteN].addData(data + 2U, lcss);
		if (ret) {
			FLCO flco = m_netEmbeddedData[m_netEmbeddedWriteN].getFLCO();

			unsigned char data[9U];
			m_netEmbeddedData[m_netEmbeddedWriteN].getRawData(data);

			char text[80U];
			switch (flco) {
			case FLCO_GROUP:
			case FLCO_USER_USER:
				// ::sprintf(text, "DMR Slot %u, Embedded LC", m_slotNo);
				// CUtils::dump(1U, text, data, 9U);
				break;
			case FLCO_GPS_INFO:
				if (m_dumpTAData) {
					::sprintf(text, "DMR Slot %u, Embedded GPS Info", m_slotNo);
					CUtils::dump(2U, text, data, 9U);
					logGPSPosition(data);
				}
				break;
			case FLCO_TALKER_ALIAS_HEADER:
				if (!(m_netTalkerId & TALKER_ID_HEADER)) {
					if (!m_netTalkerId)
						::memset(m_rfTalkerAlias, '\0', 32U);
					::memcpy(m_rfTalkerAlias, data + 2U, 7U);
					m_display->writeDMRTA(m_slotNo, m_rfTalkerAlias, "N");

					if (m_dumpTAData) {
						::sprintf(text, "DMR Slot %u, Embedded Talker Alias Header", m_slotNo);
						CUtils::dump(2U, text, data, 9U);
					}

					m_netTalkerId |= TALKER_ID_HEADER;
				}
				break;
			case FLCO_TALKER_ALIAS_BLOCK1:
				if (!(m_netTalkerId & TALKER_ID_BLOCK1)) {
					if (!m_netTalkerId)
						::memset(m_rfTalkerAlias, '\0', 32U);
					::memcpy(m_rfTalkerAlias + 7U, data + 2U, 7U);
					m_display->writeDMRTA(m_slotNo, m_rfTalkerAlias, "N");

					if (m_dumpTAData) {
						::sprintf(text, "DMR Slot %u, Embedded Talker Alias Block 1", m_slotNo);
						CUtils::dump(2U, text, data, 9U);
					}

					m_netTalkerId |= TALKER_ID_BLOCK1;
				}
				break;
			case FLCO_TALKER_ALIAS_BLOCK2:
				if (!(m_netTalkerId & TALKER_ID_BLOCK2)) {
					if (!m_netTalkerId)
						::memset(m_rfTalkerAlias, '\0', 32U);
					::memcpy(m_rfTalkerAlias + 7U + 7U, data + 2U, 7U);
					m_display->writeDMRTA(m_slotNo, m_rfTalkerAlias, "N");

					if (m_dumpTAData) {
						::sprintf(text, "DMR Slot %u, Embedded Talker Alias Block 2", m_slotNo);
						CUtils::dump(2U, text, data, 9U);
					}

					m_netTalkerId |= TALKER_ID_BLOCK2;
				}
				break;
			case FLCO_TALKER_ALIAS_BLOCK3:
				if (!(m_netTalkerId & TALKER_ID_BLOCK3)) {
					if (!m_netTalkerId)
						::memset(m_rfTalkerAlias, '\0', 32U);
					::memcpy(m_rfTalkerAlias + 7U + 7U + 7U, data+2U, 7U);
					m_display->writeDMRTA(m_slotNo, m_rfTalkerAlias, "N");

					if (m_dumpTAData) {
						::sprintf(text, "DMR Slot %u, Embedded Talker Alias Block 3", m_slotNo);
						CUtils::dump(2U, text, data, 9U);
					}

					m_netTalkerId |= TALKER_ID_BLOCK3;
				}
				break;
			default:
				::sprintf(text, "DMR Slot %u, Unknown Embedded Data", m_slotNo);
				CUtils::dump(1U, text, data, 9U);
				break;
			}
		}

		if (m_embeddedLCOnly) {
			// Only send the previously received LC
			lcss = m_netEmbeddedLC.getData(data + 2U, dmrData.getN());
		} else {
			// Regenerate the previous super blocks Embedded Data or substitude the LC for it
			if (m_netEmbeddedData[m_netEmbeddedReadN].isValid())
				lcss = m_netEmbeddedData[m_netEmbeddedReadN].getData(data + 2U, dmrData.getN());
			else
				lcss = m_netEmbeddedLC.getData(data + 2U, dmrData.getN());
		}

		// Regenerate the EMB
		emb.setColorCode(m_colorCode);
		emb.setLCSS(lcss);
		emb.getData(data + 2U);

		data[0U] = TAG_DATA;
		data[1U] = 0x00U;

		// Initialise the lost packet data
		if (m_netFrames == 0U) {
			::memcpy(m_lastFrame, data, DMR_FRAME_LENGTH_BYTES + 2U);
			m_lastFrameValid = true;
			m_netN = 5U;
			m_netLost = 0U;
		}

		if (insertSilence(data, dmrData.getN())) {
			if (!m_netTimeout)
				writeQueueNet(data);
		}

		m_packetTimer.start();
		m_elapsed.start();

		m_netFrames++;

		// Save details in case we need to infill data
		m_netN = dmrData.getN();

#if defined(DUMP_DMR)
		writeFile(data);
#endif
	} else if (dataType == DT_CSBK) {
		CDMRCSBK csbk;
		bool valid = csbk.put(data + 2U);
		if (!valid) {
			LogMessage("DMR Slot %u, unable to decode the network CSBK", m_slotNo);
			return;
		}

		CSBKO csbko = csbk.getCSBKO();
		if (csbko == CSBKO_BSDWNACT)
			return;

		bool gi = csbk.getGI();
		unsigned int srcId = csbk.getSrcId();
		unsigned int dstId = csbk.getDstId();

		// Regenerate the CSBK data
		csbk.get(data + 2U);

		// Regenerate the Slot Type
		CDMRSlotType slotType;
		slotType.putData(data + 2U);
		slotType.setColorCode(m_colorCode);
		slotType.getData(data + 2U);

		// Convert the Data Sync to be from the BS or MS as needed
		CSync::addDMRDataSync(data + 2U, m_duplex);

		data[0U] = TAG_DATA;
		data[1U] = 0x00U;

		writeQueueNet(data);

#if defined(DUMP_DMR)
		openFile();
		writeFile(data);
		closeFile();
#endif

		std::string src = m_lookup->find(srcId);
		std::string dst = m_lookup->find(dstId);

		switch (csbko) {
		case CSBKO_UUVREQ:
			LogMessage("DMR Slot %u, received network Unit to Unit Voice Service Request CSBK from %s to %s%s", m_slotNo, src.c_str(), gi ? "TG ": "", dst.c_str());
			break;
		case CSBKO_UUANSRSP:
			LogMessage("DMR Slot %u, received network Unit to Unit Voice Service Answer Response CSBK from %s to %s%s", m_slotNo, src.c_str(), gi ? "TG ": "", dst.c_str());
			break;
		case CSBKO_NACKRSP:
			LogMessage("DMR Slot %u, received network Negative Acknowledgment Response CSBK from %s to %s%s", m_slotNo, src.c_str(), gi ? "TG ": "", dst.c_str());
			break;
		case CSBKO_PRECCSBK:
			LogMessage("DMR Slot %u, received network %s Preamble CSBK (%u to follow) from %s to %s%s", m_slotNo, csbk.getDataContent() ? "Data" : "CSBK", csbk.getCBF(), src.c_str(), gi ? "TG " : "", dst.c_str());
			break;
		default:
			LogWarning("DMR Slot %u, unhandled network CSBK type - 0x%02X", m_slotNo, csbko);
			break;
		}

		// If data preamble, signal its existence
		if (csbko == CSBKO_PRECCSBK && csbk.getDataContent()) {
			setShortLC(m_slotNo, dstId, gi ? FLCO_GROUP : FLCO_USER_USER, ACTIVITY_DATA);
			m_display->writeDMR(m_slotNo, src, gi, dst, "N");
		}
    } else if (dataType == DT_RATE_12_DATA || dataType == DT_RATE_34_DATA || dataType == DT_RATE_1_DATA) {
		if (m_netState != RS_NET_DATA || m_netFrames == 0U) {
			writeEndNet();
			return;
		}

		// Regenerate the rate 1/2 payload
		if (dataType == DT_RATE_12_DATA) {
			CBPTC19696 bptc;
			unsigned char payload[12U];
			bptc.decode(data + 2U, payload);
			bptc.encode(payload, data + 2U);
		} else if (dataType == DT_RATE_34_DATA) {
			CDMRTrellis trellis;
			unsigned char payload[18U];
			bool ret = trellis.decode(data + 2U, payload);
			if (ret) {
				trellis.encode(payload, data + 2U);
			} else {
				LogMessage("DMR Slot %u, unfixable network rate 3/4 data", m_slotNo);
				CUtils::dump(1U, "Data", data + 2U, DMR_FRAME_LENGTH_BYTES);
			}
		}

		// Regenerate the Slot Type
		CDMRSlotType slotType;
		slotType.putData(data + 2U);
		slotType.setColorCode(m_colorCode);
		slotType.getData(data + 2U);

		// Convert the Data Sync to be from the BS or MS as needed
		CSync::addDMRDataSync(data + 2U, m_duplex);

		m_netFrames--;

		data[0U] = m_netFrames == 0U ? TAG_EOT : TAG_DATA;
		data[1U] = 0x00U;

#if defined(DUMP_DMR)
		writeFile(data);
#endif
		writeQueueNet(data);

		if (m_netFrames == 0U) {
			LogMessage("DMR Slot %u, ended network data transmission", m_slotNo);
			writeEndNet();
		}
	} else {
		// Unhandled data type
		LogWarning("DMR Slot %u, unhandled network data type - 0x%02X", m_slotNo, dataType);
	}
}

void CDMRSlot::logGPSPosition(const unsigned char* data)
{
	unsigned int errorI = (data[2U] & 0x0E) >> 1U;

	const char* error;
	switch (errorI) {
	case 0U:
		error = "< 2m";
		break;
	case 1U:
		error = "< 20m";
		break;
	case 2U:
		error = "< 200m";
		break;
	case 3U:
		error = "< 2km";
		break;
	case 4U:
		error = "< 20km";
		break;
	case 5U:
		error = "< 200km";
		break;
	case 6U:
		error = "> 200km";
		break;
	default:
		error = "not known";
		break;
	}

	int32_t longitudeI = ((data[2U] & 0x01U) << 31) | (data[3U] << 23) | (data[4U] << 15) | (data[5U] << 7);
	longitudeI >>= 7;

	int32_t latitudeI = (data[6U] << 24) | (data[7U] << 16) | (data[8U] << 8);
	latitudeI >>= 8;

	float longitude = 360.0F / 33554432.0F;	// 360/2^25 steps
	float latitude  = 180.0F / 16777216.0F;	// 180/2^24 steps

	longitude *= float(longitudeI);
	latitude  *= float(latitudeI);

	LogMessage("GPS position [%f,%f] (Position error %s)", latitude, longitude, error);
}

void CDMRSlot::clock()
{
	unsigned int ms = m_interval.elapsed();
	m_interval.start();

	m_rfTimeoutTimer.clock(ms);
	if (m_rfTimeoutTimer.isRunning() && m_rfTimeoutTimer.hasExpired()) {
		if (!m_rfTimeout) {
			LogMessage("DMR Slot %u, RF user has timed out", m_slotNo);
			m_rfTimeout = true;
		}
	}

	m_netTimeoutTimer.clock(ms);
	if (m_netTimeoutTimer.isRunning() && m_netTimeoutTimer.hasExpired()) {
		if (!m_netTimeout) {
			LogMessage("DMR Slot %u, network user has timed out", m_slotNo);
			m_netTimeout = true;
		}
	}

	if (m_netState == RS_NET_AUDIO || m_netState == RS_NET_DATA) {
		m_networkWatchdog.clock(ms);

		if (m_networkWatchdog.hasExpired()) {
			if (m_netState == RS_NET_AUDIO) {
				// We've received the voice header haven't we?
				m_netFrames += 1U;
				LogMessage("DMR Slot %u, network watchdog has expired, %.1f seconds, %u%% packet loss, BER: %.1f%%", m_slotNo, float(m_netFrames) / 16.667F, (m_netLost * 100U) / m_netFrames, float(m_netErrs * 100U) / float(m_netBits));
				writeEndNet(true);
#if defined(DUMP_DMR)
				closeFile();
#endif
			} else {
				LogMessage("DMR Slot %u, network watchdog has expired", m_slotNo);
				writeEndNet();
#if defined(DUMP_DMR)
				closeFile();
#endif
			}
		}
	}

	if (m_netState == RS_NET_AUDIO) {
		m_packetTimer.clock(ms);

		if (m_packetTimer.isRunning() && m_packetTimer.hasExpired()) {
			unsigned int elapsed = m_elapsed.elapsed();
			if (elapsed >= m_jitterTime) {
				LogDebug("DMR Slot %u, lost audio for %ums filling in", m_slotNo, elapsed);
				insertSilence(m_jitterSlots);
				m_elapsed.start();
			}

			m_packetTimer.start();
		}
	}
}

void CDMRSlot::writeQueueRF(const unsigned char *data)
{
	assert(data != NULL);

	if (m_netState != RS_NET_IDLE)
		return;

	unsigned char len = DMR_FRAME_LENGTH_BYTES + 2U;

	unsigned int space = m_queue.freeSpace();
	if (space < (len + 1U)) {
		LogError("DMR Slot %u, overflow in the DMR slot RF queue", m_slotNo);
		return;
	}

	m_queue.addData(&len, 1U);
	m_queue.addData(data, len);
}

void CDMRSlot::writeNetworkRF(const unsigned char* data, unsigned char dataType, FLCO flco, unsigned int srcId, unsigned int dstId, unsigned char errors)
{
	assert(data != NULL);

	if (m_netState != RS_NET_IDLE)
		return;

	if (m_network == NULL)
		return;

	CDMRData dmrData;
	dmrData.setSlotNo(m_slotNo);
	dmrData.setDataType(dataType);
	dmrData.setSrcId(srcId);
	dmrData.setDstId(dstId);
	dmrData.setFLCO(flco);
	dmrData.setN(m_rfN);
	dmrData.setSeqNo(m_rfSeqNo);
	dmrData.setBER(errors);
	dmrData.setRSSI(m_rssi);

	m_rfSeqNo++;

	dmrData.setData(data + 2U);

	m_network->write(dmrData);
}

void CDMRSlot::writeNetworkRF(const unsigned char* data, unsigned char dataType, unsigned char errors)
{
	assert(data != NULL);
	assert(m_rfLC != NULL);

	writeNetworkRF(data, dataType, m_rfLC->getFLCO(), m_rfLC->getSrcId(), m_rfLC->getDstId(), errors);
}

void CDMRSlot::writeQueueNet(const unsigned char *data)
{
	assert(data != NULL);

	unsigned char len = DMR_FRAME_LENGTH_BYTES + 2U;

	unsigned int space = m_queue.freeSpace();
	if (space < (len + 1U)) {
		LogError("DMR Slot %u, overflow in the DMR slot RF queue", m_slotNo);
		return;
	}

	m_queue.addData(&len, 1U);
	m_queue.addData(data, len);
}

void CDMRSlot::init(unsigned int colorCode, bool embeddedLCOnly, bool dumpTAData, unsigned int callHang, CModem* modem, CDMRNetwork* network, CDisplay* display, bool duplex, CDMRLookup* lookup, CRSSIInterpolator* rssiMapper, unsigned int jitter)
{
	assert(modem != NULL);
	assert(display != NULL);
	assert(lookup != NULL);
	assert(rssiMapper != NULL);

	m_colorCode      = colorCode;
	m_embeddedLCOnly = embeddedLCOnly;
	m_dumpTAData     = dumpTAData;
	m_modem          = modem;
	m_network        = network;
	m_display        = display;
	m_duplex         = duplex;
	m_lookup         = lookup;
	m_hangCount      = callHang * 17U;

	m_rssiMapper     = rssiMapper;

	m_jitterTime     = jitter;
	
	float jitter_tmp = float(jitter) / 360.0F;
	m_jitterSlots    = (unsigned int) (std::ceil(jitter_tmp) * 6.0F);

	m_idle = new unsigned char[DMR_FRAME_LENGTH_BYTES + 2U];
	::memcpy(m_idle, DMR_IDLE_DATA, DMR_FRAME_LENGTH_BYTES + 2U);

	// Generate the Slot Type for the Idle frame
	CDMRSlotType slotType;
	slotType.setColorCode(colorCode);
	slotType.setDataType(DT_IDLE);
	slotType.getData(m_idle + 2U);
}


void CDMRSlot::setShortLC(unsigned int slotNo, unsigned int id, FLCO flco, ACTIVITY_TYPE type)
{
	assert(m_modem != NULL);

	switch (slotNo) {
		case 1U:
			m_id1       = 0U;
			m_flco1     = flco;
			m_activity1 = type;
			if (id != 0U) {
				unsigned char buffer[3U];
				buffer[0U] = (id << 16) & 0xFFU;
				buffer[1U] = (id << 8)  & 0xFFU;
				buffer[2U] = (id << 0)  & 0xFFU;
				m_id1 = CCRC::crc8(buffer, 3U);
			}
			break;
		case 2U:
			m_id2       = 0U;
			m_flco2     = flco;
			m_activity2 = type;
			if (id != 0U) {
				unsigned char buffer[3U];
				buffer[0U] = (id << 16) & 0xFFU;
				buffer[1U] = (id << 8)  & 0xFFU;
				buffer[2U] = (id << 0)  & 0xFFU;
				m_id2 = CCRC::crc8(buffer, 3U);
			}
			break;
		default:
			LogError("Invalid slot number passed to setShortLC - %u", slotNo);
			return;
	}

	// If we have no activity to report, let the modem send the null Short LC when it's ready
	if (m_id1 == 0U && m_id2 == 0U)
		return;

	unsigned char lc[5U];
	lc[0U] = 0x01U;
	lc[1U] = 0x00U;
	lc[2U] = 0x00U;
	lc[3U] = 0x00U;

	if (m_id1 != 0U) {
		lc[2U] = m_id1;
		if (m_activity1 == ACTIVITY_VOICE && m_flco1 == FLCO_GROUP)
			lc[1U] |= 0x08U;
		else if (m_activity1 == ACTIVITY_VOICE && m_flco1 == FLCO_USER_USER)
			lc[1U] |= 0x09U;
		else if (m_activity1 == ACTIVITY_DATA && m_flco1 == FLCO_GROUP)
			lc[1U] |= 0x0BU;
		else if (m_activity1 == ACTIVITY_DATA && m_flco1 == FLCO_USER_USER)
			lc[1U] |= 0x0AU;
		else if (m_activity1 == ACTIVITY_CSBK && m_flco1 == FLCO_GROUP)
			lc[1U] |= 0x02U;
		else if (m_activity1 == ACTIVITY_CSBK && m_flco1 == FLCO_USER_USER)
			lc[1U] |= 0x03U;
		else if (m_activity1 == ACTIVITY_EMERG && m_flco1 == FLCO_GROUP)
			lc[1U] |= 0x0CU;
		else if (m_activity1 == ACTIVITY_EMERG && m_flco1 == FLCO_USER_USER)
			lc[1U] |= 0x0DU;
	}

	if (m_id2 != 0U) {
		lc[3U] = m_id2;
		if (m_activity2 == ACTIVITY_VOICE && m_flco2 == FLCO_GROUP)
			lc[1U] |= 0x80U;
		else if (m_activity2 == ACTIVITY_VOICE && m_flco2 == FLCO_USER_USER)
			lc[1U] |= 0x90U;
		else if (m_activity2 == ACTIVITY_DATA && m_flco2 == FLCO_GROUP)
			lc[1U] |= 0xB0U;
		else if (m_activity2 == ACTIVITY_DATA && m_flco2 == FLCO_USER_USER)
			lc[1U] |= 0xA0U;
		else if (m_activity2 == ACTIVITY_CSBK && m_flco2 == FLCO_GROUP)
			lc[1U] |= 0x20U;
		else if (m_activity2 == ACTIVITY_CSBK && m_flco2 == FLCO_USER_USER)
			lc[1U] |= 0x30U;
		else if (m_activity2 == ACTIVITY_EMERG && m_flco2 == FLCO_GROUP)
			lc[1U] |= 0xC0U;
		else if (m_activity2 == ACTIVITY_EMERG && m_flco2 == FLCO_USER_USER)
			lc[1U] |= 0xD0U;
	}

	lc[4U] = CCRC::crc8(lc, 4U);

	unsigned char sLC[9U];

	CDMRShortLC shortLC;
	shortLC.encode(lc, sLC);

	m_modem->writeDMRShortLC(sLC);
}

bool CDMRSlot::openFile()
{
	if (m_fp != NULL)
		return true;

	time_t t;
	::time(&t);

	struct tm* tm = ::localtime(&t);

	char name[100U];
	::sprintf(name, "DMR_%u_%04d%02d%02d_%02d%02d%02d.ambe", m_slotNo, tm->tm_year + 1900, tm->tm_mon + 1, tm->tm_mday, tm->tm_hour, tm->tm_min, tm->tm_sec);

	m_fp = ::fopen(name, "wb");
	if (m_fp == NULL)
		return false;

	::fwrite("DMR", 1U, 3U, m_fp);

	return true;
}

bool CDMRSlot::writeFile(const unsigned char* data)
{
	if (m_fp == NULL)
		return false;

	::fwrite(data, 1U, DMR_FRAME_LENGTH_BYTES + 2U, m_fp);

	return true;
}

void CDMRSlot::closeFile()
{
	if (m_fp != NULL) {
		::fclose(m_fp);
		m_fp = NULL;
	}
}

bool CDMRSlot::insertSilence(const unsigned char* data, unsigned char seqNo)
{
	assert(data != NULL);

	// Do not send duplicate
	if (seqNo == m_netN)
		return false;

	// Check to see if we have any spaces to fill?
	unsigned char seq = (m_netN + 1U) % 6U;

	if (seq == seqNo) {
		// Just copy the data, nothing else to do here
		::memcpy(m_lastFrame, data, DMR_FRAME_LENGTH_BYTES + 2U);
		m_lastFrameValid = true;
		return true;
	}

	unsigned int count = (seqNo - seq + 6U) % 6U;

	insertSilence(count);

	::memcpy(m_lastFrame, data, DMR_FRAME_LENGTH_BYTES + 2U);
	m_lastFrameValid = true;

	return true;
}

void CDMRSlot::insertSilence(unsigned int count)
{
	unsigned char data[DMR_FRAME_LENGTH_BYTES + 2U];

	if (m_lastFrameValid) {
		::memcpy(data, m_lastFrame, 2U);                                        // The control data
		::memcpy(data + 2U, m_lastFrame + 24U + 2U, 9U);        // Copy the last audio block to the first
		::memcpy(data + 24U + 2U, data + 2U, 9U);                       // Copy the last audio block to the last
		::memcpy(data + 9U + 2U, data + 2U, 5U);                        // Copy the last audio block to the middle (1/2)
		::memcpy(data + 19U + 2U, data + 4U + 2U, 5U);          // Copy the last audio block to the middle (2/2)
	} else {
		// Not sure what to do if this isn't AMBE audio
		::memcpy(data, DMR_SILENCE_DATA, DMR_FRAME_LENGTH_BYTES + 2U);
	}

	unsigned char n = (m_netN + 1U) % 6U;

	unsigned char fid = m_netLC->getFID();

	CDMREMB emb;
	emb.setColorCode(m_colorCode);

	for (unsigned int i = 0U; i < count; i++) {
		// Only use our silence frame if its AMBE audio data
		if (fid == FID_ETSI || fid == FID_DMRA) {
			if (i > 0U) {
				::memcpy(data, DMR_SILENCE_DATA, DMR_FRAME_LENGTH_BYTES + 2U);
				m_lastFrameValid = false;
			}
		}

		if (n == 0U) {
			CSync::addDMRAudioSync(data + 2U, m_duplex);
		} else {
			unsigned char lcss = m_netEmbeddedLC.getData(data + 2U, n);
			emb.setLCSS(lcss);
			emb.getData(data + 2U);
		}

		writeQueueNet(data);

		m_netN = n;

		m_netFrames++;
		m_netLost++;

		n = (n + 1U) % 6U;
	}
}