lemonldap-ng/lemonldap-ng-portal/t/25-AuthSlave.t

34 lines
658 B
Perl
Raw Normal View History

2016-05-25 21:30:43 +02:00
use Test::More;
use strict;
require 't/test-lib.pm';
my $res;
2019-02-07 09:27:56 +01:00
my $client = LLNG::Manager::Test->new( {
2016-11-14 13:34:46 +01:00
ini => {
logLevel => 'error',
useSafeJail => 1,
authentication => 'Slave',
userDB => 'Same',
2016-11-14 13:34:46 +01:00
slaveUserHeader => 'My-Test',
slaveExportedVars => {
name => 'Name',
}
2016-05-25 21:30:43 +02:00
}
}
);
ok(
2016-11-14 13:34:46 +01:00
$res = $client->_get(
2016-05-25 21:30:43 +02:00
'/', custom => { HTTP_MY_TEST => 'dwho', HTTP_NAME => 'Dr Who' }
),
'Auth query'
);
2016-12-23 07:41:03 +01:00
count(1);
expectOK($res);
my $id = expectCookie($res);
2016-05-25 21:30:43 +02:00
clean_sessions();
done_testing( count() );