(Lianja) Load JWK into PublicKey Object

Demonstrates how to load a Java Web Key (JWK) into a Chilkat public key object.

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

Chilkat Lianja Extension Download Chilkat Lianja Extension

//  Imagine we have this JWK:

//  {
//  "kty":"RSA",
//  "kid":"bilbo.baggins@hobbiton.example",
//  "use":"sig",
//  "n":"26381066103266289976070039679240841999340706859156341823971393693544846472963839705790075117105560154606562987481050889935247188300178764426769543782451174831475924241862817098997865881169498995546309260357488285676768114714548754913374731868063116787903918383610614912211576698081222844057810710088656983077876282582286966085572172471849443305250452393766960762340311496052418952315081937000716222751229644449475751932222180738210988190709824209639002026650048655399108647971010890335494074025258268035713167380057822555485524738518699437692145859633592396626258745090144803752145540471688039673495588314804430463791",
//  "e":"65537"
//  }
// 

loSbJwk = createobject("CkStringBuilder")
llSuccess = loSbJwk.LoadFile("qa_data/jwk/simple_jwk_rsa.json","utf-8")
if (llSuccess <> .T.) then
    ? "Failed to load simple JWK file."
    release loSbJwk
    return
endif

//  Loading it into a Chilkat public key object is easy:
loPubkey = createobject("CkPublicKey")
llSuccess = loPubkey.LoadFromString(loSbJwk.GetAsString())
if (llSuccess <> .T.) then
    ? loPubkey.LastErrorText
    release loSbJwk
    release loPubkey
    return
endif

? "Simple JWK loaded into public key object."

//  ----------------------------------------------------------------------------------------------------------
//  Demonstrate how to load a JWK that is contained within JSON into a public key object.

//  {
//    "alg":"RS256",
//    "jwk":  {
//            "kty":"RSA",
//            "kid":"bilbo.baggins@hobbiton.example",
//            "use":"sig",
//            "n":"26381066103266289976070039679240841999340706859156341823971393693544846472963839705790075117105560154606562987481050889935247188300178764426769543782451174831475924241862817098997865881169498995546309260357488285676768114714548754913374731868063116787903918383610614912211576698081222844057810710088656983077876282582286966085572172471849443305250452393766960762340311496052418952315081937000716222751229644449475751932222180738210988190709824209639002026650048655399108647971010890335494074025258268035713167380057822555485524738518699437692145859633592396626258745090144803752145540471688039673495588314804430463791",
//            "e":"65537"
//            }
//  }

loSbJwk2 = createobject("CkStringBuilder")
llSuccess = loSbJwk2.LoadFile("qa_data/jwk/contained_jwk_rsa.json","utf-8")
if (llSuccess <> .T.) then
    ? "Failed to load JWK file."
    release loSbJwk
    release loPubkey
    release loSbJwk2
    return
endif

//  Get the "jwk" part of the JSON..
loJson = createobject("CkJsonObject")
loJson.Load(loSbJwk2.GetAsString())

loJsonJwk = loJson.ObjectOf("jwk")
if (loJson.LastMethodSuccess <> .T.) then
    ? "No jwk member exists."
    release loSbJwk
    release loPubkey
    release loSbJwk2
    release loJson
    return
endif

loPubkey2 = createobject("CkPublicKey")
llSuccess = loPubkey2.LoadFromString(loJsonJwk.Emit())
if (llSuccess <> .T.) then
    ? loPubkey2.LastErrorText
    release loSbJwk
    release loPubkey
    release loSbJwk2
    release loJson
    release loPubkey2
    return
endif

? "Contained JWK loaded into public key object."

release loJsonJwk


release loSbJwk
release loPubkey
release loSbJwk2
release loJson
release loPubkey2