# HG changeset patch
# User Sergey Kandaurov <pluknet@nginx.com>
# Date 1466151430 -10800
# Node ID b9e42c554ba713853bf0c507be27bf7fb9076d17
# Parent  e3df9c2100de80beb752e15b90aa0db79bd05bc6
Tests: skip UDP tests on win32, udp feature introduced.

The UDP sockets are not supported in nginx on this platform.

diff --git a/lib/Test/Nginx.pm b/lib/Test/Nginx.pm
--- a/lib/Test/Nginx.pm
+++ b/lib/Test/Nginx.pm
@@ -198,6 +198,10 @@ sub has_feature($) {
 		return $^O ne 'MSWin32';
 	}
 
+	if ($feature eq 'udp') {
+		return $^O ne 'MSWin32';
+	}
+
 	return 0;
 }
 
diff --git a/stream_udp_limit_conn.t b/stream_udp_limit_conn.t
--- a/stream_udp_limit_conn.t
+++ b/stream_udp_limit_conn.t
@@ -23,7 +23,7 @@ use Test::Nginx::Stream qw/ dgram /;
 select STDERR; $| = 1;
 select STDOUT; $| = 1;
 
-my $t = Test::Nginx->new()->has(qw/stream stream_limit_conn shmem/)
+my $t = Test::Nginx->new()->has(qw/stream stream_limit_conn udp shmem/)
 	->write_file_expand('nginx.conf', <<'EOF');
 
 %%TEST_GLOBALS%%
diff --git a/stream_udp_proxy.t b/stream_udp_proxy.t
--- a/stream_udp_proxy.t
+++ b/stream_udp_proxy.t
@@ -22,7 +22,7 @@ use Test::Nginx::Stream qw/ dgram /;
 select STDERR; $| = 1;
 select STDOUT; $| = 1;
 
-my $t = Test::Nginx->new()->has(qw/stream/)
+my $t = Test::Nginx->new()->has(qw/stream udp/)
 	->write_file_expand('nginx.conf', <<'EOF');
 
 %%TEST_GLOBALS%%
diff --git a/stream_udp_upstream.t b/stream_udp_upstream.t
--- a/stream_udp_upstream.t
+++ b/stream_udp_upstream.t
@@ -23,7 +23,7 @@ use Test::Nginx::Stream qw/ dgram /;
 select STDERR; $| = 1;
 select STDOUT; $| = 1;
 
-my $t = Test::Nginx->new()->has(qw/stream/)
+my $t = Test::Nginx->new()->has(qw/stream udp/)
 	->write_file_expand('nginx.conf', <<'EOF');
 
 %%TEST_GLOBALS%%
diff --git a/stream_udp_upstream_hash.t b/stream_udp_upstream_hash.t
--- a/stream_udp_upstream_hash.t
+++ b/stream_udp_upstream_hash.t
@@ -23,7 +23,7 @@ use Test::Nginx::Stream qw/ dgram /;
 select STDERR; $| = 1;
 select STDOUT; $| = 1;
 
-my $t = Test::Nginx->new()->has(qw/stream stream_upstream_hash/);
+my $t = Test::Nginx->new()->has(qw/stream stream_upstream_hash udp/);
 
 $t->write_file_expand('nginx.conf', <<'EOF');
 
diff --git a/stream_udp_upstream_least_conn.t b/stream_udp_upstream_least_conn.t
--- a/stream_udp_upstream_least_conn.t
+++ b/stream_udp_upstream_least_conn.t
@@ -23,7 +23,7 @@ use Test::Nginx::Stream qw/ dgram /;
 select STDERR; $| = 1;
 select STDOUT; $| = 1;
 
-my $t = Test::Nginx->new()->has(qw/stream stream_upstream_least_conn/)
+my $t = Test::Nginx->new()->has(qw/stream stream_upstream_least_conn udp/)
 	->write_file_expand('nginx.conf', <<'EOF');
 
 %%TEST_GLOBALS%%