
Sample Scripts
117382-A Rev. A A-17
array mac_attr wfFddiMacErrorCts/HEX_BYTES
wfFddiMacLostCts/HEX_BYTES
enum 1 errorcts lostcts
mi/jointfilesconvert/97390/bget wfFddiMacEntry mac_attr $nextid mac_value mac_next
cutenv -d. -f1- mac_err ${mac_value[$errorcts]}
cutenv -d. -f1- mac_lost ${mac_value[$lostcts]}
let mac_sum = $mac_sum + 0x${mac_err[8]}
let mac_sum = $mac_sum + (256 * 0x${mac_err[7]})
let mac_sum = $mac_sum + (65536 * 0x${mac_err[6]})
let mac_sum = $mac_sum + (16777216 * 0x${mac_err[5]})
let mac_sum = $mac_sum + 0x${mac_lost[8]}
let mac_sum = $mac_sum + (256 * 0x${mac_lost[7]})
let mac_sum = $mac_sum + (65536 * 0x${mac_lost[6]})
let mac_sum = $mac_sum + (16777216 * 0x${mac_lost[5]})
return
################################################################
#
# Transmit Errors screen...
#
################################################################
:FI_XMIT:
if $# < 3 then; goto :FI_Tx1:
let cmdlen = strlen(“$3”)
let i = strindex(“errors”, “$3”)
if $i = 1 then ; if $cmdlen >= 3 then ; goto :FI_Tx1:
goto :FI_HELP:
:FI_Tx1:
#
# check for circuit name to match on...
#
if $# <= 3 then ; goto :FI_XMIT_NM:
setenv cmd “$4”
let len = strlen(cmd)
if $len < 3 then ; goto :FI_HELP_SHOW:
let j = strindex(“circuit”, cmd)
if $j != 1 then ; goto :FI_HELP_SHOW:
if $# != 5 then ; goto :FI_HELP_SHOW:
setenv matchcct “$5”
:FI_XMIT_NM:
setenv nextflag “”
setenv pattern “”
Commentaires sur ces manuels