From 8d3bd6e70a9c1170022673f64f1478024bb2d0e4 Mon Sep 17 00:00:00 2001
From: teastep <teastep@fbd18981-670d-0410-9b5c-8dc0c1a9a2bb>
Date: Wed, 9 May 2007 19:40:35 +0000
Subject: [PATCH] Don't allow comments ending in '\'

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@6308 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
---
 Shorewall-perl/Shorewall/Chains.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Shorewall-perl/Shorewall/Chains.pm b/Shorewall-perl/Shorewall/Chains.pm
index f69520923..f846bf3ae 100644
--- a/Shorewall-perl/Shorewall/Chains.pm
+++ b/Shorewall-perl/Shorewall/Chains.pm
@@ -265,6 +265,7 @@ sub process_comment() {
     if ( $capabilities{COMMENTS} ) {
 	( $comment = $line ) =~ s/^\s*COMMENT\s*//;
 	fatal_error "COMMENT lines may not contain double quotes" if $comment =~ /"/;
+	fatal_error "Invalid COMMENT line" if length $line >= 2 && substr( $line, -1) eq '\\';
     } else {
 	warning_message "COMMENT ignored -- requires comment support in iptables/Netfilter";
     }