Artifact 07a5ae1cef0579c052ac7d6ae4f905843cbe49b4:
0000: 2f 2a 20 64 65 66 6c 61 74 65 2e 68 20 2d 2d 20 /* deflate.h --
0010: 69 6e 74 65 72 6e 61 6c 20 63 6f 6d 70 72 65 73 internal compres
0020: 73 69 6f 6e 20 73 74 61 74 65 0a 20 2a 20 43 6f sion state. * Co
0030: 70 79 72 69 67 68 74 20 28 43 29 20 31 39 39 35 pyright (C) 1995
0040: 2d 31 39 39 38 20 4a 65 61 6e 2d 6c 6f 75 70 20 -1998 Jean-loup
0050: 47 61 69 6c 6c 79 0a 20 2a 20 46 6f 72 20 63 6f Gailly. * For co
0060: 6e 64 69 74 69 6f 6e 73 20 6f 66 20 64 69 73 74 nditions of dist
0070: 72 69 62 75 74 69 6f 6e 20 61 6e 64 20 75 73 65 ribution and use
0080: 2c 20 73 65 65 20 63 6f 70 79 72 69 67 68 74 20 , see copyright
0090: 6e 6f 74 69 63 65 20 69 6e 20 7a 6c 69 62 2e 68 notice in zlib.h
00a0: 20 0a 20 2a 2f 0a 0a 2f 2a 20 57 41 52 4e 49 4e . */../* WARNIN
00b0: 47 3a 20 74 68 69 73 20 66 69 6c 65 20 73 68 6f G: this file sho
00c0: 75 6c 64 20 2a 6e 6f 74 2a 20 62 65 20 75 73 65 uld *not* be use
00d0: 64 20 62 79 20 61 70 70 6c 69 63 61 74 69 6f 6e d by application
00e0: 73 2e 20 49 74 20 69 73 0a 20 20 20 70 61 72 74 s. It is. part
00f0: 20 6f 66 20 74 68 65 20 69 6d 70 6c 65 6d 65 6e of the implemen
0100: 74 61 74 69 6f 6e 20 6f 66 20 74 68 65 20 63 6f tation of the co
0110: 6d 70 72 65 73 73 69 6f 6e 20 6c 69 62 72 61 72 mpression librar
0120: 79 20 61 6e 64 20 69 73 0a 20 20 20 73 75 62 6a y and is. subj
0130: 65 63 74 20 74 6f 20 63 68 61 6e 67 65 2e 20 41 ect to change. A
0140: 70 70 6c 69 63 61 74 69 6f 6e 73 20 73 68 6f 75 pplications shou
0150: 6c 64 20 6f 6e 6c 79 20 75 73 65 20 7a 6c 69 62 ld only use zlib
0160: 2e 68 2e 0a 20 2a 2f 0a 0a 2f 2a 20 40 28 23 29 .h.. */../* @(#)
0170: 20 24 49 64 24 20 2a 2f 0a 0a 23 69 66 6e 64 65 $Id$ */..#ifnde
0180: 66 20 5f 44 45 46 4c 41 54 45 5f 48 0a 23 64 65 f _DEFLATE_H.#de
0190: 66 69 6e 65 20 5f 44 45 46 4c 41 54 45 5f 48 0a fine _DEFLATE_H.
01a0: 23 69 66 6e 64 65 66 20 4b 49 5f 47 5a 5f 4e 4f #ifndef KI_GZ_NO
01b0: 5f 43 4f 4d 50 52 45 53 53 49 4f 4e 0d 0a 0a 23 _COMPRESSION...#
01c0: 69 6e 63 6c 75 64 65 20 22 7a 75 74 69 6c 2e 68 include "zutil.h
01d0: 22 0a 0a 2f 2a 20 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d "../* ==========
01e0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
01f0: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0200: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0210: 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d ================
0220: 3d 0a 20 2a 20 49 6e 74 65 72 6e 61 6c 20 63 6f =. * Internal co
0230: 6d 70 72 65 73 73 69 6f 6e 20 73 74 61 74 65 2e mpression state.
0240: 0a 20 2a 2f 0a 0a 23 64 65 66 69 6e 65 20 4c 45 . */..#define LE
0250: 4e 47 54 48 5f 43 4f 44 45 53 20 32 39 0a 2f 2a NGTH_CODES 29./*
0260: 20 6e 75 6d 62 65 72 20 6f 66 20 6c 65 6e 67 74 number of lengt
0270: 68 20 63 6f 64 65 73 2c 20 6e 6f 74 20 63 6f 75 h codes, not cou
0280: 6e 74 69 6e 67 20 74 68 65 20 73 70 65 63 69 61 nting the specia
0290: 6c 20 45 4e 44 5f 42 4c 4f 43 4b 20 63 6f 64 65 l END_BLOCK code
02a0: 20 2a 2f 0a 0a 23 64 65 66 69 6e 65 20 4c 49 54 */..#define LIT
02b0: 45 52 41 4c 53 20 20 32 35 36 0a 2f 2a 20 6e 75 ERALS 256./* nu
02c0: 6d 62 65 72 20 6f 66 20 6c 69 74 65 72 61 6c 20 mber of literal
02d0: 62 79 74 65 73 20 30 2e 2e 32 35 35 20 2a 2f 0a bytes 0..255 */.
02e0: 0a 23 64 65 66 69 6e 65 20 4c 5f 43 4f 44 45 53 .#define L_CODES
02f0: 20 28 4c 49 54 45 52 41 4c 53 2b 31 2b 4c 45 4e (LITERALS+1+LEN
0300: 47 54 48 5f 43 4f 44 45 53 29 0a 2f 2a 20 6e 75 GTH_CODES)./* nu
0310: 6d 62 65 72 20 6f 66 20 4c 69 74 65 72 61 6c 20 mber of Literal
0320: 6f 72 20 4c 65 6e 67 74 68 20 63 6f 64 65 73 2c or Length codes,
0330: 20 69 6e 63 6c 75 64 69 6e 67 20 74 68 65 20 45 including the E
0340: 4e 44 5f 42 4c 4f 43 4b 20 63 6f 64 65 20 2a 2f ND_BLOCK code */
0350: 0a 0a 23 64 65 66 69 6e 65 20 44 5f 43 4f 44 45 ..#define D_CODE
0360: 53 20 20 20 33 30 0a 2f 2a 20 6e 75 6d 62 65 72 S 30./* number
0370: 20 6f 66 20 64 69 73 74 61 6e 63 65 20 63 6f 64 of distance cod
0380: 65 73 20 2a 2f 0a 0a 23 64 65 66 69 6e 65 20 42 es */..#define B
0390: 4c 5f 43 4f 44 45 53 20 20 31 39 0a 2f 2a 20 6e L_CODES 19./* n
03a0: 75 6d 62 65 72 20 6f 66 20 63 6f 64 65 73 20 75 umber of codes u
03b0: 73 65 64 20 74 6f 20 74 72 61 6e 73 66 65 72 20 sed to transfer
03c0: 74 68 65 20 62 69 74 20 6c 65 6e 67 74 68 73 20 the bit lengths
03d0: 2a 2f 0a 0a 23 64 65 66 69 6e 65 20 48 45 41 50 */..#define HEAP
03e0: 5f 53 49 5a 45 20 28 32 2a 4c 5f 43 4f 44 45 53 _SIZE (2*L_CODES
03f0: 2b 31 29 0a 2f 2a 20 6d 61 78 69 6d 75 6d 20 68 +1)./* maximum h
0400: 65 61 70 20 73 69 7a 65 20 2a 2f 0a 0a 23 64 65 eap size */..#de
0410: 66 69 6e 65 20 4d 41 58 5f 42 49 54 53 20 31 35 fine MAX_BITS 15
0420: 0a 2f 2a 20 41 6c 6c 20 63 6f 64 65 73 20 6d 75 ./* All codes mu
0430: 73 74 20 6e 6f 74 20 65 78 63 65 65 64 20 4d 41 st not exceed MA
0440: 58 5f 42 49 54 53 20 62 69 74 73 20 2a 2f 0a 0a X_BITS bits */..
0450: 23 64 65 66 69 6e 65 20 49 4e 49 54 5f 53 54 41 #define INIT_STA
0460: 54 45 20 20 20 20 34 32 0a 23 64 65 66 69 6e 65 TE 42.#define
0470: 20 42 55 53 59 5f 53 54 41 54 45 20 20 20 31 31 BUSY_STATE 11
0480: 33 0a 23 64 65 66 69 6e 65 20 46 49 4e 49 53 48 3.#define FINISH
0490: 5f 53 54 41 54 45 20 36 36 36 0a 2f 2a 20 53 74 _STATE 666./* St
04a0: 72 65 61 6d 20 73 74 61 74 75 73 20 2a 2f 0a 0a ream status */..
04b0: 0a 2f 2a 20 44 61 74 61 20 73 74 72 75 63 74 75 ./* Data structu
04c0: 72 65 20 64 65 73 63 72 69 62 69 6e 67 20 61 20 re describing a
04d0: 73 69 6e 67 6c 65 20 76 61 6c 75 65 20 61 6e 64 single value and
04e0: 20 69 74 73 20 63 6f 64 65 20 73 74 72 69 6e 67 its code string
04f0: 2e 20 2a 2f 0a 74 79 70 65 64 65 66 20 73 74 72 . */.typedef str
0500: 75 63 74 20 63 74 5f 64 61 74 61 5f 73 20 7b 0a uct ct_data_s {.
0510: 20 20 20 20 75 6e 69 6f 6e 20 7b 0a 20 20 20 20 union {.
0520: 20 20 20 20 75 73 68 20 20 66 72 65 71 3b 20 20 ush freq;
0530: 20 20 20 20 20 2f 2a 20 66 72 65 71 75 65 6e 63 /* frequenc
0540: 79 20 63 6f 75 6e 74 20 2a 2f 0a 20 20 20 20 20 y count */.
0550: 20 20 20 75 73 68 20 20 63 6f 64 65 3b 20 20 20 ush code;
0560: 20 20 20 20 2f 2a 20 62 69 74 20 73 74 72 69 6e /* bit strin
0570: 67 20 2a 2f 0a 20 20 20 20 7d 20 66 63 3b 0a 20 g */. } fc;.
0580: 20 20 20 75 6e 69 6f 6e 20 7b 0a 20 20 20 20 20 union {.
0590: 20 20 20 75 73 68 20 20 64 61 64 3b 20 20 20 20 ush dad;
05a0: 20 20 20 20 2f 2a 20 66 61 74 68 65 72 20 6e 6f /* father no
05b0: 64 65 20 69 6e 20 48 75 66 66 6d 61 6e 20 74 72 de in Huffman tr
05c0: 65 65 20 2a 2f 0a 20 20 20 20 20 20 20 20 75 73 ee */. us
05d0: 68 20 20 6c 65 6e 3b 20 20 20 20 20 20 20 20 2f h len; /
05e0: 2a 20 6c 65 6e 67 74 68 20 6f 66 20 62 69 74 20 * length of bit
05f0: 73 74 72 69 6e 67 20 2a 2f 0a 20 20 20 20 7d 20 string */. }
0600: 64 6c 3b 0a 7d 20 46 41 52 20 63 74 5f 64 61 74 dl;.} FAR ct_dat
0610: 61 3b 0a 0a 23 64 65 66 69 6e 65 20 46 72 65 71 a;..#define Freq
0620: 20 66 63 2e 66 72 65 71 0a 23 64 65 66 69 6e 65 fc.freq.#define
0630: 20 43 6f 64 65 20 66 63 2e 63 6f 64 65 0a 23 64 Code fc.code.#d
0640: 65 66 69 6e 65 20 44 61 64 20 20 64 6c 2e 64 61 efine Dad dl.da
0650: 64 0a 23 64 65 66 69 6e 65 20 4c 65 6e 20 20 64 d.#define Len d
0660: 6c 2e 6c 65 6e 0a 0a 74 79 70 65 64 65 66 20 73 l.len..typedef s
0670: 74 72 75 63 74 20 73 74 61 74 69 63 5f 74 72 65 truct static_tre
0680: 65 5f 64 65 73 63 5f 73 20 20 73 74 61 74 69 63 e_desc_s static
0690: 5f 74 72 65 65 5f 64 65 73 63 3b 0a 0a 74 79 70 _tree_desc;..typ
06a0: 65 64 65 66 20 73 74 72 75 63 74 20 74 72 65 65 edef struct tree
06b0: 5f 64 65 73 63 5f 73 20 7b 0a 20 20 20 20 63 74 _desc_s {. ct
06c0: 5f 64 61 74 61 20 2a 64 79 6e 5f 74 72 65 65 3b _data *dyn_tree;
06d0: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 74 68 /* th
06e0: 65 20 64 79 6e 61 6d 69 63 20 74 72 65 65 20 2a e dynamic tree *
06f0: 2f 0a 20 20 20 20 69 6e 74 20 20 20 20 20 6d 61 /. int ma
0700: 78 5f 63 6f 64 65 3b 20 20 20 20 20 20 20 20 20 x_code;
0710: 20 20 20 2f 2a 20 6c 61 72 67 65 73 74 20 63 6f /* largest co
0720: 64 65 20 77 69 74 68 20 6e 6f 6e 20 7a 65 72 6f de with non zero
0730: 20 66 72 65 71 75 65 6e 63 79 20 2a 2f 0a 20 20 frequency */.
0740: 20 20 73 74 61 74 69 63 5f 74 72 65 65 5f 64 65 static_tree_de
0750: 73 63 20 2a 73 74 61 74 5f 64 65 73 63 3b 20 2f sc *stat_desc; /
0760: 2a 20 74 68 65 20 63 6f 72 72 65 73 70 6f 6e 64 * the correspond
0770: 69 6e 67 20 73 74 61 74 69 63 20 74 72 65 65 20 ing static tree
0780: 2a 2f 0a 7d 20 46 41 52 20 74 72 65 65 5f 64 65 */.} FAR tree_de
0790: 73 63 3b 0a 0a 74 79 70 65 64 65 66 20 75 73 68 sc;..typedef ush
07a0: 20 50 6f 73 3b 0a 74 79 70 65 64 65 66 20 50 6f Pos;.typedef Po
07b0: 73 20 46 41 52 20 50 6f 73 66 3b 0a 74 79 70 65 s FAR Posf;.type
07c0: 64 65 66 20 75 6e 73 69 67 6e 65 64 20 49 50 6f def unsigned IPo
07d0: 73 3b 0a 0a 2f 2a 20 41 20 50 6f 73 20 69 73 20 s;../* A Pos is
07e0: 61 6e 20 69 6e 64 65 78 20 69 6e 20 74 68 65 20 an index in the
07f0: 63 68 61 72 61 63 74 65 72 20 77 69 6e 64 6f 77 character window
0800: 2e 20 57 65 20 75 73 65 20 73 68 6f 72 74 20 69 . We use short i
0810: 6e 73 74 65 61 64 20 6f 66 20 69 6e 74 20 74 6f nstead of int to
0820: 0a 20 2a 20 73 61 76 65 20 73 70 61 63 65 20 69 . * save space i
0830: 6e 20 74 68 65 20 76 61 72 69 6f 75 73 20 74 61 n the various ta
0840: 62 6c 65 73 2e 20 49 50 6f 73 20 69 73 20 75 73 bles. IPos is us
0850: 65 64 20 6f 6e 6c 79 20 66 6f 72 20 70 61 72 61 ed only for para
0860: 6d 65 74 65 72 20 70 61 73 73 69 6e 67 2e 0a 20 meter passing..
0870: 2a 2f 0a 0a 74 79 70 65 64 65 66 20 73 74 72 75 */..typedef stru
0880: 63 74 20 69 6e 74 65 72 6e 61 6c 5f 73 74 61 74 ct internal_stat
0890: 65 20 7b 0a 20 20 20 20 7a 5f 73 74 72 65 61 6d e {. z_stream
08a0: 70 20 73 74 72 6d 3b 20 20 20 20 20 20 2f 2a 20 p strm; /*
08b0: 70 6f 69 6e 74 65 72 20 62 61 63 6b 20 74 6f 20 pointer back to
08c0: 74 68 69 73 20 7a 6c 69 62 20 73 74 72 65 61 6d this zlib stream
08d0: 20 2a 2f 0a 20 20 20 20 69 6e 74 20 20 20 73 74 */. int st
08e0: 61 74 75 73 3b 20 20 20 20 20 20 20 20 2f 2a 20 atus; /*
08f0: 61 73 20 74 68 65 20 6e 61 6d 65 20 69 6d 70 6c as the name impl
0900: 69 65 73 20 2a 2f 0a 20 20 20 20 42 79 74 65 66 ies */. Bytef
0910: 20 2a 70 65 6e 64 69 6e 67 5f 62 75 66 3b 20 20 *pending_buf;
0920: 2f 2a 20 6f 75 74 70 75 74 20 73 74 69 6c 6c 20 /* output still
0930: 70 65 6e 64 69 6e 67 20 2a 2f 0a 20 20 20 20 75 pending */. u
0940: 6c 67 20 20 20 70 65 6e 64 69 6e 67 5f 62 75 66 lg pending_buf
0950: 5f 73 69 7a 65 3b 20 2f 2a 20 73 69 7a 65 20 6f _size; /* size o
0960: 66 20 70 65 6e 64 69 6e 67 5f 62 75 66 20 2a 2f f pending_buf */
0970: 0a 20 20 20 20 42 79 74 65 66 20 2a 70 65 6e 64 . Bytef *pend
0980: 69 6e 67 5f 6f 75 74 3b 20 20 2f 2a 20 6e 65 78 ing_out; /* nex
0990: 74 20 70 65 6e 64 69 6e 67 20 62 79 74 65 20 74 t pending byte t
09a0: 6f 20 6f 75 74 70 75 74 20 74 6f 20 74 68 65 20 o output to the
09b0: 73 74 72 65 61 6d 20 2a 2f 0a 20 20 20 20 69 6e stream */. in
09c0: 74 20 20 20 70 65 6e 64 69 6e 67 3b 20 20 20 20 t pending;
09d0: 20 20 20 2f 2a 20 6e 62 20 6f 66 20 62 79 74 65 /* nb of byte
09e0: 73 20 69 6e 20 74 68 65 20 70 65 6e 64 69 6e 67 s in the pending
09f0: 20 62 75 66 66 65 72 20 2a 2f 0a 20 20 20 20 69 buffer */. i
0a00: 6e 74 20 20 20 6e 6f 68 65 61 64 65 72 3b 20 20 nt noheader;
0a10: 20 20 20 20 2f 2a 20 73 75 70 70 72 65 73 73 20 /* suppress
0a20: 7a 6c 69 62 20 68 65 61 64 65 72 20 61 6e 64 20 zlib header and
0a30: 61 64 6c 65 72 33 32 20 2a 2f 0a 20 20 20 20 42 adler32 */. B
0a40: 79 74 65 20 20 64 61 74 61 5f 74 79 70 65 3b 20 yte data_type;
0a50: 20 20 20 20 2f 2a 20 55 4e 4b 4e 4f 57 4e 2c 20 /* UNKNOWN,
0a60: 42 49 4e 41 52 59 20 6f 72 20 41 53 43 49 49 20 BINARY or ASCII
0a70: 2a 2f 0a 20 20 20 20 42 79 74 65 20 20 6d 65 74 */. Byte met
0a80: 68 6f 64 3b 20 20 20 20 20 20 20 20 2f 2a 20 53 hod; /* S
0a90: 54 4f 52 45 44 20 28 66 6f 72 20 7a 69 70 20 6f TORED (for zip o
0aa0: 6e 6c 79 29 20 6f 72 20 44 45 46 4c 41 54 45 44 nly) or DEFLATED
0ab0: 20 2a 2f 0a 20 20 20 20 69 6e 74 20 20 20 6c 61 */. int la
0ac0: 73 74 5f 66 6c 75 73 68 3b 20 20 20 20 2f 2a 20 st_flush; /*
0ad0: 76 61 6c 75 65 20 6f 66 20 66 6c 75 73 68 20 70 value of flush p
0ae0: 61 72 61 6d 20 66 6f 72 20 70 72 65 76 69 6f 75 aram for previou
0af0: 73 20 64 65 66 6c 61 74 65 20 63 61 6c 6c 20 2a s deflate call *
0b00: 2f 0a 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 /..
0b10: 20 20 20 2f 2a 20 75 73 65 64 20 62 79 20 64 65 /* used by de
0b20: 66 6c 61 74 65 2e 63 3a 20 2a 2f 0a 0a 20 20 20 flate.c: */..
0b30: 20 75 49 6e 74 20 20 77 5f 73 69 7a 65 3b 20 20 uInt w_size;
0b40: 20 20 20 20 20 20 2f 2a 20 4c 5a 37 37 20 77 69 /* LZ77 wi
0b50: 6e 64 6f 77 20 73 69 7a 65 20 28 33 32 4b 20 62 ndow size (32K b
0b60: 79 20 64 65 66 61 75 6c 74 29 20 2a 2f 0a 20 20 y default) */.
0b70: 20 20 75 49 6e 74 20 20 77 5f 62 69 74 73 3b 20 uInt w_bits;
0b80: 20 20 20 20 20 20 20 2f 2a 20 6c 6f 67 32 28 77 /* log2(w
0b90: 5f 73 69 7a 65 29 20 20 28 38 2e 2e 31 36 29 20 _size) (8..16)
0ba0: 2a 2f 0a 20 20 20 20 75 49 6e 74 20 20 77 5f 6d */. uInt w_m
0bb0: 61 73 6b 3b 20 20 20 20 20 20 20 20 2f 2a 20 77 ask; /* w
0bc0: 5f 73 69 7a 65 20 2d 20 31 20 2a 2f 0a 0a 20 20 _size - 1 */..
0bd0: 20 20 42 79 74 65 66 20 2a 77 69 6e 64 6f 77 3b Bytef *window;
0be0: 0a 20 20 20 20 2f 2a 20 53 6c 69 64 69 6e 67 20 . /* Sliding
0bf0: 77 69 6e 64 6f 77 2e 20 49 6e 70 75 74 20 62 79 window. Input by
0c00: 74 65 73 20 61 72 65 20 72 65 61 64 20 69 6e 74 tes are read int
0c10: 6f 20 74 68 65 20 73 65 63 6f 6e 64 20 68 61 6c o the second hal
0c20: 66 20 6f 66 20 74 68 65 20 77 69 6e 64 6f 77 2c f of the window,
0c30: 0a 20 20 20 20 20 2a 20 61 6e 64 20 6d 6f 76 65 . * and move
0c40: 20 74 6f 20 74 68 65 20 66 69 72 73 74 20 68 61 to the first ha
0c50: 6c 66 20 6c 61 74 65 72 20 74 6f 20 6b 65 65 70 lf later to keep
0c60: 20 61 20 64 69 63 74 69 6f 6e 61 72 79 20 6f 66 a dictionary of
0c70: 20 61 74 20 6c 65 61 73 74 20 77 53 69 7a 65 0a at least wSize.
0c80: 20 20 20 20 20 2a 20 62 79 74 65 73 2e 20 57 69 * bytes. Wi
0c90: 74 68 20 74 68 69 73 20 6f 72 67 61 6e 69 7a 61 th this organiza
0ca0: 74 69 6f 6e 2c 20 6d 61 74 63 68 65 73 20 61 72 tion, matches ar
0cb0: 65 20 6c 69 6d 69 74 65 64 20 74 6f 20 61 20 64 e limited to a d
0cc0: 69 73 74 61 6e 63 65 20 6f 66 0a 20 20 20 20 20 istance of.
0cd0: 2a 20 77 53 69 7a 65 2d 4d 41 58 5f 4d 41 54 43 * wSize-MAX_MATC
0ce0: 48 20 62 79 74 65 73 2c 20 62 75 74 20 74 68 69 H bytes, but thi
0cf0: 73 20 65 6e 73 75 72 65 73 20 74 68 61 74 20 49 s ensures that I
0d00: 4f 20 69 73 20 61 6c 77 61 79 73 0a 20 20 20 20 O is always.
0d10: 20 2a 20 70 65 72 66 6f 72 6d 65 64 20 77 69 74 * performed wit
0d20: 68 20 61 20 6c 65 6e 67 74 68 20 6d 75 6c 74 69 h a length multi
0d30: 70 6c 65 20 6f 66 20 74 68 65 20 62 6c 6f 63 6b ple of the block
0d40: 20 73 69 7a 65 2e 20 41 6c 73 6f 2c 20 69 74 20 size. Also, it
0d50: 6c 69 6d 69 74 73 0a 20 20 20 20 20 2a 20 74 68 limits. * th
0d60: 65 20 77 69 6e 64 6f 77 20 73 69 7a 65 20 74 6f e window size to
0d70: 20 36 34 4b 2c 20 77 68 69 63 68 20 69 73 20 71 64K, which is q
0d80: 75 69 74 65 20 75 73 65 66 75 6c 20 6f 6e 20 4d uite useful on M
0d90: 53 44 4f 53 2e 0a 20 20 20 20 20 2a 20 54 6f 20 SDOS.. * To
0da0: 64 6f 3a 20 75 73 65 20 74 68 65 20 75 73 65 72 do: use the user
0db0: 20 69 6e 70 75 74 20 62 75 66 66 65 72 20 61 73 input buffer as
0dc0: 20 73 6c 69 64 69 6e 67 20 77 69 6e 64 6f 77 2e sliding window.
0dd0: 0a 20 20 20 20 20 2a 2f 0a 0a 20 20 20 20 75 6c . */.. ul
0de0: 67 20 77 69 6e 64 6f 77 5f 73 69 7a 65 3b 0a 20 g window_size;.
0df0: 20 20 20 2f 2a 20 41 63 74 75 61 6c 20 73 69 7a /* Actual siz
0e00: 65 20 6f 66 20 77 69 6e 64 6f 77 3a 20 32 2a 77 e of window: 2*w
0e10: 53 69 7a 65 2c 20 65 78 63 65 70 74 20 77 68 65 Size, except whe
0e20: 6e 20 74 68 65 20 75 73 65 72 20 69 6e 70 75 74 n the user input
0e30: 20 62 75 66 66 65 72 0a 20 20 20 20 20 2a 20 69 buffer. * i
0e40: 73 20 64 69 72 65 63 74 6c 79 20 75 73 65 64 20 s directly used
0e50: 61 73 20 73 6c 69 64 69 6e 67 20 77 69 6e 64 6f as sliding windo
0e60: 77 2e 0a 20 20 20 20 20 2a 2f 0a 0a 20 20 20 20 w.. */..
0e70: 50 6f 73 66 20 2a 70 72 65 76 3b 0a 20 20 20 20 Posf *prev;.
0e80: 2f 2a 20 4c 69 6e 6b 20 74 6f 20 6f 6c 64 65 72 /* Link to older
0e90: 20 73 74 72 69 6e 67 20 77 69 74 68 20 73 61 6d string with sam
0ea0: 65 20 68 61 73 68 20 69 6e 64 65 78 2e 20 54 6f e hash index. To
0eb0: 20 6c 69 6d 69 74 20 74 68 65 20 73 69 7a 65 20 limit the size
0ec0: 6f 66 20 74 68 69 73 0a 20 20 20 20 20 2a 20 61 of this. * a
0ed0: 72 72 61 79 20 74 6f 20 36 34 4b 2c 20 74 68 69 rray to 64K, thi
0ee0: 73 20 6c 69 6e 6b 20 69 73 20 6d 61 69 6e 74 61 s link is mainta
0ef0: 69 6e 65 64 20 6f 6e 6c 79 20 66 6f 72 20 74 68 ined only for th
0f00: 65 20 6c 61 73 74 20 33 32 4b 20 73 74 72 69 6e e last 32K strin
0f10: 67 73 2e 0a 20 20 20 20 20 2a 20 41 6e 20 69 6e gs.. * An in
0f20: 64 65 78 20 69 6e 20 74 68 69 73 20 61 72 72 61 dex in this arra
0f30: 79 20 69 73 20 74 68 75 73 20 61 20 77 69 6e 64 y is thus a wind
0f40: 6f 77 20 69 6e 64 65 78 20 6d 6f 64 75 6c 6f 20 ow index modulo
0f50: 33 32 4b 2e 0a 20 20 20 20 20 2a 2f 0a 0a 20 20 32K.. */..
0f60: 20 20 50 6f 73 66 20 2a 68 65 61 64 3b 20 2f 2a Posf *head; /*
0f70: 20 48 65 61 64 73 20 6f 66 20 74 68 65 20 68 61 Heads of the ha
0f80: 73 68 20 63 68 61 69 6e 73 20 6f 72 20 4e 49 4c sh chains or NIL
0f90: 2e 20 2a 2f 0a 0a 20 20 20 20 75 49 6e 74 20 20 . */.. uInt
0fa0: 69 6e 73 5f 68 3b 20 20 20 20 20 20 20 20 20 20 ins_h;
0fb0: 2f 2a 20 68 61 73 68 20 69 6e 64 65 78 20 6f 66 /* hash index of
0fc0: 20 73 74 72 69 6e 67 20 74 6f 20 62 65 20 69 6e string to be in
0fd0: 73 65 72 74 65 64 20 2a 2f 0a 20 20 20 20 75 49 serted */. uI
0fe0: 6e 74 20 20 68 61 73 68 5f 73 69 7a 65 3b 20 20 nt hash_size;
0ff0: 20 20 20 20 2f 2a 20 6e 75 6d 62 65 72 20 6f 66 /* number of
1000: 20 65 6c 65 6d 65 6e 74 73 20 69 6e 20 68 61 73 elements in has
1010: 68 20 74 61 62 6c 65 20 2a 2f 0a 20 20 20 20 75 h table */. u
1020: 49 6e 74 20 20 68 61 73 68 5f 62 69 74 73 3b 20 Int hash_bits;
1030: 20 20 20 20 20 2f 2a 20 6c 6f 67 32 28 68 61 73 /* log2(has
1040: 68 5f 73 69 7a 65 29 20 2a 2f 0a 20 20 20 20 75 h_size) */. u
1050: 49 6e 74 20 20 68 61 73 68 5f 6d 61 73 6b 3b 20 Int hash_mask;
1060: 20 20 20 20 20 2f 2a 20 68 61 73 68 5f 73 69 7a /* hash_siz
1070: 65 2d 31 20 2a 2f 0a 0a 20 20 20 20 75 49 6e 74 e-1 */.. uInt
1080: 20 20 68 61 73 68 5f 73 68 69 66 74 3b 0a 20 20 hash_shift;.
1090: 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f 66 20 62 /* Number of b
10a0: 69 74 73 20 62 79 20 77 68 69 63 68 20 69 6e 73 its by which ins
10b0: 5f 68 20 6d 75 73 74 20 62 65 20 73 68 69 66 74 _h must be shift
10c0: 65 64 20 61 74 20 65 61 63 68 20 69 6e 70 75 74 ed at each input
10d0: 0a 20 20 20 20 20 2a 20 73 74 65 70 2e 20 49 74 . * step. It
10e0: 20 6d 75 73 74 20 62 65 20 73 75 63 68 20 74 68 must be such th
10f0: 61 74 20 61 66 74 65 72 20 4d 49 4e 5f 4d 41 54 at after MIN_MAT
1100: 43 48 20 73 74 65 70 73 2c 20 74 68 65 20 6f 6c CH steps, the ol
1110: 64 65 73 74 0a 20 20 20 20 20 2a 20 62 79 74 65 dest. * byte
1120: 20 6e 6f 20 6c 6f 6e 67 65 72 20 74 61 6b 65 73 no longer takes
1130: 20 70 61 72 74 20 69 6e 20 74 68 65 20 68 61 73 part in the has
1140: 68 20 6b 65 79 2c 20 74 68 61 74 20 69 73 3a 0a h key, that is:.
1150: 20 20 20 20 20 2a 20 20 20 68 61 73 68 5f 73 68 * hash_sh
1160: 69 66 74 20 2a 20 4d 49 4e 5f 4d 41 54 43 48 20 ift * MIN_MATCH
1170: 3e 3d 20 68 61 73 68 5f 62 69 74 73 0a 20 20 20 >= hash_bits.
1180: 20 20 2a 2f 0a 0a 20 20 20 20 6c 6f 6e 67 20 62 */.. long b
1190: 6c 6f 63 6b 5f 73 74 61 72 74 3b 0a 20 20 20 20 lock_start;.
11a0: 2f 2a 20 57 69 6e 64 6f 77 20 70 6f 73 69 74 69 /* Window positi
11b0: 6f 6e 20 61 74 20 74 68 65 20 62 65 67 69 6e 6e on at the beginn
11c0: 69 6e 67 20 6f 66 20 74 68 65 20 63 75 72 72 65 ing of the curre
11d0: 6e 74 20 6f 75 74 70 75 74 20 62 6c 6f 63 6b 2e nt output block.
11e0: 20 47 65 74 73 0a 20 20 20 20 20 2a 20 6e 65 67 Gets. * neg
11f0: 61 74 69 76 65 20 77 68 65 6e 20 74 68 65 20 77 ative when the w
1200: 69 6e 64 6f 77 20 69 73 20 6d 6f 76 65 64 20 62 indow is moved b
1210: 61 63 6b 77 61 72 64 73 2e 0a 20 20 20 20 20 2a ackwards.. *
1220: 2f 0a 0a 20 20 20 20 75 49 6e 74 20 6d 61 74 63 /.. uInt matc
1230: 68 5f 6c 65 6e 67 74 68 3b 20 20 20 20 20 20 20 h_length;
1240: 20 20 20 20 2f 2a 20 6c 65 6e 67 74 68 20 6f 66 /* length of
1250: 20 62 65 73 74 20 6d 61 74 63 68 20 2a 2f 0a 20 best match */.
1260: 20 20 20 49 50 6f 73 20 70 72 65 76 5f 6d 61 74 IPos prev_mat
1270: 63 68 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ch;
1280: 2f 2a 20 70 72 65 76 69 6f 75 73 20 6d 61 74 63 /* previous matc
1290: 68 20 2a 2f 0a 20 20 20 20 69 6e 74 20 6d 61 74 h */. int mat
12a0: 63 68 5f 61 76 61 69 6c 61 62 6c 65 3b 20 20 20 ch_available;
12b0: 20 20 20 20 20 20 2f 2a 20 73 65 74 20 69 66 20 /* set if
12c0: 70 72 65 76 69 6f 75 73 20 6d 61 74 63 68 20 65 previous match e
12d0: 78 69 73 74 73 20 2a 2f 0a 20 20 20 20 75 49 6e xists */. uIn
12e0: 74 20 73 74 72 73 74 61 72 74 3b 20 20 20 20 20 t strstart;
12f0: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 73 74 61 /* sta
1300: 72 74 20 6f 66 20 73 74 72 69 6e 67 20 74 6f 20 rt of string to
1310: 69 6e 73 65 72 74 20 2a 2f 0a 20 20 20 20 75 49 insert */. uI
1320: 6e 74 20 6d 61 74 63 68 5f 73 74 61 72 74 3b 20 nt match_start;
1330: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 73 74 /* st
1340: 61 72 74 20 6f 66 20 6d 61 74 63 68 69 6e 67 20 art of matching
1350: 73 74 72 69 6e 67 20 2a 2f 0a 20 20 20 20 75 49 string */. uI
1360: 6e 74 20 6c 6f 6f 6b 61 68 65 61 64 3b 20 20 20 nt lookahead;
1370: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 6e 75 /* nu
1380: 6d 62 65 72 20 6f 66 20 76 61 6c 69 64 20 62 79 mber of valid by
1390: 74 65 73 20 61 68 65 61 64 20 69 6e 20 77 69 6e tes ahead in win
13a0: 64 6f 77 20 2a 2f 0a 0a 20 20 20 20 75 49 6e 74 dow */.. uInt
13b0: 20 70 72 65 76 5f 6c 65 6e 67 74 68 3b 0a 20 20 prev_length;.
13c0: 20 20 2f 2a 20 4c 65 6e 67 74 68 20 6f 66 20 74 /* Length of t
13d0: 68 65 20 62 65 73 74 20 6d 61 74 63 68 20 61 74 he best match at
13e0: 20 70 72 65 76 69 6f 75 73 20 73 74 65 70 2e 20 previous step.
13f0: 4d 61 74 63 68 65 73 20 6e 6f 74 20 67 72 65 61 Matches not grea
1400: 74 65 72 20 74 68 61 6e 20 74 68 69 73 0a 20 20 ter than this.
1410: 20 20 20 2a 20 61 72 65 20 64 69 73 63 61 72 64 * are discard
1420: 65 64 2e 20 54 68 69 73 20 69 73 20 75 73 65 64 ed. This is used
1430: 20 69 6e 20 74 68 65 20 6c 61 7a 79 20 6d 61 74 in the lazy mat
1440: 63 68 20 65 76 61 6c 75 61 74 69 6f 6e 2e 0a 20 ch evaluation..
1450: 20 20 20 20 2a 2f 0a 0a 20 20 20 20 75 49 6e 74 */.. uInt
1460: 20 6d 61 78 5f 63 68 61 69 6e 5f 6c 65 6e 67 74 max_chain_lengt
1470: 68 3b 0a 20 20 20 20 2f 2a 20 54 6f 20 73 70 65 h;. /* To spe
1480: 65 64 20 75 70 20 64 65 66 6c 61 74 69 6f 6e 2c ed up deflation,
1490: 20 68 61 73 68 20 63 68 61 69 6e 73 20 61 72 65 hash chains are
14a0: 20 6e 65 76 65 72 20 73 65 61 72 63 68 65 64 20 never searched
14b0: 62 65 79 6f 6e 64 20 74 68 69 73 0a 20 20 20 20 beyond this.
14c0: 20 2a 20 6c 65 6e 67 74 68 2e 20 20 41 20 68 69 * length. A hi
14d0: 67 68 65 72 20 6c 69 6d 69 74 20 69 6d 70 72 6f gher limit impro
14e0: 76 65 73 20 63 6f 6d 70 72 65 73 73 69 6f 6e 20 ves compression
14f0: 72 61 74 69 6f 20 62 75 74 20 64 65 67 72 61 64 ratio but degrad
1500: 65 73 20 74 68 65 0a 20 20 20 20 20 2a 20 73 70 es the. * sp
1510: 65 65 64 2e 0a 20 20 20 20 20 2a 2f 0a 0a 20 20 eed.. */..
1520: 20 20 75 49 6e 74 20 6d 61 78 5f 6c 61 7a 79 5f uInt max_lazy_
1530: 6d 61 74 63 68 3b 0a 20 20 20 20 2f 2a 20 41 74 match;. /* At
1540: 74 65 6d 70 74 20 74 6f 20 66 69 6e 64 20 61 20 tempt to find a
1550: 62 65 74 74 65 72 20 6d 61 74 63 68 20 6f 6e 6c better match onl
1560: 79 20 77 68 65 6e 20 74 68 65 20 63 75 72 72 65 y when the curre
1570: 6e 74 20 6d 61 74 63 68 20 69 73 20 73 74 72 69 nt match is stri
1580: 63 74 6c 79 0a 20 20 20 20 20 2a 20 73 6d 61 6c ctly. * smal
1590: 6c 65 72 20 74 68 61 6e 20 74 68 69 73 20 76 61 ler than this va
15a0: 6c 75 65 2e 20 54 68 69 73 20 6d 65 63 68 61 6e lue. This mechan
15b0: 69 73 6d 20 69 73 20 75 73 65 64 20 6f 6e 6c 79 ism is used only
15c0: 20 66 6f 72 20 63 6f 6d 70 72 65 73 73 69 6f 6e for compression
15d0: 0a 20 20 20 20 20 2a 20 6c 65 76 65 6c 73 20 3e . * levels >
15e0: 3d 20 34 2e 0a 20 20 20 20 20 2a 2f 0a 23 20 20 = 4.. */.#
15f0: 20 64 65 66 69 6e 65 20 6d 61 78 5f 69 6e 73 65 define max_inse
1600: 72 74 5f 6c 65 6e 67 74 68 20 20 6d 61 78 5f 6c rt_length max_l
1610: 61 7a 79 5f 6d 61 74 63 68 0a 20 20 20 20 2f 2a azy_match. /*
1620: 20 49 6e 73 65 72 74 20 6e 65 77 20 73 74 72 69 Insert new stri
1630: 6e 67 73 20 69 6e 20 74 68 65 20 68 61 73 68 20 ngs in the hash
1640: 74 61 62 6c 65 20 6f 6e 6c 79 20 69 66 20 74 68 table only if th
1650: 65 20 6d 61 74 63 68 20 6c 65 6e 67 74 68 20 69 e match length i
1660: 73 20 6e 6f 74 0a 20 20 20 20 20 2a 20 67 72 65 s not. * gre
1670: 61 74 65 72 20 74 68 61 6e 20 74 68 69 73 20 6c ater than this l
1680: 65 6e 67 74 68 2e 20 54 68 69 73 20 73 61 76 65 ength. This save
1690: 73 20 74 69 6d 65 20 62 75 74 20 64 65 67 72 61 s time but degra
16a0: 64 65 73 20 63 6f 6d 70 72 65 73 73 69 6f 6e 2e des compression.
16b0: 0a 20 20 20 20 20 2a 20 6d 61 78 5f 69 6e 73 65 . * max_inse
16c0: 72 74 5f 6c 65 6e 67 74 68 20 69 73 20 75 73 65 rt_length is use
16d0: 64 20 6f 6e 6c 79 20 66 6f 72 20 63 6f 6d 70 72 d only for compr
16e0: 65 73 73 69 6f 6e 20 6c 65 76 65 6c 73 20 3c 3d ession levels <=
16f0: 20 33 2e 0a 20 20 20 20 20 2a 2f 0a 0a 20 20 20 3.. */..
1700: 20 69 6e 74 20 6c 65 76 65 6c 3b 20 20 20 20 2f int level; /
1710: 2a 20 63 6f 6d 70 72 65 73 73 69 6f 6e 20 6c 65 * compression le
1720: 76 65 6c 20 28 31 2e 2e 39 29 20 2a 2f 0a 20 20 vel (1..9) */.
1730: 20 20 69 6e 74 20 73 74 72 61 74 65 67 79 3b 20 int strategy;
1740: 2f 2a 20 66 61 76 6f 72 20 6f 72 20 66 6f 72 63 /* favor or forc
1750: 65 20 48 75 66 66 6d 61 6e 20 63 6f 64 69 6e 67 e Huffman coding
1760: 2a 2f 0a 0a 20 20 20 20 75 49 6e 74 20 67 6f 6f */.. uInt goo
1770: 64 5f 6d 61 74 63 68 3b 0a 20 20 20 20 2f 2a 20 d_match;. /*
1780: 55 73 65 20 61 20 66 61 73 74 65 72 20 73 65 61 Use a faster sea
1790: 72 63 68 20 77 68 65 6e 20 74 68 65 20 70 72 65 rch when the pre
17a0: 76 69 6f 75 73 20 6d 61 74 63 68 20 69 73 20 6c vious match is l
17b0: 6f 6e 67 65 72 20 74 68 61 6e 20 74 68 69 73 20 onger than this
17c0: 2a 2f 0a 0a 20 20 20 20 69 6e 74 20 6e 69 63 65 */.. int nice
17d0: 5f 6d 61 74 63 68 3b 20 2f 2a 20 53 74 6f 70 20 _match; /* Stop
17e0: 73 65 61 72 63 68 69 6e 67 20 77 68 65 6e 20 63 searching when c
17f0: 75 72 72 65 6e 74 20 6d 61 74 63 68 20 65 78 63 urrent match exc
1800: 65 65 64 73 20 74 68 69 73 20 2a 2f 0a 0a 20 20 eeds this */..
1810: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
1820: 20 75 73 65 64 20 62 79 20 74 72 65 65 73 2e 63 used by trees.c
1830: 3a 20 2a 2f 0a 20 20 20 20 2f 2a 20 44 69 64 6e : */. /* Didn
1840: 27 74 20 75 73 65 20 63 74 5f 64 61 74 61 20 74 't use ct_data t
1850: 79 70 65 64 65 66 20 62 65 6c 6f 77 20 74 6f 20 ypedef below to
1860: 73 75 70 72 65 73 73 20 63 6f 6d 70 69 6c 65 72 supress compiler
1870: 20 77 61 72 6e 69 6e 67 20 2a 2f 0a 20 20 20 20 warning */.
1880: 73 74 72 75 63 74 20 63 74 5f 64 61 74 61 5f 73 struct ct_data_s
1890: 20 64 79 6e 5f 6c 74 72 65 65 5b 48 45 41 50 5f dyn_ltree[HEAP_
18a0: 53 49 5a 45 5d 3b 20 20 20 2f 2a 20 6c 69 74 65 SIZE]; /* lite
18b0: 72 61 6c 20 61 6e 64 20 6c 65 6e 67 74 68 20 74 ral and length t
18c0: 72 65 65 20 2a 2f 0a 20 20 20 20 73 74 72 75 63 ree */. struc
18d0: 74 20 63 74 5f 64 61 74 61 5f 73 20 64 79 6e 5f t ct_data_s dyn_
18e0: 64 74 72 65 65 5b 32 2a 44 5f 43 4f 44 45 53 2b dtree[2*D_CODES+
18f0: 31 5d 3b 20 2f 2a 20 64 69 73 74 61 6e 63 65 20 1]; /* distance
1900: 74 72 65 65 20 2a 2f 0a 20 20 20 20 73 74 72 75 tree */. stru
1910: 63 74 20 63 74 5f 64 61 74 61 5f 73 20 62 6c 5f ct ct_data_s bl_
1920: 74 72 65 65 5b 32 2a 42 4c 5f 43 4f 44 45 53 2b tree[2*BL_CODES+
1930: 31 5d 3b 20 20 2f 2a 20 48 75 66 66 6d 61 6e 20 1]; /* Huffman
1940: 74 72 65 65 20 66 6f 72 20 62 69 74 20 6c 65 6e tree for bit len
1950: 67 74 68 73 20 2a 2f 0a 0a 20 20 20 20 73 74 72 gths */.. str
1960: 75 63 74 20 74 72 65 65 5f 64 65 73 63 5f 73 20 uct tree_desc_s
1970: 6c 5f 64 65 73 63 3b 20 20 20 20 20 20 20 20 20 l_desc;
1980: 20 20 20 20 20 20 2f 2a 20 64 65 73 63 2e 20 66 /* desc. f
1990: 6f 72 20 6c 69 74 65 72 61 6c 20 74 72 65 65 20 or literal tree
19a0: 2a 2f 0a 20 20 20 20 73 74 72 75 63 74 20 74 72 */. struct tr
19b0: 65 65 5f 64 65 73 63 5f 73 20 64 5f 64 65 73 63 ee_desc_s d_desc
19c0: 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ;
19d0: 2f 2a 20 64 65 73 63 2e 20 66 6f 72 20 64 69 73 /* desc. for dis
19e0: 74 61 6e 63 65 20 74 72 65 65 20 2a 2f 0a 20 20 tance tree */.
19f0: 20 20 73 74 72 75 63 74 20 74 72 65 65 5f 64 65 struct tree_de
1a00: 73 63 5f 73 20 62 6c 5f 64 65 73 63 3b 20 20 20 sc_s bl_desc;
1a10: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 64 65 /* de
1a20: 73 63 2e 20 66 6f 72 20 62 69 74 20 6c 65 6e 67 sc. for bit leng
1a30: 74 68 20 74 72 65 65 20 2a 2f 0a 0a 20 20 20 20 th tree */..
1a40: 75 73 68 20 62 6c 5f 63 6f 75 6e 74 5b 4d 41 58 ush bl_count[MAX
1a50: 5f 42 49 54 53 2b 31 5d 3b 0a 20 20 20 20 2f 2a _BITS+1];. /*
1a60: 20 6e 75 6d 62 65 72 20 6f 66 20 63 6f 64 65 73 number of codes
1a70: 20 61 74 20 65 61 63 68 20 62 69 74 20 6c 65 6e at each bit len
1a80: 67 74 68 20 66 6f 72 20 61 6e 20 6f 70 74 69 6d gth for an optim
1a90: 61 6c 20 74 72 65 65 20 2a 2f 0a 0a 20 20 20 20 al tree */..
1aa0: 69 6e 74 20 68 65 61 70 5b 32 2a 4c 5f 43 4f 44 int heap[2*L_COD
1ab0: 45 53 2b 31 5d 3b 20 20 20 20 20 20 2f 2a 20 68 ES+1]; /* h
1ac0: 65 61 70 20 75 73 65 64 20 74 6f 20 62 75 69 6c eap used to buil
1ad0: 64 20 74 68 65 20 48 75 66 66 6d 61 6e 20 74 72 d the Huffman tr
1ae0: 65 65 73 20 2a 2f 0a 20 20 20 20 69 6e 74 20 68 ees */. int h
1af0: 65 61 70 5f 6c 65 6e 3b 20 20 20 20 20 20 20 20 eap_len;
1b00: 20 20 20 20 20 20 20 2f 2a 20 6e 75 6d 62 65 72 /* number
1b10: 20 6f 66 20 65 6c 65 6d 65 6e 74 73 20 69 6e 20 of elements in
1b20: 74 68 65 20 68 65 61 70 20 2a 2f 0a 20 20 20 20 the heap */.
1b30: 69 6e 74 20 68 65 61 70 5f 6d 61 78 3b 20 20 20 int heap_max;
1b40: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 65 /* e
1b50: 6c 65 6d 65 6e 74 20 6f 66 20 6c 61 72 67 65 73 lement of larges
1b60: 74 20 66 72 65 71 75 65 6e 63 79 20 2a 2f 0a 20 t frequency */.
1b70: 20 20 20 2f 2a 20 54 68 65 20 73 6f 6e 73 20 6f /* The sons o
1b80: 66 20 68 65 61 70 5b 6e 5d 20 61 72 65 20 68 65 f heap[n] are he
1b90: 61 70 5b 32 2a 6e 5d 20 61 6e 64 20 68 65 61 70 ap[2*n] and heap
1ba0: 5b 32 2a 6e 2b 31 5d 2e 20 68 65 61 70 5b 30 5d [2*n+1]. heap[0]
1bb0: 20 69 73 20 6e 6f 74 20 75 73 65 64 2e 0a 20 20 is not used..
1bc0: 20 20 20 2a 20 54 68 65 20 73 61 6d 65 20 68 65 * The same he
1bd0: 61 70 20 61 72 72 61 79 20 69 73 20 75 73 65 64 ap array is used
1be0: 20 74 6f 20 62 75 69 6c 64 20 61 6c 6c 20 74 72 to build all tr
1bf0: 65 65 73 2e 0a 20 20 20 20 20 2a 2f 0a 0a 20 20 ees.. */..
1c00: 20 20 75 63 68 20 64 65 70 74 68 5b 32 2a 4c 5f uch depth[2*L_
1c10: 43 4f 44 45 53 2b 31 5d 3b 0a 20 20 20 20 2f 2a CODES+1];. /*
1c20: 20 44 65 70 74 68 20 6f 66 20 65 61 63 68 20 73 Depth of each s
1c30: 75 62 74 72 65 65 20 75 73 65 64 20 61 73 20 74 ubtree used as t
1c40: 69 65 20 62 72 65 61 6b 65 72 20 66 6f 72 20 74 ie breaker for t
1c50: 72 65 65 73 20 6f 66 20 65 71 75 61 6c 20 66 72 rees of equal fr
1c60: 65 71 75 65 6e 63 79 0a 20 20 20 20 20 2a 2f 0a equency. */.
1c70: 0a 20 20 20 20 75 63 68 66 20 2a 6c 5f 62 75 66 . uchf *l_buf
1c80: 3b 20 20 20 20 20 20 20 20 20 20 2f 2a 20 62 75 ; /* bu
1c90: 66 66 65 72 20 66 6f 72 20 6c 69 74 65 72 61 6c ffer for literal
1ca0: 73 20 6f 72 20 6c 65 6e 67 74 68 73 20 2a 2f 0a s or lengths */.
1cb0: 0a 20 20 20 20 75 49 6e 74 20 20 6c 69 74 5f 62 . uInt lit_b
1cc0: 75 66 73 69 7a 65 3b 0a 20 20 20 20 2f 2a 20 53 ufsize;. /* S
1cd0: 69 7a 65 20 6f 66 20 6d 61 74 63 68 20 62 75 66 ize of match buf
1ce0: 66 65 72 20 66 6f 72 20 6c 69 74 65 72 61 6c 73 fer for literals
1cf0: 2f 6c 65 6e 67 74 68 73 2e 20 20 54 68 65 72 65 /lengths. There
1d00: 20 61 72 65 20 34 20 72 65 61 73 6f 6e 73 20 66 are 4 reasons f
1d10: 6f 72 0a 20 20 20 20 20 2a 20 6c 69 6d 69 74 69 or. * limiti
1d20: 6e 67 20 6c 69 74 5f 62 75 66 73 69 7a 65 20 74 ng lit_bufsize t
1d30: 6f 20 36 34 4b 3a 0a 20 20 20 20 20 2a 20 20 20 o 64K:. *
1d40: 2d 20 66 72 65 71 75 65 6e 63 69 65 73 20 63 61 - frequencies ca
1d50: 6e 20 62 65 20 6b 65 70 74 20 69 6e 20 31 36 20 n be kept in 16
1d60: 62 69 74 20 63 6f 75 6e 74 65 72 73 0a 20 20 20 bit counters.
1d70: 20 20 2a 20 20 20 2d 20 69 66 20 63 6f 6d 70 72 * - if compr
1d80: 65 73 73 69 6f 6e 20 69 73 20 6e 6f 74 20 73 75 ession is not su
1d90: 63 63 65 73 73 66 75 6c 20 66 6f 72 20 74 68 65 ccessful for the
1da0: 20 66 69 72 73 74 20 62 6c 6f 63 6b 2c 20 61 6c first block, al
1db0: 6c 20 69 6e 70 75 74 0a 20 20 20 20 20 2a 20 20 l input. *
1dc0: 20 20 20 64 61 74 61 20 69 73 20 73 74 69 6c 6c data is still
1dd0: 20 69 6e 20 74 68 65 20 77 69 6e 64 6f 77 20 73 in the window s
1de0: 6f 20 77 65 20 63 61 6e 20 73 74 69 6c 6c 20 65 o we can still e
1df0: 6d 69 74 20 61 20 73 74 6f 72 65 64 20 62 6c 6f mit a stored blo
1e00: 63 6b 20 65 76 65 6e 0a 20 20 20 20 20 2a 20 20 ck even. *
1e10: 20 20 20 77 68 65 6e 20 69 6e 70 75 74 20 63 6f when input co
1e20: 6d 65 73 20 66 72 6f 6d 20 73 74 61 6e 64 61 72 mes from standar
1e30: 64 20 69 6e 70 75 74 2e 20 20 28 54 68 69 73 20 d input. (This
1e40: 63 61 6e 20 61 6c 73 6f 20 62 65 20 64 6f 6e 65 can also be done
1e50: 20 66 6f 72 0a 20 20 20 20 20 2a 20 20 20 20 20 for. *
1e60: 61 6c 6c 20 62 6c 6f 63 6b 73 20 69 66 20 6c 69 all blocks if li
1e70: 74 5f 62 75 66 73 69 7a 65 20 69 73 20 6e 6f 74 t_bufsize is not
1e80: 20 67 72 65 61 74 65 72 20 74 68 61 6e 20 33 32 greater than 32
1e90: 4b 2e 29 0a 20 20 20 20 20 2a 20 20 20 2d 20 69 K.). * - i
1ea0: 66 20 63 6f 6d 70 72 65 73 73 69 6f 6e 20 69 73 f compression is
1eb0: 20 6e 6f 74 20 73 75 63 63 65 73 73 66 75 6c 20 not successful
1ec0: 66 6f 72 20 61 20 66 69 6c 65 20 73 6d 61 6c 6c for a file small
1ed0: 65 72 20 74 68 61 6e 20 36 34 4b 2c 20 77 65 20 er than 64K, we
1ee0: 63 61 6e 0a 20 20 20 20 20 2a 20 20 20 20 20 65 can. * e
1ef0: 76 65 6e 20 65 6d 69 74 20 61 20 73 74 6f 72 65 ven emit a store
1f00: 64 20 66 69 6c 65 20 69 6e 73 74 65 61 64 20 6f d file instead o
1f10: 66 20 61 20 73 74 6f 72 65 64 20 62 6c 6f 63 6b f a stored block
1f20: 20 28 73 61 76 69 6e 67 20 35 20 62 79 74 65 73 (saving 5 bytes
1f30: 29 2e 0a 20 20 20 20 20 2a 20 20 20 20 20 54 68 ).. * Th
1f40: 69 73 20 69 73 20 61 70 70 6c 69 63 61 62 6c 65 is is applicable
1f50: 20 6f 6e 6c 79 20 66 6f 72 20 7a 69 70 20 28 6e only for zip (n
1f60: 6f 74 20 67 7a 69 70 20 6f 72 20 7a 6c 69 62 29 ot gzip or zlib)
1f70: 2e 0a 20 20 20 20 20 2a 20 20 20 2d 20 63 72 65 .. * - cre
1f80: 61 74 69 6e 67 20 6e 65 77 20 48 75 66 66 6d 61 ating new Huffma
1f90: 6e 20 74 72 65 65 73 20 6c 65 73 73 20 66 72 65 n trees less fre
1fa0: 71 75 65 6e 74 6c 79 20 6d 61 79 20 6e 6f 74 20 quently may not
1fb0: 70 72 6f 76 69 64 65 20 66 61 73 74 0a 20 20 20 provide fast.
1fc0: 20 20 2a 20 20 20 20 20 61 64 61 70 74 61 74 69 * adaptati
1fd0: 6f 6e 20 74 6f 20 63 68 61 6e 67 65 73 20 69 6e on to changes in
1fe0: 20 74 68 65 20 69 6e 70 75 74 20 64 61 74 61 20 the input data
1ff0: 73 74 61 74 69 73 74 69 63 73 2e 20 28 54 61 6b statistics. (Tak
2000: 65 20 66 6f 72 0a 20 20 20 20 20 2a 20 20 20 20 e for. *
2010: 20 65 78 61 6d 70 6c 65 20 61 20 62 69 6e 61 72 example a binar
2020: 79 20 66 69 6c 65 20 77 69 74 68 20 70 6f 6f 72 y file with poor
2030: 6c 79 20 63 6f 6d 70 72 65 73 73 69 62 6c 65 20 ly compressible
2040: 63 6f 64 65 20 66 6f 6c 6c 6f 77 65 64 20 62 79 code followed by
2050: 0a 20 20 20 20 20 2a 20 20 20 20 20 61 20 68 69 . * a hi
2060: 67 68 6c 79 20 63 6f 6d 70 72 65 73 73 69 62 6c ghly compressibl
2070: 65 20 73 74 72 69 6e 67 20 74 61 62 6c 65 2e 29 e string table.)
2080: 20 53 6d 61 6c 6c 65 72 20 62 75 66 66 65 72 20 Smaller buffer
2090: 73 69 7a 65 73 20 67 69 76 65 0a 20 20 20 20 20 sizes give.
20a0: 2a 20 20 20 20 20 66 61 73 74 20 61 64 61 70 74 * fast adapt
20b0: 61 74 69 6f 6e 20 62 75 74 20 68 61 76 65 20 6f ation but have o
20c0: 66 20 63 6f 75 72 73 65 20 74 68 65 20 6f 76 65 f course the ove
20d0: 72 68 65 61 64 20 6f 66 20 74 72 61 6e 73 6d 69 rhead of transmi
20e0: 74 74 69 6e 67 0a 20 20 20 20 20 2a 20 20 20 20 tting. *
20f0: 20 74 72 65 65 73 20 6d 6f 72 65 20 66 72 65 71 trees more freq
2100: 75 65 6e 74 6c 79 2e 0a 20 20 20 20 20 2a 20 20 uently.. *
2110: 20 2d 20 49 20 63 61 6e 27 74 20 63 6f 75 6e 74 - I can't count
2120: 20 61 62 6f 76 65 20 34 0a 20 20 20 20 20 2a 2f above 4. */
2130: 0a 0a 20 20 20 20 75 49 6e 74 20 6c 61 73 74 5f .. uInt last_
2140: 6c 69 74 3b 20 20 20 20 20 20 2f 2a 20 72 75 6e lit; /* run
2150: 6e 69 6e 67 20 69 6e 64 65 78 20 69 6e 20 6c 5f ning index in l_
2160: 62 75 66 20 2a 2f 0a 0a 20 20 20 20 75 73 68 66 buf */.. ushf
2170: 20 2a 64 5f 62 75 66 3b 0a 20 20 20 20 2f 2a 20 *d_buf;. /*
2180: 42 75 66 66 65 72 20 66 6f 72 20 64 69 73 74 61 Buffer for dista
2190: 6e 63 65 73 2e 20 54 6f 20 73 69 6d 70 6c 69 66 nces. To simplif
21a0: 79 20 74 68 65 20 63 6f 64 65 2c 20 64 5f 62 75 y the code, d_bu
21b0: 66 20 61 6e 64 20 6c 5f 62 75 66 20 68 61 76 65 f and l_buf have
21c0: 0a 20 20 20 20 20 2a 20 74 68 65 20 73 61 6d 65 . * the same
21d0: 20 6e 75 6d 62 65 72 20 6f 66 20 65 6c 65 6d 65 number of eleme
21e0: 6e 74 73 2e 20 54 6f 20 75 73 65 20 64 69 66 66 nts. To use diff
21f0: 65 72 65 6e 74 20 6c 65 6e 67 74 68 73 2c 20 61 erent lengths, a
2200: 6e 20 65 78 74 72 61 20 66 6c 61 67 0a 20 20 20 n extra flag.
2210: 20 20 2a 20 61 72 72 61 79 20 77 6f 75 6c 64 20 * array would
2220: 62 65 20 6e 65 63 65 73 73 61 72 79 2e 0a 20 20 be necessary..
2230: 20 20 20 2a 2f 0a 0a 20 20 20 20 75 6c 67 20 6f */.. ulg o
2240: 70 74 5f 6c 65 6e 3b 20 20 20 20 20 20 20 20 2f pt_len; /
2250: 2a 20 62 69 74 20 6c 65 6e 67 74 68 20 6f 66 20 * bit length of
2260: 63 75 72 72 65 6e 74 20 62 6c 6f 63 6b 20 77 69 current block wi
2270: 74 68 20 6f 70 74 69 6d 61 6c 20 74 72 65 65 73 th optimal trees
2280: 20 2a 2f 0a 20 20 20 20 75 6c 67 20 73 74 61 74 */. ulg stat
2290: 69 63 5f 6c 65 6e 3b 20 20 20 20 20 2f 2a 20 62 ic_len; /* b
22a0: 69 74 20 6c 65 6e 67 74 68 20 6f 66 20 63 75 72 it length of cur
22b0: 72 65 6e 74 20 62 6c 6f 63 6b 20 77 69 74 68 20 rent block with
22c0: 73 74 61 74 69 63 20 74 72 65 65 73 20 2a 2f 0a static trees */.
22d0: 20 20 20 20 75 49 6e 74 20 6d 61 74 63 68 65 73 uInt matches
22e0: 3b 20 20 20 20 20 20 20 2f 2a 20 6e 75 6d 62 65 ; /* numbe
22f0: 72 20 6f 66 20 73 74 72 69 6e 67 20 6d 61 74 63 r of string matc
2300: 68 65 73 20 69 6e 20 63 75 72 72 65 6e 74 20 62 hes in current b
2310: 6c 6f 63 6b 20 2a 2f 0a 20 20 20 20 69 6e 74 20 lock */. int
2320: 6c 61 73 74 5f 65 6f 62 5f 6c 65 6e 3b 20 20 20 last_eob_len;
2330: 2f 2a 20 62 69 74 20 6c 65 6e 67 74 68 20 6f 66 /* bit length of
2340: 20 45 4f 42 20 63 6f 64 65 20 66 6f 72 20 6c 61 EOB code for la
2350: 73 74 20 62 6c 6f 63 6b 20 2a 2f 0a 0a 23 69 66 st block */..#if
2360: 64 65 66 20 44 45 42 55 47 0a 20 20 20 20 75 6c def DEBUG. ul
2370: 67 20 63 6f 6d 70 72 65 73 73 65 64 5f 6c 65 6e g compressed_len
2380: 3b 20 2f 2a 20 74 6f 74 61 6c 20 62 69 74 20 6c ; /* total bit l
2390: 65 6e 67 74 68 20 6f 66 20 63 6f 6d 70 72 65 73 ength of compres
23a0: 73 65 64 20 66 69 6c 65 20 6d 6f 64 20 32 5e 33 sed file mod 2^3
23b0: 32 20 2a 2f 0a 20 20 20 20 75 6c 67 20 62 69 74 2 */. ulg bit
23c0: 73 5f 73 65 6e 74 3b 20 20 20 20 20 20 2f 2a 20 s_sent; /*
23d0: 62 69 74 20 6c 65 6e 67 74 68 20 6f 66 20 63 6f bit length of co
23e0: 6d 70 72 65 73 73 65 64 20 64 61 74 61 20 73 65 mpressed data se
23f0: 6e 74 20 6d 6f 64 20 32 5e 33 32 20 2a 2f 0a 23 nt mod 2^32 */.#
2400: 65 6e 64 69 66 0a 0a 20 20 20 20 75 73 68 20 62 endif.. ush b
2410: 69 5f 62 75 66 3b 0a 20 20 20 20 2f 2a 20 4f 75 i_buf;. /* Ou
2420: 74 70 75 74 20 62 75 66 66 65 72 2e 20 62 69 74 tput buffer. bit
2430: 73 20 61 72 65 20 69 6e 73 65 72 74 65 64 20 73 s are inserted s
2440: 74 61 72 74 69 6e 67 20 61 74 20 74 68 65 20 62 tarting at the b
2450: 6f 74 74 6f 6d 20 28 6c 65 61 73 74 0a 20 20 20 ottom (least.
2460: 20 20 2a 20 73 69 67 6e 69 66 69 63 61 6e 74 20 * significant
2470: 62 69 74 73 29 2e 0a 20 20 20 20 20 2a 2f 0a 20 bits).. */.
2480: 20 20 20 69 6e 74 20 62 69 5f 76 61 6c 69 64 3b int bi_valid;
2490: 0a 20 20 20 20 2f 2a 20 4e 75 6d 62 65 72 20 6f . /* Number o
24a0: 66 20 76 61 6c 69 64 20 62 69 74 73 20 69 6e 20 f valid bits in
24b0: 62 69 5f 62 75 66 2e 20 20 41 6c 6c 20 62 69 74 bi_buf. All bit
24c0: 73 20 61 62 6f 76 65 20 74 68 65 20 6c 61 73 74 s above the last
24d0: 20 76 61 6c 69 64 20 62 69 74 0a 20 20 20 20 20 valid bit.
24e0: 2a 20 61 72 65 20 61 6c 77 61 79 73 20 7a 65 72 * are always zer
24f0: 6f 2e 0a 20 20 20 20 20 2a 2f 0a 0a 7d 20 46 41 o.. */..} FA
2500: 52 20 64 65 66 6c 61 74 65 5f 73 74 61 74 65 3b R deflate_state;
2510: 0a 0a 2f 2a 20 4f 75 74 70 75 74 20 61 20 62 79 ../* Output a by
2520: 74 65 20 6f 6e 20 74 68 65 20 73 74 72 65 61 6d te on the stream
2530: 2e 0a 20 2a 20 49 4e 20 61 73 73 65 72 74 69 6f .. * IN assertio
2540: 6e 3a 20 74 68 65 72 65 20 69 73 20 65 6e 6f 75 n: there is enou
2550: 67 68 20 72 6f 6f 6d 20 69 6e 20 70 65 6e 64 69 gh room in pendi
2560: 6e 67 5f 62 75 66 2e 0a 20 2a 2f 0a 23 64 65 66 ng_buf.. */.#def
2570: 69 6e 65 20 70 75 74 5f 62 79 74 65 28 73 2c 20 ine put_byte(s,
2580: 63 29 20 7b 73 2d 3e 70 65 6e 64 69 6e 67 5f 62 c) {s->pending_b
2590: 75 66 5b 73 2d 3e 70 65 6e 64 69 6e 67 2b 2b 5d uf[s->pending++]
25a0: 20 3d 20 28 63 29 3b 7d 0a 0a 0a 23 64 65 66 69 = (c);}...#defi
25b0: 6e 65 20 4d 49 4e 5f 4c 4f 4f 4b 41 48 45 41 44 ne MIN_LOOKAHEAD
25c0: 20 28 4d 41 58 5f 4d 41 54 43 48 2b 4d 49 4e 5f (MAX_MATCH+MIN_
25d0: 4d 41 54 43 48 2b 31 29 0a 2f 2a 20 4d 69 6e 69 MATCH+1)./* Mini
25e0: 6d 75 6d 20 61 6d 6f 75 6e 74 20 6f 66 20 6c 6f mum amount of lo
25f0: 6f 6b 61 68 65 61 64 2c 20 65 78 63 65 70 74 20 okahead, except
2600: 61 74 20 74 68 65 20 65 6e 64 20 6f 66 20 74 68 at the end of th
2610: 65 20 69 6e 70 75 74 20 66 69 6c 65 2e 0a 20 2a e input file.. *
2620: 20 53 65 65 20 64 65 66 6c 61 74 65 2e 63 20 66 See deflate.c f
2630: 6f 72 20 63 6f 6d 6d 65 6e 74 73 20 61 62 6f 75 or comments abou
2640: 74 20 74 68 65 20 4d 49 4e 5f 4d 41 54 43 48 2b t the MIN_MATCH+
2650: 31 2e 0a 20 2a 2f 0a 0a 23 64 65 66 69 6e 65 20 1.. */..#define
2660: 4d 41 58 5f 44 49 53 54 28 73 29 20 20 28 28 73 MAX_DIST(s) ((s
2670: 29 2d 3e 77 5f 73 69 7a 65 2d 4d 49 4e 5f 4c 4f )->w_size-MIN_LO
2680: 4f 4b 41 48 45 41 44 29 0a 2f 2a 20 49 6e 20 6f OKAHEAD)./* In o
2690: 72 64 65 72 20 74 6f 20 73 69 6d 70 6c 69 66 79 rder to simplify
26a0: 20 74 68 65 20 63 6f 64 65 2c 20 70 61 72 74 69 the code, parti
26b0: 63 75 6c 61 72 6c 79 20 6f 6e 20 31 36 20 62 69 cularly on 16 bi
26c0: 74 20 6d 61 63 68 69 6e 65 73 2c 20 6d 61 74 63 t machines, matc
26d0: 68 0a 20 2a 20 64 69 73 74 61 6e 63 65 73 20 61 h. * distances a
26e0: 72 65 20 6c 69 6d 69 74 65 64 20 74 6f 20 4d 41 re limited to MA
26f0: 58 5f 44 49 53 54 20 69 6e 73 74 65 61 64 20 6f X_DIST instead o
2700: 66 20 57 53 49 5a 45 2e 0a 20 2a 2f 0a 0a 20 20 f WSIZE.. */..
2710: 20 20 20 20 20 20 2f 2a 20 69 6e 20 74 72 65 65 /* in tree
2720: 73 2e 63 20 2a 2f 0a 76 6f 69 64 20 5f 74 72 5f s.c */.void _tr_
2730: 69 6e 69 74 20 20 20 20 20 20 20 20 20 4f 46 28 init OF(
2740: 28 64 65 66 6c 61 74 65 5f 73 74 61 74 65 20 2a (deflate_state *
2750: 73 29 29 3b 0a 69 6e 74 20 20 5f 74 72 5f 74 61 s));.int _tr_ta
2760: 6c 6c 79 20 20 20 20 20 20 20 20 4f 46 28 28 64 lly OF((d
2770: 65 66 6c 61 74 65 5f 73 74 61 74 65 20 2a 73 2c eflate_state *s,
2780: 20 75 6e 73 69 67 6e 65 64 20 64 69 73 74 2c 20 unsigned dist,
2790: 75 6e 73 69 67 6e 65 64 20 6c 63 29 29 3b 0a 76 unsigned lc));.v
27a0: 6f 69 64 20 5f 74 72 5f 66 6c 75 73 68 5f 62 6c oid _tr_flush_bl
27b0: 6f 63 6b 20 20 4f 46 28 28 64 65 66 6c 61 74 65 ock OF((deflate
27c0: 5f 73 74 61 74 65 20 2a 73 2c 20 63 68 61 72 66 _state *s, charf
27d0: 20 2a 62 75 66 2c 20 75 6c 67 20 73 74 6f 72 65 *buf, ulg store
27e0: 64 5f 6c 65 6e 2c 0a 09 09 09 20 20 69 6e 74 20 d_len,.... int
27f0: 65 6f 66 29 29 3b 0a 76 6f 69 64 20 5f 74 72 5f eof));.void _tr_
2800: 61 6c 69 67 6e 20 20 20 20 20 20 20 20 4f 46 28 align OF(
2810: 28 64 65 66 6c 61 74 65 5f 73 74 61 74 65 20 2a (deflate_state *
2820: 73 29 29 3b 0a 76 6f 69 64 20 5f 74 72 5f 73 74 s));.void _tr_st
2830: 6f 72 65 64 5f 62 6c 6f 63 6b 20 4f 46 28 28 64 ored_block OF((d
2840: 65 66 6c 61 74 65 5f 73 74 61 74 65 20 2a 73 2c eflate_state *s,
2850: 20 63 68 61 72 66 20 2a 62 75 66 2c 20 75 6c 67 charf *buf, ulg
2860: 20 73 74 6f 72 65 64 5f 6c 65 6e 2c 0a 20 20 20 stored_len,.
2870: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2880: 20 20 20 20 20 20 20 69 6e 74 20 65 6f 66 29 29 int eof))
2890: 3b 0a 0a 23 64 65 66 69 6e 65 20 64 5f 63 6f 64 ;..#define d_cod
28a0: 65 28 64 69 73 74 29 20 5c 0a 20 20 20 28 28 64 e(dist) \. ((d
28b0: 69 73 74 29 20 3c 20 32 35 36 20 3f 20 5f 64 69 ist) < 256 ? _di
28c0: 73 74 5f 63 6f 64 65 5b 64 69 73 74 5d 20 3a 20 st_code[dist] :
28d0: 5f 64 69 73 74 5f 63 6f 64 65 5b 32 35 36 2b 28 _dist_code[256+(
28e0: 28 64 69 73 74 29 3e 3e 37 29 5d 29 0a 2f 2a 20 (dist)>>7)])./*
28f0: 4d 61 70 70 69 6e 67 20 66 72 6f 6d 20 61 20 64 Mapping from a d
2900: 69 73 74 61 6e 63 65 20 74 6f 20 61 20 64 69 73 istance to a dis
2910: 74 61 6e 63 65 20 63 6f 64 65 2e 20 64 69 73 74 tance code. dist
2920: 20 69 73 20 74 68 65 20 64 69 73 74 61 6e 63 65 is the distance
2930: 20 2d 20 31 20 61 6e 64 0a 20 2a 20 6d 75 73 74 - 1 and. * must
2940: 20 6e 6f 74 20 68 61 76 65 20 73 69 64 65 20 65 not have side e
2950: 66 66 65 63 74 73 2e 20 5f 64 69 73 74 5f 63 6f ffects. _dist_co
2960: 64 65 5b 32 35 36 5d 20 61 6e 64 20 5f 64 69 73 de[256] and _dis
2970: 74 5f 63 6f 64 65 5b 32 35 37 5d 20 61 72 65 20 t_code[257] are
2980: 6e 65 76 65 72 0a 20 2a 20 75 73 65 64 2e 0a 20 never. * used..
2990: 2a 2f 0a 0a 23 69 66 6e 64 65 66 20 44 45 42 55 */..#ifndef DEBU
29a0: 47 0a 2f 2a 20 49 6e 6c 69 6e 65 20 76 65 72 73 G./* Inline vers
29b0: 69 6f 6e 73 20 6f 66 20 5f 74 72 5f 74 61 6c 6c ions of _tr_tall
29c0: 79 20 66 6f 72 20 73 70 65 65 64 3a 20 2a 2f 0a y for speed: */.
29d0: 0a 23 69 66 20 64 65 66 69 6e 65 64 28 47 45 4e .#if defined(GEN
29e0: 5f 54 52 45 45 53 5f 48 29 20 7c 7c 20 21 64 65 _TREES_H) || !de
29f0: 66 69 6e 65 64 28 53 54 44 43 29 0a 20 20 65 78 fined(STDC). ex
2a00: 74 65 72 6e 20 75 63 68 20 5f 6c 65 6e 67 74 68 tern uch _length
2a10: 5f 63 6f 64 65 5b 5d 3b 0a 20 20 65 78 74 65 72 _code[];. exter
2a20: 6e 20 75 63 68 20 5f 64 69 73 74 5f 63 6f 64 65 n uch _dist_code
2a30: 5b 5d 3b 0a 23 65 6c 73 65 0a 20 20 65 78 74 65 [];.#else. exte
2a40: 72 6e 20 63 6f 6e 73 74 20 75 63 68 20 5f 6c 65 rn const uch _le
2a50: 6e 67 74 68 5f 63 6f 64 65 5b 5d 3b 0a 20 20 65 ngth_code[];. e
2a60: 78 74 65 72 6e 20 63 6f 6e 73 74 20 75 63 68 20 xtern const uch
2a70: 5f 64 69 73 74 5f 63 6f 64 65 5b 5d 3b 0a 23 65 _dist_code[];.#e
2a80: 6e 64 69 66 0a 0a 23 20 64 65 66 69 6e 65 20 5f ndif..# define _
2a90: 74 72 5f 74 61 6c 6c 79 5f 6c 69 74 28 73 2c 20 tr_tally_lit(s,
2aa0: 63 2c 20 66 6c 75 73 68 29 20 5c 0a 20 20 7b 20 c, flush) \. {
2ab0: 75 63 68 20 63 63 20 3d 20 28 63 29 3b 20 5c 0a uch cc = (c); \.
2ac0: 20 20 20 20 73 2d 3e 64 5f 62 75 66 5b 73 2d 3e s->d_buf[s->
2ad0: 6c 61 73 74 5f 6c 69 74 5d 20 3d 20 30 3b 20 5c last_lit] = 0; \
2ae0: 0a 20 20 20 20 73 2d 3e 6c 5f 62 75 66 5b 73 2d . s->l_buf[s-
2af0: 3e 6c 61 73 74 5f 6c 69 74 2b 2b 5d 20 3d 20 63 >last_lit++] = c
2b00: 63 3b 20 5c 0a 20 20 20 20 73 2d 3e 64 79 6e 5f c; \. s->dyn_
2b10: 6c 74 72 65 65 5b 63 63 5d 2e 46 72 65 71 2b 2b ltree[cc].Freq++
2b20: 3b 20 5c 0a 20 20 20 20 66 6c 75 73 68 20 3d 20 ; \. flush =
2b30: 28 73 2d 3e 6c 61 73 74 5f 6c 69 74 20 3d 3d 20 (s->last_lit ==
2b40: 73 2d 3e 6c 69 74 5f 62 75 66 73 69 7a 65 2d 31 s->lit_bufsize-1
2b50: 29 3b 20 5c 0a 20 20 20 7d 0a 23 20 64 65 66 69 ); \. }.# defi
2b60: 6e 65 20 5f 74 72 5f 74 61 6c 6c 79 5f 64 69 73 ne _tr_tally_dis
2b70: 74 28 73 2c 20 64 69 73 74 61 6e 63 65 2c 20 6c t(s, distance, l
2b80: 65 6e 67 74 68 2c 20 66 6c 75 73 68 29 20 5c 0a ength, flush) \.
2b90: 20 20 7b 20 75 63 68 20 6c 65 6e 20 3d 20 28 6c { uch len = (l
2ba0: 65 6e 67 74 68 29 3b 20 5c 0a 20 20 20 20 75 73 ength); \. us
2bb0: 68 20 64 69 73 74 20 3d 20 28 64 69 73 74 61 6e h dist = (distan
2bc0: 63 65 29 3b 20 5c 0a 20 20 20 20 73 2d 3e 64 5f ce); \. s->d_
2bd0: 62 75 66 5b 73 2d 3e 6c 61 73 74 5f 6c 69 74 5d buf[s->last_lit]
2be0: 20 3d 20 64 69 73 74 3b 20 5c 0a 20 20 20 20 73 = dist; \. s
2bf0: 2d 3e 6c 5f 62 75 66 5b 73 2d 3e 6c 61 73 74 5f ->l_buf[s->last_
2c00: 6c 69 74 2b 2b 5d 20 3d 20 6c 65 6e 3b 20 5c 0a lit++] = len; \.
2c10: 20 20 20 20 64 69 73 74 2d 2d 3b 20 5c 0a 20 20 dist--; \.
2c20: 20 20 73 2d 3e 64 79 6e 5f 6c 74 72 65 65 5b 5f s->dyn_ltree[_
2c30: 6c 65 6e 67 74 68 5f 63 6f 64 65 5b 6c 65 6e 5d length_code[len]
2c40: 2b 4c 49 54 45 52 41 4c 53 2b 31 5d 2e 46 72 65 +LITERALS+1].Fre
2c50: 71 2b 2b 3b 20 5c 0a 20 20 20 20 73 2d 3e 64 79 q++; \. s->dy
2c60: 6e 5f 64 74 72 65 65 5b 64 5f 63 6f 64 65 28 64 n_dtree[d_code(d
2c70: 69 73 74 29 5d 2e 46 72 65 71 2b 2b 3b 20 5c 0a ist)].Freq++; \.
2c80: 20 20 20 20 66 6c 75 73 68 20 3d 20 28 73 2d 3e flush = (s->
2c90: 6c 61 73 74 5f 6c 69 74 20 3d 3d 20 73 2d 3e 6c last_lit == s->l
2ca0: 69 74 5f 62 75 66 73 69 7a 65 2d 31 29 3b 20 5c it_bufsize-1); \
2cb0: 0a 20 20 7d 0a 23 65 6c 73 65 0a 23 20 64 65 66 . }.#else.# def
2cc0: 69 6e 65 20 5f 74 72 5f 74 61 6c 6c 79 5f 6c 69 ine _tr_tally_li
2cd0: 74 28 73 2c 20 63 2c 20 66 6c 75 73 68 29 20 66 t(s, c, flush) f
2ce0: 6c 75 73 68 20 3d 20 5f 74 72 5f 74 61 6c 6c 79 lush = _tr_tally
2cf0: 28 73 2c 20 30 2c 20 63 29 0a 23 20 64 65 66 69 (s, 0, c).# defi
2d00: 6e 65 20 5f 74 72 5f 74 61 6c 6c 79 5f 64 69 73 ne _tr_tally_dis
2d10: 74 28 73 2c 20 64 69 73 74 61 6e 63 65 2c 20 6c t(s, distance, l
2d20: 65 6e 67 74 68 2c 20 66 6c 75 73 68 29 20 5c 0a ength, flush) \.
2d30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6c fl
2d40: 75 73 68 20 3d 20 5f 74 72 5f 74 61 6c 6c 79 28 ush = _tr_tally(
2d50: 73 2c 20 64 69 73 74 61 6e 63 65 2c 20 6c 65 6e s, distance, len
2d60: 67 74 68 29 20 0a 23 65 6e 64 69 66 0a 0d 0a 23 gth) .#endif...#
2d70: 65 6e 64 69 66 20 2f 2a 20 4b 49 5f 47 5a 5f 4e endif /* KI_GZ_N
2d80: 4f 5f 43 4f 4d 50 52 45 53 53 49 4f 4e 20 2a 2f O_COMPRESSION */
2d90: 0d 0a 23 65 6e 64 69 66 0a ..#endif.