Add a PFX Source to MailMan from BinData

See more POP3 Examples

Demonstrates the Chilkat MailMan.AddPfxSourceBd method, which adds a PFX/PKCS#12 certificate store to the MailMan object's internal list of sources used for locating certificates and private keys. The first argument is a BinData containing the PFX bytes and the second is the PFX password. This example loads a PFX into a BinData, registers it, and fetches a message Chilkat can decrypt.

load ./chilkat.dll

set success 0

#  Demonstrates the MailMan.AddPfxSourceBd method, which adds a PFX/PKCS#12 certificate store
#  to the MailMan object's internal list of sources used for locating certificates and
#  private keys.  The 1st argument is a BinData containing the PFX bytes and the 2nd is the
#  PFX password.

set mailman [new_CkMailMan]

#  Configure the POP3 server connection.
CkMailMan_put_MailHost $mailman "pop.example.com"
CkMailMan_put_MailPort $mailman 995
CkMailMan_put_PopSsl $mailman 1
CkMailMan_put_PopUsername $mailman "user@example.com"
CkMailMan_put_PopPassword $mailman "myPassword"

#  Load the PFX bytes into a BinData (they could come from a file, database, or secrets store).
set bdPfx [new_CkBinData]

set success [CkBinData_LoadFile $bdPfx "qa_data/certs/decryption.pfx"]
if {$success == 0} then {
    puts [CkBinData_lastErrorText $bdPfx]
    delete_CkMailMan $mailman
    delete_CkBinData $bdPfx
    exit
}

#  Add the PFX as a source of certificates and private keys.
set success [CkMailMan_AddPfxSourceBd $mailman $bdPfx "pfx_password"]
if {$success == 0} then {
    puts [CkMailMan_lastErrorText $mailman]
    delete_CkMailMan $mailman
    delete_CkBinData $bdPfx
    exit
}

#  Fetch a message; if it is encrypted, Chilkat can decrypt it using the PFX source.
set email [new_CkEmail]

set success [CkMailMan_FetchOne $mailman 0 0 1 $email]
if {$success == 0} then {
    puts [CkMailMan_lastErrorText $mailman]
    delete_CkMailMan $mailman
    delete_CkBinData $bdPfx
    delete_CkEmail $email
    exit
}

puts "Decrypted = [CkEmail_get_Decrypted $email]"

#  Note: The path "qa_data/certs/decryption.pfx" is a relative local filesystem path,
#  relative to the current working directory of the running application.

#  Note: Explicitly connecting/authenticating is optional.  Chilkat MailMan automatically
#  connects and authenticates -- using the property settings above -- whenever a server
#  operation requires it.  Calling the explicit connect/authenticate methods can still be
#  helpful to determine whether a failure occurs while connecting or while authenticating.

delete_CkMailMan $mailman
delete_CkBinData $bdPfx
delete_CkEmail $email