2
* (c) 2011 Stefan Kost <ensonic@users.sf.net>
4
* This library is free software; you can redistribute it and/or
5
* modify it under the terms of the GNU Library General Public
6
* License as published by the Free Software Foundation; either
7
* version 2 of the License, or (at your option) any later version.
9
* This library is distributed in the hope that it will be useful,
10
* but WITHOUT ANY WARRANTY; without even the implied warranty of
11
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12
* Library General Public License for more details.
14
* You should have received a copy of the GNU Library General Public
15
* License along with this library; if not, write to the
16
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17
* Boston, MA 02111-1307, USA.
21
#include <gst/fft/gstffts16.h>
22
#include <gst/fft/gstffts32.h>
23
#include <gst/fft/gstfftf32.h>
24
#include <gst/fft/gstfftf64.h>
26
/* effectively max range seems to be 1/4 of what it should be */
28
#define MAKE_I_TEST(_g_,_G_,_t_,_T_,_f_) \
30
test_##_t_ (const gchar *test_name, gint num_freq, gint window) \
33
GstFFT ##_T_ ##Complex *fdata; \
35
_g_ maxfr = 0, maxfi = 0; \
36
gint num_samples = num_freq * 2 - 2; \
39
ctx = gst_fft_ ##_t_ ##_new (num_samples, FALSE); \
40
fdata = g_new (GstFFT ##_T_ ##Complex, num_freq); \
41
adata = g_new (_g_, num_samples); \
43
for (s = 0; s < num_samples;) { \
44
adata[s++]=G_MIN##_G_; \
45
adata[s++]=G_MAX##_G_; \
48
gst_fft_ ##_t_ ##_window (ctx, adata, window); \
49
gst_fft_ ##_t_ ##_fft (ctx, adata, fdata); \
51
for (f = 0; f < num_freq; f++) { \
52
if (fdata[1+f].r > maxfr) \
53
maxfr = fdata[1+f].r; \
54
if (fdata[1+f].i > maxfi) \
55
maxfi = fdata[1+f].i; \
58
printf (#_t_" %-15s: maxfr: %"_f_" %10.5f maxfi: %"_f_" %10.5f\n",\
60
maxfr, (gfloat)G_MAX##_G_/maxfr, \
61
maxfi, (gfloat)G_MAX##_G_/maxfi); \
63
gst_fft_ ##_t_ ##_free (ctx); \
68
MAKE_I_TEST (gint16, INT16, s16, S16, "6d");
69
MAKE_I_TEST (gint32, INT32, s32, S32, "9d");
71
#define MAKE_F_TEST(_g_,_G_,_t_,_T_,_f_) \
73
test_##_t_ (const gchar *test_name, gint num_freq, gint window) \
76
GstFFT ##_T_ ##Complex *fdata; \
78
_g_ maxfr = 0, maxfi = 0; \
79
gint num_samples = num_freq * 2 - 2; \
82
ctx = gst_fft_ ##_t_ ##_new (num_samples, FALSE); \
83
fdata = g_new (GstFFT ##_T_ ##Complex, num_freq); \
84
adata = g_new (_g_, num_samples); \
86
for (s = 0; s < num_samples;) { \
91
gst_fft_ ##_t_ ##_window (ctx, adata, window); \
92
gst_fft_ ##_t_ ##_fft (ctx, adata, fdata); \
94
for (f = 0; f < num_freq; f++) { \
95
if (fdata[1+f].r > maxfr) \
96
maxfr = fdata[1+f].r; \
97
if (fdata[1+f].i > maxfi) \
98
maxfi = fdata[1+f].i; \
101
printf (#_t_" %-15s: maxfr: %"_f_" %10.5f maxfi: %"_f_" %10.5f\n",\
103
maxfr, (gfloat)1.0/maxfr, \
104
maxfi, (gfloat)1.0/maxfi); \
106
gst_fft_ ##_t_ ##_free (ctx); \
111
MAKE_F_TEST (gfloat, FLOAT, f32, F32, "10.5f");
112
MAKE_F_TEST (gdouble, DOUBLE, f64, F64, "10.5f");
115
main (gint argc, gchar * argv[])
119
gst_init (&argc, &argv);
122
test_s16 ("200, none", num_bands, GST_FFT_WINDOW_RECTANGULAR);
123
test_s16 ("200, hamming", num_bands, GST_FFT_WINDOW_HAMMING);
124
test_s16 ("200, hann", num_bands, GST_FFT_WINDOW_HANN);
125
test_s16 ("200, bartlett", num_bands, GST_FFT_WINDOW_BARTLETT);
126
test_s16 ("200, blackman", num_bands, GST_FFT_WINDOW_BLACKMAN);
130
test_s16 ("300, none", num_bands, GST_FFT_WINDOW_RECTANGULAR);
131
test_s16 ("300, hamming", num_bands, GST_FFT_WINDOW_HAMMING);
132
test_s16 ("300, hann", num_bands, GST_FFT_WINDOW_HANN);
133
test_s16 ("300, bartlett", num_bands, GST_FFT_WINDOW_BARTLETT);
134
test_s16 ("300, blackman", num_bands, GST_FFT_WINDOW_BLACKMAN);
138
test_s32 ("200, none", num_bands, GST_FFT_WINDOW_RECTANGULAR);
139
test_s32 ("200, hamming", num_bands, GST_FFT_WINDOW_HAMMING);
140
test_s32 ("200, hann", num_bands, GST_FFT_WINDOW_HANN);
141
test_s32 ("200, bartlett", num_bands, GST_FFT_WINDOW_BARTLETT);
142
test_s32 ("200, blackman", num_bands, GST_FFT_WINDOW_BLACKMAN);
146
test_s32 ("300, none", num_bands, GST_FFT_WINDOW_RECTANGULAR);
147
test_s32 ("300, hamming", num_bands, GST_FFT_WINDOW_HAMMING);
148
test_s32 ("300, hann", num_bands, GST_FFT_WINDOW_HANN);
149
test_s32 ("300, bartlett", num_bands, GST_FFT_WINDOW_BARTLETT);
150
test_s32 ("300, blackman", num_bands, GST_FFT_WINDOW_BLACKMAN);
154
test_f32 ("200, none", num_bands, GST_FFT_WINDOW_RECTANGULAR);
155
test_f32 ("200, hamming", num_bands, GST_FFT_WINDOW_HAMMING);
156
test_f32 ("200, hann", num_bands, GST_FFT_WINDOW_HANN);
157
test_f32 ("200, bartlett", num_bands, GST_FFT_WINDOW_BARTLETT);
158
test_f32 ("200, blackman", num_bands, GST_FFT_WINDOW_BLACKMAN);
162
test_f32 ("300, none", num_bands, GST_FFT_WINDOW_RECTANGULAR);
163
test_f32 ("300, hamming", num_bands, GST_FFT_WINDOW_HAMMING);
164
test_f32 ("300, hann", num_bands, GST_FFT_WINDOW_HANN);
165
test_f32 ("300, bartlett", num_bands, GST_FFT_WINDOW_BARTLETT);
166
test_f32 ("300, blackman", num_bands, GST_FFT_WINDOW_BLACKMAN);
170
test_f64 ("200, none", num_bands, GST_FFT_WINDOW_RECTANGULAR);
171
test_f64 ("200, hamming", num_bands, GST_FFT_WINDOW_HAMMING);
172
test_f64 ("200, hann", num_bands, GST_FFT_WINDOW_HANN);
173
test_f64 ("200, bartlett", num_bands, GST_FFT_WINDOW_BARTLETT);
174
test_f64 ("200, blackman", num_bands, GST_FFT_WINDOW_BLACKMAN);
178
test_f64 ("300, none", num_bands, GST_FFT_WINDOW_RECTANGULAR);
179
test_f64 ("300, hamming", num_bands, GST_FFT_WINDOW_HAMMING);
180
test_f64 ("300, hann", num_bands, GST_FFT_WINDOW_HANN);
181
test_f64 ("300, bartlett", num_bands, GST_FFT_WINDOW_BARTLETT);
182
test_f64 ("300, blackman", num_bands, GST_FFT_WINDOW_BLACKMAN);