SNMP::Info::IEEE802_Bridge - SNMP Interface to SNMP data available through the
IEEE8021-Q-BRIDGE-MIB
FIXME update with better example
my $bridge = new SNMP::Info (
AutoSpecify => 1,
Debug => 1,
DestHost => 'switch',
Community => 'public',
Version => 2
);
my $class = $bridge->class();
print " Using device sub class : $class\n";
# Grab Forwarding Tables
my $interfaces = $bridge->interfaces();
my $fw_mac = $bridge->fw_mac();
my $fw_port = $bridge->fw_port();
my $bp_index = $bridge->bp_index();
foreach my $fw_index (keys %$fw_mac){
my $mac = $fw_mac->{$fw_index};
my $bp_id = $fw_port->{$fw_index};
my $iid = $bp_index->{$bp_id};
my $port = $interfaces->{$iid};
print "Port:$port forwarding to $mac\n";
}
IEEE8021-Q-BRIDGE-MIB is used by some newer switches / Layer 2 devices.
It is derived from the IETF Q-BRIDGE-MIB (RFC 4363), extending it with the
concept of multiple VLAN-aware bridges (PBB).
Create or use a subclass of SNMP::Info that inherits this class.
Do not use directly.
For debugging you can call new() directly as you would in
SNMP::Info
my $bridge = new SNMP::Info::IEEE802_Bridge(...);
These are methods that return scalar values from SNMP
These are methods that return tables of information in the form of a reference
to a hash.
- $bridge->iqb_i_vlan()
- ("ieee8021QBridgePvid")
- $bridge->iqb_i_vlan_type()
- ("ieee8021QBridgePortAcceptableFrameTypes")
- $bridge->iqb_i_vlan_in_flt()
- ("ieee8021QBridgePortIngressFiltering")
- $bridge->iqb_cv_egress()
- ("ieee8021QBridgeVlanCurrentEgressPorts")
- $bridge->iqb_cv_untagged()
- ("ieee8021QBridgeVlanCurrentUntaggedPorts")
- $bridge->iqb_cv_stat()
- ("ieee8021QBridgeVlanStatus")
- $bridge->iqb_v_name()
- ("ieee8021QBridgeVlanStaticName")
- $bridge->iqb_v_egress()
- ("ieee8021QBridgeVlanStaticEgressPorts")
- $bridge->iqb_v_fbdn_egress()
- ("ieee8021QBridgeVlanForbiddenEgressPorts")
- $bridge->iqb_v_untagged()
- ("ieee8021QBridgeVlanStaticUntaggedPorts")
- $bridge->iqb_v_stat()
- "active" !
("ieee8021QBridgeVlanStaticRowStatus")