version 1.21, 2003/08/05 15:05:28
|
version 1.24, 2003/09/02 19:10:52
|
Line 225 my @misc_rpms = (
|
Line 225 my @misc_rpms = (
|
"$instdir/libcap-1.10-8.i386.rpm", |
"$instdir/libcap-1.10-8.i386.rpm", |
); |
); |
|
|
my $systemperl = "$instdir/LON-CAPA-systemperl-3.5-rh7.i386.rpm"; |
my $systemperl = "$instdir/LON-CAPA-systemperl-3.7-rh7.i386.rpm"; |
|
|
## |
## |
## Some of these rpm commands require being obnoxious (--force --nodeps) |
## Some of these rpm commands require being obnoxious (--force --nodeps) |
## this is not a nice thing to do and we should be careful about it. |
## this is not a nice thing to do and we should be careful about it. |
## |
## |
|
|
|
|
|
|
&print_and_log("Installing Apache packages.\n"); |
&print_and_log("Installing Apache packages.\n"); |
&writelog (`rpm -Uvh @apache_rpms`); |
&writelog (`rpm -Uvh --replacepkgs @apache_rpms`); |
&print_and_log("Installing openssh packages.\n"); |
&print_and_log("Installing openssh packages.\n"); |
&writelog (`rpm -Uvh @openssh_rpms`); |
&writelog (`rpm -Uvh --replacepkgs @openssh_rpms`); |
&writelog(`/etc/init.d/sshd start`); |
&writelog(`/etc/init.d/sshd start`); |
&print_and_log("Installing ImageMagick packages.\n"); |
&print_and_log("Installing ImageMagick packages.\n"); |
&writelog (`rpm -Uvh @ImageMagick_rpms`); |
&writelog (`rpm -Uvh --replacepkgs @ImageMagick_rpms`); |
&print_and_log("Installing mysql packages.\n"); |
&print_and_log("Installing mysql packages.\n"); |
&writelog (`rpm -Uvh @mysql_rpms`); |
&writelog (`rpm -Uvh --replacepkgs @mysql_rpms`); |
&print_and_log("Installing Perl packages.\n"); |
&print_and_log("Installing Perl packages.\n"); |
&writelog (`rpm -Uvh @perl_rpms`); |
&writelog (`rpm -Uvh --replacepkgs@perl_rpms`); |
&print_and_log("Installing legacy readline package (required for gnuplot)."); |
&print_and_log("Installing legacy readline package (required for gnuplot)."); |
&writelog(`rpm -i --oldpackage @old_readline_rpms`); |
&writelog(`rpm -i --oldpackage @old_readline_rpms`); |
&print_and_log("Installing gnuplot packages.\n"); |
&print_and_log("Installing gnuplot packages.\n"); |
&writelog (`rpm -ivh --force --nodeps @gnuplot_rpms`); |
&writelog (`rpm -ivh --force --nodeps @gnuplot_rpms`); |
&print_and_log("Installing LON-CAPA Perl packages.\n"); |
&print_and_log("Installing LON-CAPA Perl packages.\n"); |
&writelog (`rpm -Uvh @loncapa_perl_rpms`); |
&writelog (`rpm -Uvh --replacepkgs @loncapa_perl_rpms`); |
&print_and_log("Installing misc packages.\n"); |
&print_and_log("Installing misc packages.\n"); |
&writelog (`rpm -Uvh @misc_rpms`); |
&writelog (`rpm -Uvh --replacepkgs @misc_rpms`); |
&print_and_log("Installing LON-CAPA systemperl rpm"); |
&print_and_log("Installing LON-CAPA systemperl rpm"); |
&writelog(`rpm -ivh --force --nodeps $systemperl`); |
&writelog(`rpm -ivh --force --nodeps $systemperl`); |
&print_and_log("\n"); |
&print_and_log("\n"); |
Line 277 foreach my $php_rpm (@php_rpms) {
|
Line 279 foreach my $php_rpm (@php_rpms) {
|
} |
} |
} |
} |
|
|
|
&print_and_log("Removing mod_throttle"); |
|
system("rpm -e `rpm -q -a | grep mod_throttle`"); |
|
&print_and_log("Removing mod_bandwidth"); |
|
system("rpm -e `rpm -q -a | grep mod_bandwidth`"); |
|
|
## |
## |
## Fix that stupid little sendmail bug |
## Fix that stupid little sendmail bug |
## |
## |