; ; Copyright (c) 2010 The WebM project authors. All Rights Reserved. ; ; Use of this source code is governed by a BSD-style license ; that can be found in the LICENSE file in the root of the source ; tree. An additional intellectual property rights grant can be found ; in the file PATENTS. All contributing project authors may ; be found in the AUTHORS file in the root of the source tree. ; %include "vpx_ports/x86_abi_support.asm" ;void vp8_recon2b_sse2(unsigned char *s, short *q, unsigned char *d, int stride) global sym(vp8_recon2b_sse2) sym(vp8_recon2b_sse2): push rbp mov rbp, rsp SHADOW_ARGS_TO_STACK 4 push rsi push rdi ; end prolog mov rsi, arg(0) ;s mov rdi, arg(2) ;d mov rdx, arg(1) ;q movsxd rax, dword ptr arg(3) ;stride pxor xmm0, xmm0 movq xmm1, MMWORD PTR [rsi] punpcklbw xmm1, xmm0 paddsw xmm1, XMMWORD PTR [rdx] packuswb xmm1, xmm0 ; pack and unpack to saturate movq MMWORD PTR [rdi], xmm1 movq xmm2, MMWORD PTR [rsi+8] punpcklbw xmm2, xmm0 paddsw xmm2, XMMWORD PTR [rdx+16] packuswb xmm2, xmm0 ; pack and unpack to saturate movq MMWORD PTR [rdi+rax], xmm2 movq xmm3, MMWORD PTR [rsi+16] punpcklbw xmm3, xmm0 paddsw xmm3, XMMWORD PTR [rdx+32] packuswb xmm3, xmm0 ; pack and unpack to saturate movq MMWORD PTR [rdi+rax*2], xmm3 add rdi, rax movq xmm4, MMWORD PTR [rsi+24] punpcklbw xmm4, xmm0 paddsw xmm4, XMMWORD PTR [rdx+48] packuswb xmm4, xmm0 ; pack and unpack to saturate movq MMWORD PTR [rdi+rax*2], xmm4 ; begin epilog pop rdi pop rsi UNSHADOW_ARGS pop rbp ret ;void vp8_recon4b_sse2(unsigned char *s, short *q, unsigned char *d, int stride) global sym(vp8_recon4b_sse2) sym(vp8_recon4b_sse2): push rbp mov rbp, rsp SHADOW_ARGS_TO_STACK 4 SAVE_XMM 7 push rsi push rdi ; end prolog mov rsi, arg(0) ;s mov rdi, arg(2) ;d mov rdx, arg(1) ;q movsxd rax, dword ptr arg(3) ;stride pxor xmm0, xmm0 movdqa xmm1, XMMWORD PTR [rsi] movdqa xmm5, xmm1 punpcklbw xmm1, xmm0 punpckhbw xmm5, xmm0 paddsw xmm1, XMMWORD PTR [rdx] paddsw xmm5, XMMWORD PTR [rdx+16] packuswb xmm1, xmm5 ; pack and unpack to saturate movdqa XMMWORD PTR [rdi], xmm1 movdqa xmm2, XMMWORD PTR [rsi+16] movdqa xmm6, xmm2 punpcklbw xmm2, xmm0 punpckhbw xmm6, xmm0 paddsw xmm2, XMMWORD PTR [rdx+32] paddsw xmm6, XMMWORD PTR [rdx+48] packuswb xmm2, xmm6 ; pack and unpack to saturate movdqa XMMWORD PTR [rdi+rax], xmm2 movdqa xmm3, XMMWORD PTR [rsi+32] movdqa xmm7, xmm3 punpcklbw xmm3, xmm0 punpckhbw xmm7, xmm0 paddsw xmm3, XMMWORD PTR [rdx+64] paddsw xmm7, XMMWORD PTR [rdx+80] packuswb xmm3, xmm7 ; pack and unpack to saturate movdqa XMMWORD PTR [rdi+rax*2], xmm3 add rdi, rax movdqa xmm4, XMMWORD PTR [rsi+48] movdqa xmm5, xmm4 punpcklbw xmm4, xmm0 punpckhbw xmm5, xmm0 paddsw xmm4, XMMWORD PTR [rdx+96] paddsw xmm5, XMMWORD PTR [rdx+112] packuswb xmm4, xmm5 ; pack and unpack to saturate movdqa XMMWORD PTR [rdi+rax*2], xmm4 ; begin epilog pop rdi pop rsi RESTORE_XMM UNSHADOW_ARGS pop rbp ret ;void copy_mem16x16_sse2( ; unsigned char *src, ; int src_stride, ; unsigned char *dst, ; int dst_stride ; ) global sym(vp8_copy_mem16x16_sse2) sym(vp8_copy_mem16x16_sse2): push rbp mov rbp, rsp SHADOW_ARGS_TO_STACK 4 push rsi push rdi ; end prolog mov rsi, arg(0) ;src; movdqu xmm0, [rsi] movsxd rax, dword ptr arg(1) ;src_stride; mov rdi, arg(2) ;dst; movdqu xmm1, [rsi+rax] movdqu xmm2, [rsi+rax*2] movsxd rcx, dword ptr arg(3) ;dst_stride lea rsi, [rsi+rax*2] movdqa [rdi], xmm0 add rsi, rax movdqa [rdi+rcx], xmm1 movdqa [rdi+rcx*2],xmm2 lea rdi, [rdi+rcx*2] movdqu xmm3, [rsi] add rdi, rcx movdqu xmm4, [rsi+rax] movdqu xmm5, [rsi+rax*2] lea rsi, [rsi+rax*2] movdqa [rdi], xmm3 add rsi, rax movdqa [rdi+rcx], xmm4 movdqa [rdi+rcx*2],xmm5 lea rdi, [rdi+rcx*2] movdqu xmm0, [rsi] add rdi, rcx movdqu xmm1, [rsi+rax] movdqu xmm2, [rsi+rax*2] lea rsi, [rsi+rax*2] movdqa [rdi], xmm0 add rsi, rax movdqa [rdi+rcx], xmm1 movdqa [rdi+rcx*2], xmm2 movdqu xmm3, [rsi] movdqu xmm4, [rsi+rax] lea rdi, [rdi+rcx*2] add rdi, rcx movdqu xmm5, [rsi+rax*2] lea rsi, [rsi+rax*2] movdqa [rdi], xmm3 add rsi, rax movdqa [rdi+rcx], xmm4 movdqa [rdi+rcx*2],xmm5 movdqu xmm0, [rsi] lea rdi, [rdi+rcx*2] movdqu xmm1, [rsi+rax] add rdi, rcx movdqu xmm2, [rsi+rax*2] lea rsi, [rsi+rax*2] movdqa [rdi], xmm0 movdqa [rdi+rcx], xmm1 movdqa [rdi+rcx*2],xmm2 movdqu xmm3, [rsi+rax] lea rdi, [rdi+rcx*2] movdqa [rdi+rcx], xmm3 ; begin epilog pop rdi pop rsi UNSHADOW_ARGS pop rbp ret ;void vp8_intra_pred_uv_dc_mmx2( ; unsigned char *dst, ; int dst_stride ; unsigned char *src, ; int src_stride, ; ) global sym(vp8_intra_pred_uv_dc_mmx2) sym(vp8_intra_pred_uv_dc_mmx2): push rbp mov rbp, rsp SHADOW_ARGS_TO_STACK 4 push rsi push rdi ; end prolog ; from top mov rsi, arg(2) ;src; movsxd rax, dword ptr arg(3) ;src_stride; sub rsi, rax pxor mm0, mm0 movq mm1, [rsi] psadbw mm1, mm0 ; from left dec rsi lea rdi, [rax*3] movzx ecx, byte [rsi+rax] movzx edx, byte [rsi+rax*2] add ecx, edx movzx edx, byte [rsi+rdi] add ecx, edx lea rsi, [rsi+rax*4] movzx edx, byte [rsi] add ecx, edx movzx edx, byte [rsi+rax] add ecx, edx movzx edx, byte [rsi+rax*2] add ecx, edx movzx edx, byte [rsi+rdi] add ecx, edx movzx edx, byte [rsi+rax*4] add ecx, edx ; add up pextrw edx, mm1, 0x0 lea edx, [edx+ecx+8] sar edx, 4 movd mm1, edx pshufw mm1, mm1, 0x0 packuswb mm1, mm1 ; write out mov rdi, arg(0) ;dst; movsxd rcx, dword ptr arg(1) ;dst_stride lea rax, [rcx*3] movq [rdi ], mm1 movq [rdi+rcx ], mm1 movq [rdi+rcx*2], mm1 movq [rdi+rax ], mm1 lea rdi, [rdi+rcx*4] movq [rdi ], mm1 movq [rdi+rcx ], mm1 movq [rdi+rcx*2], mm1 movq [rdi+rax ], mm1 ; begin epilog pop rdi pop rsi UNSHADOW_ARGS pop rbp ret ;void vp8_intra_pred_uv_dctop_mmx2( ; unsigned char *dst, ; int dst_stride ; unsigned char *src, ; int src_stride, ; ) global sym(vp8_intra_pred_uv_dctop_mmx2) sym(vp8_intra_pred_uv_dctop_mmx2): push rbp mov rbp, rsp SHADOW_ARGS_TO_STACK 4 push rsi push rdi ; end prolog ; from top mov rsi, arg(2) ;src; movsxd rax, dword ptr arg(3) ;src_stride; sub rsi, rax pxor mm0, mm0 movq mm1, [rsi] psadbw mm1, mm0 ; add up paddw mm1, [GLOBAL(dc_4)] psraw mm1, 3 pshufw mm1, mm1, 0x0 packuswb mm1, mm1 ; write out mov rdi, arg(0) ;dst; movsxd rcx, dword ptr arg(1) ;dst_stride lea rax, [rcx*3] movq [rdi ], mm1 movq [rdi+rcx ], mm1 movq [rdi+rcx*2], mm1 movq [rdi+rax ], mm1 lea rdi, [rdi+rcx*4] movq [rdi ], mm1 movq [rdi+rcx ], mm1 movq [rdi+rcx*2], mm1 movq [rdi+rax ], mm1 ; begin epilog pop rdi pop rsi UNSHADOW_ARGS pop rbp ret ;void vp8_intra_pred_uv_dcleft_mmx2( ; unsigned char *dst, ; int dst_stride ; unsigned char *src, ; int src_stride, ; ) global sym(vp8_intra_pred_uv_dcleft_mmx2) sym(vp8_intra_pred_uv_dcleft_mmx2): push rbp mov rbp, rsp SHADOW_ARGS_TO_STACK 4 push rsi push rdi ; end prolog ; from left mov rsi, arg(2) ;src; movsxd rax, dword ptr arg(3) ;src_stride; dec rsi lea rdi, [rax*3] movzx ecx, byte [rsi] movzx edx, byte [rsi+rax] add ecx, edx movzx edx, byte [rsi+rax*2] add ecx, edx movzx edx, byte [rsi+rdi] add ecx, edx lea rsi, [rsi+rax*4] movzx edx, byte [rsi] add ecx, edx movzx edx, byte [rsi+rax] add ecx, edx movzx edx, byte [rsi+rax*2] add ecx, edx movzx edx, byte [rsi+rdi] lea edx, [ecx+edx+4] ; add up shr edx, 3 movd mm1, edx pshufw mm1, mm1, 0x0 packuswb mm1, mm1 ; write out mov rdi, arg(0) ;dst; movsxd rcx, dword ptr arg(1) ;dst_stride lea rax, [rcx*3] movq [rdi ], mm1 movq [rdi+rcx ], mm1 movq [rdi+rcx*2], mm1 movq [rdi+rax ], mm1 lea rdi, [rdi+rcx*4] movq [rdi ], mm1 movq [rdi+rcx ], mm1 movq [rdi+rcx*2], mm1 movq [rdi+rax ], mm1 ; begin epilog pop rdi pop rsi UNSHADOW_ARGS pop rbp ret ;void vp8_intra_pred_uv_dc128_mmx( ; unsigned char *dst, ; int dst_stride ; unsigned char *src, ; int src_stride, ; ) global sym(vp8_intra_pred_uv_dc128_mmx) sym(vp8_intra_pred_uv_dc128_mmx): push rbp mov rbp, rsp SHADOW_ARGS_TO_STACK 4 ; end prolog ; write out movq mm1, [GLOBAL(dc_128)] mov rax, arg(0) ;dst; movsxd rdx, dword ptr arg(1) ;dst_stride lea rcx, [rdx*3] movq [rax ], mm1 movq [rax+rdx ], mm1 movq [rax+rdx*2], mm1 movq [rax+rcx ], mm1 lea rax, [rax+rdx*4] movq [rax ], mm1 movq [rax+rdx ], mm1 movq [rax+rdx*2], mm1 movq [rax+rcx ], mm1 ; begin epilog UNSHADOW_ARGS pop rbp ret ;void vp8_intra_pred_uv_tm_sse2( ; unsigned char *dst, ; int dst_stride ; unsigned char *src, ; int src_stride, ; ) %macro vp8_intra_pred_uv_tm 1 global sym(vp8_intra_pred_uv_tm_%1) sym(vp8_intra_pred_uv_tm_%1): push rbp mov rbp, rsp SHADOW_ARGS_TO_STACK 4 push rsi push rdi ; end prolog ; read top row mov edx, 4 mov rsi, arg(2) ;src; movsxd rax, dword ptr arg(3) ;src_stride; sub rsi, rax pxor xmm0, xmm0 %ifidn %1, ssse3 movdqa xmm2, [GLOBAL(dc_1024)] %endif movq xmm1, [rsi] punpcklbw xmm1, xmm0 ; set up left ptrs ans subtract topleft movd xmm3, [rsi-1] lea rsi, [rsi+rax-1] %ifidn %1, sse2 punpcklbw xmm3, xmm0 pshuflw xmm3, xmm3, 0x0 punpcklqdq xmm3, xmm3 %else pshufb xmm3, xmm2 %endif psubw xmm1, xmm3 ; set up dest ptrs mov rdi, arg(0) ;dst; movsxd rcx, dword ptr arg(1) ;dst_stride vp8_intra_pred_uv_tm_%1_loop: movd xmm3, [rsi] movd xmm5, [rsi+rax] %ifidn %1, sse2 punpcklbw xmm3, xmm0 punpcklbw xmm5, xmm0 pshuflw xmm3, xmm3, 0x0 pshuflw xmm5, xmm5, 0x0 punpcklqdq xmm3, xmm3 punpcklqdq xmm5, xmm5 %else pshufb xmm3, xmm2 pshufb xmm5, xmm2 %endif paddw xmm3, xmm1 paddw xmm5, xmm1 packuswb xmm3, xmm5 movq [rdi ], xmm3 movhps[rdi+rcx], xmm3 lea rsi, [rsi+rax*2] lea rdi, [rdi+rcx*2] dec edx jnz vp8_intra_pred_uv_tm_%1_loop ; begin epilog pop rdi pop rsi UNSHADOW_ARGS pop rbp ret %endmacro vp8_intra_pred_uv_tm sse2 vp8_intra_pred_uv_tm ssse3 ;void vp8_intra_pred_uv_ve_mmx( ; unsigned char *dst, ; int dst_stride ; unsigned char *src, ; int src_stride, ; ) global sym(vp8_intra_pred_uv_ve_mmx) sym(vp8_intra_pred_uv_ve_mmx): push rbp mov rbp, rsp SHADOW_ARGS_TO_STACK 4 ; end prolog ; read from top mov rax, arg(2) ;src; movsxd rdx, dword ptr arg(3) ;src_stride; sub rax, rdx movq mm1, [rax] ; write out mov rax, arg(0) ;dst; movsxd rdx, dword ptr arg(1) ;dst_stride lea rcx, [rdx*3] movq [rax ], mm1 movq [rax+rdx ], mm1 movq [rax+rdx*2], mm1 movq [rax+rcx ], mm1 lea rax, [rax+rdx*4] movq [rax ], mm1 movq [rax+rdx ], mm1 movq [rax+rdx*2], mm1 movq [rax+rcx ], mm1 ; begin epilog UNSHADOW_ARGS pop rbp ret ;void vp8_intra_pred_uv_ho_mmx2( ; unsigned char *dst, ; int dst_stride ; unsigned char *src, ; int src_stride, ; ) global sym(vp8_intra_pred_uv_ho_mmx2) sym(vp8_intra_pred_uv_ho_mmx2): push rbp mov rbp, rsp SHADOW_ARGS_TO_STACK 4 push rsi push rdi ; end prolog ; read from left and write out mov edx, 4 mov rsi, arg(2) ;src; movsxd rax, dword ptr arg(3) ;src_stride; mov rdi, arg(0) ;dst; movsxd rcx, dword ptr arg(1) ;dst_stride dec rsi vp8_intra_pred_uv_ho_mmx2_loop: movd mm0, [rsi] movd mm1, [rsi+rax] punpcklbw mm0, mm0 punpcklbw mm1, mm1 pshufw mm0, mm0, 0x0 pshufw mm1, mm1, 0x0 movq [rdi ], mm0 movq [rdi+rcx], mm1 lea rsi, [rsi+rax*2] lea rdi, [rdi+rcx*2] dec edx jnz vp8_intra_pred_uv_ho_mmx2_loop ; begin epilog pop rdi pop rsi UNSHADOW_ARGS pop rbp ret SECTION_RODATA dc_128: times 8 db 128 dc_4: times 4 dw 4 align 16 dc_1024: times 8 dw 0x400