upstream/bind9
1
0
Fork 0
mirror of https://github.com/isc-projects/bind9.git synced 2026-04-04 16:55:31 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Remove stdout print

Browse source 
Fix tabbing
This commit is contained in:
Michael Sawyer 2000-06-27 00:31:36 +00:00
parent 6f4317150b
commit d334b341f6
1 changed files with 20 additions and 20 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

40
contrib/nanny/nanny.pl
View file

@ -15,7 +15,7 @@
# ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
# SOFTWARE.
# $Id: nanny.pl,v 1.4 2000/06/22 21:53:36 tale Exp $
# $Id: nanny.pl,v 1.5 2000/06/27 00:31:36 mws Exp $
# A simple nanny to make sure named stays running.
@ -27,29 +27,29 @@ $named_program = 'named';
fork() && exit();
for (;;) {
$pid = 0;
open(FILE, $pid_file_location) || goto restart;
$pid = <FILE>;
close(FILE);
chomp($pid);
$pid = 0;
open(FILE, $pid_file_location) || goto restart;
$pid = <FILE>;
close(FILE);
chomp($pid);
$res = kill 0, $pid;
$res = kill 0, $pid;
goto restart if ($res == 0);
goto restart if ($res == 0);
$dig_command = "$dig_program +short . \@$nameserver_location > /dev/null";
$return = system($dig_command);
goto restart if ($return == 9);
$dig_command =
"$dig_program +short . \@$nameserver_location > /dev/null";
$return = system($dig_command);
goto restart if ($return == 9);
sleep 30;
next;
sleep 30;
next;
restart:
print "Restarting...\n";
if ($pid != 0) {
kill 15, $pid;
sleep 30;
}
system ($named_program);
sleep 120;
if ($pid != 0) {
kill 15, $pid;
sleep 30;
}
system ($named_program);
sleep 120;
}