(PureBasic) SFTP HardLink - Create a Hard Link using the hardlink@openssh.com Extension

Demonstrates how to create a hard link on the SFTP server using the hardlink@openssh.com extension. Note: This only works on servers supporting the hardlink@openssh.com extension.

Note: This example requires Chilkat v9.5.0.71 or greater.

Chilkat PureBasic Module Download Chilkat PureBasic Module

IncludeFile "CkSFtp.pb"

Procedure ChilkatExample()

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

    sftp.i = CkSFtp::ckCreate()
    If sftp.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    ; Pass a domain or IP address..
    success.i = CkSFtp::ckConnect(sftp,"my-sftp-server.com",22)
    If success = 1
        success = CkSFtp::ckAuthenticatePw(sftp,"mySFtpLogin","mySFtpPassword")
    EndIf

    If success = 1
        success = CkSFtp::ckInitializeSftp(sftp)
    EndIf

    If success <> 1
        Debug CkSFtp::ckLastErrorText(sftp)
        CkSFtp::ckDispose(sftp)
        ProcedureReturn
    EndIf

    ; Create a hard link on the server.
    ; We'll create the hard link named "somefile2.txt" in our HOME directory
    ; which links to the file somefile.txt also in our HOME directory.
    success = CkSFtp::ckHardLink(sftp,"somefile.txt","somefile2.txt")
    If success <> 1
        Debug CkSFtp::ckLastErrorText(sftp)
        CkSFtp::ckDispose(sftp)
        ProcedureReturn
    EndIf

    Debug "Successfully created hard link."


    CkSFtp::ckDispose(sftp)


    ProcedureReturn
EndProcedure