(SQL Server) Generate DSA SSH Key

Generates a DSA SSH key and saves to various public and private key file formats (OpenSSH and PuTTY).

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 @key int
    -- Use "Chilkat_9_5_0.SshKey" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.SshKey', @key OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    DECLARE @success int

    DECLARE @numBits int

    -- numBits should be a minimum of 1024 and
    -- a multiple of 64.  Typical values are
    -- 1024 or 2048. 
    SELECT @numBits = 2048
    EXEC sp_OAMethod @key, 'GenerateDsaKey', @success OUT, @numBits
    IF @success <> 1
      BEGIN

        PRINT 'Invalid numBits passed to DSA key generation method.'
        EXEC @hr = sp_OADestroy @key
        RETURN
      END

    -- Note: Generating a public/private key pair is CPU intensive
    -- and may take a short amount of time (more than few seconds,
    -- but less than a minute).

    DECLARE @exportedKey nvarchar(4000)

    DECLARE @exportEncrypted int

    -- Export the DSA private key to OpenSSH, PuTTY, and XML and save. 
    SELECT @exportEncrypted = 0
    EXEC sp_OAMethod @key, 'ToOpenSshPrivateKey', @exportedKey OUT, @exportEncrypted
    -- Chilkat provides a SaveText method for convenience...
    EXEC sp_OAMethod @key, 'SaveText', @success OUT, @exportedKey, 'privkey_openssh_unencrypted.pem'

    -- Export with encryption to OpenSSH private key format:
    EXEC sp_OASetProperty @key, 'Password', 'secret'
    SELECT @exportEncrypted = 1
    EXEC sp_OAMethod @key, 'ToOpenSshPrivateKey', @exportedKey OUT, @exportEncrypted
    EXEC sp_OAMethod @key, 'SaveText', @success OUT, @exportedKey, 'privkey_openssh_encrypted.pem'

    -- Export the DSA private key to unencrypted PuTTY format:
    SELECT @exportEncrypted = 0
    EXEC sp_OAMethod @key, 'ToPuttyPrivateKey', @exportedKey OUT, @exportEncrypted
    EXEC sp_OAMethod @key, 'SaveText', @success OUT, @exportedKey, 'privkey_putty_unencrypted.ppk'

    -- Export the DSA private key to encrypted PuTTY format:
    EXEC sp_OASetProperty @key, 'Password', 'secret'
    SELECT @exportEncrypted = 1
    EXEC sp_OAMethod @key, 'ToPuttyPrivateKey', @exportedKey OUT, @exportEncrypted
    EXEC sp_OAMethod @key, 'SaveText', @success OUT, @exportedKey, 'privkey_putty_encrypted.ppk'

    -- Export private key to XML:
    EXEC sp_OAMethod @key, 'ToXml', @exportedKey OUT
    EXEC sp_OAMethod @key, 'SaveText', @success OUT, @exportedKey, 'privkey.xml'

    -- ----------------------------------------------------
    -- Now for the public key....
    -- ----------------------------------------------------

    -- The Secure Shell (SSH) Public Key File Format
    -- is documented in RFC 4716.
    EXEC sp_OAMethod @key, 'ToRfc4716PublicKey', @exportedKey OUT
    EXEC sp_OAMethod @key, 'SaveText', @success OUT, @exportedKey, 'pubkey_rfc4716.pub'

    -- OpenSSH has a separate public-key file format, which 
    -- is also supported by Chilkat SshKey:
    EXEC sp_OAMethod @key, 'ToOpenSshPublicKey', @exportedKey OUT
    EXEC sp_OAMethod @key, 'SaveText', @success OUT, @exportedKey, 'pubkey_openSsh.pub'


    PRINT 'Finished.'

    EXEC @hr = sp_OADestroy @key


END
GO