version 1.4, 2004/05/25 15:55:04
|
version 1.9, 2004/12/10 20:40:08
|
Line 39 http://www.lon-capa.org/
|
Line 39 http://www.lon-capa.org/
|
# Look for php packages that should not be installed |
# 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". |
"There are known conflicts between PHP libraries and LON-CAPA.\n". |
"There are known conflicts between PHP libraries and LON-CAPA.\n". |
"Use the following command to remove ". |
"Use the following command to remove ". |
"the php packages from your system:\nrpm -e "; |
"the php packages from your system:\nrpm -e "; |
Line 54 if (@phprpms) {
|
Line 54 if (@phprpms) {
|
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) { |
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". |
"mod_bandwidth appears to conflict with LON-CAPA.\n". |
"mod_bandwidth appears to conflict with LON-CAPA.\n". |
"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 =~ /mod_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". |
"Use the following command to remove it:\n". |
"Use the following command to remove it:\n". |
Line 69 foreach my $rpm (@mod_rpms) {
|
Line 69 foreach my $rpm (@mod_rpms) {
|
} |
} |
|
|
} |
} |
|
</perlscript> |
|
<perlscript dist="redhat7" mode="fg"> |
# |
# |
# Look for packages which we need to be present |
# Look for packages which we need to be present |
foreach my $rpm ('psutils','openssl-devel','perl-suidperl', |
my @RPMS = `rpm -q -a`; |
'gnuplot-3.7.1-5','apache-1.3','mod_perl.1') { |
foreach my $rpm ('gnuplot-3.7.1-5','LON-CAPA-systemperl') { |
my @RPMs = `rpm -q -a | grep $rpm`; |
my @matching_rpms = grep(/$rpm/,@RPMS); |
if (! @RPMs) { |
if (! @matching_rpms) { |
print "WARNING: ".$rpm." does not appear to be installed.\n"; |
print "**** WARNING: ".$rpm." does not appear to be installed.\n"; |
|
} |
|
} |
|
</perlscript> |
|
<perlscript dist="fedora1 fedora2 fedora3" mode="fg"> |
|
my @RPMS = `rpm -q -a`; |
|
foreach my $rpm ('LONCAPA-prerequisites') { |
|
my @matching_rpms = grep(/$rpm/,@RPMS); |
|
if (! @matching_rpms) { |
|
print "**** WARNING: ".$rpm." does not appear to be installed.\n"; |
} |
} |
} |
} |
|
</perlscript> |
|
<perlscript dist="debian gentoo sles suse"> |
|
print <<END; |
|
**** WARNING: We don't know much about your distribution. |
|
Check with the loncapa development team for help satisfying |
|
the many dependencies of LON-CAPA. |
|
END |
|
</perlscript> |
|
<perlscript mode="fg"> |
# |
# |
# Look for files which we need to be present |
# Look for files which we need to be present |
foreach my $file ('/usr/bin/pstops') { |
foreach my $file ('/usr/bin/pstops') { |
if (! -e $file) { |
if (! -e $file) { |
print "WARNING: ".$file." does not appear to be installed.\n"; |
print "**** WARNING: ".$file." does not appear to be installed.\n"; |
} |
} |
} |
} |
</perlscript> |
</perlscript> |