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

Diff for /doc/loncapafiles/rpmcheck.piml between versions 1.1 and 1.2

version 1.1, 2004/05/19 16:31:07 version 1.2, 2004/05/19 16:45:20
Line 35  http://www.lon-capa.org/ Line 35  http://www.lon-capa.org/
 <file>  <file>
 <target dist="default">/home/httpd/lonUsers</target>  <target dist="default">/home/httpd/lonUsers</target>
 <perlscript mode="fg">  <perlscript mode="fg">
   #
   # Look for php packages that should not be installed
 my @phprpms = `rpm -q -a|grep php`;  my @phprpms = `rpm -q -a|grep php`;
 if (@phprpms) {  if (@phprpms) {
     print "WARNING: PHP packages are present on this system.\n".      print "WARNING: PHP packages are present on this system.\n".
Line 47  if (@phprpms) { Line 49  if (@phprpms) {
     }      }
     print "\n";      print "\n";
 }  }
   #
   # Look for mod_* that are thought to conflict with LON-CAPA
 my @mod_rpms = `rpm -q -a | grep mod`;  my @mod_rpms = `rpm -q -a | grep mod`;
 foreach my $rpm (@mod_rpms) {  foreach my $rpm (@mod_rpms) {
 #    next if ($rpm =~ /^mod_perl/);  
     if ($rpm =~ /mod_bandwidth/) {      if ($rpm =~ /mod_bandwidth/) {
         print "WARNING: it appears you have the mod_bandwidth ".          print "WARNING: it appears you have the mod_bandwidth ".
         "package installed.\n".          "package installed.\n".
Line 57  foreach my $rpm (@mod_rpms) { Line 60  foreach my $rpm (@mod_rpms) {
         "Use the following command to remove it:\n".          "Use the following command to remove it:\n".
         "rpm -e $rpm\n";          "rpm -e $rpm\n";
     }      }
     if ($rpm =~ /throttle/) {      if ($rpm =~ /mod_throttle/) {
         print "WARNING: it appears you have the mod_throttle ".          print "WARNING: it appears you have the mod_throttle ".
         "package installed.\n".          "package installed.\n".
         "mod_throttle appears to conflict with LON-CAPA.\n".          "mod_throttle appears to conflict with LON-CAPA.\n".
Line 66  foreach my $rpm (@mod_rpms) { Line 69  foreach my $rpm (@mod_rpms) {
     }      }
                   
 }  }
   #
   # Look for packages which we need to be present
   foreach my $rpm ('psutils') {
       my @RPMs = `rpm -q -a | grep $rpm`;
       if (! @RPMs) {
           print "WARNING: ".$rpm." does not appear to be installed.\n";
       }
   }
   #
   # Look for files which we need to be present
   foreach my $file ('/usr/bin/pstops') {
       if (! -e $file) {
           print "WARNING: ".$file." does not appear to be installed.\n";
       }
   }
 </perlscript>  </perlscript>
 </file>  </file>
 </files>  </files>
Removed from v.1.1  
changed lines
  Added in v.1.2

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