1SNMP::Info::Layer3::ExtUrseemre(C3o)ntributed Perl DocumSeNnMtPa:t:iIonnfo::Layer3::Extreme(3)
2
3
4

NAME

6       SNMP::Info::Layer3::Extreme - Perl5 Interface to Extreme Network
7       Devices
8

AUTHOR

10       Eric Miller, Bill Fenner
11

SYNOPSIS

13        # Let SNMP::Info determine the correct subclass for you.
14        my $extreme = new SNMP::Info(
15                                 AutoSpecify => 1,
16                                 Debug       => 1,
17                                 DestHost    => 'myswitch',
18                                 Community   => 'public',
19                                 Version     => 1
20                               )
21           or die "Can't connect to DestHost.\n";
22
23        my $class      = $extreme->class();
24
25        print "SNMP::Info determined this device to fall under subclass : $class\n";
26

DESCRIPTION

28       Provides abstraction to the configuration information obtainable from
29       an Extreme device through SNMP.
30
31       For speed or debugging purposes you can call the subclass directly, but
32       not after determining a more specific class using the method above.
33
34       my $extreme = new SNMP::Info::Layer3::Extreme(...);
35
36   Inherited Classes
37       SNMP::Info::Layer3
38       SNMP::Info::MAU
39       SNMP::Info::LLDP
40       SNMP::Info::EDP
41
42   Required MIBs
43       EXTREME-BASE-MIB
44       EXTREME-SYSTEM-MIB
45       EXTREME-FDB-MIB
46       EXTREME-VLAN-MIB
47       EXTREME-POE-MIB
48       Inherited Classes' MIBs
49           See classes listed above for their required MIBs.
50

GLOBALS

52       These are methods that return scalar value from SNMP
53
54       $extreme->model()
55           Returns model type.  Checks $extreme->id() against the EXTREME-
56           BASE-MIB.
57
58       $extreme->vendor()
59           Returns extreme
60
61       $extreme->os()
62           Returns extreme
63
64       $extreme->os_ver()
65           Parses device operating system version from description()
66
67       $extreme->serial()
68           Returns serial number
69
70           ("extremeSystemID")
71
72       $extreme->temp()
73           Returns system temperature
74
75           ("extremeCurrentTemperature")
76
77       $extreme->ps1_status()
78           Returns status of power supply 1
79
80           ("extremePowerSupplyStatus.1")
81
82       $extreme->ps2_status()
83           Returns status of power supply 2
84
85           ("extremePowerSupplyStatus.2")
86
87       $extreme->fan()
88           Returns fan status
89
90           ("extremeFanOperational.1")
91
92       $extreme->mac()
93           Returns base mac
94
95           ("dot1dBaseBridgeAddress")
96
97   Globals imported from SNMP::Info::Layer3
98       See documentation in "GLOBALS" in SNMP::Info::Layer3 for details.
99
100   Globals imported from SNMP::Info::MAU
101       See documentation in "GLOBALS" in SNMP::Info::MAU for details.
102
103   Globals imported from SNMP::Info::LLDP
104       See documentation in "GLOBALS" in SNMP::Info::LLDP for details.
105
106   Globals imported from SNMP::Info::EDP
107       See documentation in "GLOBALS" in SNMP::Info::EDP for details.
108

TABLE METHODS

110       These are methods that return tables of information in the form of a
111       reference to a hash.
112
113   Overrides
114       $extreme->interfaces()
115           Returns a mapping between the Interface Table Index (iid) and the
116           physical port name.
117
118       $extreme->i_duplex()
119           Parses mau_index and mau_link to return the duplex information for
120           interfaces.
121
122       $extreme->i_duplex_admin()
123           Parses "mac_index","mau_autostat","mau_type_admin" in order to find
124           the admin duplex setting for all the interfaces.
125
126           Returns either (auto,full,half).
127
128       $extreme->i_ignore()
129           Returns reference to hash.  Increments value of IID if port is to
130           be ignored.
131
132           Ignores VLAN meta interfaces and loopback
133
134       $extreme->fw_mac()
135           ("extremeFdbMacFdbMacAddress")
136
137       $extreme->fw_port()
138           ("extremeFdbMacFdbPortIfIndex")
139
140       $extreme->fw_status()
141           ("extremeFdbMacFdbStatus")
142
143       $extreme->lldp_if()
144           Returns the mapping to the SNMP Interface Table. Extreme LLDP uses
145           the bridge index rather than ifIndex.
146
147       $extreme->i_vlan()
148           Returns a mapping between "ifIndex" and the VLAN.
149
150       $extreme->i_vlan_membership()
151           Returns reference to hash of arrays: key = "ifIndex", value = array
152           of VLAN IDs.  These are the VLANs which are members of the egress
153           list for the port.
154
155             Example:
156             my $interfaces = $extreme->interfaces();
157             my $vlans      = $extreme->i_vlan_membership();
158
159             foreach my $iid (sort keys %$interfaces) {
160               my $port = $interfaces->{$iid};
161               my $vlan = join(',', sort(@{$vlans->{$iid}}));
162               print "Port: $port VLAN: $vlan\n";
163             }
164
165       $extreme->i_vlan_membership_untagged()
166           Returns reference to hash of arrays: key = "ifIndex", value = array
167           of VLAN IDs.  These are the VLANs which are members of the untagged
168           egress list for the port.
169
170       $extreme->v_index()
171           Returns VLAN IDs
172
173       $extreme->v_name()
174           Returns VLAN names
175
176           ("extremeVlanIfDescr")
177
178       $extreme->bp_index()
179           Returns reference to hash of bridge port table entries map back to
180           interface identifier (iid)
181
182           Returns ("ifIndex") for both key and value since we're using
183           EXTREME-FDB-MIB rather than BRIDGE-MIB.
184
185       $extreme->peth_port_power()
186           Power supplied by PoE ports, in milliwatts
187
188           ("extremePethPortMeasuredPower")
189
190       $extreme->peth_power_watts()
191           The configured maximum amount of in-line power available to the
192           slot.
193
194           ("extremePethSlotPowerLimit")
195
196   Spanning Tree Instance Globals
197       $extreme->stp_i_mac()
198           Returns the MAC extracted from ("extremeStpDomainBridgeId").
199
200       $extreme->stp_i_id()
201           Returns the unique identifier of the STP domain.
202
203           ("extremeStpDomainStpdInstance")
204
205       $extreme->stp_i_time()
206           Returns time since last topology change detected. (100ths/second)
207
208           ("extremeStpDomainTimeSinceTopologyChange")
209
210       $extreme->stp_i_time()
211           Returns time since last topology change detected. (100ths/second)
212
213           ("extremeStpDomainTimeSinceTopologyChange")
214
215       $extreme->stp_i_time()
216           Returns the total number of topology changes detected.
217
218           ("extremeStpDomainTopChanges")
219
220       $extreme->stp_i_root()
221           Returns root of STP.
222
223           ("extremeStpDomainDesignatedRoot")
224
225       $extreme->stp_i_root_port()
226           Returns the port number of the port that offers the lowest cost
227           path to the root bridge.
228
229           ("extremeStpDomainRootPortIfIndex")
230
231       $extreme->stp_i_priority()
232           Returns the port number of the port that offers the lowest cost
233           path to the root bridge.
234
235           ("extremeStpDomainBridgePriority")
236
237   Spanning Tree Protocol Port Table
238       $extreme->stp_p_id()
239           ("extremeStpPortPortIfIndex")
240
241       $extreme->stp_p_stg_id()
242           ("extremeStpDomainStpdInstance")
243
244       $extreme->stp_p_priority()
245           ("extremeStpPortPortPriority")
246
247       $extreme->stp_p_state()
248           ("extremeStpPortPortState")
249
250       $extreme->stp_p_cost()
251           ("extremeStpPortPathCost")
252
253       $extreme->stp_p_root()
254           ("extremeStpPortDesignatedRoot")
255
256       $extreme->stp_p_bridge()
257           ("extremeStpPortDesignatedBridge")
258
259       $extreme->stp_p_port()
260           ("extremeStpPortDesignatedPort")
261
262   Table Methods imported from SNMP::Info::Layer3
263       See documentation in "TABLE METHODS" in SNMP::Info::Layer3 for details.
264
265   Table Methods imported from SNMP::Info::MAU
266       See documentation in "TABLE METHODS" in SNMP::Info::MAU for details.
267
268   Table Methods imported from SNMP::Info::LLDP
269       See documentation in "TABLE METHODS" in SNMP::Info::LLDP for details.
270
271   Table Methods imported from SNMP::Info::EDP
272       See documentation in "TABLE METHODS" in SNMP::Info::EDP for details.
273

SET METHODS

275       These are methods that provide SNMP set functionality for overridden
276       methods or provide a simpler interface to complex set operations.  See
277       "SETTING DATA VIA SNMP" in SNMP::Info for general information on set
278       operations.
279
280       $extreme->set_i_vlan ( vlan, ifIndex )
281           Changes an access (untagged) port VLAN, must be supplied with the
282           numeric VLAN ID and port "ifIndex".  This method should only be
283           used on end station (non-trunk) ports.
284
285             Example:
286             my %if_map = reverse %{$extreme->interfaces()};
287             $extreme->set_i_vlan('2', $if_map{'FastEthernet0/1'})
288               or die "Couldn't change port VLAN. ",$extreme->error(1);
289
290       $extreme->set_i_pvid ( pvid, ifIndex )
291           Sets port default VLAN, must be supplied with the numeric VLAN ID
292           and port "ifIndex".  This method should only be used on trunk
293           ports.
294
295             Example:
296             my %if_map = reverse %{$extreme->interfaces()};
297             $extreme->set_i_pvid('2', $if_map{'FastEthernet0/1'})
298               or die "Couldn't change port default VLAN. ",$extreme->error(1);
299
300       $extreme->set_add_i_vlan_tagged ( vlan, ifIndex )
301           Adds the VLAN to the enabled VLANs list of the port, must be
302           supplied with the numeric VLAN ID and port "ifIndex".
303
304             Example:
305             my %if_map = reverse %{$extreme->interfaces()};
306             $extreme->set_add_i_vlan_tagged('2', $if_map{'FastEthernet0/1'})
307               or die "Couldn't add port to egress list. ",$extreme->error(1);
308
309       $extreme->set_remove_i_vlan_tagged ( vlan, ifIndex )
310           Removes the VLAN from the enabled VLANs list of the port, must be
311           supplied with the numeric VLAN ID and port "ifIndex".
312
313             Example:
314             my %if_map = reverse %{$extreme->interfaces()};
315             $extreme->set_remove_i_vlan_tagged('2', $if_map{'FastEthernet0/1'})
316               or die "Couldn't add port to egress list. ",$extreme->error(1);
317

Data Munging Callback Subroutines

319       $extreme->munge_power_stat()
320           Removes 'present' and changes 'not' to 'Not' in the front of a
321           string.
322
323       $extreme->munge_true_ok()
324           Replaces 'true' with "OK" and 'false' with "Not OK".
325
326
327
328perl v5.28.0                      2018-11-29    SNMP::Info::Layer3::Extreme(3)