added some (passing) tests for "location if" compatibilities.

Author: agentzh

t/085-if.t

@@ -0,0 +1,202 @@
+# vim:set ft= ts=4 sw=4 et fdm=marker:
+use lib 'lib';
+use Test::Nginx::Socket;
+
+#worker_connections(1014);
+#master_on();
+#workers(2);
+#log_level('warn');
+
+repeat_each(2);
+#repeat_each(1);
+
+plan tests => repeat_each() * (blocks() * 3 + 2);
+
+#no_diff();
+#no_long_string();
+run_tests();
+
+__DATA__
+
+=== TEST 1: set_by_lua (if fails)
+--- config
+    location /t {
+        set $true $arg_a;
+        if ($true) {
+            set_by_lua $true 'return tonumber(ngx.var["true"]) + 1';
+            break;
+        }
+        set $true "empty";
+
+        echo "[$true]";
+    }
+--- request
+GET /t
+--- response_body
+[empty]
+--- no_error_log
+[error]
+
+
+
+=== TEST 2: set_by_lua (if true)
+--- config
+    location /t {
+        set $true $arg_a;
+        if ($true) {
+            set_by_lua $true 'return tonumber(ngx.var["true"]) + 1';
+            break;
+        }
+        set $true "blah";
+
+        echo "[$true]";
+    }
+--- request
+GET /t?a=2
+--- response_body
+[3]
+--- no_error_log
+[error]
+
+
+
+=== TEST 3: content_by_lua inherited by location if
+--- config
+    location /t {
+        set $true 1;
+        if ($true) {
+            # nothing
+        }
+
+        content_by_lua 'ngx.say("hello world")';
+    }
+--- request
+GET /t
+--- response_body
+hello world
+--- no_error_log
+[error]
+
+
+
+=== TEST 4: rewrite_by_lua inherited by location if
+--- config
+    location /t {
+        set $true 1;
+        if ($true) {
+            # nothing
+        }
+
+        rewrite_by_lua 'ngx.say("hello world") ngx.exit(200)';
+    }
+--- request
+GET /t
+--- response_body
+hello world
+--- no_error_log
+[error]
+
+
+
+=== TEST 5: access_by_lua inherited by location if
+--- config
+    location /t {
+        set $true 1;
+        if ($true) {
+            # nothing
+        }
+
+        access_by_lua 'ngx.say("hello world") ngx.exit(200)';
+    }
+--- request
+GET /t
+--- response_body
+hello world
+--- no_error_log
+[error]
+
+
+
+=== TEST 6: log_by_lua inherited by location if
+--- config
+    location /t {
+        set $true 1;
+        if ($true) {
+            # nothing
+        }
+
+        log_by_lua 'ngx.log(ngx.WARN, "from log by lua")';
+        echo hello world;
+    }
+--- request
+GET /t
+--- response_body
+hello world
+--- no_error_log
+[error]
+--- error_log
+from log by lua
+
+
+
+=== TEST 7: header_filter_by_lua inherited by location if
+--- config
+    location /t {
+        set $true 1;
+        if ($true) {
+            # nothing
+        }
+
+        header_filter_by_lua 'ngx.header.Foo = "bah"';
+        echo hello world;
+    }
+--- request
+GET /t
+--- response_body
+hello world
+--- response_headers
+Foo: bah
+--- no_error_log
+[error]
+
+
+
+=== TEST 8: body_filter_by_lua inherited by location if
+--- config
+    location /t {
+        set $true 1;
+        if ($true) {
+            # nothing
+        }
+
+        body_filter_by_lua 'ngx.arg[1] = string.upper(ngx.arg[1])';
+        echo hello world;
+    }
+--- request
+GET /t
+--- response_body
+HELLO WORLD
+--- no_error_log
+[error]
+
+
+
+=== TEST 9: if is evil for ngx_proxy
+This test case requires the following patch for the nginx core:
+http://mailman.nginx.org/pipermail/nginx-devel/2012-June/002374.html
+--- config
+    location /proxy-pass-uri {
+        proxy_pass http://127.0.0.1:1984/;
+
+        set $true 1;
+
+        if ($true) {
+            # nothing
+        }
+    }
+--- request
+GET /proxy-pass-uri
+--- response_body_like: It works!
+--- no_error_log
+[error]
+