version 1.1, 2006/09/19 20:59:31
|
version 1.2, 2006/10/10 01:16:33
|
Line 205 sub setup_www {
|
Line 205 sub setup_www {
|
## Set up www |
## Set up www |
## |
## |
print_and_log("Creating user 'www'\n"); |
print_and_log("Creating user 'www'\n"); |
$result = `/usr/sbin/useradd www`; |
# -- Add group |
if (! (($result eq '') || ($result =~ /user www exists/))) { |
my $status = `/usr/sbin/groupadd www`; |
die "Unable to add user www. Halting.\n"; |
if (! (($status eq '') || ($status =~ /Group `www' already exists\./))) { |
|
die "Unable to add group www. Halting.\n"; |
|
} |
|
my $gid = getgrnam('www'); |
|
|
|
if (open (PIPE, "/usr/sbin/useradd -c LONCAPA -g $gid www 2>&1 |")) { |
|
$status = <PIPE>; |
|
close(PIPE); |
|
chomp($status); |
|
if (! (($status eq '') || ($status =~ /Account `www' already exists\./))){ |
|
die "Unable to add user www. Halting.\n"; |
|
} |
|
} else { |
|
die "Unable to run command to add user www. Halting.\n"; |
} |
} |
|
|
if (!-e '/home/www') { |
if (!-e '/home/www') { |
mkdir('/home/www',0755); |
mkdir('/home/www',0755); |
system('chmod www:www /home/www'); |
system('chmod www:www /home/www'); |
} |
} |
writelog ($result); |
writelog ($status); |
} |
} |
|
|
############################################### |
############################################### |
Line 355 ENDMYSQL
|
Line 369 ENDMYSQL
|
############################################### |
############################################### |
## |
## |
## Copy apache2 config files: default-server.conf, |
## Copy apache2 config files: default-server.conf, |
## uid.conf, conf.d/mod_perl.conf, /etc/sysconfig/apache2 |
## uid.conf, /etc/sysconfig/apache2 |
## and create symlink from /srv/www/conf to /etc/apache2 |
## and create symlink from /srv/www/conf to /etc/apache2 |
## |
## |
############################################### |
############################################### |
Line 380 sub copy_apache2_conf {
|
Line 394 sub copy_apache2_conf {
|
|
|
############################################### |
############################################### |
## |
## |
## Modify uid.conf, conf.d/mod_perl.conf |
## Modify uid.conf |
## |
## |
############################################### |
############################################### |
sub copy_apache2_conf_files { |
sub copy_apache2_conf_files { |
Line 390 sub copy_apache2_conf_files {
|
Line 404 sub copy_apache2_conf_files {
|
} |
} |
copy "$instdir/uid.conf","/etc/apache2/uid.conf"; |
copy "$instdir/uid.conf","/etc/apache2/uid.conf"; |
chmod 0444,"/etc/apache2/uid.conf"; |
chmod 0444,"/etc/apache2/uid.conf"; |
print_and_log("Copying our mod_perl.conf to /etc/apache2/conf.d/mod_perl.conf\n"); |
|
if (!-e "/etc/apache2/mod_perl.conf.original") { |
|
copy "/etc/apache2/conf.d/mod_perl.conf","/etc/apache2/mod_perl.conf.original"; |
|
} |
|
copy "$instdir/mod_perl.conf","/etc/apache2/conf.d/mod_perl.conf"; |
|
chmod 0444,"/etc/apache2/conf.d/mod_perl.conf"; |
|
} |
} |
|
|
############################################### |
############################################### |