(Unicode C) IMAP Get List of Flags

When a mailbox is selected, the server response includes a list of flags:

The FLAGS response occurs as a result of a SELECT or EXAMINE command. The flag parenthesized list identifies the flags (at a minimum, the system-defined flags) that are applicable for this mailbox. Flags other than the system flags can also exist, depending on server implementation.

Chilkat C/C++ Library Downloads
MS Visual C/C++ Linux/CentOS C/C++ Alpine Linux C/C++ MAC OS X C/C++	armhf/aarch64 C/C++ C++ Builder iOS C/C++ Android C/C++	Solaris C/C++ MinGW C/C++

#include <C_CkImapW.h>
#include <C_CkStringBuilderW.h>
#include <C_CkStringTableW.h>

void ChilkatSample(void)
    {
    HCkImapW imap;
    BOOL success;
    const wchar_t *selectResponse;
    HCkStringBuilderW sbResponse;
    HCkStringBuilderW sbFlagList;
    int numReplaced;
    HCkStringTableW flagsTable;
    int i;

    imap = CkImapW_Create();

    // This example assumes Chilkat Imap to have been previously unlocked.
    // See Unlock Imap for sample code.

    // Connect to an IMAP server.
    // Use TLS
    CkImapW_putSsl(imap,TRUE);
    CkImapW_putPort(imap,993);
    success = CkImapW_Connect(imap,L"MY-IMAP-DOMAIN");
    if (success != TRUE) {
        wprintf(L"%s\n",CkImapW_lastErrorText(imap));
        CkImapW_Dispose(imap);
        return;
    }

    // Login
    success = CkImapW_Login(imap,L"MY-IMAP-LOGIN",L"MY-IMAP-PASSWORD");
    if (success != TRUE) {
        wprintf(L"%s\n",CkImapW_lastErrorText(imap));
        CkImapW_Dispose(imap);
        return;
    }

    // Select an IMAP mailbox
    success = CkImapW_SelectMailbox(imap,L"INBOX");
    if (success != TRUE) {
        wprintf(L"%s\n",CkImapW_lastErrorText(imap));
        CkImapW_Dispose(imap);
        return;
    }

    // The LastResponse property contains the full response of the last command.
    selectResponse = CkImapW_lastResponse(imap);
    wprintf(L"%s\n",selectResponse);

    // For example, on GMail, the SELECT response looks like this:

    // 	* FLAGS (\Answered \Flagged \Draft \Deleted \Seen $Forwarded $NotPhishing $Phishing $label1 $label2 $label3 $label4 $label5 Junk NonJunk)
    // 	* OK [PERMANENTFLAGS (\Answered \Flagged \Draft \Deleted \Seen $Forwarded $NotPhishing $Phishing $label1 $label2 $label3 $label4 $label5 Junk NonJunk \*)] Flags permitted.
    // 	* OK [UIDVALIDITY 3] UIDs valid.
    // 	* 46 EXISTS
    // 	* 0 RECENT
    // 	* OK [UIDNEXT 4147] Predicted next UID.
    // 	* OK [HIGHESTMODSEQ 402971]
    // 	aaac OK [READ-WRITE] INBOX selected. (Success)

    // The goal of this example is to capture the list of FLAGS.
    // All IMAP servers will respond with the list of flags in a SPACE separated list enclosed in parentheses.

    sbResponse = CkStringBuilderW_Create();
    CkStringBuilderW_Append(sbResponse,selectResponse);

    // Get just the list of flags:
    sbFlagList = CkStringBuilderW_Create();
    CkStringBuilderW_Append(sbFlagList,CkStringBuilderW_getAfterBetween(sbResponse,L"* FLAGS",L"(",L")"));
    wprintf(L"%s\n",CkStringBuilderW_getAsString(sbFlagList));

    // sbFlagList contains this:  
    // 
    //     \Answered \Flagged \Draft \Deleted \Seen $Forwarded $NotPhishing $Phishing $label1 $label2 $label3 $label4 $label5 Junk NonJunk
    // 

    // Make sure no more than one SPACE char in a row exists.
    CkStringBuilderW_TrimInsideSpaces(sbFlagList);
    // Modify sbFlagList to one flag per line
    numReplaced = CkStringBuilderW_Replace(sbFlagList,L" ",L"\r\n");

    // Load a StringTable with the flag names.
    flagsTable = CkStringTableW_Create();
    CkStringTableW_AppendFromSb(flagsTable,sbFlagList);

    // Iterate over the individual flag names:
    i = 0;
    while (i < CkStringTableW_getCount(flagsTable)) {
        wprintf(L"%d: %s\n",i,CkStringTableW_stringAt(flagsTable,i));
        i = i + 1;
    }

    // The output is:
    // 
    // 	0: \Answered
    // 	1: \Flagged
    // 	2: \Draft
    // 	3: \Deleted
    // 	4: \Seen
    // 	5: $Forwarded
    // 	6: $NotPhishing
    // 	7: $Phishing
    // 	8: $label1
    // 	9: $label2
    // 	10: $label3
    // 	11: $label4
    // 	12: $label5
    // 	13: Junk
    // 	14: NonJunk
    // 


    CkImapW_Dispose(imap);
    CkStringBuilderW_Dispose(sbResponse);
    CkStringBuilderW_Dispose(sbFlagList);
    CkStringTableW_Dispose(flagsTable);

    }