Rules - The PCXFireWall Rules Module.
use PCXFireWall::Rules; my $obj = PCXFireWall::Rules->new;
# define config, nat, filter, mangle, proc, network objects. # call the rules system to allow the user to work with them. $obj->startingRules(configObj => $config, filterObj => $filter, natObj => $nat, mangleObj => $mangle, interfaceObj => $interfaces, proc => $proc, modulesObj => $modulesObj, networkObj => $networkObj);
# then we open the file and have each module output its stuff.
Rules is the Module that Defines the IPTables Rules for the PCXFireWall.
scalar new(void) Creates a new instance of the PCXFireWall::Rules object.
void startingRules(configObj, interfaceObj, filterObj, natObj, mangleObj, proc, modulesObj, networkObj) Defines the rules/actions that need to be done when the firewall is starting up.
void stoppingRules(configObj, interfaceObj, filterObj, natObj, mangleObj, proc, networkObj) Defines the rules/actions that need to be done when the firewall is shutting down.
void restartingRules(configObj) Allows the user to specify the installPath to use if they want to change it when we generate the restartfw script.
NOTE: All data fields are accessible by specifying the object and pointing to the data member to be modified on the left-hand side of the assignment. Ex. $obj->variable($newValue); or $value = $obj->variable;
PC & Web Xperience, Inc. (mailto:admin at pcxperience.com)
perl(1)