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

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

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL loGzip
LOCAL lnBNoAbsolute
LOCAL lcUntarToDirectory
LOCAL lnSuccess

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

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Gzip')
loGzip = CreateObject('Chilkat.Gzip')

* Ungzip and untar.
lnBNoAbsolute = 1

lcUntarToDirectory = "/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"
lnSuccess = loGzip.UnTarGz("test.tar.gz",lcUntarToDirectory,lnBNoAbsolute)
IF (lnSuccess <> 1) THEN
    ? loGzip.LastErrorText
    RELEASE loGzip
    CANCEL
ENDIF

RELEASE loGzip