/*

 * Copyright (c) 1996, 2009, Oracle and/or its affiliates. All rights reserved.

 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

 *

 * This code is free software; you can redistribute it and/or modify it

 * under the terms of the GNU General Public License version 2 only, as

 * published by the Free Software Foundation.  Oracle designates this

 * particular file as subject to the "Classpath" exception as provided

 * by Oracle in the LICENSE file that accompanied this code.

 *

 * This code is distributed in the hope that it will be useful, but WITHOUT

 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

 * version 2 for more details (a copy is included in the LICENSE file that

 * accompanied this code).

 *

 * You should have received a copy of the GNU General Public License version

 * 2 along with this work; if not, write to the Free Software Foundation,

 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

 *

 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

 * or visit www.oracle.com if you need additional information or have any

 * questions.

 */

package org.apidesign.bck2brwsr.emul.zip;

import java.util.zip.*;

import java.io.InputStream;

import java.io.IOException;

import java.io.EOFException;

import java.io.PushbackInputStream;

import static org.apidesign.bck2brwsr.emul.zip.ZipConstants64.*;

import static java.util.zip.ZipInputStream.*;

/**

 * This class implements an input stream filter for reading files in the

 * ZIP file format. Includes support for both compressed and uncompressed

 * entries.

 *

 * @author      David Connelly

 */

public

class ZipInputStream extends InflaterInputStream  {

    private ZipEntry entry;

    private int flag;

    private CRC32 crc = new CRC32();

    private long remaining;

    private byte[] tmpbuf = new byte[512];

    private static final int STORED = ZipEntry.STORED;

    private static final int DEFLATED = ZipEntry.DEFLATED;

    private boolean closed = false;

    // this flag is set to true after EOF has reached for

    // one entry

    private boolean entryEOF = false;

    /**

     * Check to make sure that this stream has not been closed

     */

    private void ensureOpen() throws IOException {

        if (closed) {

            throw new IOException("Stream closed");

        }

    }

    /**

     * Creates a new ZIP input stream.

     *

     * <p>The UTF-8 {@link java.nio.charset.Charset charset} is used to

     * decode the entry names.

     *

     * @param in the actual input stream

     */

    public ZipInputStream(InputStream in) {

//        this(in, "UTF-8");

        super(new PushbackInputStream(in, 512), new Inflater(true), 512);

        //usesDefaultInflater = true;

        if(in == null) {

            throw new NullPointerException("in is null");

        }

    }

    /**

     * Creates a new ZIP input stream.

     *

     * @param in the actual input stream

     *

     * @param charset

     *        The {@linkplain java.nio.charset.Charset charset} to be

     *        used to decode the ZIP entry name (ignored if the

     *        <a href="package-summary.html#lang_encoding"> language

     *        encoding bit</a> of the ZIP entry's general purpose bit

     *        flag is set).

     *

     * @since 1.7

     *

    public ZipInputStream(InputStream in, Charset charset) {

        super(new PushbackInputStream(in, 512), new Inflater(true), 512);

        usesDefaultInflater = true;

        if(in == null) {

            throw new NullPointerException("in is null");

        }

        if (charset == null)

            throw new NullPointerException("charset is null");

        this.zc = ZipCoder.get(charset);

    }

    */

    /**

     * Reads the next ZIP file entry and positions the stream at the

     * beginning of the entry data.

     * @return the next ZIP file entry, or null if there are no more entries

     * @exception ZipException if a ZIP file error has occurred

     * @exception IOException if an I/O error has occurred

     */

    public ZipEntry getNextEntry() throws IOException {

        ensureOpen();

        if (entry != null) {

            closeEntry();

        }

        crc.reset();

        inf.reset();

        if ((entry = readLOC()) == null) {

            return null;

        }

        if (entry.getMethod() == STORED) {

            remaining = entry.getSize();

        }

        entryEOF = false;

        return entry;

    }

    /**

     * Closes the current ZIP entry and positions the stream for reading the

     * next entry.

     * @exception ZipException if a ZIP file error has occurred

     * @exception IOException if an I/O error has occurred

     */

    public void closeEntry() throws IOException {

        ensureOpen();

        while (read(tmpbuf, 0, tmpbuf.length) != -1) ;

        entryEOF = true;

    }

    /**

     * Returns 0 after EOF has reached for the current entry data,

     * otherwise always return 1.

     * <p>

     * Programs should not count on this method to return the actual number

     * of bytes that could be read without blocking.

     *

     * @return     1 before EOF and 0 after EOF has reached for current entry.

     * @exception  IOException  if an I/O error occurs.

     *

     */

    public int available() throws IOException {

        ensureOpen();

        if (entryEOF) {

            return 0;

        } else {

            return 1;

        }

    }

    /**

     * Reads from the current ZIP entry into an array of bytes.

     * If <code>len</code> is not zero, the method

     * blocks until some input is available; otherwise, no

     * bytes are read and <code>0</code> is returned.

     * @param b the buffer into which the data is read

     * @param off the start offset in the destination array <code>b</code>

     * @param len the maximum number of bytes read

     * @return the actual number of bytes read, or -1 if the end of the

     *         entry is reached

     * @exception  NullPointerException if <code>b</code> is <code>null</code>.

     * @exception  IndexOutOfBoundsException if <code>off</code> is negative,

     * <code>len</code> is negative, or <code>len</code> is greater than

     * <code>b.length - off</code>

     * @exception ZipException if a ZIP file error has occurred

     * @exception IOException if an I/O error has occurred

     */

    public int read(byte[] b, int off, int len) throws IOException {

        ensureOpen();

        if (off < 0 || len < 0 || off > b.length - len) {

            throw new IndexOutOfBoundsException();

        } else if (len == 0) {

            return 0;

        }

        if (entry == null) {

            return -1;

        }

        switch (entry.getMethod()) {

        case DEFLATED:

            len = super.read(b, off, len);

            if (len == -1) {

                readEnd(entry);

                entryEOF = true;

                entry = null;

            } else {

                crc.update(b, off, len);

            }

            return len;

        case STORED:

            if (remaining <= 0) {

                entryEOF = true;

                entry = null;

                return -1;

            }

            if (len > remaining) {

                len = (int)remaining;

            }

            len = in.read(b, off, len);

            if (len == -1) {

                throw new ZipException("unexpected EOF");

            }

            crc.update(b, off, len);

            remaining -= len;

            if (remaining == 0 && entry.getCrc() != crc.getValue()) {

                throw new ZipException(

                    "invalid entry CRC (expected 0x" + Long.toHexString(entry.getCrc()) +

                    " but got 0x" + Long.toHexString(crc.getValue()) + ")");

            }

            return len;

        default:

            throw new ZipException("invalid compression method");

        }

    }

    /**

     * Skips specified number of bytes in the current ZIP entry.

     * @param n the number of bytes to skip

     * @return the actual number of bytes skipped

     * @exception ZipException if a ZIP file error has occurred

     * @exception IOException if an I/O error has occurred

     * @exception IllegalArgumentException if n < 0

     */

    public long skip(long n) throws IOException {

        if (n < 0) {

            throw new IllegalArgumentException("negative skip length");

        }

        ensureOpen();

        int max = (int)Math.min(n, Integer.MAX_VALUE);

        int total = 0;

        while (total < max) {

            int len = max - total;

            if (len > tmpbuf.length) {

                len = tmpbuf.length;

            }

            len = read(tmpbuf, 0, len);

            if (len == -1) {

                entryEOF = true;

                break;

            }

            total += len;

        }

        return total;

    }

    /**

     * Closes this input stream and releases any system resources associated

     * with the stream.

     * @exception IOException if an I/O error has occurred

     */

    public void close() throws IOException {

        if (!closed) {

            super.close();

            closed = true;

        }

    }

    private byte[] b = new byte[256];

    /*

     * Reads local file (LOC) header for next entry.

     */

    private ZipEntry readLOC() throws IOException {

        try {

            readFully(tmpbuf, 0, LOCHDR);

        } catch (EOFException e) {

            return null;

        }

        if (get32(tmpbuf, 0) != LOCSIG) {

            return null;

        }

        // get flag first, we need check EFS.

        flag = get16(tmpbuf, LOCFLG);

        // get the entry name and create the ZipEntry first

        int len = get16(tmpbuf, LOCNAM);

        int blen = b.length;

        if (len > blen) {

            do

                blen = blen * 2;

            while (len > blen);

            b = new byte[blen];

        }

        readFully(b, 0, len);

        // Force to use UTF-8 if the EFS bit is ON, even the cs is NOT UTF-8

        ZipEntry e = createZipEntry(((flag & EFS) != 0)

                                    ? toStringUTF8(b, len)

                                    : toString(b, len));

        // now get the remaining fields for the entry

        if ((flag & 1) == 1) {

            throw new ZipException("encrypted ZIP entry not supported");

        }

        e.setMethod(get16(tmpbuf, LOCHOW));

        e.setTime(get32(tmpbuf, LOCTIM));

        if ((flag & 8) == 8) {

            /* "Data Descriptor" present */

            if (e.getMethod() != DEFLATED) {

                throw new ZipException(

                        "only DEFLATED entries can have EXT descriptor");

            }

        } else {

            e.setCrc(get32(tmpbuf, LOCCRC));

            e.setCompressedSize(get32(tmpbuf, LOCSIZ));

            e.setSize(get32(tmpbuf, LOCLEN));

        }

        len = get16(tmpbuf, LOCEXT);

        if (len > 0) {

            byte[] bb = new byte[len];

            readFully(bb, 0, len);

            e.setExtra(bb);

            // extra fields are in "HeaderID(2)DataSize(2)Data... format

            if (e.getCompressedSize() == ZIP64_MAGICVAL || e.getCompressedSize() == ZIP64_MAGICVAL) {

                int off = 0;

                while (off + 4 < len) {

                    int sz = get16(bb, off + 2);

                    if (get16(bb, off) == ZIP64_EXTID) {

                        off += 4;

                        // LOC extra zip64 entry MUST include BOTH original and

                        // compressed file size fields

                        if (sz < 16 || (off + sz) > len ) {

                            // Invalid zip64 extra fields, simply skip. Even it's

                            // rare, it's possible the entry size happens to be

                            // the magic value and it "accidnetly" has some bytes

                            // in extra match the id.

                            return e;

                        }

                        e.setSize(get64(bb, off));

                        e.setCompressedSize(get64(bb, off + 8));

                        break;

                    }

                    off += (sz + 4);

                }

            }

        }

        return e;

    }

    /**

     * Creates a new <code>ZipEntry</code> object for the specified

     * entry name.

     *

     * @param name the ZIP file entry name

     * @return the ZipEntry just created

     */

    protected ZipEntry createZipEntry(String name) {

        return new ZipEntry(name);

    }

    /*

     * Reads end of deflated entry as well as EXT descriptor if present.

     */

    private void readEnd(ZipEntry e) throws IOException {

        int n = inf.getRemaining();

        if (n > 0) {

            ((PushbackInputStream)in).unread(buf, len - n, n);

        }

        if ((flag & 8) == 8) {

            /* "Data Descriptor" present */

            if (inf.getBytesWritten() > ZIP64_MAGICVAL ||

                inf.getBytesRead() > ZIP64_MAGICVAL) {

                // ZIP64 format

                readFully(tmpbuf, 0, ZIP64_EXTHDR);

                long sig = get32(tmpbuf, 0);

                if (sig != EXTSIG) { // no EXTSIG present

                    e.setCrc(sig);

                    e.setCompressedSize(get64(tmpbuf, ZIP64_EXTSIZ - ZIP64_EXTCRC));

                    e.setSize(get64(tmpbuf, ZIP64_EXTLEN - ZIP64_EXTCRC));

                    ((PushbackInputStream)in).unread(

                        tmpbuf, ZIP64_EXTHDR - ZIP64_EXTCRC - 1, ZIP64_EXTCRC);

                } else {

                    e.setCrc(get32(tmpbuf, ZIP64_EXTCRC));

                    e.setCompressedSize(get64(tmpbuf, ZIP64_EXTSIZ));

                    e.setSize(get64(tmpbuf, ZIP64_EXTLEN));

                }

            } else {

                readFully(tmpbuf, 0, EXTHDR);

                long sig = get32(tmpbuf, 0);

                if (sig != EXTSIG) { // no EXTSIG present

                    e.setCrc(sig);

                    e.setCompressedSize(get32(tmpbuf, EXTSIZ - EXTCRC));

                    e.setSize(get32(tmpbuf, EXTLEN - EXTCRC));

                    ((PushbackInputStream)in).unread(

                                               tmpbuf, EXTHDR - EXTCRC - 1, EXTCRC);

                } else {

                    e.setCrc(get32(tmpbuf, EXTCRC));

                    e.setCompressedSize(get32(tmpbuf, EXTSIZ));

                    e.setSize(get32(tmpbuf, EXTLEN));

                }

            }

        }

        if (e.getSize() != inf.getBytesWritten()) {

            throw new ZipException(

                "invalid entry size (expected " + e.getSize() +

                " but got " + inf.getBytesWritten() + " bytes)");

        }

        if (e.getCompressedSize() != inf.getBytesRead()) {

            throw new ZipException(

                "invalid entry compressed size (expected " + e.getCompressedSize() +

                " but got " + inf.getBytesRead() + " bytes)");

        }

        if (e.getCrc() != crc.getValue()) {

            throw new ZipException(

                "invalid entry CRC (expected 0x" + Long.toHexString(e.getCrc()) +

                " but got 0x" + Long.toHexString(crc.getValue()) + ")");

        }

    }

    /*

     * Reads bytes, blocking until all bytes are read.

     */

    private void readFully(byte[] b, int off, int len) throws IOException {

        while (len > 0) {

            int n = in.read(b, off, len);

            if (n == -1) {

                throw new EOFException();

            }

            off += n;

            len -= n;

        }

    }

    /*

     * Fetches unsigned 16-bit value from byte array at specified offset.

     * The bytes are assumed to be in Intel (little-endian) byte order.

     */

    private static final int get16(byte b[], int off) {

        return (b[off] & 0xff) | ((b[off+1] & 0xff) << 8);

    }

    /*

     * Fetches unsigned 32-bit value from byte array at specified offset.

     * The bytes are assumed to be in Intel (little-endian) byte order.

     */

    private static final long get32(byte b[], int off) {

        return (get16(b, off) | ((long)get16(b, off+2) << 16)) & 0xffffffffL;

    }

    /*

     * Fetches signed 64-bit value from byte array at specified offset.

     * The bytes are assumed to be in Intel (little-endian) byte order.

     */

    private static final long get64(byte b[], int off) {

        return get32(b, off) | (get32(b, off+4) << 32);

    }

    private static String toStringUTF8(byte[] arr, int len) {

        return new String(arr, 0, len);

    }

    private static String toString(byte[] b, int len) {

        return new String(b, 0, len);

    }

}