Chris@4: 
Chris@4: /*-------------------------------------------------------------*/
Chris@4: /*--- Library top-level functions.                          ---*/
Chris@4: /*---                                               bzlib.c ---*/
Chris@4: /*-------------------------------------------------------------*/
Chris@4: 
Chris@4: /* ------------------------------------------------------------------
Chris@4:    This file is part of bzip2/libbzip2, a program and library for
Chris@4:    lossless, block-sorting data compression.
Chris@4: 
Chris@4:    bzip2/libbzip2 version 1.0.6 of 6 September 2010
Chris@4:    Copyright (C) 1996-2010 Julian Seward <jseward@bzip.org>
Chris@4: 
Chris@4:    Please read the WARNING, DISCLAIMER and PATENTS sections in the 
Chris@4:    README file.
Chris@4: 
Chris@4:    This program is released under the terms of the license contained
Chris@4:    in the file LICENSE.
Chris@4:    ------------------------------------------------------------------ */
Chris@4: 
Chris@4: /* CHANGES
Chris@4:    0.9.0    -- original version.
Chris@4:    0.9.0a/b -- no changes in this file.
Chris@4:    0.9.0c   -- made zero-length BZ_FLUSH work correctly in bzCompress().
Chris@4:      fixed bzWrite/bzRead to ignore zero-length requests.
Chris@4:      fixed bzread to correctly handle read requests after EOF.
Chris@4:      wrong parameter order in call to bzDecompressInit in
Chris@4:      bzBuffToBuffDecompress.  Fixed.
Chris@4: */
Chris@4: 
Chris@4: #include "bzlib_private.h"
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: /*--- Compression stuff                           ---*/
Chris@4: /*---------------------------------------------------*/
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: #ifndef BZ_NO_STDIO
Chris@4: void BZ2_bz__AssertH__fail ( int errcode )
Chris@4: {
Chris@4:    fprintf(stderr, 
Chris@4:       "\n\nbzip2/libbzip2: internal error number %d.\n"
Chris@4:       "This is a bug in bzip2/libbzip2, %s.\n"
Chris@4:       "Please report it to me at: jseward@bzip.org.  If this happened\n"
Chris@4:       "when you were using some program which uses libbzip2 as a\n"
Chris@4:       "component, you should also report this bug to the author(s)\n"
Chris@4:       "of that program.  Please make an effort to report this bug;\n"
Chris@4:       "timely and accurate bug reports eventually lead to higher\n"
Chris@4:       "quality software.  Thanks.  Julian Seward, 10 December 2007.\n\n",
Chris@4:       errcode,
Chris@4:       BZ2_bzlibVersion()
Chris@4:    );
Chris@4: 
Chris@4:    if (errcode == 1007) {
Chris@4:    fprintf(stderr,
Chris@4:       "\n*** A special note about internal error number 1007 ***\n"
Chris@4:       "\n"
Chris@4:       "Experience suggests that a common cause of i.e. 1007\n"
Chris@4:       "is unreliable memory or other hardware.  The 1007 assertion\n"
Chris@4:       "just happens to cross-check the results of huge numbers of\n"
Chris@4:       "memory reads/writes, and so acts (unintendedly) as a stress\n"
Chris@4:       "test of your memory system.\n"
Chris@4:       "\n"
Chris@4:       "I suggest the following: try compressing the file again,\n"
Chris@4:       "possibly monitoring progress in detail with the -vv flag.\n"
Chris@4:       "\n"
Chris@4:       "* If the error cannot be reproduced, and/or happens at different\n"
Chris@4:       "  points in compression, you may have a flaky memory system.\n"
Chris@4:       "  Try a memory-test program.  I have used Memtest86\n"
Chris@4:       "  (www.memtest86.com).  At the time of writing it is free (GPLd).\n"
Chris@4:       "  Memtest86 tests memory much more thorougly than your BIOSs\n"
Chris@4:       "  power-on test, and may find failures that the BIOS doesn't.\n"
Chris@4:       "\n"
Chris@4:       "* If the error can be repeatably reproduced, this is a bug in\n"
Chris@4:       "  bzip2, and I would very much like to hear about it.  Please\n"
Chris@4:       "  let me know, and, ideally, save a copy of the file causing the\n"
Chris@4:       "  problem -- without which I will be unable to investigate it.\n"
Chris@4:       "\n"
Chris@4:    );
Chris@4:    }
Chris@4: 
Chris@4:    exit(3);
Chris@4: }
Chris@4: #endif
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: static
Chris@4: int bz_config_ok ( void )
Chris@4: {
Chris@4:    if (sizeof(int)   != 4) return 0;
Chris@4:    if (sizeof(short) != 2) return 0;
Chris@4:    if (sizeof(char)  != 1) return 0;
Chris@4:    return 1;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: static
Chris@4: void* default_bzalloc ( void* opaque, Int32 items, Int32 size )
Chris@4: {
Chris@4:    void* v = malloc ( items * size );
Chris@4:    return v;
Chris@4: }
Chris@4: 
Chris@4: static
Chris@4: void default_bzfree ( void* opaque, void* addr )
Chris@4: {
Chris@4:    if (addr != NULL) free ( addr );
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: static
Chris@4: void prepare_new_block ( EState* s )
Chris@4: {
Chris@4:    Int32 i;
Chris@4:    s->nblock = 0;
Chris@4:    s->numZ = 0;
Chris@4:    s->state_out_pos = 0;
Chris@4:    BZ_INITIALISE_CRC ( s->blockCRC );
Chris@4:    for (i = 0; i < 256; i++) s->inUse[i] = False;
Chris@4:    s->blockNo++;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: static
Chris@4: void init_RL ( EState* s )
Chris@4: {
Chris@4:    s->state_in_ch  = 256;
Chris@4:    s->state_in_len = 0;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: static
Chris@4: Bool isempty_RL ( EState* s )
Chris@4: {
Chris@4:    if (s->state_in_ch < 256 && s->state_in_len > 0)
Chris@4:       return False; else
Chris@4:       return True;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzCompressInit) 
Chris@4:                     ( bz_stream* strm, 
Chris@4:                      int        blockSize100k,
Chris@4:                      int        verbosity,
Chris@4:                      int        workFactor )
Chris@4: {
Chris@4:    Int32   n;
Chris@4:    EState* s;
Chris@4: 
Chris@4:    if (!bz_config_ok()) return BZ_CONFIG_ERROR;
Chris@4: 
Chris@4:    if (strm == NULL || 
Chris@4:        blockSize100k < 1 || blockSize100k > 9 ||
Chris@4:        workFactor < 0 || workFactor > 250)
Chris@4:      return BZ_PARAM_ERROR;
Chris@4: 
Chris@4:    if (workFactor == 0) workFactor = 30;
Chris@4:    if (strm->bzalloc == NULL) strm->bzalloc = default_bzalloc;
Chris@4:    if (strm->bzfree == NULL) strm->bzfree = default_bzfree;
Chris@4: 
Chris@4:    s = BZALLOC( sizeof(EState) );
Chris@4:    if (s == NULL) return BZ_MEM_ERROR;
Chris@4:    s->strm = strm;
Chris@4: 
Chris@4:    s->arr1 = NULL;
Chris@4:    s->arr2 = NULL;
Chris@4:    s->ftab = NULL;
Chris@4: 
Chris@4:    n       = 100000 * blockSize100k;
Chris@4:    s->arr1 = BZALLOC( n                  * sizeof(UInt32) );
Chris@4:    s->arr2 = BZALLOC( (n+BZ_N_OVERSHOOT) * sizeof(UInt32) );
Chris@4:    s->ftab = BZALLOC( 65537              * sizeof(UInt32) );
Chris@4: 
Chris@4:    if (s->arr1 == NULL || s->arr2 == NULL || s->ftab == NULL) {
Chris@4:       if (s->arr1 != NULL) BZFREE(s->arr1);
Chris@4:       if (s->arr2 != NULL) BZFREE(s->arr2);
Chris@4:       if (s->ftab != NULL) BZFREE(s->ftab);
Chris@4:       if (s       != NULL) BZFREE(s);
Chris@4:       return BZ_MEM_ERROR;
Chris@4:    }
Chris@4: 
Chris@4:    s->blockNo           = 0;
Chris@4:    s->state             = BZ_S_INPUT;
Chris@4:    s->mode              = BZ_M_RUNNING;
Chris@4:    s->combinedCRC       = 0;
Chris@4:    s->blockSize100k     = blockSize100k;
Chris@4:    s->nblockMAX         = 100000 * blockSize100k - 19;
Chris@4:    s->verbosity         = verbosity;
Chris@4:    s->workFactor        = workFactor;
Chris@4: 
Chris@4:    s->block             = (UChar*)s->arr2;
Chris@4:    s->mtfv              = (UInt16*)s->arr1;
Chris@4:    s->zbits             = NULL;
Chris@4:    s->ptr               = (UInt32*)s->arr1;
Chris@4: 
Chris@4:    strm->state          = s;
Chris@4:    strm->total_in_lo32  = 0;
Chris@4:    strm->total_in_hi32  = 0;
Chris@4:    strm->total_out_lo32 = 0;
Chris@4:    strm->total_out_hi32 = 0;
Chris@4:    init_RL ( s );
Chris@4:    prepare_new_block ( s );
Chris@4:    return BZ_OK;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: static
Chris@4: void add_pair_to_block ( EState* s )
Chris@4: {
Chris@4:    Int32 i;
Chris@4:    UChar ch = (UChar)(s->state_in_ch);
Chris@4:    for (i = 0; i < s->state_in_len; i++) {
Chris@4:       BZ_UPDATE_CRC( s->blockCRC, ch );
Chris@4:    }
Chris@4:    s->inUse[s->state_in_ch] = True;
Chris@4:    switch (s->state_in_len) {
Chris@4:       case 1:
Chris@4:          s->block[s->nblock] = (UChar)ch; s->nblock++;
Chris@4:          break;
Chris@4:       case 2:
Chris@4:          s->block[s->nblock] = (UChar)ch; s->nblock++;
Chris@4:          s->block[s->nblock] = (UChar)ch; s->nblock++;
Chris@4:          break;
Chris@4:       case 3:
Chris@4:          s->block[s->nblock] = (UChar)ch; s->nblock++;
Chris@4:          s->block[s->nblock] = (UChar)ch; s->nblock++;
Chris@4:          s->block[s->nblock] = (UChar)ch; s->nblock++;
Chris@4:          break;
Chris@4:       default:
Chris@4:          s->inUse[s->state_in_len-4] = True;
Chris@4:          s->block[s->nblock] = (UChar)ch; s->nblock++;
Chris@4:          s->block[s->nblock] = (UChar)ch; s->nblock++;
Chris@4:          s->block[s->nblock] = (UChar)ch; s->nblock++;
Chris@4:          s->block[s->nblock] = (UChar)ch; s->nblock++;
Chris@4:          s->block[s->nblock] = ((UChar)(s->state_in_len-4));
Chris@4:          s->nblock++;
Chris@4:          break;
Chris@4:    }
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: static
Chris@4: void flush_RL ( EState* s )
Chris@4: {
Chris@4:    if (s->state_in_ch < 256) add_pair_to_block ( s );
Chris@4:    init_RL ( s );
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: #define ADD_CHAR_TO_BLOCK(zs,zchh0)               \
Chris@4: {                                                 \
Chris@4:    UInt32 zchh = (UInt32)(zchh0);                 \
Chris@4:    /*-- fast track the common case --*/           \
Chris@4:    if (zchh != zs->state_in_ch &&                 \
Chris@4:        zs->state_in_len == 1) {                   \
Chris@4:       UChar ch = (UChar)(zs->state_in_ch);        \
Chris@4:       BZ_UPDATE_CRC( zs->blockCRC, ch );          \
Chris@4:       zs->inUse[zs->state_in_ch] = True;          \
Chris@4:       zs->block[zs->nblock] = (UChar)ch;          \
Chris@4:       zs->nblock++;                               \
Chris@4:       zs->state_in_ch = zchh;                     \
Chris@4:    }                                              \
Chris@4:    else                                           \
Chris@4:    /*-- general, uncommon cases --*/              \
Chris@4:    if (zchh != zs->state_in_ch ||                 \
Chris@4:       zs->state_in_len == 255) {                  \
Chris@4:       if (zs->state_in_ch < 256)                  \
Chris@4:          add_pair_to_block ( zs );                \
Chris@4:       zs->state_in_ch = zchh;                     \
Chris@4:       zs->state_in_len = 1;                       \
Chris@4:    } else {                                       \
Chris@4:       zs->state_in_len++;                         \
Chris@4:    }                                              \
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: static
Chris@4: Bool copy_input_until_stop ( EState* s )
Chris@4: {
Chris@4:    Bool progress_in = False;
Chris@4: 
Chris@4:    if (s->mode == BZ_M_RUNNING) {
Chris@4: 
Chris@4:       /*-- fast track the common case --*/
Chris@4:       while (True) {
Chris@4:          /*-- block full? --*/
Chris@4:          if (s->nblock >= s->nblockMAX) break;
Chris@4:          /*-- no input? --*/
Chris@4:          if (s->strm->avail_in == 0) break;
Chris@4:          progress_in = True;
Chris@4:          ADD_CHAR_TO_BLOCK ( s, (UInt32)(*((UChar*)(s->strm->next_in))) ); 
Chris@4:          s->strm->next_in++;
Chris@4:          s->strm->avail_in--;
Chris@4:          s->strm->total_in_lo32++;
Chris@4:          if (s->strm->total_in_lo32 == 0) s->strm->total_in_hi32++;
Chris@4:       }
Chris@4: 
Chris@4:    } else {
Chris@4: 
Chris@4:       /*-- general, uncommon case --*/
Chris@4:       while (True) {
Chris@4:          /*-- block full? --*/
Chris@4:          if (s->nblock >= s->nblockMAX) break;
Chris@4:          /*-- no input? --*/
Chris@4:          if (s->strm->avail_in == 0) break;
Chris@4:          /*-- flush/finish end? --*/
Chris@4:          if (s->avail_in_expect == 0) break;
Chris@4:          progress_in = True;
Chris@4:          ADD_CHAR_TO_BLOCK ( s, (UInt32)(*((UChar*)(s->strm->next_in))) ); 
Chris@4:          s->strm->next_in++;
Chris@4:          s->strm->avail_in--;
Chris@4:          s->strm->total_in_lo32++;
Chris@4:          if (s->strm->total_in_lo32 == 0) s->strm->total_in_hi32++;
Chris@4:          s->avail_in_expect--;
Chris@4:       }
Chris@4:    }
Chris@4:    return progress_in;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: static
Chris@4: Bool copy_output_until_stop ( EState* s )
Chris@4: {
Chris@4:    Bool progress_out = False;
Chris@4: 
Chris@4:    while (True) {
Chris@4: 
Chris@4:       /*-- no output space? --*/
Chris@4:       if (s->strm->avail_out == 0) break;
Chris@4: 
Chris@4:       /*-- block done? --*/
Chris@4:       if (s->state_out_pos >= s->numZ) break;
Chris@4: 
Chris@4:       progress_out = True;
Chris@4:       *(s->strm->next_out) = s->zbits[s->state_out_pos];
Chris@4:       s->state_out_pos++;
Chris@4:       s->strm->avail_out--;
Chris@4:       s->strm->next_out++;
Chris@4:       s->strm->total_out_lo32++;
Chris@4:       if (s->strm->total_out_lo32 == 0) s->strm->total_out_hi32++;
Chris@4:    }
Chris@4: 
Chris@4:    return progress_out;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: static
Chris@4: Bool handle_compress ( bz_stream* strm )
Chris@4: {
Chris@4:    Bool progress_in  = False;
Chris@4:    Bool progress_out = False;
Chris@4:    EState* s = strm->state;
Chris@4:    
Chris@4:    while (True) {
Chris@4: 
Chris@4:       if (s->state == BZ_S_OUTPUT) {
Chris@4:          progress_out |= copy_output_until_stop ( s );
Chris@4:          if (s->state_out_pos < s->numZ) break;
Chris@4:          if (s->mode == BZ_M_FINISHING && 
Chris@4:              s->avail_in_expect == 0 &&
Chris@4:              isempty_RL(s)) break;
Chris@4:          prepare_new_block ( s );
Chris@4:          s->state = BZ_S_INPUT;
Chris@4:          if (s->mode == BZ_M_FLUSHING && 
Chris@4:              s->avail_in_expect == 0 &&
Chris@4:              isempty_RL(s)) break;
Chris@4:       }
Chris@4: 
Chris@4:       if (s->state == BZ_S_INPUT) {
Chris@4:          progress_in |= copy_input_until_stop ( s );
Chris@4:          if (s->mode != BZ_M_RUNNING && s->avail_in_expect == 0) {
Chris@4:             flush_RL ( s );
Chris@4:             BZ2_compressBlock ( s, (Bool)(s->mode == BZ_M_FINISHING) );
Chris@4:             s->state = BZ_S_OUTPUT;
Chris@4:          }
Chris@4:          else
Chris@4:          if (s->nblock >= s->nblockMAX) {
Chris@4:             BZ2_compressBlock ( s, False );
Chris@4:             s->state = BZ_S_OUTPUT;
Chris@4:          }
Chris@4:          else
Chris@4:          if (s->strm->avail_in == 0) {
Chris@4:             break;
Chris@4:          }
Chris@4:       }
Chris@4: 
Chris@4:    }
Chris@4: 
Chris@4:    return progress_in || progress_out;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzCompress) ( bz_stream *strm, int action )
Chris@4: {
Chris@4:    Bool progress;
Chris@4:    EState* s;
Chris@4:    if (strm == NULL) return BZ_PARAM_ERROR;
Chris@4:    s = strm->state;
Chris@4:    if (s == NULL) return BZ_PARAM_ERROR;
Chris@4:    if (s->strm != strm) return BZ_PARAM_ERROR;
Chris@4: 
Chris@4:    preswitch:
Chris@4:    switch (s->mode) {
Chris@4: 
Chris@4:       case BZ_M_IDLE:
Chris@4:          return BZ_SEQUENCE_ERROR;
Chris@4: 
Chris@4:       case BZ_M_RUNNING:
Chris@4:          if (action == BZ_RUN) {
Chris@4:             progress = handle_compress ( strm );
Chris@4:             return progress ? BZ_RUN_OK : BZ_PARAM_ERROR;
Chris@4:          } 
Chris@4:          else
Chris@4: 	 if (action == BZ_FLUSH) {
Chris@4:             s->avail_in_expect = strm->avail_in;
Chris@4:             s->mode = BZ_M_FLUSHING;
Chris@4:             goto preswitch;
Chris@4:          }
Chris@4:          else
Chris@4:          if (action == BZ_FINISH) {
Chris@4:             s->avail_in_expect = strm->avail_in;
Chris@4:             s->mode = BZ_M_FINISHING;
Chris@4:             goto preswitch;
Chris@4:          }
Chris@4:          else 
Chris@4:             return BZ_PARAM_ERROR;
Chris@4: 
Chris@4:       case BZ_M_FLUSHING:
Chris@4:          if (action != BZ_FLUSH) return BZ_SEQUENCE_ERROR;
Chris@4:          if (s->avail_in_expect != s->strm->avail_in) 
Chris@4:             return BZ_SEQUENCE_ERROR;
Chris@4:          progress = handle_compress ( strm );
Chris@4:          if (s->avail_in_expect > 0 || !isempty_RL(s) ||
Chris@4:              s->state_out_pos < s->numZ) return BZ_FLUSH_OK;
Chris@4:          s->mode = BZ_M_RUNNING;
Chris@4:          return BZ_RUN_OK;
Chris@4: 
Chris@4:       case BZ_M_FINISHING:
Chris@4:          if (action != BZ_FINISH) return BZ_SEQUENCE_ERROR;
Chris@4:          if (s->avail_in_expect != s->strm->avail_in) 
Chris@4:             return BZ_SEQUENCE_ERROR;
Chris@4:          progress = handle_compress ( strm );
Chris@4:          if (!progress) return BZ_SEQUENCE_ERROR;
Chris@4:          if (s->avail_in_expect > 0 || !isempty_RL(s) ||
Chris@4:              s->state_out_pos < s->numZ) return BZ_FINISH_OK;
Chris@4:          s->mode = BZ_M_IDLE;
Chris@4:          return BZ_STREAM_END;
Chris@4:    }
Chris@4:    return BZ_OK; /*--not reached--*/
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzCompressEnd)  ( bz_stream *strm )
Chris@4: {
Chris@4:    EState* s;
Chris@4:    if (strm == NULL) return BZ_PARAM_ERROR;
Chris@4:    s = strm->state;
Chris@4:    if (s == NULL) return BZ_PARAM_ERROR;
Chris@4:    if (s->strm != strm) return BZ_PARAM_ERROR;
Chris@4: 
Chris@4:    if (s->arr1 != NULL) BZFREE(s->arr1);
Chris@4:    if (s->arr2 != NULL) BZFREE(s->arr2);
Chris@4:    if (s->ftab != NULL) BZFREE(s->ftab);
Chris@4:    BZFREE(strm->state);
Chris@4: 
Chris@4:    strm->state = NULL;   
Chris@4: 
Chris@4:    return BZ_OK;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: /*--- Decompression stuff                         ---*/
Chris@4: /*---------------------------------------------------*/
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzDecompressInit) 
Chris@4:                      ( bz_stream* strm, 
Chris@4:                        int        verbosity,
Chris@4:                        int        small )
Chris@4: {
Chris@4:    DState* s;
Chris@4: 
Chris@4:    if (!bz_config_ok()) return BZ_CONFIG_ERROR;
Chris@4: 
Chris@4:    if (strm == NULL) return BZ_PARAM_ERROR;
Chris@4:    if (small != 0 && small != 1) return BZ_PARAM_ERROR;
Chris@4:    if (verbosity < 0 || verbosity > 4) return BZ_PARAM_ERROR;
Chris@4: 
Chris@4:    if (strm->bzalloc == NULL) strm->bzalloc = default_bzalloc;
Chris@4:    if (strm->bzfree == NULL) strm->bzfree = default_bzfree;
Chris@4: 
Chris@4:    s = BZALLOC( sizeof(DState) );
Chris@4:    if (s == NULL) return BZ_MEM_ERROR;
Chris@4:    s->strm                  = strm;
Chris@4:    strm->state              = s;
Chris@4:    s->state                 = BZ_X_MAGIC_1;
Chris@4:    s->bsLive                = 0;
Chris@4:    s->bsBuff                = 0;
Chris@4:    s->calculatedCombinedCRC = 0;
Chris@4:    strm->total_in_lo32      = 0;
Chris@4:    strm->total_in_hi32      = 0;
Chris@4:    strm->total_out_lo32     = 0;
Chris@4:    strm->total_out_hi32     = 0;
Chris@4:    s->smallDecompress       = (Bool)small;
Chris@4:    s->ll4                   = NULL;
Chris@4:    s->ll16                  = NULL;
Chris@4:    s->tt                    = NULL;
Chris@4:    s->currBlockNo           = 0;
Chris@4:    s->verbosity             = verbosity;
Chris@4: 
Chris@4:    return BZ_OK;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: /* Return  True iff data corruption is discovered.
Chris@4:    Returns False if there is no problem.
Chris@4: */
Chris@4: static
Chris@4: Bool unRLE_obuf_to_output_FAST ( DState* s )
Chris@4: {
Chris@4:    UChar k1;
Chris@4: 
Chris@4:    if (s->blockRandomised) {
Chris@4: 
Chris@4:       while (True) {
Chris@4:          /* try to finish existing run */
Chris@4:          while (True) {
Chris@4:             if (s->strm->avail_out == 0) return False;
Chris@4:             if (s->state_out_len == 0) break;
Chris@4:             *( (UChar*)(s->strm->next_out) ) = s->state_out_ch;
Chris@4:             BZ_UPDATE_CRC ( s->calculatedBlockCRC, s->state_out_ch );
Chris@4:             s->state_out_len--;
Chris@4:             s->strm->next_out++;
Chris@4:             s->strm->avail_out--;
Chris@4:             s->strm->total_out_lo32++;
Chris@4:             if (s->strm->total_out_lo32 == 0) s->strm->total_out_hi32++;
Chris@4:          }
Chris@4: 
Chris@4:          /* can a new run be started? */
Chris@4:          if (s->nblock_used == s->save_nblock+1) return False;
Chris@4:                
Chris@4:          /* Only caused by corrupt data stream? */
Chris@4:          if (s->nblock_used > s->save_nblock+1)
Chris@4:             return True;
Chris@4:    
Chris@4:          s->state_out_len = 1;
Chris@4:          s->state_out_ch = s->k0;
Chris@4:          BZ_GET_FAST(k1); BZ_RAND_UPD_MASK; 
Chris@4:          k1 ^= BZ_RAND_MASK; s->nblock_used++;
Chris@4:          if (s->nblock_used == s->save_nblock+1) continue;
Chris@4:          if (k1 != s->k0) { s->k0 = k1; continue; };
Chris@4:    
Chris@4:          s->state_out_len = 2;
Chris@4:          BZ_GET_FAST(k1); BZ_RAND_UPD_MASK; 
Chris@4:          k1 ^= BZ_RAND_MASK; s->nblock_used++;
Chris@4:          if (s->nblock_used == s->save_nblock+1) continue;
Chris@4:          if (k1 != s->k0) { s->k0 = k1; continue; };
Chris@4:    
Chris@4:          s->state_out_len = 3;
Chris@4:          BZ_GET_FAST(k1); BZ_RAND_UPD_MASK; 
Chris@4:          k1 ^= BZ_RAND_MASK; s->nblock_used++;
Chris@4:          if (s->nblock_used == s->save_nblock+1) continue;
Chris@4:          if (k1 != s->k0) { s->k0 = k1; continue; };
Chris@4:    
Chris@4:          BZ_GET_FAST(k1); BZ_RAND_UPD_MASK; 
Chris@4:          k1 ^= BZ_RAND_MASK; s->nblock_used++;
Chris@4:          s->state_out_len = ((Int32)k1) + 4;
Chris@4:          BZ_GET_FAST(s->k0); BZ_RAND_UPD_MASK; 
Chris@4:          s->k0 ^= BZ_RAND_MASK; s->nblock_used++;
Chris@4:       }
Chris@4: 
Chris@4:    } else {
Chris@4: 
Chris@4:       /* restore */
Chris@4:       UInt32        c_calculatedBlockCRC = s->calculatedBlockCRC;
Chris@4:       UChar         c_state_out_ch       = s->state_out_ch;
Chris@4:       Int32         c_state_out_len      = s->state_out_len;
Chris@4:       Int32         c_nblock_used        = s->nblock_used;
Chris@4:       Int32         c_k0                 = s->k0;
Chris@4:       UInt32*       c_tt                 = s->tt;
Chris@4:       UInt32        c_tPos               = s->tPos;
Chris@4:       char*         cs_next_out          = s->strm->next_out;
Chris@4:       unsigned int  cs_avail_out         = s->strm->avail_out;
Chris@4:       Int32         ro_blockSize100k     = s->blockSize100k;
Chris@4:       /* end restore */
Chris@4: 
Chris@4:       UInt32       avail_out_INIT = cs_avail_out;
Chris@4:       Int32        s_save_nblockPP = s->save_nblock+1;
Chris@4:       unsigned int total_out_lo32_old;
Chris@4: 
Chris@4:       while (True) {
Chris@4: 
Chris@4:          /* try to finish existing run */
Chris@4:          if (c_state_out_len > 0) {
Chris@4:             while (True) {
Chris@4:                if (cs_avail_out == 0) goto return_notr;
Chris@4:                if (c_state_out_len == 1) break;
Chris@4:                *( (UChar*)(cs_next_out) ) = c_state_out_ch;
Chris@4:                BZ_UPDATE_CRC ( c_calculatedBlockCRC, c_state_out_ch );
Chris@4:                c_state_out_len--;
Chris@4:                cs_next_out++;
Chris@4:                cs_avail_out--;
Chris@4:             }
Chris@4:             s_state_out_len_eq_one:
Chris@4:             {
Chris@4:                if (cs_avail_out == 0) { 
Chris@4:                   c_state_out_len = 1; goto return_notr;
Chris@4:                };
Chris@4:                *( (UChar*)(cs_next_out) ) = c_state_out_ch;
Chris@4:                BZ_UPDATE_CRC ( c_calculatedBlockCRC, c_state_out_ch );
Chris@4:                cs_next_out++;
Chris@4:                cs_avail_out--;
Chris@4:             }
Chris@4:          }   
Chris@4:          /* Only caused by corrupt data stream? */
Chris@4:          if (c_nblock_used > s_save_nblockPP)
Chris@4:             return True;
Chris@4: 
Chris@4:          /* can a new run be started? */
Chris@4:          if (c_nblock_used == s_save_nblockPP) {
Chris@4:             c_state_out_len = 0; goto return_notr;
Chris@4:          };   
Chris@4:          c_state_out_ch = c_k0;
Chris@4:          BZ_GET_FAST_C(k1); c_nblock_used++;
Chris@4:          if (k1 != c_k0) { 
Chris@4:             c_k0 = k1; goto s_state_out_len_eq_one; 
Chris@4:          };
Chris@4:          if (c_nblock_used == s_save_nblockPP) 
Chris@4:             goto s_state_out_len_eq_one;
Chris@4:    
Chris@4:          c_state_out_len = 2;
Chris@4:          BZ_GET_FAST_C(k1); c_nblock_used++;
Chris@4:          if (c_nblock_used == s_save_nblockPP) continue;
Chris@4:          if (k1 != c_k0) { c_k0 = k1; continue; };
Chris@4:    
Chris@4:          c_state_out_len = 3;
Chris@4:          BZ_GET_FAST_C(k1); c_nblock_used++;
Chris@4:          if (c_nblock_used == s_save_nblockPP) continue;
Chris@4:          if (k1 != c_k0) { c_k0 = k1; continue; };
Chris@4:    
Chris@4:          BZ_GET_FAST_C(k1); c_nblock_used++;
Chris@4:          c_state_out_len = ((Int32)k1) + 4;
Chris@4:          BZ_GET_FAST_C(c_k0); c_nblock_used++;
Chris@4:       }
Chris@4: 
Chris@4:       return_notr:
Chris@4:       total_out_lo32_old = s->strm->total_out_lo32;
Chris@4:       s->strm->total_out_lo32 += (avail_out_INIT - cs_avail_out);
Chris@4:       if (s->strm->total_out_lo32 < total_out_lo32_old)
Chris@4:          s->strm->total_out_hi32++;
Chris@4: 
Chris@4:       /* save */
Chris@4:       s->calculatedBlockCRC = c_calculatedBlockCRC;
Chris@4:       s->state_out_ch       = c_state_out_ch;
Chris@4:       s->state_out_len      = c_state_out_len;
Chris@4:       s->nblock_used        = c_nblock_used;
Chris@4:       s->k0                 = c_k0;
Chris@4:       s->tt                 = c_tt;
Chris@4:       s->tPos               = c_tPos;
Chris@4:       s->strm->next_out     = cs_next_out;
Chris@4:       s->strm->avail_out    = cs_avail_out;
Chris@4:       /* end save */
Chris@4:    }
Chris@4:    return False;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: __inline__ Int32 BZ2_indexIntoF ( Int32 indx, Int32 *cftab )
Chris@4: {
Chris@4:    Int32 nb, na, mid;
Chris@4:    nb = 0;
Chris@4:    na = 256;
Chris@4:    do {
Chris@4:       mid = (nb + na) >> 1;
Chris@4:       if (indx >= cftab[mid]) nb = mid; else na = mid;
Chris@4:    }
Chris@4:    while (na - nb != 1);
Chris@4:    return nb;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: /* Return  True iff data corruption is discovered.
Chris@4:    Returns False if there is no problem.
Chris@4: */
Chris@4: static
Chris@4: Bool unRLE_obuf_to_output_SMALL ( DState* s )
Chris@4: {
Chris@4:    UChar k1;
Chris@4: 
Chris@4:    if (s->blockRandomised) {
Chris@4: 
Chris@4:       while (True) {
Chris@4:          /* try to finish existing run */
Chris@4:          while (True) {
Chris@4:             if (s->strm->avail_out == 0) return False;
Chris@4:             if (s->state_out_len == 0) break;
Chris@4:             *( (UChar*)(s->strm->next_out) ) = s->state_out_ch;
Chris@4:             BZ_UPDATE_CRC ( s->calculatedBlockCRC, s->state_out_ch );
Chris@4:             s->state_out_len--;
Chris@4:             s->strm->next_out++;
Chris@4:             s->strm->avail_out--;
Chris@4:             s->strm->total_out_lo32++;
Chris@4:             if (s->strm->total_out_lo32 == 0) s->strm->total_out_hi32++;
Chris@4:          }
Chris@4:    
Chris@4:          /* can a new run be started? */
Chris@4:          if (s->nblock_used == s->save_nblock+1) return False;
Chris@4: 
Chris@4:          /* Only caused by corrupt data stream? */
Chris@4:          if (s->nblock_used > s->save_nblock+1)
Chris@4:             return True;
Chris@4:    
Chris@4:          s->state_out_len = 1;
Chris@4:          s->state_out_ch = s->k0;
Chris@4:          BZ_GET_SMALL(k1); BZ_RAND_UPD_MASK; 
Chris@4:          k1 ^= BZ_RAND_MASK; s->nblock_used++;
Chris@4:          if (s->nblock_used == s->save_nblock+1) continue;
Chris@4:          if (k1 != s->k0) { s->k0 = k1; continue; };
Chris@4:    
Chris@4:          s->state_out_len = 2;
Chris@4:          BZ_GET_SMALL(k1); BZ_RAND_UPD_MASK; 
Chris@4:          k1 ^= BZ_RAND_MASK; s->nblock_used++;
Chris@4:          if (s->nblock_used == s->save_nblock+1) continue;
Chris@4:          if (k1 != s->k0) { s->k0 = k1; continue; };
Chris@4:    
Chris@4:          s->state_out_len = 3;
Chris@4:          BZ_GET_SMALL(k1); BZ_RAND_UPD_MASK; 
Chris@4:          k1 ^= BZ_RAND_MASK; s->nblock_used++;
Chris@4:          if (s->nblock_used == s->save_nblock+1) continue;
Chris@4:          if (k1 != s->k0) { s->k0 = k1; continue; };
Chris@4:    
Chris@4:          BZ_GET_SMALL(k1); BZ_RAND_UPD_MASK; 
Chris@4:          k1 ^= BZ_RAND_MASK; s->nblock_used++;
Chris@4:          s->state_out_len = ((Int32)k1) + 4;
Chris@4:          BZ_GET_SMALL(s->k0); BZ_RAND_UPD_MASK; 
Chris@4:          s->k0 ^= BZ_RAND_MASK; s->nblock_used++;
Chris@4:       }
Chris@4: 
Chris@4:    } else {
Chris@4: 
Chris@4:       while (True) {
Chris@4:          /* try to finish existing run */
Chris@4:          while (True) {
Chris@4:             if (s->strm->avail_out == 0) return False;
Chris@4:             if (s->state_out_len == 0) break;
Chris@4:             *( (UChar*)(s->strm->next_out) ) = s->state_out_ch;
Chris@4:             BZ_UPDATE_CRC ( s->calculatedBlockCRC, s->state_out_ch );
Chris@4:             s->state_out_len--;
Chris@4:             s->strm->next_out++;
Chris@4:             s->strm->avail_out--;
Chris@4:             s->strm->total_out_lo32++;
Chris@4:             if (s->strm->total_out_lo32 == 0) s->strm->total_out_hi32++;
Chris@4:          }
Chris@4:    
Chris@4:          /* can a new run be started? */
Chris@4:          if (s->nblock_used == s->save_nblock+1) return False;
Chris@4: 
Chris@4:          /* Only caused by corrupt data stream? */
Chris@4:          if (s->nblock_used > s->save_nblock+1)
Chris@4:             return True;
Chris@4:    
Chris@4:          s->state_out_len = 1;
Chris@4:          s->state_out_ch = s->k0;
Chris@4:          BZ_GET_SMALL(k1); s->nblock_used++;
Chris@4:          if (s->nblock_used == s->save_nblock+1) continue;
Chris@4:          if (k1 != s->k0) { s->k0 = k1; continue; };
Chris@4:    
Chris@4:          s->state_out_len = 2;
Chris@4:          BZ_GET_SMALL(k1); s->nblock_used++;
Chris@4:          if (s->nblock_used == s->save_nblock+1) continue;
Chris@4:          if (k1 != s->k0) { s->k0 = k1; continue; };
Chris@4:    
Chris@4:          s->state_out_len = 3;
Chris@4:          BZ_GET_SMALL(k1); s->nblock_used++;
Chris@4:          if (s->nblock_used == s->save_nblock+1) continue;
Chris@4:          if (k1 != s->k0) { s->k0 = k1; continue; };
Chris@4:    
Chris@4:          BZ_GET_SMALL(k1); s->nblock_used++;
Chris@4:          s->state_out_len = ((Int32)k1) + 4;
Chris@4:          BZ_GET_SMALL(s->k0); s->nblock_used++;
Chris@4:       }
Chris@4: 
Chris@4:    }
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzDecompress) ( bz_stream *strm )
Chris@4: {
Chris@4:    Bool    corrupt;
Chris@4:    DState* s;
Chris@4:    if (strm == NULL) return BZ_PARAM_ERROR;
Chris@4:    s = strm->state;
Chris@4:    if (s == NULL) return BZ_PARAM_ERROR;
Chris@4:    if (s->strm != strm) return BZ_PARAM_ERROR;
Chris@4: 
Chris@4:    while (True) {
Chris@4:       if (s->state == BZ_X_IDLE) return BZ_SEQUENCE_ERROR;
Chris@4:       if (s->state == BZ_X_OUTPUT) {
Chris@4:          if (s->smallDecompress)
Chris@4:             corrupt = unRLE_obuf_to_output_SMALL ( s ); else
Chris@4:             corrupt = unRLE_obuf_to_output_FAST  ( s );
Chris@4:          if (corrupt) return BZ_DATA_ERROR;
Chris@4:          if (s->nblock_used == s->save_nblock+1 && s->state_out_len == 0) {
Chris@4:             BZ_FINALISE_CRC ( s->calculatedBlockCRC );
Chris@4:             if (s->verbosity >= 3) 
Chris@4:                VPrintf2 ( " {0x%08x, 0x%08x}", s->storedBlockCRC, 
Chris@4:                           s->calculatedBlockCRC );
Chris@4:             if (s->verbosity >= 2) VPrintf0 ( "]" );
Chris@4:             if (s->calculatedBlockCRC != s->storedBlockCRC)
Chris@4:                return BZ_DATA_ERROR;
Chris@4:             s->calculatedCombinedCRC 
Chris@4:                = (s->calculatedCombinedCRC << 1) | 
Chris@4:                     (s->calculatedCombinedCRC >> 31);
Chris@4:             s->calculatedCombinedCRC ^= s->calculatedBlockCRC;
Chris@4:             s->state = BZ_X_BLKHDR_1;
Chris@4:          } else {
Chris@4:             return BZ_OK;
Chris@4:          }
Chris@4:       }
Chris@4:       if (s->state >= BZ_X_MAGIC_1) {
Chris@4:          Int32 r = BZ2_decompress ( s );
Chris@4:          if (r == BZ_STREAM_END) {
Chris@4:             if (s->verbosity >= 3)
Chris@4:                VPrintf2 ( "\n    combined CRCs: stored = 0x%08x, computed = 0x%08x", 
Chris@4:                           s->storedCombinedCRC, s->calculatedCombinedCRC );
Chris@4:             if (s->calculatedCombinedCRC != s->storedCombinedCRC)
Chris@4:                return BZ_DATA_ERROR;
Chris@4:             return r;
Chris@4:          }
Chris@4:          if (s->state != BZ_X_OUTPUT) return r;
Chris@4:       }
Chris@4:    }
Chris@4: 
Chris@4:    AssertH ( 0, 6001 );
Chris@4: 
Chris@4:    return 0;  /*NOTREACHED*/
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzDecompressEnd)  ( bz_stream *strm )
Chris@4: {
Chris@4:    DState* s;
Chris@4:    if (strm == NULL) return BZ_PARAM_ERROR;
Chris@4:    s = strm->state;
Chris@4:    if (s == NULL) return BZ_PARAM_ERROR;
Chris@4:    if (s->strm != strm) return BZ_PARAM_ERROR;
Chris@4: 
Chris@4:    if (s->tt   != NULL) BZFREE(s->tt);
Chris@4:    if (s->ll16 != NULL) BZFREE(s->ll16);
Chris@4:    if (s->ll4  != NULL) BZFREE(s->ll4);
Chris@4: 
Chris@4:    BZFREE(strm->state);
Chris@4:    strm->state = NULL;
Chris@4: 
Chris@4:    return BZ_OK;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: #ifndef BZ_NO_STDIO
Chris@4: /*---------------------------------------------------*/
Chris@4: /*--- File I/O stuff                              ---*/
Chris@4: /*---------------------------------------------------*/
Chris@4: 
Chris@4: #define BZ_SETERR(eee)                    \
Chris@4: {                                         \
Chris@4:    if (bzerror != NULL) *bzerror = eee;   \
Chris@4:    if (bzf != NULL) bzf->lastErr = eee;   \
Chris@4: }
Chris@4: 
Chris@4: typedef 
Chris@4:    struct {
Chris@4:       FILE*     handle;
Chris@4:       Char      buf[BZ_MAX_UNUSED];
Chris@4:       Int32     bufN;
Chris@4:       Bool      writing;
Chris@4:       bz_stream strm;
Chris@4:       Int32     lastErr;
Chris@4:       Bool      initialisedOk;
Chris@4:    }
Chris@4:    bzFile;
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------*/
Chris@4: static Bool myfeof ( FILE* f )
Chris@4: {
Chris@4:    Int32 c = fgetc ( f );
Chris@4:    if (c == EOF) return True;
Chris@4:    ungetc ( c, f );
Chris@4:    return False;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: BZFILE* BZ_API(BZ2_bzWriteOpen) 
Chris@4:                     ( int*  bzerror,      
Chris@4:                       FILE* f, 
Chris@4:                       int   blockSize100k, 
Chris@4:                       int   verbosity,
Chris@4:                       int   workFactor )
Chris@4: {
Chris@4:    Int32   ret;
Chris@4:    bzFile* bzf = NULL;
Chris@4: 
Chris@4:    BZ_SETERR(BZ_OK);
Chris@4: 
Chris@4:    if (f == NULL ||
Chris@4:        (blockSize100k < 1 || blockSize100k > 9) ||
Chris@4:        (workFactor < 0 || workFactor > 250) ||
Chris@4:        (verbosity < 0 || verbosity > 4))
Chris@4:       { BZ_SETERR(BZ_PARAM_ERROR); return NULL; };
Chris@4: 
Chris@4:    if (ferror(f))
Chris@4:       { BZ_SETERR(BZ_IO_ERROR); return NULL; };
Chris@4: 
Chris@4:    bzf = malloc ( sizeof(bzFile) );
Chris@4:    if (bzf == NULL)
Chris@4:       { BZ_SETERR(BZ_MEM_ERROR); return NULL; };
Chris@4: 
Chris@4:    BZ_SETERR(BZ_OK);
Chris@4:    bzf->initialisedOk = False;
Chris@4:    bzf->bufN          = 0;
Chris@4:    bzf->handle        = f;
Chris@4:    bzf->writing       = True;
Chris@4:    bzf->strm.bzalloc  = NULL;
Chris@4:    bzf->strm.bzfree   = NULL;
Chris@4:    bzf->strm.opaque   = NULL;
Chris@4: 
Chris@4:    if (workFactor == 0) workFactor = 30;
Chris@4:    ret = BZ2_bzCompressInit ( &(bzf->strm), blockSize100k, 
Chris@4:                               verbosity, workFactor );
Chris@4:    if (ret != BZ_OK)
Chris@4:       { BZ_SETERR(ret); free(bzf); return NULL; };
Chris@4: 
Chris@4:    bzf->strm.avail_in = 0;
Chris@4:    bzf->initialisedOk = True;
Chris@4:    return bzf;   
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: void BZ_API(BZ2_bzWrite)
Chris@4:              ( int*    bzerror, 
Chris@4:                BZFILE* b, 
Chris@4:                void*   buf, 
Chris@4:                int     len )
Chris@4: {
Chris@4:    Int32 n, n2, ret;
Chris@4:    bzFile* bzf = (bzFile*)b;
Chris@4: 
Chris@4:    BZ_SETERR(BZ_OK);
Chris@4:    if (bzf == NULL || buf == NULL || len < 0)
Chris@4:       { BZ_SETERR(BZ_PARAM_ERROR); return; };
Chris@4:    if (!(bzf->writing))
Chris@4:       { BZ_SETERR(BZ_SEQUENCE_ERROR); return; };
Chris@4:    if (ferror(bzf->handle))
Chris@4:       { BZ_SETERR(BZ_IO_ERROR); return; };
Chris@4: 
Chris@4:    if (len == 0)
Chris@4:       { BZ_SETERR(BZ_OK); return; };
Chris@4: 
Chris@4:    bzf->strm.avail_in = len;
Chris@4:    bzf->strm.next_in  = buf;
Chris@4: 
Chris@4:    while (True) {
Chris@4:       bzf->strm.avail_out = BZ_MAX_UNUSED;
Chris@4:       bzf->strm.next_out = bzf->buf;
Chris@4:       ret = BZ2_bzCompress ( &(bzf->strm), BZ_RUN );
Chris@4:       if (ret != BZ_RUN_OK)
Chris@4:          { BZ_SETERR(ret); return; };
Chris@4: 
Chris@4:       if (bzf->strm.avail_out < BZ_MAX_UNUSED) {
Chris@4:          n = BZ_MAX_UNUSED - bzf->strm.avail_out;
Chris@4:          n2 = fwrite ( (void*)(bzf->buf), sizeof(UChar), 
Chris@4:                        n, bzf->handle );
Chris@4:          if (n != n2 || ferror(bzf->handle))
Chris@4:             { BZ_SETERR(BZ_IO_ERROR); return; };
Chris@4:       }
Chris@4: 
Chris@4:       if (bzf->strm.avail_in == 0)
Chris@4:          { BZ_SETERR(BZ_OK); return; };
Chris@4:    }
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: void BZ_API(BZ2_bzWriteClose)
Chris@4:                   ( int*          bzerror, 
Chris@4:                     BZFILE*       b, 
Chris@4:                     int           abandon,
Chris@4:                     unsigned int* nbytes_in,
Chris@4:                     unsigned int* nbytes_out )
Chris@4: {
Chris@4:    BZ2_bzWriteClose64 ( bzerror, b, abandon, 
Chris@4:                         nbytes_in, NULL, nbytes_out, NULL );
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: void BZ_API(BZ2_bzWriteClose64)
Chris@4:                   ( int*          bzerror, 
Chris@4:                     BZFILE*       b, 
Chris@4:                     int           abandon,
Chris@4:                     unsigned int* nbytes_in_lo32,
Chris@4:                     unsigned int* nbytes_in_hi32,
Chris@4:                     unsigned int* nbytes_out_lo32,
Chris@4:                     unsigned int* nbytes_out_hi32 )
Chris@4: {
Chris@4:    Int32   n, n2, ret;
Chris@4:    bzFile* bzf = (bzFile*)b;
Chris@4: 
Chris@4:    if (bzf == NULL)
Chris@4:       { BZ_SETERR(BZ_OK); return; };
Chris@4:    if (!(bzf->writing))
Chris@4:       { BZ_SETERR(BZ_SEQUENCE_ERROR); return; };
Chris@4:    if (ferror(bzf->handle))
Chris@4:       { BZ_SETERR(BZ_IO_ERROR); return; };
Chris@4: 
Chris@4:    if (nbytes_in_lo32 != NULL) *nbytes_in_lo32 = 0;
Chris@4:    if (nbytes_in_hi32 != NULL) *nbytes_in_hi32 = 0;
Chris@4:    if (nbytes_out_lo32 != NULL) *nbytes_out_lo32 = 0;
Chris@4:    if (nbytes_out_hi32 != NULL) *nbytes_out_hi32 = 0;
Chris@4: 
Chris@4:    if ((!abandon) && bzf->lastErr == BZ_OK) {
Chris@4:       while (True) {
Chris@4:          bzf->strm.avail_out = BZ_MAX_UNUSED;
Chris@4:          bzf->strm.next_out = bzf->buf;
Chris@4:          ret = BZ2_bzCompress ( &(bzf->strm), BZ_FINISH );
Chris@4:          if (ret != BZ_FINISH_OK && ret != BZ_STREAM_END)
Chris@4:             { BZ_SETERR(ret); return; };
Chris@4: 
Chris@4:          if (bzf->strm.avail_out < BZ_MAX_UNUSED) {
Chris@4:             n = BZ_MAX_UNUSED - bzf->strm.avail_out;
Chris@4:             n2 = fwrite ( (void*)(bzf->buf), sizeof(UChar), 
Chris@4:                           n, bzf->handle );
Chris@4:             if (n != n2 || ferror(bzf->handle))
Chris@4:                { BZ_SETERR(BZ_IO_ERROR); return; };
Chris@4:          }
Chris@4: 
Chris@4:          if (ret == BZ_STREAM_END) break;
Chris@4:       }
Chris@4:    }
Chris@4: 
Chris@4:    if ( !abandon && !ferror ( bzf->handle ) ) {
Chris@4:       fflush ( bzf->handle );
Chris@4:       if (ferror(bzf->handle))
Chris@4:          { BZ_SETERR(BZ_IO_ERROR); return; };
Chris@4:    }
Chris@4: 
Chris@4:    if (nbytes_in_lo32 != NULL)
Chris@4:       *nbytes_in_lo32 = bzf->strm.total_in_lo32;
Chris@4:    if (nbytes_in_hi32 != NULL)
Chris@4:       *nbytes_in_hi32 = bzf->strm.total_in_hi32;
Chris@4:    if (nbytes_out_lo32 != NULL)
Chris@4:       *nbytes_out_lo32 = bzf->strm.total_out_lo32;
Chris@4:    if (nbytes_out_hi32 != NULL)
Chris@4:       *nbytes_out_hi32 = bzf->strm.total_out_hi32;
Chris@4: 
Chris@4:    BZ_SETERR(BZ_OK);
Chris@4:    BZ2_bzCompressEnd ( &(bzf->strm) );
Chris@4:    free ( bzf );
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: BZFILE* BZ_API(BZ2_bzReadOpen) 
Chris@4:                    ( int*  bzerror, 
Chris@4:                      FILE* f, 
Chris@4:                      int   verbosity,
Chris@4:                      int   small,
Chris@4:                      void* unused,
Chris@4:                      int   nUnused )
Chris@4: {
Chris@4:    bzFile* bzf = NULL;
Chris@4:    int     ret;
Chris@4: 
Chris@4:    BZ_SETERR(BZ_OK);
Chris@4: 
Chris@4:    if (f == NULL || 
Chris@4:        (small != 0 && small != 1) ||
Chris@4:        (verbosity < 0 || verbosity > 4) ||
Chris@4:        (unused == NULL && nUnused != 0) ||
Chris@4:        (unused != NULL && (nUnused < 0 || nUnused > BZ_MAX_UNUSED)))
Chris@4:       { BZ_SETERR(BZ_PARAM_ERROR); return NULL; };
Chris@4: 
Chris@4:    if (ferror(f))
Chris@4:       { BZ_SETERR(BZ_IO_ERROR); return NULL; };
Chris@4: 
Chris@4:    bzf = malloc ( sizeof(bzFile) );
Chris@4:    if (bzf == NULL) 
Chris@4:       { BZ_SETERR(BZ_MEM_ERROR); return NULL; };
Chris@4: 
Chris@4:    BZ_SETERR(BZ_OK);
Chris@4: 
Chris@4:    bzf->initialisedOk = False;
Chris@4:    bzf->handle        = f;
Chris@4:    bzf->bufN          = 0;
Chris@4:    bzf->writing       = False;
Chris@4:    bzf->strm.bzalloc  = NULL;
Chris@4:    bzf->strm.bzfree   = NULL;
Chris@4:    bzf->strm.opaque   = NULL;
Chris@4:    
Chris@4:    while (nUnused > 0) {
Chris@4:       bzf->buf[bzf->bufN] = *((UChar*)(unused)); bzf->bufN++;
Chris@4:       unused = ((void*)( 1 + ((UChar*)(unused))  ));
Chris@4:       nUnused--;
Chris@4:    }
Chris@4: 
Chris@4:    ret = BZ2_bzDecompressInit ( &(bzf->strm), verbosity, small );
Chris@4:    if (ret != BZ_OK)
Chris@4:       { BZ_SETERR(ret); free(bzf); return NULL; };
Chris@4: 
Chris@4:    bzf->strm.avail_in = bzf->bufN;
Chris@4:    bzf->strm.next_in  = bzf->buf;
Chris@4: 
Chris@4:    bzf->initialisedOk = True;
Chris@4:    return bzf;   
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: void BZ_API(BZ2_bzReadClose) ( int *bzerror, BZFILE *b )
Chris@4: {
Chris@4:    bzFile* bzf = (bzFile*)b;
Chris@4: 
Chris@4:    BZ_SETERR(BZ_OK);
Chris@4:    if (bzf == NULL)
Chris@4:       { BZ_SETERR(BZ_OK); return; };
Chris@4: 
Chris@4:    if (bzf->writing)
Chris@4:       { BZ_SETERR(BZ_SEQUENCE_ERROR); return; };
Chris@4: 
Chris@4:    if (bzf->initialisedOk)
Chris@4:       (void)BZ2_bzDecompressEnd ( &(bzf->strm) );
Chris@4:    free ( bzf );
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzRead) 
Chris@4:            ( int*    bzerror, 
Chris@4:              BZFILE* b, 
Chris@4:              void*   buf, 
Chris@4:              int     len )
Chris@4: {
Chris@4:    Int32   n, ret;
Chris@4:    bzFile* bzf = (bzFile*)b;
Chris@4: 
Chris@4:    BZ_SETERR(BZ_OK);
Chris@4: 
Chris@4:    if (bzf == NULL || buf == NULL || len < 0)
Chris@4:       { BZ_SETERR(BZ_PARAM_ERROR); return 0; };
Chris@4: 
Chris@4:    if (bzf->writing)
Chris@4:       { BZ_SETERR(BZ_SEQUENCE_ERROR); return 0; };
Chris@4: 
Chris@4:    if (len == 0)
Chris@4:       { BZ_SETERR(BZ_OK); return 0; };
Chris@4: 
Chris@4:    bzf->strm.avail_out = len;
Chris@4:    bzf->strm.next_out = buf;
Chris@4: 
Chris@4:    while (True) {
Chris@4: 
Chris@4:       if (ferror(bzf->handle)) 
Chris@4:          { BZ_SETERR(BZ_IO_ERROR); return 0; };
Chris@4: 
Chris@4:       if (bzf->strm.avail_in == 0 && !myfeof(bzf->handle)) {
Chris@4:          n = fread ( bzf->buf, sizeof(UChar), 
Chris@4:                      BZ_MAX_UNUSED, bzf->handle );
Chris@4:          if (ferror(bzf->handle))
Chris@4:             { BZ_SETERR(BZ_IO_ERROR); return 0; };
Chris@4:          bzf->bufN = n;
Chris@4:          bzf->strm.avail_in = bzf->bufN;
Chris@4:          bzf->strm.next_in = bzf->buf;
Chris@4:       }
Chris@4: 
Chris@4:       ret = BZ2_bzDecompress ( &(bzf->strm) );
Chris@4: 
Chris@4:       if (ret != BZ_OK && ret != BZ_STREAM_END)
Chris@4:          { BZ_SETERR(ret); return 0; };
Chris@4: 
Chris@4:       if (ret == BZ_OK && myfeof(bzf->handle) && 
Chris@4:           bzf->strm.avail_in == 0 && bzf->strm.avail_out > 0)
Chris@4:          { BZ_SETERR(BZ_UNEXPECTED_EOF); return 0; };
Chris@4: 
Chris@4:       if (ret == BZ_STREAM_END)
Chris@4:          { BZ_SETERR(BZ_STREAM_END);
Chris@4:            return len - bzf->strm.avail_out; };
Chris@4:       if (bzf->strm.avail_out == 0)
Chris@4:          { BZ_SETERR(BZ_OK); return len; };
Chris@4:       
Chris@4:    }
Chris@4: 
Chris@4:    return 0; /*not reached*/
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: void BZ_API(BZ2_bzReadGetUnused) 
Chris@4:                      ( int*    bzerror, 
Chris@4:                        BZFILE* b, 
Chris@4:                        void**  unused, 
Chris@4:                        int*    nUnused )
Chris@4: {
Chris@4:    bzFile* bzf = (bzFile*)b;
Chris@4:    if (bzf == NULL)
Chris@4:       { BZ_SETERR(BZ_PARAM_ERROR); return; };
Chris@4:    if (bzf->lastErr != BZ_STREAM_END)
Chris@4:       { BZ_SETERR(BZ_SEQUENCE_ERROR); return; };
Chris@4:    if (unused == NULL || nUnused == NULL)
Chris@4:       { BZ_SETERR(BZ_PARAM_ERROR); return; };
Chris@4: 
Chris@4:    BZ_SETERR(BZ_OK);
Chris@4:    *nUnused = bzf->strm.avail_in;
Chris@4:    *unused = bzf->strm.next_in;
Chris@4: }
Chris@4: #endif
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: /*--- Misc convenience stuff                      ---*/
Chris@4: /*---------------------------------------------------*/
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzBuffToBuffCompress) 
Chris@4:                          ( char*         dest, 
Chris@4:                            unsigned int* destLen,
Chris@4:                            char*         source, 
Chris@4:                            unsigned int  sourceLen,
Chris@4:                            int           blockSize100k, 
Chris@4:                            int           verbosity, 
Chris@4:                            int           workFactor )
Chris@4: {
Chris@4:    bz_stream strm;
Chris@4:    int ret;
Chris@4: 
Chris@4:    if (dest == NULL || destLen == NULL || 
Chris@4:        source == NULL ||
Chris@4:        blockSize100k < 1 || blockSize100k > 9 ||
Chris@4:        verbosity < 0 || verbosity > 4 ||
Chris@4:        workFactor < 0 || workFactor > 250) 
Chris@4:       return BZ_PARAM_ERROR;
Chris@4: 
Chris@4:    if (workFactor == 0) workFactor = 30;
Chris@4:    strm.bzalloc = NULL;
Chris@4:    strm.bzfree = NULL;
Chris@4:    strm.opaque = NULL;
Chris@4:    ret = BZ2_bzCompressInit ( &strm, blockSize100k, 
Chris@4:                               verbosity, workFactor );
Chris@4:    if (ret != BZ_OK) return ret;
Chris@4: 
Chris@4:    strm.next_in = source;
Chris@4:    strm.next_out = dest;
Chris@4:    strm.avail_in = sourceLen;
Chris@4:    strm.avail_out = *destLen;
Chris@4: 
Chris@4:    ret = BZ2_bzCompress ( &strm, BZ_FINISH );
Chris@4:    if (ret == BZ_FINISH_OK) goto output_overflow;
Chris@4:    if (ret != BZ_STREAM_END) goto errhandler;
Chris@4: 
Chris@4:    /* normal termination */
Chris@4:    *destLen -= strm.avail_out;   
Chris@4:    BZ2_bzCompressEnd ( &strm );
Chris@4:    return BZ_OK;
Chris@4: 
Chris@4:    output_overflow:
Chris@4:    BZ2_bzCompressEnd ( &strm );
Chris@4:    return BZ_OUTBUFF_FULL;
Chris@4: 
Chris@4:    errhandler:
Chris@4:    BZ2_bzCompressEnd ( &strm );
Chris@4:    return ret;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzBuffToBuffDecompress) 
Chris@4:                            ( char*         dest, 
Chris@4:                              unsigned int* destLen,
Chris@4:                              char*         source, 
Chris@4:                              unsigned int  sourceLen,
Chris@4:                              int           small,
Chris@4:                              int           verbosity )
Chris@4: {
Chris@4:    bz_stream strm;
Chris@4:    int ret;
Chris@4: 
Chris@4:    if (dest == NULL || destLen == NULL || 
Chris@4:        source == NULL ||
Chris@4:        (small != 0 && small != 1) ||
Chris@4:        verbosity < 0 || verbosity > 4) 
Chris@4:           return BZ_PARAM_ERROR;
Chris@4: 
Chris@4:    strm.bzalloc = NULL;
Chris@4:    strm.bzfree = NULL;
Chris@4:    strm.opaque = NULL;
Chris@4:    ret = BZ2_bzDecompressInit ( &strm, verbosity, small );
Chris@4:    if (ret != BZ_OK) return ret;
Chris@4: 
Chris@4:    strm.next_in = source;
Chris@4:    strm.next_out = dest;
Chris@4:    strm.avail_in = sourceLen;
Chris@4:    strm.avail_out = *destLen;
Chris@4: 
Chris@4:    ret = BZ2_bzDecompress ( &strm );
Chris@4:    if (ret == BZ_OK) goto output_overflow_or_eof;
Chris@4:    if (ret != BZ_STREAM_END) goto errhandler;
Chris@4: 
Chris@4:    /* normal termination */
Chris@4:    *destLen -= strm.avail_out;
Chris@4:    BZ2_bzDecompressEnd ( &strm );
Chris@4:    return BZ_OK;
Chris@4: 
Chris@4:    output_overflow_or_eof:
Chris@4:    if (strm.avail_out > 0) {
Chris@4:       BZ2_bzDecompressEnd ( &strm );
Chris@4:       return BZ_UNEXPECTED_EOF;
Chris@4:    } else {
Chris@4:       BZ2_bzDecompressEnd ( &strm );
Chris@4:       return BZ_OUTBUFF_FULL;
Chris@4:    };      
Chris@4: 
Chris@4:    errhandler:
Chris@4:    BZ2_bzDecompressEnd ( &strm );
Chris@4:    return ret; 
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: /*--
Chris@4:    Code contributed by Yoshioka Tsuneo (tsuneo@rr.iij4u.or.jp)
Chris@4:    to support better zlib compatibility.
Chris@4:    This code is not _officially_ part of libbzip2 (yet);
Chris@4:    I haven't tested it, documented it, or considered the
Chris@4:    threading-safeness of it.
Chris@4:    If this code breaks, please contact both Yoshioka and me.
Chris@4: --*/
Chris@4: /*---------------------------------------------------*/
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: /*--
Chris@4:    return version like "0.9.5d, 4-Sept-1999".
Chris@4: --*/
Chris@4: const char * BZ_API(BZ2_bzlibVersion)(void)
Chris@4: {
Chris@4:    return BZ_VERSION;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: #ifndef BZ_NO_STDIO
Chris@4: /*---------------------------------------------------*/
Chris@4: 
Chris@4: #if defined(_WIN32) || defined(OS2) || defined(MSDOS)
Chris@4: #   include <fcntl.h>
Chris@4: #   include <io.h>
Chris@4: #   define SET_BINARY_MODE(file) setmode(fileno(file),O_BINARY)
Chris@4: #else
Chris@4: #   define SET_BINARY_MODE(file)
Chris@4: #endif
Chris@4: static
Chris@4: BZFILE * bzopen_or_bzdopen
Chris@4:                ( const char *path,   /* no use when bzdopen */
Chris@4:                  int fd,             /* no use when bzdopen */
Chris@4:                  const char *mode,
Chris@4:                  int open_mode)      /* bzopen: 0, bzdopen:1 */
Chris@4: {
Chris@4:    int    bzerr;
Chris@4:    char   unused[BZ_MAX_UNUSED];
Chris@4:    int    blockSize100k = 9;
Chris@4:    int    writing       = 0;
Chris@4:    char   mode2[10]     = "";
Chris@4:    FILE   *fp           = NULL;
Chris@4:    BZFILE *bzfp         = NULL;
Chris@4:    int    verbosity     = 0;
Chris@4:    int    workFactor    = 30;
Chris@4:    int    smallMode     = 0;
Chris@4:    int    nUnused       = 0; 
Chris@4: 
Chris@4:    if (mode == NULL) return NULL;
Chris@4:    while (*mode) {
Chris@4:       switch (*mode) {
Chris@4:       case 'r':
Chris@4:          writing = 0; break;
Chris@4:       case 'w':
Chris@4:          writing = 1; break;
Chris@4:       case 's':
Chris@4:          smallMode = 1; break;
Chris@4:       default:
Chris@4:          if (isdigit((int)(*mode))) {
Chris@4:             blockSize100k = *mode-BZ_HDR_0;
Chris@4:          }
Chris@4:       }
Chris@4:       mode++;
Chris@4:    }
Chris@4:    strcat(mode2, writing ? "w" : "r" );
Chris@4:    strcat(mode2,"b");   /* binary mode */
Chris@4: 
Chris@4:    if (open_mode==0) {
Chris@4:       if (path==NULL || strcmp(path,"")==0) {
Chris@4:         fp = (writing ? stdout : stdin);
Chris@4:         SET_BINARY_MODE(fp);
Chris@4:       } else {
Chris@4:         fp = fopen(path,mode2);
Chris@4:       }
Chris@4:    } else {
Chris@4: #ifdef BZ_STRICT_ANSI
Chris@4:       fp = NULL;
Chris@4: #else
Chris@4:       fp = fdopen(fd,mode2);
Chris@4: #endif
Chris@4:    }
Chris@4:    if (fp == NULL) return NULL;
Chris@4: 
Chris@4:    if (writing) {
Chris@4:       /* Guard against total chaos and anarchy -- JRS */
Chris@4:       if (blockSize100k < 1) blockSize100k = 1;
Chris@4:       if (blockSize100k > 9) blockSize100k = 9; 
Chris@4:       bzfp = BZ2_bzWriteOpen(&bzerr,fp,blockSize100k,
Chris@4:                              verbosity,workFactor);
Chris@4:    } else {
Chris@4:       bzfp = BZ2_bzReadOpen(&bzerr,fp,verbosity,smallMode,
Chris@4:                             unused,nUnused);
Chris@4:    }
Chris@4:    if (bzfp == NULL) {
Chris@4:       if (fp != stdin && fp != stdout) fclose(fp);
Chris@4:       return NULL;
Chris@4:    }
Chris@4:    return bzfp;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: /*--
Chris@4:    open file for read or write.
Chris@4:       ex) bzopen("file","w9")
Chris@4:       case path="" or NULL => use stdin or stdout.
Chris@4: --*/
Chris@4: BZFILE * BZ_API(BZ2_bzopen)
Chris@4:                ( const char *path,
Chris@4:                  const char *mode )
Chris@4: {
Chris@4:    return bzopen_or_bzdopen(path,-1,mode,/*bzopen*/0);
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: BZFILE * BZ_API(BZ2_bzdopen)
Chris@4:                ( int fd,
Chris@4:                  const char *mode )
Chris@4: {
Chris@4:    return bzopen_or_bzdopen(NULL,fd,mode,/*bzdopen*/1);
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzread) (BZFILE* b, void* buf, int len )
Chris@4: {
Chris@4:    int bzerr, nread;
Chris@4:    if (((bzFile*)b)->lastErr == BZ_STREAM_END) return 0;
Chris@4:    nread = BZ2_bzRead(&bzerr,b,buf,len);
Chris@4:    if (bzerr == BZ_OK || bzerr == BZ_STREAM_END) {
Chris@4:       return nread;
Chris@4:    } else {
Chris@4:       return -1;
Chris@4:    }
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzwrite) (BZFILE* b, void* buf, int len )
Chris@4: {
Chris@4:    int bzerr;
Chris@4: 
Chris@4:    BZ2_bzWrite(&bzerr,b,buf,len);
Chris@4:    if(bzerr == BZ_OK){
Chris@4:       return len;
Chris@4:    }else{
Chris@4:       return -1;
Chris@4:    }
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: int BZ_API(BZ2_bzflush) (BZFILE *b)
Chris@4: {
Chris@4:    /* do nothing now... */
Chris@4:    return 0;
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: void BZ_API(BZ2_bzclose) (BZFILE* b)
Chris@4: {
Chris@4:    int bzerr;
Chris@4:    FILE *fp;
Chris@4:    
Chris@4:    if (b==NULL) {return;}
Chris@4:    fp = ((bzFile *)b)->handle;
Chris@4:    if(((bzFile*)b)->writing){
Chris@4:       BZ2_bzWriteClose(&bzerr,b,0,NULL,NULL);
Chris@4:       if(bzerr != BZ_OK){
Chris@4:          BZ2_bzWriteClose(NULL,b,1,NULL,NULL);
Chris@4:       }
Chris@4:    }else{
Chris@4:       BZ2_bzReadClose(&bzerr,b);
Chris@4:    }
Chris@4:    if(fp!=stdin && fp!=stdout){
Chris@4:       fclose(fp);
Chris@4:    }
Chris@4: }
Chris@4: 
Chris@4: 
Chris@4: /*---------------------------------------------------*/
Chris@4: /*--
Chris@4:    return last error code 
Chris@4: --*/
Chris@4: static const char *bzerrorstrings[] = {
Chris@4:        "OK"
Chris@4:       ,"SEQUENCE_ERROR"
Chris@4:       ,"PARAM_ERROR"
Chris@4:       ,"MEM_ERROR"
Chris@4:       ,"DATA_ERROR"
Chris@4:       ,"DATA_ERROR_MAGIC"
Chris@4:       ,"IO_ERROR"
Chris@4:       ,"UNEXPECTED_EOF"
Chris@4:       ,"OUTBUFF_FULL"
Chris@4:       ,"CONFIG_ERROR"
Chris@4:       ,"???"   /* for future */
Chris@4:       ,"???"   /* for future */
Chris@4:       ,"???"   /* for future */
Chris@4:       ,"???"   /* for future */
Chris@4:       ,"???"   /* for future */
Chris@4:       ,"???"   /* for future */
Chris@4: };
Chris@4: 
Chris@4: 
Chris@4: const char * BZ_API(BZ2_bzerror) (BZFILE *b, int *errnum)
Chris@4: {
Chris@4:    int err = ((bzFile *)b)->lastErr;
Chris@4: 
Chris@4:    if(err>0) err = 0;
Chris@4:    *errnum = err;
Chris@4:    return bzerrorstrings[err*-1];
Chris@4: }
Chris@4: #endif
Chris@4: 
Chris@4: 
Chris@4: /*-------------------------------------------------------------*/
Chris@4: /*--- end                                           bzlib.c ---*/
Chris@4: /*-------------------------------------------------------------*/