git.oblomov.eu Git - linux-2.6/blob - lib/zlib_inflate/inflate.c

   1 /* inflate.c -- zlib decompression
   2  * Copyright (C) 1995-2005 Mark Adler
   3  * For conditions of distribution and use, see copyright notice in zlib.h
   4  *
   5  * Based on zlib 1.2.3 but modified for the Linux Kernel by
   6  * Richard Purdie <richard@openedhand.com>
   7  *
   8  * Changes mainly for static instead of dynamic memory allocation
   9  *
  10  */
  11
  12 #include <linux/zutil.h>
  13 #include "inftrees.h"
  14 #include "inflate.h"
  15 #include "inffast.h"
  16 #include "infutil.h"
  17
  18 int zlib_inflate_workspacesize(void)
  19 {
  20     return sizeof(struct inflate_workspace);
  21 }
  22
  23 int zlib_inflateReset(z_streamp strm)
  24 {
  25     struct inflate_state *state;
  26
  27     if (strm == NULL || strm->state == NULL) return Z_STREAM_ERROR;
  28     state = (struct inflate_state *)strm->state;
  29     strm->total_in = strm->total_out = state->total = 0;
  30     strm->msg = NULL;
  31     strm->adler = 1;        /* to support ill-conceived Java test suite */
  32     state->mode = HEAD;
  33     state->last = 0;
  34     state->havedict = 0;
  35     state->dmax = 32768U;
  36     state->hold = 0;
  37     state->bits = 0;
  38     state->lencode = state->distcode = state->next = state->codes;
  39
  40     /* Initialise Window */
  41     state->wsize = 1U << state->wbits;
  42     state->write = 0;
  43     state->whave = 0;
  44
  45     return Z_OK;
  46 }
  47
  48 #if 0
  49 int zlib_inflatePrime(z_streamp strm, int bits, int value)
  50 {
  51     struct inflate_state *state;
  52
  53     if (strm == NULL || strm->state == NULL) return Z_STREAM_ERROR;
  54     state = (struct inflate_state *)strm->state;
  55     if (bits > 16 || state->bits + bits > 32) return Z_STREAM_ERROR;
  56     value &= (1L << bits) - 1;
  57     state->hold += value << state->bits;
  58     state->bits += bits;
  59     return Z_OK;
  60 }
  61 #endif
  62
  63 int zlib_inflateInit2(z_streamp strm, int windowBits)
  64 {
  65     struct inflate_state *state;
  66
  67     if (strm == NULL) return Z_STREAM_ERROR;
  68     strm->msg = NULL;                 /* in case we return an error */
  69
  70     state = &WS(strm)->inflate_state;
  71     strm->state = (struct internal_state *)state;
  72
  73     if (windowBits < 0) {
  74         state->wrap = 0;
  75         windowBits = -windowBits;
  76     }
  77     else {
  78         state->wrap = (windowBits >> 4) + 1;
  79     }
  80     if (windowBits < 8 || windowBits > 15) {
  81         return Z_STREAM_ERROR;
  82     }
  83     state->wbits = (unsigned)windowBits;
  84     state->window = &WS(strm)->working_window[0];
  85
  86     return zlib_inflateReset(strm);
  87 }
  88
  89 /*
  90    Return state with length and distance decoding tables and index sizes set to
  91    fixed code decoding.  This returns fixed tables from inffixed.h.
  92  */
  93 static void zlib_fixedtables(struct inflate_state *state)
  94 {
  95 #   include "inffixed.h"
  96     state->lencode = lenfix;
  97     state->lenbits = 9;
  98     state->distcode = distfix;
  99     state->distbits = 5;
 100 }
 101
 102
 103 /*
 104    Update the window with the last wsize (normally 32K) bytes written before
 105    returning. This is only called when a window is already in use, or when
 106    output has been written during this inflate call, but the end of the deflate
 107    stream has not been reached yet. It is also called to window dictionary data
 108    when a dictionary is loaded.
 109
 110    Providing output buffers larger than 32K to inflate() should provide a speed
 111    advantage, since only the last 32K of output is copied to the sliding window
 112    upon return from inflate(), and since all distances after the first 32K of
 113    output will fall in the output data, making match copies simpler and faster.
 114    The advantage may be dependent on the size of the processor's data caches.
 115  */
 116 static void zlib_updatewindow(z_streamp strm, unsigned out)
 117 {
 118     struct inflate_state *state;
 119     unsigned copy, dist;
 120
 121     state = (struct inflate_state *)strm->state;
 122
 123     /* copy state->wsize or less output bytes into the circular window */
 124     copy = out - strm->avail_out;
 125     if (copy >= state->wsize) {
 126         memcpy(state->window, strm->next_out - state->wsize, state->wsize);
 127         state->write = 0;
 128         state->whave = state->wsize;
 129     }
 130     else {
 131         dist = state->wsize - state->write;
 132         if (dist > copy) dist = copy;
 133         memcpy(state->window + state->write, strm->next_out - copy, dist);
 134         copy -= dist;
 135         if (copy) {
 136             memcpy(state->window, strm->next_out - copy, copy);
 137             state->write = copy;
 138             state->whave = state->wsize;
 139         }
 140         else {
 141             state->write += dist;
 142             if (state->write == state->wsize) state->write = 0;
 143             if (state->whave < state->wsize) state->whave += dist;
 144         }
 145     }
 146 }
 147
 148
 149 /*
 150  * At the end of a Deflate-compressed PPP packet, we expect to have seen
 151  * a `stored' block type value but not the (zero) length bytes.
 152  */
 153 /*
 154    Returns true if inflate is currently at the end of a block generated by
 155    Z_SYNC_FLUSH or Z_FULL_FLUSH. This function is used by one PPP
 156    implementation to provide an additional safety check. PPP uses
 157    Z_SYNC_FLUSH but removes the length bytes of the resulting empty stored
 158    block. When decompressing, PPP checks that at the end of input packet,
 159    inflate is waiting for these length bytes.
 160  */
 161 static int zlib_inflateSyncPacket(z_streamp strm)
 162 {
 163     struct inflate_state *state;
 164
 165     if (strm == NULL || strm->state == NULL) return Z_STREAM_ERROR;
 166     state = (struct inflate_state *)strm->state;
 167
 168     if (state->mode == STORED && state->bits == 0) {
 169         state->mode = TYPE;
 170         return Z_OK;
 171     }
 172     return Z_DATA_ERROR;
 173 }
 174
 175 /* Macros for inflate(): */
 176
 177 /* check function to use adler32() for zlib or crc32() for gzip */
 178 #define UPDATE(check, buf, len) zlib_adler32(check, buf, len)
 179
 180 /* Load registers with state in inflate() for speed */
 181 #define LOAD() \
 182     do { \
 183         put = strm->next_out; \
 184         left = strm->avail_out; \
 185         next = strm->next_in; \
 186         have = strm->avail_in; \
 187         hold = state->hold; \
 188         bits = state->bits; \
 189     } while (0)
 190
 191 /* Restore state from registers in inflate() */
 192 #define RESTORE() \
 193     do { \
 194         strm->next_out = put; \
 195         strm->avail_out = left; \
 196         strm->next_in = next; \
 197         strm->avail_in = have; \
 198         state->hold = hold; \
 199         state->bits = bits; \
 200     } while (0)
 201
 202 /* Clear the input bit accumulator */
 203 #define INITBITS() \
 204     do { \
 205         hold = 0; \
 206         bits = 0; \
 207     } while (0)
 208
 209 /* Get a byte of input into the bit accumulator, or return from inflate()
 210    if there is no input available. */
 211 #define PULLBYTE() \
 212     do { \
 213         if (have == 0) goto inf_leave; \
 214         have--; \
 215         hold += (unsigned long)(*next++) << bits; \
 216         bits += 8; \
 217     } while (0)
 218
 219 /* Assure that there are at least n bits in the bit accumulator.  If there is
 220    not enough available input to do that, then return from inflate(). */
 221 #define NEEDBITS(n) \
 222     do { \
 223         while (bits < (unsigned)(n)) \
 224             PULLBYTE(); \
 225     } while (0)
 226
 227 /* Return the low n bits of the bit accumulator (n < 16) */
 228 #define BITS(n) \
 229     ((unsigned)hold & ((1U << (n)) - 1))
 230
 231 /* Remove n bits from the bit accumulator */
 232 #define DROPBITS(n) \
 233     do { \
 234         hold >>= (n); \
 235         bits -= (unsigned)(n); \
 236     } while (0)
 237
 238 /* Remove zero to seven bits as needed to go to a byte boundary */
 239 #define BYTEBITS() \
 240     do { \
 241         hold >>= bits & 7; \
 242         bits -= bits & 7; \
 243     } while (0)
 244
 245 /* Reverse the bytes in a 32-bit value */
 246 #define REVERSE(q) \
 247     ((((q) >> 24) & 0xff) + (((q) >> 8) & 0xff00) + \
 248      (((q) & 0xff00) << 8) + (((q) & 0xff) << 24))
 249
 250 /*
 251    inflate() uses a state machine to process as much input data and generate as
 252    much output data as possible before returning.  The state machine is
 253    structured roughly as follows:
 254
 255     for (;;) switch (state) {
 256     ...
 257     case STATEn:
 258         if (not enough input data or output space to make progress)
 259             return;
 260         ... make progress ...
 261         state = STATEm;
 262         break;
 263     ...
 264     }
 265
 266    so when inflate() is called again, the same case is attempted again, and
 267    if the appropriate resources are provided, the machine proceeds to the
 268    next state.  The NEEDBITS() macro is usually the way the state evaluates
 269    whether it can proceed or should return.  NEEDBITS() does the return if
 270    the requested bits are not available.  The typical use of the BITS macros
 271    is:
 272
 273         NEEDBITS(n);
 274         ... do something with BITS(n) ...
 275         DROPBITS(n);
 276
 277    where NEEDBITS(n) either returns from inflate() if there isn't enough
 278    input left to load n bits into the accumulator, or it continues.  BITS(n)
 279    gives the low n bits in the accumulator.  When done, DROPBITS(n) drops
 280    the low n bits off the accumulator.  INITBITS() clears the accumulator
 281    and sets the number of available bits to zero.  BYTEBITS() discards just
 282    enough bits to put the accumulator on a byte boundary.  After BYTEBITS()
 283    and a NEEDBITS(8), then BITS(8) would return the next byte in the stream.
 284
 285    NEEDBITS(n) uses PULLBYTE() to get an available byte of input, or to return
 286    if there is no input available.  The decoding of variable length codes uses
 287    PULLBYTE() directly in order to pull just enough bytes to decode the next
 288    code, and no more.
 289
 290    Some states loop until they get enough input, making sure that enough
 291    state information is maintained to continue the loop where it left off
 292    if NEEDBITS() returns in the loop.  For example, want, need, and keep
 293    would all have to actually be part of the saved state in case NEEDBITS()
 294    returns:
 295
 296     case STATEw:
 297         while (want < need) {
 298             NEEDBITS(n);
 299             keep[want++] = BITS(n);
 300             DROPBITS(n);
 301         }
 302         state = STATEx;
 303     case STATEx:
 304
 305    As shown above, if the next state is also the next case, then the break
 306    is omitted.
 307
 308    A state may also return if there is not enough output space available to
 309    complete that state.  Those states are copying stored data, writing a
 310    literal byte, and copying a matching string.
 311
 312    When returning, a "goto inf_leave" is used to update the total counters,
 313    update the check value, and determine whether any progress has been made
 314    during that inflate() call in order to return the proper return code.
 315    Progress is defined as a change in either strm->avail_in or strm->avail_out.
 316    When there is a window, goto inf_leave will update the window with the last
 317    output written.  If a goto inf_leave occurs in the middle of decompression
 318    and there is no window currently, goto inf_leave will create one and copy
 319    output to the window for the next call of inflate().
 320
 321    In this implementation, the flush parameter of inflate() only affects the
 322    return code (per zlib.h).  inflate() always writes as much as possible to
 323    strm->next_out, given the space available and the provided input--the effect
 324    documented in zlib.h of Z_SYNC_FLUSH.  Furthermore, inflate() always defers
 325    the allocation of and copying into a sliding window until necessary, which
 326    provides the effect documented in zlib.h for Z_FINISH when the entire input
 327    stream available.  So the only thing the flush parameter actually does is:
 328    when flush is set to Z_FINISH, inflate() cannot return Z_OK.  Instead it
 329    will return Z_BUF_ERROR if it has not reached the end of the stream.
 330  */
 331
 332 int zlib_inflate(z_streamp strm, int flush)
 333 {
 334     struct inflate_state *state;
 335     const unsigned char *next;  /* next input */
 336     unsigned char *put;         /* next output */
 337     unsigned have, left;        /* available input and output */
 338     unsigned long hold;         /* bit buffer */
 339     unsigned bits;              /* bits in bit buffer */
 340     unsigned in, out;           /* save starting available input and output */
 341     unsigned copy;              /* number of stored or match bytes to copy */
 342     unsigned char *from;        /* where to copy match bytes from */
 343     code this;                  /* current decoding table entry */
 344     code last;                  /* parent table entry */
 345     unsigned len;               /* length to copy for repeats, bits to drop */
 346     int ret;                    /* return code */
 347     static const unsigned short order[19] = /* permutation of code lengths */
 348         {16, 17, 18, 0, 8, 7, 9, 6, 10, 5, 11, 4, 12, 3, 13, 2, 14, 1, 15};
 349
 350     /* Do not check for strm->next_out == NULL here as ppc zImage
 351        inflates to strm->next_out = 0 */
 352
 353     if (strm == NULL || strm->state == NULL ||
 354         (strm->next_in == NULL && strm->avail_in != 0))
 355         return Z_STREAM_ERROR;
 356
 357     state = (struct inflate_state *)strm->state;
 358
 359     if (state->mode == TYPE) state->mode = TYPEDO;      /* skip check */
 360     LOAD();
 361     in = have;
 362     out = left;
 363     ret = Z_OK;
 364     for (;;)
 365         switch (state->mode) {
 366         case HEAD:
 367             if (state->wrap == 0) {
 368                 state->mode = TYPEDO;
 369                 break;
 370             }
 371             NEEDBITS(16);
 372             if (
 373                 ((BITS(8) << 8) + (hold >> 8)) % 31) {
 374                 strm->msg = (char *)"incorrect header check";
 375                 state->mode = BAD;
 376                 break;
 377             }
 378             if (BITS(4) != Z_DEFLATED) {
 379                 strm->msg = (char *)"unknown compression method";
 380                 state->mode = BAD;
 381                 break;
 382             }
 383             DROPBITS(4);
 384             len = BITS(4) + 8;
 385             if (len > state->wbits) {
 386                 strm->msg = (char *)"invalid window size";
 387                 state->mode = BAD;
 388                 break;
 389             }
 390             state->dmax = 1U << len;
 391             strm->adler = state->check = zlib_adler32(0L, NULL, 0);
 392             state->mode = hold & 0x200 ? DICTID : TYPE;
 393             INITBITS();
 394             break;
 395         case DICTID:
 396             NEEDBITS(32);
 397             strm->adler = state->check = REVERSE(hold);
 398             INITBITS();
 399             state->mode = DICT;
 400         case DICT:
 401             if (state->havedict == 0) {
 402                 RESTORE();
 403                 return Z_NEED_DICT;
 404             }
 405             strm->adler = state->check = zlib_adler32(0L, NULL, 0);
 406             state->mode = TYPE;
 407         case TYPE:
 408             if (flush == Z_BLOCK) goto inf_leave;
 409         case TYPEDO:
 410             if (state->last) {
 411                 BYTEBITS();
 412                 state->mode = CHECK;
 413                 break;
 414             }
 415             NEEDBITS(3);
 416             state->last = BITS(1);
 417             DROPBITS(1);
 418             switch (BITS(2)) {
 419             case 0:                             /* stored block */
 420                 state->mode = STORED;
 421                 break;
 422             case 1:                             /* fixed block */
 423                 zlib_fixedtables(state);
 424                 state->mode = LEN;              /* decode codes */
 425                 break;
 426             case 2:                             /* dynamic block */
 427                 state->mode = TABLE;
 428                 break;
 429             case 3:
 430                 strm->msg = (char *)"invalid block type";
 431                 state->mode = BAD;
 432             }
 433             DROPBITS(2);
 434             break;
 435         case STORED:
 436             BYTEBITS();                         /* go to byte boundary */
 437             NEEDBITS(32);
 438             if ((hold & 0xffff) != ((hold >> 16) ^ 0xffff)) {
 439                 strm->msg = (char *)"invalid stored block lengths";
 440                 state->mode = BAD;
 441                 break;
 442             }
 443             state->length = (unsigned)hold & 0xffff;
 444             INITBITS();
 445             state->mode = COPY;
 446         case COPY:
 447             copy = state->length;
 448             if (copy) {
 449                 if (copy > have) copy = have;
 450                 if (copy > left) copy = left;
 451                 if (copy == 0) goto inf_leave;
 452                 memcpy(put, next, copy);
 453                 have -= copy;
 454                 next += copy;
 455                 left -= copy;
 456                 put += copy;
 457                 state->length -= copy;
 458                 break;
 459             }
 460             state->mode = TYPE;
 461             break;
 462         case TABLE:
 463             NEEDBITS(14);
 464             state->nlen = BITS(5) + 257;
 465             DROPBITS(5);
 466             state->ndist = BITS(5) + 1;
 467             DROPBITS(5);
 468             state->ncode = BITS(4) + 4;
 469             DROPBITS(4);
 470 #ifndef PKZIP_BUG_WORKAROUND
 471             if (state->nlen > 286 || state->ndist > 30) {
 472                 strm->msg = (char *)"too many length or distance symbols";
 473                 state->mode = BAD;
 474                 break;
 475             }
 476 #endif
 477             state->have = 0;
 478             state->mode = LENLENS;
 479         case LENLENS:
 480             while (state->have < state->ncode) {
 481                 NEEDBITS(3);
 482                 state->lens[order[state->have++]] = (unsigned short)BITS(3);
 483                 DROPBITS(3);
 484             }
 485             while (state->have < 19)
 486                 state->lens[order[state->have++]] = 0;
 487             state->next = state->codes;
 488             state->lencode = (code const *)(state->next);
 489             state->lenbits = 7;
 490             ret = zlib_inflate_table(CODES, state->lens, 19, &(state->next),
 491                                 &(state->lenbits), state->work);
 492             if (ret) {
 493                 strm->msg = (char *)"invalid code lengths set";
 494                 state->mode = BAD;
 495                 break;
 496             }
 497             state->have = 0;
 498             state->mode = CODELENS;
 499         case CODELENS:
 500             while (state->have < state->nlen + state->ndist) {
 501                 for (;;) {
 502                     this = state->lencode[BITS(state->lenbits)];
 503                     if ((unsigned)(this.bits) <= bits) break;
 504                     PULLBYTE();
 505                 }
 506                 if (this.val < 16) {
 507                     NEEDBITS(this.bits);
 508                     DROPBITS(this.bits);
 509                     state->lens[state->have++] = this.val;
 510                 }
 511                 else {
 512                     if (this.val == 16) {
 513                         NEEDBITS(this.bits + 2);
 514                         DROPBITS(this.bits);
 515                         if (state->have == 0) {
 516                             strm->msg = (char *)"invalid bit length repeat";
 517                             state->mode = BAD;
 518                             break;
 519                         }
 520                         len = state->lens[state->have - 1];
 521                         copy = 3 + BITS(2);
 522                         DROPBITS(2);
 523                     }
 524                     else if (this.val == 17) {
 525                         NEEDBITS(this.bits + 3);
 526                         DROPBITS(this.bits);
 527                         len = 0;
 528                         copy = 3 + BITS(3);
 529                         DROPBITS(3);
 530                     }
 531                     else {
 532                         NEEDBITS(this.bits + 7);
 533                         DROPBITS(this.bits);
 534                         len = 0;
 535                         copy = 11 + BITS(7);
 536                         DROPBITS(7);
 537                     }
 538                     if (state->have + copy > state->nlen + state->ndist) {
 539                         strm->msg = (char *)"invalid bit length repeat";
 540                         state->mode = BAD;
 541                         break;
 542                     }
 543                     while (copy--)
 544                         state->lens[state->have++] = (unsigned short)len;
 545                 }
 546             }
 547
 548             /* handle error breaks in while */
 549             if (state->mode == BAD) break;
 550
 551             /* build code tables */
 552             state->next = state->codes;
 553             state->lencode = (code const *)(state->next);
 554             state->lenbits = 9;
 555             ret = zlib_inflate_table(LENS, state->lens, state->nlen, &(state->next),
 556                                 &(state->lenbits), state->work);
 557             if (ret) {
 558                 strm->msg = (char *)"invalid literal/lengths set";
 559                 state->mode = BAD;
 560                 break;
 561             }
 562             state->distcode = (code const *)(state->next);
 563             state->distbits = 6;
 564             ret = zlib_inflate_table(DISTS, state->lens + state->nlen, state->ndist,
 565                             &(state->next), &(state->distbits), state->work);
 566             if (ret) {
 567                 strm->msg = (char *)"invalid distances set";
 568                 state->mode = BAD;
 569                 break;
 570             }
 571             state->mode = LEN;
 572         case LEN:
 573             if (have >= 6 && left >= 258) {
 574                 RESTORE();
 575                 inflate_fast(strm, out);
 576                 LOAD();
 577                 break;
 578             }
 579             for (;;) {
 580                 this = state->lencode[BITS(state->lenbits)];
 581                 if ((unsigned)(this.bits) <= bits) break;
 582                 PULLBYTE();
 583             }
 584             if (this.op && (this.op & 0xf0) == 0) {
 585                 last = this;
 586                 for (;;) {
 587                     this = state->lencode[last.val +
 588                             (BITS(last.bits + last.op) >> last.bits)];
 589                     if ((unsigned)(last.bits + this.bits) <= bits) break;
 590                     PULLBYTE();
 591                 }
 592                 DROPBITS(last.bits);
 593             }
 594             DROPBITS(this.bits);
 595             state->length = (unsigned)this.val;
 596             if ((int)(this.op) == 0) {
 597                 state->mode = LIT;
 598                 break;
 599             }
 600             if (this.op & 32) {
 601                 state->mode = TYPE;
 602                 break;
 603             }
 604             if (this.op & 64) {
 605                 strm->msg = (char *)"invalid literal/length code";
 606                 state->mode = BAD;
 607                 break;
 608             }
 609             state->extra = (unsigned)(this.op) & 15;
 610             state->mode = LENEXT;
 611         case LENEXT:
 612             if (state->extra) {
 613                 NEEDBITS(state->extra);
 614                 state->length += BITS(state->extra);
 615                 DROPBITS(state->extra);
 616             }
 617             state->mode = DIST;
 618         case DIST:
 619             for (;;) {
 620                 this = state->distcode[BITS(state->distbits)];
 621                 if ((unsigned)(this.bits) <= bits) break;
 622                 PULLBYTE();
 623             }
 624             if ((this.op & 0xf0) == 0) {
 625                 last = this;
 626                 for (;;) {
 627                     this = state->distcode[last.val +
 628                             (BITS(last.bits + last.op) >> last.bits)];
 629                     if ((unsigned)(last.bits + this.bits) <= bits) break;
 630                     PULLBYTE();
 631                 }
 632                 DROPBITS(last.bits);
 633             }
 634             DROPBITS(this.bits);
 635             if (this.op & 64) {
 636                 strm->msg = (char *)"invalid distance code";
 637                 state->mode = BAD;
 638                 break;
 639             }
 640             state->offset = (unsigned)this.val;
 641             state->extra = (unsigned)(this.op) & 15;
 642             state->mode = DISTEXT;
 643         case DISTEXT:
 644             if (state->extra) {
 645                 NEEDBITS(state->extra);
 646                 state->offset += BITS(state->extra);
 647                 DROPBITS(state->extra);
 648             }
 649 #ifdef INFLATE_STRICT
 650             if (state->offset > state->dmax) {
 651                 strm->msg = (char *)"invalid distance too far back";
 652                 state->mode = BAD;
 653                 break;
 654             }
 655 #endif
 656             if (state->offset > state->whave + out - left) {
 657                 strm->msg = (char *)"invalid distance too far back";
 658                 state->mode = BAD;
 659                 break;
 660             }
 661             state->mode = MATCH;
 662         case MATCH:
 663             if (left == 0) goto inf_leave;
 664             copy = out - left;
 665             if (state->offset > copy) {         /* copy from window */
 666                 copy = state->offset - copy;
 667                 if (copy > state->write) {
 668                     copy -= state->write;
 669                     from = state->window + (state->wsize - copy);
 670                 }
 671                 else
 672                     from = state->window + (state->write - copy);
 673                 if (copy > state->length) copy = state->length;
 674             }
 675             else {                              /* copy from output */
 676                 from = put - state->offset;
 677                 copy = state->length;
 678             }
 679             if (copy > left) copy = left;
 680             left -= copy;
 681             state->length -= copy;
 682             do {
 683                 *put++ = *from++;
 684             } while (--copy);
 685             if (state->length == 0) state->mode = LEN;
 686             break;
 687         case LIT:
 688             if (left == 0) goto inf_leave;
 689             *put++ = (unsigned char)(state->length);
 690             left--;
 691             state->mode = LEN;
 692             break;
 693         case CHECK:
 694             if (state->wrap) {
 695                 NEEDBITS(32);
 696                 out -= left;
 697                 strm->total_out += out;
 698                 state->total += out;
 699                 if (out)
 700                     strm->adler = state->check =
 701                         UPDATE(state->check, put - out, out);
 702                 out = left;
 703                 if ((
 704                      REVERSE(hold)) != state->check) {
 705                     strm->msg = (char *)"incorrect data check";
 706                     state->mode = BAD;
 707                     break;
 708                 }
 709                 INITBITS();
 710             }
 711             state->mode = DONE;
 712         case DONE:
 713             ret = Z_STREAM_END;
 714             goto inf_leave;
 715         case BAD:
 716             ret = Z_DATA_ERROR;
 717             goto inf_leave;
 718         case MEM:
 719             return Z_MEM_ERROR;
 720         case SYNC:
 721         default:
 722             return Z_STREAM_ERROR;
 723         }
 724
 725     /*
 726        Return from inflate(), updating the total counts and the check value.
 727        If there was no progress during the inflate() call, return a buffer
 728        error.  Call zlib_updatewindow() to create and/or update the window state.
 729      */
 730   inf_leave:
 731     RESTORE();
 732     if (state->wsize || (state->mode < CHECK && out != strm->avail_out))
 733         zlib_updatewindow(strm, out);
 734
 735     in -= strm->avail_in;
 736     out -= strm->avail_out;
 737     strm->total_in += in;
 738     strm->total_out += out;
 739     state->total += out;
 740     if (state->wrap && out)
 741         strm->adler = state->check =
 742             UPDATE(state->check, strm->next_out - out, out);
 743
 744     strm->data_type = state->bits + (state->last ? 64 : 0) +
 745                       (state->mode == TYPE ? 128 : 0);
 746
 747     if (flush == Z_PACKET_FLUSH && ret == Z_OK &&
 748             strm->avail_out != 0 && strm->avail_in == 0)
 749                 return zlib_inflateSyncPacket(strm);
 750
 751     if (((in == 0 && out == 0) || flush == Z_FINISH) && ret == Z_OK)
 752         ret = Z_BUF_ERROR;
 753
 754     return ret;
 755 }
 756
 757 int zlib_inflateEnd(z_streamp strm)
 758 {
 759     if (strm == NULL || strm->state == NULL)
 760         return Z_STREAM_ERROR;
 761     return Z_OK;
 762 }
 763
 764 #if 0
 765 int zlib_inflateSetDictionary(z_streamp strm, const Byte *dictionary,
 766         uInt dictLength)
 767 {
 768     struct inflate_state *state;
 769     unsigned long id;
 770
 771     /* check state */
 772     if (strm == NULL || strm->state == NULL) return Z_STREAM_ERROR;
 773     state = (struct inflate_state *)strm->state;
 774     if (state->wrap != 0 && state->mode != DICT)
 775         return Z_STREAM_ERROR;
 776
 777     /* check for correct dictionary id */
 778     if (state->mode == DICT) {
 779         id = zlib_adler32(0L, NULL, 0);
 780         id = zlib_adler32(id, dictionary, dictLength);
 781         if (id != state->check)
 782             return Z_DATA_ERROR;
 783     }
 784
 785     /* copy dictionary to window */
 786     zlib_updatewindow(strm, strm->avail_out);
 787
 788     if (dictLength > state->wsize) {
 789         memcpy(state->window, dictionary + dictLength - state->wsize,
 790                 state->wsize);
 791         state->whave = state->wsize;
 792     }
 793     else {
 794         memcpy(state->window + state->wsize - dictLength, dictionary,
 795                 dictLength);
 796         state->whave = dictLength;
 797     }
 798     state->havedict = 1;
 799     return Z_OK;
 800 }
 801 #endif
 802
 803 #if 0
 804 /*
 805    Search buf[0..len-1] for the pattern: 0, 0, 0xff, 0xff.  Return when found
 806    or when out of input.  When called, *have is the number of pattern bytes
 807    found in order so far, in 0..3.  On return *have is updated to the new
 808    state.  If on return *have equals four, then the pattern was found and the
 809    return value is how many bytes were read including the last byte of the
 810    pattern.  If *have is less than four, then the pattern has not been found
 811    yet and the return value is len.  In the latter case, zlib_syncsearch() can be
 812    called again with more data and the *have state.  *have is initialized to
 813    zero for the first call.
 814  */
 815 static unsigned zlib_syncsearch(unsigned *have, unsigned char *buf,
 816         unsigned len)
 817 {
 818     unsigned got;
 819     unsigned next;
 820
 821     got = *have;
 822     next = 0;
 823     while (next < len && got < 4) {
 824         if ((int)(buf[next]) == (got < 2 ? 0 : 0xff))
 825             got++;
 826         else if (buf[next])
 827             got = 0;
 828         else
 829             got = 4 - got;
 830         next++;
 831     }
 832     *have = got;
 833     return next;
 834 }
 835 #endif
 836
 837 #if 0
 838 int zlib_inflateSync(z_streamp strm)
 839 {
 840     unsigned len;               /* number of bytes to look at or looked at */
 841     unsigned long in, out;      /* temporary to save total_in and total_out */
 842     unsigned char buf[4];       /* to restore bit buffer to byte string */
 843     struct inflate_state *state;
 844
 845     /* check parameters */
 846     if (strm == NULL || strm->state == NULL) return Z_STREAM_ERROR;
 847     state = (struct inflate_state *)strm->state;
 848     if (strm->avail_in == 0 && state->bits < 8) return Z_BUF_ERROR;
 849
 850     /* if first time, start search in bit buffer */
 851     if (state->mode != SYNC) {
 852         state->mode = SYNC;
 853         state->hold <<= state->bits & 7;
 854         state->bits -= state->bits & 7;
 855         len = 0;
 856         while (state->bits >= 8) {
 857             buf[len++] = (unsigned char)(state->hold);
 858             state->hold >>= 8;
 859             state->bits -= 8;
 860         }
 861         state->have = 0;
 862         zlib_syncsearch(&(state->have), buf, len);
 863     }
 864
 865     /* search available input */
 866     len = zlib_syncsearch(&(state->have), strm->next_in, strm->avail_in);
 867     strm->avail_in -= len;
 868     strm->next_in += len;
 869     strm->total_in += len;
 870
 871     /* return no joy or set up to restart inflate() on a new block */
 872     if (state->have != 4) return Z_DATA_ERROR;
 873     in = strm->total_in;  out = strm->total_out;
 874     zlib_inflateReset(strm);
 875     strm->total_in = in;  strm->total_out = out;
 876     state->mode = TYPE;
 877     return Z_OK;
 878 }
 879 #endif
 880
 881 /*
 882  * This subroutine adds the data at next_in/avail_in to the output history
 883  * without performing any output.  The output buffer must be "caught up";
 884  * i.e. no pending output but this should always be the case. The state must
 885  * be waiting on the start of a block (i.e. mode == TYPE or HEAD).  On exit,
 886  * the output will also be caught up, and the checksum will have been updated
 887  * if need be.
 888  */
 889 int zlib_inflateIncomp(z_stream *z)
 890 {
 891     struct inflate_state *state = (struct inflate_state *)z->state;
 892     Byte *saved_no = z->next_out;
 893     uInt saved_ao = z->avail_out;
 894
 895     if (state->mode != TYPE && state->mode != HEAD)
 896         return Z_DATA_ERROR;
 897
 898     /* Setup some variables to allow misuse of updateWindow */
 899     z->avail_out = 0;
 900     z->next_out = (unsigned char*)z->next_in + z->avail_in;
 901
 902     zlib_updatewindow(z, z->avail_in);
 903
 904     /* Restore saved variables */
 905     z->avail_out = saved_ao;
 906     z->next_out = saved_no;
 907
 908     z->adler = state->check =
 909         UPDATE(state->check, z->next_in, z->avail_in);
 910
 911     z->total_out += z->avail_in;
 912     z->total_in += z->avail_in;
 913     z->next_in += z->avail_in;
 914     state->total += z->avail_in;
 915     z->avail_in = 0;
 916
 917     return Z_OK;
 918 }