From f65a020329d6ef43c531244ea20ff1afd6cc5672 Mon Sep 17 00:00:00 2001
From: teastep <teastep@fbd18981-670d-0410-9b5c-8dc0c1a9a2bb>
Date: Thu, 19 Apr 2007 21:24:25 +0000
Subject: [PATCH] Fix 'none' handling in rules file

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6025 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
---
 Shorewall-perl/Shorewall/Rules.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/Shorewall-perl/Shorewall/Rules.pm b/Shorewall-perl/Shorewall/Rules.pm
index 26483eafa..c8ae27790 100644
--- a/Shorewall-perl/Shorewall/Rules.pm
+++ b/Shorewall-perl/Shorewall/Rules.pm
@@ -1247,7 +1247,11 @@ sub process_rules() {
 
 	    $section = $source;
 	} else {
-	    process_rule $target, $source, $dest, $proto, $ports, $sports, $origdest, $ratelimit, $user;
+	    if ( "\L$source" =~ /^none(:.*)?$/ || "\L$dest" =~ /^none(:.*)?$/ ) {
+		progress_message "Rule \"$line\" ignored."
+	    } else {
+		process_rule $target, $source, $dest, $proto, $ports, $sports, $origdest, $ratelimit, $user;
+	    }
 	}
     }