2 * MMX optimized MP3 decoding functions
3 * Copyright (c) 2010 Vitor Sessak
5 * This file is part of Libav.
7 * Libav is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * Libav is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with Libav; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
22 #include "libavutil/cpu.h"
23 #include "libavutil/x86_cpu.h"
24 #include "libavcodec/dsputil.h"
25 #include "libavcodec/mpegaudiodsp.h"
27 void ff_imdct36_float_sse(float *out, float *buf, float *in, float *win);
28 void ff_imdct36_float_sse2(float *out, float *buf, float *in, float *win);
29 void ff_imdct36_float_sse3(float *out, float *buf, float *in, float *win);
30 void ff_imdct36_float_ssse3(float *out, float *buf, float *in, float *win);
31 void ff_imdct36_float_avx(float *out, float *buf, float *in, float *win);
32 void ff_four_imdct36_float_sse(float *out, float *buf, float *in, float *win,
34 void ff_four_imdct36_float_avx(float *out, float *buf, float *in, float *win,
37 DECLARE_ALIGNED(16, static float, mdct_win_sse)[2][4][4*40];
39 #define MACS(rt, ra, rb) rt+=(ra)*(rb)
40 #define MLSS(rt, ra, rb) rt-=(ra)*(rb)
42 #define SUM8(op, sum, w, p) \
44 op(sum, (w)[0 * 64], (p)[0 * 64]); \
45 op(sum, (w)[1 * 64], (p)[1 * 64]); \
46 op(sum, (w)[2 * 64], (p)[2 * 64]); \
47 op(sum, (w)[3 * 64], (p)[3 * 64]); \
48 op(sum, (w)[4 * 64], (p)[4 * 64]); \
49 op(sum, (w)[5 * 64], (p)[5 * 64]); \
50 op(sum, (w)[6 * 64], (p)[6 * 64]); \
51 op(sum, (w)[7 * 64], (p)[7 * 64]); \
54 static void apply_window(const float *buf, const float *win1,
55 const float *win2, float *sum1, float *sum2, int len)
57 x86_reg count = - 4*len;
58 const float *win1a = win1+len;
59 const float *win2a = win2+len;
60 const float *bufa = buf+len;
61 float *sum1a = sum1+len;
62 float *sum2a = sum2+len;
66 "movaps " #a "(%1,%0), %%xmm1 \n\t" \
67 "movaps " #a "(%3,%0), %%xmm2 \n\t" \
68 "mulps %%xmm2, %%xmm1 \n\t" \
69 "subps %%xmm1, %%xmm0 \n\t" \
70 "mulps " #b "(%2,%0), %%xmm2 \n\t" \
71 "subps %%xmm2, %%xmm4 \n\t" \
75 "xorps %%xmm0, %%xmm0 \n\t"
76 "xorps %%xmm4, %%xmm4 \n\t"
87 "movaps %%xmm0, (%4,%0) \n\t"
88 "movaps %%xmm4, (%5,%0) \n\t"
92 :"r"(win1a), "r"(win2a), "r"(bufa), "r"(sum1a), "r"(sum2a)
98 static void apply_window_mp3(float *in, float *win, int *unused, float *out,
101 LOCAL_ALIGNED_16(float, suma, [17]);
102 LOCAL_ALIGNED_16(float, sumb, [17]);
103 LOCAL_ALIGNED_16(float, sumc, [17]);
104 LOCAL_ALIGNED_16(float, sumd, [17]);
108 /* copy to avoid wrap */
110 "movaps 0(%0), %%xmm0 \n\t" \
111 "movaps 16(%0), %%xmm1 \n\t" \
112 "movaps 32(%0), %%xmm2 \n\t" \
113 "movaps 48(%0), %%xmm3 \n\t" \
114 "movaps %%xmm0, 0(%1) \n\t" \
115 "movaps %%xmm1, 16(%1) \n\t" \
116 "movaps %%xmm2, 32(%1) \n\t" \
117 "movaps %%xmm3, 48(%1) \n\t" \
118 "movaps 64(%0), %%xmm0 \n\t" \
119 "movaps 80(%0), %%xmm1 \n\t" \
120 "movaps 96(%0), %%xmm2 \n\t" \
121 "movaps 112(%0), %%xmm3 \n\t" \
122 "movaps %%xmm0, 64(%1) \n\t" \
123 "movaps %%xmm1, 80(%1) \n\t" \
124 "movaps %%xmm2, 96(%1) \n\t" \
125 "movaps %%xmm3, 112(%1) \n\t"
126 ::"r"(in), "r"(in+512)
130 apply_window(in + 16, win , win + 512, suma, sumc, 16);
131 apply_window(in + 32, win + 48, win + 640, sumb, sumd, 16);
133 SUM8(MACS, suma[0], win + 32, in + 48);
139 #define SUMS(suma, sumb, sumc, sumd, out1, out2) \
140 "movups " #sumd "(%4), %%xmm0 \n\t" \
141 "shufps $0x1b, %%xmm0, %%xmm0 \n\t" \
142 "subps " #suma "(%1), %%xmm0 \n\t" \
143 "movaps %%xmm0," #out1 "(%0) \n\t" \
145 "movups " #sumc "(%3), %%xmm0 \n\t" \
146 "shufps $0x1b, %%xmm0, %%xmm0 \n\t" \
147 "addps " #sumb "(%2), %%xmm0 \n\t" \
148 "movaps %%xmm0," #out2 "(%0) \n\t"
152 SUMS( 0, 48, 4, 52, 0, 112)
153 SUMS(16, 32, 20, 36, 16, 96)
154 SUMS(32, 16, 36, 20, 32, 80)
155 SUMS(48, 0, 52, 4, 48, 64)
158 :"r"(&suma[0]), "r"(&sumb[0]), "r"(&sumc[0]), "r"(&sumd[0])
164 float *out2 = out + 32 * incr;
169 *out = -suma[ j] + sumd[16-j];
170 *out2 = sumb[16-j] + sumc[ j];
177 SUM8(MLSS, sum, win + 16 + 32, in + 32);
182 #define DECL_IMDCT_BLOCKS(CPU1, CPU2) \
183 static void imdct36_blocks_ ## CPU1(float *out, float *buf, float *in, \
184 int count, int switch_point, int block_type) \
186 int align_end = count - (count & 3); \
188 for (j = 0; j < align_end; j+= 4) { \
189 LOCAL_ALIGNED_16(float, tmpbuf, [1024]); \
190 float *win = mdct_win_sse[switch_point && j < 4][block_type]; \
191 /* apply window & overlap with previous buffer */ \
193 /* select window */ \
194 ff_four_imdct36_float_ ## CPU2(out, buf, in, win, tmpbuf); \
199 for (; j < count; j++) { \
200 /* apply window & overlap with previous buffer */ \
202 /* select window */ \
203 int win_idx = (switch_point && j < 2) ? 0 : block_type; \
204 float *win = ff_mdct_win_float[win_idx + (4 & -(j & 1))]; \
206 ff_imdct36_float_ ## CPU1(out, buf, in, win); \
214 DECL_IMDCT_BLOCKS(sse,sse)
215 DECL_IMDCT_BLOCKS(sse2,sse)
216 DECL_IMDCT_BLOCKS(sse3,sse)
217 DECL_IMDCT_BLOCKS(ssse3,sse)
218 DECL_IMDCT_BLOCKS(avx,avx)
220 void ff_mpadsp_init_mmx(MPADSPContext *s)
222 int mm_flags = av_get_cpu_flags();
225 for (j = 0; j < 4; j++) {
226 for (i = 0; i < 40; i ++) {
227 mdct_win_sse[0][j][4*i ] = ff_mdct_win_float[j ][i];
228 mdct_win_sse[0][j][4*i + 1] = ff_mdct_win_float[j + 4][i];
229 mdct_win_sse[0][j][4*i + 2] = ff_mdct_win_float[j ][i];
230 mdct_win_sse[0][j][4*i + 3] = ff_mdct_win_float[j + 4][i];
231 mdct_win_sse[1][j][4*i ] = ff_mdct_win_float[0 ][i];
232 mdct_win_sse[1][j][4*i + 1] = ff_mdct_win_float[4 ][i];
233 mdct_win_sse[1][j][4*i + 2] = ff_mdct_win_float[j ][i];
234 mdct_win_sse[1][j][4*i + 3] = ff_mdct_win_float[j + 4][i];
238 if (mm_flags & AV_CPU_FLAG_SSE2) {
239 s->apply_window_float = apply_window_mp3;
242 if (mm_flags & AV_CPU_FLAG_AVX && HAVE_AVX) {
243 s->imdct36_blocks_float = imdct36_blocks_avx;
245 } else if (mm_flags & AV_CPU_FLAG_SSSE3) {
246 s->imdct36_blocks_float = imdct36_blocks_ssse3;
247 } else if (mm_flags & AV_CPU_FLAG_SSE3) {
248 s->imdct36_blocks_float = imdct36_blocks_sse3;
249 } else if (mm_flags & AV_CPU_FLAG_SSE2) {
250 s->imdct36_blocks_float = imdct36_blocks_sse2;
251 } else if (mm_flags & AV_CPU_FLAG_SSE) {
252 s->imdct36_blocks_float = imdct36_blocks_sse;
253 #endif /* HAVE_SSE */
255 #endif /* HAVE_YASM */