blob: 767833285bc1647ae1c53991ceb5a760e125ec92 (
plain)
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
|
#!/usr/bin/env bash
# SPDX-License-Identifier: LGPL-2.1-or-later
set -eu
set -o pipefail
SOURCE_ROOT="${1:?}"
BUILD_ROOT="${2:?}"
command -v gawk &>/dev/null || exit 77
function generate_directives() {
gawk -v sec_rx="${2:-""}" -v unit_type="${3:-""}" '
match($0, /^([^ \t\.]+)\.([^ \t\.,]+)/, m) {
# res[section][directive] = 1
res[m[1]][m[2]] = 1;
}
END {
if (unit_type)
print unit_type
for (section in res) {
if (sec_rx && section !~ sec_rx)
continue
print "[" section "]";
for (directive in res[section]) {
print directive "=";
}
}
}
' "$1"
}
ret=0
if ! diff \
<(generate_directives "$SOURCE_ROOT"/src/network/networkd-network-gperf.gperf | sort) \
<(sort "$SOURCE_ROOT"/test/fuzz/fuzz-network-parser/directives); then
echo "Looks like test/fuzz/fuzz-network-parser/directives hasn't been updated"
ret=1
fi
if ! diff \
<(generate_directives "$SOURCE_ROOT"/src/network/netdev/netdev-gperf.gperf | sort) \
<(sort "$SOURCE_ROOT"/test/fuzz/fuzz-netdev-parser/directives.netdev); then
echo "Looks like test/fuzz/fuzz-netdev-parser/directives.netdev hasn't been updated"
ret=1
fi
if ! diff \
<(generate_directives "$SOURCE_ROOT"/src/udev/net/link-config-gperf.gperf | sort) \
<(sort "$SOURCE_ROOT"/test/fuzz/fuzz-link-parser/directives.link) ; then
echo "Looks like test/fuzz/fuzz-link-parser/directives.link hasn't been updated"
ret=1
fi
for section in Automount Mount Path Scope Slice Socket Swap Timer; do
if ! diff \
<(generate_directives "$BUILD_ROOT"/src/core/load-fragment-gperf.gperf "$section" "${section,,}" | sort) \
<(sort "$SOURCE_ROOT/test/fuzz/fuzz-unit-file/directives.${section,,}") ; then
echo "Looks like test/fuzz/fuzz-unit-file/directives.${section,,} hasn't been updated"
ret=1
fi
done
if ! diff \
<(generate_directives "$BUILD_ROOT"/src/core/load-fragment-gperf.gperf "(Service|Unit|Install)" "service" | sort) \
<(sort "$SOURCE_ROOT/test/fuzz/fuzz-unit-file/directives.service") ; then
echo "Looks like test/fuzz/fuzz-unit-file/directives.service hasn't been updated"
ret=1
fi
exit $ret
|
