Mercurial > prosody-modules
changeset 2891:84670bac7348
mod_register_dnsbl: Use util.net for IP address parsing
| author | Kim Alvefur <zash@zash.se> |
|---|---|
| date | Fri, 23 Feb 2018 21:59:28 +0100 |
| parents | 6412595e2046 |
| children | bf9fc41bf7ad |
| files | mod_register_dnsbl/mod_register_dnsbl.lua |
| diffstat | 1 files changed, 7 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/mod_register_dnsbl/mod_register_dnsbl.lua Fri Feb 23 21:56:42 2018 +0100 +++ b/mod_register_dnsbl/mod_register_dnsbl.lua Fri Feb 23 21:59:28 2018 +0100 @@ -1,12 +1,16 @@ local adns = require "net.adns"; local async = require "util.async"; +local inet_pton = require "util.net".pton; local rbl = module:get_option_string("registration_rbl"); local function reverse(ip, suffix) - local a,b,c,d = ip:match("^(%d+).(%d+).(%d+).(%d+)$"); - if not a then return end - return ("%d.%d.%d.%d.%s"):format(d,c,b,a, suffix); + local n, err = inet_pton(ip); + if not n then return n, err end + if #n == 4 then + local a,b,c,d = n:byte(1,4); + return ("%d.%d.%d.%d.%s"):format(d,c,b,a, suffix); + end end module:hook("user-registering", function (event)