extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2024-11-28 02:23:20 +01:00
Code Issues Packages Projects Releases Wiki Activity

Zero out {frozen} in a deleted chain entry

Browse Source
This commit is contained in:
Tom Eastep 2010-09-17 16:00:36 -07:00
parent c5bb3ecfac
commit 6106dd3ada
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -624,7 +624,7 @@ sub insert_rule1($$$)
$chainref->{frozen}++; $chainref->{frozen}++;
$number = 0; $number = 0;
} }
splice( @{$chainref->{rules}}, $number, 0, $rule ); splice( @{$chainref->{rules}}, $number, 0, $rule );
trace( $chainref, 'I', ++$number, $rule ) if $debug; trace( $chainref, 'I', ++$number, $rule ) if $debug;
@ -642,12 +642,13 @@ sub insert_rule($$$) {
# #
# Do final work to 'delete' a chain. We leave it in the chain table but clear # Do final work to 'delete' a chain. We leave it in the chain table but clear
# the 'referenced', 'rules' and 'references' members. # the 'referenced', 'rules', 'references' and 'frozen' members.
# #
sub delete_chain( $ ) { sub delete_chain( $ ) {
my $chainref = shift; my $chainref = shift;
$chainref->{referenced} = 0; $chainref->{referenced} = 0;
$chainref->{frozen} = 0;
$chainref->{rules} = []; $chainref->{rules} = [];
$chainref->{references} = {}; $chainref->{references} = {};
trace( $chainref, 'X', undef, '' ) if $debug; trace( $chainref, 'X', undef, '' ) if $debug;