version 1.10, 2009/07/14 13:13:26
|
version 1.31, 2017/10/23 23:57:46
|
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; |
if (-e "/etc/init.d/ntpd") { |
my $checkcmd = 'ps -ef |grep ntp |grep -v grep |grep -v ntpcheck'; |
$NTPD = "ntpd"; |
my $startntpcmd; |
} elsif (-e "/etc/init.d/xntpd") { |
my $is_running; |
$NTPD = "xntpd"; |
if (('<DIST />' eq 'fedora15') || ('<DIST />' eq 'fedora16') || |
} elsif (-e "/etc/init.d/ntp") { |
('<DIST />' eq 'fedora17') || ('<DIST />' eq 'fedora18') || |
$NTPD = "ntp"; |
('<DIST />' eq 'fedora19') || ('<DIST />' eq 'fedora20') || |
|
('<DIST />' eq 'fedora21') || ('<DIST />' eq 'fedora22') || |
|
('<DIST />' eq 'fedora23') || ('<DIST />' eq 'fedora24') || |
|
('<DIST />' eq 'fedora25') || ('<DIST />' eq 'fedora26') || |
|
('<DIST />' eq 'centos7') || ('<DIST />' eq 'rhes7') || |
|
('<DIST />' eq 'scientific7') || ('<DIST />' eq 'sles12')) { |
|
$NTPD = 'ntpd'; |
|
$startntpcmd = 'systemctl start ntpd.service'; |
|
if (!-e '/usr/sbin/ntpd') { |
|
print "ntp is not installed.\n"; |
|
exit; |
|
} |
} else { |
} else { |
print "ntp is not installed.\n"; |
if (-e "/etc/init.d/ntpd") { |
exit; |
$NTPD = "ntpd"; |
} |
} elsif (-e "/etc/init.d/xntpd") { |
my $value = `/etc/init.d/$NTPD status`; |
$NTPD = "xntpd"; |
if ($value !~ /running/) { |
} elsif (-e "/etc/init.d/ntp") { |
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"; |
$NTPD = "ntp"; |
} |
} else { |
# chkconfig barfs to stderr if the target isn't set up right. |
print "ntp is not installed.\n"; |
my $checking_bin; |
exit; |
my $restartchk; |
} |
if ('<DIST />' eq 'debian5' || '<DIST />' eq 'ubuntu6' || '<DIST />' eq 'ubuntu8') { |
$startntpcmd = "/etc/init.d/$NTPD start"; |
$checking_bin = '/usr/sbin/sysv-rc-conf'; |
} |
|
|
|
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 "ntp is installed and running\n"; |
|
} |
} else { |
} else { |
$checking_bin = '/sbin/chkconfig'; |
print "Could not determine ntp status.\n"; |
} |
|
$restartchk = `$checking_bin --list $NTPD 2>/dev/null`; |
|
if ($restartchk eq '') { |
|
print "**** WARNING: ntpd is either not installed or not configured to run at boot.\n"; |
|
exit; |
|
} |
} |
if ($restartchk =~ /^error reading information on service / || |
|
$restartchk !~ /\d:(on|off)/) { |
# chkconfig barfs to stderr if the target isn't set up right. |
print "**** WARNING: Unable to check status $NTPD with $checking_bin.\n"; |
if (('<DIST />' eq 'fedora15') || ('<DIST />' eq 'fedora16') || |
exit; |
('<DIST />' eq 'fedora17') || ('<DIST />' eq 'fedora18') || |
} |
('<DIST />' eq 'fedora19') || ('<DIST />' eq 'fedora20') || |
if ($restartchk !~ /\s3:on/) { |
('<DIST />' eq 'fedora21') || ('<DIST />' eq 'fedora22') || |
print "**** WARNING: ntpd is not set to start at runlevel 3. To correct this run:\n$checking_bin --level 345 $NTPD on\n"; |
('<DIST />' eq 'fedora23') || ('<DIST />' eq 'fedora24') || |
exit; |
('<DIST />' eq 'fedora25') || ('<DIST />' eq 'fedora26') || |
} |
('<DIST />' eq 'centos7') || ('<DIST />' eq 'rhes7') || |
if ($restartchk !~ /\s5:on/) { |
('<DIST />' eq 'scientific7') || ('<DIST />' eq 'sles12')) { |
print "**** WARNING: ntpd is not set to start at runlevel 5. To correct this run:\n$checking_bin --level 345 $NTPD on\n"; |
if (!-l "/etc/systemd/system/multi-user.target.wants/ntpd.service") { |
|
print "**** WARNING: ntpd is not configured to run at boot. To correct this run:\nsystemctl enable ntpd.service\n"; |
|
} |
exit; |
exit; |
|
} else { |
|
my $checking_bin; |
|
my $restartchk; |
|
if (('<DIST />' eq 'debian5') || ('<DIST />' eq 'debian6') || ('<DIST />' eq 'ubuntu6') || |
|
('<DIST />' eq 'ubuntu8') || ('<DIST />' eq 'ubuntu10') || ('<DIST />' eq 'ubuntu12') || |
|
('<DIST />' eq 'ubuntu14') || ('<DIST />' eq 'ubuntu16')) { |
|
$checking_bin = '/usr/sbin/sysv-rc-conf'; |
|
} else { |
|
$checking_bin = '/sbin/chkconfig'; |
|
} |
|
$restartchk = `$checking_bin --list $NTPD 2>/dev/null`; |
|
if ($restartchk eq '') { |
|
print "**** WARNING: ntpd is either not installed or not configured to run at boot.\n"; |
|
exit; |
|
} |
|
if ($restartchk =~ /^error reading information on service / || |
|
$restartchk !~ /\d:(on|off)/) { |
|
print "**** WARNING: Unable to check status $NTPD with $checking_bin.\n"; |
|
exit; |
|
} |
|
if ($restartchk !~ /\s3:on/) { |
|
print "**** WARNING: ntpd is not set to start at runlevel 3. To correct this run:\n$checking_bin --level 345 $NTPD on\n"; |
|
exit; |
|
} |
|
if ($restartchk !~ /\s5:on/) { |
|
print "**** WARNING: ntpd is not set to start at runlevel 5. To correct this run:\n$checking_bin --level 345 $NTPD on\n"; |
|
exit; |
|
} |
} |
} |
</perlscript> |
</perlscript> |
</file> |
</file> |