B4X

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. B4X

Dim success As Boolean = False

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

'  Build a JWK that looks like this:

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

Dim json As ChilkatJsonObject
json.Initialize
json.UpdateString("kty", "EC")
json.UpdateString("crv", "P-256")
json.UpdateString("x", x)
json.UpdateString("y", y)

'  Load from the JWK.
Dim pubkey As ChilkatPublicKey
pubkey.Initialize
success = pubkey.LoadFromString(json.Emit)
If success = False Then
    Log(pubkey.LastErrorText)
    Return
End If


Log("Success.")