SSB_HighSpeed_Modem/hsmodem/fifo_voice.cpp
Kurt Moraw 63fb166ac6 update
2020-12-19 22:46:34 +01:00

219 lines
5.2 KiB
C++
Executable File

/*
* High Speed modem to transfer data in a 2,7kHz SSB channel
* =========================================================
* Author: DJ0ABR
*
* (c) DJ0ABR
* www.dj0abr.de
*
* 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.
*
* fifo_voice.c ... thread safe buffer for DV audio
*
*
*/
#include "hsmodem.h"
#ifdef _WIN32_
CRITICAL_SECTION io_mic_crit_sec;
CRITICAL_SECTION io_ls_crit_sec;
#define IO_MIC_LOCK EnterCriticalSection(&io_mic_crit_sec)
#define IO_LS_LOCK EnterCriticalSection(&io_ls_crit_sec)
void IO_MIC_UNLOCK()
{
if (&io_mic_crit_sec != NULL)
LeaveCriticalSection(&io_mic_crit_sec);
}
void IO_LS_UNLOCK()
{
if (&io_ls_crit_sec != NULL)
LeaveCriticalSection(&io_ls_crit_sec);
}
#endif
#ifdef _LINUX_
pthread_mutex_t io_mic_crit_sec;
pthread_mutex_t io_ls_crit_sec;
#define IO_MIC_LOCK pthread_mutex_lock(&io_mic_crit_sec)
void IO_MIC_UNLOCK() { pthread_mutex_unlock(&io_mic_crit_sec); }
#define IO_LS_LOCK pthread_mutex_lock(&io_ls_crit_sec)
void IO_LS_UNLOCK() { pthread_mutex_unlock(&io_ls_crit_sec); }
#endif
#define VOICE_PLAYBACK_BUFLEN (500000)
#define VOICE_CAPTURE_BUFLEN (10000) //48000)// * 10) // space for 10 seconds of samples
int io_mic_wridx = 0;
int io_mic_rdidx = 0;
float io_mic_buffer[VOICE_CAPTURE_BUFLEN];
int io_ls_wridx = 0;
int io_ls_rdidx = 0;
float io_ls_buffer[VOICE_PLAYBACK_BUFLEN];
void io_voice_init_pipes()
{
#ifdef _WIN32_
if (&io_mic_crit_sec != NULL) DeleteCriticalSection(&io_mic_crit_sec);
InitializeCriticalSection(&io_mic_crit_sec);
if (&io_ls_crit_sec != NULL) DeleteCriticalSection(&io_ls_crit_sec);
InitializeCriticalSection(&io_ls_crit_sec);
io_clear_audio_fifos();
#endif
}
// write one sample into the fifo
// overwrite old data if the fifo is full
void io_mic_write_fifo(float sample)
{
IO_MIC_LOCK;
if (((io_mic_wridx + 1) % VOICE_CAPTURE_BUFLEN) == io_mic_rdidx)
{
//printf("mic fifo full\n");
IO_MIC_UNLOCK();
return;
}
io_mic_buffer[io_mic_wridx] = sample;
if (++io_mic_wridx >= VOICE_CAPTURE_BUFLEN) io_mic_wridx = 0;
IO_MIC_UNLOCK();
}
int io_mic_read_fifo(float* data)
{
IO_MIC_LOCK;
if (io_mic_rdidx == io_mic_wridx)
{
// Fifo empty, no data available
IO_MIC_UNLOCK();
return 0;
}
*data = io_mic_buffer[io_mic_rdidx];
if (++io_mic_rdidx >= VOICE_CAPTURE_BUFLEN) io_mic_rdidx = 0;
IO_MIC_UNLOCK();
return 1;
}
void io_mic_write_fifo_clear()
{
io_mic_wridx = io_mic_rdidx = 0;
}
int io_mic_fifo_freespace()
{
int freebuf = 0;
IO_MIC_LOCK;
int elemInFifo = (io_mic_wridx + VOICE_CAPTURE_BUFLEN - io_mic_rdidx) % VOICE_CAPTURE_BUFLEN;
freebuf = VOICE_CAPTURE_BUFLEN - elemInFifo;
IO_MIC_UNLOCK();
return freebuf;
}
int io_mic_fifo_usedPercent()
{
int fs = io_mic_fifo_freespace();
int used = VOICE_CAPTURE_BUFLEN - fs;
used = (used * 100) / VOICE_CAPTURE_BUFLEN;
return used;
}
void io_ls_write_fifo_clear()
{
io_ls_wridx = io_ls_rdidx = 0;
}
int io_ls_fifo_freespace(int nolock)
{
int freebuf = 0;
if (nolock == 0) IO_LS_LOCK;
int elemInFifo = (io_ls_wridx + VOICE_PLAYBACK_BUFLEN - io_ls_rdidx) % VOICE_PLAYBACK_BUFLEN;
freebuf = VOICE_PLAYBACK_BUFLEN - elemInFifo;
if (nolock == 0) IO_LS_UNLOCK();
//printf("fifolen:%d check: pbw:%d pbr:%d freebuf:%d\n",VOICE_PLAYBACK_BUFLEN,io_ls_wridx,io_ls_rdidx,freebuf);
return freebuf;
}
int io_ls_fifo_usedspace()
{
int anz = io_ls_fifo_freespace(0);
return VOICE_PLAYBACK_BUFLEN - anz;
}
void io_ls_write_fifo(float sample)
{
IO_LS_LOCK;
// check if there is free space in fifo
if (io_ls_fifo_freespace(1) == 0)
{
IO_LS_UNLOCK();
printf("************* LS fifo full\n");
return;
}
io_ls_buffer[io_ls_wridx] = sample;
if (++io_ls_wridx >= VOICE_PLAYBACK_BUFLEN) io_ls_wridx = 0;
IO_LS_UNLOCK();
}
// read num elements
// if num elems not avail, return 0
int io_ls_read_fifo_num(float* data, int num)
{
IO_LS_LOCK;
int elemInFifo = (io_ls_wridx + VOICE_PLAYBACK_BUFLEN - io_ls_rdidx) % VOICE_PLAYBACK_BUFLEN;
if (elemInFifo < num)
{
// Fifo empty, no data available
//printf("only %d elements available\n", elemInFifo);
IO_LS_UNLOCK();
return 0;
}
for (int i = 0; i < num; i++)
{
*data++ = io_ls_buffer[io_ls_rdidx];
if (++io_ls_rdidx >= VOICE_PLAYBACK_BUFLEN) io_ls_rdidx = 0;
}
IO_LS_UNLOCK();
return 1;
}
void io_clear_voice_fifos()
{
io_ls_write_fifo_clear();
io_mic_write_fifo_clear();
}