Avaya Writing Technician Interface Scripts Manual do Utilizador descarregar pdf (Página 103)

Sample Scripts

114089 Rev. A A-25

:FI_MAC_LP:

on error :FI_MAC_NXT:

if $i > $list_0 then; goto :FOOTER_AND_END:

let cctnum = $(wfFddiEntry.wfFDDICct.${list_[$i]})

gosub :GETCCTNAME:

if “$matchcct” = “” then ; goto :FI_PRNTMAC:

if -ic “$matchcct” != “$cctname” then ; goto :FI_MAC_NXT:

let match_entries = $match_entries + 1

:FI_PRNTMAC:

printf “%4d %4d ” $(wfFddiMacEntry.wfFddiMacSlot.${list_[$i]})

$(wfFddiMacEntry.wfFddiMacNode.${list_[$i]})

printf “%-8.8s ” “$cctname”

# Print Upstream Neighbor's MAC address...

octetfmt mac MAC_ADDRESS

wfFddiMacEntry.wfFddiMacUpstreamNbr.${list_[$i]}

printf “%-17s ” “$mac”

# Print Downstream Neighbor's MAC address...

octetfmt mac MAC_ADDRESS

wfFddiMacEntry.wfFddiMacDownstreamNbr.${list_[$i]}

printf “%-17s ” “$mac”

# Print remainder of line...

let tneg = $(wfFddiMacEntry.wfFddiMacTNeg.${list_[$i]}) /

1000000

printf “%4d ” $tneg

let state = $(wfFddiMacEntry.wfFddiMacRmtState.${list_[$i]})

if $state = 1 then ; printf “%-9s ” “Isolated”

if $state = 2 then ; printf “%-9s ” “NonOp”

if $state = 4 then ; printf “%-9s ” “RingOp”

if $state = 8 then ; printf “%-9s ” “Detect”

if $state = 16 then ; printf “%-9s ” “NonOpDup”

if $state = 32 then ; printf “%-9s ” “RingOpDup”

if $state = 64 then ; printf “%-9s ” “Directed”

if $state = 128 then ; printf “%-9s ” “Trace”

1 2 ... 98 99 100 101 102 103 104 105 106 107 108 ... 121 122

Sem comentários

Avaya Writing Technician Interface Scripts Manual do Utilizador Página 103