Function CascImportKeysFromString

src/External/CascLib/src/CascDecrypt.cpp:840–896

}

bool WINAPI CascImportKeysFromString(HANDLE hStorage, LPCSTR szKeyList)
{
    // Verify parameters
    if(TCascStorage::IsValid(hStorage) == NULL || szKeyList == NULL || szKeyList[0] == 0)
    {
        SetCascError(ERROR_INVALID_PARAMETER);
        return false;
    }

    // Parse text file
    while(szKeyList[0])
    {
        ULONGLONG KeyName = 0;
        DWORD dwErrCode;
        BYTE KeyValue[CASC_KEY_LENGTH];

        // Capture key name
        dwErrCode = ConvertStringToInt(szKeyList, 0, KeyName, &szKeyList);
        if(dwErrCode != ERROR_SUCCESS)
        {
            SetCascError(dwErrCode);
            return false;
        }

        // TACT key list downloaded from https://wow.tools/api.php?type=tactkeys ends with a single zero
        if(KeyName == 0)
            break;

        // We only expect spaces and tabs at this point. Anything else will lead
        // to end of the loop.
        while(szKeyList[0] == 0x09 || szKeyList[0] == 0x20)
            szKeyList++;
        if(szKeyList[0] == 0x0A || szKeyList[0] == 0x0D)
            break;

        // Convert the string to binary
        dwErrCode = BinaryFromString(szKeyList, CASC_KEY_LENGTH * 2, KeyValue);
        if(dwErrCode != ERROR_SUCCESS)
        {
            SetCascError(dwErrCode);
            return false;
        }

        // Add the encryption key. Note that if the key already exists with the same value,
        // CascAddEncryptionKey will consider it success.
        if(!CascAddEncryptionKey(hStorage, KeyName, KeyValue))
            return false;

        // Move to the next key
        while(szKeyList[0] != 0 && szKeyList[0] != 0x0A && szKeyList[0] != 0x0D)
            szKeyList++;
        while(szKeyList[0] == 0x0A || szKeyList[0] == 0x0D)
            szKeyList++;
    }

    return true;
}