Visual FoxPro

Generate an Ed25519 Key Pair

See more Ed25519 Examples

Demonstrates how to generate a new Ed25519 public/private key pair.

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

Visual FoxPro

LOCAL lnSuccess
LOCAL loEddsa
LOCAL loPrng
LOCAL loPrivKey
LOCAL lcJwk
LOCAL loJson

lnSuccess = 0

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

loEddsa = CreateObject('Chilkat.EdDSA')
loPrng = CreateObject('Chilkat.Prng')
loPrivKey = CreateObject('Chilkat.PrivateKey')

* Generates a new eddsa key and stores it in privKey.
lnSuccess = loEddsa.GenEd25519Key(loPrng,loPrivKey)
IF (lnSuccess = 0) THEN
    ? loEddsa.LastErrorText
    RELEASE loEddsa
    RELEASE loPrng
    RELEASE loPrivKey
    CANCEL
ENDIF

* Examine the ed25519 key in JWK format;
lcJwk = loPrivKey.GetJwk()

loJson = CreateObject('Chilkat.JsonObject')
loJson.Load(lcJwk)
loJson.EmitCompact = 0
? loJson.Emit()

* Sample output:
* {
*   "kty": "OKP",
*   "crv": "Ed25519",
*   "x": "SE2Kne5xt51z1eciMH2T2ftDQp96Gl6FhY6zSQujiP0",
*   "d": "O-eRXewadF0sNyB0U9omcnt8Qg2ZmeK3WSXPYgqe570",
*   "use": "sig"
* }

* In the above JWK, x is the public key, y is the private key.
* Both are 32 bytes and are base64-url encoded.

RELEASE loEddsa
RELEASE loPrng
RELEASE loPrivKey
RELEASE loJson