NAME

       SNMP::Info::CDP - SNMP Interface to Cisco Discovery Protocol (CDP) using SNMP

AUTHOR

       Max Baker

SYNOPSIS

        my $cdp = new SNMP::Info (
                                    AutoSpecify => 1,
                                    Debug       => 1,
                                    DestHost    => 'router',
                                    Community   => 'public',
                                    Version     => 2
                                  );

        my $class = $cdp->class();
        print " Using device sub class : $class\n";

        $hascdp   = $cdp->hasCDP() ? 'yes' : 'no';

        # Print out a map of device ports with CDP neighbors:
        my $interfaces = $cdp->interfaces();
        my $cdp_if       = $cdp->cdp_if();
        my $cdp_ip       = $cdp->cdp_ip();
        my $cdp_port     = $cdp->cdp_port();

        foreach my $cdp_key (keys %$cdp_ip){
           my $iid           = $cdp_if->{$cdp_key};
           my $port          = $interfaces->{$iid};
           my $neighbor      = $cdp_ip->{$cdp_key};
           my $neighbor_port = $cdp_port->{$cdp_key};
           print "Port : $port connected to $neighbor / $neighbor_port\n";
        }

DESCRIPTION

       SNMP::Info::CDP is a subclass of SNMP::Info that provides an object oriented interface to
       CDP information through SNMP.

       CDP is a Layer 2 protocol that supplies topology information of devices that also speak
       CDP, mostly switches and routers.  CDP is implemented in Cisco and some HP 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.

   Inherited Classes
       None.

   Required MIBs
       CISCO-CDP-MIB

       MIBs can be found at ftp://ftp.cisco.com/pub/mibs/v2/v2.tar.gz

GLOBAL METHODS

       These are methods that return scalar values from SNMP

       $cdp->hasCDP()
           Is CDP is active in this device?

           Accounts for SNMP version 1 devices which may have CDP but not cdp_run()

       $cdp->cdp_run()
           Is CDP enabled on this device?  Note that a lot of Cisco devices that implement CDP
           don't implement this value. @#%$!

           ("cdpGlobalRun")

       $cdp->cdp_interval()
           Interval in seconds at which CDP messages are generated.

           ("cdpGlobalMessageInterval")

       $cdp->cdp_holdtime()
           Time in seconds that CDP messages are kept.

           ("cdpGlobalHoldTime")

       $cdp->cdp_gid()
           Returns CDP device ID.

           This is the device id broadcast via CDP to other devices, and is what is retrieved
           from remote devices with $cdp->id().

           ("cdpGlobalDeviceId")

TABLE METHODS

       These are methods that return tables of information in the form of a reference to a hash.

   CDP CACHE ENTRIES
       $cdp->cdp_capabilities()
           Returns Device Functional Capabilities.  Results are munged into an ascii binary
           string, MSB.  Each digit represents a bit from the table below from the CDP
           Capabilities Mapping to Smartport Type table within the Cisco Small Business 200
           Series Smart Switch Administration Guide,
           <http://www.cisco.com/c/en/us/support/switches/small-business-200-series-smart-switches/products-maintenance-guides-list.html>:

           (Bit) - Description

           (0x400) - Two-Port MAC Relay.
           (0x200) - CAST Phone Port / CVTA / Supports-STP-Dispute depending upon platform.
           (0x100) - Remotely-Managed Device.
           (0x80)  - VoIP Phone.
           (0x40)  - Provides level 1 functionality.
           (0x20)  - The bridge or switch does not forward IGMP Report packets on non router
           ports.
           (0x10)  - Sends and receives packets for at least one network layer protocol. If the
           device is routing the protocol, this bit should not be set.
           (0x08)  - Performs level 2 switching. The difference between this bit and bit 0x02 is
           that a switch does not run the Spanning-Tree Protocol. This device is assumed to be
           deployed in a physical loop-free topology.
           (0x04)  - Performs level 2 source-route bridging. A source-route bridge would set both
           this bit and bit 0x02.
           (0x02)  - Performs level 2 transparent bridging.
           (0x01)  - Performs level 3 routing for at least one network layer protocol.

           Thanks to Martin Lorensen for a pointer to the original information and CPAN user Alex
           for updates.

           ("cdpCacheCapabilities")

       $cdp->cdp_domain()
           Returns remote VTP Management Domain as defined in
           "CISCO-VTP-MIB::managementDomainName"

           ("cdpCacheVTPMgmtDomain")

       $cdp->cdp_duplex()
           Returns the port duplex status from remote devices.

           ("cdpCacheDuplex")

       $cdp->cdp_id()
           Returns remote device id string

           ("cdpCacheDeviceId")

       $cdp->cdp_if()
           Returns the mapping to the SNMP Interface Table.

           Note that a lot devices don't implement $cdp->cdp_index(),  So if it isn't around, we
           fake it.

           In order to map the cdp table entry back to the interfaces() entry, we truncate the
           last number off of it :

             # it exists, yay.
             my $cdp_index     = $device->cdp_index();
             return $cdp_index if defined $cdp_index;

             # if not, let's fake it
             my $cdp_ip       = $device->cdp_ip();

             my %cdp_if
             foreach my $key (keys %$cdp_ip){
                 $iid = $key;
                 ## Truncate off .1 from cdp response
                 $iid =~ s/\.\d+$//;
                 $cdp_if{$key} = $iid;
             }

             return \%cdp_if;

       $cdp->cdp_index()
           Returns the mapping to the SNMP2 Interface table for CDP Cache Entries.

           Most devices don't implement this, so you probably want to use $cdp->cdp_if() instead.

           See cdp_if() entry.

           ("cdpCacheIfIndex")

       $cdp->cdp_ip()
           If $cdp->cdp_proto() is supported, returns remote IPV4 address only.  Otherwise it
           will return all addresses.

           ("cdpCacheAddress")

       $cdp->cdp_addr()
           Returns remote address

           ("cdpCacheAddress")

       $cdp->cdp_platform()
           Returns remote platform id

           ("cdpCachePlatform")

       $cdp->cdp_port()
           Returns remote port ID

           ("cdpDevicePort")

       $cdp->cdp_proto()
           Returns remote address type received.  Usually IP.

           ("cdpCacheAddressType")

       $cdp->cdp_ver()
           Returns remote hardware version

           ("cdpCacheVersion")

       $cdp->cdp_vlan()
           Returns the remote interface native VLAN.

           ("cdpCacheNativeVLAN")

       $cdp->cdp_power()
           Returns the amount of power consumed by remote device in milliwatts munged for decimal
           placement.

           ("cdpCachePowerConsumption")

       $cdp->cdp_cap()
           Returns hash of arrays with each array containing the system capabilities supported by
           the remote system.  Possible elements in the array are "Router", "Trans-Bridge",
           "Source-Route-Bridge", "Switch", "Host", "IGMP", "Repeater", "VoIP-Phone",
           "Remotely-Managed-Device", "Supports-STP-Dispute", and "Two-port Mac Relay".

Data Munging Callback Subroutines

       $cdp->munge_power()
           Inserts a decimal at the proper location.