32 lines
738 B
Plaintext
32 lines
738 B
Plaintext
{
|
|
my $access = $callback{'access'} || 'private';
|
|
my $allow = ($access eq 'public')?'all':"$localAccess $externalSSLAccess";
|
|
|
|
my $requiressl = (($callback{'RequireSSL'} || 'yes') eq 'yes') ?
|
|
"SSLRequireSSL on":"# RequireSSL is disabled";
|
|
|
|
my $alias = (($callback{'AliasOnPrimary'} || 'enabled') eq 'enabled') ?
|
|
'ScriptAlias /callback /usr/share/callback/cgi-bin/callback.cgi' : '';
|
|
|
|
if ($callback{'status'} eq 'enabled'){
|
|
|
|
$OUT .=<<"END"
|
|
|
|
# Callback Configuration
|
|
$alias
|
|
<Directory /usr/share/callback/cgi-bin/>
|
|
SetHandler cgi-script
|
|
Options ExecCGI
|
|
AllowOverride None
|
|
$requiressl
|
|
order deny,allow
|
|
deny from all
|
|
allow from $allow
|
|
</Directory>
|
|
END
|
|
}
|
|
else{
|
|
$OUT .= "# CallBack is disabled\n";
|
|
}
|
|
}
|