Go

POP3 Verify Signed (S/MIME) Email

Demonstrates how to download and verify digitally signed S/MIME email. Go

    success := false

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    mailman := chilkat.NewMailMan()

    // Set the POP3 server's hostname
    mailman.SetMailHost("pop.example.com")

    // Set the POP3 login/password.
    mailman.SetPopUsername("myLogin")
    mailman.SetPopPassword("myPassword")

    stUidls := chilkat.NewStringTable()
    success = mailman.FetchUidls(stUidls)
    if success == false {
        fmt.Println(mailman.LastErrorText())
        mailman.DisposeMailMan()
        stUidls.DisposeStringTable()
        return
    }

    email := chilkat.NewEmail()
    cert := chilkat.NewCert()

    count := stUidls.Count()
    i := 0
    for i < count {
        // Download the full email.
        success = mailman.FetchByUidl(*stUidls.StringAt(i),false,0,email)
        if success == false {
            fmt.Println(mailman.LastErrorText())
            mailman.DisposeMailMan()
            stUidls.DisposeStringTable()
            email.DisposeEmail()
            cert.DisposeCert()
            return
        }

        fmt.Println(i)
        fmt.Println("From: ", email.From())
        fmt.Println("Subject: ", email.Subject())

        // The security layers of signed and/or encrypted emails
        // are automatically "unwrapped" when loaded into
        // a Chilkat email object.
        // An application only needs to check to see if an email
        // was received signed or encrypted, and then examine
        // the success/failure.  For example:
        if email.ReceivedSigned() == true {

            fmt.Println("This email was signed.")

            // Check to see if the signatures were verified.
            if email.SignaturesValid() == true {
                fmt.Println("Digital signature(s) verified.")
                fmt.Println("Signer: ", email.SignedBy())

                success = email.LastSignerCert(0,cert)
                if success == false {
                    fmt.Println(email.LastErrorText())
                    mailman.DisposeMailMan()
                    stUidls.DisposeStringTable()
                    email.DisposeEmail()
                    cert.DisposeCert()
                    return
                }

                fmt.Println("Signing cert: ", cert.SubjectCN())
            }

        } else {
            fmt.Println("Digital signature verification failed.")
        }

        i = i + 1
    }

    mailman.Pop3EndSession()

    mailman.DisposeMailMan()
    stUidls.DisposeStringTable()
    email.DisposeEmail()
    cert.DisposeCert()