NAME
Sub::Throttler - Rate limit sync and async function calls
VERSION
This document describes Sub::Throttler version v0.2.2
SYNOPSIS
# Load throttling engine
use Sub::Throttler qw( throttle_it );
# Enable throttling for existing sync/async functions/methods
throttle_it('Mojo::UserAgent::get');
throttle_it('Mojo::UserAgent::post');
# Load throttling algorithms
use Sub::Throttler::Limit;
use Sub::Throttler::Rate::AnyEvent;
use Sub::Throttler::Periodic::EV;
# Configure throttling algorithms
my $throttle_parallel_requests
= Sub::Throttler::Limit->new(limit => 5);
my $throttle_request_rate
= Sub::Throttler::Rate::AnyEvent->new(period => 0.1, limit => 10);
# Apply configured limits to selected functions/methods with
# throttling support
$throttle_parallel_requests->apply_to_methods(Mojo::UserAgent => qw( get ));
$throttle_request_rate->apply_to_methods(Mojo::UserAgent => qw( get post ));
DESCRIPTION
This module provide sophisticated throttling framework which let you
delay execution of any sync and async functions/methods based on any
rules you need.
You can use core features of this framework with usual sync application
or with application based on any event loop, but some throttling
algorithms may require specific event loop (like
Sub::Throttler::Periodic::EV).
The "SYNOPSIS" shows basic usage example, but there are a lot of
advanced features: define which and how many resources each
function/method use depending not only on it name but also on it
params, normal and high-priority queues for delayed functions/methods,
custom wrappers with ability to free unused resources, write your own
functions/methods with smart support for throttling, implement own
throttling algorithms, save and restore current limits and used
resources between different executions of your app.
Basic use case: limit rate for downloading urls. Advanced use case:
apply complex limits for using remote API, which depends on how many
items you process (i.e. on some params of API call), use high-priority
queue to ensure login/re-login API call will be executed ASAP before
any other delayed API calls, cancel unused limits in case of failed API
call to avoid needless delay for next API calls, save/restore used
resources to avoid occasional exceeding the quota because of
crash/restart of your app.
ALGORITHMS / PLUGINS
These algorithms are included in this module, but there are may be
other algorithms available as separate modules on CPAN.
Sub::Throttler::Limit implement algorithm to throttle based on quantity
of used resources/limits. For example, it will let you limit an amount
of simultaneous tasks.
Sub::Throttler::Rate::AnyEvent implement algorithm to throttle based on
rate (quantity of used resources/limits per some period of time). For
example, it will let you control maximum calls/sec and burst rate (by
choosing between "1000 calls per 1 second" and "10 calls per 0.01
second" limits).
Sub::Throttler::Periodic::EV is similar to
Sub::Throttler::Rate::AnyEvent, but it treat "period" differently,
using absolute wall-clock time instead of relative time (for ex. if
period is set to 1 hour then it begins at 00m00s and ends at 59m59s of
every hour).
HOW THROTTLING WORKS
To be able to throttle some function/method it should support
throttling. This mean it either should be implemented using this module
(see "throttle_me", "throttle_me_asap" and "throttle_me_sync"), or you
should replace original function/method with special wrapper. Simple
(but limited) way to do this is use "throttle_it", "throttle_it_asap"
and "throttle_it_sync" helpers. If simple way doesn't work for you then
you can implement "custom wrapper" yourself.
Next, not all functions/methods with throttling support should be
actually throttled - you should configure which of them and how exactly
should be throttled by using throttling algorithm objects.
Then, when some function/method (which has throttling support and some
limits applied using throttling algorithms) is called, it will try to
acquire some resources (see below) - on success it will be immediately
executed, otherwise it execution will be delayed until these resources
will be available. When it's finished it should explicitly free used
resources (if it was unable to do it work - for example because of
network error - it may cancel resources as unused) - to let some other
(delayed until these resources will be available) function/method runs.
How exactly function/method will be delayed depends on it type:
async
Async function/method will be delayed by adding it into queue (normal
or high-priority one) and returning. It will be run later, when
resources needed for it will become available: when another async
function/method (which is already running) will finish and release
used resources, or when some resources will become available
automatically as time passes, or if you reconfigure algorithm objects
and increase amount of available resources, or if you manually
release resources which you've manually acquired before. In most
cases your application should use some event loop to have these
events happens.
As side effect, you won't get value returned by async function/method
(if any) because execution of this function/method may be delayed by
adding it into queue instead of running it immediately. In most cases
this isn't a problem because async functions usually return results
using user's callback when done and don't return anything useful when
started.
sync
Sync function/method will be delayed by calling sleep() if some
resources it needs isn't available yet. Of course, this will work
only with algorithms which automatically release some resources as
time passes (like Sub::Throttler::Rate::AnyEvent or
Sub::Throttler::Periodic::EV). In all other cases - used algorithm
doesn't release resources with time (like Sub::Throttler::Limit) or
needed amount of resources is over algorithm's maximal limit - it
doesn't make sense to sleep() and thus exception will be thrown (such
exception indicate bug in your code and should never happens
otherwise).
HOW TO CONTROL LIMITS / RESOURCES
When you configure throttling for some function/method you define which
"resources" and how much of them it needs to run. The "resource" is
just any string, and in simple case all throttled functions/methods
will use same string (say, "default") and same quantity of this
"resource": 1.
# this algorithm allow using up to 5 "resources" of same name
$throttle = Sub::Throttler::Limit->new(limit => 5);
# this is same:
$throttle->apply_to_functions('Package::func');
# as this:
$throttle->apply_to(sub {
my ($this, $name, @params) = @_;
if (!$this && $name eq 'Package::func') {
return { default=>1 }; # require 1 resource named "default"
}
return; # do not throttle other functions/methods
});
But in complex cases you can (based on name of function or class name
or exact object and method name, and their parameters) define several
"resources" with different quantities of each.
$throttle->apply_to(sub {
my ($this, $name, @params) = @_;
if (ref $this && $this eq $target_object && $name eq 'method') {
# require 2 "some" and 10 "other" resources
return { some=>2, other=>10 };
}
return; # do not throttle other functions/methods
});
It's allowed to "apply" same $throttle instance to same
functions/methods more than once if you won't return same resource name
more than once for same function/method.
How exactly these "resources" will be acquired and released depends on
used algorithm.
PRIORITY / QUEUES
There are two separate queues for delayed async functions/methods:
normal and high-priority "asap" queue. Functions/methods in "asap"
queue will be executed before any (even delayed before them)
function/method in normal queue which require same resources to run.
But if there are not enough resources to run function/method from
high-priority queue and enough to run from normal queue -
function/method from normal queue will be run.
Which function/method will use normal and which "asap" queue is defined
by that function/method (or it wrapper) implementation.
Delayed methods in queue use weak references to their objects, so these
objects doesn't kept alive only because of these delayed method calls.
If these objects will be destroyed then their delayed methods will be
silently removed from queue.
EXPORTS
Nothing by default, but all documented functions can be explicitly
imported.
Use tag :ALL to import all of them.
INTERFACE
Enable throttling for existing functions/methods
throttle_it
my $orig_func = throttle_it('func');
my $orig_func = throttle_it('Some::func2');
This helper is able to replace with wrapper either sync
function/method or async function/method which receive callback in
last parameter.
That wrapper will call $done->() (release used resources, see
"throttle_me" for details about it) after sync function/method
returns or just before callback of async function/method will be
called.
If given function name without package it will look for that function
in caller's package.
Return reference to original function or throws if given function is
not exists.
throttle_it_asap
my $orig_func = throttle_it_asap('func');
my $orig_func = throttle_it_asap('Some::func2');
Same as "throttle_it" but use high-priority "asap" queue for async
function/method calls.
throttle_it_sync
my $orig_func = throttle_it_sync('func');
my $orig_func = throttle_it_sync('Some::func2');
Same as "throttle_it" but doesn't try to handle given function/method
as async even if it's called with CODEREF in last parameter.
custom wrapper
If you want to call $done->() after async function/method callback or
before sync function/method will be actually called or want to cancel
unused resources in some cases by calling $done->(0) you should
implement custom wrapper instead of using "throttle_it",
"throttle_it_asap" or "throttle_it_sync" helpers.
Throttling anonymous function is not supported, that's why you need to
use string eval instead of *Some::func = sub { 'wrapper' }; here
(actually, you can avoid string eval using "set_subname" in Sub::Util).
# Example wrapper for sync function which called in scalar context and
# return false when it failed to do it work (we want to cancel
# unused resources in this case).
my $orig_func = \&Some::func;
eval <<'EOW';
no warnings 'redefine';
sub Some::func {
my $done = &throttle_me_sync;
my $result = $orig_func->(@_);
if ($result) {
$done->();
} else {
$done->(0);
}
return $result;
}
EOW
# Example wrapper for sync function/method which can be called in any
# context, don't affect call stack and release resources when start.
# Also let's use Sub::Util to avoid string eval.
use Sub::Util 1.40 qw( set_subname );
my $orig_sub = \&Some::sub;
no warnings 'redefine';
*Some::sub = set_subname 'Some::sub', sub {
my $done = &throttle_me_sync;
$done->();
goto &$orig_sub;
};
# Example wrapper for async method which receive callback in first
# parameter and call it with error message when it failed to do it
# work (we want to cancel unused resources in this case); we also want
# to call $done->() after callback and use "asap" queue.
my $orig_method = \&Class::method;
eval <<'EOW';
no warnings 'redefine';
sub Class::method {
my $done = &throttle_me_asap || return;
my $self = shift;
my $orig_cb = shift;
my $cb = sub {
my ($error) = @_;
$orig_cb->(@_);
if ($error) {
$done->(0);
} else {
$done->();
}
};
$self->$orig_method($cb, @_);
return;
}
EOW
Writing functions/methods with support for throttling
To have maximum control over some function/method throttling you should
write that function yourself (in some cases it's enough to write a
"custom wrapper" for existing function/method). This will let you
control when exactly it should release used resources or cancel unused
resources to let next delayed function/method run as soon as possible.
throttle_me
sub async_func {
my $done = &throttle_me || return;
my (@params) = @_;
if ('unable to do the work') {
$done->(0);
return;
}
...
$done->();
return;
}
sub async_method {
my $done = &throttle_me || return;
my ($self, @params) = @_;
if ('unable to do the work') {
$done->(0);
return;
}
...
$done->();
return;
}
Support only async function/method, which can't return anything to
caller (because it call may be delayed because of throttling). When
this function/method will be executed it won't get anything useful
from caller() or wantarray() because it will be called from internals
of this module.
You should use it exactly as it shown in these examples: it should be
called using form &throttle_me because it needs to modify your
function/method's @_.
If your function/method should be delayed because of throttling it
will return false, and you should interrupt your function/method.
Otherwise it'll acquire "resources" needed to run your
function/method and return callback which you should call later to
release these resources.
If your function/method has done it work (and thus "used" these
resources) $done should be called without parameters $done->() or
with one true param $done->(1); if it hasn't done it work (and thus
"not used" these resources) it's better to call it with one false
param $done->(0) to cancel these unused resources and give a chance
for another function/method to reuse them.
If you forget to call $done - you'll get a warning (and chances are
you'll soon run out of resources because of this and new throttled
functions/methods won't be run anymore), if you call it more than
once - exception will be thrown.
Anonymous functions are not supported.
throttle_me_asap
Same as "throttle_me" except use &throttle_me_asap:
my $done = &throttle_me_asap || return;
This will make this async function/method use high-priority "asap"
queue instead of normal queue.
throttle_me_sync
Similar to "throttle_me" but for sync function/method:
my $done = &throttle_me_sync;
Delaying sync function/method is implemented using sleep(), so
caller() and wantarray() will work as expected, so only difference
from usual function/method is needs to call &throttle_me_sync on
start and then later release resources.
done_cb
my $cb = done_cb($done, sub {
my (@params) = @_;
...
});
my $cb = done_cb($done, sub {
my ($extra1, $extra2, @params) = @_;
...
}, $extra1, $extra2);
my $cb = done_cb($done, $class_or_object, 'method');
sub Class::Of::That::Object::method {
my ($self, @params) = @_;
...
}
my $cb = done_cb($done, $class_or_object, 'method', $extra1, $extra2);
sub Class::Of::That::Object::method {
my ($self, $extra1, $extra2, @params) = @_;
...
}
This is a simple helper function used to make sure you won't forget
to call $done->() in your async function/method with throttling
support.
First parameter must be $done callback, then either callback
function or object (or class name) and name of it method, and then
optionally any extra params for that callback function/object's
method.
Returns callback, which when called will first call $done->() and
then given callback function or object's method with any extra params
(if any) followed by it own params.
Example:
# use this:
sub download {
my $done = &throttle_me || return;
my ($url) = @_;
$ua->get($url, done_cb($done, sub {
my ($ua, $tx) = @_;
...
}));
}
# instead of this:
sub download {
my $done = &throttle_me || return;
my ($url) = @_;
$ua->get($url, sub {
my ($ua, $tx) = @_;
$done->();
...
});
}
Implementing throttle algorithms/plugins
It's recommended to inherit your algorithm from Sub::Throttler::algo.
Each plugin must provide these methods (they'll be called by throttling
engine):
sub acquire {
my ($self, $id, $key, $quantity) = @_;
if ('resource temporary unavailable') {
# wait for resource (don't use external event loop or
# anything else which may call user's code/callbacks!)
sleep(...);
}
# acquire $quantity of resources named $key for
# function/method identified by $id
if ('failed to acquire') {
croak "$self: unable to acquire $quantity of resource '$key'";
}
return $self;
}
sub try_acquire {
my ($self, $id, $key, $quantity) = @_;
# try to acquire $quantity of resources named $key for
# function/method identified by $id
if ('failed to acquire') {
return;
}
return 1;
}
sub release {
my ($self, $id) = @_;
# release resources previously acquired for $id
if ('amount of available resources was increased') {
throttle_flush();
}
return $self;
}
sub release_unused {
my ($self, $id) = @_;
# cancel unused resources previously acquired for $id
if ('amount of available resources was increased') {
throttle_flush();
}
return $self;
}
While trying to find out is there are enough resources to run some
delayed function/method throttling engine may call release_unused()
immediately after successful try_acquire() - if it turns out some other
resource needed for same function/method isn't available.
Also, usually plugins should provide few more methods, which isn't used
by throttling engine (so they're optional in some sense), but usually
they needed for application which uses that algorithm:
sub new {
my ($class, %options) = @_;
# create new algorithm object
return $self;
}
sub load {
my ($class, $state) = @_;
# create new algorithm object using previous state from $state
# (which usually include both object's configuration like {limit}
# plus information about currently acquired resources)
return $self;
}
sub save {
my ($self) = @_;
# generate and return perl structure describing current
# object's configuration and acquired resources
return $state;
}
throttle_add
throttle_add($throttle_plugin, sub {
my ($this, $name, @params) = @_;
# $this is undef or a class name or an object
# $name is a function or method name
# @params is function/method params
...
return; # OR
return {key1=>$quantity1, ...};
});
This function usually used to implement helper methods in algorithm
like "apply_to" in Sub::Throttler::algo, "apply_to_functions" in
Sub::Throttler::algo, "apply_to_methods" in Sub::Throttler::algo. But
if algorithm doesn't implement such helpers it may be used directly
by user to apply some algorithm instance to selected
functions/methods.
throttle_del
throttle_del();
throttle_del($throttle_plugin);
Undo previous "throttle_add" calls with $throttle_plugin in first
param or all of them if given no param. This is rarely useful,
usually you setup throttling when your app initializes and then
doesn't change it.
throttle_flush
throttle_flush();
Algorithm must call it each time quantity of some resources increases
(so there is a chance one of delayed functions/methods can be run
now).
SUPPORT
Bugs / Feature Requests
Please report any bugs or feature requests through the issue tracker at
https://github.com/powerman/perl-Sub-Throttler/issues. You will be
notified automatically of any progress on your issue.
Source Code
This is open source software. The code repository is available for
public review and contribution under the terms of the license. Feel
free to fork the repository and submit pull requests.
https://github.com/powerman/perl-Sub-Throttler
git clone
https://github.com/powerman/perl-Sub-Throttler.git
Resources
* MetaCPAN Search
https://metacpan.org/search?q=Sub-Throttler
* CPAN Ratings
http://cpanratings.perl.org/dist/Sub-Throttler
* AnnoCPAN: Annotated CPAN documentation
http://annocpan.org/dist/Sub-Throttler
* CPAN Testers Matrix
http://matrix.cpantesters.org/?dist=Sub-Throttler
* CPANTS: A CPAN Testing Service (Kwalitee)
http://cpants.cpanauthors.org/dist/Sub-Throttler
AUTHOR
Alex Efros <
[email protected]>
COPYRIGHT AND LICENSE
This software is Copyright (c) 2014-2015 by Alex Efros
<
[email protected]>.
This is free software, licensed under:
The MIT (X11) License