306 lines
7.5 KiB
C++
306 lines
7.5 KiB
C++
/*
|
|
* Copyright (C) 2016 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 "YSFConvolution.h"
|
|
#include "YSFPayload.h"
|
|
#include "YSFDefines.h"
|
|
#include "Utils.h"
|
|
#include "CRC.h"
|
|
#include "Log.h"
|
|
|
|
#include <cstdio>
|
|
#include <cassert>
|
|
#include <cstring>
|
|
|
|
const unsigned int INTERLEAVE_TABLE_9_20[] = {
|
|
0U, 40U, 80U, 120U, 160U, 200U, 240U, 280U, 320U,
|
|
2U, 42U, 82U, 122U, 162U, 202U, 242U, 282U, 322U,
|
|
4U, 44U, 84U, 124U, 164U, 204U, 244U, 284U, 324U,
|
|
6U, 46U, 86U, 126U, 166U, 206U, 246U, 286U, 326U,
|
|
8U, 48U, 88U, 128U, 168U, 208U, 248U, 288U, 328U,
|
|
10U, 50U, 90U, 130U, 170U, 210U, 250U, 290U, 330U,
|
|
12U, 52U, 92U, 132U, 172U, 212U, 252U, 292U, 332U,
|
|
14U, 54U, 94U, 134U, 174U, 214U, 254U, 294U, 334U,
|
|
16U, 56U, 96U, 136U, 176U, 216U, 256U, 296U, 336U,
|
|
18U, 58U, 98U, 138U, 178U, 218U, 258U, 298U, 338U,
|
|
20U, 60U, 100U, 140U, 180U, 220U, 260U, 300U, 340U,
|
|
22U, 62U, 102U, 142U, 182U, 222U, 262U, 302U, 342U,
|
|
24U, 64U, 104U, 144U, 184U, 224U, 264U, 304U, 344U,
|
|
26U, 66U, 106U, 146U, 186U, 226U, 266U, 306U, 346U,
|
|
28U, 68U, 108U, 148U, 188U, 228U, 268U, 308U, 348U,
|
|
30U, 70U, 110U, 150U, 190U, 230U, 270U, 310U, 350U,
|
|
32U, 72U, 112U, 152U, 192U, 232U, 272U, 312U, 352U,
|
|
34U, 74U, 114U, 154U, 194U, 234U, 274U, 314U, 354U,
|
|
36U, 76U, 116U, 156U, 196U, 236U, 276U, 316U, 356U,
|
|
38U, 78U, 118U, 158U, 198U, 238U, 278U, 318U, 358U};
|
|
|
|
const unsigned int INTERLEAVE_TABLE_5_20[] = {
|
|
0U, 40U, 80U, 120U, 160U,
|
|
2U, 42U, 82U, 122U, 162U,
|
|
4U, 44U, 84U, 124U, 164U,
|
|
6U, 46U, 86U, 126U, 166U,
|
|
8U, 48U, 88U, 128U, 168U,
|
|
10U, 50U, 90U, 130U, 170U,
|
|
12U, 52U, 92U, 132U, 172U,
|
|
14U, 54U, 94U, 134U, 174U,
|
|
16U, 56U, 96U, 136U, 176U,
|
|
18U, 58U, 98U, 138U, 178U,
|
|
20U, 60U, 100U, 140U, 180U,
|
|
22U, 62U, 102U, 142U, 182U,
|
|
24U, 64U, 104U, 144U, 184U,
|
|
26U, 66U, 106U, 146U, 186U,
|
|
28U, 68U, 108U, 148U, 188U,
|
|
30U, 70U, 110U, 150U, 190U,
|
|
32U, 72U, 112U, 152U, 192U,
|
|
34U, 74U, 114U, 154U, 194U,
|
|
36U, 76U, 116U, 156U, 196U,
|
|
38U, 78U, 118U, 158U, 198U};
|
|
|
|
const unsigned char BIT_MASK_TABLE[] = {0x80U, 0x40U, 0x20U, 0x10U, 0x08U, 0x04U, 0x02U, 0x01U};
|
|
|
|
#define WRITE_BIT1(p,i,b) p[(i)>>3] = (b) ? (p[(i)>>3] | BIT_MASK_TABLE[(i)&7]) : (p[(i)>>3] & ~BIT_MASK_TABLE[(i)&7])
|
|
#define READ_BIT1(p,i) (p[(i)>>3] & BIT_MASK_TABLE[(i)&7])
|
|
|
|
CYSFPayload::CYSFPayload() :
|
|
m_data(NULL)
|
|
{
|
|
m_data = new unsigned char[90U];
|
|
}
|
|
|
|
CYSFPayload::~CYSFPayload()
|
|
{
|
|
delete[] m_data;
|
|
}
|
|
|
|
bool CYSFPayload::decode(const unsigned char* bytes, unsigned char fi, unsigned char fn, unsigned char ft, unsigned char dt)
|
|
{
|
|
assert(bytes != NULL);
|
|
|
|
::memcpy(m_data, bytes + YSF_SYNC_LENGTH_BYTES + YSF_FICH_LENGTH_BYTES, 90U);
|
|
|
|
// Header and trailer
|
|
if (fi == 0U || fi == 2U)
|
|
return decodeHeader();
|
|
|
|
// V/D Mode 1
|
|
if (dt == 0U)
|
|
return decodeVDMode1(fn, ft);
|
|
|
|
// V/D Mode 2
|
|
if (dt == 2U)
|
|
return decodeVDMode2(fn, ft);
|
|
|
|
// Data FR Mode
|
|
if (dt == 1U)
|
|
return decodeDataFRMode(fn, ft);
|
|
|
|
// Voice FR Mode
|
|
return true;
|
|
}
|
|
|
|
void CYSFPayload::encode(unsigned char* bytes)
|
|
{
|
|
assert(bytes != NULL);
|
|
|
|
::memcpy(bytes + YSF_SYNC_LENGTH_BYTES + YSF_FICH_LENGTH_BYTES, m_data, 90U);
|
|
}
|
|
|
|
bool CYSFPayload::decodeHeader()
|
|
{
|
|
unsigned char dch1[45U];
|
|
unsigned char dch2[45U];
|
|
|
|
unsigned char* p1 = m_data;
|
|
unsigned char* p2 = dch1;
|
|
unsigned char* p3 = dch2;
|
|
for (unsigned int i = 0U; i < 5U; i++) {
|
|
::memcpy(p2, p1, 9U);
|
|
p1 += 9U; p2 += 9U;
|
|
::memcpy(p3, p1, 9U);
|
|
p1 += 9U; p3 += 9U;
|
|
}
|
|
|
|
CYSFConvolution conv;
|
|
conv.start();
|
|
|
|
// Deinterleave the FICH and send bits to the Viterbi decoder
|
|
for (unsigned int i = 0U; i < 180U; i++) {
|
|
unsigned int n = INTERLEAVE_TABLE_9_20[i];
|
|
uint8_t s0 = READ_BIT1(dch1, n) ? 1U : 0U;
|
|
|
|
n++;
|
|
uint8_t s1 = READ_BIT1(dch1, n) ? 1U : 0U;
|
|
|
|
conv.decode(s0, s1);
|
|
}
|
|
|
|
unsigned char output1[23U];
|
|
conv.chainback(output1, 176U);
|
|
|
|
bool ret1 = CCRC::checkCCITT162(output1, 22U);
|
|
if (ret1)
|
|
CUtils::dump("Header/Trailer, valid DCH1", output1, 22U);
|
|
|
|
conv.start();
|
|
|
|
// Deinterleave the FICH and send bits to the Viterbi decoder
|
|
for (unsigned int i = 0U; i < 180U; i++) {
|
|
unsigned int n = INTERLEAVE_TABLE_9_20[i];
|
|
uint8_t s0 = READ_BIT1(dch2, n) ? 1U : 0U;
|
|
|
|
n++;
|
|
uint8_t s1 = READ_BIT1(dch2, n) ? 1U : 0U;
|
|
|
|
conv.decode(s0, s1);
|
|
}
|
|
|
|
unsigned char output2[23U];
|
|
conv.chainback(output2, 176U);
|
|
|
|
|
|
bool ret2 = CCRC::checkCCITT162(output2, 22U);
|
|
if (ret2)
|
|
CUtils::dump("Header/Trailer, valid DCH2", output2, 22U);
|
|
|
|
return true;
|
|
}
|
|
|
|
bool CYSFPayload::decodeVDMode1(unsigned char fn, unsigned char ft)
|
|
{
|
|
unsigned char dch[45U];
|
|
|
|
unsigned char* p1 = m_data;
|
|
unsigned char* p2 = dch;
|
|
for (unsigned int i = 0U; i < 5U; i++) {
|
|
::memcpy(p2, p1, 9U);
|
|
p1 += 18U; p2 += 9U;
|
|
}
|
|
|
|
CYSFConvolution conv;
|
|
conv.start();
|
|
|
|
// Deinterleave the FICH and send bits to the Viterbi decoder
|
|
for (unsigned int i = 0U; i < 180U; i++) {
|
|
unsigned int n = INTERLEAVE_TABLE_9_20[i];
|
|
uint8_t s0 = READ_BIT1(dch, n) ? 1U : 0U;
|
|
|
|
n++;
|
|
uint8_t s1 = READ_BIT1(dch, n) ? 1U : 0U;
|
|
|
|
conv.decode(s0, s1);
|
|
}
|
|
|
|
unsigned char output[23U];
|
|
conv.chainback(output, 176U);
|
|
|
|
bool ret = CCRC::checkCCITT162(output, 22U);
|
|
if (ret)
|
|
CUtils::dump("V/D Mode 1, valid DCH", output, 22U);
|
|
|
|
return true;
|
|
}
|
|
|
|
bool CYSFPayload::decodeVDMode2(unsigned char fn, unsigned char ft)
|
|
{
|
|
unsigned char dch[25U];
|
|
|
|
unsigned char* p1 = m_data;
|
|
unsigned char* p2 = dch;
|
|
for (unsigned int i = 0U; i < 5U; i++) {
|
|
::memcpy(p2, p1, 5U);
|
|
p1 += 18U; p2 += 5U;
|
|
}
|
|
|
|
CYSFConvolution conv;
|
|
conv.start();
|
|
|
|
// Deinterleave the FICH and send bits to the Viterbi decoder
|
|
for (unsigned int i = 0U; i < 100U; i++) {
|
|
unsigned int n = INTERLEAVE_TABLE_5_20[i];
|
|
uint8_t s0 = READ_BIT1(dch, n) ? 1U : 0U;
|
|
|
|
n++;
|
|
uint8_t s1 = READ_BIT1(dch, n) ? 1U : 0U;
|
|
|
|
conv.decode(s0, s1);
|
|
}
|
|
|
|
unsigned char output[13U];
|
|
conv.chainback(output, 96U);
|
|
|
|
bool ret = CCRC::checkCCITT162(output, 12U);
|
|
if (ret)
|
|
CUtils::dump("V/D Mode 2, valid DCH", output, 12U);
|
|
|
|
return true;
|
|
}
|
|
|
|
bool CYSFPayload::decodeDataFRMode(unsigned char fn, unsigned char ft)
|
|
{
|
|
unsigned char dch1[45U];
|
|
unsigned char dch2[45U];
|
|
|
|
unsigned char* p1 = m_data;
|
|
unsigned char* p2 = dch1;
|
|
unsigned char* p3 = dch2;
|
|
for (unsigned int i = 0U; i < 5U; i++) {
|
|
::memcpy(p2, p1, 9U);
|
|
p1 += 9U; p2 += 9U;
|
|
::memcpy(p3, p1, 9U);
|
|
p1 += 9U; p3 += 9U;
|
|
}
|
|
|
|
CYSFConvolution conv;
|
|
conv.start();
|
|
|
|
// Deinterleave the FICH and send bits to the Viterbi decoder
|
|
for (unsigned int i = 0U; i < 180U; i++) {
|
|
unsigned int n = INTERLEAVE_TABLE_9_20[i];
|
|
uint8_t s0 = READ_BIT1(dch1, n) ? 1U : 0U;
|
|
|
|
n++;
|
|
uint8_t s1 = READ_BIT1(dch1, n) ? 1U : 0U;
|
|
|
|
conv.decode(s0, s1);
|
|
}
|
|
|
|
unsigned char output1[23U];
|
|
conv.chainback(output1, 176U);
|
|
|
|
bool ret1 = CCRC::checkCCITT162(output1, 22U);
|
|
if (ret1)
|
|
CUtils::dump("Data FR Mode, valid DCH1", output1, 22U);
|
|
|
|
conv.start();
|
|
|
|
// Deinterleave the FICH and send bits to the Viterbi decoder
|
|
for (unsigned int i = 0U; i < 180U; i++) {
|
|
unsigned int n = INTERLEAVE_TABLE_9_20[i];
|
|
uint8_t s0 = READ_BIT1(dch2, n) ? 1U : 0U;
|
|
|
|
n++;
|
|
uint8_t s1 = READ_BIT1(dch2, n) ? 1U : 0U;
|
|
|
|
conv.decode(s0, s1);
|
|
}
|
|
|
|
unsigned char output2[23U];
|
|
conv.chainback(output2, 176U);
|
|
|
|
|
|
bool ret2 = CCRC::checkCCITT162(output2, 22U);
|
|
if (ret2)
|
|
CUtils::dump("Data FR Mode, valid DCH2", output2, 22U);
|
|
|
|
return true;
|
|
}
|