mirror of
https://github.com/lwvmobile/dsd-fme.git
synced 2026-11-13 01:07:24 -05:00
3cd1eefad8
DMR Stereo TDMA --play voice in both TDMA slots with the -T option (dsd -fr -T) --Improved MS voice (mostly working) and data handling (hit or miss) --pretty pretty colors on the console log output --rate 3/4 data decoding partially working
463 lines
12 KiB
C
463 lines
12 KiB
C
#include "dsd.h"
|
|
#include "dmr_const.h"
|
|
|
|
//A subroutine for processing each TDMA frame individually to allow for
|
|
//processing voice and/or data on both BS slots (channels) simultaneously
|
|
void dmrBS (dsd_opts * opts, dsd_state * state)
|
|
{
|
|
int i, j, k, l, dibit;
|
|
int *dibit_p;
|
|
char ambe_fr[4][24] = {0};
|
|
char ambe_fr2[4][24] = {0};
|
|
char ambe_fr3[4][24] = {0};
|
|
char t_ambe_fr[4][24] = {9};
|
|
char t_ambe_fr2[4][24] = {9};
|
|
char t_ambe_fr3[4][24] = {9};
|
|
const int *w, *x, *y, *z;
|
|
char sync[25];
|
|
char syncdata[48];
|
|
char cachdata[13] = {0};
|
|
int mutecurrentslot;
|
|
int msMode;
|
|
char cc[4];
|
|
unsigned char EmbeddedSignalling[16];
|
|
int EmbeddedSignallingOk;
|
|
unsigned int internalcolorcode;
|
|
int internalslot;
|
|
char redundancyA[36];
|
|
char redundancyB[36];
|
|
unsigned short int vc1;
|
|
unsigned short int vc2;
|
|
|
|
//add time to mirror printFrameSync
|
|
time_t now;
|
|
char * getTime(void) //get pretty hh:mm:ss timestamp
|
|
{
|
|
time_t t = time(NULL);
|
|
|
|
char * curr;
|
|
char * stamp = asctime(localtime( & t));
|
|
|
|
curr = strtok(stamp, " ");
|
|
curr = strtok(NULL, " ");
|
|
curr = strtok(NULL, " ");
|
|
curr = strtok(NULL, " ");
|
|
|
|
return curr;
|
|
}
|
|
|
|
//Init the superframe buffers
|
|
//memset(&state->TS1SuperFrame, 0, sizeof(TimeSlotVoiceSuperFrame_t));
|
|
//memset(&state->TS2SuperFrame, 0, sizeof(TimeSlotVoiceSuperFrame_t));
|
|
|
|
//Init the color code status
|
|
state->color_code_ok = 0;
|
|
|
|
vc1 = 2;
|
|
vc2 = 2;
|
|
|
|
short int loop = 1;
|
|
short int skipcount = 0;
|
|
|
|
//Run Loop while the getting is good
|
|
while (loop == 1) {
|
|
|
|
// CACH
|
|
internalslot = -1; //reset here so we know if this value is being set properly
|
|
for(i = 0; i < 12; i++)
|
|
{
|
|
dibit = getDibit(opts, state);
|
|
if(opts->inverted_dmr == 1)
|
|
{
|
|
dibit = (dibit ^ 2);
|
|
}
|
|
cachdata[i] = dibit;
|
|
state->dmr_stereo_payload[i] = dibit;
|
|
if(i == 2)
|
|
{
|
|
state->currentslot = (1 & (dibit >> 1));
|
|
internalslot = (1 & (dibit >> 1));
|
|
}
|
|
}
|
|
|
|
//Setup for first AMBE Frame
|
|
//Interleave Schedule
|
|
w = rW;
|
|
x = rX;
|
|
y = rY;
|
|
z = rZ;
|
|
|
|
//First AMBE Frame, Full 36
|
|
for(i = 0; i < 36; i++)
|
|
{
|
|
dibit = getDibit(opts, state);
|
|
if(opts->inverted_dmr == 1)
|
|
{
|
|
dibit = (dibit ^ 2);
|
|
}
|
|
state->dmr_stereo_payload[i+12] = dibit;
|
|
redundancyA[i] = dibit;
|
|
ambe_fr[*w][*x] = (1 & (dibit >> 1)); // bit 1
|
|
ambe_fr[*y][*z] = (1 & dibit); // bit 0
|
|
|
|
w++;
|
|
x++;
|
|
y++;
|
|
z++;
|
|
|
|
}
|
|
|
|
//check for repetitive data if caught in a 'no carrier' loop? Just picking random values.
|
|
//this will test for no carrier (input signal) and return us to no sync state if necessary
|
|
if (redundancyA[16] == redundancyB[16] && redundancyA[27] == redundancyB[27] &&
|
|
redundancyA[01] == redundancyB[01] && redundancyA[32] == redundancyB[32] &&
|
|
redundancyA[03] == redundancyB[03] && redundancyA[33] == redundancyB[33] &&
|
|
redundancyA[13] == redundancyB[13] && redundancyA[07] == redundancyB[07] )
|
|
{
|
|
goto END;
|
|
}
|
|
// end redundancy test, set B to A
|
|
for(i = 0; i < 36; i++)
|
|
{
|
|
redundancyB[i] = redundancyA[i];
|
|
}
|
|
|
|
//Setup for Second AMBE Frame
|
|
//Interleave Schedule
|
|
w = rW;
|
|
x = rX;
|
|
y = rY;
|
|
z = rZ;
|
|
|
|
//Second AMBE Frame, First Half 18 dibits just before Sync or EmbeddedSignalling
|
|
for(i = 0; i < 18; i++)
|
|
{
|
|
dibit = getDibit(opts, state);
|
|
if(opts->inverted_dmr == 1)
|
|
{
|
|
dibit = (dibit ^ 2);
|
|
}
|
|
state->dmr_stereo_payload[i+48] = dibit;
|
|
ambe_fr2[*w][*x] = (1 & (dibit >> 1)); // bit 1
|
|
ambe_fr2[*y][*z] = (1 & dibit); // bit 0
|
|
|
|
w++;
|
|
x++;
|
|
y++;
|
|
z++;
|
|
|
|
}
|
|
|
|
//short int l = 0; //do I still use this?
|
|
// signaling data or sync
|
|
for(i = 0; i < 24; i++)
|
|
{
|
|
dibit = getDibit(opts, state);
|
|
if(opts->inverted_dmr == 1)
|
|
{
|
|
dibit = (dibit ^ 2);
|
|
}
|
|
state->dmr_stereo_payload[i+66] = dibit;
|
|
syncdata[(2*i)] = (1 & (dibit >> 1)); // bit 1
|
|
syncdata[(2*i)+1] = (1 & dibit); // bit 0
|
|
sync[i] = (dibit | 1) + 48;
|
|
|
|
if (i < 4 || i > 19) //
|
|
{
|
|
EmbeddedSignalling[2*i] = (1 & (dibit >> 1)); // bit 1
|
|
EmbeddedSignalling[2*i+1] = (1 & dibit); // bit 0
|
|
}
|
|
|
|
//Used for ProcessVoiceBurstSync
|
|
if(internalslot == 0 && vc1 > 1 && vc1 < 6) //grab on vc1 values 2-5 B C D and E
|
|
{
|
|
/* Time slot 1 superframe buffer filling => SYNC data */
|
|
state->TS1SuperFrame.TimeSlotRawVoiceFrame[vc1-1].Sync[i*2] = (1 & (dibit >> 1)); // bit 1
|
|
state->TS1SuperFrame.TimeSlotRawVoiceFrame[vc1-1].Sync[i*2+1] = (1 & dibit); // bit 0
|
|
}
|
|
if(internalslot == 1 && vc2 > 1 && vc2 < 6) //grab on vc2 values 2-5 B C D and E
|
|
{
|
|
/* Time slot 2 superframe buffer filling => SYNC data */
|
|
state->TS2SuperFrame.TimeSlotRawVoiceFrame[vc2-1].Sync[i*2] = (1 & (dibit >> 1)); // bit 1
|
|
state->TS2SuperFrame.TimeSlotRawVoiceFrame[vc2-1].Sync[i*2+1] = (1 & dibit); // bit 0
|
|
}
|
|
|
|
}
|
|
|
|
sync[24] = 0;
|
|
EmbeddedSignallingOk = -1;
|
|
if(QR_16_7_6_decode(EmbeddedSignalling))
|
|
{
|
|
EmbeddedSignallingOk = 1;
|
|
}
|
|
|
|
internalcolorcode = 69; //set so we know if this value is being set properly
|
|
if(EmbeddedSignallingOk == 1)
|
|
{
|
|
state->color_code = (unsigned int)((EmbeddedSignalling[0] << 3) + (EmbeddedSignalling[1] << 2) + (EmbeddedSignalling[2] << 1) + EmbeddedSignalling[3]);
|
|
internalcolorcode = (unsigned int)((EmbeddedSignalling[0] << 3) + (EmbeddedSignalling[1] << 2) + (EmbeddedSignalling[2] << 1) + EmbeddedSignalling[3]);
|
|
state->color_code_ok = EmbeddedSignallingOk;
|
|
|
|
//Power Indicator, not the other PI (header)
|
|
state->PI = (unsigned int)EmbeddedSignalling[4];
|
|
state->PI_ok = EmbeddedSignallingOk;
|
|
|
|
//Link Control Start Stop Indicator
|
|
state->LCSS = (unsigned int)((EmbeddedSignalling[5] << 1) + EmbeddedSignalling[6]);
|
|
state->LCSS_ok = EmbeddedSignallingOk;
|
|
|
|
}
|
|
else skipcount++;
|
|
|
|
//Continue Second AMBE Frame, 18 after Sync or EmbeddedSignalling
|
|
for(i = 0; i < 18; i++)
|
|
{
|
|
dibit = getDibit(opts, state);
|
|
if(opts->inverted_dmr == 1)
|
|
{
|
|
dibit = (dibit ^ 2);
|
|
}
|
|
state->dmr_stereo_payload[i+90] = dibit;
|
|
ambe_fr2[*w][*x] = (1 & (dibit >> 1)); // bit 1
|
|
ambe_fr2[*y][*z] = (1 & dibit); // bit 0
|
|
|
|
w++;
|
|
x++;
|
|
y++;
|
|
z++;
|
|
|
|
}
|
|
|
|
//Setup for Third AMBE Frame
|
|
//Interleave Schedule
|
|
w = rW;
|
|
x = rX;
|
|
y = rY;
|
|
z = rZ;
|
|
|
|
//Third AMBE Frame, Full 36
|
|
for(i = 0; i < 36; i++)
|
|
{
|
|
dibit = getDibit(opts, state);
|
|
if(opts->inverted_dmr == 1)
|
|
{
|
|
dibit = (dibit ^ 2);
|
|
}
|
|
state->dmr_stereo_payload[i+108] = dibit;
|
|
ambe_fr3[*w][*x] = (1 & (dibit >> 1)); // bit 1
|
|
ambe_fr3[*y][*z] = (1 & dibit); // bit 0
|
|
|
|
w++;
|
|
x++;
|
|
y++;
|
|
z++;
|
|
|
|
}
|
|
|
|
//reset vc counters to 1 if new voice sync frame on each slot
|
|
if ( (strcmp (sync, DMR_BS_VOICE_SYNC) == 0) )
|
|
{
|
|
if (internalslot == 0)
|
|
{
|
|
vc1 = 1;
|
|
}
|
|
if (internalslot == 1)
|
|
{
|
|
vc2 = 1;
|
|
}
|
|
}
|
|
|
|
//check for sync pattern here after collected the rest of the payload, decide what to do with it
|
|
if ( (strcmp (sync, DMR_BS_DATA_SYNC) == 0) )
|
|
{
|
|
fprintf (stderr,"%s ", getTime());
|
|
if (internalslot == 0)
|
|
{
|
|
sprintf(state->slot1light, "[slot1]");
|
|
sprintf(state->slot2light, " slot2 ");
|
|
//fprintf (stderr,"Sync: +DMR [slot1] slot2 | Color Code=%02d | DMRSTEREO | Data ", state->color_code);
|
|
fprintf (stderr,"Sync: +DMR ");
|
|
//constantly reset the vc counter to 1 each data frame in anticipation of new voice frame
|
|
vc1 = 1;
|
|
}
|
|
if (internalslot == 1)
|
|
{
|
|
sprintf(state->slot2light, "[slot2]");
|
|
sprintf(state->slot1light, " slot1 ");
|
|
//fprintf (stderr,"Sync: +DMR slot1 [slot2] | Color Code=%02d | DMRSTEREO | Data ", state->color_code);
|
|
fprintf (stderr,"Sync: +DMR ");
|
|
//constantly reset the vc counter to 1 each data frame in anticipation of new voice frame
|
|
vc2 = 1;
|
|
}
|
|
processDMRdata (opts, state);
|
|
skipcount++; //after 6 data frames, drop back to getFrameSync and process subsequent data with processDMRdata
|
|
goto SKIP;
|
|
}
|
|
|
|
if( (strcmp (sync, DMR_BS_DATA_SYNC) != 0) ) //only play voice no data sync // || (strcmp (sync, DMR_MS_DATA_SYNC) != 0)
|
|
{
|
|
if (EmbeddedSignallingOk == 0)
|
|
{
|
|
//goto END;
|
|
}
|
|
skipcount = 0; //reset skip count if processing voice frames
|
|
fprintf (stderr,"%s ", getTime());
|
|
if (internalslot == 0)
|
|
{
|
|
fprintf (stderr,"Sync: +DMR [slot1] slot2 | Color Code=%02d | DMRSTEREO | VC%d \n", state->color_code, vc1);
|
|
}
|
|
|
|
if (internalslot == 1)
|
|
{
|
|
fprintf (stderr,"Sync: +DMR slot1 [slot2] | Color Code=%02d | DMRSTEREO | VC%d \n", state->color_code, vc2);
|
|
}
|
|
if (internalslot == 0 && vc1 == 6) //presumably when full (and no sync issues)
|
|
{
|
|
//process voice burst
|
|
ProcessVoiceBurstSync(opts, state);
|
|
fprintf (stderr, "\n");
|
|
}
|
|
if (internalslot == 1 && vc2 == 6) //presumably when full (and no sync issues)
|
|
{
|
|
//process voice burst
|
|
ProcessVoiceBurstSync(opts, state);
|
|
fprintf (stderr, "\n");
|
|
}
|
|
processMbeFrame (opts, state, NULL, ambe_fr, NULL);
|
|
processMbeFrame (opts, state, NULL, ambe_fr2, NULL);
|
|
processMbeFrame (opts, state, NULL, ambe_fr3, NULL);
|
|
if (internalslot == 0)
|
|
{
|
|
vc1++;
|
|
}
|
|
if (internalslot == 1)
|
|
{
|
|
vc2++;
|
|
}
|
|
}
|
|
|
|
// recalibrate center/umid/lmid, not sure this helps or does anything particularly in this case
|
|
state->center = ((state->max) + (state->min)) / 2;
|
|
state->umid = (((state->max) - state->center) * 5 / 8) + state->center;
|
|
state->lmid = (((state->min) - state->center) * 5 / 8) + state->center;
|
|
|
|
//Escape conditions to break the loop
|
|
//7 seems optimal, allows for an extra frame each in case of late entry on dual voices
|
|
if ( (vc1 > 7 && vc2 > 7) )
|
|
{
|
|
goto END;
|
|
}
|
|
//14 probably allows a few more in case of a bit of jitter but eventually breaks loop (1 second?)
|
|
if ( (vc1 > 14 || vc2 > 14) )
|
|
{
|
|
goto END;
|
|
}
|
|
//using these conditions may cause excessive resyncs IF bad signal,
|
|
//but still better than getting stuck in a wonk wonk loop for too long.
|
|
//maybe consider making a opt variable for loose or aggressive resyncing for this sort of thing?
|
|
if (1 == 1) //set for more aggressive or less aggressive resync during accumulated playback errs
|
|
{
|
|
//errors caused due to playing MBE files out of sync, break loop
|
|
if (state->errs > 2 || state->errsR > 2)
|
|
{
|
|
//goto END; //
|
|
}
|
|
//errors caused due to playing MBE files out of sync, break loop
|
|
if (state->errs2 > 4 || state->errs2R > 4)
|
|
{
|
|
goto END; //
|
|
}
|
|
}
|
|
|
|
//earlier skip conditions teleport us here to process further skip conditions before restarting while loop
|
|
SKIP:
|
|
if (skipcount > 2) //after 2 consecutive data frames, drop back to getFrameSync and process with processDMRdata
|
|
{
|
|
goto END;
|
|
}
|
|
|
|
//since we are in a while loop, run ncursesPrinter here.
|
|
if (opts->use_ncurses_terminal == 1)
|
|
{
|
|
ncursesPrinter(opts, state);
|
|
}
|
|
|
|
} // while loop
|
|
//Teleport here on END condition, set or reset variables and return to look for new frame sync
|
|
END:
|
|
state->dmr_stereo = 0;
|
|
state->errs2R = 0;
|
|
state->errs2 = 0;
|
|
}
|
|
|
|
//Only process 2nd half voice payload (3rd frame) and then jump to full BS decoding
|
|
void dmrBSBootstrap (dsd_opts * opts, dsd_state * state)
|
|
{
|
|
int i, j, k, l, dibit;
|
|
int *dibit_p;
|
|
char ambe_fr[4][24] = {0};
|
|
char ambe_fr2[4][24] = {0};
|
|
char ambe_fr3[4][24] = {0};
|
|
const int *w, *x, *y, *z;
|
|
char sync[25];
|
|
char syncdata[48];
|
|
char cachdata[13] = {0};
|
|
int mutecurrentslot;
|
|
int msMode;
|
|
char cc[4];
|
|
unsigned char EmbeddedSignalling[16];
|
|
unsigned int EmbeddedSignallingOk;
|
|
|
|
//add time to mirror printFrameSync
|
|
time_t now;
|
|
char * getTime(void) //get pretty hh:mm:ss timestamp
|
|
{
|
|
time_t t = time(NULL);
|
|
|
|
char * curr;
|
|
char * stamp = asctime(localtime( & t));
|
|
|
|
curr = strtok(stamp, " ");
|
|
curr = strtok(NULL, " ");
|
|
curr = strtok(NULL, " ");
|
|
curr = strtok(NULL, " ");
|
|
|
|
return curr;
|
|
}
|
|
|
|
//skip the 18 dibits of the 2nd frame, since we can't play only half a frame
|
|
skipDibit (opts, state, 18);
|
|
|
|
//Setup for Third AMBE Frame
|
|
|
|
//Interleave Schedule
|
|
w = rW;
|
|
x = rX;
|
|
y = rY;
|
|
z = rZ;
|
|
|
|
//Third AMBE Frame, Full 36
|
|
for(i = 0; i < 36; i++)
|
|
{
|
|
dibit = getDibit(opts, state);
|
|
if(opts->inverted_dmr == 1)
|
|
{
|
|
dibit = (dibit ^ 2);
|
|
}
|
|
ambe_fr3[*w][*x] = (1 & (dibit >> 1)); // bit 1
|
|
ambe_fr3[*y][*z] = (1 & dibit); // bit 0
|
|
|
|
w++;
|
|
x++;
|
|
y++;
|
|
z++;
|
|
|
|
}
|
|
|
|
fprintf (stderr,"\n%s ", getTime());
|
|
fprintf (stderr,"Sync: +DMR | Frame Sync | DMRSTEREO | VC1 FS \n");
|
|
processMbeFrame (opts, state, NULL, ambe_fr3, NULL);
|
|
dmrBS (opts, state); //bootstrap into full TDMA frame for BS mode
|
|
|
|
}
|