version 1.7, 2004/08/11 14:12:47
|
version 1.17, 2009/12/30 05:51:43
|
Line 34 http://www.lon-capa.org/
|
Line 34 http://www.lon-capa.org/
|
<files> |
<files> |
<file> |
<file> |
<target dist="default">/home/httpd/lonUsers</target> |
<target dist="default">/home/httpd/lonUsers</target> |
<perlscript mode="fg"> |
<perlscript dist="redhat7 fedora1 fedora2 fedora3 fedora4 suse9.2 suse9.3 sles9" mode="fg"> |
my $rhversion = "7.3"; |
|
if (-e '/etc/redhat-release') { |
|
my $tmp = `cat /etc/redhat-release`; |
|
if ($tmp =~ /fedora/i) { |
|
$rhversion = 'fedora'; |
|
} |
|
} |
|
# |
# |
# 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 61 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 76 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 |
my @RPMS = `rpm -q -a`; |
my @RPMS = `rpm -q -a`; |
if ($rhversion eq "7.3") { |
foreach my $rpm ('gnuplot-3.7.1-5','LON-CAPA-systemperl') { |
foreach my $rpm ('gnuplot-3.7.1-5','LON-CAPA-systemperl') { |
my @matching_rpms = grep(/$rpm/,@RPMS); |
my @matching_rpms = grep(/$rpm/,@RPMS); |
if (! @matching_rpms) { |
if (! @matching_rpms) { |
print "**** WARNING: ".$rpm." does not appear to be installed.\n"; |
print "WARNING: ".$rpm." does not appear to be installed.\n"; |
|
} |
|
} |
|
} else { |
|
foreach my $rpm ('gnuplot-', |
|
'perl-IO-Socket-SSL', |
|
'perl-Net-SSLeay', |
|
'perl-Time-HiRes-1.59', |
|
'perl-GDGraph', |
|
'perl-GD', |
|
'perl-GD-Graph3d', |
|
'perl-GD-Barcode', |
|
'perl-GDTextUtil', |
|
'ImageMagick-5', |
|
'ImageMagick-perl', |
|
'perl-Algorithm-Diff', |
|
'perl-Authen-Krb4', |
|
'perl-Authen-Krb5', |
|
'perl-Authen-PAM', |
|
'perl-Crypt-DES', |
|
'perl-Crypt-IDEA', |
|
'perl-Crypt-SSLeay', |
|
'perl-Event', |
|
'perl-HTML-Tree', |
|
'perl-IO-stringy', |
|
'perl-MailTools', |
|
'perl-Math-Cephes', |
|
'perl-Math-FFT', |
|
'perl-Math-Random', |
|
'perl-Net-PH', |
|
'perl-Net-SNPP', |
|
'perl-Net-SSLeay', |
|
'perl-OLE-Storage_Lite', |
|
'perl-Parse-RecDescent', |
|
'perl-Pod-POM', |
|
'perl-PostScript-Simple', |
|
'perl-Safe-Hole', |
|
'perl-Spreadsheet-WriteExcel', |
|
'perl-String-Similarity', |
|
'perl-Text-Query', |
|
'perl-TimeDate',) { |
|
my @matching_rpms = grep(/$rpm/,@RPMS); |
|
if (! @matching_rpms) { |
|
print "WARNING: ".$rpm." does not appear to be installed.\n"; |
|
} |
|
} |
} |
} |
} |
|
</perlscript> |
foreach my $rpm ('psutils','openssl-devel','perl-suidperl', |
<perlscript dist="fedora1 fedora2 fedora3 fedora4 fedora5 fedora6 fedora7 fedora8 fedora9 fedora10 fedora11 fedora12 suse9.2 suse9.3 suse10.1 suse10.2 suse10.3 sles9 sles10 suse11.1 suse11.2" mode="fg"> |
'apache-1.3','mod_perl.1','^gzip','^zip-', |
my @RPMS = `rpm -q -a`; |
'^bzip2-libs','^unzip','^bzip2','^tar-') { |
foreach my $rpm ('LONCAPA-prerequisites') { |
my @matching_rpms = grep(/$rpm/,@RPMS); |
my @matching_rpms = grep(/$rpm/,@RPMS); |
if (! @matching_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="debian gentoo"> |
|
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> |