Verify DomainKey-Signature Headers in Downloaded Email

#include <C_CkImap.h>
#include <C_CkDkim.h>
#include <C_CkJsonObject.h>
#include <C_CkBinData.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkImap imap;
    HCkDkim dkim;
    BOOL bUid;
    int seqNum;
    int j;
    int n;
    HCkJsonObject json;
    HCkBinData mimeData;
    int numSigs;

    success = FALSE;

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

    imap = CkImap_Create();

    // Connect to an IMAP server, login, select mailbox..
    // Use TLS 
    CkImap_putSsl(imap,TRUE);
    CkImap_putPort(imap,993);
    success = CkImap_Connect(imap,"imap.example.com");
    if (success == TRUE) {
        success = CkImap_Login(imap,"myLogin","myPassword");
        if (success == TRUE) {
            success = CkImap_SelectMailbox(imap,"Inbox");
        }

    }

    if (success != TRUE) {
        printf("%s\n",CkImap_lastErrorText(imap));
        CkImap_Dispose(imap);
        return;
    }

    // Note: DKIM-Signatures are much more common than DomainKey-Signature
    // See DKIM-Signature Verify Sample.

    dkim = CkDkim_Create();

    // Download a max of 10 emails and verify any DomainKey-Signature headers
    // that are present.

    // Download emails by sequence numbers (not UIDs).
    bUid = FALSE;

    n = CkImap_getNumMessages(imap);
    if (n > 50) {
        n = 50;
    }

    json = CkJsonObject_Create();
    CkJsonObject_putEmitCompact(json,FALSE);

    // To verify DomainKey-Signature headers, we need the exact unmodified MIME bytes of each email.
    mimeData = CkBinData_Create();
    seqNum = 1;
    while (seqNum <= n) {
        // The FetchSingleBd method was introduced in v9.5.0.76
        success = CkImap_FetchSingleBd(imap,seqNum,bUid,mimeData);
        if (success != TRUE) {
            printf("%s\n",CkImap_lastErrorText(imap));
            CkImap_Dispose(imap);
            CkDkim_Dispose(dkim);
            CkJsonObject_Dispose(json);
            CkBinData_Dispose(mimeData);
            return;
        }

        // Note: DKIM-Signatures are much more common than DomainKey-Signature
        // See DKIM-Signature Verify Sample.

        // Get the number of DomainKey-Signature headers.
        numSigs = CkDkim_NumDomainKeySigs(dkim,mimeData);

        // Verify each..
        j = 0;
        while (j < numSigs) {
            printf("------ DomainKey Signature %d\n",j);

            success = CkDkim_DomainKeyVerify(dkim,j,mimeData);
            if (success != TRUE) {
                printf("Not valid.\n");
                printf("%s\n",CkDkim_lastErrorText(dkim));
            }
            else {
                printf("valid.\n");
            }

            // Show the additional information about the signature verification
            CkJsonObject_Load(json,CkDkim_verifyInfo(dkim));
            printf("%s\n",CkJsonObject_emit(json));

            // The JSON contains information such as this:

            // 	{
            // 	  "domain": "amazonses.com",
            // 	  "selector": "7v7vs6w47njt4pimodk5mmttbegzsi6n",
            // 	  "publicKey": "MIGfMA0GCSqG...v2GvWPqGHz6uqeQIDAQAB",
            // 	  "canonicalization": "relaxed/simple",
            // 	  "algorithm": "rsa-sha256",
            // 	  "signedHeaders": "Subject:From:To:Date:Mime-Version:Content-Type:References:Message-Id:Feedback-ID",
            // 	  "verified": "yes"
            // 	}

            j = j + 1;
        }

        seqNum = seqNum + 1;
    }

    success = CkImap_Disconnect(imap);


    CkImap_Dispose(imap);
    CkDkim_Dispose(dkim);
    CkJsonObject_Dispose(json);
    CkBinData_Dispose(mimeData);

    }