Xbase++

Load EC Public Key from X,Y Values

See more ECC Examples

Demonstrates how to load an EC public key from X and Y values. Xbase++

LOCAL nSuccess
LOCAL x
LOCAL y
LOCAL oJson
LOCAL oPubkey

nSuccess := 0

//  We have the following x and y values in base64 (for an EC point on the P-256 curve).
x := "Dn7uB1O7kgk74G6qfQwFJESeDnxO6lLjGZFWZJE16tw"
y := "iOWA5DInzK6nuUGvHJbMVq1Dpj248FqSV2teN3HzmhU"

//  Build a JWK that looks like this:

//  {
//    "kty": "EC",
//    "crv": "P-256",
//    "x": "Dn7uB1O7kgk74G6qfQwFJESeDnxO6lLjGZFWZJE16tw",
//    "y": "iOWA5DInzK6nuUGvHJbMVq1Dpj248FqSV2teN3HzmhU"
//  }

oJson := CreateObject("Chilkat.JsonObject")
oJson:UpdateString("kty", "EC")
oJson:UpdateString("crv", "P-256")
oJson:UpdateString("x", x)
oJson:UpdateString("y", y)

//  Load from the JWK.
oPubkey := CreateObject("Chilkat.PublicKey")
nSuccess := oPubkey:LoadFromString(oJson:Emit())
IF (nSuccess == 0)
    ? oPubkey:LastErrorText
    oJson:destroy()
    oPubkey:destroy()
    RETURN
ENDIF

? "Success."

oJson:destroy()
oPubkey:destroy()