(DataFlex) 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

Use ChilkatAx-9.5.0-win32.pkg

Procedure Test
    String sPrivKeyHex
    String sPubKeyHex
    Variant vPrivKey
    Handle hoPrivKey
    Boolean iSuccess
    Variant vBd
    Handle hoBd
    Handle hoEddsa
    String sHexSig
    Variant vPubKey
    Handle hoPubKey
    Boolean iBVerified
    String sTemp1

    // This example assumes the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    Move "1498b5467a63dffa2dc9d9e069caf075d16fc33fdd4c3b01bfadae6433767d93" To sPrivKeyHex
    Move "b7a3c12dc0c8c748ab07525b701122b88bd78f600c76342d27f25e5f92444cde" To sPubKeyHex

    Get Create (RefClass(cComChilkatPrivateKey)) To hoPrivKey
    If (Not(IsComObjectCreated(hoPrivKey))) Begin
        Send CreateComObject of hoPrivKey
    End
    // 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.
    Get ComLoadEd25519 Of hoPrivKey sPrivKeyHex sPubKeyHex To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoPrivKey To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    // The data to be signed...
    Get Create (RefClass(cComChilkatBinData)) To hoBd
    If (Not(IsComObjectCreated(hoBd))) Begin
        Send CreateComObject of hoBd
    End
    Get ComAppendString Of hoBd "Message for Ed25519 signing" "utf-8" To iSuccess

    Get Create (RefClass(cComChilkatEdDSA)) To hoEddsa
    If (Not(IsComObjectCreated(hoEddsa))) Begin
        Send CreateComObject of hoEddsa
    End
    Get pvComObject of hoBd to vBd
    Get pvComObject of hoPrivKey to vPrivKey
    Get ComSignBdENC Of hoEddsa vBd "hexlower" vPrivKey To sHexSig

    Showln "signature = " sHexSig

    // The expected output is: 6dd355667fae4eb43c6e0ab92e870edb2de0a88cae12dbd8591507f584fe4912babff497f1b8edf9567d2483d54ddc6459bea7855281b7a246a609e3001a4e08

    // Verify the signature..
    Get Create (RefClass(cComChilkatPublicKey)) To hoPubKey
    If (Not(IsComObjectCreated(hoPubKey))) Begin
        Send CreateComObject of hoPubKey
    End
    Get ComLoadEd25519 Of hoPubKey sPubKeyHex To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoPubKey To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Get pvComObject of hoBd to vBd
    Get pvComObject of hoPubKey to vPubKey
    Get ComVerifyBdENC Of hoEddsa vBd sHexSig "hexlower" vPubKey To iBVerified
    If (iBVerified = False) Begin
        Get ComLastErrorText Of hoEddsa To sTemp1
        Showln sTemp1
        Showln "Failed to verify the signature."
        Procedure_Return
    End

    Showln "The Ed25519 signature is verified!"


End_Procedure