mike@reedtribe.org | 0e59b79 | 2013-05-21 03:24:37 +0000 | [diff] [blame^] | 1 | -- just a helper function to dump the parameters, for debugging |
mike@reedtribe.org | 1c5a94f | 2013-05-16 04:20:23 +0000 | [diff] [blame] | 2 | function tostr(t) |
| 3 | local str = "" |
| 4 | for k, v in next, t do |
mike@reedtribe.org | 0e59b79 | 2013-05-21 03:24:37 +0000 | [diff] [blame^] | 5 | if #str > 0 then |
| 6 | str = str .. ", " |
| 7 | end |
| 8 | if type(k) == "number" then |
| 9 | str = str .. "[" .. k .. "] = " |
mike@reedtribe.org | 1c5a94f | 2013-05-16 04:20:23 +0000 | [diff] [blame] | 10 | else |
mike@reedtribe.org | 0e59b79 | 2013-05-21 03:24:37 +0000 | [diff] [blame^] | 11 | str = str .. tostring(k) .. " = " |
| 12 | end |
| 13 | if type(v) == "table" then |
| 14 | str = str .. "{ " .. tostr(v) .. " }" |
| 15 | else |
| 16 | str = str .. tostring(v) |
mike@reedtribe.org | 1c5a94f | 2013-05-16 04:20:23 +0000 | [diff] [blame] | 17 | end |
| 18 | end |
| 19 | return str |
| 20 | end |
| 21 | |
reed@google.com | dff7e11 | 2013-05-15 19:34:20 +0000 | [diff] [blame] | 22 | canvas = {} |
| 23 | total = 0 |
mike@reedtribe.org | 1c5a94f | 2013-05-16 04:20:23 +0000 | [diff] [blame] | 24 | |
mike@reedtribe.org | 0e59b79 | 2013-05-21 03:24:37 +0000 | [diff] [blame^] | 25 | -- called with the parameters to each canvas.draw call |
mike@reedtribe.org | 1c5a94f | 2013-05-16 04:20:23 +0000 | [diff] [blame] | 26 | function accumulate(t) |
mike@reedtribe.org | 1c5a94f | 2013-05-16 04:20:23 +0000 | [diff] [blame] | 27 | total = total + 1 |
mike@reedtribe.org | 0e59b79 | 2013-05-21 03:24:37 +0000 | [diff] [blame^] | 28 | local n = canvas[t.verb] or 0 |
| 29 | canvas[t.verb] = n + 1 |
mike@reedtribe.org | 1c5a94f | 2013-05-16 04:20:23 +0000 | [diff] [blame] | 30 | |
mike@reedtribe.org | 0e59b79 | 2013-05-21 03:24:37 +0000 | [diff] [blame^] | 31 | -- enable to dump all of the parameters we were sent |
| 32 | if false then |
| 33 | -- dump the params in t, specifically showing the verb first, which we |
| 34 | -- then nil out so it doesn't appear in tostr() |
| 35 | io.write(t.verb, " ") |
| 36 | t.verb = nil |
| 37 | io.write(tostr(t), "\n") |
| 38 | end |
reed@google.com | dff7e11 | 2013-05-15 19:34:20 +0000 | [diff] [blame] | 39 | end |
mike@reedtribe.org | 1c5a94f | 2013-05-16 04:20:23 +0000 | [diff] [blame] | 40 | |
mike@reedtribe.org | 0e59b79 | 2013-05-21 03:24:37 +0000 | [diff] [blame^] | 41 | -- lua_pictures will call this function after all of the files have been |
| 42 | -- "accumulated" |
reed@google.com | dff7e11 | 2013-05-15 19:34:20 +0000 | [diff] [blame] | 43 | function summarize() |
mike@reedtribe.org | 1c5a94f | 2013-05-16 04:20:23 +0000 | [diff] [blame] | 44 | io.write("total ", total, "\n", tostr(canvas), "\n") |
reed@google.com | dff7e11 | 2013-05-15 19:34:20 +0000 | [diff] [blame] | 45 | end |
| 46 | |