AutoIt

RSA Sign String using Private Key of Certificate Type A3 (smart card / token)

See more RSA Examples

Demonstrates RSA signing a string using the private key of a certificate type A3 (smart card, token).

Note: This is a Windows-only example.

AutoIt

Local $bSuccess = False

; First get the A3 certificate that was installed on the Windows system.
$oCertStore = ObjCreate("Chilkat.CertStore")

Local $sThumbprint = "12c1dd8015f3f03f7b1fa619dc24e2493ca8b4b2"

; This is specific to Windows because it is opening the Windows Current-User certificate store.
Local $bReadOnly = True
$bSuccess = $oCertStore.OpenCurrentUserStore($bReadOnly)
If ($bSuccess <> True) Then
    ConsoleWrite($oCertStore.LastErrorText & @CRLF)
    Exit
EndIf

; Find the certificate with the desired thumbprint
; (There are many ways to locate a certificate.  This example chooses to find by thumbprint.)
$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.UpdateString("thumbprint",$sThumbprint)

$oCert = ObjCreate("Chilkat.Cert")
$bSuccess = $oCertStore.FindCert($oJson,$oCert)
If ($bSuccess = False) Then
    ConsoleWrite("Failed to find the certificate." & @CRLF)
    Exit
EndIf

ConsoleWrite("Found: " & $oCert.SubjectCN & @CRLF)

$oRsa = ObjCreate("Chilkat.Rsa")

; Provide the cert's private key
Local $bUsePrivateKey = True
$bSuccess = $oRsa.SetX509Cert($oCert,$bUsePrivateKey)
If ($bSuccess <> True) Then
    ConsoleWrite($oRsa.LastErrorText & @CRLF)
    Exit
EndIf

; Return the RSA signature in base64 encoded form.
$oRsa.EncodingMode = "base64"

; Sign the utf-8 byte representation of the string.
$oRsa.Charset = "utf-8"

; You can also choose other hash algorithms, such as SHA-1.
Local $sigBase64 = $oRsa.SignStringENC("text to sign","SHA-256")
If ($oRsa.LastMethodSuccess <> True) Then
    ConsoleWrite($oRsa.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("Base64 signature: " & $sigBase64 & @CRLF)