extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-06-01 07:25:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

Add a comment

Browse Source
This commit is contained in:
Tom Eastep 2010-12-31 07:51:15 -08:00
parent d4d1bb7b41
commit aa6754cb40
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
Shorewall/Perl/Shorewall/Rules.pm
View File

@ -848,8 +848,8 @@ sub process_macro ( $$$$$$$$$$$$$$$$$ ) {
clear_comment unless $nocomment; clear_comment unless $nocomment;
return $generated; return $generated;
} }
# #
# Once a rule has been expanded via wildcards (source and/or dest zone eq 'all'), it is processed by this function. If # Once a rule has been expanded via wildcards (source and/or dest zone eq 'all'), it is processed by this function. If
# the target is a macro, the macro is expanded and this function is called recursively for each rule in the expansion. # the target is a macro, the macro is expanded and this function is called recursively for each rule in the expansion.
@ -1085,6 +1085,9 @@ sub process_rule_common ( $$$$$$$$$$$$$$$$ ) {
my ( $chain, $policy ); my ( $chain, $policy );
if ( $inaction ) { if ( $inaction ) {
#
# We are generating rules in an action chain -- the chain name is the name of the action chain
#
$chain = $chainref->{name}; $chain = $chainref->{name};
} else { } else {
unless ( $actiontype & NATONLY ) { unless ( $actiontype & NATONLY ) {