version 1.30, 2021/04/18 02:08:46
|
version 1.32, 2021/07/17 20:34:15
|
Line 79 sub handler {
|
Line 79 sub handler {
|
($remote_ip eq &Apache::lonnet::get_host_ip($lonhost)) || |
($remote_ip eq &Apache::lonnet::get_host_ip($lonhost)) || |
($vpnint && &Apache::lonnet::ip_match($remote_ip,$vpnint))) { |
($vpnint && &Apache::lonnet::ip_match($remote_ip,$vpnint))) { |
$redirect = $alias; |
$redirect = $alias; |
if ($r->uri=~m{^/raw/}){ |
if (($r->uri=~m{^/raw/}) || ($r->uri=~m{^/adm/dns/(hosts|domain)$})) { |
my %iphost = &Apache::lonnet::get_iphost(); |
my %iphost = &Apache::lonnet::get_iphost(); |
if (exists($iphost{$remote_ip})) { |
if (exists($iphost{$remote_ip})) { |
undef($redirect); |
undef($redirect); |
Line 89 sub handler {
|
Line 89 sub handler {
|
} |
} |
if ($redirect) { |
if ($redirect) { |
my $uri = $r->uri; |
my $uri = $r->uri; |
|
if (($uri eq '/adm/sso') || ($uri eq '/adm/switchserver') || |
|
($uri =~ m{^/Shibboleth.sso/})) { |
|
return DECLINED; |
|
} |
unless ($uri eq '/adm/migrateuser') { |
unless ($uri eq '/adm/migrateuser') { |
my %user; |
my %user; |
my $handle = &Apache::lonnet::check_for_valid_session($r,undef,\%user); |
my $handle = &Apache::lonnet::check_for_valid_session($r,undef,\%user); |