-Fix problem where makedns -n with named already running would fail

-Fix problem where the final update payload of a zone would never be sent


git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5675 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2010-04-05 20:12:16 +00:00
parent 48ce35ed07
commit 6528119c03

View File

@ -191,6 +191,7 @@ sub process_request {
$ctx->{dnsupdaters} = \@nservers;
}
if ($zapfiles) { #here, we unlink all the existing files to start fresh
system("/sbin/service named stop"); #named may otherwise hold on to stale journal filehandles
unlink "/etc/named.conf";
foreach (</var/named/db.*>) {
unlink $_;
@ -543,7 +544,7 @@ sub add_records {
$update = Net::DNS::Update->new($zone); #new empty request
}
}
if ($numreqs == 300) { #either no entries at all to begin with or a perfect multiple of 300
if ($numreqs != 300) { #either no entries at all to begin with or a perfect multiple of 300
$update->sign_tsig("xcat_key",$ctx->{privkey});
my $reply = $resolver->send($update);
}