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

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

NAME

       Net::SIP::Dropper::ByField - drops SIP messages based on fields in SIP header

SYNOPSIS

	       my $drop_by_field = Net::SIP::Dropper::ByField->new(
		       methods => [ 'REGISTER', '...', '' ],
		       'From' => qr/sip(?:vicious|sscuser)/,
		       'User-Agent' => qr/^friendly-scanner$/,
	       );

	       my $dropper = Net::SIP::Dropper->new( cb => $drop_by_field );
	       my $chain = Net::SIP::ReceiveChain->new([ $dropper, ... ]);

DESCRIPTION

       With "Net::SIP::Dropper::ByField" one can drop packets based on the contents of the fields in the SIP header. This can be used to drop
       specific user agents.

CONSTRUCTOR

       new ( ARGS )
	   ARGS is a hash with the following keys:

	   methods Optional argument to restrict dropping to specific methods.

		   Is array reference of method names, if one of the names is empty also responses will be considered. If not given all packets
		   will be checked.

	   field-name
		   Any argument other then "methods" will be considered a field name.  The value is a callback given to "invoke_callback", like
		   for instance a Regexp.

METHODS

       run ( PACKET, LEG, FROM )
	   This method is called as a callback from the Net::SIP::Dropper object.  It returns true if the packet should be dropped, e.g. if at
	   least one of the in the constructor specified fields matches the specified value.

perl v5.14.2							    2011-02-03					   Net::SIP::Dropper::ByField(3pm)

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

NAME

       Net::SIP::ReceiveChain - handle incoming packet by multiple receivers

SYNOPSIS

	 # create proxy which works as a registrar too, but
	 # all register requests should be authorized

	 my $registrar = Net::SIP::Registrar->new...
	 my $auth = Net::SIP::Authorize->new ....
	 my $reg_chain = Net::SIP::ReceiveChain->new(
	       [ $auth,$registrar ],
	       methods => [ 'REGISTER' ],
	 );

	 my $proxy = Net::SIP::StatelessProxy->new...
	 my $chain = Net::SIP::ReceiveChain->new(
	       [ $registrar,$proxy ]
	 );

DESCRIPTION

       This package is used to handle incoming packets by multiple receivers, e.g. make sure that requests for Net::SIP::Registrar will be
       authorized by Net::SIP::Authorize.

       Objects in the chain might be Net::SIP::Registrar, Net::SIP::StatelessProxy, Net::SIP::Authorize, Net::SIP::ReceiveChain itself and every
       other object which handles "receive" like described below.

CONSTRUCTOR

       new ( OBJECTS, %ARGS )
	   This creates a new registar object, OBJECTS is a reference to an array of objects implementing the "receive" method.

	   %ARGS can have the following keys:

	   filter  A callback which gets called during "receive" with all arguments of the method. If it returns TRUE the packet will be handled
		   by the chain, otherwise not.

	   methods If filter is not given but methods is it will set filter to a callback which accepts only the methods specified in the array
		   reference given to methods.

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.

	   Returns TRUE if the packet was fully handled by one of the objects in the chain, else FALSE:

	   o	   If a filter was given checks the packet against the filter and returns FALSE if the filter does return FALSE.

	   o	   Otherwise it will call "receive" on all objects in the chain until one of these returns TRUE. In this case it will return TRUE.

	   o	   If no object in the chain handled the packet it will return FALSE.

perl v5.14.2							    2010-02-02					       Net::SIP::ReceiveChain(3pm)