Net::Radius::Server::Set::Server - Proxy the RADIUS request to a RADIUS server
use Net::Radius::Server::Set::Proxy; use Net::Radius::Server::Base qw/:set/; my $proxy = Net::Radius::Server::Set::Proxy->new ({ server => $real_server_ip, port => $real_server_port, dictionary => $dictionary_file, tries => 2, timeout => 3, result => NRS_SET_RESPOND, }); my $proxy_sub = $proxy->mk;
Net::Radius::Server::Set::Proxy allows for proxying the (matching) RADIUS requests through a RADIUS server. The following attributes are supported:
Net::Radius::Server::Set::Proxy
This entry is mandatory and specifies the address of the server to which the RADIUS request must be sent.
The port in the RADIUS server where the current request must be sent. Defaults to the current port.
The RADIUS shared secret to be used to protect the interaction with the server. Defaults to the secret used to handle the current request.
Dictionary to use for packet coding/decoding when talking to the RADIUS server. If left unspecified, the currently configured dictionary will be used to handle that interaction as well.
How many seconds before retrying request to the real RADIUS server. Defaults to 3 seconds.
How many attempts to proxy the request to the real RADIUS server. Defaults to 2 attempts.
The result to be returned by the method. See Net::Server::Base(3) for more information.
When proxying is succesful, $self->result will be returned (if specified). Otherwise, NRS_SET_CONTINUE | NRS_SET_RESPOND will be returned by default.
$self->result
NRS_SET_CONTINUE | NRS_SET_RESPOND
Upon a failure in the proxying, NRS_SET_CONTINUE is returned.
NRS_SET_CONTINUE
None by default.
$Log$ Revision 1.13 2007/01/03 00:29:58 lem Improve check for non-responses Revision 1.12 2006/12/14 16:33:17 lem Rules and methods will only report failures in log level 3 and above. Level 4 report success and failure, for deeper debugging Revision 1.11 2006/12/14 15:52:25 lem Fix CVS tags
Perl(1), Net::Radius::Server(3), Net::Radius::Server::Radius(3), Net::Radius::Packet(3).
Luis E. Muñoz, <luismunoz@cpan.org>
Copyright (C) 2006 by Luis E. Muñoz
This library is free software; you can redistribute it and/or modify it under the same terms as Perl 5.8.6 itself.
1 POD Error
The following errors were encountered while parsing the POD:
Non-ASCII character seen before =encoding in 'Muñoz,'. Assuming UTF-8
To install Net::Radius::Server, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Net::Radius::Server
CPAN shell
perl -MCPAN -e shell install Net::Radius::Server
For more information on module installation, please visit the detailed CPAN module installation guide.