135/snmp-info
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

return proper VLAN IDs for Juniper

Browse Source
This commit is contained in:
Justin Hunter
2016-09-09 14:45:33 -07:00
parent e35faee278
commit d719e240d2
1 changed files with 16 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
Info/Layer3/Juniper.pm
View File

@@ -256,6 +256,22 @@ sub _vlan_hoa {
return $vlan_hoa;
}
sub qb_fw_vlan {
my $juniper = shift;
my $qb_fw_vlan = $juniper->SUPER::qb_fw_vlan();
my $jnxL2aldVlanFdbId = $juniper->jnxL2aldVlanFdbId();
my $jnxL2aldVlanTag = $juniper->jnxL2aldVlanTag();
my %fdb_id_to_tag = reverse %$jnxL2aldVlanFdbId;
foreach my $key (keys %$qb_fw_vlan) {
my $v = $qb_fw_vlan->{$key};
$qb_fw_vlan->{$key} = $jnxL2aldVlanTag->{$fdb_id_to_tag{$v}};
}
return $qb_fw_vlan;
}
# Pseudo ENTITY-MIB methods
# This class supports both virtual chassis (stackable) and physical chassis