(SQL Server) PKCS11 Generate a Session EC Key on the HSM

See more PKCS11 Examples

Generates an EC key on the smart card or token and returns the public and private key handles. The generated EC key exists only for the duration of the PKCS11 session.

Note: This example requires Chilkat v9.5.0.96 or later.

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.

    -- Note: Chilkat's PKCS11 implementation runs on Windows, Linux, Mac OS X, and other supported operating systems.

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

    -- Use the PKCS11 driver (.dll, .so, .dylib) for your particular HSM.
    -- (The format of the path will change with the operating system.  Obviously, "C:/" is not used on non-Windows systems.
    EXEC sp_OASetProperty @pkcs11, 'SharedLibPath', 'C:/Program Files (x86)/Gemalto/IDGo 800 PKCS#11/IDPrimePKCS1164.dll'

    -- Establish a logged-on session.
    DECLARE @pin nvarchar(4000)
    SELECT @pin = '0000'
    DECLARE @userType int
    SELECT @userType = 1
    DECLARE @success int
    EXEC sp_OAMethod @pkcs11, 'QuickSession', @success OUT, @userType, @pin
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @pkcs11, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @pkcs11
        RETURN
      END

    -- Specify attributes and abilities (how this key can be used) by providing a JSON template.
    -- One template is for the public key, and the other for the private key.
    DECLARE @pubKeyAttr int
    -- Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @pubKeyAttr OUT

    -- Allow the public key to be used for signature verification
    EXEC sp_OAMethod @pubKeyAttr, 'UpdateBool', @success OUT, 'verify', 1

    -- Specify the kind of EC key to generate by the curve name
    -- Possible curve names are:
    -- secp256r1  (also known as P-256 and prime256v1)
    -- secp384r1  (also known as P-384)
    -- secp521r1  (also known as P-521)
    -- secp256k1 (This is the curve used for Bitcoin)
    -- secp192r1
    -- secp224r1
    -- brainpoolP160r1
    -- brainpoolP192r1
    -- brainpoolP192r1
    -- brainpoolP224r1
    -- brainpoolP256r1
    -- brainpoolP320r1
    -- brainpoolP384r1
    -- brainpoolP512r1
    -- Note: Your smart card or token might not support all of the above EC curves (assuming it supports EC at all).

    -- This attribute is required.
    EXEC sp_OAMethod @pubKeyAttr, 'UpdateString', @success OUT, 'ec_params', 'secp256r1'

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

    -- Generate a session EC key.
    -- A session key exists only for the duration of the PKS11 session.
    -- To generate an EC key that resides on the HSM, set the "token" attribute equal to 1
    EXEC sp_OAMethod @privKeyAttr, 'UpdateBool', @success OUT, 'token', 0

    -- Allow the private key to be used for signing.
    EXEC sp_OAMethod @privKeyAttr, 'UpdateBool', @success OUT, 'sign', 1

    -- Provide a JSON object to receive the public and private key handles.
    DECLARE @jsonHandles int
    -- Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.JsonObject', @jsonHandles OUT

    EXEC sp_OASetProperty @jsonHandles, 'EmitCompact', 0

    -- Provide a Chilkat public key object to receive the public key.
    DECLARE @pubKey int
    -- Use "Chilkat_9_5_0.PublicKey" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.PublicKey', @pubKey OUT

    EXEC sp_OAMethod @pkcs11, 'GenEcKey', @success OUT, @pubKeyAttr, @privKeyAttr, @jsonHandles, @pubKey
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @pkcs11, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0

        PRINT 'Failed to generate an EC key.'
      END
    ELSE
      BEGIN
        -- Sample JSON handles:
        -- {
        --   "public_key_handle": 18415630,
        --   "private_key_handle": 74842125
        -- }
        EXEC sp_OAMethod @jsonHandles, 'Emit', @sTmp0 OUT
        PRINT @sTmp0

        EXEC sp_OAMethod @jsonHandles, 'UIntOf', @iTmp0 OUT, 'public_key_handle'
        PRINT 'public_key_handle: ' + @iTmp0

        EXEC sp_OAMethod @jsonHandles, 'UIntOf', @iTmp0 OUT, 'private_key_handle'
        PRINT 'private_key_handle: ' + @iTmp0

        PRINT 'public key JWK:'
        EXEC sp_OAMethod @pubKey, 'GetJwk', @sTmp0 OUT
        PRINT @sTmp0
        -- Sample JWK:
        -- {"kty":"EC","crv":"P-256","x":"EDy-Sxl0DZ8tvzy_qnIYl6DYPFjTVnyJ2I9ZTCfKds4","y":"yBZ4HK2yF7F7ZEOn59CgTQp2ApQJ8ZOF736yZxY6LOE"}

        PRINT 'Success.'
      END

    EXEC sp_OAMethod @pkcs11, 'Logout', @success OUT
    EXEC sp_OAMethod @pkcs11, 'CloseSession', @success OUT

    EXEC @hr = sp_OADestroy @pkcs11
    EXEC @hr = sp_OADestroy @pubKeyAttr
    EXEC @hr = sp_OADestroy @privKeyAttr
    EXEC @hr = sp_OADestroy @jsonHandles
    EXEC @hr = sp_OADestroy @pubKey


END
GO