(Visual FoxPro) Get an Ed25519 Key in Raw Hex Format

Demonstrates how to get the private and public key parts of an Ed25519 key in lowercase hex formmat.

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

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL loPrivKey
LOCAL lnSuccess
LOCAL loSbPubKeyHex
LOCAL lcPrivKeyHex

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

* Load an Ed25519 key from some format..
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.PrivateKey')
loPrivKey = CreateObject('Chilkat.PrivateKey')

* This loads an Ed25519 key from an unencrypted PEM file (no password required).
lnSuccess = loPrivKey.LoadAnyFormatFile("qa_data/eddsa/ed25519.pem","")
IF (lnSuccess = 0) THEN
    ? loPrivKey.LastErrorText
    RELEASE loPrivKey
    CANCEL
ENDIF

* The key type should be "ed25519" to indicate an Ed25519 key.
? "key type = " + loPrivKey.KeyType

* What is the size of the private key in bits?  (should always be 256 bits for Ed25519)
? "size in bits = " + STR(loPrivKey.BitLength)

* Get the private and public key parts in raw hex format:
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringBuilder')
loSbPubKeyHex = CreateObject('Chilkat.StringBuilder')
lcPrivKeyHex = loPrivKey.GetRawHex(loSbPubKeyHex)

* We should have a 32-byte private key (a 64 character hex string).
? "private key = " + lcPrivKeyHex

* We should have a 32-byte public key (a 64 character hex string).
? "public key = " + loSbPubKeyHex.GetAsString()

* Sample output:
* key type = ed25519
* size in bits = 256
* private key = d4ee72dbf913584ad5b6d8f1f769f8ad3afe7c28cbf1d4fbe097a88f44755842
* public key = 19bf44096984cdfe8541bac167dc3b96c85086aa30b6b6cb0c5c38ad703166e1

RELEASE loPrivKey
RELEASE loSbPubKeyHex