dbf-halloween2015

annotate libs/zlib/deflate.h @ 3:c37fe5d8a4ed

find changesets by author, revision, files, or words in the commit message
windows port
author John Tsiombikas <nuclear@member.fsf.org>
date Sun, 01 Nov 2015 06:04:28 +0200
parents
children
rev   line source
nuclear@1 1 /* deflate.h -- internal compression state
nuclear@1 2 * Copyright (C) 1995-2004 Jean-loup Gailly
nuclear@1 3 * For conditions of distribution and use, see copyright notice in zlib.h
nuclear@1 4 */
nuclear@1 5
nuclear@1 6 /* WARNING: this file should *not* be used by applications. It is
nuclear@1 7 part of the implementation of the compression library and is
nuclear@1 8 subject to change. Applications should only use zlib.h.
nuclear@1 9 */
nuclear@1 10
nuclear@1 11 /* @(#) $Id$ */
nuclear@1 12
nuclear@1 13 #ifndef DEFLATE_H
nuclear@1 14 #define DEFLATE_H
nuclear@1 15
nuclear@1 16 #include "zutil.h"
nuclear@1 17
nuclear@1 18 /* define NO_GZIP when compiling if you want to disable gzip header and
nuclear@1 19 trailer creation by deflate(). NO_GZIP would be used to avoid linking in
nuclear@1 20 the crc code when it is not needed. For shared libraries, gzip encoding
nuclear@1 21 should be left enabled. */
nuclear@1 22 #ifndef NO_GZIP
nuclear@1 23 # define GZIP
nuclear@1 24 #endif
nuclear@1 25
nuclear@1 26 /* ===========================================================================
nuclear@1 27 * Internal compression state.
nuclear@1 28 */
nuclear@1 29
nuclear@1 30 #define LENGTH_CODES 29
nuclear@1 31 /* number of length codes, not counting the special END_BLOCK code */
nuclear@1 32
nuclear@1 33 #define LITERALS 256
nuclear@1 34 /* number of literal bytes 0..255 */
nuclear@1 35
nuclear@1 36 #define L_CODES (LITERALS+1+LENGTH_CODES)
nuclear@1 37 /* number of Literal or Length codes, including the END_BLOCK code */
nuclear@1 38
nuclear@1 39 #define D_CODES 30
nuclear@1 40 /* number of distance codes */
nuclear@1 41
nuclear@1 42 #define BL_CODES 19
nuclear@1 43 /* number of codes used to transfer the bit lengths */
nuclear@1 44
nuclear@1 45 #define HEAP_SIZE (2*L_CODES+1)
nuclear@1 46 /* maximum heap size */
nuclear@1 47
nuclear@1 48 #define MAX_BITS 15
nuclear@1 49 /* All codes must not exceed MAX_BITS bits */
nuclear@1 50
nuclear@1 51 #define INIT_STATE 42
nuclear@1 52 #define EXTRA_STATE 69
nuclear@1 53 #define NAME_STATE 73
nuclear@1 54 #define COMMENT_STATE 91
nuclear@1 55 #define HCRC_STATE 103
nuclear@1 56 #define BUSY_STATE 113
nuclear@1 57 #define FINISH_STATE 666
nuclear@1 58 /* Stream status */
nuclear@1 59
nuclear@1 60
nuclear@1 61 /* Data structure describing a single value and its code string. */
nuclear@1 62 typedef struct ct_data_s {
nuclear@1 63 union {
nuclear@1 64 ush freq; /* frequency count */
nuclear@1 65 ush code; /* bit string */
nuclear@1 66 } fc;
nuclear@1 67 union {
nuclear@1 68 ush dad; /* father node in Huffman tree */
nuclear@1 69 ush len; /* length of bit string */
nuclear@1 70 } dl;
nuclear@1 71 } FAR ct_data;
nuclear@1 72
nuclear@1 73 #define Freq fc.freq
nuclear@1 74 #define Code fc.code
nuclear@1 75 #define Dad dl.dad
nuclear@1 76 #define Len dl.len
nuclear@1 77
nuclear@1 78 typedef struct static_tree_desc_s static_tree_desc;
nuclear@1 79
nuclear@1 80 typedef struct tree_desc_s {
nuclear@1 81 ct_data *dyn_tree; /* the dynamic tree */
nuclear@1 82 int max_code; /* largest code with non zero frequency */
nuclear@1 83 static_tree_desc *stat_desc; /* the corresponding static tree */
nuclear@1 84 } FAR tree_desc;
nuclear@1 85
nuclear@1 86 typedef ush Pos;
nuclear@1 87 typedef Pos FAR Posf;
nuclear@1 88 typedef unsigned IPos;
nuclear@1 89
nuclear@1 90 /* A Pos is an index in the character window. We use short instead of int to
nuclear@1 91 * save space in the various tables. IPos is used only for parameter passing.
nuclear@1 92 */
nuclear@1 93
nuclear@1 94 typedef struct internal_state {
nuclear@1 95 z_streamp strm; /* pointer back to this zlib stream */
nuclear@1 96 int status; /* as the name implies */
nuclear@1 97 Bytef *pending_buf; /* output still pending */
nuclear@1 98 ulg pending_buf_size; /* size of pending_buf */
nuclear@1 99 Bytef *pending_out; /* next pending byte to output to the stream */
nuclear@1 100 uInt pending; /* nb of bytes in the pending buffer */
nuclear@1 101 int wrap; /* bit 0 true for zlib, bit 1 true for gzip */
nuclear@1 102 gz_headerp gzhead; /* gzip header information to write */
nuclear@1 103 uInt gzindex; /* where in extra, name, or comment */
nuclear@1 104 Byte method; /* STORED (for zip only) or DEFLATED */
nuclear@1 105 int last_flush; /* value of flush param for previous deflate call */
nuclear@1 106
nuclear@1 107 /* used by deflate.c: */
nuclear@1 108
nuclear@1 109 uInt w_size; /* LZ77 window size (32K by default) */
nuclear@1 110 uInt w_bits; /* log2(w_size) (8..16) */
nuclear@1 111 uInt w_mask; /* w_size - 1 */
nuclear@1 112
nuclear@1 113 Bytef *window;
nuclear@1 114 /* Sliding window. Input bytes are read into the second half of the window,
nuclear@1 115 * and move to the first half later to keep a dictionary of at least wSize
nuclear@1 116 * bytes. With this organization, matches are limited to a distance of
nuclear@1 117 * wSize-MAX_MATCH bytes, but this ensures that IO is always
nuclear@1 118 * performed with a length multiple of the block size. Also, it limits
nuclear@1 119 * the window size to 64K, which is quite useful on MSDOS.
nuclear@1 120 * To do: use the user input buffer as sliding window.
nuclear@1 121 */
nuclear@1 122
nuclear@1 123 ulg window_size;
nuclear@1 124 /* Actual size of window: 2*wSize, except when the user input buffer
nuclear@1 125 * is directly used as sliding window.
nuclear@1 126 */
nuclear@1 127
nuclear@1 128 Posf *prev;
nuclear@1 129 /* Link to older string with same hash index. To limit the size of this
nuclear@1 130 * array to 64K, this link is maintained only for the last 32K strings.
nuclear@1 131 * An index in this array is thus a window index modulo 32K.
nuclear@1 132 */
nuclear@1 133
nuclear@1 134 Posf *head; /* Heads of the hash chains or NIL. */
nuclear@1 135
nuclear@1 136 uInt ins_h; /* hash index of string to be inserted */
nuclear@1 137 uInt hash_size; /* number of elements in hash table */
nuclear@1 138 uInt hash_bits; /* log2(hash_size) */
nuclear@1 139 uInt hash_mask; /* hash_size-1 */
nuclear@1 140
nuclear@1 141 uInt hash_shift;
nuclear@1 142 /* Number of bits by which ins_h must be shifted at each input
nuclear@1 143 * step. It must be such that after MIN_MATCH steps, the oldest
nuclear@1 144 * byte no longer takes part in the hash key, that is:
nuclear@1 145 * hash_shift * MIN_MATCH >= hash_bits
nuclear@1 146 */
nuclear@1 147
nuclear@1 148 long block_start;
nuclear@1 149 /* Window position at the beginning of the current output block. Gets
nuclear@1 150 * negative when the window is moved backwards.
nuclear@1 151 */
nuclear@1 152
nuclear@1 153 uInt match_length; /* length of best match */
nuclear@1 154 IPos prev_match; /* previous match */
nuclear@1 155 int match_available; /* set if previous match exists */
nuclear@1 156 uInt strstart; /* start of string to insert */
nuclear@1 157 uInt match_start; /* start of matching string */
nuclear@1 158 uInt lookahead; /* number of valid bytes ahead in window */
nuclear@1 159
nuclear@1 160 uInt prev_length;
nuclear@1 161 /* Length of the best match at previous step. Matches not greater than this
nuclear@1 162 * are discarded. This is used in the lazy match evaluation.
nuclear@1 163 */
nuclear@1 164
nuclear@1 165 uInt max_chain_length;
nuclear@1 166 /* To speed up deflation, hash chains are never searched beyond this
nuclear@1 167 * length. A higher limit improves compression ratio but degrades the
nuclear@1 168 * speed.
nuclear@1 169 */
nuclear@1 170
nuclear@1 171 uInt max_lazy_match;
nuclear@1 172 /* Attempt to find a better match only when the current match is strictly
nuclear@1 173 * smaller than this value. This mechanism is used only for compression
nuclear@1 174 * levels >= 4.
nuclear@1 175 */
nuclear@1 176 # define max_insert_length max_lazy_match
nuclear@1 177 /* Insert new strings in the hash table only if the match length is not
nuclear@1 178 * greater than this length. This saves time but degrades compression.
nuclear@1 179 * max_insert_length is used only for compression levels <= 3.
nuclear@1 180 */
nuclear@1 181
nuclear@1 182 int level; /* compression level (1..9) */
nuclear@1 183 int strategy; /* favor or force Huffman coding*/
nuclear@1 184
nuclear@1 185 uInt good_match;
nuclear@1 186 /* Use a faster search when the previous match is longer than this */
nuclear@1 187
nuclear@1 188 int nice_match; /* Stop searching when current match exceeds this */
nuclear@1 189
nuclear@1 190 /* used by trees.c: */
nuclear@1 191 /* Didn't use ct_data typedef below to supress compiler warning */
nuclear@1 192 struct ct_data_s dyn_ltree[HEAP_SIZE]; /* literal and length tree */
nuclear@1 193 struct ct_data_s dyn_dtree[2*D_CODES+1]; /* distance tree */
nuclear@1 194 struct ct_data_s bl_tree[2*BL_CODES+1]; /* Huffman tree for bit lengths */
nuclear@1 195
nuclear@1 196 struct tree_desc_s l_desc; /* desc. for literal tree */
nuclear@1 197 struct tree_desc_s d_desc; /* desc. for distance tree */
nuclear@1 198 struct tree_desc_s bl_desc; /* desc. for bit length tree */
nuclear@1 199
nuclear@1 200 ush bl_count[MAX_BITS+1];
nuclear@1 201 /* number of codes at each bit length for an optimal tree */
nuclear@1 202
nuclear@1 203 int heap[2*L_CODES+1]; /* heap used to build the Huffman trees */
nuclear@1 204 int heap_len; /* number of elements in the heap */
nuclear@1 205 int heap_max; /* element of largest frequency */
nuclear@1 206 /* The sons of heap[n] are heap[2*n] and heap[2*n+1]. heap[0] is not used.
nuclear@1 207 * The same heap array is used to build all trees.
nuclear@1 208 */
nuclear@1 209
nuclear@1 210 uch depth[2*L_CODES+1];
nuclear@1 211 /* Depth of each subtree used as tie breaker for trees of equal frequency
nuclear@1 212 */
nuclear@1 213
nuclear@1 214 uchf *l_buf; /* buffer for literals or lengths */
nuclear@1 215
nuclear@1 216 uInt lit_bufsize;
nuclear@1 217 /* Size of match buffer for literals/lengths. There are 4 reasons for
nuclear@1 218 * limiting lit_bufsize to 64K:
nuclear@1 219 * - frequencies can be kept in 16 bit counters
nuclear@1 220 * - if compression is not successful for the first block, all input
nuclear@1 221 * data is still in the window so we can still emit a stored block even
nuclear@1 222 * when input comes from standard input. (This can also be done for
nuclear@1 223 * all blocks if lit_bufsize is not greater than 32K.)
nuclear@1 224 * - if compression is not successful for a file smaller than 64K, we can
nuclear@1 225 * even emit a stored file instead of a stored block (saving 5 bytes).
nuclear@1 226 * This is applicable only for zip (not gzip or zlib).
nuclear@1 227 * - creating new Huffman trees less frequently may not provide fast
nuclear@1 228 * adaptation to changes in the input data statistics. (Take for
nuclear@1 229 * example a binary file with poorly compressible code followed by
nuclear@1 230 * a highly compressible string table.) Smaller buffer sizes give
nuclear@1 231 * fast adaptation but have of course the overhead of transmitting
nuclear@1 232 * trees more frequently.
nuclear@1 233 * - I can't count above 4
nuclear@1 234 */
nuclear@1 235
nuclear@1 236 uInt last_lit; /* running index in l_buf */
nuclear@1 237
nuclear@1 238 ushf *d_buf;
nuclear@1 239 /* Buffer for distances. To simplify the code, d_buf and l_buf have
nuclear@1 240 * the same number of elements. To use different lengths, an extra flag
nuclear@1 241 * array would be necessary.
nuclear@1 242 */
nuclear@1 243
nuclear@1 244 ulg opt_len; /* bit length of current block with optimal trees */
nuclear@1 245 ulg static_len; /* bit length of current block with static trees */
nuclear@1 246 uInt matches; /* number of string matches in current block */
nuclear@1 247 int last_eob_len; /* bit length of EOB code for last block */
nuclear@1 248
nuclear@1 249 #ifdef DEBUG
nuclear@1 250 ulg compressed_len; /* total bit length of compressed file mod 2^32 */
nuclear@1 251 ulg bits_sent; /* bit length of compressed data sent mod 2^32 */
nuclear@1 252 #endif
nuclear@1 253
nuclear@1 254 ush bi_buf;
nuclear@1 255 /* Output buffer. bits are inserted starting at the bottom (least
nuclear@1 256 * significant bits).
nuclear@1 257 */
nuclear@1 258 int bi_valid;
nuclear@1 259 /* Number of valid bits in bi_buf. All bits above the last valid bit
nuclear@1 260 * are always zero.
nuclear@1 261 */
nuclear@1 262
nuclear@1 263 } FAR deflate_state;
nuclear@1 264
nuclear@1 265 /* Output a byte on the stream.
nuclear@1 266 * IN assertion: there is enough room in pending_buf.
nuclear@1 267 */
nuclear@1 268 #define put_byte(s, c) {s->pending_buf[s->pending++] = (c);}
nuclear@1 269
nuclear@1 270
nuclear@1 271 #define MIN_LOOKAHEAD (MAX_MATCH+MIN_MATCH+1)
nuclear@1 272 /* Minimum amount of lookahead, except at the end of the input file.
nuclear@1 273 * See deflate.c for comments about the MIN_MATCH+1.
nuclear@1 274 */
nuclear@1 275
nuclear@1 276 #define MAX_DIST(s) ((s)->w_size-MIN_LOOKAHEAD)
nuclear@1 277 /* In order to simplify the code, particularly on 16 bit machines, match
nuclear@1 278 * distances are limited to MAX_DIST instead of WSIZE.
nuclear@1 279 */
nuclear@1 280
nuclear@1 281 /* in trees.c */
nuclear@1 282 void _tr_init OF((deflate_state *s));
nuclear@1 283 int _tr_tally OF((deflate_state *s, unsigned dist, unsigned lc));
nuclear@1 284 void _tr_flush_block OF((deflate_state *s, charf *buf, ulg stored_len,
nuclear@1 285 int eof));
nuclear@1 286 void _tr_align OF((deflate_state *s));
nuclear@1 287 void _tr_stored_block OF((deflate_state *s, charf *buf, ulg stored_len,
nuclear@1 288 int eof));
nuclear@1 289
nuclear@1 290 #define d_code(dist) \
nuclear@1 291 ((dist) < 256 ? _dist_code[dist] : _dist_code[256+((dist)>>7)])
nuclear@1 292 /* Mapping from a distance to a distance code. dist is the distance - 1 and
nuclear@1 293 * must not have side effects. _dist_code[256] and _dist_code[257] are never
nuclear@1 294 * used.
nuclear@1 295 */
nuclear@1 296
nuclear@1 297 #ifndef DEBUG
nuclear@1 298 /* Inline versions of _tr_tally for speed: */
nuclear@1 299
nuclear@1 300 #if defined(GEN_TREES_H) || !defined(STDC)
nuclear@1 301 extern uch _length_code[];
nuclear@1 302 extern uch _dist_code[];
nuclear@1 303 #else
nuclear@1 304 extern const uch _length_code[];
nuclear@1 305 extern const uch _dist_code[];
nuclear@1 306 #endif
nuclear@1 307
nuclear@1 308 # define _tr_tally_lit(s, c, flush) \
nuclear@1 309 { uch cc = (c); \
nuclear@1 310 s->d_buf[s->last_lit] = 0; \
nuclear@1 311 s->l_buf[s->last_lit++] = cc; \
nuclear@1 312 s->dyn_ltree[cc].Freq++; \
nuclear@1 313 flush = (s->last_lit == s->lit_bufsize-1); \
nuclear@1 314 }
nuclear@1 315 # define _tr_tally_dist(s, distance, length, flush) \
nuclear@1 316 { uch len = (length); \
nuclear@1 317 ush dist = (distance); \
nuclear@1 318 s->d_buf[s->last_lit] = dist; \
nuclear@1 319 s->l_buf[s->last_lit++] = len; \
nuclear@1 320 dist--; \
nuclear@1 321 s->dyn_ltree[_length_code[len]+LITERALS+1].Freq++; \
nuclear@1 322 s->dyn_dtree[d_code(dist)].Freq++; \
nuclear@1 323 flush = (s->last_lit == s->lit_bufsize-1); \
nuclear@1 324 }
nuclear@1 325 #else
nuclear@1 326 # define _tr_tally_lit(s, c, flush) flush = _tr_tally(s, 0, c)
nuclear@1 327 # define _tr_tally_dist(s, distance, length, flush) \
nuclear@1 328 flush = _tr_tally(s, distance, length)
nuclear@1 329 #endif
nuclear@1 330
nuclear@1 331 #endif /* DEFLATE_H */