Mercurial > hg > nginx-tests

diff stream_udp_proxy.t @ 974:882267679006

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: simplified parallel modifications in tests. Mail tests were simplified in c227348453db.
author Andrey Zelenkov <zelenkov@nginx.com>
date Tue, 12 Jul 2016 17:39:03 +0300
parents e9064d691790
children 196d33c2bb45
line wrap: on
line diff
--- a/stream_udp_proxy.t
+++ b/stream_udp_proxy.t
@@ -36,43 +36,43 @@ stream {
     proxy_timeout        1s;
 
     server {
-        listen           127.0.0.1:%%PORT_0_UDP%% udp;
-        proxy_pass       127.0.0.1:%%PORT_1_UDP%%;
+        listen           127.0.0.1:%%PORT_8080_UDP%% udp;
+        proxy_pass       127.0.0.1:%%PORT_8081_UDP%%;
 
         proxy_responses  0;
     }
 
     server {
-        listen           127.0.0.1:%%PORT_2_UDP%% udp;
-        proxy_pass       127.0.0.1:%%PORT_1_UDP%%;
+        listen           127.0.0.1:%%PORT_8082_UDP%% udp;
+        proxy_pass       127.0.0.1:%%PORT_8081_UDP%%;
 
         proxy_responses  2;
     }
 
     server {
-        listen           127.0.0.1:%%PORT_3_UDP%% udp;
-        proxy_pass       127.0.0.1:%%PORT_1_UDP%%;
+        listen           127.0.0.1:%%PORT_8083_UDP%% udp;
+        proxy_pass       127.0.0.1:%%PORT_8081_UDP%%;
     }
 }
 
 EOF
 
 
-$t->run_daemon(\&udp_daemon, port(1), $t);
+$t->run_daemon(\&udp_daemon, port(8081), $t);
 $t->try_run('no stream udp')->plan(5);
-$t->waitforfile($t->testdir . '/' . port(1));
+$t->waitforfile($t->testdir . '/' . port(8081));
 
 ###############################################################################
 
-my $s = dgram('127.0.0.1:' . port(0));
+my $s = dgram('127.0.0.1:' . port(8080));
 is($s->io('1', read => 1, read_timeout => 0.5), '', 'proxy responses 0');
 
-$s = dgram('127.0.0.1:' . port(2));
+$s = dgram('127.0.0.1:' . port(8082));
 is($s->io('1'), '1', 'proxy responses 1');
 is($s->io('2', read => 2), '12', 'proxy responses 2');
 is($s->io('3', read => 3, read_timeout => 0.5), '12', 'proxy responses 3');
 
-$s = dgram('127.0.0.1:' . port(3));
+$s = dgram('127.0.0.1:' . port(8083));
 is($s->io('3', read => 3), '123', 'proxy responses default');
 
 ###############################################################################
@@ -82,14 +82,14 @@ sub udp_daemon {
 
 	my $server = IO::Socket::INET->new(
 		Proto => 'udp',
-		LocalAddr => '127.0.0.1:' . port(1),
+		LocalAddr => '127.0.0.1:' . port(8081),
 		Reuse => 1,
 	)
 		or die "Can't create listening socket: $!\n";
 
 	# signal we are ready
 
-	open my $fh, '>', $t->testdir() . '/' . port(1);
+	open my $fh, '>', $t->testdir() . '/' . port(8081);
 	close $fh;
 
 	while (1) {