Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(AutoIt) SSH Tunnel with Dynamic Port ForwardingDemonstrates how to start a background thread that runs a portable SSH tunnel w/ dynamic port forwarding that the foreground thread can use for establishing connections through an SSH tunnel.
; Starting in v9.5.0.49, all Chilkat classes can be unlocked at once at the beginning of a program ; by calling UnlockBundle. It requires a Bundle unlock code. $oChilkatGlob = ObjCreate("Chilkat.Global") Local $bSuccess = $oChilkatGlob.UnlockBundle("Anything for 30-day trial.") If ($bSuccess <> True) Then ConsoleWrite($oChilkatGlob.LastErrorText & @CRLF) Exit EndIf ; This example requires Chilkat version 9.5.0.50 or greater. $oTunnel = ObjCreate("Chilkat.SshTunnel") Local $sshHostname = "sftp.example.com" Local $iSshPort = 22 ; Connect to an SSH server and establish the SSH tunnel: $bSuccess = $oTunnel.Connect($sshHostname,$iSshPort) If ($bSuccess <> True) Then ConsoleWrite($oTunnel.LastErrorText & @CRLF) Exit EndIf ; Authenticate with the SSH server via a login/password ; or with a public key. ; This example demonstrates SSH password authentication. $bSuccess = $oTunnel.AuthenticatePw("mySshLogin","mySshPassword") If ($bSuccess <> True) Then ConsoleWrite($oTunnel.LastErrorText & @CRLF) Exit EndIf ; Indicate that the background SSH tunnel thread will behave as a SOCKS proxy server ; with dynamic port forwarding: $oTunnel.DynamicPortForwarding = True ; We may optionally require that connecting clients authenticate with our SOCKS proxy server. ; To do this, set an inbound username/password. Any connecting clients would be required to ; use SOCKS5 with the correct username/password. ; If no inbound username/password is set, then our SOCKS proxy server will accept both ; SOCKS4 and SOCKS5 unauthenticated connections. $oTunnel.InboundSocksUsername = "chilkat123" $oTunnel.InboundSocksPassword = "password123" ; Start the listen/accept thread to begin accepting SOCKS proxy client connections. ; Listen on port 1080. $bSuccess = $oTunnel.BeginAccepting(1080) If ($bSuccess <> True) Then ConsoleWrite($oTunnel.LastErrorText & @CRLF) Exit EndIf ; Now that a background thread is running a SOCKS proxy server that forwards connections ; through an SSH tunnel, it is possible to use any Chilkat implemented protocol that is SOCKS capable, ; such as HTTP, POP3, SMTP, IMAP, FTP, etc. The protocol may use SSL/TLS because the SSL/TLS ; will be passed through the SSH tunnel to the end-destination. Also, any number of simultaneous ; connections may be routed through the SSH tunnel. ; For this example, let's do a simple HTTPS request: Local $sUrl = "https://www.ethereum.org/" $oHttp = ObjCreate("Chilkat.Http") ; Indicate that the HTTP object is to use our portable SOCKS proxy/SSH tunnel running in our background thread. $oHttp.SocksHostname = "localhost" $oHttp.SocksPort = 1080 $oHttp.SocksVersion = 5 $oHttp.SocksUsername = "chilkat123" $oHttp.SocksPassword = "password123" $oHttp.SendCookies = True $oHttp.SaveCookies = True $oHttp.CookieDir = "memory" ; Do the HTTPS page fetch (through the SSH tunnel) Local $sHtml = $oHttp.QuickGetStr($sUrl) If ($oHttp.LastMethodSuccess <> True) Then ConsoleWrite($oHttp.LastErrorText & @CRLF) Exit EndIf ; Stop the background listen/accept thread: Local $bWaitForThreadExit = True $bSuccess = $oTunnel.StopAccepting($bWaitForThreadExit) If ($bSuccess <> True) Then ConsoleWrite($oTunnel.LastErrorText & @CRLF) Exit EndIf ; Close the SSH tunnel (would also kick any remaining connected clients). $bSuccess = $oTunnel.CloseTunnel($bWaitForThreadExit) If ($bSuccess <> True) Then ConsoleWrite($oTunnel.LastErrorText & @CRLF) Exit EndIf |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.