(Classic ASP) Ed25519 Sign and Verify

Demonstrates how to create an Ed25519 signature, and then to verify it.

Note: This example requires Chilkat v9.5.0.83 or greater.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

privKeyHex = "1498b5467a63dffa2dc9d9e069caf075d16fc33fdd4c3b01bfadae6433767d93"
pubKeyHex = "b7a3c12dc0c8c748ab07525b701122b88bd78f600c76342d27f25e5f92444cde"

' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.PrivateKey")
set privKey = Server.CreateObject("Chilkat.PrivateKey")
' This example shows only one way of loading an Ed25519 private key.
' Chilkat can load other formats (JWK, PEM, ASN.1 DER, etc.)  
' You may do so by calling LoadAnyFormat or LoadAnyFormatFile.
success = privKey.LoadEd25519(privKeyHex,pubKeyHex)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( privKey.LastErrorText) & "</pre>"
    Response.End
End If

' The data to be signed...
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.BinData")
set bd = Server.CreateObject("Chilkat.BinData")
success = bd.AppendString("Message for Ed25519 signing","utf-8")

' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.EdDSA")
set eddsa = Server.CreateObject("Chilkat.EdDSA")
hexSig = eddsa.SignBdENC(bd,"hexlower",privKey)

Response.Write "<pre>" & Server.HTMLEncode( "signature = " & hexSig) & "</pre>"

' The expected output is: 6dd355667fae4eb43c6e0ab92e870edb2de0a88cae12dbd8591507f584fe4912babff497f1b8edf9567d2483d54ddc6459bea7855281b7a246a609e3001a4e08

' Verify the signature..
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.PublicKey")
set pubKey = Server.CreateObject("Chilkat.PublicKey")
success = pubKey.LoadEd25519(pubKeyHex)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( pubKey.LastErrorText) & "</pre>"
    Response.End
End If

bVerified = eddsa.VerifyBdENC(bd,hexSig,"hexlower",pubKey)
If (bVerified = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( eddsa.LastErrorText) & "</pre>"
    Response.Write "<pre>" & Server.HTMLEncode( "Failed to verify the signature.") & "</pre>"
    Response.End
End If

Response.Write "<pre>" & Server.HTMLEncode( "The Ed25519 signature is verified!") & "</pre>"

%>
</body>
</html>