Remove remaining references to boa and lucid

[project/luci.git] / libs / core / luasrc / debug.lua

diff --git a/libs/core/luasrc/debug.lua b/libs/core/luasrc/debug.lua
index f991ab8..8ff1bb6 100644 (file)
--- a/libs/core/luasrc/debug.lua
+++ b/libs/core/luasrc/debug.lua
@@ -1,18 +1,30 @@
 local debug = require "debug"
 local io = require "io"
-local collectgarbage = collectgarbage
+local collectgarbage, floor = collectgarbage, math.floor
 
 module "luci.debug"
 __file__ = debug.getinfo(1, 'S').source:sub(2)
 
 -- Enables the memory tracer with given flags and returns a function to disable the tracer again
-function trap_memtrace(flags)
-       flags = flags or "l"
-       local tracefile = io.open("/tmp/memtrace", "w")
+function trap_memtrace(flags, dest)
+       flags = flags or "clr"
+       local tracefile = io.open(dest or "/tmp/memtrace", "w")
+       local peak = 0
 
        local function trap(what, line)
                local info = debug.getinfo(2, "Sn")
-               tracefile:write(info.source..":"..line.."\t"..(info.namewhat or "").."\t"..(info.name or "").."\t"..collectgarbage("count").."\n")
+               local size = floor(collectgarbage("count"))
+               if size > peak then
+                       peak = size
+               end
+               if tracefile then
+                       tracefile:write(
+                               "[", what, "] ", info.source, ":", (line or "?"), "\t",
+                               (info.namewhat or ""), "\t",
+                               (info.name or ""), "\t",
+                               size, " (", peak, ")\n"
+                       )
+               end
        end
 
        debug.sethook(trap, flags)