Classic ASP

Check Whether SSH Channel CLOSE Was Received

Demonstrates the Chilkat Ssh.ChannelReceivedClose method, which reports whether an SSH CLOSE message has been received for a channel. The only argument is the channel number. Remote CLOSE is distinct from EOF and closes the channel in both directions.

Background: Remote CLOSE is the definitive end of a channel's life. Once it is processed, ChannelIsOpen becomes false and the channel is normally removed from NumOpenChannels. Checking it distinguishes "the server finished sending output" (EOF) from "the channel is fully finished" (CLOSE) — which is what you want before concluding a remote command has completely wrapped up.

Chilkat Classic ASP Downloads

Download Chilkat for Classic ASP

Classic ASP

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0

'  Demonstrates the Ssh.ChannelReceivedClose method, which reports whether an SSH CLOSE message
'  has been received for a channel.  The only argument is the channel number.  Remote CLOSE is
'  distinct from EOF and closes the channel in both directions.

set ssh = Server.CreateObject("Chilkat.Ssh")

sshPort = 22
success = ssh.Connect("ssh.example.com",sshPort)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>"
    Response.End
End If

'  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.
password = "mySshPassword"

success = ssh.AuthenticatePw("mySshLogin",password)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>"
    Response.End
End If

channelNum = ssh.OpenSessionChannel()
If (channelNum < 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>"
    Response.End
End If

success = ssh.SendReqExec(channelNum,"ls -l /tmp")
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>"
    Response.End
End If

'  IMPORTANT: Set a read timeout.  ReadTimeoutMs defaults to 0, which means no limit -- without
'  it, this call waits forever if the server never sends channel close.
ssh.ReadTimeoutMs = 15000

success = ssh.ChannelReceiveToClose(channelNum)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( ssh.LastErrorText) & "</pre>"
    Response.End
End If

'  The server may send EOF before CLOSE.  During that interval EOF is 1 while CLOSE is
'  still 0.
If (ssh.ChannelReceivedEof(channelNum)) Then
    Response.Write "<pre>" & Server.HTMLEncode( "EOF received.") & "</pre>"
End If

If (ssh.ChannelReceivedClose(channelNum)) Then
    Response.Write "<pre>" & Server.HTMLEncode( "Remote CLOSE received -- the channel is closed in both directions.") & "</pre>"
Else
    Response.Write "<pre>" & Server.HTMLEncode( "No remote CLOSE received.") & "</pre>"
End If

ssh.Disconnect 

%>
</body>
</html>