SNMP::Info::CiscoStack(3pm) | User Contributed Perl Documentation | SNMP::Info::CiscoStack(3pm) |
SNMP::Info::CiscoStack - SNMP Interface to data from CISCO-STACK-MIB
Max Baker
# Let SNMP::Info determine the correct subclass for you. my $ciscostack = new SNMP::Info( AutoSpecify => 1, Debug => 1, DestHost => 'myswitch', Community => 'public', Version => 2 ) or die "Can't connect to DestHost.\n"; my $class = $ciscostack->class(); print "SNMP::Info determined this device to fall under subclass : $class\n";
SNMP::Info::CiscoStack is a subclass of SNMP::Info that provides an interface to the "CISCO-STACK-MIB". This MIB is used across the Catalyst family under CatOS and IOS.
Use or create in a subclass of SNMP::Info. Do not use directly.
none.
Overrides with "ifType" if p_type() isn't available.
First checks for fixed gigabit ports which are always full duplex. Next, if the port is not operational and reported port duplex ("portDuplex") is auto then the operational duplex can not be determined. Otherwise it uses the reported port duplex ("portDuplex").
First checks for fixed gigabit ports which are always full duplex. Next checks the port administrative speed ("portAdminSpeed") which if set to autonegotiate then the duplex will also autonegotiate, otherwise it uses the reported port duplex ("portDuplex").
"portAdminSpeed"
Sets port speed, must be supplied with speed and port C<ifIndex> Speed choices are 'auto', '10', '100', '1000' Crosses $stack->p_port() with $stack->p_duplex() to utilize port C<ifIndex>. Example: my %if_map = reverse %{$stack->interfaces()}; $stack->set_i_speed_admin('auto', $if_map{'FastEthernet0/1'}) or die "Couldn't change port speed. ",$stack->error(1);
Sets port duplex, must be supplied with duplex and port C<ifIndex> Speed choices are 'auto', 'half', 'full' Crosses $stack->p_port() with $stack->p_duplex() to utilize port C<ifIndex>. Example: my %if_map = reverse %{$stack->interfaces()}; $stack->set_i_duplex_admin('auto', $if_map{'FastEthernet0/1'}) or die "Couldn't change port duplex. ",$stack->error(1);
This table holds configuration information for each of the blades installed in the Catalyst device.
To see the status of port 4 :
@ports_status = split(' ', $stack->m_ports_status() ); $port4 = $ports_status[3];
("modulePortStatus")
"Indicates the receive flow control operational status of the port. If the port could not agree with the far end on a link protocol, its operational status will be disagree(3)."
"portOperRxFlowControl"
"Indicates the transmit flow control operational status of the port. If the port could not agree with the far end on a link protocol, its operational status will be disagree(3)."
"portOperTxFlowControl"
"Indicates the receive flow control administrative status set on the port. If the status is set to on(1), the port will require the far end to send flow control. If the status is set to off(2), the port will not allow far end to send flow control. If the status is set to desired(3), the port will allow the far end to send the flow control."
"portAdminRxFlowControl"
"Indicates the transmit flow control administrative status set on the port. If the status is set to on(1), the port will send flow control to the far end. If the status is set to off(2), the port will not send flow control to the far end. If the status is set to desired(3), the port will send flow control to the far end if the far end supports it."
"portAdminTxFlowControl"
2023-09-30 | perl v5.36.0 |