Go

Compress Large Binary File in Blocks

See more Compression Examples

Compresses a large binary file in blocks. Go

    success := false

    // This example assumes the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    facSrc := chilkat.NewFileAccess()
    facDest := chilkat.NewFileAccess()

    // Open a large binary file for reading.
    success = facSrc.OpenForRead("qa_data/bmp/big.bmp")
    if success == false {
        fmt.Println(facSrc.LastErrorText())
        facSrc.DisposeFileAccess()
        facDest.DisposeFileAccess()
        return
    }

    // If we compress in 64K chunks, find out how many blocks there will be.
    blockSize := 65536
    numBlocks := facSrc.GetNumBlocks(blockSize)

    // Open an output file for the compressed data.
    success = facDest.OpenForWrite("c:/temp/qa_output/compressedBmp.dat")
    if success == false {
        fmt.Println(facDest.LastErrorText())
        facSrc.DisposeFileAccess()
        facDest.DisposeFileAccess()
        return
    }

    compress := chilkat.NewCompression()
    compress.SetAlgorithm("deflate")

    var fileBytes []byte
    var compressedBytes []byte

    // Assuming numBlocks > 1
    compress.SetFirstChunk(true)
    compress.SetLastChunk(false)

    i := 0
    for i < numBlocks {
        fileBytes = facSrc.ReadBlock(i,blockSize)
        compressedBytes = compress.CompressBytes(fileBytes)

        facDest.FileWrite(compressedBytes)

        i = i + 1

        compress.SetFirstChunk(false)
        if i == (numBlocks - 1) {
            compress.SetLastChunk(true)
        }

    }

    facSrc.FileClose()
    facDest.FileClose()

    fmt.Println("Finished compressing file.")

    facSrc.DisposeFileAccess()
    facDest.DisposeFileAccess()
    compress.DisposeCompression()