PureBasic

SFTP SymLink - Create Symbolic Link on Server

See more SFTP Examples

Demonstrates how to create a symbolic link on the SFTP server. PureBasic

IncludeFile "CkSFtp.pb"

Procedure ChilkatExample()

    success.i = 0

    ; This example requires 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 = 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 symbolic link on the server.
    ; We'll create a link in our HOME directory named "sshd_config"
    ; which points to the file /etc/ssh/sshd_config.
    success = CkSFtp::ckSymLink(sftp,"/etc/ssh/sshd_config","sshd_config")
    If success <> 1
        Debug CkSFtp::ckLastErrorText(sftp)
        CkSFtp::ckDispose(sftp)
        ProcedureReturn
    EndIf

    Debug "Successfully created symbolic link."


    CkSFtp::ckDispose(sftp)


    ProcedureReturn
EndProcedure