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

Diff for /doc/loncapafiles/chkconfig.piml between versions 1.14 and 1.15

version 1.14, 2011/03/01 21:34:28 version 1.15, 2011/03/03 00:10:19
Line 38  http://www.lon-capa.org/ Line 38  http://www.lon-capa.org/
 my $checker_bin = '/sbin/chkconfig';  my $checker_bin = '/sbin/chkconfig';
 my $webserver ='httpd';  my $webserver ='httpd';
 my @runlevels = qw/3 4 5/;  my @runlevels = qw/3 4 5/;
 my $rlstr = join('',@runlevels);  my @norunlevels = qw/0 1 6/;
   
 if ('<DIST />' eq 'suse9.3' || '<DIST />' eq 'suse9.2' || '<DIST />' eq 'sles9') {  if ('<DIST />' eq 'suse9.3' || '<DIST />' eq 'suse9.2' || '<DIST />' eq 'sles9') {
     $checker_bin = '/';      $checker_bin = '/';
Line 47  if ('<DIST />' eq 'suse9.3' || '<DIST /> Line 47  if ('<DIST />' eq 'suse9.3' || '<DIST />
 } elsif ('<DIST />' eq 'sles10' || '<DIST />' eq 'sles11' || '<DIST />' eq 'suse10.1' || '<DIST />' eq 'suse10.2' || '<DIST />' eq 'suse10.3' || '<DIST />' eq 'suse11.1' || '<DIST />' eq 'suse11.2' || '<DIST />' eq 'suse11.3' || '<DIST />' eq 'suse11.4') {  } elsif ('<DIST />' eq 'sles10' || '<DIST />' eq 'sles11' || '<DIST />' eq 'suse10.1' || '<DIST />' eq 'suse10.2' || '<DIST />' eq 'suse10.3' || '<DIST />' eq 'suse11.1' || '<DIST />' eq 'suse11.2' || '<DIST />' eq 'suse11.3' || '<DIST />' eq 'suse11.4') {
     $webserver = 'apache2';      $webserver = 'apache2';
 } elsif ('<DIST />' eq 'debian5' || '<DIST />' eq 'debian6' || '<DIST />' eq 'ubuntu6' ||  '<DIST />' eq 'ubuntu8' || '<DIST />' eq 'ubuntu10') {  } elsif ('<DIST />' eq 'debian5' || '<DIST />' eq 'debian6' || '<DIST />' eq 'ubuntu6' ||  '<DIST />' eq 'ubuntu8' || '<DIST />' eq 'ubuntu10') {
       @runlevels = qw/2 3 4 5/;
       @norunlevels = qw/0 1 6/;
     $checker_bin = '/usr/sbin/sysv-rc-conf';      $checker_bin = '/usr/sbin/sysv-rc-conf';
     $webserver = 'apache2';      $webserver = 'apache2';
 }  }
 exit if (! -x $checker_bin);  exit if (! -x $checker_bin);
   
   my $rlstr = join('',@runlevels);
   my $nrlstr = join('',@norunlevels);
 foreach my $service ($webserver,'loncontrol') {  foreach my $service ($webserver,'loncontrol') {
     my $command = $checker_bin.' --list '.$service;      my $command = $checker_bin.' --list '.$service;
     my $results = `$command`;      my $results = `$command`;
     if ($results eq '') {      if ($results eq '') {
         print "**** WARNING: $service is not set to run on boot.$/".          print "**** WARNING: $service is not set to run on boot.$/".
         "    Execute the following commands to fix this:".$/;          "    Execute the following commands to fix this:".$/;
         unless ('<DIST />' eq 'debian5' || '<DIST />' eq 'debian6' || '<DIST />' eq 'ubuntu6' ||  '<DIST />' eq 'ubuntu8' '<DIST />' eq 'ubuntu10') {          if ('<DIST />' eq 'debian5' || '<DIST />' eq 'debian6' || '<DIST />' eq 'ubuntu6' ||  '<DIST />' eq 'ubuntu8' '<DIST />' eq 'ubuntu10') {
               print "        $checker_bin --level $nrlstr $service off".$/;
           } else {
              print "        $checker_bin --add $webserver".$/;               print "        $checker_bin --add $webserver".$/;
         }          }
         print "        $checker_bin --level $rlstr $service on".$/;          print "        $checker_bin --level $rlstr $service on".$/;
Removed from v.1.14  
changed lines
  Added in v.1.15

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