Evgeny Vereshchagin | a2ab58d | 2018-11-28 04:50:04 +0100 | [diff] [blame] | 1 | #!/bin/bash |
| 2 | |
| 3 | set -e |
| 4 | |
| 5 | function generate_directives() { |
| 6 | perl -aF'/[\s,]+/' -ne ' |
| 7 | if (my ($s, $d) = ($F[0] =~ /^([^\s\.]+)\.([^\s\.]+)$/)) { $d{$s}{"$d="} = 1; } |
| 8 | END { while (my ($key, $value) = each %d) { |
| 9 | printf "[%s]\n%s\n", $key, join("\n", keys(%$value)) |
| 10 | }}' "$1" |
| 11 | } |
| 12 | |
| 13 | if [[ $(generate_directives src/network/networkd-network-gperf.gperf | wc -l) -ne $(wc -l <test/fuzz/fuzz-network-parser/directives.network) ]]; then |
| 14 | echo "Looks like test/fuzz/fuzz-network-parser/directives.network hasn't been updated" |
| 15 | exit 1 |
| 16 | fi |
| 17 | |
| 18 | if [[ $(generate_directives src/network/netdev/netdev-gperf.gperf | wc -l) -ne $(wc -l <test/fuzz/fuzz-netdev-parser/directives.netdev) ]]; then |
| 19 | echo "Looks like test/fuzz/fuzz-netdev-parser/directives.netdev hasn't been updated" |
| 20 | exit 1 |
| 21 | fi |