///|/ Copyright (c) Prusa Research 2021 David Kocík @kocikdav, Vojtěch Bubník @bubnikv
///|/ Copyright (c) 2021 Justin Schuh @jschuh
///|/
///|/ PrusaSlicer is released under the terms of the AGPLv3 or higher
///|/
#include "BlacklistedLibraryCheck.hpp"

#ifdef  WIN32
#include <psapi.h>
# endif //WIN32

namespace Slic3r {

#ifdef  WIN32

//only dll name with .dll suffix - currently case sensitive
const std::vector<std::wstring> BlacklistedLibraryCheck::blacklist({ L"NahimicOSD.dll", L"SS2OSD.dll", L"amhook.dll", L"AMHook.dll" });

bool BlacklistedLibraryCheck::get_blacklisted(std::vector<std::wstring>& names)
{
    if (m_found.empty())
        return false;
    for (const auto& lib : m_found)
        names.emplace_back(lib);
    return true;
}

std::wstring BlacklistedLibraryCheck::get_blacklisted_string()
{
    std::wstring ret;
    for (const auto& lib : m_found)
        ret += lib + L"\n";
    return ret;
}

bool BlacklistedLibraryCheck::perform_check()
{   
    // Get the pseudo-handle for the current process.
    HANDLE  hCurrentProcess = GetCurrentProcess();

    // Get a list of all the modules in this process.
    HMODULE hMods[1024];
    DWORD   cbNeeded;
    if (EnumProcessModulesEx(hCurrentProcess, hMods, sizeof(hMods), &cbNeeded, LIST_MODULES_ALL))
    {
        //printf("Total Dlls: %d\n", cbNeeded / sizeof(HMODULE));
        for (unsigned int i = 0; i < cbNeeded / sizeof(HMODULE); ++ i)
        {
            wchar_t szModName[MAX_PATH];
            // Get the full path to the module's file.
            if (GetModuleFileNameExW(hCurrentProcess, hMods[i], szModName, MAX_PATH))
            {
                // Add to list if blacklisted
                if (BlacklistedLibraryCheck::is_blacklisted(szModName)) {
                    //wprintf(L"Contains library: %s\n", szModName);
                    if (std::find(m_found.begin(), m_found.end(), szModName) == m_found.end())
                        m_found.emplace_back(szModName);
                } 
                //wprintf(L"%s\n", szModName);
            }
        }
    }

    //printf("\n");
    return !m_found.empty();
}

bool BlacklistedLibraryCheck::is_blacklisted(const std::wstring &dllpath)
{
    std::wstring dllname = boost::filesystem::path(dllpath).filename().wstring();
    //std::transform(dllname.begin(), dllname.end(), dllname.begin(), std::tolower);
    if (std::find(BlacklistedLibraryCheck::blacklist.begin(), BlacklistedLibraryCheck::blacklist.end(), dllname) != BlacklistedLibraryCheck::blacklist.end()) {
        //std::wprintf(L"%s is blacklisted\n", dllname.c_str());
        return true;
    }
    //std::wprintf(L"%s is NOT blacklisted\n", dllname.c_str());
    return false;
}
bool BlacklistedLibraryCheck::is_blacklisted(const std::string &dllpath)
{
    return BlacklistedLibraryCheck::is_blacklisted(boost::nowide::widen(dllpath));
}

#endif //WIN32

} // namespace Slic3r
