Correct handling of ";;+" in the snat file

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2020-06-28 11:03:04 -07:00
parent e3f139bbdb
commit 10aef23ab1
No known key found for this signature in database
GPG Key ID: 96E6B3F2423A4D10

View File

@ -5572,6 +5572,14 @@ sub process_snat1( $$$$$$$$$$$$$ ) {
my $logaction; my $logaction;
my $param; my $param;
#
# Handle early matches
#
if ( $inlinematches =~ s/^s*\+// ) {
$prerule = $inlinematches;
$inlinematches = '';
}
if ( $action =~ /^MASQUERADE(\+)?(?:\((.+)\))?$/ ) { if ( $action =~ /^MASQUERADE(\+)?(?:\((.+)\))?$/ ) {
$target = 'MASQUERADE'; $target = 'MASQUERADE';
$actiontype = $builtin_target{$action = $target}; $actiontype = $builtin_target{$action = $target};