Xbase++

GZip Tar Extract (.tgz or .tar.gz)

See more Gzip Examples

Demonstrates how to extract the contents of a GZip compressed Tar archive (.tgz or .tar.gz). Xbase++

LOCAL nSuccess
LOCAL oGzip
LOCAL nBNoAbsolute
LOCAL cUntarToDirectory

nSuccess := 0

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

oGzip := CreateObject("Chilkat.Gzip")

//  Ungzip and untar.
nBNoAbsolute := 1

cUntarToDirectory := "/temp/test"
//  bNoAbsolute tells the component to convert all absolute paths
//  found in the .tar to relative paths.   For example, if the .tar
//  contains a file with an absolute path such as
//  "/usr/bin/something.exe" it will
//  be extracted to "/temp/test/usr/bin/something.exe";
nSuccess := oGzip:UnTarGz("test.tar.gz", cUntarToDirectory, nBNoAbsolute)
IF (nSuccess != 1)
    ? oGzip:LastErrorText
    oGzip:destroy()
    RETURN
ENDIF

oGzip:destroy()