1SNMP::Info::Layer3::LenUosveor(3C)ontributed Perl DocumeSnNtMaPt:i:oInnfo::Layer3::Lenovo(3)
2
3
4
6 SNMP::Info::Layer3::Lenovo - SNMP Interface to Lenovo switches running
7 CNOS.
8
10 Nick Nauwelaerts
11
13 # Let SNMP::Info determine the correct subclass for you.
14 use SNMP::Info;
15 my $cnos = new SNMP::Info(
16 AutoSpecify => 1,
17 Debug => 1,
18 DestHost => 'myrouter',
19 Community => 'public',
20 Version => 2
21 )
22 or die "Can't connect to DestHost.\n";
23 my $class = $cnos->class();
24 print "SNMP::Info determined this device to fall under subclass : $class\n";
25
27 Subclass for Lenovo switches running CNOS.
28
29 Inherited Classes
30 SNMP::Info::IEEE802dot3ad
31 SNMP::Info::Layer3
32
33 Required MIBs
34 LENOVO-ENV-MIB
35 LENOVO-PRODUCTS-MIB
36
37 Inherited Classes' MIBs
38 See SNMP::Info::IEEE802dot3ad for its own MIB requirements.
39
40 See SNMP::Info::Layer3 for its own MIB requirements.
41
43 These are methods that return scalar value from SNMP.
44
45 $cnos->mac()
46 Returns base mac based on "dot1dBaseBridgeAddress".
47
48 $cnos->os_ver()
49 Returns the OS version extracted from "entPhysicalSoftwareRev.1".
50
51 Overrides
52 $cnos->vendor()
53 Returns 'lenovo'.
54
55 $cnos->os()
56 Returns 'cnos'.
57
58 Globals imported from SNMP::Info::IEEE802dot3ad
59 See documentation in SNMP::Info::IEEE802dot3ad for details.
60
61 Globals imported from SNMP::Info::Layer3
62 See documentation in SNMP::Info::Layer3 for details.
63
65 These are methods that return tables of information in the form of a
66 reference to a hash.
67
68 $cnos->agg_ports_cnos()
69 placeholder function, will return agg_ports mapping once
70 implemented.
71
72 Overrides
73 $cnos->i_description()
74 Uses "ifName" to match most other devices.
75
76 $cnos->i_name()
77 Uses "ifDescr" to match most other devices.
78
79 $cnos->i_speed()
80 CNOS does not set "ifSpeed" to 4294967295 for high speed links,
81 return "orig_if_speed_high()" instead. SNMP::Info will handle this
82 correctly.
83
84 $cnos->i_speed_raw()
85 If "ifSpeedHigh" > 2500 we overwrite "i_speed_raw()", using the
86 formula: "ifSpeedHigh" * 1_000_000.
87
88 Table Methods imported from SNMP::Info::IEEE802dot3ad
89 See documentation in SNMP::Info::IEEE802dot3ad for details.
90
91 Table Methods imported from SNMP::Info::Layer3
92 See documentation in SNMP::Info::Layer3 for details.
93
94
95
96perl v5.30.1 2020-01-30 SNMP::Info::Layer3::Lenovo(3)