/*
*   Copyright (C) 2017 by 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; either version 2 of the License, or
*   (at your option) any later version.
*
*   This program is distributed in the hope that it will be useful,
*   but WITHOUT ANY WARRANTY; without even the implied warranty of
*   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
*   GNU General Public License for more details.
*
*   You should have received a copy of the GNU General Public License
*   along with this program; if not, write to the Free Software
*   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

#include "Rewrite.h"

#include "DMRDefines.h"
#include "DMRFullLC.h"

#include <cstdio>
#include <cassert>

CRewrite::CRewrite(unsigned int fromSlot, unsigned int fromTG, unsigned int toSlot, unsigned int toTG) :
m_fromSlot(fromSlot),
m_fromTG(fromTG),
m_toSlot(toSlot),
m_toTG(toTG),
m_lc(NULL),
m_embeddedLC()
{
	assert(fromSlot == 1U || fromSlot == 2U);
	assert(fromTG < 16U);
	assert(toSlot == 1U || toSlot == 2U);
	assert(toTG < 16U);
}

CRewrite::~CRewrite()
{
}

bool CRewrite::process(CDMRData& data)
{
	FLCO flco = data.getFLCO();
	unsigned int dstId = data.getDstId();
	unsigned int slotNo = data.getSlotNo();

	if (flco != FLCO_GROUP || slotNo != m_fromSlot || dstId != m_fromTG)
		return false;

	if (m_fromSlot != m_toSlot)
		data.setSlotNo(m_toSlot);

	if (m_fromTG != m_toTG) {
		data.setDstId(m_toTG);

		unsigned char dataType = data.getDataType();

		switch (dataType) {
		case DT_VOICE_LC_HEADER:
		case DT_TERMINATOR_WITH_LC:
			processHeader(data, dataType);
			break;
		case DT_VOICE:
			processVoice(data);
			break;
		case DT_VOICE_SYNC:
			// Nothing to do
			break;
		default:
			// Not sure what to do
			break;
		}
	}

	return true;
}

void CRewrite::processHeader(CDMRData& data, unsigned char dataType)
{
	unsigned char buffer[DMR_FRAME_LENGTH_BYTES];
	data.getData(buffer);

	delete m_lc;
	m_lc = NULL;

	CDMRFullLC fullLC;
	m_lc = fullLC.decode(buffer, dataType);
	if (m_lc == NULL)
		return;

	m_lc->setDstId(m_toTG);

	m_embeddedLC.setLC(*m_lc);

	fullLC.encode(*m_lc, buffer, dataType);

	data.setData(buffer);
}

void CRewrite::processVoice(CDMRData& data)
{
	if (m_lc == NULL) {
		m_lc = new CDMRLC(FLCO_GROUP, data.getSrcId(), m_toTG);
		m_embeddedLC.setLC(*m_lc);
	}

	unsigned char buffer[DMR_FRAME_LENGTH_BYTES];
	data.getData(buffer);

	unsigned char n = data.getN();
	m_embeddedLC.getData(buffer, n);

	data.setData(buffer);
}