Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Perl) Ed25519ph Sign and VerifyDemonstrates how to create an Ed25519ph signature, and then to verify it. Note: This example requires Chilkat v9.5.0.91 or greater.
use chilkat(); # This example assumes the Chilkat API to have been previously unlocked. # See Global Unlock Sample for sample code. # Use the following test vector from https://www.rfc-editor.org/rfc/rfc8032#page-30 # -----TEST abc # # ALGORITHM: # Ed25519ph # # SECRET KEY: # 833fe62409237b9d62ec77587520911e # 9a759cec1d19755b7da901b96dca3d42 # # PUBLIC KEY: # ec172b93ad5e563bf4932c70e1245034 # c35467ef2efd4d64ebf819683467e2bf # # MESSAGE (length 3 bytes): # 616263 # # SIGNATURE: # 98a70222f0b8121aa9d30f813d683f80 # 9e462b469c7ff87639499bb94e6dae41 # 31f85042463c2a355a2003d062adf5aa # a10b8c61e636062aaad11c2a26083406 $privKeyHex = "833fe62409237b9d62ec77587520911e9a759cec1d19755b7da901b96dca3d42"; $pubKeyHex = "ec172b93ad5e563bf4932c70e1245034c35467ef2efd4d64ebf819683467e2bf"; $privKey = chilkat::CkPrivateKey->new(); $success = $privKey->LoadEd25519($privKeyHex,$pubKeyHex); if ($success == 0) { print $privKey->lastErrorText() . "\r\n"; exit; } # The data to be signed... $bd = chilkat::CkBinData->new(); $bd->AppendEncoded("616263","hex"); $eddsa = chilkat::CkEdDSA->new(); # Indicate we want the Ed25519ph instance. $eddsa->put_Algorithm("Ed25519ph"); $hexSig = $eddsa->signBdENC($bd,"hexlower",$privKey); print "signature = " . $hexSig . "\r\n"; # The expected output is: 98a70222f0b8121aa9d30f813d683f80.... # Verify the signature.. $pubKey = chilkat::CkPublicKey->new(); $success = $pubKey->LoadEd25519($pubKeyHex); if ($success == 0) { print $pubKey->lastErrorText() . "\r\n"; exit; } $bVerified = $eddsa->VerifyBdENC($bd,$hexSig,"hexlower",$pubKey); if ($bVerified == 0) { print $eddsa->lastErrorText() . "\r\n"; print "Failed to verify the signature." . "\r\n"; exit; } print "The Ed25519ph signature is verified!" . "\r\n"; |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.