Load and Validate a JWS from a String

See more JSON Web Signatures (JWS) Examples

Demonstrates Jws.LoadJws, which loads a JWS from its compact serialization string. The example then supplies the MAC key and validates the signature.

Local $bSuccess = False

$oJws = ObjCreate("Chilkat.Jws")

;  Load the JWS compact serialization.
Local $sJwsCompact = "eyJhbGciOiJIUzI1NiJ9.VGhpcyBpcyB0aGUgY29udGVudCB0byBzaWduLg.<signature>"
$bSuccess = $oJws.LoadJws($sJwsCompact)
If ($bSuccess = False) Then
    ConsoleWrite($oJws.LastErrorText & @CRLF)
    Exit
EndIf

;  Provide the HMAC key for signer 0, then validate the signature.  Validate returns 1 when the
;  signature is cryptographically valid, 0 when it is not, or a negative value on error.
Local $sBase64Key = "YWJjZGVmZ2hpamtsbW5vcHFyc3R1dnd4eXowMTIzNDU="
$bSuccess = $oJws.SetMacKey(0,$sBase64Key,"base64")
If ($bSuccess = False) Then
    ConsoleWrite($oJws.LastErrorText & @CRLF)
    Exit
EndIf

Local $iV = $oJws.Validate(0)
If ($iV < 0) Then
    ConsoleWrite($oJws.LastErrorText & @CRLF)
    Exit
EndIf

If ($iV <> 1) Then
    ConsoleWrite("The signature is not valid." & @CRLF)
    Exit
EndIf

ConsoleWrite("The signature is valid." & @CRLF)