c->session(token => $token); $c->redirect_to($url)},
on_error => sub ($c, $error) {$c->render(json => $error)},
get_token => sub ($c) {$c->session('token')},
get_user => sub ($token) {$token
en the user's authorization request fails.
Default: renders the Authorization Server's response (JSON)
=head2 current_user
Returns the user record (from L</get_user>) for the currently logged in us
sp->res->is_error);
@conf{qw(auth_endpoint token_endpoint logout_endpoint)} =
@{$resp->res->json}{qw(authorization_endpoint token_endpoint end_session_endpoint)};
# internal helper for stored
,
}
);
if ($resp->res->json->{error}) {
return $oidc_params->{on_error}->($self, $resp->res->json);
} else {
try {
my $token = $resp->res->json->{access_token};
# Decode
} catch ($e) {
$self->log->error($e);
$oidc_params->{on_error}->($self, $resp->res->json);
}
}
}
sub session($self) {
my $return_token = $self->param('t');
my ($token, $data)
_token')->($self)} catch ($e) {
}
$data->{token} = $token if ($return_token);
$self->render(json => $data);
}
sub logout($self) {
my $oidc_params = $self->app->renderer->get_helper('__oidc_pa