dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Test token (#1976)

Browse Source
This commit is contained in:
Christophe Maudoux 2021-01-02 17:46:16 +01:00
parent a1700369c5
commit 5e8effcddd
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lemonldap-ng-portal/t/68-FindUser-with-Demo-and-token.t
View File

@ -30,7 +30,15 @@ my ( $host, $url, $query ) =
expectForm( $res, '#', undef, 'user', 'password', 'spoofId', 'token' );
( $host, $url, $query ) =
expectForm( $res, '#', undef, 'uid', 'guy', 'cn', 'token' );
count(1);
ok(
$res->[2]->[0] =~
m%<input id="token" type="hidden" name="token" value="([\d_]+?)" />%,
'Token value found'
) or explain( $res->[2]->[0], 'Token value' );
my $count = $res->[2]->[0] =~ s/$1//g;
ok( $count == 2, 'Two token value found' )
or explain( $res->[2]->[0], '2 token values found' );
count(3);
$query =~ s/uid=/uid=dwho/;
ok(