Lines Matching refs:proxy

54     my $proxy;
56         $proxy = TLSProxy::Proxy->new_dtls(
63         $proxy = TLSProxy::Proxy->new(
75         $proxy->clear();
79         $proxy->serverflags("-tls1_2");
80         $proxy->clientflags("-no_tls1_3");
81         $proxy_start_success = $proxy->start();
89     $proxy->clear();
92         $proxy->serverflags("-min_protocol DTLSv1.2 -max_protocol DTLSv1.2");
93         $proxy->clientflags("-max_protocol DTLSv1.2");
95         $proxy->serverflags("-tls1_2");
96         $proxy->clientflags("-no_tls1_3");
98     $proxy_start_success = $proxy->start();
110         $proxy->clear();
113         $proxy->serverflags("-tls1_2");
114         $proxy->clientflags("-no_tls1_3");
115         $proxy->start();
122         $proxy->clear();
123         $proxy->filter(\&add_frag_alert_filter);
124         $proxy->serverflags("-tls1_2");
125         $proxy->clientflags("-no_tls1_3");
126         $proxy->start();
145         $proxy->clear();
146         $proxy->filter(\&add_sslv2_filter);
147         $proxy->serverflags("-tls1_2");
148         $proxy->clientflags("-no_tls1_3 -legacy_renegotiation");
149         $proxy->ciphers("AES128-SHA:\@SECLEVEL=0");
150         $proxy->start();
157         $proxy->clear();
158         $proxy->serverflags("-tls1_2");
159         $proxy->clientflags("-no_tls1_3");
160         $proxy->ciphers("AES128-SHA:\@SECLEVEL=0");
161         $proxy->start();
168         $proxy->clear();
169         $proxy->serverflags("-tls1_2");
170         $proxy->clientflags("-no_tls1_3");
171         $proxy->ciphers("AES128-SHA:\@SECLEVEL=0");
172         $proxy->start();
178         $proxy->clear();
179         $proxy->serverflags("-tls1_2");
180         $proxy->clientflags("-no_tls1_3");
181         $proxy->ciphers("AES128-SHA:\@SECLEVEL=0");
182         $proxy->start();
188         $proxy->clear();
189         $proxy->serverflags("-tls1_2");
190         $proxy->clientflags("-no_tls1_3");
191         $proxy->ciphers("AES128-SHA:\@SECLEVEL=0");
192         $proxy->start();
199     $proxy->clear();
201         $proxy->serverflags("-min_protocol DTLSv1.2 -max_protocol DTLSv1.2");
202         $proxy->clientflags("-max_protocol DTLSv1.2");
204         $proxy->serverflags("-tls1_2");
205         $proxy->clientflags("-no_tls1_3");
207     $proxy->filter(\&add_unknown_record_type);
208     $proxy_start_success = $proxy->start();
222         $proxy->clear();
224 …     $proxy->clientflags("-min_protocol DTLSv1 -max_protocol DTLSv1 -cipher DEFAULT:\@SECLEVEL=0");
226             $proxy->clientflags("-tls1_1 -cipher DEFAULT:\@SECLEVEL=0");
228         $proxy->ciphers("AES128-SHA:\@SECLEVEL=0");
229         $proxy_start_success = $proxy->start();
241         $proxy->clear();
242         $proxy->clientflags("-tls1_2");
243         $proxy->filter(\&change_version);
244         $proxy->start();
253             $proxy->clear();
254             $proxy->filter(\&change_version);
255             $proxy->start();
260             $proxy->clear();
261             $proxy->filter(\&add_unknown_record_type);
262             $proxy->start();
268             $proxy->clear();
269             $proxy->filter(\&change_outer_record_type);
270             $proxy->start();
284             $proxy->clear();
286             $proxy->filter(\&not_on_record_boundary);
287             $proxy->start();
293             $proxy->clear();
295             $proxy->start();
301             $proxy->clear();
303             $proxy->start();
310             $proxy->clear();
312             $proxy->start();
317             $proxy->clear();
319             $proxy->start();
331                 $proxy->clear();
332                 $proxy->filter(\&change_server_hello_version);
333                 $proxy->serverflags("-groups P-256"); # Force an HRR
334                 $proxy->start();
344     my $proxy = shift;
345     my $records = $proxy->record_list;
346     my $isdtls = $proxy->isdtls();
349     if ($proxy->flight != 0) {
389     my $proxy = shift;
390     my $records = $proxy->record_list;
394     if ($proxy->flight != 0) {
445     my $proxy = shift;
450     if ($proxy->flight != 0) {
455     shift @{$proxy->record_list};
473         push @{$proxy->record_list}, $record;
512         push @{$proxy->record_list}, $record;
551         push @{$proxy->record_list}, $record;
571         push @{$proxy->record_list}, $record;
585         push @{$proxy->record_list}, $record;
592     my $proxy = shift;
593     my $records = $proxy->record_list;
594     my $isdtls = $proxy->isdtls;
598     if ($proxy->flight == 0) {
601     } elsif ($proxy->flight != 1 || $added_record) {
638     for ($i = 0; ${$proxy->record_list}[$i]->flight() < 1; $i++) {
643     splice @{$proxy->record_list}, $i, 0, $record;
649     my $proxy = shift;
650     my $records = $proxy->record_list;
653     if ($proxy->flight != 1) {
666     my $proxy = shift;
667     my $records = $proxy->record_list;
670     if ($proxy->flight != 3) {
686     my $proxy = shift;
687     my $records = $proxy->record_list;
690     if ($proxy->flight != 1) {
708     my $proxy = shift;
709     my $records = $proxy->record_list;
713     if ($proxy->flight != 1) {
739         return if @{$proxy->{message_list}}[-1]->{mt}
760         return if @{$proxy->{message_list}}[-1]->{mt}
792         return if @{$proxy->{message_list}}[-1]->{mt}