Lines Matching refs:proxy
45 my $proxy = TLSProxy::Proxy->new(
58 $proxy->filter(\&modify_supported_versions_filter);
59 $proxy->start() or plan skip_all => "Unable to start up Proxy for tests";
65 $proxy->clear();
67 $proxy->start();
71 $proxy->clear();
73 $proxy->start();
74 my $record = pop @{$proxy->record_list};
80 $proxy->clear();
81 $proxy->serverflags("-tls1_3");
82 $proxy->start();
87 $proxy->clear();
89 $proxy->start();
90 $record = pop @{$proxy->record_list};
98 $proxy->clear();
99 $proxy->clientflags("-cipher DEFAULT:\@SECLEVEL=0");
100 $proxy->ciphers("AES128-SHA:\@SECLEVEL=0");
102 $proxy->start();
103 $record = pop @{$proxy->record_list};
109 $proxy->clear();
111 $proxy->start();
112 $record = pop @{$proxy->record_list};
119 $proxy->clear();
121 $proxy->start();
126 my $proxy = shift;
128 if ($proxy->flight == 1) {
131 my $message = ${$proxy->message_list}[1];
140 if ($proxy->flight != 0) {
144 foreach my $message (@{$proxy->message_list}) {
