Classic ASP

Start SSH Tunnel Keyboard-Interactive Authentication

Demonstrates the Chilkat SshTunnel.StartKeyboardAuth method, which begins keyboard-interactive authentication. The only argument is the login name. It returns XML describing the server's prompts, which are answered with ContinueKeyboardAuth.

Background: Keyboard-interactive is the prompt-driven authentication method: the server sends one or more questions — a password, a one-time code, a security question — and the client answers each. This is how a tunnel supports two-factor and other challenge-response schemes. The returned XML says exactly what to ask and whether to mask the input.

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 SshTunnel.StartKeyboardAuth method, which begins keyboard-interactive
'  authentication.  The only argument is the login name.  It returns XML describing the server's
'  prompts, which are answered with ContinueKeyboardAuth.

set tunnel = Server.CreateObject("Chilkat.SshTunnel")

'  The tunnel forwards accepted local connections to this destination through the SSH server.
tunnel.DestHostname = "db.internal.example.com"
tunnel.DestPort = 5432

'  Connect to the SSH server.  This performs the TCP/proxy connection and SSH handshake, but
'  does not authenticate yet.
sshPort = 22
success = tunnel.Connect("ssh.example.com",sshPort)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( tunnel.LastErrorText) & "</pre>"
    Response.End
End If

'  Begin keyboard-interactive authentication.  The returned XML describes the server's prompts.
infoRequestXml = tunnel.StartKeyboardAuth("mySshLogin")
If (tunnel.LastMethodSuccess = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( tunnel.LastErrorText) & "</pre>"
    Response.End
End If

Response.Write "<pre>" & Server.HTMLEncode( infoRequestXml) & "</pre>"

'  Answer the prompt(s) with ContinueKeyboardAuth, then call BeginAccepting.

waitForThreadExit = 1
success = tunnel.CloseTunnel(waitForThreadExit)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( tunnel.LastErrorText) & "</pre>"
    Response.End
End If


%>
</body>
</html>