#include "api_lua.h"
#include "lua_commons.h"

#include "LuaState.h"

#include "../../../coders/json.h"
#include "../../../data/dynamic.h"

namespace scripting {
    extern lua::LuaState* state;
}

static int l_json_stringify(lua_State* L) {
    auto value = scripting::state->tovalue(1);
    if (value->type != dynamic::valtype::map) {
        luaL_error(L, "table expected");
        return 0;
    }
    bool nice = lua_toboolean(L, 2);
    auto string = json::stringify(std::get<dynamic::Map*>(value->value), nice, "  ");
    lua_pushstring(L, string.c_str());
    return 1;
}

static int l_json_parse(lua_State* L) {
    auto string = lua_tostring(L, 1);
    auto element = json::parse("<string>", string);
    auto value = std::make_unique<dynamic::Value>(
        dynamic::valtype::map, element.release()
    );
    scripting::state->pushvalue(*value);
    return 1;
}

const luaL_Reg jsonlib [] = {
    {"stringify", lua_wrap_errors<l_json_stringify>},
    {"parse", lua_wrap_errors<l_json_parse>},
    {NULL, NULL}
};