lemonldap-ng/lemonldap-ng-portal/t/29-AuthSSL.t

32 lines
566 B
Perl
Raw Normal View History

2016-08-05 13:56:16 +02:00
use Test::More;
use strict;
require 't/test-lib.pm';
my $res;
2016-11-14 13:34:46 +01:00
my $client = LLNG::Manager::Test->new(
2016-08-05 13:56:16 +02:00
{
2016-11-14 13:34:46 +01:00
ini => {
logLevel => 'error',
useSafeJail => 1,
authentication => 'SSL',
userDB => 'Null',
SSLVar => 'SSL_CLIENT_S_DN_Custom',
}
2016-08-05 13:56:16 +02:00
}
);
ok(
2016-11-14 13:34:46 +01:00
$res = $client->_get(
2016-08-05 13:56:16 +02:00
'/', custom => { SSL_CLIENT_S_DN_Custom => 'dwho' }
),
'Auth query'
);
2016-12-23 11:02:21 +01:00
count(1);
expectOK($res);
my $id = expectCookie($res);
2016-08-05 13:56:16 +02:00
clean_sessions();
done_testing( count() );