version 1.11, 2002/11/16 00:57:29
|
version 1.15, 2002/12/18 16:34:09
|
Line 61
|
Line 61
|
# perl-DBI-1.21-1.i386.rpm |
# perl-DBI-1.21-1.i386.rpm |
# mod_perl-1.26-5.i386.rpm |
# mod_perl-1.26-5.i386.rpm |
# perl-suidperl-5.6.1-34.99.6.i386.rpm |
# perl-suidperl-5.6.1-34.99.6.i386.rpm |
# LON-CAPA-systemperl-3.4-rh72.i386.rpm |
# LONCAPA-0.6.0-1.i386.rpm |
# mysql-3.23.49-3.i386.rpm |
# mysql-3.23.49-3.i386.rpm |
# mysqlclient9-3.23.22-6.i386.rpm |
# mysqlclient9-3.23.22-6.i386.rpm |
# mysql-server-3.23.49-3.i386.rpm |
# mysql-server-3.23.49-3.i386.rpm |
# hwcrypto-1.0-3.i386.rpm |
# hwcrypto-1.0-3.i386.rpm |
# m2crypto-0.05_snap4-2.i386.rpm |
# m2crypto-0.05_snap4-2.i386.rpm |
# netatalk-1.5pre6-1rh7.i386.rpm |
# netpbm-9.24-3.i386.rpm |
|
# netpbm-progs-9.24-3.i386.rpm |
|
# krb5-libs-1.2.4-3.i386.rpm |
# Other files: |
# Other files: |
# httpd.conf |
# httpd.conf |
# mod_auth_external-2.1.13.tar.gz |
# mod_auth_external-2.1.13.tar.gz |
Line 85 my $result;
|
Line 87 my $result;
|
my $test; |
my $test; |
|
|
# note: The filehandle LOG is global. |
# note: The filehandle LOG is global. |
open LOG,">/tmp/loncapa_install.log" || die "Unable to open log file.\n"; |
open LOG,">loncapa_install.log" || die "Unable to open log file.\n"; |
|
|
# Some friendly subroutines |
# Some friendly subroutines |
sub die_if_nonempty { |
sub die_if_nonempty { |
Line 145 END
|
Line 147 END
|
print <<"END"; |
print <<"END"; |
******************************************************************** |
******************************************************************** |
|
|
Welcome to LON-CAPA |
Welcome to LON-CAPA 0.6.0 |
|
|
This script will install the base software that LON-CAPA needs to |
This script will install the base software that LON-CAPA needs to |
run properly. |
run properly. |
Line 198 my @perl_rpms = (
|
Line 200 my @perl_rpms = (
|
"$instdir/perl-suidperl-5.6.1-34.99.6.i386.rpm", |
"$instdir/perl-suidperl-5.6.1-34.99.6.i386.rpm", |
); |
); |
my @loncapa_perl_rpms = ( |
my @loncapa_perl_rpms = ( |
"$instdir/LON-CAPA-systemperl-3.4-rh72.i386.rpm" |
"$instdir/LONCAPA-0.6.0-1.i386.rpm", |
|
"$instdir/netpbm-9.24-3.i386.rpm", |
|
"$instdir/netpbm-progs-9.24-3.i386.rpm", |
|
"$instdir/krb5-libs-1.2.4-3.i386.rpm", |
|
"$instdir/krb5-devel-1.2.4-3.i386.rpm", |
|
"$instdir/LON-CAPA-krb4-3.1-1.i386.rpm", |
); |
); |
my @mysql_rpms = ( |
my @mysql_rpms = ( |
"$instdir/mysql-3.23.49-3.i386.rpm", # okay w/o f,nd |
"$instdir/mysql-3.23.49-3.i386.rpm", # okay w/o f,nd |
Line 426 print_and_log("\n");
|
Line 433 print_and_log("\n");
|
## |
## |
## Retrieve loncapa.tar.gz |
## Retrieve loncapa.tar.gz |
## |
## |
if (! -e "$instdir/loncapa-current.tar.gz") { |
my $lctarball = 'loncapa-current.tar.gz'; |
print_and_log("Retrieving LON-CAPA source files from install.loncapa.org\n"); |
if (! -e "$instdir/$lctarball") { |
system("wget http://install.loncapa.org/versions/loncapa-current.tar.gz 2>/dev/null 1>/dev/null"); |
print_and_log("Retrieving LON-CAPA source files from install.loncapa.org\n") |
if (! -e "./loncapa-current.tar.gz") { |
; |
|
system("wget http://install.loncapa.org/versions/$lctarball 2>/dev/null 1>/d |
|
ev/null"); |
|
if (! -e "./$lctarball") { |
die("Unable to retrieve LON-CAPA source files from\n". |
die("Unable to retrieve LON-CAPA source files from\n". |
"http://install.loncapa.org/versions/loncapa-current.tar.gz\n"); |
"http://install.loncapa.org/versions/$lctarball\n"); |
} |
} |
print_and_log("\n"); |
print_and_log("\n"); |
} else { |
} else { |