Basalt2/docs/references/plugins/debug.md

local log = require("log") local tHex = require("libraries/colorHex")

local maxLines = 10 local isVisible = false

local function createDebugger(element) local elementInfo = { renderCount = 0, eventCount = {}, lastRender = os.epoch("utc"), properties = {}, children = {} }

return {
    trackProperty = function(name, value)
        elementInfo.properties[name] = value
    end,

    trackRender = function()
        elementInfo.renderCount = elementInfo.renderCount + 1
        elementInfo.lastRender = os.epoch("utc")
    end,

    trackEvent = function(event)
        elementInfo.eventCount[event] = (elementInfo.eventCount[event] or 0) + 1
    end,

    dump = function()
        return {
            type = element.get("type"),
            id = element.get("id"),
            stats = elementInfo
        }
    end
}

end

local BaseElement = { debug = function(self, level) self._debugger = createDebugger(self) self._debugLevel = level or DEBUG_LEVELS.INFO return self end,

dumpDebug = function(self)
    if not self._debugger then return end
    return self._debugger.dump()
end

}

local BaseFrame = { showDebugLog = function(self) if not self._debugFrame then local width = self.get("width") local height = self.get("height") self._debugFrame = self:addFrame("basaltDebugLog") :setWidth(width) :setHeight(height) :setZ(999) :listenEvent("mouse_scroll", true) self.basalt.LOGGER.debug("Created debug log frame " .. self._debugFrame.get("name"))

        self._debugFrame:addButton("basaltDebugLogClose")
        :setWidth(9)
        :setHeight(1)
        :setX(width - 8)
        :setY(height)
        :setText("Close")
        :onMouseClick(function()
            self:hideDebugLog()
        end)

        self._debugFrame._scrollOffset = 0
        self._debugFrame._processedLogs = {}

        local function wrapText(text, width)
            local lines = {}
            while #text > 0 do
                local line = text:sub(1, width)
                table.insert(lines, line)
                text = text:sub(width + 1)
            end
            return lines
        end

        local function processLogs()
            local processed = {}
            local width = self._debugFrame.get("width")

            for _, entry in ipairs(log._logs) do
                local lines = wrapText(entry.message, width)
                for _, line in ipairs(lines) do
                    table.insert(processed, {
                        text = line,
                        level = entry.level
                    })
                end
            end
            return processed
        end

        local totalLines = #processLogs() - self.get("height")
        self._scrollOffset = totalLines

        local originalRender = self._debugFrame.render
        self._debugFrame.render = function(frame)
            originalRender(frame)
            frame._processedLogs = processLogs()

            local height = frame.get("height")-2
            local totalLines = #frame._processedLogs
            local maxScroll = math.max(0, totalLines - height)
            frame._scrollOffset = math.min(frame._scrollOffset, maxScroll)

            for i = 1, height-2 do
                local logIndex = i + frame._scrollOffset
                local entry = frame._processedLogs[logIndex]

                if entry then
                    local color = entry.level == log.LEVEL.ERROR and colors.red
                        or entry.level == log.LEVEL.WARN and colors.yellow
                        or entry.level == log.LEVEL.DEBUG and colors.lightGray
                        or colors.white

                    frame:textFg(2, i, entry.text, color)
                end
            end
        end

        local baseDispatchEvent = self._debugFrame.dispatchEvent
        self._debugFrame.dispatchEvent = function(self, event, direction, ...)
            if(event == "mouse_scroll") then
                self._scrollOffset = math.max(0, self._scrollOffset + direction)
                self:updateRender()
                return true
            else
                baseDispatchEvent(self, event, direction, ...)
            end
        end
    end
    self._debugFrame.set("visible", true)
    return self
end,

hideDebugLog = function(self)
    if self._debugFrame then
        self._debugFrame.set("visible", false)
    end
    return self
end,

toggleDebugLog = function(self)
    if self._debugFrame and self._debugFrame:isVisible() then
        self:hideDebugLog()
    else
        self:showDebugLog()
    end
    return self
end

}

local Container = { debugChildren = function(self, level) self:debug(level) for _, child in pairs(self.get("children")) do if child.debug then child:debug(level) end end return self end }

return { BaseElement = BaseElement, Container = Container, BaseFrame = BaseFrame, }