sile 0.15.2

Simon’s Improved Layout Engine
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

local makeDeps = {
   _deps = {},

   add = function (self, filename)
      SU.debug("makedeps", "Adding:", filename)
      local resolvedFile, msg = package.searchpath(filename:gsub("^@?%./", ""), "?;" .. package.path, "/")
      if not resolvedFile then
         SU.error("Cannot resolve file '" .. filename .. "' as a dependency:" .. msg)
      end
      self._deps[resolvedFile] = true
   end,

   add_modules = function (self)
      for dep, _ in pairs(package.loaded) do
         if dep ~= "_G" then
            SU.debug("makedeps", "Adding if module is loadable file:", dep)
            local resolvedFile = package.searchpath(dep:gsub("%.", "/"), package.path, "/")
            if resolvedFile then
               self._deps[resolvedFile] = true
            end
         end
      end
   end,

   write = function (self)
      self:add_modules()
      if type(self.filename) ~= "string" then
         self.filename = pl.path.splitext(SILE.input.filenames[1]) .. ".d"
      end
      local depfile, err = io.open(self.filename, "w")
      if not depfile then
         return SU.error(err)
      end
      depfile:write(SILE.outputter:getOutputFilename() .. ": " .. tostring(self._deps) .. "\n")
      depfile:close()
   end,
}

setmetatable(makeDeps._deps, {
   __tostring = function (self)
      local deps = {}
      for dep, _ in pairs(self) do
         deps[#deps + 1] = dep
      end
      table.sort(deps, function (a, b)
         return a < b
      end)
      return table.concat(deps, " ")
   end,
})

return makeDeps