forked from KolibriOS/kolibrios
180 lines
3.7 KiB
C
180 lines
3.7 KiB
C
|
/*
|
||
|
* This file is part of FFmpeg.
|
||
|
*
|
||
|
* FFmpeg is free software; you can redistribute it and/or
|
||
|
* modify it under the terms of the GNU Lesser General Public
|
||
|
* License as published by the Free Software Foundation; either
|
||
|
* version 2.1 of the License, or (at your option) any later version.
|
||
|
*
|
||
|
* FFmpeg 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
|
||
|
* Lesser General Public License for more details.
|
||
|
*
|
||
|
* You should have received a copy of the GNU Lesser General Public
|
||
|
* License along with FFmpeg; if not, write to the Free Software
|
||
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||
|
*/
|
||
|
|
||
|
#include "libavutil/attributes.h"
|
||
|
#include "libavutil/mem.h"
|
||
|
#include "avfft.h"
|
||
|
#include "fft.h"
|
||
|
#include "rdft.h"
|
||
|
#include "dct.h"
|
||
|
|
||
|
/* FFT */
|
||
|
|
||
|
FFTContext *av_fft_init(int nbits, int inverse)
|
||
|
{
|
||
|
FFTContext *s = av_mallocz(sizeof(*s));
|
||
|
|
||
|
if (s && ff_fft_init(s, nbits, inverse))
|
||
|
av_freep(&s);
|
||
|
|
||
|
return s;
|
||
|
}
|
||
|
|
||
|
void av_fft_permute(FFTContext *s, FFTComplex *z)
|
||
|
{
|
||
|
s->fft_permute(s, z);
|
||
|
}
|
||
|
|
||
|
void av_fft_calc(FFTContext *s, FFTComplex *z)
|
||
|
{
|
||
|
s->fft_calc(s, z);
|
||
|
}
|
||
|
|
||
|
av_cold void av_fft_end(FFTContext *s)
|
||
|
{
|
||
|
if (s) {
|
||
|
ff_fft_end(s);
|
||
|
av_free(s);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
#if CONFIG_MDCT
|
||
|
|
||
|
FFTContext *av_mdct_init(int nbits, int inverse, double scale)
|
||
|
{
|
||
|
FFTContext *s = av_malloc(sizeof(*s));
|
||
|
|
||
|
if (s && ff_mdct_init(s, nbits, inverse, scale))
|
||
|
av_freep(&s);
|
||
|
|
||
|
return s;
|
||
|
}
|
||
|
|
||
|
void av_imdct_calc(FFTContext *s, FFTSample *output, const FFTSample *input)
|
||
|
{
|
||
|
s->imdct_calc(s, output, input);
|
||
|
}
|
||
|
|
||
|
void av_imdct_half(FFTContext *s, FFTSample *output, const FFTSample *input)
|
||
|
{
|
||
|
s->imdct_half(s, output, input);
|
||
|
}
|
||
|
|
||
|
void av_mdct_calc(FFTContext *s, FFTSample *output, const FFTSample *input)
|
||
|
{
|
||
|
s->mdct_calc(s, output, input);
|
||
|
}
|
||
|
|
||
|
av_cold void av_mdct_end(FFTContext *s)
|
||
|
{
|
||
|
if (s) {
|
||
|
ff_mdct_end(s);
|
||
|
av_free(s);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
#endif /* CONFIG_MDCT */
|
||
|
|
||
|
#if CONFIG_RDFT
|
||
|
|
||
|
RDFTContext *av_rdft_init(int nbits, enum RDFTransformType trans)
|
||
|
{
|
||
|
RDFTContext *s = av_malloc(sizeof(*s));
|
||
|
|
||
|
if (s && ff_rdft_init(s, nbits, trans))
|
||
|
av_freep(&s);
|
||
|
|
||
|
return s;
|
||
|
}
|
||
|
|
||
|
void av_rdft_calc(RDFTContext *s, FFTSample *data)
|
||
|
{
|
||
|
s->rdft_calc(s, data);
|
||
|
}
|
||
|
|
||
|
av_cold void av_rdft_end(RDFTContext *s)
|
||
|
{
|
||
|
if (s) {
|
||
|
ff_rdft_end(s);
|
||
|
av_free(s);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
#endif /* CONFIG_RDFT */
|
||
|
|
||
|
#if CONFIG_DCT
|
||
|
|
||
|
DCTContext *av_dct_init(int nbits, enum DCTTransformType inverse)
|
||
|
{
|
||
|
DCTContext *s = av_malloc(sizeof(*s));
|
||
|
|
||
|
if (s && ff_dct_init(s, nbits, inverse))
|
||
|
av_freep(&s);
|
||
|
|
||
|
return s;
|
||
|
}
|
||
|
|
||
|
void av_dct_calc(DCTContext *s, FFTSample *data)
|
||
|
{
|
||
|
s->dct_calc(s, data);
|
||
|
}
|
||
|
|
||
|
av_cold void av_dct_end(DCTContext *s)
|
||
|
{
|
||
|
if (s) {
|
||
|
ff_dct_end(s);
|
||
|
av_free(s);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
#ifdef TEST
|
||
|
int main(int argc, char **argv)
|
||
|
{
|
||
|
int i;
|
||
|
#define LEN 1024
|
||
|
FFTSample *ref = av_malloc_array(LEN, sizeof(*ref));
|
||
|
FFTSample *data = av_malloc_array(LEN, sizeof(*data));
|
||
|
RDFTContext *rdft_context = av_rdft_init(10, DFT_R2C);
|
||
|
RDFTContext *irdft_context = av_rdft_init(10, IDFT_C2R);
|
||
|
|
||
|
if (!ref || !data || !rdft_context || !irdft_context)
|
||
|
return 2;
|
||
|
for (i=0; i<LEN; i++) {
|
||
|
ref[i] = data[i] = i*456 + 123 + i*i;
|
||
|
}
|
||
|
av_rdft_calc(rdft_context, data);
|
||
|
av_rdft_calc(irdft_context, data);
|
||
|
|
||
|
for (i=0; i<LEN; i++) {
|
||
|
if (fabs(ref[i] - data[i]/LEN*2) > 1) {
|
||
|
fprintf(stderr, "Failed at %d (%f %f)\n", i, ref[i], data[i]/LEN*2);
|
||
|
return 1;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
av_rdft_end(rdft_context);
|
||
|
av_rdft_end(irdft_context);
|
||
|
av_free(data);
|
||
|
av_free(ref);
|
||
|
|
||
|
return 0;
|
||
|
}
|
||
|
#endif
|
||
|
|
||
|
#endif /* CONFIG_DCT */
|