ref: 1eaa3a76dc50fc8451cedbf4797d7e3b7a2d77d7
dir: /vp8/encoder/x86/encodeopt.asm/
;
;  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"
;int vp8_block_error_xmm(short *coeff_ptr,  short *dcoef_ptr)
global sym(vp8_block_error_xmm) PRIVATE
sym(vp8_block_error_xmm):
    push        rbp
    mov         rbp, rsp
    SHADOW_ARGS_TO_STACK 2
    push rsi
    push rdi
    ; end prologue
        mov         rsi,        arg(0) ;coeff_ptr
        mov         rdi,        arg(1) ;dcoef_ptr
        movdqa      xmm0,       [rsi]
        movdqa      xmm1,       [rdi]
        movdqa      xmm2,       [rsi+16]
        movdqa      xmm3,       [rdi+16]
        psubw       xmm0,       xmm1
        psubw       xmm2,       xmm3
        pmaddwd     xmm0,       xmm0
        pmaddwd     xmm2,       xmm2
        paddd       xmm0,       xmm2
        pxor        xmm5,       xmm5
        movdqa      xmm1,       xmm0
        punpckldq   xmm0,       xmm5
        punpckhdq   xmm1,       xmm5
        paddd       xmm0,       xmm1
        movdqa      xmm1,       xmm0
        psrldq      xmm0,       8
        paddd       xmm0,       xmm1
        movq        rax,        xmm0
    pop rdi
    pop rsi
    ; begin epilog
    UNSHADOW_ARGS
    pop         rbp
    ret
;int vp8_block_error_mmx(short *coeff_ptr,  short *dcoef_ptr)
global sym(vp8_block_error_mmx) PRIVATE
sym(vp8_block_error_mmx):
    push        rbp
    mov         rbp, rsp
    SHADOW_ARGS_TO_STACK 2
    push rsi
    push rdi
    ; end prolog
        mov         rsi,        arg(0) ;coeff_ptr
        pxor        mm7,        mm7
        mov         rdi,        arg(1) ;dcoef_ptr
        movq        mm3,        [rsi]
        movq        mm4,        [rdi]
        movq        mm5,        [rsi+8]
        movq        mm6,        [rdi+8]
        pxor        mm1,        mm1 ; from movd mm1, dc ; dc =0
        movq        mm2,        mm7
        psubw       mm5,        mm6
        por         mm1,        mm2
        pmaddwd     mm5,        mm5
        pcmpeqw     mm1,        mm7
        psubw       mm3,        mm4
        pand        mm1,        mm3
        pmaddwd     mm1,        mm1
        paddd       mm1,        mm5
        movq        mm3,        [rsi+16]
        movq        mm4,        [rdi+16]
        movq        mm5,        [rsi+24]
        movq        mm6,        [rdi+24]
        psubw       mm5,        mm6
        pmaddwd     mm5,        mm5
        psubw       mm3,        mm4
        pmaddwd     mm3,        mm3
        paddd       mm3,        mm5
        paddd       mm1,        mm3
        movq        mm0,        mm1
        psrlq       mm1,        32
        paddd       mm0,        mm1
        movq        rax,        mm0
    pop rdi
    pop rsi
    ; begin epilog
    UNSHADOW_ARGS
    pop         rbp
    ret
;int vp8_mbblock_error_mmx_impl(short *coeff_ptr, short *dcoef_ptr, int dc);
global sym(vp8_mbblock_error_mmx_impl) PRIVATE
sym(vp8_mbblock_error_mmx_impl):
    push        rbp
    mov         rbp, rsp
    SHADOW_ARGS_TO_STACK 3
    push rsi
    push rdi
    ; end prolog
        mov         rsi,        arg(0) ;coeff_ptr
        pxor        mm7,        mm7
        mov         rdi,        arg(1) ;dcoef_ptr
        pxor        mm2,        mm2
        movd        mm1,        dword ptr arg(2) ;dc
        por         mm1,        mm2
        pcmpeqw     mm1,        mm7
        mov         rcx,        16
.mberror_loop_mmx:
        movq        mm3,       [rsi]
        movq        mm4,       [rdi]
        movq        mm5,       [rsi+8]
        movq        mm6,       [rdi+8]
        psubw       mm5,        mm6
        pmaddwd     mm5,        mm5
        psubw       mm3,        mm4
        pand        mm3,        mm1
        pmaddwd     mm3,        mm3
        paddd       mm2,        mm5
        paddd       mm2,        mm3
        movq        mm3,       [rsi+16]
        movq        mm4,       [rdi+16]
        movq        mm5,       [rsi+24]
        movq        mm6,       [rdi+24]
        psubw       mm5,        mm6
        pmaddwd     mm5,        mm5
        psubw       mm3,        mm4
        pmaddwd     mm3,        mm3
        paddd       mm2,        mm5
        paddd       mm2,        mm3
        add         rsi,        32
        add         rdi,        32
        sub         rcx,        1
        jnz         .mberror_loop_mmx
        movq        mm0,        mm2
        psrlq       mm2,        32
        paddd       mm0,        mm2
        movq        rax,        mm0
    pop rdi
    pop rsi
    ; begin epilog
    UNSHADOW_ARGS
    pop         rbp
    ret
;int vp8_mbblock_error_xmm_impl(short *coeff_ptr, short *dcoef_ptr, int dc);
global sym(vp8_mbblock_error_xmm_impl) PRIVATE
sym(vp8_mbblock_error_xmm_impl):
    push        rbp
    mov         rbp, rsp
    SHADOW_ARGS_TO_STACK 3
    SAVE_XMM 6
    push rsi
    push rdi
    ; end prolog
        mov         rsi,        arg(0) ;coeff_ptr
        pxor        xmm6,       xmm6
        mov         rdi,        arg(1) ;dcoef_ptr
        pxor        xmm4,       xmm4
        movd        xmm5,       dword ptr arg(2) ;dc
        por         xmm5,       xmm4
        pcmpeqw     xmm5,       xmm6
        mov         rcx,        16
.mberror_loop:
        movdqa      xmm0,       [rsi]
        movdqa      xmm1,       [rdi]
        movdqa      xmm2,       [rsi+16]
        movdqa      xmm3,       [rdi+16]
        psubw       xmm2,       xmm3
        pmaddwd     xmm2,       xmm2
        psubw       xmm0,       xmm1
        pand        xmm0,       xmm5
        pmaddwd     xmm0,       xmm0
        add         rsi,        32
        add         rdi,        32
        sub         rcx,        1
        paddd       xmm4,       xmm2
        paddd       xmm4,       xmm0
        jnz         .mberror_loop
        movdqa      xmm0,       xmm4
        punpckldq   xmm0,       xmm6
        punpckhdq   xmm4,       xmm6
        paddd       xmm0,       xmm4
        movdqa      xmm1,       xmm0
        psrldq      xmm0,       8
        paddd       xmm0,       xmm1
        movq        rax,        xmm0
    pop rdi
    pop rsi
    ; begin epilog
    RESTORE_XMM
    UNSHADOW_ARGS
    pop         rbp
    ret
;int vp8_mbuverror_mmx_impl(short *s_ptr, short *d_ptr);
global sym(vp8_mbuverror_mmx_impl) PRIVATE
sym(vp8_mbuverror_mmx_impl):
    push        rbp
    mov         rbp, rsp
    SHADOW_ARGS_TO_STACK 2
    push rsi
    push rdi
    ; end prolog
        mov             rsi,        arg(0) ;s_ptr
        mov             rdi,        arg(1) ;d_ptr
        mov             rcx,        16
        pxor            mm7,        mm7
.mbuverror_loop_mmx:
        movq            mm1,        [rsi]
        movq            mm2,        [rdi]
        psubw           mm1,        mm2
        pmaddwd         mm1,        mm1
        movq            mm3,        [rsi+8]
        movq            mm4,        [rdi+8]
        psubw           mm3,        mm4
        pmaddwd         mm3,        mm3
        paddd           mm7,        mm1
        paddd           mm7,        mm3
        add             rsi,        16
        add             rdi,        16
        dec             rcx
        jnz             .mbuverror_loop_mmx
        movq            mm0,        mm7
        psrlq           mm7,        32
        paddd           mm0,        mm7
        movq            rax,        mm0
    pop rdi
    pop rsi
    ; begin epilog
    UNSHADOW_ARGS
    pop         rbp
    ret
;int vp8_mbuverror_xmm_impl(short *s_ptr, short *d_ptr);
global sym(vp8_mbuverror_xmm_impl) PRIVATE
sym(vp8_mbuverror_xmm_impl):
    push        rbp
    mov         rbp, rsp
    SHADOW_ARGS_TO_STACK 2
    push rsi
    push rdi
    ; end prolog
        mov             rsi,        arg(0) ;s_ptr
        mov             rdi,        arg(1) ;d_ptr
        mov             rcx,        16
        pxor            xmm3,       xmm3
.mbuverror_loop:
        movdqa          xmm1,       [rsi]
        movdqa          xmm2,       [rdi]
        psubw           xmm1,       xmm2
        pmaddwd         xmm1,       xmm1
        paddd           xmm3,       xmm1
        add             rsi,        16
        add             rdi,        16
        dec             rcx
        jnz             .mbuverror_loop
        pxor        xmm0,           xmm0
        movdqa      xmm1,           xmm3
        movdqa      xmm2,           xmm1
        punpckldq   xmm1,           xmm0
        punpckhdq   xmm2,           xmm0
        paddd       xmm1,           xmm2
        movdqa      xmm2,           xmm1
        psrldq      xmm1,           8
        paddd       xmm1,           xmm2
        movq            rax,            xmm1
    pop rdi
    pop rsi
    ; begin epilog
    UNSHADOW_ARGS
    pop         rbp
    ret