Scroll to navigation

SNMP::Info::IEEE802_Bridge(3pm) User Contributed Perl Documentation SNMP::Info::IEEE802_Bridge(3pm)

NAME

SNMP::Info::IEEE802_Bridge - SNMP Interface to SNMP data available through the IEEE8021-Q-BRIDGE-MIB

AUTHOR

Jeroen van Ingen

SYNOPSIS

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";
 }

DESCRIPTION

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(...);

Inherited Classes

None.

Required MIBs

GLOBALS

These are methods that return scalar values from SNMP

TABLE METHODS

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

Per-port VLAN configuration in the device ("ieee8021QBridgePortVlanTable")

$bridge->iqb_i_vlan()
("ieee8021QBridgePvid")
$bridge->iqb_i_vlan_type()
("ieee8021QBridgePortAcceptableFrameTypes")
$bridge->iqb_i_vlan_in_flt()
("ieee8021QBridgePortIngressFiltering")

VLAN Current Table ("ieee8021QBridgeVlanCurrentTable")

$bridge->iqb_cv_egress()
("ieee8021QBridgeVlanCurrentEgressPorts")
$bridge->iqb_cv_untagged()
("ieee8021QBridgeVlanCurrentUntaggedPorts")
$bridge->iqb_cv_stat()
("ieee8021QBridgeVlanStatus")

VLAN Static Table ("ieee8021QBridgeVlanStaticTable")

$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")

2023-09-30 perl v5.36.0