Xbase++ Requires Chilkat v11.0.0+
Xbase++
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.Chilkat Xbase++ Downloads
LOCAL nSuccess
LOCAL oSbJwk
LOCAL oPubkey
LOCAL oSbJwk2
LOCAL oJson
LOCAL oJsonJwk
LOCAL oPubkey2
nSuccess := 0
// Imagine we have this JWK:
// {
// "kty":"RSA",
// "kid":"bilbo.baggins@hobbiton.example",
// "use":"sig",
// "n":"26381066103266289976070039679240841999340706859156341823971393693544846472963839705790075117105560154606562987481050889935247188300178764426769543782451174831475924241862817098997865881169498995546309260357488285676768114714548754913374731868063116787903918383610614912211576698081222844057810710088656983077876282582286966085572172471849443305250452393766960762340311496052418952315081937000716222751229644449475751932222180738210988190709824209639002026650048655399108647971010890335494074025258268035713167380057822555485524738518699437692145859633592396626258745090144803752145540471688039673495588314804430463791",
// "e":"65537"
// }
//
oSbJwk := CreateObject("Chilkat.StringBuilder")
nSuccess := oSbJwk:LoadFile("qa_data/jwk/simple_jwk_rsa.json", "utf-8")
IF (nSuccess != 1)
? "Failed to load simple JWK file."
oSbJwk:destroy()
RETURN
ENDIF
// Loading it into a Chilkat public key object is easy:
oPubkey := CreateObject("Chilkat.PublicKey")
nSuccess := oPubkey:LoadFromString(oSbJwk:GetAsString())
IF (nSuccess == 0)
? oPubkey:LastErrorText
oSbJwk:destroy()
oPubkey:destroy()
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"
// }
// }
oSbJwk2 := CreateObject("Chilkat.StringBuilder")
nSuccess := oSbJwk2:LoadFile("qa_data/jwk/contained_jwk_rsa.json", "utf-8")
IF (nSuccess == 0)
? oSbJwk2:LastErrorText
oSbJwk:destroy()
oPubkey:destroy()
oSbJwk2:destroy()
RETURN
ENDIF
// Get the "jwk" part of the JSON..
oJson := CreateObject("Chilkat.JsonObject")
oJson:Load(oSbJwk2:GetAsString())
oJsonJwk := CreateObject("Chilkat.JsonObject")
nSuccess := oJson:ObjectOf2("jwk", oJsonJwk)
IF (nSuccess == 0)
? oJson:LastErrorText
oSbJwk:destroy()
oPubkey:destroy()
oSbJwk2:destroy()
oJson:destroy()
oJsonJwk:destroy()
RETURN
ENDIF
oPubkey2 := CreateObject("Chilkat.PublicKey")
nSuccess := oPubkey2:LoadFromString(oJsonJwk:Emit())
IF (nSuccess == 0)
? oPubkey2:LastErrorText
oSbJwk:destroy()
oPubkey:destroy()
oSbJwk2:destroy()
oJson:destroy()
oJsonJwk:destroy()
oPubkey2:destroy()
RETURN
ENDIF
? "Contained JWK loaded into public key object."
oSbJwk:destroy()
oPubkey:destroy()
oSbJwk2:destroy()
oJson:destroy()
oJsonJwk:destroy()
oPubkey2:destroy()