Lines Matching full:proxy

12 use TLSProxy::Proxy;
47 my $proxy = TLSProxy::Proxy->new(
60 $proxy->filter(\&modify_supported_versions_filter);
61 $proxy->start() or plan skip_all => "Unable to start up Proxy for tests";
67 $proxy->clear();
69 $proxy->start();
73 $proxy->clear();
75 $proxy->start();
76 my $record = pop @{$proxy->record_list};
82 $proxy->clear();
83 $proxy->serverflags("-tls1_3");
84 $proxy->start();
89 $proxy->clear();
91 $proxy->start();
92 $record = pop @{$proxy->record_list};
95    && TLSProxy::Proxy->is_tls13(),
100 $proxy->clear();
101 $proxy->clientflags("-cipher DEFAULT:\@SECLEVEL=0");
102 $proxy->ciphers("AES128-SHA:\@SECLEVEL=0");
104 $proxy->start();
105 $record = pop @{$proxy->record_list};
111 $proxy->clear();
113 $proxy->start();
114 $record = pop @{$proxy->record_list};
117    && TLSProxy::Proxy->is_tls13(),
121 $proxy->clear();
123 $proxy->start();
128     my $proxy = shift;
130     if ($proxy->flight == 1) {
133         my $message = ${$proxy->message_list}[1];
142     if ($proxy->flight != 0) {
146     foreach my $message (@{$proxy->message_list}) {