tron@2186: /* $Id$ */ tron@2186: truelight@0: /* minilzo.c -- mini subset of the LZO real-time data compression library truelight@0: truelight@0: This file is part of the LZO real-time data compression library. truelight@0: truelight@0: Copyright (C) 2002 Markus Franz Xaver Johannes Oberhumer truelight@0: Copyright (C) 2001 Markus Franz Xaver Johannes Oberhumer truelight@0: Copyright (C) 2000 Markus Franz Xaver Johannes Oberhumer truelight@0: Copyright (C) 1999 Markus Franz Xaver Johannes Oberhumer truelight@0: Copyright (C) 1998 Markus Franz Xaver Johannes Oberhumer truelight@0: Copyright (C) 1997 Markus Franz Xaver Johannes Oberhumer truelight@0: Copyright (C) 1996 Markus Franz Xaver Johannes Oberhumer truelight@0: All Rights Reserved. truelight@0: truelight@0: The LZO library is free software; you can redistribute it and/or truelight@0: modify it under the terms of the GNU General Public License as truelight@0: published by the Free Software Foundation; either version 2 of truelight@0: the License, or (at your option) any later version. truelight@0: truelight@0: The LZO library is distributed in the hope that it will be useful, truelight@0: but WITHOUT ANY WARRANTY; without even the implied warranty of truelight@0: MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the truelight@0: GNU General Public License for more details. truelight@0: truelight@0: You should have received a copy of the GNU General Public License truelight@0: along with the LZO library; see the file COPYING. truelight@0: If not, write to the Free Software Foundation, Inc., truelight@0: 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. truelight@0: truelight@0: Markus F.X.J. Oberhumer truelight@0: truelight@0: http://www.oberhumer.com/opensource/lzo/ truelight@0: */ truelight@0: truelight@0: /* truelight@0: * NOTE: truelight@0: * the full LZO package can be found at truelight@0: * http://www.oberhumer.com/opensource/lzo/ truelight@0: */ truelight@0: truelight@0: #define LZO_DISABLE_CHECKS truelight@0: #define LZO1X truelight@0: truelight@0: #define __LZO_IN_MINILZO truelight@0: #define LZO_BUILD truelight@0: truelight@0: #ifdef MINILZO_HAVE_CONFIG_H truelight@0: # include truelight@0: #endif truelight@0: truelight@0: #undef LZO_HAVE_CONFIG_H truelight@0: #include "minilzo.h" truelight@0: truelight@0: #if !defined(MINILZO_VERSION) || (MINILZO_VERSION != 0x1080) truelight@0: # error "version mismatch in miniLZO source files" truelight@0: #endif truelight@0: truelight@0: #ifdef MINILZO_HAVE_CONFIG_H truelight@0: # define LZO_HAVE_CONFIG_H truelight@0: #endif truelight@0: truelight@0: #if !defined(LZO_NO_SYS_TYPES_H) truelight@0: # include truelight@0: #endif truelight@0: #include truelight@0: truelight@0: #ifndef __LZO_CONF_H truelight@0: #define __LZO_CONF_H truelight@0: truelight@0: #if defined(__BOUNDS_CHECKING_ON) truelight@0: # include truelight@0: #else truelight@0: # define BOUNDS_CHECKING_OFF_DURING(stmt) stmt truelight@0: # define BOUNDS_CHECKING_OFF_IN_EXPR(expr) (expr) truelight@0: #endif truelight@0: truelight@0: #if !defined(LZO_HAVE_CONFIG_H) truelight@0: # include truelight@0: # include truelight@0: # if !defined(NO_STDLIB_H) truelight@0: # include truelight@0: # endif truelight@0: # define HAVE_MEMCMP truelight@0: # define HAVE_MEMCPY truelight@0: # define HAVE_MEMMOVE truelight@0: # define HAVE_MEMSET truelight@0: #else truelight@0: # include truelight@0: # if defined(HAVE_STDDEF_H) truelight@0: # include truelight@0: # endif truelight@0: # if defined(STDC_HEADERS) truelight@0: # include truelight@0: # include truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(__LZO_DOS16) || defined(__LZO_WIN16) truelight@0: # define HAVE_MALLOC_H truelight@0: # define HAVE_HALLOC truelight@0: #endif truelight@0: truelight@0: #undef NDEBUG truelight@0: #if !defined(LZO_DEBUG) truelight@0: # define NDEBUG truelight@0: #endif truelight@0: #if defined(LZO_DEBUG) || !defined(NDEBUG) truelight@0: # if !defined(NO_STDIO_H) truelight@0: # include truelight@0: # endif truelight@0: #endif truelight@0: #include truelight@0: truelight@0: #if !defined(LZO_COMPILE_TIME_ASSERT) truelight@0: # define LZO_COMPILE_TIME_ASSERT(expr) \ truelight@0: { typedef int __lzo_compile_time_assert_fail[1 - 2 * !(expr)]; } truelight@0: #endif truelight@0: truelight@0: #if !defined(LZO_UNUSED) truelight@0: # if 1 truelight@0: # define LZO_UNUSED(var) ((void)&var) truelight@0: # elif 0 truelight@0: # define LZO_UNUSED(var) { typedef int __lzo_unused[sizeof(var) ? 2 : 1]; } truelight@0: # else truelight@0: # define LZO_UNUSED(parm) (parm = parm) truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if !defined(__inline__) && !defined(__GNUC__) truelight@0: # if defined(__cplusplus) truelight@0: # define __inline__ inline truelight@0: # else truelight@0: # define __inline__ truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(NO_MEMCMP) truelight@0: # undef HAVE_MEMCMP truelight@0: #endif truelight@0: truelight@0: #if 0 truelight@0: # define LZO_BYTE(x) ((unsigned char) (x)) truelight@0: #else truelight@0: # define LZO_BYTE(x) ((unsigned char) ((x) & 0xff)) truelight@0: #endif truelight@0: truelight@0: #define LZO_MAX(a,b) ((a) >= (b) ? (a) : (b)) truelight@0: #define LZO_MIN(a,b) ((a) <= (b) ? (a) : (b)) truelight@0: #define LZO_MAX3(a,b,c) ((a) >= (b) ? LZO_MAX(a,c) : LZO_MAX(b,c)) truelight@0: #define LZO_MIN3(a,b,c) ((a) <= (b) ? LZO_MIN(a,c) : LZO_MIN(b,c)) truelight@0: truelight@0: #define lzo_sizeof(type) ((lzo_uint) (sizeof(type))) truelight@0: truelight@0: #define LZO_HIGH(array) ((lzo_uint) (sizeof(array)/sizeof(*(array)))) truelight@0: truelight@0: #define LZO_SIZE(bits) (1u << (bits)) truelight@0: #define LZO_MASK(bits) (LZO_SIZE(bits) - 1) truelight@0: truelight@0: #define LZO_LSIZE(bits) (1ul << (bits)) truelight@0: #define LZO_LMASK(bits) (LZO_LSIZE(bits) - 1) truelight@0: truelight@0: #define LZO_USIZE(bits) ((lzo_uint) 1 << (bits)) truelight@0: #define LZO_UMASK(bits) (LZO_USIZE(bits) - 1) truelight@0: truelight@0: #define LZO_STYPE_MAX(b) (((1l << (8*(b)-2)) - 1l) + (1l << (8*(b)-2))) truelight@0: #define LZO_UTYPE_MAX(b) (((1ul << (8*(b)-1)) - 1ul) + (1ul << (8*(b)-1))) truelight@0: truelight@0: #if !defined(SIZEOF_UNSIGNED) truelight@0: # if (UINT_MAX == 0xffff) truelight@0: # define SIZEOF_UNSIGNED 2 truelight@0: # elif (UINT_MAX == LZO_0xffffffffL) truelight@0: # define SIZEOF_UNSIGNED 4 truelight@0: # elif (UINT_MAX >= LZO_0xffffffffL) truelight@0: # define SIZEOF_UNSIGNED 8 truelight@0: # else truelight@0: # error "SIZEOF_UNSIGNED" truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if !defined(SIZEOF_UNSIGNED_LONG) truelight@0: # if (ULONG_MAX == LZO_0xffffffffL) truelight@0: # define SIZEOF_UNSIGNED_LONG 4 truelight@0: # elif (ULONG_MAX >= LZO_0xffffffffL) truelight@0: # define SIZEOF_UNSIGNED_LONG 8 truelight@0: # else truelight@0: # error "SIZEOF_UNSIGNED_LONG" truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if !defined(SIZEOF_SIZE_T) truelight@0: # define SIZEOF_SIZE_T SIZEOF_UNSIGNED truelight@0: #endif truelight@0: #if !defined(SIZE_T_MAX) truelight@0: # define SIZE_T_MAX LZO_UTYPE_MAX(SIZEOF_SIZE_T) truelight@0: #endif truelight@0: truelight@0: #if 1 && defined(__LZO_i386) && (UINT_MAX == LZO_0xffffffffL) truelight@0: # if !defined(LZO_UNALIGNED_OK_2) && (USHRT_MAX == 0xffff) truelight@0: # define LZO_UNALIGNED_OK_2 truelight@0: # endif truelight@0: # if !defined(LZO_UNALIGNED_OK_4) && (LZO_UINT32_MAX == LZO_0xffffffffL) truelight@0: # define LZO_UNALIGNED_OK_4 truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_UNALIGNED_OK_2) || defined(LZO_UNALIGNED_OK_4) truelight@0: # if !defined(LZO_UNALIGNED_OK) truelight@0: # define LZO_UNALIGNED_OK truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(__LZO_NO_UNALIGNED) truelight@0: # undef LZO_UNALIGNED_OK truelight@0: # undef LZO_UNALIGNED_OK_2 truelight@0: # undef LZO_UNALIGNED_OK_4 truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_UNALIGNED_OK_2) && (USHRT_MAX != 0xffff) truelight@0: # error "LZO_UNALIGNED_OK_2 must not be defined on this system" truelight@0: #endif truelight@0: #if defined(LZO_UNALIGNED_OK_4) && (LZO_UINT32_MAX != LZO_0xffffffffL) truelight@0: # error "LZO_UNALIGNED_OK_4 must not be defined on this system" truelight@0: #endif truelight@0: truelight@0: #if defined(__LZO_NO_ALIGNED) truelight@0: # undef LZO_ALIGNED_OK_4 truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_ALIGNED_OK_4) && (LZO_UINT32_MAX != LZO_0xffffffffL) truelight@0: # error "LZO_ALIGNED_OK_4 must not be defined on this system" truelight@0: #endif truelight@0: truelight@0: #define LZO_LITTLE_ENDIAN 1234 truelight@0: #define LZO_BIG_ENDIAN 4321 truelight@0: #define LZO_PDP_ENDIAN 3412 truelight@0: truelight@0: #if !defined(LZO_BYTE_ORDER) truelight@0: # if defined(MFX_BYTE_ORDER) truelight@0: # define LZO_BYTE_ORDER MFX_BYTE_ORDER truelight@0: # elif defined(__LZO_i386) truelight@0: # define LZO_BYTE_ORDER LZO_LITTLE_ENDIAN truelight@0: # elif defined(BYTE_ORDER) truelight@0: # define LZO_BYTE_ORDER BYTE_ORDER truelight@0: # elif defined(__BYTE_ORDER) truelight@0: # define LZO_BYTE_ORDER __BYTE_ORDER truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_BYTE_ORDER) truelight@0: # if (LZO_BYTE_ORDER != LZO_LITTLE_ENDIAN) && \ truelight@0: (LZO_BYTE_ORDER != LZO_BIG_ENDIAN) truelight@0: # error "invalid LZO_BYTE_ORDER" truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_UNALIGNED_OK) && !defined(LZO_BYTE_ORDER) truelight@0: # error "LZO_BYTE_ORDER is not defined" truelight@0: #endif truelight@0: truelight@0: #define LZO_OPTIMIZE_GNUC_i386_IS_BUGGY truelight@0: truelight@0: #if defined(NDEBUG) && !defined(LZO_DEBUG) && !defined(__LZO_CHECKER) truelight@0: # if defined(__GNUC__) && defined(__i386__) truelight@0: # if !defined(LZO_OPTIMIZE_GNUC_i386_IS_BUGGY) truelight@0: # define LZO_OPTIMIZE_GNUC_i386 truelight@0: # endif truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: __LZO_EXTERN_C int __lzo_init_done; truelight@0: __LZO_EXTERN_C const lzo_byte __lzo_copyright[]; truelight@0: LZO_EXTERN(const lzo_byte *) lzo_copyright(void); truelight@0: __LZO_EXTERN_C const lzo_uint32 _lzo_crc32_table[256]; truelight@0: truelight@0: #define _LZO_STRINGIZE(x) #x truelight@0: #define _LZO_MEXPAND(x) _LZO_STRINGIZE(x) truelight@0: truelight@0: #define _LZO_CONCAT2(a,b) a ## b truelight@0: #define _LZO_CONCAT3(a,b,c) a ## b ## c truelight@0: #define _LZO_CONCAT4(a,b,c,d) a ## b ## c ## d truelight@0: #define _LZO_CONCAT5(a,b,c,d,e) a ## b ## c ## d ## e truelight@0: truelight@0: #define _LZO_ECONCAT2(a,b) _LZO_CONCAT2(a,b) truelight@0: #define _LZO_ECONCAT3(a,b,c) _LZO_CONCAT3(a,b,c) truelight@0: #define _LZO_ECONCAT4(a,b,c,d) _LZO_CONCAT4(a,b,c,d) truelight@0: #define _LZO_ECONCAT5(a,b,c,d,e) _LZO_CONCAT5(a,b,c,d,e) truelight@0: truelight@0: #ifndef __LZO_PTR_H truelight@0: #define __LZO_PTR_H truelight@0: truelight@0: #ifdef __cplusplus truelight@0: extern "C" { truelight@0: #endif truelight@0: truelight@0: #if defined(__LZO_DOS16) || defined(__LZO_WIN16) truelight@0: # include truelight@0: # if 1 && defined(__WATCOMC__) truelight@0: # include truelight@0: __LZO_EXTERN_C unsigned char _HShift; truelight@0: # define __LZO_HShift _HShift truelight@0: # elif 1 && defined(_MSC_VER) truelight@0: __LZO_EXTERN_C unsigned short __near _AHSHIFT; truelight@0: # define __LZO_HShift ((unsigned) &_AHSHIFT) truelight@0: # elif defined(__LZO_WIN16) truelight@0: # define __LZO_HShift 3 truelight@0: # else truelight@0: # define __LZO_HShift 12 truelight@0: # endif truelight@0: # if !defined(_FP_SEG) && defined(FP_SEG) truelight@0: # define _FP_SEG FP_SEG truelight@0: # endif truelight@0: # if !defined(_FP_OFF) && defined(FP_OFF) truelight@0: # define _FP_OFF FP_OFF truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if !defined(lzo_ptrdiff_t) truelight@0: # if (UINT_MAX >= LZO_0xffffffffL) truelight@0: typedef ptrdiff_t lzo_ptrdiff_t; truelight@0: # else truelight@0: typedef long lzo_ptrdiff_t; truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if !defined(__LZO_HAVE_PTR_T) truelight@0: # if defined(lzo_ptr_t) truelight@0: # define __LZO_HAVE_PTR_T truelight@0: # endif truelight@0: #endif truelight@0: #if !defined(__LZO_HAVE_PTR_T) Darkvater@2482: # if defined(_WIN64) Darkvater@2482: typedef unsigned __int64 lzo_ptr_t; Darkvater@2482: typedef signed __int64 lzo_sptr_r; Darkvater@2482: # define __LZO_HAVE_PTR_T Darkvater@2482: # endif Darkvater@2482: #endif Darkvater@2482: #if !defined(__LZO_HAVE_PTR_T) truelight@0: # if defined(SIZEOF_CHAR_P) && defined(SIZEOF_UNSIGNED_LONG) truelight@0: # if (SIZEOF_CHAR_P == SIZEOF_UNSIGNED_LONG) truelight@0: typedef unsigned long lzo_ptr_t; truelight@0: typedef long lzo_sptr_t; truelight@0: # define __LZO_HAVE_PTR_T truelight@0: # endif truelight@0: # endif truelight@0: #endif truelight@0: #if !defined(__LZO_HAVE_PTR_T) truelight@0: # if defined(SIZEOF_CHAR_P) && defined(SIZEOF_UNSIGNED) truelight@0: # if (SIZEOF_CHAR_P == SIZEOF_UNSIGNED) truelight@0: typedef unsigned int lzo_ptr_t; truelight@0: typedef int lzo_sptr_t; truelight@0: # define __LZO_HAVE_PTR_T truelight@0: # endif truelight@0: # endif truelight@0: #endif truelight@0: #if !defined(__LZO_HAVE_PTR_T) truelight@0: # if defined(SIZEOF_CHAR_P) && defined(SIZEOF_UNSIGNED_SHORT) truelight@0: # if (SIZEOF_CHAR_P == SIZEOF_UNSIGNED_SHORT) truelight@0: typedef unsigned short lzo_ptr_t; truelight@0: typedef short lzo_sptr_t; truelight@0: # define __LZO_HAVE_PTR_T truelight@0: # endif truelight@0: # endif truelight@0: #endif truelight@0: #if !defined(__LZO_HAVE_PTR_T) truelight@0: # if defined(LZO_HAVE_CONFIG_H) || defined(SIZEOF_CHAR_P) truelight@0: # error "no suitable type for lzo_ptr_t" truelight@0: # else truelight@0: typedef unsigned long lzo_ptr_t; truelight@0: typedef long lzo_sptr_t; truelight@0: # define __LZO_HAVE_PTR_T truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(__LZO_DOS16) || defined(__LZO_WIN16) truelight@0: #define PTR(a) ((lzo_bytep) (a)) truelight@0: #define PTR_ALIGNED_4(a) ((_FP_OFF(a) & 3) == 0) truelight@0: #define PTR_ALIGNED2_4(a,b) (((_FP_OFF(a) | _FP_OFF(b)) & 3) == 0) truelight@0: #else truelight@0: #define PTR(a) ((lzo_ptr_t) (a)) truelight@0: #define PTR_LINEAR(a) PTR(a) truelight@0: #define PTR_ALIGNED_4(a) ((PTR_LINEAR(a) & 3) == 0) truelight@0: #define PTR_ALIGNED_8(a) ((PTR_LINEAR(a) & 7) == 0) truelight@0: #define PTR_ALIGNED2_4(a,b) (((PTR_LINEAR(a) | PTR_LINEAR(b)) & 3) == 0) truelight@0: #define PTR_ALIGNED2_8(a,b) (((PTR_LINEAR(a) | PTR_LINEAR(b)) & 7) == 0) truelight@0: #endif truelight@0: truelight@0: #define PTR_LT(a,b) (PTR(a) < PTR(b)) truelight@0: #define PTR_GE(a,b) (PTR(a) >= PTR(b)) truelight@0: #define PTR_DIFF(a,b) ((lzo_ptrdiff_t) (PTR(a) - PTR(b))) truelight@0: #define pd(a,b) ((lzo_uint) ((a)-(b))) truelight@0: truelight@0: LZO_EXTERN(lzo_ptr_t) truelight@0: __lzo_ptr_linear(const lzo_voidp ptr); truelight@0: truelight@0: typedef union truelight@0: { truelight@0: char a_char; truelight@0: unsigned char a_uchar; truelight@0: short a_short; truelight@0: unsigned short a_ushort; truelight@0: int a_int; truelight@0: unsigned int a_uint; truelight@0: long a_long; truelight@0: unsigned long a_ulong; truelight@0: lzo_int a_lzo_int; truelight@0: lzo_uint a_lzo_uint; truelight@0: lzo_int32 a_lzo_int32; truelight@0: lzo_uint32 a_lzo_uint32; truelight@0: ptrdiff_t a_ptrdiff_t; truelight@0: lzo_ptrdiff_t a_lzo_ptrdiff_t; truelight@0: lzo_ptr_t a_lzo_ptr_t; truelight@0: lzo_voidp a_lzo_voidp; truelight@0: void * a_void_p; truelight@0: lzo_bytep a_lzo_bytep; truelight@0: lzo_bytepp a_lzo_bytepp; truelight@0: lzo_uintp a_lzo_uintp; truelight@0: lzo_uint * a_lzo_uint_p; truelight@0: lzo_uint32p a_lzo_uint32p; truelight@0: lzo_uint32 * a_lzo_uint32_p; truelight@0: unsigned char * a_uchar_p; truelight@0: char * a_char_p; truelight@0: } truelight@0: lzo_full_align_t; truelight@0: truelight@0: #ifdef __cplusplus truelight@0: } truelight@0: #endif truelight@0: truelight@0: #endif truelight@0: truelight@0: #define LZO_DETERMINISTIC truelight@0: truelight@0: #define LZO_DICT_USE_PTR truelight@0: #if defined(__LZO_DOS16) || defined(__LZO_WIN16) || defined(__LZO_STRICT_16BIT) truelight@0: # undef LZO_DICT_USE_PTR truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_DICT_USE_PTR) truelight@0: # define lzo_dict_t const lzo_bytep truelight@0: # define lzo_dict_p lzo_dict_t __LZO_MMODEL * truelight@0: #else truelight@0: # define lzo_dict_t lzo_uint truelight@0: # define lzo_dict_p lzo_dict_t __LZO_MMODEL * truelight@0: #endif truelight@0: truelight@0: #if !defined(lzo_moff_t) truelight@0: #define lzo_moff_t lzo_uint truelight@0: #endif truelight@0: truelight@0: #endif truelight@0: truelight@0: truelight@0: #ifndef __LZO_UTIL_H truelight@0: #define __LZO_UTIL_H truelight@0: truelight@0: #ifndef __LZO_CONF_H truelight@0: #endif truelight@0: truelight@0: #ifdef __cplusplus truelight@0: extern "C" { truelight@0: #endif truelight@0: truelight@0: #if 1 && defined(HAVE_MEMCPY) truelight@0: #if !defined(__LZO_DOS16) && !defined(__LZO_WIN16) truelight@0: truelight@0: #define MEMCPY8_DS(dest,src,len) \ truelight@0: memcpy(dest,src,len); \ truelight@0: dest += len; \ truelight@0: src += len truelight@0: truelight@0: #endif truelight@0: #endif truelight@0: truelight@0: #if 0 && !defined(MEMCPY8_DS) truelight@0: truelight@0: #define MEMCPY8_DS(dest,src,len) \ truelight@0: { do { \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: len -= 8; \ truelight@0: } while (len > 0); } truelight@0: truelight@0: #endif truelight@0: truelight@0: #if !defined(MEMCPY8_DS) truelight@0: truelight@0: #define MEMCPY8_DS(dest,src,len) \ truelight@0: { register lzo_uint __l = (len) / 8; \ truelight@0: do { \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: *dest++ = *src++; \ truelight@0: } while (--__l > 0); } truelight@0: truelight@0: #endif truelight@0: truelight@0: #define MEMCPY_DS(dest,src,len) \ truelight@0: do *dest++ = *src++; \ truelight@0: while (--len > 0) truelight@0: truelight@0: #define MEMMOVE_DS(dest,src,len) \ truelight@0: do *dest++ = *src++; \ truelight@0: while (--len > 0) truelight@0: truelight@0: #if 0 && defined(LZO_OPTIMIZE_GNUC_i386) truelight@0: truelight@0: #define BZERO8_PTR(s,l,n) \ truelight@0: __asm__ __volatile__( \ truelight@0: "movl %0,%%eax \n" \ truelight@0: "movl %1,%%edi \n" \ truelight@0: "movl %2,%%ecx \n" \ truelight@0: "cld \n" \ truelight@0: "rep \n" \ truelight@0: "stosl %%eax,(%%edi) \n" \ truelight@0: : \ truelight@0: :"g" (0),"g" (s),"g" (n) \ truelight@0: :"eax","edi","ecx", "memory", "cc" \ truelight@0: ) truelight@0: truelight@0: #elif (LZO_UINT_MAX <= SIZE_T_MAX) && defined(HAVE_MEMSET) truelight@0: truelight@0: #if 1 truelight@0: #define BZERO8_PTR(s,l,n) memset((s),0,(lzo_uint)(l)*(n)) truelight@0: #else truelight@0: #define BZERO8_PTR(s,l,n) memset((lzo_voidp)(s),0,(lzo_uint)(l)*(n)) truelight@0: #endif truelight@0: truelight@0: #else truelight@0: truelight@0: #define BZERO8_PTR(s,l,n) \ truelight@0: lzo_memset((lzo_voidp)(s),0,(lzo_uint)(l)*(n)) truelight@0: truelight@0: #endif truelight@0: truelight@0: #if 0 truelight@0: #if defined(__GNUC__) && defined(__i386__) truelight@0: truelight@0: unsigned char lzo_rotr8(unsigned char value, int shift); truelight@0: extern __inline__ unsigned char lzo_rotr8(unsigned char value, int shift) truelight@0: { truelight@0: unsigned char result; truelight@0: truelight@0: __asm__ __volatile__ ("movb %b1, %b0; rorb %b2, %b0" truelight@0: : "=a"(result) : "g"(value), "c"(shift)); truelight@0: return result; truelight@0: } truelight@0: truelight@0: unsigned short lzo_rotr16(unsigned short value, int shift); truelight@0: extern __inline__ unsigned short lzo_rotr16(unsigned short value, int shift) truelight@0: { truelight@0: unsigned short result; truelight@0: truelight@0: __asm__ __volatile__ ("movw %b1, %b0; rorw %b2, %b0" truelight@0: : "=a"(result) : "g"(value), "c"(shift)); truelight@0: return result; truelight@0: } truelight@0: truelight@0: #endif truelight@0: #endif truelight@0: truelight@0: #ifdef __cplusplus truelight@0: } truelight@0: #endif truelight@0: truelight@0: #endif truelight@0: truelight@0: truelight@0: /* If you use the LZO library in a product, you *must* keep this truelight@0: * copyright string in the executable of your product. truelight@0: */ truelight@0: tron@1277: const lzo_byte __lzo_copyright[] = truelight@0: #if !defined(__LZO_IN_MINLZO) truelight@0: LZO_VERSION_STRING; truelight@0: #else truelight@0: "\n\n\n" truelight@0: "LZO real-time data compression library.\n" truelight@0: "Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002 Markus Franz Xaver Johannes Oberhumer\n" truelight@0: "\n" truelight@0: "http://www.oberhumer.com/opensource/lzo/\n" truelight@0: "\n" truelight@0: "LZO version: v" LZO_VERSION_STRING ", " LZO_VERSION_DATE "\n" truelight@0: "LZO build date: " __DATE__ " " __TIME__ "\n\n" truelight@0: "LZO special compilation options:\n" truelight@0: #ifdef __cplusplus truelight@0: " __cplusplus\n" truelight@0: #endif truelight@0: #if defined(__PIC__) truelight@0: " __PIC__\n" truelight@0: #elif defined(__pic__) truelight@0: " __pic__\n" truelight@0: #endif truelight@0: #if (UINT_MAX < LZO_0xffffffffL) truelight@0: " 16BIT\n" truelight@0: #endif truelight@0: #if defined(__LZO_STRICT_16BIT) truelight@0: " __LZO_STRICT_16BIT\n" truelight@0: #endif truelight@0: #if (UINT_MAX > LZO_0xffffffffL) truelight@0: " UINT_MAX=" _LZO_MEXPAND(UINT_MAX) "\n" truelight@0: #endif truelight@0: #if (ULONG_MAX > LZO_0xffffffffL) truelight@0: " ULONG_MAX=" _LZO_MEXPAND(ULONG_MAX) "\n" truelight@0: #endif truelight@0: #if defined(LZO_BYTE_ORDER) truelight@0: " LZO_BYTE_ORDER=" _LZO_MEXPAND(LZO_BYTE_ORDER) "\n" truelight@0: #endif truelight@0: #if defined(LZO_UNALIGNED_OK_2) truelight@0: " LZO_UNALIGNED_OK_2\n" truelight@0: #endif truelight@0: #if defined(LZO_UNALIGNED_OK_4) truelight@0: " LZO_UNALIGNED_OK_4\n" truelight@0: #endif truelight@0: #if defined(LZO_ALIGNED_OK_4) truelight@0: " LZO_ALIGNED_OK_4\n" truelight@0: #endif truelight@0: #if defined(LZO_DICT_USE_PTR) truelight@0: " LZO_DICT_USE_PTR\n" truelight@0: #endif truelight@0: #if defined(__LZO_QUERY_COMPRESS) truelight@0: " __LZO_QUERY_COMPRESS\n" truelight@0: #endif truelight@0: #if defined(__LZO_QUERY_DECOMPRESS) truelight@0: " __LZO_QUERY_DECOMPRESS\n" truelight@0: #endif truelight@0: #if defined(__LZO_IN_MINILZO) truelight@0: " __LZO_IN_MINILZO\n" truelight@0: #endif truelight@0: "\n\n" truelight@0: "$Id: LZO " LZO_VERSION_STRING " built " __DATE__ " " __TIME__ truelight@0: #if defined(__GNUC__) && defined(__VERSION__) truelight@0: " by gcc " __VERSION__ truelight@0: #elif defined(__BORLANDC__) truelight@0: " by Borland C " _LZO_MEXPAND(__BORLANDC__) truelight@0: #elif defined(_MSC_VER) truelight@0: " by Microsoft C " _LZO_MEXPAND(_MSC_VER) truelight@0: #elif defined(__PUREC__) truelight@0: " by Pure C " _LZO_MEXPAND(__PUREC__) truelight@0: #elif defined(__SC__) truelight@0: " by Symantec C " _LZO_MEXPAND(__SC__) truelight@0: #elif defined(__TURBOC__) truelight@0: " by Turbo C " _LZO_MEXPAND(__TURBOC__) truelight@0: #elif defined(__WATCOMC__) truelight@0: " by Watcom C " _LZO_MEXPAND(__WATCOMC__) truelight@0: #endif truelight@0: " $\n" truelight@0: "$Copyright: LZO (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002 Markus Franz Xaver Johannes Oberhumer $\n"; truelight@0: #endif truelight@0: truelight@0: #define LZO_BASE 65521u truelight@0: #define LZO_NMAX 5552 truelight@0: truelight@0: #define LZO_DO1(buf,i) {s1 += buf[i]; s2 += s1;} truelight@0: #define LZO_DO2(buf,i) LZO_DO1(buf,i); LZO_DO1(buf,i+1); truelight@0: #define LZO_DO4(buf,i) LZO_DO2(buf,i); LZO_DO2(buf,i+2); truelight@0: #define LZO_DO8(buf,i) LZO_DO4(buf,i); LZO_DO4(buf,i+4); truelight@0: #define LZO_DO16(buf,i) LZO_DO8(buf,i); LZO_DO8(buf,i+8); truelight@0: truelight@0: LZO_PUBLIC(lzo_uint32) truelight@0: lzo_adler32(lzo_uint32 adler, const lzo_byte *buf, lzo_uint len) truelight@0: { truelight@0: lzo_uint32 s1 = adler & 0xffff; truelight@0: lzo_uint32 s2 = (adler >> 16) & 0xffff; truelight@0: int k; truelight@0: truelight@0: if (buf == NULL) truelight@0: return 1; truelight@0: truelight@0: while (len > 0) truelight@0: { truelight@0: k = len < LZO_NMAX ? (int) len : LZO_NMAX; truelight@0: len -= k; truelight@0: if (k >= 16) do truelight@0: { truelight@0: LZO_DO16(buf,0); truelight@0: buf += 16; truelight@0: k -= 16; truelight@0: } while (k >= 16); truelight@0: if (k != 0) do truelight@0: { truelight@0: s1 += *buf++; truelight@0: s2 += s1; truelight@0: } while (--k > 0); truelight@0: s1 %= LZO_BASE; truelight@0: s2 %= LZO_BASE; truelight@0: } truelight@0: return (s2 << 16) | s1; truelight@0: } truelight@0: truelight@0: #if 0 truelight@0: # define IS_SIGNED(type) (((type) (1ul << (8 * sizeof(type) - 1))) < 0) truelight@0: # define IS_UNSIGNED(type) (((type) (1ul << (8 * sizeof(type) - 1))) > 0) truelight@0: #else truelight@0: # define IS_SIGNED(type) (((type) (-1)) < ((type) 0)) truelight@0: # define IS_UNSIGNED(type) (((type) (-1)) > ((type) 0)) truelight@0: #endif truelight@0: truelight@0: #define IS_POWER_OF_2(x) (((x) & ((x) - 1)) == 0) truelight@0: truelight@0: // static lzo_bool schedule_insns_bug(void); truelight@0: // static lzo_bool strength_reduce_bug(int *); truelight@0: truelight@0: #if 0 || defined(LZO_DEBUG) truelight@0: #include truelight@0: static lzo_bool __lzo_assert_fail(const char *s, unsigned line) truelight@0: { truelight@0: #if defined(__palmos__) truelight@0: printf("LZO assertion failed in line %u: '%s'\n",line,s); truelight@0: #else truelight@0: fprintf(stderr,"LZO assertion failed in line %u: '%s'\n",line,s); truelight@0: #endif truelight@0: return 0; truelight@0: } truelight@0: # define __lzo_assert(x) ((x) ? 1 : __lzo_assert_fail(#x,__LINE__)) truelight@0: #else truelight@0: # define __lzo_assert(x) ((x) ? 1 : 0) truelight@0: #endif truelight@0: truelight@0: #undef COMPILE_TIME_ASSERT truelight@0: #if 0 truelight@0: # define COMPILE_TIME_ASSERT(expr) r &= __lzo_assert(expr) truelight@0: #else truelight@0: # define COMPILE_TIME_ASSERT(expr) LZO_COMPILE_TIME_ASSERT(expr) truelight@0: #endif truelight@0: truelight@0: truelight@0: #define do_compress _lzo1x_1_do_compress truelight@0: truelight@0: #define LZO_NEED_DICT_H truelight@0: #define D_BITS 12 truelight@0: #define D_INDEX1(d,p) d = DM((0x21*DX3(p,5,5,6)) >> 5) truelight@0: #define D_INDEX2(d,p) d = (d & (D_MASK & 0x7ff)) ^ (D_HIGH | 0x1f) truelight@0: truelight@0: #ifndef __LZO_CONFIG1X_H truelight@0: #define __LZO_CONFIG1X_H truelight@0: truelight@0: #define LZO_EOF_CODE truelight@0: #undef LZO_DETERMINISTIC truelight@0: truelight@0: #define M1_MAX_OFFSET 0x0400 truelight@0: #ifndef M2_MAX_OFFSET truelight@0: #define M2_MAX_OFFSET 0x0800 truelight@0: #endif truelight@0: #define M3_MAX_OFFSET 0x4000 truelight@0: #define M4_MAX_OFFSET 0xbfff truelight@0: truelight@0: #define MX_MAX_OFFSET (M1_MAX_OFFSET + M2_MAX_OFFSET) truelight@0: truelight@0: #define M1_MIN_LEN 2 truelight@0: #define M1_MAX_LEN 2 truelight@0: #define M2_MIN_LEN 3 truelight@0: #ifndef M2_MAX_LEN truelight@0: #define M2_MAX_LEN 8 truelight@0: #endif truelight@0: #define M3_MIN_LEN 3 truelight@0: #define M3_MAX_LEN 33 truelight@0: #define M4_MIN_LEN 3 truelight@0: #define M4_MAX_LEN 9 truelight@0: truelight@0: #define M1_MARKER 0 truelight@0: #define M2_MARKER 64 truelight@0: #define M3_MARKER 32 truelight@0: #define M4_MARKER 16 truelight@0: truelight@0: #ifndef MIN_LOOKAHEAD truelight@0: #define MIN_LOOKAHEAD (M2_MAX_LEN + 1) truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_NEED_DICT_H) truelight@0: truelight@0: #ifndef LZO_HASH truelight@0: #define LZO_HASH LZO_HASH_LZO_INCREMENTAL_B truelight@0: #endif truelight@0: #define DL_MIN_LEN M2_MIN_LEN truelight@0: truelight@0: #ifndef __LZO_DICT_H truelight@0: #define __LZO_DICT_H truelight@0: truelight@0: #ifdef __cplusplus truelight@0: extern "C" { truelight@0: #endif truelight@0: truelight@0: #if !defined(D_BITS) && defined(DBITS) truelight@0: # define D_BITS DBITS truelight@0: #endif truelight@0: #if !defined(D_BITS) truelight@0: # error "D_BITS is not defined" truelight@0: #endif truelight@0: #if (D_BITS < 16) truelight@0: # define D_SIZE LZO_SIZE(D_BITS) truelight@0: # define D_MASK LZO_MASK(D_BITS) truelight@0: #else truelight@0: # define D_SIZE LZO_USIZE(D_BITS) truelight@0: # define D_MASK LZO_UMASK(D_BITS) truelight@0: #endif truelight@0: #define D_HIGH ((D_MASK >> 1) + 1) truelight@0: truelight@0: #if !defined(DD_BITS) truelight@0: # define DD_BITS 0 truelight@0: #endif truelight@0: #define DD_SIZE LZO_SIZE(DD_BITS) truelight@0: #define DD_MASK LZO_MASK(DD_BITS) truelight@0: truelight@0: #if !defined(DL_BITS) truelight@0: # define DL_BITS (D_BITS - DD_BITS) truelight@0: #endif truelight@0: #if (DL_BITS < 16) truelight@0: # define DL_SIZE LZO_SIZE(DL_BITS) truelight@0: # define DL_MASK LZO_MASK(DL_BITS) truelight@0: #else truelight@0: # define DL_SIZE LZO_USIZE(DL_BITS) truelight@0: # define DL_MASK LZO_UMASK(DL_BITS) truelight@0: #endif truelight@0: truelight@0: #if (D_BITS != DL_BITS + DD_BITS) truelight@0: # error "D_BITS does not match" truelight@0: #endif truelight@0: #if (D_BITS < 8 || D_BITS > 18) truelight@0: # error "invalid D_BITS" truelight@0: #endif truelight@0: #if (DL_BITS < 8 || DL_BITS > 20) truelight@0: # error "invalid DL_BITS" truelight@0: #endif truelight@0: #if (DD_BITS < 0 || DD_BITS > 6) truelight@0: # error "invalid DD_BITS" truelight@0: #endif truelight@0: truelight@0: #if !defined(DL_MIN_LEN) truelight@0: # define DL_MIN_LEN 3 truelight@0: #endif truelight@0: #if !defined(DL_SHIFT) truelight@0: # define DL_SHIFT ((DL_BITS + (DL_MIN_LEN - 1)) / DL_MIN_LEN) truelight@0: #endif truelight@0: truelight@0: #define LZO_HASH_GZIP 1 truelight@0: #define LZO_HASH_GZIP_INCREMENTAL 2 truelight@0: #define LZO_HASH_LZO_INCREMENTAL_A 3 truelight@0: #define LZO_HASH_LZO_INCREMENTAL_B 4 truelight@0: truelight@0: #if !defined(LZO_HASH) truelight@0: # error "choose a hashing strategy" truelight@0: #endif truelight@0: truelight@0: #if (DL_MIN_LEN == 3) truelight@0: # define _DV2_A(p,shift1,shift2) \ truelight@0: (((( (lzo_uint32)((p)[0]) << shift1) ^ (p)[1]) << shift2) ^ (p)[2]) truelight@0: # define _DV2_B(p,shift1,shift2) \ truelight@0: (((( (lzo_uint32)((p)[2]) << shift1) ^ (p)[1]) << shift2) ^ (p)[0]) truelight@0: # define _DV3_B(p,shift1,shift2,shift3) \ truelight@0: ((_DV2_B((p)+1,shift1,shift2) << (shift3)) ^ (p)[0]) truelight@0: #elif (DL_MIN_LEN == 2) truelight@0: # define _DV2_A(p,shift1,shift2) \ truelight@0: (( (lzo_uint32)(p[0]) << shift1) ^ p[1]) truelight@0: # define _DV2_B(p,shift1,shift2) \ truelight@0: (( (lzo_uint32)(p[1]) << shift1) ^ p[2]) truelight@0: #else truelight@0: # error "invalid DL_MIN_LEN" truelight@0: #endif truelight@0: #define _DV_A(p,shift) _DV2_A(p,shift,shift) truelight@0: #define _DV_B(p,shift) _DV2_B(p,shift,shift) truelight@0: #define DA2(p,s1,s2) \ truelight@0: (((((lzo_uint32)((p)[2]) << (s2)) + (p)[1]) << (s1)) + (p)[0]) truelight@0: #define DS2(p,s1,s2) \ truelight@0: (((((lzo_uint32)((p)[2]) << (s2)) - (p)[1]) << (s1)) - (p)[0]) truelight@0: #define DX2(p,s1,s2) \ truelight@0: (((((lzo_uint32)((p)[2]) << (s2)) ^ (p)[1]) << (s1)) ^ (p)[0]) truelight@0: #define DA3(p,s1,s2,s3) ((DA2((p)+1,s2,s3) << (s1)) + (p)[0]) truelight@0: #define DS3(p,s1,s2,s3) ((DS2((p)+1,s2,s3) << (s1)) - (p)[0]) truelight@0: #define DX3(p,s1,s2,s3) ((DX2((p)+1,s2,s3) << (s1)) ^ (p)[0]) truelight@0: #define DMS(v,s) ((lzo_uint) (((v) & (D_MASK >> (s))) << (s))) truelight@0: #define DM(v) DMS(v,0) truelight@0: truelight@0: #if (LZO_HASH == LZO_HASH_GZIP) truelight@0: # define _DINDEX(dv,p) (_DV_A((p),DL_SHIFT)) truelight@0: truelight@0: #elif (LZO_HASH == LZO_HASH_GZIP_INCREMENTAL) truelight@0: # define __LZO_HASH_INCREMENTAL truelight@0: # define DVAL_FIRST(dv,p) dv = _DV_A((p),DL_SHIFT) truelight@0: # define DVAL_NEXT(dv,p) dv = (((dv) << DL_SHIFT) ^ p[2]) truelight@0: # define _DINDEX(dv,p) (dv) truelight@0: # define DVAL_LOOKAHEAD DL_MIN_LEN truelight@0: truelight@0: #elif (LZO_HASH == LZO_HASH_LZO_INCREMENTAL_A) truelight@0: # define __LZO_HASH_INCREMENTAL truelight@0: # define DVAL_FIRST(dv,p) dv = _DV_A((p),5) truelight@0: # define DVAL_NEXT(dv,p) \ truelight@0: dv ^= (lzo_uint32)(p[-1]) << (2*5); dv = (((dv) << 5) ^ p[2]) truelight@0: # define _DINDEX(dv,p) ((0x9f5f * (dv)) >> 5) truelight@0: # define DVAL_LOOKAHEAD DL_MIN_LEN truelight@0: truelight@0: #elif (LZO_HASH == LZO_HASH_LZO_INCREMENTAL_B) truelight@0: # define __LZO_HASH_INCREMENTAL truelight@0: # define DVAL_FIRST(dv,p) dv = _DV_B((p),5) truelight@0: # define DVAL_NEXT(dv,p) \ truelight@0: dv ^= p[-1]; dv = (((dv) >> 5) ^ ((lzo_uint32)(p[2]) << (2*5))) truelight@0: # define _DINDEX(dv,p) ((0x9f5f * (dv)) >> 5) truelight@0: # define DVAL_LOOKAHEAD DL_MIN_LEN truelight@0: truelight@0: #else truelight@0: # error "choose a hashing strategy" truelight@0: #endif truelight@0: truelight@0: #ifndef DINDEX truelight@0: #define DINDEX(dv,p) ((lzo_uint)((_DINDEX(dv,p)) & DL_MASK) << DD_BITS) truelight@0: #endif truelight@0: #if !defined(DINDEX1) && defined(D_INDEX1) truelight@0: #define DINDEX1 D_INDEX1 truelight@0: #endif truelight@0: #if !defined(DINDEX2) && defined(D_INDEX2) truelight@0: #define DINDEX2 D_INDEX2 truelight@0: #endif truelight@0: truelight@0: #if !defined(__LZO_HASH_INCREMENTAL) truelight@0: # define DVAL_FIRST(dv,p) ((void) 0) truelight@0: # define DVAL_NEXT(dv,p) ((void) 0) truelight@0: # define DVAL_LOOKAHEAD 0 truelight@0: #endif truelight@0: truelight@0: #if !defined(DVAL_ASSERT) truelight@0: #if defined(__LZO_HASH_INCREMENTAL) && !defined(NDEBUG) truelight@0: static void DVAL_ASSERT(lzo_uint32 dv, const lzo_byte *p) truelight@0: { truelight@0: lzo_uint32 df; truelight@0: DVAL_FIRST(df,(p)); truelight@0: assert(DINDEX(dv,p) == DINDEX(df,p)); truelight@0: } truelight@0: #else truelight@0: # define DVAL_ASSERT(dv,p) ((void) 0) truelight@0: #endif truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_DICT_USE_PTR) truelight@0: # define DENTRY(p,in) (p) truelight@0: # define GINDEX(m_pos,m_off,dict,dindex,in) m_pos = dict[dindex] truelight@0: #else truelight@0: # define DENTRY(p,in) ((lzo_uint) ((p)-(in))) truelight@0: # define GINDEX(m_pos,m_off,dict,dindex,in) m_off = dict[dindex] truelight@0: #endif truelight@0: truelight@0: #if (DD_BITS == 0) truelight@0: truelight@0: # define UPDATE_D(dict,drun,dv,p,in) dict[ DINDEX(dv,p) ] = DENTRY(p,in) truelight@0: # define UPDATE_I(dict,drun,index,p,in) dict[index] = DENTRY(p,in) truelight@0: # define UPDATE_P(ptr,drun,p,in) (ptr)[0] = DENTRY(p,in) truelight@0: truelight@0: #else truelight@0: truelight@0: # define UPDATE_D(dict,drun,dv,p,in) \ truelight@0: dict[ DINDEX(dv,p) + drun++ ] = DENTRY(p,in); drun &= DD_MASK truelight@0: # define UPDATE_I(dict,drun,index,p,in) \ truelight@0: dict[ (index) + drun++ ] = DENTRY(p,in); drun &= DD_MASK truelight@0: # define UPDATE_P(ptr,drun,p,in) \ truelight@0: (ptr) [ drun++ ] = DENTRY(p,in); drun &= DD_MASK truelight@0: truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_DICT_USE_PTR) truelight@0: truelight@0: #define LZO_CHECK_MPOS_DET(m_pos,m_off,in,ip,max_offset) \ truelight@0: (m_pos == NULL || (m_off = (lzo_moff_t) (ip - m_pos)) > max_offset) truelight@0: truelight@0: #define LZO_CHECK_MPOS_NON_DET(m_pos,m_off,in,ip,max_offset) \ truelight@0: (BOUNDS_CHECKING_OFF_IN_EXPR( \ truelight@0: (PTR_LT(m_pos,in) || \ truelight@0: (m_off = (lzo_moff_t) PTR_DIFF(ip,m_pos)) <= 0 || \ truelight@0: m_off > max_offset) )) truelight@0: truelight@0: #else truelight@0: truelight@0: #define LZO_CHECK_MPOS_DET(m_pos,m_off,in,ip,max_offset) \ truelight@0: (m_off == 0 || \ truelight@0: ((m_off = (lzo_moff_t) ((ip)-(in)) - m_off) > max_offset) || \ truelight@0: (m_pos = (ip) - (m_off), 0) ) truelight@0: truelight@0: #define LZO_CHECK_MPOS_NON_DET(m_pos,m_off,in,ip,max_offset) \ truelight@0: ((lzo_moff_t) ((ip)-(in)) <= m_off || \ truelight@0: ((m_off = (lzo_moff_t) ((ip)-(in)) - m_off) > max_offset) || \ truelight@0: (m_pos = (ip) - (m_off), 0) ) truelight@0: truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_DETERMINISTIC) truelight@0: # define LZO_CHECK_MPOS LZO_CHECK_MPOS_DET truelight@0: #else truelight@0: # define LZO_CHECK_MPOS LZO_CHECK_MPOS_NON_DET truelight@0: #endif truelight@0: truelight@0: #ifdef __cplusplus truelight@0: } truelight@0: #endif truelight@0: truelight@0: #endif truelight@0: truelight@0: #endif truelight@0: truelight@0: #endif truelight@0: truelight@0: #define DO_COMPRESS lzo1x_1_compress truelight@0: truelight@0: static truelight@0: lzo_uint do_compress ( const lzo_byte *in , lzo_uint in_len, truelight@0: lzo_byte *out, lzo_uintp out_len, truelight@0: lzo_voidp wrkmem ) truelight@0: { truelight@0: register const lzo_byte *ip; truelight@0: lzo_byte *op; truelight@0: const lzo_byte * const in_end = in + in_len; truelight@0: const lzo_byte * const ip_end = in + in_len - M2_MAX_LEN - 5; truelight@0: const lzo_byte *ii; truelight@0: lzo_dict_p const dict = (lzo_dict_p) wrkmem; truelight@0: truelight@0: op = out; truelight@0: ip = in; truelight@0: ii = ip; truelight@0: truelight@0: ip += 4; truelight@0: for (;;) truelight@0: { truelight@0: register const lzo_byte *m_pos; truelight@0: lzo_moff_t m_off; truelight@0: lzo_uint m_len; truelight@0: lzo_uint dindex; truelight@0: truelight@0: DINDEX1(dindex,ip); truelight@0: GINDEX(m_pos,m_off,dict,dindex,in); truelight@0: if (LZO_CHECK_MPOS_NON_DET(m_pos,m_off,in,ip,M4_MAX_OFFSET)) truelight@0: goto literal; truelight@0: if (m_off <= M2_MAX_OFFSET || m_pos[3] == ip[3]) truelight@0: goto try_match; truelight@0: DINDEX2(dindex,ip); truelight@0: GINDEX(m_pos,m_off,dict,dindex,in); truelight@0: if (LZO_CHECK_MPOS_NON_DET(m_pos,m_off,in,ip,M4_MAX_OFFSET)) truelight@0: goto literal; truelight@0: if (m_off <= M2_MAX_OFFSET || m_pos[3] == ip[3]) truelight@0: goto try_match; truelight@0: goto literal; truelight@0: truelight@0: try_match: truelight@0: #if 1 && defined(LZO_UNALIGNED_OK_2) truelight@0: if (* (const lzo_ushortp) m_pos != * (const lzo_ushortp) ip) truelight@0: #else truelight@0: if (m_pos[0] != ip[0] || m_pos[1] != ip[1]) truelight@0: #endif truelight@0: { truelight@0: } truelight@0: else truelight@0: { truelight@0: if (m_pos[2] == ip[2]) truelight@0: { truelight@0: goto match; truelight@0: } truelight@0: } truelight@0: truelight@0: literal: truelight@0: UPDATE_I(dict,0,dindex,ip,in); truelight@0: ++ip; truelight@0: if (ip >= ip_end) truelight@0: break; truelight@0: continue; truelight@0: truelight@0: match: truelight@0: UPDATE_I(dict,0,dindex,ip,in); truelight@0: if (pd(ip,ii) > 0) truelight@0: { truelight@0: register lzo_uint t = pd(ip,ii); truelight@0: truelight@0: if (t <= 3) truelight@0: { truelight@0: assert(op - 2 > out); truelight@0: op[-2] |= LZO_BYTE(t); truelight@0: } truelight@0: else if (t <= 18) truelight@0: *op++ = LZO_BYTE(t - 3); truelight@0: else truelight@0: { truelight@0: register lzo_uint tt = t - 18; truelight@0: truelight@0: *op++ = 0; truelight@0: while (tt > 255) truelight@0: { truelight@0: tt -= 255; truelight@0: *op++ = 0; truelight@0: } truelight@0: assert(tt > 0); truelight@0: *op++ = LZO_BYTE(tt); truelight@0: } truelight@0: do *op++ = *ii++; while (--t > 0); truelight@0: } truelight@0: truelight@0: assert(ii == ip); truelight@0: ip += 3; truelight@0: if (m_pos[3] != *ip++ || m_pos[4] != *ip++ || m_pos[5] != *ip++ || truelight@0: m_pos[6] != *ip++ || m_pos[7] != *ip++ || m_pos[8] != *ip++) { truelight@0: truelight@0: --ip; truelight@0: m_len = ip - ii; truelight@0: assert(m_len >= 3); assert(m_len <= M2_MAX_LEN); truelight@0: truelight@0: if (m_off <= M2_MAX_OFFSET) truelight@0: { truelight@0: m_off -= 1; truelight@0: *op++ = LZO_BYTE(((m_len - 1) << 5) | ((m_off & 7) << 2)); truelight@0: *op++ = LZO_BYTE(m_off >> 3); truelight@0: } truelight@0: else if (m_off <= M3_MAX_OFFSET) truelight@0: { truelight@0: m_off -= 1; truelight@0: *op++ = LZO_BYTE(M3_MARKER | (m_len - 2)); truelight@0: goto m3_m4_offset; truelight@0: } truelight@0: else truelight@0: { truelight@0: m_off -= 0x4000; truelight@0: assert(m_off > 0); assert(m_off <= 0x7fff); truelight@0: *op++ = LZO_BYTE(M4_MARKER | truelight@0: ((m_off & 0x4000) >> 11) | (m_len - 2)); truelight@0: goto m3_m4_offset; truelight@0: } truelight@0: } truelight@0: else truelight@0: { truelight@0: { truelight@0: const lzo_byte *end = in_end; truelight@0: const lzo_byte *m = m_pos + M2_MAX_LEN + 1; truelight@0: while (ip < end && *m == *ip) truelight@0: m++, ip++; truelight@0: m_len = (ip - ii); truelight@0: } truelight@0: assert(m_len > M2_MAX_LEN); truelight@0: truelight@0: if (m_off <= M3_MAX_OFFSET) truelight@0: { truelight@0: m_off -= 1; truelight@0: if (m_len <= 33) truelight@0: *op++ = LZO_BYTE(M3_MARKER | (m_len - 2)); truelight@0: else truelight@0: { truelight@0: m_len -= 33; truelight@0: *op++ = M3_MARKER | 0; truelight@0: goto m3_m4_len; truelight@0: } truelight@0: } truelight@0: else truelight@0: { truelight@0: m_off -= 0x4000; truelight@0: assert(m_off > 0); assert(m_off <= 0x7fff); truelight@0: if (m_len <= M4_MAX_LEN) truelight@0: *op++ = LZO_BYTE(M4_MARKER | truelight@0: ((m_off & 0x4000) >> 11) | (m_len - 2)); truelight@0: else truelight@0: { truelight@0: m_len -= M4_MAX_LEN; truelight@0: *op++ = LZO_BYTE(M4_MARKER | ((m_off & 0x4000) >> 11)); truelight@0: m3_m4_len: truelight@0: while (m_len > 255) truelight@0: { truelight@0: m_len -= 255; truelight@0: *op++ = 0; truelight@0: } truelight@0: assert(m_len > 0); truelight@0: *op++ = LZO_BYTE(m_len); truelight@0: } truelight@0: } truelight@0: truelight@0: m3_m4_offset: truelight@0: *op++ = LZO_BYTE((m_off & 63) << 2); truelight@0: *op++ = LZO_BYTE(m_off >> 6); truelight@0: } truelight@0: truelight@0: ii = ip; truelight@0: if (ip >= ip_end) truelight@0: break; truelight@0: } truelight@0: truelight@0: *out_len = op - out; truelight@0: return pd(in_end,ii); truelight@0: } truelight@0: truelight@0: LZO_PUBLIC(int) truelight@0: DO_COMPRESS ( const lzo_byte *in , lzo_uint in_len, truelight@0: lzo_byte *out, lzo_uintp out_len, truelight@0: lzo_voidp wrkmem ) truelight@0: { truelight@0: lzo_byte *op = out; truelight@0: lzo_uint t; truelight@0: truelight@0: if (in_len <= M2_MAX_LEN + 5) truelight@0: t = in_len; truelight@0: else truelight@0: { truelight@0: t = do_compress(in,in_len,op,out_len,wrkmem); truelight@0: op += *out_len; truelight@0: } truelight@0: truelight@0: if (t > 0) truelight@0: { truelight@0: const lzo_byte *ii = in + in_len - t; truelight@0: truelight@0: if (op == out && t <= 238) truelight@0: *op++ = LZO_BYTE(17 + t); truelight@0: else if (t <= 3) truelight@0: op[-2] |= LZO_BYTE(t); truelight@0: else if (t <= 18) truelight@0: *op++ = LZO_BYTE(t - 3); truelight@0: else truelight@0: { truelight@0: lzo_uint tt = t - 18; truelight@0: truelight@0: *op++ = 0; truelight@0: while (tt > 255) truelight@0: { truelight@0: tt -= 255; truelight@0: *op++ = 0; truelight@0: } truelight@0: assert(tt > 0); truelight@0: *op++ = LZO_BYTE(tt); truelight@0: } truelight@0: do *op++ = *ii++; while (--t > 0); truelight@0: } truelight@0: truelight@0: *op++ = M4_MARKER | 1; truelight@0: *op++ = 0; truelight@0: *op++ = 0; truelight@0: truelight@0: *out_len = op - out; truelight@0: return LZO_E_OK; truelight@0: } truelight@0: truelight@0: #undef do_compress truelight@0: #undef DO_COMPRESS truelight@0: #undef LZO_HASH truelight@0: truelight@0: #undef LZO_TEST_DECOMPRESS_OVERRUN truelight@0: #undef LZO_TEST_DECOMPRESS_OVERRUN_INPUT truelight@0: #undef LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT truelight@0: #undef LZO_TEST_DECOMPRESS_OVERRUN_LOOKBEHIND truelight@0: #undef DO_DECOMPRESS truelight@0: #define DO_DECOMPRESS lzo1x_decompress truelight@0: truelight@0: #if defined(LZO_TEST_DECOMPRESS_OVERRUN) truelight@0: # if !defined(LZO_TEST_DECOMPRESS_OVERRUN_INPUT) truelight@0: # define LZO_TEST_DECOMPRESS_OVERRUN_INPUT 2 truelight@0: # endif truelight@0: # if !defined(LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT) truelight@0: # define LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT 2 truelight@0: # endif truelight@0: # if !defined(LZO_TEST_DECOMPRESS_OVERRUN_LOOKBEHIND) truelight@0: # define LZO_TEST_DECOMPRESS_OVERRUN_LOOKBEHIND truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #undef TEST_IP truelight@0: #undef TEST_OP truelight@0: #undef TEST_LOOKBEHIND truelight@0: #undef NEED_IP truelight@0: #undef NEED_OP truelight@0: #undef HAVE_TEST_IP truelight@0: #undef HAVE_TEST_OP truelight@0: #undef HAVE_NEED_IP truelight@0: #undef HAVE_NEED_OP truelight@0: #undef HAVE_ANY_IP truelight@0: #undef HAVE_ANY_OP truelight@0: truelight@0: #if defined(LZO_TEST_DECOMPRESS_OVERRUN_INPUT) truelight@0: # if (LZO_TEST_DECOMPRESS_OVERRUN_INPUT >= 1) truelight@0: # define TEST_IP (ip < ip_end) truelight@0: # endif truelight@0: # if (LZO_TEST_DECOMPRESS_OVERRUN_INPUT >= 2) truelight@0: # define NEED_IP(x) \ truelight@0: if ((lzo_uint)(ip_end - ip) < (lzo_uint)(x)) goto input_overrun truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT) truelight@0: # if (LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT >= 1) truelight@0: # define TEST_OP (op <= op_end) truelight@0: # endif truelight@0: # if (LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT >= 2) truelight@0: # undef TEST_OP truelight@0: # define NEED_OP(x) \ truelight@0: if ((lzo_uint)(op_end - op) < (lzo_uint)(x)) goto output_overrun truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_TEST_DECOMPRESS_OVERRUN_LOOKBEHIND) truelight@0: # define TEST_LOOKBEHIND(m_pos,out) if (m_pos < out) goto lookbehind_overrun truelight@0: #else truelight@0: # define TEST_LOOKBEHIND(m_pos,op) ((void) 0) truelight@0: #endif truelight@0: truelight@0: #if !defined(LZO_EOF_CODE) && !defined(TEST_IP) truelight@0: # define TEST_IP (ip < ip_end) truelight@0: #endif truelight@0: truelight@0: #if defined(TEST_IP) truelight@0: # define HAVE_TEST_IP truelight@0: #else truelight@0: # define TEST_IP 1 truelight@0: #endif truelight@0: #if defined(TEST_OP) truelight@0: # define HAVE_TEST_OP truelight@0: #else truelight@0: # define TEST_OP 1 truelight@0: #endif truelight@0: truelight@0: #if defined(NEED_IP) truelight@0: # define HAVE_NEED_IP truelight@0: #else truelight@0: # define NEED_IP(x) ((void) 0) truelight@0: #endif truelight@0: #if defined(NEED_OP) truelight@0: # define HAVE_NEED_OP truelight@0: #else truelight@0: # define NEED_OP(x) ((void) 0) truelight@0: #endif truelight@0: truelight@0: #if defined(HAVE_TEST_IP) || defined(HAVE_NEED_IP) truelight@0: # define HAVE_ANY_IP truelight@0: #endif truelight@0: #if defined(HAVE_TEST_OP) || defined(HAVE_NEED_OP) truelight@0: # define HAVE_ANY_OP truelight@0: #endif truelight@0: truelight@0: #undef __COPY4 truelight@0: #define __COPY4(dst,src) * (lzo_uint32p)(dst) = * (const lzo_uint32p)(src) truelight@0: truelight@0: #undef COPY4 truelight@0: #if defined(LZO_UNALIGNED_OK_4) truelight@0: # define COPY4(dst,src) __COPY4(dst,src) truelight@0: #elif defined(LZO_ALIGNED_OK_4) truelight@0: # define COPY4(dst,src) __COPY4((lzo_ptr_t)(dst),(lzo_ptr_t)(src)) truelight@0: #endif truelight@0: truelight@0: #if defined(DO_DECOMPRESS) truelight@0: LZO_PUBLIC(int) truelight@0: DO_DECOMPRESS ( const lzo_byte *in , lzo_uint in_len, truelight@0: lzo_byte *out, lzo_uintp out_len, truelight@0: lzo_voidp wrkmem ) truelight@0: #endif truelight@0: { truelight@0: register lzo_byte *op; truelight@0: register const lzo_byte *ip; truelight@0: register lzo_uint t; truelight@0: register const lzo_byte *m_pos; truelight@0: truelight@0: const lzo_byte * const ip_end = in + in_len; truelight@0: #if defined(HAVE_ANY_OP) truelight@0: lzo_byte * const op_end = out + *out_len; truelight@0: #endif truelight@0: truelight@0: LZO_UNUSED(wrkmem); truelight@0: truelight@0: *out_len = 0; truelight@0: truelight@0: op = out; truelight@0: ip = in; truelight@0: truelight@0: if (*ip > 17) truelight@0: { truelight@0: t = *ip++ - 17; truelight@0: if (t < 4) truelight@0: goto match_next; truelight@0: assert(t > 0); NEED_OP(t); NEED_IP(t+1); truelight@0: do *op++ = *ip++; while (--t > 0); truelight@0: goto first_literal_run; truelight@0: } truelight@0: truelight@0: while (TEST_IP && TEST_OP) truelight@0: { truelight@0: t = *ip++; truelight@0: if (t >= 16) truelight@0: goto match; truelight@0: if (t == 0) truelight@0: { truelight@0: NEED_IP(1); truelight@0: while (*ip == 0) truelight@0: { truelight@0: t += 255; truelight@0: ip++; truelight@0: NEED_IP(1); truelight@0: } truelight@0: t += 15 + *ip++; truelight@0: } truelight@0: assert(t > 0); NEED_OP(t+3); NEED_IP(t+4); truelight@0: #if defined(LZO_UNALIGNED_OK_4) || defined(LZO_ALIGNED_OK_4) truelight@0: #if !defined(LZO_UNALIGNED_OK_4) truelight@0: if (PTR_ALIGNED2_4(op,ip)) truelight@0: { truelight@0: #endif truelight@0: COPY4(op,ip); truelight@0: op += 4; ip += 4; truelight@0: if (--t > 0) truelight@0: { truelight@0: if (t >= 4) truelight@0: { truelight@0: do { truelight@0: COPY4(op,ip); truelight@0: op += 4; ip += 4; t -= 4; truelight@0: } while (t >= 4); truelight@0: if (t > 0) do *op++ = *ip++; while (--t > 0); truelight@0: } truelight@0: else truelight@0: do *op++ = *ip++; while (--t > 0); truelight@0: } truelight@0: #if !defined(LZO_UNALIGNED_OK_4) truelight@0: } truelight@0: else truelight@0: #endif truelight@0: #endif truelight@0: #if !defined(LZO_UNALIGNED_OK_4) truelight@0: { truelight@0: *op++ = *ip++; *op++ = *ip++; *op++ = *ip++; truelight@0: do *op++ = *ip++; while (--t > 0); truelight@0: } truelight@0: #endif truelight@0: truelight@0: first_literal_run: truelight@0: truelight@0: t = *ip++; truelight@0: if (t >= 16) truelight@0: goto match; truelight@0: m_pos = op - (1 + M2_MAX_OFFSET); truelight@0: m_pos -= t >> 2; truelight@0: m_pos -= *ip++ << 2; truelight@0: TEST_LOOKBEHIND(m_pos,out); NEED_OP(3); truelight@0: *op++ = *m_pos++; *op++ = *m_pos++; *op++ = *m_pos; truelight@0: goto match_done; truelight@0: truelight@0: while (TEST_IP && TEST_OP) truelight@0: { truelight@0: match: truelight@0: if (t >= 64) truelight@0: { truelight@0: #if defined(LZO1X) truelight@0: m_pos = op - 1; truelight@0: m_pos -= (t >> 2) & 7; truelight@0: m_pos -= *ip++ << 3; truelight@0: t = (t >> 5) - 1; truelight@0: #endif truelight@0: TEST_LOOKBEHIND(m_pos,out); assert(t > 0); NEED_OP(t+3-1); truelight@0: goto copy_match; truelight@0: } truelight@0: else if (t >= 32) truelight@0: { truelight@0: t &= 31; truelight@0: if (t == 0) truelight@0: { truelight@0: NEED_IP(1); truelight@0: while (*ip == 0) truelight@0: { truelight@0: t += 255; truelight@0: ip++; truelight@0: NEED_IP(1); truelight@0: } truelight@0: t += 31 + *ip++; truelight@0: } truelight@0: #if defined(LZO_UNALIGNED_OK_2) && (LZO_BYTE_ORDER == LZO_LITTLE_ENDIAN) truelight@0: m_pos = op - 1; truelight@0: m_pos -= (* (const lzo_ushortp) ip) >> 2; truelight@0: #else truelight@0: m_pos = op - 1; truelight@0: m_pos -= (ip[0] >> 2) + (ip[1] << 6); truelight@0: #endif truelight@0: ip += 2; truelight@0: } truelight@0: else if (t >= 16) truelight@0: { truelight@0: m_pos = op; truelight@0: m_pos -= (t & 8) << 11; truelight@0: t &= 7; truelight@0: if (t == 0) truelight@0: { truelight@0: NEED_IP(1); truelight@0: while (*ip == 0) truelight@0: { truelight@0: t += 255; truelight@0: ip++; truelight@0: NEED_IP(1); truelight@0: } truelight@0: t += 7 + *ip++; truelight@0: } truelight@0: #if defined(LZO_UNALIGNED_OK_2) && (LZO_BYTE_ORDER == LZO_LITTLE_ENDIAN) truelight@0: m_pos -= (* (const lzo_ushortp) ip) >> 2; truelight@0: #else truelight@0: m_pos -= (ip[0] >> 2) + (ip[1] << 6); truelight@0: #endif truelight@0: ip += 2; truelight@0: if (m_pos == op) truelight@0: goto eof_found; truelight@0: m_pos -= 0x4000; truelight@0: } truelight@0: else truelight@0: { truelight@0: m_pos = op - 1; truelight@0: m_pos -= t >> 2; truelight@0: m_pos -= *ip++ << 2; truelight@0: TEST_LOOKBEHIND(m_pos,out); NEED_OP(2); truelight@0: *op++ = *m_pos++; *op++ = *m_pos; truelight@0: goto match_done; truelight@0: } truelight@0: truelight@0: TEST_LOOKBEHIND(m_pos,out); assert(t > 0); NEED_OP(t+3-1); truelight@0: #if defined(LZO_UNALIGNED_OK_4) || defined(LZO_ALIGNED_OK_4) truelight@0: #if !defined(LZO_UNALIGNED_OK_4) truelight@0: if (t >= 2 * 4 - (3 - 1) && PTR_ALIGNED2_4(op,m_pos)) truelight@0: { truelight@0: assert((op - m_pos) >= 4); truelight@0: #else truelight@0: if (t >= 2 * 4 - (3 - 1) && (op - m_pos) >= 4) truelight@0: { truelight@0: #endif truelight@0: COPY4(op,m_pos); truelight@0: op += 4; m_pos += 4; t -= 4 - (3 - 1); truelight@0: do { truelight@0: COPY4(op,m_pos); truelight@0: op += 4; m_pos += 4; t -= 4; truelight@0: } while (t >= 4); truelight@0: if (t > 0) do *op++ = *m_pos++; while (--t > 0); truelight@0: } truelight@0: else truelight@0: #endif truelight@0: { truelight@0: copy_match: truelight@0: *op++ = *m_pos++; *op++ = *m_pos++; truelight@0: do *op++ = *m_pos++; while (--t > 0); truelight@0: } truelight@0: truelight@0: match_done: truelight@0: t = ip[-2] & 3; truelight@0: if (t == 0) truelight@0: break; truelight@0: truelight@0: match_next: truelight@0: assert(t > 0); NEED_OP(t); NEED_IP(t+1); truelight@0: do *op++ = *ip++; while (--t > 0); truelight@0: t = *ip++; truelight@0: } truelight@0: } truelight@0: truelight@0: #if defined(HAVE_TEST_IP) || defined(HAVE_TEST_OP) truelight@0: *out_len = op - out; truelight@0: return LZO_E_EOF_NOT_FOUND; truelight@0: #endif truelight@0: truelight@0: eof_found: truelight@0: assert(t == 1); truelight@0: *out_len = op - out; truelight@0: return (ip == ip_end ? LZO_E_OK : truelight@0: (ip < ip_end ? LZO_E_INPUT_NOT_CONSUMED : LZO_E_INPUT_OVERRUN)); truelight@0: truelight@0: #if defined(HAVE_NEED_IP) truelight@0: input_overrun: truelight@0: *out_len = op - out; truelight@0: return LZO_E_INPUT_OVERRUN; truelight@0: #endif truelight@0: truelight@0: #if defined(HAVE_NEED_OP) truelight@0: output_overrun: truelight@0: *out_len = op - out; truelight@0: return LZO_E_OUTPUT_OVERRUN; truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_TEST_DECOMPRESS_OVERRUN_LOOKBEHIND) truelight@0: lookbehind_overrun: truelight@0: *out_len = op - out; truelight@0: return LZO_E_LOOKBEHIND_OVERRUN; truelight@0: #endif truelight@0: } truelight@0: truelight@0: #define LZO_TEST_DECOMPRESS_OVERRUN truelight@0: #undef DO_DECOMPRESS truelight@0: #define DO_DECOMPRESS lzo1x_decompress_safe truelight@0: truelight@0: #if defined(LZO_TEST_DECOMPRESS_OVERRUN) truelight@0: # if !defined(LZO_TEST_DECOMPRESS_OVERRUN_INPUT) truelight@0: # define LZO_TEST_DECOMPRESS_OVERRUN_INPUT 2 truelight@0: # endif truelight@0: # if !defined(LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT) truelight@0: # define LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT 2 truelight@0: # endif truelight@0: # if !defined(LZO_TEST_DECOMPRESS_OVERRUN_LOOKBEHIND) truelight@0: # define LZO_TEST_DECOMPRESS_OVERRUN_LOOKBEHIND truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #undef TEST_IP truelight@0: #undef TEST_OP truelight@0: #undef TEST_LOOKBEHIND truelight@0: #undef NEED_IP truelight@0: #undef NEED_OP truelight@0: #undef HAVE_TEST_IP truelight@0: #undef HAVE_TEST_OP truelight@0: #undef HAVE_NEED_IP truelight@0: #undef HAVE_NEED_OP truelight@0: #undef HAVE_ANY_IP truelight@0: #undef HAVE_ANY_OP truelight@0: truelight@0: truelight@0: #if 0 truelight@0: truelight@0: #if defined(LZO_TEST_DECOMPRESS_OVERRUN_INPUT) truelight@0: # if (LZO_TEST_DECOMPRESS_OVERRUN_INPUT >= 1) truelight@0: # define TEST_IP (ip < ip_end) truelight@0: # endif truelight@0: # if (LZO_TEST_DECOMPRESS_OVERRUN_INPUT >= 2) truelight@0: # define NEED_IP(x) \ truelight@0: if ((lzo_uint)(ip_end - ip) < (lzo_uint)(x)) goto input_overrun truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT) truelight@0: # if (LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT >= 1) truelight@0: # define TEST_OP (op <= op_end) truelight@0: # endif truelight@0: # if (LZO_TEST_DECOMPRESS_OVERRUN_OUTPUT >= 2) truelight@0: # undef TEST_OP truelight@0: # define NEED_OP(x) \ truelight@0: if ((lzo_uint)(op_end - op) < (lzo_uint)(x)) goto output_overrun truelight@0: # endif truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_TEST_DECOMPRESS_OVERRUN_LOOKBEHIND) truelight@0: # define TEST_LOOKBEHIND(m_pos,out) if (m_pos < out) goto lookbehind_overrun truelight@0: #else truelight@0: # define TEST_LOOKBEHIND(m_pos,op) ((void) 0) truelight@0: #endif truelight@0: truelight@0: #if !defined(LZO_EOF_CODE) && !defined(TEST_IP) truelight@0: # define TEST_IP (ip < ip_end) truelight@0: #endif truelight@0: truelight@0: #if defined(TEST_IP) truelight@0: # define HAVE_TEST_IP truelight@0: #else truelight@0: # define TEST_IP 1 truelight@0: #endif truelight@0: #if defined(TEST_OP) truelight@0: # define HAVE_TEST_OP truelight@0: #else truelight@0: # define TEST_OP 1 truelight@0: #endif truelight@0: truelight@0: #if defined(NEED_IP) truelight@0: # define HAVE_NEED_IP truelight@0: #else truelight@0: # define NEED_IP(x) ((void) 0) truelight@0: #endif truelight@0: #if defined(NEED_OP) truelight@0: # define HAVE_NEED_OP truelight@0: #else truelight@0: # define NEED_OP(x) ((void) 0) truelight@0: #endif truelight@0: truelight@0: #if defined(HAVE_TEST_IP) || defined(HAVE_NEED_IP) truelight@0: # define HAVE_ANY_IP truelight@0: #endif truelight@0: #if defined(HAVE_TEST_OP) || defined(HAVE_NEED_OP) truelight@0: # define HAVE_ANY_OP truelight@0: #endif truelight@0: truelight@0: #undef __COPY4 truelight@0: #define __COPY4(dst,src) * (lzo_uint32p)(dst) = * (const lzo_uint32p)(src) truelight@0: truelight@0: #undef COPY4 truelight@0: #if defined(LZO_UNALIGNED_OK_4) truelight@0: # define COPY4(dst,src) __COPY4(dst,src) truelight@0: #elif defined(LZO_ALIGNED_OK_4) truelight@0: # define COPY4(dst,src) __COPY4((lzo_ptr_t)(dst),(lzo_ptr_t)(src)) truelight@0: #endif truelight@0: truelight@0: #if defined(DO_DECOMPRESS) truelight@0: LZO_PUBLIC(int) truelight@0: DO_DECOMPRESS ( const lzo_byte *in , lzo_uint in_len, truelight@0: lzo_byte *out, lzo_uintp out_len, truelight@0: lzo_voidp wrkmem ) truelight@0: #endif truelight@0: { truelight@0: register lzo_byte *op; truelight@0: register const lzo_byte *ip; truelight@0: register lzo_uint t; truelight@0: register const lzo_byte *m_pos; truelight@0: truelight@0: const lzo_byte * const ip_end = in + in_len; truelight@0: #if defined(HAVE_ANY_OP) truelight@0: lzo_byte * const op_end = out + *out_len; truelight@0: #endif truelight@0: truelight@0: LZO_UNUSED(wrkmem); truelight@0: truelight@0: *out_len = 0; truelight@0: truelight@0: op = out; truelight@0: ip = in; truelight@0: truelight@0: if (*ip > 17) truelight@0: { truelight@0: t = *ip++ - 17; truelight@0: if (t < 4) truelight@0: goto match_next; truelight@0: assert(t > 0); NEED_OP(t); NEED_IP(t+1); truelight@0: do *op++ = *ip++; while (--t > 0); truelight@0: goto first_literal_run; truelight@0: } truelight@0: truelight@0: while (TEST_IP && TEST_OP) truelight@0: { truelight@0: t = *ip++; truelight@0: if (t >= 16) truelight@0: goto match; truelight@0: if (t == 0) truelight@0: { truelight@0: NEED_IP(1); truelight@0: while (*ip == 0) truelight@0: { truelight@0: t += 255; truelight@0: ip++; truelight@0: NEED_IP(1); truelight@0: } truelight@0: t += 15 + *ip++; truelight@0: } truelight@0: assert(t > 0); NEED_OP(t+3); NEED_IP(t+4); truelight@0: #if defined(LZO_UNALIGNED_OK_4) || defined(LZO_ALIGNED_OK_4) truelight@0: #if !defined(LZO_UNALIGNED_OK_4) truelight@0: if (PTR_ALIGNED2_4(op,ip)) truelight@0: { truelight@0: #endif truelight@0: COPY4(op,ip); truelight@0: op += 4; ip += 4; truelight@0: if (--t > 0) truelight@0: { truelight@0: if (t >= 4) truelight@0: { truelight@0: do { truelight@0: COPY4(op,ip); truelight@0: op += 4; ip += 4; t -= 4; truelight@0: } while (t >= 4); truelight@0: if (t > 0) do *op++ = *ip++; while (--t > 0); truelight@0: } truelight@0: else truelight@0: do *op++ = *ip++; while (--t > 0); truelight@0: } truelight@0: #if !defined(LZO_UNALIGNED_OK_4) truelight@0: } truelight@0: else truelight@0: #endif truelight@0: #endif truelight@0: #if !defined(LZO_UNALIGNED_OK_4) truelight@0: { truelight@0: *op++ = *ip++; *op++ = *ip++; *op++ = *ip++; truelight@0: do *op++ = *ip++; while (--t > 0); truelight@0: } truelight@0: #endif truelight@0: truelight@0: first_literal_run: truelight@0: truelight@0: t = *ip++; truelight@0: if (t >= 16) truelight@0: goto match; truelight@0: #if defined(LZO1Z) truelight@0: t = (1 + M2_MAX_OFFSET) + (t << 6) + (*ip++ >> 2); truelight@0: m_pos = op - t; truelight@0: last_m_off = t; truelight@0: #else truelight@0: m_pos = op - (1 + M2_MAX_OFFSET); truelight@0: m_pos -= t >> 2; truelight@0: m_pos -= *ip++ << 2; truelight@0: #endif truelight@0: TEST_LOOKBEHIND(m_pos,out); NEED_OP(3); truelight@0: *op++ = *m_pos++; *op++ = *m_pos++; *op++ = *m_pos; truelight@0: goto match_done; truelight@0: truelight@0: while (TEST_IP && TEST_OP) truelight@0: { truelight@0: match: truelight@0: if (t >= 64) truelight@0: { truelight@0: #if defined(LZO1X) truelight@0: m_pos = op - 1; truelight@0: m_pos -= (t >> 2) & 7; truelight@0: m_pos -= *ip++ << 3; truelight@0: t = (t >> 5) - 1; truelight@0: #elif defined(LZO1Y) truelight@0: m_pos = op - 1; truelight@0: m_pos -= (t >> 2) & 3; truelight@0: m_pos -= *ip++ << 2; truelight@0: t = (t >> 4) - 3; truelight@0: #elif defined(LZO1Z) truelight@0: { truelight@0: lzo_uint off = t & 0x1f; truelight@0: m_pos = op; truelight@0: if (off >= 0x1c) truelight@0: { truelight@0: assert(last_m_off > 0); truelight@0: m_pos -= last_m_off; truelight@0: } truelight@0: else truelight@0: { truelight@0: off = 1 + (off << 6) + (*ip++ >> 2); truelight@0: m_pos -= off; truelight@0: last_m_off = off; truelight@0: } truelight@0: } truelight@0: t = (t >> 5) - 1; truelight@0: #endif truelight@0: TEST_LOOKBEHIND(m_pos,out); assert(t > 0); NEED_OP(t+3-1); truelight@0: goto copy_match; truelight@0: } truelight@0: else if (t >= 32) truelight@0: { truelight@0: t &= 31; truelight@0: if (t == 0) truelight@0: { truelight@0: NEED_IP(1); truelight@0: while (*ip == 0) truelight@0: { truelight@0: t += 255; truelight@0: ip++; truelight@0: NEED_IP(1); truelight@0: } truelight@0: t += 31 + *ip++; truelight@0: } truelight@0: #if defined(LZO1Z) truelight@0: { truelight@0: lzo_uint off = 1 + (ip[0] << 6) + (ip[1] >> 2); truelight@0: m_pos = op - off; truelight@0: last_m_off = off; truelight@0: } truelight@0: #elif defined(LZO_UNALIGNED_OK_2) && (LZO_BYTE_ORDER == LZO_LITTLE_ENDIAN) truelight@0: m_pos = op - 1; truelight@0: m_pos -= (* (const lzo_ushortp) ip) >> 2; truelight@0: #else truelight@0: m_pos = op - 1; truelight@0: m_pos -= (ip[0] >> 2) + (ip[1] << 6); truelight@0: #endif truelight@0: ip += 2; truelight@0: } truelight@0: else if (t >= 16) truelight@0: { truelight@0: m_pos = op; truelight@0: m_pos -= (t & 8) << 11; truelight@0: t &= 7; truelight@0: if (t == 0) truelight@0: { truelight@0: NEED_IP(1); truelight@0: while (*ip == 0) truelight@0: { truelight@0: t += 255; truelight@0: ip++; truelight@0: NEED_IP(1); truelight@0: } truelight@0: t += 7 + *ip++; truelight@0: } truelight@0: #if defined(LZO1Z) truelight@0: m_pos -= (ip[0] << 6) + (ip[1] >> 2); truelight@0: #elif defined(LZO_UNALIGNED_OK_2) && (LZO_BYTE_ORDER == LZO_LITTLE_ENDIAN) truelight@0: m_pos -= (* (const lzo_ushortp) ip) >> 2; truelight@0: #else truelight@0: m_pos -= (ip[0] >> 2) + (ip[1] << 6); truelight@0: #endif truelight@0: ip += 2; truelight@0: if (m_pos == op) truelight@0: goto eof_found; truelight@0: m_pos -= 0x4000; truelight@0: #if defined(LZO1Z) truelight@0: last_m_off = op - m_pos; truelight@0: #endif truelight@0: } truelight@0: else truelight@0: { truelight@0: #if defined(LZO1Z) truelight@0: t = 1 + (t << 6) + (*ip++ >> 2); truelight@0: m_pos = op - t; truelight@0: last_m_off = t; truelight@0: #else truelight@0: m_pos = op - 1; truelight@0: m_pos -= t >> 2; truelight@0: m_pos -= *ip++ << 2; truelight@0: #endif truelight@0: TEST_LOOKBEHIND(m_pos,out); NEED_OP(2); truelight@0: *op++ = *m_pos++; *op++ = *m_pos; truelight@0: goto match_done; truelight@0: } truelight@0: truelight@0: TEST_LOOKBEHIND(m_pos,out); assert(t > 0); NEED_OP(t+3-1); truelight@0: #if defined(LZO_UNALIGNED_OK_4) || defined(LZO_ALIGNED_OK_4) truelight@0: #if !defined(LZO_UNALIGNED_OK_4) truelight@0: if (t >= 2 * 4 - (3 - 1) && PTR_ALIGNED2_4(op,m_pos)) truelight@0: { truelight@0: assert((op - m_pos) >= 4); truelight@0: #else truelight@0: if (t >= 2 * 4 - (3 - 1) && (op - m_pos) >= 4) truelight@0: { truelight@0: #endif truelight@0: COPY4(op,m_pos); truelight@0: op += 4; m_pos += 4; t -= 4 - (3 - 1); truelight@0: do { truelight@0: COPY4(op,m_pos); truelight@0: op += 4; m_pos += 4; t -= 4; truelight@0: } while (t >= 4); truelight@0: if (t > 0) do *op++ = *m_pos++; while (--t > 0); truelight@0: } truelight@0: else truelight@0: #endif truelight@0: { truelight@0: copy_match: truelight@0: *op++ = *m_pos++; *op++ = *m_pos++; truelight@0: do *op++ = *m_pos++; while (--t > 0); truelight@0: } truelight@0: truelight@0: truelight@0: match_done: truelight@0: #if defined(LZO1Z) truelight@0: t = ip[-1] & 3; truelight@0: #else truelight@0: t = ip[-2] & 3; truelight@0: #endif truelight@0: if (t == 0) truelight@0: break; truelight@0: truelight@0: match_next: truelight@0: assert(t > 0); NEED_OP(t); NEED_IP(t+1); truelight@0: do *op++ = *ip++; while (--t > 0); truelight@0: t = *ip++; truelight@0: } truelight@0: } truelight@0: truelight@0: #if defined(HAVE_TEST_IP) || defined(HAVE_TEST_OP) truelight@0: *out_len = op - out; truelight@0: return LZO_E_EOF_NOT_FOUND; truelight@0: #endif truelight@0: truelight@0: eof_found: truelight@0: assert(t == 1); truelight@0: *out_len = op - out; truelight@0: return (ip == ip_end ? LZO_E_OK : truelight@0: (ip < ip_end ? LZO_E_INPUT_NOT_CONSUMED : LZO_E_INPUT_OVERRUN)); truelight@0: truelight@0: #if defined(HAVE_NEED_IP) truelight@0: input_overrun: truelight@0: *out_len = op - out; truelight@0: return LZO_E_INPUT_OVERRUN; truelight@0: #endif truelight@0: truelight@0: #if defined(HAVE_NEED_OP) truelight@0: output_overrun: truelight@0: *out_len = op - out; truelight@0: return LZO_E_OUTPUT_OVERRUN; truelight@0: #endif truelight@0: truelight@0: #if defined(LZO_TEST_DECOMPRESS_OVERRUN_LOOKBEHIND) truelight@0: lookbehind_overrun: truelight@0: *out_len = op - out; truelight@0: return LZO_E_LOOKBEHIND_OVERRUN; truelight@0: #endif truelight@0: } truelight@0: truelight@0: #endif truelight@0: truelight@0: /***** End of minilzo.c *****/