holm/shorewall_code
1
0
Fork 0
forked from extern/shorewall_code
Code Pull Requests Activity

Improve MARK column validation

Browse Source
This commit is contained in:
Tom Eastep 2011-02-19 08:18:21 -08:00
parent 9173b22b58
commit 974a542585
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
Shorewall/Perl/Shorewall/Chains.pm
View File

@ -2394,8 +2394,15 @@ sub verify_small_mark( $ ) {
}
sub validate_mark( $ ) {
for ( split '/', $_[0] ) {
verify_mark $_;
my $mark = shift;
fatal_error "Missing MARK" unless defined $mark && $mark ne '';
if ( $mark =~ '/' ) {
my @marks = split '/', $mark;
fatal_error "Invalid MARK ($mark)" unless @marks == 2;
verify_mark $_ for @marks;
} else {
verify_mark $mark;
}
}