Lianja

Load JWK into PublicKey Object

See more JSON Web Signatures (JWS) Examples

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

llSuccess = .F.

// 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 = .F.) 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 = .F.) then
    ? loSbJwk2.LastErrorText
    release loSbJwk
    release loPubkey
    release loSbJwk2
    return
endif

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

loJsonJwk = createobject("CkJsonObject")
llSuccess = loJson.ObjectOf2("jwk",loJsonJwk)
if (llSuccess = .F.) then
    ? loJson.LastErrorText
    release loSbJwk
    release loPubkey
    release loSbJwk2
    release loJson
    release loJsonJwk
    return
endif

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

? "Contained JWK loaded into public key object."


release loSbJwk
release loPubkey
release loSbJwk2
release loJson
release loJsonJwk
release loPubkey2