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

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

Chilkat Tcl Extension Downloads Chilkat Tcl Extension Downloads

load ./chilkat.dll

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

set gzip [new_CkGzip]

# Ungzip and untar.
set bNoAbsolute 1

set untarToDirectory "/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"
set success [CkGzip_UnTarGz $gzip "test.tar.gz" $untarToDirectory $bNoAbsolute]
if {$success != 1} then {
    puts [CkGzip_lastErrorText $gzip]
    delete_CkGzip $gzip
    exit
}


delete_CkGzip $gzip