From 94cdc73ec2084a78fd7ed48b4617f7d450977936 Mon Sep 17 00:00:00 2001 From: Tom Eastep Date: Tue, 14 Sep 2010 13:50:22 -0700 Subject: [PATCH] Restore setpolicy() to prog.header* Signed-off-by: Tom Eastep --- Shorewall/Perl/prog.header | 8 ++++++++ Shorewall/Perl/prog.header6 | 8 ++++++++ 2 files changed, 16 insertions(+) diff --git a/Shorewall/Perl/prog.header b/Shorewall/Perl/prog.header index d19be77d0..b00bbbfca 100644 --- a/Shorewall/Perl/prog.header +++ b/Shorewall/Perl/prog.header @@ -80,6 +80,14 @@ progress_message3() # $* = Message fi } +# +# Set a standard chain's policy +# +setpolicy() # $1 = name of chain, $2 = policy +{ + run_iptables -P $1 $2 +} + # # Generate a list of all network interfaces on the system # diff --git a/Shorewall/Perl/prog.header6 b/Shorewall/Perl/prog.header6 index 8bf3638dc..1931f2448 100644 --- a/Shorewall/Perl/prog.header6 +++ b/Shorewall/Perl/prog.header6 @@ -80,6 +80,14 @@ progress_message3() # $* = Message fi } +# +# Set a standard chain's policy +# +setpolicy() # $1 = name of chain, $2 = policy +{ + run_iptables -P $1 $2 +} + # # Generate a list of all network interfaces on the system #