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
|
defmodule EarmarkParser.Helpers.AttrParser do
@moduledoc false
import EarmarkParser.Helpers.StringHelpers, only: [behead: 2]
import EarmarkParser.Message, only: [add_message: 2]
@type errorlist :: list(String.t())
def parse_attrs(context, attrs, lnb) do
{attrs, errors} = _parse_attrs(%{}, attrs, [], lnb)
{add_errors(context, errors, lnb), attrs}
end
defp _parse_attrs(dict, attrs, errors, lnb) do
cond do
Regex.match?(~r{^\s*$}, attrs) ->
{dict, errors}
match = Regex.run(~r{^\.(\S+)\s*}, attrs) ->
[leader, class] = match
Map.update(dict, "class", [class], &[class | &1])
|> _parse_attrs(behead(attrs, leader), errors, lnb)
match = Regex.run(~r{^\#(\S+)\s*}, attrs) ->
[leader, id] = match
Map.update(dict, "id", [id], &[id | &1])
|> _parse_attrs(behead(attrs, leader), errors, lnb)
# Might we being running into escape issues here too?
# '
match = Regex.run(~r{^(\S+)=\'([^\']*)'\s*}, attrs) ->
[leader, name, value] = match
Map.update(dict, name, [value], &[value | &1])
|> _parse_attrs(behead(attrs, leader), errors, lnb)
# Might we being running into escape issues here too?
# "
match = Regex.run(~r{^(\S+)=\"([^\"]*)"\s*}, attrs) ->
[leader, name, value] = match
Map.update(dict, name, [value], &[value | &1])
|> _parse_attrs(behead(attrs, leader), errors, lnb)
match = Regex.run(~r{^(\S+)=(\S+)\s*}, attrs) ->
[leader, name, value] = match
Map.update(dict, name, [value], &[value | &1])
|> _parse_attrs(behead(attrs, leader), errors, lnb)
match = Regex.run(~r{^(\S+)\s*(.*)}, attrs) ->
[_, incorrect, rest] = match
_parse_attrs(dict, rest, [incorrect | errors], lnb)
:otherwise ->
{dict, [attrs | errors]}
end
end
defp add_errors(context, [], _lnb) do
context
end
defp add_errors(context, errors, lnb) do
add_message(context, {:warning, lnb, "Illegal attributes #{inspect(errors)} ignored in IAL"})
end
end
# SPDX-License-Identifier: Apache-2.0
|
