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

change from Ipv6 to IPv6 everywhere

Browse Source
This commit is contained in:
Oliver Gorwits
2011-03-31 08:04:52 +00:00
parent e8612e3779
commit 1df1bda641
3 changed files with 24 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Info.pm
View File

@@ -333,13 +333,13 @@ Foundry Discovery Protocol. F<FOUNDRY-SN-SWITCH-GROUP-MIB>
See documentation in L<SNMP::Info::FDP> for details.
=item SNMP::Info::Ipv6
=item SNMP::Info::IPv6
SNMP Interface for obtaining configured IPv6 addresses and mapping IPv6
addresses to MACs and interfaces, using information from F<IP-MIB>,
F<IPV6-MIB> and/or F<CISCO-IETF-IP-MIB>.
See documentation in L<SNMP::Info::Ipv6> for details.
See documentation in L<SNMP::Info::IPv6> for details.
=item SNMP::Info::IEEE802dot11

24
Info/Ipv6.pm
View File

@@ -1,4 +1,4 @@
# SNMP::Info::Ipv6
# SNMP::Info::IPv6
#
# Copyright (c) 2010 Jeroen van Ingen and Carlos Vicente
# All rights reserved.
@@ -27,14 +27,14 @@
# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
package SNMP::Info::Ipv6;
package SNMP::Info::IPv6;
use strict;
use Exporter;
use SNMP::Info;
@SNMP::Info::Ipv6::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::Ipv6::EXPORT_OK = qw//;
@SNMP::Info::IPv6::ISA = qw/SNMP::Info Exporter/;
@SNMP::Info::IPv6::EXPORT_OK = qw//;
use vars qw/$VERSION %MIBS %FUNCS %GLOBALS %MUNGE $METHOD/;
@@ -104,7 +104,7 @@ sub ipv6_n2p_mac {
my $ifindex = $1; my $addrtype = $2; my $addrsize = $3; my $v6addr = $4;
if ($info::METHOD == IPV6MIB) {
# IPV6-MIB doesn't include the addrtype in the index;
# also, address syntax is Ipv6Address (fixed 16 bytes) and not InetAddress (length field followed by address bytes)
# also, address syntax is IPv6Address (fixed 16 bytes) and not InetAddress (length field followed by address bytes)
$v6addr = join('.', $addrtype, $addrsize, $v6addr);
$addrtype = 2;
}
@@ -131,7 +131,7 @@ sub ipv6_n2p_addr {
my $ifindex = $1; my $addrtype = $2; my $addrsize = $3; my $v6addr = $4;
if ($info::METHOD == IPV6MIB) {
# IPV6-MIB doesn't include the addrtype in the index;
# also, address syntax is Ipv6Address (fixed 16 bytes) and not InetAddress (length field followed by address bytes)
# also, address syntax is IPv6Address (fixed 16 bytes) and not InetAddress (length field followed by address bytes)
$v6addr = join('.', $addrtype, $addrsize, $v6addr);
$addrtype = 2;
}
@@ -160,7 +160,7 @@ sub ipv6_n2p_if {
my $ifindex = $1; my $addrtype = $2; my $addrsize = $3; my $v6addr = $4;
if ($info::METHOD == IPV6MIB) {
# IPV6-MIB doesn't include the addrtype in the index;
# also, address syntax is Ipv6Address (fixed 16 bytes) and not InetAddress (length field followed by address bytes)
# also, address syntax is IPv6Address (fixed 16 bytes) and not InetAddress (length field followed by address bytes)
$v6addr = join('.', $addrtype, $addrsize, $v6addr);
$addrtype = 2;
}
@@ -187,7 +187,7 @@ sub ipv6_n2p_type {
my $ifindex = $1; my $addrtype = $2; my $addrsize = $3; my $v6addr = $4;
if ($info::METHOD == IPV6MIB) {
# IPV6-MIB doesn't include the addrtype in the index;
# also, address syntax is Ipv6Address (fixed 16 bytes) and not InetAddress (length field followed by address bytes)
# also, address syntax is IPv6Address (fixed 16 bytes) and not InetAddress (length field followed by address bytes)
$v6addr = join('.', $addrtype, $addrsize, $v6addr);
$addrtype = 2;
}
@@ -214,7 +214,7 @@ sub ipv6_n2p_state {
my $ifindex = $1; my $addrtype = $2; my $addrsize = $3; my $v6addr = $4;
if ($info::METHOD == IPV6MIB) {
# IPV6-MIB doesn't include the addrtype in the index;
# also, address syntax is Ipv6Address (fixed 16 bytes) and not InetAddress (length field followed by address bytes)
# also, address syntax is IPv6Address (fixed 16 bytes) and not InetAddress (length field followed by address bytes)
$v6addr = join('.', $addrtype, $addrsize, $v6addr);
$addrtype = 2;
}
@@ -360,7 +360,7 @@ __END__
=head1 NAME
SNMP::Info::Ipv6 - SNMP Interface for obtaining IPv6 addresses and IPv6
SNMP::Info::IPv6 - SNMP Interface for obtaining IPv6 addresses and IPv6
address mappings
=head1 AUTHOR
@@ -384,7 +384,7 @@ Jeroen van Ingen and Carlos Vicente
=head1 DESCRIPTION
The SNMP::Info::Ipv6 class implements functions to for mapping IPv6 addresses
The SNMP::Info::IPv6 class implements functions to for mapping IPv6 addresses
to MAC addresses, interfaces and more. It will use data from the IP-MIB, IPV6-MIB
or the CISCO-IETF-IP-MIB, whichever is supported by the device.
@@ -394,7 +394,7 @@ device classes.
For debugging purposes you can call this class directly as you would
SNMP::Info
my $info = new SNMP::Info::Ipv6 (...);
my $info = new SNMP::Info::IPv6 (...);
=head2 Inherited Classes

20
Info/Layer3.pm
View File

@@ -39,10 +39,10 @@ use SNMP::Info::Bridge;
use SNMP::Info::EtherLike;
use SNMP::Info::Entity;
use SNMP::Info::PowerEthernet;
use SNMP::Info::Ipv6;
use SNMP::Info::IPv6;
@SNMP::Info::Layer3::ISA = qw/
SNMP::Info::PowerEthernet SNMP::Info::Ipv6
SNMP::Info::PowerEthernet SNMP::Info::IPv6
SNMP::Info::Entity SNMP::Info::EtherLike
SNMP::Info::Bridge SNMP::Info Exporter/;
@SNMP::Info::Layer3::EXPORT_OK = qw//;
@@ -57,7 +57,7 @@ $VERSION = '2.02-cvs';
%SNMP::Info::EtherLike::MIBS,
%SNMP::Info::Entity::MIBS,
%SNMP::Info::PowerEthernet::MIBS,
%SNMP::Info::Ipv6::MIBS,
%SNMP::Info::IPv6::MIBS,
'IP-MIB' => 'ipNetToMediaIfIndex',
'OSPF-MIB' => 'ospfRouterId',
'BGP4-MIB' => 'bgpIdentifier',
@@ -71,7 +71,7 @@ $VERSION = '2.02-cvs';
%SNMP::Info::EtherLike::GLOBALS,
%SNMP::Info::Entity::GLOBALS,
%SNMP::Info::PowerEthernet::GLOBALS,
%SNMP::Info::Ipv6::GLOBALS,
%SNMP::Info::IPv6::GLOBALS,
'mac' => 'ifPhysAddress.1',
'serial1' =>
'.1.3.6.1.4.1.9.3.6.3.0', # OLD-CISCO-CHASSIS-MIB::chassisId.0
@@ -86,7 +86,7 @@ $VERSION = '2.02-cvs';
%SNMP::Info::EtherLike::FUNCS,
%SNMP::Info::Entity::FUNCS,
%SNMP::Info::PowerEthernet::FUNCS,
%SNMP::Info::Ipv6::FUNCS,
%SNMP::Info::IPv6::FUNCS,
# Obsolete Address Translation Table (ARP Cache)
'old_at_index' => 'atIfIndex',
@@ -143,7 +143,7 @@ $VERSION = '2.02-cvs';
%SNMP::Info::EtherLike::MUNGE,
%SNMP::Info::Entity::MUNGE,
%SNMP::Info::PowerEthernet::MUNGE,
%SNMP::Info::Ipv6::MUNGE,
%SNMP::Info::IPv6::MUNGE,
'old_at_paddr' => \&SNMP::Info::munge_mac,
'at_paddr' => \&SNMP::Info::munge_mac,
'n2p_paddr' => \&SNMP::Info::munge_mac,
@@ -402,7 +402,7 @@ after determining a more specific class using the method above.
=item SNMP::Info::PowerEthernet
=item SNMP::Info::Ipv6
=item SNMP::Info::IPv6
=back
@@ -430,7 +430,7 @@ See L<SNMP::Info::Entity/"Required MIBs"> for its MIB requirements.
See L<SNMP::Info::PowerEthernet/"Required MIBs"> for its MIB requirements.
See L<SNMP::Info::Ipv6/"Required MIBs"> for its MIB requirements.
See L<SNMP::Info::IPv6/"Required MIBs"> for its MIB requirements.
=head1 GLOBALS
@@ -776,8 +776,8 @@ See L<SNMP::Info::Entity/"TABLE METHODS"> for details.
See L<SNMP::Info::PowerEthernet/"TABLE METHODS"> for details.
=head2 Table Methods imported from SNMP::Info::Ipv6
=head2 Table Methods imported from SNMP::Info::IPv6
See L<SNMP::Info::Ipv6/"TABLE METHODS"> for details.
See L<SNMP::Info::IPv6/"TABLE METHODS"> for details.
=cut