|
|
@ -10,6 +10,7 @@ my $rewrite = $domain->prop('Rewrite') || ''; |
|
|
|
my $allow = $domain->prop('AllowHosts') || ''; |
|
|
|
my $allow = $domain->prop('AllowHosts') || ''; |
|
|
|
my $preserve = $domain->prop('ProxyPreserveHost') || 'no'; |
|
|
|
my $preserve = $domain->prop('ProxyPreserveHost') || 'no'; |
|
|
|
my $keepalive = $domain->prop('ProxyNoKeepAlive') || 'no'; |
|
|
|
my $keepalive = $domain->prop('ProxyNoKeepAlive') || 'no'; |
|
|
|
|
|
|
|
my @alias = split /[,;]/, ($domain->prop('Alias') || ''); |
|
|
|
my @env = split(/[;,]/, ($domain->prop('SetEnv') || '')); |
|
|
|
my @env = split(/[;,]/, ($domain->prop('SetEnv') || '')); |
|
|
|
my $auth = $domain->prop('Authentication') || 'none'; |
|
|
|
my $auth = $domain->prop('Authentication') || 'none'; |
|
|
|
my @groups = split(/[;,]/, ($domain->prop('AllowGroups') || '')); |
|
|
|
my @groups = split(/[;,]/, ($domain->prop('AllowGroups') || '')); |
|
|
@ -44,6 +45,13 @@ else{ |
|
|
|
$OUT .= " DocumentRoot $root\n"; |
|
|
|
$OUT .= " DocumentRoot $root\n"; |
|
|
|
} |
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
foreach (@alias){ |
|
|
|
|
|
|
|
next unless $_ =~ m/^(\/\w+)=(\/.*)/; |
|
|
|
|
|
|
|
my ($al, $targ) = ($1, $2); |
|
|
|
|
|
|
|
next unless (-e $2); |
|
|
|
|
|
|
|
$OUT .= " Alias $al $targ\n"; |
|
|
|
|
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
foreach (@env){ |
|
|
|
foreach (@env){ |
|
|
|
next unless (m/^(.*)=(.*)$/); |
|
|
|
next unless (m/^(.*)=(.*)$/); |
|
|
|
$OUT .= " SetEnv $1 $2\n"; |
|
|
|
$OUT .= " SetEnv $1 $2\n"; |
|
|
|