ixTransmitPortArpRequest
ixTransmitPortArpRequest - transmit ARP requests on an individual port
SYNOPSIS
ixTransmitPortArpRequest chassisID cardID portID
DESCRIPTION
The ixTransmitPortArpRequest command sends a message to the IxServer to start transmission of ARP requests on a single port using the protocol server.
ARGUMENTS
chassisID
(By value) The ID number of the chassis
cardID
(By value) The ID number of the card
portID
(By value) The ID number of the port
RETURNS
0
No error; the command was successfully delivered to the IxServer.
1
Error; the command was delivered to the IxServer but it could not process the message.
EXAMPLES
package require IxTclHal
set host galaxy
set username user
# Check if we're running on UNIX - connect to the TCL Server
# which must be running on the chassis
if [isUNIX] {
if [ixConnectToTclServer $host] {
ixPuts "Could not connect to $host"
return 1
}
}
# Now connect to the chassis
if [ixConnectToChassis $host] {
ixPuts $::ixErrorInfo
return 1
}
# Get the chassis ID to use in port lists
set chas [ixGetChassisID $host]
set cardA 1
set portA 1
set cardB 1
set portB 2
set portList [list [list $chas $cardA $portA] [list $chas $cardB $portB]]
# Login before taking ownership
if [ixLogin $username] {
ixPuts $::ixErrorInfo
return 1
}
# Take ownership of the ports we'll use
if [ixTakeOwnership $portList] {
ixPuts $::ixErrorInfo
return 1
}
# Need to set up IP for ARP
ip setDefault
ip set $chas $cardA $portA
ip set $chas $cardB $portB
if {[ixTransmitPortArpRequest $chas $cardA $portA] != 0} {
ixPuts "Could not transmit ARP request for $chas:$cardA:$cardB"
}
if {[ixTransmitPortArpRequest $chas $cardB $portB] != 0} {
ixPuts "Could not transmit ARP request for $chas:$cardB:$cardB"
}
# Let go of the ports that we reserved
ixClearOwnership $portList
# Disconnect from the chassis we're using
ixDisconnectFromChassis $host
# If we're running on UNIX, disconnect from the TCL Server
if [isUNIX] {
ixDisconnectTclServer $host
}