2022-04-29 16:40:51 +02:00

287 lines
5.7 KiB
Lua

local L0_1, L1_1, L2_1, L3_1, L4_1, L5_1, L6_1, L7_1, L8_1, L9_1, L10_1, L11_1, L12_1, L13_1
L0_1 = os
L0_1 = L0_1.clock
L1_1 = xlua
L1_1 = L1_1.sethook
if not L1_1 then
L1_1 = debug
L1_1 = L1_1.sethook
end
L2_1 = nil
L3_1 = nil
function L4_1(A0_2)
local L1_2
L1_2 = {}
L1_2.db_info = A0_2
L1_2.count = 0
L1_2.total_time = 0
return L1_2
end
function L5_1(A0_2, A1_2, A2_2)
local L3_2, L4_2, L5_2, L6_2, L7_2
L3_2 = L2_1[A1_2]
if not L3_2 then
L4_2 = L4_1
L5_2 = debug
L5_2 = L5_2.getinfo
L6_2 = 2
L7_2 = "nS"
L5_2, L6_2, L7_2 = L5_2(L6_2, L7_2)
L4_2 = L4_2(L5_2, L6_2, L7_2)
L3_2 = L4_2
L2_1[A1_2] = L3_2
end
if A0_2 == "call" then
L4_2 = L0_1
L4_2 = L4_2()
L3_2.call_time = L4_2
L4_2 = L3_2.count
L4_2 = L4_2 + 1
L3_2.count = L4_2
L3_2.return_time = nil
elseif A0_2 == "return" or A0_2 == "tail return" then
L4_2 = L0_1
L4_2 = L4_2()
L5_2 = L3_2.call_time
if L5_2 then
L5_2 = L3_2.total_time
L6_2 = L3_2.call_time
L6_2 = L4_2 - L6_2
L5_2 = L5_2 + L6_2
L3_2.total_time = L5_2
L3_2.call_time = nil
else
L5_2 = L3_2.total_time
L6_2 = L3_2.return_time
if not L6_2 then
L6_2 = L4_2
end
L6_2 = L4_2 - L6_2
L5_2 = L5_2 + L6_2
L3_2.total_time = L5_2
L5_2 = L3_2.count
L5_2 = L5_2 + 1
L3_2.count = L5_2
end
L3_2.return_time = L4_2
if A2_2 then
L5_2 = L3_2.count
if L5_2 == 1 then
L5_2 = L3_2.db_info
L5_2.short_src = A2_2
end
end
end
end
function L6_1()
local L0_2, L1_2, L2_2
L0_2 = {}
L2_1 = L0_2
L0_2 = L0_1
L0_2 = L0_2()
L3_1 = L0_2
L0_2 = L1_1
L1_2 = L5_1
L2_2 = "cr"
L0_2(L1_2, L2_2)
end
function L7_1()
local L0_2, L1_2
L0_2 = L1_1
L0_2()
end
function L8_1()
local L0_2, L1_2, L2_2
L0_2 = L1_1
L1_2 = L5_1
L2_2 = "cr"
L0_2(L1_2, L2_2)
end
function L9_1()
local L0_2, L1_2
L0_2 = L1_1
L0_2()
L0_2 = nil
L2_1 = L0_2
L0_2 = nil
L3_1 = L0_2
end
function L10_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2
L2_2 = A0_2.db_info
L2_2 = L2_2.short_src
if not L2_2 then
L2_2 = "[NA]"
end
L3_2 = A0_2.db_info
L3_2 = L3_2.linedefined
if L3_2 then
L3_2 = A0_2.db_info
L3_2 = L3_2.linedefined
if 0 <= L3_2 then
L3_2 = string
L3_2 = L3_2.format
L4_2 = ":%i"
L5_2 = A0_2.db_info
L5_2 = L5_2.linedefined
L3_2 = L3_2(L4_2, L5_2)
if L3_2 then
goto lbl_23
end
end
end
L3_2 = ""
::lbl_23::
L4_2 = L2_2
L5_2 = L3_2
L2_2 = L4_2 .. L5_2
L4_2 = A0_2.db_info
L4_2 = L4_2.name
if not L4_2 then
L4_2 = "[anonymous]"
end
L5_2 = string
L5_2 = L5_2.format
L6_2 = "%04.3f"
L7_2 = A0_2.total_time
L7_2 = L7_2 * 1000
L5_2 = L5_2(L6_2, L7_2)
L6_2 = string
L6_2 = L6_2.format
L7_2 = "%04.3f"
L8_2 = A0_2.total_time
L9_2 = A0_2.count
L8_2 = L8_2 / L9_2
L8_2 = L8_2 * 1000
L6_2 = L6_2(L7_2, L8_2)
L7_2 = string
L7_2 = L7_2.format
L8_2 = "%03.2f%%"
L9_2 = A0_2.total_time
L9_2 = L9_2 / A1_2
L9_2 = L9_2 * 100
L7_2 = L7_2(L8_2, L9_2)
L8_2 = string
L8_2 = L8_2.format
L9_2 = "%7i"
L10_2 = A0_2.count
L8_2 = L8_2(L9_2, L10_2)
L9_2 = string
L9_2 = L9_2.format
L10_2 = "|%-40.40s: %-50.50s: %-12s: %-12s: %-12s: %-12s|\n"
L11_2 = L4_2
L12_2 = L2_2
L13_2 = L5_2
L14_2 = L6_2
L15_2 = L7_2
L16_2 = L8_2
return L9_2(L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2)
end
L11_1 = {}
function L12_1(A0_2, A1_2)
local L2_2, L3_2
L2_2 = A0_2.total_time
L3_2 = A1_2.total_time
L2_2 = L2_2 > L3_2
return L2_2
end
L11_1.TOTAL = L12_1
function L12_1(A0_2, A1_2)
local L2_2, L3_2
L2_2 = A0_2.average
L3_2 = A1_2.average
L2_2 = L2_2 > L3_2
return L2_2
end
L11_1.AVERAGE = L12_1
function L12_1(A0_2, A1_2)
local L2_2, L3_2
L2_2 = A0_2.count
L3_2 = A1_2.count
L2_2 = L2_2 > L3_2
return L2_2
end
L11_1.CALLED = L12_1
function L12_1(A0_2)
local L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2
L1_2 = L1_1
L1_2()
L1_2 = type
L2_2 = A0_2
L1_2 = L1_2(L2_2)
L1_2 = A0_2 or L1_2
if L1_2 ~= "function" or not A0_2 then
L1_2 = L11_1[A0_2]
end
L2_2 = "|%-40s: %-50s: %-12s: %-12s: %-12s: %-12s|\n"
L3_2 = string
L3_2 = L3_2.format
L4_2 = L2_2
L5_2 = "FUNCTION"
L6_2 = "SOURCE"
L7_2 = "TOTAL(MS)"
L8_2 = "AVERAGE(MS)"
L9_2 = "RELATIVE"
L10_2 = "CALLED"
L3_2 = L3_2(L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2)
L4_2 = L0_1
L4_2 = L4_2()
L5_2 = L3_1
if not L5_2 then
L5_2 = L0_1
L5_2 = L5_2()
end
L4_2 = L4_2 - L5_2
L5_2 = {}
L6_2 = pairs
L7_2 = L2_1
L6_2, L7_2, L8_2 = L6_2(L7_2)
for L9_2, L10_2 in L6_2, L7_2, L8_2 do
L11_2 = table
L11_2 = L11_2.insert
L12_2 = L5_2
L13_2 = {}
L14_2 = L10_2.total_time
L13_2.total_time = L14_2
L14_2 = L10_2.count
L13_2.count = L14_2
L14_2 = L10_2.total_time
L15_2 = L10_2.count
L14_2 = L14_2 / L15_2
L13_2.average = L14_2
L14_2 = L10_1
L15_2 = L10_2
L16_2 = L4_2
L14_2 = L14_2(L15_2, L16_2)
L13_2.output = L14_2
L11_2(L12_2, L13_2)
end
L6_2 = table
L6_2 = L6_2.sort
L7_2 = L5_2
L8_2 = L1_2 or L8_2
if not L1_2 then
L8_2 = L11_1.TOTAL
end
L6_2(L7_2, L8_2)
L6_2 = L3_2
L7_2 = ipairs
L8_2 = L5_2
L7_2, L8_2, L9_2 = L7_2(L8_2)
for L10_2, L11_2 in L7_2, L8_2, L9_2 do
L12_2 = L6_2
L13_2 = L11_2.output
L6_2 = L12_2 .. L13_2
end
L7_2 = L1_1
L8_2 = L5_1
L9_2 = "cr"
L7_2(L8_2, L9_2)
return L6_2
end
L13_1 = {}
L13_1.start = L6_1
L13_1.report = L12_1
L13_1.stop = L9_1
return L13_1