(AutoIt) Get ECC Public Key in JWK Format (JSON Web Key)

Demonstrates how to get an ECC public key in JWK (JSON Web Key) format.

Note: This example requires Chilkat v9.5.0.66 or later.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

; Note: This example requires Chilkat v9.5.0.66 or later.

; Load a PEM file into memory.
$oSbPem = ObjCreate("Chilkat.StringBuilder")
Local $bSuccess = $oSbPem.LoadFile("qa_data/pem/ecc_public.pem","utf-8")
If ($bSuccess <> True) Then
    ConsoleWrite("Failed to load PEM file." & @CRLF)
    Exit
EndIf

; Load the PEM into a public key object.
$oPubKey = ObjCreate("Chilkat.PublicKey")
$bSuccess = $oPubKey.LoadFromString($oSbPem.GetAsString())
If ($bSuccess <> True) Then
    ConsoleWrite($oPubKey.LastErrorText & @CRLF)
    Exit
EndIf

; Get the public key in JWK format:
Local $sJwk = $oPubKey.GetJwk()

; The GetJwk method will return the JWK in the most compact JSON format possible,
; as a single line with no extra whitespace.  To get a more human-readable JWK (for this example),
; load into a Chilkat JSON object and emit non-compact:

$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.Load($sJwk)
$oJson.EmitCompact = False
ConsoleWrite("ECC Public Key in JWK format:" & @CRLF)
ConsoleWrite($oJson.Emit() & @CRLF)

; Sample output:
; { 
;   "kty": "EC",
;   "crv": "P-256",
;   "x": "oBUyo8CQAFPeYPvv78ylh5MwFZjTCLQeb042TjiMJxE",
;   "y": "vvQyxZkUjJQUPU_0bCy3Pj5qQdfu8jwEfqEeYGZ95CU"
; }
; 
; Additional information can be added like this:
$oJson.AppendString("use","enc")
$oJson.AppendString("kid","123ABC")

; Now examine the JSON:
ConsoleWrite($oJson.Emit() & @CRLF)

; { 
;   "kty": "EC",
;   "crv": "P-256",
;   "x": "oBUyo8CQAFPeYPvv78ylh5MwFZjTCLQeb042TjiMJxE",
;   "y": "vvQyxZkUjJQUPU_0bCy3Pj5qQdfu8jwEfqEeYGZ95CU",
;   "use": "enc",
;   "kid": "123ABC"
; }