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

remove root_ip()

Browse Source
This commit is contained in:
Eric Miller
2006-04-05 02:34:19 +00:00
parent 55b2a27f40
commit 23eb3b596d
1 changed files with 2 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
Info/Layer3/AlteonAD.pm
View File

@@ -249,21 +249,6 @@ sub bp_index {
return \%bp_index; return \%bp_index;
} }
sub root_ip {
my $alteon = shift;
my $ip_table = $alteon->ip_table();
# Return First IP Address
foreach my $entry (keys %$ip_table){
my $router_ip = $ip_table->{$entry};
print " SNMP::Layer3::AlteonAD::root_ip() using $router_ip\n" if $alteon->debug();
next unless $router_ip;
return $router_ip if ($router_ip ne '0.0.0.0');
}
return undef;
}
1; 1;
__END__ __END__
@@ -350,21 +335,16 @@ Returns the model extracted from B<sysDescr>
=item $alteon->vendor() =item $alteon->vendor()
Returns 'Nortel' Returns 'nortel'
=item $alteon->os() =item $alteon->os()
Returns 'WebOS' Returns 'webos'
=item $alteon->os_ver() =item $alteon->os_ver()
Returns the software version reported by B<agSoftwareVersion> Returns the software version reported by B<agSoftwareVersion>
=item $alteon->root_ip()
Returns the primary IP used to communicate with the device. Currently returns
the first interfaces IP.
=item $alteon->tftp_action() =item $alteon->tftp_action()
(B<agTftpAction>) (B<agTftpAction>)