Upload

lua/fprofiler/util.lua

@@ -0,0 +1,52 @@
+--[[
+| This file was obtained through the combined efforts
+| of Madbluntz & Plymouth Antiquarian Society.
+|
+| Credits: lifestorm, Gregory Wayne Rossel JR.,
+| 	Maloy, DrPepper10 @ RIP, Atle!
+|
+| Visit for more: https://plymouth.thetwilightzone.ru/
+--]]
+
+
+-- Try to find the function represented by a string
+function FProfiler.funcNameToObj(str)
+    if isfunction(str) then return str end
+
+    local times = FProfiler.Internal.getCallCounts()
+    for func, _ in pairs(times) do
+        if tostring(func) == str then return func end
+    end
+
+    local tbl = _G
+    local exploded = string.Explode(".", str, false)
+    if not exploded or not exploded[1] then return end
+
+    for i = 1, #exploded - 1 do
+        tbl = (tbl or {})[exploded[i]]
+        if not istable(tbl) then return end
+    end
+
+    local func = (tbl or {})[exploded[#exploded]]
+
+    if not isfunction(func) then return end
+
+    return func
+end
+
+-- Read a file
+function FProfiler.readSource(fname, startLine, endLine)
+    if not file.Exists(fname, "GAME") then return "" end
+    if startLine < 0 or endLine < 0 or endLine < startLine then return "" end
+
+    local f = file.Open(fname, "r", "GAME")
+
+    for i = 1, startLine - 1 do f:ReadLine() end
+
+    local res = {}
+    for i = startLine, endLine do
+        table.insert(res, f:ReadLine() or "")
+    end
+
+    return table.concat(res, "\n")
+end