Function FCEU_LoadLuaCode

src/lua-engine.cpp:6388–6558

* Loads and runs the given Lua script. * The emulator MUST be paused for this function to be * called. Otherwise, all frame boundary assumptions go out the window. * * Returns true on success, false on failure. */

 * Returns true on success, false on failure.
 */
int FCEU_LoadLuaCode(const char *filename, const char *arg) 
{
	if (!DemandLua())
	{
		return 0;
	}

	if (filename != luaScriptName)
	{
		if (luaScriptName) free(luaScriptName);
		luaScriptName = strdup(filename);
	}

	std::string getfilepath = filename;

	getfilepath = getfilepath.substr(0,getfilepath.find_last_of("/\\") + 1);

	if ( SetCurrentDir(getfilepath.c_str()) != 0 )
	{
		FCEU_printf("Warning: Failed chdir failed to set current dir to: %s\n", getfilepath.c_str() );
	}

	//stop any lua we might already have had running
	FCEU_LuaStop();

	//Reinit the error count
	luaexiterrorcount = 8;

	if (!L) {

		L = lua_open();
		luaL_openlibs(L);
		#if defined( __WIN_DRIVER__) && !defined(NEED_MINGW_HACKS)
		iuplua_open(L);
		iupcontrolslua_open(L);
		luaopen_winapi(L);
		imlua_open(L);
		cdlua_open(L);
		cdluaim_open(L);

		//luasocket - yeah, have to open this in a weird way
		lua_pushcfunction(L,luaopen_socket_core);
		lua_setglobal(L,"tmp");
		luaL_dostring(L, "package.preload[\"socket.core\"] = _G.tmp");
		lua_pushcfunction(L,luaopen_mime_core);
		lua_setglobal(L,"tmp");
		luaL_dostring(L, "package.preload[\"mime.core\"] = _G.tmp");
		#endif

		luaL_register(L, "emu", emulib); // added for better cross-emulator compatibility
		luaL_register(L, "FCEU", emulib); // kept for backward compatibility
		luaL_register(L, "memory", memorylib);
		luaL_register(L, "ppu", ppulib);
		luaL_register(L, "rom", romlib);
		luaL_register(L, "joypad", joypadlib);
		luaL_register(L, "zapper", zapperlib);
		luaL_register(L, "input", inputlib);
		lua_settop(L, 0); // clean the stack, because each call to luaL_register leaves a table on top (eventually overflows)