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
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92

local base = require("outputters.base")

local cursorX = 0
local cursorY = 0

local outfile
local started = false

local outputter = pl.class(base)
outputter._name = "text"
outputter.extension = "txt"

-- The outputter init can't actually initialize output (as logical as it might
-- have seemed) because that requires a page size which we don't know yet.
-- function outputter:_init () end

function outputter:_ensureInit ()
   if not outfile then
      local fname = self:getOutputFilename()
      outfile = fname == "-" and io.stdout or io.open(fname, "w+")
   end
end

function outputter:_writeline (...)
   self:_ensureInit()
   local args = pl.utils.pack(...)
   for i = 1, #args do
      outfile:write(args[i])
   end
end

function outputter:newPage ()
   self:_ensureInit()
   outfile:write("")
end

function outputter:finish ()
   self:_ensureInit()
   self:runHooks("prefinish")
   outfile:close()
end

function outputter.getCursor (_)
   return cursorX, cursorY
end

function outputter:setCursor (x, y, relative)
   self:_ensureInit()
   local bs = SILE.types.measurement("0.8bs"):tonumber()
   local spc = SILE.types.measurement("0.8spc"):tonumber()
   local offset = relative and { x = cursorX, y = cursorY } or { x = 0, y = 0 }
   local newx, newy = offset.x + x, offset.y - y
   if started then
      if newx < cursorX then
         outfile:write("\n")
      elseif newy > cursorY then
         if newy - cursorY > bs then
            outfile:write("\n")
         else
            outfile:write("‫")
         end
      elseif newx > cursorX then
         if newx:tonumber() - cursorX:tonumber() > spc then
            outfile:write(" ")
         else
            outfile:write("‫")
         end
      end
   end
   cursorY = newy
   cursorX = newx
end

function outputter:drawHbox (value, width)
   self:_ensureInit()
   width = SU.cast("number", width)
   if not value.text then
      return
   end
   self:_writeline(value.text)
   if width > 0 then
      started = true
      cursorX = cursorX + width
   end
end

function outputter:drawRaw (literal)
   self:_ensureInit()
   outfile:write(literal)
end

return outputter