SNMP::Info::FDP - SNMP Interface to Foundry Discovery Protocol (FDP) using SNMP
Bruce Rodger, Max Baker
my $fdp = new SNMP::Info ( AutoSpecify => 1, Debug => 1, DestHost => 'router', Community => 'public', Version => 2 ); my $class = $fdp->class(); print " Using device sub class : $class\n"; $hasfdp = $fdp->hasFDP() ? 'yes' : 'no'; # Print out a map of device ports with FDP neighbors: my $interfaces = $fdp->interfaces(); my $fdp_if = $fdp->fdp_if(); my $fdp_ip = $fdp->fdp_ip(); my $fdp_port = $fdp->fdp_port(); foreach my $fdp_key (keys %$fdp_ip){ my $iid = $fdp_if->{$fdp_key}; my $port = $interfaces->{$iid}; my $neighbor = $fdp_ip->{$fdp_key}; my $neighbor_port = $fdp_port->{$fdp_key}; print "Port : $port connected to $neighbor / $neighbor_port\n"; }
SNMP::Info::FDP is a subclass of SNMP::Info that provides an object oriented interface to FDP information through SNMP.
FDP is a Layer 2 protocol that supplies topology information of devices that also speak FDP, mostly switches and routers. It has similar functionality to Cisco's CDP, and the SNMP interface is virtually identical. FDP is implemented in Brocade (Foundry) devices.
Create or use a device subclass that inherits this class. Do not use directly.
Each device implements a subset of the global and cache entries. Check the return value to see if that data is held by the device.
None.
Needs a reasonably recent MIB. Works OK with B2R07604A.mib, but doesn't work with B2R07600C.
These are methods that return scalar values from SNMP
Is FDP is active in this device?
Accounts for SNMP version 1 devices which may have FDP but not fdp_run()
Is FDP enabled on this device?
(fdpGlobalRun)
fdpGlobalRun
Interval in seconds at which FDP messages are generated.
(fdpGlobalMessageInterval)
fdpGlobalMessageInterval
Time in seconds that FDP messages are kept.
(fdpGlobalHoldTime)
fdpGlobalHoldTime
Returns FDP device ID.
This is the device id broadcast via FDP to other devices, and is what is retrieved from remote devices with $fdp->id().
(fdpGlobalDeviceId)
fdpGlobalDeviceId
CDP compatibility
These are methods that return tables of information in the form of a reference to a hash.
Returns Device Functional Capabilities. Results are munged into an ascii binary string, MSB. Each digit represents a bit from the table below.
From http://www.cisco.com/univercd/cc/td/doc/product/lan/trsrb/frames.htm#18843:
(Bit) - Description
Thanks to Martin Lorensen for a pointer to this information.
(fdpCacheCapabilities)
fdpCacheCapabilities
The CDP version of this returns remote VTP Management Domain as defined in CISCO-VTP-MIB::managementDomainName
CISCO-VTP-MIB::managementDomainName
(fdpCacheVTPMgmtDomain)
fdpCacheVTPMgmtDomain
Returns the port duplex status from remote devices.
(fdpCacheDuplex)
fdpCacheDuplex
Returns remote device id string
(fdpCacheDeviceId)
fdpCacheDeviceId
Returns the mapping to the SNMP Interface Table.
Note that a lot devices don't implement $fdp->fdp_index(), So if it isn't around, we fake it.
In order to map the fdp table entry back to the interfaces() entry, we truncate the last number off of it :
# it exists, yay. my $fdp_index = $device->fdp_index(); return $fdp_index if defined $fdp_index; # if not, let's fake it my $fdp_ip = $device->fdp_ip(); my %fdp_if foreach my $key (keys %$fdp_ip){ $iid = $key; ## Truncate off .1 from fdp response $iid =~ s/\.\d+$//; $fdp_if{$key} = $iid; } return \%fdp_if;
Returns the mapping to the SNMP2 Interface table for FDP Cache Entries.
Most devices don't implement this, so you probably want to use $fdp->fdp_if() instead.
See fdp_if() entry.
(fdpCacheIfIndex)
fdpCacheIfIndex
Returns remote IP address
(fdpCacheAddress)
fdpCacheAddress
Returns remote platform id
(fdpCachePlatform)
fdpCachePlatform
Returns remote port ID
(fdpDevicePort)
fdpDevicePort
Returns remote address type received. Usually IP.
(fdpCacheAddressType)
fdpCacheAddressType
Returns remote hardware version
(fdpCacheVersion)
fdpCacheVersion
Returns the remote interface native VLAN.
(fdpCacheNativeVLAN)
fdpCacheNativeVLAN
To install SNMP::Info, copy and paste the appropriate command in to your terminal.
cpanm
cpanm SNMP::Info
CPAN shell
perl -MCPAN -e shell install SNMP::Info
For more information on module installation, please visit the detailed CPAN module installation guide.