| /* 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> |
| 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 |
| */ |
| |
