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
Maxime Besson
lemonldap-ng
Commits
a9b02986
Commit
a9b02986
authored
Mar 07, 2019
by
Christophe Maudoux
🐛
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Fix using attributes (#1658)
parent
09996f98
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
7 additions
and
8 deletions
+7
-8
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Plugins/CheckUser.pm
...ap-ng-portal/lib/Lemonldap/NG/Portal/Plugins/CheckUser.pm
+7
-8
No files found.
lemonldap-ng-portal/lib/Lemonldap/NG/Portal/Plugins/CheckUser.pm
View file @
a9b02986
...
...
@@ -51,12 +51,12 @@ sub check {
unless
(
$token
)
{
$self
->
userLogger
->
warn
('
CheckUser try without token
');
$msg
=
PE_NOTOKEN
;
$token
=
$self
->
ott
->
createToken
(
$req
->
se
ssionInfo
);
$token
=
$self
->
ott
->
createToken
(
$req
->
u
se
rData
);
}
unless
(
$self
->
ott
->
getToken
(
$token
)
)
{
$self
->
userLogger
->
warn
('
Checkuser try with expired/bad token
');
$msg
=
PE_TOKENEXPIRED
;
$token
=
$self
->
ott
->
createToken
(
$req
->
se
ssionInfo
);
$token
=
$self
->
ott
->
createToken
(
$req
->
u
se
rData
);
}
return
$self
->
p
->
sendHtml
(
$req
,
...
...
@@ -93,7 +93,7 @@ sub check {
LOGIN
=>
$req
->
{
user
},
TOKEN
=>
(
$self
->
conf
->
{
requireToken
}
?
$self
->
ott
->
createToken
(
$req
->
se
ssionInfo
)
?
$self
->
ott
->
createToken
(
$req
->
u
se
rData
)
:
''
)
}
...
...
@@ -202,7 +202,7 @@ sub check {
GROUPS
=>
$array_attrs
->
[
0
],
TOKEN
=>
(
$self
->
conf
->
{
requireToken
}
?
$self
->
ott
->
createToken
(
$req
->
se
ssionInfo
)
?
$self
->
ott
->
createToken
(
$req
->
u
se
rData
)
:
''
)
}
...
...
@@ -228,7 +228,7 @@ sub display {
),
TOKEN
=>
(
$self
->
conf
->
{
requireToken
}
?
$self
->
ott
->
createToken
(
$req
->
se
ssionInfo
)
?
$self
->
ott
->
createToken
(
$req
->
u
se
rData
)
:
''
)
}
...
...
@@ -270,9 +270,8 @@ sub _authorization {
last
;
}
}
return
$exist
?
$self
->
p
->
HANDLER
->
grant
(
$req
,
$req
->
{
se
ssionInfo
},
$appuri
,
?
$self
->
p
->
HANDLER
->
grant
(
$req
,
$req
->
{
u
se
rData
},
$appuri
,
undef
,
$vhost
)
:
-
1
;
}
...
...
@@ -283,7 +282,7 @@ sub _headers {
$vhost
=~
s/:\d+$//
;
$req
->
{
env
}
->
{
HTTP_HOST
}
=
$vhost
;
$self
->
p
->
HANDLER
->
headersInit
(
$self
->
{
conf
}
);
return
$self
->
p
->
HANDLER
->
checkHeaders
(
$req
,
$req
->
{
se
ssionInfo
}
);
return
$self
->
p
->
HANDLER
->
checkHeaders
(
$req
,
$req
->
{
u
se
rData
}
);
}
sub
_splitAttributes
{
...
...
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