summaryrefslogtreecommitdiff
path: root/extras/luacov/src/luacov/stats.lua
blob: 5390c75ac3b5328dd2cc0012bfc4badd1eb10d7c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73

local M = {}

local statsfile = "luacov.stats.out"
local stats

function M.load()
   local data, most_hits = {}, 0
   stats = io.open(statsfile, "r")
   if not stats then
      return data
   end
   while true do
      local nlines = stats:read("*n")
      if not nlines then
         break
      end
      local skip = stats:read(1)
      if skip ~= ":" then
         break
      end
      local filename = stats:read("*l")
      if not filename then
         break
      end
      data[filename] = {
         max=nlines
      }
      for i = 1, nlines do
         local hits = stats:read("*n")
         if not hits then
            break
         end
         local skip = stats:read(1)
         if skip ~= " " then
            break
         end
         if hits > 0 then
            data[filename][i] = hits
            most_hits = math.max(most_hits, hits)
         end
      end
   end
   stats:close()
   return data, most_hits
end

function M.start()
   return io.open(statsfile, "w")
end

function M.stop(stats)
   stats:close()
end

function M.save(data, stats)
   stats:seek("set")
   for filename, filedata in pairs(data) do
      local max = filedata.max
      stats:write(max, ":", filename, "\n")
      for i = 1, max do
         local hits = filedata[i]
         if not hits then
            hits = 0
         end
         stats:write(hits, " ")
      end
      stats:write("\n")
   end
   stats:flush()
end

return M