You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@synapse.apache.org by ra...@apache.org on 2010/09/23 08:04:34 UTC

svn commit: r1000332 [11/27] - in /synapse/branches/commons-vfs-2-synapse-2.0: ./ core/ core/src/ core/src/main/ core/src/main/java/ core/src/main/java/org/ core/src/main/java/org/apache/ core/src/main/java/org/apache/commons/ core/src/main/java/org/ap...

Added: synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CBZip2InputStream.java
URL: http://svn.apache.org/viewvc/synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CBZip2InputStream.java?rev=1000332&view=auto
==============================================================================
--- synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CBZip2InputStream.java (added)
+++ synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CBZip2InputStream.java Thu Sep 23 06:04:21 2010
@@ -0,0 +1,995 @@
+/*
+ * Licensed to the Apache Software Foundation (ASF) under one or more
+ * contributor license agreements.  See the NOTICE file distributed with
+ * this work for additional information regarding copyright ownership.
+ * The ASF licenses this file to You under the Apache License, Version 2.0
+ * (the "License"); you may not use this file except in compliance with
+ * the License.  You may obtain a copy of the License at
+ *
+ *      http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+package org.apache.commons.vfs.provider.bzip2;
+
+import java.io.IOException;
+import java.io.InputStream;
+
+/*
+ * This package is based on the work done by Keiron Liddle, Aftex Software
+ * <ke...@aftexsw.com> to whom the Ant project is very grateful for his
+ * great code.
+ */
+
+/**
+ * An input stream that decompresses from the BZip2 format (without the file
+ * header chars) to be read as any other stream.
+ *
+ * @author <a href="mailto:keiron@aftexsw.com">Keiron Liddle</a>
+ */
+class CBZip2InputStream
+        extends InputStream
+        implements BZip2Constants
+{
+    private static final int START_BLOCK_STATE = 1;
+    private static final int RAND_PART_A_STATE = 2;
+    private static final int RAND_PART_B_STATE = 3;
+    private static final int RAND_PART_C_STATE = 4;
+    private static final int NO_RAND_PART_A_STATE = 5;
+    private static final int NO_RAND_PART_B_STATE = 6;
+    private static final int NO_RAND_PART_C_STATE = 7;
+
+    private CRC crc = new CRC();
+    private boolean[] inUse = new boolean[256];
+    private char[] seqToUnseq = new char[256];
+    private char[] unseqToSeq = new char[256];
+    private char[] selector = new char[MAX_SELECTORS];
+    private char[] selectorMtf = new char[MAX_SELECTORS];
+
+    /*
+     * freq table collected to save a pass over the data
+     * during decompression.
+     */
+    private int[] unzftab = new int[256];
+
+    private int[][] limit = new int[N_GROUPS][MAX_ALPHA_SIZE];
+    private int[][] base = new int[N_GROUPS][MAX_ALPHA_SIZE];
+    private int[][] perm = new int[N_GROUPS][MAX_ALPHA_SIZE];
+    private int[] minLens = new int[N_GROUPS];
+
+    private boolean streamEnd;
+    private int currentChar = -1;
+
+    private int currentState = START_BLOCK_STATE;
+    private int rNToGo;
+    private int rTPos;
+    private int tPos;
+
+    private int i2;
+    private int count;
+    private int chPrev;
+    private int ch2;
+    private int j2;
+    private char z;
+
+    private boolean m_blockRandomised;
+
+    /*
+     * always: in the range 0 .. 9.
+     * The current block size is 100000 * this number.
+     */
+    private int blockSize100k;
+    private int bsBuff;
+    private int bsLive;
+
+    private InputStream m_input;
+
+    private int computedBlockCRC;
+    private int computedCombinedCRC;
+
+    /*
+     * index of the last char in the block, so
+     * the block size == last + 1.
+     */
+    private int last;
+    private char[] mll8;
+    private int nInUse;
+
+    /*
+     * index in zptr[] of original string after sorting.
+     */
+    private int origPtr;
+
+    private int storedBlockCRC;
+    private int storedCombinedCRC;
+    private int[] tt;
+
+    CBZip2InputStream(final InputStream input)
+    {
+        bsSetStream(input);
+        initialize();
+        initBlock();
+        setupBlock();
+    }
+
+    private static void badBlockHeader()
+    {
+        cadvise();
+    }
+
+    private static void blockOverrun()
+    {
+        cadvise();
+    }
+
+    private static void cadvise()
+    {
+        System.out.println("CRC Error");
+        //throw new CCoruptionError();
+    }
+
+    private static void compressedStreamEOF()
+    {
+        cadvise();
+    }
+
+    private static void crcError()
+    {
+        cadvise();
+    }
+
+    /**
+     * a fake <code>available</code> which always returns 1 as long as the stream is not at end.
+     * This is required to make this stream work if wrapped in an BufferedInputStream.
+     *
+     */
+    public int available() throws IOException
+    {
+        if (!streamEnd)
+        {
+            return 1;
+        }
+        return 0;
+    }
+
+    public int read()
+    {
+        if (streamEnd)
+        {
+            return -1;
+        }
+        else
+        {
+            int retChar = currentChar;
+            switch (currentState)
+            {
+                case START_BLOCK_STATE:
+                    break;
+                case RAND_PART_A_STATE:
+                    break;
+                case RAND_PART_B_STATE:
+                    setupRandPartB();
+                    break;
+                case RAND_PART_C_STATE:
+                    setupRandPartC();
+                    break;
+                case NO_RAND_PART_A_STATE:
+                    break;
+                case NO_RAND_PART_B_STATE:
+                    setupNoRandPartB();
+                    break;
+                case NO_RAND_PART_C_STATE:
+                    setupNoRandPartC();
+                    break;
+                default:
+                    break;
+            }
+            return retChar;
+        }
+    }
+
+    private void setDecompressStructureSizes(int newSize100k)
+    {
+        if (!(0 <= newSize100k && newSize100k <= 9 && 0 <= blockSize100k
+                && blockSize100k <= 9))
+        {
+            // throw new IOException("Invalid block size");
+        }
+
+        blockSize100k = newSize100k;
+
+        if (newSize100k == 0)
+        {
+            return;
+        }
+
+        int n = BASE_BLOCK_SIZE * newSize100k;
+        mll8 = new char[n];
+        tt = new int[n];
+    }
+
+    private void setupBlock()
+    {
+        int[] cftab = new int[257];
+        char ch;
+
+        cftab[0] = 0;
+        for (int i = 1; i <= 256; i++)
+        {
+            cftab[i] = unzftab[i - 1];
+        }
+        for (int i = 1; i <= 256; i++)
+        {
+            cftab[i] += cftab[i - 1];
+        }
+
+        for (int i = 0; i <= last; i++)
+        {
+            ch = mll8[i];
+            tt[cftab[ch]] = i;
+            cftab[ch]++;
+        }
+        cftab = null;
+
+        tPos = tt[origPtr];
+
+        count = 0;
+        i2 = 0;
+        ch2 = 256;
+        /*
+         * not a char and not EOF
+         */
+        if (m_blockRandomised)
+        {
+            rNToGo = 0;
+            rTPos = 0;
+            setupRandPartA();
+        }
+        else
+        {
+            setupNoRandPartA();
+        }
+    }
+
+    private void setupNoRandPartA()
+    {
+        if (i2 <= last)
+        {
+            chPrev = ch2;
+            ch2 = mll8[tPos];
+            tPos = tt[tPos];
+            i2++;
+
+            currentChar = ch2;
+            currentState = NO_RAND_PART_B_STATE;
+            crc.updateCRC(ch2);
+        }
+        else
+        {
+            endBlock();
+            initBlock();
+            setupBlock();
+        }
+    }
+
+    private void setupNoRandPartB()
+    {
+        if (ch2 != chPrev)
+        {
+            currentState = NO_RAND_PART_A_STATE;
+            count = 1;
+            setupNoRandPartA();
+        }
+        else
+        {
+            count++;
+            if (count >= 4)
+            {
+                z = mll8[tPos];
+                tPos = tt[tPos];
+                currentState = NO_RAND_PART_C_STATE;
+                j2 = 0;
+                setupNoRandPartC();
+            }
+            else
+            {
+                currentState = NO_RAND_PART_A_STATE;
+                setupNoRandPartA();
+            }
+        }
+    }
+
+    private void setupNoRandPartC()
+    {
+        if (j2 < z)
+        {
+            currentChar = ch2;
+            crc.updateCRC(ch2);
+            j2++;
+        }
+        else
+        {
+            currentState = NO_RAND_PART_A_STATE;
+            i2++;
+            count = 0;
+            setupNoRandPartA();
+        }
+    }
+
+    private void setupRandPartA()
+    {
+        if (i2 <= last)
+        {
+            chPrev = ch2;
+            ch2 = mll8[tPos];
+            tPos = tt[tPos];
+            if (rNToGo == 0)
+            {
+                rNToGo = RAND_NUMS[rTPos];
+                rTPos++;
+                if (rTPos == 512)
+                {
+                    rTPos = 0;
+                }
+            }
+            rNToGo--;
+            ch2 ^= ((rNToGo == 1) ? 1 : 0);
+            i2++;
+
+            currentChar = ch2;
+            currentState = RAND_PART_B_STATE;
+            crc.updateCRC(ch2);
+        }
+        else
+        {
+            endBlock();
+            initBlock();
+            setupBlock();
+        }
+    }
+
+    private void setupRandPartB()
+    {
+        if (ch2 != chPrev)
+        {
+            currentState = RAND_PART_A_STATE;
+            count = 1;
+            setupRandPartA();
+        }
+        else
+        {
+            count++;
+            if (count >= 4)
+            {
+                z = mll8[tPos];
+                tPos = tt[tPos];
+                if (rNToGo == 0)
+                {
+                    rNToGo = RAND_NUMS[rTPos];
+                    rTPos++;
+                    if (rTPos == 512)
+                    {
+                        rTPos = 0;
+                    }
+                }
+                rNToGo--;
+                z ^= ((rNToGo == 1) ? 1 : 0);
+                j2 = 0;
+                currentState = RAND_PART_C_STATE;
+                setupRandPartC();
+            }
+            else
+            {
+                currentState = RAND_PART_A_STATE;
+                setupRandPartA();
+            }
+        }
+    }
+
+    private void setupRandPartC()
+    {
+        if (j2 < z)
+        {
+            currentChar = ch2;
+            crc.updateCRC(ch2);
+            j2++;
+        }
+        else
+        {
+            currentState = RAND_PART_A_STATE;
+            i2++;
+            count = 0;
+            setupRandPartA();
+        }
+    }
+
+    private void getAndMoveToFrontDecode()
+    {
+        int nextSym;
+
+        int limitLast = BASE_BLOCK_SIZE * blockSize100k;
+        origPtr = readVariableSizedInt(24);
+
+        recvDecodingTables();
+        int EOB = nInUse + 1;
+        int groupNo = -1;
+        int groupPos = 0;
+
+        /*
+         * Setting up the unzftab entries here is not strictly
+         * necessary, but it does save having to do it later
+         * in a separate pass, and so saves a block's worth of
+         * cache misses.
+         */
+        for (int i = 0; i <= 255; i++)
+        {
+            unzftab[i] = 0;
+        }
+
+        final char[] yy = new char[256];
+        for (int i = 0; i <= 255; i++)
+        {
+            yy[i] = (char) i;
+        }
+
+        last = -1;
+        int zt;
+        int zn;
+        int zvec;
+        int zj;
+        groupNo++;
+        groupPos = G_SIZE - 1;
+
+        zt = selector[groupNo];
+        zn = minLens[zt];
+        zvec = bsR(zn);
+        while (zvec > limit[zt][zn])
+        {
+            zn++;
+
+            while (bsLive < 1)
+            {
+                int zzi = 0;
+                try
+                {
+                    zzi = m_input.read();
+                }
+                catch (IOException e)
+                {
+                    compressedStreamEOF();
+                }
+                if (zzi == -1)
+                {
+                    compressedStreamEOF();
+                }
+                bsBuff = (bsBuff << 8) | (zzi & 0xff);
+                bsLive += 8;
+            }
+
+            zj = (bsBuff >> (bsLive - 1)) & 1;
+            bsLive--;
+
+            zvec = (zvec << 1) | zj;
+        }
+        nextSym = perm[zt][zvec - base[zt][zn]];
+
+        while (true)
+        {
+            if (nextSym == EOB)
+            {
+                break;
+            }
+
+            if (nextSym == RUNA || nextSym == RUNB)
+            {
+                char ch;
+                int s = -1;
+                int N = 1;
+                do
+                {
+                    if (nextSym == RUNA)
+                    {
+                        s = s + (0 + 1) * N;
+                    }
+                    else // if( nextSym == RUNB )
+                    {
+                        s = s + (1 + 1) * N;
+                    }
+                    N = N * 2;
+
+                    if (groupPos == 0)
+                    {
+                        groupNo++;
+                        groupPos = G_SIZE;
+                    }
+                    groupPos--;
+                    zt = selector[groupNo];
+                    zn = minLens[zt];
+                    zvec = bsR(zn);
+                    while (zvec > limit[zt][zn])
+                    {
+                        zn++;
+
+                        while (bsLive < 1)
+                        {
+                            int zzi = 0;
+                            try
+                            {
+                                zzi = m_input.read();
+                            }
+                            catch (IOException e)
+                            {
+                                compressedStreamEOF();
+                            }
+                            if (zzi == -1)
+                            {
+                                compressedStreamEOF();
+                            }
+                            bsBuff = (bsBuff << 8) | (zzi & 0xff);
+                            bsLive += 8;
+                        }
+
+                        zj = (bsBuff >> (bsLive - 1)) & 1;
+                        bsLive--;
+                        zvec = (zvec << 1) | zj;
+                    }
+
+                    nextSym = perm[zt][zvec - base[zt][zn]];
+
+                }
+                while (nextSym == RUNA || nextSym == RUNB);
+
+                s++;
+                ch = seqToUnseq[yy[0]];
+                unzftab[ch] += s;
+
+                while (s > 0)
+                {
+                    last++;
+                    mll8[last] = ch;
+                    s--;
+                }
+
+                if (last >= limitLast)
+                {
+                    blockOverrun();
+                }
+                continue;
+            }
+            else
+            {
+                char tmp;
+                last++;
+                if (last >= limitLast)
+                {
+                    blockOverrun();
+                }
+
+                tmp = yy[nextSym - 1];
+                unzftab[seqToUnseq[tmp]]++;
+                mll8[last] = seqToUnseq[tmp];
+
+                /*
+                 * This loop is hammered during decompression,
+                 * hence the unrolling.
+                 * for (j = nextSym-1; j > 0; j--) yy[j] = yy[j-1];
+                 */
+                int j = nextSym - 1;
+                for (; j > 3; j -= 4)
+                {
+                    yy[j] = yy[j - 1];
+                    yy[j - 1] = yy[j - 2];
+                    yy[j - 2] = yy[j - 3];
+                    yy[j - 3] = yy[j - 4];
+                }
+                for (; j > 0; j--)
+                {
+                    yy[j] = yy[j - 1];
+                }
+
+                yy[0] = tmp;
+
+                if (groupPos == 0)
+                {
+                    groupNo++;
+                    groupPos = G_SIZE;
+                }
+                groupPos--;
+                zt = selector[groupNo];
+                zn = minLens[zt];
+                zvec = bsR(zn);
+                while (zvec > limit[zt][zn])
+                {
+                    zn++;
+
+                    while (bsLive < 1)
+                    {
+                        char ch = 0;
+                        try
+                        {
+                            ch = (char) m_input.read();
+                        }
+                        catch (IOException e)
+                        {
+                            compressedStreamEOF();
+                        }
+
+                        bsBuff = (bsBuff << 8) | (ch & 0xff);
+                        bsLive += 8;
+                    }
+
+                    zj = (bsBuff >> (bsLive - 1)) & 1;
+                    bsLive--;
+
+                    zvec = (zvec << 1) | zj;
+                }
+                nextSym = perm[zt][zvec - base[zt][zn]];
+
+                continue;
+            }
+        }
+    }
+
+    private void bsFinishedWithStream()
+    {
+        if (m_input != null)
+        {
+            try
+            {
+                m_input.close();
+            }
+            catch (IOException e)
+            {
+                // Ignore the exception.
+            }
+        }
+        m_input = null;
+    }
+
+    private int readVariableSizedInt(final int numBits)
+    {
+        return bsR(numBits);
+    }
+
+    private char readUnsignedChar()
+    {
+        return (char) bsR(8);
+    }
+
+    private int readInt()
+    {
+        int u = 0;
+        u = (u << 8) | bsR(8);
+        u = (u << 8) | bsR(8);
+        u = (u << 8) | bsR(8);
+        u = (u << 8) | bsR(8);
+        return u;
+    }
+
+    private int bsR(final int n)
+    {
+        while (bsLive < n)
+        {
+            int ch = 0;
+            try
+            {
+                ch = m_input.read();
+            }
+            catch (final IOException ioe)
+            {
+                compressedStreamEOF();
+            }
+
+            if (ch == -1)
+            {
+                compressedStreamEOF();
+            }
+
+            bsBuff = (bsBuff << 8) | (ch & 0xff);
+            bsLive += 8;
+        }
+
+        final int result = (bsBuff >> (bsLive - n)) & ((1 << n) - 1);
+        bsLive -= n;
+        return result;
+    }
+
+    private void bsSetStream(final InputStream input)
+    {
+        m_input = input;
+        bsLive = 0;
+        bsBuff = 0;
+    }
+
+    private void complete()
+    {
+        storedCombinedCRC = readInt();
+        if (storedCombinedCRC != computedCombinedCRC)
+        {
+            crcError();
+        }
+
+        bsFinishedWithStream();
+        streamEnd = true;
+    }
+
+    private void endBlock()
+    {
+        computedBlockCRC = crc.getFinalCRC();
+        /*
+         * A bad CRC is considered a fatal error.
+         */
+        if (storedBlockCRC != computedBlockCRC)
+        {
+            crcError();
+        }
+
+        computedCombinedCRC = (computedCombinedCRC << 1)
+                | (computedCombinedCRC >>> 31);
+        computedCombinedCRC ^= computedBlockCRC;
+    }
+
+    private void hbCreateDecodeTables(final int[] limit,
+                                      final int[] base,
+                                      final int[] perm,
+                                      final char[] length,
+                                      final int minLen,
+                                      final int maxLen,
+                                      final int alphaSize)
+    {
+        int pp = 0;
+        for (int i = minLen; i <= maxLen; i++)
+        {
+            for (int j = 0; j < alphaSize; j++)
+            {
+                if (length[j] == i)
+                {
+                    perm[pp] = j;
+                    pp++;
+                }
+            }
+        }
+
+        for (int i = 0; i < MAX_CODE_LEN; i++)
+        {
+            base[i] = 0;
+        }
+
+        for (int i = 0; i < alphaSize; i++)
+        {
+            base[length[i] + 1]++;
+        }
+
+        for (int i = 1; i < MAX_CODE_LEN; i++)
+        {
+            base[i] += base[i - 1];
+        }
+
+        for (int i = 0; i < MAX_CODE_LEN; i++)
+        {
+            limit[i] = 0;
+        }
+
+        int vec = 0;
+        for (int i = minLen; i <= maxLen; i++)
+        {
+            vec += (base[i + 1] - base[i]);
+            limit[i] = vec - 1;
+            vec <<= 1;
+        }
+
+        for (int i = minLen + 1; i <= maxLen; i++)
+        {
+            base[i] = ((limit[i - 1] + 1) << 1) - base[i];
+        }
+    }
+
+    private void initBlock()
+    {
+        final char magic1 = readUnsignedChar();
+        final char magic2 = readUnsignedChar();
+        final char magic3 = readUnsignedChar();
+        final char magic4 = readUnsignedChar();
+        final char magic5 = readUnsignedChar();
+        final char magic6 = readUnsignedChar();
+        if (magic1 == 0x17 && magic2 == 0x72 && magic3 == 0x45 &&
+                magic4 == 0x38 && magic5 == 0x50 && magic6 == 0x90)
+        {
+            complete();
+            return;
+        }
+
+        if (magic1 != 0x31 || magic2 != 0x41 || magic3 != 0x59 ||
+                magic4 != 0x26 || magic5 != 0x53 || magic6 != 0x59)
+        {
+            badBlockHeader();
+            streamEnd = true;
+            return;
+        }
+
+        storedBlockCRC = readInt();
+
+        if (bsR(1) == 1)
+        {
+            m_blockRandomised = true;
+        }
+        else
+        {
+            m_blockRandomised = false;
+        }
+
+        //        currBlockNo++;
+        getAndMoveToFrontDecode();
+
+        crc.initialiseCRC();
+        currentState = START_BLOCK_STATE;
+    }
+
+    private void initialize()
+    {
+        final char magic3 = readUnsignedChar();
+        final char magic4 = readUnsignedChar();
+        if (magic3 != 'h' || magic4 < '1' || magic4 > '9')
+        {
+            bsFinishedWithStream();
+            streamEnd = true;
+            return;
+        }
+
+        setDecompressStructureSizes(magic4 - '0');
+        computedCombinedCRC = 0;
+    }
+
+    private void makeMaps()
+    {
+        nInUse = 0;
+        for (int i = 0; i < 256; i++)
+        {
+            if (inUse[i])
+            {
+                seqToUnseq[nInUse] = (char) i;
+                unseqToSeq[i] = (char) nInUse;
+                nInUse++;
+            }
+        }
+    }
+
+    private void recvDecodingTables()
+    {
+        buildInUseTable();
+        makeMaps();
+        final int alphaSize = nInUse + 2;
+
+        /*
+         * Now the selectors
+         */
+        final int groupCount = bsR(3);
+        final int selectorCount = bsR(15);
+        for (int i = 0; i < selectorCount; i++)
+        {
+            int run = 0;
+            while (bsR(1) == 1)
+            {
+                run++;
+            }
+            selectorMtf[i] = (char) run;
+        }
+
+        /*
+         * Undo the MTF values for the selectors.
+         */
+        final char[] pos = new char[N_GROUPS];
+        for (char v = 0; v < groupCount; v++)
+        {
+            pos[v] = v;
+        }
+
+        for (int i = 0; i < selectorCount; i++)
+        {
+            int v = selectorMtf[i];
+            final char tmp = pos[v];
+            while (v > 0)
+            {
+                pos[v] = pos[v - 1];
+                v--;
+            }
+            pos[0] = tmp;
+            selector[i] = tmp;
+        }
+
+        final char[][] len = new char[N_GROUPS][MAX_ALPHA_SIZE];
+        /*
+         * Now the coding tables
+         */
+        for (int i = 0; i < groupCount; i++)
+        {
+            int curr = bsR(5);
+            for (int j = 0; j < alphaSize; j++)
+            {
+                while (bsR(1) == 1)
+                {
+                    if (bsR(1) == 0)
+                    {
+                        curr++;
+                    }
+                    else
+                    {
+                        curr--;
+                    }
+                }
+                len[i][j] = (char) curr;
+            }
+        }
+
+        /*
+         * Create the Huffman decoding tables
+         */
+        for (int k = 0; k < groupCount; k++)
+        {
+            int minLen = 32;
+            int maxLen = 0;
+            for (int i = 0; i < alphaSize; i++)
+            {
+                if (len[k][i] > maxLen)
+                {
+                    maxLen = len[k][i];
+                }
+                if (len[k][i] < minLen)
+                {
+                    minLen = len[k][i];
+                }
+            }
+            hbCreateDecodeTables(limit[k], base[k], perm[k], len[k], minLen,
+                    maxLen, alphaSize);
+            minLens[k] = minLen;
+        }
+    }
+
+    private void buildInUseTable()
+    {
+        final boolean[] inUse16 = new boolean[16];
+
+        /*
+         * Receive the mapping table
+         */
+        for (int i = 0; i < 16; i++)
+        {
+            if (bsR(1) == 1)
+            {
+                inUse16[i] = true;
+            }
+            else
+            {
+                inUse16[i] = false;
+            }
+        }
+
+        for (int i = 0; i < 256; i++)
+        {
+            inUse[i] = false;
+        }
+
+        for (int i = 0; i < 16; i++)
+        {
+            if (inUse16[i])
+            {
+                for (int j = 0; j < 16; j++)
+                {
+                    if (bsR(1) == 1)
+                    {
+                        inUse[i * 16 + j] = true;
+                    }
+                }
+            }
+        }
+    }
+
+    public void close() throws IOException
+    {
+        bsFinishedWithStream();
+    }
+}

Added: synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CBZip2OutputStream.java
URL: http://svn.apache.org/viewvc/synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CBZip2OutputStream.java?rev=1000332&view=auto
==============================================================================
--- synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CBZip2OutputStream.java (added)
+++ synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CBZip2OutputStream.java Thu Sep 23 06:04:21 2010
@@ -0,0 +1,2037 @@
+/*
+ * Licensed to the Apache Software Foundation (ASF) under one or more
+ * contributor license agreements.  See the NOTICE file distributed with
+ * this work for additional information regarding copyright ownership.
+ * The ASF licenses this file to You under the Apache License, Version 2.0
+ * (the "License"); you may not use this file except in compliance with
+ * the License.  You may obtain a copy of the License at
+ *
+ *      http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+package org.apache.commons.vfs.provider.bzip2;
+
+import java.io.IOException;
+import java.io.OutputStream;
+
+/*
+ * This package is based on the work done by Keiron Liddle, Aftex Software
+ * <ke...@aftexsw.com> to whom the Ant project is very grateful for his
+ * great code.
+ */
+
+/**
+ * An output stream that compresses into the BZip2 format (without the file
+ * header chars) into another stream. TODO: Update to BZip2 1.0.1
+ *
+ * @author <a href="mailto:keiron@aftexsw.com">Keiron Liddle</a>
+ */
+class CBZip2OutputStream
+        extends OutputStream
+        implements BZip2Constants
+{
+    private static final int LOWER_BYTE_MASK = 0x000000ff;
+    private static final int UPPER_BYTE_MASK = 0xffffff00;
+    private static final int SETMASK = (1 << 21);
+    private static final int CLEARMASK = (~SETMASK);
+    private static final int GREATER_ICOST = 15;
+    private static final int LESSER_ICOST = 0;
+    private static final int SMALL_THRESH = 20;
+    private static final int DEPTH_THRESH = 10;
+
+    /*
+     * If you are ever unlucky/improbable enough
+     * to get a stack overflow whilst sorting,
+     * increase the following constant and try
+     * again.  In practice I have never seen the
+     * stack go above 27 elems, so the following
+     * limit seems very generous.
+     */
+    private static final int QSORT_STACK_SIZE = 1000;
+
+    private CRC crc = new CRC();
+
+    private boolean[] inUse = new boolean[256];
+
+    private char[] seqToUnseq = new char[256];
+    private char[] unseqToSeq = new char[256];
+
+    private char[] selector = new char[MAX_SELECTORS];
+    private char[] selectorMtf = new char[MAX_SELECTORS];
+
+    private int[] mtfFreq = new int[MAX_ALPHA_SIZE];
+
+    private int currentChar = -1;
+    private int runLength;
+
+    private boolean closed;
+
+    /*
+     * Knuth's increments seem to work better
+     * than Incerpi-Sedgewick here.  Possibly
+     * because the number of elems to sort is
+     * usually small, typically <= 20.
+     */
+    private int[] incs = new int[]
+            {
+                    1, 4, 13, 40, 121, 364, 1093, 3280,
+                    9841, 29524, 88573, 265720,
+                    797161, 2391484
+            };
+
+    private boolean blockRandomised;
+
+    /*
+     * always: in the range 0 .. 9.
+     * The current block size is 100000 * this number.
+     */
+    private int blockSize100k;
+    private int bsBuff;
+    private int bsLive;
+
+    /*
+     * index of the last char in the block, so
+     * the block size == last + 1.
+     */
+    private int last;
+
+    /*
+     * index in zptr[] of original string after sorting.
+     */
+    private int origPtr;
+
+    private int allowableBlockSize;
+
+    private char[] block;
+
+    private int blockCRC;
+    private int combinedCRC;
+
+    private OutputStream bsStream;
+    private boolean firstAttempt;
+    private int[] ftab;
+    private int nInUse;
+
+    private int nMTF;
+    private int[] quadrant;
+    private short[] szptr;
+    private int workDone;
+
+    /*
+     * Used when sorting.  If too many long comparisons
+     * happen, we stop sorting, randomise the block
+     * slightly, and try again.
+     */
+    private int workFactor;
+    private int workLimit;
+    private int[] zptr;
+
+    CBZip2OutputStream(final OutputStream output)
+            throws IOException
+    {
+        this(output, 9);
+    }
+
+    CBZip2OutputStream(final OutputStream output, final int blockSize)
+            throws IOException
+    {
+        bsSetStream(output);
+        workFactor = 50;
+
+        int outBlockSize = blockSize;
+        if (outBlockSize > 9)
+        {
+            outBlockSize = 9;
+        }
+        if (outBlockSize < 1)
+        {
+            outBlockSize = 1;
+        }
+        blockSize100k = outBlockSize;
+        allocateCompressStructures();
+        initialize();
+        initBlock();
+    }
+
+    private static void hbMakeCodeLengths(char[] len, int[] freq,
+                                          int alphaSize, int maxLen)
+    {
+        /*
+         * Nodes and heap entries run from 1.  Entry 0
+         * for both the heap and nodes is a sentinel.
+         */
+        int nNodes;
+        /*
+         * Nodes and heap entries run from 1.  Entry 0
+         * for both the heap and nodes is a sentinel.
+         */
+        int nHeap;
+        /*
+         * Nodes and heap entries run from 1.  Entry 0
+         * for both the heap and nodes is a sentinel.
+         */
+        int n1;
+        /*
+         * Nodes and heap entries run from 1.  Entry 0
+         * for both the heap and nodes is a sentinel.
+         */
+        int n2;
+        /*
+         * Nodes and heap entries run from 1.  Entry 0
+         * for both the heap and nodes is a sentinel.
+         */
+        int i;
+        /*
+         * Nodes and heap entries run from 1.  Entry 0
+         * for both the heap and nodes is a sentinel.
+         */
+        int j;
+        /*
+         * Nodes and heap entries run from 1.  Entry 0
+         * for both the heap and nodes is a sentinel.
+         */
+        int k;
+        boolean tooLong;
+
+        int[] heap = new int[MAX_ALPHA_SIZE + 2];
+        int[] weights = new int[MAX_ALPHA_SIZE * 2];
+        int[] parent = new int[MAX_ALPHA_SIZE * 2];
+
+        for (i = 0; i < alphaSize; i++)
+        {
+            weights[i + 1] = (freq[i] == 0 ? 1 : freq[i]) << 8;
+        }
+
+        while (true)
+        {
+            nNodes = alphaSize;
+            nHeap = 0;
+
+            heap[0] = 0;
+            weights[0] = 0;
+            parent[0] = -2;
+
+            for (i = 1; i <= alphaSize; i++)
+            {
+                parent[i] = -1;
+                nHeap++;
+                heap[nHeap] = i;
+                {
+                    int zz;
+                    int tmp;
+                    zz = nHeap;
+                    tmp = heap[zz];
+                    while (weights[tmp] < weights[heap[zz >> 1]])
+                    {
+                        heap[zz] = heap[zz >> 1];
+                        zz >>= 1;
+                    }
+                    heap[zz] = tmp;
+                }
+            }
+            if (!(nHeap < (MAX_ALPHA_SIZE + 2)))
+            {
+                panic();
+            }
+
+            while (nHeap > 1)
+            {
+                n1 = heap[1];
+                heap[1] = heap[nHeap];
+                nHeap--;
+                {
+                    int zz = 0;
+                    int yy = 0;
+                    int tmp = 0;
+                    zz = 1;
+                    tmp = heap[zz];
+                    while (true)
+                    {
+                        yy = zz << 1;
+                        if (yy > nHeap)
+                        {
+                            break;
+                        }
+                        if (yy < nHeap &&
+                                weights[heap[yy + 1]] < weights[heap[yy]])
+                        {
+                            yy++;
+                        }
+                        if (weights[tmp] < weights[heap[yy]])
+                        {
+                            break;
+                        }
+                        heap[zz] = heap[yy];
+                        zz = yy;
+                    }
+                    heap[zz] = tmp;
+                }
+                n2 = heap[1];
+                heap[1] = heap[nHeap];
+                nHeap--;
+                {
+                    int zz = 0;
+                    int yy = 0;
+                    int tmp = 0;
+                    zz = 1;
+                    tmp = heap[zz];
+                    while (true)
+                    {
+                        yy = zz << 1;
+                        if (yy > nHeap)
+                        {
+                            break;
+                        }
+                        if (yy < nHeap &&
+                                weights[heap[yy + 1]] < weights[heap[yy]])
+                        {
+                            yy++;
+                        }
+                        if (weights[tmp] < weights[heap[yy]])
+                        {
+                            break;
+                        }
+                        heap[zz] = heap[yy];
+                        zz = yy;
+                    }
+                    heap[zz] = tmp;
+                }
+                nNodes++;
+                parent[n1] = nNodes;
+                parent[n2] = nNodes;
+
+                final int v1 = weights[n1];
+                final int v2 = weights[n2];
+                final int weight = calculateWeight(v1, v2);
+                weights[nNodes] = weight;
+
+                parent[nNodes] = -1;
+                nHeap++;
+                heap[nHeap] = nNodes;
+                {
+                    int zz = 0;
+                    int tmp = 0;
+                    zz = nHeap;
+                    tmp = heap[zz];
+                    while (weights[tmp] < weights[heap[zz >> 1]])
+                    {
+                        heap[zz] = heap[zz >> 1];
+                        zz >>= 1;
+                    }
+                    heap[zz] = tmp;
+                }
+            }
+            if (!(nNodes < (MAX_ALPHA_SIZE * 2)))
+            {
+                panic();
+            }
+
+            tooLong = false;
+            for (i = 1; i <= alphaSize; i++)
+            {
+                j = 0;
+                k = i;
+                while (parent[k] >= 0)
+                {
+                    k = parent[k];
+                    j++;
+                }
+                len[i - 1] = (char) j;
+                if (j > maxLen)
+                {
+                    tooLong = true;
+                }
+            }
+
+            if (!tooLong)
+            {
+                break;
+            }
+
+            for (i = 1; i < alphaSize; i++)
+            {
+                j = weights[i] >> 8;
+                j = 1 + (j / 2);
+                weights[i] = j << 8;
+            }
+        }
+    }
+
+    private static int calculateWeight(final int v1, final int v2)
+    {
+        final int upper = (v1 & UPPER_BYTE_MASK) + (v2 & UPPER_BYTE_MASK);
+        final int v1Lower = (v1 & LOWER_BYTE_MASK);
+        final int v2Lower = (v2 & LOWER_BYTE_MASK);
+        final int nnnn = (v1Lower > v2Lower) ? v1Lower : v2Lower;
+        return upper | (1 + nnnn);
+    }
+
+    private static void panic()
+    {
+        System.out.println("panic");
+        //throw new CError();
+    }
+
+    public void close()
+            throws IOException
+    {
+        if (closed)
+        {
+            return;
+        }
+
+        if (runLength > 0)
+        {
+            writeRun();
+        }
+        currentChar = -1;
+        endBlock();
+        endCompression();
+        closed = true;
+        super.close();
+        bsStream.close();
+    }
+
+    public void finalize()
+            throws Throwable
+    {
+        close();
+    }
+
+    public void flush()
+            throws IOException
+    {
+        super.flush();
+        bsStream.flush();
+    }
+
+    /**
+     * modified by Oliver Merkel, 010128
+     *
+     * @param bv Description of Parameter
+     * @throws java.io.IOException Description of Exception
+     */
+    public void write(int bv)
+            throws IOException
+    {
+        int b = (256 + bv) % 256;
+        if (currentChar != -1)
+        {
+            if (currentChar == b)
+            {
+                runLength++;
+                if (runLength > 254)
+                {
+                    writeRun();
+                    currentChar = -1;
+                    runLength = 0;
+                }
+            }
+            else
+            {
+                writeRun();
+                runLength = 1;
+                currentChar = b;
+            }
+        }
+        else
+        {
+            currentChar = b;
+            runLength++;
+        }
+    }
+
+    private void allocateCompressStructures()
+    {
+        int n = BASE_BLOCK_SIZE * blockSize100k;
+        block = new char[(n + 1 + NUM_OVERSHOOT_BYTES)];
+        quadrant = new int[(n + NUM_OVERSHOOT_BYTES)];
+        zptr = new int[n];
+        ftab = new int[65537];
+
+        if (block == null || quadrant == null || zptr == null
+                || ftab == null)
+        {
+            //int totalDraw = (n + 1 + NUM_OVERSHOOT_BYTES) + (n + NUM_OVERSHOOT_BYTES) + n + 65537;
+            //compressOutOfMemory ( totalDraw, n );
+        }
+
+        /*
+         * The back end needs a place to store the MTF values
+         * whilst it calculates the coding tables.  We could
+         * put them in the zptr array.  However, these values
+         * will fit in a short, so we overlay szptr at the
+         * start of zptr, in the hope of reducing the number
+         * of cache misses induced by the multiple traversals
+         * of the MTF values when calculating coding tables.
+         * Seems to improve compression speed by about 1%.
+         */
+        //    szptr = zptr;
+
+        szptr = new short[2 * n];
+    }
+
+    private void bsFinishedWithStream()
+            throws IOException
+    {
+        while (bsLive > 0)
+        {
+            int ch = (bsBuff >> 24);
+            try
+            {
+                bsStream.write(ch);// write 8-bit
+            }
+            catch (IOException e)
+            {
+                throw e;
+            }
+            bsBuff <<= 8;
+            bsLive -= 8;
+        }
+    }
+
+    private void bsPutIntVS(int numBits, int c)
+            throws IOException
+    {
+        bsW(numBits, c);
+    }
+
+    private void bsPutUChar(int c)
+            throws IOException
+    {
+        bsW(8, c);
+    }
+
+    private void bsPutint(int u)
+            throws IOException
+    {
+        bsW(8, (u >> 24) & 0xff);
+        bsW(8, (u >> 16) & 0xff);
+        bsW(8, (u >> 8) & 0xff);
+        bsW(8, u & 0xff);
+    }
+
+    private void bsSetStream(OutputStream f)
+    {
+        bsStream = f;
+        bsLive = 0;
+        bsBuff = 0;
+    }
+
+    private void bsW(int n, int v)
+            throws IOException
+    {
+        while (bsLive >= 8)
+        {
+            int ch = (bsBuff >> 24);
+            try
+            {
+                bsStream.write(ch);// write 8-bit
+            }
+            catch (IOException e)
+            {
+                throw e;
+            }
+            bsBuff <<= 8;
+            bsLive -= 8;
+        }
+        bsBuff |= (v << (32 - bsLive - n));
+        bsLive += n;
+    }
+
+    private void doReversibleTransformation()
+    {
+        int i;
+
+        workLimit = workFactor * last;
+        workDone = 0;
+        blockRandomised = false;
+        firstAttempt = true;
+
+        mainSort();
+
+        if (workDone > workLimit && firstAttempt)
+        {
+            randomiseBlock();
+            workLimit = 0;
+            workDone = 0;
+            blockRandomised = true;
+            firstAttempt = false;
+            mainSort();
+        }
+
+        origPtr = -1;
+        for (i = 0; i <= last; i++)
+        {
+            if (zptr[i] == 0)
+            {
+                origPtr = i;
+                break;
+            }
+        }
+
+        if (origPtr == -1)
+        {
+            panic();
+        }
+    }
+
+    private void endBlock()
+            throws IOException
+    {
+        blockCRC = crc.getFinalCRC();
+        combinedCRC = (combinedCRC << 1) | (combinedCRC >>> 31);
+        combinedCRC ^= blockCRC;
+
+        /*
+         * sort the block and establish posn of original string
+         */
+        doReversibleTransformation();
+
+        /*
+         * A 6-byte block header, the value chosen arbitrarily
+         * as 0x314159265359 :-).  A 32 bit value does not really
+         * give a strong enough guarantee that the value will not
+         * appear by chance in the compressed datastream.  Worst-case
+         * probability of this event, for a 900k block, is about
+         * 2.0e-3 for 32 bits, 1.0e-5 for 40 bits and 4.0e-8 for 48 bits.
+         * For a compressed file of size 100Gb -- about 100000 blocks --
+         * only a 48-bit marker will do.  NB: normal compression/
+         * decompression do *not* rely on these statistical properties.
+         * They are only important when trying to recover blocks from
+         * damaged files.
+         */
+        bsPutUChar(0x31);
+        bsPutUChar(0x41);
+        bsPutUChar(0x59);
+        bsPutUChar(0x26);
+        bsPutUChar(0x53);
+        bsPutUChar(0x59);
+
+        /*
+         * Now the block's CRC, so it is in a known place.
+         */
+        bsPutint(blockCRC);
+
+        /*
+         * Now a single bit indicating randomisation.
+         */
+        if (blockRandomised)
+        {
+            bsW(1, 1);
+        }
+        else
+        {
+            bsW(1, 0);
+        }
+
+        /*
+         * Finally, block's contents proper.
+         */
+        moveToFrontCodeAndSend();
+    }
+
+    private void endCompression()
+            throws IOException
+    {
+        /*
+         * Now another magic 48-bit number, 0x177245385090, to
+         * indicate the end of the last block.  (sqrt(pi), if
+         * you want to know.  I did want to use e, but it contains
+         * too much repetition -- 27 18 28 18 28 46 -- for me
+         * to feel statistically comfortable.  Call me paranoid.)
+         */
+        bsPutUChar(0x17);
+        bsPutUChar(0x72);
+        bsPutUChar(0x45);
+        bsPutUChar(0x38);
+        bsPutUChar(0x50);
+        bsPutUChar(0x90);
+
+        bsPutint(combinedCRC);
+
+        bsFinishedWithStream();
+    }
+
+    private boolean fullGtU(int i1, int i2)
+    {
+        int k;
+        char c1;
+        char c2;
+        int s1;
+        int s2;
+
+        c1 = block[i1 + 1];
+        c2 = block[i2 + 1];
+        if (c1 != c2)
+        {
+            return (c1 > c2);
+        }
+        i1++;
+        i2++;
+
+        c1 = block[i1 + 1];
+        c2 = block[i2 + 1];
+        if (c1 != c2)
+        {
+            return (c1 > c2);
+        }
+        i1++;
+        i2++;
+
+        c1 = block[i1 + 1];
+        c2 = block[i2 + 1];
+        if (c1 != c2)
+        {
+            return (c1 > c2);
+        }
+        i1++;
+        i2++;
+
+        c1 = block[i1 + 1];
+        c2 = block[i2 + 1];
+        if (c1 != c2)
+        {
+            return (c1 > c2);
+        }
+        i1++;
+        i2++;
+
+        c1 = block[i1 + 1];
+        c2 = block[i2 + 1];
+        if (c1 != c2)
+        {
+            return (c1 > c2);
+        }
+        i1++;
+        i2++;
+
+        c1 = block[i1 + 1];
+        c2 = block[i2 + 1];
+        if (c1 != c2)
+        {
+            return (c1 > c2);
+        }
+        i1++;
+        i2++;
+
+        k = last + 1;
+
+        do
+        {
+            c1 = block[i1 + 1];
+            c2 = block[i2 + 1];
+            if (c1 != c2)
+            {
+                return (c1 > c2);
+            }
+            s1 = quadrant[i1];
+            s2 = quadrant[i2];
+            if (s1 != s2)
+            {
+                return (s1 > s2);
+            }
+            i1++;
+            i2++;
+
+            c1 = block[i1 + 1];
+            c2 = block[i2 + 1];
+            if (c1 != c2)
+            {
+                return (c1 > c2);
+            }
+            s1 = quadrant[i1];
+            s2 = quadrant[i2];
+            if (s1 != s2)
+            {
+                return (s1 > s2);
+            }
+            i1++;
+            i2++;
+
+            c1 = block[i1 + 1];
+            c2 = block[i2 + 1];
+            if (c1 != c2)
+            {
+                return (c1 > c2);
+            }
+            s1 = quadrant[i1];
+            s2 = quadrant[i2];
+            if (s1 != s2)
+            {
+                return (s1 > s2);
+            }
+            i1++;
+            i2++;
+
+            c1 = block[i1 + 1];
+            c2 = block[i2 + 1];
+            if (c1 != c2)
+            {
+                return (c1 > c2);
+            }
+            s1 = quadrant[i1];
+            s2 = quadrant[i2];
+            if (s1 != s2)
+            {
+                return (s1 > s2);
+            }
+            i1++;
+            i2++;
+
+            if (i1 > last)
+            {
+                i1 -= last;
+                i1--;
+            }
+
+            if (i2 > last)
+            {
+                i2 -= last;
+                i2--;
+            }
+
+            k -= 4;
+            workDone++;
+        }
+        while (k >= 0);
+
+        return false;
+    }
+
+    private void generateMTFValues()
+    {
+        char[] yy = new char[256];
+        int i;
+        int j;
+        char tmp;
+        char tmp2;
+        int zPend;
+        int wr;
+        int EOB;
+
+        makeMaps();
+        EOB = nInUse + 1;
+
+        for (i = 0; i <= EOB; i++)
+        {
+            mtfFreq[i] = 0;
+        }
+
+        wr = 0;
+        zPend = 0;
+        for (i = 0; i < nInUse; i++)
+        {
+            yy[i] = (char) i;
+        }
+
+        for (i = 0; i <= last; i++)
+        {
+            char ll_i;
+
+            ll_i = unseqToSeq[block[zptr[i]]];
+
+            j = 0;
+            tmp = yy[j];
+            while (ll_i != tmp)
+            {
+                j++;
+                tmp2 = tmp;
+                tmp = yy[j];
+                yy[j] = tmp2;
+            }
+
+            yy[0] = tmp;
+
+            if (j == 0)
+            {
+                zPend++;
+            }
+            else
+            {
+                if (zPend > 0)
+                {
+                    zPend--;
+                    while (true)
+                    {
+                        switch (zPend % 2)
+                        {
+                            case 0:
+                                szptr[wr] = (short) RUNA;
+                                wr++;
+                                mtfFreq[RUNA]++;
+                                break;
+                            case 1:
+                                szptr[wr] = (short) RUNB;
+                                wr++;
+                                mtfFreq[RUNB]++;
+                                break;
+                        }
+
+                        if (zPend < 2)
+                        {
+                            break;
+                        }
+                        zPend = (zPend - 2) / 2;
+                    }
+
+                    zPend = 0;
+                }
+                szptr[wr] = (short) (j + 1);
+                wr++;
+                mtfFreq[j + 1]++;
+            }
+        }
+
+        if (zPend > 0)
+        {
+            zPend--;
+            while (true)
+            {
+                switch (zPend % 2)
+                {
+                    case 0:
+                        szptr[wr] = (short) RUNA;
+                        wr++;
+                        mtfFreq[RUNA]++;
+                        break;
+                    case 1:
+                        szptr[wr] = (short) RUNB;
+                        wr++;
+                        mtfFreq[RUNB]++;
+                        break;
+                }
+                if (zPend < 2)
+                {
+                    break;
+                }
+                zPend = (zPend - 2) / 2;
+            }
+        }
+
+        szptr[wr] = (short) EOB;
+        wr++;
+        mtfFreq[EOB]++;
+
+        nMTF = wr;
+    }
+
+    private void hbAssignCodes(int[] code, char[] length, int minLen,
+                               int maxLen, int alphaSize)
+    {
+        int n;
+        int vec;
+        int i;
+
+        vec = 0;
+        for (n = minLen; n <= maxLen; n++)
+        {
+            for (i = 0; i < alphaSize; i++)
+            {
+                if (length[i] == n)
+                {
+                    code[i] = vec;
+                    vec++;
+                }
+            }
+
+            vec <<= 1;
+        }
+    }
+
+    private void initBlock()
+    {
+        //        blockNo++;
+        crc.initialiseCRC();
+        last = -1;
+        //        ch = 0;
+
+        for (int i = 0; i < 256; i++)
+        {
+            inUse[i] = false;
+        }
+
+        /*
+         * 20 is just a paranoia constant
+         */
+        allowableBlockSize = BASE_BLOCK_SIZE * blockSize100k - 20;
+    }
+
+    private void initialize()
+            throws IOException
+    {
+        /*
+         * Write `magic' bytes h indicating file-format == huffmanised,
+         * followed by a digit indicating blockSize100k.
+         */
+        bsPutUChar('h');
+        bsPutUChar('0' + blockSize100k);
+
+        combinedCRC = 0;
+    }
+
+    private void mainSort()
+    {
+        int i;
+        int j;
+        int ss;
+        int sb;
+        int[] runningOrder = new int[256];
+        int[] copy = new int[256];
+        boolean[] bigDone = new boolean[256];
+        int c1;
+        int c2;
+
+        /*
+         * In the various block-sized structures, live data runs
+         * from 0 to last+NUM_OVERSHOOT_BYTES inclusive.  First,
+         * set up the overshoot area for block.
+         */
+        //   if (verbosity >= 4) fprintf ( stderr, "        sort initialise ...\n" );
+        for (i = 0; i < NUM_OVERSHOOT_BYTES; i++)
+        {
+            block[last + i + 2] = block[(i % (last + 1)) + 1];
+        }
+        for (i = 0; i <= last + NUM_OVERSHOOT_BYTES; i++)
+        {
+            quadrant[i] = 0;
+        }
+
+        block[0] = block[last + 1];
+
+        if (last < 4000)
+        {
+            /*
+             * Use simpleSort(), since the full sorting mechanism
+             * has quite a large constant overhead.
+             */
+            for (i = 0; i <= last; i++)
+            {
+                zptr[i] = i;
+            }
+            firstAttempt = false;
+            workDone = 0;
+            workLimit = 0;
+            simpleSort(0, last, 0);
+        }
+        else
+        {
+            for (i = 0; i <= 255; i++)
+            {
+                bigDone[i] = false;
+            }
+
+            for (i = 0; i <= 65536; i++)
+            {
+                ftab[i] = 0;
+            }
+
+            c1 = block[0];
+            for (i = 0; i <= last; i++)
+            {
+                c2 = block[i + 1];
+                ftab[(c1 << 8) + c2]++;
+                c1 = c2;
+            }
+
+            for (i = 1; i <= 65536; i++)
+            {
+                ftab[i] += ftab[i - 1];
+            }
+
+            c1 = block[1];
+            for (i = 0; i < last; i++)
+            {
+                c2 = block[i + 2];
+                j = (c1 << 8) + c2;
+                c1 = c2;
+                ftab[j]--;
+                zptr[ftab[j]] = i;
+            }
+
+            j = ((block[last + 1]) << 8) + (block[1]);
+            ftab[j]--;
+            zptr[ftab[j]] = last;
+
+            /*
+             * Now ftab contains the first loc of every small bucket.
+             * Calculate the running order, from smallest to largest
+             * big bucket.
+             */
+            for (i = 0; i <= 255; i++)
+            {
+                runningOrder[i] = i;
+            }
+            {
+                int vv;
+                int h = 1;
+                do
+                {
+                    h = 3 * h + 1;
+                }
+                while (h <= 256);
+                do
+                {
+                    h = h / 3;
+                    for (i = h; i <= 255; i++)
+                    {
+                        vv = runningOrder[i];
+                        j = i;
+                        while ((ftab[((runningOrder[j - h]) + 1) << 8]
+                                - ftab[(runningOrder[j - h]) << 8]) >
+                                (ftab[((vv) + 1) << 8] - ftab[(vv) << 8]))
+                        {
+                            runningOrder[j] = runningOrder[j - h];
+                            j = j - h;
+                            if (j <= (h - 1))
+                            {
+                                break;
+                            }
+                        }
+                        runningOrder[j] = vv;
+                    }
+                }
+                while (h != 1);
+            }
+
+            /*
+             * The main sorting loop.
+             */
+            for (i = 0; i <= 255; i++)
+            {
+
+                /*
+                 * Process big buckets, starting with the least full.
+                 */
+                ss = runningOrder[i];
+
+                /*
+                 * Complete the big bucket [ss] by quicksorting
+                 * any unsorted small buckets [ss, j].  Hopefully
+                 * previous pointer-scanning phases have already
+                 * completed many of the small buckets [ss, j], so
+                 * we don't have to sort them at all.
+                 */
+                for (j = 0; j <= 255; j++)
+                {
+                    sb = (ss << 8) + j;
+                    if (!((ftab[sb] & SETMASK) == SETMASK))
+                    {
+                        int lo = ftab[sb] & CLEARMASK;
+                        int hi = (ftab[sb + 1] & CLEARMASK) - 1;
+                        if (hi > lo)
+                        {
+                            qSort3(lo, hi, 2);
+                            if (workDone > workLimit && firstAttempt)
+                            {
+                                return;
+                            }
+                        }
+                        ftab[sb] |= SETMASK;
+                    }
+                }
+
+                /*
+                 * The ss big bucket is now done.  Record this fact,
+                 * and update the quadrant descriptors.  Remember to
+                 * update quadrants in the overshoot area too, if
+                 * necessary.  The "if (i < 255)" test merely skips
+                 * this updating for the last bucket processed, since
+                 * updating for the last bucket is pointless.
+                 */
+                bigDone[ss] = true;
+
+                if (i < 255)
+                {
+                    int bbStart = ftab[ss << 8] & CLEARMASK;
+                    int bbSize = (ftab[(ss + 1) << 8] & CLEARMASK) - bbStart;
+                    int shifts = 0;
+
+                    while ((bbSize >> shifts) > 65534)
+                    {
+                        shifts++;
+                    }
+
+                    for (j = 0; j < bbSize; j++)
+                    {
+                        int a2update = zptr[bbStart + j];
+                        int qVal = (j >> shifts);
+                        quadrant[a2update] = qVal;
+                        if (a2update < NUM_OVERSHOOT_BYTES)
+                        {
+                            quadrant[a2update + last + 1] = qVal;
+                        }
+                    }
+
+                    if (!(((bbSize - 1) >> shifts) <= 65535))
+                    {
+                        panic();
+                    }
+                }
+
+                /*
+                 * Now scan this big bucket so as to synthesise the
+                 * sorted order for small buckets [t, ss] for all t != ss.
+                 */
+                for (j = 0; j <= 255; j++)
+                {
+                    copy[j] = ftab[(j << 8) + ss] & CLEARMASK;
+                }
+
+                for (j = ftab[ss << 8] & CLEARMASK;
+                     j < (ftab[(ss + 1) << 8] & CLEARMASK); j++)
+                {
+                    c1 = block[zptr[j]];
+                    if (!bigDone[c1])
+                    {
+                        zptr[copy[c1]] = zptr[j] == 0 ? last : zptr[j] - 1;
+                        copy[c1]++;
+                    }
+                }
+
+                for (j = 0; j <= 255; j++)
+                {
+                    ftab[(j << 8) + ss] |= SETMASK;
+                }
+            }
+        }
+    }
+
+    private void makeMaps()
+    {
+        int i;
+        nInUse = 0;
+        for (i = 0; i < 256; i++)
+        {
+            if (inUse[i])
+            {
+                seqToUnseq[nInUse] = (char) i;
+                unseqToSeq[i] = (char) nInUse;
+                nInUse++;
+            }
+        }
+    }
+
+    private char med3(char a, char b, char c)
+    {
+        char t;
+        if (a > b)
+        {
+            t = a;
+            a = b;
+            b = t;
+        }
+        if (b > c)
+        {
+            t = b;
+            b = c;
+            c = t;
+        }
+        if (a > b)
+        {
+            b = a;
+        }
+        return b;
+    }
+
+    private void moveToFrontCodeAndSend()
+            throws IOException
+    {
+        bsPutIntVS(24, origPtr);
+        generateMTFValues();
+        sendMTFValues();
+    }
+
+    private void qSort3(int loSt, int hiSt, int dSt)
+    {
+        int unLo;
+        int unHi;
+        int ltLo;
+        int gtHi;
+        int med;
+        int n;
+        int m;
+        int sp;
+        int lo;
+        int hi;
+        int d;
+        StackElem[] stack = new StackElem[QSORT_STACK_SIZE];
+        for (int count = 0; count < QSORT_STACK_SIZE; count++)
+        {
+            stack[count] = new StackElem();
+        }
+
+        sp = 0;
+
+        stack[sp].m_ll = loSt;
+        stack[sp].m_hh = hiSt;
+        stack[sp].m_dd = dSt;
+        sp++;
+
+        while (sp > 0)
+        {
+            if (sp >= QSORT_STACK_SIZE)
+            {
+                panic();
+            }
+
+            sp--;
+            lo = stack[sp].m_ll;
+            hi = stack[sp].m_hh;
+            d = stack[sp].m_dd;
+
+            if (hi - lo < SMALL_THRESH || d > DEPTH_THRESH)
+            {
+                simpleSort(lo, hi, d);
+                if (workDone > workLimit && firstAttempt)
+                {
+                    return;
+                }
+                continue;
+            }
+
+            med = med3(block[zptr[lo] + d + 1],
+                    block[zptr[hi] + d + 1],
+                    block[zptr[(lo + hi) >> 1] + d + 1]);
+
+            unLo = lo;
+            ltLo = lo;
+            unHi = hi;
+            gtHi = hi;
+
+            while (true)
+            {
+                while (true)
+                {
+                    if (unLo > unHi)
+                    {
+                        break;
+                    }
+                    n = block[zptr[unLo] + d + 1] - med;
+                    if (n == 0)
+                    {
+                        int temp = 0;
+                        temp = zptr[unLo];
+                        zptr[unLo] = zptr[ltLo];
+                        zptr[ltLo] = temp;
+                        ltLo++;
+                        unLo++;
+                        continue;
+                    }
+
+                    if (n > 0)
+                    {
+                        break;
+                    }
+                    unLo++;
+                }
+                while (true)
+                {
+                    if (unLo > unHi)
+                    {
+                        break;
+                    }
+                    n = block[zptr[unHi] + d + 1] - med;
+                    if (n == 0)
+                    {
+                        int temp = 0;
+                        temp = zptr[unHi];
+                        zptr[unHi] = zptr[gtHi];
+                        zptr[gtHi] = temp;
+                        gtHi--;
+                        unHi--;
+                        continue;
+                    }
+
+                    if (n < 0)
+                    {
+                        break;
+                    }
+                    unHi--;
+                }
+                if (unLo > unHi)
+                {
+                    break;
+                }
+                int temp = 0;
+                temp = zptr[unLo];
+                zptr[unLo] = zptr[unHi];
+                zptr[unHi] = temp;
+                unLo++;
+                unHi--;
+            }
+
+            if (gtHi < ltLo)
+            {
+                stack[sp].m_ll = lo;
+                stack[sp].m_hh = hi;
+                stack[sp].m_dd = d + 1;
+                sp++;
+                continue;
+            }
+
+            n = ((ltLo - lo) < (unLo - ltLo)) ? (ltLo - lo) : (unLo - ltLo);
+            vswap(lo, unLo - n, n);
+            m = ((hi - gtHi) < (gtHi - unHi)) ? (hi - gtHi) : (gtHi - unHi);
+            vswap(unLo, hi - m + 1, m);
+
+            n = lo + unLo - ltLo - 1;
+            m = hi - (gtHi - unHi) + 1;
+
+            stack[sp].m_ll = lo;
+            stack[sp].m_hh = n;
+            stack[sp].m_dd = d;
+            sp++;
+
+            stack[sp].m_ll = n + 1;
+            stack[sp].m_hh = m - 1;
+            stack[sp].m_dd = d + 1;
+            sp++;
+
+            stack[sp].m_ll = m;
+            stack[sp].m_hh = hi;
+            stack[sp].m_dd = d;
+            sp++;
+        }
+    }
+
+    private void randomiseBlock()
+    {
+        int i;
+        int rNToGo = 0;
+        int rTPos = 0;
+        for (i = 0; i < 256; i++)
+        {
+            inUse[i] = false;
+        }
+
+        for (i = 0; i <= last; i++)
+        {
+            if (rNToGo == 0)
+            {
+                rNToGo = (char) RAND_NUMS[rTPos];
+                rTPos++;
+                if (rTPos == 512)
+                {
+                    rTPos = 0;
+                }
+            }
+            rNToGo--;
+            block[i + 1] ^= ((rNToGo == 1) ? 1 : 0);
+            // handle 16 bit signed numbers
+            block[i + 1] &= 0xFF;
+
+            inUse[block[i + 1]] = true;
+        }
+    }
+
+    private void sendMTFValues()
+            throws IOException
+    {
+        char[][] len = new char[N_GROUPS][MAX_ALPHA_SIZE];
+
+        int v;
+
+        int t;
+
+        int i;
+
+        int j;
+
+        int gs;
+
+        int ge;
+
+        int bt;
+
+        int bc;
+
+        int iter;
+        int nSelectors = 0;
+        int alphaSize;
+        int minLen;
+        int maxLen;
+        int selCtr;
+        int nGroups;
+
+        alphaSize = nInUse + 2;
+        for (t = 0; t < N_GROUPS; t++)
+        {
+            for (v = 0; v < alphaSize; v++)
+            {
+                len[t][v] = (char) GREATER_ICOST;
+            }
+        }
+
+        /*
+         * Decide how many coding tables to use
+         */
+        if (nMTF <= 0)
+        {
+            panic();
+        }
+
+        if (nMTF < 200)
+        {
+            nGroups = 2;
+        }
+        else if (nMTF < 600)
+        {
+            nGroups = 3;
+        }
+        else if (nMTF < 1200)
+        {
+            nGroups = 4;
+        }
+        else if (nMTF < 2400)
+        {
+            nGroups = 5;
+        }
+        else
+        {
+            nGroups = 6;
+        }
+        {
+            /*
+             * Generate an initial set of coding tables
+             */
+            int nPart;
+            int remF;
+            int tFreq;
+            int aFreq;
+
+            nPart = nGroups;
+            remF = nMTF;
+            gs = 0;
+            while (nPart > 0)
+            {
+                tFreq = remF / nPart;
+                ge = gs - 1;
+                aFreq = 0;
+                while (aFreq < tFreq && ge < alphaSize - 1)
+                {
+                    ge++;
+                    aFreq += mtfFreq[ge];
+                }
+
+                if (ge > gs && nPart != nGroups && nPart != 1
+                        && ((nGroups - nPart) % 2 == 1))
+                {
+                    aFreq -= mtfFreq[ge];
+                    ge--;
+                }
+
+                for (v = 0; v < alphaSize; v++)
+                {
+                    if (v >= gs && v <= ge)
+                    {
+                        len[nPart - 1][v] = (char) LESSER_ICOST;
+                    }
+                    else
+                    {
+                        len[nPart - 1][v] = (char) GREATER_ICOST;
+                    }
+                }
+
+                nPart--;
+                gs = ge + 1;
+                remF -= aFreq;
+            }
+        }
+
+        int[][] rfreq = new int[N_GROUPS][MAX_ALPHA_SIZE];
+        int[] fave = new int[N_GROUPS];
+        short[] cost = new short[N_GROUPS];
+        /*
+         * Iterate up to N_ITERS times to improve the tables.
+         */
+        for (iter = 0; iter < N_ITERS; iter++)
+        {
+            for (t = 0; t < nGroups; t++)
+            {
+                fave[t] = 0;
+            }
+
+            for (t = 0; t < nGroups; t++)
+            {
+                for (v = 0; v < alphaSize; v++)
+                {
+                    rfreq[t][v] = 0;
+                }
+            }
+
+            nSelectors = 0;
+            gs = 0;
+            while (true)
+            {
+
+                /*
+                 * Set group start & end marks.
+                 */
+                if (gs >= nMTF)
+                {
+                    break;
+                }
+                ge = gs + G_SIZE - 1;
+                if (ge >= nMTF)
+                {
+                    ge = nMTF - 1;
+                }
+
+                /*
+                 * Calculate the cost of this group as coded
+                 * by each of the coding tables.
+                 */
+                for (t = 0; t < nGroups; t++)
+                {
+                    cost[t] = 0;
+                }
+
+                if (nGroups == 6)
+                {
+                    short cost0 = 0;
+                    short cost1 = 0;
+                    short cost2 = 0;
+                    short cost3 = 0;
+                    short cost4 = 0;
+                    short cost5 = 0;
+
+                    for (i = gs; i <= ge; i++)
+                    {
+                        short icv = szptr[i];
+                        cost0 += len[0][icv];
+                        cost1 += len[1][icv];
+                        cost2 += len[2][icv];
+                        cost3 += len[3][icv];
+                        cost4 += len[4][icv];
+                        cost5 += len[5][icv];
+                    }
+                    cost[0] = cost0;
+                    cost[1] = cost1;
+                    cost[2] = cost2;
+                    cost[3] = cost3;
+                    cost[4] = cost4;
+                    cost[5] = cost5;
+                }
+                else
+                {
+                    for (i = gs; i <= ge; i++)
+                    {
+                        short icv = szptr[i];
+                        for (t = 0; t < nGroups; t++)
+                        {
+                            cost[t] += len[t][icv];
+                        }
+                    }
+                }
+
+                /*
+                 * Find the coding table which is best for this group,
+                 * and record its identity in the selector table.
+                 */
+                bc = 999999999;
+                bt = -1;
+                for (t = 0; t < nGroups; t++)
+                {
+                    if (cost[t] < bc)
+                    {
+                        bc = cost[t];
+                        bt = t;
+                    }
+                }
+
+                fave[bt]++;
+                selector[nSelectors] = (char) bt;
+                nSelectors++;
+
+                /*
+                 * Increment the symbol frequencies for the selected table.
+                 */
+                for (i = gs; i <= ge; i++)
+                {
+                    rfreq[bt][szptr[i]]++;
+                }
+
+                gs = ge + 1;
+            }
+
+            /*
+             * Recompute the tables based on the accumulated frequencies.
+             */
+            for (t = 0; t < nGroups; t++)
+            {
+                hbMakeCodeLengths(len[t], rfreq[t], alphaSize, 20);
+            }
+        }
+
+        rfreq = null;
+        fave = null;
+        cost = null;
+
+        if (!(nGroups < 8))
+        {
+            panic();
+        }
+        if (!(nSelectors < 32768 && nSelectors <= (2 + (900000 / G_SIZE))))
+        {
+            panic();
+        }
+        {
+            /*
+             * Compute MTF values for the selectors.
+             */
+            char[] pos = new char[N_GROUPS];
+            char ll_i;
+            char tmp2;
+            char tmp;
+            for (i = 0; i < nGroups; i++)
+            {
+                pos[i] = (char) i;
+            }
+            for (i = 0; i < nSelectors; i++)
+            {
+                ll_i = selector[i];
+                j = 0;
+                tmp = pos[j];
+                while (ll_i != tmp)
+                {
+                    j++;
+                    tmp2 = tmp;
+                    tmp = pos[j];
+                    pos[j] = tmp2;
+                }
+                pos[0] = tmp;
+                selectorMtf[i] = (char) j;
+            }
+        }
+
+        int[][] code = new int[N_GROUPS][MAX_ALPHA_SIZE];
+
+        /*
+         * Assign actual codes for the tables.
+         */
+        for (t = 0; t < nGroups; t++)
+        {
+            minLen = 32;
+            maxLen = 0;
+            for (i = 0; i < alphaSize; i++)
+            {
+                if (len[t][i] > maxLen)
+                {
+                    maxLen = len[t][i];
+                }
+                if (len[t][i] < minLen)
+                {
+                    minLen = len[t][i];
+                }
+            }
+            if (maxLen > 20)
+            {
+                panic();
+            }
+            if (minLen < 1)
+            {
+                panic();
+            }
+            hbAssignCodes(code[t], len[t], minLen, maxLen, alphaSize);
+        }
+        {
+            /*
+             * Transmit the mapping table.
+             */
+            boolean[] inUse16 = new boolean[16];
+            for (i = 0; i < 16; i++)
+            {
+                inUse16[i] = false;
+                for (j = 0; j < 16; j++)
+                {
+                    if (inUse[i * 16 + j])
+                    {
+                        inUse16[i] = true;
+                    }
+                }
+            }
+
+            for (i = 0; i < 16; i++)
+            {
+                if (inUse16[i])
+                {
+                    bsW(1, 1);
+                }
+                else
+                {
+                    bsW(1, 0);
+                }
+            }
+
+            for (i = 0; i < 16; i++)
+            {
+                if (inUse16[i])
+                {
+                    for (j = 0; j < 16; j++)
+                    {
+                        if (inUse[i * 16 + j])
+                        {
+                            bsW(1, 1);
+                        }
+                        else
+                        {
+                            bsW(1, 0);
+                        }
+                    }
+                }
+            }
+
+        }
+
+        /*
+         * Now the selectors.
+         */
+        bsW(3, nGroups);
+        bsW(15, nSelectors);
+        for (i = 0; i < nSelectors; i++)
+        {
+            for (j = 0; j < selectorMtf[i]; j++)
+            {
+                bsW(1, 1);
+            }
+            bsW(1, 0);
+        }
+
+        for (t = 0; t < nGroups; t++)
+        {
+            int curr = len[t][0];
+            bsW(5, curr);
+            for (i = 0; i < alphaSize; i++)
+            {
+                while (curr < len[t][i])
+                {
+                    bsW(2, 2);
+                    curr++;
+                    /*
+                     * 10
+                     */
+                }
+                while (curr > len[t][i])
+                {
+                    bsW(2, 3);
+                    curr--;
+                    /*
+                     * 11
+                     */
+                }
+                bsW(1, 0);
+            }
+        }
+
+        /*
+         * And finally, the block data proper
+         */
+        selCtr = 0;
+        gs = 0;
+        while (true)
+        {
+            if (gs >= nMTF)
+            {
+                break;
+            }
+            ge = gs + G_SIZE - 1;
+            if (ge >= nMTF)
+            {
+                ge = nMTF - 1;
+            }
+            for (i = gs; i <= ge; i++)
+            {
+                bsW(len[selector[selCtr]][szptr[i]],
+                        code[selector[selCtr]][szptr[i]]);
+            }
+
+            gs = ge + 1;
+            selCtr++;
+        }
+        if (!(selCtr == nSelectors))
+        {
+            panic();
+        }
+    }
+
+    private void simpleSort(int lo, int hi, int d)
+    {
+        int i;
+        int j;
+        int h;
+        int bigN;
+        int hp;
+        int v;
+
+        bigN = hi - lo + 1;
+        if (bigN < 2)
+        {
+            return;
+        }
+
+        hp = 0;
+        while (incs[hp] < bigN)
+        {
+            hp++;
+        }
+        hp--;
+
+        for (; hp >= 0; hp--)
+        {
+            h = incs[hp];
+
+            i = lo + h;
+            while (true)
+            {
+                /*
+                 * copy 1
+                 */
+                if (i > hi)
+                {
+                    break;
+                }
+                v = zptr[i];
+                j = i;
+                while (fullGtU(zptr[j - h] + d, v + d))
+                {
+                    zptr[j] = zptr[j - h];
+                    j = j - h;
+                    if (j <= (lo + h - 1))
+                    {
+                        break;
+                    }
+                }
+                zptr[j] = v;
+                i++;
+
+                /*
+                 * copy 2
+                 */
+                if (i > hi)
+                {
+                    break;
+                }
+                v = zptr[i];
+                j = i;
+                while (fullGtU(zptr[j - h] + d, v + d))
+                {
+                    zptr[j] = zptr[j - h];
+                    j = j - h;
+                    if (j <= (lo + h - 1))
+                    {
+                        break;
+                    }
+                }
+                zptr[j] = v;
+                i++;
+
+                /*
+                 * copy 3
+                 */
+                if (i > hi)
+                {
+                    break;
+                }
+                v = zptr[i];
+                j = i;
+                while (fullGtU(zptr[j - h] + d, v + d))
+                {
+                    zptr[j] = zptr[j - h];
+                    j = j - h;
+                    if (j <= (lo + h - 1))
+                    {
+                        break;
+                    }
+                }
+                zptr[j] = v;
+                i++;
+
+                if (workDone > workLimit && firstAttempt)
+                {
+                    return;
+                }
+            }
+        }
+    }
+
+    private void vswap(int p1, int p2, int n)
+    {
+        int temp = 0;
+        while (n > 0)
+        {
+            temp = zptr[p1];
+            zptr[p1] = zptr[p2];
+            zptr[p2] = temp;
+            p1++;
+            p2++;
+            n--;
+        }
+    }
+
+    private void writeRun()
+            throws IOException
+    {
+        if (last < allowableBlockSize)
+        {
+            inUse[currentChar] = true;
+            for (int i = 0; i < runLength; i++)
+            {
+                crc.updateCRC((char) currentChar);
+            }
+            switch (runLength)
+            {
+                case 1:
+                    last++;
+                    block[last + 1] = (char) currentChar;
+                    break;
+                case 2:
+                    last++;
+                    block[last + 1] = (char) currentChar;
+                    last++;
+                    block[last + 1] = (char) currentChar;
+                    break;
+                case 3:
+                    last++;
+                    block[last + 1] = (char) currentChar;
+                    last++;
+                    block[last + 1] = (char) currentChar;
+                    last++;
+                    block[last + 1] = (char) currentChar;
+                    break;
+                default:
+                    inUse[runLength - 4] = true;
+                    last++;
+                    block[last + 1] = (char) currentChar;
+                    last++;
+                    block[last + 1] = (char) currentChar;
+                    last++;
+                    block[last + 1] = (char) currentChar;
+                    last++;
+                    block[last + 1] = (char) currentChar;
+                    last++;
+                    block[last + 1] = (char) (runLength - 4);
+                    break;
+            }
+        }
+        else
+        {
+            endBlock();
+            initBlock();
+            writeRun();
+        }
+    }
+
+    private static class StackElem
+    {
+        int m_dd;
+        int m_hh;
+        int m_ll;
+    }
+}
+

Added: synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CRC.java
URL: http://svn.apache.org/viewvc/synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CRC.java?rev=1000332&view=auto
==============================================================================
--- synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CRC.java (added)
+++ synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/CRC.java Thu Sep 23 06:04:21 2010
@@ -0,0 +1,128 @@
+/*
+ * Licensed to the Apache Software Foundation (ASF) under one or more
+ * contributor license agreements.  See the NOTICE file distributed with
+ * this work for additional information regarding copyright ownership.
+ * The ASF licenses this file to You under the Apache License, Version 2.0
+ * (the "License"); you may not use this file except in compliance with
+ * the License.  You may obtain a copy of the License at
+ *
+ *      http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+package org.apache.commons.vfs.provider.bzip2;
+
+/*
+ * This package is based on the work done by Keiron Liddle, Aftex Software
+ * <ke...@aftexsw.com> to whom the Ant project is very grateful for his
+ * great code.
+ */
+
+/**
+ * A simple class the hold and calculate the CRC for sanity checking of the
+ * data.
+ *
+ * @author <a href="mailto:keiron@aftexsw.com">Keiron Liddle</a>
+ */
+class CRC
+{
+    private static int[] CRC32_TABLE = new int[]
+    {
+        0x00000000, 0x04c11db7, 0x09823b6e, 0x0d4326d9,
+        0x130476dc, 0x17c56b6b, 0x1a864db2, 0x1e475005,
+        0x2608edb8, 0x22c9f00f, 0x2f8ad6d6, 0x2b4bcb61,
+        0x350c9b64, 0x31cd86d3, 0x3c8ea00a, 0x384fbdbd,
+        0x4c11db70, 0x48d0c6c7, 0x4593e01e, 0x4152fda9,
+        0x5f15adac, 0x5bd4b01b, 0x569796c2, 0x52568b75,
+        0x6a1936c8, 0x6ed82b7f, 0x639b0da6, 0x675a1011,
+        0x791d4014, 0x7ddc5da3, 0x709f7b7a, 0x745e66cd,
+        0x9823b6e0, 0x9ce2ab57, 0x91a18d8e, 0x95609039,
+        0x8b27c03c, 0x8fe6dd8b, 0x82a5fb52, 0x8664e6e5,
+        0xbe2b5b58, 0xbaea46ef, 0xb7a96036, 0xb3687d81,
+        0xad2f2d84, 0xa9ee3033, 0xa4ad16ea, 0xa06c0b5d,
+        0xd4326d90, 0xd0f37027, 0xddb056fe, 0xd9714b49,
+        0xc7361b4c, 0xc3f706fb, 0xceb42022, 0xca753d95,
+        0xf23a8028, 0xf6fb9d9f, 0xfbb8bb46, 0xff79a6f1,
+        0xe13ef6f4, 0xe5ffeb43, 0xe8bccd9a, 0xec7dd02d,
+        0x34867077, 0x30476dc0, 0x3d044b19, 0x39c556ae,
+        0x278206ab, 0x23431b1c, 0x2e003dc5, 0x2ac12072,
+        0x128e9dcf, 0x164f8078, 0x1b0ca6a1, 0x1fcdbb16,
+        0x018aeb13, 0x054bf6a4, 0x0808d07d, 0x0cc9cdca,
+        0x7897ab07, 0x7c56b6b0, 0x71159069, 0x75d48dde,
+        0x6b93dddb, 0x6f52c06c, 0x6211e6b5, 0x66d0fb02,
+        0x5e9f46bf, 0x5a5e5b08, 0x571d7dd1, 0x53dc6066,
+        0x4d9b3063, 0x495a2dd4, 0x44190b0d, 0x40d816ba,
+        0xaca5c697, 0xa864db20, 0xa527fdf9, 0xa1e6e04e,
+        0xbfa1b04b, 0xbb60adfc, 0xb6238b25, 0xb2e29692,
+        0x8aad2b2f, 0x8e6c3698, 0x832f1041, 0x87ee0df6,
+        0x99a95df3, 0x9d684044, 0x902b669d, 0x94ea7b2a,
+        0xe0b41de7, 0xe4750050, 0xe9362689, 0xedf73b3e,
+        0xf3b06b3b, 0xf771768c, 0xfa325055, 0xfef34de2,
+        0xc6bcf05f, 0xc27dede8, 0xcf3ecb31, 0xcbffd686,
+        0xd5b88683, 0xd1799b34, 0xdc3abded, 0xd8fba05a,
+        0x690ce0ee, 0x6dcdfd59, 0x608edb80, 0x644fc637,
+        0x7a089632, 0x7ec98b85, 0x738aad5c, 0x774bb0eb,
+        0x4f040d56, 0x4bc510e1, 0x46863638, 0x42472b8f,
+        0x5c007b8a, 0x58c1663d, 0x558240e4, 0x51435d53,
+        0x251d3b9e, 0x21dc2629, 0x2c9f00f0, 0x285e1d47,
+        0x36194d42, 0x32d850f5, 0x3f9b762c, 0x3b5a6b9b,
+        0x0315d626, 0x07d4cb91, 0x0a97ed48, 0x0e56f0ff,
+        0x1011a0fa, 0x14d0bd4d, 0x19939b94, 0x1d528623,
+        0xf12f560e, 0xf5ee4bb9, 0xf8ad6d60, 0xfc6c70d7,
+        0xe22b20d2, 0xe6ea3d65, 0xeba91bbc, 0xef68060b,
+        0xd727bbb6, 0xd3e6a601, 0xdea580d8, 0xda649d6f,
+        0xc423cd6a, 0xc0e2d0dd, 0xcda1f604, 0xc960ebb3,
+        0xbd3e8d7e, 0xb9ff90c9, 0xb4bcb610, 0xb07daba7,
+        0xae3afba2, 0xaafbe615, 0xa7b8c0cc, 0xa379dd7b,
+        0x9b3660c6, 0x9ff77d71, 0x92b45ba8, 0x9675461f,
+        0x8832161a, 0x8cf30bad, 0x81b02d74, 0x857130c3,
+        0x5d8a9099, 0x594b8d2e, 0x5408abf7, 0x50c9b640,
+        0x4e8ee645, 0x4a4ffbf2, 0x470cdd2b, 0x43cdc09c,
+        0x7b827d21, 0x7f436096, 0x7200464f, 0x76c15bf8,
+        0x68860bfd, 0x6c47164a, 0x61043093, 0x65c52d24,
+        0x119b4be9, 0x155a565e, 0x18197087, 0x1cd86d30,
+        0x029f3d35, 0x065e2082, 0x0b1d065b, 0x0fdc1bec,
+        0x3793a651, 0x3352bbe6, 0x3e119d3f, 0x3ad08088,
+        0x2497d08d, 0x2056cd3a, 0x2d15ebe3, 0x29d4f654,
+        0xc5a92679, 0xc1683bce, 0xcc2b1d17, 0xc8ea00a0,
+        0xd6ad50a5, 0xd26c4d12, 0xdf2f6bcb, 0xdbee767c,
+        0xe3a1cbc1, 0xe760d676, 0xea23f0af, 0xeee2ed18,
+        0xf0a5bd1d, 0xf464a0aa, 0xf9278673, 0xfde69bc4,
+        0x89b8fd09, 0x8d79e0be, 0x803ac667, 0x84fbdbd0,
+        0x9abc8bd5, 0x9e7d9662, 0x933eb0bb, 0x97ffad0c,
+        0xafb010b1, 0xab710d06, 0xa6322bdf, 0xa2f33668,
+        0xbcb4666d, 0xb8757bda, 0xb5365d03, 0xb1f740b4
+    };
+
+    private int m_globalCrc;
+
+    protected CRC()
+    {
+        initialiseCRC();
+    }
+
+    int getFinalCRC()
+    {
+        return ~m_globalCrc;
+    }
+
+    void initialiseCRC()
+    {
+        m_globalCrc = 0xffffffff;
+    }
+
+    void updateCRC(final int inCh)
+    {
+        int temp = (m_globalCrc >> 24) ^ inCh;
+        if (temp < 0)
+        {
+            temp = 256 + temp;
+        }
+        m_globalCrc = (m_globalCrc << 8) ^ CRC32_TABLE[temp];
+    }
+}
+

Added: synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/package.html
URL: http://svn.apache.org/viewvc/synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/package.html?rev=1000332&view=auto
==============================================================================
--- synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/package.html (added)
+++ synapse/branches/commons-vfs-2-synapse-2.0/core/src/main/java/org/apache/commons/vfs/provider/bzip2/package.html Thu Sep 23 06:04:21 2010
@@ -0,0 +1,19 @@
+<!--
+    Licensed to the Apache Software Foundation (ASF) under one or more
+    contributor license agreements.  See the NOTICE file distributed with
+    this work for additional information regarding copyright ownership.
+    The ASF licenses this file to You under the Apache License, Version 2.0
+    (the "License"); you may not use this file except in compliance with
+    the License.  You may obtain a copy of the License at
+
+         http://www.apache.org/licenses/LICENSE-2.0
+
+    Unless required by applicable law or agreed to in writing, software
+    distributed under the License is distributed on an "AS IS" BASIS,
+    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+    See the License for the specific language governing permissions and
+    limitations under the License.
+-->
+<body>
+<p>The BZIP2 File Provider</p>
+</body>
\ No newline at end of file