From 1f4ea6a088feb860806f77a36baa57cf495bbd1a Mon Sep 17 00:00:00 2001 From: Mohit Mehta Date: Tue, 5 May 2009 11:36:56 -0700 Subject: * add flag to print commands to STDOUT for debugging * change prefix and suffix for Vyatta zone chains --- lib/Vyatta/Zone.pm | 15 ++++++++++----- 1 file changed, 10 insertions(+), 5 deletions(-) diff --git a/lib/Vyatta/Zone.pm b/lib/Vyatta/Zone.pm index a07d2cd..986ebb5 100755 --- a/lib/Vyatta/Zone.pm +++ b/lib/Vyatta/Zone.pm @@ -31,16 +31,21 @@ use strict; use warnings; my $debug="false"; +my $syslog="false"; my $logger = 'sudo logger -t zone.pm -p local0.warn --'; sub run_cmd { my $cmd = shift; - my $error = system("$cmd"); - if ($debug eq "true") { + + if ($syslog eq "true") { my $func = (caller(1))[3]; system("$logger [$func] [$cmd] = [$error]"); } + if ($debug eq "true") { + my $func = (caller(1))[3]; + print "[$func] [$cmd] = [$error]\n"; + } return $error; } @@ -96,15 +101,15 @@ sub rule_exists { sub get_zone_chain { my ($value_func, $zone, $localout) = @_; - my $chain = "zone-$zone"; + my $chain = "VZONE_$zone"; if (defined(is_local_zone($value_func, $zone))) { # local zone if (defined $localout) { # local zone out chain - $chain .= "-out"; + $chain .= "_OUT"; } else { # local zone in chain - $chain .= "-in"; + $chain .= "_IN"; } } return $chain; -- cgit v1.2.3