[LON-CAPA-cvs] cvs: doc /loncapafiles rpmcheck.piml

matthew lon-capa-cvs@mail.lon-capa.org
Wed, 19 May 2004 16:31:07 -0000


matthew		Wed May 19 12:31:07 2004 EDT

  Added files:                 
    /doc/loncapafiles	rpmcheck.piml 
  Log:
  post installation markup language script to check for RPMs known to
  conflict with LON-CAPA.
  
  

Index: doc/loncapafiles/rpmcheck.piml
+++ doc/loncapafiles/rpmcheck.piml
<!DOCTYPE piml PUBLIC "-//TUX/DTD piml 1.0 Final//EN" 
	"http://lpml.sourceforge.net/DTD/piml.dtd">
<!-- phpcheck.piml -->
<!-- Matthew Hall -->

<!-- $Id: rpmcheck.piml,v 1.1 2004/05/19 16:31:07 matthew Exp $ -->

<!--

This file is part of the LearningOnline Network with CAPA (LON-CAPA).

LON-CAPA is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.

LON-CAPA is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with LON-CAPA; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

/home/httpd/html/adm/gpl.txt

http://www.lon-capa.org/

-->

<piml>
<targetroot>/</targetroot>
<files>
<file>
<target dist="default">/home/httpd/lonUsers</target>
<perlscript mode="fg">
my @phprpms = `rpm -q -a|grep php`;
if (@phprpms) {
    print "WARNING: PHP packages are present on this system.\n".
        "There are known conflicts between PHP libraries and LON-CAPA.\n".
        "Use the following command to remove ".
        "the php packages from your system:\nrpm -e ";
    foreach (@phprpms) {
        chomp;
        print $_.' ';
    }
    print "\n";
}
my @mod_rpms = `rpm -q -a | grep mod`;
foreach my $rpm (@mod_rpms) {
#    next if ($rpm =~ /^mod_perl/);
    if ($rpm =~ /mod_bandwidth/) {
        print "WARNING: it appears you have the mod_bandwidth ".
        "package installed.\n".
        "mod_bandwidth appears to conflict with LON-CAPA.\n".
        "Use the following command to remove it:\n".
        "rpm -e $rpm\n";
    }
    if ($rpm =~ /throttle/) {
        print "WARNING: it appears you have the mod_throttle ".
        "package installed.\n".
        "mod_throttle appears to conflict with LON-CAPA.\n".
        "Use the following command to remove it:\n".
        "rpm -e $rpm\n";
    }
        
}
</perlscript>
</file>
</files>
</piml>