Tom Eastep wrote: > > a) REDIRECT currently doesn't work with Macros under Shorewall-perl. I'll > fix it for 4.0.4.
The attached patch seems to correct the problem. Simple use this in your rules file: DNS/REDIRECT lan -Tom -- Tom Eastep \ Nothing is foolproof to a sufficiently talented fool Shoreline, \ http://shorewall.net Washington USA \ [EMAIL PROTECTED] PGP Public Key \ https://lists.shorewall.net/teastep.pgp.key
Index: Shorewall/Rules.pm
===================================================================
--- Shorewall/Rules.pm (revision 7374)
+++ Shorewall/Rules.pm (working copy)
@@ -892,8 +892,6 @@
$msource = '';
}
- $msource = '' if $msource eq '-';
-
if ( $mdest ) {
if ( ( $mdest eq '-' ) || ( $mdest eq 'DEST' ) ) {
$mdest = $dest || '';
@@ -906,8 +904,6 @@
$mdest = '';
}
- $mdest = '' if $mdest eq '-';
-
$mproto = merge_macro_column $mproto, $proto;
$mports = merge_macro_column $mports, $ports;
$msports = merge_macro_column $msports, $sports;
@@ -1001,7 +997,7 @@
#
if ( $actiontype & REDIRECT ) {
if ( $dest eq '-' ) {
- $dest = "firewall_zone";
+ $dest = firewall_zone;
} else {
$dest = join( '', firewall_zone, '::', $dest );
}
signature.asc
Description: OpenPGP digital signature
------------------------------------------------------------------------- This SF.net email is sponsored by: Microsoft Defy all challenges. Microsoft(R) Visual Studio 2005. http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________ Shorewall-users mailing list [email protected] https://lists.sourceforge.net/lists/listinfo/shorewall-users
