Go

Using Client Certificate w/ IMAP SSL

Demonstrates how to use a client-side certificate with an IMAP SSL connection. The SetSslClientCert method is called to specify a certificate to be used for the SSL connection. Go

    success := false

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

    imap := chilkat.NewImap()

    // To use a secure SSL connection, set SSL and the port:
    imap.SetSsl(true)
    // The typical port for IMAP SSL is 993
    imap.SetPort(993)

    // Load a certificate from a PFX file and use it.
    // Note: Other methods are available to load pre-installed
    // certificates from registry-based certificate stores.

    // Create an instance of a certificate store object, load a PFX file,
    // locate the certificate we need, and use it for signing.
    // (a PFX file may contain more than one certificate.)
    certStore := chilkat.NewCertStore()
    // The 1st argument is the filename, the 2nd arg is the 
    // PFX file's password:
    success = certStore.LoadPfxFile("myCertWithPrivateKey.pfx","secret")
    if success == false {
        fmt.Println(certStore.LastErrorText())
        imap.DisposeImap()
        certStore.DisposeCertStore()
        return
    }

    // Find the certificate by the subject common name:
    jsonCN := chilkat.NewJsonObject()
    jsonCN.UpdateString("CN","cert common name")

    cert := chilkat.NewCert()
    success = certStore.FindCert(jsonCN,cert)
    if success == false {
        fmt.Println(certStore.LastErrorText())
        imap.DisposeImap()
        certStore.DisposeCertStore()
        jsonCN.DisposeJsonObject()
        cert.DisposeCert()
        return
    }

    // If a PFX file is known to contain a single certificate,
    // you may load it directly into a Chilkat certificate object.
    // This snippet of source code shows how:
    cert2 := chilkat.NewCert()
    // The 1st argument is the filename, the 2nd arg is the 
    // PFX file's password:
    success = cert2.LoadPfxFile("myClientCert.pfx","secret")
    if success == false {
        fmt.Println(cert.LastErrorText())
        imap.DisposeImap()
        certStore.DisposeCertStore()
        jsonCN.DisposeJsonObject()
        cert.DisposeCert()
        cert2.DisposeCert()
        return
    }

    // Use the cert:
    success = imap.SetSslClientCert(cert)

    // Connect to an IMAP server.
    success = imap.Connect("imap.example.com")
    if success == false {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        certStore.DisposeCertStore()
        jsonCN.DisposeJsonObject()
        cert.DisposeCert()
        cert2.DisposeCert()
        return
    }

    // Login
    success = imap.Login("myLogin","myPassword")
    if success == false {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        certStore.DisposeCertStore()
        jsonCN.DisposeJsonObject()
        cert.DisposeCert()
        cert2.DisposeCert()
        return
    }

    // Select an IMAP mailbox
    success = imap.SelectMailbox("Inbox")
    if success == false {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        certStore.DisposeCertStore()
        jsonCN.DisposeJsonObject()
        cert.DisposeCert()
        cert2.DisposeCert()
        return
    }

    // Get the message IDs of all the emails in the mailbox
    fetchUids := true
    messageSet := chilkat.NewMessageSet()
    success = imap.QueryMbx("ALL",fetchUids,messageSet)
    if success == false {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        certStore.DisposeCertStore()
        jsonCN.DisposeJsonObject()
        cert.DisposeCert()
        cert2.DisposeCert()
        messageSet.DisposeMessageSet()
        return
    }

    // Fetch the emails into a bundle object:
    bundle := chilkat.NewEmailBundle()
    headersOnly := false
    success = imap.FetchMsgSet(headersOnly,messageSet,bundle)
    if success == false {
        fmt.Println(imap.LastErrorText())
        imap.DisposeImap()
        certStore.DisposeCertStore()
        jsonCN.DisposeJsonObject()
        cert.DisposeCert()
        cert2.DisposeCert()
        messageSet.DisposeMessageSet()
        bundle.DisposeEmailBundle()
        return
    }

    // Loop over the bundle and display the FROM and SUBJECT of each.
    email := chilkat.NewEmail()
    i := 0
    numEmails := bundle.MessageCount()
    for i < numEmails {
        bundle.EmailAt(i,email)

        fmt.Println(email.From())
        fmt.Println(email.Subject())
        fmt.Println("--")
        i = i + 1
    }

    // Disconnect from the IMAP server.
    success = imap.Disconnect()

    imap.DisposeImap()
    certStore.DisposeCertStore()
    jsonCN.DisposeJsonObject()
    cert.DisposeCert()
    cert2.DisposeCert()
    messageSet.DisposeMessageSet()
    bundle.DisposeEmailBundle()
    email.DisposeEmail()