jorj/martnet-ddns
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fixing tsig key use for notifies

Browse Source
This commit is contained in:
Jorj Bauer
2023-10-11 23:47:39 -04:00
parent 0758403058
commit e1068644f3
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
bin/sync-slave
View File

@ -46,7 +46,7 @@ sub parse_slavefile {
open(my $fh, $f) || die "Can't open $f: $!";
while (<$fh>) {
if (/^zone\s+\"([^\"]+)\"\s+\{.+masters\s?\{\s?(.+);\s?\};\s?\}; allow-notify {"notify-key"}; /) {
if (/^zone\s+\"([^\"]+)\"\s+\{.+masters\s?\{\s?(.+);\s?\};/) {
push ( @ret, { zone => $1,
master => $2
} );
@ -63,7 +63,7 @@ sub do_rewrite {
foreach my $i (sort {$a->{zone} cmp $b->{zone}} @vh) {
next if ($i->{type} eq '_dnssec');
print $fh "zone \"$i->{zone}\" { type slave; file \"/var/cache/bind/db.$i->{zone}\"; masters { $i->{master}; }; };\n";
print $fh "zone \"$i->{zone}\" { type slave; file \"/var/cache/bind/db.$i->{zone}\"; masters { $i->{master}; allow-notify {key \"notify-key\";}; }; };\n";
}
close $fh;
print "Installing new slave host list\n";