(PowerBuilder) Get RSA Public Key in JWK Format (JSON Web Key)

Demonstrates how to get an RSA 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

integer li_rc
oleobject loo_SbPem
integer li_Success
oleobject loo_PubKey
string ls_Jwk
oleobject loo_Json

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

// Load a PEM file into memory.
loo_SbPem = create oleobject
// Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0
li_rc = loo_SbPem.ConnectToNewObject("Chilkat.StringBuilder")
if li_rc < 0 then
    destroy loo_SbPem
    MessageBox("Error","Connecting to COM object failed")
    return
end if
li_Success = loo_SbPem.LoadFile("qa_data/pem/rsa_public.pem","utf-8")
if li_Success <> 1 then
    Write-Debug "Failed to load PEM file."
    destroy loo_SbPem
    return
end if

// Load the PEM into a public key object.
loo_PubKey = create oleobject
// Use "Chilkat_9_5_0.PublicKey" for versions of Chilkat < 10.0.0
li_rc = loo_PubKey.ConnectToNewObject("Chilkat.PublicKey")

li_Success = loo_PubKey.LoadFromString(loo_SbPem.GetAsString())
if li_Success <> 1 then
    Write-Debug loo_PubKey.LastErrorText
    destroy loo_SbPem
    destroy loo_PubKey
    return
end if

// Get the public key in JWK format:
ls_Jwk = loo_PubKey.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:

loo_Json = create oleobject
// Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
li_rc = loo_Json.ConnectToNewObject("Chilkat.JsonObject")

loo_Json.Load(ls_Jwk)
loo_Json.EmitCompact = 0
Write-Debug "RSA Public Key in JWK format:"
Write-Debug loo_Json.Emit()

// Sample output:
// { 
//   "kty": "RSA",
//   "n": "33TqqLR3eeUmDtHS89qF3p4MP7Wfqt2Zjj3lZjLjjCGDvwr9cJNlNDiuKboODgUiT4ZdPWbOiMAfDcDzlOxA04DDnEFGAf-kDQiNSe2ZtqC7bnIc8-KSG_qOGQIVaay4Ucr6ovDkykO5Hxn7OU7sJp9TP9H0JH8zMQA6YzijYH9LsupTerrY3U6zyihVEDXXOv08vBHk50BMFJbE9iwFwnxCsU5-UZUZYw87Uu0n4LPFS9BT8tUIvAfnRXIEWCha3KbFWmdZQZlyrFw0buUEf0YN3_Q0auBkdbDR_ES2PbgKTJdkjc_rEeM0TxvOUf7HuUNOhrtAVEN1D5uuxE1WSw",
//   "e": "AQAB"
// }

// Additional information can be added like this:
loo_Json.AppendString("use","enc")
loo_Json.AppendString("kid","123ABC")

// Now examine the JSON:
Write-Debug loo_Json.Emit()

// { 
//   "kty": "RSA",
//   "n": "33TqqLR3eeUmDtHS89qF3p4MP7Wfqt2Zjj3lZjLjjCGDvwr9cJNlNDiuKboODgUiT4ZdPWbOiMAfDcDzlOxA04DDnEFGAf-kDQiNSe2ZtqC7bnIc8-KSG_qOGQIVaay4Ucr6ovDkykO5Hxn7OU7sJp9TP9H0JH8zMQA6YzijYH9LsupTerrY3U6zyihVEDXXOv08vBHk50BMFJbE9iwFwnxCsU5-UZUZYw87Uu0n4LPFS9BT8tUIvAfnRXIEWCha3KbFWmdZQZlyrFw0buUEf0YN3_Q0auBkdbDR_ES2PbgKTJdkjc_rEeM0TxvOUf7HuUNOhrtAVEN1D5uuxE1WSw",
//   "e": "AQAB",
//   "use": "enc",
//   "kid": "123ABC"
// }


destroy loo_SbPem
destroy loo_PubKey
destroy loo_Json