/**
 * The Forgotten Server - a free and open-source MMORPG server emulator
 * Copyright (C) 2019  Mark Samman <mark.samman@gmail.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License along
 * with this program; if not, write to the Free Software Foundation, Inc.,
 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */

#include "otpch.h"

#include "script.h"
#include <boost/filesystem.hpp>
#include "configmanager.h"

extern LuaEnvironment g_luaEnvironment;
extern ConfigManager g_config;

Scripts::Scripts() :
    scriptInterface("Scripts Interface")
{
    scriptInterface.initState();
}

Scripts::~Scripts()
{
    scriptInterface.reInitState();
}

bool Scripts::loadScripts(std::string folderName, bool isLib, bool reload)
{
    namespace fs = boost::filesystem;

    const auto dir = fs::current_path() / "data" / folderName;
    if(!fs::exists(dir) || !fs::is_directory(dir)) {
        std::cout << "[Warning - Scripts::loadScripts] Can not load folder '" << folderName << "'." << std::endl;
        return false;
    }

    fs::recursive_directory_iterator endit;
    std::vector<fs::path> v;
    std::string disable = ("#");
    std::string noShow = ("!");
    for(fs::recursive_directory_iterator it(dir); it != endit; ++it) {
        auto fn = it->path().parent_path().filename();
        if ((fn == "lib" && !isLib) || fn == "events") {
            continue;
        }
        if(fs::is_regular_file(*it) && it->path().extension() == ".lua") {
            size_t found = it->path().filename().string().find(disable);
            size_t found2 = it->path().filename().string().find(noShow);
            if (found != std::string::npos) {
                if (g_config.getBoolean(ConfigManager::SCRIPTS_CONSOLE_LOGS) && found2 != std::string::npos) {
                    std::cout << "> " << it->path().filename().string() << " [disabled]" << std::endl;
                }
                continue;
            }
            v.push_back(it->path());
        }
    }
    sort(v.begin(), v.end());
    std::string redir;
    for (auto it = v.begin(); it != v.end(); ++it) {
        const std::string scriptFile = it->string();
        if (!isLib) {
            if (redir.empty() || redir != it->parent_path().string()) {
                auto p = fs::path(it->relative_path());
                if (g_config.getBoolean(ConfigManager::SCRIPTS_CONSOLE_LOGS)) {
                    std::cout << ">> [" << p.parent_path().filename() << "]" << std::endl;
                }
                redir = it->parent_path().string();
            }
        }

        if(scriptInterface.loadFile(scriptFile) == -1) {
            std::cout << "> " << it->filename().string() << " [error]" << std::endl;
            std::cout << "^ " << scriptInterface.getLastLuaError() << std::endl;
            continue;
        }

        if (g_config.getBoolean(ConfigManager::SCRIPTS_CONSOLE_LOGS)) {
            if (!reload) {
                std::cout << "> " << it->filename().string() << " [loaded]" << std::endl;
            } else {
                std::cout << "> " << it->filename().string() << " [reloaded]" << std::endl;
            }
        }
    }

    return true;
}