9441244789

Committed 10 Jun 2024 01:45AM UTC coverage: 49.048% (-11.6%) from 60.675%

Build # 9441244789

Build Type

push

github

Committed by

web-flow

Commit Message

Merge 8a4989eae into 519864108

Run Details

8320 of 16963 relevant lines covered (49.05%)

1813.12 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

73.47

/pagebuilders/base.lua

--- SILE pagebuilder class.
-- @interfaces pagebuilders

local pagebuilder = pl.class()
pagebuilder.type = "pagebuilder"
pagebuilder._name = "base"

function pagebuilder:_init ()
   self.awful_bad = 1073741823
   self.inf_bad = 10000
   self.eject_penalty = -self.inf_bad
   self.deplorable = 100000
end

function pagebuilder.collateVboxes (_, vboxlist)
   local output = SILE.types.node.vbox()
   output:append(vboxlist)
   return output
end

-- Note: Almost 1/3 of the time in a typical SILE in taken iterating through
-- this function. As a result there are some micro-optimizations here that
-- make it a-typical of preferred coding styles. In particular note that
-- we absolutize heavily iterated lengths as early as possible and make
-- make direct calls to their integer amounts, assumed to be in points by
-- the point they are called **without actually checking**!
function pagebuilder:findBestBreak (options)
   local vboxlist = SU.required(options, "vboxlist", "in findBestBreak")
   local target = SU.required(options, "target", "in findBestBreak", "length")
   local restart = options.restart or false
   local force = options.force or false
   local i = 0
   local totalHeight = SILE.types.length()
   local bestBreak = nil
   local started = false
   if restart and restart.target == target then
      totalHeight = restart.totalHeight
      i = restart.i
      started = restart.started
   end
   local leastC = self.inf_bad
   SU.debug("pagebuilder", function ()
      return "Page builder for frame "
         .. SILE.typesetter.frame.id
         .. " called with "
         .. #vboxlist
         .. " nodes, "
         .. tostring(target)
   end)
   if SU.debugging("vboxes") then
      for j, box in ipairs(vboxlist) do
         SU.debug("vboxes", function ()
            return (j == i and " >" or "  ") .. j .. ": " .. box
         end)
      end
   end
   while not started and i < #vboxlist do
      i = i + 1
      if not vboxlist[i].is_vglue then
         started = true
         i = i - 1
         break
      end
   end
   local pi
   while i < #vboxlist do
      i = i + 1
      local vbox = vboxlist[i]
      SU.debug("pagebuilder", "Dealing with VBox", vbox)
      if vbox.is_vbox then
         totalHeight:___add(vbox.height)
         totalHeight:___add(vbox.depth)
      elseif vbox.is_vglue then
         totalHeight:___add(vbox.height)
      elseif vbox.is_insertion then
         -- TODO: refactor as hook and without side effects!
         target = SILE.insertions.processInsertion(vboxlist, i, totalHeight, target)
         vbox = vboxlist[i]
      end
      local left = target - totalHeight
      SU.debug("pagebuilder", "I have", left, "left")
      -- if left < -20 then SU.error("\nCatastrophic page breaking failure!"); end
      pi = 0
      if vbox.is_penalty then
         pi = vbox.penalty
      end
      if
         vbox.is_penalty and vbox.penalty < self.inf_bad
         or (vbox.is_vglue and i > 1 and not vboxlist[i - 1].discardable)
      then
         local badness
         SU.debug("pagebuilder", "totalHeight", totalHeight, "with target", target)
         if totalHeight.length.amount < target.length.amount then -- TeX #1039
            -- Account for infinite stretch?
            badness = SU.rateBadness(self.inf_bad, left.length.amount, totalHeight.stretch.amount)
         elseif left.length.amount < totalHeight.shrink.amount then
            badness = self.awful_bad
         else
            badness = SU.rateBadness(self.inf_bad, -left.length.amount, totalHeight.shrink.amount)
         end

         local c
         if badness < self.awful_bad then
            if pi <= self.eject_penalty then
               c = pi
            elseif badness < self.inf_bad then
               c = badness + pi -- plus insert
            else
               c = self.deplorable
            end
         else
            c = badness
         end
         if c < leastC then
            leastC = c
            bestBreak = i
         else
            restart = { totalHeight = totalHeight, i = i, started = started, target = target }
         end

         SU.debug("pagebuilder", "Badness:", c)
         if c == self.awful_bad or pi <= self.eject_penalty then
            SU.debug("pagebuilder", "outputting")
            local onepage = {}
            if not bestBreak then
               bestBreak = i
            end
            for j = 1, bestBreak do
               onepage[j] = table.remove(vboxlist, 1)
            end
            while #onepage > 1 and onepage[#onepage].discardable do
               onepage[#onepage] = nil
            end
            return onepage, pi
         end
      end
   end
   SU.debug("pagebuilder", "No page break here")
   if force and bestBreak then
      local onepage = {}
      for j = 1, bestBreak do
         onepage[j] = table.remove(vboxlist, 1)
      end
      return onepage, pi
   end
   return false, restart
end

return pagebuilder

1	--- SILE pagebuilder class.
2	-- @interfaces pagebuilders
3
4	local pagebuilder = pl.class()	3✔
5	pagebuilder.type = "pagebuilder"	3✔
6	pagebuilder._name = "base"	3✔
7
8	function pagebuilder:_init ()	3✔
9	self.awful_bad = 1073741823	3✔
10	self.inf_bad = 10000	3✔
11	self.eject_penalty = -self.inf_bad	3✔
12	self.deplorable = 100000	3✔
13	end
14
15	function pagebuilder.collateVboxes (_, vboxlist)	3✔
16	local output = SILE.types.node.vbox()	×
17	output:append(vboxlist)	×
18	return output	×
19	end
20
21	-- Note: Almost 1/3 of the time in a typical SILE in taken iterating through
22	-- this function. As a result there are some micro-optimizations here that
23	-- make it a-typical of preferred coding styles. In particular note that
24	-- we absolutize heavily iterated lengths as early as possible and make
25	-- make direct calls to their integer amounts, assumed to be in points by
26	-- the point they are called without actually checking!
27	function pagebuilder:findBestBreak (options)	3✔
28	local vboxlist = SU.required(options, "vboxlist", "in findBestBreak")	48✔
29	local target = SU.required(options, "target", "in findBestBreak", "length")	48✔
30	local restart = options.restart or false	48✔
31	local force = options.force or false	48✔
32	local i = 0	48✔
33	local totalHeight = SILE.types.length()	48✔
34	local bestBreak = nil	48✔
35	local started = false	48✔
36	if restart and restart.target == target then	48✔
37	totalHeight = restart.totalHeight	×
38	i = restart.i	×
39	started = restart.started	×
40	end
41	local leastC = self.inf_bad	48✔
42	SU.debug("pagebuilder", function ()	96✔
43	return "Page builder for frame "	×
44	.. SILE.typesetter.frame.id	×
45	.. " called with "	×
46	.. #vboxlist	×
47	.. " nodes, "	×
48	.. tostring(target)	×
49	end)
50	if SU.debugging("vboxes") then	96✔
51	for j, box in ipairs(vboxlist) do	×
52	SU.debug("vboxes", function ()	×
53	return (j == i and " >" or " ") .. j .. ": " .. box	×
54	end)
55	end
56	end
57	while not started and i < #vboxlist do	121✔
58	i = i + 1	120✔
59	if not vboxlist[i].is_vglue then	120✔
60	started = true	47✔
61	i = i - 1	47✔
62	break	47✔
63	end
64	end
65	local pi
66	while i < #vboxlist do	571✔
67	i = i + 1	526✔
68	local vbox = vboxlist[i]	526✔
69	SU.debug("pagebuilder", "Dealing with VBox", vbox)	526✔
70	if vbox.is_vbox then	526✔
71	totalHeight:___add(vbox.height)	167✔
72	totalHeight:___add(vbox.depth)	334✔
73	elseif vbox.is_vglue then	359✔
74	totalHeight:___add(vbox.height)	712✔
75	elseif vbox.is_insertion then	3✔
76	-- TODO: refactor as hook and without side effects!
77	target = SILE.insertions.processInsertion(vboxlist, i, totalHeight, target)	×
78	vbox = vboxlist[i]	×
79	end
80	local left = target - totalHeight	526✔
81	SU.debug("pagebuilder", "I have", left, "left")	526✔
82	-- if left < -20 then SU.error("\nCatastrophic page breaking failure!"); end
83	pi = 0	526✔
84	if vbox.is_penalty then	526✔
85	pi = vbox.penalty	3✔
86	end
87	if
88	vbox.is_penalty and vbox.penalty < self.inf_bad	526✔
89	or (vbox.is_vglue and i > 1 and not vboxlist[i - 1].discardable)	523✔
90	then
91	local badness
92	SU.debug("pagebuilder", "totalHeight", totalHeight, "with target", target)	228✔
93	if totalHeight.length.amount < target.length.amount then -- TeX #1039	228✔
94	-- Account for infinite stretch?
95	badness = SU.rateBadness(self.inf_bad, left.length.amount, totalHeight.stretch.amount)	456✔
96	elseif left.length.amount < totalHeight.shrink.amount then	×
97	badness = self.awful_bad	×
98	else
99	badness = SU.rateBadness(self.inf_bad, -left.length.amount, totalHeight.shrink.amount)	×
100	end
101
102	local c
103	if badness < self.awful_bad then	228✔
104	if pi <= self.eject_penalty then	228✔
105	c = pi	3✔
106	elseif badness < self.inf_bad then	225✔
107	c = badness + pi -- plus insert	5✔
108	else
109	c = self.deplorable	220✔
110	end
111	else
112	c = badness	×
113	end
114	if c < leastC then	228✔
115	leastC = c	7✔
116	bestBreak = i	7✔
117	else
118	restart = { totalHeight = totalHeight, i = i, started = started, target = target }	221✔
119	end
120
121	SU.debug("pagebuilder", "Badness:", c)	228✔
122	if c == self.awful_bad or pi <= self.eject_penalty then	228✔
123	SU.debug("pagebuilder", "outputting")	3✔
124	local onepage = {}	3✔
125	if not bestBreak then	3✔
126	bestBreak = i	×
127	end
128	for j = 1, bestBreak do	52✔
129	onepage[j] = table.remove(vboxlist, 1)	98✔
130	end
131	while #onepage > 1 and onepage[#onepage].discardable do	6✔
132	onepage[#onepage] = nil	3✔
133	end
134	return onepage, pi	3✔
135	end
136	end
137	end
138	SU.debug("pagebuilder", "No page break here")	45✔
139	if force and bestBreak then	45✔
140	local onepage = {}	×
141	for j = 1, bestBreak do	×
142	onepage[j] = table.remove(vboxlist, 1)	×
143	end
144	return onepage, pi	×
145	end
146	return false, restart	45✔
147	end
148
149	return pagebuilder	3✔

sile-typesetter / sile / 9441244789

Source File Press 'n' to go to next uncovered line, 'b' for previous

Source File
Press 'n' to go to next uncovered line, 'b' for previous