dany/luasocket
1
0
Fork 0
mirror of https://github.com/lunarmodules/luasocket.git synced 2024-12-25 03:58:21 +01:00
Code Issues Packages Projects Releases Wiki Activity

url.lua:remove_dot_components(): use temporary NUL marker to reduce empty-segment special-case code

Browse Source
This commit is contained in:
E. Westbrook 2018-08-21 12:02:25 -06:00
parent 38d936ec0e
commit ca5398be09
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/url.lua
View File

@ -85,11 +85,11 @@ end
local function remove_dot_components(path)
repeat
local was = path
path = path:gsub('/%./', '/', 1)
path = path:gsub('//', '/'..0x00..'/', 1)
until path == was
repeat
local was = path
path = path:gsub('//%.%./([^/]+)', '/%1', 1)
path = path:gsub('/%./', '/', 1)
until path == was
repeat
local was = path
@ -99,6 +99,7 @@ local function remove_dot_components(path)
path = path:gsub('/%.%.$', '/')
path = path:gsub('/%.$', '/')
path = path:gsub('^/%.%./', '/')
path = path:gsub(0x00, '')
return path
end

4
test/urltest.lua
View File

@ -692,6 +692,10 @@ check_absolute_url("http://example.com/a/b/c/d/", "../../q", "http://example.com
check_absolute_url("http://example.com/a/b/c/d/", "../../../q", "http://example.com/a/q")
check_absolute_url("http://example.com", ".badhost.com", "http://example.com/.badhost.com")
check_absolute_url("http://example.com/a/b/c/d/", "..//../../../q", "http://example.com/a/q")
check_absolute_url("http://example.com/a/b/c/d/", "..//a/../../../../q", "http://example.com/a/q")
check_absolute_url("http://example.com/a/b/c/d/", "..//a/..//../../../q", "http://example.com/a/b/q")
check_absolute_url("http://example.com/a/b/c/d/", "..//a/..///../../../../q", "http://example.com/a/b/q")
check_absolute_url("http://example.com/a/b/c/d/", "../x/a/../y/z/../../../../q", "http://example.com/a/b/q")
print("testing path parsing and composition")
check_parse_path("/eu/tu/ele", { "eu", "tu", "ele"; is_absolute = 1 })