(SQL Server) Load an SSH Key from a File (Many Formats Supported)

Demonstrates how to load an SSH public or private key object from a file. The file can be in any of the following formats:

• OpenSSH private key
• OpenSSH public key
• PuTTY private key
• RFC 4716 public key

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
    -- Important: Do not use nvarchar(max).  See the warning about using nvarchar(max).
    DECLARE @sTmp0 nvarchar(4000)
    DECLARE @sshkey int
    -- Use "Chilkat_9_5_0.SshKey" for versions of Chilkat < 10.0.0
    EXEC @hr = sp_OACreate 'Chilkat.SshKey', @sshkey OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    -- First, use the LoadText convenience method to load a text file (of any SSH key format)
    -- into a string:
    DECLARE @strKey nvarchar(4000)
    EXEC sp_OAMethod @sshkey, 'LoadText', @strKey OUT, '../mySshKeys/myKey.txt'

    -- Next, load the key into the SSH key object.

    -- If the key is an OpenSSH private key:
    -- (In actuality, the From* methods will automatically detect the format and load
    -- the key correctly.  For example, if a PuTTY private key is passed to FromOpenSshPrivateKey,
    -- it  will still load correctly.)
    DECLARE @success int
    EXEC sp_OAMethod @sshkey, 'FromOpenSshPrivateKey', @success OUT, @strKey
    IF @success <> 1
      BEGIN
        EXEC sp_OAGetProperty @sshkey, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
      END
    ELSE
      BEGIN

        PRINT 'Loaded OpenSSH private key.'
        EXEC @hr = sp_OADestroy @sshkey
        RETURN
      END

    -- If the key is an OpenSSH public key:
    EXEC sp_OAMethod @sshkey, 'FromOpenSshPublicKey', @success OUT, @strKey
    IF @success <> 1
      BEGIN
        EXEC sp_OAGetProperty @sshkey, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
      END
    ELSE
      BEGIN

        PRINT 'Loaded OpenSSH public key.'
        EXEC @hr = sp_OADestroy @sshkey
        RETURN
      END

    -- If the key is a PuTTY private key:
    EXEC sp_OAMethod @sshkey, 'FromPuttyPrivateKey', @success OUT, @strKey
    IF @success <> 1
      BEGIN
        EXEC sp_OAGetProperty @sshkey, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
      END
    ELSE
      BEGIN

        PRINT 'Loaded PuTTY private key.'
        EXEC @hr = sp_OADestroy @sshkey
        RETURN
      END

    -- If the key is an RFC 4716 public key:
    EXEC sp_OAMethod @sshkey, 'FromRfc4716PublicKey', @success OUT, @strKey
    IF @success <> 1
      BEGIN
        EXEC sp_OAGetProperty @sshkey, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
      END
    ELSE
      BEGIN

        PRINT 'Loaded RFC 4716 public key.'
      END

    EXEC @hr = sp_OADestroy @sshkey


END
GO