Open a Forwarded Channel through an SSH Tunnel

See more Socket/SSL/TLS Examples

Demonstrates Socket.SshNewChannel, which opens a port-forwarded channel through an authenticated SSH tunnel to a destination host and port, populating a Socket with the connected channel.

use chilkat();

$success = 0;

$socket = chilkat::CkSocket->new();

#  Connect to the SSH server and initialize an SSH tunneling session.  Port 22 is conventional but
#  not required.
$success = $socket->SshOpenTunnel("ssh.example.com",22);
if ($success == 0) {
    print $socket->lastErrorText() . "\r\n";
    exit;
}

#  Authenticate the SSH session before opening forwarded channels.
#  The SSH password should come from a secure source rather than being hard-coded.
$sshPassword = "mySshPassword";
$success = $socket->SshAuthenticatePw("sshUser",$sshPassword);
if ($success == 0) {
    print $socket->lastErrorText() . "\r\n";
    exit;
}

#  Open a port-forwarded channel through the authenticated SSH tunnel to the destination host and
#  port, populating a Socket with the connected channel.  Set the 3rd argument to 1 to establish
#  TLS to the destination inside the tunnel.
$bTls = 0;
$maxWaitMs = 20000;
$channel = chilkat::CkSocket->new();
$success = $socket->SshNewChannel("db.internal",5432,$bTls,$maxWaitMs,$channel);
if ($success == 0) {
    print $socket->lastErrorText() . "\r\n";
    exit;
}

#  Use the channel socket to send and receive with the destination through the tunnel.
print "Forwarded channel opened to the destination." . "\r\n";