1SNMP::Info::IEEE802_BriUdsgeer(3C)ontributed Perl DocumeSnNtMaPt:i:oInnfo::IEEE802_Bridge(3)
2
3
4
6 SNMP::Info::IEEE802_Bridge - SNMP Interface to SNMP data available
7 through the IEEE8021-Q-BRIDGE-MIB
8
10 Jeroen van Ingen
11
13 FIXME update with better example
14 my $bridge = new SNMP::Info (
15 AutoSpecify => 1,
16 Debug => 1,
17 DestHost => 'switch',
18 Community => 'public',
19 Version => 2
20 );
21
22 my $class = $bridge->class();
23 print " Using device sub class : $class\n";
24
25 # Grab Forwarding Tables
26 my $interfaces = $bridge->interfaces();
27 my $fw_mac = $bridge->fw_mac();
28 my $fw_port = $bridge->fw_port();
29 my $bp_index = $bridge->bp_index();
30
31 foreach my $fw_index (keys %$fw_mac){
32 my $mac = $fw_mac->{$fw_index};
33 my $bp_id = $fw_port->{$fw_index};
34 my $iid = $bp_index->{$bp_id};
35 my $port = $interfaces->{$iid};
36
37 print "Port:$port forwarding to $mac\n";
38 }
39
41 IEEE8021-Q-BRIDGE-MIB is used by some newer switches / Layer 2 devices.
42 It is derived from the IETF Q-BRIDGE-MIB (RFC 4363), extending it with
43 the concept of multiple VLAN-aware bridges (PBB).
44
45 Create or use a subclass of SNMP::Info that inherits this class. Do
46 not use directly.
47
48 For debugging you can call new() directly as you would in SNMP::Info
49
50 my $bridge = new SNMP::Info::IEEE802_Bridge(...);
51
52 Inherited Classes
53 None.
54
55 Required MIBs
56 IEEE8021-Q-BRIDGE-MIB
57
59 These are methods that return scalar values from SNMP
60
62 These are methods that return tables of information in the form of a
63 reference to a hash.
64
65 Per-port VLAN configuration in the device ("ieee8021QBridgePortVlanTable")
66 $bridge->iqb_i_vlan()
67 ("ieee8021QBridgePvid")
68
69 $bridge->iqb_i_vlan_type()
70 ("ieee8021QBridgePortAcceptableFrameTypes")
71
72 $bridge->iqb_i_vlan_in_flt()
73 ("ieee8021QBridgePortIngressFiltering")
74
75 VLAN Current Table ("ieee8021QBridgeVlanCurrentTable")
76 $bridge->iqb_cv_egress()
77 ("ieee8021QBridgeVlanCurrentEgressPorts")
78
79 $bridge->iqb_cv_untagged()
80 ("ieee8021QBridgeVlanCurrentUntaggedPorts")
81
82 $bridge->iqb_cv_stat()
83 ("ieee8021QBridgeVlanStatus")
84
85 VLAN Static Table ("ieee8021QBridgeVlanStaticTable")
86 $bridge->iqb_v_name()
87 ("ieee8021QBridgeVlanStaticName")
88
89 $bridge->iqb_v_egress()
90 ("ieee8021QBridgeVlanStaticEgressPorts")
91
92 $bridge->iqb_v_fbdn_egress()
93 ("ieee8021QBridgeVlanForbiddenEgressPorts")
94
95 $bridge->iqb_v_untagged()
96 ("ieee8021QBridgeVlanStaticUntaggedPorts")
97
98 $bridge->iqb_v_stat()
99 "active" !
100
101 ("ieee8021QBridgeVlanStaticRowStatus")
102
103
104
105perl v5.34.0 2022-01-21 SNMP::Info::IEEE802_Bridge(3)