--- loncom/auth/migrateuser.pm 2019/08/01 15:38:36 1.25.2.1 +++ loncom/auth/migrateuser.pm 2017/11/30 15:14:51 1.26 @@ -1,7 +1,7 @@ # The LearningOnline Network # Starts a user off based of an existing token. # -# $Id: migrateuser.pm,v 1.25.2.1 2019/08/01 15:38:36 raeburn Exp $ +# $Id: migrateuser.pm,v 1.26 2017/11/30 15:14:51 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -53,7 +53,7 @@ sub goto_login { } -sub sso_check { +sub sso_lti_check { my ($data) = @_; my %extra_env; if (ref($data) eq 'HASH') { @@ -64,6 +64,21 @@ sub sso_check { $extra_env{'request.sso.reloginserver'} = $data->{'sso.reloginserver'}; } + if ($data->{'lti.login'}) { + $extra_env{'request.lti.login'} = $data->{'lti.login'}; + } + if ($data->{'lti.passbackid'}) { + $extra_env{'request.lti.passbackid'} = $data->{'lti.passbackid'}; + } + if ($data->{'lti.passbackurl'}) { + $extra_env{'request.lti.passbackurl'} = $data->{'lti.passbackurl'}; + } + if ($data->{'lti.rosterid'}) { + $extra_env{'request.lti.rosterid'} = $data->{'lti.rosterid'}; + } + if ($data->{'lti.rosterurl'}) { + $extra_env{'request.lti.rosterurl'} = $data->{'lti.rosterurl'}; + } } return \%extra_env; } @@ -171,11 +186,6 @@ sub ip_changed { } } } - unless ($hosthere) { - if (($dataref->{'balancer'}) && ($dataref->{'balcookie'})) { - &Apache::lonnet::delbalcookie($dataref->{'balcookie'},$dataref->{'balancer'}); - } - } } if ($dataref->{'sso.login'}) { $url .= '/adm/roles'; @@ -248,14 +258,7 @@ sub handler { } if ($home =~ /(con_lost|no_such_host)/) { return &goto_login($r,$udom); } - my $extra_env = &sso_check(\%data); - if (($data{'balancer'}) && ($data{'server'}) && ($data{'balcookie'})) { - if (ref($extra_env) eq 'HASH') { - $extra_env->{'request.balancercookie'} = $data{'server'}.':'.$data{'balcookie'}; - } else { - $extra_env = { 'request.balancercookie' => $data{'server'}.':'.$data{'balcookie'} }; - } - } + my $extra_env = &sso_lti_check(\%data); my %form; if ($data{'symb'} ne '') {