(Tcl) SFTP SymLink - Create Symbolic Link on Server

See more SFTP Examples

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

Chilkat Tcl Extension Downloads Chilkat Tcl Extension Downloads

load ./chilkat.dll

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

set sftp [new_CkSFtp]

# Pass a domain or IP address..
set success [CkSFtp_Connect $sftp "my-sftp-server.com" 22]
if {$success == 1} then {
    set success [CkSFtp_AuthenticatePw $sftp "mySFtpLogin" "mySFtpPassword"]
}

if {$success == 1} then {
    set success [CkSFtp_InitializeSftp $sftp]
}

if {$success != 1} then {
    puts [CkSFtp_lastErrorText $sftp]
    delete_CkSFtp $sftp
    exit
}

# 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.
set success [CkSFtp_SymLink $sftp "/etc/ssh/sshd_config" "sshd_config"]
if {$success != 1} then {
    puts [CkSFtp_lastErrorText $sftp]
    delete_CkSFtp $sftp
    exit
}

puts "Successfully created symbolic link."

delete_CkSFtp $sftp