interlaced motion estimation
[libav.git] / libavcodec / i386 / motion_est_mmx.c
CommitLineData
694ec061
FB
1/*
2 * MMX optimized motion estimation
ff4ec49e 3 * Copyright (c) 2001 Fabrice Bellard.
694ec061 4 *
ff4ec49e
FB
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
694ec061 9 *
ff4ec49e 10 * This library is distributed in the hope that it will be useful,
694ec061 11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
ff4ec49e
FB
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
694ec061 14 *
ff4ec49e
FB
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
694ec061 18 *
ba6802de 19 * mostly by Michael Niedermayer <michaelni@gmx.at>
694ec061
FB
20 */
21#include "../dsputil.h"
694ec061 22
0c1a9eda 23static const __attribute__ ((aligned(8))) uint64_t round_tab[3]={
1b245cc2
PI
240x0000000000000000ULL,
250x0001000100010001ULL,
260x0002000200020002ULL,
ba6802de 27};
694ec061 28
b1609412 29static __attribute__ ((aligned(8), unused)) uint64_t bone= 0x0101010101010101LL;
ba8d0be9 30
bb198e19 31static inline void sad8_1_mmx(uint8_t *blk1, uint8_t *blk2, int stride, int h)
694ec061 32{
bb198e19 33 int len= -(stride*h);
ba6802de
MN
34 asm volatile(
35 ".balign 16 \n\t"
36 "1: \n\t"
37 "movq (%1, %%eax), %%mm0 \n\t"
38 "movq (%2, %%eax), %%mm2 \n\t"
39 "movq (%2, %%eax), %%mm4 \n\t"
40 "addl %3, %%eax \n\t"
41 "psubusb %%mm0, %%mm2 \n\t"
42 "psubusb %%mm4, %%mm0 \n\t"
43 "movq (%1, %%eax), %%mm1 \n\t"
44 "movq (%2, %%eax), %%mm3 \n\t"
45 "movq (%2, %%eax), %%mm5 \n\t"
46 "psubusb %%mm1, %%mm3 \n\t"
47 "psubusb %%mm5, %%mm1 \n\t"
48 "por %%mm2, %%mm0 \n\t"
49 "por %%mm1, %%mm3 \n\t"
50 "movq %%mm0, %%mm1 \n\t"
51 "movq %%mm3, %%mm2 \n\t"
52 "punpcklbw %%mm7, %%mm0 \n\t"
53 "punpckhbw %%mm7, %%mm1 \n\t"
54 "punpcklbw %%mm7, %%mm3 \n\t"
55 "punpckhbw %%mm7, %%mm2 \n\t"
56 "paddw %%mm1, %%mm0 \n\t"
57 "paddw %%mm3, %%mm2 \n\t"
58 "paddw %%mm2, %%mm0 \n\t"
59 "paddw %%mm0, %%mm6 \n\t"
60 "addl %3, %%eax \n\t"
61 " js 1b \n\t"
62 : "+a" (len)
63 : "r" (blk1 - len), "r" (blk2 - len), "r" (stride)
64 );
694ec061
FB
65}
66
bb198e19 67static inline void sad8_1_mmx2(uint8_t *blk1, uint8_t *blk2, int stride, int h)
694ec061 68{
bb198e19 69 int len= -(stride*h);
ba6802de
MN
70 asm volatile(
71 ".balign 16 \n\t"
72 "1: \n\t"
73 "movq (%1, %%eax), %%mm0 \n\t"
74 "movq (%2, %%eax), %%mm2 \n\t"
75 "psadbw %%mm2, %%mm0 \n\t"
76 "addl %3, %%eax \n\t"
77 "movq (%1, %%eax), %%mm1 \n\t"
78 "movq (%2, %%eax), %%mm3 \n\t"
79 "psadbw %%mm1, %%mm3 \n\t"
80 "paddw %%mm3, %%mm0 \n\t"
81 "paddw %%mm0, %%mm6 \n\t"
82 "addl %3, %%eax \n\t"
83 " js 1b \n\t"
84 : "+a" (len)
85 : "r" (blk1 - len), "r" (blk2 - len), "r" (stride)
86 );
694ec061
FB
87}
88
0c1a9eda 89static inline void sad8_2_mmx2(uint8_t *blk1a, uint8_t *blk1b, uint8_t *blk2, int stride, int h)
694ec061 90{
bb198e19 91 int len= -(stride*h);
ba6802de
MN
92 asm volatile(
93 ".balign 16 \n\t"
94 "1: \n\t"
95 "movq (%1, %%eax), %%mm0 \n\t"
96 "movq (%2, %%eax), %%mm2 \n\t"
97 "pavgb %%mm2, %%mm0 \n\t"
98 "movq (%3, %%eax), %%mm2 \n\t"
99 "psadbw %%mm2, %%mm0 \n\t"
100 "addl %4, %%eax \n\t"
101 "movq (%1, %%eax), %%mm1 \n\t"
102 "movq (%2, %%eax), %%mm3 \n\t"
103 "pavgb %%mm1, %%mm3 \n\t"
104 "movq (%3, %%eax), %%mm1 \n\t"
105 "psadbw %%mm1, %%mm3 \n\t"
106 "paddw %%mm3, %%mm0 \n\t"
107 "paddw %%mm0, %%mm6 \n\t"
108 "addl %4, %%eax \n\t"
109 " js 1b \n\t"
110 : "+a" (len)
111 : "r" (blk1a - len), "r" (blk1b -len), "r" (blk2 - len), "r" (stride)
112 );
694ec061
FB
113}
114
0c1a9eda 115static inline void sad8_4_mmx2(uint8_t *blk1, uint8_t *blk2, int stride, int h)
ba6802de 116{ //FIXME reuse src
bb198e19 117 int len= -(stride*h);
ba6802de
MN
118 asm volatile(
119 ".balign 16 \n\t"
ba8d0be9 120 "movq "MANGLE(bone)", %%mm5 \n\t"
5c91a675 121 "1: \n\t"
ba6802de
MN
122 "movq (%1, %%eax), %%mm0 \n\t"
123 "movq (%2, %%eax), %%mm2 \n\t"
124 "movq 1(%1, %%eax), %%mm1 \n\t"
125 "movq 1(%2, %%eax), %%mm3 \n\t"
126 "pavgb %%mm2, %%mm0 \n\t"
127 "pavgb %%mm1, %%mm3 \n\t"
ba8d0be9 128 "psubusb %%mm5, %%mm3 \n\t"
ba6802de
MN
129 "pavgb %%mm3, %%mm0 \n\t"
130 "movq (%3, %%eax), %%mm2 \n\t"
131 "psadbw %%mm2, %%mm0 \n\t"
132 "addl %4, %%eax \n\t"
133 "movq (%1, %%eax), %%mm1 \n\t"
134 "movq (%2, %%eax), %%mm3 \n\t"
135 "movq 1(%1, %%eax), %%mm2 \n\t"
136 "movq 1(%2, %%eax), %%mm4 \n\t"
137 "pavgb %%mm3, %%mm1 \n\t"
138 "pavgb %%mm4, %%mm2 \n\t"
ba8d0be9 139 "psubusb %%mm5, %%mm2 \n\t"
ba6802de
MN
140 "pavgb %%mm1, %%mm2 \n\t"
141 "movq (%3, %%eax), %%mm1 \n\t"
142 "psadbw %%mm1, %%mm2 \n\t"
143 "paddw %%mm2, %%mm0 \n\t"
144 "paddw %%mm0, %%mm6 \n\t"
145 "addl %4, %%eax \n\t"
146 " js 1b \n\t"
147 : "+a" (len)
148 : "r" (blk1 - len), "r" (blk1 - len + stride), "r" (blk2 - len), "r" (stride)
149 );
694ec061
FB
150}
151
0c1a9eda 152static inline void sad8_2_mmx(uint8_t *blk1a, uint8_t *blk1b, uint8_t *blk2, int stride, int h)
694ec061 153{
bb198e19 154 int len= -(stride*h);
ba6802de
MN
155 asm volatile(
156 ".balign 16 \n\t"
157 "1: \n\t"
158 "movq (%1, %%eax), %%mm0 \n\t"
159 "movq (%2, %%eax), %%mm1 \n\t"
160 "movq (%1, %%eax), %%mm2 \n\t"
161 "movq (%2, %%eax), %%mm3 \n\t"
162 "punpcklbw %%mm7, %%mm0 \n\t"
163 "punpcklbw %%mm7, %%mm1 \n\t"
164 "punpckhbw %%mm7, %%mm2 \n\t"
165 "punpckhbw %%mm7, %%mm3 \n\t"
166 "paddw %%mm0, %%mm1 \n\t"
167 "paddw %%mm2, %%mm3 \n\t"
5c91a675 168 "movq (%3, %%eax), %%mm4 \n\t"
ba6802de
MN
169 "movq (%3, %%eax), %%mm2 \n\t"
170 "paddw %%mm5, %%mm1 \n\t"
171 "paddw %%mm5, %%mm3 \n\t"
172 "psrlw $1, %%mm1 \n\t"
173 "psrlw $1, %%mm3 \n\t"
174 "packuswb %%mm3, %%mm1 \n\t"
175 "psubusb %%mm1, %%mm4 \n\t"
176 "psubusb %%mm2, %%mm1 \n\t"
177 "por %%mm4, %%mm1 \n\t"
178 "movq %%mm1, %%mm0 \n\t"
179 "punpcklbw %%mm7, %%mm0 \n\t"
180 "punpckhbw %%mm7, %%mm1 \n\t"
181 "paddw %%mm1, %%mm0 \n\t"
182 "paddw %%mm0, %%mm6 \n\t"
183 "addl %4, %%eax \n\t"
184 " js 1b \n\t"
185 : "+a" (len)
186 : "r" (blk1a - len), "r" (blk1b -len), "r" (blk2 - len), "r" (stride)
187 );
694ec061
FB
188}
189
0c1a9eda 190static inline void sad8_4_mmx(uint8_t *blk1, uint8_t *blk2, int stride, int h)
694ec061 191{
bb198e19 192 int len= -(stride*h);
ba6802de
MN
193 asm volatile(
194 ".balign 16 \n\t"
195 "1: \n\t"
196 "movq (%1, %%eax), %%mm0 \n\t"
197 "movq (%2, %%eax), %%mm1 \n\t"
198 "movq %%mm0, %%mm4 \n\t"
199 "movq %%mm1, %%mm2 \n\t"
200 "punpcklbw %%mm7, %%mm0 \n\t"
201 "punpcklbw %%mm7, %%mm1 \n\t"
202 "punpckhbw %%mm7, %%mm4 \n\t"
203 "punpckhbw %%mm7, %%mm2 \n\t"
204 "paddw %%mm1, %%mm0 \n\t"
205 "paddw %%mm2, %%mm4 \n\t"
206 "movq 1(%1, %%eax), %%mm2 \n\t"
207 "movq 1(%2, %%eax), %%mm3 \n\t"
208 "movq %%mm2, %%mm1 \n\t"
209 "punpcklbw %%mm7, %%mm2 \n\t"
210 "punpckhbw %%mm7, %%mm1 \n\t"
211 "paddw %%mm0, %%mm2 \n\t"
212 "paddw %%mm4, %%mm1 \n\t"
213 "movq %%mm3, %%mm4 \n\t"
214 "punpcklbw %%mm7, %%mm3 \n\t"
215 "punpckhbw %%mm7, %%mm4 \n\t"
216 "paddw %%mm3, %%mm2 \n\t"
217 "paddw %%mm4, %%mm1 \n\t"
5c91a675
ZK
218 "movq (%3, %%eax), %%mm3 \n\t"
219 "movq (%3, %%eax), %%mm4 \n\t"
ba6802de
MN
220 "paddw %%mm5, %%mm2 \n\t"
221 "paddw %%mm5, %%mm1 \n\t"
222 "psrlw $2, %%mm2 \n\t"
223 "psrlw $2, %%mm1 \n\t"
224 "packuswb %%mm1, %%mm2 \n\t"
225 "psubusb %%mm2, %%mm3 \n\t"
226 "psubusb %%mm4, %%mm2 \n\t"
227 "por %%mm3, %%mm2 \n\t"
228 "movq %%mm2, %%mm0 \n\t"
229 "punpcklbw %%mm7, %%mm0 \n\t"
230 "punpckhbw %%mm7, %%mm2 \n\t"
231 "paddw %%mm2, %%mm0 \n\t"
232 "paddw %%mm0, %%mm6 \n\t"
233 "addl %4, %%eax \n\t"
234 " js 1b \n\t"
235 : "+a" (len)
236 : "r" (blk1 - len), "r" (blk1 -len + stride), "r" (blk2 - len), "r" (stride)
237 );
694ec061
FB
238}
239
5c91a675 240static inline int sum_mmx(void)
694ec061 241{
ba6802de
MN
242 int ret;
243 asm volatile(
244 "movq %%mm6, %%mm0 \n\t"
245 "psrlq $32, %%mm6 \n\t"
246 "paddw %%mm0, %%mm6 \n\t"
247 "movq %%mm6, %%mm0 \n\t"
248 "psrlq $16, %%mm6 \n\t"
249 "paddw %%mm0, %%mm6 \n\t"
250 "movd %%mm6, %0 \n\t"
251 : "=r" (ret)
252 );
253 return ret&0xFFFF;
694ec061
FB
254}
255
5c91a675 256static inline int sum_mmx2(void)
694ec061 257{
ba6802de
MN
258 int ret;
259 asm volatile(
260 "movd %%mm6, %0 \n\t"
261 : "=r" (ret)
262 );
263 return ret;
694ec061
FB
264}
265
843342ef 266
ba6802de 267#define PIX_SAD(suf)\
bb198e19 268static int sad8_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
ba6802de 269{\
bb198e19 270 assert(h==8);\
ba6802de
MN
271 asm volatile("pxor %%mm7, %%mm7 \n\t"\
272 "pxor %%mm6, %%mm6 \n\t":);\
273\
bb198e19 274 sad8_1_ ## suf(blk1, blk2, stride, 8);\
ba6802de
MN
275\
276 return sum_ ## suf();\
277}\
bb198e19 278static int sad8_x2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
ba6802de 279{\
bb198e19 280 assert(h==8);\
ba6802de
MN
281 asm volatile("pxor %%mm7, %%mm7 \n\t"\
282 "pxor %%mm6, %%mm6 \n\t"\
283 "movq %0, %%mm5 \n\t"\
284 :: "m"(round_tab[1]) \
285 );\
286\
bb198e19 287 sad8_2_ ## suf(blk1, blk1+1, blk2, stride, 8);\
ba6802de
MN
288\
289 return sum_ ## suf();\
290}\
291\
bb198e19 292static int sad8_y2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
ba6802de 293{\
bb198e19 294 assert(h==8);\
ba6802de
MN
295 asm volatile("pxor %%mm7, %%mm7 \n\t"\
296 "pxor %%mm6, %%mm6 \n\t"\
297 "movq %0, %%mm5 \n\t"\
298 :: "m"(round_tab[1]) \
299 );\
300\
bb198e19 301 sad8_2_ ## suf(blk1, blk1+stride, blk2, stride, 8);\
ba6802de
MN
302\
303 return sum_ ## suf();\
304}\
305\
bb198e19 306static int sad8_xy2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
ba6802de 307{\
bb198e19 308 assert(h==8);\
ba6802de
MN
309 asm volatile("pxor %%mm7, %%mm7 \n\t"\
310 "pxor %%mm6, %%mm6 \n\t"\
311 "movq %0, %%mm5 \n\t"\
312 :: "m"(round_tab[2]) \
313 );\
314\
bb198e19 315 sad8_4_ ## suf(blk1, blk2, stride, 8);\
ba6802de
MN
316\
317 return sum_ ## suf();\
318}\
319\
bb198e19 320static int sad16_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
1457ab52
MN
321{\
322 asm volatile("pxor %%mm7, %%mm7 \n\t"\
323 "pxor %%mm6, %%mm6 \n\t":);\
324\
bb198e19
MN
325 sad8_1_ ## suf(blk1 , blk2 , stride, h);\
326 sad8_1_ ## suf(blk1+8, blk2+8, stride, h);\
1457ab52
MN
327\
328 return sum_ ## suf();\
329}\
bb198e19 330static int sad16_x2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
ba6802de
MN
331{\
332 asm volatile("pxor %%mm7, %%mm7 \n\t"\
333 "pxor %%mm6, %%mm6 \n\t"\
334 "movq %0, %%mm5 \n\t"\
335 :: "m"(round_tab[1]) \
336 );\
337\
bb198e19
MN
338 sad8_2_ ## suf(blk1 , blk1+1, blk2 , stride, h);\
339 sad8_2_ ## suf(blk1+8, blk1+9, blk2+8, stride, h);\
ba6802de
MN
340\
341 return sum_ ## suf();\
342}\
bb198e19 343static int sad16_y2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
ba6802de
MN
344{\
345 asm volatile("pxor %%mm7, %%mm7 \n\t"\
346 "pxor %%mm6, %%mm6 \n\t"\
347 "movq %0, %%mm5 \n\t"\
348 :: "m"(round_tab[1]) \
349 );\
350\
bb198e19
MN
351 sad8_2_ ## suf(blk1 , blk1+stride, blk2 , stride, h);\
352 sad8_2_ ## suf(blk1+8, blk1+stride+8,blk2+8, stride, h);\
ba6802de
MN
353\
354 return sum_ ## suf();\
355}\
bb198e19 356static int sad16_xy2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
ba6802de
MN
357{\
358 asm volatile("pxor %%mm7, %%mm7 \n\t"\
359 "pxor %%mm6, %%mm6 \n\t"\
360 "movq %0, %%mm5 \n\t"\
361 :: "m"(round_tab[2]) \
362 );\
363\
bb198e19
MN
364 sad8_4_ ## suf(blk1 , blk2 , stride, h);\
365 sad8_4_ ## suf(blk1+8, blk2+8, stride, h);\
ba6802de
MN
366\
367 return sum_ ## suf();\
368}\
694ec061 369
ba6802de
MN
370PIX_SAD(mmx)
371PIX_SAD(mmx2)
5c91a675 372
b0368839 373void dsputil_init_pix_mmx(DSPContext* c, AVCodecContext *avctx)
5c91a675
ZK
374{
375 if (mm_flags & MM_MMX) {
bb198e19
MN
376 c->pix_abs[0][0] = sad16_mmx;
377 c->pix_abs[0][1] = sad16_x2_mmx;
378 c->pix_abs[0][2] = sad16_y2_mmx;
379 c->pix_abs[0][3] = sad16_xy2_mmx;
380 c->pix_abs[1][0] = sad8_mmx;
381 c->pix_abs[1][1] = sad8_x2_mmx;
382 c->pix_abs[1][2] = sad8_y2_mmx;
383 c->pix_abs[1][3] = sad8_xy2_mmx;
5c91a675 384
bb198e19
MN
385 c->sad[0]= sad16_mmx;
386 c->sad[1]= sad8_mmx;
5c91a675
ZK
387 }
388 if (mm_flags & MM_MMXEXT) {
bb198e19
MN
389 c->pix_abs[0][0] = sad16_mmx2;
390 c->pix_abs[1][0] = sad8_mmx2;
5c91a675 391
bb198e19
MN
392 c->sad[0]= sad16_mmx2;
393 c->sad[1]= sad8_mmx2;
b0368839
MN
394
395 if(!(avctx->flags & CODEC_FLAG_BITEXACT)){
bb198e19
MN
396 c->pix_abs[0][1] = sad16_x2_mmx2;
397 c->pix_abs[0][2] = sad16_y2_mmx2;
398 c->pix_abs[0][3] = sad16_xy2_mmx2;
399 c->pix_abs[1][1] = sad8_x2_mmx2;
400 c->pix_abs[1][2] = sad8_y2_mmx2;
401 c->pix_abs[1][3] = sad8_xy2_mmx2;
b0368839 402 }
5c91a675
ZK
403 }
404}