Welcome 微信登录
编程资源 图片资源库 蚂蚁家优选 PDF转换器

首页 / 操作系统 / Linux / 改造Lua的debug.traceback() 让其显示栈上所有的局部变量

  1. function tracebackex()  
  2. local ret = ""  
  3. local level = 2  
  4. ret = ret .. "stack traceback: "  
  5. while true do  
  6.    --get stack info  
  7.    local info = debug.getinfo(level, "Sln")  
  8.    if not info then break end  
  9.    if info.what == "C" then                -- C function  
  10.     ret = ret .. tostring(level) .. " C function "  
  11.    else           -- Lua function  
  12.     ret = ret .. string.format(" [%s]:%d in function `%s` ", info.short_src, info.currentline, info.name or "")  
  13.    end  
  14.    --get local vars  
  15.    local i = 1  
  16.    while true do  
  17.     local name, value = debug.getlocal(level, i)  
  18.     if not name then break end  
  19.     ret = ret .. " " .. name .. " = " .. tostringex(value, 3) .. " "  
  20.     i = i + 1  
  21.    end    
  22.    level = level + 1  
  23. end  
  24. return ret  
  25. end  
  26.   
  27. function tostringex(v, len)  
  28. if len == nil then len = 0 end  
  29. local pre = string.rep(" ", len)  
  30. local ret = ""  
  31. if type(v) == "table" then  
  32.    if len > 5 then return " { ... }" end  
  33.    local t = ""  
  34.    for k, v1 in pairs(v) do  
  35.     t = t .. " " .. pre .. tostring(k) .. ":"  
  36.     t = t .. tostringex(v1, len + 1)  
  37.    end  
  38.    if t == "" then  
  39.     ret = ret .. pre .. "{ } (" .. tostring(v) .. ")"  
  40.    else  
  41.     if len > 0 then  
  42.      ret = ret .. " (" .. tostring(v) .. ") "  
  43.     end  
  44.     ret = ret .. pre .. "{" .. t .. " " .. pre .. "}"  
  45.    end  
  46. else  
  47.    ret = ret .. pre .. tostring(v) .. " (" .. type(v) .. ")"  
  48. end  
  49. return ret  
  50. end