public static void __Register(IntPtr L)
{
LuaDLL.lua_newtable(L);
LuaDLL.lua_pushstring(L, "LuaProfiler");
LuaDLL.lua_newtable(L);
LuaDLL.lua_pushstring(L, "BeginSample");
LuaDLL.lua_pushstdcallcfunction(L, beginSample);
LuaDLL.lua_rawset(L, -3);
LuaDLL.lua_pushstring(L, "EndSample");
LuaDLL.lua_pushstdcallcfunction(L, endSample);
LuaDLL.lua_rawset(L, -3);
LuaDLL.lua_pushstring(L, "BeginSampleCustom");
LuaDLL.lua_pushstdcallcfunction(L, beginSampleCustom);
LuaDLL.lua_rawset(L, -3);
LuaDLL.lua_pushstring(L, "EndSampleCustom");
LuaDLL.lua_pushstdcallcfunction(L, endSample);
LuaDLL.lua_rawset(L, -3);
LuaDLL.lua_rawset(L, -3);
LuaDLL.lua_setglobal(L, "MikuLuaProfiler");
LuaDLL.lua_pushstdcallcfunction(L, unpackReturnValue);
LuaDLL.lua_setglobal(L, "miku_unpack_return_value");
LuaDLL.lua_pushstdcallcfunction(L, addRefFunInfo);
LuaDLL.lua_setglobal(L, "miku_add_ref_fun_info");
LuaDLL.lua_pushstdcallcfunction(L, removeRefFunInfo);
LuaDLL.lua_setglobal(L, "miku_remove_ref_fun_info");
LuaDLL.lua_pushstdcallcfunction(L, checkType);
LuaDLL.lua_setglobal(L, "miku_check_type");
LuaDLL.lua_pushstdcallcfunction(L, handleError);
LuaDLL.lua_setglobal(L, "miku_handle_error");
LuaDLL.lua_newtable(L);
LuaDLL.lua_setglobal(L, "MikuLuaProfilerStrTb");
LuaLib.DoString(L, get_ref_string);
LuaLib.DoString(L, null_script);
LuaLib.DoString(L, diff_script);
}
public static void __Register(IntPtr L)
{
LuaDLL.lua_newtable(L);
LuaDLL.lua_pushstring(L, "LuaProfiler");
LuaDLL.lua_newtable(L);
LuaDLL.lua_pushstring(L, "BeginSample");
LuaDLL.lua_pushstdcallcfunction(L, beginSample);
LuaDLL.lua_rawset(L, -3);
LuaDLL.lua_pushstring(L, "EndSample");
LuaDLL.lua_pushstdcallcfunction(L, endSample);
LuaDLL.lua_rawset(L, -3);
LuaDLL.lua_pushstring(L, "BeginSampleCustom");
LuaDLL.lua_pushstdcallcfunction(L, beginSampleCustom);
LuaDLL.lua_rawset(L, -3);
LuaDLL.lua_pushstring(L, "EndSampleCustom");
LuaDLL.lua_pushstdcallcfunction(L, endSample);
LuaDLL.lua_rawset(L, -3);
LuaDLL.lua_rawset(L, -3);
LuaDLL.lua_setglobal(L, "MikuLuaProfiler");
LuaDLL.lua_pushstdcallcfunction(L, unpackReturnValue);
LuaDLL.lua_setglobal(L, "miku_unpack_return_value");
LuaDLL.lua_pushstdcallcfunction(L, checkType);
LuaDLL.lua_setglobal(L, "miku_check_type");
LuaDLL.lua_pushstdcallcfunction(L, handleError);
LuaDLL.lua_setglobal(L, "miku_handle_error");
LuaDLL.lua_newtable(L);
LuaDLL.lua_setglobal(L, "MikuLuaProfilerStrTb");
}
public static void Record()
{
IntPtr L = LuaProfiler.mainL;
if (L == IntPtr.Zero)
{
return;
}
isHook = false;
ClearRecord();
Resources.UnloadUnusedAssets();
// 调用C# LuaTable LuaFunction WeakTable的析构 来清理掉lua的 ref
GC.Collect();
// 清理掉C#强ref后，顺便清理掉很多弱引用
LuaDLL.lua_gc(L, LuaGCOptions.LUA_GCCOLLECT, 0);
int oldTop = LuaDLL.lua_gettop(L);
LuaDLL.lua_getglobal(L, "miku_handle_error");
LuaDLL.lua_getglobal(L, "miku_do_record");
LuaDLL.lua_getglobal(L, "_G");
LuaDLL.lua_pushstring(L, "");
LuaDLL.lua_pushstring(L, "_G");
//recrod
LuaDLL.lua_newtable(L);
historyRef = LuaDLL.luaL_ref(L, LuaIndexes.LUA_REGISTRYINDEX);
LuaDLL.lua_getref(L, historyRef);
//history
LuaDLL.lua_pushnil(L);
//null_list
LuaDLL.lua_newtable(L);
if (LuaDLL.lua_pcall(L, 6, 0, oldTop + 1) == 0)
{
LuaDLL.lua_remove(L, oldTop + 1);
}
LuaDLL.lua_settop(L, oldTop);
oldTop = LuaDLL.lua_gettop(L);
LuaDLL.lua_getglobal(L, "miku_handle_error");
LuaDLL.lua_getglobal(L, "miku_do_record");
LuaDLL.lua_pushvalue(L, LuaIndexes.LUA_REGISTRYINDEX);
LuaDLL.lua_pushstring(L, "");
LuaDLL.lua_pushstring(L, "_R");
LuaDLL.lua_getref(L, historyRef);
//history
LuaDLL.lua_pushnil(L);
//null_list
LuaDLL.lua_newtable(L);
if (LuaDLL.lua_pcall(L, 6, 0, oldTop + 1) == 0)
{
LuaDLL.lua_remove(L, oldTop + 1);
}
LuaDLL.lua_settop(L, oldTop);
isHook = true;
}
public static LuaDiffInfo RecordStatic()
{
IntPtr L = LuaProfiler.mainL;
if (L == IntPtr.Zero)
{
return(null);
}
LuaDLL.isHook = false;
ClearStaticRecord();
Resources.UnloadUnusedAssets();
// 调用C# LuaTable LuaFunction WeakTable的析构 来清理掉lua的 ref
GC.Collect();
// 清理掉C#强ref后，顺便清理掉很多弱引用
LuaDLL.lua_gc_unhook(L, LuaGCOptions.LUA_GCCOLLECT, 0);
int oldTop = LuaDLL.lua_gettop(L);
LuaDLL.lua_getglobal(L, "miku_handle_error");
LuaDLL.lua_getglobal(L, "miku_do_record");
LuaDLL.lua_getglobal(L, "_G");
LuaDLL.lua_pushstring(L, "");
LuaDLL.lua_pushstring(L, "_G");
//recrod
LuaDLL.lua_newtable(L);
staticHistoryRef = LuaDLL.luaL_ref(L, LuaIndexes.LUA_REGISTRYINDEX);
LuaDLL.lua_getref(L, staticHistoryRef);
//history
LuaDLL.lua_pushnil(L);
//null_list
LuaDLL.lua_newtable(L);
LuaDLL.lua_pushvalue(L, -1);
int nullObjectRef = LuaDLL.luaL_ref(L, LuaIndexes.LUA_REGISTRYINDEX);
if (LuaDLL.lua_pcall(L, 6, 0, oldTop + 1) == 0)
{
LuaDLL.lua_remove(L, oldTop + 1);
}
LuaDLL.lua_settop(L, oldTop);
oldTop = LuaDLL.lua_gettop(L);
LuaDLL.lua_getglobal(L, "miku_handle_error");
LuaDLL.lua_getglobal(L, "miku_do_record");
LuaDLL.lua_pushvalue(L, LuaIndexes.LUA_REGISTRYINDEX);
LuaDLL.lua_pushstring(L, "");
LuaDLL.lua_pushstring(L, "_R");
LuaDLL.lua_getref(L, staticHistoryRef);
//history
LuaDLL.lua_pushnil(L);
//null_list
LuaDLL.lua_getref(L, nullObjectRef);
if (LuaDLL.lua_pcall(L, 6, 0, oldTop + 1) == 0)
{
LuaDLL.lua_remove(L, oldTop + 1);
}
LuaDLL.lua_settop(L, oldTop);
LuaDiffInfo ld = LuaDiffInfo.Create();
SetTable(nullObjectRef, ld.nullRef, ld.nullDetail);
LuaDLL.lua_unref(L, nullObjectRef);
LuaDLL.isHook = true;
return(ld);
}
