1SNMP::Info::Layer1::S30U0s0e(r3)Contributed Perl DocumenStNaMtPi:o:nInfo::Layer1::S3000(3)
2
3
4
6 SNMP::Info::Layer1::S3000 - SNMP Interface to Synoptics / Nortel Hubs
7
9 Eric Miller
10
12 #Let SNMP::Info determine the correct subclass for you.
13
14 my $s3000 = 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 = $s3000->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 Inherited Classes
33 SNMP::Info::Layer2
34
35 Required MIBs
36 SYNOPTICS-COMMON-MIB
37 SYNOPTICS-ETHERNET-MIB
38
39 Inherited MIBs
40 See "Required MIBs" in SNMP::Info::Layer2 for its MIB requirements.
41
43 These are methods that return scalar value from SNMP
44
45 $s3000->vendor()
46 Returns 'nortel'
47
48 $s3000->os()
49 Returns 'synoptics'
50
51 $s3000->model()
52 Cross references $s3000->id() to the SYNOPTICS-MIB and returns the
53 results.
54
55 Removes "sreg-" from the model name and returns only the numeric
56 model identifier.
57
58 $stack->os_ver()
59 Returns the software version specified as major.minor.maint.
60
61 ("s3AgentSwMajorVer").("s3AgentSwMinorVer").("s3AgentSwMaintVer")
62
63 $stack->os_bin()
64 Returns the firmware version. ("s3AgentFwVer")
65
66 $s3000->mac()
67 Returns MAC of the advertised IP address of the device.
68
69 Overrides
70 $s3000->layers()
71 Returns 00000011. Class emulates Layer 2 functionality through
72 proprietary MIBs.
73
74 Globals imported from SNMP::Info::Layer2
75 See "GLOBALS" in SNMP::Info::Layer2 for details.
76
78 These are methods that return tables of information in the form of a
79 reference to a hash.
80
81 Overrides
82 $s3000->i_index()
83 Returns reference to map of IIDs to Interface index.
84
85 Since hubs do not support "ifIndex", the interface index is created
86 using the formula (board * 256 + port). This is required to
87 support devices with more than one module.
88
89 $s3000->interfaces()
90 Returns reference to map of IIDs to physical ports.
91
92 $s3000->i_duplex()
93 Returns half, hubs do not support full duplex.
94
95 $s3000->i_duplex_admin()
96 Returns half, hubs do not support full duplex.
97
98 $s3000->i_speed()
99 Returns 10000000. The hubs only support 10 Mbs Ethernet.
100
101 $s3000->i_up()
102 Returns ("s3EnetPortLinkStatus") for each port. Translates on/off
103 to up/down.
104
105 $s3000->i_up_admin()
106 Returns ("s3EnetPortPartStatus") for each port.
107
108 $s3000->set_i_up_admin(state, ifIndex)
109 Sets port state, must be supplied with state and port "ifIndex"
110
111 State choices are 'up' or 'down'
112
113 Example:
114 my %if_map = reverse %{$s3000->interfaces()};
115 $s3000->set_i_up_admin('down', $if_map{'1.1'})
116 or die "Couldn't change port state. ",$s3000->error(1);
117
118 $s3000->bp_index()
119 Simulates bridge MIB by returning reference to a hash containing
120 the index for both the keys and values.
121
122 $s3000->fw_port()
123 Returns reference to map of IIDs of the
124 "SYNOPTICS-ETHERNET-MIB::s3EnetShowNodesTable" to the Interface
125 index.
126
127 $s3000->fw_mac()
128 ("s3EnetShowNodesMacAddress")
129
130 $s3000->s3000_topo_port()
131 Returns reference to hash. Key: Table entry, Value:Port Number
132 (interface iid)
133
134 ("s3EnetTopNmmPort")
135
136 $s3000->s3000_topo_mac()
137 ("s3EnetTopNmmMacAddr")
138
139 Returns reference to hash. Key: Table entry, Value:Remote MAC
140 address
141
142 Table Methods imported from SNMP::Info::Layer2
143 See "TABLE METHODS" in SNMP::Info::Layer2 for details.
144
145
146
147perl v5.36.1 2023-07-17 SNMP::Info::Layer1::S3000(3)