Unicode C

IMAP Login Secure

Demonstrates how to use the LoginSecure method introduced in Chilkat v9.5.0.71. Unicode C

#include <C_CkImapW.h>
#include <C_CkJsonObjectW.h>
#include <C_CkCrypt2W.h>
#include <C_CkSecureStringW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkImapW imap;
    HCkJsonObjectW json;
    HCkCrypt2W crypt;
    HCkSecureStringW ssLogin;
    HCkSecureStringW ssPassword;

    success = FALSE;

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

    imap = CkImapW_Create();

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

    //  Imagine we've previously saved our encrypted login and password within a JSON config file
    //  that contains this:

    //  {
    //    "imap_login": "fLkxsfnVaIWLiL/R32jo6g==",
    //    "imap_password": "/NbaFBoCftBLFf8WBU9Xtw=="
    //  }

    json = CkJsonObjectW_Create();
    CkJsonObjectW_LoadFile(json,L"qa_data/passwords/imap.json");

    crypt = CkCrypt2W_Create();

    //  These are the encryption settings we previously used to encrypt the credentials within the JSON config file.
    CkCrypt2W_putCryptAlgorithm(crypt,L"aes");
    CkCrypt2W_putCipherMode(crypt,L"cbc");
    CkCrypt2W_putKeyLength(crypt,128);
    CkCrypt2W_SetEncodedKey(crypt,L"000102030405060708090A0B0C0D0E0F",L"hex");
    CkCrypt2W_SetEncodedIV(crypt,L"000102030405060708090A0B0C0D0E0F",L"hex");
    CkCrypt2W_putEncodingMode(crypt,L"base64");

    ssLogin = CkSecureStringW_Create();
    ssPassword = CkSecureStringW_Create();

    //  Decrypt to the secure string.  (the strings will still held in memory encrypted, but are now encrypted using
    //  a randomly generated session key.)
    CkCrypt2W_DecryptSecureENC(crypt,CkJsonObjectW_stringOf(json,L"imap_login"),ssLogin);
    CkCrypt2W_DecryptSecureENC(crypt,CkJsonObjectW_stringOf(json,L"imap_password"),ssPassword);

    //  Pass the credentials to the LoginSecure method:
    success = CkImapW_LoginSecure(imap,ssLogin,ssPassword);
    if (success != TRUE) {
        wprintf(L"%s\n",CkImapW_lastErrorText(imap));
        CkImapW_Dispose(imap);
        CkJsonObjectW_Dispose(json);
        CkCrypt2W_Dispose(crypt);
        CkSecureStringW_Dispose(ssLogin);
        CkSecureStringW_Dispose(ssPassword);
        return;
    }

    //  ...

    CkImapW_Disconnect(imap);


    CkImapW_Dispose(imap);
    CkJsonObjectW_Dispose(json);
    CkCrypt2W_Dispose(crypt);
    CkSecureStringW_Dispose(ssLogin);
    CkSecureStringW_Dispose(ssPassword);

    }