You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
urfd/reflector/DMRMMDVMProtocol.cpp

1200 lines
35 KiB

// 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 <string.h>
#include "Global.h"
#include "DMRMMDVMClient.h"
#include "DMRMMDVMProtocol.h"
#include "BPTC19696.h"
#include "RS129.h"
#include "Golay2087.h"
#include "QR1676.h"
////////////////////////////////////////////////////////////////////////////////////////
// define
#define CMD_NONE 0
#define CMD_LINK 1
#define CMD_UNLINK 2
////////////////////////////////////////////////////////////////////////////////////////
// constants
static uint8_t g_DmrSyncBSVoice[] = { 0x07,0x55,0xFD,0x7D,0xF7,0x5F,0x70 };
static uint8_t g_DmrSyncBSData[] = { 0x0D,0xFF,0x57,0xD7,0x5D,0xF5,0xD0 };
static uint8_t g_DmrSyncMSVoice[] = { 0x07,0xF7,0xD5,0xDD,0x57,0xDF,0xD0 };
static uint8_t g_DmrSyncMSData[] = { 0x0D,0x5D,0x7F,0x77,0xFD,0x75,0x70 };
////////////////////////////////////////////////////////////////////////////////////////
// operation
bool CDmrmmdvmProtocol::Initialize(const char *type, const EProtocol ptype, const uint16_t port, const bool has_ipv4, const bool has_ipv6)
{
m_DefaultId = g_Configure.GetUnsigned(g_Keys.mmdvm.defaultid);
// base class
if (! CProtocol::Initialize(type, ptype, port, has_ipv4, has_ipv6))
return false;
// update time
m_LastKeepaliveTime.start();
// random number generator
time_t t;
::srand((unsigned) time(&t));
m_uiAuthSeed = (uint32_t)rand();
// done
return true;
}
////////////////////////////////////////////////////////////////////////////////////////
// task
void CDmrmmdvmProtocol::Task(void)
{
CBuffer Buffer;
CIp Ip;
CCallsign Callsign;
int iRssi;
uint8_t Cmd;
uint8_t CallType;
std::unique_ptr<CDvHeaderPacket> Header;
std::unique_ptr<CDvFramePacket> LastFrame;
std::array<std::unique_ptr<CDvFramePacket>, 3> Frames;
// handle incoming packets
#if DMR_IPV6==true
#if DMR_IPV4==true
if ( ReceiveDS(Buffer, Ip, 20) )
#else
if ( Receive6(Buffer, Ip, 20) )
#endif
#else
if ( Receive4(Buffer, Ip, 20) )
#endif
{
//Buffer.DebugDump(g_Reflector.m_DebugFile);
// crack the packet
if ( IsValidDvFramePacket(Ip, Buffer, Header, Frames) )
{
for ( int i = 0; i < 3; i++ )
{
OnDvFramePacketIn(Frames.at(i), &Ip);
}
}
else if ( IsValidDvHeaderPacket(Buffer, Header, &Cmd, &CallType) )
{
// callsign muted?
if ( g_GateKeeper.MayTransmit(Header->GetMyCallsign(), Ip, EProtocol::dmrmmdvm) )
{
// handle it
OnDvHeaderPacketIn(Header, Ip, Cmd, CallType);
}
}
else if ( IsValidDvLastFramePacket(Buffer, LastFrame) )
{
OnDvFramePacketIn(LastFrame, &Ip);
}
else if ( IsValidConnectPacket(Buffer, &Callsign, Ip) )
{
std::cout << "DMRmmdvm connect packet from " << Callsign << " at " << Ip << std::endl;
// callsign authorized?
if ( g_GateKeeper.MayLink(Callsign, Ip, EProtocol::dmrmmdvm) )
{
// acknowledge the request
EncodeConnectAckPacket(&Buffer, Callsign, m_uiAuthSeed);
Send(Buffer, Ip);
}
else
{
// deny the request
EncodeNackPacket(&Buffer, Callsign);
Send(Buffer, Ip);
}
}
else if ( IsValidAuthenticationPacket(Buffer, &Callsign, Ip) )
{
std::cout << "DMRmmdvm authentication packet from " << Callsign << " at " << Ip << std::endl;
// callsign authorized?
if ( g_GateKeeper.MayLink(Callsign, Ip, EProtocol::dmrmmdvm) )
{
// acknowledge the request
EncodeAckPacket(&Buffer, Callsign);
Send(Buffer, Ip);
// add client if needed
CClients *clients = g_Reflector.GetClients();
std::shared_ptr<CClient>client = clients->FindClient(Callsign, Ip, EProtocol::dmrmmdvm);
// client already connected ?
if ( client == nullptr )
{
std::cout << "DMRmmdvm login from " << Callsign << " at " << Ip << std::endl;
// create the client and append
clients->AddClient(std::make_shared<CDmrmmdvmClient>(Callsign, Ip));
}
else
{
client->Alive();
}
// and done
g_Reflector.ReleaseClients();
}
else
{
// deny the request
EncodeNackPacket(&Buffer, Callsign);
Send(Buffer, Ip);
}
}
else if ( IsValidDisconnectPacket(Buffer, &Callsign) )
{
std::cout << "DMRmmdvm disconnect packet from " << Callsign << " at " << Ip << std::endl;
// find client & remove it
CClients *clients = g_Reflector.GetClients();
std::shared_ptr<CClient>client = clients->FindClient(Ip, EProtocol::dmrmmdvm);
if ( client != nullptr )
{
clients->RemoveClient(client);
}
g_Reflector.ReleaseClients();
}
else if ( IsValidConfigPacket(Buffer, &Callsign, Ip) )
{
std::cout << "DMRmmdvm configuration packet from " << Callsign << " at " << Ip << std::endl;
// acknowledge the request
EncodeAckPacket(&Buffer, Callsign);
Send(Buffer, Ip);
}
else if ( IsValidKeepAlivePacket(Buffer, &Callsign) )
{
//std::cout << "DMRmmdvm keepalive packet from " << Callsign << " at " << Ip << std::endl;
// find all clients with that callsign & ip and keep them alive
CClients *clients = g_Reflector.GetClients();
auto it = clients->begin();
std::shared_ptr<CClient>client = nullptr;
while ( (client = clients->FindNextClient(Callsign, Ip, EProtocol::dmrmmdvm, it)) != nullptr )
{
// acknowledge
EncodeKeepAlivePacket(&Buffer, client);
Send(Buffer, Ip);
// and mark as alive
client->Alive();
}
g_Reflector.ReleaseClients();
}
else if ( IsValidRssiPacket(Buffer, &Callsign, &iRssi) )
{
// std::cout << "DMRmmdvm RSSI packet from " << Callsign << " at " << Ip << std::endl
// ignore...
}
else if ( IsValidOptionPacket(Buffer, &Callsign) )
{
std::cout << "DMRmmdvm options packet from " << Callsign << " at " << Ip << std::endl;
// acknowledge the request
EncodeAckPacket(&Buffer, Callsign);
Send(Buffer, Ip);
}
else if ( Buffer.size() != 55 )
{
std::string title("Unknown DMRMMDVM packet from ");
title += Ip.GetAddress();
}
}
// handle end of streaming timeout
CheckStreamsTimeout();
// handle queue from reflector
HandleQueue();
// keep client alive
if ( m_LastKeepaliveTime.time() > DMRMMDVM_KEEPALIVE_PERIOD )
{
//
HandleKeepalives();
// update time
m_LastKeepaliveTime.start();
}
}
////////////////////////////////////////////////////////////////////////////////////////
// streams helpers
void CDmrmmdvmProtocol::OnDvHeaderPacketIn(std::unique_ptr<CDvHeaderPacket> &Header, const CIp &Ip, uint8_t cmd, uint8_t CallType)
{
bool lastheard = false;
// find the stream
auto stream = GetStream(Header->GetStreamId());
if ( stream )
{
// stream already open
// skip packet, but tickle the stream
stream->Tickle();
}
else
{
CCallsign my(Header->GetMyCallsign());
CCallsign rpt1(Header->GetRpt1Callsign());
CCallsign rpt2(Header->GetRpt2Callsign());
// no stream open yet, open a new one
// firstfind this client
std::shared_ptr<CClient>client = g_Reflector.GetClients()->FindClient(Ip, EProtocol::dmrmmdvm);
if ( client )
{
// process cmd if any
if ( !client->HasReflectorModule() )
{
// not linked yet
if ( cmd == CMD_LINK )
{
if ( g_Reflector.IsValidModule(rpt2.GetCSModule()) )
{
std::cout << "DMRmmdvm client " << client->GetCallsign() << " linking on module " << rpt2.GetCSModule() << std::endl;
// link
client->SetReflectorModule(rpt2.GetCSModule());
}
else
{
std::cout << "DMRMMDVM node " << rpt1 << " link attempt on non-existing module" << std::endl;
}
}
}
else
{
// already linked
if ( cmd == CMD_UNLINK )
{
std::cout << "DMRmmdvm client " << client->GetCallsign() << " unlinking" << std::endl;
// unlink
client->SetReflectorModule(' ');
}
else
{
// replace rpt2 module with currently linked module
auto m = client->GetReflectorModule();
Header->SetRpt2Module(m);
rpt2.SetCSModule(m);
}
}
// and now, re-check module is valid && that it's not a private call
if ( g_Reflector.IsValidModule(rpt2.GetCSModule()) && (CallType == DMR_GROUP_CALL) )
{
// yes, try to open the stream
if ( (stream = g_Reflector.OpenStream(Header, client)) != nullptr )
{
// keep the handle
m_Streams[stream->GetStreamId()] = stream;
lastheard = true;
}
}
}
else
{
lastheard = true;
}
// release
g_Reflector.ReleaseClients();
// update last heard
if ( lastheard )
{
g_Reflector.GetUsers()->Hearing(my, rpt1, rpt2);
g_Reflector.ReleaseUsers();
}
}
}
////////////////////////////////////////////////////////////////////////////////////////
// queue helper
void CDmrmmdvmProtocol::HandleQueue(void)
{
while (! m_Queue.IsEmpty())
{
// get the packet
auto packet = m_Queue.Pop();
// get our sender's id
const auto mod = packet->GetPacketModule();
// encode
CBuffer buffer;
// check if it's header
if ( packet->IsDvHeader() )
{
// update local stream cache
// this relies on queue feeder setting valid module id
m_StreamsCache[mod].m_dvHeader = CDvHeaderPacket((const CDvHeaderPacket &)*packet.get());
m_StreamsCache[mod].m_uiSeqId = 0;
// encode it
EncodeMMDVMHeaderPacket((CDvHeaderPacket &)*packet.get(), m_StreamsCache[mod].m_uiSeqId, &buffer);
m_StreamsCache[mod].m_uiSeqId = 1;
}
// check if it's a last frame
else if ( packet->IsLastPacket() )
{
// encode it
EncodeLastMMDVMPacket(m_StreamsCache[mod].m_dvHeader, m_StreamsCache[mod].m_uiSeqId, &buffer);
m_StreamsCache[mod].m_uiSeqId = (m_StreamsCache[mod].m_uiSeqId + 1) & 0xFF;
}
// otherwise, just a regular DV frame
else
{
// update local stream cache or send triplet when needed
switch ( packet->GetDmrPacketSubid() )
{
case 1:
m_StreamsCache[mod].m_dvFrame0 = CDvFramePacket((const CDvFramePacket &)*packet.get());
break;
case 2:
m_StreamsCache[mod].m_dvFrame1 = CDvFramePacket((const CDvFramePacket &)*packet.get());
break;
case 3:
EncodeMMDVMPacket(m_StreamsCache[mod].m_dvHeader, m_StreamsCache[mod].m_dvFrame0, m_StreamsCache[mod].m_dvFrame1, (const CDvFramePacket &)*packet.get(), m_StreamsCache[mod].m_uiSeqId, &buffer);
m_StreamsCache[mod].m_uiSeqId = (m_StreamsCache[mod].m_uiSeqId + 1) & 0xFF;
break;
default:
break;
}
}
// send it
if ( buffer.size() > 0 )
{
// and push it to all our clients linked to the module and who are not streaming in
CClients *clients = g_Reflector.GetClients();
auto it = clients->begin();
std::shared_ptr<CClient>client = nullptr;
while ( (client = clients->FindNextClient(EProtocol::dmrmmdvm, it)) != nullptr )
{
// is this client busy ?
if ( !client->IsAMaster() && (client->GetReflectorModule() == packet->GetPacketModule()) )
{
// no, send the packet
Send(buffer, client->GetIp());
}
}
g_Reflector.ReleaseClients();
}
}
}
////////////////////////////////////////////////////////////////////////////////////////
// keepalive helpers
void CDmrmmdvmProtocol::HandleKeepalives(void)
{
// DMRhomebrew protocol keepalive request is client tasks
// here, just check that all clients are still alive
// and disconnect them if not
// iterate on clients
CClients *clients = g_Reflector.GetClients();
auto it = clients->begin();
std::shared_ptr<CClient>client = nullptr;
while ( (client = clients->FindNextClient(EProtocol::dmrmmdvm, it)) != nullptr )
{
// is this client busy ?
if ( client->IsAMaster() )
{
// yes, just tickle it
client->Alive();
}
// check it's still with us
else if ( !client->IsAlive() )
{
// no, disconnect
CBuffer disconnect;
Send(disconnect, client->GetIp());
// remove it
std::cout << "DMRmmdvm client " << client->GetCallsign() << " keepalive timeout" << std::endl;
clients->RemoveClient(client);
}
}
g_Reflector.ReleaseClients();
}
////////////////////////////////////////////////////////////////////////////////////////
// packet decoding helpers
bool CDmrmmdvmProtocol::IsValidKeepAlivePacket(const CBuffer &Buffer, CCallsign *callsign)
{
uint8_t tag[] = { 'R','P','T','P','I','N','G' };
bool valid = false;
if ( (Buffer.size() == 11) && (Buffer.Compare(tag, sizeof(tag)) == 0) )
{
uint32_t uiRptrId = MAKEDWORD(MAKEWORD(Buffer.data()[10],Buffer.data()[9]),MAKEWORD(Buffer.data()[8],Buffer.data()[7]));
callsign->SetDmrid(uiRptrId, true);
callsign->SetCSModule(MMDVM_MODULE_ID);
valid = callsign->IsValid();
}
return valid;
}
bool CDmrmmdvmProtocol::IsValidConnectPacket(const CBuffer &Buffer, CCallsign *callsign, const CIp &Ip)
{
uint8_t tag[] = { 'R','P','T','L' };
bool valid = false;
if ( (Buffer.size() == 8) && (Buffer.Compare(tag, sizeof(tag)) == 0) )
{
uint32_t uiRptrId = MAKEDWORD(MAKEWORD(Buffer.data()[7],Buffer.data()[6]),MAKEWORD(Buffer.data()[5],Buffer.data()[4]));
callsign->SetDmrid(uiRptrId, true);
callsign->SetCSModule(MMDVM_MODULE_ID);
valid = callsign->IsValid();
if ( !valid)
{
std::cout << "Invalid callsign in DMRmmdvm RPTL packet from IP: " << Ip << " CS:" << *callsign << " DMRID:" << callsign->GetDmrid() << std::endl;
}
}
return valid;
}
bool CDmrmmdvmProtocol::IsValidAuthenticationPacket(const CBuffer &Buffer, CCallsign *callsign, const CIp &Ip)
{
uint8_t tag[] = { 'R','P','T','K' };
bool valid = false;
if ( (Buffer.size() == 40) && (Buffer.Compare(tag, sizeof(tag)) == 0) )
{
uint32_t uiRptrId = MAKEDWORD(MAKEWORD(Buffer.data()[7],Buffer.data()[6]),MAKEWORD(Buffer.data()[5],Buffer.data()[4]));
callsign->SetDmrid(uiRptrId, true);
callsign->SetCSModule(MMDVM_MODULE_ID);
valid = callsign->IsValid();
if ( !valid)
{
std::cout << "Invalid callsign in DMRmmdvm RPTK packet from IP: " << Ip << " CS:" << *callsign << " DMRID:" << callsign->GetDmrid() << std::endl;
}
}
return valid;
}
bool CDmrmmdvmProtocol::IsValidDisconnectPacket(const CBuffer &Buffer, CCallsign *callsign)
{
uint8_t tag[] = { 'R','P','T','C','L' };
bool valid = false;
if ( (Buffer.size() == 13) && (Buffer.Compare(tag, sizeof(tag)) == 0) )
{
uint32_t uiRptrId = MAKEDWORD(MAKEWORD(Buffer.data()[7],Buffer.data()[6]),MAKEWORD(Buffer.data()[5],Buffer.data()[4]));
callsign->SetDmrid(uiRptrId, true);
callsign->SetCSModule(MMDVM_MODULE_ID);
valid = callsign->IsValid();
}
return valid;
}
bool CDmrmmdvmProtocol::IsValidConfigPacket(const CBuffer &Buffer, CCallsign *callsign, const CIp &Ip)
{
uint8_t tag[] = { 'R','P','T','C' };
bool valid = false;
if ( (Buffer.size() == 302) && (Buffer.Compare(tag, sizeof(tag)) == 0) )
{
uint32_t uiRptrId = MAKEDWORD(MAKEWORD(Buffer.data()[7],Buffer.data()[6]),MAKEWORD(Buffer.data()[5],Buffer.data()[4]));
callsign->SetDmrid(uiRptrId, true);
callsign->SetCSModule(MMDVM_MODULE_ID);
valid = callsign->IsValid();
if ( !valid)
{
std::cout << "Invalid callsign in DMRmmdvm RPTC packet from IP: " << Ip << " CS:" << *callsign << " DMRID:" << callsign->GetDmrid() << std::endl;
}
}
return valid;
}
bool CDmrmmdvmProtocol::IsValidOptionPacket(const CBuffer &Buffer, CCallsign *callsign)
{
uint8_t tag[] = { 'R','P','T','O' };
bool valid = false;
if ( (Buffer.size() >= 8) && (Buffer.Compare(tag, sizeof(tag)) == 0) )
{
uint32_t uiRptrId = MAKEDWORD(MAKEWORD(Buffer.data()[7],Buffer.data()[6]),MAKEWORD(Buffer.data()[5],Buffer.data()[4]));
callsign->SetDmrid(uiRptrId, true);
callsign->SetCSModule(MMDVM_MODULE_ID);
valid = callsign->IsValid();
}
return valid;
}
bool CDmrmmdvmProtocol::IsValidRssiPacket(const CBuffer &Buffer, CCallsign *callsign, int *rssi)
{
uint8_t tag[] = { 'R','P','T','I','N','T','R' };
bool valid = false;
if ( (Buffer.size() == 17) && (Buffer.Compare(tag, sizeof(tag)) == 0) )
{
// ignore rest of it, as not used
// dmrid is asci hex on 8 bytes
// rssi is ascii :x-xx
valid = true;
}
return valid;
}
bool CDmrmmdvmProtocol::IsValidDvHeaderPacket(const CBuffer &Buffer, std::unique_ptr<CDvHeaderPacket> &header, uint8_t *cmd, uint8_t *CallType)
{
uint8_t tag[] = { 'D','M','R','D' };
*cmd = CMD_NONE;
if ( (Buffer.size() == 55) && (Buffer.Compare(tag, sizeof(tag)) == 0) )
{
// frame details
uint8_t uiFrameType = (Buffer.data()[15] & 0x30) >> 4;
uint8_t uiSlot = (Buffer.data()[15] & 0x80) ? DMR_SLOT2 : DMR_SLOT1;
uint8_t uiCallType = (Buffer.data()[15] & 0x40) ? DMR_PRIVATE_CALL : DMR_GROUP_CALL;
uint8_t uiSlotType = Buffer.data()[15] & 0x0F;
//std::cout << (int)uiSlot << std::endl;
if ( (uiFrameType == DMRMMDVM_FRAMETYPE_DATASYNC) &&
(uiSlot == DMRMMDVM_REFLECTOR_SLOT) &&
(uiSlotType == MMDVM_SLOTTYPE_HEADER) )
{
// extract sync
uint8_t dmrsync[7];
dmrsync[0] = Buffer.data()[33] & 0x0F;
memcpy(&dmrsync[1], &Buffer.data()[34], 5);
dmrsync[6] = Buffer.data()[39] & 0xF0;
// and check
if ( (memcmp(dmrsync, g_DmrSyncMSData, sizeof(dmrsync)) == 0) ||
(memcmp(dmrsync, g_DmrSyncBSData, sizeof(dmrsync)) == 0))
{
// get payload
//CBPTC19696 bptc;
//uint8_t lcdata[12];
//bptc.decode(&(Buffer.data()[20]), lcdata);
// crack DMR header
//uint8_t uiSeqId = Buffer.data()[4];
uint32_t uiSrcId = MAKEDWORD(MAKEWORD(Buffer.data()[7],Buffer.data()[6]),MAKEWORD(Buffer.data()[5],0));
uint32_t uiDstId = MAKEDWORD(MAKEWORD(Buffer.data()[10],Buffer.data()[9]),MAKEWORD(Buffer.data()[8],0));
uint32_t uiRptrId = MAKEDWORD(MAKEWORD(Buffer.data()[14],Buffer.data()[13]),MAKEWORD(Buffer.data()[12],Buffer.data()[11]));
//uint8_t uiVoiceSeq = (Buffer.data()[15] & 0x0F);
uint32_t uiStreamId = *(uint32_t *)(&Buffer.data()[16]);
// call type
*CallType = uiCallType;
// link/unlink command ?
if ( uiDstId == 4000 )
{
*cmd = CMD_UNLINK;
}
else if ( DmrDstIdToModule(uiDstId) != ' ' )
{
*cmd = CMD_LINK;
}
else
{
*cmd = CMD_NONE;
}
// build DVHeader
CCallsign csMY = CCallsign("", uiSrcId);
CCallsign rpt1 = CCallsign("", uiRptrId);
rpt1.SetCSModule(MMDVM_MODULE_ID);
CCallsign rpt2 = m_ReflectorCallsign;
rpt2.SetCSModule(DmrDstIdToModule(uiDstId));
// and packet
header = std::unique_ptr<CDvHeaderPacket>(new CDvHeaderPacket(uiSrcId, CCallsign("CQCQCQ"), rpt1, rpt2, uiStreamId, 0, 0));
if ( header && header->IsValid() )
return true;
}
}
}
return false;
}
bool CDmrmmdvmProtocol::IsValidDvFramePacket(const CIp &Ip, const CBuffer &Buffer, std::unique_ptr<CDvHeaderPacket> &header, std::array<std::unique_ptr<CDvFramePacket>, 3> &frames)
{
uint8_t tag[] = { 'D','M','R','D' };
if ( (Buffer.size() == 55) && (Buffer.Compare(tag, sizeof(tag)) == 0) )
{
// frame details
uint8_t uiFrameType = (Buffer.data()[15] & 0x30) >> 4;
uint8_t uiSlot = (Buffer.data()[15] & 0x80) ? DMR_SLOT2 : DMR_SLOT1;
uint8_t uiCallType = (Buffer.data()[15] & 0x40) ? DMR_PRIVATE_CALL : DMR_GROUP_CALL;
if ( ((uiFrameType == DMRMMDVM_FRAMETYPE_VOICE) || (uiFrameType == DMRMMDVM_FRAMETYPE_VOICESYNC)) &&
(uiSlot == DMRMMDVM_REFLECTOR_SLOT) && (uiCallType == DMR_GROUP_CALL) )
{
// crack DMR header
//uint8_t uiSeqId = Buffer.data()[4];
uint32_t uiSrcId = MAKEDWORD(MAKEWORD(Buffer.data()[7],Buffer.data()[6]),MAKEWORD(Buffer.data()[5],0));
uint32_t uiDstId = MAKEDWORD(MAKEWORD(Buffer.data()[10],Buffer.data()[9]),MAKEWORD(Buffer.data()[8],0));
uint32_t uiRptrId = MAKEDWORD(MAKEWORD(Buffer.data()[14],Buffer.data()[13]),MAKEWORD(Buffer.data()[12],Buffer.data()[11]));
uint8_t uiVoiceSeq = (Buffer.data()[15] & 0x0F);
uint32_t uiStreamId = *(uint32_t *)(&Buffer.data()[16]);
auto stream = GetStream(uiStreamId, &Ip);
if ( !stream )
{
std::cout << std::showbase << std::hex;
std::cout << "Late entry DMR voice frame, creating DMR header for DMR stream ID " << ntohl(uiStreamId) << std::noshowbase << std::dec << " on " << Ip << std::endl;
std::cout << std::noshowbase << std::dec;
uint8_t cmd;
// link/unlink command ?
if ( uiDstId == 4000 )
{
cmd = CMD_UNLINK;
}
else if ( DmrDstIdToModule(uiDstId) != ' ' )
{
cmd = CMD_LINK;
}
else
{
cmd = CMD_NONE;
}
// build DVHeader
CCallsign csMY = CCallsign("", uiSrcId);
CCallsign rpt1 = CCallsign("", uiRptrId);
rpt1.SetCSModule(MMDVM_MODULE_ID);
CCallsign rpt2 = m_ReflectorCallsign;
rpt2.SetCSModule(DmrDstIdToModule(uiDstId));
// and packet
header = std::unique_ptr<CDvHeaderPacket>(new CDvHeaderPacket(uiSrcId, CCallsign("CQCQCQ"), rpt1, rpt2, uiStreamId, 0, 0));
if ( g_GateKeeper.MayTransmit(header->GetMyCallsign(), Ip, EProtocol::dmrmmdvm) )
{
// handle it
OnDvHeaderPacketIn(header, Ip, cmd, uiCallType);
}
}
// crack payload
uint8_t dmrframe[33];
uint8_t dmr3ambe[27];
uint8_t dmrambe[9];
uint8_t dmrsync[7];
// get the 33 bytes ambe
memcpy(dmrframe, &(Buffer.data()[20]), 33);
// extract the 3 ambe frames
memcpy(dmr3ambe, dmrframe, 14);
dmr3ambe[13] &= 0xF0;
dmr3ambe[13] |= (dmrframe[19] & 0x0F);
memcpy(&dmr3ambe[14], &dmrframe[20], 13);
// extract sync
dmrsync[0] = dmrframe[13] & 0x0F;
memcpy(&dmrsync[1], &dmrframe[14], 5);
dmrsync[6] = dmrframe[19] & 0xF0;
// debug
//CBuffer dump;
//dump.Set(dmrsync, 6);
//dump.DebugDump(g_Reflector.m_DebugFile);
// and create 3 dv frames
// frame1
memcpy(dmrambe, &dmr3ambe[0], 9);
frames[0] = std::unique_ptr<CDvFramePacket>(new CDvFramePacket(dmrambe, dmrsync, uiStreamId, uiVoiceSeq, 1, false));
// frame2
memcpy(dmrambe, &dmr3ambe[9], 9);
frames[1] = std::unique_ptr<CDvFramePacket>(new CDvFramePacket(dmrambe, dmrsync, uiStreamId, uiVoiceSeq, 2, false));
// frame3
memcpy(dmrambe, &dmr3ambe[18], 9);
frames[2] = std::unique_ptr<CDvFramePacket>(new CDvFramePacket(dmrambe, dmrsync, uiStreamId, uiVoiceSeq, 3, false));
// check
if (frames[0] && frames[1] && frames[2])
return true;
}
}
return false;
}
bool CDmrmmdvmProtocol::IsValidDvLastFramePacket(const CBuffer &Buffer, std::unique_ptr<CDvFramePacket> &frame)
{
uint8_t tag[] = { 'D','M','R','D' };
if ( (Buffer.size() == 55) && (Buffer.Compare(tag, sizeof(tag)) == 0) )
{
// frame details
uint8_t uiFrameType = (Buffer.data()[15] & 0x30) >> 4;
uint8_t uiSlot = (Buffer.data()[15] & 0x80) ? DMR_SLOT2 : DMR_SLOT1;
//uint8_t uiCallType = (Buffer.data()[15] & 0x40) ? DMR_PRIVATE_CALL : DMR_GROUP_CALL;
uint8_t uiSlotType = Buffer.data()[15] & 0x0F;
//std::cout << (int)uiSlot << std::endl;
if ( (uiFrameType == DMRMMDVM_FRAMETYPE_DATASYNC) &&
(uiSlot == DMRMMDVM_REFLECTOR_SLOT) &&
(uiSlotType == MMDVM_SLOTTYPE_TERMINATOR) )
{
// extract sync
uint8_t dmrsync[7];
dmrsync[0] = Buffer.data()[33] & 0x0F;
memcpy(&dmrsync[1], &Buffer.data()[34], 5);
dmrsync[6] = Buffer.data()[39] & 0xF0;
// and check
if ( (memcmp(dmrsync, g_DmrSyncMSData, sizeof(dmrsync)) == 0) ||
(memcmp(dmrsync, g_DmrSyncBSData, sizeof(dmrsync)) == 0))
{
// get payload
//CBPTC19696 bptc;
//uint8_t lcdata[12];
//bptc.decode(&(Buffer.data()[20]), lcdata);
// crack DMR header
//uint8_t uiSeqId = Buffer.data()[4];
//uint32_t uiSrcId = MAKEDWORD(MAKEWORD(Buffer.data()[7],Buffer.data()[6]),MAKEWORD(Buffer.data()[5],0));
//uint32_t uiDstId = MAKEDWORD(MAKEWORD(Buffer.data()[10],Buffer.data()[9]),MAKEWORD(Buffer.data()[8],0));
//uint32_t uiRptrId = MAKEDWORD(MAKEWORD(Buffer.data()[14],Buffer.data()[13]),MAKEWORD(Buffer.data()[12],Buffer.data()[11]));
//uint8_t uiVoiceSeq = (Buffer.data()[15] & 0x0F);
uint32_t uiStreamId = *(uint32_t *)(&Buffer.data()[16]);
// dummy ambe
uint8_t ambe[9];
memset(ambe, 0, sizeof(ambe));
// and packet
frame = std::unique_ptr<CDvFramePacket>(new CDvFramePacket(ambe, dmrsync, uiStreamId, 0, 0, true));
if (frame)
return true;
}
}
}
return false;
}
////////////////////////////////////////////////////////////////////////////////////////
// packet encoding helpers
void CDmrmmdvmProtocol::EncodeKeepAlivePacket(CBuffer *Buffer, std::shared_ptr<CClient>Client)
{
uint8_t tag[] = { 'M','S','T','P','O','N','G' };
Buffer->Set(tag, sizeof(tag));
uint32_t uiDmrId = Client->GetCallsign().GetDmrid();
Buffer->Append((uint8_t *)&uiDmrId, 4);
}
void CDmrmmdvmProtocol::EncodeAckPacket(CBuffer *Buffer, const CCallsign &Callsign)
{
uint8_t tag[] = { 'R','P','T','A','C','K' };
Buffer->Set(tag, sizeof(tag));
}
void CDmrmmdvmProtocol::EncodeConnectAckPacket(CBuffer *Buffer, const CCallsign &Callsign, uint32_t AuthSeed)
{
uint8_t tag[] = { 'R','P','T','A','C','K' };
Buffer->Set(tag, sizeof(tag));
Buffer->Append(AuthSeed);
}
void CDmrmmdvmProtocol::EncodeNackPacket(CBuffer *Buffer, const CCallsign &Callsign)
{
uint8_t tag[] = { 'M','S','T','N','A','K' };
Buffer->Set(tag, sizeof(tag));
}
void CDmrmmdvmProtocol::EncodeClosePacket(CBuffer *Buffer, std::shared_ptr<CClient>Client)
{
uint8_t tag[] = { 'M','S','T','C','L' };
Buffer->Set(tag, sizeof(tag));
}
bool CDmrmmdvmProtocol::EncodeMMDVMHeaderPacket(const CDvHeaderPacket &Packet, uint8_t seqid, CBuffer *Buffer) const
{
uint8_t tag[] = { 'D','M','R','D' };
Buffer->Set(tag, sizeof(tag));
// DMR header
// uiSeqId
Buffer->Append((uint8_t)seqid);
// uiSrcId
uint32_t uiSrcId = Packet.GetMyCallsign().GetDmrid();
AppendDmrIdToBuffer(Buffer, uiSrcId);
// uiDstId = TG9
uint32_t uiDstId = 9; // ModuleToDmrDestId(Packet.GetRpt2Module());
AppendDmrIdToBuffer(Buffer, uiDstId);
// uiRptrId
uint32_t uiRptrId = Packet.GetRpt1Callsign().GetDmrid();
AppendDmrRptrIdToBuffer(Buffer, uiRptrId);
// uiBitField
uint8_t uiBitField =
(DMRMMDVM_FRAMETYPE_DATASYNC << 4) |
((DMRMMDVM_REFLECTOR_SLOT == DMR_SLOT2) ? 0x80 : 0x00) |
MMDVM_SLOTTYPE_HEADER;
Buffer->Append((uint8_t)uiBitField);
// uiStreamId
uint32_t uiStreamId = Packet.GetStreamId();
Buffer->Append((uint32_t)uiStreamId);
// Payload
AppendVoiceLCToBuffer(Buffer, uiSrcId);
// BER
Buffer->Append((uint8_t)0);
// RSSI
Buffer->Append((uint8_t)0);
// done
return true;
}
void CDmrmmdvmProtocol::EncodeMMDVMPacket(const CDvHeaderPacket &Header, const CDvFramePacket &DvFrame0, const CDvFramePacket &DvFrame1, const CDvFramePacket &DvFrame2, uint8_t seqid, CBuffer *Buffer) const
{
uint8_t tag[] = { 'D','M','R','D' };
Buffer->Set(tag, sizeof(tag));
uint8_t cs[12];
// DMR header
// uiSeqId
Buffer->Append((uint8_t)seqid);
// uiSrcId
uint32_t uiSrcId = Header.GetMyCallsign().GetDmrid();
DvFrame0.GetMyCallsign().GetCallsign(cs);
if(uiSrcId == 0){
uiSrcId = DvFrame0.GetMyCallsign().GetDmrid();
}
if(uiSrcId == 0){
uiSrcId = DvFrame1.GetMyCallsign().GetDmrid();
}
if(uiSrcId == 0){
uiSrcId = DvFrame2.GetMyCallsign().GetDmrid();
}
if(uiSrcId == 0){
uiSrcId = m_DefaultId;
}
AppendDmrIdToBuffer(Buffer, uiSrcId);
// uiDstId = TG9
uint32_t uiDstId = 9; // ModuleToDmrDestId(Header.GetRpt2Module());
AppendDmrIdToBuffer(Buffer, uiDstId);
// uiRptrId
uint32_t uiRptrId = Header.GetRpt1Callsign().GetDmrid();
AppendDmrRptrIdToBuffer(Buffer, uiRptrId);
// uiBitField
uint8_t uiBitField =
((DMRMMDVM_REFLECTOR_SLOT == DMR_SLOT2) ? 0x80 : 0x00);
if ( DvFrame0.GetDmrPacketId() == 0 )
{
uiBitField |= (DMRMMDVM_FRAMETYPE_VOICESYNC << 4);
}
else
{
uiBitField |= (DMRMMDVM_FRAMETYPE_VOICE << 4);
}
uiBitField |= (DvFrame0.GetDmrPacketId() & 0x0F);
Buffer->Append((uint8_t)uiBitField);
// uiStreamId
uint32_t uiStreamId = Header.GetStreamId();
Buffer->Append((uint32_t)uiStreamId);
// Payload
// frame0
Buffer->ReplaceAt(20, DvFrame0.GetCodecData(ECodecType::dmr), 9);
// 1/2 frame1
Buffer->ReplaceAt(29, DvFrame1.GetCodecData(ECodecType::dmr), 5);
Buffer->ReplaceAt(33, (uint8_t)(Buffer->at(33) & 0xF0));
// 1/2 frame1
Buffer->ReplaceAt(39, DvFrame1.GetCodecData(ECodecType::dmr)+4, 5);
Buffer->ReplaceAt(39, (uint8_t)(Buffer->at(39) & 0x0F));
// frame2
Buffer->ReplaceAt(44, DvFrame2.GetCodecData(ECodecType::dmr), 9);
// sync or embedded signaling
ReplaceEMBInBuffer(Buffer, DvFrame0.GetDmrPacketId());
// debug
//CBuffer dump;
//dump.Set(&(Buffer->data()[33]), 7);
//dump.DebugDump(g_Reflector.m_DebugFile);
// BER
Buffer->Append((uint8_t)0);
// RSSI
Buffer->Append((uint8_t)0);
}
void CDmrmmdvmProtocol::EncodeLastMMDVMPacket(const CDvHeaderPacket &Packet, uint8_t seqid, CBuffer *Buffer) const
{
uint8_t tag[] = { 'D','M','R','D' };
Buffer->Set(tag, sizeof(tag));
// DMR header
// uiSeqId
Buffer->Append((uint8_t)seqid);
// uiSrcId
uint32_t uiSrcId = Packet.GetMyCallsign().GetDmrid();
AppendDmrIdToBuffer(Buffer, uiSrcId);
// uiDstId
uint32_t uiDstId = 9; //ModuleToDmrDestId(Packet.GetRpt2Module());
AppendDmrIdToBuffer(Buffer, uiDstId);
// uiRptrId
uint32_t uiRptrId = Packet.GetRpt1Callsign().GetDmrid();
AppendDmrRptrIdToBuffer(Buffer, uiRptrId);
// uiBitField
uint8_t uiBitField =
(DMRMMDVM_FRAMETYPE_DATASYNC << 4) |
((DMRMMDVM_REFLECTOR_SLOT == DMR_SLOT2) ? 0x80 : 0x00) |
MMDVM_SLOTTYPE_TERMINATOR;
Buffer->Append((uint8_t)uiBitField);
// uiStreamId
uint32_t uiStreamId = Packet.GetStreamId();
Buffer->Append((uint32_t)uiStreamId);
// Payload
AppendTerminatorLCToBuffer(Buffer, uiSrcId);
// BER
Buffer->Append((uint8_t)0);
// RSSI
Buffer->Append((uint8_t)0);
}
////////////////////////////////////////////////////////////////////////////////////////
// DestId to Module helper
char CDmrmmdvmProtocol::DmrDstIdToModule(uint32_t tg) const
{
// is it a 4xxx ?
if (tg > 4000 && tg < 4027)
{
const char mod = 'A' + (tg - 4001U);
if (g_Reflector.IsValidModule(mod))
{
return mod;
}
}
return ' ';
}
uint32_t CDmrmmdvmProtocol::ModuleToDmrDestId(char m) const
{
return (uint32_t)(m - 'A')+4001;
}
////////////////////////////////////////////////////////////////////////////////////////
// Buffer & LC helpers
void CDmrmmdvmProtocol::AppendVoiceLCToBuffer(CBuffer *buffer, uint32_t uiSrcId) const
{
uint8_t payload[33];
// fill payload
CBPTC19696 bptc;
memset(payload, 0, sizeof(payload));
// LC data
uint8_t lc[12];
{
memset(lc, 0, sizeof(lc));
// uiDstId = TG9
lc[5] = 9;
// uiSrcId
lc[6] = (uint8_t)LOBYTE(HIWORD(uiSrcId));
lc[7] = (uint8_t)HIBYTE(LOWORD(uiSrcId));
lc[8] = (uint8_t)LOBYTE(LOWORD(uiSrcId));
// parity
uint8_t parity[4];
CRS129::encode(lc, 9, parity);
lc[9] = parity[2] ^ DMR_VOICE_LC_HEADER_CRC_MASK;
lc[10] = parity[1] ^ DMR_VOICE_LC_HEADER_CRC_MASK;
lc[11] = parity[0] ^ DMR_VOICE_LC_HEADER_CRC_MASK;
}
// sync
memcpy(payload+13, g_DmrSyncBSData, sizeof(g_DmrSyncBSData));
// slot type
{
// slot type
uint8_t slottype[3];
memset(slottype, 0, sizeof(slottype));
slottype[0] = (DMRMMDVM_REFLECTOR_COLOUR << 4) & 0xF0;
slottype[0] |= (DMR_DT_VOICE_LC_HEADER << 0) & 0x0FU;
CGolay2087::encode(slottype);
payload[12U] = (payload[12U] & 0xC0U) | ((slottype[0U] >> 2) & 0x3FU);
payload[13U] = (payload[13U] & 0x0FU) | ((slottype[0U] << 6) & 0xC0U) | ((slottype[1U] >> 2) & 0x30U);
payload[19U] = (payload[19U] & 0xF0U) | ((slottype[1U] >> 2) & 0x0FU);
payload[20U] = (payload[20U] & 0x03U) | ((slottype[1U] << 6) & 0xC0U) | ((slottype[2U] >> 2) & 0x3CU);
}
// and encode
bptc.encode(lc, payload);
// and append
buffer->Append(payload, sizeof(payload));
}
void CDmrmmdvmProtocol::AppendTerminatorLCToBuffer(CBuffer *buffer, uint32_t uiSrcId) const
{
uint8_t payload[33];
// fill payload
CBPTC19696 bptc;
memset(payload, 0, sizeof(payload));
// LC data
uint8_t lc[12];
{
memset(lc, 0, sizeof(lc));
// uiDstId = TG9
lc[5] = 9;
// uiSrcId
lc[6] = (uint8_t)LOBYTE(HIWORD(uiSrcId));
lc[7] = (uint8_t)HIBYTE(LOWORD(uiSrcId));
lc[8] = (uint8_t)LOBYTE(LOWORD(uiSrcId));
// parity
uint8_t parity[4];
CRS129::encode(lc, 9, parity);
lc[9] = parity[2] ^ DMR_TERMINATOR_WITH_LC_CRC_MASK;
lc[10] = parity[1] ^ DMR_TERMINATOR_WITH_LC_CRC_MASK;
lc[11] = parity[0] ^ DMR_TERMINATOR_WITH_LC_CRC_MASK;
}
// sync
memcpy(payload+13, g_DmrSyncBSData, sizeof(g_DmrSyncBSData));
// slot type
{
// slot type
uint8_t slottype[3];
memset(slottype, 0, sizeof(slottype));
slottype[0] = (DMRMMDVM_REFLECTOR_COLOUR << 4) & 0xF0;
slottype[0] |= (DMR_DT_TERMINATOR_WITH_LC << 0) & 0x0FU;
CGolay2087::encode(slottype);
payload[12U] = (payload[12U] & 0xC0U) | ((slottype[0U] >> 2) & 0x3FU);
payload[13U] = (payload[13U] & 0x0FU) | ((slottype[0U] << 6) & 0xC0U) | ((slottype[1U] >> 2) & 0x30U);
payload[19U] = (payload[19U] & 0xF0U) | ((slottype[1U] >> 2) & 0x0FU);
payload[20U] = (payload[20U] & 0x03U) | ((slottype[1U] << 6) & 0xC0U) | ((slottype[2U] >> 2) & 0x3CU);
}
// and encode
bptc.encode(lc, payload);
// and append
buffer->Append(payload, sizeof(payload));
}
void CDmrmmdvmProtocol::ReplaceEMBInBuffer(CBuffer *buffer, uint8_t uiDmrPacketId) const
{
// voice packet A ?
if ( uiDmrPacketId == 0 )
{
// sync
buffer->ReplaceAt(33, (uint8_t)(buffer->at(33) | (g_DmrSyncBSVoice[0] & 0x0F)));
buffer->ReplaceAt(34, g_DmrSyncBSVoice+1, 5);
buffer->ReplaceAt(39, (uint8_t)(buffer->at(39) | (g_DmrSyncBSVoice[6] & 0xF0)));
}
// voice packet B,C,D,E ?
else if ( (uiDmrPacketId >= 1) && (uiDmrPacketId <= 4 ) )
{
// EMB LC
uint8_t emb[2];
emb[0] = (DMRMMDVM_REFLECTOR_COLOUR << 4) & 0xF0;
//emb[0] |= PI ? 0x08U : 0x00;
//emb[0] |= (LCSS << 1) & 0x06;
emb[1] = 0x00;
// encode
CQR1676::encode(emb);
// and append
buffer->ReplaceAt(33, (uint8_t)((buffer->at(33) & 0xF0) | ((emb[0U] >> 4) & 0x0F)));
buffer->ReplaceAt(34, (uint8_t)((buffer->at(34) & 0x0F) | ((emb[0U] << 4) & 0xF0)));
buffer->ReplaceAt(34, (uint8_t)(buffer->at(34) & 0xF0));
buffer->ReplaceAt(35, (uint8_t)0);
buffer->ReplaceAt(36, (uint8_t)0);
buffer->ReplaceAt(37, (uint8_t)0);
buffer->ReplaceAt(38, (uint8_t)(buffer->at(38) & 0x0F));
buffer->ReplaceAt(38, (uint8_t)((buffer->at(38) & 0xF0) | ((emb[1U] >> 4) & 0x0F)));
buffer->ReplaceAt(39, (uint8_t)((buffer->at(39) & 0x0F) | ((emb[1U] << 4) & 0xF0)));
}
// voice packet F
else
{
// nullptr
uint8_t emb[2];
emb[0] = (DMRMMDVM_REFLECTOR_COLOUR << 4) & 0xF0;
//emb[0] |= PI ? 0x08U : 0x00;
//emb[0] |= (LCSS << 1) & 0x06;
emb[1] = 0x00;
// encode
CQR1676::encode(emb);
// and append
buffer->ReplaceAt(33, (uint8_t)((buffer->at(33) & 0xF0) | ((emb[0U] >> 4) & 0x0F)));
buffer->ReplaceAt(34, (uint8_t)((buffer->at(34) & 0x0F) | ((emb[0U] << 4) & 0xF0)));
buffer->ReplaceAt(34, (uint8_t)(buffer->at(34) & 0xF0));
buffer->ReplaceAt(35, (uint8_t)0);
buffer->ReplaceAt(36, (uint8_t)0);
buffer->ReplaceAt(37, (uint8_t)0);
buffer->ReplaceAt(38, (uint8_t)(buffer->at(38) & 0x0F));
buffer->ReplaceAt(38, (uint8_t)((buffer->at(38) & 0xF0) | ((emb[1U] >> 4) & 0x0F)));
buffer->ReplaceAt(39, (uint8_t)((buffer->at(39) & 0x0F) | ((emb[1U] << 4) & 0xF0)));
}
}
void CDmrmmdvmProtocol::AppendDmrIdToBuffer(CBuffer *buffer, uint32_t id) const
{
buffer->Append((uint8_t)LOBYTE(HIWORD(id)));
buffer->Append((uint8_t)HIBYTE(LOWORD(id)));
buffer->Append((uint8_t)LOBYTE(LOWORD(id)));
}
void CDmrmmdvmProtocol::AppendDmrRptrIdToBuffer(CBuffer *buffer, uint32_t id) const
{
buffer->Append((uint8_t)HIBYTE(HIWORD(id)));
buffer->Append((uint8_t)LOBYTE(HIWORD(id)));
buffer->Append((uint8_t)HIBYTE(LOWORD(id)));
buffer->Append((uint8_t)LOBYTE(LOWORD(id)));
}

Powered by TurnKey Linux.