[Rspamd] Add ratelimit.lua (to be removed from Dockerfile with next Rspamd release)
This commit is contained in:
parent
558ba23b93
commit
c4446b85f1
@ -21,6 +21,7 @@ RUN apt-get update && apt-get install -y \
|
|||||||
|
|
||||||
COPY settings.conf /etc/rspamd/settings.conf
|
COPY settings.conf /etc/rspamd/settings.conf
|
||||||
COPY docker-entrypoint.sh /docker-entrypoint.sh
|
COPY docker-entrypoint.sh /docker-entrypoint.sh
|
||||||
|
COPY ratelimit.lua /usr/share/rspamd/lua/ratelimit.lua
|
||||||
|
|
||||||
ENTRYPOINT ["/docker-entrypoint.sh"]
|
ENTRYPOINT ["/docker-entrypoint.sh"]
|
||||||
|
|
||||||
|
864
data/Dockerfiles/rspamd/ratelimit.lua
Normal file
864
data/Dockerfiles/rspamd/ratelimit.lua
Normal file
@ -0,0 +1,864 @@
|
|||||||
|
--[[
|
||||||
|
Copyright (c) 2011-2017, Vsevolod Stakhov <vsevolod@highsecure.ru>
|
||||||
|
Copyright (c) 2016-2017, Andrew Lewis <nerf@judo.za.org>
|
||||||
|
|
||||||
|
Licensed under the Apache License, Version 2.0 (the "License");
|
||||||
|
you may not use this file except in compliance with the License.
|
||||||
|
You may obtain a copy of the License at
|
||||||
|
|
||||||
|
http://www.apache.org/licenses/LICENSE-2.0
|
||||||
|
|
||||||
|
Unless required by applicable law or agreed to in writing, software
|
||||||
|
distributed under the License is distributed on an "AS IS" BASIS,
|
||||||
|
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
||||||
|
See the License for the specific language governing permissions and
|
||||||
|
limitations under the License.
|
||||||
|
]]--
|
||||||
|
|
||||||
|
if confighelp then
|
||||||
|
return
|
||||||
|
end
|
||||||
|
|
||||||
|
local rspamd_logger = require "rspamd_logger"
|
||||||
|
local rspamd_util = require "rspamd_util"
|
||||||
|
local rspamd_lua_utils = require "lua_util"
|
||||||
|
local lua_redis = require "lua_redis"
|
||||||
|
local fun = require "fun"
|
||||||
|
local lua_maps = require "lua_maps"
|
||||||
|
local lua_util = require "lua_util"
|
||||||
|
local rspamd_hash = require "rspamd_cryptobox_hash"
|
||||||
|
local lua_selectors = require "lua_selectors"
|
||||||
|
local ts = require("tableshape").types
|
||||||
|
|
||||||
|
-- A plugin that implements ratelimits using redis
|
||||||
|
|
||||||
|
local E = {}
|
||||||
|
local N = 'ratelimit'
|
||||||
|
local redis_params
|
||||||
|
-- Senders that are considered as bounce
|
||||||
|
local settings = {
|
||||||
|
bounce_senders = { 'postmaster', 'mailer-daemon', '', 'null', 'fetchmail-daemon', 'mdaemon' },
|
||||||
|
-- Do not check ratelimits for these recipients
|
||||||
|
whitelisted_rcpts = { 'postmaster', 'mailer-daemon' },
|
||||||
|
prefix = 'RL',
|
||||||
|
ham_factor_rate = 1.01,
|
||||||
|
spam_factor_rate = 0.99,
|
||||||
|
ham_factor_burst = 1.02,
|
||||||
|
spam_factor_burst = 0.98,
|
||||||
|
max_rate_mult = 5,
|
||||||
|
max_bucket_mult = 10,
|
||||||
|
expire = 60 * 60 * 24 * 2, -- 2 days by default
|
||||||
|
limits = {},
|
||||||
|
allow_local = false,
|
||||||
|
}
|
||||||
|
|
||||||
|
-- Checks bucket, updating it if needed
|
||||||
|
-- KEYS[1] - prefix to update, e.g. RL_<triplet>_<seconds>
|
||||||
|
-- KEYS[2] - current time in milliseconds
|
||||||
|
-- KEYS[3] - bucket leak rate (messages per millisecond)
|
||||||
|
-- KEYS[4] - bucket burst
|
||||||
|
-- KEYS[5] - expire for a bucket
|
||||||
|
-- return 1 if message should be ratelimited and 0 if not
|
||||||
|
-- Redis keys used:
|
||||||
|
-- l - last hit
|
||||||
|
-- b - current burst
|
||||||
|
-- dr - current dynamic rate multiplier (*10000)
|
||||||
|
-- db - current dynamic burst multiplier (*10000)
|
||||||
|
local bucket_check_script = [[
|
||||||
|
local last = redis.call('HGET', KEYS[1], 'l')
|
||||||
|
local now = tonumber(KEYS[2])
|
||||||
|
local dynr, dynb, leaked = 0, 0, 0
|
||||||
|
if not last then
|
||||||
|
-- New bucket
|
||||||
|
redis.call('HSET', KEYS[1], 'l', KEYS[2])
|
||||||
|
redis.call('HSET', KEYS[1], 'b', '0')
|
||||||
|
redis.call('HSET', KEYS[1], 'dr', '10000')
|
||||||
|
redis.call('HSET', KEYS[1], 'db', '10000')
|
||||||
|
redis.call('EXPIRE', KEYS[1], KEYS[5])
|
||||||
|
return {0, '0', '1', '1', '0'}
|
||||||
|
end
|
||||||
|
|
||||||
|
last = tonumber(last)
|
||||||
|
local burst = tonumber(redis.call('HGET', KEYS[1], 'b'))
|
||||||
|
-- Perform leak
|
||||||
|
if burst > 0 then
|
||||||
|
if last < tonumber(KEYS[2]) then
|
||||||
|
local rate = tonumber(KEYS[3])
|
||||||
|
dynr = tonumber(redis.call('HGET', KEYS[1], 'dr')) / 10000.0
|
||||||
|
if dynr == 0 then dynr = 0.0001 end
|
||||||
|
rate = rate * dynr
|
||||||
|
leaked = ((now - last) * rate)
|
||||||
|
if leaked > burst then leaked = burst end
|
||||||
|
burst = burst - leaked
|
||||||
|
redis.call('HINCRBYFLOAT', KEYS[1], 'b', -(leaked))
|
||||||
|
redis.call('HSET', KEYS[1], 'l', KEYS[2])
|
||||||
|
end
|
||||||
|
|
||||||
|
dynb = tonumber(redis.call('HGET', KEYS[1], 'db')) / 10000.0
|
||||||
|
if dynb == 0 then dynb = 0.0001 end
|
||||||
|
|
||||||
|
if burst > 0 and (burst + 1) > tonumber(KEYS[4]) * dynb then
|
||||||
|
return {1, tostring(burst), tostring(dynr), tostring(dynb), tostring(leaked)}
|
||||||
|
end
|
||||||
|
else
|
||||||
|
burst = 0
|
||||||
|
redis.call('HSET', KEYS[1], 'b', '0')
|
||||||
|
end
|
||||||
|
|
||||||
|
return {0, tostring(burst), tostring(dynr), tostring(dynb), tostring(leaked)}
|
||||||
|
]]
|
||||||
|
local bucket_check_id
|
||||||
|
|
||||||
|
|
||||||
|
-- Updates a bucket
|
||||||
|
-- KEYS[1] - prefix to update, e.g. RL_<triplet>_<seconds>
|
||||||
|
-- KEYS[2] - current time in milliseconds
|
||||||
|
-- KEYS[3] - dynamic rate multiplier
|
||||||
|
-- KEYS[4] - dynamic burst multiplier
|
||||||
|
-- KEYS[5] - max dyn rate (min: 1/x)
|
||||||
|
-- KEYS[6] - max burst rate (min: 1/x)
|
||||||
|
-- KEYS[7] - expire for a bucket
|
||||||
|
-- Redis keys used:
|
||||||
|
-- l - last hit
|
||||||
|
-- b - current burst
|
||||||
|
-- dr - current dynamic rate multiplier
|
||||||
|
-- db - current dynamic burst multiplier
|
||||||
|
local bucket_update_script = [[
|
||||||
|
local last = redis.call('HGET', KEYS[1], 'l')
|
||||||
|
local now = tonumber(KEYS[2])
|
||||||
|
if not last then
|
||||||
|
-- New bucket
|
||||||
|
redis.call('HSET', KEYS[1], 'l', KEYS[2])
|
||||||
|
redis.call('HSET', KEYS[1], 'b', '1')
|
||||||
|
redis.call('HSET', KEYS[1], 'dr', '10000')
|
||||||
|
redis.call('HSET', KEYS[1], 'db', '10000')
|
||||||
|
redis.call('EXPIRE', KEYS[1], KEYS[7])
|
||||||
|
return {1, 1, 1}
|
||||||
|
end
|
||||||
|
|
||||||
|
local dr, db = 1.0, 1.0
|
||||||
|
|
||||||
|
if tonumber(KEYS[5]) > 1 then
|
||||||
|
local rate_mult = tonumber(KEYS[3])
|
||||||
|
local rate_limit = tonumber(KEYS[5])
|
||||||
|
dr = tonumber(redis.call('HGET', KEYS[1], 'dr')) / 10000
|
||||||
|
|
||||||
|
if rate_mult > 1.0 and dr < rate_limit then
|
||||||
|
dr = dr * rate_mult
|
||||||
|
if dr > 0.0001 then
|
||||||
|
redis.call('HSET', KEYS[1], 'dr', tostring(math.floor(dr * 10000)))
|
||||||
|
else
|
||||||
|
redis.call('HSET', KEYS[1], 'dr', '1')
|
||||||
|
end
|
||||||
|
elseif rate_mult < 1.0 and dr > (1.0 / rate_limit) then
|
||||||
|
dr = dr * rate_mult
|
||||||
|
if dr > 0.0001 then
|
||||||
|
redis.call('HSET', KEYS[1], 'dr', tostring(math.floor(dr * 10000)))
|
||||||
|
else
|
||||||
|
redis.call('HSET', KEYS[1], 'dr', '1')
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
if tonumber(KEYS[6]) > 1 then
|
||||||
|
local rate_mult = tonumber(KEYS[4])
|
||||||
|
local rate_limit = tonumber(KEYS[6])
|
||||||
|
db = tonumber(redis.call('HGET', KEYS[1], 'db')) / 10000
|
||||||
|
|
||||||
|
if rate_mult > 1.0 and db < rate_limit then
|
||||||
|
db = db * rate_mult
|
||||||
|
if db > 0.0001 then
|
||||||
|
redis.call('HSET', KEYS[1], 'db', tostring(math.floor(db * 10000)))
|
||||||
|
else
|
||||||
|
redis.call('HSET', KEYS[1], 'db', '1')
|
||||||
|
end
|
||||||
|
elseif rate_mult < 1.0 and db > (1.0 / rate_limit) then
|
||||||
|
db = db * rate_mult
|
||||||
|
if db > 0.0001 then
|
||||||
|
redis.call('HSET', KEYS[1], 'db', tostring(math.floor(db * 10000)))
|
||||||
|
else
|
||||||
|
redis.call('HSET', KEYS[1], 'db', '1')
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
local burst = tonumber(redis.call('HGET', KEYS[1], 'b'))
|
||||||
|
if burst < 0 then burst = 0 end
|
||||||
|
|
||||||
|
redis.call('HINCRBYFLOAT', KEYS[1], 'b', 1)
|
||||||
|
redis.call('HSET', KEYS[1], 'l', KEYS[2])
|
||||||
|
redis.call('EXPIRE', KEYS[1], KEYS[7])
|
||||||
|
|
||||||
|
return {tostring(burst), tostring(dr), tostring(db)}
|
||||||
|
]]
|
||||||
|
local bucket_update_id
|
||||||
|
|
||||||
|
-- message_func(task, limit_type, prefix, bucket, limit_key)
|
||||||
|
local message_func = function(_, limit_type, _, _, _)
|
||||||
|
return string.format('Ratelimit "%s" exceeded', limit_type)
|
||||||
|
end
|
||||||
|
|
||||||
|
|
||||||
|
local function load_scripts(cfg, ev_base)
|
||||||
|
bucket_check_id = lua_redis.add_redis_script(bucket_check_script, redis_params)
|
||||||
|
bucket_update_id = lua_redis.add_redis_script(bucket_update_script, redis_params)
|
||||||
|
end
|
||||||
|
|
||||||
|
local limit_parser
|
||||||
|
local function parse_string_limit(lim, no_error)
|
||||||
|
local function parse_time_suffix(s)
|
||||||
|
if s == 's' then
|
||||||
|
return 1
|
||||||
|
elseif s == 'm' then
|
||||||
|
return 60
|
||||||
|
elseif s == 'h' then
|
||||||
|
return 3600
|
||||||
|
elseif s == 'd' then
|
||||||
|
return 86400
|
||||||
|
end
|
||||||
|
end
|
||||||
|
local function parse_num_suffix(s)
|
||||||
|
if s == '' then
|
||||||
|
return 1
|
||||||
|
elseif s == 'k' then
|
||||||
|
return 1000
|
||||||
|
elseif s == 'm' then
|
||||||
|
return 1000000
|
||||||
|
elseif s == 'g' then
|
||||||
|
return 1000000000
|
||||||
|
end
|
||||||
|
end
|
||||||
|
local lpeg = require "lpeg"
|
||||||
|
|
||||||
|
if not limit_parser then
|
||||||
|
local digit = lpeg.R("09")
|
||||||
|
limit_parser = {}
|
||||||
|
limit_parser.integer =
|
||||||
|
(lpeg.S("+-") ^ -1) *
|
||||||
|
(digit ^ 1)
|
||||||
|
limit_parser.fractional =
|
||||||
|
(lpeg.P(".") ) *
|
||||||
|
(digit ^ 1)
|
||||||
|
limit_parser.number =
|
||||||
|
(limit_parser.integer *
|
||||||
|
(limit_parser.fractional ^ -1)) +
|
||||||
|
(lpeg.S("+-") * limit_parser.fractional)
|
||||||
|
limit_parser.time = lpeg.Cf(lpeg.Cc(1) *
|
||||||
|
(limit_parser.number / tonumber) *
|
||||||
|
((lpeg.S("smhd") / parse_time_suffix) ^ -1),
|
||||||
|
function (acc, val) return acc * val end)
|
||||||
|
limit_parser.suffixed_number = lpeg.Cf(lpeg.Cc(1) *
|
||||||
|
(limit_parser.number / tonumber) *
|
||||||
|
((lpeg.S("kmg") / parse_num_suffix) ^ -1),
|
||||||
|
function (acc, val) return acc * val end)
|
||||||
|
limit_parser.limit = lpeg.Ct(limit_parser.suffixed_number *
|
||||||
|
(lpeg.S(" ") ^ 0) * lpeg.S("/") * (lpeg.S(" ") ^ 0) *
|
||||||
|
limit_parser.time)
|
||||||
|
end
|
||||||
|
local t = lpeg.match(limit_parser.limit, lim)
|
||||||
|
|
||||||
|
if t and t[1] and t[2] and t[2] ~= 0 then
|
||||||
|
return t[2], t[1]
|
||||||
|
end
|
||||||
|
|
||||||
|
if not no_error then
|
||||||
|
rspamd_logger.errx(rspamd_config, 'bad limit: %s', lim)
|
||||||
|
end
|
||||||
|
|
||||||
|
return nil
|
||||||
|
end
|
||||||
|
|
||||||
|
local function str_to_rate(str)
|
||||||
|
local divider,divisor = parse_string_limit(str, false)
|
||||||
|
|
||||||
|
if not divisor then
|
||||||
|
rspamd_logger.errx(rspamd_config, 'bad rate string: %s', str)
|
||||||
|
|
||||||
|
return nil
|
||||||
|
end
|
||||||
|
|
||||||
|
return divisor / divider
|
||||||
|
end
|
||||||
|
|
||||||
|
local bucket_schema = ts.shape{
|
||||||
|
burst = ts.number + ts.string / lua_util.dehumanize_number,
|
||||||
|
rate = ts.number + ts.string / str_to_rate
|
||||||
|
}
|
||||||
|
|
||||||
|
local function parse_limit(name, data)
|
||||||
|
if type(data) == 'table' then
|
||||||
|
-- 2 cases here:
|
||||||
|
-- * old limit in format [burst, rate]
|
||||||
|
-- * vector of strings in Andrew's string format (removed from 1.8.2)
|
||||||
|
-- * proper bucket table
|
||||||
|
if #data == 2 and tonumber(data[1]) and tonumber(data[2]) then
|
||||||
|
-- Old style ratelimit
|
||||||
|
rspamd_logger.warnx(rspamd_config, 'old style ratelimit for %s', name)
|
||||||
|
if tonumber(data[1]) > 0 and tonumber(data[2]) > 0 then
|
||||||
|
return {
|
||||||
|
burst = data[1],
|
||||||
|
rate = data[2]
|
||||||
|
}
|
||||||
|
elseif data[1] ~= 0 then
|
||||||
|
rspamd_logger.warnx(rspamd_config, 'invalid numbers for %s', name)
|
||||||
|
else
|
||||||
|
rspamd_logger.infox(rspamd_config, 'disable limit %s, burst is zero', name)
|
||||||
|
end
|
||||||
|
|
||||||
|
return nil
|
||||||
|
else
|
||||||
|
local parsed_bucket,err = bucket_schema:transform(data)
|
||||||
|
|
||||||
|
if not parsed_bucket or err then
|
||||||
|
rspamd_logger.errx(rspamd_config, 'cannot parse bucket for %s: %s; original value: %s',
|
||||||
|
name, err, data)
|
||||||
|
else
|
||||||
|
return parsed_bucket
|
||||||
|
end
|
||||||
|
end
|
||||||
|
elseif type(data) == 'string' then
|
||||||
|
local rep_rate, burst = parse_string_limit(data)
|
||||||
|
rspamd_logger.warnx(rspamd_config, 'old style rate bucket config detected for %s: %s',
|
||||||
|
name, data)
|
||||||
|
if rep_rate and burst then
|
||||||
|
return {
|
||||||
|
burst = burst,
|
||||||
|
rate = burst / rep_rate -- reciprocal
|
||||||
|
}
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
return nil
|
||||||
|
end
|
||||||
|
|
||||||
|
--- Check whether this addr is bounce
|
||||||
|
local function check_bounce(from)
|
||||||
|
return fun.any(function(b) return b == from end, settings.bounce_senders)
|
||||||
|
end
|
||||||
|
|
||||||
|
local keywords = {
|
||||||
|
['ip'] = {
|
||||||
|
['get_value'] = function(task)
|
||||||
|
local ip = task:get_ip()
|
||||||
|
if ip and ip:is_valid() then return tostring(ip) end
|
||||||
|
return nil
|
||||||
|
end,
|
||||||
|
},
|
||||||
|
['rip'] = {
|
||||||
|
['get_value'] = function(task)
|
||||||
|
local ip = task:get_ip()
|
||||||
|
if ip and ip:is_valid() and not ip:is_local() then return tostring(ip) end
|
||||||
|
return nil
|
||||||
|
end,
|
||||||
|
},
|
||||||
|
['from'] = {
|
||||||
|
['get_value'] = function(task)
|
||||||
|
local from = task:get_from(0)
|
||||||
|
if ((from or E)[1] or E).addr then
|
||||||
|
return string.lower(from[1]['addr'])
|
||||||
|
end
|
||||||
|
return nil
|
||||||
|
end,
|
||||||
|
},
|
||||||
|
['bounce'] = {
|
||||||
|
['get_value'] = function(task)
|
||||||
|
local from = task:get_from(0)
|
||||||
|
if not ((from or E)[1] or E).user then
|
||||||
|
return '_'
|
||||||
|
end
|
||||||
|
if check_bounce(from[1]['user']) then return '_' else return nil end
|
||||||
|
end,
|
||||||
|
},
|
||||||
|
['asn'] = {
|
||||||
|
['get_value'] = function(task)
|
||||||
|
local asn = task:get_mempool():get_variable('asn')
|
||||||
|
if not asn then
|
||||||
|
return nil
|
||||||
|
else
|
||||||
|
return asn
|
||||||
|
end
|
||||||
|
end,
|
||||||
|
},
|
||||||
|
['user'] = {
|
||||||
|
['get_value'] = function(task)
|
||||||
|
local auser = task:get_user()
|
||||||
|
if not auser then
|
||||||
|
return nil
|
||||||
|
else
|
||||||
|
return auser
|
||||||
|
end
|
||||||
|
end,
|
||||||
|
},
|
||||||
|
['to'] = {
|
||||||
|
['get_value'] = function(task)
|
||||||
|
return task:get_principal_recipient()
|
||||||
|
end,
|
||||||
|
},
|
||||||
|
['digest'] = {
|
||||||
|
['get_value'] = function(task)
|
||||||
|
return task:get_digest()
|
||||||
|
end,
|
||||||
|
},
|
||||||
|
['attachments'] = {
|
||||||
|
['get_value'] = function(task)
|
||||||
|
local parts = task:get_parts() or E
|
||||||
|
local digests = {}
|
||||||
|
|
||||||
|
for _,p in ipairs(parts) do
|
||||||
|
if p:get_filename() then
|
||||||
|
table.insert(digests, p:get_digest())
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
if #digests > 0 then
|
||||||
|
return table.concat(digests, '')
|
||||||
|
end
|
||||||
|
|
||||||
|
return nil
|
||||||
|
end,
|
||||||
|
},
|
||||||
|
['files'] = {
|
||||||
|
['get_value'] = function(task)
|
||||||
|
local parts = task:get_parts() or E
|
||||||
|
local files = {}
|
||||||
|
|
||||||
|
for _,p in ipairs(parts) do
|
||||||
|
local fname = p:get_filename()
|
||||||
|
if fname then
|
||||||
|
table.insert(files, fname)
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
if #files > 0 then
|
||||||
|
return table.concat(files, ':')
|
||||||
|
end
|
||||||
|
|
||||||
|
return nil
|
||||||
|
end,
|
||||||
|
},
|
||||||
|
}
|
||||||
|
|
||||||
|
local function gen_rate_key(task, rtype, bucket)
|
||||||
|
local key_t = {tostring(lua_util.round(100000.0 / bucket.burst))}
|
||||||
|
local key_keywords = lua_util.str_split(rtype, '_')
|
||||||
|
local have_user = false
|
||||||
|
|
||||||
|
for _, v in ipairs(key_keywords) do
|
||||||
|
local ret
|
||||||
|
|
||||||
|
if keywords[v] and type(keywords[v]['get_value']) == 'function' then
|
||||||
|
ret = keywords[v]['get_value'](task)
|
||||||
|
end
|
||||||
|
if not ret then return nil end
|
||||||
|
if v == 'user' then have_user = true end
|
||||||
|
if type(ret) ~= 'string' then ret = tostring(ret) end
|
||||||
|
table.insert(key_t, ret)
|
||||||
|
end
|
||||||
|
|
||||||
|
if have_user and not task:get_user() then
|
||||||
|
return nil
|
||||||
|
end
|
||||||
|
|
||||||
|
return table.concat(key_t, ":")
|
||||||
|
end
|
||||||
|
|
||||||
|
local function make_prefix(redis_key, name, bucket)
|
||||||
|
local hash_len = 24
|
||||||
|
if hash_len > #redis_key then hash_len = #redis_key end
|
||||||
|
local hash = settings.prefix ..
|
||||||
|
string.sub(rspamd_hash.create(redis_key):base32(), 1, hash_len)
|
||||||
|
-- Fill defaults
|
||||||
|
if not bucket.spam_factor_rate then
|
||||||
|
bucket.spam_factor_rate = settings.spam_factor_rate
|
||||||
|
end
|
||||||
|
if not bucket.ham_factor_rate then
|
||||||
|
bucket.ham_factor_rate = settings.ham_factor_rate
|
||||||
|
end
|
||||||
|
if not bucket.spam_factor_burst then
|
||||||
|
bucket.spam_factor_burst = settings.spam_factor_burst
|
||||||
|
end
|
||||||
|
if not bucket.ham_factor_burst then
|
||||||
|
bucket.ham_factor_burst = settings.ham_factor_burst
|
||||||
|
end
|
||||||
|
|
||||||
|
return {
|
||||||
|
bucket = bucket,
|
||||||
|
name = name,
|
||||||
|
hash = hash
|
||||||
|
}
|
||||||
|
end
|
||||||
|
|
||||||
|
local function limit_to_prefixes(task, k, v, prefixes)
|
||||||
|
local n = 0
|
||||||
|
for _,bucket in ipairs(v.buckets) do
|
||||||
|
if v.selector then
|
||||||
|
local selectors = lua_selectors.process_selectors(task, v.selector)
|
||||||
|
if selectors then
|
||||||
|
local combined = lua_selectors.combine_selectors(task, selectors, ':')
|
||||||
|
if type(combined) == 'string' then
|
||||||
|
prefixes[combined] = make_prefix(combined, k, bucket)
|
||||||
|
n = n + 1
|
||||||
|
else
|
||||||
|
fun.each(function(p)
|
||||||
|
prefixes[p] = make_prefix(p, k, bucket)
|
||||||
|
n = n + 1
|
||||||
|
end, combined)
|
||||||
|
end
|
||||||
|
end
|
||||||
|
else
|
||||||
|
local prefix = gen_rate_key(task, k, bucket)
|
||||||
|
if prefix then
|
||||||
|
if type(prefix) == 'string' then
|
||||||
|
prefixes[prefix] = make_prefix(prefix, k, bucket)
|
||||||
|
n = n + 1
|
||||||
|
else
|
||||||
|
fun.each(function(p)
|
||||||
|
prefixes[p] = make_prefix(p, k, bucket)
|
||||||
|
n = n + 1
|
||||||
|
end, prefix)
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
return n
|
||||||
|
end
|
||||||
|
|
||||||
|
local function ratelimit_cb(task)
|
||||||
|
if not settings.allow_local and
|
||||||
|
rspamd_lua_utils.is_rspamc_or_controller(task) then return end
|
||||||
|
|
||||||
|
-- Get initial task data
|
||||||
|
local ip = task:get_from_ip()
|
||||||
|
if ip and ip:is_valid() and settings.whitelisted_ip then
|
||||||
|
if settings.whitelisted_ip:get_key(ip) then
|
||||||
|
-- Do not check whitelisted ip
|
||||||
|
rspamd_logger.infox(task, 'skip ratelimit for whitelisted IP')
|
||||||
|
return
|
||||||
|
end
|
||||||
|
end
|
||||||
|
-- Parse all rcpts
|
||||||
|
local rcpts = task:get_recipients()
|
||||||
|
local rcpts_user = {}
|
||||||
|
if rcpts then
|
||||||
|
fun.each(function(r)
|
||||||
|
fun.each(function(type) table.insert(rcpts_user, r[type]) end, {'user', 'addr'})
|
||||||
|
end, rcpts)
|
||||||
|
|
||||||
|
if fun.any(function(r) return settings.whitelisted_rcpts:get_key(r) end, rcpts_user) then
|
||||||
|
rspamd_logger.infox(task, 'skip ratelimit for whitelisted recipient')
|
||||||
|
return
|
||||||
|
end
|
||||||
|
end
|
||||||
|
-- Get user (authuser)
|
||||||
|
if settings.whitelisted_user then
|
||||||
|
local auser = task:get_user()
|
||||||
|
if settings.whitelisted_user:get_key(auser) then
|
||||||
|
rspamd_logger.infox(task, 'skip ratelimit for whitelisted user')
|
||||||
|
return
|
||||||
|
end
|
||||||
|
end
|
||||||
|
-- Now create all ratelimit prefixes
|
||||||
|
local prefixes = {}
|
||||||
|
local nprefixes = 0
|
||||||
|
|
||||||
|
for k,v in pairs(settings.limits) do
|
||||||
|
nprefixes = nprefixes + limit_to_prefixes(task, k, v, prefixes)
|
||||||
|
end
|
||||||
|
|
||||||
|
for k, hdl in pairs(settings.custom_keywords or E) do
|
||||||
|
local ret, redis_key, bd = pcall(hdl, task)
|
||||||
|
|
||||||
|
if ret then
|
||||||
|
local bucket = parse_limit(k, bd)
|
||||||
|
if bucket then
|
||||||
|
prefixes[redis_key] = make_prefix(redis_key, k, bucket)
|
||||||
|
end
|
||||||
|
nprefixes = nprefixes + 1
|
||||||
|
else
|
||||||
|
rspamd_logger.errx(task, 'cannot call handler for %s: %s',
|
||||||
|
k, redis_key)
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
local function gen_check_cb(prefix, bucket, lim_name, lim_key)
|
||||||
|
return function(err, data)
|
||||||
|
if err then
|
||||||
|
rspamd_logger.errx('cannot check limit %s: %s %s', prefix, err, data)
|
||||||
|
elseif type(data) == 'table' and data[1] then
|
||||||
|
lua_util.debugm(N, task,
|
||||||
|
"got reply for limit %s (%s / %s); %s burst, %s:%s dyn, %s leaked",
|
||||||
|
prefix, bucket.burst, bucket.rate,
|
||||||
|
data[2], data[3], data[4], data[5])
|
||||||
|
|
||||||
|
if data[1] == 1 then
|
||||||
|
-- set symbol only and do NOT soft reject
|
||||||
|
if settings.symbol then
|
||||||
|
task:insert_result(settings.symbol, 0.0,
|
||||||
|
string.format('%s(%s)', lim_name, lim_key))
|
||||||
|
rspamd_logger.infox(task,
|
||||||
|
'set_symbol_only: ratelimit "%s(%s)" exceeded, (%s / %s): %s (%s:%s dyn); redis key: %s',
|
||||||
|
lim_name, prefix,
|
||||||
|
bucket.burst, bucket.rate,
|
||||||
|
data[2], data[3], data[4], lim_key)
|
||||||
|
return
|
||||||
|
-- set INFO symbol and soft reject
|
||||||
|
elseif settings.info_symbol then
|
||||||
|
task:insert_result(settings.info_symbol, 1.0,
|
||||||
|
string.format('%s(%s)', lim_name, lim_key))
|
||||||
|
end
|
||||||
|
rspamd_logger.infox(task,
|
||||||
|
'ratelimit "%s(%s)" exceeded, (%s / %s): %s (%s:%s dyn); redis key: %s',
|
||||||
|
lim_name, prefix,
|
||||||
|
bucket.burst, bucket.rate,
|
||||||
|
data[2], data[3], data[4], lim_key)
|
||||||
|
task:set_pre_result('soft reject',
|
||||||
|
message_func(task, lim_name, prefix, bucket, lim_key), N)
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
-- Don't do anything if pre-result has been already set
|
||||||
|
if task:has_pre_result() then return end
|
||||||
|
|
||||||
|
if nprefixes > 0 then
|
||||||
|
-- Save prefixes to the cache to allow update
|
||||||
|
task:cache_set('ratelimit_prefixes', prefixes)
|
||||||
|
local now = rspamd_util.get_time()
|
||||||
|
now = lua_util.round(now * 1000.0) -- Get milliseconds
|
||||||
|
-- Now call check script for all defined prefixes
|
||||||
|
|
||||||
|
for pr,value in pairs(prefixes) do
|
||||||
|
local bucket = value.bucket
|
||||||
|
local rate = (bucket.rate) / 1000.0 -- Leak rate in messages/ms
|
||||||
|
lua_util.debugm(N, task, "check limit %s:%s -> %s (%s/%s)",
|
||||||
|
value.name, pr, value.hash, bucket.burst, bucket.rate)
|
||||||
|
lua_redis.exec_redis_script(bucket_check_id,
|
||||||
|
{key = value.hash, task = task, is_write = true},
|
||||||
|
gen_check_cb(pr, bucket, value.name, value.hash),
|
||||||
|
{value.hash, tostring(now), tostring(rate), tostring(bucket.burst),
|
||||||
|
tostring(settings.expire)})
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
local function ratelimit_update_cb(task)
|
||||||
|
if task:has_flag('skip') then return end
|
||||||
|
if not settings.allow_local and lua_util.is_rspamc_or_controller(task) then return end
|
||||||
|
local prefixes = task:cache_get('ratelimit_prefixes')
|
||||||
|
|
||||||
|
if prefixes then
|
||||||
|
if task:has_pre_result() then
|
||||||
|
-- Already rate limited/greylisted, do nothing
|
||||||
|
lua_util.debugm(N, task, 'pre-action has been set, do not update')
|
||||||
|
return
|
||||||
|
end
|
||||||
|
|
||||||
|
local verdict = lua_util.get_task_verdict(task)
|
||||||
|
|
||||||
|
-- Update each bucket
|
||||||
|
for k, v in pairs(prefixes) do
|
||||||
|
local bucket = v.bucket
|
||||||
|
local function update_bucket_cb(err, data)
|
||||||
|
if err then
|
||||||
|
rspamd_logger.errx(task, 'cannot update rate bucket %s: %s',
|
||||||
|
k, err)
|
||||||
|
else
|
||||||
|
lua_util.debugm(N, task,
|
||||||
|
"updated limit %s:%s -> %s (%s/%s), burst: %s, dyn_rate: %s, dyn_burst: %s",
|
||||||
|
v.name, k, v.hash,
|
||||||
|
bucket.burst, bucket.rate,
|
||||||
|
data[1], data[2], data[3])
|
||||||
|
end
|
||||||
|
end
|
||||||
|
local now = rspamd_util.get_time()
|
||||||
|
now = lua_util.round(now * 1000.0) -- Get milliseconds
|
||||||
|
local mult_burst = 1.0
|
||||||
|
local mult_rate = 1.0
|
||||||
|
|
||||||
|
if verdict == 'spam' or verdict == 'junk' then
|
||||||
|
mult_burst = bucket.spam_factor_burst or 1.0
|
||||||
|
mult_rate = bucket.spam_factor_rate or 1.0
|
||||||
|
elseif verdict == 'ham' then
|
||||||
|
mult_burst = bucket.ham_factor_burst or 1.0
|
||||||
|
mult_rate = bucket.ham_factor_rate or 1.0
|
||||||
|
end
|
||||||
|
|
||||||
|
lua_redis.exec_redis_script(bucket_update_id,
|
||||||
|
{key = v.hash, task = task, is_write = true},
|
||||||
|
update_bucket_cb,
|
||||||
|
{v.hash, tostring(now), tostring(mult_rate), tostring(mult_burst),
|
||||||
|
tostring(settings.max_rate_mult), tostring(settings.max_bucket_mult),
|
||||||
|
tostring(settings.expire)})
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
local opts = rspamd_config:get_all_opt(N)
|
||||||
|
if opts then
|
||||||
|
|
||||||
|
settings = lua_util.override_defaults(settings, opts)
|
||||||
|
|
||||||
|
if opts['limit'] then
|
||||||
|
rspamd_logger.errx(rspamd_config, 'Legacy ratelimit config format no longer supported')
|
||||||
|
end
|
||||||
|
|
||||||
|
if opts['rates'] and type(opts['rates']) == 'table' then
|
||||||
|
-- new way of setting limits
|
||||||
|
fun.each(function(t, lim)
|
||||||
|
local buckets = {}
|
||||||
|
|
||||||
|
if type(lim) == 'table' and lim.bucket then
|
||||||
|
|
||||||
|
if lim.bucket[1] then
|
||||||
|
for _,bucket in ipairs(lim.bucket) do
|
||||||
|
local b = parse_limit(t, bucket)
|
||||||
|
|
||||||
|
if not b then
|
||||||
|
rspamd_logger.errx(rspamd_config, 'bad ratelimit bucket for %s: "%s"',
|
||||||
|
t, b)
|
||||||
|
return
|
||||||
|
end
|
||||||
|
|
||||||
|
table.insert(buckets, b)
|
||||||
|
end
|
||||||
|
else
|
||||||
|
local bucket = parse_limit(t, lim.bucket)
|
||||||
|
|
||||||
|
if not bucket then
|
||||||
|
rspamd_logger.errx(rspamd_config, 'bad ratelimit bucket for %s: "%s"',
|
||||||
|
t, lim.bucket)
|
||||||
|
return
|
||||||
|
end
|
||||||
|
|
||||||
|
buckets = {bucket}
|
||||||
|
end
|
||||||
|
|
||||||
|
settings.limits[t] = {
|
||||||
|
buckets = buckets
|
||||||
|
}
|
||||||
|
|
||||||
|
if lim.selector then
|
||||||
|
local selector = lua_selectors.parse_selector(rspamd_config, lim.selector)
|
||||||
|
if not selector then
|
||||||
|
rspamd_logger.errx(rspamd_config, 'bad ratelimit selector for %s: "%s"',
|
||||||
|
t, lim.selector)
|
||||||
|
settings.limits[t] = nil
|
||||||
|
return
|
||||||
|
end
|
||||||
|
|
||||||
|
settings.limits[t].selector = selector
|
||||||
|
end
|
||||||
|
else
|
||||||
|
rspamd_logger.warnx(rspamd_config, 'old syntax for ratelimits: %s', lim)
|
||||||
|
buckets = parse_limit(t, lim)
|
||||||
|
if buckets then
|
||||||
|
settings.limits[t] = {
|
||||||
|
buckets = {buckets}
|
||||||
|
}
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end, opts['rates'])
|
||||||
|
end
|
||||||
|
|
||||||
|
-- Display what's enabled
|
||||||
|
fun.each(function(s)
|
||||||
|
rspamd_logger.infox(rspamd_config, 'enabled ratelimit: %s', s)
|
||||||
|
end, fun.map(function(n,d)
|
||||||
|
return string.format('%s [%s]', n,
|
||||||
|
table.concat(fun.totable(fun.map(function(v)
|
||||||
|
return string.format('%s msgs burst, %s msgs/sec rate',
|
||||||
|
v.burst, v.rate)
|
||||||
|
end, d.buckets)), '; ')
|
||||||
|
)
|
||||||
|
end, settings.limits))
|
||||||
|
|
||||||
|
-- Ret, ret, ret: stupid legacy stuff:
|
||||||
|
-- If we have a string with commas then load it as as static map
|
||||||
|
-- otherwise, apply normal logic of Rspamd maps
|
||||||
|
|
||||||
|
local wrcpts = opts['whitelisted_rcpts']
|
||||||
|
if type(wrcpts) == 'string' then
|
||||||
|
if string.find(wrcpts, ',') then
|
||||||
|
settings.whitelisted_rcpts = lua_maps.rspamd_map_add_from_ucl(
|
||||||
|
lua_util.rspamd_str_split(wrcpts, ','), 'set', 'Ratelimit whitelisted rcpts')
|
||||||
|
else
|
||||||
|
settings.whitelisted_rcpts = lua_maps.rspamd_map_add_from_ucl(wrcpts, 'set',
|
||||||
|
'Ratelimit whitelisted rcpts')
|
||||||
|
end
|
||||||
|
elseif type(opts['whitelisted_rcpts']) == 'table' then
|
||||||
|
settings.whitelisted_rcpts = lua_maps.rspamd_map_add_from_ucl(wrcpts, 'set',
|
||||||
|
'Ratelimit whitelisted rcpts')
|
||||||
|
else
|
||||||
|
-- Stupid default...
|
||||||
|
settings.whitelisted_rcpts = lua_maps.rspamd_map_add_from_ucl(
|
||||||
|
settings.whitelisted_rcpts, 'set', 'Ratelimit whitelisted rcpts')
|
||||||
|
end
|
||||||
|
|
||||||
|
if opts['whitelisted_ip'] then
|
||||||
|
settings.whitelisted_ip = lua_maps.rspamd_map_add('ratelimit', 'whitelisted_ip', 'radix',
|
||||||
|
'Ratelimit whitelist ip map')
|
||||||
|
end
|
||||||
|
|
||||||
|
if opts['whitelisted_user'] then
|
||||||
|
settings.whitelisted_user = lua_maps.rspamd_map_add('ratelimit', 'whitelisted_user', 'set',
|
||||||
|
'Ratelimit whitelist user map')
|
||||||
|
end
|
||||||
|
|
||||||
|
settings.custom_keywords = {}
|
||||||
|
if opts['custom_keywords'] then
|
||||||
|
local ret, res_or_err = pcall(loadfile(opts['custom_keywords']))
|
||||||
|
|
||||||
|
if ret then
|
||||||
|
opts['custom_keywords'] = {}
|
||||||
|
if type(res_or_err) == 'table' then
|
||||||
|
for k,hdl in pairs(res_or_err) do
|
||||||
|
settings['custom_keywords'][k] = hdl
|
||||||
|
end
|
||||||
|
elseif type(res_or_err) == 'function' then
|
||||||
|
settings['custom_keywords']['custom'] = res_or_err
|
||||||
|
end
|
||||||
|
else
|
||||||
|
rspamd_logger.errx(rspamd_config, 'cannot execute %s: %s',
|
||||||
|
opts['custom_keywords'], res_or_err)
|
||||||
|
settings['custom_keywords'] = {}
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
if opts['message_func'] then
|
||||||
|
message_func = assert(load(opts['message_func']))()
|
||||||
|
end
|
||||||
|
|
||||||
|
redis_params = lua_redis.parse_redis_server('ratelimit')
|
||||||
|
|
||||||
|
if not redis_params then
|
||||||
|
rspamd_logger.infox(rspamd_config, 'no servers are specified, disabling module')
|
||||||
|
lua_util.disable_module(N, "redis")
|
||||||
|
else
|
||||||
|
local s = {
|
||||||
|
type = 'prefilter,nostat',
|
||||||
|
name = 'RATELIMIT_CHECK',
|
||||||
|
priority = 7,
|
||||||
|
callback = ratelimit_cb,
|
||||||
|
flags = 'empty',
|
||||||
|
}
|
||||||
|
|
||||||
|
if settings.symbol then
|
||||||
|
s.name = settings.symbol
|
||||||
|
elseif settings.info_symbol then
|
||||||
|
s.name = settings.info_symbol
|
||||||
|
end
|
||||||
|
|
||||||
|
rspamd_config:register_symbol(s)
|
||||||
|
rspamd_config:register_symbol {
|
||||||
|
type = 'idempotent',
|
||||||
|
name = 'RATELIMIT_UPDATE',
|
||||||
|
callback = ratelimit_update_cb,
|
||||||
|
}
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
rspamd_config:add_on_load(function(cfg, ev_base, worker)
|
||||||
|
load_scripts(cfg, ev_base)
|
||||||
|
end)
|
Loading…
Reference in New Issue
Block a user