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