AutoIt
AutoIt
SSH Tunnel Through an Outbound HTTP Proxy
See more SSH Tunnel Examples
Demonstrates reaching the SSH server through an outbound HTTP proxy using the HttpProxyHostname, HttpProxyPort, HttpProxyUsername, HttpProxyPassword, HttpProxyAuthMethod, and HttpProxyDomain properties.
Background: Many corporate networks force outbound traffic through an HTTP proxy, which reaches non-HTTP services such as SSH via the
CONNECT method — so the proxy must be configured to allow CONNECT to the SSH port. HttpProxyAuthMethod is Basic or NTLM, with HttpProxyDomain supplying the Windows domain for NTLM. Note that if SocksVersion is set, the SOCKS proxy takes precedence and these HTTP settings are ignored.Chilkat AutoIt Downloads
Local $bSuccess = False
; Demonstrates reaching the SSH server through an outbound HTTP proxy using the SshTunnel
; properties HttpProxyHostname, HttpProxyPort, HttpProxyUsername, HttpProxyPassword,
; HttpProxyAuthMethod, and HttpProxyDomain.
$oTunnel = ObjCreate("Chilkat.SshTunnel")
; The HTTP proxy through which the outbound connection to the SSH server is made. Common HTTP
; proxy ports include 8080 and 3128. (If SocksVersion is 4 or 5, the SOCKS proxy takes
; precedence and these settings are ignored.)
$oTunnel.HttpProxyHostname = "proxy.example.com"
$oTunnel.HttpProxyPort = 8080
; Proxy authentication, if the proxy requires it. Valid HttpProxyAuthMethod values are "Basic"
; and "NTLM". HttpProxyDomain is the optional Windows domain used for NTLM.
$oTunnel.HttpProxyUsername = "myProxyLogin"
$oTunnel.HttpProxyPassword = "myProxyPassword"
$oTunnel.HttpProxyAuthMethod = "NTLM"
$oTunnel.HttpProxyDomain = "CORP"
$oTunnel.DestHostname = "db.internal.example.com"
$oTunnel.DestPort = 5432
Local $iSshPort = 22
$bSuccess = $oTunnel.Connect("ssh.example.com",$iSshPort)
If ($bSuccess = False) Then
ConsoleWrite($oTunnel.LastErrorText & @CRLF)
Exit
EndIf
; Normally you would not hard-code the password in source. You should instead obtain it
; from an interactive prompt, environment variable, or a secrets vault.
Local $sPassword = "mySshPassword"
$bSuccess = $oTunnel.AuthenticatePw("mySshLogin",$sPassword)
If ($bSuccess = False) Then
ConsoleWrite($oTunnel.LastErrorText & @CRLF)
Exit
EndIf
Local $iListenPort = 1080
$bSuccess = $oTunnel.BeginAccepting($iListenPort)
If ($bSuccess = False) Then
ConsoleWrite($oTunnel.LastErrorText & @CRLF)
Exit
EndIf
ConsoleWrite("Tunnel established through the HTTP proxy." & @CRLF)
Local $bWaitForThreadExit = True
$bSuccess = $oTunnel.CloseTunnel($bWaitForThreadExit)
If ($bSuccess = False) Then
ConsoleWrite($oTunnel.LastErrorText & @CRLF)
Exit
EndIf