lpc_mmx.c
Go to the documentation of this file.
1 /*
2  * MMX optimized LPC DSP utils
3  * Copyright (c) 2007 Loren Merritt
4  *
5  * This file is part of Libav.
6  *
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.
11  *
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.
16  *
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
20  */
21 
22 #include "libavutil/x86_cpu.h"
23 #include "libavutil/cpu.h"
24 #include "libavcodec/lpc.h"
25 
26 static void lpc_apply_welch_window_sse2(const int32_t *data, int len,
27  double *w_data)
28 {
29  double c = 2.0 / (len-1.0);
30  int n2 = len>>1;
31  x86_reg i = -n2*sizeof(int32_t);
32  x86_reg j = n2*sizeof(int32_t);
33  __asm__ volatile(
34  "movsd %4, %%xmm7 \n\t"
35  "movapd "MANGLE(ff_pd_1)", %%xmm6 \n\t"
36  "movapd "MANGLE(ff_pd_2)", %%xmm5 \n\t"
37  "movlhps %%xmm7, %%xmm7 \n\t"
38  "subpd %%xmm5, %%xmm7 \n\t"
39  "addsd %%xmm6, %%xmm7 \n\t"
40  "test $1, %5 \n\t"
41  "jz 2f \n\t"
42 #define WELCH(MOVPD, offset)\
43  "1: \n\t"\
44  "movapd %%xmm7, %%xmm1 \n\t"\
45  "mulpd %%xmm1, %%xmm1 \n\t"\
46  "movapd %%xmm6, %%xmm0 \n\t"\
47  "subpd %%xmm1, %%xmm0 \n\t"\
48  "pshufd $0x4e, %%xmm0, %%xmm1 \n\t"\
49  "cvtpi2pd (%3,%0), %%xmm2 \n\t"\
50  "cvtpi2pd "#offset"*4(%3,%1), %%xmm3 \n\t"\
51  "mulpd %%xmm0, %%xmm2 \n\t"\
52  "mulpd %%xmm1, %%xmm3 \n\t"\
53  "movapd %%xmm2, (%2,%0,2) \n\t"\
54  MOVPD" %%xmm3, "#offset"*8(%2,%1,2) \n\t"\
55  "subpd %%xmm5, %%xmm7 \n\t"\
56  "sub $8, %1 \n\t"\
57  "add $8, %0 \n\t"\
58  "jl 1b \n\t"\
59 
60  WELCH("movupd", -1)
61  "jmp 3f \n\t"
62  "2: \n\t"
63  WELCH("movapd", -2)
64  "3: \n\t"
65  :"+&r"(i), "+&r"(j)
66  :"r"(w_data+n2), "r"(data+n2), "m"(c), "r"(len)
67  XMM_CLOBBERS_ONLY("%xmm0", "%xmm1", "%xmm2", "%xmm3",
68  "%xmm5", "%xmm6", "%xmm7")
69  );
70 #undef WELCH
71 }
72 
73 static void lpc_compute_autocorr_sse2(const double *data, int len, int lag,
74  double *autoc)
75 {
76  int j;
77 
78  if((x86_reg)data & 15)
79  data++;
80 
81  for(j=0; j<lag; j+=2){
82  x86_reg i = -len*sizeof(double);
83  if(j == lag-2) {
84  __asm__ volatile(
85  "movsd "MANGLE(ff_pd_1)", %%xmm0 \n\t"
86  "movsd "MANGLE(ff_pd_1)", %%xmm1 \n\t"
87  "movsd "MANGLE(ff_pd_1)", %%xmm2 \n\t"
88  "1: \n\t"
89  "movapd (%2,%0), %%xmm3 \n\t"
90  "movupd -8(%3,%0), %%xmm4 \n\t"
91  "movapd (%3,%0), %%xmm5 \n\t"
92  "mulpd %%xmm3, %%xmm4 \n\t"
93  "mulpd %%xmm3, %%xmm5 \n\t"
94  "mulpd -16(%3,%0), %%xmm3 \n\t"
95  "addpd %%xmm4, %%xmm1 \n\t"
96  "addpd %%xmm5, %%xmm0 \n\t"
97  "addpd %%xmm3, %%xmm2 \n\t"
98  "add $16, %0 \n\t"
99  "jl 1b \n\t"
100  "movhlps %%xmm0, %%xmm3 \n\t"
101  "movhlps %%xmm1, %%xmm4 \n\t"
102  "movhlps %%xmm2, %%xmm5 \n\t"
103  "addsd %%xmm3, %%xmm0 \n\t"
104  "addsd %%xmm4, %%xmm1 \n\t"
105  "addsd %%xmm5, %%xmm2 \n\t"
106  "movsd %%xmm0, (%1) \n\t"
107  "movsd %%xmm1, 8(%1) \n\t"
108  "movsd %%xmm2, 16(%1) \n\t"
109  :"+&r"(i)
110  :"r"(autoc+j), "r"(data+len), "r"(data+len-j)
111  :"memory"
112  );
113  } else {
114  __asm__ volatile(
115  "movsd "MANGLE(ff_pd_1)", %%xmm0 \n\t"
116  "movsd "MANGLE(ff_pd_1)", %%xmm1 \n\t"
117  "1: \n\t"
118  "movapd (%3,%0), %%xmm3 \n\t"
119  "movupd -8(%4,%0), %%xmm4 \n\t"
120  "mulpd %%xmm3, %%xmm4 \n\t"
121  "mulpd (%4,%0), %%xmm3 \n\t"
122  "addpd %%xmm4, %%xmm1 \n\t"
123  "addpd %%xmm3, %%xmm0 \n\t"
124  "add $16, %0 \n\t"
125  "jl 1b \n\t"
126  "movhlps %%xmm0, %%xmm3 \n\t"
127  "movhlps %%xmm1, %%xmm4 \n\t"
128  "addsd %%xmm3, %%xmm0 \n\t"
129  "addsd %%xmm4, %%xmm1 \n\t"
130  "movsd %%xmm0, %1 \n\t"
131  "movsd %%xmm1, %2 \n\t"
132  :"+&r"(i), "=m"(autoc[j]), "=m"(autoc[j+1])
133  :"r"(data+len), "r"(data+len-j)
134  );
135  }
136  }
137 }
138 
140 {
141  int mm_flags = av_get_cpu_flags();
142 
143  if (mm_flags & (AV_CPU_FLAG_SSE2|AV_CPU_FLAG_SSE2SLOW)) {
146  }
147 }