From a78433c8796593aad8e18be6216ea007d08dcaff Mon Sep 17 00:00:00 2001 From: Gaurav Sinha Date: Tue, 14 Feb 2012 15:23:28 -0800 Subject: timeouts script, and new nodes (cherry picked from commit e49e60bca2262760575b2a4b488e6acfe1dc0cb6) --- scripts/vyatta-conntrack-timeouts.pl | 34 ++++++++++++++++++++++++++++++++++ 1 file changed, 34 insertions(+) create mode 100644 scripts/vyatta-conntrack-timeouts.pl (limited to 'scripts') diff --git a/scripts/vyatta-conntrack-timeouts.pl b/scripts/vyatta-conntrack-timeouts.pl new file mode 100644 index 0000000..7725a3b --- /dev/null +++ b/scripts/vyatta-conntrack-timeouts.pl @@ -0,0 +1,34 @@ +#!/usr/bin/perl + +use lib "/opt/vyatta/share/perl5"; +use warnings; +use strict; + +use Vyatta::Config; +use Vyatta::IpTables::Rule; +use Vyatta::IpTables::AddressFilter; +use Vyatta::IpTables::Mgr; +use Getopt::Long; +use Vyatta::Zone; +use Sys::Syslog qw(:standard :macros); + +my ($create, $delete, $update); + +GetOptions("create=s" => \$create, + "delete=s" => \$delete, + "update=s" => \$update, +); + +if ($create and ($create eq 'true')) { + print "create\n"; + # create a nfct-timeout policy based on protocol specific timers + # check if the rule has protocol configured + # if configured, check what the protocol is and get the appropriate timers. +} + +if ($delete and ($delete eq 'true')) { + print "delete"; +} +if ($update and ($update eq 'true')) { + print "update"; +} -- cgit v1.2.3