Linux and UNIX Man Pages

Linux & Unix Commands - Search Man Pages

net::sip::registrar(3pm) [debian man page]

Net::SIP::Registrar(3pm)				User Contributed Perl Documentation				  Net::SIP::Registrar(3pm)

NAME
Net::SIP::Registrar - Endpoint for registering SIP clients SYNOPSIS
my $reg = Net::SIP::Registrar->new( dispatcher => $dispatcher, min_expires => 10, max_expires => 60, domains => [ 'example.com','example.org' ], ); DESCRIPTION
This package implements a simple SIP registrar. In the current implementation registry information are only kept in memory, e.g. they are not preserved over restarts. The implementation itself does not checking if the UAC is authorized to register the given address. This can be done with using an appropriate Authorize Module inside a ReceiveChain in front of the registrar. CONSTRUCTOR
new ( %ARGS ) This creates a new registar object, %ARGS can have the following keys: dispatcher Net::SIP::Dispatcher object manging the registar. Mandatory. max_expires Maximum expires time accepted. If the client requests a larger expires value it will be capped at max_expires Defaults to 300. min_expires Minimum expires value. If the client requests a smaller value the registrar will return a response of "423 Interval too brief". Defaults to 30. domains or domain Either string or reference to list of strings containing the names of the domains the registrar is responsable for. If not given the registrar accepts everything. METHODS
receive ( PACKET,LEG,FROM ) PACKET is the incoming packet, LEG is the Net::SIP::Leg where the packet arrived and FROM is the "ip:port" of the sender. Responses will be send back to the sender through the same leg. Called from the managing Net::SIP::Dispatcher object if a new packet arrives. Will return "()" and ignore the packet if it's not a REGISTER request or if it is not responsable for the domain given in the "From" heeader of the REGISTER request. If it is responsable for the packet it will create a response and return the code of the response. Responses are either "423 Interval too brief" if the request expires time is too small, or "200 Ok" if the expires time is 0 (e.g. the client should be unregistered) or greater or equal min_expires. In case of a successful response it wil also update the internal registry information. query ( ADDR ) Search for ADDR (which has format "proto:user@domain") in the registry. Returns @List of all sip or sips contacts for ADDR. expire Removes all expired entries from the internal registry. Called whenever the registry information gets updated from sub receive. perl v5.14.2 2010-08-09 Net::SIP::Registrar(3pm)

Check Out this Related Man Page

Net::SIP::Dropper(3pm)					User Contributed Perl Documentation				    Net::SIP::Dropper(3pm)

NAME
Net::SIP::Dropper - drops SIP messages based on callback SYNOPSIS
use Net::SIP::Dropper::ByIPPort; my $drop_by_ipport = Net::SIP::Dropper::ByIPPort->new( database => '/path/to/database.drop', methods => [ 'REGISTER', '...', '' ], attempts => 10, interval => 60, ); use Net::SIP::Dropper::ByField; my $drop_by_field = Net::SIP::Dropper::ByField->new( methods => [ 'REGISTER', '...', '' ], 'From' => qr/sip(?:vicious|sscuser)/, 'User-Agent' => qr/^friendly-scanner$/, ); my $drop_subscribe = sub { my ($packet,$leg,$from) = @_; # drop all subscribe requests and responses return $packet->method eq 'SUBSCRIBE' ? 1:0; }; my $dropper = Net::SIP::Dropper->new( cbs => [ $drop_by_ipport, $drop_by_field, $drop_subscribe ]); my $chain = Net::SIP::ReceiveChain->new( [ $dropper, ... ] ); DESCRIPTION
Drops messages. This means, does no further processing in the Net::SIP chain and does not send something back if the incoming message match the settings. Some useful droppers are defined in Net::SIP::Dropper::ByIpPort and Net::SIP::Dropper::ByField. CONSTRUCTOR
new ( ARGS ) ARGS is a hash with key "cb" or "cbs". "cb" is a single callback to be processed, "cbs" is an arrayref with callbacks. If one of the callbacks returns true the message will be dropped. If all callbacks return false the message will be forwarded in the chain. Returns a new dropper object to be used in the chain. perl v5.14.2 2011-02-03 Net::SIP::Dropper(3pm)
Man Page