Mercurial > prosody-modules
view mod_register_dnsbl/mod_register_dnsbl.lua @ 2187:287f37e6b6e1
mod_list_inactive: Add README.md (fixes issue #684 - thanks t2d2!)
author | Matthew Wild <mwild1@gmail.com> |
---|---|
date | Tue, 31 May 2016 11:45:59 +0100 |
parents | 42b095dab626 |
children | 2dcc3079572c |
line wrap: on
line source
local adns = require "net.adns"; 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); end -- TODO async -- module:hook("user-registering", function (event) end); module:hook("user-registered", function (event) local session = event.session; local ip = session and session.ip; local rbl_ip = ip and reverse(ip, rbl); if rbl_ip then local log = session.log; adns.lookup(function (reply) if reply and reply[1] then log("warn", "Registration from IP %s found in RBL", ip); end end, rbl_ip); end end);