Validate a JWS Signature

See more JSON Web Signatures (JWS) Examples

Demonstrates Jws.Validate, which validates exactly one signature, identified by a zero-based index, using the key configured at that same index.

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 key for signature 0 (here an HMAC key).
Local $sBase64Key = "YWJjZGVmZ2hpamtsbW5vcHFyc3R1dnd4eXowMTIzNDU="
$bSuccess = $oJws.SetMacKey(0,$sBase64Key,"base64")
If ($bSuccess = False) Then
    ConsoleWrite($oJws.LastErrorText & @CRLF)
    Exit
EndIf

;  Validate the signature identified by the zero-based index, using the key configured at that index.
;  Validate returns 1 when the signature or MAC is cryptographically valid, 0 when it is not, or a
;  negative value on error.
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)