[rancid] clutter with DHCP Snooping or VMPS

[Václav Ovsík]

Hi,
I have a small mod for Rancid 3.4.1 for
* DHCP snooping - everchanging file in NVRAM
* VMPS active - everchanging VLAN port assignment

--- ios.pm.orig 2016-05-18 08:09:10.000000000 +0200
+++ ios.pm 2016-06-15 13:24:26.268000000 +0200
@@ -976,7 +976,7 @@
# to:
# vlan.dat
# vlan.dat
- if (/(dhcp_[^. ]*\.txt|vlan\.dat|sflog|syslog)\s*$/) {
+ if (/(dhcp_[^. ]*\.txt|vlan\.dat|sflog|snooping|syslog)\s*$/) {
if (/(\s*\d+)(\s+[-rwx]+\s+)(\d+)(\s+)(\w+ \d+\s+\d+ \d+:\d+:\d+ .\d+:\d+)/) {
my($fn, $a, $sz, $c, $dt, $rem) = ($1, $2, $3, $4, $5, $');
my($fnl, $szl, $dtl) = (length($fn), length($sz), length($dt));
@@ -1950,6 +1950,8 @@

($_ = <$INPUT>, return(1)) if ($DO_SHOW_VLAN);

+ my $ports_column = undef;
+
while (<$INPUT>) {
tr/\015//d;
last if (/^$prompt/);
@@ -1980,6 +1982,17 @@

next if (/total.*packets.*(input|output)/i);

+ if ( m/^VLAN\s+Name\s+Status\s+Ports$/ ) {
+ $ports_column = index($_, 'Ports');
+ } elsif ( m/^[^-0-9 ]/ ) {
+ undef $ports_column;
+ }
+ if ( defined $ports_column ) {
+ $_ = substr($_, 0, $ports_column);
+ next if m/^\s*$/;
+ $_ .= "\n";
+ }
+
ProcessHistory("COMMENTS","keysort","IO","!VLAN: $_");
}
OUT:ProcessHistory("COMMENTS","keysort","IO","!\n");


Maybe usable for someone.