Mercurial > libavcodec.hg
diff fft-test.c @ 10944:0985f1f7ab72 libavcodec
Floating point discrete cosine transform
author | vitor |
---|---|
date | Wed, 20 Jan 2010 00:39:47 +0000 |
parents | 177ebc61c3d6 |
children | 4a8900c06c67 |
line wrap: on
line diff
--- a/fft-test.c Wed Jan 20 00:34:10 2010 +0000 +++ b/fft-test.c Wed Jan 20 00:39:47 2010 +0000 @@ -128,6 +128,39 @@ } } +static void idct_ref(float *output, float *input, int nbits) +{ + int n = 1<<nbits; + int k, i; + double a, s; + + /* do it by hand */ + for (i = 0; i < n; i++) { + s = 0.5 * input[0]; + for (k = 1; k < n; k++) { + a = M_PI*k*(i+0.5) / n; + s += input[k] * cos(a); + } + output[i] = 2 * s / n; + } +} +static void dct_ref(float *output, float *input, int nbits) +{ + int n = 1<<nbits; + int k, i; + double a, s; + + /* do it by hand */ + for (k = 0; k < n; k++) { + s = 0; + for (i = 0; i < n; i++) { + a = M_PI*k*(i+0.5) / n; + s += input[i] * cos(a); + } + output[k] = s; + } +} + static float frandom(AVLFG *prng) { @@ -166,6 +199,7 @@ "-h print this help\n" "-s speed test\n" "-m (I)MDCT test\n" + "-d (I)DCT test\n" "-i inverse transform test\n" "-n b set the transform size to 2^b\n" "-f x set scale factor for output data of (I)MDCT to x\n" @@ -177,6 +211,7 @@ TRANSFORM_FFT, TRANSFORM_MDCT, TRANSFORM_RDFT, + TRANSFORM_DCT, }; int main(int argc, char **argv) @@ -190,6 +225,7 @@ FFTContext s1, *s = &s1; FFTContext m1, *m = &m1; RDFTContext r1, *r = &r1; + DCTContext d1, *d = &d1; int fft_nbits, fft_size, fft_size_2; double scale = 1.0; AVLFG prng; @@ -197,7 +233,7 @@ fft_nbits = 9; for(;;) { - c = getopt(argc, argv, "hsimrn:f:"); + c = getopt(argc, argv, "hsimrdn:f:"); if (c == -1) break; switch(c) { @@ -216,6 +252,9 @@ case 'r': transform = TRANSFORM_RDFT; break; + case 'd': + transform = TRANSFORM_DCT; + break; case 'n': fft_nbits = atoi(optarg); break; @@ -257,6 +296,13 @@ ff_rdft_init(r, fft_nbits, do_inverse ? IRDFT : RDFT); fft_ref_init(fft_nbits, do_inverse); break; + case TRANSFORM_DCT: + if (do_inverse) + av_log(NULL, AV_LOG_INFO,"IDCT"); + else + av_log(NULL, AV_LOG_INFO,"DCT"); + ff_dct_init(d, fft_nbits, do_inverse); + break; } av_log(NULL, AV_LOG_INFO," %d test\n", fft_size); @@ -321,6 +367,17 @@ tab_ref[0].im = tab_ref[fft_size_2].re; check_diff((float *)tab_ref, (float *)tab2, fft_size, 1.0); } + break; + case TRANSFORM_DCT: + memcpy(tab, tab1, fft_size * sizeof(FFTComplex)); + ff_dct_calc(d, tab); + if (do_inverse) { + idct_ref(tab_ref, tab1, fft_nbits); + } else { + dct_ref(tab_ref, tab1, fft_nbits); + } + check_diff((float *)tab_ref, (float *)tab, fft_size, 1.0); + break; } /* do a speed test */ @@ -351,6 +408,10 @@ memcpy(tab2, tab1, fft_size * sizeof(FFTSample)); ff_rdft_calc(r, tab2); break; + case TRANSFORM_DCT: + memcpy(tab2, tab1, fft_size * sizeof(FFTSample)); + ff_dct_calc(d, tab2); + break; } } duration = gettime() - time_start; @@ -374,6 +435,9 @@ case TRANSFORM_RDFT: ff_rdft_end(r); break; + case TRANSFORM_DCT: + ff_dct_end(d); + break; } return 0; }