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);

    }