zutil.c
上传用户:yisoukefu
上传日期:2020-08-09
资源大小:39506k
文件大小:7k
源码类别:

其他游戏

开发平台:

Visual C++

  1. /* zutil.c -- target dependent utility functions for the compression library
  2.  * Copyright (C) 1995-2005 Jean-loup Gailly.
  3.  * For conditions of distribution and use, see copyright notice in zlib.h
  4.  */
  5. /* @(#) $Id$ */
  6. #include "zutil.h"
  7. #ifndef NO_DUMMY_DECL
  8. struct internal_state      {int dummy;}; /* for buggy compilers */
  9. #endif
  10. const char * const z_errmsg[10] = {
  11. "need dictionary",     /* Z_NEED_DICT       2  */
  12. "stream end",          /* Z_STREAM_END      1  */
  13. "",                    /* Z_OK              0  */
  14. "file error",          /* Z_ERRNO         (-1) */
  15. "stream error",        /* Z_STREAM_ERROR  (-2) */
  16. "data error",          /* Z_DATA_ERROR    (-3) */
  17. "insufficient memory", /* Z_MEM_ERROR     (-4) */
  18. "buffer error",        /* Z_BUF_ERROR     (-5) */
  19. "incompatible version",/* Z_VERSION_ERROR (-6) */
  20. ""};
  21. const char * ZEXPORT zlibVersion()
  22. {
  23.     return ZLIB_VERSION;
  24. }
  25. uLong ZEXPORT zlibCompileFlags()
  26. {
  27.     uLong flags;
  28.     flags = 0;
  29.     switch (sizeof(uInt)) {
  30.     case 2:     break;
  31.     case 4:     flags += 1;     break;
  32.     case 8:     flags += 2;     break;
  33.     default:    flags += 3;
  34.     }
  35.     switch (sizeof(uLong)) {
  36.     case 2:     break;
  37.     case 4:     flags += 1 << 2;        break;
  38.     case 8:     flags += 2 << 2;        break;
  39.     default:    flags += 3 << 2;
  40.     }
  41.     switch (sizeof(voidpf)) {
  42.     case 2:     break;
  43.     case 4:     flags += 1 << 4;        break;
  44.     case 8:     flags += 2 << 4;        break;
  45.     default:    flags += 3 << 4;
  46.     }
  47.     switch (sizeof(z_off_t)) {
  48.     case 2:     break;
  49.     case 4:     flags += 1 << 6;        break;
  50.     case 8:     flags += 2 << 6;        break;
  51.     default:    flags += 3 << 6;
  52.     }
  53. #ifdef DEBUG
  54.     flags += 1 << 8;
  55. #endif
  56. #if defined(ASMV) || defined(ASMINF)
  57.     flags += 1 << 9;
  58. #endif
  59. #ifdef ZLIB_WINAPI
  60.     flags += 1 << 10;
  61. #endif
  62. #ifdef BUILDFIXED
  63.     flags += 1 << 12;
  64. #endif
  65. #ifdef DYNAMIC_CRC_TABLE
  66.     flags += 1 << 13;
  67. #endif
  68. #ifdef NO_GZCOMPRESS
  69.     flags += 1L << 16;
  70. #endif
  71. #ifdef NO_GZIP
  72.     flags += 1L << 17;
  73. #endif
  74. #ifdef PKZIP_BUG_WORKAROUND
  75.     flags += 1L << 20;
  76. #endif
  77. #ifdef FASTEST
  78.     flags += 1L << 21;
  79. #endif
  80. #ifdef STDC
  81. #  ifdef NO_vsnprintf
  82.         flags += 1L << 25;
  83. #    ifdef HAS_vsprintf_void
  84.         flags += 1L << 26;
  85. #    endif
  86. #  else
  87. #    ifdef HAS_vsnprintf_void
  88.         flags += 1L << 26;
  89. #    endif
  90. #  endif
  91. #else
  92.         flags += 1L << 24;
  93. #  ifdef NO_snprintf
  94.         flags += 1L << 25;
  95. #    ifdef HAS_sprintf_void
  96.         flags += 1L << 26;
  97. #    endif
  98. #  else
  99. #    ifdef HAS_snprintf_void
  100.         flags += 1L << 26;
  101. #    endif
  102. #  endif
  103. #endif
  104.     return flags;
  105. }
  106. #ifdef DEBUG
  107. #  ifndef verbose
  108. #    define verbose 0
  109. #  endif
  110. int z_verbose = verbose;
  111. void z_error (m)
  112.     char *m;
  113. {
  114.     fprintf(stderr, "%sn", m);
  115.     exit(1);
  116. }
  117. #endif
  118. /* exported to allow conversion of error code to string for compress() and
  119.  * uncompress()
  120.  */
  121. const char * ZEXPORT zError(int err)
  122. {
  123.     return ERR_MSG(err);
  124. }
  125. #if defined(_WIN32_WCE)
  126.     /* The Microsoft C Run-Time Library for Windows CE doesn't have
  127.      * errno.  We define it as a global variable to simplify porting.
  128.      * Its value is always 0 and should not be used.
  129.      */
  130.     int errno = 0;
  131. #endif
  132. #ifndef HAVE_MEMCPY
  133. void zmemcpy(dest, source, len)
  134.     Bytef* dest;
  135.     const Bytef* source;
  136.     uInt  len;
  137. {
  138.     if (len == 0) return;
  139.     do {
  140.         *dest++ = *source++; /* ??? to be unrolled */
  141.     } while (--len != 0);
  142. }
  143. int zmemcmp(s1, s2, len)
  144.     const Bytef* s1;
  145.     const Bytef* s2;
  146.     uInt  len;
  147. {
  148.     uInt j;
  149.     for (j = 0; j < len; j++) {
  150.         if (s1[j] != s2[j]) return 2*(s1[j] > s2[j])-1;
  151.     }
  152.     return 0;
  153. }
  154. void zmemzero(dest, len)
  155.     Bytef* dest;
  156.     uInt  len;
  157. {
  158.     if (len == 0) return;
  159.     do {
  160.         *dest++ = 0;  /* ??? to be unrolled */
  161.     } while (--len != 0);
  162. }
  163. #endif
  164. #ifdef SYS16BIT
  165. #ifdef __TURBOC__
  166. /* Turbo C in 16-bit mode */
  167. #  define MY_ZCALLOC
  168. /* Turbo C malloc() does not allow dynamic allocation of 64K bytes
  169.  * and farmalloc(64K) returns a pointer with an offset of 8, so we
  170.  * must fix the pointer. Warning: the pointer must be put back to its
  171.  * original form in order to free it, use zcfree().
  172.  */
  173. #define MAX_PTR 10
  174. /* 10*64K = 640K */
  175. local int next_ptr = 0;
  176. typedef struct ptr_table_s {
  177.     voidpf org_ptr;
  178.     voidpf new_ptr;
  179. } ptr_table;
  180. local ptr_table table[MAX_PTR];
  181. /* This table is used to remember the original form of pointers
  182.  * to large buffers (64K). Such pointers are normalized with a zero offset.
  183.  * Since MSDOS is not a preemptive multitasking OS, this table is not
  184.  * protected from concurrent access. This hack doesn't work anyway on
  185.  * a protected system like OS/2. Use Microsoft C instead.
  186.  */
  187. voidpf zcalloc (voidpf opaque, unsigned items, unsigned size)
  188. {
  189.     voidpf buf = opaque; /* just to make some compilers happy */
  190.     ulg bsize = (ulg)items*size;
  191.     /* If we allocate less than 65520 bytes, we assume that farmalloc
  192.      * will return a usable pointer which doesn't have to be normalized.
  193.      */
  194.     if (bsize < 65520L) {
  195.         buf = farmalloc(bsize);
  196.         if (*(ush*)&buf != 0) return buf;
  197.     } else {
  198.         buf = farmalloc(bsize + 16L);
  199.     }
  200.     if (buf == NULL || next_ptr >= MAX_PTR) return NULL;
  201.     table[next_ptr].org_ptr = buf;
  202.     /* Normalize the pointer to seg:0 */
  203.     *((ush*)&buf+1) += ((ush)((uch*)buf-0) + 15) >> 4;
  204.     *(ush*)&buf = 0;
  205.     table[next_ptr++].new_ptr = buf;
  206.     return buf;
  207. }
  208. void  zcfree (voidpf opaque, voidpf ptr)
  209. {
  210.     int n;
  211.     if (*(ush*)&ptr != 0) { /* object < 64K */
  212.         farfree(ptr);
  213.         return;
  214.     }
  215.     /* Find the original pointer */
  216.     for (n = 0; n < next_ptr; n++) {
  217.         if (ptr != table[n].new_ptr) continue;
  218.         farfree(table[n].org_ptr);
  219.         while (++n < next_ptr) {
  220.             table[n-1] = table[n];
  221.         }
  222.         next_ptr--;
  223.         return;
  224.     }
  225.     ptr = opaque; /* just to make some compilers happy */
  226.     Assert(0, "zcfree: ptr not found");
  227. }
  228. #endif /* __TURBOC__ */
  229. #ifdef M_I86
  230. /* Microsoft C in 16-bit mode */
  231. #  define MY_ZCALLOC
  232. #if (!defined(_MSC_VER) || (_MSC_VER <= 600))
  233. #  define _halloc  halloc
  234. #  define _hfree   hfree
  235. #endif
  236. voidpf zcalloc (voidpf opaque, unsigned items, unsigned size)
  237. {
  238.     if (opaque) opaque = 0; /* to make compiler happy */
  239.     return _halloc((long)items, size);
  240. }
  241. void  zcfree (voidpf opaque, voidpf ptr)
  242. {
  243.     if (opaque) opaque = 0; /* to make compiler happy */
  244.     _hfree(ptr);
  245. }
  246. #endif /* M_I86 */
  247. #endif /* SYS16BIT */
  248. #ifndef MY_ZCALLOC /* Any system without a special alloc function */
  249. #ifndef STDC
  250. extern voidp  malloc OF((uInt size));
  251. extern voidp  calloc OF((uInt items, uInt size));
  252. extern void   free   OF((voidpf ptr));
  253. #endif
  254. voidpf zcalloc (voidpf opaque, unsigned items, unsigned size)
  255. {
  256.     if (opaque) items += size - size; /* make compiler happy */
  257.     return sizeof(uInt) > 2 ? (voidpf)malloc(items * size) :
  258.                               (voidpf)calloc(items, size);
  259. }
  260. void  zcfree (voidpf opaque, voidpf ptr)
  261. {
  262.     free(ptr);
  263.     if (opaque) 
  264. return; /* make compiler happy */
  265. }
  266. #endif /* MY_ZCALLOC */