diff options
Diffstat (limited to 'tools/ucl/src/ucl_util.c')
| -rw-r--r-- | tools/ucl/src/ucl_util.c | 204 |
1 files changed, 204 insertions, 0 deletions
diff --git a/tools/ucl/src/ucl_util.c b/tools/ucl/src/ucl_util.c new file mode 100644 index 0000000000..93b7298302 --- /dev/null +++ b/tools/ucl/src/ucl_util.c @@ -0,0 +1,204 @@ +/* ucl_util.c -- utilities for the UCL library + + This file is part of the UCL data compression library. + + Copyright (C) 1996-2002 Markus Franz Xaver Johannes Oberhumer + All Rights Reserved. + + The UCL 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 UCL 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 UCL library; see the file COPYING. + If not, write to the Free Software Foundation, Inc., + 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + + Markus F.X.J. Oberhumer + <markus@oberhumer.com> + http://www.oberhumer.com/opensource/ucl/ + */ + + +#include "ucl_conf.h" +#include "ucl_util.h" + + +/*********************************************************************** +// +************************************************************************/ + +UCL_PUBLIC(ucl_bool) +ucl_assert(int expr) +{ + return (expr) ? 1 : 0; +} + + +/*********************************************************************** +// +************************************************************************/ + +/* If you use the UCL library in a product, you *must* keep this + * copyright string in the executable of your product. +.*/ + +const ucl_byte __ucl_copyright[] = + "\n\n\n" + "UCL real-time data compression library.\n" + "$Copyright: UCL (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002 Markus Franz Xaver Johannes Oberhumer $\n" + "<markus@oberhumer.com>\n" + "http://www.oberhumer.com\n" + "\n" + "UCL version: v" UCL_VERSION_STRING ", " UCL_VERSION_DATE "\n" + "UCL build date: " __DATE__ " " __TIME__ "\n\n" + "UCL special compilation options:\n" +#ifdef __cplusplus + " __cplusplus\n" +#endif +#if defined(__PIC__) + " __PIC__\n" +#elif defined(__pic__) + " __pic__\n" +#endif +#if (UINT_MAX < UCL_0xffffffffL) + " 16BIT\n" +#endif +#if defined(__UCL_STRICT_16BIT) + " __UCL_STRICT_16BIT\n" +#endif +#if (UINT_MAX > UCL_0xffffffffL) + " UINT_MAX=" _UCL_MEXPAND(UINT_MAX) "\n" +#endif +#if (ULONG_MAX > UCL_0xffffffffL) + " ULONG_MAX=" _UCL_MEXPAND(ULONG_MAX) "\n" +#endif +#if defined(UCL_BYTE_ORDER) + " UCL_BYTE_ORDER=" _UCL_MEXPAND(UCL_BYTE_ORDER) "\n" +#endif +#if defined(UCL_UNALIGNED_OK_2) + " UCL_UNALIGNED_OK_2\n" +#endif +#if defined(UCL_UNALIGNED_OK_4) + " UCL_UNALIGNED_OK_4\n" +#endif +#if defined(UCL_ALIGNED_OK_4) + " UCL_ALIGNED_OK_4\n" +#endif +#if defined(__UCL_IN_MINIUCL) + " __UCL_IN_MINIUCL\n" +#endif + "\n\n" +/* RCS information */ + "$Id: UCL " UCL_VERSION_STRING " built " __DATE__ " " __TIME__ +#if defined(__GNUC__) && defined(__VERSION__) + " by gcc " __VERSION__ +#elif defined(__BORLANDC__) + " by Borland C " _UCL_MEXPAND(__BORLANDC__) +#elif defined(_MSC_VER) + " by Microsoft C " _UCL_MEXPAND(_MSC_VER) +#elif defined(__PUREC__) + " by Pure C " _UCL_MEXPAND(__PUREC__) +#elif defined(__SC__) + " by Symantec C " _UCL_MEXPAND(__SC__) +#elif defined(__TURBOC__) + " by Turbo C " _UCL_MEXPAND(__TURBOC__) +#elif defined(__WATCOMC__) + " by Watcom C " _UCL_MEXPAND(__WATCOMC__) +#endif + " $\n"; + +UCL_PUBLIC(const ucl_byte *) +ucl_copyright(void) +{ + return __ucl_copyright; +} + +UCL_PUBLIC(ucl_uint32) +ucl_version(void) +{ + return UCL_VERSION; +} + +UCL_PUBLIC(const char *) +ucl_version_string(void) +{ + return UCL_VERSION_STRING; +} + +UCL_PUBLIC(const char *) +ucl_version_date(void) +{ + return UCL_VERSION_DATE; +} + +UCL_PUBLIC(const ucl_charp) +_ucl_version_string(void) +{ + return UCL_VERSION_STRING; +} + +UCL_PUBLIC(const ucl_charp) +_ucl_version_date(void) +{ + return UCL_VERSION_DATE; +} + + +/*********************************************************************** +// adler32 checksum +// adapted from free code by Mark Adler <madler@alumni.caltech.edu> +// see http://www.cdrom.com/pub/infozip/zlib/ +************************************************************************/ + +#define UCL_BASE 65521u /* largest prime smaller than 65536 */ +#define UCL_NMAX 5552 +/* NMAX is the largest n such that 255n(n+1)/2 + (n+1)(BASE-1) <= 2^32-1 */ + +#define UCL_DO1(buf,i) {s1 += buf[i]; s2 += s1;} +#define UCL_DO2(buf,i) UCL_DO1(buf,i); UCL_DO1(buf,i+1); +#define UCL_DO4(buf,i) UCL_DO2(buf,i); UCL_DO2(buf,i+2); +#define UCL_DO8(buf,i) UCL_DO4(buf,i); UCL_DO4(buf,i+4); +#define UCL_DO16(buf,i) UCL_DO8(buf,i); UCL_DO8(buf,i+8); + +UCL_PUBLIC(ucl_uint32) +ucl_adler32(ucl_uint32 adler, const ucl_byte *buf, ucl_uint len) +{ + ucl_uint32 s1 = adler & 0xffff; + ucl_uint32 s2 = (adler >> 16) & 0xffff; + int k; + + if (buf == NULL) + return 1; + + while (len > 0) + { + k = len < UCL_NMAX ? (int) len : UCL_NMAX; + len -= k; + if (k >= 16) do + { + UCL_DO16(buf,0); + buf += 16; + k -= 16; + } while (k >= 16); + if (k != 0) do + { + s1 += *buf++; + s2 += s1; + } while (--k > 0); + s1 %= UCL_BASE; + s2 %= UCL_BASE; + } + return (s2 << 16) | s1; +} + + +/* +vi:ts=4:et +*/ |