AutoIt

Use an Existing Socket SSH Tunnel

Demonstrates the Chilkat MailMan.UseSshTunnel method, which configures MailMan to use an existing SSH tunnel provided by a Socket object for its SMTP and POP3 connections. This example opens and authenticates a tunnel on a Socket, hands it to MailMan, and then verifies an SMTP login through it.

Background: Sharing one already-established SSH tunnel across objects avoids opening (and authenticating) a separate SSH connection for every component that needs to reach the remote network. Here the tunnel lives on a Socket object, which MailMan then routes its SMTP/POP3 traffic through. It is the Socket-based sibling of UseSsh, which shares an Ssh object instead.

Chilkat AutoIt Downloads

Download Chilkat for AutoIt

AutoIt

Local $bSuccess = False

;  Demonstrates the MailMan.UseSshTunnel method, which configures MailMan to use an existing
;  SSH tunnel provided by a Socket object for its SMTP and POP3 connections.

;  Open and authenticate the SSH tunnel using a Socket object.
$oSshTunnel = ObjCreate("Chilkat.Socket")
$bSuccess = $oSshTunnel.SshOpenTunnel("ssh.example.com",22)
If ($bSuccess = False) Then
    ConsoleWrite($oSshTunnel.LastErrorText & @CRLF)
    Exit
EndIf

$bSuccess = $oSshTunnel.SshAuthenticatePw("sshUser","sshPassword")
If ($bSuccess = False) Then
    ConsoleWrite($oSshTunnel.LastErrorText & @CRLF)
    Exit
EndIf

$oMailman = ObjCreate("Chilkat.MailMan")

;  Configure the SMTP server connection.  These connections will travel through the tunnel.
$oMailman.SmtpHost = "smtp.example.com"
$oMailman.SmtpPort = 465
$oMailman.SmtpSsl = True
$oMailman.SmtpUsername = "user@example.com"
$oMailman.SmtpPassword = "myPassword"

;  Tell MailMan to route its connections through the existing tunnel.
$bSuccess = $oMailman.UseSshTunnel($oSshTunnel)
If ($bSuccess = False) Then
    ConsoleWrite($oMailman.LastErrorText & @CRLF)
    Exit
EndIf

;  SMTP operations now travel through the shared SSH tunnel.
$bSuccess = $oMailman.VerifySmtpLogin()
If ($bSuccess = False) Then
    ConsoleWrite($oMailman.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("Authenticated with the SMTP server through the SSH tunnel." & @CRLF)