mirror of
				https://github.com/f4exb/sdrangel.git
				synced 2025-10-31 13:00:26 -04:00 
			
		
		
		
	
		
			
				
	
	
		
			129 lines
		
	
	
		
			3.9 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
			
		
		
	
	
			129 lines
		
	
	
		
			3.9 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
| ///////////////////////////////////////////////////////////////////////////////////
 | |
| // Copyright (C) 2018-2020 Edouard Griffiths, F4EXB <f4exb06@gmail.com>          //
 | |
| //                                                                               //
 | |
| // FFT based cross correlation. Uses FFTW/Kiss engine.                           //
 | |
| //                                                                               //
 | |
| // 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 as 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 V3 for more details.                               //
 | |
| //                                                                               //
 | |
| // You should have received a copy of the GNU General Public License             //
 | |
| // along with this program. If not, see <http://www.gnu.org/licenses/>.          //
 | |
| ///////////////////////////////////////////////////////////////////////////////////
 | |
| 
 | |
| #include <algorithm>
 | |
| 
 | |
| #include "dsp/dspengine.h"
 | |
| #include "dsp/fftfactory.h"
 | |
| #include "dsp/fftengine.h"
 | |
| #include "fftcorr.h"
 | |
| 
 | |
| void fftcorr::init_fft()
 | |
| {
 | |
|     FFTFactory *fftFactory = DSPEngine::instance()->getFFTFactory();
 | |
|     fftASequence = fftFactory->getEngine(flen, false, &fftA);
 | |
|     fftBSequence = fftFactory->getEngine(flen, false, &fftB);
 | |
|     fftInvASequence = fftFactory->getEngine(flen, true, &fftInvA);
 | |
| 
 | |
|     m_window.create(FFTWindow::Hanning, flen);
 | |
| 
 | |
|     dataA    = new cmplx[flen];
 | |
|     dataB    = new cmplx[flen];
 | |
|     dataBj   = new cmplx[flen];
 | |
|     dataP    = new cmplx[flen];
 | |
| 
 | |
|     std::fill(dataA, dataA+flen, 0);
 | |
|     std::fill(dataB, dataB+flen, 0);
 | |
| 
 | |
|     inptrA = 0;
 | |
|     inptrB = 0;
 | |
|     outptr = 0;
 | |
| }
 | |
| 
 | |
| fftcorr::fftcorr(int len) :
 | |
|     flen(len),
 | |
|     flen2(len>>1),
 | |
|     fftA(nullptr),
 | |
|     fftB(nullptr),
 | |
|     fftInvA(nullptr),
 | |
|     fftASequence(0),
 | |
|     fftBSequence(0),
 | |
|     fftInvASequence(0)
 | |
| {
 | |
|     init_fft();
 | |
| }
 | |
| 
 | |
| fftcorr::~fftcorr()
 | |
| {
 | |
|     FFTFactory *fftFactory = DSPEngine::instance()->getFFTFactory();
 | |
|     fftFactory->releaseEngine(flen, false, fftASequence);
 | |
|     fftFactory->releaseEngine(flen, false, fftBSequence);
 | |
|     fftFactory->releaseEngine(flen, true, fftInvASequence);
 | |
|     delete[] dataA;
 | |
|     delete[] dataB;
 | |
|     delete[] dataBj;
 | |
|     delete[] dataP;
 | |
| }
 | |
| 
 | |
| int fftcorr::run(const cmplx& inA, const cmplx* inB, cmplx **out)
 | |
| {
 | |
|     dataA[inptrA++] = inA;
 | |
| 
 | |
|     if (inB) {
 | |
|         dataB[inptrB++] = *inB;
 | |
|     }
 | |
| 
 | |
|     if (inptrA < flen2) {
 | |
|         return 0;
 | |
|     }
 | |
| 
 | |
|     m_window.apply(dataA, fftA->in());
 | |
|     fftA->transform();
 | |
| 
 | |
|     if (inB)
 | |
|     {
 | |
|         m_window.apply(dataB, fftB->in());
 | |
|         fftB->transform();
 | |
|     }
 | |
| 
 | |
|     if (inB) {
 | |
|         std::transform(fftB->out(), fftB->out()+flen, dataBj, [](const cmplx& c) -> cmplx { return std::conj(c); });
 | |
|     } else {
 | |
|         std::transform(fftA->out(), fftA->out()+flen, dataBj, [](const cmplx& c) -> cmplx { return std::conj(c); });
 | |
|     }
 | |
| 
 | |
|     std::transform(fftA->out(), fftA->out()+flen, dataBj, fftInvA->in(), [](const cmplx& a, const cmplx& b) -> cmplx { return a*b; });
 | |
| 
 | |
|     fftInvA->transform();
 | |
|     std::copy(fftInvA->out(), fftInvA->out()+flen, dataP);
 | |
| 
 | |
|     std::fill(dataA, dataA+flen, 0);
 | |
|     inptrA = 0;
 | |
| 
 | |
|     if (inB)
 | |
|     {
 | |
|         std::fill(dataB, dataB+flen, 0);
 | |
|         inptrB = 0;
 | |
|     }
 | |
| 
 | |
|     *out = dataP;
 | |
|     return flen2;
 | |
| }
 | |
| 
 | |
| const fftcorr::cmplx& fftcorr::run(const cmplx& inA, const cmplx* inB)
 | |
| {
 | |
|     cmplx *dummy;
 | |
| 
 | |
|     if (run(inA, inB, &dummy)) {
 | |
|         outptr = 0;
 | |
|     }
 | |
| 
 | |
|     return dataP[outptr++];
 | |
| }
 |