Sample code for 30+ languages & platforms
Tcl

Example: Crypt2.SetSigningCert method

Demonstrates how to call the SetSigningCert method.

Chilkat Tcl Downloads

Tcl

load ./chilkat.dll

set success 0

# Signing certificates can be obtained from many different sources..

# Load from a PFX
set cryptA [new_CkCrypt2]

set certA [new_CkCert]

set success [CkCert_LoadPfxFile $certA "c:/someDir/pfx_files/a.pfx" "pfx_file_password"]
set success [CkCrypt2_SetSigningCert $cryptA $certA]
# ...

# Load from a smart card or USB token.
set cryptB [new_CkCrypt2]

set certB [new_CkCert]

CkCert_put_SmartCardPin $certB "123456"
set success [CkCert_LoadFromSmartcard $certB ""]
set success [CkCrypt2_SetSigningCert $cryptB $certB]
# ...

# Load from a the Windows certificate store or macOS keychain
set cryptC [new_CkCrypt2]

set certC [new_CkCert]

set success [CkCert_LoadByCommonName $certC "Xyz 123"]
set success [CkCrypt2_SetSigningCert $cryptC $certC]
# ...

delete_CkCrypt2 $cryptA
delete_CkCert $certA
delete_CkCrypt2 $cryptB
delete_CkCert $certB
delete_CkCrypt2 $cryptC
delete_CkCert $certC