(PowerBuilder) Validate a JWS Using ECDSA P-521 SHA-512

Validates a JSON Web Signature (JWS) that uses ECDSA P-521 SHA-512

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

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

integer li_rc
oleobject loo_SbPubKey
oleobject loo_PubKey
integer li_Success
oleobject loo_Jws
integer li_SignatureIndex
oleobject loo_SbJws
integer v
oleobject loo_JoseHeader

// This requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

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

// This example takes a JSON signature in compact serialization format,
// and uses an ECDSA public key to validate and recover the protected header and payload.

// We only need a public key for signature validation.  This is the ECDSA public key
// that is used:

//      {"kty":"EC", 
//       "crv":"P-521", 
//       "x":"AekpBQ8ST8a8VcfVOTNl353vSrDCLLJXmPk06wTjxrrjcBpXp5EOnYG_NjFZ6OvLFV1jSfS9tsz4qUxcWceqwQGk", 
//       "y":"ADSmRA43Z1DSNx_RvcLI87cdL07l6jQyyBXMoxVg_l2Th-x3S1WDhjDly79ajL4Kkd0AZMaZmh9ubmf63e3kyMj2" 
//      } 

loo_SbPubKey = create oleobject
// Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0
li_rc = loo_SbPubKey.ConnectToNewObject("Chilkat.StringBuilder")
if li_rc < 0 then
    destroy loo_SbPubKey
    MessageBox("Error","Connecting to COM object failed")
    return
end if
loo_SbPubKey.Append("{~"kty~":~"EC~",")
loo_SbPubKey.Append("~"crv~":~"P-521~",")
loo_SbPubKey.Append("~"x~":~"AekpBQ8ST8a8VcfVOTNl353vSrDCLLJXmPk06wTjxrrjcBpXp5EOnYG_NjFZ6OvLFV1jSfS9tsz4qUxcWceqwQGk~",")
loo_SbPubKey.Append("~"y~":~"ADSmRA43Z1DSNx_RvcLI87cdL07l6jQyyBXMoxVg_l2Th-x3S1WDhjDly79ajL4Kkd0AZMaZmh9ubmf63e3kyMj2~"")
loo_SbPubKey.Append("}")

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_SbPubKey.GetAsString())
if li_Success <> 1 then
    Write-Debug loo_PubKey.LastErrorText
    destroy loo_SbPubKey
    destroy loo_PubKey
    return
end if

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

// Set the ECC public key:
li_SignatureIndex = 0
loo_Jws.SetPublicKey(li_SignatureIndex,loo_PubKey)

// Load the JWS.
loo_SbJws = create oleobject
// Use "Chilkat_9_5_0.StringBuilder" for versions of Chilkat < 10.0.0
li_rc = loo_SbJws.ConnectToNewObject("Chilkat.StringBuilder")

loo_SbJws.Append("eyJhbGciOiJFUzUxMiJ9")
loo_SbJws.Append(".")
loo_SbJws.Append("UGF5bG9hZA")
loo_SbJws.Append(".")
loo_SbJws.Append("AdwMgeerwtHoh-l192l60hp9wAHZFVJbLfD_UxMi70cwnZOYaRI1bKPWROc-mZZq")
loo_SbJws.Append("wqT2SI-KGDKB34XO0aw_7XdtAG8GaSwFKdCAPZgoXD2YBJZCPEX3xKpRwcdOO8Kp")
loo_SbJws.Append("EHwJjyqOgzDO7iKvU8vcnwNrmxYbSW9ERBXukOXolLzeO_Jn")

li_Success = loo_Jws.LoadJwsSb(loo_SbJws)
if li_Success <> 1 then
    Write-Debug loo_Jws.LastErrorText
    destroy loo_SbPubKey
    destroy loo_PubKey
    destroy loo_Jws
    destroy loo_SbJws
    return
end if

// Validate the 1st (and only) signature at index 0..
v = loo_Jws.Validate(li_SignatureIndex)
if v < 0 then
    // Perhaps Chilkat was not unlocked or the trial expired..
    Write-Debug "Method call failed for some other reason."
    Write-Debug loo_Jws.LastErrorText
    destroy loo_SbPubKey
    destroy loo_PubKey
    destroy loo_Jws
    destroy loo_SbJws
    return
end if

if v = 0 then
    Write-Debug "Invalid signature.  The ECC key was incorrect, the JWS was invalid, or both."
    destroy loo_SbPubKey
    destroy loo_PubKey
    destroy loo_Jws
    destroy loo_SbJws
    return
end if

// If we get here, the signature was validated..
Write-Debug "Signature validated."
Write-Debug "--"

// Recover the original content:
Write-Debug "Recovered content:"
Write-Debug loo_Jws.GetPayload("utf-8")
Write-Debug "--"

// Examine the protected header:
loo_JoseHeader = loo_Jws.GetProtectedHeader(li_SignatureIndex)
if loo_Jws.LastMethodSuccess <> 1 then
    Write-Debug "No protected header found at the given index."
    destroy loo_SbPubKey
    destroy loo_PubKey
    destroy loo_Jws
    destroy loo_SbJws
    return
end if

loo_JoseHeader.EmitCompact = 0

Write-Debug "Protected (JOSE) header:"
Write-Debug loo_JoseHeader.Emit()
destroy loo_JoseHeader

// Output:
// (the string "Payload" was the content that was signed.)

// 	Signature validated.
// 	--
// 	Recovered content:
// 	Payload
// 	--
// 	Protected (JOSE) header:
// 	{
// 	  "alg": "ES512"
// 	}


destroy loo_SbPubKey
destroy loo_PubKey
destroy loo_Jws
destroy loo_SbJws