Function FCEU_LuaHookFunction

src/lua-engine.cpp:5917–5963

The function called periodically to ensure Lua doesn't run amok.

// The function called periodically to ensure Lua doesn't run amok.
FCEU_MAYBE_UNUSED
static void FCEU_LuaHookFunction(lua_State *L, lua_Debug *dbg) {

	if (numTries-- == 0) {

		int kill = 0;

#ifdef __WIN_DRIVER__
		// Uh oh
				//StopSound(); //mbg merge 7/23/08
		int ret = MessageBox(hAppWnd, "The Lua script running has been running a long time. It may have gone crazy. Kill it?\n\n(No = don't check anymore either)", "Lua Script Gone Nuts?", MB_YESNO);

		if (ret == IDYES) {
			kill = 1;
		}

#else
		if ( LuaKillMessageBox() )
		{
			kill = 1;
		}
		//fprintf(stderr, "The Lua script running has been running a long time.\nIt may have gone crazy. Kill it? (I won't ask again if you say No)\n");
		//char buffer[64];
		//while (TRUE) {
		//	fprintf(stderr, "(y/n): ");
		//	fgets(buffer, sizeof(buffer), stdin);
		//	if (buffer[0] == 'y' || buffer[0] == 'Y') {
		//		kill = 1;
		//		break;
		//	}

		//	if (buffer[0] == 'n' || buffer[0] == 'N')
		//		break;
		//}
#endif

		if (kill) {
			luaL_error(L, "Killed by user request.");
			FCEU_LuaOnStop();
		}

		// else, kill the debug hook.
		lua_sethook(L, NULL, 0, 0);
	}


}

static void emu_exec_count_hook(lua_State *L, lua_Debug *dbg) {
	luaL_error(L, "exec_count timeout");