Make some config stuff for Net.

diff --git a/config/make-port-config.pl b/config/make-port-config.pl
new file mode 100644 (file)
index 0000000..769c580
--- /dev/null
+++ b/config/make-port-config.pl
@@ -0,0 +1,65 @@
+#! /usr/bin/perl
+open PATCHLIST, "<patchlist.txt"
+       or die "patchlist.txt: $!";
+my %distros = ();
+
+while (<PATCHLIST>) {
+       chomp;
+       my ($name, $distro, $port) = split / /;
+
+       $name =~ /e(\d+)-(\d+)/;
+       my ($row, $switch) = ($1, $2);
+
+       my $ip;
+       if ($switch == 1) {
+               $ip = "87.76." . ($row - 1) . "1";
+       } elsif ($switch == 2) {
+               $ip = "87.76." . ($row - 1) . "65";
+       } elsif ($switch == 3) {
+               $ip = "87.76." . ($row - 1) . "129";
+       } elsif ($switch == 4) {
+               $ip = "87.76." . $row . "1";
+       } elsif ($switch == 5) {
+               $ip = "87.76." . $row . "65";
+       } elsif ($switch == 6) {
+               $ip = "87.76." . $row . "129";
+       }
+
+       my $vlan = "$row$switch";
+
+       $distros{$distro} .= <<"EOF";
+vlan $vlan
+  name $name
+!
+default interface vlan $vlan
+interface $vlan
+  description $name
+  ip address $ip 255.255.255.192
+  ip directed-broadcast 10
+  ip helper-address 87.76.254.2
+  no ip proxy-arp
+  no shutdown
+!
+ 
+default interface $port
+interface $port
+ description $name
+ switchport mode access
+ switchport access vlan $vlan
+
+ spanning-tree portfast
+ spanning-tree bpduguard enable
+
+ ip igmp snooping
+ storm-control broadcast level 2
+ no shutdown
+
+EOF
+}
+
+for my $distro (keys %distros) {
+       open DISTRO, ">$distro-config"
+               or die "$distro-config: $!";
+       print DISTRO $distros{$distro};
+       close DISTRO;
+}

diff --git a/make-all-config.sh b/make-all-config.sh
index 5a8c893f8809469f915e8ccab04bbc5e3a5a950a..b97e04377de5a78b900c063af3e53c369afd21e3 100755 (executable)
--- a/make-all-config.sh
+++ b/make-all-config.sh
@@ -6,4 +6,4 @@ cat static-switches.txt >> switches.txt
 ./config/make-named-secondary.pl | ssh root@insert 'cat > /etc/bind/named.conf'
 ./config/make-missing-zones.pl
 (cd mbd && ./generate-helper-list.pl > ../mbd-ports)
-scp mbd-ports sesse@f1:/tftpboot/portcfg/
+scp mbd-ports *-config sesse@f1:/tftpboot/portcfg/

diff --git a/static-switches.txt b/static-switches.txt
index 78f32bb960a196bd138e1d175b80b193dd3915c2..5fdf2456fdcddabbb7bd1a1def2c834ca1b66336 100644 (file)
--- a/static-switches.txt
+++ b/static-switches.txt
@@ -8,7 +8,7 @@
 87.76.205.0 24 infodesk-inngang
 87.76.206.0 24 crewcare
 87.76.207.0 24 auditorium
-87.76.208.0 24 billettbu
+87.76.208.0 24 ute
 87.76.209.0 24 infodesk
 87.76.210.0 24 game-server
 87.76.212.0 24 game-client