ixCreatePortListWildCard
ixCreatePortListWildCard - creates a port list using wildcard `*' specification for cards and/or ports
SYNOPSIS
ixCreatePortListWildCard portList [excludeList]
DESCRIPTION
The ixCreatePortListWildCard command creates a list of ports in a sorted order based on the physical slots. Both arguments are passed by value. It accepts * as a wild card to indicate all cards or all ports on a card. A wild card cannot be used for chassis ID. Also, if a combination of a list element containing wild cards and port numbers is passed, then the port list passed MUST be in a sorted order, otherwise the some of those ports might not make it in the list.
ARGUMENTS
portList
(By value) The list of ports in one of the following formats:
One of the following literal strings, or a reference to a variable with the $ (for example, $pl after set pl ...)
{{1 1 1}}
{{1 1 1} {1 1 2} {1 1 3} {1 1 4}}
{{1 1 *} {1 2 1} {1 2 2}}
{1,1,* 1,2,1 1,2,2}
excludeList
(By value) The list of ports to exclude in one of the following formats. No wildcard may be used in this list:
One of the following literal strings, or a reference to a variable with the $ (for example, $pl after set pl ...)
{{1 1 1}}
{{1 1 1} {1 1 2} {1 1 3} {1 1 4}}
RETURNS
A list of lists with the expanded port list.
EXAMPLES
package require IxTclHal
set host galaxy
# 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
}
set portList { {1 1 *} {1 * 2} }
set excludeList { {1 1 1} {1 1 2} {1 2 2} }
set retList [ixCreatePortListWildCard $portList]
ixPuts $retList
set retList [ixCreatePortListWildCard $portList $excludeList]
ixPuts $retList