Merge branch 'em-autoload-topo'
Conflicts: ChangeLog
This commit is contained in:
@@ -53,8 +53,9 @@ $VERSION = '2.09';
|
||||
|
||||
%GLOBALS = ( %SNMP::Info::Layer3::GLOBALS,
|
||||
%SNMP::Info::LLDP::GLOBALS,
|
||||
'serial' => 'jnxBoxSerialNo.0',
|
||||
'mac' => 'dot1dBaseBridgeAddress',
|
||||
'serial' => 'jnxBoxSerialNo.0',
|
||||
'mac' => 'dot1dBaseBridgeAddress',
|
||||
'box_descr' => 'jnxBoxDescr'
|
||||
);
|
||||
|
||||
%FUNCS = ( %SNMP::Info::Layer3::FUNCS,
|
||||
@@ -248,49 +249,6 @@ sub fw_port {
|
||||
return $juniper->qb_fw_port($partial);
|
||||
}
|
||||
|
||||
# Use LLDP
|
||||
|
||||
sub hasCDP {
|
||||
my $juniper = shift;
|
||||
|
||||
return $juniper->hasLLDP();
|
||||
}
|
||||
|
||||
sub c_ip {
|
||||
my $juniper = shift;
|
||||
my $partial = shift;
|
||||
|
||||
return $juniper->lldp_ip($partial);
|
||||
}
|
||||
|
||||
sub c_if {
|
||||
my $juniper = shift;
|
||||
my $partial = shift;
|
||||
|
||||
return $juniper->lldp_if($partial);
|
||||
}
|
||||
|
||||
sub c_port {
|
||||
my $juniper = shift;
|
||||
my $partial = shift;
|
||||
|
||||
return $juniper->lldp_port($partial);
|
||||
}
|
||||
|
||||
sub c_id {
|
||||
my $juniper = shift;
|
||||
my $partial = shift;
|
||||
|
||||
return $juniper->lldp_id($partial);
|
||||
}
|
||||
|
||||
sub c_platform {
|
||||
my $juniper = shift;
|
||||
my $partial = shift;
|
||||
|
||||
return $juniper->lldp_rem_sysdesc($partial);
|
||||
}
|
||||
|
||||
# Pseudo ENTITY-MIB methods
|
||||
|
||||
# This class supports both virtual chassis (stackable) and physical chassis
|
||||
@@ -406,7 +364,7 @@ sub e_descr {
|
||||
my $juniper = shift;
|
||||
|
||||
my $e_index = $juniper->e_index() || {};
|
||||
my $box_descr = $juniper->jnxBoxDescr || 0;
|
||||
my $box_descr = $juniper->box_descr;
|
||||
my $contents = $juniper->jnxContentsDescr() || {};
|
||||
my $containers = $juniper->jnxContainersDescr() || {};
|
||||
|
||||
@@ -663,16 +621,18 @@ Returns serial number
|
||||
|
||||
(C<jnxBoxSerialNo.0>)
|
||||
|
||||
=item $juniper->serial()
|
||||
=item $juniper->mac()
|
||||
|
||||
Returns the MAC address used by this bridge when it must be referred
|
||||
to in a unique fashion.
|
||||
|
||||
(C<dot1dBaseBridgeAddress>)
|
||||
|
||||
=item $juniper->hasCDP()
|
||||
=item $juniper->box_descr()
|
||||
|
||||
Returns whether LLDP is enabled.
|
||||
The name, model, or detailed description of the device.
|
||||
|
||||
(C<jnxBoxDescr.0>)
|
||||
|
||||
=back
|
||||
|
||||
@@ -718,35 +678,6 @@ IDs. These are the VLANs which are members of the egress list for the port.
|
||||
|
||||
=back
|
||||
|
||||
=head2 Topology information
|
||||
|
||||
These methods return Link Layer Discovery Protocol (LLDP) information. See
|
||||
documentation in L<SNMP::Info::LLDP/"TABLE METHODS"> for details.
|
||||
|
||||
=over
|
||||
|
||||
=item $juniper->c_id()
|
||||
|
||||
Returns C<lldp_id>
|
||||
|
||||
=item $juniper->c_if()
|
||||
|
||||
Returns C<lldp_if>
|
||||
|
||||
=item $juniper->c_ip()
|
||||
|
||||
Returns C<lldp_ip>
|
||||
|
||||
=item $juniper->c_platform()
|
||||
|
||||
Returns C<lldp_rem_sysdesc>
|
||||
|
||||
=item $juniper->c_port()
|
||||
|
||||
Returns C<lldp_port>
|
||||
|
||||
=back
|
||||
|
||||
=head2 Forwarding Table (C<dot1dTpFdbEntry>)
|
||||
|
||||
=over
|
||||
|
||||
Reference in New Issue
Block a user