#include #include "logging/logging.h" int _honey_log_level = HONEY_WARN; void honey_set_log_level(int level) { _honey_log_level = level; } int log_fatal(lua_State *L) { //validate arguments int count = lua_gettop(L); if (count == 0) { hs_throw_error(L, "no arguments provided"); } if (!lua_isstring(L, 1)) { hs_throw_error(L, "first argument must be a string"); } lua_getglobal(L, "string"); if (lua_isnil(L, -1)) hs_throw_error(L, "'string' table is nil!"); lua_getfield(L, -1, "format"); //pushed string.format (function) to the lua stack for (int i = 1; i <= count; i++) { lua_pushvalue(L, i); } lua_call(L, count, 1); const char *str = lua_tostring(L, -1); //getting result into a string honey_log(HONEY_FATAL, "[FATAL] %s\n", str); lua_pop(L, 2); //cleaned up stack return 0; } void honey_log(int level, const char *fmt, ...) { if (level > _honey_log_level) return; va_list args; va_start(args, fmt); vfprintf(stderr, fmt, args); va_end(args); }