Commit 31710f83 authored by Shane Hathaway's avatar Shane Hathaway

Updated zlib to version 1.1.3.

parent 271cd87a
/* adler32.c -- compute the Adler-32 checksum of a data stream /* adler32.c -- compute the Adler-32 checksum of a data stream
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
/* $Id: adler32.c,v 1.1 1997/07/17 17:45:24 jim Exp $ */ /* @(#) $Id: adler32.c,v 1.2 2001/06/04 19:41:16 shane Exp $ */
#include "zlib.h" #include "zlib.h"
...@@ -18,7 +18,7 @@ ...@@ -18,7 +18,7 @@
#define DO16(buf) DO8(buf,0); DO8(buf,8); #define DO16(buf) DO8(buf,0); DO8(buf,8);
/* ========================================================================= */ /* ========================================================================= */
uLong adler32(adler, buf, len) uLong ZEXPORT adler32(adler, buf, len)
uLong adler; uLong adler;
const Bytef *buf; const Bytef *buf;
uInt len; uInt len;
......
/* compress.c -- compress a memory buffer /* compress.c -- compress a memory buffer
* Copyright (C) 1995-1996 Jean-loup Gailly. * Copyright (C) 1995-1998 Jean-loup Gailly.
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
/* $Id: compress.c,v 1.1 1997/07/17 17:45:25 jim Exp $ */ /* @(#) $Id: compress.c,v 1.2 2001/06/04 19:41:16 shane Exp $ */
#include "zlib.h" #include "zlib.h"
/* =========================================================================== /* ===========================================================================
Compresses the source buffer into the destination buffer. sourceLen is Compresses the source buffer into the destination buffer. The level
the byte length of the source buffer. Upon entry, destLen is the total parameter has the same meaning as in deflateInit. sourceLen is the byte
size of the destination buffer, which must be at least 0.1% larger than length of the source buffer. Upon entry, destLen is the total size of the
sourceLen plus 8 bytes. Upon exit, destLen is the actual size of the destination buffer, which must be at least 0.1% larger than sourceLen plus
compressed buffer. 12 bytes. Upon exit, destLen is the actual size of the compressed buffer.
This function can be used to compress a whole file at once if the
input file is mmap'ed. compress2 returns Z_OK if success, Z_MEM_ERROR if there was not enough
compress returns Z_OK if success, Z_MEM_ERROR if there was not memory, Z_BUF_ERROR if there was not enough room in the output buffer,
enough memory, Z_BUF_ERROR if there was not enough room in the output Z_STREAM_ERROR if the level parameter is invalid.
buffer.
*/ */
int compress (dest, destLen, source, sourceLen) int ZEXPORT compress2 (dest, destLen, source, sourceLen, level)
Bytef *dest; Bytef *dest;
uLongf *destLen; uLongf *destLen;
const Bytef *source; const Bytef *source;
uLong sourceLen; uLong sourceLen;
int level;
{ {
z_stream stream; z_stream stream;
int err; int err;
...@@ -42,7 +42,7 @@ int compress (dest, destLen, source, sourceLen) ...@@ -42,7 +42,7 @@ int compress (dest, destLen, source, sourceLen)
stream.zfree = (free_func)0; stream.zfree = (free_func)0;
stream.opaque = (voidpf)0; stream.opaque = (voidpf)0;
err = deflateInit(&stream, Z_DEFAULT_COMPRESSION); err = deflateInit(&stream, level);
if (err != Z_OK) return err; if (err != Z_OK) return err;
err = deflate(&stream, Z_FINISH); err = deflate(&stream, Z_FINISH);
...@@ -55,3 +55,14 @@ int compress (dest, destLen, source, sourceLen) ...@@ -55,3 +55,14 @@ int compress (dest, destLen, source, sourceLen)
err = deflateEnd(&stream); err = deflateEnd(&stream);
return err; return err;
} }
/* ===========================================================================
*/
int ZEXPORT compress (dest, destLen, source, sourceLen)
Bytef *dest;
uLongf *destLen;
const Bytef *source;
uLong sourceLen;
{
return compress2(dest, destLen, source, sourceLen, Z_DEFAULT_COMPRESSION);
}
/* Generated automatically from /usr/local/python-1.4/lib/python1.4/config/config.c.in by makesetup. */
/* -*- C -*- ***********************************************
Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam,
The Netherlands.
All Rights Reserved
Permission to use, copy, modify, and distribute this software and its
documentation for any purpose and without fee is hereby granted,
provided that the above copyright notice appear in all copies and that
both that copyright notice and this permission notice appear in
supporting documentation, and that the names of Stichting Mathematisch
Centrum or CWI or Corporation for National Research Initiatives or
CNRI not be used in advertising or publicity pertaining to
distribution of the software without specific, written prior
permission.
While CWI is the initial source for this software, a modified version
is made available by the Corporation for National Research Initiatives
(CNRI) at the Internet address ftp://ftp.python.org.
STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH
REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH
CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL
DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
PERFORMANCE OF THIS SOFTWARE.
******************************************************************/
/* Module configuration */
/* !!! !!! !!! This file is edited by the makesetup script !!! !!! !!! */
/* This file contains the table of built-in modules.
See init_builtin() in import.c. */
#include "Python.h"
extern void initposix();
extern void initsignal();
extern void initsocket();
extern void initthread();
extern void initmath();
extern void initregex();
extern void initstrop();
extern void inittime();
extern void initarray();
extern void initcmath();
extern void initstruct();
extern void initoperator();
extern void initfcntl();
extern void initpwd();
extern void initgrp();
extern void initcrypt();
extern void initselect();
extern void initerrno();
extern void inittermios();
extern void init_xdr();
extern void initaudioop();
extern void initimageop();
extern void initrgbimg();
extern void initmd5();
extern void inittiming();
extern void initrotor();
extern void initsyslog();
extern void initnew();
extern void initbinascii();
extern void initparser();
/* -- ADDMODULE MARKER 1 -- */
extern void PyMarshal_Init();
extern void initimp();
struct _inittab inittab[] = {
{"posix", initposix},
{"signal", initsignal},
{"socket", initsocket},
{"thread", initthread},
{"math", initmath},
{"regex", initregex},
{"strop", initstrop},
{"time", inittime},
{"array", initarray},
{"cmath", initcmath},
{"struct", initstruct},
{"operator", initoperator},
{"fcntl", initfcntl},
{"pwd", initpwd},
{"grp", initgrp},
{"crypt", initcrypt},
{"select", initselect},
{"errno", initerrno},
{"termios", inittermios},
{"_xdr", init_xdr},
{"audioop", initaudioop},
{"imageop", initimageop},
{"rgbimg", initrgbimg},
{"md5", initmd5},
{"timing", inittiming},
{"rotor", initrotor},
{"syslog", initsyslog},
{"new", initnew},
{"binascii", initbinascii},
{"parser", initparser},
/* -- ADDMODULE MARKER 2 -- */
/* This module "lives in" with marshal.c */
{"marshal", PyMarshal_Init},
/* This lives it with import.c */
{"imp", initimp},
/* These entries are here for sys.builtin_module_names */
{"__main__", NULL},
{"__builtin__", NULL},
{"sys", NULL},
/* Sentinel */
{0, 0}
};
/* crc32.c -- compute the CRC-32 of a data stream /* crc32.c -- compute the CRC-32 of a data stream
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
/* $Id: crc32.c,v 1.1 1997/07/17 17:45:26 jim Exp $ */ /* @(#) $Id: crc32.c,v 1.2 2001/06/04 19:41:16 shane Exp $ */
#include "zlib.h" #include "zlib.h"
...@@ -45,7 +45,7 @@ local void make_crc_table() ...@@ -45,7 +45,7 @@ local void make_crc_table()
int n, k; int n, k;
uLong poly; /* polynomial exclusive-or pattern */ uLong poly; /* polynomial exclusive-or pattern */
/* terms of polynomial defining this crc (except x^32): */ /* terms of polynomial defining this crc (except x^32): */
static Byte p[] = {0,1,2,4,5,7,8,10,11,12,16,22,23,26}; static const Byte p[] = {0,1,2,4,5,7,8,10,11,12,16,22,23,26};
/* make exclusive-or pattern from polynomial (0xedb88320L) */ /* make exclusive-or pattern from polynomial (0xedb88320L) */
poly = 0L; poly = 0L;
...@@ -65,7 +65,7 @@ local void make_crc_table() ...@@ -65,7 +65,7 @@ local void make_crc_table()
/* ======================================================================== /* ========================================================================
* Table of CRC-32's of all single-byte values (made by make_crc_table) * Table of CRC-32's of all single-byte values (made by make_crc_table)
*/ */
local uLongf crc_table[256] = { local const uLongf crc_table[256] = {
0x00000000L, 0x77073096L, 0xee0e612cL, 0x990951baL, 0x076dc419L, 0x00000000L, 0x77073096L, 0xee0e612cL, 0x990951baL, 0x076dc419L,
0x706af48fL, 0xe963a535L, 0x9e6495a3L, 0x0edb8832L, 0x79dcb8a4L, 0x706af48fL, 0xe963a535L, 0x9e6495a3L, 0x0edb8832L, 0x79dcb8a4L,
0xe0d5e91eL, 0x97d2d988L, 0x09b64c2bL, 0x7eb17cbdL, 0xe7b82d07L, 0xe0d5e91eL, 0x97d2d988L, 0x09b64c2bL, 0x7eb17cbdL, 0xe7b82d07L,
...@@ -124,12 +124,12 @@ local uLongf crc_table[256] = { ...@@ -124,12 +124,12 @@ local uLongf crc_table[256] = {
/* ========================================================================= /* =========================================================================
* This function can be used by asm versions of crc32() * This function can be used by asm versions of crc32()
*/ */
uLongf *get_crc_table() const uLongf * ZEXPORT get_crc_table()
{ {
#ifdef DYNAMIC_CRC_TABLE #ifdef DYNAMIC_CRC_TABLE
if (crc_table_empty) make_crc_table(); if (crc_table_empty) make_crc_table();
#endif #endif
return (uLongf *)crc_table; return (const uLongf *)crc_table;
} }
/* ========================================================================= */ /* ========================================================================= */
...@@ -139,7 +139,7 @@ uLongf *get_crc_table() ...@@ -139,7 +139,7 @@ uLongf *get_crc_table()
#define DO8(buf) DO4(buf); DO4(buf); #define DO8(buf) DO4(buf); DO4(buf);
/* ========================================================================= */ /* ========================================================================= */
uLong crc32(crc, buf, len) uLong ZEXPORT crc32(crc, buf, len)
uLong crc; uLong crc;
const Bytef *buf; const Bytef *buf;
uInt len; uInt len;
......
/* deflate.c -- compress data using the deflation algorithm /* deflate.c -- compress data using the deflation algorithm
* Copyright (C) 1995-1996 Jean-loup Gailly. * Copyright (C) 1995-1998 Jean-loup Gailly.
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -36,8 +36,8 @@ ...@@ -36,8 +36,8 @@
* *
* REFERENCES * REFERENCES
* *
* Deutsch, L.P.,"'Deflate' Compressed Data Format Specification". * Deutsch, L.P.,"DEFLATE Compressed Data Format Specification".
* Available in ftp.uu.net:/pub/archiving/zip/doc/deflate-1.1.doc * Available in ftp://ds.internic.net/rfc/rfc1951.txt
* *
* A description of the Rabin and Karp algorithm is given in the book * A description of the Rabin and Karp algorithm is given in the book
* "Algorithms" by R. Sedgewick, Addison-Wesley, p252. * "Algorithms" by R. Sedgewick, Addison-Wesley, p252.
...@@ -47,11 +47,12 @@ ...@@ -47,11 +47,12 @@
* *
*/ */
/* $Id: deflate.c,v 1.1 1997/07/17 17:45:26 jim Exp $ */ /* @(#) $Id: deflate.c,v 1.2 2001/06/04 19:41:16 shane Exp $ */
#include "deflate.h" #include "deflate.h"
char deflate_copyright[] = " deflate 1.0.4 Copyright 1995-1996 Jean-loup Gailly "; const char deflate_copyright[] =
" deflate 1.1.3 Copyright 1995-1998 Jean-loup Gailly ";
/* /*
If you use the zlib library in a product, an acknowledgment is welcome If you use the zlib library in a product, an acknowledgment is welcome
in the documentation of your product. If for some reason you cannot in the documentation of your product. If for some reason you cannot
...@@ -77,12 +78,14 @@ local block_state deflate_stored OF((deflate_state *s, int flush)); ...@@ -77,12 +78,14 @@ local block_state deflate_stored OF((deflate_state *s, int flush));
local block_state deflate_fast OF((deflate_state *s, int flush)); local block_state deflate_fast OF((deflate_state *s, int flush));
local block_state deflate_slow OF((deflate_state *s, int flush)); local block_state deflate_slow OF((deflate_state *s, int flush));
local void lm_init OF((deflate_state *s)); local void lm_init OF((deflate_state *s));
local uInt longest_match OF((deflate_state *s, IPos cur_match));
local void putShortMSB OF((deflate_state *s, uInt b)); local void putShortMSB OF((deflate_state *s, uInt b));
local void flush_pending OF((z_streamp strm)); local void flush_pending OF((z_streamp strm));
local int read_buf OF((z_streamp strm, charf *buf, unsigned size)); local int read_buf OF((z_streamp strm, Bytef *buf, unsigned size));
#ifdef ASMV #ifdef ASMV
void match_init OF((void)); /* asm code initialization */ void match_init OF((void)); /* asm code initialization */
uInt longest_match OF((deflate_state *s, IPos cur_match));
#else
local uInt longest_match OF((deflate_state *s, IPos cur_match));
#endif #endif
#ifdef DEBUG #ifdef DEBUG
...@@ -120,7 +123,7 @@ typedef struct config_s { ...@@ -120,7 +123,7 @@ typedef struct config_s {
compress_func func; compress_func func;
} config; } config;
local config configuration_table[10] = { local const config configuration_table[10] = {
/* good lazy nice chain */ /* good lazy nice chain */
/* 0 */ {0, 0, 0, 0, deflate_stored}, /* store only */ /* 0 */ {0, 0, 0, 0, deflate_stored}, /* store only */
/* 1 */ {4, 4, 8, 4, deflate_fast}, /* maximum speed, no lazy matches */ /* 1 */ {4, 4, 8, 4, deflate_fast}, /* maximum speed, no lazy matches */
...@@ -157,14 +160,23 @@ struct static_tree_desc_s {int dummy;}; /* for buggy compilers */ ...@@ -157,14 +160,23 @@ struct static_tree_desc_s {int dummy;}; /* for buggy compilers */
* Insert string str in the dictionary and set match_head to the previous head * Insert string str in the dictionary and set match_head to the previous head
* of the hash chain (the most recent string with same hash key). Return * of the hash chain (the most recent string with same hash key). Return
* the previous length of the hash chain. * the previous length of the hash chain.
* If this file is compiled with -DFASTEST, the compression level is forced
* to 1, and no hash chains are maintained.
* IN assertion: all calls to to INSERT_STRING are made with consecutive * IN assertion: all calls to to INSERT_STRING are made with consecutive
* input characters and the first MIN_MATCH bytes of str are valid * input characters and the first MIN_MATCH bytes of str are valid
* (except for the last MIN_MATCH-1 bytes of the input file). * (except for the last MIN_MATCH-1 bytes of the input file).
*/ */
#ifdef FASTEST
#define INSERT_STRING(s, str, match_head) \
(UPDATE_HASH(s, s->ins_h, s->window[(str) + (MIN_MATCH-1)]), \
match_head = s->head[s->ins_h], \
s->head[s->ins_h] = (Pos)(str))
#else
#define INSERT_STRING(s, str, match_head) \ #define INSERT_STRING(s, str, match_head) \
(UPDATE_HASH(s, s->ins_h, s->window[(str) + (MIN_MATCH-1)]), \ (UPDATE_HASH(s, s->ins_h, s->window[(str) + (MIN_MATCH-1)]), \
s->prev[(str) & s->w_mask] = match_head = s->head[s->ins_h], \ s->prev[(str) & s->w_mask] = match_head = s->head[s->ins_h], \
s->head[s->ins_h] = (Pos)(str)) s->head[s->ins_h] = (Pos)(str))
#endif
/* =========================================================================== /* ===========================================================================
* Initialize the hash table (avoiding 64K overflow for 16 bit systems). * Initialize the hash table (avoiding 64K overflow for 16 bit systems).
...@@ -172,10 +184,10 @@ struct static_tree_desc_s {int dummy;}; /* for buggy compilers */ ...@@ -172,10 +184,10 @@ struct static_tree_desc_s {int dummy;}; /* for buggy compilers */
*/ */
#define CLEAR_HASH(s) \ #define CLEAR_HASH(s) \
s->head[s->hash_size-1] = NIL; \ s->head[s->hash_size-1] = NIL; \
zmemzero((charf *)s->head, (unsigned)(s->hash_size-1)*sizeof(*s->head)); zmemzero((Bytef *)s->head, (unsigned)(s->hash_size-1)*sizeof(*s->head));
/* ========================================================================= */ /* ========================================================================= */
int deflateInit_(strm, level, version, stream_size) int ZEXPORT deflateInit_(strm, level, version, stream_size)
z_streamp strm; z_streamp strm;
int level; int level;
const char *version; const char *version;
...@@ -187,7 +199,7 @@ int deflateInit_(strm, level, version, stream_size) ...@@ -187,7 +199,7 @@ int deflateInit_(strm, level, version, stream_size)
} }
/* ========================================================================= */ /* ========================================================================= */
int deflateInit2_(strm, level, method, windowBits, memLevel, strategy, int ZEXPORT deflateInit2_(strm, level, method, windowBits, memLevel, strategy,
version, stream_size) version, stream_size)
z_streamp strm; z_streamp strm;
int level; int level;
...@@ -200,13 +212,14 @@ int deflateInit2_(strm, level, method, windowBits, memLevel, strategy, ...@@ -200,13 +212,14 @@ int deflateInit2_(strm, level, method, windowBits, memLevel, strategy,
{ {
deflate_state *s; deflate_state *s;
int noheader = 0; int noheader = 0;
static const char* my_version = ZLIB_VERSION;
ushf *overlay; ushf *overlay;
/* We overlay pending_buf and d_buf+l_buf. This works since the average /* We overlay pending_buf and d_buf+l_buf. This works since the average
* output size for (length,distance) codes is <= 24 bits. * output size for (length,distance) codes is <= 24 bits.
*/ */
if (version == Z_NULL || version[0] != ZLIB_VERSION[0] || if (version == Z_NULL || version[0] != my_version[0] ||
stream_size != sizeof(z_stream)) { stream_size != sizeof(z_stream)) {
return Z_VERSION_ERROR; return Z_VERSION_ERROR;
} }
...@@ -220,6 +233,9 @@ int deflateInit2_(strm, level, method, windowBits, memLevel, strategy, ...@@ -220,6 +233,9 @@ int deflateInit2_(strm, level, method, windowBits, memLevel, strategy,
if (strm->zfree == Z_NULL) strm->zfree = zcfree; if (strm->zfree == Z_NULL) strm->zfree = zcfree;
if (level == Z_DEFAULT_COMPRESSION) level = 6; if (level == Z_DEFAULT_COMPRESSION) level = 6;
#ifdef FASTEST
level = 1;
#endif
if (windowBits < 0) { /* undocumented feature: suppress zlib header */ if (windowBits < 0) { /* undocumented feature: suppress zlib header */
noheader = 1; noheader = 1;
...@@ -253,6 +269,7 @@ int deflateInit2_(strm, level, method, windowBits, memLevel, strategy, ...@@ -253,6 +269,7 @@ int deflateInit2_(strm, level, method, windowBits, memLevel, strategy,
overlay = (ushf *) ZALLOC(strm, s->lit_bufsize, sizeof(ush)+2); overlay = (ushf *) ZALLOC(strm, s->lit_bufsize, sizeof(ush)+2);
s->pending_buf = (uchf *) overlay; s->pending_buf = (uchf *) overlay;
s->pending_buf_size = (ulg)s->lit_bufsize * (sizeof(ush)+2L);
if (s->window == Z_NULL || s->prev == Z_NULL || s->head == Z_NULL || if (s->window == Z_NULL || s->prev == Z_NULL || s->head == Z_NULL ||
s->pending_buf == Z_NULL) { s->pending_buf == Z_NULL) {
...@@ -271,7 +288,7 @@ int deflateInit2_(strm, level, method, windowBits, memLevel, strategy, ...@@ -271,7 +288,7 @@ int deflateInit2_(strm, level, method, windowBits, memLevel, strategy,
} }
/* ========================================================================= */ /* ========================================================================= */
int deflateSetDictionary (strm, dictionary, dictLength) int ZEXPORT deflateSetDictionary (strm, dictionary, dictLength)
z_streamp strm; z_streamp strm;
const Bytef *dictionary; const Bytef *dictionary;
uInt dictLength; uInt dictLength;
...@@ -290,9 +307,11 @@ int deflateSetDictionary (strm, dictionary, dictLength) ...@@ -290,9 +307,11 @@ int deflateSetDictionary (strm, dictionary, dictLength)
if (length < MIN_MATCH) return Z_OK; if (length < MIN_MATCH) return Z_OK;
if (length > MAX_DIST(s)) { if (length > MAX_DIST(s)) {
length = MAX_DIST(s); length = MAX_DIST(s);
dictionary += dictLength - length; #ifndef USE_DICT_HEAD
dictionary += dictLength - length; /* use the tail of the dictionary */
#endif
} }
zmemcpy((charf *)s->window, dictionary, length); zmemcpy(s->window, dictionary, length);
s->strstart = length; s->strstart = length;
s->block_start = (long)length; s->block_start = (long)length;
...@@ -310,7 +329,7 @@ int deflateSetDictionary (strm, dictionary, dictLength) ...@@ -310,7 +329,7 @@ int deflateSetDictionary (strm, dictionary, dictLength)
} }
/* ========================================================================= */ /* ========================================================================= */
int deflateReset (strm) int ZEXPORT deflateReset (strm)
z_streamp strm; z_streamp strm;
{ {
deflate_state *s; deflate_state *s;
...@@ -340,7 +359,7 @@ int deflateReset (strm) ...@@ -340,7 +359,7 @@ int deflateReset (strm)
} }
/* ========================================================================= */ /* ========================================================================= */
int deflateParams(strm, level, strategy) int ZEXPORT deflateParams(strm, level, strategy)
z_streamp strm; z_streamp strm;
int level; int level;
int strategy; int strategy;
...@@ -414,7 +433,7 @@ local void flush_pending(strm) ...@@ -414,7 +433,7 @@ local void flush_pending(strm)
} }
/* ========================================================================= */ /* ========================================================================= */
int deflate (strm, flush) int ZEXPORT deflate (strm, flush)
z_streamp strm; z_streamp strm;
int flush; int flush;
{ {
...@@ -548,42 +567,87 @@ int deflate (strm, flush) ...@@ -548,42 +567,87 @@ int deflate (strm, flush)
} }
/* ========================================================================= */ /* ========================================================================= */
int deflateEnd (strm) int ZEXPORT deflateEnd (strm)
z_streamp strm; z_streamp strm;
{ {
int status; int status;
if (strm == Z_NULL || strm->state == Z_NULL) return Z_STREAM_ERROR; if (strm == Z_NULL || strm->state == Z_NULL) return Z_STREAM_ERROR;
status = strm->state->status;
if (status != INIT_STATE && status != BUSY_STATE &&
status != FINISH_STATE) {
return Z_STREAM_ERROR;
}
/* Deallocate in reverse order of allocations: */ /* Deallocate in reverse order of allocations: */
TRY_FREE(strm, strm->state->pending_buf); TRY_FREE(strm, strm->state->pending_buf);
TRY_FREE(strm, strm->state->head); TRY_FREE(strm, strm->state->head);
TRY_FREE(strm, strm->state->prev); TRY_FREE(strm, strm->state->prev);
TRY_FREE(strm, strm->state->window); TRY_FREE(strm, strm->state->window);
status = strm->state->status;
ZFREE(strm, strm->state); ZFREE(strm, strm->state);
strm->state = Z_NULL; strm->state = Z_NULL;
return status == BUSY_STATE ? Z_DATA_ERROR : Z_OK; return status == BUSY_STATE ? Z_DATA_ERROR : Z_OK;
} }
/* ========================================================================= */ /* =========================================================================
int deflateCopy (dest, source) * Copy the source state to the destination state.
* To simplify the source, this is not supported for 16-bit MSDOS (which
* doesn't have enough memory anyway to duplicate compression states).
*/
int ZEXPORT deflateCopy (dest, source)
z_streamp dest; z_streamp dest;
z_streamp source; z_streamp source;
{ {
#ifdef MAXSEG_64K
return Z_STREAM_ERROR;
#else
deflate_state *ds;
deflate_state *ss;
ushf *overlay;
if (source == Z_NULL || dest == Z_NULL || source->state == Z_NULL) { if (source == Z_NULL || dest == Z_NULL || source->state == Z_NULL) {
return Z_STREAM_ERROR; return Z_STREAM_ERROR;
} }
ss = source->state;
*dest = *source; *dest = *source;
return Z_STREAM_ERROR; /* to be implemented */
#if 0
dest->state = (struct internal_state FAR *)
(*dest->zalloc)(1, sizeof(deflate_state));
if (dest->state == Z_NULL) return Z_MEM_ERROR;
*(dest->state) = *(source->state); ds = (deflate_state *) ZALLOC(dest, 1, sizeof(deflate_state));
if (ds == Z_NULL) return Z_MEM_ERROR;
dest->state = (struct internal_state FAR *) ds;
*ds = *ss;
ds->strm = dest;
ds->window = (Bytef *) ZALLOC(dest, ds->w_size, 2*sizeof(Byte));
ds->prev = (Posf *) ZALLOC(dest, ds->w_size, sizeof(Pos));
ds->head = (Posf *) ZALLOC(dest, ds->hash_size, sizeof(Pos));
overlay = (ushf *) ZALLOC(dest, ds->lit_bufsize, sizeof(ush)+2);
ds->pending_buf = (uchf *) overlay;
if (ds->window == Z_NULL || ds->prev == Z_NULL || ds->head == Z_NULL ||
ds->pending_buf == Z_NULL) {
deflateEnd (dest);
return Z_MEM_ERROR;
}
/* following zmemcpy do not work for 16-bit MSDOS */
zmemcpy(ds->window, ss->window, ds->w_size * 2 * sizeof(Byte));
zmemcpy(ds->prev, ss->prev, ds->w_size * sizeof(Pos));
zmemcpy(ds->head, ss->head, ds->hash_size * sizeof(Pos));
zmemcpy(ds->pending_buf, ss->pending_buf, (uInt)ds->pending_buf_size);
ds->pending_out = ds->pending_buf + (ss->pending_out - ss->pending_buf);
ds->d_buf = overlay + ds->lit_bufsize/sizeof(ush);
ds->l_buf = ds->pending_buf + (1+sizeof(ush))*ds->lit_bufsize;
ds->l_desc.dyn_tree = ds->dyn_ltree;
ds->d_desc.dyn_tree = ds->dyn_dtree;
ds->bl_desc.dyn_tree = ds->bl_tree;
return Z_OK; return Z_OK;
#endif #endif
} }
...@@ -597,7 +661,7 @@ int deflateCopy (dest, source) ...@@ -597,7 +661,7 @@ int deflateCopy (dest, source)
*/ */
local int read_buf(strm, buf, size) local int read_buf(strm, buf, size)
z_streamp strm; z_streamp strm;
charf *buf; Bytef *buf;
unsigned size; unsigned size;
{ {
unsigned len = strm->avail_in; unsigned len = strm->avail_in;
...@@ -658,6 +722,7 @@ local void lm_init (s) ...@@ -658,6 +722,7 @@ local void lm_init (s)
/* For 80x86 and 680x0, an optimized version will be provided in match.asm or /* For 80x86 and 680x0, an optimized version will be provided in match.asm or
* match.S. The code will be functionally equivalent. * match.S. The code will be functionally equivalent.
*/ */
#ifndef FASTEST
local uInt longest_match(s, cur_match) local uInt longest_match(s, cur_match)
deflate_state *s; deflate_state *s;
IPos cur_match; /* current match */ IPos cur_match; /* current match */
...@@ -792,9 +857,67 @@ local uInt longest_match(s, cur_match) ...@@ -792,9 +857,67 @@ local uInt longest_match(s, cur_match)
} while ((cur_match = prev[cur_match & wmask]) > limit } while ((cur_match = prev[cur_match & wmask]) > limit
&& --chain_length != 0); && --chain_length != 0);
if ((uInt)best_len <= s->lookahead) return best_len; if ((uInt)best_len <= s->lookahead) return (uInt)best_len;
return s->lookahead; return s->lookahead;
} }
#else /* FASTEST */
/* ---------------------------------------------------------------------------
* Optimized version for level == 1 only
*/
local uInt longest_match(s, cur_match)
deflate_state *s;
IPos cur_match; /* current match */
{
register Bytef *scan = s->window + s->strstart; /* current string */
register Bytef *match; /* matched string */
register int len; /* length of current match */
register Bytef *strend = s->window + s->strstart + MAX_MATCH;
/* The code is optimized for HASH_BITS >= 8 and MAX_MATCH-2 multiple of 16.
* It is easy to get rid of this optimization if necessary.
*/
Assert(s->hash_bits >= 8 && MAX_MATCH == 258, "Code too clever");
Assert((ulg)s->strstart <= s->window_size-MIN_LOOKAHEAD, "need lookahead");
Assert(cur_match < s->strstart, "no future");
match = s->window + cur_match;
/* Return failure if the match length is less than 2:
*/
if (match[0] != scan[0] || match[1] != scan[1]) return MIN_MATCH-1;
/* The check at best_len-1 can be removed because it will be made
* again later. (This heuristic is not always a win.)
* It is not necessary to compare scan[2] and match[2] since they
* are always equal when the other bytes match, given that
* the hash keys are equal and that HASH_BITS >= 8.
*/
scan += 2, match += 2;
Assert(*scan == *match, "match[2]?");
/* We check for insufficient lookahead only every 8th comparison;
* the 256th check will be made at strstart+258.
*/
do {
} while (*++scan == *++match && *++scan == *++match &&
*++scan == *++match && *++scan == *++match &&
*++scan == *++match && *++scan == *++match &&
*++scan == *++match && *++scan == *++match &&
scan < strend);
Assert(scan <= s->window+(unsigned)(s->window_size-1), "wild scan");
len = MAX_MATCH - (int)(strend - scan);
if (len < MIN_MATCH) return MIN_MATCH - 1;
s->match_start = cur_match;
return len <= s->lookahead ? len : s->lookahead;
}
#endif /* FASTEST */
#endif /* ASMV */ #endif /* ASMV */
#ifdef DEBUG #ifdef DEBUG
...@@ -807,8 +930,8 @@ local void check_match(s, start, match, length) ...@@ -807,8 +930,8 @@ local void check_match(s, start, match, length)
int length; int length;
{ {
/* check that the match is indeed a match */ /* check that the match is indeed a match */
if (zmemcmp((charf *)s->window + match, if (zmemcmp(s->window + match,
(charf *)s->window + start, length) != EQUAL) { s->window + start, length) != EQUAL) {
fprintf(stderr, " start %u, match %u, length %d\n", fprintf(stderr, " start %u, match %u, length %d\n",
start, match, length); start, match, length);
do { do {
...@@ -816,7 +939,7 @@ local void check_match(s, start, match, length) ...@@ -816,7 +939,7 @@ local void check_match(s, start, match, length)
} while (--length != 0); } while (--length != 0);
z_error("invalid match"); z_error("invalid match");
} }
if (verbose > 1) { if (z_verbose > 1) {
fprintf(stderr,"\\[%d,%d]", start-match, length); fprintf(stderr,"\\[%d,%d]", start-match, length);
do { putc(s->window[start++], stderr); } while (--length != 0); do { putc(s->window[start++], stderr); } while (--length != 0);
} }
...@@ -861,33 +984,35 @@ local void fill_window(s) ...@@ -861,33 +984,35 @@ local void fill_window(s)
*/ */
} else if (s->strstart >= wsize+MAX_DIST(s)) { } else if (s->strstart >= wsize+MAX_DIST(s)) {
zmemcpy((charf *)s->window, (charf *)s->window+wsize, zmemcpy(s->window, s->window+wsize, (unsigned)wsize);
(unsigned)wsize);
s->match_start -= wsize; s->match_start -= wsize;
s->strstart -= wsize; /* we now have strstart >= MAX_DIST */ s->strstart -= wsize; /* we now have strstart >= MAX_DIST */
s->block_start -= (long) wsize; s->block_start -= (long) wsize;
/* Slide the hash table (could be avoided with 32 bit values /* Slide the hash table (could be avoided with 32 bit values
at the expense of memory usage): at the expense of memory usage). We slide even when level == 0
to keep the hash table consistent if we switch back to level > 0
later. (Using level 0 permanently is not an optimal usage of
zlib, so we don't care about this pathological case.)
*/ */
n = s->hash_size; n = s->hash_size;
p = &s->head[n]; p = &s->head[n];
do { do {
m = *--p; m = *--p;
*p = (Pos)(m >= wsize ? m-wsize : NIL); *p = (Pos)(m >= wsize ? m-wsize : NIL);
} while (--n); } while (--n);
n = wsize; n = wsize;
p = &s->prev[n]; #ifndef FASTEST
do { p = &s->prev[n];
m = *--p; do {
*p = (Pos)(m >= wsize ? m-wsize : NIL); m = *--p;
/* If n is not on any hash chain, prev[n] is garbage but *p = (Pos)(m >= wsize ? m-wsize : NIL);
* its value will never be used. /* If n is not on any hash chain, prev[n] is garbage but
*/ * its value will never be used.
} while (--n); */
} while (--n);
#endif
more += wsize; more += wsize;
} }
if (s->strm->avail_in == 0) return; if (s->strm->avail_in == 0) return;
...@@ -905,8 +1030,7 @@ local void fill_window(s) ...@@ -905,8 +1030,7 @@ local void fill_window(s)
*/ */
Assert(more >= 2, "more < 2"); Assert(more >= 2, "more < 2");
n = read_buf(s->strm, (charf *)s->window + s->strstart + s->lookahead, n = read_buf(s->strm, s->window + s->strstart + s->lookahead, more);
more);
s->lookahead += n; s->lookahead += n;
/* Initialize the hash value now that we have some input: */ /* Initialize the hash value now that we have some input: */
...@@ -951,12 +1075,24 @@ local void fill_window(s) ...@@ -951,12 +1075,24 @@ local void fill_window(s)
* This function does not insert new strings in the dictionary since * This function does not insert new strings in the dictionary since
* uncompressible data is probably not useful. This function is used * uncompressible data is probably not useful. This function is used
* only for the level=0 compression option. * only for the level=0 compression option.
* NOTE: this function should be optimized to avoid extra copying. * NOTE: this function should be optimized to avoid extra copying from
* window to pending_buf.
*/ */
local block_state deflate_stored(s, flush) local block_state deflate_stored(s, flush)
deflate_state *s; deflate_state *s;
int flush; int flush;
{ {
/* Stored blocks are limited to 0xffff bytes, pending_buf is limited
* to pending_buf_size, and each stored block has a 5 byte header:
*/
ulg max_block_size = 0xffff;
ulg max_start;
if (max_block_size > s->pending_buf_size - 5) {
max_block_size = s->pending_buf_size - 5;
}
/* Copy as much as possible from input to output: */
for (;;) { for (;;) {
/* Fill the window as much as possible: */ /* Fill the window as much as possible: */
if (s->lookahead <= 1) { if (s->lookahead <= 1) {
...@@ -974,14 +1110,17 @@ local block_state deflate_stored(s, flush) ...@@ -974,14 +1110,17 @@ local block_state deflate_stored(s, flush)
s->strstart += s->lookahead; s->strstart += s->lookahead;
s->lookahead = 0; s->lookahead = 0;
/* Stored blocks are limited to 0xffff bytes: */ /* Emit a stored block if pending_buf will be full: */
if (s->strstart == 0 || s->strstart > 0xfffe) { max_start = s->block_start + max_block_size;
if (s->strstart == 0 || (ulg)s->strstart >= max_start) {
/* strstart == 0 is possible when wraparound on 16-bit machine */ /* strstart == 0 is possible when wraparound on 16-bit machine */
s->lookahead = s->strstart - 0xffff; s->lookahead = (uInt)(s->strstart - max_start);
s->strstart = 0xffff; s->strstart = (uInt)max_start;
FLUSH_BLOCK(s, 0);
} }
/* Flush if we may have to slide, otherwise block_start may become
/* Emit a stored block if it is large enough: */ * negative and the data will be gone:
*/
if (s->strstart - (uInt)s->block_start >= MAX_DIST(s)) { if (s->strstart - (uInt)s->block_start >= MAX_DIST(s)) {
FLUSH_BLOCK(s, 0); FLUSH_BLOCK(s, 0);
} }
...@@ -1041,14 +1180,15 @@ local block_state deflate_fast(s, flush) ...@@ -1041,14 +1180,15 @@ local block_state deflate_fast(s, flush)
if (s->match_length >= MIN_MATCH) { if (s->match_length >= MIN_MATCH) {
check_match(s, s->strstart, s->match_start, s->match_length); check_match(s, s->strstart, s->match_start, s->match_length);
bflush = _tr_tally(s, s->strstart - s->match_start, _tr_tally_dist(s, s->strstart - s->match_start,
s->match_length - MIN_MATCH); s->match_length - MIN_MATCH, bflush);
s->lookahead -= s->match_length; s->lookahead -= s->match_length;
/* Insert new strings in the hash table only if the match length /* Insert new strings in the hash table only if the match length
* is not too large. This saves time but degrades compression. * is not too large. This saves time but degrades compression.
*/ */
#ifndef FASTEST
if (s->match_length <= s->max_insert_length && if (s->match_length <= s->max_insert_length &&
s->lookahead >= MIN_MATCH) { s->lookahead >= MIN_MATCH) {
s->match_length--; /* string at strstart already in hash table */ s->match_length--; /* string at strstart already in hash table */
...@@ -1060,7 +1200,9 @@ local block_state deflate_fast(s, flush) ...@@ -1060,7 +1200,9 @@ local block_state deflate_fast(s, flush)
*/ */
} while (--s->match_length != 0); } while (--s->match_length != 0);
s->strstart++; s->strstart++;
} else { } else
#endif
{
s->strstart += s->match_length; s->strstart += s->match_length;
s->match_length = 0; s->match_length = 0;
s->ins_h = s->window[s->strstart]; s->ins_h = s->window[s->strstart];
...@@ -1075,7 +1217,7 @@ local block_state deflate_fast(s, flush) ...@@ -1075,7 +1217,7 @@ local block_state deflate_fast(s, flush)
} else { } else {
/* No match, output a literal byte */ /* No match, output a literal byte */
Tracevv((stderr,"%c", s->window[s->strstart])); Tracevv((stderr,"%c", s->window[s->strstart]));
bflush = _tr_tally (s, 0, s->window[s->strstart]); _tr_tally_lit (s, s->window[s->strstart], bflush);
s->lookahead--; s->lookahead--;
s->strstart++; s->strstart++;
} }
...@@ -1154,8 +1296,8 @@ local block_state deflate_slow(s, flush) ...@@ -1154,8 +1296,8 @@ local block_state deflate_slow(s, flush)
check_match(s, s->strstart-1, s->prev_match, s->prev_length); check_match(s, s->strstart-1, s->prev_match, s->prev_length);
bflush = _tr_tally(s, s->strstart -1 - s->prev_match, _tr_tally_dist(s, s->strstart -1 - s->prev_match,
s->prev_length - MIN_MATCH); s->prev_length - MIN_MATCH, bflush);
/* Insert in hash table all strings up to the end of the match. /* Insert in hash table all strings up to the end of the match.
* strstart-1 and strstart are already inserted. If there is not * strstart-1 and strstart are already inserted. If there is not
...@@ -1181,7 +1323,8 @@ local block_state deflate_slow(s, flush) ...@@ -1181,7 +1323,8 @@ local block_state deflate_slow(s, flush)
* is longer, truncate the previous match to a single literal. * is longer, truncate the previous match to a single literal.
*/ */
Tracevv((stderr,"%c", s->window[s->strstart-1])); Tracevv((stderr,"%c", s->window[s->strstart-1]));
if (_tr_tally (s, 0, s->window[s->strstart-1])) { _tr_tally_lit(s, s->window[s->strstart-1], bflush);
if (bflush) {
FLUSH_BLOCK_ONLY(s, 0); FLUSH_BLOCK_ONLY(s, 0);
} }
s->strstart++; s->strstart++;
...@@ -1199,7 +1342,7 @@ local block_state deflate_slow(s, flush) ...@@ -1199,7 +1342,7 @@ local block_state deflate_slow(s, flush)
Assert (flush != Z_NO_FLUSH, "no flush?"); Assert (flush != Z_NO_FLUSH, "no flush?");
if (s->match_available) { if (s->match_available) {
Tracevv((stderr,"%c", s->window[s->strstart-1])); Tracevv((stderr,"%c", s->window[s->strstart-1]));
_tr_tally (s, 0, s->window[s->strstart-1]); _tr_tally_lit(s, s->window[s->strstart-1], bflush);
s->match_available = 0; s->match_available = 0;
} }
FLUSH_BLOCK(s, flush == Z_FINISH); FLUSH_BLOCK(s, flush == Z_FINISH);
......
/* deflate.h -- internal compression state /* deflate.h -- internal compression state
* Copyright (C) 1995-1996 Jean-loup Gailly * Copyright (C) 1995-1998 Jean-loup Gailly
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -8,7 +8,7 @@ ...@@ -8,7 +8,7 @@
subject to change. Applications should only use zlib.h. subject to change. Applications should only use zlib.h.
*/ */
/* $Id: deflate.h,v 1.1 1997/07/17 17:45:27 jim Exp $ */ /* @(#) $Id: deflate.h,v 1.2 2001/06/04 19:41:16 shane Exp $ */
#ifndef _DEFLATE_H #ifndef _DEFLATE_H
#define _DEFLATE_H #define _DEFLATE_H
...@@ -83,6 +83,7 @@ typedef struct internal_state { ...@@ -83,6 +83,7 @@ typedef struct internal_state {
z_streamp strm; /* pointer back to this zlib stream */ z_streamp strm; /* pointer back to this zlib stream */
int status; /* as the name implies */ int status; /* as the name implies */
Bytef *pending_buf; /* output still pending */ Bytef *pending_buf; /* output still pending */
ulg pending_buf_size; /* size of pending_buf */
Bytef *pending_out; /* next pending byte to output to the stream */ Bytef *pending_out; /* next pending byte to output to the stream */
int pending; /* nb of bytes in the pending buffer */ int pending; /* nb of bytes in the pending buffer */
int noheader; /* suppress zlib header and adler32 */ int noheader; /* suppress zlib header and adler32 */
...@@ -229,12 +230,12 @@ typedef struct internal_state { ...@@ -229,12 +230,12 @@ typedef struct internal_state {
ulg opt_len; /* bit length of current block with optimal trees */ ulg opt_len; /* bit length of current block with optimal trees */
ulg static_len; /* bit length of current block with static trees */ ulg static_len; /* bit length of current block with static trees */
ulg compressed_len; /* total bit length of compressed file */
uInt matches; /* number of string matches in current block */ uInt matches; /* number of string matches in current block */
int last_eob_len; /* bit length of EOB code for last block */ int last_eob_len; /* bit length of EOB code for last block */
#ifdef DEBUG #ifdef DEBUG
ulg bits_sent; /* bit length of the compressed data */ ulg compressed_len; /* total bit length of compressed file mod 2^32 */
ulg bits_sent; /* bit length of compressed data sent mod 2^32 */
#endif #endif
ush bi_buf; ush bi_buf;
...@@ -267,9 +268,51 @@ typedef struct internal_state { ...@@ -267,9 +268,51 @@ typedef struct internal_state {
/* in trees.c */ /* in trees.c */
void _tr_init OF((deflate_state *s)); void _tr_init OF((deflate_state *s));
int _tr_tally OF((deflate_state *s, unsigned dist, unsigned lc)); int _tr_tally OF((deflate_state *s, unsigned dist, unsigned lc));
ulg _tr_flush_block OF((deflate_state *s, charf *buf, ulg stored_len, void _tr_flush_block OF((deflate_state *s, charf *buf, ulg stored_len,
int eof)); int eof));
void _tr_align OF((deflate_state *s)); void _tr_align OF((deflate_state *s));
void _tr_stored_block OF((deflate_state *s, charf *buf, ulg stored_len, void _tr_stored_block OF((deflate_state *s, charf *buf, ulg stored_len,
int eof)); int eof));
#define d_code(dist) \
((dist) < 256 ? _dist_code[dist] : _dist_code[256+((dist)>>7)])
/* Mapping from a distance to a distance code. dist is the distance - 1 and
* must not have side effects. _dist_code[256] and _dist_code[257] are never
* used.
*/
#ifndef DEBUG
/* Inline versions of _tr_tally for speed: */
#if defined(GEN_TREES_H) || !defined(STDC)
extern uch _length_code[];
extern uch _dist_code[];
#else
extern const uch _length_code[];
extern const uch _dist_code[];
#endif
# define _tr_tally_lit(s, c, flush) \
{ uch cc = (c); \
s->d_buf[s->last_lit] = 0; \
s->l_buf[s->last_lit++] = cc; \
s->dyn_ltree[cc].Freq++; \
flush = (s->last_lit == s->lit_bufsize-1); \
}
# define _tr_tally_dist(s, distance, length, flush) \
{ uch len = (length); \
ush dist = (distance); \
s->d_buf[s->last_lit] = dist; \
s->l_buf[s->last_lit++] = len; \
dist--; \
s->dyn_ltree[_length_code[len]+LITERALS+1].Freq++; \
s->dyn_dtree[d_code(dist)].Freq++; \
flush = (s->last_lit == s->lit_bufsize-1); \
}
#else
# define _tr_tally_lit(s, c, flush) flush = _tr_tally(s, 0, c)
# define _tr_tally_dist(s, distance, length, flush) \
flush = _tr_tally(s, distance, length)
#endif
#endif #endif
/* gzio.c -- IO on .gz files /* gzio.c -- IO on .gz files
* Copyright (C) 1995-1996 Jean-loup Gailly. * Copyright (C) 1995-1998 Jean-loup Gailly.
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*
* Compile this file with -DNO_DEFLATE to avoid the compression code.
*/ */
/* $Id: gzio.c,v 1.1 1997/07/17 17:45:27 jim Exp $ */ /* @(#) $Id: gzio.c,v 1.2 2001/06/04 19:41:16 shane Exp $ */
#include <stdio.h> #include <stdio.h>
...@@ -11,7 +13,16 @@ ...@@ -11,7 +13,16 @@
struct internal_state {int dummy;}; /* for buggy compilers */ struct internal_state {int dummy;}; /* for buggy compilers */
#define Z_BUFSIZE 4096 #ifndef Z_BUFSIZE
# ifdef MAXSEG_64K
# define Z_BUFSIZE 4096 /* minimize memory usage for 16-bit DOS */
# else
# define Z_BUFSIZE 16384
# endif
#endif
#ifndef Z_PRINTF_BUFSIZE
# define Z_PRINTF_BUFSIZE 4096
#endif
#define ALLOC(size) malloc(size) #define ALLOC(size) malloc(size)
#define TRYFREE(p) {if (p) free(p);} #define TRYFREE(p) {if (p) free(p);}
...@@ -38,10 +49,12 @@ typedef struct gz_stream { ...@@ -38,10 +49,12 @@ typedef struct gz_stream {
char *path; /* path name for debugging only */ char *path; /* path name for debugging only */
int transparent; /* 1 if input file is not a .gz file */ int transparent; /* 1 if input file is not a .gz file */
char mode; /* 'w' or 'r' */ char mode; /* 'w' or 'r' */
long startpos; /* start of compressed data in file (header skipped) */
} gz_stream; } gz_stream;
local gzFile gz_open OF((const char *path, const char *mode, int fd)); local gzFile gz_open OF((const char *path, const char *mode, int fd));
local int do_flush OF((gzFile file, int flush));
local int get_byte OF((gz_stream *s)); local int get_byte OF((gz_stream *s));
local void check_header OF((gz_stream *s)); local void check_header OF((gz_stream *s));
local int destroy OF((gz_stream *s)); local int destroy OF((gz_stream *s));
...@@ -64,6 +77,7 @@ local gzFile gz_open (path, mode, fd) ...@@ -64,6 +77,7 @@ local gzFile gz_open (path, mode, fd)
{ {
int err; int err;
int level = Z_DEFAULT_COMPRESSION; /* compression level */ int level = Z_DEFAULT_COMPRESSION; /* compression level */
int strategy = Z_DEFAULT_STRATEGY; /* compression strategy */
char *p = (char*)mode; char *p = (char*)mode;
gz_stream *s; gz_stream *s;
char fmode[80]; /* copy of mode, without the compression level */ char fmode[80]; /* copy of mode, without the compression level */
...@@ -99,6 +113,10 @@ local gzFile gz_open (path, mode, fd) ...@@ -99,6 +113,10 @@ local gzFile gz_open (path, mode, fd)
if (*p == 'w' || *p == 'a') s->mode = 'w'; if (*p == 'w' || *p == 'a') s->mode = 'w';
if (*p >= '0' && *p <= '9') { if (*p >= '0' && *p <= '9') {
level = *p - '0'; level = *p - '0';
} else if (*p == 'f') {
strategy = Z_FILTERED;
} else if (*p == 'h') {
strategy = Z_HUFFMAN_ONLY;
} else { } else {
*m++ = *p; /* copy the mode */ *m++ = *p; /* copy the mode */
} }
...@@ -106,19 +124,28 @@ local gzFile gz_open (path, mode, fd) ...@@ -106,19 +124,28 @@ local gzFile gz_open (path, mode, fd)
if (s->mode == '\0') return destroy(s), (gzFile)Z_NULL; if (s->mode == '\0') return destroy(s), (gzFile)Z_NULL;
if (s->mode == 'w') { if (s->mode == 'w') {
#ifdef NO_DEFLATE
err = Z_STREAM_ERROR;
#else
err = deflateInit2(&(s->stream), level, err = deflateInit2(&(s->stream), level,
Z_DEFLATED, -MAX_WBITS, DEF_MEM_LEVEL, 0); Z_DEFLATED, -MAX_WBITS, DEF_MEM_LEVEL, strategy);
/* windowBits is passed < 0 to suppress zlib header */ /* windowBits is passed < 0 to suppress zlib header */
s->stream.next_out = s->outbuf = (Byte*)ALLOC(Z_BUFSIZE); s->stream.next_out = s->outbuf = (Byte*)ALLOC(Z_BUFSIZE);
#endif
if (err != Z_OK || s->outbuf == Z_NULL) { if (err != Z_OK || s->outbuf == Z_NULL) {
return destroy(s), (gzFile)Z_NULL; return destroy(s), (gzFile)Z_NULL;
} }
} else { } else {
err = inflateInit2(&(s->stream), -MAX_WBITS);
s->stream.next_in = s->inbuf = (Byte*)ALLOC(Z_BUFSIZE); s->stream.next_in = s->inbuf = (Byte*)ALLOC(Z_BUFSIZE);
err = inflateInit2(&(s->stream), -MAX_WBITS);
/* windowBits is passed < 0 to tell that there is no zlib header.
* Note that in this case inflate *requires* an extra "dummy" byte
* after the compressed stream in order to complete decompression and
* return Z_STREAM_END. Here the gzip CRC32 ensures that 4 bytes are
* present after the compressed stream.
*/
if (err != Z_OK || s->inbuf == Z_NULL) { if (err != Z_OK || s->inbuf == Z_NULL) {
return destroy(s), (gzFile)Z_NULL; return destroy(s), (gzFile)Z_NULL;
} }
...@@ -126,7 +153,7 @@ local gzFile gz_open (path, mode, fd) ...@@ -126,7 +153,7 @@ local gzFile gz_open (path, mode, fd)
s->stream.avail_out = Z_BUFSIZE; s->stream.avail_out = Z_BUFSIZE;
errno = 0; errno = 0;
s->file = fd < 0 ? FOPEN(path, fmode) : (FILE*)fdopen(fd, fmode); s->file = fd < 0 ? F_OPEN(path, fmode) : (FILE*)fdopen(fd, fmode);
if (s->file == NULL) { if (s->file == NULL) {
return destroy(s), (gzFile)Z_NULL; return destroy(s), (gzFile)Z_NULL;
...@@ -136,16 +163,24 @@ local gzFile gz_open (path, mode, fd) ...@@ -136,16 +163,24 @@ local gzFile gz_open (path, mode, fd)
*/ */
fprintf(s->file, "%c%c%c%c%c%c%c%c%c%c", gz_magic[0], gz_magic[1], fprintf(s->file, "%c%c%c%c%c%c%c%c%c%c", gz_magic[0], gz_magic[1],
Z_DEFLATED, 0 /*flags*/, 0,0,0,0 /*time*/, 0 /*xflags*/, OS_CODE); Z_DEFLATED, 0 /*flags*/, 0,0,0,0 /*time*/, 0 /*xflags*/, OS_CODE);
s->startpos = 10L;
/* We use 10L instead of ftell(s->file) to because ftell causes an
* fflush on some systems. This version of the library doesn't use
* startpos anyway in write mode, so this initialization is not
* necessary.
*/
} else { } else {
check_header(s); /* skip the .gz header */ check_header(s); /* skip the .gz header */
s->startpos = (ftell(s->file) - s->stream.avail_in);
} }
return (gzFile)s; return (gzFile)s;
} }
/* =========================================================================== /* ===========================================================================
Opens a gzip (.gz) file for reading or writing. Opens a gzip (.gz) file for reading or writing.
*/ */
gzFile gzopen (path, mode) gzFile ZEXPORT gzopen (path, mode)
const char *path; const char *path;
const char *mode; const char *mode;
{ {
...@@ -156,7 +191,7 @@ gzFile gzopen (path, mode) ...@@ -156,7 +191,7 @@ gzFile gzopen (path, mode)
Associate a gzFile with the file descriptor fd. fd is not dup'ed here Associate a gzFile with the file descriptor fd. fd is not dup'ed here
to mimic the behavio(u)r of fdopen. to mimic the behavio(u)r of fdopen.
*/ */
gzFile gzdopen (fd, mode) gzFile ZEXPORT gzdopen (fd, mode)
int fd; int fd;
const char *mode; const char *mode;
{ {
...@@ -168,6 +203,31 @@ gzFile gzdopen (fd, mode) ...@@ -168,6 +203,31 @@ gzFile gzdopen (fd, mode)
return gz_open (name, mode, fd); return gz_open (name, mode, fd);
} }
/* ===========================================================================
* Update the compression level and strategy
*/
int ZEXPORT gzsetparams (file, level, strategy)
gzFile file;
int level;
int strategy;
{
gz_stream *s = (gz_stream*)file;
if (s == NULL || s->mode != 'w') return Z_STREAM_ERROR;
/* Make room to allow flushing */
if (s->stream.avail_out == 0) {
s->stream.next_out = s->outbuf;
if (fwrite(s->outbuf, 1, Z_BUFSIZE, s->file) != Z_BUFSIZE) {
s->z_err = Z_ERRNO;
}
s->stream.avail_out = Z_BUFSIZE;
}
return deflateParams (&(s->stream), level, strategy);
}
/* =========================================================================== /* ===========================================================================
Read a byte from a gz_stream; update next_in and avail_in. Return EOF Read a byte from a gz_stream; update next_in and avail_in. Return EOF
for end of file. for end of file.
...@@ -212,8 +272,11 @@ local void check_header(s) ...@@ -212,8 +272,11 @@ local void check_header(s)
for (len = 0; len < 2; len++) { for (len = 0; len < 2; len++) {
c = get_byte(s); c = get_byte(s);
if (c != gz_magic[len]) { if (c != gz_magic[len]) {
s->transparent = 1; if (len != 0) s->stream.avail_in++, s->stream.next_in--;
if (c != EOF) s->stream.avail_in++, s->stream.next_in--; if (c != EOF) {
s->stream.avail_in++, s->stream.next_in--;
s->transparent = 1;
}
s->z_err = s->stream.avail_in != 0 ? Z_OK : Z_STREAM_END; s->z_err = s->stream.avail_in != 0 ? Z_OK : Z_STREAM_END;
return; return;
} }
...@@ -260,14 +323,21 @@ local int destroy (s) ...@@ -260,14 +323,21 @@ local int destroy (s)
TRYFREE(s->msg); TRYFREE(s->msg);
if (s->stream.state != NULL) { if (s->stream.state != NULL) {
if (s->mode == 'w') { if (s->mode == 'w') {
err = deflateEnd(&(s->stream)); #ifdef NO_DEFLATE
} else if (s->mode == 'r') { err = Z_STREAM_ERROR;
err = inflateEnd(&(s->stream)); #else
} err = deflateEnd(&(s->stream));
#endif
} else if (s->mode == 'r') {
err = inflateEnd(&(s->stream));
}
} }
if (s->file != NULL && fclose(s->file)) { if (s->file != NULL && fclose(s->file)) {
err = Z_ERRNO; #ifdef ESPIPE
if (errno != ESPIPE) /* fclose is broken for pipes in HP/UX */
#endif
err = Z_ERRNO;
} }
if (s->z_err < 0) err = s->z_err; if (s->z_err < 0) err = s->z_err;
...@@ -282,13 +352,13 @@ local int destroy (s) ...@@ -282,13 +352,13 @@ local int destroy (s)
Reads the given number of uncompressed bytes from the compressed file. Reads the given number of uncompressed bytes from the compressed file.
gzread returns the number of bytes actually read (0 for end of file). gzread returns the number of bytes actually read (0 for end of file).
*/ */
int gzread (file, buf, len) int ZEXPORT gzread (file, buf, len)
gzFile file; gzFile file;
voidp buf; voidp buf;
unsigned len; unsigned len;
{ {
gz_stream *s = (gz_stream*)file; gz_stream *s = (gz_stream*)file;
Bytef *start = buf; /* starting point for crc computation */ Bytef *start = (Bytef*)buf; /* starting point for crc computation */
Byte *next_out; /* == stream.next_out but not forced far (for MSDOS) */ Byte *next_out; /* == stream.next_out but not forced far (for MSDOS) */
if (s == NULL || s->mode != 'r') return Z_STREAM_ERROR; if (s == NULL || s->mode != 'r') return Z_STREAM_ERROR;
...@@ -296,7 +366,8 @@ int gzread (file, buf, len) ...@@ -296,7 +366,8 @@ int gzread (file, buf, len)
if (s->z_err == Z_DATA_ERROR || s->z_err == Z_ERRNO) return -1; if (s->z_err == Z_DATA_ERROR || s->z_err == Z_ERRNO) return -1;
if (s->z_err == Z_STREAM_END) return 0; /* EOF */ if (s->z_err == Z_STREAM_END) return 0; /* EOF */
s->stream.next_out = next_out = buf; next_out = (Byte*)buf;
s->stream.next_out = (Bytef*)buf;
s->stream.avail_out = len; s->stream.avail_out = len;
while (s->stream.avail_out != 0) { while (s->stream.avail_out != 0) {
...@@ -317,7 +388,11 @@ int gzread (file, buf, len) ...@@ -317,7 +388,11 @@ int gzread (file, buf, len)
s->stream.avail_out -= fread(next_out, 1, s->stream.avail_out, s->stream.avail_out -= fread(next_out, 1, s->stream.avail_out,
s->file); s->file);
} }
return (int)(len - s->stream.avail_out); len -= s->stream.avail_out;
s->stream.total_in += (uLong)len;
s->stream.total_out += (uLong)len;
if (len == 0) s->z_eof = 1;
return (int)len;
} }
if (s->stream.avail_in == 0 && !s->z_eof) { if (s->stream.avail_in == 0 && !s->z_eof) {
...@@ -339,13 +414,22 @@ int gzread (file, buf, len) ...@@ -339,13 +414,22 @@ int gzread (file, buf, len)
s->crc = crc32(s->crc, start, (uInt)(s->stream.next_out - start)); s->crc = crc32(s->crc, start, (uInt)(s->stream.next_out - start));
start = s->stream.next_out; start = s->stream.next_out;
if (getLong(s) != s->crc || getLong(s) != s->stream.total_out) { if (getLong(s) != s->crc) {
s->z_err = Z_DATA_ERROR; s->z_err = Z_DATA_ERROR;
} else { } else {
/* Check for concatenated .gz files: */ (void)getLong(s);
/* The uncompressed length returned by above getlong() may
* be different from s->stream.total_out) in case of
* concatenated .gz files. Check for such files:
*/
check_header(s); check_header(s);
if (s->z_err == Z_OK) { if (s->z_err == Z_OK) {
uLong total_in = s->stream.total_in;
uLong total_out = s->stream.total_out;
inflateReset(&(s->stream)); inflateReset(&(s->stream));
s->stream.total_in = total_in;
s->stream.total_out = total_out;
s->crc = crc32(0L, Z_NULL, 0); s->crc = crc32(0L, Z_NULL, 0);
} }
} }
...@@ -357,11 +441,49 @@ int gzread (file, buf, len) ...@@ -357,11 +441,49 @@ int gzread (file, buf, len)
return (int)(len - s->stream.avail_out); return (int)(len - s->stream.avail_out);
} }
/* ===========================================================================
Reads one byte from the compressed file. gzgetc returns this byte
or -1 in case of end of file or error.
*/
int ZEXPORT gzgetc(file)
gzFile file;
{
unsigned char c;
return gzread(file, &c, 1) == 1 ? c : -1;
}
/* ===========================================================================
Reads bytes from the compressed file until len-1 characters are
read, or a newline character is read and transferred to buf, or an
end-of-file condition is encountered. The string is then terminated
with a null character.
gzgets returns buf, or Z_NULL in case of error.
The current implementation is not optimized at all.
*/
char * ZEXPORT gzgets(file, buf, len)
gzFile file;
char *buf;
int len;
{
char *b = buf;
if (buf == Z_NULL || len <= 0) return Z_NULL;
while (--len > 0 && gzread(file, buf, 1) == 1 && *buf++ != '\n') ;
*buf = '\0';
return b == buf && len > 0 ? Z_NULL : b;
}
#ifndef NO_DEFLATE
/* =========================================================================== /* ===========================================================================
Writes the given number of uncompressed bytes into the compressed file. Writes the given number of uncompressed bytes into the compressed file.
gzwrite returns the number of bytes actually written (0 in case of error). gzwrite returns the number of bytes actually written (0 in case of error).
*/ */
int gzwrite (file, buf, len) int ZEXPORT gzwrite (file, buf, len)
gzFile file; gzFile file;
const voidp buf; const voidp buf;
unsigned len; unsigned len;
...@@ -370,7 +492,7 @@ int gzwrite (file, buf, len) ...@@ -370,7 +492,7 @@ int gzwrite (file, buf, len)
if (s == NULL || s->mode != 'w') return Z_STREAM_ERROR; if (s == NULL || s->mode != 'w') return Z_STREAM_ERROR;
s->stream.next_in = buf; s->stream.next_in = (Bytef*)buf;
s->stream.avail_in = len; s->stream.avail_in = len;
while (s->stream.avail_in != 0) { while (s->stream.avail_in != 0) {
...@@ -387,18 +509,95 @@ int gzwrite (file, buf, len) ...@@ -387,18 +509,95 @@ int gzwrite (file, buf, len)
s->z_err = deflate(&(s->stream), Z_NO_FLUSH); s->z_err = deflate(&(s->stream), Z_NO_FLUSH);
if (s->z_err != Z_OK) break; if (s->z_err != Z_OK) break;
} }
s->crc = crc32(s->crc, buf, len); s->crc = crc32(s->crc, (const Bytef *)buf, len);
return (int)(len - s->stream.avail_in); return (int)(len - s->stream.avail_in);
} }
/* ===========================================================================
Converts, formats, and writes the args to the compressed file under
control of the format string, as in fprintf. gzprintf returns the number of
uncompressed bytes actually written (0 in case of error).
*/
#ifdef STDC
#include <stdarg.h>
int ZEXPORTVA gzprintf (gzFile file, const char *format, /* args */ ...)
{
char buf[Z_PRINTF_BUFSIZE];
va_list va;
int len;
va_start(va, format);
#ifdef HAS_vsnprintf
(void)vsnprintf(buf, sizeof(buf), format, va);
#else
(void)vsprintf(buf, format, va);
#endif
va_end(va);
len = strlen(buf); /* some *sprintf don't return the nb of bytes written */
if (len <= 0) return 0;
return gzwrite(file, buf, (unsigned)len);
}
#else /* not ANSI C */
int ZEXPORTVA gzprintf (file, format, a1, a2, a3, a4, a5, a6, a7, a8, a9, a10,
a11, a12, a13, a14, a15, a16, a17, a18, a19, a20)
gzFile file;
const char *format;
int a1, a2, a3, a4, a5, a6, a7, a8, a9, a10,
a11, a12, a13, a14, a15, a16, a17, a18, a19, a20;
{
char buf[Z_PRINTF_BUFSIZE];
int len;
#ifdef HAS_snprintf
snprintf(buf, sizeof(buf), format, a1, a2, a3, a4, a5, a6, a7, a8,
a9, a10, a11, a12, a13, a14, a15, a16, a17, a18, a19, a20);
#else
sprintf(buf, format, a1, a2, a3, a4, a5, a6, a7, a8,
a9, a10, a11, a12, a13, a14, a15, a16, a17, a18, a19, a20);
#endif
len = strlen(buf); /* old sprintf doesn't return the nb of bytes written */
if (len <= 0) return 0;
return gzwrite(file, buf, len);
}
#endif
/* ===========================================================================
Writes c, converted to an unsigned char, into the compressed file.
gzputc returns the value that was written, or -1 in case of error.
*/
int ZEXPORT gzputc(file, c)
gzFile file;
int c;
{
unsigned char cc = (unsigned char) c; /* required for big endian systems */
return gzwrite(file, &cc, 1) == 1 ? (int)cc : -1;
}
/* ===========================================================================
Writes the given null-terminated string to the compressed file, excluding
the terminating null character.
gzputs returns the number of characters written, or -1 in case of error.
*/
int ZEXPORT gzputs(file, s)
gzFile file;
const char *s;
{
return gzwrite(file, (char*)s, (unsigned)strlen(s));
}
/* =========================================================================== /* ===========================================================================
Flushes all pending output into the compressed file. The parameter Flushes all pending output into the compressed file. The parameter
flush is as in the deflate() function. flush is as in the deflate() function.
gzflush should be called only when strictly necessary because it can
degrade compression.
*/ */
int gzflush (file, flush) local int do_flush (file, flush)
gzFile file; gzFile file;
int flush; int flush;
{ {
...@@ -424,6 +623,9 @@ int gzflush (file, flush) ...@@ -424,6 +623,9 @@ int gzflush (file, flush)
if (done) break; if (done) break;
s->z_err = deflate(&(s->stream), flush); s->z_err = deflate(&(s->stream), flush);
/* Ignore the second of two consecutive flushes: */
if (len == 0 && s->z_err == Z_BUF_ERROR) s->z_err = Z_OK;
/* deflate has finished flushing only when it hasn't used up /* deflate has finished flushing only when it hasn't used up
* all the available space in the output buffer: * all the available space in the output buffer:
*/ */
...@@ -431,9 +633,155 @@ int gzflush (file, flush) ...@@ -431,9 +633,155 @@ int gzflush (file, flush)
if (s->z_err != Z_OK && s->z_err != Z_STREAM_END) break; if (s->z_err != Z_OK && s->z_err != Z_STREAM_END) break;
} }
return s->z_err == Z_STREAM_END ? Z_OK : s->z_err;
}
int ZEXPORT gzflush (file, flush)
gzFile file;
int flush;
{
gz_stream *s = (gz_stream*)file;
int err = do_flush (file, flush);
if (err) return err;
fflush(s->file); fflush(s->file);
return s->z_err == Z_STREAM_END ? Z_OK : s->z_err; return s->z_err == Z_STREAM_END ? Z_OK : s->z_err;
} }
#endif /* NO_DEFLATE */
/* ===========================================================================
Sets the starting position for the next gzread or gzwrite on the given
compressed file. The offset represents a number of bytes in the
gzseek returns the resulting offset location as measured in bytes from
the beginning of the uncompressed stream, or -1 in case of error.
SEEK_END is not implemented, returns error.
In this version of the library, gzseek can be extremely slow.
*/
z_off_t ZEXPORT gzseek (file, offset, whence)
gzFile file;
z_off_t offset;
int whence;
{
gz_stream *s = (gz_stream*)file;
if (s == NULL || whence == SEEK_END ||
s->z_err == Z_ERRNO || s->z_err == Z_DATA_ERROR) {
return -1L;
}
if (s->mode == 'w') {
#ifdef NO_DEFLATE
return -1L;
#else
if (whence == SEEK_SET) {
offset -= s->stream.total_in;
}
if (offset < 0) return -1L;
/* At this point, offset is the number of zero bytes to write. */
if (s->inbuf == Z_NULL) {
s->inbuf = (Byte*)ALLOC(Z_BUFSIZE); /* for seeking */
zmemzero(s->inbuf, Z_BUFSIZE);
}
while (offset > 0) {
uInt size = Z_BUFSIZE;
if (offset < Z_BUFSIZE) size = (uInt)offset;
size = gzwrite(file, s->inbuf, size);
if (size == 0) return -1L;
offset -= size;
}
return (z_off_t)s->stream.total_in;
#endif
}
/* Rest of function is for reading only */
/* compute absolute position */
if (whence == SEEK_CUR) {
offset += s->stream.total_out;
}
if (offset < 0) return -1L;
if (s->transparent) {
/* map to fseek */
s->stream.avail_in = 0;
s->stream.next_in = s->inbuf;
if (fseek(s->file, offset, SEEK_SET) < 0) return -1L;
s->stream.total_in = s->stream.total_out = (uLong)offset;
return offset;
}
/* For a negative seek, rewind and use positive seek */
if ((uLong)offset >= s->stream.total_out) {
offset -= s->stream.total_out;
} else if (gzrewind(file) < 0) {
return -1L;
}
/* offset is now the number of bytes to skip. */
if (offset != 0 && s->outbuf == Z_NULL) {
s->outbuf = (Byte*)ALLOC(Z_BUFSIZE);
}
while (offset > 0) {
int size = Z_BUFSIZE;
if (offset < Z_BUFSIZE) size = (int)offset;
size = gzread(file, s->outbuf, (uInt)size);
if (size <= 0) return -1L;
offset -= size;
}
return (z_off_t)s->stream.total_out;
}
/* ===========================================================================
Rewinds input file.
*/
int ZEXPORT gzrewind (file)
gzFile file;
{
gz_stream *s = (gz_stream*)file;
if (s == NULL || s->mode != 'r') return -1;
s->z_err = Z_OK;
s->z_eof = 0;
s->stream.avail_in = 0;
s->stream.next_in = s->inbuf;
s->crc = crc32(0L, Z_NULL, 0);
if (s->startpos == 0) { /* not a compressed file */
rewind(s->file);
return 0;
}
(void) inflateReset(&s->stream);
return fseek(s->file, s->startpos, SEEK_SET);
}
/* ===========================================================================
Returns the starting position for the next gzread or gzwrite on the
given compressed file. This position represents a number of bytes in the
uncompressed data stream.
*/
z_off_t ZEXPORT gztell (file)
gzFile file;
{
return gzseek(file, 0L, SEEK_CUR);
}
/* ===========================================================================
Returns 1 when EOF has previously been detected reading the given
input stream, otherwise zero.
*/
int ZEXPORT gzeof (file)
gzFile file;
{
gz_stream *s = (gz_stream*)file;
return (s == NULL || s->mode != 'r') ? 0 : s->z_eof;
}
/* =========================================================================== /* ===========================================================================
Outputs a long in LSB order to the given file Outputs a long in LSB order to the given file
...@@ -450,7 +798,8 @@ local void putLong (file, x) ...@@ -450,7 +798,8 @@ local void putLong (file, x)
} }
/* =========================================================================== /* ===========================================================================
Reads a long in LSB order from the given gz_stream. Sets Reads a long in LSB order from the given gz_stream. Sets z_err in case
of error.
*/ */
local uLong getLong (s) local uLong getLong (s)
gz_stream *s; gz_stream *s;
...@@ -470,7 +819,7 @@ local uLong getLong (s) ...@@ -470,7 +819,7 @@ local uLong getLong (s)
Flushes all pending output if necessary, closes the compressed file Flushes all pending output if necessary, closes the compressed file
and deallocates all the (de)compression state. and deallocates all the (de)compression state.
*/ */
int gzclose (file) int ZEXPORT gzclose (file)
gzFile file; gzFile file;
{ {
int err; int err;
...@@ -479,14 +828,17 @@ int gzclose (file) ...@@ -479,14 +828,17 @@ int gzclose (file)
if (s == NULL) return Z_STREAM_ERROR; if (s == NULL) return Z_STREAM_ERROR;
if (s->mode == 'w') { if (s->mode == 'w') {
err = gzflush (file, Z_FINISH); #ifdef NO_DEFLATE
if (err != Z_OK) return destroy(file); return Z_STREAM_ERROR;
#else
err = do_flush (file, Z_FINISH);
if (err != Z_OK) return destroy((gz_stream*)file);
putLong (s->file, s->crc); putLong (s->file, s->crc);
putLong (s->file, s->stream.total_in); putLong (s->file, s->stream.total_in);
#endif
} }
return destroy(file); return destroy((gz_stream*)file);
} }
/* =========================================================================== /* ===========================================================================
...@@ -496,7 +848,7 @@ int gzclose (file) ...@@ -496,7 +848,7 @@ int gzclose (file)
errnum is set to Z_ERRNO and the application may consult errno errnum is set to Z_ERRNO and the application may consult errno
to get the exact error code. to get the exact error code.
*/ */
const char* gzerror (file, errnum) const char* ZEXPORT gzerror (file, errnum)
gzFile file; gzFile file;
int *errnum; int *errnum;
{ {
......
/* infblock.c -- interpret and process block types to last block /* infblock.c -- interpret and process block types to last block
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -11,8 +11,12 @@ ...@@ -11,8 +11,12 @@
struct inflate_codes_state {int dummy;}; /* for buggy compilers */ struct inflate_codes_state {int dummy;}; /* for buggy compilers */
/* simplify the use of the inflate_huft type with some defines */
#define exop word.what.Exop
#define bits word.what.Bits
/* Table for deflate from PKZIP's appnote.txt. */ /* Table for deflate from PKZIP's appnote.txt. */
local uInt border[] = { /* Order of the bit length code lengths */ local const uInt border[] = { /* Order of the bit length code lengths */
16, 17, 18, 0, 8, 7, 9, 6, 10, 5, 11, 4, 12, 3, 13, 2, 14, 1, 15}; 16, 17, 18, 0, 8, 7, 9, 6, 10, 5, 11, 4, 12, 3, 13, 2, 14, 1, 15};
/* /*
...@@ -66,23 +70,19 @@ inflate_blocks_statef *s; ...@@ -66,23 +70,19 @@ inflate_blocks_statef *s;
z_streamp z; z_streamp z;
uLongf *c; uLongf *c;
{ {
if (s->checkfn != Z_NULL) if (c != Z_NULL)
*c = s->check; *c = s->check;
if (s->mode == BTREE || s->mode == DTREE) if (s->mode == BTREE || s->mode == DTREE)
ZFREE(z, s->sub.trees.blens); ZFREE(z, s->sub.trees.blens);
if (s->mode == CODES) if (s->mode == CODES)
{
inflate_codes_free(s->sub.decode.codes, z); inflate_codes_free(s->sub.decode.codes, z);
inflate_trees_free(s->sub.decode.td, z);
inflate_trees_free(s->sub.decode.tl, z);
}
s->mode = TYPE; s->mode = TYPE;
s->bitk = 0; s->bitk = 0;
s->bitb = 0; s->bitb = 0;
s->read = s->write = s->window; s->read = s->write = s->window;
if (s->checkfn != Z_NULL) if (s->checkfn != Z_NULL)
z->adler = s->check = (*s->checkfn)(0L, Z_NULL, 0); z->adler = s->check = (*s->checkfn)(0L, (const Bytef *)Z_NULL, 0);
Trace((stderr, "inflate: blocks reset\n")); Tracev((stderr, "inflate: blocks reset\n"));
} }
...@@ -96,23 +96,27 @@ uInt w; ...@@ -96,23 +96,27 @@ uInt w;
if ((s = (inflate_blocks_statef *)ZALLOC if ((s = (inflate_blocks_statef *)ZALLOC
(z,1,sizeof(struct inflate_blocks_state))) == Z_NULL) (z,1,sizeof(struct inflate_blocks_state))) == Z_NULL)
return s; return s;
if ((s->hufts =
(inflate_huft *)ZALLOC(z, sizeof(inflate_huft), MANY)) == Z_NULL)
{
ZFREE(z, s);
return Z_NULL;
}
if ((s->window = (Bytef *)ZALLOC(z, 1, w)) == Z_NULL) if ((s->window = (Bytef *)ZALLOC(z, 1, w)) == Z_NULL)
{ {
ZFREE(z, s->hufts);
ZFREE(z, s); ZFREE(z, s);
return Z_NULL; return Z_NULL;
} }
s->end = s->window + w; s->end = s->window + w;
s->checkfn = c; s->checkfn = c;
s->mode = TYPE; s->mode = TYPE;
Trace((stderr, "inflate: blocks allocated\n")); Tracev((stderr, "inflate: blocks allocated\n"));
inflate_blocks_reset(s, z, &s->check); inflate_blocks_reset(s, z, Z_NULL);
return s; return s;
} }
#ifdef DEBUG
extern uInt inflate_hufts;
#endif
int inflate_blocks(s, z, r) int inflate_blocks(s, z, r)
inflate_blocks_statef *s; inflate_blocks_statef *s;
z_streamp z; z_streamp z;
...@@ -139,7 +143,7 @@ int r; ...@@ -139,7 +143,7 @@ int r;
switch (t >> 1) switch (t >> 1)
{ {
case 0: /* stored */ case 0: /* stored */
Trace((stderr, "inflate: stored block%s\n", Tracev((stderr, "inflate: stored block%s\n",
s->last ? " (last)" : "")); s->last ? " (last)" : ""));
DUMPBITS(3) DUMPBITS(3)
t = k & 7; /* go to byte boundary */ t = k & 7; /* go to byte boundary */
...@@ -147,27 +151,25 @@ int r; ...@@ -147,27 +151,25 @@ int r;
s->mode = LENS; /* get length of stored block */ s->mode = LENS; /* get length of stored block */
break; break;
case 1: /* fixed */ case 1: /* fixed */
Trace((stderr, "inflate: fixed codes block%s\n", Tracev((stderr, "inflate: fixed codes block%s\n",
s->last ? " (last)" : "")); s->last ? " (last)" : ""));
{ {
uInt bl, bd; uInt bl, bd;
inflate_huft *tl, *td; inflate_huft *tl, *td;
inflate_trees_fixed(&bl, &bd, &tl, &td); inflate_trees_fixed(&bl, &bd, &tl, &td, z);
s->sub.decode.codes = inflate_codes_new(bl, bd, tl, td, z); s->sub.decode.codes = inflate_codes_new(bl, bd, tl, td, z);
if (s->sub.decode.codes == Z_NULL) if (s->sub.decode.codes == Z_NULL)
{ {
r = Z_MEM_ERROR; r = Z_MEM_ERROR;
LEAVE LEAVE
} }
s->sub.decode.tl = Z_NULL; /* don't try to free these */
s->sub.decode.td = Z_NULL;
} }
DUMPBITS(3) DUMPBITS(3)
s->mode = CODES; s->mode = CODES;
break; break;
case 2: /* dynamic */ case 2: /* dynamic */
Trace((stderr, "inflate: dynamic codes block%s\n", Tracev((stderr, "inflate: dynamic codes block%s\n",
s->last ? " (last)" : "")); s->last ? " (last)" : ""));
DUMPBITS(3) DUMPBITS(3)
s->mode = TABLE; s->mode = TABLE;
...@@ -224,8 +226,6 @@ int r; ...@@ -224,8 +226,6 @@ int r;
} }
#endif #endif
t = 258 + (t & 0x1f) + ((t >> 5) & 0x1f); t = 258 + (t & 0x1f) + ((t >> 5) & 0x1f);
if (t < 19)
t = 19;
if ((s->sub.trees.blens = (uIntf*)ZALLOC(z, t, sizeof(uInt))) == Z_NULL) if ((s->sub.trees.blens = (uIntf*)ZALLOC(z, t, sizeof(uInt))) == Z_NULL)
{ {
r = Z_MEM_ERROR; r = Z_MEM_ERROR;
...@@ -246,9 +246,10 @@ int r; ...@@ -246,9 +246,10 @@ int r;
s->sub.trees.blens[border[s->sub.trees.index++]] = 0; s->sub.trees.blens[border[s->sub.trees.index++]] = 0;
s->sub.trees.bb = 7; s->sub.trees.bb = 7;
t = inflate_trees_bits(s->sub.trees.blens, &s->sub.trees.bb, t = inflate_trees_bits(s->sub.trees.blens, &s->sub.trees.bb,
&s->sub.trees.tb, z); &s->sub.trees.tb, s->hufts, z);
if (t != Z_OK) if (t != Z_OK)
{ {
ZFREE(z, s->sub.trees.blens);
r = t; r = t;
if (r == Z_DATA_ERROR) if (r == Z_DATA_ERROR)
s->mode = BAD; s->mode = BAD;
...@@ -267,8 +268,8 @@ int r; ...@@ -267,8 +268,8 @@ int r;
t = s->sub.trees.bb; t = s->sub.trees.bb;
NEEDBITS(t) NEEDBITS(t)
h = s->sub.trees.tb + ((uInt)b & inflate_mask[t]); h = s->sub.trees.tb + ((uInt)b & inflate_mask[t]);
t = h->word.what.Bits; t = h->bits;
c = h->more.Base; c = h->base;
if (c < 16) if (c < 16)
{ {
DUMPBITS(t) DUMPBITS(t)
...@@ -287,6 +288,7 @@ int r; ...@@ -287,6 +288,7 @@ int r;
if (i + j > 258 + (t & 0x1f) + ((t >> 5) & 0x1f) || if (i + j > 258 + (t & 0x1f) + ((t >> 5) & 0x1f) ||
(c == 16 && i < 1)) (c == 16 && i < 1))
{ {
ZFREE(z, s->sub.trees.blens);
s->mode = BAD; s->mode = BAD;
z->msg = (char*)"invalid bit length repeat"; z->msg = (char*)"invalid bit length repeat";
r = Z_DATA_ERROR; r = Z_DATA_ERROR;
...@@ -299,7 +301,6 @@ int r; ...@@ -299,7 +301,6 @@ int r;
s->sub.trees.index = i; s->sub.trees.index = i;
} }
} }
inflate_trees_free(s->sub.trees.tb, z);
s->sub.trees.tb = Z_NULL; s->sub.trees.tb = Z_NULL;
{ {
uInt bl, bd; uInt bl, bd;
...@@ -309,11 +310,10 @@ int r; ...@@ -309,11 +310,10 @@ int r;
bl = 9; /* must be <= 9 for lookahead assumptions */ bl = 9; /* must be <= 9 for lookahead assumptions */
bd = 6; /* must be <= 9 for lookahead assumptions */ bd = 6; /* must be <= 9 for lookahead assumptions */
t = s->sub.trees.table; t = s->sub.trees.table;
#ifdef DEBUG
inflate_hufts = 0;
#endif
t = inflate_trees_dynamic(257 + (t & 0x1f), 1 + ((t >> 5) & 0x1f), t = inflate_trees_dynamic(257 + (t & 0x1f), 1 + ((t >> 5) & 0x1f),
s->sub.trees.blens, &bl, &bd, &tl, &td, z); s->sub.trees.blens, &bl, &bd, &tl, &td,
s->hufts, z);
ZFREE(z, s->sub.trees.blens);
if (t != Z_OK) if (t != Z_OK)
{ {
if (t == (uInt)Z_DATA_ERROR) if (t == (uInt)Z_DATA_ERROR)
...@@ -321,19 +321,13 @@ int r; ...@@ -321,19 +321,13 @@ int r;
r = t; r = t;
LEAVE LEAVE
} }
Tracev((stderr, "inflate: trees ok, %d * %d bytes used\n", Tracev((stderr, "inflate: trees ok\n"));
inflate_hufts, sizeof(inflate_huft)));
if ((c = inflate_codes_new(bl, bd, tl, td, z)) == Z_NULL) if ((c = inflate_codes_new(bl, bd, tl, td, z)) == Z_NULL)
{ {
inflate_trees_free(td, z);
inflate_trees_free(tl, z);
r = Z_MEM_ERROR; r = Z_MEM_ERROR;
LEAVE LEAVE
} }
ZFREE(z, s->sub.trees.blens);
s->sub.decode.codes = c; s->sub.decode.codes = c;
s->sub.decode.tl = tl;
s->sub.decode.td = td;
} }
s->mode = CODES; s->mode = CODES;
case CODES: case CODES:
...@@ -342,8 +336,6 @@ int r; ...@@ -342,8 +336,6 @@ int r;
return inflate_flush(s, z, r); return inflate_flush(s, z, r);
r = Z_OK; r = Z_OK;
inflate_codes_free(s->sub.decode.codes, z); inflate_codes_free(s->sub.decode.codes, z);
inflate_trees_free(s->sub.decode.td, z);
inflate_trees_free(s->sub.decode.tl, z);
LOAD LOAD
Tracev((stderr, "inflate: codes end, %lu total out\n", Tracev((stderr, "inflate: codes end, %lu total out\n",
z->total_out + (q >= s->read ? q - s->read : z->total_out + (q >= s->read ? q - s->read :
...@@ -353,13 +345,6 @@ int r; ...@@ -353,13 +345,6 @@ int r;
s->mode = TYPE; s->mode = TYPE;
break; break;
} }
if (k > 7) /* return unused byte, if any */
{
Assert(k < 16, "inflate_codes grabbed too many bytes")
k -= 8;
n++;
p--; /* can always return one */
}
s->mode = DRY; s->mode = DRY;
case DRY: case DRY:
FLUSH FLUSH
...@@ -379,15 +364,15 @@ int r; ...@@ -379,15 +364,15 @@ int r;
} }
int inflate_blocks_free(s, z, c) int inflate_blocks_free(s, z)
inflate_blocks_statef *s; inflate_blocks_statef *s;
z_streamp z; z_streamp z;
uLongf *c;
{ {
inflate_blocks_reset(s, z, c); inflate_blocks_reset(s, z, Z_NULL);
ZFREE(z, s->window); ZFREE(z, s->window);
ZFREE(z, s->hufts);
ZFREE(z, s); ZFREE(z, s);
Trace((stderr, "inflate: blocks freed\n")); Tracev((stderr, "inflate: blocks freed\n"));
return Z_OK; return Z_OK;
} }
...@@ -397,6 +382,17 @@ inflate_blocks_statef *s; ...@@ -397,6 +382,17 @@ inflate_blocks_statef *s;
const Bytef *d; const Bytef *d;
uInt n; uInt n;
{ {
zmemcpy((charf *)s->window, d, n); zmemcpy(s->window, d, n);
s->read = s->write = s->window + n; s->read = s->write = s->window + n;
} }
/* Returns true if inflate is currently at the end of a block generated
* by Z_SYNC_FLUSH or Z_FULL_FLUSH.
* IN assertion: s != Z_NULL
*/
int inflate_blocks_sync_point(s)
inflate_blocks_statef *s;
{
return s->mode == LENS;
}
/* infblock.h -- header to use infblock.c /* infblock.h -- header to use infblock.c
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -28,10 +28,12 @@ extern void inflate_blocks_reset OF(( ...@@ -28,10 +28,12 @@ extern void inflate_blocks_reset OF((
extern int inflate_blocks_free OF(( extern int inflate_blocks_free OF((
inflate_blocks_statef *, inflate_blocks_statef *,
z_streamp , z_streamp));
uLongf *)); /* check value on output */
extern void inflate_set_dictionary OF(( extern void inflate_set_dictionary OF((
inflate_blocks_statef *s, inflate_blocks_statef *s,
const Bytef *d, /* dictionary */ const Bytef *d, /* dictionary */
uInt n)); /* dictionary length */ uInt n)); /* dictionary length */
extern int inflate_blocks_sync_point OF((
inflate_blocks_statef *s));
/* infcodes.c -- process literals and length/distance pairs /* infcodes.c -- process literals and length/distance pairs
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -11,16 +11,10 @@ ...@@ -11,16 +11,10 @@
#include "inffast.h" #include "inffast.h"
/* simplify the use of the inflate_huft type with some defines */ /* simplify the use of the inflate_huft type with some defines */
#define base more.Base
#define next more.Next
#define exop word.what.Exop #define exop word.what.Exop
#define bits word.what.Bits #define bits word.what.Bits
/* inflate codes private state */ typedef enum { /* waiting for "i:"=input, "o:"=output, "x:"=nothing */
struct inflate_codes_state {
/* mode */
enum { /* waiting for "i:"=input, "o:"=output, "x:"=nothing */
START, /* x: set up for LEN */ START, /* x: set up for LEN */
LEN, /* i: get length/literal/eob next */ LEN, /* i: get length/literal/eob next */
LENEXT, /* i: getting length extra (have base) */ LENEXT, /* i: getting length extra (have base) */
...@@ -31,7 +25,13 @@ struct inflate_codes_state { ...@@ -31,7 +25,13 @@ struct inflate_codes_state {
WASH, /* o: got eob, possibly still output waiting */ WASH, /* o: got eob, possibly still output waiting */
END, /* x: got eob and all data flushed */ END, /* x: got eob and all data flushed */
BADCODE} /* x: got error */ BADCODE} /* x: got error */
mode; /* current inflate_codes mode */ inflate_codes_mode;
/* inflate codes private state */
struct inflate_codes_state {
/* mode */
inflate_codes_mode mode; /* current inflate_codes mode */
/* mode dependent information */ /* mode dependent information */
uInt len; uInt len;
...@@ -143,7 +143,7 @@ int r; ...@@ -143,7 +143,7 @@ int r;
if ((e & 64) == 0) /* next table */ if ((e & 64) == 0) /* next table */
{ {
c->sub.code.need = e; c->sub.code.need = e;
c->sub.code.tree = t->next; c->sub.code.tree = t + t->base;
break; break;
} }
if (e & 32) /* end of block */ if (e & 32) /* end of block */
...@@ -181,7 +181,7 @@ int r; ...@@ -181,7 +181,7 @@ int r;
if ((e & 64) == 0) /* next table */ if ((e & 64) == 0) /* next table */
{ {
c->sub.code.need = e; c->sub.code.need = e;
c->sub.code.tree = t->next; c->sub.code.tree = t + t->base;
break; break;
} }
c->mode = BADCODE; /* invalid code */ c->mode = BADCODE; /* invalid code */
...@@ -221,6 +221,13 @@ int r; ...@@ -221,6 +221,13 @@ int r;
c->mode = START; c->mode = START;
break; break;
case WASH: /* o: got eob, possibly more output */ case WASH: /* o: got eob, possibly more output */
if (k > 7) /* return unused byte, if any */
{
Assert(k < 16, "inflate_codes grabbed too many bytes")
k -= 8;
n++;
p--; /* can always return one */
}
FLUSH FLUSH
if (s->read != s->write) if (s->read != s->write)
LEAVE LEAVE
...@@ -235,6 +242,9 @@ int r; ...@@ -235,6 +242,9 @@ int r;
r = Z_STREAM_ERROR; r = Z_STREAM_ERROR;
LEAVE LEAVE
} }
#ifdef NEED_DUMMY_RETURN
return Z_STREAM_ERROR; /* Some dumb compilers complain without this */
#endif
} }
......
/* infcodes.h -- header to use infcodes.c /* infcodes.h -- header to use infcodes.c
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
......
/* inffast.c -- process literals and length/distance pairs fast /* inffast.c -- process literals and length/distance pairs fast
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -13,14 +13,12 @@ ...@@ -13,14 +13,12 @@
struct inflate_codes_state {int dummy;}; /* for buggy compilers */ struct inflate_codes_state {int dummy;}; /* for buggy compilers */
/* simplify the use of the inflate_huft type with some defines */ /* simplify the use of the inflate_huft type with some defines */
#define base more.Base
#define next more.Next
#define exop word.what.Exop #define exop word.what.Exop
#define bits word.what.Bits #define bits word.what.Bits
/* macros for bit input with no checking and for returning unused bytes */ /* macros for bit input with no checking and for returning unused bytes */
#define GRABBITS(j) {while(k<(j)){b|=((uLong)NEXTBYTE)<<k;k+=8;}} #define GRABBITS(j) {while(k<(j)){b|=((uLong)NEXTBYTE)<<k;k+=8;}}
#define UNGRAB {n+=(c=k>>3);p-=c;k&=7;} #define UNGRAB {c=z->avail_in-n;c=(k>>3)<c?k>>3:c;n+=c;p-=c;k-=c<<3;}
/* Called with number of bytes left to write in window at least 258 /* Called with number of bytes left to write in window at least 258
(the maximum string length) and number of input bytes available (the maximum string length) and number of input bytes available
...@@ -120,7 +118,10 @@ z_streamp z; ...@@ -120,7 +118,10 @@ z_streamp z;
break; break;
} }
else if ((e & 64) == 0) else if ((e & 64) == 0)
e = (t = t->next + ((uInt)b & inflate_mask[e]))->exop; {
t += t->base;
e = (t += ((uInt)b & inflate_mask[e]))->exop;
}
else else
{ {
z->msg = (char*)"invalid distance code"; z->msg = (char*)"invalid distance code";
...@@ -133,7 +134,8 @@ z_streamp z; ...@@ -133,7 +134,8 @@ z_streamp z;
} }
if ((e & 64) == 0) if ((e & 64) == 0)
{ {
if ((e = (t = t->next + ((uInt)b & inflate_mask[e]))->exop) == 0) t += t->base;
if ((e = (t += ((uInt)b & inflate_mask[e]))->exop) == 0)
{ {
DUMPBITS(t->bits) DUMPBITS(t->bits)
Tracevv((stderr, t->base >= 0x20 && t->base < 0x7f ? Tracevv((stderr, t->base >= 0x20 && t->base < 0x7f ?
......
/* inffast.h -- header to use inffast.c /* inffast.h -- header to use inffast.c
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
......
/* inffixed.h -- table for decoding fixed codes
* Generated automatically by the maketree.c program
*/
/* WARNING: this file should *not* be used by applications. It is
part of the implementation of the compression library and is
subject to change. Applications should only use zlib.h.
*/
local uInt fixed_bl = 9;
local uInt fixed_bd = 5;
local inflate_huft fixed_tl[] = {
{{{96,7}},256}, {{{0,8}},80}, {{{0,8}},16}, {{{84,8}},115},
{{{82,7}},31}, {{{0,8}},112}, {{{0,8}},48}, {{{0,9}},192},
{{{80,7}},10}, {{{0,8}},96}, {{{0,8}},32}, {{{0,9}},160},
{{{0,8}},0}, {{{0,8}},128}, {{{0,8}},64}, {{{0,9}},224},
{{{80,7}},6}, {{{0,8}},88}, {{{0,8}},24}, {{{0,9}},144},
{{{83,7}},59}, {{{0,8}},120}, {{{0,8}},56}, {{{0,9}},208},
{{{81,7}},17}, {{{0,8}},104}, {{{0,8}},40}, {{{0,9}},176},
{{{0,8}},8}, {{{0,8}},136}, {{{0,8}},72}, {{{0,9}},240},
{{{80,7}},4}, {{{0,8}},84}, {{{0,8}},20}, {{{85,8}},227},
{{{83,7}},43}, {{{0,8}},116}, {{{0,8}},52}, {{{0,9}},200},
{{{81,7}},13}, {{{0,8}},100}, {{{0,8}},36}, {{{0,9}},168},
{{{0,8}},4}, {{{0,8}},132}, {{{0,8}},68}, {{{0,9}},232},
{{{80,7}},8}, {{{0,8}},92}, {{{0,8}},28}, {{{0,9}},152},
{{{84,7}},83}, {{{0,8}},124}, {{{0,8}},60}, {{{0,9}},216},
{{{82,7}},23}, {{{0,8}},108}, {{{0,8}},44}, {{{0,9}},184},
{{{0,8}},12}, {{{0,8}},140}, {{{0,8}},76}, {{{0,9}},248},
{{{80,7}},3}, {{{0,8}},82}, {{{0,8}},18}, {{{85,8}},163},
{{{83,7}},35}, {{{0,8}},114}, {{{0,8}},50}, {{{0,9}},196},
{{{81,7}},11}, {{{0,8}},98}, {{{0,8}},34}, {{{0,9}},164},
{{{0,8}},2}, {{{0,8}},130}, {{{0,8}},66}, {{{0,9}},228},
{{{80,7}},7}, {{{0,8}},90}, {{{0,8}},26}, {{{0,9}},148},
{{{84,7}},67}, {{{0,8}},122}, {{{0,8}},58}, {{{0,9}},212},
{{{82,7}},19}, {{{0,8}},106}, {{{0,8}},42}, {{{0,9}},180},
{{{0,8}},10}, {{{0,8}},138}, {{{0,8}},74}, {{{0,9}},244},
{{{80,7}},5}, {{{0,8}},86}, {{{0,8}},22}, {{{192,8}},0},
{{{83,7}},51}, {{{0,8}},118}, {{{0,8}},54}, {{{0,9}},204},
{{{81,7}},15}, {{{0,8}},102}, {{{0,8}},38}, {{{0,9}},172},
{{{0,8}},6}, {{{0,8}},134}, {{{0,8}},70}, {{{0,9}},236},
{{{80,7}},9}, {{{0,8}},94}, {{{0,8}},30}, {{{0,9}},156},
{{{84,7}},99}, {{{0,8}},126}, {{{0,8}},62}, {{{0,9}},220},
{{{82,7}},27}, {{{0,8}},110}, {{{0,8}},46}, {{{0,9}},188},
{{{0,8}},14}, {{{0,8}},142}, {{{0,8}},78}, {{{0,9}},252},
{{{96,7}},256}, {{{0,8}},81}, {{{0,8}},17}, {{{85,8}},131},
{{{82,7}},31}, {{{0,8}},113}, {{{0,8}},49}, {{{0,9}},194},
{{{80,7}},10}, {{{0,8}},97}, {{{0,8}},33}, {{{0,9}},162},
{{{0,8}},1}, {{{0,8}},129}, {{{0,8}},65}, {{{0,9}},226},
{{{80,7}},6}, {{{0,8}},89}, {{{0,8}},25}, {{{0,9}},146},
{{{83,7}},59}, {{{0,8}},121}, {{{0,8}},57}, {{{0,9}},210},
{{{81,7}},17}, {{{0,8}},105}, {{{0,8}},41}, {{{0,9}},178},
{{{0,8}},9}, {{{0,8}},137}, {{{0,8}},73}, {{{0,9}},242},
{{{80,7}},4}, {{{0,8}},85}, {{{0,8}},21}, {{{80,8}},258},
{{{83,7}},43}, {{{0,8}},117}, {{{0,8}},53}, {{{0,9}},202},
{{{81,7}},13}, {{{0,8}},101}, {{{0,8}},37}, {{{0,9}},170},
{{{0,8}},5}, {{{0,8}},133}, {{{0,8}},69}, {{{0,9}},234},
{{{80,7}},8}, {{{0,8}},93}, {{{0,8}},29}, {{{0,9}},154},
{{{84,7}},83}, {{{0,8}},125}, {{{0,8}},61}, {{{0,9}},218},
{{{82,7}},23}, {{{0,8}},109}, {{{0,8}},45}, {{{0,9}},186},
{{{0,8}},13}, {{{0,8}},141}, {{{0,8}},77}, {{{0,9}},250},
{{{80,7}},3}, {{{0,8}},83}, {{{0,8}},19}, {{{85,8}},195},
{{{83,7}},35}, {{{0,8}},115}, {{{0,8}},51}, {{{0,9}},198},
{{{81,7}},11}, {{{0,8}},99}, {{{0,8}},35}, {{{0,9}},166},
{{{0,8}},3}, {{{0,8}},131}, {{{0,8}},67}, {{{0,9}},230},
{{{80,7}},7}, {{{0,8}},91}, {{{0,8}},27}, {{{0,9}},150},
{{{84,7}},67}, {{{0,8}},123}, {{{0,8}},59}, {{{0,9}},214},
{{{82,7}},19}, {{{0,8}},107}, {{{0,8}},43}, {{{0,9}},182},
{{{0,8}},11}, {{{0,8}},139}, {{{0,8}},75}, {{{0,9}},246},
{{{80,7}},5}, {{{0,8}},87}, {{{0,8}},23}, {{{192,8}},0},
{{{83,7}},51}, {{{0,8}},119}, {{{0,8}},55}, {{{0,9}},206},
{{{81,7}},15}, {{{0,8}},103}, {{{0,8}},39}, {{{0,9}},174},
{{{0,8}},7}, {{{0,8}},135}, {{{0,8}},71}, {{{0,9}},238},
{{{80,7}},9}, {{{0,8}},95}, {{{0,8}},31}, {{{0,9}},158},
{{{84,7}},99}, {{{0,8}},127}, {{{0,8}},63}, {{{0,9}},222},
{{{82,7}},27}, {{{0,8}},111}, {{{0,8}},47}, {{{0,9}},190},
{{{0,8}},15}, {{{0,8}},143}, {{{0,8}},79}, {{{0,9}},254},
{{{96,7}},256}, {{{0,8}},80}, {{{0,8}},16}, {{{84,8}},115},
{{{82,7}},31}, {{{0,8}},112}, {{{0,8}},48}, {{{0,9}},193},
{{{80,7}},10}, {{{0,8}},96}, {{{0,8}},32}, {{{0,9}},161},
{{{0,8}},0}, {{{0,8}},128}, {{{0,8}},64}, {{{0,9}},225},
{{{80,7}},6}, {{{0,8}},88}, {{{0,8}},24}, {{{0,9}},145},
{{{83,7}},59}, {{{0,8}},120}, {{{0,8}},56}, {{{0,9}},209},
{{{81,7}},17}, {{{0,8}},104}, {{{0,8}},40}, {{{0,9}},177},
{{{0,8}},8}, {{{0,8}},136}, {{{0,8}},72}, {{{0,9}},241},
{{{80,7}},4}, {{{0,8}},84}, {{{0,8}},20}, {{{85,8}},227},
{{{83,7}},43}, {{{0,8}},116}, {{{0,8}},52}, {{{0,9}},201},
{{{81,7}},13}, {{{0,8}},100}, {{{0,8}},36}, {{{0,9}},169},
{{{0,8}},4}, {{{0,8}},132}, {{{0,8}},68}, {{{0,9}},233},
{{{80,7}},8}, {{{0,8}},92}, {{{0,8}},28}, {{{0,9}},153},
{{{84,7}},83}, {{{0,8}},124}, {{{0,8}},60}, {{{0,9}},217},
{{{82,7}},23}, {{{0,8}},108}, {{{0,8}},44}, {{{0,9}},185},
{{{0,8}},12}, {{{0,8}},140}, {{{0,8}},76}, {{{0,9}},249},
{{{80,7}},3}, {{{0,8}},82}, {{{0,8}},18}, {{{85,8}},163},
{{{83,7}},35}, {{{0,8}},114}, {{{0,8}},50}, {{{0,9}},197},
{{{81,7}},11}, {{{0,8}},98}, {{{0,8}},34}, {{{0,9}},165},
{{{0,8}},2}, {{{0,8}},130}, {{{0,8}},66}, {{{0,9}},229},
{{{80,7}},7}, {{{0,8}},90}, {{{0,8}},26}, {{{0,9}},149},
{{{84,7}},67}, {{{0,8}},122}, {{{0,8}},58}, {{{0,9}},213},
{{{82,7}},19}, {{{0,8}},106}, {{{0,8}},42}, {{{0,9}},181},
{{{0,8}},10}, {{{0,8}},138}, {{{0,8}},74}, {{{0,9}},245},
{{{80,7}},5}, {{{0,8}},86}, {{{0,8}},22}, {{{192,8}},0},
{{{83,7}},51}, {{{0,8}},118}, {{{0,8}},54}, {{{0,9}},205},
{{{81,7}},15}, {{{0,8}},102}, {{{0,8}},38}, {{{0,9}},173},
{{{0,8}},6}, {{{0,8}},134}, {{{0,8}},70}, {{{0,9}},237},
{{{80,7}},9}, {{{0,8}},94}, {{{0,8}},30}, {{{0,9}},157},
{{{84,7}},99}, {{{0,8}},126}, {{{0,8}},62}, {{{0,9}},221},
{{{82,7}},27}, {{{0,8}},110}, {{{0,8}},46}, {{{0,9}},189},
{{{0,8}},14}, {{{0,8}},142}, {{{0,8}},78}, {{{0,9}},253},
{{{96,7}},256}, {{{0,8}},81}, {{{0,8}},17}, {{{85,8}},131},
{{{82,7}},31}, {{{0,8}},113}, {{{0,8}},49}, {{{0,9}},195},
{{{80,7}},10}, {{{0,8}},97}, {{{0,8}},33}, {{{0,9}},163},
{{{0,8}},1}, {{{0,8}},129}, {{{0,8}},65}, {{{0,9}},227},
{{{80,7}},6}, {{{0,8}},89}, {{{0,8}},25}, {{{0,9}},147},
{{{83,7}},59}, {{{0,8}},121}, {{{0,8}},57}, {{{0,9}},211},
{{{81,7}},17}, {{{0,8}},105}, {{{0,8}},41}, {{{0,9}},179},
{{{0,8}},9}, {{{0,8}},137}, {{{0,8}},73}, {{{0,9}},243},
{{{80,7}},4}, {{{0,8}},85}, {{{0,8}},21}, {{{80,8}},258},
{{{83,7}},43}, {{{0,8}},117}, {{{0,8}},53}, {{{0,9}},203},
{{{81,7}},13}, {{{0,8}},101}, {{{0,8}},37}, {{{0,9}},171},
{{{0,8}},5}, {{{0,8}},133}, {{{0,8}},69}, {{{0,9}},235},
{{{80,7}},8}, {{{0,8}},93}, {{{0,8}},29}, {{{0,9}},155},
{{{84,7}},83}, {{{0,8}},125}, {{{0,8}},61}, {{{0,9}},219},
{{{82,7}},23}, {{{0,8}},109}, {{{0,8}},45}, {{{0,9}},187},
{{{0,8}},13}, {{{0,8}},141}, {{{0,8}},77}, {{{0,9}},251},
{{{80,7}},3}, {{{0,8}},83}, {{{0,8}},19}, {{{85,8}},195},
{{{83,7}},35}, {{{0,8}},115}, {{{0,8}},51}, {{{0,9}},199},
{{{81,7}},11}, {{{0,8}},99}, {{{0,8}},35}, {{{0,9}},167},
{{{0,8}},3}, {{{0,8}},131}, {{{0,8}},67}, {{{0,9}},231},
{{{80,7}},7}, {{{0,8}},91}, {{{0,8}},27}, {{{0,9}},151},
{{{84,7}},67}, {{{0,8}},123}, {{{0,8}},59}, {{{0,9}},215},
{{{82,7}},19}, {{{0,8}},107}, {{{0,8}},43}, {{{0,9}},183},
{{{0,8}},11}, {{{0,8}},139}, {{{0,8}},75}, {{{0,9}},247},
{{{80,7}},5}, {{{0,8}},87}, {{{0,8}},23}, {{{192,8}},0},
{{{83,7}},51}, {{{0,8}},119}, {{{0,8}},55}, {{{0,9}},207},
{{{81,7}},15}, {{{0,8}},103}, {{{0,8}},39}, {{{0,9}},175},
{{{0,8}},7}, {{{0,8}},135}, {{{0,8}},71}, {{{0,9}},239},
{{{80,7}},9}, {{{0,8}},95}, {{{0,8}},31}, {{{0,9}},159},
{{{84,7}},99}, {{{0,8}},127}, {{{0,8}},63}, {{{0,9}},223},
{{{82,7}},27}, {{{0,8}},111}, {{{0,8}},47}, {{{0,9}},191},
{{{0,8}},15}, {{{0,8}},143}, {{{0,8}},79}, {{{0,9}},255}
};
local inflate_huft fixed_td[] = {
{{{80,5}},1}, {{{87,5}},257}, {{{83,5}},17}, {{{91,5}},4097},
{{{81,5}},5}, {{{89,5}},1025}, {{{85,5}},65}, {{{93,5}},16385},
{{{80,5}},3}, {{{88,5}},513}, {{{84,5}},33}, {{{92,5}},8193},
{{{82,5}},9}, {{{90,5}},2049}, {{{86,5}},129}, {{{192,5}},24577},
{{{80,5}},2}, {{{87,5}},385}, {{{83,5}},25}, {{{91,5}},6145},
{{{81,5}},7}, {{{89,5}},1537}, {{{85,5}},97}, {{{93,5}},24577},
{{{80,5}},4}, {{{88,5}},769}, {{{84,5}},49}, {{{92,5}},12289},
{{{82,5}},13}, {{{90,5}},3073}, {{{86,5}},193}, {{{192,5}},24577}
};
/* inflate.c -- zlib interface to inflate modules /* inflate.c -- zlib interface to inflate modules
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -8,11 +8,7 @@ ...@@ -8,11 +8,7 @@
struct inflate_blocks_state {int dummy;}; /* for buggy compilers */ struct inflate_blocks_state {int dummy;}; /* for buggy compilers */
/* inflate private state */ typedef enum {
struct internal_state {
/* mode */
enum {
METHOD, /* waiting for method byte */ METHOD, /* waiting for method byte */
FLAG, /* waiting for flag byte */ FLAG, /* waiting for flag byte */
DICT4, /* four dictionary check bytes to go */ DICT4, /* four dictionary check bytes to go */
...@@ -27,7 +23,13 @@ struct internal_state { ...@@ -27,7 +23,13 @@ struct internal_state {
CHECK1, /* one check byte to go */ CHECK1, /* one check byte to go */
DONE, /* finished check, done */ DONE, /* finished check, done */
BAD} /* got an error--stay here */ BAD} /* got an error--stay here */
mode; /* current inflate mode */ inflate_mode;
/* inflate private state */
struct internal_state {
/* mode */
inflate_mode mode; /* current inflate mode */
/* mode dependent information */ /* mode dependent information */
union { union {
...@@ -48,39 +50,35 @@ struct internal_state { ...@@ -48,39 +50,35 @@ struct internal_state {
}; };
int inflateReset(z) int ZEXPORT inflateReset(z)
z_streamp z; z_streamp z;
{ {
uLong c;
if (z == Z_NULL || z->state == Z_NULL) if (z == Z_NULL || z->state == Z_NULL)
return Z_STREAM_ERROR; return Z_STREAM_ERROR;
z->total_in = z->total_out = 0; z->total_in = z->total_out = 0;
z->msg = Z_NULL; z->msg = Z_NULL;
z->state->mode = z->state->nowrap ? BLOCKS : METHOD; z->state->mode = z->state->nowrap ? BLOCKS : METHOD;
inflate_blocks_reset(z->state->blocks, z, &c); inflate_blocks_reset(z->state->blocks, z, Z_NULL);
Trace((stderr, "inflate: reset\n")); Tracev((stderr, "inflate: reset\n"));
return Z_OK; return Z_OK;
} }
int inflateEnd(z) int ZEXPORT inflateEnd(z)
z_streamp z; z_streamp z;
{ {
uLong c;
if (z == Z_NULL || z->state == Z_NULL || z->zfree == Z_NULL) if (z == Z_NULL || z->state == Z_NULL || z->zfree == Z_NULL)
return Z_STREAM_ERROR; return Z_STREAM_ERROR;
if (z->state->blocks != Z_NULL) if (z->state->blocks != Z_NULL)
inflate_blocks_free(z->state->blocks, z, &c); inflate_blocks_free(z->state->blocks, z);
ZFREE(z, z->state); ZFREE(z, z->state);
z->state = Z_NULL; z->state = Z_NULL;
Trace((stderr, "inflate: end\n")); Tracev((stderr, "inflate: end\n"));
return Z_OK; return Z_OK;
} }
int inflateInit2_(z, w, version, stream_size) int ZEXPORT inflateInit2_(z, w, version, stream_size)
z_streamp z; z_streamp z;
int w; int w;
const char *version; const char *version;
...@@ -129,7 +127,7 @@ int stream_size; ...@@ -129,7 +127,7 @@ int stream_size;
inflateEnd(z); inflateEnd(z);
return Z_MEM_ERROR; return Z_MEM_ERROR;
} }
Trace((stderr, "inflate: allocated\n")); Tracev((stderr, "inflate: allocated\n"));
/* reset state */ /* reset state */
inflateReset(z); inflateReset(z);
...@@ -137,7 +135,7 @@ int stream_size; ...@@ -137,7 +135,7 @@ int stream_size;
} }
int inflateInit_(z, version, stream_size) int ZEXPORT inflateInit_(z, version, stream_size)
z_streamp z; z_streamp z;
const char *version; const char *version;
int stream_size; int stream_size;
...@@ -146,18 +144,19 @@ int stream_size; ...@@ -146,18 +144,19 @@ int stream_size;
} }
#define NEEDBYTE {if(z->avail_in==0)return r;r=Z_OK;} #define NEEDBYTE {if(z->avail_in==0)return r;r=f;}
#define NEXTBYTE (z->avail_in--,z->total_in++,*z->next_in++) #define NEXTBYTE (z->avail_in--,z->total_in++,*z->next_in++)
int inflate(z, f) int ZEXPORT inflate(z, f)
z_streamp z; z_streamp z;
int f; int f;
{ {
int r; int r;
uInt b; uInt b;
if (z == Z_NULL || z->state == Z_NULL || z->next_in == Z_NULL || f < 0) if (z == Z_NULL || z->state == Z_NULL || z->next_in == Z_NULL)
return Z_STREAM_ERROR; return Z_STREAM_ERROR;
f = f == Z_FINISH ? Z_BUF_ERROR : Z_OK;
r = Z_BUF_ERROR; r = Z_BUF_ERROR;
while (1) switch (z->state->mode) while (1) switch (z->state->mode)
{ {
...@@ -188,11 +187,11 @@ int f; ...@@ -188,11 +187,11 @@ int f;
z->state->sub.marker = 5; /* can't try inflateSync */ z->state->sub.marker = 5; /* can't try inflateSync */
break; break;
} }
Trace((stderr, "inflate: zlib header ok\n")); Tracev((stderr, "inflate: zlib header ok\n"));
if (!(b & PRESET_DICT)) if (!(b & PRESET_DICT))
{ {
z->state->mode = BLOCKS; z->state->mode = BLOCKS;
break; break;
} }
z->state->mode = DICT4; z->state->mode = DICT4;
case DICT4: case DICT4:
...@@ -226,9 +225,11 @@ int f; ...@@ -226,9 +225,11 @@ int f;
z->state->sub.marker = 0; /* can try inflateSync */ z->state->sub.marker = 0; /* can try inflateSync */
break; break;
} }
if (r == Z_OK)
r = f;
if (r != Z_STREAM_END) if (r != Z_STREAM_END)
return r; return r;
r = Z_OK; r = f;
inflate_blocks_reset(z->state->blocks, z, &z->state->sub.check.was); inflate_blocks_reset(z->state->blocks, z, &z->state->sub.check.was);
if (z->state->nowrap) if (z->state->nowrap)
{ {
...@@ -259,7 +260,7 @@ int f; ...@@ -259,7 +260,7 @@ int f;
z->state->sub.marker = 5; /* can't try inflateSync */ z->state->sub.marker = 5; /* can't try inflateSync */
break; break;
} }
Trace((stderr, "inflate: zlib check ok\n")); Tracev((stderr, "inflate: zlib check ok\n"));
z->state->mode = DONE; z->state->mode = DONE;
case DONE: case DONE:
return Z_STREAM_END; return Z_STREAM_END;
...@@ -268,10 +269,13 @@ int f; ...@@ -268,10 +269,13 @@ int f;
default: default:
return Z_STREAM_ERROR; return Z_STREAM_ERROR;
} }
#ifdef NEED_DUMMY_RETURN
return Z_STREAM_ERROR; /* Some dumb compilers complain without this */
#endif
} }
int inflateSetDictionary(z, dictionary, dictLength) int ZEXPORT inflateSetDictionary(z, dictionary, dictLength)
z_streamp z; z_streamp z;
const Bytef *dictionary; const Bytef *dictionary;
uInt dictLength; uInt dictLength;
...@@ -295,7 +299,7 @@ uInt dictLength; ...@@ -295,7 +299,7 @@ uInt dictLength;
} }
int inflateSync(z) int ZEXPORT inflateSync(z)
z_streamp z; z_streamp z;
{ {
uInt n; /* number of bytes to look at */ uInt n; /* number of bytes to look at */
...@@ -319,7 +323,8 @@ z_streamp z; ...@@ -319,7 +323,8 @@ z_streamp z;
/* search */ /* search */
while (n && m < 4) while (n && m < 4)
{ {
if (*p == (Byte)(m < 2 ? 0 : 0xff)) static const Byte mark[4] = {0, 0, 0xff, 0xff};
if (*p == mark[m])
m++; m++;
else if (*p) else if (*p)
m = 0; m = 0;
...@@ -343,3 +348,19 @@ z_streamp z; ...@@ -343,3 +348,19 @@ z_streamp z;
z->state->mode = BLOCKS; z->state->mode = BLOCKS;
return Z_OK; return Z_OK;
} }
/* Returns true if inflate is currently at the end of a block generated
* by Z_SYNC_FLUSH or Z_FULL_FLUSH. This function is used by one PPP
* implementation to provide an additional safety check. PPP uses Z_SYNC_FLUSH
* but removes the length bytes of the resulting empty stored block. When
* decompressing, PPP checks that at the end of input packet, inflate is
* waiting for these length bytes.
*/
int ZEXPORT inflateSyncPoint(z)
z_streamp z;
{
if (z == Z_NULL || z->state == Z_NULL || z->state->blocks == Z_NULL)
return Z_STREAM_ERROR;
return inflate_blocks_sync_point(z->state->blocks);
}
/* inftrees.c -- generate Huffman trees for efficient decoding /* inftrees.c -- generate Huffman trees for efficient decoding
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
#include "zutil.h" #include "zutil.h"
#include "inftrees.h" #include "inftrees.h"
char inflate_copyright[] = " inflate 1.0.4 Copyright 1995-1996 Mark Adler "; #if !defined(BUILDFIXED) && !defined(STDC)
# define BUILDFIXED /* non ANSI compilers may not accept inffixed.h */
#endif
const char inflate_copyright[] =
" inflate 1.1.3 Copyright 1995-1998 Mark Adler ";
/* /*
If you use the zlib library in a product, an acknowledgment is welcome If you use the zlib library in a product, an acknowledgment is welcome
in the documentation of your product. If for some reason you cannot in the documentation of your product. If for some reason you cannot
...@@ -16,8 +21,6 @@ char inflate_copyright[] = " inflate 1.0.4 Copyright 1995-1996 Mark Adler "; ...@@ -16,8 +21,6 @@ char inflate_copyright[] = " inflate 1.0.4 Copyright 1995-1996 Mark Adler ";
struct internal_state {int dummy;}; /* for buggy compilers */ struct internal_state {int dummy;}; /* for buggy compilers */
/* simplify the use of the inflate_huft type with some defines */ /* simplify the use of the inflate_huft type with some defines */
#define base more.Base
#define next more.Next
#define exop word.what.Exop #define exop word.what.Exop
#define bits word.what.Bits #define bits word.what.Bits
...@@ -26,30 +29,27 @@ local int huft_build OF(( ...@@ -26,30 +29,27 @@ local int huft_build OF((
uIntf *, /* code lengths in bits */ uIntf *, /* code lengths in bits */
uInt, /* number of codes */ uInt, /* number of codes */
uInt, /* number of "simple" codes */ uInt, /* number of "simple" codes */
uIntf *, /* list of base values for non-simple codes */ const uIntf *, /* list of base values for non-simple codes */
uIntf *, /* list of extra bits for non-simple codes */ const uIntf *, /* list of extra bits for non-simple codes */
inflate_huft * FAR*,/* result: starting table */ inflate_huft * FAR*,/* result: starting table */
uIntf *, /* maximum lookup bits (returns actual) */ uIntf *, /* maximum lookup bits (returns actual) */
z_streamp )); /* for zalloc function */ inflate_huft *, /* space for trees */
uInt *, /* hufts used in space */
local voidpf falloc OF(( uIntf * )); /* space for values */
voidpf, /* opaque pointer (not used) */
uInt, /* number of items */
uInt)); /* size of item */
/* Tables for deflate from PKZIP's appnote.txt. */ /* Tables for deflate from PKZIP's appnote.txt. */
local uInt cplens[31] = { /* Copy lengths for literal codes 257..285 */ local const uInt cplens[31] = { /* Copy lengths for literal codes 257..285 */
3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 15, 17, 19, 23, 27, 31, 3, 4, 5, 6, 7, 8, 9, 10, 11, 13, 15, 17, 19, 23, 27, 31,
35, 43, 51, 59, 67, 83, 99, 115, 131, 163, 195, 227, 258, 0, 0}; 35, 43, 51, 59, 67, 83, 99, 115, 131, 163, 195, 227, 258, 0, 0};
/* actually lengths - 2; also see note #13 above about 258 */ /* see note #13 above about 258 */
local uInt cplext[31] = { /* Extra bits for literal codes 257..285 */ local const uInt cplext[31] = { /* Extra bits for literal codes 257..285 */
0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 2, 2, 2, 2, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 2, 2, 2, 2,
3, 3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 5, 0, 192, 192}; /* 192==invalid */ 3, 3, 3, 3, 4, 4, 4, 4, 5, 5, 5, 5, 0, 112, 112}; /* 112==invalid */
local uInt cpdist[30] = { /* Copy offsets for distance codes 0..29 */ local const uInt cpdist[30] = { /* Copy offsets for distance codes 0..29 */
1, 2, 3, 4, 5, 7, 9, 13, 17, 25, 33, 49, 65, 97, 129, 193, 1, 2, 3, 4, 5, 7, 9, 13, 17, 25, 33, 49, 65, 97, 129, 193,
257, 385, 513, 769, 1025, 1537, 2049, 3073, 4097, 6145, 257, 385, 513, 769, 1025, 1537, 2049, 3073, 4097, 6145,
8193, 12289, 16385, 24577}; 8193, 12289, 16385, 24577};
local uInt cpdext[30] = { /* Extra bits for distance codes */ local const uInt cpdext[30] = { /* Extra bits for distance codes */
0, 0, 0, 0, 1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 6, 6, 0, 0, 0, 0, 1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 6, 6,
7, 7, 8, 8, 9, 9, 10, 10, 11, 11, 7, 7, 8, 8, 9, 9, 10, 10, 11, 11,
12, 12, 13, 13}; 12, 12, 13, 13};
...@@ -89,26 +89,23 @@ local uInt cpdext[30] = { /* Extra bits for distance codes */ ...@@ -89,26 +89,23 @@ local uInt cpdext[30] = { /* Extra bits for distance codes */
/* If BMAX needs to be larger than 16, then h and x[] should be uLong. */ /* If BMAX needs to be larger than 16, then h and x[] should be uLong. */
#define BMAX 15 /* maximum bit length of any code */ #define BMAX 15 /* maximum bit length of any code */
#define N_MAX 288 /* maximum number of codes in any set */
#ifdef DEBUG
uInt inflate_hufts;
#endif
local int huft_build(b, n, s, d, e, t, m, zs) local int huft_build(b, n, s, d, e, t, m, hp, hn, v)
uIntf *b; /* code lengths in bits (all assumed <= BMAX) */ uIntf *b; /* code lengths in bits (all assumed <= BMAX) */
uInt n; /* number of codes (assumed <= N_MAX) */ uInt n; /* number of codes (assumed <= 288) */
uInt s; /* number of simple-valued codes (0..s-1) */ uInt s; /* number of simple-valued codes (0..s-1) */
uIntf *d; /* list of base values for non-simple codes */ const uIntf *d; /* list of base values for non-simple codes */
uIntf *e; /* list of extra bits for non-simple codes */ const uIntf *e; /* list of extra bits for non-simple codes */
inflate_huft * FAR *t; /* result: starting table */ inflate_huft * FAR *t; /* result: starting table */
uIntf *m; /* maximum lookup bits, returns actual */ uIntf *m; /* maximum lookup bits, returns actual */
z_streamp zs; /* for zalloc function */ inflate_huft *hp; /* space for trees */
uInt *hn; /* hufts used in space */
uIntf *v; /* working area: values in order of bit length */
/* Given a list of code lengths and a maximum table size, make a set of /* Given a list of code lengths and a maximum table size, make a set of
tables to decode that set of codes. Return Z_OK on success, Z_BUF_ERROR tables to decode that set of codes. Return Z_OK on success, Z_BUF_ERROR
if the given code set is incomplete (the tables are still built in this if the given code set is incomplete (the tables are still built in this
case), Z_DATA_ERROR if the input is invalid (all zero length codes or an case), Z_DATA_ERROR if the input is invalid (an over-subscribed set of
over-subscribed set of lengths), or Z_MEM_ERROR if not enough memory. */ lengths), or Z_MEM_ERROR if not enough memory. */
{ {
uInt a; /* counter for codes of length k */ uInt a; /* counter for codes of length k */
...@@ -120,11 +117,11 @@ z_streamp zs; /* for zalloc function */ ...@@ -120,11 +117,11 @@ z_streamp zs; /* for zalloc function */
register uInt j; /* counter */ register uInt j; /* counter */
register int k; /* number of bits in current code */ register int k; /* number of bits in current code */
int l; /* bits per table (returned in m) */ int l; /* bits per table (returned in m) */
uInt mask; /* (1 << w) - 1, to avoid cc -O bug on HP */
register uIntf *p; /* pointer into c[], b[], or v[] */ register uIntf *p; /* pointer into c[], b[], or v[] */
inflate_huft *q; /* points to current table */ inflate_huft *q; /* points to current table */
struct inflate_huft_s r; /* table entry for structure assignment */ struct inflate_huft_s r; /* table entry for structure assignment */
inflate_huft *u[BMAX]; /* table stack */ inflate_huft *u[BMAX]; /* table stack */
uInt v[N_MAX]; /* values in order of bit length */
register int w; /* bits before this table == (l * h) */ register int w; /* bits before this table == (l * h) */
uInt x[BMAX+1]; /* bit offsets, then code stack */ uInt x[BMAX+1]; /* bit offsets, then code stack */
uIntf *xp; /* pointer into x */ uIntf *xp; /* pointer into x */
...@@ -190,6 +187,7 @@ z_streamp zs; /* for zalloc function */ ...@@ -190,6 +187,7 @@ z_streamp zs; /* for zalloc function */
if ((j = *p++) != 0) if ((j = *p++) != 0)
v[x[j]++] = i; v[x[j]++] = i;
} while (++i < n); } while (++i < n);
n = x[g]; /* set n to length of v */
/* Generate the Huffman codes and for each, make the table entries */ /* Generate the Huffman codes and for each, make the table entries */
...@@ -231,20 +229,11 @@ z_streamp zs; /* for zalloc function */ ...@@ -231,20 +229,11 @@ z_streamp zs; /* for zalloc function */
} }
z = 1 << j; /* table entries for j-bit table */ z = 1 << j; /* table entries for j-bit table */
/* allocate and link in new table */ /* allocate new table */
if ((q = (inflate_huft *)ZALLOC if (*hn + z > MANY) /* (note: doesn't matter for fixed) */
(zs,z + 1,sizeof(inflate_huft))) == Z_NULL)
{
if (h)
inflate_trees_free(u[0], zs);
return Z_MEM_ERROR; /* not enough memory */ return Z_MEM_ERROR; /* not enough memory */
} u[h] = q = hp + *hn;
#ifdef DEBUG *hn += z;
inflate_hufts += z + 1;
#endif
*t = q + 1; /* link to list for huft_free() */
*(t = &(q->next)) = Z_NULL;
u[h] = ++q; /* table starts after link */
/* connect to last table, if there is one */ /* connect to last table, if there is one */
if (h) if (h)
...@@ -252,10 +241,12 @@ z_streamp zs; /* for zalloc function */ ...@@ -252,10 +241,12 @@ z_streamp zs; /* for zalloc function */
x[h] = i; /* save pattern for backing up */ x[h] = i; /* save pattern for backing up */
r.bits = (Byte)l; /* bits to dump before this table */ r.bits = (Byte)l; /* bits to dump before this table */
r.exop = (Byte)j; /* bits in this table */ r.exop = (Byte)j; /* bits in this table */
r.next = q; /* pointer to this table */ j = i >> (w - l);
j = i >> (w - l); /* (get around Turbo C bug) */ r.base = (uInt)(q - u[h-1] - j); /* offset to this table */
u[h-1][j] = r; /* connect to last table */ u[h-1][j] = r; /* connect to last table */
} }
else
*t = q; /* first table is returned result */
} }
/* set up table entry in r */ /* set up table entry in r */
...@@ -284,10 +275,12 @@ z_streamp zs; /* for zalloc function */ ...@@ -284,10 +275,12 @@ z_streamp zs; /* for zalloc function */
i ^= j; i ^= j;
/* backup over finished tables */ /* backup over finished tables */
while ((i & ((1 << w) - 1)) != x[h]) mask = (1 << w) - 1; /* needed on HP, cc -O bug */
while ((i & mask) != x[h])
{ {
h--; /* don't need to update q */ h--; /* don't need to update q */
w -= l; w -= l;
mask = (1 << w) - 1;
} }
} }
} }
...@@ -298,28 +291,34 @@ z_streamp zs; /* for zalloc function */ ...@@ -298,28 +291,34 @@ z_streamp zs; /* for zalloc function */
} }
int inflate_trees_bits(c, bb, tb, z) int inflate_trees_bits(c, bb, tb, hp, z)
uIntf *c; /* 19 code lengths */ uIntf *c; /* 19 code lengths */
uIntf *bb; /* bits tree desired/actual depth */ uIntf *bb; /* bits tree desired/actual depth */
inflate_huft * FAR *tb; /* bits tree result */ inflate_huft * FAR *tb; /* bits tree result */
z_streamp z; /* for zfree function */ inflate_huft *hp; /* space for trees */
z_streamp z; /* for messages */
{ {
int r; int r;
uInt hn = 0; /* hufts used in space */
uIntf *v; /* work area for huft_build */
r = huft_build(c, 19, 19, (uIntf*)Z_NULL, (uIntf*)Z_NULL, tb, bb, z); if ((v = (uIntf*)ZALLOC(z, 19, sizeof(uInt))) == Z_NULL)
return Z_MEM_ERROR;
r = huft_build(c, 19, 19, (uIntf*)Z_NULL, (uIntf*)Z_NULL,
tb, bb, hp, &hn, v);
if (r == Z_DATA_ERROR) if (r == Z_DATA_ERROR)
z->msg = (char*)"oversubscribed dynamic bit lengths tree"; z->msg = (char*)"oversubscribed dynamic bit lengths tree";
else if (r == Z_BUF_ERROR) else if (r == Z_BUF_ERROR || *bb == 0)
{ {
inflate_trees_free(*tb, z);
z->msg = (char*)"incomplete dynamic bit lengths tree"; z->msg = (char*)"incomplete dynamic bit lengths tree";
r = Z_DATA_ERROR; r = Z_DATA_ERROR;
} }
ZFREE(z, v);
return r; return r;
} }
int inflate_trees_dynamic(nl, nd, c, bl, bd, tl, td, z) int inflate_trees_dynamic(nl, nd, c, bl, bd, tl, td, hp, z)
uInt nl; /* number of literal/length codes */ uInt nl; /* number of literal/length codes */
uInt nd; /* number of distance codes */ uInt nd; /* number of distance codes */
uIntf *c; /* that many (total) code lengths */ uIntf *c; /* that many (total) code lengths */
...@@ -327,88 +326,100 @@ uIntf *bl; /* literal desired/actual bit depth */ ...@@ -327,88 +326,100 @@ uIntf *bl; /* literal desired/actual bit depth */
uIntf *bd; /* distance desired/actual bit depth */ uIntf *bd; /* distance desired/actual bit depth */
inflate_huft * FAR *tl; /* literal/length tree result */ inflate_huft * FAR *tl; /* literal/length tree result */
inflate_huft * FAR *td; /* distance tree result */ inflate_huft * FAR *td; /* distance tree result */
z_streamp z; /* for zfree function */ inflate_huft *hp; /* space for trees */
z_streamp z; /* for messages */
{ {
int r; int r;
uInt hn = 0; /* hufts used in space */
uIntf *v; /* work area for huft_build */
/* allocate work area */
if ((v = (uIntf*)ZALLOC(z, 288, sizeof(uInt))) == Z_NULL)
return Z_MEM_ERROR;
/* build literal/length tree */ /* build literal/length tree */
if ((r = huft_build(c, nl, 257, cplens, cplext, tl, bl, z)) != Z_OK) r = huft_build(c, nl, 257, cplens, cplext, tl, bl, hp, &hn, v);
if (r != Z_OK || *bl == 0)
{ {
if (r == Z_DATA_ERROR) if (r == Z_DATA_ERROR)
z->msg = (char*)"oversubscribed literal/length tree"; z->msg = (char*)"oversubscribed literal/length tree";
else if (r == Z_BUF_ERROR) else if (r != Z_MEM_ERROR)
{ {
inflate_trees_free(*tl, z);
z->msg = (char*)"incomplete literal/length tree"; z->msg = (char*)"incomplete literal/length tree";
r = Z_DATA_ERROR; r = Z_DATA_ERROR;
} }
ZFREE(z, v);
return r; return r;
} }
/* build distance tree */ /* build distance tree */
if ((r = huft_build(c + nl, nd, 0, cpdist, cpdext, td, bd, z)) != Z_OK) r = huft_build(c + nl, nd, 0, cpdist, cpdext, td, bd, hp, &hn, v);
if (r != Z_OK || (*bd == 0 && nl > 257))
{ {
if (r == Z_DATA_ERROR) if (r == Z_DATA_ERROR)
z->msg = (char*)"oversubscribed literal/length tree"; z->msg = (char*)"oversubscribed distance tree";
else if (r == Z_BUF_ERROR) { else if (r == Z_BUF_ERROR) {
#ifdef PKZIP_BUG_WORKAROUND #ifdef PKZIP_BUG_WORKAROUND
r = Z_OK; r = Z_OK;
} }
#else #else
inflate_trees_free(*td, z); z->msg = (char*)"incomplete distance tree";
z->msg = (char*)"incomplete literal/length tree"; r = Z_DATA_ERROR;
}
else if (r != Z_MEM_ERROR)
{
z->msg = (char*)"empty distance tree with lengths";
r = Z_DATA_ERROR; r = Z_DATA_ERROR;
} }
inflate_trees_free(*tl, z); ZFREE(z, v);
return r; return r;
#endif #endif
} }
/* done */ /* done */
ZFREE(z, v);
return Z_OK; return Z_OK;
} }
/* build fixed tables only once--keep them here */ /* build fixed tables only once--keep them here */
#ifdef BUILDFIXED
local int fixed_built = 0; local int fixed_built = 0;
#define FIXEDH 530 /* number of hufts used by fixed tables */ #define FIXEDH 544 /* number of hufts used by fixed tables */
local inflate_huft fixed_mem[FIXEDH]; local inflate_huft fixed_mem[FIXEDH];
local uInt fixed_bl; local uInt fixed_bl;
local uInt fixed_bd; local uInt fixed_bd;
local inflate_huft *fixed_tl; local inflate_huft *fixed_tl;
local inflate_huft *fixed_td; local inflate_huft *fixed_td;
#else
#include "inffixed.h"
#endif
local voidpf falloc(q, n, s) int inflate_trees_fixed(bl, bd, tl, td, z)
voidpf q; /* opaque pointer */
uInt n; /* number of items */
uInt s; /* size of item */
{
Assert(s == sizeof(inflate_huft) && n <= *(intf *)q,
"inflate_trees falloc overflow");
*(intf *)q -= n+s-s; /* s-s to avoid warning */
return (voidpf)(fixed_mem + *(intf *)q);
}
int inflate_trees_fixed(bl, bd, tl, td)
uIntf *bl; /* literal desired/actual bit depth */ uIntf *bl; /* literal desired/actual bit depth */
uIntf *bd; /* distance desired/actual bit depth */ uIntf *bd; /* distance desired/actual bit depth */
inflate_huft * FAR *tl; /* literal/length tree result */ inflate_huft * FAR *tl; /* literal/length tree result */
inflate_huft * FAR *td; /* distance tree result */ inflate_huft * FAR *td; /* distance tree result */
z_streamp z; /* for memory allocation */
{ {
/* build fixed tables if not already (multiple overlapped executions ok) */ #ifdef BUILDFIXED
/* build fixed tables if not already */
if (!fixed_built) if (!fixed_built)
{ {
int k; /* temporary variable */ int k; /* temporary variable */
unsigned c[288]; /* length list for huft_build */ uInt f = 0; /* number of hufts used in fixed_mem */
z_stream z; /* for falloc function */ uIntf *c; /* length list for huft_build */
int f = FIXEDH; /* number of hufts left in fixed_mem */ uIntf *v; /* work area for huft_build */
/* set up fake z_stream for memory routines */ /* allocate memory */
z.zalloc = falloc; if ((c = (uIntf*)ZALLOC(z, 288, sizeof(uInt))) == Z_NULL)
z.zfree = Z_NULL; return Z_MEM_ERROR;
z.opaque = (voidpf)&f; if ((v = (uIntf*)ZALLOC(z, 288, sizeof(uInt))) == Z_NULL)
{
ZFREE(z, c);
return Z_MEM_ERROR;
}
/* literal table */ /* literal table */
for (k = 0; k < 144; k++) for (k = 0; k < 144; k++)
...@@ -419,52 +430,26 @@ inflate_huft * FAR *td; /* distance tree result */ ...@@ -419,52 +430,26 @@ inflate_huft * FAR *td; /* distance tree result */
c[k] = 7; c[k] = 7;
for (; k < 288; k++) for (; k < 288; k++)
c[k] = 8; c[k] = 8;
fixed_bl = 7; fixed_bl = 9;
huft_build(c, 288, 257, cplens, cplext, &fixed_tl, &fixed_bl, &z); huft_build(c, 288, 257, cplens, cplext, &fixed_tl, &fixed_bl,
fixed_mem, &f, v);
/* distance table */ /* distance table */
for (k = 0; k < 30; k++) for (k = 0; k < 30; k++)
c[k] = 5; c[k] = 5;
fixed_bd = 5; fixed_bd = 5;
huft_build(c, 30, 0, cpdist, cpdext, &fixed_td, &fixed_bd, &z); huft_build(c, 30, 0, cpdist, cpdext, &fixed_td, &fixed_bd,
fixed_mem, &f, v);
/* done */ /* done */
Assert(f == 0, "invalid build of fixed tables"); ZFREE(z, v);
ZFREE(z, c);
fixed_built = 1; fixed_built = 1;
} }
#endif
*bl = fixed_bl; *bl = fixed_bl;
*bd = fixed_bd; *bd = fixed_bd;
*tl = fixed_tl; *tl = fixed_tl;
*td = fixed_td; *td = fixed_td;
return Z_OK; return Z_OK;
} }
int inflate_trees_free(t, z)
inflate_huft *t; /* table to free */
z_streamp z; /* for zfree function */
/* Free the malloc'ed tables built by huft_build(), which makes a linked
list of the tables it made, with the links in a dummy first entry of
each table. */
{
register inflate_huft *p, *q, *r;
/* Reverse linked list */
p = Z_NULL;
q = t;
while (q != Z_NULL)
{
r = (q - 1)->next;
(q - 1)->next = p;
p = q;
q = r;
}
/* Go through linked list, freeing from the malloced (t[-1]) address. */
while (p != Z_NULL)
{
q = (--p)->next;
ZFREE(z,p);
p = q;
}
return Z_OK;
}
/* inftrees.h -- header to use inftrees.c /* inftrees.h -- header to use inftrees.c
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -19,23 +19,25 @@ struct inflate_huft_s { ...@@ -19,23 +19,25 @@ struct inflate_huft_s {
Byte Exop; /* number of extra bits or operation */ Byte Exop; /* number of extra bits or operation */
Byte Bits; /* number of bits in this code or subcode */ Byte Bits; /* number of bits in this code or subcode */
} what; } what;
Bytef *pad; /* pad structure to a power of 2 (4 bytes for */ uInt pad; /* pad structure to a power of 2 (4 bytes for */
} word; /* 16-bit, 8 bytes for 32-bit machines) */ } word; /* 16-bit, 8 bytes for 32-bit int's) */
union { uInt base; /* literal, length base, distance base,
uInt Base; /* literal, length base, or distance base */ or table offset */
inflate_huft *Next; /* pointer to next level of table */
} more;
}; };
#ifdef DEBUG /* Maximum size of dynamic tree. The maximum found in a long but non-
extern uInt inflate_hufts; exhaustive search was 1004 huft structures (850 for length/literals
#endif and 154 for distances, the latter actually the result of an
exhaustive search). The actual maximum is not known, but the
value below is more than safe. */
#define MANY 1440
extern int inflate_trees_bits OF(( extern int inflate_trees_bits OF((
uIntf *, /* 19 code lengths */ uIntf *, /* 19 code lengths */
uIntf *, /* bits tree desired/actual depth */ uIntf *, /* bits tree desired/actual depth */
inflate_huft * FAR *, /* bits tree result */ inflate_huft * FAR *, /* bits tree result */
z_streamp )); /* for zalloc, zfree functions */ inflate_huft *, /* space for trees */
z_streamp)); /* for messages */
extern int inflate_trees_dynamic OF(( extern int inflate_trees_dynamic OF((
uInt, /* number of literal/length codes */ uInt, /* number of literal/length codes */
...@@ -45,15 +47,12 @@ extern int inflate_trees_dynamic OF(( ...@@ -45,15 +47,12 @@ extern int inflate_trees_dynamic OF((
uIntf *, /* distance desired/actual bit depth */ uIntf *, /* distance desired/actual bit depth */
inflate_huft * FAR *, /* literal/length tree result */ inflate_huft * FAR *, /* literal/length tree result */
inflate_huft * FAR *, /* distance tree result */ inflate_huft * FAR *, /* distance tree result */
z_streamp )); /* for zalloc, zfree functions */ inflate_huft *, /* space for trees */
z_streamp)); /* for messages */
extern int inflate_trees_fixed OF(( extern int inflate_trees_fixed OF((
uIntf *, /* literal desired/actual bit depth */ uIntf *, /* literal desired/actual bit depth */
uIntf *, /* distance desired/actual bit depth */ uIntf *, /* distance desired/actual bit depth */
inflate_huft * FAR *, /* literal/length tree result */ inflate_huft * FAR *, /* literal/length tree result */
inflate_huft * FAR *)); /* distance tree result */ inflate_huft * FAR *, /* distance tree result */
z_streamp)); /* for memory allocation */
extern int inflate_trees_free OF((
inflate_huft *, /* tables to free */
z_streamp )); /* for zfree function */
/* inflate_util.c -- data and routines common to blocks and codes /* inflate_util.c -- data and routines common to blocks and codes
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
......
/* infutil.h -- types and macros common to blocks and codes /* infutil.h -- types and macros common to blocks and codes
* Copyright (C) 1995-1996 Mark Adler * Copyright (C) 1995-1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -41,8 +41,6 @@ struct inflate_blocks_state { ...@@ -41,8 +41,6 @@ struct inflate_blocks_state {
inflate_huft *tb; /* bit length decoding tree */ inflate_huft *tb; /* bit length decoding tree */
} trees; /* if DTREE, decoding info for trees */ } trees; /* if DTREE, decoding info for trees */
struct { struct {
inflate_huft *tl;
inflate_huft *td; /* trees to free */
inflate_codes_statef inflate_codes_statef
*codes; *codes;
} decode; /* if CODES, current state */ } decode; /* if CODES, current state */
...@@ -52,6 +50,7 @@ struct inflate_blocks_state { ...@@ -52,6 +50,7 @@ struct inflate_blocks_state {
/* mode independent information */ /* mode independent information */
uInt bitk; /* bits in bit buffer */ uInt bitk; /* bits in bit buffer */
uLong bitb; /* bit buffer */ uLong bitb; /* bit buffer */
inflate_huft *hufts; /* single malloc for tree space */
Bytef *window; /* sliding window */ Bytef *window; /* sliding window */
Bytef *end; /* one byte after sliding window */ Bytef *end; /* one byte after sliding window */
Bytef *read; /* window read pointer */ Bytef *read; /* window read pointer */
......
/* maketree.c -- make inffixed.h table for decoding fixed codes
* Copyright (C) 1998 Mark Adler
* For conditions of distribution and use, see copyright notice in zlib.h
*/
/* WARNING: this file should *not* be used by applications. It is
part of the implementation of the compression library and is
subject to change. Applications should only use zlib.h.
*/
/* This program is included in the distribution for completeness.
You do not need to compile or run this program since inffixed.h
is already included in the distribution. To use this program
you need to compile zlib with BUILDFIXED defined and then compile
and link this program with the zlib library. Then the output of
this program can be piped to inffixed.h. */
#include <stdio.h>
#include <stdlib.h>
#include "zutil.h"
#include "inftrees.h"
/* simplify the use of the inflate_huft type with some defines */
#define exop word.what.Exop
#define bits word.what.Bits
/* generate initialization table for an inflate_huft structure array */
void maketree(uInt b, inflate_huft *t)
{
int i, e;
i = 0;
while (1)
{
e = t[i].exop;
if (e && (e & (16+64)) == 0) /* table pointer */
{
fprintf(stderr, "maketree: cannot initialize sub-tables!\n");
exit(1);
}
if (i % 4 == 0)
printf("\n ");
printf(" {{{%u,%u}},%u}", t[i].exop, t[i].bits, t[i].base);
if (++i == (1<<b))
break;
putchar(',');
}
puts("");
}
/* create the fixed tables in C initialization syntax */
void main(void)
{
int r;
uInt bl, bd;
inflate_huft *tl, *td;
z_stream z;
z.zalloc = zcalloc;
z.opaque = (voidpf)0;
z.zfree = zcfree;
r = inflate_trees_fixed(&bl, &bd, &tl, &td, &z);
if (r)
{
fprintf(stderr, "inflate_trees_fixed error %d\n", r);
return;
}
puts("/* inffixed.h -- table for decoding fixed codes");
puts(" * Generated automatically by the maketree.c program");
puts(" */");
puts("");
puts("/* WARNING: this file should *not* be used by applications. It is");
puts(" part of the implementation of the compression library and is");
puts(" subject to change. Applications should only use zlib.h.");
puts(" */");
puts("");
printf("local uInt fixed_bl = %d;\n", bl);
printf("local uInt fixed_bd = %d;\n", bd);
printf("local inflate_huft fixed_tl[] = {");
maketree(bl, tl);
puts(" };");
printf("local inflate_huft fixed_td[] = {");
maketree(bd, td);
puts(" };");
}
/* trees.c -- output deflated data using Huffman coding /* trees.c -- output deflated data using Huffman coding
* Copyright (C) 1995-1996 Jean-loup Gailly * Copyright (C) 1995-1998 Jean-loup Gailly
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -29,7 +29,9 @@ ...@@ -29,7 +29,9 @@
* Addison-Wesley, 1983. ISBN 0-201-06672-6. * Addison-Wesley, 1983. ISBN 0-201-06672-6.
*/ */
/* $Id: trees.c,v 1.1 1997/07/17 17:45:34 jim Exp $ */ /* @(#) $Id: trees.c,v 1.2 2001/06/04 19:41:16 shane Exp $ */
/* #define GEN_TREES_H */
#include "deflate.h" #include "deflate.h"
...@@ -56,16 +58,16 @@ ...@@ -56,16 +58,16 @@
#define REPZ_11_138 18 #define REPZ_11_138 18
/* repeat a zero length 11-138 times (7 bits of repeat count) */ /* repeat a zero length 11-138 times (7 bits of repeat count) */
local int extra_lbits[LENGTH_CODES] /* extra bits for each length code */ local const int extra_lbits[LENGTH_CODES] /* extra bits for each length code */
= {0,0,0,0,0,0,0,0,1,1,1,1,2,2,2,2,3,3,3,3,4,4,4,4,5,5,5,5,0}; = {0,0,0,0,0,0,0,0,1,1,1,1,2,2,2,2,3,3,3,3,4,4,4,4,5,5,5,5,0};
local int extra_dbits[D_CODES] /* extra bits for each distance code */ local const int extra_dbits[D_CODES] /* extra bits for each distance code */
= {0,0,0,0,1,1,2,2,3,3,4,4,5,5,6,6,7,7,8,8,9,9,10,10,11,11,12,12,13,13}; = {0,0,0,0,1,1,2,2,3,3,4,4,5,5,6,6,7,7,8,8,9,9,10,10,11,11,12,12,13,13};
local int extra_blbits[BL_CODES]/* extra bits for each bit length code */ local const int extra_blbits[BL_CODES]/* extra bits for each bit length code */
= {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2,3,7}; = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2,3,7};
local uch bl_order[BL_CODES] local const uch bl_order[BL_CODES]
= {16,17,18,0,8,7,9,6,10,5,11,4,12,3,13,2,14,1,15}; = {16,17,18,0,8,7,9,6,10,5,11,4,12,3,13,2,14,1,15};
/* The lengths of the bit length codes are sent in order of decreasing /* The lengths of the bit length codes are sent in order of decreasing
* probability, to avoid transmitting the lengths for unused bit length codes. * probability, to avoid transmitting the lengths for unused bit length codes.
...@@ -80,6 +82,11 @@ local uch bl_order[BL_CODES] ...@@ -80,6 +82,11 @@ local uch bl_order[BL_CODES]
* Local data. These are initialized only once. * Local data. These are initialized only once.
*/ */
#define DIST_CODE_LEN 512 /* see definition of array dist_code below */
#if defined(GEN_TREES_H) || !defined(STDC)
/* non ANSI compilers may not accept trees.h */
local ct_data static_ltree[L_CODES+2]; local ct_data static_ltree[L_CODES+2];
/* The static literal tree. Since the bit lengths are imposed, there is no /* The static literal tree. Since the bit lengths are imposed, there is no
* need for the L_CODES extra codes used during heap construction. However * need for the L_CODES extra codes used during heap construction. However
...@@ -92,13 +99,13 @@ local ct_data static_dtree[D_CODES]; ...@@ -92,13 +99,13 @@ local ct_data static_dtree[D_CODES];
* 5 bits.) * 5 bits.)
*/ */
local uch dist_code[512]; uch _dist_code[DIST_CODE_LEN];
/* distance codes. The first 256 values correspond to the distances /* Distance codes. The first 256 values correspond to the distances
* 3 .. 258, the last 256 values correspond to the top 8 bits of * 3 .. 258, the last 256 values correspond to the top 8 bits of
* the 15 bit distances. * the 15 bit distances.
*/ */
local uch length_code[MAX_MATCH-MIN_MATCH+1]; uch _length_code[MAX_MATCH-MIN_MATCH+1];
/* length code for each normalized match length (0 == MIN_MATCH) */ /* length code for each normalized match length (0 == MIN_MATCH) */
local int base_length[LENGTH_CODES]; local int base_length[LENGTH_CODES];
...@@ -107,9 +114,13 @@ local int base_length[LENGTH_CODES]; ...@@ -107,9 +114,13 @@ local int base_length[LENGTH_CODES];
local int base_dist[D_CODES]; local int base_dist[D_CODES];
/* First normalized distance for each code (0 = distance of 1) */ /* First normalized distance for each code (0 = distance of 1) */
#else
# include "trees.h"
#endif /* GEN_TREES_H */
struct static_tree_desc_s { struct static_tree_desc_s {
ct_data *static_tree; /* static tree or NULL */ const ct_data *static_tree; /* static tree or NULL */
intf *extra_bits; /* extra bits for each code or NULL */ const intf *extra_bits; /* extra bits for each code or NULL */
int extra_base; /* base index for extra_bits */ int extra_base; /* base index for extra_bits */
int elems; /* max number of elements in the tree */ int elems; /* max number of elements in the tree */
int max_length; /* max bit length for the codes */ int max_length; /* max bit length for the codes */
...@@ -122,7 +133,7 @@ local static_tree_desc static_d_desc = ...@@ -122,7 +133,7 @@ local static_tree_desc static_d_desc =
{static_dtree, extra_dbits, 0, D_CODES, MAX_BITS}; {static_dtree, extra_dbits, 0, D_CODES, MAX_BITS};
local static_tree_desc static_bl_desc = local static_tree_desc static_bl_desc =
{(ct_data *)0, extra_blbits, 0, BL_CODES, MAX_BL_BITS}; {(const ct_data *)0, extra_blbits, 0, BL_CODES, MAX_BL_BITS};
/* =========================================================================== /* ===========================================================================
* Local (static) routines in this file. * Local (static) routines in this file.
...@@ -148,23 +159,20 @@ local void bi_flush OF((deflate_state *s)); ...@@ -148,23 +159,20 @@ local void bi_flush OF((deflate_state *s));
local void copy_block OF((deflate_state *s, charf *buf, unsigned len, local void copy_block OF((deflate_state *s, charf *buf, unsigned len,
int header)); int header));
#ifdef GEN_TREES_H
local void gen_trees_header OF((void));
#endif
#ifndef DEBUG #ifndef DEBUG
# define send_code(s, c, tree) send_bits(s, tree[c].Code, tree[c].Len) # define send_code(s, c, tree) send_bits(s, tree[c].Code, tree[c].Len)
/* Send a code of the given tree. c and tree must not have side effects */ /* Send a code of the given tree. c and tree must not have side effects */
#else /* DEBUG */ #else /* DEBUG */
# define send_code(s, c, tree) \ # define send_code(s, c, tree) \
{ if (verbose>2) fprintf(stderr,"\ncd %3d ",(c)); \ { if (z_verbose>2) fprintf(stderr,"\ncd %3d ",(c)); \
send_bits(s, tree[c].Code, tree[c].Len); } send_bits(s, tree[c].Code, tree[c].Len); }
#endif #endif
#define d_code(dist) \
((dist) < 256 ? dist_code[dist] : dist_code[256+((dist)>>7)])
/* Mapping from a distance to a distance code. dist is the distance - 1 and
* must not have side effects. dist_code[256] and dist_code[257] are never
* used.
*/
/* =========================================================================== /* ===========================================================================
* Output a short LSB first on the stream. * Output a short LSB first on the stream.
* IN assertion: there is enough room in pendingBuf. * IN assertion: there is enough room in pendingBuf.
...@@ -226,12 +234,11 @@ local void send_bits(s, value, length) ...@@ -226,12 +234,11 @@ local void send_bits(s, value, length)
/* the arguments must not have side effects */ /* the arguments must not have side effects */
/* =========================================================================== /* ===========================================================================
* Initialize the various 'constant' tables. In a multi-threaded environment, * Initialize the various 'constant' tables.
* this function may be called by two threads concurrently, but this is
* harmless since both invocations do exactly the same thing.
*/ */
local void tr_static_init() local void tr_static_init()
{ {
#if defined(GEN_TREES_H) || !defined(STDC)
static int static_init_done = 0; static int static_init_done = 0;
int n; /* iterates over tree elements */ int n; /* iterates over tree elements */
int bits; /* bit counter */ int bits; /* bit counter */
...@@ -243,12 +250,19 @@ local void tr_static_init() ...@@ -243,12 +250,19 @@ local void tr_static_init()
if (static_init_done) return; if (static_init_done) return;
/* For some embedded targets, global variables are not initialized: */
static_l_desc.static_tree = static_ltree;
static_l_desc.extra_bits = extra_lbits;
static_d_desc.static_tree = static_dtree;
static_d_desc.extra_bits = extra_dbits;
static_bl_desc.extra_bits = extra_blbits;
/* Initialize the mapping length (0..255) -> length code (0..28) */ /* Initialize the mapping length (0..255) -> length code (0..28) */
length = 0; length = 0;
for (code = 0; code < LENGTH_CODES-1; code++) { for (code = 0; code < LENGTH_CODES-1; code++) {
base_length[code] = length; base_length[code] = length;
for (n = 0; n < (1<<extra_lbits[code]); n++) { for (n = 0; n < (1<<extra_lbits[code]); n++) {
length_code[length++] = (uch)code; _length_code[length++] = (uch)code;
} }
} }
Assert (length == 256, "tr_static_init: length != 256"); Assert (length == 256, "tr_static_init: length != 256");
...@@ -256,14 +270,14 @@ local void tr_static_init() ...@@ -256,14 +270,14 @@ local void tr_static_init()
* in two different ways: code 284 + 5 bits or code 285, so we * in two different ways: code 284 + 5 bits or code 285, so we
* overwrite length_code[255] to use the best encoding: * overwrite length_code[255] to use the best encoding:
*/ */
length_code[length-1] = (uch)code; _length_code[length-1] = (uch)code;
/* Initialize the mapping dist (0..32K) -> dist code (0..29) */ /* Initialize the mapping dist (0..32K) -> dist code (0..29) */
dist = 0; dist = 0;
for (code = 0 ; code < 16; code++) { for (code = 0 ; code < 16; code++) {
base_dist[code] = dist; base_dist[code] = dist;
for (n = 0; n < (1<<extra_dbits[code]); n++) { for (n = 0; n < (1<<extra_dbits[code]); n++) {
dist_code[dist++] = (uch)code; _dist_code[dist++] = (uch)code;
} }
} }
Assert (dist == 256, "tr_static_init: dist != 256"); Assert (dist == 256, "tr_static_init: dist != 256");
...@@ -271,7 +285,7 @@ local void tr_static_init() ...@@ -271,7 +285,7 @@ local void tr_static_init()
for ( ; code < D_CODES; code++) { for ( ; code < D_CODES; code++) {
base_dist[code] = dist << 7; base_dist[code] = dist << 7;
for (n = 0; n < (1<<(extra_dbits[code]-7)); n++) { for (n = 0; n < (1<<(extra_dbits[code]-7)); n++) {
dist_code[256 + dist++] = (uch)code; _dist_code[256 + dist++] = (uch)code;
} }
} }
Assert (dist == 256, "tr_static_init: 256+dist != 512"); Assert (dist == 256, "tr_static_init: 256+dist != 512");
...@@ -295,8 +309,74 @@ local void tr_static_init() ...@@ -295,8 +309,74 @@ local void tr_static_init()
static_dtree[n].Code = bi_reverse((unsigned)n, 5); static_dtree[n].Code = bi_reverse((unsigned)n, 5);
} }
static_init_done = 1; static_init_done = 1;
# ifdef GEN_TREES_H
gen_trees_header();
# endif
#endif /* defined(GEN_TREES_H) || !defined(STDC) */
} }
/* ===========================================================================
* Genererate the file trees.h describing the static trees.
*/
#ifdef GEN_TREES_H
# ifndef DEBUG
# include <stdio.h>
# endif
# define SEPARATOR(i, last, width) \
((i) == (last)? "\n};\n\n" : \
((i) % (width) == (width)-1 ? ",\n" : ", "))
void gen_trees_header()
{
FILE *header = fopen("trees.h", "w");
int i;
Assert (header != NULL, "Can't open trees.h");
fprintf(header,
"/* header created automatically with -DGEN_TREES_H */\n\n");
fprintf(header, "local const ct_data static_ltree[L_CODES+2] = {\n");
for (i = 0; i < L_CODES+2; i++) {
fprintf(header, "{{%3u},{%3u}}%s", static_ltree[i].Code,
static_ltree[i].Len, SEPARATOR(i, L_CODES+1, 5));
}
fprintf(header, "local const ct_data static_dtree[D_CODES] = {\n");
for (i = 0; i < D_CODES; i++) {
fprintf(header, "{{%2u},{%2u}}%s", static_dtree[i].Code,
static_dtree[i].Len, SEPARATOR(i, D_CODES-1, 5));
}
fprintf(header, "const uch _dist_code[DIST_CODE_LEN] = {\n");
for (i = 0; i < DIST_CODE_LEN; i++) {
fprintf(header, "%2u%s", _dist_code[i],
SEPARATOR(i, DIST_CODE_LEN-1, 20));
}
fprintf(header, "const uch _length_code[MAX_MATCH-MIN_MATCH+1]= {\n");
for (i = 0; i < MAX_MATCH-MIN_MATCH+1; i++) {
fprintf(header, "%2u%s", _length_code[i],
SEPARATOR(i, MAX_MATCH-MIN_MATCH, 20));
}
fprintf(header, "local const int base_length[LENGTH_CODES] = {\n");
for (i = 0; i < LENGTH_CODES; i++) {
fprintf(header, "%1u%s", base_length[i],
SEPARATOR(i, LENGTH_CODES-1, 20));
}
fprintf(header, "local const int base_dist[D_CODES] = {\n");
for (i = 0; i < D_CODES; i++) {
fprintf(header, "%5u%s", base_dist[i],
SEPARATOR(i, D_CODES-1, 10));
}
fclose(header);
}
#endif /* GEN_TREES_H */
/* =========================================================================== /* ===========================================================================
* Initialize the tree data structures for a new zlib stream. * Initialize the tree data structures for a new zlib stream.
*/ */
...@@ -305,8 +385,6 @@ void _tr_init(s) ...@@ -305,8 +385,6 @@ void _tr_init(s)
{ {
tr_static_init(); tr_static_init();
s->compressed_len = 0L;
s->l_desc.dyn_tree = s->dyn_ltree; s->l_desc.dyn_tree = s->dyn_ltree;
s->l_desc.stat_desc = &static_l_desc; s->l_desc.stat_desc = &static_l_desc;
...@@ -320,6 +398,7 @@ void _tr_init(s) ...@@ -320,6 +398,7 @@ void _tr_init(s)
s->bi_valid = 0; s->bi_valid = 0;
s->last_eob_len = 8; /* enough lookahead for inflate */ s->last_eob_len = 8; /* enough lookahead for inflate */
#ifdef DEBUG #ifdef DEBUG
s->compressed_len = 0L;
s->bits_sent = 0L; s->bits_sent = 0L;
#endif #endif
...@@ -413,12 +492,12 @@ local void gen_bitlen(s, desc) ...@@ -413,12 +492,12 @@ local void gen_bitlen(s, desc)
deflate_state *s; deflate_state *s;
tree_desc *desc; /* the tree descriptor */ tree_desc *desc; /* the tree descriptor */
{ {
ct_data *tree = desc->dyn_tree; ct_data *tree = desc->dyn_tree;
int max_code = desc->max_code; int max_code = desc->max_code;
ct_data *stree = desc->stat_desc->static_tree; const ct_data *stree = desc->stat_desc->static_tree;
intf *extra = desc->stat_desc->extra_bits; const intf *extra = desc->stat_desc->extra_bits;
int base = desc->stat_desc->extra_base; int base = desc->stat_desc->extra_base;
int max_length = desc->stat_desc->max_length; int max_length = desc->stat_desc->max_length;
int h; /* heap index */ int h; /* heap index */
int n, m; /* iterate over the tree elements */ int n, m; /* iterate over the tree elements */
int bits; /* bit length */ int bits; /* bit length */
...@@ -542,9 +621,9 @@ local void build_tree(s, desc) ...@@ -542,9 +621,9 @@ local void build_tree(s, desc)
deflate_state *s; deflate_state *s;
tree_desc *desc; /* the tree descriptor */ tree_desc *desc; /* the tree descriptor */
{ {
ct_data *tree = desc->dyn_tree; ct_data *tree = desc->dyn_tree;
ct_data *stree = desc->stat_desc->static_tree; const ct_data *stree = desc->stat_desc->static_tree;
int elems = desc->stat_desc->elems; int elems = desc->stat_desc->elems;
int n, m; /* iterate over heap elements */ int n, m; /* iterate over heap elements */
int max_code = -1; /* largest code with non zero frequency */ int max_code = -1; /* largest code with non zero frequency */
int node; /* new node being created */ int node; /* new node being created */
...@@ -792,9 +871,10 @@ void _tr_stored_block(s, buf, stored_len, eof) ...@@ -792,9 +871,10 @@ void _tr_stored_block(s, buf, stored_len, eof)
int eof; /* true if this is the last block for a file */ int eof; /* true if this is the last block for a file */
{ {
send_bits(s, (STORED_BLOCK<<1)+eof, 3); /* send block type */ send_bits(s, (STORED_BLOCK<<1)+eof, 3); /* send block type */
#ifdef DEBUG
s->compressed_len = (s->compressed_len + 3 + 7) & (ulg)~7L; s->compressed_len = (s->compressed_len + 3 + 7) & (ulg)~7L;
s->compressed_len += (stored_len + 4) << 3; s->compressed_len += (stored_len + 4) << 3;
#endif
copy_block(s, buf, (unsigned)stored_len, 1); /* with header */ copy_block(s, buf, (unsigned)stored_len, 1); /* with header */
} }
...@@ -814,7 +894,9 @@ void _tr_align(s) ...@@ -814,7 +894,9 @@ void _tr_align(s)
{ {
send_bits(s, STATIC_TREES<<1, 3); send_bits(s, STATIC_TREES<<1, 3);
send_code(s, END_BLOCK, static_ltree); send_code(s, END_BLOCK, static_ltree);
#ifdef DEBUG
s->compressed_len += 10L; /* 3 for block type, 7 for EOB */ s->compressed_len += 10L; /* 3 for block type, 7 for EOB */
#endif
bi_flush(s); bi_flush(s);
/* Of the 10 bits for the empty block, we have already sent /* Of the 10 bits for the empty block, we have already sent
* (10 - bi_valid) bits. The lookahead for the last real code (before * (10 - bi_valid) bits. The lookahead for the last real code (before
...@@ -824,7 +906,9 @@ void _tr_align(s) ...@@ -824,7 +906,9 @@ void _tr_align(s)
if (1 + s->last_eob_len + 10 - s->bi_valid < 9) { if (1 + s->last_eob_len + 10 - s->bi_valid < 9) {
send_bits(s, STATIC_TREES<<1, 3); send_bits(s, STATIC_TREES<<1, 3);
send_code(s, END_BLOCK, static_ltree); send_code(s, END_BLOCK, static_ltree);
#ifdef DEBUG
s->compressed_len += 10L; s->compressed_len += 10L;
#endif
bi_flush(s); bi_flush(s);
} }
s->last_eob_len = 7; s->last_eob_len = 7;
...@@ -832,10 +916,9 @@ void _tr_align(s) ...@@ -832,10 +916,9 @@ void _tr_align(s)
/* =========================================================================== /* ===========================================================================
* Determine the best encoding for the current block: dynamic trees, static * Determine the best encoding for the current block: dynamic trees, static
* trees or store, and output the encoded block to the zip file. This function * trees or store, and output the encoded block to the zip file.
* returns the total compressed length for the file so far.
*/ */
ulg _tr_flush_block(s, buf, stored_len, eof) void _tr_flush_block(s, buf, stored_len, eof)
deflate_state *s; deflate_state *s;
charf *buf; /* input block, or NULL if too old */ charf *buf; /* input block, or NULL if too old */
ulg stored_len; /* length of input block */ ulg stored_len; /* length of input block */
...@@ -882,25 +965,6 @@ ulg _tr_flush_block(s, buf, stored_len, eof) ...@@ -882,25 +965,6 @@ ulg _tr_flush_block(s, buf, stored_len, eof)
opt_lenb = static_lenb = stored_len + 5; /* force a stored block */ opt_lenb = static_lenb = stored_len + 5; /* force a stored block */
} }
/* If compression failed and this is the first and last block,
* and if the .zip file can be seeked (to rewrite the local header),
* the whole file is transformed into a stored file:
*/
#ifdef STORED_FILE_OK
# ifdef FORCE_STORED_FILE
if (eof && s->compressed_len == 0L) { /* force stored file */
# else
if (stored_len <= opt_lenb && eof && s->compressed_len==0L && seekable()) {
# endif
/* Since LIT_BUFSIZE <= 2*WSIZE, the input data must be there: */
if (buf == (charf*)0) error ("block vanished");
copy_block(buf, (unsigned)stored_len, 0); /* without header */
s->compressed_len = stored_len << 3;
s->method = STORED;
} else
#endif /* STORED_FILE_OK */
#ifdef FORCE_STORED #ifdef FORCE_STORED
if (buf != (char*)0) { /* force stored block */ if (buf != (char*)0) { /* force stored block */
#else #else
...@@ -922,25 +986,32 @@ ulg _tr_flush_block(s, buf, stored_len, eof) ...@@ -922,25 +986,32 @@ ulg _tr_flush_block(s, buf, stored_len, eof)
#endif #endif
send_bits(s, (STATIC_TREES<<1)+eof, 3); send_bits(s, (STATIC_TREES<<1)+eof, 3);
compress_block(s, (ct_data *)static_ltree, (ct_data *)static_dtree); compress_block(s, (ct_data *)static_ltree, (ct_data *)static_dtree);
#ifdef DEBUG
s->compressed_len += 3 + s->static_len; s->compressed_len += 3 + s->static_len;
#endif
} else { } else {
send_bits(s, (DYN_TREES<<1)+eof, 3); send_bits(s, (DYN_TREES<<1)+eof, 3);
send_all_trees(s, s->l_desc.max_code+1, s->d_desc.max_code+1, send_all_trees(s, s->l_desc.max_code+1, s->d_desc.max_code+1,
max_blindex+1); max_blindex+1);
compress_block(s, (ct_data *)s->dyn_ltree, (ct_data *)s->dyn_dtree); compress_block(s, (ct_data *)s->dyn_ltree, (ct_data *)s->dyn_dtree);
#ifdef DEBUG
s->compressed_len += 3 + s->opt_len; s->compressed_len += 3 + s->opt_len;
#endif
} }
Assert (s->compressed_len == s->bits_sent, "bad compressed size"); Assert (s->compressed_len == s->bits_sent, "bad compressed size");
/* The above check is made mod 2^32, for files larger than 512 MB
* and uLong implemented on 32 bits.
*/
init_block(s); init_block(s);
if (eof) { if (eof) {
bi_windup(s); bi_windup(s);
#ifdef DEBUG
s->compressed_len += 7; /* align on byte boundary */ s->compressed_len += 7; /* align on byte boundary */
#endif
} }
Tracev((stderr,"\ncomprlen %lu(%lu) ", s->compressed_len>>3, Tracev((stderr,"\ncomprlen %lu(%lu) ", s->compressed_len>>3,
s->compressed_len-7*eof)); s->compressed_len-7*eof));
return s->compressed_len >> 3;
} }
/* =========================================================================== /* ===========================================================================
...@@ -965,12 +1036,13 @@ int _tr_tally (s, dist, lc) ...@@ -965,12 +1036,13 @@ int _tr_tally (s, dist, lc)
(ush)lc <= (ush)(MAX_MATCH-MIN_MATCH) && (ush)lc <= (ush)(MAX_MATCH-MIN_MATCH) &&
(ush)d_code(dist) < (ush)D_CODES, "_tr_tally: bad match"); (ush)d_code(dist) < (ush)D_CODES, "_tr_tally: bad match");
s->dyn_ltree[length_code[lc]+LITERALS+1].Freq++; s->dyn_ltree[_length_code[lc]+LITERALS+1].Freq++;
s->dyn_dtree[d_code(dist)].Freq++; s->dyn_dtree[d_code(dist)].Freq++;
} }
#ifdef TRUNCATE_BLOCK
/* Try to guess if it is profitable to stop the current block here */ /* Try to guess if it is profitable to stop the current block here */
if (s->level > 2 && (s->last_lit & 0xfff) == 0) { if ((s->last_lit & 0x1fff) == 0 && s->level > 2) {
/* Compute an upper bound for the compressed length */ /* Compute an upper bound for the compressed length */
ulg out_length = (ulg)s->last_lit*8L; ulg out_length = (ulg)s->last_lit*8L;
ulg in_length = (ulg)((long)s->strstart - s->block_start); ulg in_length = (ulg)((long)s->strstart - s->block_start);
...@@ -985,6 +1057,7 @@ int _tr_tally (s, dist, lc) ...@@ -985,6 +1057,7 @@ int _tr_tally (s, dist, lc)
100L - out_length*100L/in_length)); 100L - out_length*100L/in_length));
if (s->matches < s->last_lit/2 && out_length < in_length/2) return 1; if (s->matches < s->last_lit/2 && out_length < in_length/2) return 1;
} }
#endif
return (s->last_lit == s->lit_bufsize-1); return (s->last_lit == s->lit_bufsize-1);
/* We avoid equality with lit_bufsize because of wraparound at 64K /* We avoid equality with lit_bufsize because of wraparound at 64K
* on 16 bit machines and because stored blocks are restricted to * on 16 bit machines and because stored blocks are restricted to
...@@ -1014,7 +1087,7 @@ local void compress_block(s, ltree, dtree) ...@@ -1014,7 +1087,7 @@ local void compress_block(s, ltree, dtree)
Tracecv(isgraph(lc), (stderr," '%c' ", lc)); Tracecv(isgraph(lc), (stderr," '%c' ", lc));
} else { } else {
/* Here, lc is the match length - MIN_MATCH */ /* Here, lc is the match length - MIN_MATCH */
code = length_code[lc]; code = _length_code[lc];
send_code(s, code+LITERALS+1, ltree); /* send the length code */ send_code(s, code+LITERALS+1, ltree); /* send the length code */
extra = extra_lbits[code]; extra = extra_lbits[code];
if (extra != 0) { if (extra != 0) {
......
/* header created automatically with -DGEN_TREES_H */
local const ct_data static_ltree[L_CODES+2] = {
{{ 12},{ 8}}, {{140},{ 8}}, {{ 76},{ 8}}, {{204},{ 8}}, {{ 44},{ 8}},
{{172},{ 8}}, {{108},{ 8}}, {{236},{ 8}}, {{ 28},{ 8}}, {{156},{ 8}},
{{ 92},{ 8}}, {{220},{ 8}}, {{ 60},{ 8}}, {{188},{ 8}}, {{124},{ 8}},
{{252},{ 8}}, {{ 2},{ 8}}, {{130},{ 8}}, {{ 66},{ 8}}, {{194},{ 8}},
{{ 34},{ 8}}, {{162},{ 8}}, {{ 98},{ 8}}, {{226},{ 8}}, {{ 18},{ 8}},
{{146},{ 8}}, {{ 82},{ 8}}, {{210},{ 8}}, {{ 50},{ 8}}, {{178},{ 8}},
{{114},{ 8}}, {{242},{ 8}}, {{ 10},{ 8}}, {{138},{ 8}}, {{ 74},{ 8}},
{{202},{ 8}}, {{ 42},{ 8}}, {{170},{ 8}}, {{106},{ 8}}, {{234},{ 8}},
{{ 26},{ 8}}, {{154},{ 8}}, {{ 90},{ 8}}, {{218},{ 8}}, {{ 58},{ 8}},
{{186},{ 8}}, {{122},{ 8}}, {{250},{ 8}}, {{ 6},{ 8}}, {{134},{ 8}},
{{ 70},{ 8}}, {{198},{ 8}}, {{ 38},{ 8}}, {{166},{ 8}}, {{102},{ 8}},
{{230},{ 8}}, {{ 22},{ 8}}, {{150},{ 8}}, {{ 86},{ 8}}, {{214},{ 8}},
{{ 54},{ 8}}, {{182},{ 8}}, {{118},{ 8}}, {{246},{ 8}}, {{ 14},{ 8}},
{{142},{ 8}}, {{ 78},{ 8}}, {{206},{ 8}}, {{ 46},{ 8}}, {{174},{ 8}},
{{110},{ 8}}, {{238},{ 8}}, {{ 30},{ 8}}, {{158},{ 8}}, {{ 94},{ 8}},
{{222},{ 8}}, {{ 62},{ 8}}, {{190},{ 8}}, {{126},{ 8}}, {{254},{ 8}},
{{ 1},{ 8}}, {{129},{ 8}}, {{ 65},{ 8}}, {{193},{ 8}}, {{ 33},{ 8}},
{{161},{ 8}}, {{ 97},{ 8}}, {{225},{ 8}}, {{ 17},{ 8}}, {{145},{ 8}},
{{ 81},{ 8}}, {{209},{ 8}}, {{ 49},{ 8}}, {{177},{ 8}}, {{113},{ 8}},
{{241},{ 8}}, {{ 9},{ 8}}, {{137},{ 8}}, {{ 73},{ 8}}, {{201},{ 8}},
{{ 41},{ 8}}, {{169},{ 8}}, {{105},{ 8}}, {{233},{ 8}}, {{ 25},{ 8}},
{{153},{ 8}}, {{ 89},{ 8}}, {{217},{ 8}}, {{ 57},{ 8}}, {{185},{ 8}},
{{121},{ 8}}, {{249},{ 8}}, {{ 5},{ 8}}, {{133},{ 8}}, {{ 69},{ 8}},
{{197},{ 8}}, {{ 37},{ 8}}, {{165},{ 8}}, {{101},{ 8}}, {{229},{ 8}},
{{ 21},{ 8}}, {{149},{ 8}}, {{ 85},{ 8}}, {{213},{ 8}}, {{ 53},{ 8}},
{{181},{ 8}}, {{117},{ 8}}, {{245},{ 8}}, {{ 13},{ 8}}, {{141},{ 8}},
{{ 77},{ 8}}, {{205},{ 8}}, {{ 45},{ 8}}, {{173},{ 8}}, {{109},{ 8}},
{{237},{ 8}}, {{ 29},{ 8}}, {{157},{ 8}}, {{ 93},{ 8}}, {{221},{ 8}},
{{ 61},{ 8}}, {{189},{ 8}}, {{125},{ 8}}, {{253},{ 8}}, {{ 19},{ 9}},
{{275},{ 9}}, {{147},{ 9}}, {{403},{ 9}}, {{ 83},{ 9}}, {{339},{ 9}},
{{211},{ 9}}, {{467},{ 9}}, {{ 51},{ 9}}, {{307},{ 9}}, {{179},{ 9}},
{{435},{ 9}}, {{115},{ 9}}, {{371},{ 9}}, {{243},{ 9}}, {{499},{ 9}},
{{ 11},{ 9}}, {{267},{ 9}}, {{139},{ 9}}, {{395},{ 9}}, {{ 75},{ 9}},
{{331},{ 9}}, {{203},{ 9}}, {{459},{ 9}}, {{ 43},{ 9}}, {{299},{ 9}},
{{171},{ 9}}, {{427},{ 9}}, {{107},{ 9}}, {{363},{ 9}}, {{235},{ 9}},
{{491},{ 9}}, {{ 27},{ 9}}, {{283},{ 9}}, {{155},{ 9}}, {{411},{ 9}},
{{ 91},{ 9}}, {{347},{ 9}}, {{219},{ 9}}, {{475},{ 9}}, {{ 59},{ 9}},
{{315},{ 9}}, {{187},{ 9}}, {{443},{ 9}}, {{123},{ 9}}, {{379},{ 9}},
{{251},{ 9}}, {{507},{ 9}}, {{ 7},{ 9}}, {{263},{ 9}}, {{135},{ 9}},
{{391},{ 9}}, {{ 71},{ 9}}, {{327},{ 9}}, {{199},{ 9}}, {{455},{ 9}},
{{ 39},{ 9}}, {{295},{ 9}}, {{167},{ 9}}, {{423},{ 9}}, {{103},{ 9}},
{{359},{ 9}}, {{231},{ 9}}, {{487},{ 9}}, {{ 23},{ 9}}, {{279},{ 9}},
{{151},{ 9}}, {{407},{ 9}}, {{ 87},{ 9}}, {{343},{ 9}}, {{215},{ 9}},
{{471},{ 9}}, {{ 55},{ 9}}, {{311},{ 9}}, {{183},{ 9}}, {{439},{ 9}},
{{119},{ 9}}, {{375},{ 9}}, {{247},{ 9}}, {{503},{ 9}}, {{ 15},{ 9}},
{{271},{ 9}}, {{143},{ 9}}, {{399},{ 9}}, {{ 79},{ 9}}, {{335},{ 9}},
{{207},{ 9}}, {{463},{ 9}}, {{ 47},{ 9}}, {{303},{ 9}}, {{175},{ 9}},
{{431},{ 9}}, {{111},{ 9}}, {{367},{ 9}}, {{239},{ 9}}, {{495},{ 9}},
{{ 31},{ 9}}, {{287},{ 9}}, {{159},{ 9}}, {{415},{ 9}}, {{ 95},{ 9}},
{{351},{ 9}}, {{223},{ 9}}, {{479},{ 9}}, {{ 63},{ 9}}, {{319},{ 9}},
{{191},{ 9}}, {{447},{ 9}}, {{127},{ 9}}, {{383},{ 9}}, {{255},{ 9}},
{{511},{ 9}}, {{ 0},{ 7}}, {{ 64},{ 7}}, {{ 32},{ 7}}, {{ 96},{ 7}},
{{ 16},{ 7}}, {{ 80},{ 7}}, {{ 48},{ 7}}, {{112},{ 7}}, {{ 8},{ 7}},
{{ 72},{ 7}}, {{ 40},{ 7}}, {{104},{ 7}}, {{ 24},{ 7}}, {{ 88},{ 7}},
{{ 56},{ 7}}, {{120},{ 7}}, {{ 4},{ 7}}, {{ 68},{ 7}}, {{ 36},{ 7}},
{{100},{ 7}}, {{ 20},{ 7}}, {{ 84},{ 7}}, {{ 52},{ 7}}, {{116},{ 7}},
{{ 3},{ 8}}, {{131},{ 8}}, {{ 67},{ 8}}, {{195},{ 8}}, {{ 35},{ 8}},
{{163},{ 8}}, {{ 99},{ 8}}, {{227},{ 8}}
};
local const ct_data static_dtree[D_CODES] = {
{{ 0},{ 5}}, {{16},{ 5}}, {{ 8},{ 5}}, {{24},{ 5}}, {{ 4},{ 5}},
{{20},{ 5}}, {{12},{ 5}}, {{28},{ 5}}, {{ 2},{ 5}}, {{18},{ 5}},
{{10},{ 5}}, {{26},{ 5}}, {{ 6},{ 5}}, {{22},{ 5}}, {{14},{ 5}},
{{30},{ 5}}, {{ 1},{ 5}}, {{17},{ 5}}, {{ 9},{ 5}}, {{25},{ 5}},
{{ 5},{ 5}}, {{21},{ 5}}, {{13},{ 5}}, {{29},{ 5}}, {{ 3},{ 5}},
{{19},{ 5}}, {{11},{ 5}}, {{27},{ 5}}, {{ 7},{ 5}}, {{23},{ 5}}
};
const uch _dist_code[DIST_CODE_LEN] = {
0, 1, 2, 3, 4, 4, 5, 5, 6, 6, 6, 6, 7, 7, 7, 7, 8, 8, 8, 8,
8, 8, 8, 8, 9, 9, 9, 9, 9, 9, 9, 9, 10, 10, 10, 10, 10, 10, 10, 10,
10, 10, 10, 10, 10, 10, 10, 10, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11, 11,
11, 11, 11, 11, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12,
12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 12, 13, 13, 13, 13,
13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13,
13, 13, 13, 13, 13, 13, 13, 13, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14,
14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14,
14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14,
14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 14, 15, 15, 15, 15, 15, 15, 15, 15,
15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15,
15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15,
15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 15, 0, 0, 16, 17,
18, 18, 19, 19, 20, 20, 20, 20, 21, 21, 21, 21, 22, 22, 22, 22, 22, 22, 22, 22,
23, 23, 23, 23, 23, 23, 23, 23, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24,
24, 24, 24, 24, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25,
26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26,
26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 27, 27, 27, 27, 27, 27, 27, 27,
27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27,
27, 27, 27, 27, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28,
28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28,
28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28,
28, 28, 28, 28, 28, 28, 28, 28, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29,
29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29,
29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29,
29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29
};
const uch _length_code[MAX_MATCH-MIN_MATCH+1]= {
0, 1, 2, 3, 4, 5, 6, 7, 8, 8, 9, 9, 10, 10, 11, 11, 12, 12, 12, 12,
13, 13, 13, 13, 14, 14, 14, 14, 15, 15, 15, 15, 16, 16, 16, 16, 16, 16, 16, 16,
17, 17, 17, 17, 17, 17, 17, 17, 18, 18, 18, 18, 18, 18, 18, 18, 19, 19, 19, 19,
19, 19, 19, 19, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20, 20,
21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 21, 22, 22, 22, 22,
22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 22, 23, 23, 23, 23, 23, 23, 23, 23,
23, 23, 23, 23, 23, 23, 23, 23, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24,
24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24, 24,
25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25,
25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 25, 26, 26, 26, 26, 26, 26, 26, 26,
26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26, 26,
26, 26, 26, 26, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27,
27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 27, 28
};
local const int base_length[LENGTH_CODES] = {
0, 1, 2, 3, 4, 5, 6, 7, 8, 10, 12, 14, 16, 20, 24, 28, 32, 40, 48, 56,
64, 80, 96, 112, 128, 160, 192, 224, 0
};
local const int base_dist[D_CODES] = {
0, 1, 2, 3, 4, 6, 8, 12, 16, 24,
32, 48, 64, 96, 128, 192, 256, 384, 512, 768,
1024, 1536, 2048, 3072, 4096, 6144, 8192, 12288, 16384, 24576
};
/* uncompr.c -- decompress a memory buffer /* uncompr.c -- decompress a memory buffer
* Copyright (C) 1995-1996 Jean-loup Gailly. * Copyright (C) 1995-1998 Jean-loup Gailly.
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
/* $Id: uncompr.c,v 1.1 1997/07/17 17:45:35 jim Exp $ */ /* @(#) $Id: uncompr.c,v 1.2 2001/06/04 19:41:16 shane Exp $ */
#include "zlib.h" #include "zlib.h"
...@@ -22,7 +22,7 @@ ...@@ -22,7 +22,7 @@
enough memory, Z_BUF_ERROR if there was not enough room in the output enough memory, Z_BUF_ERROR if there was not enough room in the output
buffer, or Z_DATA_ERROR if the input data was corrupted. buffer, or Z_DATA_ERROR if the input data was corrupted.
*/ */
int uncompress (dest, destLen, source, sourceLen) int ZEXPORT uncompress (dest, destLen, source, sourceLen)
Bytef *dest; Bytef *dest;
uLongf *destLen; uLongf *destLen;
const Bytef *source; const Bytef *source;
...@@ -49,7 +49,7 @@ int uncompress (dest, destLen, source, sourceLen) ...@@ -49,7 +49,7 @@ int uncompress (dest, destLen, source, sourceLen)
err = inflate(&stream, Z_FINISH); err = inflate(&stream, Z_FINISH);
if (err != Z_STREAM_END) { if (err != Z_STREAM_END) {
inflateEnd(&stream); inflateEnd(&stream);
return err; return err == Z_OK ? Z_BUF_ERROR : err;
} }
*destLen = stream.total_out; *destLen = stream.total_out;
......
/* zconf.h -- configuration of the zlib compression library /* zconf.h -- configuration of the zlib compression library
* Copyright (C) 1995-1996 Jean-loup Gailly. * Copyright (C) 1995-1998 Jean-loup Gailly.
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
/* $Id: zconf.h,v 1.1 1997/07/17 17:45:35 jim Exp $ */ /* @(#) $Id: zconf.h,v 1.2 2001/06/04 19:41:16 shane Exp $ */
#ifndef _ZCONF_H #ifndef _ZCONF_H
#define _ZCONF_H #define _ZCONF_H
...@@ -27,8 +27,10 @@ ...@@ -27,8 +27,10 @@
# define inflateInit2_ z_inflateInit2_ # define inflateInit2_ z_inflateInit2_
# define inflateSetDictionary z_inflateSetDictionary # define inflateSetDictionary z_inflateSetDictionary
# define inflateSync z_inflateSync # define inflateSync z_inflateSync
# define inflateSyncPoint z_inflateSyncPoint
# define inflateReset z_inflateReset # define inflateReset z_inflateReset
# define compress z_compress # define compress z_compress
# define compress2 z_compress2
# define uncompress z_uncompress # define uncompress z_uncompress
# define adler32 z_adler32 # define adler32 z_adler32
# define crc32 z_crc32 # define crc32 z_crc32
...@@ -72,8 +74,10 @@ ...@@ -72,8 +74,10 @@
#if (defined(MSDOS) || defined(_WINDOWS) || defined(WIN32)) && !defined(STDC) #if (defined(MSDOS) || defined(_WINDOWS) || defined(WIN32)) && !defined(STDC)
# define STDC # define STDC
#endif #endif
#if (defined(__STDC__) || defined(__cplusplus)) && !defined(STDC) #if defined(__STDC__) || defined(__cplusplus) || defined(__OS2__)
# define STDC # ifndef STDC
# define STDC
# endif
#endif #endif
#ifndef STDC #ifndef STDC
...@@ -87,6 +91,12 @@ ...@@ -87,6 +91,12 @@
# define NO_DUMMY_DECL # define NO_DUMMY_DECL
#endif #endif
/* Old Borland C incorrectly complains about missing returns: */
#if defined(__BORLANDC__) && (__BORLANDC__ < 0x500)
# define NEED_DUMMY_RETURN
#endif
/* Maximum value for memLevel in deflateInit2 */ /* Maximum value for memLevel in deflateInit2 */
#ifndef MAX_MEM_LEVEL #ifndef MAX_MEM_LEVEL
# ifdef MAXSEG_64K # ifdef MAXSEG_64K
...@@ -96,13 +106,17 @@ ...@@ -96,13 +106,17 @@
# endif # endif
#endif #endif
/* Maximum value for windowBits in deflateInit2 and inflateInit2 */ /* Maximum value for windowBits in deflateInit2 and inflateInit2.
* WARNING: reducing MAX_WBITS makes minigzip unable to extract .gz files
* created by gzip. (Files created by minigzip can still be extracted by
* gzip.)
*/
#ifndef MAX_WBITS #ifndef MAX_WBITS
# define MAX_WBITS 15 /* 32K LZ77 window */ # define MAX_WBITS 15 /* 32K LZ77 window */
#endif #endif
/* The memory requirements for deflate are (in bytes): /* The memory requirements for deflate are (in bytes):
1 << (windowBits+2) + 1 << (memLevel+9) (1 << (windowBits+2)) + (1 << (memLevel+9))
that is: 128K for windowBits=15 + 128K for memLevel = 8 (default values) that is: 128K for windowBits=15 + 128K for memLevel = 8 (default values)
plus a few kilobytes for small objects. For example, if you want to reduce plus a few kilobytes for small objects. For example, if you want to reduce
the default memory requirements from 256K to 128K, compile with the default memory requirements from 256K to 128K, compile with
...@@ -134,7 +148,7 @@ ...@@ -134,7 +148,7 @@
/* MSC small or medium model */ /* MSC small or medium model */
# define SMALL_MEDIUM # define SMALL_MEDIUM
# ifdef _MSC_VER # ifdef _MSC_VER
# define FAR __far # define FAR _far
# else # else
# define FAR far # define FAR far
# endif # endif
...@@ -142,19 +156,68 @@ ...@@ -142,19 +156,68 @@
#if defined(__BORLANDC__) && (defined(__SMALL__) || defined(__MEDIUM__)) #if defined(__BORLANDC__) && (defined(__SMALL__) || defined(__MEDIUM__))
# ifndef __32BIT__ # ifndef __32BIT__
# define SMALL_MEDIUM # define SMALL_MEDIUM
# define FAR __far # define FAR _far
# endif
#endif
/* Compile with -DZLIB_DLL for Windows DLL support */
#if defined(ZLIB_DLL)
# if defined(_WINDOWS) || defined(WINDOWS)
# ifdef FAR
# undef FAR
# endif
# include <windows.h>
# define ZEXPORT WINAPI
# ifdef WIN32
# define ZEXPORTVA WINAPIV
# else
# define ZEXPORTVA FAR _cdecl _export
# endif
# endif
# if defined (__BORLANDC__)
# if (__BORLANDC__ >= 0x0500) && defined (WIN32)
# include <windows.h>
# define ZEXPORT __declspec(dllexport) WINAPI
# define ZEXPORTRVA __declspec(dllexport) WINAPIV
# else
# if defined (_Windows) && defined (__DLL__)
# define ZEXPORT _export
# define ZEXPORTVA _export
# endif
# endif
# endif
#endif
#if defined (__BEOS__)
# if defined (ZLIB_DLL)
# define ZEXTERN extern __declspec(dllexport)
# else
# define ZEXTERN extern __declspec(dllimport)
# endif # endif
#endif #endif
#ifndef ZEXPORT
# define ZEXPORT
#endif
#ifndef ZEXPORTVA
# define ZEXPORTVA
#endif
#ifndef ZEXTERN
# define ZEXTERN extern
#endif
#ifndef FAR #ifndef FAR
# define FAR # define FAR
#endif #endif
#if !defined(MACOS) && !defined(TARGET_OS_MAC)
typedef unsigned char Byte; /* 8 bits */ typedef unsigned char Byte; /* 8 bits */
#endif
typedef unsigned int uInt; /* 16 bits or more */ typedef unsigned int uInt; /* 16 bits or more */
typedef unsigned long uLong; /* 32 bits or more */ typedef unsigned long uLong; /* 32 bits or more */
#if defined(__BORLANDC__) && defined(SMALL_MEDIUM) #ifdef SMALL_MEDIUM
/* Borland C/C++ ignores FAR inside typedef */ /* Borland C/C++ and some old MSC versions ignore FAR inside typedef */
# define Bytef Byte FAR # define Bytef Byte FAR
#else #else
typedef Byte FAR Bytef; typedef Byte FAR Bytef;
...@@ -172,13 +235,45 @@ typedef uLong FAR uLongf; ...@@ -172,13 +235,45 @@ typedef uLong FAR uLongf;
typedef Byte *voidp; typedef Byte *voidp;
#endif #endif
#ifdef HAVE_UNISTD_H
# include <sys/types.h> /* for off_t */
# include <unistd.h> /* for SEEK_* and off_t */
# define z_off_t off_t
#endif
#ifndef SEEK_SET
# define SEEK_SET 0 /* Seek from beginning of file. */
# define SEEK_CUR 1 /* Seek from current position. */
# define SEEK_END 2 /* Set file pointer to EOF plus "offset" */
#endif
#ifndef z_off_t
# define z_off_t long
#endif
/* Compile with -DZLIB_DLL for Windows DLL support */ /* MVS linker does not support external names larger than 8 bytes */
#if (defined(_WINDOWS) || defined(WINDOWS)) && defined(ZLIB_DLL) #if defined(__MVS__)
# include <windows.h> # pragma map(deflateInit_,"DEIN")
# define EXPORT WINAPI # pragma map(deflateInit2_,"DEIN2")
#else # pragma map(deflateEnd,"DEEND")
# define EXPORT # pragma map(inflateInit_,"ININ")
# pragma map(inflateInit2_,"ININ2")
# pragma map(inflateEnd,"INEND")
# pragma map(inflateSync,"INSY")
# pragma map(inflateSetDictionary,"INSEDI")
# pragma map(inflate_blocks,"INBL")
# pragma map(inflate_blocks_new,"INBLNE")
# pragma map(inflate_blocks_free,"INBLFR")
# pragma map(inflate_blocks_reset,"INBLRE")
# pragma map(inflate_codes_free,"INCOFR")
# pragma map(inflate_codes,"INCO")
# pragma map(inflate_fast,"INFA")
# pragma map(inflate_flush,"INFLU")
# pragma map(inflate_mask,"INMA")
# pragma map(inflate_set_dictionary,"INSEDI2")
# pragma map(inflate_copyright,"INCOPY")
# pragma map(inflate_trees_bits,"INTRBI")
# pragma map(inflate_trees_dynamic,"INTRDY")
# pragma map(inflate_trees_fixed,"INTRFI")
# pragma map(inflate_trees_free,"INTRFR")
#endif #endif
#endif /* _ZCONF_H */ #endif /* _ZCONF_H */
/* zlibmodule.c -- gzip-compatible data compression */ /* zlibmodule.c -- gzip-compatible data compression */
/* See http://www.info-zip.org/pub/infozip/zlib/ */
#include <Python.h> /* Windows users: read Python's PCbuild\readme.txt */
#include <zlib.h>
#include "Python.h"
#include "zlib.h"
/* The following parameters are copied from zutil.h, version 0.95 */ /* The following parameters are copied from zutil.h, version 0.95 */
#define DEFLATED 8 #define DEFLATED 8
...@@ -12,8 +16,8 @@ ...@@ -12,8 +16,8 @@
#endif #endif
#define DEF_WBITS MAX_WBITS #define DEF_WBITS MAX_WBITS
/* The output buffer will be increased in chunks of ADDCHUNK bytes. */ /* The output buffer will be increased in chunks of DEFAULTALLOC bytes. */
#define ADDCHUNK 2048 #define DEFAULTALLOC (16*1024)
#define PyInit_zlib initzlib #define PyInit_zlib initzlib
staticforward PyTypeObject Comptype; staticforward PyTypeObject Comptype;
...@@ -25,18 +29,39 @@ typedef struct ...@@ -25,18 +29,39 @@ typedef struct
{ {
PyObject_HEAD PyObject_HEAD
z_stream zst; z_stream zst;
PyObject *unused_data;
int is_initialised;
} compobject; } compobject;
static char compressobj__doc__[] =
"compressobj() -- Return a compressor object.\n"
"compressobj(level) -- Return a compressor object, using the given compression level.\n"
;
static char decompressobj__doc__[] =
"decompressobj() -- Return a decompressor object.\n"
"decompressobj(wbits) -- Return a decompressor object, setting the window buffer size to wbits.\n"
;
static compobject * static compobject *
newcompobject(PyTypeObject *type) newcompobject(PyTypeObject *type)
{ {
compobject *self; compobject *self;
self = PyObject_NEW(compobject, type); self = PyObject_New(compobject, type);
if (self == NULL) if (self == NULL)
return NULL; return NULL;
self->is_initialised = 0;
self->unused_data = PyString_FromString("");
return self; return self;
} }
static char compress__doc__[] =
"compress(string) -- Compress string using the default compression level, "
"returning a string containing compressed data.\n"
"compress(string, level) -- Compress string, using the chosen compression "
"level (from 1 to 9). Return a string containing the compressed data.\n"
;
static PyObject * static PyObject *
PyZlib_compress(PyObject *self, PyObject *args) PyZlib_compress(PyObject *self, PyObject *args)
{ {
...@@ -45,9 +70,9 @@ PyZlib_compress(PyObject *self, PyObject *args) ...@@ -45,9 +70,9 @@ PyZlib_compress(PyObject *self, PyObject *args)
int length, level=Z_DEFAULT_COMPRESSION, err; int length, level=Z_DEFAULT_COMPRESSION, err;
z_stream zst; z_stream zst;
if (!PyArg_ParseTuple(args, "s#|i", &input, &length, &level)) if (!PyArg_ParseTuple(args, "s#|i:compress", &input, &length, &level))
return NULL; return NULL;
zst.avail_out=length+length/1000+12+1; zst.avail_out = length + length/1000 + 12 + 1;
output=(Byte*)malloc(zst.avail_out); output=(Byte*)malloc(zst.avail_out);
if (output==NULL) if (output==NULL)
{ {
...@@ -55,7 +80,8 @@ PyZlib_compress(PyObject *self, PyObject *args) ...@@ -55,7 +80,8 @@ PyZlib_compress(PyObject *self, PyObject *args)
"Can't allocate memory to compress data"); "Can't allocate memory to compress data");
return NULL; return NULL;
} }
zst.zalloc=(alloc_func)Z_NULL;
zst.zalloc=(alloc_func)NULL;
zst.zfree=(free_func)Z_NULL; zst.zfree=(free_func)Z_NULL;
zst.next_out=(Byte *)output; zst.next_out=(Byte *)output;
zst.next_in =(Byte *)input; zst.next_in =(Byte *)input;
...@@ -70,83 +96,95 @@ PyZlib_compress(PyObject *self, PyObject *args) ...@@ -70,83 +96,95 @@ PyZlib_compress(PyObject *self, PyObject *args)
"Out of memory while compressing data"); "Out of memory while compressing data");
free(output); free(output);
return NULL; return NULL;
break;
case(Z_STREAM_ERROR): case(Z_STREAM_ERROR):
PyErr_SetString(ZlibError, PyErr_SetString(ZlibError,
"Bad compression level"); "Bad compression level");
free(output); free(output);
return NULL; return NULL;
break;
default: default:
{ {
char temp[500]; if (zst.msg == Z_NULL)
if (zst.msg==Z_NULL) zst.msg=""; PyErr_Format(ZlibError, "Error %i while compressing data",
sprintf(temp, "Error %i while compressing data [%s]", err, zst.msg); err);
PyErr_SetString(ZlibError, temp); else
PyErr_Format(ZlibError, "Error %i while compressing data: %.200s",
err, zst.msg);
deflateEnd(&zst); deflateEnd(&zst);
free(output); free(output);
return NULL; return NULL;
} }
break;
} }
err=deflate(&zst, Z_FINISH); err=deflate(&zst, Z_FINISH);
switch(err) switch(err)
{ {
case(Z_STREAM_END): case(Z_STREAM_END):
break; break;
/* Are there other errors to be trapped here? */ /* Are there other errors to be trapped here? */
default: default:
{ {
char temp[500]; if (zst.msg == Z_NULL)
if (zst.msg==Z_NULL) zst.msg=""; PyErr_Format(ZlibError, "Error %i while compressing data",
sprintf(temp, "Error %i while compressing data [%s]", err, zst.msg); err);
PyErr_SetString(ZlibError, temp); else
deflateEnd(&zst); PyErr_Format(ZlibError, "Error %i while compressing data: %.200s",
free(output); err, zst.msg);
return NULL; deflateEnd(&zst);
} free(output);
} return NULL;
}
}
err=deflateEnd(&zst); err=deflateEnd(&zst);
if (err!=Z_OK) if (err!=Z_OK)
{ {
char temp[500]; if (zst.msg == Z_NULL)
if (zst.msg==Z_NULL) zst.msg=""; PyErr_Format(ZlibError, "Error %i while finishing compression",
sprintf(temp, "Error %i while finishing data compression [%s]", err);
err, zst.msg); else
PyErr_SetString(ZlibError, temp); PyErr_Format(ZlibError,
"Error %i while finishing compression: %.200s",
err, zst.msg);
free(output); free(output);
return NULL; return NULL;
} }
ReturnVal=PyString_FromStringAndSize(output, zst.total_out); ReturnVal=PyString_FromStringAndSize((char *)output, zst.total_out);
free(output); free(output);
return ReturnVal; return ReturnVal;
} }
static char decompress__doc__[] =
"decompress(string) -- Decompress the data in string, returning a string containing the decompressed data.\n"
"decompress(string, wbits) -- Decompress the data in string with a window buffer size of wbits.\n"
"decompress(string, wbits, bufsize) -- Decompress the data in string with a window buffer size of wbits and an initial output buffer size of bufsize.\n"
;
static PyObject * static PyObject *
PyZlib_decompress(PyObject *self, PyObject *args) PyZlib_decompress(PyObject *self, PyObject *args)
{ {
PyObject *ReturnVal; PyObject *result_str;
Byte *input, *output; Byte *input;
int length, err; int length, err;
int wsize=DEF_WBITS, r_strlen=DEFAULTALLOC;
z_stream zst; z_stream zst;
if (!PyArg_ParseTuple(args, "s#", &input, &length)) if (!PyArg_ParseTuple(args, "s#|ii:decompress", &input, &length, &wsize, &r_strlen))
return NULL; return NULL;
if (r_strlen <= 0)
r_strlen = 1;
zst.avail_in=length; zst.avail_in=length;
zst.avail_out=length=length*2; zst.avail_out=r_strlen;
output=(Byte*)malloc(zst.avail_out); if (!(result_str = PyString_FromStringAndSize(NULL, r_strlen)))
if (output==NULL) {
{
PyErr_SetString(PyExc_MemoryError, PyErr_SetString(PyExc_MemoryError,
"Can't allocate memory to decompress data"); "Can't allocate memory to decompress data");
return NULL; return NULL;
} }
zst.zalloc=(alloc_func)Z_NULL; zst.zalloc=(alloc_func)NULL;
zst.zfree=(free_func)Z_NULL; zst.zfree=(free_func)Z_NULL;
zst.next_out=(Byte *)output; zst.next_out=(Byte *)PyString_AsString(result_str);
zst.next_in =(Byte *)input; zst.next_in =(Byte *)input;
err=inflateInit(&zst); err=inflateInit2(&zst, wsize);
switch(err) switch(err)
{ {
case(Z_OK): case(Z_OK):
...@@ -154,17 +192,19 @@ PyZlib_decompress(PyObject *self, PyObject *args) ...@@ -154,17 +192,19 @@ PyZlib_decompress(PyObject *self, PyObject *args)
case(Z_MEM_ERROR): case(Z_MEM_ERROR):
PyErr_SetString(PyExc_MemoryError, PyErr_SetString(PyExc_MemoryError,
"Out of memory while decompressing data"); "Out of memory while decompressing data");
free(output); Py_DECREF(result_str);
return NULL; return NULL;
default: default:
{ {
char temp[500]; if (zst.msg == Z_NULL)
if (zst.msg==Z_NULL) zst.msg=""; PyErr_Format(ZlibError, "Error %i preparing to decompress data",
sprintf(temp, "Error %i while preparing to decompress data [%s]", err);
err, zst.msg); else
PyErr_SetString(ZlibError, temp); PyErr_Format(ZlibError,
"Error %i while preparing to decompress data: %.200s",
err, zst.msg);
inflateEnd(&zst); inflateEnd(&zst);
free(output); Py_DECREF(result_str);
return NULL; return NULL;
} }
} }
...@@ -173,28 +213,47 @@ PyZlib_decompress(PyObject *self, PyObject *args) ...@@ -173,28 +213,47 @@ PyZlib_decompress(PyObject *self, PyObject *args)
err=inflate(&zst, Z_FINISH); err=inflate(&zst, Z_FINISH);
switch(err) switch(err)
{ {
case(Z_OK):
case(Z_STREAM_END): case(Z_STREAM_END):
output=(Byte *)realloc(output, length+ADDCHUNK); break;
if (output==NULL) case(Z_BUF_ERROR):
/*
* If there is at least 1 byte of room according to zst.avail_out
* and we get this error, assume that it means zlib cannot
* process the inflate call() due to an error in the data.
*/
if (zst.avail_out > 0)
{
PyErr_Format(ZlibError, "Error %i while decompressing data",
err);
inflateEnd(&zst);
Py_DECREF(result_str);
return NULL;
}
/* fall through */
case(Z_OK):
/* need more memory */
if (_PyString_Resize(&result_str, r_strlen << 1) == -1)
{ {
PyErr_SetString(PyExc_MemoryError, PyErr_SetString(PyExc_MemoryError,
"Out of memory while decompressing data"); "Out of memory while decompressing data");
inflateEnd(&zst); inflateEnd(&zst);
return NULL; return NULL;
} }
zst.next_out=output+length; zst.next_out = (unsigned char *)PyString_AsString(result_str) + r_strlen;
zst.avail_out=ADDCHUNK; zst.avail_out=r_strlen;
length += ADDCHUNK; r_strlen = r_strlen << 1;
break; break;
default: default:
{ {
char temp[500]; if (zst.msg == Z_NULL)
if (zst.msg==Z_NULL) zst.msg=""; PyErr_Format(ZlibError, "Error %i while decompressing data",
sprintf(temp, "Error %i while decompressing data: [%s]", err);
err, zst.msg); else
PyErr_SetString(ZlibError, temp); PyErr_Format(ZlibError,
"Error %i while decompressing data: %.200s",
err, zst.msg);
inflateEnd(&zst); inflateEnd(&zst);
Py_DECREF(result_str);
return NULL; return NULL;
} }
} }
...@@ -202,18 +261,20 @@ PyZlib_decompress(PyObject *self, PyObject *args) ...@@ -202,18 +261,20 @@ PyZlib_decompress(PyObject *self, PyObject *args)
err=inflateEnd(&zst); err=inflateEnd(&zst);
if (err!=Z_OK) if (err!=Z_OK)
{ {
char temp[500]; if (zst.msg == Z_NULL)
if (zst.msg==Z_NULL) zst.msg=""; PyErr_Format(ZlibError,
sprintf(temp, "Error %i while finishing data decompression [%s]", "Error %i while finishing data decompression",
err, zst.msg); err);
PyErr_SetString(ZlibError, temp); else
free(output); PyErr_Format(ZlibError,
"Error %i while finishing data decompression: %.200s",
err, zst.msg);
Py_DECREF(result_str);
return NULL; return NULL;
} }
ReturnVal=PyString_FromStringAndSize(output, zst.total_out); _PyString_Resize(&result_str, zst.total_out);
free(output); return result_str;
return ReturnVal;
} }
static PyObject * static PyObject *
...@@ -222,60 +283,43 @@ PyZlib_compressobj(PyObject *selfptr, PyObject *args) ...@@ -222,60 +283,43 @@ PyZlib_compressobj(PyObject *selfptr, PyObject *args)
compobject *self; compobject *self;
int level=Z_DEFAULT_COMPRESSION, method=DEFLATED; int level=Z_DEFAULT_COMPRESSION, method=DEFLATED;
int wbits=MAX_WBITS, memLevel=DEF_MEM_LEVEL, strategy=0, err; int wbits=MAX_WBITS, memLevel=DEF_MEM_LEVEL, strategy=0, err;
/* XXX Argh! Is there a better way to have multiple levels of */
/* optional arguments? */ if (!PyArg_ParseTuple(args, "|iiiii:compressobj", &level, &method, &wbits,
if (!PyArg_ParseTuple(args, "iiiii", &level, &method, &wbits, &memLevel, &strategy)) &memLevel, &strategy))
{ return NULL;
PyErr_Clear();
if (!PyArg_ParseTuple(args, "iiii", &level, &method, &wbits, self = newcompobject(&Comptype);
&memLevel))
{
PyErr_Clear();
if (!PyArg_ParseTuple(args, "iii", &level, &method, &wbits))
{
PyErr_Clear();
if (!PyArg_ParseTuple(args, "ii", &level, &method))
{
PyErr_Clear();
if (!PyArg_ParseTuple(args, "i", &level))
{
PyErr_Clear();
if (!PyArg_ParseTuple(args, ""))
return (NULL);
}
}
}
}
}
self=newcompobject(&Comptype);
if (self==NULL) return(NULL); if (self==NULL) return(NULL);
self->zst.zalloc=(alloc_func)Z_NULL; self->zst.zalloc = (alloc_func)NULL;
self->zst.zfree=(free_func)Z_NULL; self->zst.zfree = (free_func)Z_NULL;
err=deflateInit2(&self->zst, level, method, wbits, memLevel, strategy); err = deflateInit2(&self->zst, level, method, wbits, memLevel, strategy);
switch(err) switch(err)
{ {
case (Z_OK): case (Z_OK):
self->is_initialised = 1;
return (PyObject*)self; return (PyObject*)self;
break;
case (Z_MEM_ERROR): case (Z_MEM_ERROR):
Py_DECREF(self);
PyErr_SetString(PyExc_MemoryError, PyErr_SetString(PyExc_MemoryError,
"Can't allocate memory for compression object"); "Can't allocate memory for compression object");
return NULL; return NULL;
break;
case(Z_STREAM_ERROR): case(Z_STREAM_ERROR):
Py_DECREF(self);
PyErr_SetString(PyExc_ValueError, PyErr_SetString(PyExc_ValueError,
"Invalid compression level"); "Invalid initialization option");
return NULL; return NULL;
break;
default: default:
{ {
char temp[500]; if (self->zst.msg == Z_NULL)
if (self->zst.msg==Z_NULL) self->zst.msg=""; PyErr_Format(ZlibError,
sprintf(temp, "Error %i while creating compression object [%s]", "Error %i while creating compression object",
err, self->zst.msg); err);
PyErr_SetString(ZlibError, temp); else
PyErr_Format(ZlibError,
"Error %i while creating compression object: %.200s",
err, self->zst.msg);
Py_DECREF(self);
return NULL; return NULL;
break;
} }
} }
} }
...@@ -285,240 +329,318 @@ PyZlib_decompressobj(PyObject *selfptr, PyObject *args) ...@@ -285,240 +329,318 @@ PyZlib_decompressobj(PyObject *selfptr, PyObject *args)
{ {
int wbits=DEF_WBITS, err; int wbits=DEF_WBITS, err;
compobject *self; compobject *self;
if (!PyArg_ParseTuple(args, "|i", &wbits)) if (!PyArg_ParseTuple(args, "|i:decompressobj", &wbits))
{ {
return NULL; return NULL;
} }
self=newcompobject(&Decomptype); self=newcompobject(&Decomptype);
if (self==NULL) return(NULL); if (self==NULL) return(NULL);
self->zst.zalloc=(alloc_func)Z_NULL; self->zst.zalloc=(alloc_func)NULL;
self->zst.zfree=(free_func)Z_NULL; self->zst.zfree=(free_func)Z_NULL;
/* XXX If illegal values of wbits are allowed to get here, Python
coredumps, instead of raising an exception as it should.
This is a bug in zlib 0.95; I have reported it. */
err=inflateInit2(&self->zst, wbits); err=inflateInit2(&self->zst, wbits);
switch(err) switch(err)
{ {
case (Z_OK): case (Z_OK):
self->is_initialised = 1;
return (PyObject*)self; return (PyObject*)self;
break; case(Z_STREAM_ERROR):
Py_DECREF(self);
PyErr_SetString(PyExc_ValueError,
"Invalid initialization option");
return NULL;
case (Z_MEM_ERROR): case (Z_MEM_ERROR):
Py_DECREF(self);
PyErr_SetString(PyExc_MemoryError, PyErr_SetString(PyExc_MemoryError,
"Can't allocate memory for decompression object"); "Can't allocate memory for decompression object");
return NULL; return NULL;
break;
default: default:
{ {
char temp[500]; if (self->zst.msg == Z_NULL)
if (self->zst.msg==Z_NULL) self->zst.msg=""; PyErr_Format(ZlibError,
sprintf(temp, "Error %i while creating decompression object [%s]", "Error %i while creating decompression object",
err, self->zst.msg); err);
PyErr_SetString(ZlibError, temp); else
PyErr_Format(ZlibError,
"Error %i while creating decompression object: %.200s",
err, self->zst.msg);
Py_DECREF(self);
return NULL; return NULL;
break;
}
} }
}
} }
static void static void
Comp_dealloc(compobject *self) Comp_dealloc(compobject *self)
{ {
int err; if (self->is_initialised)
err=deflateEnd(&self->zst); /* Deallocate zstream structure */ deflateEnd(&self->zst);
Py_XDECREF(self->unused_data);
PyObject_Del(self);
} }
static void static void
Decomp_dealloc(compobject *self) Decomp_dealloc(compobject *self)
{ {
int err; if (self->is_initialised)
err=inflateEnd(&self->zst); /* Deallocate zstream structure */ inflateEnd(&self->zst);
Py_XDECREF(self->unused_data);
PyObject_Del(self);
} }
static char comp_compress__doc__[] =
"compress(data) -- Return a string containing a compressed version of the data.\n\n"
"After calling this function, some of the input data may still\n"
"be stored in internal buffers for later processing.\n"
"Call the flush() method to clear these buffers."
;
static PyObject * static PyObject *
PyZlib_objcompress(compobject *self, PyObject *args) PyZlib_objcompress(compobject *self, PyObject *args)
{ {
int length=0, err, inplen; int err, inplen, length = DEFAULTALLOC;
Byte *buf=NULL;
PyObject *RetVal; PyObject *RetVal;
Byte *input; Byte *input;
unsigned long start_total_out;
if (!PyArg_ParseTuple(args, "s#", &input, &inplen)) if (!PyArg_ParseTuple(args, "s#:compress", &input, &inplen))
return NULL; return NULL;
self->zst.avail_in=inplen; if (!(RetVal = PyString_FromStringAndSize(NULL, length))) {
self->zst.next_in=input; PyErr_SetString(PyExc_MemoryError,
do "Can't allocate memory to compress data");
{ return NULL;
buf=(Byte *)realloc(buf, length+ADDCHUNK); }
if (buf==NULL) start_total_out = self->zst.total_out;
{ self->zst.avail_in = inplen;
PyErr_SetString(PyExc_MemoryError, self->zst.next_in = input;
"Can't allocate memory to compress data"); self->zst.avail_out = length;
return NULL; self->zst.next_out = (unsigned char *)PyString_AsString(RetVal);
} err = deflate(&(self->zst), Z_NO_FLUSH);
self->zst.next_out=buf+length; /* while Z_OK and the output buffer is full, there might be more output,
self->zst.avail_out=ADDCHUNK; so extend the output buffer and try again */
length += ADDCHUNK; while (err == Z_OK && self->zst.avail_out == 0) {
err=deflate(&(self->zst), Z_NO_FLUSH); if (_PyString_Resize(&RetVal, length << 1) == -1) {
} while (self->zst.avail_in!=0 && err==Z_OK); PyErr_SetString(PyExc_MemoryError,
if (err!=Z_OK) "Can't allocate memory to compress data");
{
char temp[500];
if (self->zst.msg==Z_NULL) self->zst.msg="";
sprintf(temp, "Error %i while compressing [%s]",
err, self->zst.msg);
PyErr_SetString(ZlibError, temp);
return NULL; return NULL;
} }
RetVal=PyString_FromStringAndSize(buf, self->zst.next_out-buf); self->zst.next_out = (unsigned char *)PyString_AsString(RetVal) + length;
free(buf); self->zst.avail_out = length;
length = length << 1;
err = deflate(&(self->zst), Z_NO_FLUSH);
}
/* We will only get Z_BUF_ERROR if the output buffer was full but there
wasn't more output when we tried again, so it is not an error condition */
if (err != Z_OK && err != Z_BUF_ERROR) {
if (self->zst.msg == Z_NULL)
PyErr_Format(ZlibError, "Error %i while compressing",
err);
else
PyErr_Format(ZlibError, "Error %i while compressing: %.200s",
err, self->zst.msg);
Py_DECREF(RetVal);
return NULL;
}
_PyString_Resize(&RetVal, self->zst.total_out - start_total_out);
return RetVal; return RetVal;
} }
static char decomp_decompress__doc__[] =
"decompress(data) -- Return a string containing the decompressed version of the data.\n\n"
"After calling this function, some of the input data may still\n"
"be stored in internal buffers for later processing.\n"
"Call the flush() method to clear these buffers."
;
static PyObject * static PyObject *
PyZlib_objdecompress(compobject *self, PyObject *args) PyZlib_objdecompress(compobject *self, PyObject *args)
{ {
int length=0, err, inplen; int err, inplen, length = DEFAULTALLOC;
Byte *buf=NULL;
PyObject *RetVal; PyObject *RetVal;
Byte *input; Byte *input;
if (!PyArg_ParseTuple(args, "s#", &input, &inplen)) unsigned long start_total_out;
if (!PyArg_ParseTuple(args, "s#:decompress", &input, &inplen))
return NULL; return NULL;
self->zst.avail_in=inplen; if (!(RetVal = PyString_FromStringAndSize(NULL, length))) {
self->zst.next_in=input; PyErr_SetString(PyExc_MemoryError,
do "Can't allocate memory to compress data");
{ return NULL;
buf=(Byte *)realloc(buf, length+ADDCHUNK); }
if (buf==NULL) start_total_out = self->zst.total_out;
{ self->zst.avail_in = inplen;
PyErr_SetString(PyExc_MemoryError, self->zst.next_in = input;
"Can't allocate memory to decompress data"); self->zst.avail_out = length;
return NULL; self->zst.next_out = (unsigned char *)PyString_AsString(RetVal);
} err = inflate(&(self->zst), Z_SYNC_FLUSH);
self->zst.next_out=buf+length; /* while Z_OK and the output buffer is full, there might be more output,
self->zst.avail_out=ADDCHUNK; so extend the output buffer and try again */
length += ADDCHUNK; while (err == Z_OK && self->zst.avail_out == 0) {
err=inflate(&(self->zst), Z_NO_FLUSH); if (_PyString_Resize(&RetVal, length << 1) == -1) {
} while (self->zst.avail_in!=0 && err==Z_OK); PyErr_SetString(PyExc_MemoryError,
if (err!=Z_OK && err!=Z_STREAM_END) "Can't allocate memory to compress data");
{ return NULL;
char temp[500]; }
if (self->zst.msg==Z_NULL) self->zst.msg=""; self->zst.next_out = (unsigned char *)PyString_AsString(RetVal) + length;
sprintf(temp, "Error %i while decompressing [%s]", self->zst.avail_out = length;
err, self->zst.msg); length = length << 1;
PyErr_SetString(ZlibError, temp); err = inflate(&(self->zst), Z_SYNC_FLUSH);
}
/* The end of the compressed data has been reached, so set the unused_data
attribute to a string containing the remainder of the data in the string.
Note that this is also a logical place to call inflateEnd, but the old
behaviour of only calling it on flush() is preserved.*/
if (err == Z_STREAM_END) {
Py_XDECREF(self->unused_data); /* Free the original, empty string */
self->unused_data = PyString_FromStringAndSize((char *)self->zst.next_in,
self->zst.avail_in);
if (self->unused_data == NULL) {
PyErr_SetString(PyExc_MemoryError,
"Can't allocate memory to unused_data");
Py_DECREF(RetVal);
return NULL; return NULL;
} }
RetVal=PyString_FromStringAndSize(buf, self->zst.next_out-buf); /* We will only get Z_BUF_ERROR if the output buffer was full but there
free(buf); wasn't more output when we tried again, so it is not an error condition */
} else if (err != Z_OK && err != Z_BUF_ERROR) {
if (self->zst.msg == Z_NULL)
PyErr_Format(ZlibError, "Error %i while decompressing",
err);
else
PyErr_Format(ZlibError, "Error %i while decompressing: %.200s",
err, self->zst.msg);
Py_DECREF(RetVal);
return NULL;
}
_PyString_Resize(&RetVal, self->zst.total_out - start_total_out);
return RetVal; return RetVal;
} }
static char comp_flush__doc__[] =
"flush( [mode] ) -- Return a string containing any remaining compressed data.\n"
"mode can be one of the constants Z_SYNC_FLUSH, Z_FULL_FLUSH, Z_FINISH; the \n"
"default value used when mode is not specified is Z_FINISH.\n"
"If mode == Z_FINISH, the compressor object can no longer be used after\n"
"calling the flush() method. Otherwise, more data can still be compressed.\n"
;
static PyObject * static PyObject *
PyZlib_flush(compobject *self, PyObject *args) PyZlib_flush(compobject *self, PyObject *args)
{ {
int length=0, err; int err, length=DEFAULTALLOC;
Byte *buf=NULL;
PyObject *RetVal; PyObject *RetVal;
int flushmode = Z_FINISH;
unsigned long start_total_out;
if (!PyArg_ParseTuple(args, "|i:flush", &flushmode))
return NULL;
/* Flushing with Z_NO_FLUSH is a no-op, so there's no point in
doing any work at all; just return an empty string. */
if (flushmode == Z_NO_FLUSH) {
return PyString_FromStringAndSize(NULL, 0);
}
if (!PyArg_NoArgs(args)) if (!(RetVal = PyString_FromStringAndSize(NULL, length))) {
PyErr_SetString(PyExc_MemoryError,
"Can't allocate memory to compress data");
return NULL; return NULL;
self->zst.avail_in=0; }
do start_total_out = self->zst.total_out;
{ self->zst.avail_in = 0;
buf=(Byte *)realloc(buf, length+ADDCHUNK); self->zst.avail_out = length;
if (buf==NULL) self->zst.next_out = (unsigned char *)PyString_AsString(RetVal);
{ err = deflate(&(self->zst), flushmode);
PyErr_SetString(PyExc_MemoryError, /* while Z_OK and the output buffer is full, there might be more output,
"Can't allocate memory to compress data"); so extend the output buffer and try again */
return NULL; while (err == Z_OK && self->zst.avail_out == 0) {
} if (_PyString_Resize(&RetVal, length << 1) == -1) {
self->zst.next_out=buf+length; PyErr_SetString(PyExc_MemoryError,
self->zst.avail_out=ADDCHUNK; "Can't allocate memory to compress data");
length += ADDCHUNK;
err=deflate(&(self->zst), Z_FINISH);
} while (err==Z_OK);
if (err!=Z_STREAM_END)
{
char temp[500];
if (self->zst.msg==Z_NULL) self->zst.msg="";
sprintf(temp, "Error %i while compressing [%s]",
err, self->zst.msg);
PyErr_SetString(ZlibError, temp);
return NULL; return NULL;
} }
RetVal=PyString_FromStringAndSize(buf, self->zst.next_out-buf); self->zst.next_out = (unsigned char *)PyString_AsString(RetVal) + length;
free(buf); self->zst.avail_out = length;
err=deflateEnd(&(self->zst)); length = length << 1;
if (err!=Z_OK) err = deflate(&(self->zst), flushmode);
{ }
char temp[500]; /* If flushmode is Z_FINISH, we also have to call deflateEnd() to free
if (self->zst.msg==Z_NULL) self->zst.msg=""; various data structures. Note we should only get Z_STREAM_END when
sprintf(temp, "Error %i while flushing compression object [%s]", flushmode is Z_FINISH, but checking both for safety*/
err, self->zst.msg); if (err == Z_STREAM_END && flushmode == Z_FINISH) {
PyErr_SetString(ZlibError, temp); err=deflateEnd(&(self->zst));
if (err!=Z_OK) {
if (self->zst.msg == Z_NULL)
PyErr_Format(ZlibError, "Error %i from deflateEnd()",
err);
else
PyErr_Format(ZlibError,"Error %i from deflateEnd(): %.200s",
err, self->zst.msg);
Py_DECREF(RetVal);
return NULL; return NULL;
} }
self->is_initialised = 0;
/* We will only get Z_BUF_ERROR if the output buffer was full but there
wasn't more output when we tried again, so it is not an error condition */
} else if (err!=Z_OK && err!=Z_BUF_ERROR) {
if (self->zst.msg == Z_NULL)
PyErr_Format(ZlibError, "Error %i while flushing",
err);
else
PyErr_Format(ZlibError, "Error %i while flushing: %.200s",
err, self->zst.msg);
Py_DECREF(RetVal);
return NULL;
}
_PyString_Resize(&RetVal, self->zst.total_out - start_total_out);
return RetVal; return RetVal;
} }
static char decomp_flush__doc__[] =
"flush() -- Return a string containing any remaining decompressed data. "
"The decompressor object can no longer be used after this call."
;
static PyObject * static PyObject *
PyZlib_unflush(compobject *self, PyObject *args) PyZlib_unflush(compobject *self, PyObject *args)
/*decompressor flush is a no-op because all pending data would have been
flushed by the decompress method. However, this routine previously called
inflateEnd, causing any further decompress or flush calls to raise
exceptions. This behaviour has been preserved.*/
{ {
int length=0, err; int err;
Byte *buf=NULL;
PyObject *RetVal;
if (!PyArg_NoArgs(args)) if (!PyArg_ParseTuple(args, ""))
return NULL; return NULL;
self->zst.avail_in=0;
do
{
buf=(Byte *)realloc(buf, length+ADDCHUNK);
if (buf==NULL)
{
PyErr_SetString(PyExc_MemoryError,
"Can't allocate memory to decompress data");
return NULL;
}
self->zst.next_out=buf+length;
length += ADDCHUNK;
err=inflate(&(self->zst), Z_FINISH);
} while (err==Z_OK);
if (err!=Z_STREAM_END)
{
char temp[500];
if (self->zst.msg==Z_NULL) self->zst.msg="";
sprintf(temp, "Error %i while decompressing [%s]",
err, self->zst.msg);
PyErr_SetString(ZlibError, temp);
return NULL;
}
RetVal=PyString_FromStringAndSize(buf, self->zst.next_out - buf);
free(buf);
err=inflateEnd(&(self->zst)); err=inflateEnd(&(self->zst));
if (err!=Z_OK) if (err!=Z_OK) {
{ if (self->zst.msg == Z_NULL)
char temp[500]; PyErr_Format(ZlibError, "Error %i from inflateEnd()",
if (self->zst.msg==Z_NULL) self->zst.msg=""; err);
sprintf(temp, "Error %i while flushing decompression object [%s]", else
err, self->zst.msg); PyErr_Format(ZlibError, "Error %i from inflateEnd(): %.200s",
PyErr_SetString(ZlibError, temp); err, self->zst.msg);
return NULL; return NULL;
} }
return RetVal; self->is_initialised = 0;
return PyString_FromStringAndSize(NULL, 0);
} }
static PyMethodDef comp_methods[] = static PyMethodDef comp_methods[] =
{ {
{"compress", (PyCFunction)PyZlib_objcompress, 1}, {"compress", (binaryfunc)PyZlib_objcompress,
{"flush", (PyCFunction)PyZlib_flush, 0}, METH_VARARGS, comp_compress__doc__},
{"flush", (binaryfunc)PyZlib_flush,
METH_VARARGS, comp_flush__doc__},
{NULL, NULL} {NULL, NULL}
}; };
static PyMethodDef Decomp_methods[] = static PyMethodDef Decomp_methods[] =
{ {
{"decompress", (PyCFunction)PyZlib_objdecompress, 1}, {"decompress", (binaryfunc)PyZlib_objdecompress,
{"flush", (PyCFunction)PyZlib_unflush, 0}, METH_VARARGS, decomp_decompress__doc__},
{"flush", (binaryfunc)PyZlib_unflush,
METH_VARARGS, decomp_flush__doc__},
{NULL, NULL} {NULL, NULL}
}; };
...@@ -531,53 +653,77 @@ Comp_getattr(compobject *self, char *name) ...@@ -531,53 +653,77 @@ Comp_getattr(compobject *self, char *name)
static PyObject * static PyObject *
Decomp_getattr(compobject *self, char *name) Decomp_getattr(compobject *self, char *name)
{ {
if (strcmp(name, "unused_data") == 0)
{
Py_INCREF(self->unused_data);
return self->unused_data;
}
return Py_FindMethod(Decomp_methods, (PyObject *)self, name); return Py_FindMethod(Decomp_methods, (PyObject *)self, name);
} }
static char adler32__doc__[] =
"adler32(string) -- Compute an Adler-32 checksum of string, using "
"a default starting value, and returning an integer value.\n"
"adler32(string, value) -- Compute an Adler-32 checksum of string, using "
"the starting value provided, and returning an integer value\n"
;
static PyObject * static PyObject *
PyZlib_adler32(PyObject *self, PyObject *args) PyZlib_adler32(PyObject *self, PyObject *args)
{ {
uLong adler32val=adler32(0L, Z_NULL, 0); uLong adler32val=adler32(0L, Z_NULL, 0);
Byte *buf; Byte *buf;
int len; int len;
if (!PyArg_ParseTuple(args, "s#|l", &buf, &len, &adler32val)) if (!PyArg_ParseTuple(args, "s#|l:adler32", &buf, &len, &adler32val))
{ {
return NULL; return NULL;
} }
adler32val=adler32(adler32val, buf, len); adler32val = adler32(adler32val, buf, len);
return Py_BuildValue("l", adler32val); return PyInt_FromLong(adler32val);
} }
static char crc32__doc__[] =
"crc32(string) -- Compute a CRC-32 checksum of string, using "
"a default starting value, and returning an integer value.\n"
"crc32(string, value) -- Compute a CRC-32 checksum of string, using "
"the starting value provided, and returning an integer value.\n"
;
static PyObject * static PyObject *
PyZlib_crc32(PyObject *self, PyObject *args) PyZlib_crc32(PyObject *self, PyObject *args)
{ {
uLong crc32val=crc32(0L, Z_NULL, 0); uLong crc32val=crc32(0L, Z_NULL, 0);
Byte *buf; Byte *buf;
int len; int len;
if (!PyArg_ParseTuple(args, "s#|l", &buf, &len, &crc32val)) if (!PyArg_ParseTuple(args, "s#|l:crc32", &buf, &len, &crc32val))
{ {
return NULL; return NULL;
} }
crc32val=crc32(crc32val, buf, len); crc32val = crc32(crc32val, buf, len);
return Py_BuildValue("l", crc32val); return PyInt_FromLong(crc32val);
} }
static PyMethodDef zlib_methods[] = static PyMethodDef zlib_methods[] =
{ {
{"adler32", PyZlib_adler32, 1}, {"adler32", (PyCFunction)PyZlib_adler32,
{"compress", PyZlib_compress, 1}, METH_VARARGS, adler32__doc__},
{"compressobj", PyZlib_compressobj, 1}, {"compress", (PyCFunction)PyZlib_compress,
{"crc32", PyZlib_crc32, 1}, METH_VARARGS, compress__doc__},
{"decompress", PyZlib_decompress, 1}, {"compressobj", (PyCFunction)PyZlib_compressobj,
{"decompressobj", PyZlib_decompressobj, 1}, METH_VARARGS, compressobj__doc__},
{NULL, NULL} {"crc32", (PyCFunction)PyZlib_crc32,
METH_VARARGS, crc32__doc__},
{"decompress", (PyCFunction)PyZlib_decompress,
METH_VARARGS, decompress__doc__},
{"decompressobj", (PyCFunction)PyZlib_decompressobj,
METH_VARARGS, decompressobj__doc__},
{NULL, NULL}
}; };
statichere PyTypeObject Comptype = { statichere PyTypeObject Comptype = {
PyObject_HEAD_INIT(NULL) PyObject_HEAD_INIT(0)
0, 0,
"Compress", "Compress",
sizeof(compobject), sizeof(compobject),
...@@ -594,7 +740,7 @@ statichere PyTypeObject Comptype = { ...@@ -594,7 +740,7 @@ statichere PyTypeObject Comptype = {
}; };
statichere PyTypeObject Decomptype = { statichere PyTypeObject Decomptype = {
PyObject_HEAD_INIT(NULL) PyObject_HEAD_INIT(0)
0, 0,
"Decompress", "Decompress",
sizeof(compobject), sizeof(compobject),
...@@ -629,24 +775,54 @@ insint(PyObject *d, char *name, int value) ...@@ -629,24 +775,54 @@ insint(PyObject *d, char *name, int value)
} }
} }
void static char zlib_module_documentation[]=
"The functions in this module allow compression and decompression "
"using the zlib library, which is based on GNU zip. \n\n"
"adler32(string) -- Compute an Adler-32 checksum.\n"
"adler32(string, start) -- Compute an Adler-32 checksum using a given starting value.\n"
"compress(string) -- Compress a string.\n"
"compress(string, level) -- Compress a string with the given level of compression (1--9).\n"
"compressobj([level]) -- Return a compressor object.\n"
"crc32(string) -- Compute a CRC-32 checksum.\n"
"crc32(string, start) -- Compute a CRC-32 checksum using a given starting value.\n"
"decompress(string,[wbits],[bufsize]) -- Decompresses a compressed string.\n"
"decompressobj([wbits]) -- Return a decompressor object (wbits=window buffer size).\n\n"
"Compressor objects support compress() and flush() methods; decompressor \n"
"objects support decompress() and flush()."
;
DL_EXPORT(void)
PyInit_zlib(void) PyInit_zlib(void)
{ {
PyObject *m, *d; PyObject *m, *d, *ver;
Comptype.ob_type = &PyType_Type;
Comptype.ob_type=&PyType_Type; Decomptype.ob_type = &PyType_Type;
Decomptype.ob_type=&PyType_Type; m = Py_InitModule4("zlib", zlib_methods,
zlib_module_documentation,
m = Py_InitModule("zlib", zlib_methods); (PyObject*)NULL,PYTHON_API_VERSION);
d = PyModule_GetDict(m); d = PyModule_GetDict(m);
ZlibError = Py_BuildValue("s", "zlib.error"); ZlibError = PyErr_NewException("zlib.error", NULL, NULL);
PyDict_SetItemString(d, "error", ZlibError); if (ZlibError != NULL)
PyDict_SetItemString(d, "IDString", PyDict_SetItemString(d, "error", ZlibError);
PyString_FromString("$Id: zlib.c,v 1.5 2001/05/23 18:32:31 shane Exp $"));
insint(d, "MAX_WBITS", MAX_WBITS); insint(d, "MAX_WBITS", MAX_WBITS);
insint(d, "DEFLATED", DEFLATED); insint(d, "DEFLATED", DEFLATED);
insint(d, "DEF_MEM_LEVEL", DEF_MEM_LEVEL); insint(d, "DEF_MEM_LEVEL", DEF_MEM_LEVEL);
insint(d, "Z_BEST_SPEED", Z_BEST_SPEED);
if (PyErr_Occurred()) insint(d, "Z_BEST_COMPRESSION", Z_BEST_COMPRESSION);
Py_FatalError("can't initialize module zlib"); insint(d, "Z_DEFAULT_COMPRESSION", Z_DEFAULT_COMPRESSION);
insint(d, "Z_FILTERED", Z_FILTERED);
insint(d, "Z_HUFFMAN_ONLY", Z_HUFFMAN_ONLY);
insint(d, "Z_DEFAULT_STRATEGY", Z_DEFAULT_STRATEGY);
insint(d, "Z_FINISH", Z_FINISH);
insint(d, "Z_NO_FLUSH", Z_NO_FLUSH);
insint(d, "Z_SYNC_FLUSH", Z_SYNC_FLUSH);
insint(d, "Z_FULL_FLUSH", Z_FULL_FLUSH);
ver = PyString_FromString(ZLIB_VERSION);
if (ver != NULL) {
PyDict_SetItemString(d, "ZLIB_VERSION", ver);
Py_DECREF(ver);
}
} }
/* zlib.h -- interface of the 'zlib' general purpose compression library /* zlib.h -- interface of the 'zlib' general purpose compression library
version 1.0.4, Jul 24th, 1996. version 1.1.3, July 9th, 1998
Copyright (C) 1995-1996 Jean-loup Gailly and Mark Adler Copyright (C) 1995-1998 Jean-loup Gailly and Mark Adler
This software is provided 'as-is', without any express or implied This software is provided 'as-is', without any express or implied
warranty. In no event will the authors be held liable for any damages warranty. In no event will the authors be held liable for any damages
...@@ -20,7 +20,7 @@ ...@@ -20,7 +20,7 @@
3. This notice may not be removed or altered from any source distribution. 3. This notice may not be removed or altered from any source distribution.
Jean-loup Gailly Mark Adler Jean-loup Gailly Mark Adler
gzip@prep.ai.mit.edu madler@alumni.caltech.edu jloup@gzip.org madler@alumni.caltech.edu
The data format used by the zlib library is described by RFCs (Request for The data format used by the zlib library is described by RFCs (Request for
...@@ -31,36 +31,33 @@ ...@@ -31,36 +31,33 @@
#ifndef _ZLIB_H #ifndef _ZLIB_H
#define _ZLIB_H #define _ZLIB_H
#include "zconf.h"
#ifdef __cplusplus #ifdef __cplusplus
extern "C" { extern "C" {
#endif #endif
#include "zconf.h" #define ZLIB_VERSION "1.1.3"
#define ZLIB_VERSION "1.0.4"
/* /*
The 'zlib' compression library provides in-memory compression and The 'zlib' compression library provides in-memory compression and
decompression functions, including integrity checks of the uncompressed decompression functions, including integrity checks of the uncompressed
data. This version of the library supports only one compression method data. This version of the library supports only one compression method
(deflation) but other algorithms may be added later and will have the same (deflation) but other algorithms will be added later and will have the same
stream interface. stream interface.
For compression the application must provide the output buffer and
may optionally provide the input buffer for optimization. For decompression,
the application must provide the input buffer and may optionally provide
the output buffer for optimization.
Compression can be done in a single step if the buffers are large Compression can be done in a single step if the buffers are large
enough (for example if an input file is mmap'ed), or can be done by enough (for example if an input file is mmap'ed), or can be done by
repeated calls of the compression function. In the latter case, the repeated calls of the compression function. In the latter case, the
application must provide more input and/or consume the output application must provide more input and/or consume the output
(providing more output space) before each call. (providing more output space) before each call.
The library does not install any signal handler. It is recommended to The library also supports reading and writing files in gzip (.gz) format
add at least a handler for SIGSEGV when decompressing; the library checks with an interface similar to that of stdio.
the consistency of the input data whenever possible but may go nuts
for some forms of corrupted input. The library does not install any signal handler. The decoder checks
the consistency of the compressed data, so the library should never
crash even in case of corrupted input.
*/ */
typedef voidpf (*alloc_func) OF((voidpf opaque, uInt items, uInt size)); typedef voidpf (*alloc_func) OF((voidpf opaque, uInt items, uInt size));
...@@ -104,6 +101,9 @@ typedef z_stream FAR *z_streamp; ...@@ -104,6 +101,9 @@ typedef z_stream FAR *z_streamp;
opaque value. opaque value.
zalloc must return Z_NULL if there is not enough memory for the object. zalloc must return Z_NULL if there is not enough memory for the object.
If zlib is used in a multi-threaded application, zalloc and zfree must be
thread safe.
On 16-bit systems, the functions zalloc and zfree must be able to allocate On 16-bit systems, the functions zalloc and zfree must be able to allocate
exactly 65536 bytes, but will not be required to allocate more than this exactly 65536 bytes, but will not be required to allocate more than this
if the symbol MAXSEG_64K is defined (see zconf.h). WARNING: On MSDOS, if the symbol MAXSEG_64K is defined (see zconf.h). WARNING: On MSDOS,
...@@ -123,7 +123,7 @@ typedef z_stream FAR *z_streamp; ...@@ -123,7 +123,7 @@ typedef z_stream FAR *z_streamp;
/* constants */ /* constants */
#define Z_NO_FLUSH 0 #define Z_NO_FLUSH 0
#define Z_PARTIAL_FLUSH 1 #define Z_PARTIAL_FLUSH 1 /* will be removed, use Z_SYNC_FLUSH instead */
#define Z_SYNC_FLUSH 2 #define Z_SYNC_FLUSH 2
#define Z_FULL_FLUSH 3 #define Z_FULL_FLUSH 3
#define Z_FINISH 4 #define Z_FINISH 4
...@@ -168,7 +168,7 @@ typedef z_stream FAR *z_streamp; ...@@ -168,7 +168,7 @@ typedef z_stream FAR *z_streamp;
/* basic functions */ /* basic functions */
extern const char * EXPORT zlibVersion OF((void)); ZEXTERN const char * ZEXPORT zlibVersion OF((void));
/* The application can compare zlibVersion and ZLIB_VERSION for consistency. /* The application can compare zlibVersion and ZLIB_VERSION for consistency.
If the first character differs, the library code actually used is If the first character differs, the library code actually used is
not compatible with the zlib.h header file used by the application. not compatible with the zlib.h header file used by the application.
...@@ -176,7 +176,7 @@ extern const char * EXPORT zlibVersion OF((void)); ...@@ -176,7 +176,7 @@ extern const char * EXPORT zlibVersion OF((void));
*/ */
/* /*
extern int EXPORT deflateInit OF((z_streamp strm, int level)); ZEXTERN int ZEXPORT deflateInit OF((z_streamp strm, int level));
Initializes the internal stream state for compression. The fields Initializes the internal stream state for compression. The fields
zalloc, zfree and opaque must be initialized before by the caller. zalloc, zfree and opaque must be initialized before by the caller.
...@@ -198,9 +198,15 @@ extern int EXPORT deflateInit OF((z_streamp strm, int level)); ...@@ -198,9 +198,15 @@ extern int EXPORT deflateInit OF((z_streamp strm, int level));
*/ */
extern int EXPORT deflate OF((z_streamp strm, int flush)); ZEXTERN int ZEXPORT deflate OF((z_streamp strm, int flush));
/* /*
Performs one or both of the following actions: deflate compresses as much data as possible, and stops when the input
buffer becomes empty or the output buffer becomes full. It may introduce some
output latency (reading input without producing any output) except when
forced to flush.
The detailed semantics are as follows. deflate performs one or both of the
following actions:
- Compress more input starting at next_in and update next_in and avail_in - Compress more input starting at next_in and update next_in and avail_in
accordingly. If not all input can be processed (because there is not accordingly. If not all input can be processed (because there is not
...@@ -222,24 +228,23 @@ extern int EXPORT deflate OF((z_streamp strm, int flush)); ...@@ -222,24 +228,23 @@ extern int EXPORT deflate OF((z_streamp strm, int flush));
and with zero avail_out, it must be called again after making room in the and with zero avail_out, it must be called again after making room in the
output buffer because there might be more output pending. output buffer because there might be more output pending.
If the parameter flush is set to Z_PARTIAL_FLUSH, the current compression If the parameter flush is set to Z_SYNC_FLUSH, all pending output is
block is terminated and flushed to the output buffer so that the flushed to the output buffer and the output is aligned on a byte boundary, so
decompressor can get all input data available so far. For method 9, a future that the decompressor can get all input data available so far. (In particular
variant on method 8, the current block will be flushed but not terminated. avail_in is zero after the call if enough output space has been provided
Z_SYNC_FLUSH has the same effect as partial flush except that the compressed before the call.) Flushing may degrade compression for some compression
output is byte aligned (the compressor can clear its internal bit buffer) algorithms and so it should be used only when necessary.
and the current block is always terminated; this can be useful if the
compressor has to be restarted from scratch after an interruption (in which If flush is set to Z_FULL_FLUSH, all output is flushed as with
case the internal state of the compressor may be lost). Z_SYNC_FLUSH, and the compression state is reset so that decompression can
If flush is set to Z_FULL_FLUSH, the compression block is terminated, a restart from this point if previous compressed data has been damaged or if
special marker is output and the compression dictionary is discarded; this random access is desired. Using Z_FULL_FLUSH too often can seriously degrade
is useful to allow the decompressor to synchronize if one compressed block the compression.
has been damaged (see inflateSync below). Flushing degrades compression and
so should be used only when necessary. Using Z_FULL_FLUSH too often can If deflate returns with avail_out == 0, this function must be called again
seriously degrade the compression. If deflate returns with avail_out == 0, with the same value of the flush parameter and more output space (updated
this function must be called again with the same value of the flush avail_out), until the flush is complete (deflate returns with non-zero
parameter and more output space (updated avail_out), until the flush is avail_out).
complete (deflate returns with non-zero avail_out).
If the parameter flush is set to Z_FINISH, pending input is processed, If the parameter flush is set to Z_FINISH, pending input is processed,
pending output is flushed and deflate returns with Z_STREAM_END if there pending output is flushed and deflate returns with Z_STREAM_END if there
...@@ -254,6 +259,9 @@ extern int EXPORT deflate OF((z_streamp strm, int flush)); ...@@ -254,6 +259,9 @@ extern int EXPORT deflate OF((z_streamp strm, int flush));
0.1% larger than avail_in plus 12 bytes. If deflate does not return 0.1% larger than avail_in plus 12 bytes. If deflate does not return
Z_STREAM_END, then it must be called again as described above. Z_STREAM_END, then it must be called again as described above.
deflate() sets strm->adler to the adler32 checksum of all input read
so far (that is, total_in bytes).
deflate() may update data_type if it can make a good guess about deflate() may update data_type if it can make a good guess about
the input data type (Z_ASCII or Z_BINARY). In doubt, the data is considered the input data type (Z_ASCII or Z_BINARY). In doubt, the data is considered
binary. This field is only for information purposes and does not affect binary. This field is only for information purposes and does not affect
...@@ -263,11 +271,12 @@ extern int EXPORT deflate OF((z_streamp strm, int flush)); ...@@ -263,11 +271,12 @@ extern int EXPORT deflate OF((z_streamp strm, int flush));
processed or more output produced), Z_STREAM_END if all input has been processed or more output produced), Z_STREAM_END if all input has been
consumed and all output has been produced (only when flush is set to consumed and all output has been produced (only when flush is set to
Z_FINISH), Z_STREAM_ERROR if the stream state was inconsistent (for example Z_FINISH), Z_STREAM_ERROR if the stream state was inconsistent (for example
if next_in or next_out was NULL), Z_BUF_ERROR if no progress is possible. if next_in or next_out was NULL), Z_BUF_ERROR if no progress is possible
(for example avail_in or avail_out was zero).
*/ */
extern int EXPORT deflateEnd OF((z_streamp strm)); ZEXTERN int ZEXPORT deflateEnd OF((z_streamp strm));
/* /*
All dynamically allocated data structures for this stream are freed. All dynamically allocated data structures for this stream are freed.
This function discards any unprocessed input and does not flush any This function discards any unprocessed input and does not flush any
...@@ -282,24 +291,35 @@ extern int EXPORT deflateEnd OF((z_streamp strm)); ...@@ -282,24 +291,35 @@ extern int EXPORT deflateEnd OF((z_streamp strm));
/* /*
extern int EXPORT inflateInit OF((z_streamp strm)); ZEXTERN int ZEXPORT inflateInit OF((z_streamp strm));
Initializes the internal stream state for decompression. The fields Initializes the internal stream state for decompression. The fields
zalloc, zfree and opaque must be initialized before by the caller. If next_in, avail_in, zalloc, zfree and opaque must be initialized before by
zalloc and zfree are set to Z_NULL, inflateInit updates them to use default the caller. If next_in is not Z_NULL and avail_in is large enough (the exact
allocation functions. value depends on the compression method), inflateInit determines the
compression method from the zlib header and allocates all data structures
accordingly; otherwise the allocation will be deferred to the first call of
inflate. If zalloc and zfree are set to Z_NULL, inflateInit updates them to
use default allocation functions.
inflateInit returns Z_OK if success, Z_MEM_ERROR if there was not inflateInit returns Z_OK if success, Z_MEM_ERROR if there was not enough
enough memory, Z_VERSION_ERROR if the zlib library version is incompatible memory, Z_VERSION_ERROR if the zlib library version is incompatible with the
with the version assumed by the caller. msg is set to null if there is no version assumed by the caller. msg is set to null if there is no error
error message. inflateInit does not perform any decompression: this will be message. inflateInit does not perform any decompression apart from reading
done by inflate(). the zlib header if present: this will be done by inflate(). (So next_in and
avail_in may be modified, but next_out and avail_out are unchanged.)
*/ */
extern int EXPORT inflate OF((z_streamp strm, int flush)); ZEXTERN int ZEXPORT inflate OF((z_streamp strm, int flush));
/* /*
Performs one or both of the following actions: inflate decompresses as much data as possible, and stops when the input
buffer becomes empty or the output buffer becomes full. It may some
introduce some output latency (reading input without producing any output)
except when forced to flush.
The detailed semantics are as follows. inflate performs one or both of the
following actions:
- Decompress more input starting at next_in and update next_in and avail_in - Decompress more input starting at next_in and update next_in and avail_in
accordingly. If not all input can be processed (because there is not accordingly. If not all input can be processed (because there is not
...@@ -320,9 +340,9 @@ extern int EXPORT inflate OF((z_streamp strm, int flush)); ...@@ -320,9 +340,9 @@ extern int EXPORT inflate OF((z_streamp strm, int flush));
must be called again after making room in the output buffer because there must be called again after making room in the output buffer because there
might be more output pending. might be more output pending.
If the parameter flush is set to Z_PARTIAL_FLUSH, inflate flushes as much If the parameter flush is set to Z_SYNC_FLUSH, inflate flushes as much
output as possible to the output buffer. The flushing behavior of inflate is output as possible to the output buffer. The flushing behavior of inflate is
not specified for values of the flush parameter other than Z_PARTIAL_FLUSH not specified for values of the flush parameter other than Z_SYNC_FLUSH
and Z_FINISH, but the current implementation actually flushes as much output and Z_FINISH, but the current implementation actually flushes as much output
as possible anyway. as possible anyway.
...@@ -337,22 +357,30 @@ extern int EXPORT inflate OF((z_streamp strm, int flush)); ...@@ -337,22 +357,30 @@ extern int EXPORT inflate OF((z_streamp strm, int flush));
is never required, but can be used to inform inflate that a faster routine is never required, but can be used to inform inflate that a faster routine
may be used for the single inflate() call. may be used for the single inflate() call.
inflate() returns Z_OK if some progress has been made (more input If a preset dictionary is needed at this point (see inflateSetDictionary
processed or more output produced), Z_STREAM_END if the end of the below), inflate sets strm-adler to the adler32 checksum of the
compressed data has been reached and all uncompressed output has been dictionary chosen by the compressor and returns Z_NEED_DICT; otherwise
produced, Z_NEED_DICT if a preset dictionary is needed at this point (see it sets strm->adler to the adler32 checksum of all output produced
inflateSetDictionary below), Z_DATA_ERROR if the input data was corrupted, so far (that is, total_out bytes) and returns Z_OK, Z_STREAM_END or
Z_STREAM_ERROR if the stream structure was inconsistent (for example if an error code as described below. At the end of the stream, inflate()
next_in or next_out was NULL), Z_MEM_ERROR if there was not enough memory, checks that its computed adler32 checksum is equal to that saved by the
Z_BUF_ERROR if no progress is possible or if there was not enough room in compressor and returns Z_STREAM_END only if the checksum is correct.
the output buffer when Z_FINISH is used. In the Z_DATA_ERROR case, the
application may then call inflateSync to look for a good compression block. inflate() returns Z_OK if some progress has been made (more input processed
In the Z_NEED_DICT case, strm->adler is set to the Adler32 value of the or more output produced), Z_STREAM_END if the end of the compressed data has
dictionary chosen by the compressor. been reached and all uncompressed output has been produced, Z_NEED_DICT if a
preset dictionary is needed at this point, Z_DATA_ERROR if the input data was
corrupted (input stream not conforming to the zlib format or incorrect
adler32 checksum), Z_STREAM_ERROR if the stream structure was inconsistent
(for example if next_in or next_out was NULL), Z_MEM_ERROR if there was not
enough memory, Z_BUF_ERROR if no progress is possible or if there was not
enough room in the output buffer when Z_FINISH is used. In the Z_DATA_ERROR
case, the application may then call inflateSync to look for a good
compression block.
*/ */
extern int EXPORT inflateEnd OF((z_streamp strm)); ZEXTERN int ZEXPORT inflateEnd OF((z_streamp strm));
/* /*
All dynamically allocated data structures for this stream are freed. All dynamically allocated data structures for this stream are freed.
This function discards any unprocessed input and does not flush any This function discards any unprocessed input and does not flush any
...@@ -370,26 +398,25 @@ extern int EXPORT inflateEnd OF((z_streamp strm)); ...@@ -370,26 +398,25 @@ extern int EXPORT inflateEnd OF((z_streamp strm));
*/ */
/* /*
extern int EXPORT deflateInit2 OF((z_streamp strm, ZEXTERN int ZEXPORT deflateInit2 OF((z_streamp strm,
int level, int level,
int method, int method,
int windowBits, int windowBits,
int memLevel, int memLevel,
int strategy)); int strategy));
This is another version of deflateInit with more compression options. The This is another version of deflateInit with more compression options. The
fields next_in, zalloc, zfree and opaque must be initialized before by fields next_in, zalloc, zfree and opaque must be initialized before by
the caller. the caller.
The method parameter is the compression method. It must be Z_DEFLATED in The method parameter is the compression method. It must be Z_DEFLATED in
this version of the library. (Method 9 will allow a 64K history buffer and this version of the library.
partial block flushes.)
The windowBits parameter is the base two logarithm of the window size The windowBits parameter is the base two logarithm of the window size
(the size of the history buffer). It should be in the range 8..15 for this (the size of the history buffer). It should be in the range 8..15 for this
version of the library (the value 16 will be allowed for method 9). Larger version of the library. Larger values of this parameter result in better
values of this parameter result in better compression at the expense of compression at the expense of memory usage. The default value is 15 if
memory usage. The default value is 15 if deflateInit is used instead. deflateInit is used instead.
The memLevel parameter specifies how much memory should be allocated The memLevel parameter specifies how much memory should be allocated
for the internal compression state. memLevel=1 uses minimum memory but for the internal compression state. memLevel=1 uses minimum memory but
...@@ -408,42 +435,35 @@ extern int EXPORT deflateInit2 OF((z_streamp strm, ...@@ -408,42 +435,35 @@ extern int EXPORT deflateInit2 OF((z_streamp strm,
the compression ratio but not the correctness of the compressed output even the compression ratio but not the correctness of the compressed output even
if it is not set appropriately. if it is not set appropriately.
If next_in is not null, the library will use this buffer to hold also deflateInit2 returns Z_OK if success, Z_MEM_ERROR if there was not enough
some history information; the buffer must either hold the entire input memory, Z_STREAM_ERROR if a parameter is invalid (such as an invalid
data, or have at least 1<<(windowBits+1) bytes and be writable. If next_in method). msg is set to null if there is no error message. deflateInit2 does
is null, the library will allocate its own history buffer (and leave next_in not perform any compression: this will be done by deflate().
null). next_out need not be provided here but must be provided by the
application for the next call of deflate().
If the history buffer is provided by the application, next_in must
must never be changed by the application since the compressor maintains
information inside this buffer from call to call; the application
must provide more input only by increasing avail_in. next_in is always
reset by the library in this case.
deflateInit2 returns Z_OK if success, Z_MEM_ERROR if there was
not enough memory, Z_STREAM_ERROR if a parameter is invalid (such as
an invalid method). msg is set to null if there is no error message.
deflateInit2 does not perform any compression: this will be done by
deflate().
*/ */
extern int EXPORT deflateSetDictionary OF((z_streamp strm, ZEXTERN int ZEXPORT deflateSetDictionary OF((z_streamp strm,
const Bytef *dictionary, const Bytef *dictionary,
uInt dictLength)); uInt dictLength));
/* /*
Initializes the compression dictionary (history buffer) from the given Initializes the compression dictionary from the given byte sequence
byte sequence without producing any compressed output. This function must without producing any compressed output. This function must be called
be called immediately after deflateInit or deflateInit2, before any call immediately after deflateInit, deflateInit2 or deflateReset, before any
of deflate. The compressor and decompressor must use exactly the same call of deflate. The compressor and decompressor must use exactly the same
dictionary (see inflateSetDictionary). dictionary (see inflateSetDictionary).
The dictionary should consist of strings (byte sequences) that are likely The dictionary should consist of strings (byte sequences) that are likely
to be encountered later in the data to be compressed, with the most commonly to be encountered later in the data to be compressed, with the most commonly
used strings preferably put towards the end of the dictionary. Using a used strings preferably put towards the end of the dictionary. Using a
dictionary is most useful when the data to be compressed is short and dictionary is most useful when the data to be compressed is short and can be
can be predicted with good accuracy; the data can then be compressed better predicted with good accuracy; the data can then be compressed better than
than with the default empty dictionary. In this version of the library, with the default empty dictionary.
only the last 32K bytes of the dictionary are used.
Depending on the size of the compression data structures selected by
deflateInit or deflateInit2, a part of the dictionary may in effect be
discarded, for example if the dictionary is larger than the window size in
deflate or deflate2. Thus the strings most likely to be useful should be
put at the end of the dictionary, not at the front.
Upon return of this function, strm->adler is set to the Adler32 value Upon return of this function, strm->adler is set to the Adler32 value
of the dictionary; the decompressor may later use this value to determine of the dictionary; the decompressor may later use this value to determine
which dictionary has been used by the compressor. (The Adler32 value which dictionary has been used by the compressor. (The Adler32 value
...@@ -451,21 +471,16 @@ extern int EXPORT deflateSetDictionary OF((z_streamp strm, ...@@ -451,21 +471,16 @@ extern int EXPORT deflateSetDictionary OF((z_streamp strm,
actually used by the compressor.) actually used by the compressor.)
deflateSetDictionary returns Z_OK if success, or Z_STREAM_ERROR if a deflateSetDictionary returns Z_OK if success, or Z_STREAM_ERROR if a
parameter is invalid (such as NULL dictionary) or the stream state parameter is invalid (such as NULL dictionary) or the stream state is
is inconsistent (for example if deflate has already been called for this inconsistent (for example if deflate has already been called for this stream
stream). deflateSetDictionary does not perform any compression: this will or if the compression method is bsort). deflateSetDictionary does not
be done by deflate(). perform any compression: this will be done by deflate().
*/ */
extern int EXPORT deflateCopy OF((z_streamp dest, ZEXTERN int ZEXPORT deflateCopy OF((z_streamp dest,
z_streamp source)); z_streamp source));
/* /*
Sets the destination stream as a complete copy of the source stream. If Sets the destination stream as a complete copy of the source stream.
the source stream is using an application-supplied history buffer, a new
buffer is allocated for the destination stream. The compressed output
buffer is always application-supplied. It's the responsibility of the
application to provide the correct values of next_out and avail_out for the
next call of deflate.
This function can be useful when several compression strategies will be This function can be useful when several compression strategies will be
tried, for example when there are several ways of pre-processing the input tried, for example when there are several ways of pre-processing the input
...@@ -480,7 +495,7 @@ extern int EXPORT deflateCopy OF((z_streamp dest, ...@@ -480,7 +495,7 @@ extern int EXPORT deflateCopy OF((z_streamp dest,
destination. destination.
*/ */
extern int EXPORT deflateReset OF((z_streamp strm)); ZEXTERN int ZEXPORT deflateReset OF((z_streamp strm));
/* /*
This function is equivalent to deflateEnd followed by deflateInit, This function is equivalent to deflateEnd followed by deflateInit,
but does not free and reallocate all the internal compression state. but does not free and reallocate all the internal compression state.
...@@ -491,14 +506,17 @@ extern int EXPORT deflateReset OF((z_streamp strm)); ...@@ -491,14 +506,17 @@ extern int EXPORT deflateReset OF((z_streamp strm));
stream state was inconsistent (such as zalloc or state being NULL). stream state was inconsistent (such as zalloc or state being NULL).
*/ */
extern int EXPORT deflateParams OF((z_streamp strm, int level, int strategy)); ZEXTERN int ZEXPORT deflateParams OF((z_streamp strm,
int level,
int strategy));
/* /*
Dynamically update the compression level and compression strategy. Dynamically update the compression level and compression strategy. The
This can be used to switch between compression and straight copy of interpretation of level and strategy is as in deflateInit2. This can be
the input data, or to switch to a different kind of input data requiring used to switch between compression and straight copy of the input data, or
a different strategy. If the compression level is changed, the input to switch to a different kind of input data requiring a different
available so far is compressed with the old level (and may be flushed); strategy. If the compression level is changed, the input available so far
the new level will take effect only at the next call of deflate(). is compressed with the old level (and may be flushed); the new level will
take effect only at the next call of deflate().
Before the call of deflateParams, the stream state must be set as for Before the call of deflateParams, the stream state must be set as for
a call of deflate(), since the currently available input may have to a call of deflate(), since the currently available input may have to
...@@ -510,49 +528,37 @@ extern int EXPORT deflateParams OF((z_streamp strm, int level, int strategy)); ...@@ -510,49 +528,37 @@ extern int EXPORT deflateParams OF((z_streamp strm, int level, int strategy));
*/ */
/* /*
extern int EXPORT inflateInit2 OF((z_streamp strm, ZEXTERN int ZEXPORT inflateInit2 OF((z_streamp strm,
int windowBits)); int windowBits));
This is another version of inflateInit with more compression options. The This is another version of inflateInit with an extra parameter. The
fields next_out, zalloc, zfree and opaque must be initialized before by fields next_in, avail_in, zalloc, zfree and opaque must be initialized
the caller. before by the caller.
The windowBits parameter is the base two logarithm of the maximum window The windowBits parameter is the base two logarithm of the maximum window
size (the size of the history buffer). It should be in the range 8..15 for size (the size of the history buffer). It should be in the range 8..15 for
this version of the library (the value 16 will be allowed soon). The this version of the library. The default value is 15 if inflateInit is used
default value is 15 if inflateInit is used instead. If a compressed stream instead. If a compressed stream with a larger window size is given as
with a larger window size is given as input, inflate() will return with input, inflate() will return with the error code Z_DATA_ERROR instead of
the error code Z_DATA_ERROR instead of trying to allocate a larger window. trying to allocate a larger window.
If next_out is not null, the library will use this buffer for the history inflateInit2 returns Z_OK if success, Z_MEM_ERROR if there was not enough
buffer; the buffer must either be large enough to hold the entire output memory, Z_STREAM_ERROR if a parameter is invalid (such as a negative
data, or have at least 1<<windowBits bytes. If next_out is null, the memLevel). msg is set to null if there is no error message. inflateInit2
library will allocate its own buffer (and leave next_out null). next_in does not perform any decompression apart from reading the zlib header if
need not be provided here but must be provided by the application for the present: this will be done by inflate(). (So next_in and avail_in may be
next call of inflate(). modified, but next_out and avail_out are unchanged.)
If the history buffer is provided by the application, next_out must
never be changed by the application since the decompressor maintains
history information inside this buffer from call to call; the application
can only reset next_out to the beginning of the history buffer when
avail_out is zero and all output has been consumed.
inflateInit2 returns Z_OK if success, Z_MEM_ERROR if there was
not enough memory, Z_STREAM_ERROR if a parameter is invalid (such as
windowBits < 8). msg is set to null if there is no error message.
inflateInit2 does not perform any decompression: this will be done by
inflate().
*/ */
extern int EXPORT inflateSetDictionary OF((z_streamp strm, ZEXTERN int ZEXPORT inflateSetDictionary OF((z_streamp strm,
const Bytef *dictionary, const Bytef *dictionary,
uInt dictLength)); uInt dictLength));
/* /*
Initializes the decompression dictionary (history buffer) from the given Initializes the decompression dictionary from the given uncompressed byte
uncompressed byte sequence. This function must be called immediately after sequence. This function must be called immediately after a call of inflate
a call of inflate if this call returned Z_NEED_DICT. The dictionary chosen if this call returned Z_NEED_DICT. The dictionary chosen by the compressor
by the compressor can be determined from the Adler32 value returned by this can be determined from the Adler32 value returned by this call of
call of inflate. The compressor and decompressor must use exactly the same inflate. The compressor and decompressor must use exactly the same
dictionary (see deflateSetDictionary). dictionary (see deflateSetDictionary).
inflateSetDictionary returns Z_OK if success, Z_STREAM_ERROR if a inflateSetDictionary returns Z_OK if success, Z_STREAM_ERROR if a
...@@ -563,14 +569,14 @@ extern int EXPORT inflateSetDictionary OF((z_streamp strm, ...@@ -563,14 +569,14 @@ extern int EXPORT inflateSetDictionary OF((z_streamp strm,
inflate(). inflate().
*/ */
extern int EXPORT inflateSync OF((z_streamp strm)); ZEXTERN int ZEXPORT inflateSync OF((z_streamp strm));
/* /*
Skips invalid compressed data until the special marker (see deflate() Skips invalid compressed data until a full flush point (see above the
above) can be found, or until all available input is skipped. No output description of deflate with Z_FULL_FLUSH) can be found, or until all
is provided. available input is skipped. No output is provided.
inflateSync returns Z_OK if the special marker has been found, Z_BUF_ERROR inflateSync returns Z_OK if a full flush point has been found, Z_BUF_ERROR
if no more input was provided, Z_DATA_ERROR if no marker has been found, if no more input was provided, Z_DATA_ERROR if no flush point has been found,
or Z_STREAM_ERROR if the stream structure was inconsistent. In the success or Z_STREAM_ERROR if the stream structure was inconsistent. In the success
case, the application may save the current current value of total_in which case, the application may save the current current value of total_in which
indicates where valid compressed data was found. In the error case, the indicates where valid compressed data was found. In the error case, the
...@@ -578,7 +584,7 @@ extern int EXPORT inflateSync OF((z_streamp strm)); ...@@ -578,7 +584,7 @@ extern int EXPORT inflateSync OF((z_streamp strm));
until success or end of the input data. until success or end of the input data.
*/ */
extern int EXPORT inflateReset OF((z_streamp strm)); ZEXTERN int ZEXPORT inflateReset OF((z_streamp strm));
/* /*
This function is equivalent to inflateEnd followed by inflateInit, This function is equivalent to inflateEnd followed by inflateInit,
but does not free and reallocate all the internal decompression state. but does not free and reallocate all the internal decompression state.
...@@ -594,13 +600,13 @@ extern int EXPORT inflateReset OF((z_streamp strm)); ...@@ -594,13 +600,13 @@ extern int EXPORT inflateReset OF((z_streamp strm));
/* /*
The following utility functions are implemented on top of the The following utility functions are implemented on top of the
basic stream-oriented functions. To simplify the interface, some basic stream-oriented functions. To simplify the interface, some
default options are assumed (compression level, window size, default options are assumed (compression level and memory usage,
standard memory allocation functions). The source code of these standard memory allocation functions). The source code of these
utility functions can easily be modified if you need special options. utility functions can easily be modified if you need special options.
*/ */
extern int EXPORT compress OF((Bytef *dest, uLongf *destLen, ZEXTERN int ZEXPORT compress OF((Bytef *dest, uLongf *destLen,
const Bytef *source, uLong sourceLen)); const Bytef *source, uLong sourceLen));
/* /*
Compresses the source buffer into the destination buffer. sourceLen is Compresses the source buffer into the destination buffer. sourceLen is
the byte length of the source buffer. Upon entry, destLen is the total the byte length of the source buffer. Upon entry, destLen is the total
...@@ -614,8 +620,23 @@ extern int EXPORT compress OF((Bytef *dest, uLongf *destLen, ...@@ -614,8 +620,23 @@ extern int EXPORT compress OF((Bytef *dest, uLongf *destLen,
buffer. buffer.
*/ */
extern int EXPORT uncompress OF((Bytef *dest, uLongf *destLen, ZEXTERN int ZEXPORT compress2 OF((Bytef *dest, uLongf *destLen,
const Bytef *source, uLong sourceLen)); const Bytef *source, uLong sourceLen,
int level));
/*
Compresses the source buffer into the destination buffer. The level
parameter has the same meaning as in deflateInit. sourceLen is the byte
length of the source buffer. Upon entry, destLen is the total size of the
destination buffer, which must be at least 0.1% larger than sourceLen plus
12 bytes. Upon exit, destLen is the actual size of the compressed buffer.
compress2 returns Z_OK if success, Z_MEM_ERROR if there was not enough
memory, Z_BUF_ERROR if there was not enough room in the output buffer,
Z_STREAM_ERROR if the level parameter is invalid.
*/
ZEXTERN int ZEXPORT uncompress OF((Bytef *dest, uLongf *destLen,
const Bytef *source, uLong sourceLen));
/* /*
Decompresses the source buffer into the destination buffer. sourceLen is Decompresses the source buffer into the destination buffer. sourceLen is
the byte length of the source buffer. Upon entry, destLen is the total the byte length of the source buffer. Upon entry, destLen is the total
...@@ -635,19 +656,23 @@ extern int EXPORT uncompress OF((Bytef *dest, uLongf *destLen, ...@@ -635,19 +656,23 @@ extern int EXPORT uncompress OF((Bytef *dest, uLongf *destLen,
typedef voidp gzFile; typedef voidp gzFile;
extern gzFile EXPORT gzopen OF((const char *path, const char *mode)); ZEXTERN gzFile ZEXPORT gzopen OF((const char *path, const char *mode));
/* /*
Opens a gzip (.gz) file for reading or writing. The mode parameter Opens a gzip (.gz) file for reading or writing. The mode parameter
is as in fopen ("rb" or "wb") but can also include a compression level is as in fopen ("rb" or "wb") but can also include a compression level
("wb9"). gzopen can be used to read a file which is not in gzip format; ("wb9") or a strategy: 'f' for filtered data as in "wb6f", 'h' for
in this case gzread will directly read from the file without decompression. Huffman only compression as in "wb1h". (See the description
of deflateInit2 for more information about the strategy parameter.)
gzopen can be used to read a file which is not in gzip format; in this
case gzread will directly read from the file without decompression.
gzopen returns NULL if the file could not be opened or if there was gzopen returns NULL if the file could not be opened or if there was
insufficient memory to allocate the (de)compression state; errno insufficient memory to allocate the (de)compression state; errno
can be checked to distinguish the two cases (if errno is zero, the can be checked to distinguish the two cases (if errno is zero, the
zlib error is Z_MEM_ERROR). zlib error is Z_MEM_ERROR). */
*/
extern gzFile EXPORT gzdopen OF((int fd, const char *mode)); ZEXTERN gzFile ZEXPORT gzdopen OF((int fd, const char *mode));
/* /*
gzdopen() associates a gzFile with the file descriptor fd. File gzdopen() associates a gzFile with the file descriptor fd. File
descriptors are obtained from calls like open, dup, creat, pipe or descriptors are obtained from calls like open, dup, creat, pipe or
...@@ -660,7 +685,15 @@ extern gzFile EXPORT gzdopen OF((int fd, const char *mode)); ...@@ -660,7 +685,15 @@ extern gzFile EXPORT gzdopen OF((int fd, const char *mode));
the (de)compression state. the (de)compression state.
*/ */
extern int EXPORT gzread OF((gzFile file, voidp buf, unsigned len)); ZEXTERN int ZEXPORT gzsetparams OF((gzFile file, int level, int strategy));
/*
Dynamically update the compression level or strategy. See the description
of deflateInit2 for the meaning of these parameters.
gzsetparams returns Z_OK if success, or Z_STREAM_ERROR if the file was not
opened for writing.
*/
ZEXTERN int ZEXPORT gzread OF((gzFile file, voidp buf, unsigned len));
/* /*
Reads the given number of uncompressed bytes from the compressed file. Reads the given number of uncompressed bytes from the compressed file.
If the input file was not in gzip format, gzread copies the given number If the input file was not in gzip format, gzread copies the given number
...@@ -668,14 +701,50 @@ extern int EXPORT gzread OF((gzFile file, voidp buf, unsigned len)); ...@@ -668,14 +701,50 @@ extern int EXPORT gzread OF((gzFile file, voidp buf, unsigned len));
gzread returns the number of uncompressed bytes actually read (0 for gzread returns the number of uncompressed bytes actually read (0 for
end of file, -1 for error). */ end of file, -1 for error). */
extern int EXPORT gzwrite OF((gzFile file, const voidp buf, unsigned len)); ZEXTERN int ZEXPORT gzwrite OF((gzFile file,
const voidp buf, unsigned len));
/* /*
Writes the given number of uncompressed bytes into the compressed file. Writes the given number of uncompressed bytes into the compressed file.
gzwrite returns the number of uncompressed bytes actually written gzwrite returns the number of uncompressed bytes actually written
(0 in case of error). (0 in case of error).
*/ */
extern int EXPORT gzflush OF((gzFile file, int flush)); ZEXTERN int ZEXPORTVA gzprintf OF((gzFile file, const char *format, ...));
/*
Converts, formats, and writes the args to the compressed file under
control of the format string, as in fprintf. gzprintf returns the number of
uncompressed bytes actually written (0 in case of error).
*/
ZEXTERN int ZEXPORT gzputs OF((gzFile file, const char *s));
/*
Writes the given null-terminated string to the compressed file, excluding
the terminating null character.
gzputs returns the number of characters written, or -1 in case of error.
*/
ZEXTERN char * ZEXPORT gzgets OF((gzFile file, char *buf, int len));
/*
Reads bytes from the compressed file until len-1 characters are read, or
a newline character is read and transferred to buf, or an end-of-file
condition is encountered. The string is then terminated with a null
character.
gzgets returns buf, or Z_NULL in case of error.
*/
ZEXTERN int ZEXPORT gzputc OF((gzFile file, int c));
/*
Writes c, converted to an unsigned char, into the compressed file.
gzputc returns the value that was written, or -1 in case of error.
*/
ZEXTERN int ZEXPORT gzgetc OF((gzFile file));
/*
Reads one byte from the compressed file. gzgetc returns this byte
or -1 in case of end of file or error.
*/
ZEXTERN int ZEXPORT gzflush OF((gzFile file, int flush));
/* /*
Flushes all pending output into the compressed file. The parameter Flushes all pending output into the compressed file. The parameter
flush is as in the deflate() function. The return value is the zlib flush is as in the deflate() function. The return value is the zlib
...@@ -685,14 +754,54 @@ extern int EXPORT gzflush OF((gzFile file, int flush)); ...@@ -685,14 +754,54 @@ extern int EXPORT gzflush OF((gzFile file, int flush));
degrade compression. degrade compression.
*/ */
extern int EXPORT gzclose OF((gzFile file)); ZEXTERN z_off_t ZEXPORT gzseek OF((gzFile file,
z_off_t offset, int whence));
/*
Sets the starting position for the next gzread or gzwrite on the
given compressed file. The offset represents a number of bytes in the
uncompressed data stream. The whence parameter is defined as in lseek(2);
the value SEEK_END is not supported.
If the file is opened for reading, this function is emulated but can be
extremely slow. If the file is opened for writing, only forward seeks are
supported; gzseek then compresses a sequence of zeroes up to the new
starting position.
gzseek returns the resulting offset location as measured in bytes from
the beginning of the uncompressed stream, or -1 in case of error, in
particular if the file is opened for writing and the new starting position
would be before the current position.
*/
ZEXTERN int ZEXPORT gzrewind OF((gzFile file));
/*
Rewinds the given file. This function is supported only for reading.
gzrewind(file) is equivalent to (int)gzseek(file, 0L, SEEK_SET)
*/
ZEXTERN z_off_t ZEXPORT gztell OF((gzFile file));
/*
Returns the starting position for the next gzread or gzwrite on the
given compressed file. This position represents a number of bytes in the
uncompressed data stream.
gztell(file) is equivalent to gzseek(file, 0L, SEEK_CUR)
*/
ZEXTERN int ZEXPORT gzeof OF((gzFile file));
/*
Returns 1 when EOF has previously been detected reading the given
input stream, otherwise zero.
*/
ZEXTERN int ZEXPORT gzclose OF((gzFile file));
/* /*
Flushes all pending output if necessary, closes the compressed file Flushes all pending output if necessary, closes the compressed file
and deallocates all the (de)compression state. The return value is the zlib and deallocates all the (de)compression state. The return value is the zlib
error number (see function gzerror below). error number (see function gzerror below).
*/ */
extern const char * EXPORT gzerror OF((gzFile file, int *errnum)); ZEXTERN const char * ZEXPORT gzerror OF((gzFile file, int *errnum));
/* /*
Returns the error message for the last error which occurred on the Returns the error message for the last error which occurred on the
given compressed file. errnum is set to zlib error number. If an given compressed file. errnum is set to zlib error number. If an
...@@ -709,7 +818,7 @@ extern const char * EXPORT gzerror OF((gzFile file, int *errnum)); ...@@ -709,7 +818,7 @@ extern const char * EXPORT gzerror OF((gzFile file, int *errnum));
compression library. compression library.
*/ */
extern uLong EXPORT adler32 OF((uLong adler, const Bytef *buf, uInt len)); ZEXTERN uLong ZEXPORT adler32 OF((uLong adler, const Bytef *buf, uInt len));
/* /*
Update a running Adler-32 checksum with the bytes buf[0..len-1] and Update a running Adler-32 checksum with the bytes buf[0..len-1] and
...@@ -726,7 +835,7 @@ extern uLong EXPORT adler32 OF((uLong adler, const Bytef *buf, uInt len)); ...@@ -726,7 +835,7 @@ extern uLong EXPORT adler32 OF((uLong adler, const Bytef *buf, uInt len));
if (adler != original_adler) error(); if (adler != original_adler) error();
*/ */
extern uLong EXPORT crc32 OF((uLong crc, const Bytef *buf, uInt len)); ZEXTERN uLong ZEXPORT crc32 OF((uLong crc, const Bytef *buf, uInt len));
/* /*
Update a running crc with the bytes buf[0..len-1] and return the updated Update a running crc with the bytes buf[0..len-1] and return the updated
crc. If buf is NULL, this function returns the required initial value crc. If buf is NULL, this function returns the required initial value
...@@ -748,30 +857,34 @@ extern uLong EXPORT crc32 OF((uLong crc, const Bytef *buf, uInt len)); ...@@ -748,30 +857,34 @@ extern uLong EXPORT crc32 OF((uLong crc, const Bytef *buf, uInt len));
/* deflateInit and inflateInit are macros to allow checking the zlib version /* deflateInit and inflateInit are macros to allow checking the zlib version
* and the compiler's view of z_stream: * and the compiler's view of z_stream:
*/ */
extern int EXPORT deflateInit_ OF((z_streamp strm, int level, ZEXTERN int ZEXPORT deflateInit_ OF((z_streamp strm, int level,
const char *version, int stream_size)); const char *version, int stream_size));
extern int EXPORT inflateInit_ OF((z_streamp strm, ZEXTERN int ZEXPORT inflateInit_ OF((z_streamp strm,
const char *version, int stream_size)); const char *version, int stream_size));
extern int EXPORT deflateInit2_ OF((z_streamp strm, int level, int method, ZEXTERN int ZEXPORT deflateInit2_ OF((z_streamp strm, int level, int method,
int windowBits, int memLevel, int strategy, int windowBits, int memLevel,
const char *version, int stream_size)); int strategy, const char *version,
extern int EXPORT inflateInit2_ OF((z_streamp strm, int windowBits, int stream_size));
const char *version, int stream_size)); ZEXTERN int ZEXPORT inflateInit2_ OF((z_streamp strm, int windowBits,
const char *version, int stream_size));
#define deflateInit(strm, level) \ #define deflateInit(strm, level) \
deflateInit_((strm), (level), ZLIB_VERSION, sizeof(z_stream)) deflateInit_((strm), (level), ZLIB_VERSION, sizeof(z_stream))
#define inflateInit(strm) \ #define inflateInit(strm) \
inflateInit_((strm), ZLIB_VERSION, sizeof(z_stream)) inflateInit_((strm), ZLIB_VERSION, sizeof(z_stream))
#define deflateInit2(strm, level, method, windowBits, memLevel, strategy) \ #define deflateInit2(strm, level, method, windowBits, memLevel, strategy) \
deflateInit2_((strm),(level),(method),(windowBits),(memLevel),\ deflateInit2_((strm),(level),(method),(windowBits),(memLevel),\
(strategy), ZLIB_VERSION, sizeof(z_stream)) (strategy), ZLIB_VERSION, sizeof(z_stream))
#define inflateInit2(strm, windowBits) \ #define inflateInit2(strm, windowBits) \
inflateInit2_((strm), (windowBits), ZLIB_VERSION, sizeof(z_stream)) inflateInit2_((strm), (windowBits), ZLIB_VERSION, sizeof(z_stream))
#if !defined(_Z_UTIL_H) && !defined(NO_DUMMY_DECL) #if !defined(_Z_UTIL_H) && !defined(NO_DUMMY_DECL)
struct internal_state {int dummy;}; /* hack for buggy compilers */ struct internal_state {int dummy;}; /* hack for buggy compilers */
#endif #endif
uLongf *get_crc_table OF((void)); /* can be used by asm versions of crc32() */ ZEXTERN const char * ZEXPORT zError OF((int err));
ZEXTERN int ZEXPORT inflateSyncPoint OF((z_streamp z));
ZEXTERN const uLongf * ZEXPORT get_crc_table OF((void));
#ifdef __cplusplus #ifdef __cplusplus
} }
......
/* zutil.c -- target dependent utility functions for the compression library /* zutil.c -- target dependent utility functions for the compression library
* Copyright (C) 1995-1996 Jean-loup Gailly. * Copyright (C) 1995-1998 Jean-loup Gailly.
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
/* $Id: zutil.c,v 1.1 1997/07/17 17:45:37 jim Exp $ */ /* @(#) $Id: zutil.c,v 1.2 2001/06/04 19:41:16 shane Exp $ */
#include <stdio.h>
#include "zutil.h" #include "zutil.h"
...@@ -28,12 +26,18 @@ const char *z_errmsg[10] = { ...@@ -28,12 +26,18 @@ const char *z_errmsg[10] = {
""}; ""};
const char *zlibVersion() const char * ZEXPORT zlibVersion()
{ {
return ZLIB_VERSION; return ZLIB_VERSION;
} }
#ifdef DEBUG #ifdef DEBUG
# ifndef verbose
# define verbose 0
# endif
int z_verbose = verbose;
void z_error (m) void z_error (m)
char *m; char *m;
{ {
...@@ -42,11 +46,21 @@ void z_error (m) ...@@ -42,11 +46,21 @@ void z_error (m)
} }
#endif #endif
/* exported to allow conversion of error code to string for compress() and
* uncompress()
*/
const char * ZEXPORT zError(err)
int err;
{
return ERR_MSG(err);
}
#ifndef HAVE_MEMCPY #ifndef HAVE_MEMCPY
void zmemcpy(dest, source, len) void zmemcpy(dest, source, len)
Bytef* dest; Bytef* dest;
Bytef* source; const Bytef* source;
uInt len; uInt len;
{ {
if (len == 0) return; if (len == 0) return;
...@@ -56,8 +70,8 @@ void zmemcpy(dest, source, len) ...@@ -56,8 +70,8 @@ void zmemcpy(dest, source, len)
} }
int zmemcmp(s1, s2, len) int zmemcmp(s1, s2, len)
Bytef* s1; const Bytef* s1;
Bytef* s2; const Bytef* s2;
uInt len; uInt len;
{ {
uInt j; uInt j;
...@@ -164,7 +178,7 @@ void zcfree (voidpf opaque, voidpf ptr) ...@@ -164,7 +178,7 @@ void zcfree (voidpf opaque, voidpf ptr)
# define MY_ZCALLOC # define MY_ZCALLOC
#if (!defined(_MSC_VER) || (_MSC_VER < 600)) #if (!defined(_MSC_VER) || (_MSC_VER <= 600))
# define _halloc halloc # define _halloc halloc
# define _hfree hfree # define _hfree hfree
#endif #endif
......
/* zutil.h -- internal interface and configuration of the compression library /* zutil.h -- internal interface and configuration of the compression library
* Copyright (C) 1995-1996 Jean-loup Gailly. * Copyright (C) 1995-1998 Jean-loup Gailly.
* For conditions of distribution and use, see copyright notice in zlib.h * For conditions of distribution and use, see copyright notice in zlib.h
*/ */
...@@ -8,23 +8,23 @@ ...@@ -8,23 +8,23 @@
subject to change. Applications should only use zlib.h. subject to change. Applications should only use zlib.h.
*/ */
/* $Id: zutil.h,v 1.1 1997/07/17 17:45:37 jim Exp $ */ /* @(#) $Id: zutil.h,v 1.2 2001/06/04 19:41:16 shane Exp $ */
#ifndef _Z_UTIL_H #ifndef _Z_UTIL_H
#define _Z_UTIL_H #define _Z_UTIL_H
#include "zlib.h" #include "zlib.h"
#if defined(MSDOS)||defined(VMS)||defined(CRAY)||defined(WIN32)||defined(RISCOS)
# include <stddef.h>
# include <errno.h>
#else
extern int errno;
#endif
#ifdef STDC #ifdef STDC
# include <stddef.h>
# include <string.h> # include <string.h>
# include <stdlib.h> # include <stdlib.h>
#endif #endif
#ifdef NO_ERRNO_H
extern int errno;
#else
# include <errno.h>
#endif
#ifndef local #ifndef local
# define local static # define local static
...@@ -75,8 +75,14 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */ ...@@ -75,8 +75,14 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */
#ifdef MSDOS #ifdef MSDOS
# define OS_CODE 0x00 # define OS_CODE 0x00
# ifdef __TURBOC__ # if defined(__TURBOC__) || defined(__BORLANDC__)
# include <alloc.h> # if(__STDC__ == 1) && (defined(__LARGE__) || defined(__COMPACT__))
/* Allow compilation with ANSI keywords only enabled */
void _Cdecl farfree( void *block );
void *_Cdecl farmalloc( unsigned long nbytes );
# else
# include <alloc.h>
# endif
# else /* MSC or DJGPP */ # else /* MSC or DJGPP */
# include <malloc.h> # include <malloc.h>
# endif # endif
...@@ -92,7 +98,7 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */ ...@@ -92,7 +98,7 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */
#if defined(VAXC) || defined(VMS) #if defined(VAXC) || defined(VMS)
# define OS_CODE 0x02 # define OS_CODE 0x02
# define FOPEN(name, mode) \ # define F_OPEN(name, mode) \
fopen((name), (mode), "mbc=60", "ctx=stm", "rfm=fix", "mrs=512") fopen((name), (mode), "mbc=60", "ctx=stm", "rfm=fix", "mrs=512")
#endif #endif
...@@ -104,8 +110,15 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */ ...@@ -104,8 +110,15 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */
# define OS_CODE 0x05 # define OS_CODE 0x05
#endif #endif
#ifdef MACOS #if defined(MACOS) || defined(TARGET_OS_MAC)
# define OS_CODE 0x07 # define OS_CODE 0x07
# if defined(__MWERKS__) && __dest_os != __be_os && __dest_os != __win32_os
# include <unix.h> /* for fdopen */
# else
# ifndef fdopen
# define fdopen(fd,mode) NULL /* No fdopen() */
# endif
# endif
#endif #endif
#ifdef __50SERIES /* Prime/PRIMOS */ #ifdef __50SERIES /* Prime/PRIMOS */
...@@ -120,14 +133,19 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */ ...@@ -120,14 +133,19 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */
# define fdopen(fd,mode) NULL /* No fdopen() */ # define fdopen(fd,mode) NULL /* No fdopen() */
#endif #endif
#if (defined(_MSC_VER) && (_MSC_VER > 600))
# define fdopen(fd,type) _fdopen(fd,type)
#endif
/* Common defaults */ /* Common defaults */
#ifndef OS_CODE #ifndef OS_CODE
# define OS_CODE 0x03 /* assume Unix */ # define OS_CODE 0x03 /* assume Unix */
#endif #endif
#ifndef FOPEN #ifndef F_OPEN
# define FOPEN(name, mode) fopen((name), (mode)) # define F_OPEN(name, mode) fopen((name), (mode))
#endif #endif
/* functions */ /* functions */
...@@ -142,9 +160,10 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */ ...@@ -142,9 +160,10 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */
#if defined(pyr) #if defined(pyr)
# define NO_MEMCPY # define NO_MEMCPY
#endif #endif
#if (defined(M_I86SM) || defined(M_I86MM)) && !defined(_MSC_VER) #if defined(SMALL_MEDIUM) && !defined(_MSC_VER) && !defined(__SC__)
/* Use our own functions for small and medium model with MSC <= 5.0. /* Use our own functions for small and medium model with MSC <= 5.0.
* You may have to use the same strategy for Borland C (untested). * You may have to use the same strategy for Borland C (untested).
* The __SC__ check is for Symantec.
*/ */
# define NO_MEMCPY # define NO_MEMCPY
#endif #endif
...@@ -162,24 +181,22 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */ ...@@ -162,24 +181,22 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */
# define zmemzero(dest, len) memset(dest, 0, len) # define zmemzero(dest, len) memset(dest, 0, len)
# endif # endif
#else #else
extern void zmemcpy OF((Bytef* dest, Bytef* source, uInt len)); extern void zmemcpy OF((Bytef* dest, const Bytef* source, uInt len));
extern int zmemcmp OF((Bytef* s1, Bytef* s2, uInt len)); extern int zmemcmp OF((const Bytef* s1, const Bytef* s2, uInt len));
extern void zmemzero OF((Bytef* dest, uInt len)); extern void zmemzero OF((Bytef* dest, uInt len));
#endif #endif
/* Diagnostic functions */ /* Diagnostic functions */
#ifdef DEBUG #ifdef DEBUG
# include <stdio.h> # include <stdio.h>
# ifndef verbose extern int z_verbose;
# define verbose 0
# endif
extern void z_error OF((char *m)); extern void z_error OF((char *m));
# define Assert(cond,msg) {if(!(cond)) z_error(msg);} # define Assert(cond,msg) {if(!(cond)) z_error(msg);}
# define Trace(x) fprintf x # define Trace(x) {if (z_verbose>=0) fprintf x ;}
# define Tracev(x) {if (verbose) fprintf x ;} # define Tracev(x) {if (z_verbose>0) fprintf x ;}
# define Tracevv(x) {if (verbose>1) fprintf x ;} # define Tracevv(x) {if (z_verbose>1) fprintf x ;}
# define Tracec(c,x) {if (verbose && (c)) fprintf x ;} # define Tracec(c,x) {if (z_verbose>0 && (c)) fprintf x ;}
# define Tracecv(c,x) {if (verbose>1 && (c)) fprintf x ;} # define Tracecv(c,x) {if (z_verbose>1 && (c)) fprintf x ;}
#else #else
# define Assert(cond,msg) # define Assert(cond,msg)
# define Trace(x) # define Trace(x)
...@@ -190,8 +207,8 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */ ...@@ -190,8 +207,8 @@ extern const char *z_errmsg[10]; /* indexed by 2-zlib_error */
#endif #endif
typedef uLong (*check_func) OF((uLong check, const Bytef *buf, uInt len)); typedef uLong (ZEXPORT *check_func) OF((uLong check, const Bytef *buf,
uInt len));
voidpf zcalloc OF((voidpf opaque, unsigned items, unsigned size)); voidpf zcalloc OF((voidpf opaque, unsigned items, unsigned size));
void zcfree OF((voidpf opaque, voidpf ptr)); void zcfree OF((voidpf opaque, voidpf ptr));
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment