ixStopPortCapture

ixStopPortCapture - stop capture on an individual port

SYNOPSIS

ixStopPortCapture chassisID cardID portID [groupId] [create] [destroy]

DESCRIPTION

The ixStopPortCapture command stops capture on a single port.

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.

groupId

(By value) The group number to be used in the join message. If omitted, the default value of 101064 is used.

create

(By value) Create a new port group (create) or not (nocreate). (default = create)

destroy

(By value) Clean up a created port group when command completes (destroy) or not (nodestroy). (default = destroy)

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

}

map new -type one2one

map config -type one2one

map add $chas $cardA $portA $chas $cardB $portB

map add $chas $cardB $portB $chas $cardA $portA

port setDefault

port set $chas $cardA $portA

port set $chas $cardB $portB

ixWritePortsToHardware one2oneArray

after 1000

if {[ixCheckLinkState one2oneArray] != 0} {

ixPuts "Link is not up"

}

if {[ixStartCapture one2oneArray] != 0} {

ixPuts "Could not start capture on $one2oneArray"

}

# Start transmit and wait a bit

ixStartTransmit one2oneArray

after 1000

if {[ixStopPortCapture $chas $cardA $portA] != 0} {

ixPuts "Could not stop capture on $chas:$cardA:$portA"

}

if {[ixStopPortCapture $chas $cardB $portB] != 0} {

ixPuts "Could not stop capture on $chas:$cardB:$portB"

}

# 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

}

SEE ALSO

ixStartCapture, ixStopCapture, ixStartPortCapture