(Classic ASP) SSH Key Fingerprint
Generates a fingerprint for an SSH key.
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.SshKey")
set key = Server.CreateObject("Chilkat.SshKey")
' Load an SSH key from an encrypted OpenSSH-formatted private key:
key.Password = "secret"
' First load the PEM into a string:
keyStr = key.LoadText("privkey_openssh_encrypted.pem")
' Import into the SSH key object:
success = key.FromOpenSshPrivateKey(keyStr)
If (success <> 1) Then
Response.Write "<pre>" & Server.HTMLEncode( key.LastErrorText) & "</pre>"
Response.End
End If
' Generate the fingerprint:
fingerprint = key.GenFingerprint()
Response.Write "<pre>" & Server.HTMLEncode( fingerprint) & "</pre>"
' A sample fingerpring looks like this:
' ssh-dss 2048 d0:5f:f7:d6:49:60:7b:50:19:f4:41:59:d4:1f:61:7
%>
</body>
</html>
|
