|
Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Classic ASP) JWE with Binary DataDemonstrates how to create a JWE that contains a binary payload (such as a JPG image). Note: This example requires Chilkat v9.5.0.66 or greater.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' 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. ' Load a JPG file that will be the JWE payload. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.BinData") set jpgBytes = Server.CreateObject("Chilkat.BinData") success = jpgBytes.LoadFile("qa_data/jpg/starfish.jpg") ' Make sure your app checks the success/failure of the call to LoadFile.. Response.Write "<pre>" & Server.HTMLEncode( "Original JPG size = " & jpgBytes.NumBytes) & "</pre>" ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Jwe") set jwe = Server.CreateObject("Chilkat.Jwe") ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject") set jweProtHdr = Server.CreateObject("Chilkat.JsonObject") success = jweProtHdr.AppendString("alg","A128KW") success = jweProtHdr.AppendString("enc","A128CBC-HS256") success = jwe.SetProtectedHeader(jweProtHdr) aesWrappingKey = "GawgguFyGrWKav7AX4VKUg" success = jwe.SetWrappingKey(0,aesWrappingKey,"base64url") ' Encrypt and return the JWE in sbJwe: ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder") set sbJwe = Server.CreateObject("Chilkat.StringBuilder") success = jwe.EncryptBd(jpgBytes,sbJwe) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( jwe.LastErrorText) & "</pre>" Response.End End If ' Show the JWE: Response.Write "<pre>" & Server.HTMLEncode( sbJwe.GetAsString()) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( "size of JWE: " & sbJwe.Length) & "</pre>" ' --------------------------------------------------------- ' Decrypt to get the original JPG file.. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Jwe") set jwe2 = Server.CreateObject("Chilkat.Jwe") success = jwe2.LoadJweSb(sbJwe) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( jwe2.LastErrorText) & "</pre>" Response.End End If ' Set the AES wrap key. success = jwe2.SetWrappingKey(0,aesWrappingKey,"base64url") ' Decrypt. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.BinData") set jpgOriginal = Server.CreateObject("Chilkat.BinData") success = jwe2.DecryptBd(0,jpgOriginal) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( jwe2.LastErrorText) & "</pre>" Response.End End If Response.Write "<pre>" & Server.HTMLEncode( "Decrypted JPG size = " & jpgOriginal.NumBytes) & "</pre>" ' Save the decrypted JPG to a file. success = jpgOriginal.WriteFile("qa_output/jwe_decrypted_starfish.jpg") Response.Write "<pre>" & Server.HTMLEncode( "success = " & success) & "</pre>" ' The output of this program, when tested, was: ' Original JPG size = 6229 ' eyJhbGciOiJBMTI4S1ciLCJlbmMiOiJBMTI4Q0JDLUhTMjU2In0.9YFz_wteV ... 7Et3hKhpxnKEXw ' size of JWE: 8473 ' Decrypted JPG size = 6229 ' success = True %> </body> </html> |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.