From e8de4ce563a257b9bc161a3ce6ee018544cc0580 Mon Sep 17 00:00:00 2001
From: Tom Eastep <teastep@shorewall.net>
Date: Wed, 22 Dec 2010 10:59:02 -0800
Subject: [PATCH] Add an <action> member to the chain table

---
 Shorewall/Perl/Shorewall/Actions.pm | 4 ++++
 Shorewall/Perl/Shorewall/Chains.pm  | 1 +
 2 files changed, 5 insertions(+)

diff --git a/Shorewall/Perl/Shorewall/Actions.pm b/Shorewall/Perl/Shorewall/Actions.pm
index 97eb2799d..c84d1d3af 100644
--- a/Shorewall/Perl/Shorewall/Actions.pm
+++ b/Shorewall/Perl/Shorewall/Actions.pm
@@ -192,6 +192,8 @@ sub createlogactionchain( $$$$$ ) {
 
     fatal_error "Too many invocations of Action $action" if $actionref->{actchain} > 99;
 
+    $chainref->{chain} = $chain;
+
     unless ( $targets{$action} & BUILTIN ) {
 
 	dont_optimize $chainref;
@@ -220,6 +222,8 @@ sub createsimpleactionchain( $ ) {
 
     $usedactions{"$action:none::"} = $chainref;
 
+    $chainref->{chain} = $chain;
+
     unless ( $targets{$action} & BUILTIN ) {
 
 	dont_optimize $chainref;
diff --git a/Shorewall/Perl/Shorewall/Chains.pm b/Shorewall/Perl/Shorewall/Chains.pm
index d2dcfe28f..28d2ece30 100644
--- a/Shorewall/Perl/Shorewall/Chains.pm
+++ b/Shorewall/Perl/Shorewall/Chains.pm
@@ -217,6 +217,7 @@ our $VERSION = '4.4_16';
 #                                               logchains    => { <key1> = <chainref1>, ... }
 #                                               references   => { <ref1> => <refs>, <ref2> => <refs>, ... }
 #                                               blacklist    => <number of blacklist rules at the head of the rules array> ( 0 or 1 )
+#                                               action       => <name of the action that generated this chain>
 #                                             } ,
 #                                <chain2> => ...
 #                              }