Lines Matching refs:proxy

31 my $proxy = TLSProxy::Proxy->new(
46 $proxy->filter(\&hrr_filter);
48     $proxy->serverflags("-curves ffdhe3072");
50     $proxy->serverflags("-curves P-256");
53 $proxy->start() or plan skip_all => "Unable to start up Proxy for tests";
59 $proxy->clear();
61     $proxy->serverflags("-curves ffdhe3072");
63     $proxy->serverflags("-curves P-256");
65 $proxy->ciphersuitess("TLS_AES_128_GCM_SHA256:TLS_AES_256_GCM_SHA384");
67 $proxy->start();
73 $proxy->clear();
75     $proxy->serverflags("-curves ffdhe3072");
77     $proxy->serverflags("-curves P-256");
80 $proxy->start();
85     my $proxy = shift;
89         if ($proxy->flight != 1) {
93         my $hrr = ${$proxy->message_list}[1];
106         if ($proxy->flight == 4) {
108                 if @{$proxy->record_list}[-1]->is_fatal_alert(0) == 10;
111         if ($proxy->flight != 3) {
117         for ($i = 0; ${$proxy->record_list}[$i]->flight() < 1; $i++) {
120         my $hrr_record = ${$proxy->record_list}[$i];
132         splice @{$proxy->record_list}, $i, 0, $dup_hrr;
137     if ($proxy->flight != 0) {
141     my $ch1 = ${$proxy->message_list}[0];