blob: 6af7faef8e183bfb88f46ce52bdd27644366cddc (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
use strict;
use warnings FATAL => 'all';
use Apache::Test;
use Apache::TestUtil;
use Apache::TestRequest;
my $vars = Apache::Test::vars();
plan tests => 2, need $vars->{ssl_module_name}, need_lwp,
qw(LWP::Protocol::https);
Apache::TestRequest::user_agent_keepalive(0);
Apache::TestRequest::scheme('https');
Apache::TestRequest::module('ssl_optional_cc');
my $r;
$r = GET "/require/none/";
ok t_cmp($r->code, 200, "access permitted without ccert");
$r = GET "/require/any/";
ok !t_cmp($r->code, 200, "access *not* permitted without ccert");
|
