(PureBasic) Untar a .tar.bz2 Compressed Archive

Untar a .tar.bz2 compressed archive.

Chilkat PureBasic Module Download Chilkat PureBasic Module

IncludeFile "CkTar.pb"

Procedure ChilkatExample()

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

    ; Untar a .tar archive.
    tar.i = CkTar::ckCreate()
    If tar.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    ; Untar into c:/temp/untarDir.  The directory tree(s) contained
    ; within the TAR archive will be re-created rooted at this
    ; directory.
    CkTar::setCkUntarFromDir(tar, "/Users/chilkat/temp/untarDir")

    ; If any filepaths within the Tar archive are absolute,
    ; automatically make them relative by removing the first
    ; forward or backward slash.  This protects from untarring
    ; files to unexpected locations.
    CkTar::setCkNoAbsolutePaths(tar, 1)

    success.i = CkTar::ckUntarBz2(tar,"/Users/chilkat/testData/tar/abc123.tar.bz2")
    If success <> 1
        Debug CkTar::ckLastErrorText(tar)
    Else
        Debug "Success"
    EndIf



    CkTar::ckDispose(tar)


    ProcedureReturn
EndProcedure