NAME
Authen::Tcpdmatch - Perl extension for parsing hosts.allow and hosts.deny
SYNOPSIS
use Authen::Tcpdmatch;
tcpdmatch( 'ftp', 'red.haw.org' )
tcpdmatch( 'ftp', '192.168.0.1' )
tcpdmatch( 'ftp', 'red.haw.org' , /etc )DESCRIPTION
This module in a front-end to the core functionality of tcpdmatch, which consults hosts.allow and hosts.deny to decide if service should be granted.
Its sole purpose is to choose load either TcpdmatchYapp (a yapp parser), or TcpdmatchRD ( a RecDescent parser) . In previous releases the default parser was yapp, but the default is now set to RecDecent since yapp is presently disabled.
The default action is to load the yapp parser since it is several times faster than RecDescent, and it is a lot easier to make it re-entrant.
Set the environment variable TCPDMATCH to "RD" in order to use the RecDescent parser, or just ignore this module and load "use Authen::Tcpdmatch::TcpdmatchRD" instead. The use interface is the same for all Authen::Tcpdmatch::Tcpdmatch* modules. =end
- tcpdmatch()
-
The first and second arguments are the requested service and the name of remote host, respectively. The third (optional) argument indicates the directory of the hosts.* files. (Default is /etc .)
LIMITATIONS
It does not support shell commands, client lookups, endpoint patterns, spoofing attacks, and expansions. If these features are important to you, perhaps you should be using libwarp.so with Authen::Libwrap .
EXPORT
tcpdmatch
AUTHOR
Ioannis Tambouras, <ioannis@earthlink.net>