Fix typos in i_vlan(), ignore VirtualRouter interfaces
This commit is contained in:
@@ -203,7 +203,7 @@ sub i_ignore {
|
|||||||
my %i_ignore;
|
my %i_ignore;
|
||||||
foreach my $if ( keys %$i_description ) {
|
foreach my $if ( keys %$i_description ) {
|
||||||
if ( $i_description->{$if}
|
if ( $i_description->{$if}
|
||||||
=~ /^(802.1Q Encapsulation Tag \d+|VLAN \d+|lo\d+)/i )
|
=~ /^(802.1Q Encapsulation Tag \d+|VLAN \d+|lo\d+|VirtualRouter\d+)/i )
|
||||||
{
|
{
|
||||||
$i_ignore{$if}++;
|
$i_ignore{$if}++;
|
||||||
}
|
}
|
||||||
@@ -386,15 +386,15 @@ sub i_vlan {
|
|||||||
|
|
||||||
# Some devices support Q-Bridge, if so short circuit and return it
|
# Some devices support Q-Bridge, if so short circuit and return it
|
||||||
my $q_bridge = $extreme->SUPER::i_vlan($partial);
|
my $q_bridge = $extreme->SUPER::i_vlan($partial);
|
||||||
return $q_bridge if (keys $q_bridge);
|
return $q_bridge if (keys %$q_bridge);
|
||||||
|
|
||||||
# Next we try extremeVlanOpaqueTable
|
# Next we try extremeVlanOpaqueTable
|
||||||
my $xos = $extreme->xos_i_vlan($partial);
|
my $xos = $extreme->xos_i_vlan($partial);
|
||||||
return $xos if (keys $xos);
|
return $xos if (keys %$xos);
|
||||||
|
|
||||||
# Try older ifStack method
|
# Try older ifStack method
|
||||||
my $extremeware = $extreme->extremeware_i_vlan($partial);
|
my $extremeware = $extreme->extremeware_i_vlan($partial);
|
||||||
return $extremeware if (keys $extremeware);
|
return $extremeware if (keys %$extremeware);
|
||||||
|
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user