# HG changeset patch
# User Sergey Kandaurov <pluknet@nginx.com>
# Date 1473105464 -10800
# Node ID 94f8cd9b41dcc2e0406e56936974e86e71888447
# Parent  91e64c1ceec9bcb9526982e1fd041434084a04d8
Tests: stream $status tests.

diff --git a/stream_status_variable.t b/stream_status_variable.t
new file mode 100644
--- /dev/null
+++ b/stream_status_variable.t
@@ -0,0 +1,118 @@
+#!/usr/bin/perl
+
+# (C) Sergey Kandaurov
+# (C) Nginx, Inc.
+
+# Tests for stream status variable.
+
+###############################################################################
+
+use warnings;
+use strict;
+
+use Test::More;
+
+BEGIN { use FindBin; chdir($FindBin::Bin); }
+
+use lib 'lib';
+use Test::Nginx;
+use Test::Nginx::Stream qw/ stream /;
+
+###############################################################################
+
+select STDERR; $| = 1;
+select STDOUT; $| = 1;
+
+my $t = Test::Nginx->new()->has(qw/stream stream_return stream_access/)
+	->has(qw/stream_limit_conn/);
+
+$t->write_file_expand('nginx.conf', <<'EOF');
+
+%%TEST_GLOBALS%%
+
+daemon off;
+
+events {
+}
+
+stream {
+    log_format  status  $status;
+
+    limit_conn_zone  $binary_remote_addr  zone=zone:1m;
+
+    server {
+        listen      127.0.0.1:8080;
+        return      SEE-THIS;
+        access_log  %%TESTDIR%%/200.log status;
+    }
+
+    server {
+        listen      127.0.0.1:8081;
+        return      SEE-THIS;
+        deny        all;
+        access_log  %%TESTDIR%%/403.log status;
+    }
+
+    server {
+        listen      127.0.0.1:8082;
+        proxy_pass  127.0.0.1:8083;
+        access_log  %%TESTDIR%%/502.log status;
+
+        proxy_connect_timeout 0;
+    }
+
+    server {
+        listen      127.0.0.1:8084;
+        proxy_bind  127.0.0.1:$remote_port;
+        proxy_pass  127.0.0.1:8083;
+        access_log  %%TESTDIR%%/500.log status;
+    }
+
+    server {
+        listen      127.0.0.1:8085;
+        limit_conn  zone 1;
+        proxy_pass  127.0.0.1:8086;
+        access_log  %%TESTDIR%%/503.log status;
+
+        proxy_download_rate 1;
+    }
+
+    server {
+        listen      127.0.0.1:8086;
+        return      SEE-THIS;
+    }
+}
+
+EOF
+
+$t->try_run('no stream access_log')->plan(5);
+
+###############################################################################
+
+stream('127.0.0.1:' . port(8080))->read();
+stream('127.0.0.1:' . port(8081))->read();
+stream('127.0.0.1:' . port(8082))->read();
+stream('127.0.0.1:' . port(8084))->read() if $^O ne 'MSWin32';
+
+my $s = stream('127.0.0.1:' . port(8085));
+$s->write('busy');
+stream('127.0.0.1:' . port(8085))->read();
+$s->read();
+undef $s;
+
+$t->stop();
+
+is($t->read_file('200.log'), "200\n", 'stream status 200');
+is($t->read_file('403.log'), "403\n", 'stream status 403');
+
+SKIP: {
+skip 'win32', 1 if $^O eq 'MSWin32';
+
+is($t->read_file('500.log'), "500\n", 'stream status 500');
+
+}
+
+is($t->read_file('502.log'), "502\n", 'stream status 502');
+is($t->read_file('503.log'), "503\n200\n", 'stream status 503');
+
+###############################################################################