// Copyright (C) 2024 The Qt Company Ltd.
// SPDX-License-Identifier: LicenseRef-Qt-Commercial OR GPL-3.0-only WITH Qt-GPL-exception-1.0

#pragma once

#include "lua_global.h"

#include <utils/filepath.h>
#include <utils/lua.h>

#include <sol/sol.hpp>

// this needs to be included after sol/sol.hpp!
#include "luaqttypes.h"

#include <QJsonValue>

#include <memory>

namespace Lua {
class LuaPluginSpec;

struct CoroutineState
{
    bool isMainThread;
};

struct ScriptPluginSpec
{
    static QObject *setup(
        sol::state_view lua,
        const QString &id,
        const QString &name,
        const Utils::FilePath appDataPath,
        const Utils::FilePath pluginLocation);

    QString id;
    QString name;
    Utils::FilePath appDataPath;
    std::unique_ptr<QObject> connectionGuard;
};

using PackageProvider = std::function<sol::object(sol::state_view)>;

LUA_EXPORT Utils::Result<LuaPluginSpec *> loadPlugin(const Utils::FilePath &path);
LUA_EXPORT Utils::Result<sol::protected_function> prepareSetup(
    sol::state_view lua, const LuaPluginSpec &pluginSpec);

LUA_EXPORT void registerProvider(const QString &packageName, const PackageProvider &provider);
LUA_EXPORT void registerProvider(const QString &packageName, const Utils::FilePath &path);
LUA_EXPORT void autoRegister(const std::function<void(sol::state_view)> &registerFunction);
LUA_EXPORT void registerHook(
    QString name, const std::function<void(sol::function, QObject *guard)> &hookProvider);

LUA_EXPORT bool isCoroutine(lua_State *state);

LUA_EXPORT sol::table toTable(const sol::state_view &lua, const QJsonValue &v);
LUA_EXPORT sol::table toTable(const sol::state_view &lua, const QJsonDocument &doc);

LUA_EXPORT QJsonValue toJson(const sol::table &t);
LUA_EXPORT QString toJsonString(const sol::table &t);

template<class T>
void checkKey(const sol::table &table, const QString &key)
{
    if (table[key].template is<T>())
        return;
    if (!table[key].valid())
        throw sol::error("Expected " + key.toStdString() + " to be defined");
    throw sol::error(
        "Expected " + key.toStdString() + " to be of type " + sol::detail::demangle<T>());
}

LUA_EXPORT QStringList variadicToStringList(const sol::variadic_args &vargs);

template<typename R, typename... Args>
static Utils::Result<R> safe_call(const sol::protected_function &function, Args &&...args)
{
    sol::protected_function_result result = function(std::forward<Args>(args)...);
    if (!result.valid()) {
        sol::error err = result;
        return Utils::make_unexpected(QString::fromLocal8Bit(err.what()));
    }
    try {
        return result.get<R>();
    } catch (std::runtime_error &e) {
        return Utils::make_unexpected(QString::fromLocal8Bit(e.what()));
    }
}

template<typename... Args>
static Utils::Result<> void_safe_call(
    const sol::protected_function &function, Args &&...args)
{
    sol::protected_function_result result = function(std::forward<Args>(args)...);
    if (!result.valid()) {
        sol::error err = result;
        return Utils::make_unexpected(QString::fromLocal8Bit(err.what()));
    }
    return {};
}

// Runs the given script in a new Lua state. The returned Object manages the lifetime of the state.
LUA_EXPORT std::unique_ptr<Utils::LuaState> runScript(
    const QString &script,
    const QString &name,
    std::function<void(sol::state &)> customizeState = {});

sol::protected_function_result runFunction(
    sol::state &lua,
    const QString &script,
    const QString &name,
    std::function<void(sol::state &)> customizeState = {});

void setupLuaEngine(QObject *guard);

class Null
{};

} // namespace Lua
