快速内存比较函数CompareMem(Delphi SSE优化算法应用之二)

原创已于 2022-10-14 22:25:54 修改 · 4k 阅读

2 ·

本内容遵循CC 4.0 BY-SA版权协议

收录于

资源共享

于 2010-09-04 17:33:00 首次发布

本文介绍了一个使用汇编语言实现的快速内存比较算法，该算法利用SSE指令集进行内存块对比，相较于传统算法能提高60%-110%的速度。

function CGCompareMem(P1, P2: Pointer; Length: Integer): Integer; assembler;
asm
        PUSH    ESI
        PUSH    EDI
        PUSH    ECX
        PUSH    EBX
        MOV     ESI,P1
        MOV     EDI,P2
        CMP     ESI,EDI
        JZ      @Equal
        CMP     ECX,1 
        JL      @NotEqual
        MOV     edx,ecx
        shr     edx, 4 
        and     ecx, 15 
        test    ecx,ecx
        JZ      @SSECMP2
        mov     eax,-16
        sub     esi,eax
        sub     edi,eax
@CompareLoop:
        mov     ebx, [ESI + Eax]
        xor     ebx, [EDI + Eax]
        jnz     @Mismatch
        add     Eax, 4
        js      @CompareLoop
        JMP     @SSECMP
@Mismatch:
        bsf      ebx, ebx
        shr      ebx, 3
        sub      eax,-16
        add      eax,ebx
        add      eax,1
        JMP      @EXIT
@SSECMP:
        sub     esi,16
        sub     edi,16
@SSECMP2:
        TEST    edx,edx
        JZ      @EXIT
        mov     eax,ecx
        neg     edx
        pxor    xmm2,xmm2
@SSECMPLOOP:
        movups  xmm0,[ESI + Eax]
        movups  xmm1,[EDI + Eax]
        pxor    xmm0,  xmm1
        pcmpeqb  xmm0, xmm2
        pmovmskb ebx, xmm0
        CMP     ebx,$FFFF
        jnz     @SSEMismatch
        add     eax,16
        inc     edx
        js      @SSECMPLOOP
        xor     eax,eax
        JMP     @EXIT

@SSEMismatch:
        mov     ebx, [ESI + Eax]
        xor     ebx, [EDI + Eax]
        jnz     @Mismatch2
        add     Eax, 4
        jmp     @SSEMismatch
@Mismatch2:
       bsf      ebx, ebx
       shr      ebx, 3
       add      eax,ebx
       add      eax,1
       JMP     @EXIT
@NotEqual:
        MOV     EAX,-1
        JMP     @EXIT
@Equal:
        XOR     EAX,EAX
@EXIT:
        POP     EBX
        POP     ECX
        POP     EDI
        POP     ESI
end;

经测试比常规算法快60%-110%

标签

#delphi #算法 #优化 #integer #function