(Visual FoxPro) Load an Ed25519 Private Key from Hex

Demonstrates how to load an Ed25519 private key from raw hex bytes.

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 lcPrivKeyHex
LOCAL lcPubKeyHex
LOCAL lnSuccess
LOCAL loPrivKey2
LOCAL loSbPubKeyHex

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

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.PrivateKey')
loPrivKey = CreateObject('Chilkat.PrivateKey')

* We have the hexidecimal encoded bytes of the private key and public key:
lcPrivKeyHex = "d4ee72dbf913584ad5b6d8f1f769f8ad3afe7c28cbf1d4fbe097a88f44755842"
lcPubKeyHex = "19bf44096984cdfe8541bac167dc3b96c85086aa30b6b6cb0c5c38ad703166e1"

* Load these values into the Chilkat private key object:
lnSuccess = loPrivKey.LoadEd25519(lcPrivKeyHex,lcPubKeyHex)
IF (lnSuccess = 0) THEN
    ? loPrivKey.LastErrorText
    RELEASE loPrivKey
    CANCEL
ENDIF

* ---------------------------------------------------------------
* We don't actually need the public key.  If we pass an empty string for the public key,
* Chilkat will automatically compute it.
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.PrivateKey')
loPrivKey2 = CreateObject('Chilkat.PrivateKey')
lnSuccess = loPrivKey2.LoadEd25519(lcPrivKeyHex,"")

* Let's get the public key to see that it computed the same value.
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringBuilder')
loSbPubKeyHex = CreateObject('Chilkat.StringBuilder')
lcPrivKeyHex = loPrivKey2.GetRawHex(loSbPubKeyHex)
? "computed public key = " + loSbPubKeyHex.GetAsString()

* The output should be:
* computed public key = 19bf44096984cdfe8541bac167dc3b96c85086aa30b6b6cb0c5c38ad703166e1

RELEASE loPrivKey
RELEASE loPrivKey2
RELEASE loSbPubKeyHex