runtime exception debugger callback

[morgoth990]

I'm trying to get debug information after a runtime exception using the same code I use during debug callbacks.
The problem is that lua_getlocal throw an exception if called after lua_resume is complete.
I'm wondering if there is another method or a callback I've missed.

class StacktraceEntry
{
public:

	class VarInfo
	{
	public:
		std::string name;
		int type;
		std::any value;

		std::string ToJson();
	};

	std::string name;
	int line;
	std::string source;
	std::vector<VarInfo> upVals;
	std::vector<VarInfo> params;
	std::vector<VarInfo> locals;

	std::string ToJson();
};

class Stacktrace
{
public:
	std::vector<StacktraceEntry> entries;

	std::string ToJson();
};

Stacktrace get_stacktrace(lua_State* L, bool fullData)
{
	lua_Debug debugInfo;
	Stacktrace stacktrace;
	for (int level = 0; lua_getinfo(L, level, "sluan", &debugInfo); ++level)
	{
		StacktraceEntry entry;
		entry.name = (debugInfo.name == nullptr ? "" : debugInfo.name);
		entry.line = debugInfo.currentline;
		entry.source = debugInfo.source;

		if (fullData)
		{
			int i = 1;
			while (true)
			{
				const char* localName = lua_getlocal(L, level, i);
				if (localName == nullptr)
					break;

				StacktraceEntry::VarInfo varInfo;
				varInfo.name = localName;
				varInfo.type = lua_type(L, -1);

				switch (varInfo.type)
				{
				case LUA_TBOOLEAN:
					varInfo.value = (bool)lua_toboolean(L, -1);
					break;
				case LUA_TNUMBER:
					varInfo.value = lua_tonumber(L, -1);
					break;
				case LUA_TSTRING:
					varInfo.value = lua_tostring(L, -1);
					break;
				}

				if (varInfo.value.has_value())
					entry.locals.push_back(varInfo);

				lua_pop(L, 1);
				i++;
			}

			i = 1;
			while (true)
			{
				if (lua_getargument(L, level, i) == 0)
					break;

				StacktraceEntry::VarInfo varInfo;
				varInfo.name = to_string(i);
				varInfo.type = lua_type(L, -1);

				switch (varInfo.type)
				{
				case LUA_TBOOLEAN:
					varInfo.value = (bool)lua_toboolean(L, -1);
					break;
				case LUA_TNUMBER:
					varInfo.value = lua_tonumber(L, -1);
					break;
				case LUA_TSTRING:
					varInfo.value = lua_tostring(L, -1);
					break;
				}

				if (varInfo.value.has_value())
					entry.params.push_back(varInfo);

				lua_pop(L, 1);
				i++;
			}

			lua_Debug _ar = {};
			lua_getinfo(L, 0, "f", &_ar);
			i = 1;
			while (true)
			{
				const char* upVname = lua_getupvalue(L, -1, i);
				if (upVname == nullptr)
					break;

				StacktraceEntry::VarInfo varInfo;
				varInfo.name = upVname;
				varInfo.type = lua_type(L, -1);

				switch (varInfo.type)
				{
				case LUA_TBOOLEAN:
					varInfo.value = (bool)lua_toboolean(L, -1);
					break;
				case LUA_TNUMBER:
					varInfo.value = lua_tonumber(L, -1);
					break;
				case LUA_TSTRING:
					varInfo.value = lua_tostring(L, -1);
					break;
				}

				if (varInfo.value.has_value())
					entry.upVals.push_back(varInfo);

				lua_pop(L, 1);
				i++;
			}
			lua_pop(L, 1);
		}

		stacktrace.entries.push_back(entry);
	}

	return stacktrace;
}

[zeux]

lua_getlocal and others push values on stack so they need lua_checkstack to be called to make sure there's stack space available on the errored thread.

[morgoth990]

perfect, thank you