(Xojo Plugin) Generate an Ed25519 Key Pair

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

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

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

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

Dim eddsa As New Chilkat.EdDSA
Dim prng As New Chilkat.Prng
Dim privKey As New Chilkat.PrivateKey

// Generates a new eddsa key and stores it in privKey.
Dim success As Boolean
success = eddsa.GenEd25519Key(prng,privKey)
If (success = False) Then
    System.DebugLog(eddsa.LastErrorText)
    Return
End If

// Examine the ed25519 key in JWK format;
Dim jwk As String
jwk = privKey.GetJwk()

Dim json As New Chilkat.JsonObject
success = json.Load(jwk)
json.EmitCompact = False
System.DebugLog(json.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.