uri_escape default configuration

Enable unescape_plus_sign for GET-parameters by default

Author: migolovanov

http/server.lua

@@ -186,7 +186,7 @@ local function query_param(self, name)
             local params = lib.params(self.query)
             local pres = {}
             for k, v in pairs(params) do
-                pres[ uri_unescape(k) ] = uri_unescape(v)
+                pres[ uri_unescape(k, true) ] = uri_unescape(v, true)
             end
             rawset(self, 'query_params', pres)
         end

test/integration/http_server_requests_test.lua

@@ -160,6 +160,33 @@ g.test_GET_and_POST = function()
     t.assert_equals(r.body, 'POST = test', 'POST reply')
 end
 
+-- test GET parameters.
+g.test_GET_params = function()
+    local httpd = g.httpd
+
+    local r = httpd:route({
+        method = 'GET',
+        path = '/param',
+        file = 'helper.html.el'
+    }, function(tx)
+        local params = ""
+        for k,v in pairs(tx:param()) do
+            params = params .. k .. "=" .. v
+        end
+        return tx:render({text = params .. tx:read()})
+    end)
+    t.assert_type(r, 'table', 'add GET method')
+
+    r = http_client.request('GET', helpers.base_uri .. '/param?a=1')
+    t.assert_equals(r.body, 'a=1', 'GET reply parameter')
+
+    r = http_client.request('GET', helpers.base_uri .. '/param?a+a=1')
+    t.assert_equals(r.body, 'a a=1', 'GET reply parameter name with plus')
+
+    r = http_client.request('GET', helpers.base_uri .. '/param?a=1+1')
+    t.assert_equals(r.body, 'a=1 1', 'GET reply parameter value with plus')
+end
+
 g.test_DELETE = function()
     local httpd = g.httpd
     local r = httpd:route({