NAME
Redis::RateLimit - Sliding window rate limiting with Redis
VERSION
version 1.0000
SYNOPSIS
use Redis;
use Redis::RateLimit;
my $rules = [
{ interval => 1, limit => 5 },
{ interval => 3600, limit => 1000, precision => 100 },
];
my $redis_client = Redis->new;
my $limiter = Redis::RateLimit->new(
redis => $redis_client,
rules => $rules,
);
for ( 1..10 ) {
say 'Is rate limited? ', $limiter->incr('127.0.0.1') ? 'true' : 'false';
};
Output:
Is rate limited? false
Is rate limited? false
Is rate limited? false
Is rate limited? false
Is rate limited? false
Is rate limited? true
Is rate limited? true
Is rate limited? true
Is rate limited? true
Is rate limited? true
DESCRIPTION
A Perl library for efficient rate limiting using sliding windows stored
in Redis.
This is a port of RateLimit.js without the
non-blocking goodness.
Features
* Uses a sliding window for a rate limit rule
* Multiple rules per instance
* Multiple instances of RateLimit side-by-side for different
categories of users.
* Whitelisting/blacklisting of keys
Background
See this excellent articles on how the sliding window rate limiting
with Redis works:
* Introduction to Rate Limiting with Redis Part 1
* Introduction to Rate Limiting with Redis Part 2
For more information on the `weight` and `precision` options, see the
second blog post above.
TODO
* Port the middleware for Plack
ATTRIBUTES
redis
Redis client. If none is provided, a default is constructed for
127.0.0.1:6379.
prefix
A prefix to be included on each redis key. This prevents collisions
with multiple applications using the same Redis DB. Defaults to
'ratelimit'.
client_prefix
Set this to a true value if using a Redis client that supports
transparent prefixing. Defaults to 0.
rules
An arrayref of rules, each of which is a hashref with interval, limit,
and optionally precision values.
METHODS
check($key | \@keys)
Returns true if any of the keys are rate limited.
incr($key | \@keys [, $weight ])
Returns true if any of the keys are rate limited, otherwise, it
increments counts and returns false.
keys
Returns all of the rate limiter's with prefixes removed.
violated_rules($key | \@keys)
Returns a list of rate limit rules violated for any of the keys, or an
empty list.
limited_keys($key | \@keys)
Returns a list of limited keys.
whitelist($key | \@keys)
Adds the keys to the whitelist so they are never rate limited.
unwhitelist($key | \@keys)
Removes the keys from the whitelist.
blacklist($key | \@keys)
Adds the keys to the blacklist so they are always rate limited.
unblacklist($key | \@keys)
Removes the keys from the blacklist.
AUTHOR
Marc Mims
COPYRIGHT AND LICENSE
This software is Copyright (c) 2016 by Marc Mims.
This is free software, licensed under:
The MIT (X11) License