Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Open sidebar
Xavier Bachelot
lemonldap-ng
Commits
1988983c
Commit
1988983c
authored
Dec 31, 2019
by
Christophe Maudoux
🐛
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Typo
parent
6f3bdfd9
Changes
4
Show whitespace changes
Inline
Side-by-side
Showing
4 changed files
with
6 additions
and
6 deletions
+6
-6
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Issuer/CAS.pm
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Issuer/CAS.pm
+2
-2
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Issuer/Get.pm
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Issuer/Get.pm
+1
-1
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Issuer/SAML.pm
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Issuer/SAML.pm
+2
-2
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Run.pm
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Run.pm
+1
-1
No files found.
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Issuer/CAS.pm
View file @
1988983c
...
...
@@ -129,7 +129,7 @@ sub run {
my
$url
=
$req
->
uri
();
# Session ID
my
$session_id
=
$req
->
{
sessionInfo
}
->
{
_session_id
}
||
$req
->
{
id
}
;
my
$session_id
=
$req
->
{
sessionInfo
}
->
{
_session_id
}
||
$req
->
id
;
# Session creation timestamp
my
$time
=
$req
->
{
sessionInfo
}
->
{
_utime
}
||
time
();
...
...
@@ -400,7 +400,7 @@ sub logout {
my
(
$self
,
$req
)
=
@_
;
# Session ID
my
$session_id
=
$req
->
{
sessionInfo
}
->
{
_session_id
}
||
$req
->
{
id
}
;
my
$session_id
=
$req
->
{
sessionInfo
}
->
{
_session_id
}
||
$req
->
id
;
# Delete linked CAS sessions
$self
->
deleteCasSecondarySessions
(
$session_id
)
if
(
$session_id
);
...
...
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Issuer/Get.pm
View file @
1988983c
...
...
@@ -44,7 +44,7 @@ sub run {
}
# Session ID
my
$session_id
=
$req
->
{
sessionInfo
}
->
{
_session_id
}
||
$
self
->
{
id
}
;
my
$session_id
=
$req
->
{
sessionInfo
}
->
{
_session_id
}
||
$
req
->
id
;
# Session creation timestamp
my
$time
=
$req
->
{
sessionInfo
}
->
{
_utime
}
||
time
();
...
...
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Issuer/SAML.pm
View file @
1988983c
...
...
@@ -211,7 +211,7 @@ sub run {
}
# Session ID
my
$session_id
=
$req
->
{
sessionInfo
}
->
{
_session_id
}
||
$req
->
{
id
}
;
my
$session_id
=
$req
->
{
sessionInfo
}
->
{
_session_id
}
||
$req
->
id
;
# Session creation timestamp
my
$time
=
$req
->
{
sessionInfo
}
->
{
_utime
}
||
time
();
...
...
@@ -1268,7 +1268,7 @@ sub logout {
return
PE_OK
if
(
$req
->
data
->
{
samlSLOCalled
}
);
# Session ID
my
$session_id
=
$req
->
{
sessionInfo
}
->
{
_session_id
}
||
$req
->
{
id
}
;
my
$session_id
=
$req
->
{
sessionInfo
}
->
{
_session_id
}
||
$req
->
id
;
# Close SAML sessions
unless
(
$self
->
deleteSAMLSecondarySessions
(
$session_id
)
)
{
...
...
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Main/Run.pm
View file @
1988983c
...
...
@@ -514,7 +514,7 @@ sub updateSession {
return
()
unless
(
ref
$infos
eq
'
HASH
'
and
%$infos
);
# Recover session ID unless given
$id
||=
$req
->
{
id
}
||
$req
->
userData
->
{
_session_id
};
$id
||=
$req
->
id
||
$req
->
userData
->
{
_session_id
};
if
(
$id
)
{
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment