PowerBuilder
PowerBuilder
SSH Commands to Sophos Router Device Console
See more SSH Examples
Demonstrates how to establish an SSH session with a Sophos XG router and send commands in a device console session.Chilkat PowerBuilder Downloads
integer li_rc
integer li_Success
oleobject loo_Ssh
integer li_ChannelNum
li_Success = 0
// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
loo_Ssh = create oleobject
li_rc = loo_Ssh.ConnectToNewObject("Chilkat.Ssh")
if li_rc < 0 then
destroy loo_Ssh
MessageBox("Error","Connecting to COM object failed")
return
end if
li_Success = loo_Ssh.Connect("172.16.16.16",22)
if li_Success <> 1 then
Write-Debug loo_Ssh.LastErrorText
destroy loo_Ssh
return
end if
// Authenticate using login/password:
li_Success = loo_Ssh.AuthenticatePw("myLogin","myPassword")
if li_Success <> 1 then
Write-Debug loo_Ssh.LastErrorText
destroy loo_Ssh
return
end if
// Start a shell session.
// (The QuickShell method was added in Chilkat v9.5.0.65)
li_ChannelNum = loo_Ssh.QuickShell()
if li_ChannelNum < 0 then
Write-Debug loo_Ssh.LastErrorText
destroy loo_Ssh
return
end if
// The Sophos router will send this initial prompt:
// Main Menu
//
// 1. Network Configuration
// 2. System Configuration
// 3. Route Configuration
// 4. Device Console
// 5. Device Management
// 6. VPN Management
// 7. Shutdown/Reboot Device
// 0. Exit
//
// Select Menu Number [0-7]:
li_Success = loo_Ssh.ChannelReceiveUntilMatch(li_ChannelNum,"Select Menu Number","utf-8",1)
if li_Success <> 1 then
Write-Debug loo_Ssh.LastErrorText
destroy loo_Ssh
return
end if
// Show what we received so far:
Write-Debug loo_Ssh.GetReceivedText(li_ChannelNum,"utf-8")
// Send "4" <RETURN> to mimic typing in a shell session.
li_Success = loo_Ssh.ChannelSendString(li_ChannelNum,"4~n","utf-8")
if li_Success <> 1 then
Write-Debug loo_Ssh.LastErrorText
destroy loo_Ssh
return
end if
// We should get a "console>" prompt.
li_Success = loo_Ssh.ChannelReceiveUntilMatch(li_ChannelNum,"console>","utf-8",1)
if li_Success <> 1 then
Write-Debug loo_Ssh.LastErrorText
destroy loo_Ssh
return
end if
Write-Debug loo_Ssh.GetReceivedText(li_ChannelNum,"utf-8")
// Send a command and get the output..
li_Success = loo_Ssh.ChannelSendString(li_ChannelNum,"dnslookup host google.com~n","utf-8")
li_Success = loo_Ssh.ChannelReceiveUntilMatch(li_ChannelNum,"console>","utf-8",1)
if li_Success <> 1 then
Write-Debug loo_Ssh.LastErrorText
destroy loo_Ssh
return
end if
Write-Debug loo_Ssh.GetReceivedText(li_ChannelNum,"utf-8")
// Send another command and get the output, and so on...
li_Success = loo_Ssh.ChannelSendString(li_ChannelNum,"dnslookup host microsoft.com~n","utf-8")
li_Success = loo_Ssh.ChannelReceiveUntilMatch(li_ChannelNum,"console>","utf-8",1)
if li_Success <> 1 then
Write-Debug loo_Ssh.LastErrorText
destroy loo_Ssh
return
end if
Write-Debug loo_Ssh.GetReceivedText(li_ChannelNum,"utf-8")
loo_Ssh.Disconnect()
destroy loo_Ssh