# HG changeset patch
# User Georg Lukas <georg@op-co.de>
# Date 1588000167 -7200
# Node ID 76036fa340557c2058d701cd1ae8b2491d1ffa9d
# Parent  0233da912ab611accacd08c7135deaf0ef964c08
mod_register_dnsbl_*: fix DS legacy ipv4 addresses, thx Zash

diff -r 0233da912ab6 -r 76036fa34055 mod_register_dnsbl_firewall_mark/mod_register_dnsbl_firewall_mark.lua
--- a/mod_register_dnsbl_firewall_mark/mod_register_dnsbl_firewall_mark.lua	Thu Apr 23 22:07:44 2020 +0200
+++ b/mod_register_dnsbl_firewall_mark/mod_register_dnsbl_firewall_mark.lua	Mon Apr 27 17:09:27 2020 +0200
@@ -2,6 +2,9 @@
 local rbl = module:get_option_string("registration_rbl");
 
 local function reverse(ip, suffix)
+	if ip:sub(1,7):lower() == "::ffff:" then
+		ip = ip:sub(8);
+	end
 	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);
diff -r 0233da912ab6 -r 76036fa34055 mod_register_dnsbl_warn/mod_register_dnsbl_warn.lua
--- a/mod_register_dnsbl_warn/mod_register_dnsbl_warn.lua	Thu Apr 23 22:07:44 2020 +0200
+++ b/mod_register_dnsbl_warn/mod_register_dnsbl_warn.lua	Mon Apr 27 17:09:27 2020 +0200
@@ -2,6 +2,9 @@
 local rbl = module:get_option_string("registration_rbl");
 
 local function reverse(ip, suffix)
+	if ip:sub(1,7):lower() == "::ffff:" then
+		ip = ip:sub(8);
+	end
 	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);