From 7c8aa8e94cc75dd4952b969c79cb45ddf3dd7985 Mon Sep 17 00:00:00 2001
From: Eirik Nygaard <eirikn@space>
Date: Tue, 3 Apr 2007 19:03:59 +0200
Subject: [PATCH]  * Better error message.  * Remove vlan-part of config.  *
 Simplify.

---
 clients/zyxelng.pl | 41 +++++------------------------------------
 1 file changed, 5 insertions(+), 36 deletions(-)

diff --git a/clients/zyxelng.pl b/clients/zyxelng.pl
index e41f657..3d02996 100644
--- a/clients/zyxelng.pl
+++ b/clients/zyxelng.pl
@@ -16,14 +16,13 @@ use nms qw(switch_connect switch_exec);
 
 #nms::ios_close($t);
 
-my $oldip;
-my $newip;
 if ($#ARGV < 1) {
-	die "Foo $#ARGV";
+	die "Not enough arguments to zyxelng.pl $#ARGV";
 }
 
-$oldip = $ARGV[0];
-$newip = $ARGV[1];
+my $oldip = $ARGV[0];
+my $newip = $ARGV[1];
+#$switchname = $ARGV[2];
 
 my $one = 0;
 
@@ -38,39 +37,9 @@ my $switch = switch_connect($switchip)
 my $cmds1 = <<EOF
 sys hostname es-3024
 ip igmpsnoop enable
-
-sys sw vlan type 802.1q
-sys sw vlan1q svlan setentry MNGT 248 25 fixed tag
-sys sw vlan1q svlan active 248
-sys sw vlan1q svlan setentry e01-1sw 1 25 fixed untag
-
-sys sw vlan1q svlan setentry MNGT 248 1 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 2 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 3 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 4 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 5 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 6 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 7 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 8 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 9 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 10 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 11 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 12 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 13 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 14 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 15 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 16 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 17 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 18 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 19 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 20 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 21 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 22 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 23 forbidden tag
-sys sw vlan1q svlan setentry MNGT 248 24 forbidden tag
 EOF
 ;
-#
+
 foreach (split(/\n+/, $cmds1)) {
 	print "Sending: '$_'\n";
 	switch_exec($_, $switch);
-- 
2.39.2