Tests: fixed upstream resolver tests when run in parallel.

Renumbered TCP ports into the lower port range to avoid lock order reversal.

Author: pluknet

stream_upstream_resolver.t

@@ -87,7 +87,7 @@ stream {
 
 EOF
 
-$t->run_daemon(\&dns_daemon, $t, port($_), port($_ + 10)) for (8980 .. 8982);
+$t->run_daemon(\&dns_daemon, $t, port($_), port($_ - 500)) for (8980 .. 8982);
 $t->waitforfile($t->testdir . '/' . port($_)) for (8980 .. 8982);
 
 $t->try_run('no resolver in upstream')->plan(6);
@@ -118,7 +118,7 @@ sub waitfordns {
 
 		IO::Socket::INET->new(
 			Proto => 'tcp',
-			PeerAddr => '127.0.0.1:' . port($port + 10)
+			PeerAddr => '127.0.0.1:' . port($port - 500)
 		)
 			or die "Can't connect to dns control socket: $!\n";
 	}

upstream_resolver.t

@@ -74,7 +74,7 @@ http {
 
 EOF
 
-$t->run_daemon(\&dns_daemon, $t, port($_), port($_ + 10)) for (8980 .. 8982);
+$t->run_daemon(\&dns_daemon, $t, port($_), port($_ - 500)) for (8980 .. 8982);
 $t->waitforfile($t->testdir . '/' . port($_)) for (8980 .. 8982);
 
 $t->try_run('no resolver in upstream')->plan(6);
@@ -96,10 +96,9 @@ sub waitfordns {
 
 	sub sock {
 		my ($port) = @_;
-
 		IO::Socket::INET->new(
 			Proto => 'tcp',
-			PeerAddr => '127.0.0.1:' . port($port + 10)
+			PeerAddr => '127.0.0.1:' . port($port - 500)
 		)
 			or die "Can't connect to dns control socket: $!\n";
 	}