As we no longer use function pointers for read in common archiving code
[oweals/busybox.git] / archival / libunarchive / unzip.c
index 3a7334ce9e10760bfd26a1609680a312f40785cc..29929c2829c52bc304c7b0b3432c27aac35c78a4 100644 (file)
@@ -7,7 +7,7 @@
  * Originally adjusted for busybox by Sven Rudolph <sr1@inf.tu-dresden.de>
  * based on gzip sources
  *
- * Adjusted further by Erik Andersen <andersee@debian.org> to support
+ * Adjusted further by Erik Andersen <andersen@codepoet.org> to support
  * files as well as stdin/stdout, and to generally behave itself wrt
  * command line handling.
  *
@@ -103,7 +103,7 @@ static unsigned int gunzip_bb;      /* bit buffer */
 static unsigned char gunzip_bk;        /* bits in bit buffer */
 
 /* These control the size of the bytebuffer */
-#define BYTEBUFFER_MAX 0x8000
+static unsigned int bytebuffer_max = 0x8000;
 static unsigned char *bytebuffer = NULL;
 static unsigned int bytebuffer_offset = 0;
 static unsigned int bytebuffer_size = 0;
@@ -144,21 +144,16 @@ static const unsigned char border[] = {
        16, 17, 18, 0, 8, 7, 9, 6, 10, 5, 11, 4, 12, 3, 13, 2, 14, 1, 15
 };
 
-static void fill_bytebuffer(void)
-{
-       if (bytebuffer_offset >= bytebuffer_size) {
-               /* Leave the first 4 bytes empty so we can always unwind the bitbuffer 
-                * to the front of the bytebuffer, leave 4 bytes free at end of tail
-                * so we can easily top up buffer in check_trailer_gzip() */
-               bytebuffer_size = 4 + xread(gunzip_src_fd, &bytebuffer[4], BYTEBUFFER_MAX - 8);
-               bytebuffer_offset = 4;
-       }
-}
-
 static unsigned int fill_bitbuffer(unsigned int bitbuffer, unsigned int *current, const unsigned int required)
 {
        while (*current < required) {
-               fill_bytebuffer();
+               if (bytebuffer_offset >= bytebuffer_size) {
+                       /* Leave the first 4 bytes empty so we can always unwind the bitbuffer 
+                        * to the front of the bytebuffer, leave 4 bytes free at end of tail
+                        * so we can easily top up buffer in check_trailer_gzip() */
+                       bytebuffer_size = 4 + bb_xread(gunzip_src_fd, &bytebuffer[4], bytebuffer_max - 8);
+                       bytebuffer_offset = 4;
+               }
                bitbuffer |= ((unsigned int) bytebuffer[bytebuffer_offset]) << *current;
                bytebuffer_offset++;
                *current += 8;
@@ -448,7 +443,7 @@ static int inflate_codes(huft_t * my_tl, huft_t * my_td, const unsigned int my_b
                if ((e = (t = tl + ((unsigned) b & ml))->e) > 16)
                        do {
                                if (e == 99) {
-                                       error_msg_and_die("inflate_codes error 1");;
+                                       bb_error_msg_and_die("inflate_codes error 1");;
                                }
                                b >>= t->b;
                                k -= t->b;
@@ -484,7 +479,7 @@ static int inflate_codes(huft_t * my_tl, huft_t * my_td, const unsigned int my_b
                        if ((e = (t = td + ((unsigned) b & md))->e) > 16)
                                do {
                                        if (e == 99)
-                                               error_msg_and_die("inflate_codes error 2");;
+                                               bb_error_msg_and_die("inflate_codes error 2");;
                                        b >>= t->b;
                                        k -= t->b;
                                        e -= 16;
@@ -821,7 +816,7 @@ static int inflate_block(int *e)
 
                if ((i = huft_build(ll, nl, 257, cplens, cplext, &tl, &bl)) != 0) {
                        if (i == 1) {
-                               error_msg_and_die("Incomplete literal tree");
+                               bb_error_msg_and_die("Incomplete literal tree");
                                huft_free(tl);
                        }
                        return i;       /* incomplete code set */
@@ -830,7 +825,7 @@ static int inflate_block(int *e)
                bd = dbits;
                if ((i = huft_build(ll + nl, nd, 0, cpdist, cpdext, &td, &bd)) != 0) {
                        if (i == 1) {
-                               error_msg_and_die("incomplete distance tree");
+                               bb_error_msg_and_die("incomplete distance tree");
                                huft_free(td);
                        }
                        huft_free(tl);
@@ -846,7 +841,7 @@ static int inflate_block(int *e)
        }
        default:
                /* bad block type */
-               error_msg_and_die("bad block type %d\n", t);
+               bb_error_msg_and_die("bad block type %d\n", t);
        }
 }
 
@@ -861,9 +856,9 @@ static void calculate_gunzip_crc(void)
 
 static int inflate_get_next_window(void)
 {
-       static int needAnotherBlock = 1;
        static int method = -1; // Method == -1 for stored, -2 for codes
        static int e = 0;
+       static int needAnotherBlock = 1;
        
        gunzip_outbuf_count = 0;
 
@@ -873,6 +868,8 @@ static int inflate_get_next_window(void)
                if (needAnotherBlock) {
                        if(e) {
                                calculate_gunzip_crc();
+                               e = 0;
+                               needAnotherBlock = 1;
                                return 0;
                        } // Last block
                        method = inflate_block(&e);
@@ -884,7 +881,7 @@ static int inflate_get_next_window(void)
                                        break;
                        case -2:        ret = inflate_codes(0,0,0,0,0);
                                        break;
-                       default:        error_msg_and_die("inflate error %d", method);
+                       default:        bb_error_msg_and_die("inflate error %d", method);
                }
 
                if (ret == 1) {
@@ -895,54 +892,25 @@ static int inflate_get_next_window(void)
        /* Doesnt get here */
 }
 
-/*
- * User functions
- *
- * read_gz, GZ_gzReadOpen, GZ_gzReadClose, inflate
- */
-
-extern ssize_t read_gz(int fd, void *buf, size_t count)
+/* Initialise bytebuffer, be carefull not to overfill the buffer */
+extern void inflate_init(unsigned int bufsize)
 {
-       static int morebytes = 0, finished = 0;
-       
-       if (morebytes) {
-               int bytesRead = morebytes > count ? count : morebytes;
-               memcpy(buf, gunzip_window + (gunzip_outbuf_count - morebytes), bytesRead);
-               morebytes -= bytesRead;
-               return bytesRead;
-       } else if (finished) {
-               return 0;
-       } else if (count >= 0x8000) { // We can decompress direcly to the buffer, 32k at a time
-               // Could decompress to larger buffer, but it must be a power of 2, and calculating that is probably more expensive than the benefit
-               unsigned char *old_gunzip_window = gunzip_window; // Save old window
-               gunzip_window = buf;
-               if (inflate_get_next_window() == 0) finished = 1;
-               gunzip_window = old_gunzip_window; // Restore old window
-               return gunzip_outbuf_count;
-       } else { // Oh well, need to split up the gunzip_window
-               int bytesRead;
-               if (inflate_get_next_window() == 0) finished = 1;
-               morebytes = gunzip_outbuf_count;
-               bytesRead = morebytes > count ? count : morebytes;
-               memcpy(buf, gunzip_window, bytesRead);
-               morebytes -= bytesRead;
-               return bytesRead;
-       }
-       
+       /* Set the bytebuffer size, default is same as gunzip_wsize */
+       bytebuffer_max = bufsize + 8;
+       bytebuffer_offset = 4;
+       bytebuffer_size = 0;
 }
 
-extern void GZ_gzReadOpen(int fd, void *unused, int nUnused)
+extern int inflate_unzip(int in, int out)
 {
+       ssize_t nwrote;
        typedef void (*sig_type) (int);
 
        /* Allocate all global buffers (for DYN_ALLOC option) */
        gunzip_window = xmalloc(gunzip_wsize);
        gunzip_outbuf_count = 0;
        gunzip_bytes_out = 0;
-       gunzip_src_fd = fd;
-
-       /* Input buffer */
-       bytebuffer = xmalloc(BYTEBUFFER_MAX);
+       gunzip_src_fd = in;
 
        /* initialize gunzip_window, bit buffer */
        gunzip_bk = 0;
@@ -950,10 +918,20 @@ extern void GZ_gzReadOpen(int fd, void *unused, int nUnused)
 
        /* Create the crc table */
        make_gunzip_crc_table();
-}
 
-extern void GZ_gzReadClose(void)
-{
+       /* Allocate space for buffer */
+       bytebuffer = xmalloc(bytebuffer_max);   
+
+       while(1) {
+               int ret = inflate_get_next_window();
+               nwrote = bb_full_write(out, gunzip_window, gunzip_outbuf_count);
+               if (nwrote == -1) {
+                       bb_perror_msg("write");
+                       return -1;
+               }
+               if (ret == 0) break;
+       }
+
        /* Cleanup */
        free(gunzip_window);
        free(gunzip_crc_table);
@@ -967,57 +945,20 @@ extern void GZ_gzReadClose(void)
                gunzip_bb >>= 8;
                gunzip_bk -= 8;
        }
-}
-
-/*extern int inflate(int in, int out) // Useful for testing read_gz
-{
-       char buf[8192];
-       ssize_t nread, nwrote;
-
-       GZ_gzReadOpen(in, 0, 0);
-       while(1) { // Robbed from copyfd.c
-               nread = read_gz(in, buf, sizeof(buf));
-               if (nread == 0) break; // no data to write
-               else if (nread == -1) {
-                       perror_msg("read");
-                       return -1;
-               }
-               nwrote = full_write(out, buf, nread);
-               if (nwrote == -1) {
-                       perror_msg("write");
-                       return -1;
-               }
-       }
-       GZ_gzReadClose();
-       return 0;
-}*/
-
-extern int inflate(int in, int out)
-{
-       ssize_t nwrote;
-       GZ_gzReadOpen(in, 0, 0);
-       while(1) {
-               int ret = inflate_get_next_window();
-               nwrote = full_write(out, gunzip_window, gunzip_outbuf_count);
-               if (nwrote == -1) {
-                       perror_msg("write");
-                       return -1;
-               }
-               if (ret == 0) break;
-       }
-       GZ_gzReadClose();
        return 0;
 }
 
-extern void check_trailer_gzip(int src_fd)
+extern int inflate_gunzip(int in, int out)
 {
        unsigned int stored_crc = 0;
        unsigned char count;
 
+       inflate_unzip(in, out);
+
        /* top up the input buffer with the rest of the trailer */
        count = bytebuffer_size - bytebuffer_offset;
        if (count < 8) {
-               xread_all(src_fd, &bytebuffer[bytebuffer_size], 8 - count);
+               bb_xread_all(in, &bytebuffer[bytebuffer_size], 8 - count);
                bytebuffer_size += 8 - count;
        }
        for (count = 0; count != 4; count++) {
@@ -1027,14 +968,15 @@ extern void check_trailer_gzip(int src_fd)
 
        /* Validate decompression - crc */
        if (stored_crc != (gunzip_crc ^ 0xffffffffL)) {
-               error_msg_and_die("crc error");
+               bb_error_msg("crc error");
        }
 
        /* Validate decompression - size */
        if (gunzip_bytes_out !=
                (bytebuffer[bytebuffer_offset] | (bytebuffer[bytebuffer_offset+1] << 8) |
                (bytebuffer[bytebuffer_offset+2] << 16) | (bytebuffer[bytebuffer_offset+3] << 24))) {
-               error_msg_and_die("Incorrect length, but crc is correct");
+               bb_error_msg("Incorrect length");
        }
-
+       
+       return 0;
 }