diff options
| author | Kim Alvefur <zash@zash.se> | 2016-01-08 16:16:08 +0100 |
|---|---|---|
| committer | Kim Alvefur <zash@zash.se> | 2016-01-08 16:16:08 +0100 |
| commit | 6b1e54864c661211366d22a41435e5e3d07e71ac (patch) | |
| tree | fa735fdc4d7fd7f7b8f14ea5dc1e5a86a0ca5dde /util | |
| parent | 7baeaaa363aca2190c22f1bd4463ac52ab83bb99 (diff) | |
| parent | f9a3ca3602c72f24edecc95a886eace4edd42c5d (diff) | |
| download | prosody-6b1e54864c661211366d22a41435e5e3d07e71ac.tar.gz prosody-6b1e54864c661211366d22a41435e5e3d07e71ac.zip | |
Merge 0.9->0.10
Diffstat (limited to 'util')
| -rw-r--r-- | util/ip.lua | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/util/ip.lua b/util/ip.lua index 7dcace5c..ec3b4d7e 100644 --- a/util/ip.lua +++ b/util/ip.lua @@ -25,6 +25,10 @@ local function new_ip(ipStr, proto) elseif proto ~= "IPv4" and proto ~= "IPv6" then return nil, "invalid protocol"; end + local zone; + if proto == "IPv6" and ipStr:find('%', 1, true) then + ipStr, zone = ipStr:match("^(.-)%%(.*)"); + end if proto == "IPv6" and ipStr:find('.', 1, true) then local changed; ipStr, changed = ipStr:gsub(":(%d+)%.(%d+)%.(%d+)%.(%d+)$", function(a,b,c,d) @@ -33,7 +37,7 @@ local function new_ip(ipStr, proto) if changed ~= 1 then return nil, "invalid-address"; end end - return setmetatable({ addr = ipStr, proto = proto }, ip_mt); + return setmetatable({ addr = ipStr, proto = proto, zone = zone }, ip_mt); end local function toBits(ip) |