(SQL Server) PKCS7 Sign Text using RSA 2048, SHA256, Base64 Output

Demonstrates how to sign text using 2048-bit RSA with SHA256, producing PKCS#7 output in Base64. The certificate w/ private key used for signing is loaded from a .p12/.pfx file.

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

-- Important: See this note about string length limitations for strings returned by sp_OAMethod calls.
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    DECLARE @iTmp0 int
    -- Important: Do not use nvarchar(max).  See the warning about using nvarchar(max).
    DECLARE @sTmp0 nvarchar(4000)
    -- This example requires the Chilkat API to have been previously unlocked.
    -- See Global Unlock Sample for sample code.

    DECLARE @cert int
    -- Use "Chilkat_9_5_0.Cert" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.Cert', @cert OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    -- Load the cert and private key.  Whatever the private key happens to be,
    -- such as RSA or ECC, then Chilkat will use it.  If the private key is 
    -- a 2048-bit RSA key, then that's what will be used..
    DECLARE @success int
    EXEC sp_OAMethod @cert, 'LoadPfxFile', @success OUT, 'qa_data/pfx/myCertAndKey.p12', 'password'
    IF @success <> 1
      BEGIN
        EXEC sp_OAGetProperty @cert, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @cert
        RETURN
      END

    DECLARE @crypt int
    -- Use "Chilkat_9_5_0.Crypt2" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.Crypt2', @crypt OUT

    EXEC sp_OAMethod @crypt, 'SetSigningCert', @success OUT, @cert
    IF @success <> 1
      BEGIN
        EXEC sp_OAGetProperty @crypt, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @cert
        EXEC @hr = sp_OADestroy @crypt
        RETURN
      END

    -- Use SHA-256
    EXEC sp_OASetProperty @crypt, 'HashAlgorithm', 'sha256'

    -- Hash the utf-8 byte representation of the string
    EXEC sp_OASetProperty @crypt, 'Charset', 'utf-8'

    -- Return the result in base64
    EXEC sp_OASetProperty @crypt, 'EncodingMode', 'base64'

    -- Sign some text..
    DECLARE @textToSign nvarchar(4000)
    SELECT @textToSign = 'This is the text to be hashed and signed.'
    DECLARE @sigBase64 nvarchar(4000)
    EXEC sp_OAMethod @crypt, 'OpaqueSignStringENC', @sigBase64 OUT, @textToSign
    EXEC sp_OAGetProperty @crypt, 'LastMethodSuccess', @iTmp0 OUT
    IF @iTmp0 <> 1
      BEGIN
        EXEC sp_OAGetProperty @crypt, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @cert
        EXEC @hr = sp_OADestroy @crypt
        RETURN
      END


    PRINT @sigBase64

    -- The result:
    -- MIIS2wYJKoZIhvcNAQc ... zGeeY4Oxg==

    EXEC @hr = sp_OADestroy @cert
    EXEC @hr = sp_OADestroy @crypt


END
GO