1SNMP::Info::Layer1::BayUhsuebr(3C)ontributed Perl DocumeSnNtMaPt:i:oInnfo::Layer1::Bayhub(3)
2
3
4
6 SNMP::Info::Layer1::Bayhub - SNMP Interface to Bay/Nortel/Avaya Hubs
7
9 Eric Miller
10
12 #Let SNMP::Info determine the correct subclass for you.
13
14 my $bayhub = new SNMP::Info(
15 AutoSpecify => 1,
16 Debug => 1,
17 DestHost => 'myswitch',
18 Community => 'public',
19 Version => 2
20 )
21
22 or die "Can't connect to DestHost.\n";
23
24 my $class = $bayhub->class();
25 print "SNMP::Info determined this device to fall under subclass : $class\n";
26
28 Provides abstraction to the configuration information obtainable from a
29 Bay hub device through SNMP. Also provides device MAC to port mapping
30 through the proprietary MIB.
31
32 For speed or debugging purposes you can call the subclass directly, but
33 not after determining a more specific class using the method above.
34
35 my $bayhub = new SNMP::Info::Layer1::Bayhub(...);
36
37 Inherited Classes
38 SNMP::Info::Layer2
39 SNMP::Info::NortelStack
40 SNMP::Info::SONMP
41
42 Required MIBs
43 S5-ETHERNET-COMMON-MIB
44 S5-COMMON-STATS-MIB
45
46 Inherited MIBs
47 See "Required MIBs" in SNMP::Info::Layer2 for its MIB requirements.
48
49 See "Required MIBs" in SNMP::Info::NortelStack for its MIB
50 requirements.
51
52 See "Required MIBs" in SNMP::Info::SONMP for its MIB requirements.
53
55 These are methods that return scalar value from SNMP
56
57 $bayhub->vendor()
58 Returns 'avaya'
59
60 $bayhub->os()
61 Returns 'bay_hub'
62
63 $bayhub->model()
64 Cross references $bayhub->id() to the SYNOPTICS-MIB and returns the
65 results.
66
67 Removes either Baystack Hub, 5000, or 5005 depending on the model.
68
69 Overrides
70 $bayhub->layers()
71 Returns 00000011. Class emulates Layer 2 functionality through
72 proprietary MIBs.
73
74 $bayhub->index_factor()
75 Required by SNMP::Info::SONMP. Number representing the number of
76 ports reserved per slot within the device MIB. Returns 256.
77
78 $bayhub->slot_offset()
79 Required by SNMP::Info::SONMP. Offset if slot numbering does not
80 start at 0. Returns 0.
81
82 Globals imported from SNMP::Info::Layer2
83 See "GLOBALS" in SNMP::Info::Layer2 for details.
84
85 Global Methods imported from SNMP::Info::NortelStack
86 See "GLOBALS" in SNMP::Info::NortelStack for details.
87
88 Global Methods imported from SNMP::Info::SONMP
89 See "GLOBALS" in SNMP::Info::SONMP for details.
90
92 These are methods that return tables of information in the form of a
93 reference to a hash.
94
95 Overrides
96 $bayhub->i_index()
97 Returns reference to map of IIDs to Interface index.
98
99 Since hubs do not support "ifIndex", the interface index is created
100 using the formula (board * 256 + port).
101
102 $bayhub->interfaces()
103 Returns reference to map of IIDs to physical ports.
104
105 $bayhub->i_duplex()
106 Returns half, hubs do not support full duplex.
107
108 $bayhub->i_duplex_admin()
109 Returns half, hubs do not support full duplex.
110
111 $bayhub->i_speed()
112 Returns interface speed.
113
114 $bayhub->i_up()
115 Returns ("s5EnPortLinkStatus") for each port. Translates on/off to
116 up/down.
117
118 $bayhub->i_up_admin()
119 Returns ("s5EnPortPartStatus") for each port.
120
121 $bayhub->set_i_up_admin(state, ifIndex)
122 Sets port state, must be supplied with state and port "ifIndex"
123
124 State choices are 'up' or 'down'
125
126 Example:
127 my %if_map = reverse %{$bayhub->interfaces()};
128 $bayhub->set_i_up_admin('down', $if_map{'1.1'})
129 or die "Couldn't change port state. ",$bayhub->error(1);
130
131 $bayhub->bp_index()
132 Simulates bridge MIB by returning reference to a hash containing
133 the index for both the keys and values.
134
135 $bayhub->fw_port()
136 Returns reference to map of IIDs of the
137 "S5-COMMON-STATS-MIB::s5CmSNodeTable" to the Interface index.
138
139 $bayhub->fw_mac()
140 ("s5CmSNodeMacAddr")
141
142 Pseudo ENTITY-MIB Information
143 These devices do not support ENTITY-MIB. These methods emulate
144 Physical Table methods using S5-CHASSIS-MIB. See "TABLE METHODS" in
145 SNMP::Info::NortelStack for details.
146
147 $bayhub->e_index()
148 Returns ns_e_index().
149
150 $bayhub->e_class()
151 Returns ns_e_class().
152
153 $bayhub->e_descr()
154 Returns ns_e_descr().
155
156 $bayhub->e_name()
157 Returns ns_e_name().
158
159 $bayhub->e_fwver()
160 Returns ns_e_fwver().
161
162 $bayhub->e_hwver()
163 Returns ns_e_hwver().
164
165 $bayhub->e_parent()
166 Returns ns_e_parent().
167
168 $bayhub->e_pos()
169 Returns ns_e_pos().
170
171 $bayhub->e_serial()
172 Returns ns_e_serial().
173
174 $bayhub->e_swver()
175 Returns ns_e_swver().
176
177 $bayhub->e_type()
178 Returns ns_e_type().
179
180 $bayhub->e_vendor()
181 Returns ns_e_vendor().
182
183 Table Methods imported from SNMP::Info::Layer2
184 See "TABLE METHODS" in SNMP::Info::Layer2 for details.
185
186 Table Methods imported from SNMP::Info::NortelStack
187 See "TABLE METHODS" in SNMP::Info::NortelStack for details.
188
189 Table Methods imported from SNMP::Info::SONMP
190 See "TABLE METHODS" in SNMP::Info::SONMP for details.
191
192
193
194perl v5.28.0 2018-11-29 SNMP::Info::Layer1::Bayhub(3)