2 * MMX optimized motion estimation
3 * Copyright (c) 2001 Fabrice Bellard.
4 * Copyright (c) 2002-2004 Michael Niedermayer
6 * mostly by Michael Niedermayer <michaelni@gmx.at>
8 * This file is part of FFmpeg.
10 * FFmpeg is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU Lesser General Public
12 * License as published by the Free Software Foundation; either
13 * version 2.1 of the License, or (at your option) any later version.
15 * FFmpeg is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 * Lesser General Public License for more details.
20 * You should have received a copy of the GNU Lesser General Public
21 * License along with FFmpeg; if not, write to the Free Software
22 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
25 #include "libavutil/x86_cpu.h"
26 #include "libavcodec/dsputil.h"
28 DECLARE_ASM_CONST(8, uint64_t, round_tab
[3])={
29 0x0000000000000000ULL
,
30 0x0001000100010001ULL
,
31 0x0002000200020002ULL
,
34 DECLARE_ASM_CONST(8, uint64_t, bone
)= 0x0101010101010101LL
;
36 static inline void sad8_1_mmx(uint8_t *blk1
, uint8_t *blk2
, int stride
, int h
)
38 x86_reg len
= -(stride
*h
);
42 "movq (%1, %%"REG_a
"), %%mm0 \n\t"
43 "movq (%2, %%"REG_a
"), %%mm2 \n\t"
44 "movq (%2, %%"REG_a
"), %%mm4 \n\t"
45 "add %3, %%"REG_a
" \n\t"
46 "psubusb %%mm0, %%mm2 \n\t"
47 "psubusb %%mm4, %%mm0 \n\t"
48 "movq (%1, %%"REG_a
"), %%mm1 \n\t"
49 "movq (%2, %%"REG_a
"), %%mm3 \n\t"
50 "movq (%2, %%"REG_a
"), %%mm5 \n\t"
51 "psubusb %%mm1, %%mm3 \n\t"
52 "psubusb %%mm5, %%mm1 \n\t"
53 "por %%mm2, %%mm0 \n\t"
54 "por %%mm1, %%mm3 \n\t"
55 "movq %%mm0, %%mm1 \n\t"
56 "movq %%mm3, %%mm2 \n\t"
57 "punpcklbw %%mm7, %%mm0 \n\t"
58 "punpckhbw %%mm7, %%mm1 \n\t"
59 "punpcklbw %%mm7, %%mm3 \n\t"
60 "punpckhbw %%mm7, %%mm2 \n\t"
61 "paddw %%mm1, %%mm0 \n\t"
62 "paddw %%mm3, %%mm2 \n\t"
63 "paddw %%mm2, %%mm0 \n\t"
64 "paddw %%mm0, %%mm6 \n\t"
65 "add %3, %%"REG_a
" \n\t"
68 : "r" (blk1
- len
), "r" (blk2
- len
), "r" ((x86_reg
)stride
)
72 static inline void sad8_1_mmx2(uint8_t *blk1
, uint8_t *blk2
, int stride
, int h
)
77 "movq (%1), %%mm0 \n\t"
78 "movq (%1, %3), %%mm1 \n\t"
79 "psadbw (%2), %%mm0 \n\t"
80 "psadbw (%2, %3), %%mm1 \n\t"
81 "paddw %%mm0, %%mm6 \n\t"
82 "paddw %%mm1, %%mm6 \n\t"
83 "lea (%1,%3,2), %1 \n\t"
84 "lea (%2,%3,2), %2 \n\t"
87 : "+r" (h
), "+r" (blk1
), "+r" (blk2
)
88 : "r" ((x86_reg
)stride
)
92 static int sad16_sse2(void *v
, uint8_t *blk2
, uint8_t *blk1
, int stride
, int h
)
96 "pxor %%xmm6, %%xmm6 \n\t"
99 "movdqu (%1), %%xmm0 \n\t"
100 "movdqu (%1, %3), %%xmm1 \n\t"
101 "psadbw (%2), %%xmm0 \n\t"
102 "psadbw (%2, %3), %%xmm1 \n\t"
103 "paddw %%xmm0, %%xmm6 \n\t"
104 "paddw %%xmm1, %%xmm6 \n\t"
105 "lea (%1,%3,2), %1 \n\t"
106 "lea (%2,%3,2), %2 \n\t"
109 : "+r" (h
), "+r" (blk1
), "+r" (blk2
)
110 : "r" ((x86_reg
)stride
)
113 "movhlps %%xmm6, %%xmm0 \n\t"
114 "paddw %%xmm0, %%xmm6 \n\t"
115 "movd %%xmm6, %0 \n\t"
121 static inline void sad8_x2a_mmx2(uint8_t *blk1
, uint8_t *blk2
, int stride
, int h
)
126 "movq (%1), %%mm0 \n\t"
127 "movq (%1, %3), %%mm1 \n\t"
128 "pavgb 1(%1), %%mm0 \n\t"
129 "pavgb 1(%1, %3), %%mm1 \n\t"
130 "psadbw (%2), %%mm0 \n\t"
131 "psadbw (%2, %3), %%mm1 \n\t"
132 "paddw %%mm0, %%mm6 \n\t"
133 "paddw %%mm1, %%mm6 \n\t"
134 "lea (%1,%3,2), %1 \n\t"
135 "lea (%2,%3,2), %2 \n\t"
138 : "+r" (h
), "+r" (blk1
), "+r" (blk2
)
139 : "r" ((x86_reg
)stride
)
143 static inline void sad8_y2a_mmx2(uint8_t *blk1
, uint8_t *blk2
, int stride
, int h
)
146 "movq (%1), %%mm0 \n\t"
150 "movq (%1), %%mm1 \n\t"
151 "movq (%1, %3), %%mm2 \n\t"
152 "pavgb %%mm1, %%mm0 \n\t"
153 "pavgb %%mm2, %%mm1 \n\t"
154 "psadbw (%2), %%mm0 \n\t"
155 "psadbw (%2, %3), %%mm1 \n\t"
156 "paddw %%mm0, %%mm6 \n\t"
157 "paddw %%mm1, %%mm6 \n\t"
158 "movq %%mm2, %%mm0 \n\t"
159 "lea (%1,%3,2), %1 \n\t"
160 "lea (%2,%3,2), %2 \n\t"
163 : "+r" (h
), "+r" (blk1
), "+r" (blk2
)
164 : "r" ((x86_reg
)stride
)
168 static inline void sad8_4_mmx2(uint8_t *blk1
, uint8_t *blk2
, int stride
, int h
)
171 "movq "MANGLE(bone
)", %%mm5 \n\t"
172 "movq (%1), %%mm0 \n\t"
173 "pavgb 1(%1), %%mm0 \n\t"
177 "movq (%1), %%mm1 \n\t"
178 "movq (%1,%3), %%mm2 \n\t"
179 "pavgb 1(%1), %%mm1 \n\t"
180 "pavgb 1(%1,%3), %%mm2 \n\t"
181 "psubusb %%mm5, %%mm1 \n\t"
182 "pavgb %%mm1, %%mm0 \n\t"
183 "pavgb %%mm2, %%mm1 \n\t"
184 "psadbw (%2), %%mm0 \n\t"
185 "psadbw (%2,%3), %%mm1 \n\t"
186 "paddw %%mm0, %%mm6 \n\t"
187 "paddw %%mm1, %%mm6 \n\t"
188 "movq %%mm2, %%mm0 \n\t"
189 "lea (%1,%3,2), %1 \n\t"
190 "lea (%2,%3,2), %2 \n\t"
193 : "+r" (h
), "+r" (blk1
), "+r" (blk2
)
194 : "r" ((x86_reg
)stride
)
198 static inline void sad8_2_mmx(uint8_t *blk1a
, uint8_t *blk1b
, uint8_t *blk2
, int stride
, int h
)
200 x86_reg len
= -(stride
*h
);
204 "movq (%1, %%"REG_a
"), %%mm0 \n\t"
205 "movq (%2, %%"REG_a
"), %%mm1 \n\t"
206 "movq (%1, %%"REG_a
"), %%mm2 \n\t"
207 "movq (%2, %%"REG_a
"), %%mm3 \n\t"
208 "punpcklbw %%mm7, %%mm0 \n\t"
209 "punpcklbw %%mm7, %%mm1 \n\t"
210 "punpckhbw %%mm7, %%mm2 \n\t"
211 "punpckhbw %%mm7, %%mm3 \n\t"
212 "paddw %%mm0, %%mm1 \n\t"
213 "paddw %%mm2, %%mm3 \n\t"
214 "movq (%3, %%"REG_a
"), %%mm4 \n\t"
215 "movq (%3, %%"REG_a
"), %%mm2 \n\t"
216 "paddw %%mm5, %%mm1 \n\t"
217 "paddw %%mm5, %%mm3 \n\t"
218 "psrlw $1, %%mm1 \n\t"
219 "psrlw $1, %%mm3 \n\t"
220 "packuswb %%mm3, %%mm1 \n\t"
221 "psubusb %%mm1, %%mm4 \n\t"
222 "psubusb %%mm2, %%mm1 \n\t"
223 "por %%mm4, %%mm1 \n\t"
224 "movq %%mm1, %%mm0 \n\t"
225 "punpcklbw %%mm7, %%mm0 \n\t"
226 "punpckhbw %%mm7, %%mm1 \n\t"
227 "paddw %%mm1, %%mm0 \n\t"
228 "paddw %%mm0, %%mm6 \n\t"
229 "add %4, %%"REG_a
" \n\t"
232 : "r" (blk1a
- len
), "r" (blk1b
-len
), "r" (blk2
- len
), "r" ((x86_reg
)stride
)
236 static inline void sad8_4_mmx(uint8_t *blk1
, uint8_t *blk2
, int stride
, int h
)
238 x86_reg len
= -(stride
*h
);
240 "movq (%1, %%"REG_a
"), %%mm0 \n\t"
241 "movq 1(%1, %%"REG_a
"), %%mm2 \n\t"
242 "movq %%mm0, %%mm1 \n\t"
243 "movq %%mm2, %%mm3 \n\t"
244 "punpcklbw %%mm7, %%mm0 \n\t"
245 "punpckhbw %%mm7, %%mm1 \n\t"
246 "punpcklbw %%mm7, %%mm2 \n\t"
247 "punpckhbw %%mm7, %%mm3 \n\t"
248 "paddw %%mm2, %%mm0 \n\t"
249 "paddw %%mm3, %%mm1 \n\t"
252 "movq (%2, %%"REG_a
"), %%mm2 \n\t"
253 "movq 1(%2, %%"REG_a
"), %%mm4 \n\t"
254 "movq %%mm2, %%mm3 \n\t"
255 "movq %%mm4, %%mm5 \n\t"
256 "punpcklbw %%mm7, %%mm2 \n\t"
257 "punpckhbw %%mm7, %%mm3 \n\t"
258 "punpcklbw %%mm7, %%mm4 \n\t"
259 "punpckhbw %%mm7, %%mm5 \n\t"
260 "paddw %%mm4, %%mm2 \n\t"
261 "paddw %%mm5, %%mm3 \n\t"
262 "movq 16+"MANGLE(round_tab
)", %%mm5 \n\t"
263 "paddw %%mm2, %%mm0 \n\t"
264 "paddw %%mm3, %%mm1 \n\t"
265 "paddw %%mm5, %%mm0 \n\t"
266 "paddw %%mm5, %%mm1 \n\t"
267 "movq (%3, %%"REG_a
"), %%mm4 \n\t"
268 "movq (%3, %%"REG_a
"), %%mm5 \n\t"
269 "psrlw $2, %%mm0 \n\t"
270 "psrlw $2, %%mm1 \n\t"
271 "packuswb %%mm1, %%mm0 \n\t"
272 "psubusb %%mm0, %%mm4 \n\t"
273 "psubusb %%mm5, %%mm0 \n\t"
274 "por %%mm4, %%mm0 \n\t"
275 "movq %%mm0, %%mm4 \n\t"
276 "punpcklbw %%mm7, %%mm0 \n\t"
277 "punpckhbw %%mm7, %%mm4 \n\t"
278 "paddw %%mm0, %%mm6 \n\t"
279 "paddw %%mm4, %%mm6 \n\t"
280 "movq %%mm2, %%mm0 \n\t"
281 "movq %%mm3, %%mm1 \n\t"
282 "add %4, %%"REG_a
" \n\t"
285 : "r" (blk1
- len
), "r" (blk1
-len
+ stride
), "r" (blk2
- len
), "r" ((x86_reg
)stride
)
289 static inline int sum_mmx(void)
293 "movq %%mm6, %%mm0 \n\t"
294 "psrlq $32, %%mm6 \n\t"
295 "paddw %%mm0, %%mm6 \n\t"
296 "movq %%mm6, %%mm0 \n\t"
297 "psrlq $16, %%mm6 \n\t"
298 "paddw %%mm0, %%mm6 \n\t"
299 "movd %%mm6, %0 \n\t"
305 static inline int sum_mmx2(void)
309 "movd %%mm6, %0 \n\t"
315 static inline void sad8_x2a_mmx(uint8_t *blk1
, uint8_t *blk2
, int stride
, int h
)
317 sad8_2_mmx(blk1
, blk1
+1, blk2
, stride
, h
);
319 static inline void sad8_y2a_mmx(uint8_t *blk1
, uint8_t *blk2
, int stride
, int h
)
321 sad8_2_mmx(blk1
, blk1
+stride
, blk2
, stride
, h
);
325 #define PIX_SAD(suf)\
326 static int sad8_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
329 asm volatile("pxor %%mm7, %%mm7 \n\t"\
330 "pxor %%mm6, %%mm6 \n\t":);\
332 sad8_1_ ## suf(blk1, blk2, stride, 8);\
334 return sum_ ## suf();\
336 static int sad8_x2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
339 asm volatile("pxor %%mm7, %%mm7 \n\t"\
340 "pxor %%mm6, %%mm6 \n\t"\
341 "movq %0, %%mm5 \n\t"\
342 :: "m"(round_tab[1]) \
345 sad8_x2a_ ## suf(blk1, blk2, stride, 8);\
347 return sum_ ## suf();\
350 static int sad8_y2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
353 asm volatile("pxor %%mm7, %%mm7 \n\t"\
354 "pxor %%mm6, %%mm6 \n\t"\
355 "movq %0, %%mm5 \n\t"\
356 :: "m"(round_tab[1]) \
359 sad8_y2a_ ## suf(blk1, blk2, stride, 8);\
361 return sum_ ## suf();\
364 static int sad8_xy2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
367 asm volatile("pxor %%mm7, %%mm7 \n\t"\
368 "pxor %%mm6, %%mm6 \n\t"\
371 sad8_4_ ## suf(blk1, blk2, stride, 8);\
373 return sum_ ## suf();\
376 static int sad16_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
378 asm volatile("pxor %%mm7, %%mm7 \n\t"\
379 "pxor %%mm6, %%mm6 \n\t":);\
381 sad8_1_ ## suf(blk1 , blk2 , stride, h);\
382 sad8_1_ ## suf(blk1+8, blk2+8, stride, h);\
384 return sum_ ## suf();\
386 static int sad16_x2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
388 asm volatile("pxor %%mm7, %%mm7 \n\t"\
389 "pxor %%mm6, %%mm6 \n\t"\
390 "movq %0, %%mm5 \n\t"\
391 :: "m"(round_tab[1]) \
394 sad8_x2a_ ## suf(blk1 , blk2 , stride, h);\
395 sad8_x2a_ ## suf(blk1+8, blk2+8, stride, h);\
397 return sum_ ## suf();\
399 static int sad16_y2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
401 asm volatile("pxor %%mm7, %%mm7 \n\t"\
402 "pxor %%mm6, %%mm6 \n\t"\
403 "movq %0, %%mm5 \n\t"\
404 :: "m"(round_tab[1]) \
407 sad8_y2a_ ## suf(blk1 , blk2 , stride, h);\
408 sad8_y2a_ ## suf(blk1+8, blk2+8, stride, h);\
410 return sum_ ## suf();\
412 static int sad16_xy2_ ## suf(void *v, uint8_t *blk2, uint8_t *blk1, int stride, int h)\
414 asm volatile("pxor %%mm7, %%mm7 \n\t"\
415 "pxor %%mm6, %%mm6 \n\t"\
418 sad8_4_ ## suf(blk1 , blk2 , stride, h);\
419 sad8_4_ ## suf(blk1+8, blk2+8, stride, h);\
421 return sum_ ## suf();\
427 void dsputil_init_pix_mmx(DSPContext
* c
, AVCodecContext
*avctx
)
429 if (mm_flags
& MM_MMX
) {
430 c
->pix_abs
[0][0] = sad16_mmx
;
431 c
->pix_abs
[0][1] = sad16_x2_mmx
;
432 c
->pix_abs
[0][2] = sad16_y2_mmx
;
433 c
->pix_abs
[0][3] = sad16_xy2_mmx
;
434 c
->pix_abs
[1][0] = sad8_mmx
;
435 c
->pix_abs
[1][1] = sad8_x2_mmx
;
436 c
->pix_abs
[1][2] = sad8_y2_mmx
;
437 c
->pix_abs
[1][3] = sad8_xy2_mmx
;
439 c
->sad
[0]= sad16_mmx
;
442 if (mm_flags
& MM_MMXEXT
) {
443 c
->pix_abs
[0][0] = sad16_mmx2
;
444 c
->pix_abs
[1][0] = sad8_mmx2
;
446 c
->sad
[0]= sad16_mmx2
;
447 c
->sad
[1]= sad8_mmx2
;
449 if(!(avctx
->flags
& CODEC_FLAG_BITEXACT
)){
450 c
->pix_abs
[0][1] = sad16_x2_mmx2
;
451 c
->pix_abs
[0][2] = sad16_y2_mmx2
;
452 c
->pix_abs
[0][3] = sad16_xy2_mmx2
;
453 c
->pix_abs
[1][1] = sad8_x2_mmx2
;
454 c
->pix_abs
[1][2] = sad8_y2_mmx2
;
455 c
->pix_abs
[1][3] = sad8_xy2_mmx2
;
458 if ((mm_flags
& MM_SSE2
) && !(mm_flags
& MM_3DNOW
)) {
459 c
->sad
[0]= sad16_sse2
;