tools/lua/scrape.lua

-- just a helper function to dump the parameters, for debugging
function tostr(t)
    local str = ""
    for k, v in next, t do
        if #str > 0 then
            str = str .. ", "
        end
        if type(k) == "number" then
            str = str .. "[" .. k .. "] = "
        else
            str = str .. tostring(k) .. " = "
        end
        if type(v) == "table" then
            str = str .. "{ " .. tostr(v) .. " }"
        else
            str = str .. tostring(v)
        end
    end
    return str
end

total = {}

function setcanvas(c)
    canvas = c
end

-- called with the parameters to each canvas.draw call
function accumulate(t)
    local n = total[t.verb] or 0
    total[t.verb] = n + 1

    if false and t.verb == "drawRect" then
        local m = canvas:getTotalMatrix()
        print("... ", tostr(m), "\n")
    end

    -- enable to dump all of the parameters we were sent
    if false then
        -- dump the params in t, specifically showing the verb first, which we
        -- then nil out so it doesn't appear in tostr()
        io.write(t.verb, " ")
        t.verb = nil
        io.write(tostr(t), "\n")
    end
end

-- lua_pictures will call this function after all of the files have been
-- "accumulated"
function summarize()
    io.write("\n", tostr(total), "\n")
end