Coverage Report

Created: 2024-01-21 07:09

/src/zlib/inflate.c
Line
Count
Source (jump to first uncovered line)
1
/* inflate.c -- zlib decompression
2
 * Copyright (C) 1995-2016 Mark Adler
3
 * For conditions of distribution and use, see copyright notice in zlib.h
4
 */
5
6
/*
7
 * Change history:
8
 *
9
 * 1.2.beta0    24 Nov 2002
10
 * - First version -- complete rewrite of inflate to simplify code, avoid
11
 *   creation of window when not needed, minimize use of window when it is
12
 *   needed, make inffast.c even faster, implement gzip decoding, and to
13
 *   improve code readability and style over the previous zlib inflate code
14
 *
15
 * 1.2.beta1    25 Nov 2002
16
 * - Use pointers for available input and output checking in inffast.c
17
 * - Remove input and output counters in inffast.c
18
 * - Change inffast.c entry and loop from avail_in >= 7 to >= 6
19
 * - Remove unnecessary second byte pull from length extra in inffast.c
20
 * - Unroll direct copy to three copies per loop in inffast.c
21
 *
22
 * 1.2.beta2    4 Dec 2002
23
 * - Change external routine names to reduce potential conflicts
24
 * - Correct filename to inffixed.h for fixed tables in inflate.c
25
 * - Make hbuf[] unsigned char to match parameter type in inflate.c
26
 * - Change strm->next_out[-state->offset] to *(strm->next_out - state->offset)
27
 *   to avoid negation problem on Alphas (64 bit) in inflate.c
28
 *
29
 * 1.2.beta3    22 Dec 2002
30
 * - Add comments on state->bits assertion in inffast.c
31
 * - Add comments on op field in inftrees.h
32
 * - Fix bug in reuse of allocated window after inflateReset()
33
 * - Remove bit fields--back to byte structure for speed
34
 * - Remove distance extra == 0 check in inflate_fast()--only helps for lengths
35
 * - Change post-increments to pre-increments in inflate_fast(), PPC biased?
36
 * - Add compile time option, POSTINC, to use post-increments instead (Intel?)
37
 * - Make MATCH copy in inflate() much faster for when inflate_fast() not used
38
 * - Use local copies of stream next and avail values, as well as local bit
39
 *   buffer and bit count in inflate()--for speed when inflate_fast() not used
40
 *
41
 * 1.2.beta4    1 Jan 2003
42
 * - Split ptr - 257 statements in inflate_table() to avoid compiler warnings
43
 * - Move a comment on output buffer sizes from inffast.c to inflate.c
44
 * - Add comments in inffast.c to introduce the inflate_fast() routine
45
 * - Rearrange window copies in inflate_fast() for speed and simplification
46
 * - Unroll last copy for window match in inflate_fast()
47
 * - Use local copies of window variables in inflate_fast() for speed
48
 * - Pull out common wnext == 0 case for speed in inflate_fast()
49
 * - Make op and len in inflate_fast() unsigned for consistency
50
 * - Add FAR to lcode and dcode declarations in inflate_fast()
51
 * - Simplified bad distance check in inflate_fast()
52
 * - Added inflateBackInit(), inflateBack(), and inflateBackEnd() in new
53
 *   source file infback.c to provide a call-back interface to inflate for
54
 *   programs like gzip and unzip -- uses window as output buffer to avoid
55
 *   window copying
56
 *
57
 * 1.2.beta5    1 Jan 2003
58
 * - Improved inflateBack() interface to allow the caller to provide initial
59
 *   input in strm.
60
 * - Fixed stored blocks bug in inflateBack()
61
 *
62
 * 1.2.beta6    4 Jan 2003
63
 * - Added comments in inffast.c on effectiveness of POSTINC
64
 * - Typecasting all around to reduce compiler warnings
65
 * - Changed loops from while (1) or do {} while (1) to for (;;), again to
66
 *   make compilers happy
67
 * - Changed type of window in inflateBackInit() to unsigned char *
68
 *
69
 * 1.2.beta7    27 Jan 2003
70
 * - Changed many types to unsigned or unsigned short to avoid warnings
71
 * - Added inflateCopy() function
72
 *
73
 * 1.2.0        9 Mar 2003
74
 * - Changed inflateBack() interface to provide separate opaque descriptors
75
 *   for the in() and out() functions
76
 * - Changed inflateBack() argument and in_func typedef to swap the length
77
 *   and buffer address return values for the input function
78
 * - Check next_in and next_out for Z_NULL on entry to inflate()
79
 *
80
 * The history for versions after 1.2.0 are in ChangeLog in zlib distribution.
81
 */
82
83
#include "zutil.h"
84
#include "inftrees.h"
85
#include "inflate.h"
86
#include "inffast.h"
87
88
#ifdef MAKEFIXED
89
#  ifndef BUILDFIXED
90
#    define BUILDFIXED
91
#  endif
92
#endif
93
94
/* function prototypes */
95
local int inflateStateCheck OF((z_streamp strm));
96
local void fixedtables OF((struct inflate_state FAR *state));
97
local int updatewindow OF((z_streamp strm, const unsigned char FAR *end,
98
                           unsigned copy));
99
#ifdef BUILDFIXED
100
   void makefixed OF((void));
101
#endif
102
local unsigned syncsearch OF((unsigned FAR *have, const unsigned char FAR *buf,
103
                              unsigned len));
104
105
local int inflateStateCheck(strm)
106
z_streamp strm;
107
155k
{
108
155k
    struct inflate_state FAR *state;
109
155k
    if (strm == Z_NULL ||
110
155k
        strm->zalloc == (alloc_func)0 || strm->zfree == (free_func)0)
111
0
        return 1;
112
155k
    state = (struct inflate_state FAR *)strm->state;
113
155k
    if (state == Z_NULL || state->strm != strm ||
114
155k
        state->mode < HEAD || state->mode > SYNC)
115
0
        return 1;
116
155k
    return 0;
117
155k
}
118
119
int ZEXPORT inflateResetKeep(strm)
120
z_streamp strm;
121
28.7k
{
122
28.7k
    struct inflate_state FAR *state;
123
124
28.7k
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
125
28.7k
    state = (struct inflate_state FAR *)strm->state;
126
28.7k
    strm->total_in = strm->total_out = state->total = 0;
127
28.7k
    strm->msg = Z_NULL;
128
28.7k
    if (state->wrap)        /* to support ill-conceived Java test suite */
129
28.7k
        strm->adler = state->wrap & 1;
130
28.7k
    state->mode = HEAD;
131
28.7k
    state->last = 0;
132
28.7k
    state->havedict = 0;
133
28.7k
    state->flags = -1;
134
28.7k
    state->dmax = 32768U;
135
28.7k
    state->head = Z_NULL;
136
28.7k
    state->hold = 0;
137
28.7k
    state->bits = 0;
138
28.7k
    state->lencode = state->distcode = state->next = state->codes;
139
28.7k
    state->sane = 1;
140
28.7k
    state->back = -1;
141
28.7k
    Tracev((stderr, "inflate: reset\n"));
142
28.7k
    return Z_OK;
143
28.7k
}
144
145
int ZEXPORT inflateReset(strm)
146
z_streamp strm;
147
28.7k
{
148
28.7k
    struct inflate_state FAR *state;
149
150
28.7k
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
151
28.7k
    state = (struct inflate_state FAR *)strm->state;
152
28.7k
    state->wsize = 0;
153
28.7k
    state->whave = 0;
154
28.7k
    state->wnext = 0;
155
28.7k
    return inflateResetKeep(strm);
156
28.7k
}
157
158
int ZEXPORT inflateReset2(strm, windowBits)
159
z_streamp strm;
160
int windowBits;
161
28.7k
{
162
28.7k
    int wrap;
163
28.7k
    struct inflate_state FAR *state;
164
165
    /* get the state */
166
28.7k
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
167
28.7k
    state = (struct inflate_state FAR *)strm->state;
168
169
    /* extract wrap request from windowBits parameter */
170
28.7k
    if (windowBits < 0) {
171
0
        wrap = 0;
172
0
        windowBits = -windowBits;
173
0
    }
174
28.7k
    else {
175
28.7k
        wrap = (windowBits >> 4) + 5;
176
28.7k
#ifdef GUNZIP
177
28.7k
        if (windowBits < 48)
178
28.7k
            windowBits &= 15;
179
28.7k
#endif
180
28.7k
    }
181
182
    /* set number of window bits, free window if different */
183
28.7k
    if (windowBits && (windowBits < 8 || windowBits > 15))
184
0
        return Z_STREAM_ERROR;
185
28.7k
    if (state->window != Z_NULL && state->wbits != (unsigned)windowBits) {
186
0
        ZFREE(strm, state->window);
187
0
        state->window = Z_NULL;
188
0
    }
189
190
    /* update state and reset the rest of it */
191
28.7k
    state->wrap = wrap;
192
28.7k
    state->wbits = (unsigned)windowBits;
193
28.7k
    return inflateReset(strm);
194
28.7k
}
195
196
int ZEXPORT inflateInit2_(strm, windowBits, version, stream_size)
197
z_streamp strm;
198
int windowBits;
199
const char *version;
200
int stream_size;
201
28.7k
{
202
28.7k
    int ret;
203
28.7k
    struct inflate_state FAR *state;
204
205
28.7k
    if (version == Z_NULL || version[0] != ZLIB_VERSION[0] ||
206
28.7k
        stream_size != (int)(sizeof(z_stream)))
207
0
        return Z_VERSION_ERROR;
208
28.7k
    if (strm == Z_NULL) return Z_STREAM_ERROR;
209
28.7k
    strm->msg = Z_NULL;                 /* in case we return an error */
210
28.7k
    if (strm->zalloc == (alloc_func)0) {
211
#ifdef Z_SOLO
212
        return Z_STREAM_ERROR;
213
#else
214
28.7k
        strm->zalloc = zcalloc;
215
28.7k
        strm->opaque = (voidpf)0;
216
28.7k
#endif
217
28.7k
    }
218
28.7k
    if (strm->zfree == (free_func)0)
219
#ifdef Z_SOLO
220
        return Z_STREAM_ERROR;
221
#else
222
28.7k
        strm->zfree = zcfree;
223
28.7k
#endif
224
28.7k
    state = (struct inflate_state FAR *)
225
28.7k
            ZALLOC(strm, 1, sizeof(struct inflate_state));
226
28.7k
    if (state == Z_NULL) return Z_MEM_ERROR;
227
28.7k
    Tracev((stderr, "inflate: allocated\n"));
228
28.7k
    strm->state = (struct internal_state FAR *)state;
229
28.7k
    state->strm = strm;
230
28.7k
    state->window = Z_NULL;
231
28.7k
    state->mode = HEAD;     /* to pass state test in inflateReset2() */
232
28.7k
    ret = inflateReset2(strm, windowBits);
233
28.7k
    if (ret != Z_OK) {
234
0
        ZFREE(strm, state);
235
0
        strm->state = Z_NULL;
236
0
    }
237
28.7k
    return ret;
238
28.7k
}
239
240
int ZEXPORT inflateInit_(strm, version, stream_size)
241
z_streamp strm;
242
const char *version;
243
int stream_size;
244
28.7k
{
245
28.7k
    return inflateInit2_(strm, DEF_WBITS, version, stream_size);
246
28.7k
}
247
248
int ZEXPORT inflatePrime(strm, bits, value)
249
z_streamp strm;
250
int bits;
251
int value;
252
0
{
253
0
    struct inflate_state FAR *state;
254
255
0
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
256
0
    state = (struct inflate_state FAR *)strm->state;
257
0
    if (bits < 0) {
258
0
        state->hold = 0;
259
0
        state->bits = 0;
260
0
        return Z_OK;
261
0
    }
262
0
    if (bits > 16 || state->bits + (uInt)bits > 32) return Z_STREAM_ERROR;
263
0
    value &= (1L << bits) - 1;
264
0
    state->hold += (unsigned)value << state->bits;
265
0
    state->bits += (uInt)bits;
266
0
    return Z_OK;
267
0
}
268
269
/*
270
   Return state with length and distance decoding tables and index sizes set to
271
   fixed code decoding.  Normally this returns fixed tables from inffixed.h.
272
   If BUILDFIXED is defined, then instead this routine builds the tables the
273
   first time it's called, and returns those tables the first time and
274
   thereafter.  This reduces the size of the code by about 2K bytes, in
275
   exchange for a little execution time.  However, BUILDFIXED should not be
276
   used for threaded applications, since the rewriting of the tables and virgin
277
   may not be thread-safe.
278
 */
279
local void fixedtables(state)
280
struct inflate_state FAR *state;
281
36.1k
{
282
#ifdef BUILDFIXED
283
    static int virgin = 1;
284
    static code *lenfix, *distfix;
285
    static code fixed[544];
286
287
    /* build fixed huffman tables if first call (may not be thread safe) */
288
    if (virgin) {
289
        unsigned sym, bits;
290
        static code *next;
291
292
        /* literal/length table */
293
        sym = 0;
294
        while (sym < 144) state->lens[sym++] = 8;
295
        while (sym < 256) state->lens[sym++] = 9;
296
        while (sym < 280) state->lens[sym++] = 7;
297
        while (sym < 288) state->lens[sym++] = 8;
298
        next = fixed;
299
        lenfix = next;
300
        bits = 9;
301
        inflate_table(LENS, state->lens, 288, &(next), &(bits), state->work);
302
303
        /* distance table */
304
        sym = 0;
305
        while (sym < 32) state->lens[sym++] = 5;
306
        distfix = next;
307
        bits = 5;
308
        inflate_table(DISTS, state->lens, 32, &(next), &(bits), state->work);
309
310
        /* do this just once */
311
        virgin = 0;
312
    }
313
#else /* !BUILDFIXED */
314
36.1k
#   include "inffixed.h"
315
36.1k
#endif /* BUILDFIXED */
316
36.1k
    state->lencode = lenfix;
317
36.1k
    state->lenbits = 9;
318
36.1k
    state->distcode = distfix;
319
36.1k
    state->distbits = 5;
320
36.1k
}
321
322
#ifdef MAKEFIXED
323
#include <stdio.h>
324
325
/*
326
   Write out the inffixed.h that is #include'd above.  Defining MAKEFIXED also
327
   defines BUILDFIXED, so the tables are built on the fly.  makefixed() writes
328
   those tables to stdout, which would be piped to inffixed.h.  A small program
329
   can simply call makefixed to do this:
330
331
    void makefixed(void);
332
333
    int main(void)
334
    {
335
        makefixed();
336
        return 0;
337
    }
338
339
   Then that can be linked with zlib built with MAKEFIXED defined and run:
340
341
    a.out > inffixed.h
342
 */
343
void makefixed()
344
{
345
    unsigned low, size;
346
    struct inflate_state state;
347
348
    fixedtables(&state);
349
    puts("    /* inffixed.h -- table for decoding fixed codes");
350
    puts("     * Generated automatically by makefixed().");
351
    puts("     */");
352
    puts("");
353
    puts("    /* WARNING: this file should *not* be used by applications.");
354
    puts("       It is part of the implementation of this library and is");
355
    puts("       subject to change. Applications should only use zlib.h.");
356
    puts("     */");
357
    puts("");
358
    size = 1U << 9;
359
    printf("    static const code lenfix[%u] = {", size);
360
    low = 0;
361
    for (;;) {
362
        if ((low % 7) == 0) printf("\n        ");
363
        printf("{%u,%u,%d}", (low & 127) == 99 ? 64 : state.lencode[low].op,
364
               state.lencode[low].bits, state.lencode[low].val);
365
        if (++low == size) break;
366
        putchar(',');
367
    }
368
    puts("\n    };");
369
    size = 1U << 5;
370
    printf("\n    static const code distfix[%u] = {", size);
371
    low = 0;
372
    for (;;) {
373
        if ((low % 6) == 0) printf("\n        ");
374
        printf("{%u,%u,%d}", state.distcode[low].op, state.distcode[low].bits,
375
               state.distcode[low].val);
376
        if (++low == size) break;
377
        putchar(',');
378
    }
379
    puts("\n    };");
380
}
381
#endif /* MAKEFIXED */
382
383
/*
384
   Update the window with the last wsize (normally 32K) bytes written before
385
   returning.  If window does not exist yet, create it.  This is only called
386
   when a window is already in use, or when output has been written during this
387
   inflate call, but the end of the deflate stream has not been reached yet.
388
   It is also called to create a window for dictionary data when a dictionary
389
   is loaded.
390
391
   Providing output buffers larger than 32K to inflate() should provide a speed
392
   advantage, since only the last 32K of output is copied to the sliding window
393
   upon return from inflate(), and since all distances after the first 32K of
394
   output will fall in the output data, making match copies simpler and faster.
395
   The advantage may be dependent on the size of the processor's data caches.
396
 */
397
local int updatewindow(strm, end, copy)
398
z_streamp strm;
399
const Bytef *end;
400
unsigned copy;
401
15.2k
{
402
15.2k
    struct inflate_state FAR *state;
403
15.2k
    unsigned dist;
404
405
15.2k
    state = (struct inflate_state FAR *)strm->state;
406
407
    /* if it hasn't been done already, allocate space for the window */
408
15.2k
    if (state->window == Z_NULL) {
409
7.60k
        state->window = (unsigned char FAR *)
410
7.60k
                        ZALLOC(strm, 1U << state->wbits,
411
7.60k
                               sizeof(unsigned char));
412
7.60k
        if (state->window == Z_NULL) return 1;
413
7.60k
    }
414
415
    /* if window not in use yet, initialize */
416
15.2k
    if (state->wsize == 0) {
417
7.60k
        state->wsize = 1U << state->wbits;
418
7.60k
        state->wnext = 0;
419
7.60k
        state->whave = 0;
420
7.60k
    }
421
422
    /* copy state->wsize or less output bytes into the circular window */
423
15.2k
    if (copy >= state->wsize) {
424
1.67k
        zmemcpy(state->window, end - state->wsize, state->wsize);
425
1.67k
        state->wnext = 0;
426
1.67k
        state->whave = state->wsize;
427
1.67k
    }
428
13.5k
    else {
429
13.5k
        dist = state->wsize - state->wnext;
430
13.5k
        if (dist > copy) dist = copy;
431
13.5k
        zmemcpy(state->window + state->wnext, end - copy, dist);
432
13.5k
        copy -= dist;
433
13.5k
        if (copy) {
434
0
            zmemcpy(state->window, end - copy, copy);
435
0
            state->wnext = copy;
436
0
            state->whave = state->wsize;
437
0
        }
438
13.5k
        else {
439
13.5k
            state->wnext += dist;
440
13.5k
            if (state->wnext == state->wsize) state->wnext = 0;
441
13.5k
            if (state->whave < state->wsize) state->whave += dist;
442
13.5k
        }
443
13.5k
    }
444
15.2k
    return 0;
445
15.2k
}
446
447
/* Macros for inflate(): */
448
449
/* check function to use adler32() for zlib or crc32() for gzip */
450
#ifdef GUNZIP
451
#  define UPDATE(check, buf, len) \
452
15.1k
    (state->flags ? crc32(check, buf, len) : adler32(check, buf, len))
453
#else
454
#  define UPDATE(check, buf, len) adler32(check, buf, len)
455
#endif
456
457
/* check macros for header crc */
458
#ifdef GUNZIP
459
#  define CRC2(check, word) \
460
0
    do { \
461
0
        hbuf[0] = (unsigned char)(word); \
462
0
        hbuf[1] = (unsigned char)((word) >> 8); \
463
0
        check = crc32(check, hbuf, 2); \
464
0
    } while (0)
465
466
#  define CRC4(check, word) \
467
0
    do { \
468
0
        hbuf[0] = (unsigned char)(word); \
469
0
        hbuf[1] = (unsigned char)((word) >> 8); \
470
0
        hbuf[2] = (unsigned char)((word) >> 16); \
471
0
        hbuf[3] = (unsigned char)((word) >> 24); \
472
0
        check = crc32(check, hbuf, 4); \
473
0
    } while (0)
474
#endif
475
476
/* Load registers with state in inflate() for speed */
477
#define LOAD() \
478
91.8k
    do { \
479
91.8k
        put = strm->next_out; \
480
91.8k
        left = strm->avail_out; \
481
91.8k
        next = strm->next_in; \
482
91.8k
        have = strm->avail_in; \
483
91.8k
        hold = state->hold; \
484
91.8k
        bits = state->bits; \
485
91.8k
    } while (0)
486
487
/* Restore state from registers in inflate() */
488
#define RESTORE() \
489
91.8k
    do { \
490
91.8k
        strm->next_out = put; \
491
91.8k
        strm->avail_out = left; \
492
91.8k
        strm->next_in = next; \
493
91.8k
        strm->avail_in = have; \
494
91.8k
        state->hold = hold; \
495
91.8k
        state->bits = bits; \
496
91.8k
    } while (0)
497
498
/* Clear the input bit accumulator */
499
#define INITBITS() \
500
46.6k
    do { \
501
46.6k
        hold = 0; \
502
46.6k
        bits = 0; \
503
46.6k
    } while (0)
504
505
/* Get a byte of input into the bit accumulator, or return from inflate()
506
   if there is no input available. */
507
#define PULLBYTE() \
508
1.19M
    do { \
509
1.19M
        if (have == 0) goto inf_leave; \
510
1.19M
        have--; \
511
1.17M
        hold += (unsigned long)(*next++) << bits; \
512
1.17M
        bits += 8; \
513
1.17M
    } while (0)
514
515
/* Assure that there are at least n bits in the bit accumulator.  If there is
516
   not enough available input to do that, then return from inflate(). */
517
#define NEEDBITS(n) \
518
796k
    do { \
519
1.30M
        while (bits < (unsigned)(n)) \
520
796k
            PULLBYTE(); \
521
796k
    } while (0)
522
523
/* Return the low n bits of the bit accumulator (n < 16) */
524
#define BITS(n) \
525
3.88M
    ((unsigned)hold & ((1U << (n)) - 1))
526
527
/* Remove n bits from the bit accumulator */
528
#define DROPBITS(n) \
529
3.15M
    do { \
530
3.15M
        hold >>= (n); \
531
3.15M
        bits -= (unsigned)(n); \
532
3.15M
    } while (0)
533
534
/* Remove zero to seven bits as needed to go to a byte boundary */
535
#define BYTEBITS() \
536
23.7k
    do { \
537
23.7k
        hold >>= bits & 7; \
538
23.7k
        bits -= bits & 7; \
539
23.7k
    } while (0)
540
541
/*
542
   inflate() uses a state machine to process as much input data and generate as
543
   much output data as possible before returning.  The state machine is
544
   structured roughly as follows:
545
546
    for (;;) switch (state) {
547
    ...
548
    case STATEn:
549
        if (not enough input data or output space to make progress)
550
            return;
551
        ... make progress ...
552
        state = STATEm;
553
        break;
554
    ...
555
    }
556
557
   so when inflate() is called again, the same case is attempted again, and
558
   if the appropriate resources are provided, the machine proceeds to the
559
   next state.  The NEEDBITS() macro is usually the way the state evaluates
560
   whether it can proceed or should return.  NEEDBITS() does the return if
561
   the requested bits are not available.  The typical use of the BITS macros
562
   is:
563
564
        NEEDBITS(n);
565
        ... do something with BITS(n) ...
566
        DROPBITS(n);
567
568
   where NEEDBITS(n) either returns from inflate() if there isn't enough
569
   input left to load n bits into the accumulator, or it continues.  BITS(n)
570
   gives the low n bits in the accumulator.  When done, DROPBITS(n) drops
571
   the low n bits off the accumulator.  INITBITS() clears the accumulator
572
   and sets the number of available bits to zero.  BYTEBITS() discards just
573
   enough bits to put the accumulator on a byte boundary.  After BYTEBITS()
574
   and a NEEDBITS(8), then BITS(8) would return the next byte in the stream.
575
576
   NEEDBITS(n) uses PULLBYTE() to get an available byte of input, or to return
577
   if there is no input available.  The decoding of variable length codes uses
578
   PULLBYTE() directly in order to pull just enough bytes to decode the next
579
   code, and no more.
580
581
   Some states loop until they get enough input, making sure that enough
582
   state information is maintained to continue the loop where it left off
583
   if NEEDBITS() returns in the loop.  For example, want, need, and keep
584
   would all have to actually be part of the saved state in case NEEDBITS()
585
   returns:
586
587
    case STATEw:
588
        while (want < need) {
589
            NEEDBITS(n);
590
            keep[want++] = BITS(n);
591
            DROPBITS(n);
592
        }
593
        state = STATEx;
594
    case STATEx:
595
596
   As shown above, if the next state is also the next case, then the break
597
   is omitted.
598
599
   A state may also return if there is not enough output space available to
600
   complete that state.  Those states are copying stored data, writing a
601
   literal byte, and copying a matching string.
602
603
   When returning, a "goto inf_leave" is used to update the total counters,
604
   update the check value, and determine whether any progress has been made
605
   during that inflate() call in order to return the proper return code.
606
   Progress is defined as a change in either strm->avail_in or strm->avail_out.
607
   When there is a window, goto inf_leave will update the window with the last
608
   output written.  If a goto inf_leave occurs in the middle of decompression
609
   and there is no window currently, goto inf_leave will create one and copy
610
   output to the window for the next call of inflate().
611
612
   In this implementation, the flush parameter of inflate() only affects the
613
   return code (per zlib.h).  inflate() always writes as much as possible to
614
   strm->next_out, given the space available and the provided input--the effect
615
   documented in zlib.h of Z_SYNC_FLUSH.  Furthermore, inflate() always defers
616
   the allocation of and copying into a sliding window until necessary, which
617
   provides the effect documented in zlib.h for Z_FINISH when the entire input
618
   stream available.  So the only thing the flush parameter actually does is:
619
   when flush is set to Z_FINISH, inflate() cannot return Z_OK.  Instead it
620
   will return Z_BUF_ERROR if it has not reached the end of the stream.
621
 */
622
623
int ZEXPORT inflate(strm, flush)
624
z_streamp strm;
625
int flush;
626
40.1k
{
627
40.1k
    struct inflate_state FAR *state;
628
40.1k
    z_const unsigned char FAR *next;    /* next input */
629
40.1k
    unsigned char FAR *put;     /* next output */
630
40.1k
    unsigned have, left;        /* available input and output */
631
40.1k
    unsigned long hold;         /* bit buffer */
632
40.1k
    unsigned bits;              /* bits in bit buffer */
633
40.1k
    unsigned in, out;           /* save starting available input and output */
634
40.1k
    unsigned copy;              /* number of stored or match bytes to copy */
635
40.1k
    unsigned char FAR *from;    /* where to copy match bytes from */
636
40.1k
    code here;                  /* current decoding table entry */
637
40.1k
    code last;                  /* parent table entry */
638
40.1k
    unsigned len;               /* length to copy for repeats, bits to drop */
639
40.1k
    int ret;                    /* return code */
640
40.1k
#ifdef GUNZIP
641
40.1k
    unsigned char hbuf[4];      /* buffer for gzip header crc calculation */
642
40.1k
#endif
643
40.1k
    static const unsigned short order[19] = /* permutation of code lengths */
644
40.1k
        {16, 17, 18, 0, 8, 7, 9, 6, 10, 5, 11, 4, 12, 3, 13, 2, 14, 1, 15};
645
646
40.1k
    if (inflateStateCheck(strm) || strm->next_out == Z_NULL ||
647
40.1k
        (strm->next_in == Z_NULL && strm->avail_in != 0))
648
0
        return Z_STREAM_ERROR;
649
650
40.1k
    state = (struct inflate_state FAR *)strm->state;
651
40.1k
    if (state->mode == TYPE) state->mode = TYPEDO;      /* skip check */
652
40.1k
    LOAD();
653
40.1k
    in = have;
654
40.1k
    out = left;
655
40.1k
    ret = Z_OK;
656
40.1k
    for (;;)
657
480k
        switch (state->mode) {
658
28.8k
        case HEAD:
659
28.8k
            if (state->wrap == 0) {
660
0
                state->mode = TYPEDO;
661
0
                break;
662
0
            }
663
28.8k
            NEEDBITS(16);
664
28.5k
#ifdef GUNZIP
665
28.5k
            if ((state->wrap & 2) && hold == 0x8b1f) {  /* gzip header */
666
0
                if (state->wbits == 0)
667
0
                    state->wbits = 15;
668
0
                state->check = crc32(0L, Z_NULL, 0);
669
0
                CRC2(state->check, hold);
670
0
                INITBITS();
671
0
                state->mode = FLAGS;
672
0
                break;
673
0
            }
674
28.5k
            if (state->head != Z_NULL)
675
0
                state->head->done = -1;
676
28.5k
            if (!(state->wrap & 1) ||   /* check if zlib header allowed */
677
#else
678
            if (
679
#endif
680
28.5k
                ((BITS(8) << 8) + (hold >> 8)) % 31) {
681
170
                strm->msg = (char *)"incorrect header check";
682
170
                state->mode = BAD;
683
170
                break;
684
170
            }
685
28.3k
            if (BITS(4) != Z_DEFLATED) {
686
233
                strm->msg = (char *)"unknown compression method";
687
233
                state->mode = BAD;
688
233
                break;
689
233
            }
690
28.1k
            DROPBITS(4);
691
28.1k
            len = BITS(4) + 8;
692
28.1k
            if (state->wbits == 0)
693
0
                state->wbits = len;
694
28.1k
            if (len > 15 || len > state->wbits) {
695
164
                strm->msg = (char *)"invalid window size";
696
164
                state->mode = BAD;
697
164
                break;
698
164
            }
699
27.9k
            state->dmax = 1U << len;
700
27.9k
            state->flags = 0;               /* indicate zlib header */
701
27.9k
            Tracev((stderr, "inflate:   zlib header ok\n"));
702
27.9k
            strm->adler = state->check = adler32(0L, Z_NULL, 0);
703
27.9k
            state->mode = hold & 0x200 ? DICTID : TYPE;
704
27.9k
            INITBITS();
705
27.9k
            break;
706
0
#ifdef GUNZIP
707
0
        case FLAGS:
708
0
            NEEDBITS(16);
709
0
            state->flags = (int)(hold);
710
0
            if ((state->flags & 0xff) != Z_DEFLATED) {
711
0
                strm->msg = (char *)"unknown compression method";
712
0
                state->mode = BAD;
713
0
                break;
714
0
            }
715
0
            if (state->flags & 0xe000) {
716
0
                strm->msg = (char *)"unknown header flags set";
717
0
                state->mode = BAD;
718
0
                break;
719
0
            }
720
0
            if (state->head != Z_NULL)
721
0
                state->head->text = (int)((hold >> 8) & 1);
722
0
            if ((state->flags & 0x0200) && (state->wrap & 4))
723
0
                CRC2(state->check, hold);
724
0
            INITBITS();
725
0
            state->mode = TIME;
726
0
        case TIME:
727
0
            NEEDBITS(32);
728
0
            if (state->head != Z_NULL)
729
0
                state->head->time = hold;
730
0
            if ((state->flags & 0x0200) && (state->wrap & 4))
731
0
                CRC4(state->check, hold);
732
0
            INITBITS();
733
0
            state->mode = OS;
734
0
        case OS:
735
0
            NEEDBITS(16);
736
0
            if (state->head != Z_NULL) {
737
0
                state->head->xflags = (int)(hold & 0xff);
738
0
                state->head->os = (int)(hold >> 8);
739
0
            }
740
0
            if ((state->flags & 0x0200) && (state->wrap & 4))
741
0
                CRC2(state->check, hold);
742
0
            INITBITS();
743
0
            state->mode = EXLEN;
744
0
        case EXLEN:
745
0
            if (state->flags & 0x0400) {
746
0
                NEEDBITS(16);
747
0
                state->length = (unsigned)(hold);
748
0
                if (state->head != Z_NULL)
749
0
                    state->head->extra_len = (unsigned)hold;
750
0
                if ((state->flags & 0x0200) && (state->wrap & 4))
751
0
                    CRC2(state->check, hold);
752
0
                INITBITS();
753
0
            }
754
0
            else if (state->head != Z_NULL)
755
0
                state->head->extra = Z_NULL;
756
0
            state->mode = EXTRA;
757
0
        case EXTRA:
758
0
            if (state->flags & 0x0400) {
759
0
                copy = state->length;
760
0
                if (copy > have) copy = have;
761
0
                if (copy) {
762
0
                    if (state->head != Z_NULL &&
763
0
                        state->head->extra != Z_NULL) {
764
0
                        len = state->head->extra_len - state->length;
765
0
                        zmemcpy(state->head->extra + len, next,
766
0
                                len + copy > state->head->extra_max ?
767
0
                                state->head->extra_max - len : copy);
768
0
                    }
769
0
                    if ((state->flags & 0x0200) && (state->wrap & 4))
770
0
                        state->check = crc32(state->check, next, copy);
771
0
                    have -= copy;
772
0
                    next += copy;
773
0
                    state->length -= copy;
774
0
                }
775
0
                if (state->length) goto inf_leave;
776
0
            }
777
0
            state->length = 0;
778
0
            state->mode = NAME;
779
0
        case NAME:
780
0
            if (state->flags & 0x0800) {
781
0
                if (have == 0) goto inf_leave;
782
0
                copy = 0;
783
0
                do {
784
0
                    len = (unsigned)(next[copy++]);
785
0
                    if (state->head != Z_NULL &&
786
0
                            state->head->name != Z_NULL &&
787
0
                            state->length < state->head->name_max)
788
0
                        state->head->name[state->length++] = (Bytef)len;
789
0
                } while (len && copy < have);
790
0
                if ((state->flags & 0x0200) && (state->wrap & 4))
791
0
                    state->check = crc32(state->check, next, copy);
792
0
                have -= copy;
793
0
                next += copy;
794
0
                if (len) goto inf_leave;
795
0
            }
796
0
            else if (state->head != Z_NULL)
797
0
                state->head->name = Z_NULL;
798
0
            state->length = 0;
799
0
            state->mode = COMMENT;
800
0
        case COMMENT:
801
0
            if (state->flags & 0x1000) {
802
0
                if (have == 0) goto inf_leave;
803
0
                copy = 0;
804
0
                do {
805
0
                    len = (unsigned)(next[copy++]);
806
0
                    if (state->head != Z_NULL &&
807
0
                            state->head->comment != Z_NULL &&
808
0
                            state->length < state->head->comm_max)
809
0
                        state->head->comment[state->length++] = (Bytef)len;
810
0
                } while (len && copy < have);
811
0
                if ((state->flags & 0x0200) && (state->wrap & 4))
812
0
                    state->check = crc32(state->check, next, copy);
813
0
                have -= copy;
814
0
                next += copy;
815
0
                if (len) goto inf_leave;
816
0
            }
817
0
            else if (state->head != Z_NULL)
818
0
                state->head->comment = Z_NULL;
819
0
            state->mode = HCRC;
820
0
        case HCRC:
821
0
            if (state->flags & 0x0200) {
822
0
                NEEDBITS(16);
823
0
                if ((state->wrap & 4) && hold != (state->check & 0xffff)) {
824
0
                    strm->msg = (char *)"header crc mismatch";
825
0
                    state->mode = BAD;
826
0
                    break;
827
0
                }
828
0
                INITBITS();
829
0
            }
830
0
            if (state->head != Z_NULL) {
831
0
                state->head->hcrc = (int)((state->flags >> 9) & 1);
832
0
                state->head->done = 1;
833
0
            }
834
0
            strm->adler = state->check = crc32(0L, Z_NULL, 0);
835
0
            state->mode = TYPE;
836
0
            break;
837
0
#endif
838
1.19k
        case DICTID:
839
1.19k
            NEEDBITS(32);
840
259
            strm->adler = state->check = ZSWAP32(hold);
841
259
            INITBITS();
842
259
            state->mode = DICT;
843
259
        case DICT:
844
259
            if (state->havedict == 0) {
845
259
                RESTORE();
846
259
                return Z_NEED_DICT;
847
259
            }
848
0
            strm->adler = state->check = adler32(0L, Z_NULL, 0);
849
0
            state->mode = TYPE;
850
82.8k
        case TYPE:
851
82.8k
            if (flush == Z_BLOCK || flush == Z_TREES) goto inf_leave;
852
83.1k
        case TYPEDO:
853
83.1k
            if (state->last) {
854
1.98k
                BYTEBITS();
855
1.98k
                state->mode = CHECK;
856
1.98k
                break;
857
1.98k
            }
858
81.1k
            NEEDBITS(3);
859
80.6k
            state->last = BITS(1);
860
80.6k
            DROPBITS(1);
861
80.6k
            switch (BITS(2)) {
862
20.9k
            case 0:                             /* stored block */
863
20.9k
                Tracev((stderr, "inflate:     stored block%s\n",
864
20.9k
                        state->last ? " (last)" : ""));
865
20.9k
                state->mode = STORED;
866
20.9k
                break;
867
36.1k
            case 1:                             /* fixed block */
868
36.1k
                fixedtables(state);
869
36.1k
                Tracev((stderr, "inflate:     fixed codes block%s\n",
870
36.1k
                        state->last ? " (last)" : ""));
871
36.1k
                state->mode = LEN_;             /* decode codes */
872
36.1k
                if (flush == Z_TREES) {
873
0
                    DROPBITS(2);
874
0
                    goto inf_leave;
875
0
                }
876
36.1k
                break;
877
36.1k
            case 2:                             /* dynamic block */
878
23.1k
                Tracev((stderr, "inflate:     dynamic codes block%s\n",
879
23.1k
                        state->last ? " (last)" : ""));
880
23.1k
                state->mode = TABLE;
881
23.1k
                break;
882
439
            case 3:
883
439
                strm->msg = (char *)"invalid block type";
884
439
                state->mode = BAD;
885
80.6k
            }
886
80.6k
            DROPBITS(2);
887
80.6k
            break;
888
21.7k
        case STORED:
889
21.7k
            BYTEBITS();                         /* go to byte boundary */
890
21.7k
            NEEDBITS(32);
891
20.0k
            if ((hold & 0xffff) != ((hold >> 16) ^ 0xffff)) {
892
1.77k
                strm->msg = (char *)"invalid stored block lengths";
893
1.77k
                state->mode = BAD;
894
1.77k
                break;
895
1.77k
            }
896
18.2k
            state->length = (unsigned)hold & 0xffff;
897
18.2k
            Tracev((stderr, "inflate:       stored length %u\n",
898
18.2k
                    state->length));
899
18.2k
            INITBITS();
900
18.2k
            state->mode = COPY_;
901
18.2k
            if (flush == Z_TREES) goto inf_leave;
902
18.2k
        case COPY_:
903
18.2k
            state->mode = COPY;
904
28.0k
        case COPY:
905
28.0k
            copy = state->length;
906
28.0k
            if (copy) {
907
10.2k
                if (copy > have) copy = have;
908
10.2k
                if (copy > left) copy = left;
909
10.2k
                if (copy == 0) goto inf_leave;
910
9.25k
                zmemcpy(put, next, copy);
911
9.25k
                have -= copy;
912
9.25k
                next += copy;
913
9.25k
                left -= copy;
914
9.25k
                put += copy;
915
9.25k
                state->length -= copy;
916
9.25k
                break;
917
10.2k
            }
918
17.8k
            Tracev((stderr, "inflate:       stored end\n"));
919
17.8k
            state->mode = TYPE;
920
17.8k
            break;
921
23.3k
        case TABLE:
922
23.3k
            NEEDBITS(14);
923
22.9k
            state->nlen = BITS(5) + 257;
924
22.9k
            DROPBITS(5);
925
22.9k
            state->ndist = BITS(5) + 1;
926
22.9k
            DROPBITS(5);
927
22.9k
            state->ncode = BITS(4) + 4;
928
22.9k
            DROPBITS(4);
929
22.9k
#ifndef PKZIP_BUG_WORKAROUND
930
22.9k
            if (state->nlen > 286 || state->ndist > 30) {
931
212
                strm->msg = (char *)"too many length or distance symbols";
932
212
                state->mode = BAD;
933
212
                break;
934
212
            }
935
22.6k
#endif
936
22.6k
            Tracev((stderr, "inflate:       table sizes ok\n"));
937
22.6k
            state->have = 0;
938
22.6k
            state->mode = LENLENS;
939
23.0k
        case LENLENS:
940
310k
            while (state->have < state->ncode) {
941
287k
                NEEDBITS(3);
942
287k
                state->lens[order[state->have++]] = (unsigned short)BITS(3);
943
287k
                DROPBITS(3);
944
287k
            }
945
161k
            while (state->have < 19)
946
139k
                state->lens[order[state->have++]] = 0;
947
22.3k
            state->next = state->codes;
948
22.3k
            state->lencode = (const code FAR *)(state->next);
949
22.3k
            state->lenbits = 7;
950
22.3k
            ret = inflate_table(CODES, state->lens, 19, &(state->next),
951
22.3k
                                &(state->lenbits), state->work);
952
22.3k
            if (ret) {
953
2.18k
                strm->msg = (char *)"invalid code lengths set";
954
2.18k
                state->mode = BAD;
955
2.18k
                break;
956
2.18k
            }
957
20.1k
            Tracev((stderr, "inflate:       code lengths ok\n"));
958
20.1k
            state->have = 0;
959
20.1k
            state->mode = CODELENS;
960
22.6k
        case CODELENS:
961
2.12M
            while (state->have < state->nlen + state->ndist) {
962
2.65M
                for (;;) {
963
2.65M
                    here = state->lencode[BITS(state->lenbits)];
964
2.65M
                    if ((unsigned)(here.bits) <= bits) break;
965
547k
                    PULLBYTE();
966
547k
                }
967
2.10M
                if (here.val < 16) {
968
1.77M
                    DROPBITS(here.bits);
969
1.77M
                    state->lens[state->have++] = here.val;
970
1.77M
                }
971
327k
                else {
972
327k
                    if (here.val == 16) {
973
184k
                        NEEDBITS(here.bits + 2);
974
183k
                        DROPBITS(here.bits);
975
183k
                        if (state->have == 0) {
976
189
                            strm->msg = (char *)"invalid bit length repeat";
977
189
                            state->mode = BAD;
978
189
                            break;
979
189
                        }
980
183k
                        len = state->lens[state->have - 1];
981
183k
                        copy = 3 + BITS(2);
982
183k
                        DROPBITS(2);
983
183k
                    }
984
143k
                    else if (here.val == 17) {
985
105k
                        NEEDBITS(here.bits + 3);
986
104k
                        DROPBITS(here.bits);
987
104k
                        len = 0;
988
104k
                        copy = 3 + BITS(3);
989
104k
                        DROPBITS(3);
990
104k
                    }
991
37.8k
                    else {
992
37.8k
                        NEEDBITS(here.bits + 7);
993
37.1k
                        DROPBITS(here.bits);
994
37.1k
                        len = 0;
995
37.1k
                        copy = 11 + BITS(7);
996
37.1k
                        DROPBITS(7);
997
37.1k
                    }
998
325k
                    if (state->have + copy > state->nlen + state->ndist) {
999
2.98k
                        strm->msg = (char *)"invalid bit length repeat";
1000
2.98k
                        state->mode = BAD;
1001
2.98k
                        break;
1002
2.98k
                    }
1003
3.62M
                    while (copy--)
1004
3.30M
                        state->lens[state->have++] = (unsigned short)len;
1005
322k
                }
1006
2.10M
            }
1007
1008
            /* handle error breaks in while */
1009
17.6k
            if (state->mode == BAD) break;
1010
1011
            /* check for end-of-block code (better have one) */
1012
14.4k
            if (state->lens[256] == 0) {
1013
834
                strm->msg = (char *)"invalid code -- missing end-of-block";
1014
834
                state->mode = BAD;
1015
834
                break;
1016
834
            }
1017
1018
            /* build code tables -- note: do not change the lenbits or distbits
1019
               values here (9 and 6) without reading the comments in inftrees.h
1020
               concerning the ENOUGH constants, which depend on those values */
1021
13.6k
            state->next = state->codes;
1022
13.6k
            state->lencode = (const code FAR *)(state->next);
1023
13.6k
            state->lenbits = 9;
1024
13.6k
            ret = inflate_table(LENS, state->lens, state->nlen, &(state->next),
1025
13.6k
                                &(state->lenbits), state->work);
1026
13.6k
            if (ret) {
1027
1.91k
                strm->msg = (char *)"invalid literal/lengths set";
1028
1.91k
                state->mode = BAD;
1029
1.91k
                break;
1030
1.91k
            }
1031
11.7k
            state->distcode = (const code FAR *)(state->next);
1032
11.7k
            state->distbits = 6;
1033
11.7k
            ret = inflate_table(DISTS, state->lens + state->nlen, state->ndist,
1034
11.7k
                            &(state->next), &(state->distbits), state->work);
1035
11.7k
            if (ret) {
1036
1.16k
                strm->msg = (char *)"invalid distances set";
1037
1.16k
                state->mode = BAD;
1038
1.16k
                break;
1039
1.16k
            }
1040
10.5k
            Tracev((stderr, "inflate:       codes ok\n"));
1041
10.5k
            state->mode = LEN_;
1042
10.5k
            if (flush == Z_TREES) goto inf_leave;
1043
46.7k
        case LEN_:
1044
46.7k
            state->mode = LEN;
1045
187k
        case LEN:
1046
187k
            if (have >= 6 && left >= 258) {
1047
51.6k
                RESTORE();
1048
51.6k
                inflate_fast(strm, out);
1049
51.6k
                LOAD();
1050
51.6k
                if (state->mode == TYPE)
1051
35.3k
                    state->back = -1;
1052
51.6k
                break;
1053
51.6k
            }
1054
135k
            state->back = 0;
1055
243k
            for (;;) {
1056
243k
                here = state->lencode[BITS(state->lenbits)];
1057
243k
                if ((unsigned)(here.bits) <= bits) break;
1058
113k
                PULLBYTE();
1059
113k
            }
1060
129k
            if (here.op && (here.op & 0xf0) == 0) {
1061
10.4k
                last = here;
1062
13.7k
                for (;;) {
1063
13.7k
                    here = state->lencode[last.val +
1064
13.7k
                            (BITS(last.bits + last.op) >> last.bits)];
1065
13.7k
                    if ((unsigned)(last.bits + here.bits) <= bits) break;
1066
3.35k
                    PULLBYTE();
1067
3.35k
                }
1068
10.3k
                DROPBITS(last.bits);
1069
10.3k
                state->back += last.bits;
1070
10.3k
            }
1071
129k
            DROPBITS(here.bits);
1072
129k
            state->back += here.bits;
1073
129k
            state->length = (unsigned)here.val;
1074
129k
            if ((int)(here.op) == 0) {
1075
109k
                Tracevv((stderr, here.val >= 0x20 && here.val < 0x7f ?
1076
109k
                        "inflate:         literal '%c'\n" :
1077
109k
                        "inflate:         literal 0x%02x\n", here.val));
1078
109k
                state->mode = LIT;
1079
109k
                break;
1080
109k
            }
1081
20.7k
            if (here.op & 32) {
1082
2.43k
                Tracevv((stderr, "inflate:         end of block\n"));
1083
2.43k
                state->back = -1;
1084
2.43k
                state->mode = TYPE;
1085
2.43k
                break;
1086
2.43k
            }
1087
18.2k
            if (here.op & 64) {
1088
91
                strm->msg = (char *)"invalid literal/length code";
1089
91
                state->mode = BAD;
1090
91
                break;
1091
91
            }
1092
18.1k
            state->extra = (unsigned)(here.op) & 15;
1093
18.1k
            state->mode = LENEXT;
1094
18.4k
        case LENEXT:
1095
18.4k
            if (state->extra) {
1096
10.6k
                NEEDBITS(state->extra);
1097
10.1k
                state->length += BITS(state->extra);
1098
10.1k
                DROPBITS(state->extra);
1099
10.1k
                state->back += state->extra;
1100
10.1k
            }
1101
17.9k
            Tracevv((stderr, "inflate:         length %u\n", state->length));
1102
17.9k
            state->was = state->length;
1103
17.9k
            state->mode = DIST;
1104
18.4k
        case DIST:
1105
27.6k
            for (;;) {
1106
27.6k
                here = state->distcode[BITS(state->distbits)];
1107
27.6k
                if ((unsigned)(here.bits) <= bits) break;
1108
10.2k
                PULLBYTE();
1109
10.2k
            }
1110
17.3k
            if ((here.op & 0xf0) == 0) {
1111
0
                last = here;
1112
0
                for (;;) {
1113
0
                    here = state->distcode[last.val +
1114
0
                            (BITS(last.bits + last.op) >> last.bits)];
1115
0
                    if ((unsigned)(last.bits + here.bits) <= bits) break;
1116
0
                    PULLBYTE();
1117
0
                }
1118
0
                DROPBITS(last.bits);
1119
0
                state->back += last.bits;
1120
0
            }
1121
17.3k
            DROPBITS(here.bits);
1122
17.3k
            state->back += here.bits;
1123
17.3k
            if (here.op & 64) {
1124
304
                strm->msg = (char *)"invalid distance code";
1125
304
                state->mode = BAD;
1126
304
                break;
1127
304
            }
1128
17.0k
            state->offset = (unsigned)here.val;
1129
17.0k
            state->extra = (unsigned)(here.op) & 15;
1130
17.0k
            state->mode = DISTEXT;
1131
17.5k
        case DISTEXT:
1132
17.5k
            if (state->extra) {
1133
11.9k
                NEEDBITS(state->extra);
1134
10.9k
                state->offset += BITS(state->extra);
1135
10.9k
                DROPBITS(state->extra);
1136
10.9k
                state->back += state->extra;
1137
10.9k
            }
1138
#ifdef INFLATE_STRICT
1139
            if (state->offset > state->dmax) {
1140
                strm->msg = (char *)"invalid distance too far back";
1141
                state->mode = BAD;
1142
                break;
1143
            }
1144
#endif
1145
16.5k
            Tracevv((stderr, "inflate:         distance %u\n", state->offset));
1146
16.5k
            state->mode = MATCH;
1147
18.3k
        case MATCH:
1148
18.3k
            if (left == 0) goto inf_leave;
1149
16.5k
            copy = out - left;
1150
16.5k
            if (state->offset > copy) {         /* copy from window */
1151
624
                copy = state->offset - copy;
1152
624
                if (copy > state->whave) {
1153
624
                    if (state->sane) {
1154
624
                        strm->msg = (char *)"invalid distance too far back";
1155
624
                        state->mode = BAD;
1156
624
                        break;
1157
624
                    }
1158
#ifdef INFLATE_ALLOW_INVALID_DISTANCE_TOOFAR_ARRR
1159
                    Trace((stderr, "inflate.c too far\n"));
1160
                    copy -= state->whave;
1161
                    if (copy > state->length) copy = state->length;
1162
                    if (copy > left) copy = left;
1163
                    left -= copy;
1164
                    state->length -= copy;
1165
                    do {
1166
                        *put++ = 0;
1167
                    } while (--copy);
1168
                    if (state->length == 0) state->mode = LEN;
1169
                    break;
1170
#endif
1171
624
                }
1172
0
                if (copy > state->wnext) {
1173
0
                    copy -= state->wnext;
1174
0
                    from = state->window + (state->wsize - copy);
1175
0
                }
1176
0
                else
1177
0
                    from = state->window + (state->wnext - copy);
1178
0
                if (copy > state->length) copy = state->length;
1179
0
            }
1180
15.8k
            else {                              /* copy from output */
1181
15.8k
                from = put - state->offset;
1182
15.8k
                copy = state->length;
1183
15.8k
            }
1184
15.8k
            if (copy > left) copy = left;
1185
15.8k
            left -= copy;
1186
15.8k
            state->length -= copy;
1187
478k
            do {
1188
478k
                *put++ = *from++;
1189
478k
            } while (--copy);
1190
15.8k
            if (state->length == 0) state->mode = LEN;
1191
15.8k
            break;
1192
109k
        case LIT:
1193
109k
            if (left == 0) goto inf_leave;
1194
108k
            *put++ = (unsigned char)(state->length);
1195
108k
            left--;
1196
108k
            state->mode = LEN;
1197
108k
            break;
1198
2.60k
        case CHECK:
1199
2.60k
            if (state->wrap) {
1200
2.60k
                NEEDBITS(32);
1201
1.36k
                out -= left;
1202
1.36k
                strm->total_out += out;
1203
1.36k
                state->total += out;
1204
1.36k
                if ((state->wrap & 4) && out)
1205
1.18k
                    strm->adler = state->check =
1206
1.18k
                        UPDATE(state->check, put - out, out);
1207
1.36k
                out = left;
1208
1.36k
                if ((state->wrap & 4) && (
1209
1.36k
#ifdef GUNZIP
1210
1.36k
                     state->flags ? hold :
1211
1.36k
#endif
1212
1.36k
                     ZSWAP32(hold)) != state->check) {
1213
1.30k
                    strm->msg = (char *)"incorrect data check";
1214
1.30k
                    state->mode = BAD;
1215
1.30k
                    break;
1216
1.30k
                }
1217
60
                INITBITS();
1218
60
                Tracev((stderr, "inflate:   check matches trailer\n"));
1219
60
            }
1220
60
#ifdef GUNZIP
1221
60
            state->mode = LENGTH;
1222
60
        case LENGTH:
1223
60
            if (state->wrap && state->flags) {
1224
0
                NEEDBITS(32);
1225
0
                if ((state->wrap & 4) && hold != (state->total & 0xffffffff)) {
1226
0
                    strm->msg = (char *)"incorrect length check";
1227
0
                    state->mode = BAD;
1228
0
                    break;
1229
0
                }
1230
0
                INITBITS();
1231
0
                Tracev((stderr, "inflate:   length matches trailer\n"));
1232
0
            }
1233
60
#endif
1234
60
            state->mode = DONE;
1235
60
        case DONE:
1236
60
            ret = Z_STREAM_END;
1237
60
            goto inf_leave;
1238
16.9k
        case BAD:
1239
16.9k
            ret = Z_DATA_ERROR;
1240
16.9k
            goto inf_leave;
1241
0
        case MEM:
1242
0
            return Z_MEM_ERROR;
1243
0
        case SYNC:
1244
0
        default:
1245
0
            return Z_STREAM_ERROR;
1246
480k
        }
1247
1248
    /*
1249
       Return from inflate(), updating the total counts and the check value.
1250
       If there was no progress during the inflate() call, return a buffer
1251
       error.  Call updatewindow() to create and/or update the window state.
1252
       Note: a memory error from inflate() is non-recoverable.
1253
     */
1254
39.9k
  inf_leave:
1255
39.9k
    RESTORE();
1256
39.9k
    if (state->wsize || (out != strm->avail_out && state->mode < BAD &&
1257
32.3k
            (state->mode < CHECK || flush != Z_FINISH)))
1258
15.2k
        if (updatewindow(strm, strm->next_out, out - strm->avail_out)) {
1259
0
            state->mode = MEM;
1260
0
            return Z_MEM_ERROR;
1261
0
        }
1262
39.9k
    in -= strm->avail_in;
1263
39.9k
    out -= strm->avail_out;
1264
39.9k
    strm->total_in += in;
1265
39.9k
    strm->total_out += out;
1266
39.9k
    state->total += out;
1267
39.9k
    if ((state->wrap & 4) && out)
1268
13.9k
        strm->adler = state->check =
1269
13.9k
            UPDATE(state->check, strm->next_out - out, out);
1270
39.9k
    strm->data_type = (int)state->bits + (state->last ? 64 : 0) +
1271
39.9k
                      (state->mode == TYPE ? 128 : 0) +
1272
39.9k
                      (state->mode == LEN_ || state->mode == COPY_ ? 256 : 0);
1273
39.9k
    if (((in == 0 && out == 0) || flush == Z_FINISH) && ret == Z_OK)
1274
11.4k
        ret = Z_BUF_ERROR;
1275
39.9k
    return ret;
1276
39.9k
}
1277
1278
int ZEXPORT inflateEnd(strm)
1279
z_streamp strm;
1280
28.7k
{
1281
28.7k
    struct inflate_state FAR *state;
1282
28.7k
    if (inflateStateCheck(strm))
1283
0
        return Z_STREAM_ERROR;
1284
28.7k
    state = (struct inflate_state FAR *)strm->state;
1285
28.7k
    if (state->window != Z_NULL) ZFREE(strm, state->window);
1286
28.7k
    ZFREE(strm, strm->state);
1287
28.7k
    strm->state = Z_NULL;
1288
28.7k
    Tracev((stderr, "inflate: end\n"));
1289
28.7k
    return Z_OK;
1290
28.7k
}
1291
1292
int ZEXPORT inflateGetDictionary(strm, dictionary, dictLength)
1293
z_streamp strm;
1294
Bytef *dictionary;
1295
uInt *dictLength;
1296
0
{
1297
0
    struct inflate_state FAR *state;
1298
1299
    /* check state */
1300
0
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
1301
0
    state = (struct inflate_state FAR *)strm->state;
1302
1303
    /* copy dictionary */
1304
0
    if (state->whave && dictionary != Z_NULL) {
1305
0
        zmemcpy(dictionary, state->window + state->wnext,
1306
0
                state->whave - state->wnext);
1307
0
        zmemcpy(dictionary + state->whave - state->wnext,
1308
0
                state->window, state->wnext);
1309
0
    }
1310
0
    if (dictLength != Z_NULL)
1311
0
        *dictLength = state->whave;
1312
0
    return Z_OK;
1313
0
}
1314
1315
int ZEXPORT inflateSetDictionary(strm, dictionary, dictLength)
1316
z_streamp strm;
1317
const Bytef *dictionary;
1318
uInt dictLength;
1319
0
{
1320
0
    struct inflate_state FAR *state;
1321
0
    unsigned long dictid;
1322
0
    int ret;
1323
1324
    /* check state */
1325
0
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
1326
0
    state = (struct inflate_state FAR *)strm->state;
1327
0
    if (state->wrap != 0 && state->mode != DICT)
1328
0
        return Z_STREAM_ERROR;
1329
1330
    /* check for correct dictionary identifier */
1331
0
    if (state->mode == DICT) {
1332
0
        dictid = adler32(0L, Z_NULL, 0);
1333
0
        dictid = adler32(dictid, dictionary, dictLength);
1334
0
        if (dictid != state->check)
1335
0
            return Z_DATA_ERROR;
1336
0
    }
1337
1338
    /* copy dictionary to window using updatewindow(), which will amend the
1339
       existing dictionary if appropriate */
1340
0
    ret = updatewindow(strm, dictionary + dictLength, dictLength);
1341
0
    if (ret) {
1342
0
        state->mode = MEM;
1343
0
        return Z_MEM_ERROR;
1344
0
    }
1345
0
    state->havedict = 1;
1346
0
    Tracev((stderr, "inflate:   dictionary set\n"));
1347
0
    return Z_OK;
1348
0
}
1349
1350
int ZEXPORT inflateGetHeader(strm, head)
1351
z_streamp strm;
1352
gz_headerp head;
1353
0
{
1354
0
    struct inflate_state FAR *state;
1355
1356
    /* check state */
1357
0
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
1358
0
    state = (struct inflate_state FAR *)strm->state;
1359
0
    if ((state->wrap & 2) == 0) return Z_STREAM_ERROR;
1360
1361
    /* save header structure */
1362
0
    state->head = head;
1363
0
    head->done = 0;
1364
0
    return Z_OK;
1365
0
}
1366
1367
/*
1368
   Search buf[0..len-1] for the pattern: 0, 0, 0xff, 0xff.  Return when found
1369
   or when out of input.  When called, *have is the number of pattern bytes
1370
   found in order so far, in 0..3.  On return *have is updated to the new
1371
   state.  If on return *have equals four, then the pattern was found and the
1372
   return value is how many bytes were read including the last byte of the
1373
   pattern.  If *have is less than four, then the pattern has not been found
1374
   yet and the return value is len.  In the latter case, syncsearch() can be
1375
   called again with more data and the *have state.  *have is initialized to
1376
   zero for the first call.
1377
 */
1378
local unsigned syncsearch(have, buf, len)
1379
unsigned FAR *have;
1380
const unsigned char FAR *buf;
1381
unsigned len;
1382
0
{
1383
0
    unsigned got;
1384
0
    unsigned next;
1385
1386
0
    got = *have;
1387
0
    next = 0;
1388
0
    while (next < len && got < 4) {
1389
0
        if ((int)(buf[next]) == (got < 2 ? 0 : 0xff))
1390
0
            got++;
1391
0
        else if (buf[next])
1392
0
            got = 0;
1393
0
        else
1394
0
            got = 4 - got;
1395
0
        next++;
1396
0
    }
1397
0
    *have = got;
1398
0
    return next;
1399
0
}
1400
1401
int ZEXPORT inflateSync(strm)
1402
z_streamp strm;
1403
0
{
1404
0
    unsigned len;               /* number of bytes to look at or looked at */
1405
0
    int flags;                  /* temporary to save header status */
1406
0
    unsigned long in, out;      /* temporary to save total_in and total_out */
1407
0
    unsigned char buf[4];       /* to restore bit buffer to byte string */
1408
0
    struct inflate_state FAR *state;
1409
1410
    /* check parameters */
1411
0
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
1412
0
    state = (struct inflate_state FAR *)strm->state;
1413
0
    if (strm->avail_in == 0 && state->bits < 8) return Z_BUF_ERROR;
1414
1415
    /* if first time, start search in bit buffer */
1416
0
    if (state->mode != SYNC) {
1417
0
        state->mode = SYNC;
1418
0
        state->hold <<= state->bits & 7;
1419
0
        state->bits -= state->bits & 7;
1420
0
        len = 0;
1421
0
        while (state->bits >= 8) {
1422
0
            buf[len++] = (unsigned char)(state->hold);
1423
0
            state->hold >>= 8;
1424
0
            state->bits -= 8;
1425
0
        }
1426
0
        state->have = 0;
1427
0
        syncsearch(&(state->have), buf, len);
1428
0
    }
1429
1430
    /* search available input */
1431
0
    len = syncsearch(&(state->have), strm->next_in, strm->avail_in);
1432
0
    strm->avail_in -= len;
1433
0
    strm->next_in += len;
1434
0
    strm->total_in += len;
1435
1436
    /* return no joy or set up to restart inflate() on a new block */
1437
0
    if (state->have != 4) return Z_DATA_ERROR;
1438
0
    if (state->flags == -1)
1439
0
        state->wrap = 0;    /* if no header yet, treat as raw */
1440
0
    else
1441
0
        state->wrap &= ~4;  /* no point in computing a check value now */
1442
0
    flags = state->flags;
1443
0
    in = strm->total_in;  out = strm->total_out;
1444
0
    inflateReset(strm);
1445
0
    strm->total_in = in;  strm->total_out = out;
1446
0
    state->flags = flags;
1447
0
    state->mode = TYPE;
1448
0
    return Z_OK;
1449
0
}
1450
1451
/*
1452
   Returns true if inflate is currently at the end of a block generated by
1453
   Z_SYNC_FLUSH or Z_FULL_FLUSH. This function is used by one PPP
1454
   implementation to provide an additional safety check. PPP uses
1455
   Z_SYNC_FLUSH but removes the length bytes of the resulting empty stored
1456
   block. When decompressing, PPP checks that at the end of input packet,
1457
   inflate is waiting for these length bytes.
1458
 */
1459
int ZEXPORT inflateSyncPoint(strm)
1460
z_streamp strm;
1461
0
{
1462
0
    struct inflate_state FAR *state;
1463
1464
0
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
1465
0
    state = (struct inflate_state FAR *)strm->state;
1466
0
    return state->mode == STORED && state->bits == 0;
1467
0
}
1468
1469
int ZEXPORT inflateCopy(dest, source)
1470
z_streamp dest;
1471
z_streamp source;
1472
0
{
1473
0
    struct inflate_state FAR *state;
1474
0
    struct inflate_state FAR *copy;
1475
0
    unsigned char FAR *window;
1476
0
    unsigned wsize;
1477
1478
    /* check input */
1479
0
    if (inflateStateCheck(source) || dest == Z_NULL)
1480
0
        return Z_STREAM_ERROR;
1481
0
    state = (struct inflate_state FAR *)source->state;
1482
1483
    /* allocate space */
1484
0
    copy = (struct inflate_state FAR *)
1485
0
           ZALLOC(source, 1, sizeof(struct inflate_state));
1486
0
    if (copy == Z_NULL) return Z_MEM_ERROR;
1487
0
    window = Z_NULL;
1488
0
    if (state->window != Z_NULL) {
1489
0
        window = (unsigned char FAR *)
1490
0
                 ZALLOC(source, 1U << state->wbits, sizeof(unsigned char));
1491
0
        if (window == Z_NULL) {
1492
0
            ZFREE(source, copy);
1493
0
            return Z_MEM_ERROR;
1494
0
        }
1495
0
    }
1496
1497
    /* copy state */
1498
0
    zmemcpy((voidpf)dest, (voidpf)source, sizeof(z_stream));
1499
0
    zmemcpy((voidpf)copy, (voidpf)state, sizeof(struct inflate_state));
1500
0
    copy->strm = dest;
1501
0
    if (state->lencode >= state->codes &&
1502
0
        state->lencode <= state->codes + ENOUGH - 1) {
1503
0
        copy->lencode = copy->codes + (state->lencode - state->codes);
1504
0
        copy->distcode = copy->codes + (state->distcode - state->codes);
1505
0
    }
1506
0
    copy->next = copy->codes + (state->next - state->codes);
1507
0
    if (window != Z_NULL) {
1508
0
        wsize = 1U << state->wbits;
1509
0
        zmemcpy(window, state->window, wsize);
1510
0
    }
1511
0
    copy->window = window;
1512
0
    dest->state = (struct internal_state FAR *)copy;
1513
0
    return Z_OK;
1514
0
}
1515
1516
int ZEXPORT inflateUndermine(strm, subvert)
1517
z_streamp strm;
1518
int subvert;
1519
0
{
1520
0
    struct inflate_state FAR *state;
1521
1522
0
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
1523
0
    state = (struct inflate_state FAR *)strm->state;
1524
#ifdef INFLATE_ALLOW_INVALID_DISTANCE_TOOFAR_ARRR
1525
    state->sane = !subvert;
1526
    return Z_OK;
1527
#else
1528
0
    (void)subvert;
1529
0
    state->sane = 1;
1530
0
    return Z_DATA_ERROR;
1531
0
#endif
1532
0
}
1533
1534
int ZEXPORT inflateValidate(strm, check)
1535
z_streamp strm;
1536
int check;
1537
0
{
1538
0
    struct inflate_state FAR *state;
1539
1540
0
    if (inflateStateCheck(strm)) return Z_STREAM_ERROR;
1541
0
    state = (struct inflate_state FAR *)strm->state;
1542
0
    if (check && state->wrap)
1543
0
        state->wrap |= 4;
1544
0
    else
1545
0
        state->wrap &= ~4;
1546
0
    return Z_OK;
1547
0
}
1548
1549
long ZEXPORT inflateMark(strm)
1550
z_streamp strm;
1551
0
{
1552
0
    struct inflate_state FAR *state;
1553
1554
0
    if (inflateStateCheck(strm))
1555
0
        return -(1L << 16);
1556
0
    state = (struct inflate_state FAR *)strm->state;
1557
0
    return (long)(((unsigned long)((long)state->back)) << 16) +
1558
0
        (state->mode == COPY ? state->length :
1559
0
            (state->mode == MATCH ? state->was - state->length : 0));
1560
0
}
1561
1562
unsigned long ZEXPORT inflateCodesUsed(strm)
1563
z_streamp strm;
1564
0
{
1565
0
    struct inflate_state FAR *state;
1566
0
    if (inflateStateCheck(strm)) return (unsigned long)-1;
1567
0
    state = (struct inflate_state FAR *)strm->state;
1568
0
    return (unsigned long)(state->next - state->codes);
1569
0
}