Unicode C

Load .eml and Examine the Structure, Attachments, and Related Items

See more Email Object Examples

Demonstrates how to load examine the MIME structure of a .eml, and also examine the attachment and related item filenames, attached messages, and multipart/report and DSN information. Unicode C

#include <C_CkMimeW.h>
#include <C_CkEmailW.h>
#include <C_CkJsonObjectW.h>

void ChilkatSample(void)
    {
    BOOL success;
    const wchar_t *emlPath;
    HCkMimeW mime;
    HCkEmailW email;
    int i;
    int numAttach;
    int numRelated;
    HCkEmailW em;
    int numAttachedMessages;
    int numReports;
    HCkJsonObjectW jsonDsnInfo;

    success = FALSE;

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

    emlPath = L"C:/AAWorkarea/beatrix/roesner.eml";

    mime = CkMimeW_Create();

    success = CkMimeW_LoadMimeFile(mime,emlPath);
    if (success == FALSE) {
        wprintf(L"%s\n",CkMimeW_lastErrorText(mime));
        CkMimeW_Dispose(mime);
        return;
    }

    wprintf(L"---- MIME structure ----\n");
    wprintf(L"%s\n",CkMimeW_getStructure(mime,L"text"));
    wprintf(L"------------------------\n");

    email = CkEmailW_Create();
    success = CkEmailW_LoadEml(email,emlPath);

    // Was this a signed and/or encrypted email?
    // If so, then loading the .eml automatically unwraps
    // (i.e. verifies signatures and decrypts) and the resultant
    // email is what existed prior to signing/encrypting.
    wprintf(L"Email was Signed: %d\n",CkEmailW_getReceivedSigned(email));
    wprintf(L"Email was Encrypted: %d\n",CkEmailW_getReceivedEncrypted(email));
    if (CkEmailW_getReceivedSigned(email) == TRUE) {
        wprintf(L"Signature(s) valid = %d\n",CkEmailW_getSignaturesValid(email));
    }

    if (CkEmailW_getReceivedEncrypted(email) == TRUE) {
        wprintf(L"Decrypted successfully = %d\n",CkEmailW_getDecrypted(email));
    }

    i = 0;
    numAttach = CkEmailW_getNumAttachments(email);
    wprintf(L"Number of attachments = %d\n",numAttach);

    while (i < numAttach) {
        wprintf(L"---- Attachment %d\n",i);

        // Examine the filename (if any)
        wprintf(L"filename: %s\n",CkEmailW_getAttachmentFilename(email,i));
        // Examine the content-ID (if any)
        wprintf(L"Content-ID: %s\n",CkEmailW_getAttachmentContentID(email,i));
        // Examine the content-type
        wprintf(L"Content-Type: %s\n",CkEmailW_getAttachmentContentType(email,i));
        // Examine the content-disposition
        wprintf(L"Content-Disposition%s\n",CkEmailW_getAttachmentHeader(email,i,L"content-disposition"));
        // Examine the attachment size:
        wprintf(L"Size (in bytes) of the attachment: %d\n",CkEmailW_GetAttachmentSize(email,i));

        i = i + 1;
    }

    wprintf(L"--\n");

    // Now for the related items.

    // Note: A MIME sub-part can potentially be both a related item AND an attachment.
    // The typical case is when the item is contained under the multipart/related enclosure and 
    // the item also has a "Content-Disposition" header indicating "attachment".
    // The location within multipart/related makes it a "related item", yet the Content-Disposition can also make it semantically an attachment.
    // Related items and attachments are not necessarily mutually exclusive.

    numRelated = CkEmailW_getNumRelatedItems(email);
    wprintf(L"Number of related items = %d\n",numRelated);
    i = 0;
    while (i < numRelated) {
        wprintf(L"---- Related Item %d\n",i);

        // Examine the filename (if any)
        wprintf(L"filename: %s\n",CkEmailW_getRelatedFilename(email,i));
        // Examine the content-ID (if any)
        wprintf(L"Content-ID: %s\n",CkEmailW_getRelatedContentID(email,i));
        // Examine the content-type
        wprintf(L"Content-Type: %s\n",CkEmailW_getRelatedContentType(email,i));
        // Examine the content-location (if any)
        wprintf(L"Content-Location%s\n",CkEmailW_getRelatedContentLocation(email,i));

        i = i + 1;
    }

    // The email could also have attached messages.
    // An attached message is another email that was attached to this email.
    em = CkEmailW_Create();
    numAttachedMessages = CkEmailW_getNumAttachedMessages(email);
    wprintf(L"Number of attached messages = %d\n",numAttachedMessages);
    i = 0;
    while (i < numAttachedMessages) {
        wprintf(L"---- Attached message %d\n",i);

        // Examine the attached email
        CkEmailW_GetAttachedEmail(email,i,em);
        wprintf(L"from: %s\n",CkEmailW_ck_from(em));
        wprintf(L"subject: %s\n",CkEmailW_subject(em));
        i = i + 1;
    }

    // An email could also be a multipart/report email. 
    // This is a DSN (Delivery Status Notification)
    // The NumReports property indicates how many "reports" exist.
    numReports = CkEmailW_getNumReports(email);
    wprintf(L"Number of reports = %d\n",numReports);
    i = 0;
    while (i < numReports) {
        wprintf(L"---- Report %d\n",i);
        // Get the raw report data...
        wprintf(L"%s\n",CkEmailW_getReport(email,i));
        i = i + 1;
    }

    // If the email is a multipart/report, then the information
    // from the message/delivery-status part of the email can be retrieved:
    if (CkEmailW_IsMultipartReport(email) == TRUE) {

        wprintf(L"--- Delivery Status Information:\n");
        wprintf(L"Status: %s\n",CkEmailW_getDeliveryStatusInfo(email,L"Status"));
        wprintf(L"Action: %s\n",CkEmailW_getDeliveryStatusInfo(email,L"Action"));
        wprintf(L"Reporting-MTA: %s\n",CkEmailW_getDeliveryStatusInfo(email,L"Reporting-MTA"));

        jsonDsnInfo = CkJsonObjectW_Create();
        CkEmailW_GetDsnInfo(email,jsonDsnInfo);
        CkJsonObjectW_putEmitCompact(jsonDsnInfo,FALSE);
        wprintf(L"%s\n",CkJsonObjectW_emit(jsonDsnInfo));
    }



    CkMimeW_Dispose(mime);
    CkEmailW_Dispose(email);
    CkEmailW_Dispose(em);
    CkJsonObjectW_Dispose(jsonDsnInfo);

    }