[BACK]Return to ntpcheck.piml CVS log [TXT] [DIR] Up to [LON-CAPA] / doc / loncapafiles

Diff for /doc/loncapafiles/ntpcheck.piml between versions 1.1 and 1.7

version 1.1, 2004/05/19 16:04:12 version 1.7, 2005/04/13 18:54:32
Line 1 Line 1
 <!DOCTYPE piml PUBLIC "-//TUX/DTD piml 1.0 Final//EN"   <!DOCTYPE piml PUBLIC "-//TUX/DTD piml 1.0 Final//EN" 
  "http://lpml.sourceforge.net/DTD/piml.dtd">   "http://lpml.sourceforge.net/DTD/piml.dtd">
 <!-- check_ntp.piml -->  <!-- ntpcheck.piml -->
 <!-- Matthew Hall -->  <!-- Matthew Hall -->
   
 <!-- $Id$ -->  <!-- $Id$ -->
Line 37  http://www.lon-capa.org/ Line 37  http://www.lon-capa.org/
 <perlscript mode="fg">  <perlscript mode="fg">
 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";
 if (! -e "/etc/init.d/ntpd") {  my $NTPD;
   if (-e "/etc/init.d/ntpd") {
      $NTPD = "ntpd";
   } elsif (-e "/etc/init.d/xntpd") {
      $NTPD = "xntpd";
   } else {
     print "ntp is not installed.\n";      print "ntp is not installed.\n";
     exit;      exit;
 }  }
 my $value = `/etc/init.d/ntpd status`;  my $value = `/etc/init.d/$NTPD status`;
 if ($value !~ / running/) {  if ($value !~ /running/) {
     print "WARNING: npt is installed but is not currently running.\n";      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";
 }  }
 # 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 $restartchk = `/sbin/chkconfig --list ntpd 2>/dev/null`;  my $restartchk = `/sbin/chkconfig --list $NTPD 2>/dev/null`;
 if ($restartchk eq '') {  if ($restartchk eq '') {
     print "WARNING: ntpd is either not installed or not configured to run at boot.\n";      print "**** WARNING: ntpd is either not installed or not configured to run at boot.\n";
     exit;      exit;
 }  }
 if ($restartchk =~ /^error reading information on service / ||  if ($restartchk =~ /^error reading information on service / ||
     $restartchk !~ /\d:(on|off)/) {      $restartchk !~ /\d:(on|off)/) {
     print "WARNING: Unable to check status of ntpd with /sbin/chkconfig.\n";      print "**** WARNING: Unable to check status of ntpd with /sbin/chkconfig.\n";
     exit;      exit;
 }  }
 if ($restartchk !~ /\s3:on/) {  if ($restartchk !~ /\s3:on/) {
     print "WARNING: ntpd is not set to start at runlevel 3.  To correct this run:\n/sbin/chkconfig --level 3 ntpd on\n";      print "**** WARNING: ntpd is not set to start at runlevel 3.  To correct this run:\n/sbin/chkconfig --level 345 $NTPD on\n";
     exit;      exit;
 }  }
 if ($restartchk !~ /\s5:on/) {  if ($restartchk !~ /\s5:on/) {
     print "WARNING: ntpd is not set to start at runlevel 5.  To correct this run:\n/sbin/chkconfig --level 5 ntpd on\n";      print "**** WARNING: ntpd is not set to start at runlevel 5.  To correct this run:\n/sbin/chkconfig --level 345 ntpd on\n";
     exit;      exit;
 }  }
 </perlscript>  </perlscript>
Removed from v.1.1  
changed lines
  Added in v.1.7

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>