Lines Matching full:proxy

14 use TLSProxy::Proxy;
45 my $proxy = TLSProxy::Proxy->new(
55     my $proxy = shift;
57     if ($proxy->flight == 1) {
60         my $message = ${$proxy->message_list}[1];
67     if ($proxy->flight != 0) {
71     foreach my $message (@{$proxy->message_list}) {
86   my ($proxy, $message_type) = @_;
88     foreach my $message (@{$proxy->message_list}) {
103     my $proxy = shift;
106     if ($proxy->flight == 0) {
107         inject_duplicate_extension($proxy, TLSProxy::Message::MT_CLIENT_HELLO);
111     my $last_record = @{$proxy->{record_list}}[-1];
117     my $proxy = shift;
120     if ($proxy->flight == 0) {
122     } elsif ($proxy->flight == 1) {
123         inject_duplicate_extension($proxy, TLSProxy::Message::MT_SERVER_HELLO);
127     my $last_record = @{$proxy->{record_list}}[-1];
133     my $proxy = shift;
137     if ($proxy->flight == 0) {
143     if ($proxy->flight != 1) {
145             my $last_record = @{$proxy->record_list}[-1];
152         return if (!defined($message = ${$proxy->message_list}[2]));
154                                    .${$proxy->message_list}[1]->mt.", "
155                                    .${$proxy->message_list}[3]->mt
158         $message = ${$proxy->message_list}[1];
180     my $proxy = shift;
183     if ($proxy->flight != 0) {
187     my $message = ${$proxy->message_list}[0];
193 $proxy->start() or plan skip_all => "Unable to start up Proxy for tests";
201     $proxy->clear();
202     $proxy->filter(\&inject_duplicate_extension_serverhello);
203     $proxy->clientflags("-no_tls1_3");
204     $proxy->start();
208     $proxy->clear();
209     $proxy->filter(\&extension_filter);
210     $proxy->ciphers("AES128-SHA:\@SECLEVEL=0");
211     $proxy->clientflags("-no_tls1_3");
212     $proxy->start();
217     $proxy->clear();
218     $proxy->filter(\&inject_unsolicited_extension);
220     $proxy->clientflags("-no_tls1_3 -noservername");
221     $proxy->start();
227     $proxy->clear();
228     $proxy->filter(\&inject_cryptopro_extension);
229     $proxy->clientflags("-no_tls1_3");
230     $proxy->start();
238     $proxy->clear();
239     $proxy->filter(\&inject_unsolicited_extension);
241     $proxy->clientflags("-no_tls1_3");
242     $proxy->start();
251     $proxy->clear();
252     $proxy->filter(\&inject_unsolicited_extension);
254     $proxy->clientflags("-no_tls1_3");
255     $proxy->start();
264     $proxy->clear();
265     $proxy->filter(\&inject_unsolicited_extension);
267     $proxy->clientflags("-noservername");
268     $proxy->start();