11899662525

Committed 18 Nov 2024 07:28PM UTC coverage: 63.553% (+2.2%) from 61.332%

Build # 11899662525

Build Type

push

github

Committed by

web-flow

Commit Message

Merge d5b432d0f into 7613a1788

Run Details

4115 of 4123 new or added lines in 6 files covered. (99.81%)

245 existing lines in 13 files now uncovered.

12574 of 19785 relevant lines covered (63.55%)

3161.33 hits per line

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

79.66

/inputters/xml.lua

local base = require("inputters.base")
local lxp = require("lxp")

local inputter = pl.class(base)
inputter._name = "xml"

inputter.order = 2

local function startcommand (parser, command, options)
   local stack = parser:getcallbacks().stack
   local lno, col, pos = parser:pos()
   local position = { lno = lno, col = col, pos = pos }
   -- create an empty command which content will be filled on closing tag
   local element = SU.ast.createCommand(command, options, nil, position)
   table.insert(stack, element)
end

local function endcommand (parser, command)
   local stack = parser:getcallbacks().stack
   local element = table.remove(stack)
   assert(element.command == command)
   local level = #stack
   table.insert(stack[level], element)
end

local function text (parser, msg)
   local stack = parser:getcallbacks().stack
   local element = stack[#stack]
   local n = #element
   if type(element[n]) == "string" then
      element[n] = element[n] .. msg
   else
      table.insert(element, msg)
   end
end

local function parse (doc)
   local content = {
      StartElement = startcommand,
      EndElement = endcommand,
      CharacterData = text,
      _nonstrict = true,
      stack = { {} },
   }
   local parser = lxp.new(content)
   local status, err
   if type(doc) == "string" then
      status, err = parser:parse(doc)
      if not status then
         return nil, err
      end
   else
      for element in pairs(doc) do
         status, err = parser:parse(element)
         if not status then
            return nil, err
         end
      end
   end
   status, err = parser:parse()
   if not status then
      return nil, err
   end
   parser:close()
   return content.stack[1][1]
end

function inputter.appropriate (round, filename, doc)
   if round == 1 then
      return filename:match(".xml$")
   elseif round == 2 then
      local sniff = doc:sub(1, 100):gsub("begin.*", "") or ""
      local promising = sniff:match("<")
      return promising and inputter.appropriate(3, filename, doc)
   elseif round == 3 then
      local _, err = parse(doc)
      return not err
   end
end

function inputter.parse (_, doc)
   local tree, err = parse(doc)
   if not tree then
      SU.error(err)
   end
   -- XML documents can have any root element, and it should be up to the class
   -- to supply handling far whatever that element that is in a specific format.
   -- Hence we wrap the actual DOM in an extra element of our own if and only if
   -- it doesn't look like a native SILE one already.
   local rootelement = tree.command
   if rootelement ~= "sile" and rootelement ~= "document" then
      tree = SU.ast.createCommand("document", {}, tree)
   end
   return { tree }
end

return inputter

1	local base = require("inputters.base")	111✔
2	local lxp = require("lxp")	111✔
3
4	local inputter = pl.class(base)	111✔
5	inputter._name = "xml"	111✔
6
7	inputter.order = 2	111✔
8
9	local function startcommand (parser, command, options)
10	local stack = parser:getcallbacks().stack	716✔
11	local lno, col, pos = parser:pos()	716✔
12	local position = { lno = lno, col = col, pos = pos }	716✔
13	-- create an empty command which content will be filled on closing tag
14	local element = SU.ast.createCommand(command, options, nil, position)	716✔
15	table.insert(stack, element)	716✔
16	end
17
18	local function endcommand (parser, command)
19	local stack = parser:getcallbacks().stack	716✔
20	local element = table.remove(stack)	716✔
21	assert(element.command == command)	716✔
22	local level = #stack	716✔
23	table.insert(stack[level], element)	716✔
24	end
25
26	local function text (parser, msg)
27	local stack = parser:getcallbacks().stack	1,067✔
28	local element = stack[#stack]	1,067✔
29	local n = #element	1,067✔
30	if type(element[n]) == "string" then	1,067✔
31	element[n] = element[n] .. msg	×
32	else
33	table.insert(element, msg)	1,067✔
34	end
35	end
36
37	local function parse (doc)
38	local content = {	14✔
39	StartElement = startcommand,	14✔
40	EndElement = endcommand,	14✔
41	CharacterData = text,	14✔
42	_nonstrict = true,
43	stack = { {} },	14✔
44	}
45	local parser = lxp.new(content)	14✔
46	local status, err
47	if type(doc) == "string" then	14✔
48	status, err = parser:parse(doc)	14✔
49	if not status then	14✔
50	return nil, err	×
51	end
52	else
53	for element in pairs(doc) do	×
54	status, err = parser:parse(element)	×
55	if not status then	×
56	return nil, err	×
57	end
58	end
59	end
60	status, err = parser:parse()	14✔
61	if not status then	14✔
62	return nil, err	×
63	end
64	parser:close()	14✔
65	return content.stack[1][1]	14✔
66	end
67
68	function inputter.appropriate (round, filename, doc)	111✔
69	if round == 1 then	113✔
70	return filename:match(".xml$")	111✔
71	elseif round == 2 then	2✔
72	local sniff = doc:sub(1, 100):gsub("begin.*", "") or ""	4✔
73	local promising = sniff:match("<")	2✔
74	return promising and inputter.appropriate(3, filename, doc)	2✔
UNCOV 75	elseif round == 3 then	×
UNCOV 76	local _, err = parse(doc)	×
UNCOV 77	return not err	×
78	end
79	end
80
81	function inputter.parse (_, doc)	111✔
82	local tree, err = parse(doc)	14✔
83	if not tree then	14✔
84	SU.error(err)	×
85	end
86	-- XML documents can have any root element, and it should be up to the class
87	-- to supply handling far whatever that element that is in a specific format.
88	-- Hence we wrap the actual DOM in an extra element of our own if and only if
89	-- it doesn't look like a native SILE one already.
90	local rootelement = tree.command	14✔
91	if rootelement ~= "sile" and rootelement ~= "document" then	14✔
92	tree = SU.ast.createCommand("document", {}, tree)	×
93	end
94	return { tree }	14✔
95	end
96
97	return inputter	111✔

sile-typesetter / sile / 11899662525

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