version 1.14, 2011/10/26 11:48:39
|
version 1.15, 2011/11/08 07:38:31
|
Line 38 http://www.lon-capa.org/
|
Line 38 http://www.lon-capa.org/
|
print "Checking to be sure the Network Time Protocol is running properly.\n"; |
print "Checking to be sure the Network Time Protocol is running properly.\n"; |
print "For more information on ntpd please see http://www.ntp.org/\n"; |
print "For more information on ntpd please see http://www.ntp.org/\n"; |
my $NTPD; |
my $NTPD; |
|
my $checkcmd = 'ps -ef |grep ntp |grep -v grep'; |
|
my $startntpcmd; |
|
my $is_running; |
if (('<DIST />' eq 'fedora15') || ('<DIST />' eq 'fedora16')) { |
if (('<DIST />' eq 'fedora15') || ('<DIST />' eq 'fedora16')) { |
$NTPD = 'ntpd'; |
$NTPD = 'ntpd'; |
|
$startntpcmd = 'systemctl start ntpd.service'; |
if (!-e '/usr/sbin/ntpd') { |
if (!-e '/usr/sbin/ntpd') { |
print "ntp is not installed.\n"; |
print "ntp is not installed.\n"; |
exit; |
exit; |
} else { |
|
if (open(PIPE,"systemctl status ntpd.service|")) { |
|
my @lines = <PIPE>; |
|
chomp(@lines); |
|
my $is_running; |
|
foreach my $line (@lines) { |
|
if ($line =~ /Active: active/) { |
|
$is_running = 1; |
|
last; |
|
} |
|
} |
|
close(PIPE); |
|
if (!$is_running) { |
|
print "WARNING: ntp is installed but is not currently running.\nPlease verify the configuration of ntp in /etc/ntp.conf and /etc/ntp/step-tickers\nStart ntp by executing\n systemctl start ntpd.service|\n"; |
|
} |
|
} else { |
|
print "Could not determine ntp status.\n"; |
|
} |
|
} |
} |
} else { |
} else { |
if (-e "/etc/init.d/ntpd") { |
if (-e "/etc/init.d/ntpd") { |
Line 73 if (('<DIST />' eq 'fedora15') || ('<DIS
|
Line 59 if (('<DIST />' eq 'fedora15') || ('<DIS
|
print "ntp is not installed.\n"; |
print "ntp is not installed.\n"; |
exit; |
exit; |
} |
} |
my $value = `/etc/init.d/$NTPD status`; |
$startntpcnd = "/etc/init.d/$NTPD start"; |
if ($value !~ /pid \d*)/i) { |
} |
print "WARNING: ntp is installed but is not currently running.\nPlease verify the configuration of ntp in /etc/ntp.conf and /etc/ntp/step-tickers\nStart ntp by executing\n /etc/init.d/$NTPD start\n"; |
|
|
if (open(PIPE,'-|',$checkcmd)) { |
|
$is_running = <PIPE>; |
|
chomp($is_running); |
|
close(PIPE); |
|
if (!$is_running) { |
|
print "WARNING: ntp is installed but is not currently running.\nPlease verify the configuration of ntp in /etc/ntp.conf and /etc/ntp/step-tickers\nStart ntp by executing\n $startntpcmd\n"; |
} |
} |
|
} else { |
|
print "Could not determine ntp status.\n"; |
} |
} |
|
|
# chkconfig barfs to stderr if the target isn't set up right. |
# chkconfig barfs to stderr if the target isn't set up right. |
my $checking_bin; |
my $checking_bin; |
my $restartchk; |
my $restartchk; |