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
(Visual FoxPro) Duplicate openssl dgst -sha256 -sign private.pem -out sha256.sig in.datDemonstrates how to duplicate this OpenSSL command: openssl dgst -sha256 -sign private.pem -out sha256.sig in.datThe in.dat file can contain text or binary data of any type. The OpenSSL command does the following:
LOCAL lnSuccess LOCAL loPkey LOCAL loFac LOCAL loInData LOCAL loRsa LOCAL loSigBytes * This example requires the Chilkat API to have been previously unlocked. * See Global Unlock Sample for sample code. loPkey = CreateObject('Chilkat_9_5_0.PrivateKey') * Load the private key from an PEM file: lnSuccess = loPkey.LoadPemFile("private.pem") IF (lnSuccess <> 1) THEN ? loPkey.LastErrorText RELEASE loPkey CANCEL ENDIF * Load the file to be signed. loFac = CreateObject('Chilkat_9_5_0.FileAccess') loInData = loFac.ReadEntireFile("in.dat") loRsa = CreateObject('Chilkat_9_5_0.Rsa') * Import the private key into the RSA component: lnSuccess = loRsa.ImportPrivateKeyObj(loPkey) IF (lnSuccess <> 1) THEN ? loRsa.LastErrorText RELEASE loPkey RELEASE loFac RELEASE loRsa CANCEL ENDIF * OpenSSL uses big-endian. loRsa.LittleEndian = 0 loSigBytes = loRsa.SignBytes(loInData,"sha256") IF (loRsa.LastMethodSuccess <> 1) THEN ? loRsa.LastErrorText RELEASE loPkey RELEASE loFac RELEASE loRsa CANCEL ENDIF * Save the binary signature to a file. lnSuccess = loFac.WriteEntireFile("signature.sig",loSigBytes) IF (lnSuccess <> 1) THEN ? loFac.LastErrorText RELEASE loPkey RELEASE loFac RELEASE loRsa CANCEL ENDIF ? "Success." RELEASE loPkey RELEASE loFac RELEASE loRsa |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.