wdsp/gain.c
Uladzimir Karpenka 89c8a0e2b5 first commit
2026-06-01 15:58:45 +03:00

126 lines
2.7 KiB
C

/* gain.c
This file is part of a program that implements a Software-Defined Radio.
Copyright (C) 2013 Warren Pratt, NR0V
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., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
The author can be reached by email at
warren@wpratt.com
*/
#include "comm.h"
PORT
GAIN create_gain (int run, int* prun, int size, double* in, double* out, double Igain, double Qgain)
{
GAIN a = (GAIN) malloc0 (sizeof (gain));
a->run = run;
a->prun = prun;
a->size = size;
a->in = in;
a->out = out;
a->Igain = Igain;
a->Qgain = Qgain;
InitializeCriticalSectionAndSpinCount(&a->cs_update, 2500);
return a;
}
PORT
void destroy_gain (GAIN a)
{
DeleteCriticalSection (&a->cs_update);
_aligned_free (a);
}
PORT
void flush_gain (GAIN a)
{
}
PORT
void xgain (GAIN a)
{
int srun;
EnterCriticalSection (&a->cs_update);
if (a->prun != 0)
srun = *(a->prun);
else
srun = 1;
if (a->run && srun)
{
int i;
for (i = 0; i < a->size; i++)
{
a->out[2 * i + 0] = a->Igain * a->in[2 * i + 0];
a->out[2 * i + 1] = a->Qgain * a->in[2 * i + 1];
}
}
else if (a->in != a->out)
memcpy (a->out, a->in, a->size * sizeof (complex));
LeaveCriticalSection (&a->cs_update);
}
void setBuffers_gain (GAIN a, double* in, double* out)
{
a->in = in;
a->out = out;
}
void setSamplerate_gain (GAIN a, int rate)
{
}
void setSize_gain (GAIN a, int size)
{
a->size = size;
}
/********************************************************************************************************
* *
* POINTER-BASED PROPERTIES *
* *
********************************************************************************************************/
PORT
void pSetTXOutputLevel (GAIN a, double level)
{
EnterCriticalSection (&a->cs_update);
a->Igain = level;
a->Qgain = level;
LeaveCriticalSection (&a->cs_update);
}
PORT
void pSetTXOutputLevelRun (GAIN a, int run)
{
EnterCriticalSection (&a->cs_update);
a->run = run;
LeaveCriticalSection (&a->cs_update);
}
PORT
void pSetTXOutputLevelSize (GAIN a, int size)
{
EnterCriticalSection (&a->cs_update);
a->size = size;
LeaveCriticalSection (&a->cs_update);
}