//  Copyright © 2015 Jean-Luc Deltombe (LX3JL). All rights reserved.

// urfd -- The universal reflector
// Copyright © 2021 Thomas A. Early N7TAE
//
// 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 <https://www.gnu.org/licenses/>.

#include "Main.h"
#include <string.h>
#include "CodecStream.h"
#include "DVFramePacket.h"
#include "Reflector.h"

////////////////////////////////////////////////////////////////////////////////////////
// constructor

CCodecStream::CCodecStream(CPacketStream *PacketStream, uint16_t streamid, ECodecType type, std::shared_ptr<CUnixDgramReader> reader)
{
	keep_running = true;
	m_uiStreamId = streamid;
	m_uiPid = 0;
	m_eCodecIn = type;
	m_fPingMin = -1;
	m_fPingMax = -1;
	m_fPingSum = 0;
	m_fPingCount = 0;
	m_uiTotalPackets = 0;
	m_uiTimeoutPackets = 0;
	m_PacketStream = PacketStream;
	m_TCReader = reader;
	InitCodecStream();
}

////////////////////////////////////////////////////////////////////////////////////////
// destructor

CCodecStream::~CCodecStream()
{
	// close socket
	m_TCReader->Close();

	// kill threads
	keep_running = false;
	if ( m_Future.valid() )
	{
		m_Future.get();
	}

	// display stats
	if (m_fPingMin >= 0.0)
	{
		double min = m_fPingMin * 1000.0;
		double max = m_fPingMax * 1000.0;
		double ave = (m_fPingCount > 0) ? m_fPingSum / m_fPingCount * 1000.0 : 0.0;
		auto prec = std::cout.precision();
		std::cout.precision(1);
		std::cout << "Transcoder Stats (ms): " << min << "/" << ave << "/" << max << std::endl;
		std::cout.precision(prec);
	}
	if (m_uiTimeoutPackets)
	{
		std::cout << m_uiTimeoutPackets << " of " << m_uiTotalPackets << " packets timed out" << std::endl;
	}
}

////////////////////////////////////////////////////////////////////////////////////////
// initialization

void CCodecStream::InitCodecStream(void)
{
	m_TCWriter.SetUp(REF2TC);
	keep_running = true;
	m_Future = std::async(std::launch::async, &CCodecStream::Thread, this);
}

////////////////////////////////////////////////////////////////////////////////////////
// get

bool CCodecStream::IsEmpty(void) const
{
	return (m_LocalQueue.empty() && m_PacketStream->empty());
}

////////////////////////////////////////////////////////////////////////////////////////
// thread

void CCodecStream::Thread()
{
	while (keep_running)
	{
		Task();
	}
}

void CCodecStream::Task(void)
{
	STCPacket pack;

	// any packet from transcoder
	if (m_TCReader->Receive(&pack, 5))
	{
#ifdef DEBUG
		std::cout << "Got a packet from the Transcoder for module '" << pack.module << "'" << std::endl;
#endif
		// tickle
		m_TimeoutTimer.start();

		// update statistics
		double ping = m_StatsTimer.time();
		if ( m_fPingMin == -1 )
		{
			m_fPingMin = ping;
			m_fPingMax = ping;

		}
		else
		{
			m_fPingMin = MIN(m_fPingMin, ping);
			m_fPingMax = MAX(m_fPingMax, ping);

		}
		m_fPingSum += ping;
		m_fPingCount += 1;

		if ( m_LocalQueue.empty() )
		{
			std::cout << "Unexpected transcoded packet received from transcoder" << std::endl;
		}
		else
		{
			// pop the original packet
			auto Packet = m_LocalQueue.pop();
			auto Frame = (CDvFramePacket *)Packet.get();
			// todo: check the PID
			// update content with transcoded data
			Frame->SetCodecData(&pack);
			// mark the DStar sync frames if the source isn't dstar
			if (ECodecType::dstar!=Frame->GetCodecIn() && 0==Frame->GetPacketId()%21)
			{
				const uint8_t DStarSync[] = { 0x55,0x2D,0x16 };
				Frame->SetDvData(DStarSync);
			}

			// and push it back to client
			m_PacketStream->Lock();
			m_PacketStream->push(Packet);
			m_PacketStream->Unlock();
		}
	}

	// anything in our queue
	while ( !empty() )
	{
		// yes, pop it from queue
		auto Packet = pop();

		// we need a CDvFramePacket pointer to access Frame stuff
		auto Frame = (CDvFramePacket *)Packet.get();

		// update important stuff in Frame->m_TCPack for the transcoder
		Frame->SetTCParams();

		// now send to transcoder
		// this assume that thread pushing the Packet
		// have verified that the CodecStream is connected
		// and that the packet needs transcoding
		m_StatsTimer.start();
		m_uiTotalPackets++;
		m_TCWriter.Send(Frame->GetCodecPacket());
#ifdef DEBUG
		std::cout << "Sent a packet to the transcoder from module '" << Frame->GetCodecPacket()->module << "'" << std::endl;
#endif

		// and push to our local queue
		m_LocalQueue.push(Packet);
	}

	// handle timeout
	if ( !m_LocalQueue.empty() && (m_TimeoutTimer.time() >= (TRANSCODER_AMBEPACKET_TIMEOUT/1000.0f)) )
	{
		//std::cout << "transcoder packet timeout" << std::endl;
		m_uiTimeoutPackets++;
	}
}