version 1.158.2.13.2.4, 2022/05/29 12:44:12
|
version 1.158.2.13.2.5, 2022/06/01 12:21:06
|
Line 443 sub handler {
|
Line 443 sub handler {
|
} else { |
} else { |
$tokenextras .= '&'.$name.'='.&escape($env{'form.'.$name}); |
$tokenextras .= '&'.$name.'='.&escape($env{'form.'.$name}); |
if (($name eq 'linkkey') || ($name eq 'linkprot')) { |
if (($name eq 'linkkey') || ($name eq 'linkprot')) { |
if (($env{'form.retry'}) && (!$env{'form.ltoken'}) && ($name eq 'linkprot')) { |
if ((($env{'form.retry'}) || ($env{'form.sso'})) && |
|
(!$env{'form.ltoken'}) && ($name eq 'linkprot')) { |
$linkprot_for_login = $env{'form.linkprot'}; |
$linkprot_for_login = $env{'form.linkprot'}; |
} |
} |
$tokentype = 'link'; |
$tokentype = 'link'; |
Line 902 ENDSAML
|
Line 903 ENDSAML
|
my ($linkprotector,$linkproturi) = split(/:/,$linkprot_for_login,2); |
my ($linkprotector,$linkproturi) = split(/:/,$linkprot_for_login,2); |
if (($linkprotector =~ /^\d+(c|d)$/) && ($linkproturi =~ m{^/+tiny/+$LONCAPA::match_domain/+\w+$})) { |
if (($linkprotector =~ /^\d+(c|d)$/) && ($linkproturi =~ m{^/+tiny/+$LONCAPA::match_domain/+\w+$})) { |
my $set_target; |
my $set_target; |
if ($env{'form.retry'}) { |
if (($env{'form.retry'}) || ($env{'form.sso'})) { |
if ($linkproturi eq $env{'form.firsturl'}) { |
if ($linkproturi eq $env{'form.firsturl'}) { |
$set_target = " document.server.target = '_self';"; |
$set_target = " document.server.target = '_self';"; |
} |
} |