00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022 #include "libavutil/x86_cpu.h"
00023 #include "dsputil_mmx.h"
00024
00025 static void apply_welch_window_sse2(const int32_t *data, int len, double *w_data)
00026 {
00027 double c = 2.0 / (len-1.0);
00028 int n2 = len>>1;
00029 x86_reg i = -n2*sizeof(int32_t);
00030 x86_reg j = n2*sizeof(int32_t);
00031 __asm__ volatile(
00032 "movsd %4, %%xmm7 \n\t"
00033 "movapd "MANGLE(ff_pd_1)", %%xmm6 \n\t"
00034 "movapd "MANGLE(ff_pd_2)", %%xmm5 \n\t"
00035 "movlhps %%xmm7, %%xmm7 \n\t"
00036 "subpd %%xmm5, %%xmm7 \n\t"
00037 "addsd %%xmm6, %%xmm7 \n\t"
00038 "test $1, %5 \n\t"
00039 "jz 2f \n\t"
00040 #define WELCH(MOVPD, offset)\
00041 "1: \n\t"\
00042 "movapd %%xmm7, %%xmm1 \n\t"\
00043 "mulpd %%xmm1, %%xmm1 \n\t"\
00044 "movapd %%xmm6, %%xmm0 \n\t"\
00045 "subpd %%xmm1, %%xmm0 \n\t"\
00046 "pshufd $0x4e, %%xmm0, %%xmm1 \n\t"\
00047 "cvtpi2pd (%3,%0), %%xmm2 \n\t"\
00048 "cvtpi2pd "#offset"*4(%3,%1), %%xmm3 \n\t"\
00049 "mulpd %%xmm0, %%xmm2 \n\t"\
00050 "mulpd %%xmm1, %%xmm3 \n\t"\
00051 "movapd %%xmm2, (%2,%0,2) \n\t"\
00052 MOVPD" %%xmm3, "#offset"*8(%2,%1,2) \n\t"\
00053 "subpd %%xmm5, %%xmm7 \n\t"\
00054 "sub $8, %1 \n\t"\
00055 "add $8, %0 \n\t"\
00056 "jl 1b \n\t"\
00057
00058 WELCH("movupd", -1)
00059 "jmp 3f \n\t"
00060 "2: \n\t"
00061 WELCH("movapd", -2)
00062 "3: \n\t"
00063 :"+&r"(i), "+&r"(j)
00064 :"r"(w_data+n2), "r"(data+n2), "m"(c), "r"(len)
00065 XMM_CLOBBERS_ONLY("%xmm0", "%xmm1", "%xmm2", "%xmm3",
00066 "%xmm5", "%xmm6", "%xmm7")
00067 );
00068 #undef WELCH
00069 }
00070
00071 void ff_lpc_compute_autocorr_sse2(const int32_t *data, int len, int lag,
00072 double *autoc)
00073 {
00074 double tmp[len + lag + 2];
00075 double *data1 = tmp + lag;
00076 int j;
00077
00078 if((x86_reg)data1 & 15)
00079 data1++;
00080
00081 apply_welch_window_sse2(data, len, data1);
00082
00083 for(j=0; j<lag; j++)
00084 data1[j-lag]= 0.0;
00085 data1[len] = 0.0;
00086
00087 for(j=0; j<lag; j+=2){
00088 x86_reg i = -len*sizeof(double);
00089 if(j == lag-2) {
00090 __asm__ volatile(
00091 "movsd "MANGLE(ff_pd_1)", %%xmm0 \n\t"
00092 "movsd "MANGLE(ff_pd_1)", %%xmm1 \n\t"
00093 "movsd "MANGLE(ff_pd_1)", %%xmm2 \n\t"
00094 "1: \n\t"
00095 "movapd (%2,%0), %%xmm3 \n\t"
00096 "movupd -8(%3,%0), %%xmm4 \n\t"
00097 "movapd (%3,%0), %%xmm5 \n\t"
00098 "mulpd %%xmm3, %%xmm4 \n\t"
00099 "mulpd %%xmm3, %%xmm5 \n\t"
00100 "mulpd -16(%3,%0), %%xmm3 \n\t"
00101 "addpd %%xmm4, %%xmm1 \n\t"
00102 "addpd %%xmm5, %%xmm0 \n\t"
00103 "addpd %%xmm3, %%xmm2 \n\t"
00104 "add $16, %0 \n\t"
00105 "jl 1b \n\t"
00106 "movhlps %%xmm0, %%xmm3 \n\t"
00107 "movhlps %%xmm1, %%xmm4 \n\t"
00108 "movhlps %%xmm2, %%xmm5 \n\t"
00109 "addsd %%xmm3, %%xmm0 \n\t"
00110 "addsd %%xmm4, %%xmm1 \n\t"
00111 "addsd %%xmm5, %%xmm2 \n\t"
00112 "movsd %%xmm0, (%1) \n\t"
00113 "movsd %%xmm1, 8(%1) \n\t"
00114 "movsd %%xmm2, 16(%1) \n\t"
00115 :"+&r"(i)
00116 :"r"(autoc+j), "r"(data1+len), "r"(data1+len-j)
00117 :"memory"
00118 );
00119 } else {
00120 __asm__ volatile(
00121 "movsd "MANGLE(ff_pd_1)", %%xmm0 \n\t"
00122 "movsd "MANGLE(ff_pd_1)", %%xmm1 \n\t"
00123 "1: \n\t"
00124 "movapd (%3,%0), %%xmm3 \n\t"
00125 "movupd -8(%4,%0), %%xmm4 \n\t"
00126 "mulpd %%xmm3, %%xmm4 \n\t"
00127 "mulpd (%4,%0), %%xmm3 \n\t"
00128 "addpd %%xmm4, %%xmm1 \n\t"
00129 "addpd %%xmm3, %%xmm0 \n\t"
00130 "add $16, %0 \n\t"
00131 "jl 1b \n\t"
00132 "movhlps %%xmm0, %%xmm3 \n\t"
00133 "movhlps %%xmm1, %%xmm4 \n\t"
00134 "addsd %%xmm3, %%xmm0 \n\t"
00135 "addsd %%xmm4, %%xmm1 \n\t"
00136 "movsd %%xmm0, %1 \n\t"
00137 "movsd %%xmm1, %2 \n\t"
00138 :"+&r"(i), "=m"(autoc[j]), "=m"(autoc[j+1])
00139 :"r"(data1+len), "r"(data1+len-j)
00140 );
00141 }
00142 }
00143 }