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

#61 ZyXEL (X)GS1900 family MIB

Browse Source 
Fix loop in Layer2::ZyXEL_DSLAM layers method
Add  Layer2::ZyXEL_DSLAM test class
This commit is contained in:
Eric A. Miller
2018-04-05 23:01:48 -04:00
parent 0755487e02
commit 66f16f6617
2 changed files with 118 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lib/SNMP/Info/Layer2/ZyXEL_DSLAM.pm
View File

@@ -46,7 +46,7 @@ $VERSION = '3.54';
%FUNCS = (
%SNMP::Info::Layer2::FUNCS,
'ip_adresses' => 'ipAdEntAddr',
'ip_addresses' => 'ipAdEntAddr',
'i_name' => 'ifDescr',
'i_description' => 'adslLineConfProfile',
);
@@ -58,7 +58,7 @@ $VERSION = '3.54';
sub layers {
my $zyxel = shift;
my $layers = $zyxel->layers();
my $layers = $zyxel->SUPER::layers();
return $layers if defined $layers;
# If these don't claim to have any layers, so we'll give them 1+2
@@ -102,7 +102,9 @@ sub ip {
my $ip_hash = $zyxel->ip_addresses();
my $found_ip;
foreach my $ip ( keys %{$ip_hash} ) {
# Since hashes are random add sort so we get the same address each time
# if there happens to be more than one. Will return highest numbered address
foreach my $ip ( sort keys %{$ip_hash} ) {
$found_ip = $ip
if ( defined $ip
and $ip =~ /\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ );