2 * MMX optimized LPC DSP utils
3 * Copyright (c) 2007 Loren Merritt
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/x86/asm.h"
23 #include "libavutil/attributes.h"
24 #include "libavutil/cpu.h"
25 #include "libavutil/internal.h"
26 #include "libavcodec/lpc.h"
30 static void lpc_apply_welch_window_sse2(const int32_t *data, int len,
33 double c = 2.0 / (len-1.0);
35 x86_reg i = -n2*sizeof(int32_t);
36 x86_reg j = n2*sizeof(int32_t);
38 "movsd %4, %%xmm7 \n\t"
39 "movapd "MANGLE(ff_pd_1)", %%xmm6 \n\t"
40 "movapd "MANGLE(ff_pd_2)", %%xmm5 \n\t"
41 "movlhps %%xmm7, %%xmm7 \n\t"
42 "subpd %%xmm5, %%xmm7 \n\t"
43 "addsd %%xmm6, %%xmm7 \n\t"
46 #define WELCH(MOVPD, offset)\
48 "movapd %%xmm7, %%xmm1 \n\t"\
49 "mulpd %%xmm1, %%xmm1 \n\t"\
50 "movapd %%xmm6, %%xmm0 \n\t"\
51 "subpd %%xmm1, %%xmm0 \n\t"\
52 "pshufd $0x4e, %%xmm0, %%xmm1 \n\t"\
53 "cvtpi2pd (%3,%0), %%xmm2 \n\t"\
54 "cvtpi2pd "#offset"*4(%3,%1), %%xmm3 \n\t"\
55 "mulpd %%xmm0, %%xmm2 \n\t"\
56 "mulpd %%xmm1, %%xmm3 \n\t"\
57 "movapd %%xmm2, (%2,%0,2) \n\t"\
58 MOVPD" %%xmm3, "#offset"*8(%2,%1,2) \n\t"\
59 "subpd %%xmm5, %%xmm7 \n\t"\
70 :"r"(w_data+n2), "r"(data+n2), "m"(c), "r"(len)
71 XMM_CLOBBERS_ONLY("%xmm0", "%xmm1", "%xmm2", "%xmm3",
72 "%xmm5", "%xmm6", "%xmm7")
77 static void lpc_compute_autocorr_sse2(const double *data, int len, int lag,
82 if((x86_reg)data & 15)
85 for(j=0; j<lag; j+=2){
86 x86_reg i = -len*sizeof(double);
89 "movsd "MANGLE(ff_pd_1)", %%xmm0 \n\t"
90 "movsd "MANGLE(ff_pd_1)", %%xmm1 \n\t"
91 "movsd "MANGLE(ff_pd_1)", %%xmm2 \n\t"
93 "movapd (%2,%0), %%xmm3 \n\t"
94 "movupd -8(%3,%0), %%xmm4 \n\t"
95 "movapd (%3,%0), %%xmm5 \n\t"
96 "mulpd %%xmm3, %%xmm4 \n\t"
97 "mulpd %%xmm3, %%xmm5 \n\t"
98 "mulpd -16(%3,%0), %%xmm3 \n\t"
99 "addpd %%xmm4, %%xmm1 \n\t"
100 "addpd %%xmm5, %%xmm0 \n\t"
101 "addpd %%xmm3, %%xmm2 \n\t"
104 "movhlps %%xmm0, %%xmm3 \n\t"
105 "movhlps %%xmm1, %%xmm4 \n\t"
106 "movhlps %%xmm2, %%xmm5 \n\t"
107 "addsd %%xmm3, %%xmm0 \n\t"
108 "addsd %%xmm4, %%xmm1 \n\t"
109 "addsd %%xmm5, %%xmm2 \n\t"
110 "movsd %%xmm0, (%1) \n\t"
111 "movsd %%xmm1, 8(%1) \n\t"
112 "movsd %%xmm2, 16(%1) \n\t"
114 :"r"(autoc+j), "r"(data+len), "r"(data+len-j)
119 "movsd "MANGLE(ff_pd_1)", %%xmm0 \n\t"
120 "movsd "MANGLE(ff_pd_1)", %%xmm1 \n\t"
122 "movapd (%3,%0), %%xmm3 \n\t"
123 "movupd -8(%4,%0), %%xmm4 \n\t"
124 "mulpd %%xmm3, %%xmm4 \n\t"
125 "mulpd (%4,%0), %%xmm3 \n\t"
126 "addpd %%xmm4, %%xmm1 \n\t"
127 "addpd %%xmm3, %%xmm0 \n\t"
130 "movhlps %%xmm0, %%xmm3 \n\t"
131 "movhlps %%xmm1, %%xmm4 \n\t"
132 "addsd %%xmm3, %%xmm0 \n\t"
133 "addsd %%xmm4, %%xmm1 \n\t"
134 "movsd %%xmm0, %1 \n\t"
135 "movsd %%xmm1, %2 \n\t"
136 :"+&r"(i), "=m"(autoc[j]), "=m"(autoc[j+1])
137 :"r"(data+len), "r"(data+len-j)
143 #endif /* HAVE_SSE2_INLINE */
145 av_cold void ff_lpc_init_x86(LPCContext *c)
148 int mm_flags = av_get_cpu_flags();
150 if (mm_flags & (AV_CPU_FLAG_SSE2|AV_CPU_FLAG_SSE2SLOW)) {
151 c->lpc_apply_welch_window = lpc_apply_welch_window_sse2;
152 c->lpc_compute_autocorr = lpc_compute_autocorr_sse2;
154 #endif /* HAVE_SSE2_INLINE */