/* lzo1f_d.ash -- assembler implementation of the LZO1F decompression algorithm

   This file is part of the LZO real-time data compression library.

   Copyright (C) 2008 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 2007 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 2006 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 2005 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 2004 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 2003 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 2002 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 2001 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 2000 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 1999 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 1998 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 1997 Markus Franz Xaver Johannes Oberhumer

   Copyright (C) 1996 Markus Franz Xaver Johannes Oberhumer

   All Rights Reserved.

   The LZO library is free software; you can redistribute it and/or

   modify it under the terms of the GNU General Public License as

   published by the Free Software Foundation; either version 2 of

   the License, or (at your option) any later version.

   The LZO library is distributed in the hope that it will be useful,

   but WITHOUT ANY WARRANTY; without even the implied warranty of

   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License

   along with the LZO library; see the file COPYING.

   If not, write to the Free Software Foundation, Inc.,

   51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.

   Markus F.X.J. Oberhumer

   <markus@oberhumer.com></markus@oberhumer.com>

   http://www.oberhumer.com/opensource/lzo/

 */

/***********************************************************************

//

************************************************************************/

        ALIGN3

.L0:

        xorl    %eax,%eax

        movb    (%esi),%al

        incl    %esi

        cmpb    $31,%al

        ja      .LM2

        orb     %al,%al

        movl    %eax,%ecx

        jnz     .L2

1:

        LODSB

        orb     %al,%al

        jnz     2f

        addl    N_255,%ecx

        jmp     1b

2:

        lea     31(%eax,%ecx),%ecx

.L2:

        TEST_OP((%edi,%ecx),%ebx)

        TEST_IP((%esi,%ecx),%ebx)

        movb    %cl,%al

        shrl    $2,%ecx

        rep

        movsl

        andb    $3,%al

        jz      1f

        movl    (%esi),%ebx

        addl    %eax,%esi

        movl    %ebx,(%edi)

        addl    %eax,%edi

1:

        movb    (%esi),%al

        incl    %esi

.LM1:

        cmpb    $31,%al

        jbe     .LM21

.LM2:

        cmpb    $223,%al

        ja      .LM3

        movl    %eax,%ecx

        shrl    $2,%eax

        lea     -1(%edi),%edx

        andb    $7,%al

        shrl    $5,%ecx

        movl    %eax,%ebx

        movb    (%esi),%al

        leal    (%ebx,%eax,8),%eax

        incl    %esi

.LM5:

        subl    %eax,%edx

        addl    $2,%ecx

        xchgl   %edx,%esi

        TEST_LOOKBEHIND(%esi)

        TEST_OP((%edi,%ecx),%ebx)

        cmpl    $6,%ecx

        jb      1f

        cmpl    $4,%eax

        jb      1f

        movb    %cl,%al

        shrl    $2,%ecx

        rep

        movsl

        andb    $3,%al

        movb    %al,%cl

1:

        rep

        movsb

        movl    %edx,%esi

.LN1:

        movb    -2(%esi),%cl

        andl    $3,%ecx

        jz      .L0

        movl    (%esi),%eax

        addl    %ecx,%esi

        movl    %eax,(%edi)

        addl    %ecx,%edi

        xorl    %eax,%eax

        movb    (%esi),%al

        incl    %esi

        jmp     .LM1

.LM21:

        TEST_OP(3(%edi),%edx)

        shrl    $2,%eax

        leal    -0x801(%edi),%edx

        movl    %eax,%ecx

        movb    (%esi),%al

        incl    %esi

        leal    (%ecx,%eax,8),%eax

        subl    %eax,%edx

        TEST_LOOKBEHIND(%edx)

        movl    (%edx),%eax

        movl    %eax,(%edi)

        addl    $3,%edi

        jmp     .LN1

1:

        LODSB

        orb     %al,%al

        jnz     2f

        addl    N_255,%ecx

        jmp     1b

2:

        lea     31(%eax,%ecx),%ecx

        jmp     .LM4

        ALIGN3

.LM3:

        andb    $31,%al

        movl    %eax,%ecx

        jz      1b

.LM4:

        movl    %edi,%edx

        movw    (%esi),%ax

        addl    $2,%esi

        shrl    $2,%eax

        jnz     .LM5

.LEOF:

/****   xorl    %eax,%eax          eax=0 from above */

        cmpl    $1,%ecx         /* ecx must be 1 */

        setnz   %al

/*

vi:ts=4

*/