You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
94 lines
2.4 KiB
94 lines
2.4 KiB
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
|
|
|
|
local total_found = {} -- accumulate() stores its data in here
|
|
local total_total = {}
|
|
local canvas -- holds the current canvas (from startcanvas())
|
|
|
|
--[[
|
|
startcanvas() is called at the start of each picture file, passing the
|
|
canvas that we will be drawing into, and the name of the file.
|
|
|
|
Following this call, there will be some number of calls to accumulate(t)
|
|
where t is a table of parameters that were passed to that draw-op.
|
|
|
|
t.verb is a string holding the name of the draw-op (e.g. "drawRect")
|
|
|
|
when a given picture is done, we call endcanvas(canvas, fileName)
|
|
]]
|
|
function sk_scrape_startcanvas(c, fileName)
|
|
canvas = c
|
|
end
|
|
|
|
--[[
|
|
Called when the current canvas is done drawing.
|
|
]]
|
|
function sk_scrape_endcanvas(c, fileName)
|
|
canvas = nil
|
|
end
|
|
|
|
function increment(table, key)
|
|
table[key] = (table[key] or 0) + 1
|
|
end
|
|
|
|
|
|
local drawPointsTable = {}
|
|
local drawPointsTable_direction = {}
|
|
|
|
function sk_scrape_accumulate(t)
|
|
increment(total_total, t.verb)
|
|
|
|
local p = t.paint
|
|
if p then
|
|
local pe = p:getPathEffect();
|
|
if pe then
|
|
increment(total_found, t.verb)
|
|
end
|
|
end
|
|
|
|
if "drawPoints" == t.verb then
|
|
local points = t.points
|
|
increment(drawPointsTable, #points)
|
|
if 2 == #points then
|
|
if points[1].y == points[2].y then
|
|
increment(drawPointsTable_direction, "hori")
|
|
elseif points[1].x == points[2].x then
|
|
increment(drawPointsTable_direction, "vert")
|
|
else
|
|
increment(drawPointsTable_direction, "other")
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
--[[
|
|
lua_pictures will call this function after all of the pictures have been
|
|
"accumulated".
|
|
]]
|
|
function sk_scrape_summarize()
|
|
for k, v in next, total_found do
|
|
io.write(k, " = ", v, "/", total_total[k], "\n")
|
|
end
|
|
print("histogram of point-counts for all drawPoints calls")
|
|
print(tostr(drawPointsTable))
|
|
print(tostr(drawPointsTable_direction))
|
|
end
|
|
|