1
0
mirror of git://projects.qi-hardware.com/ben-wpan.git synced 2024-12-29 04:24:36 +02:00
ben-wpan/prod/atusb
Werner Almesberger b2c7727c57 prod/atusb (led): show keys to press in reverse
Before, it read "... [P]ass ... [F]ail ...", and the closing
square brackets could be mistaked for lower-case ells.
2011-06-20 22:36:24 -03:00

136 lines
3.2 KiB
Bash
Executable File

#!/bin/sh
. ./Common
USB_ID=20b7:1540
CLOCK_DRIFT_PPM=50
enumerate()
{
step "Enumeration"
cmd "usbwait -t 5 $USB_ID && echo okay"
expect okay
}
led()
{
#
# BBBBBBBB CCCCCCCC DDDDDDDD
# 01234567 01234567 01234567
#
# -xxxS-L- -x-----n InMM-S--
# T E R RSIO C
#
step "LED"
cmd "echo >/dev/tty; \
g_echo 'Press \033[7m P \033[mass if the LED blinks, \033[7m F \033[mail if not' \
>/dev/tty; \
atrf-gpio -c -p \
xxxxxx1x.xxxxxxxx.xxxxxxxx \
delay=50 \
xxxxxx0x.xxxxxxxx.xxxxxxxx \
delay=200"
doit
}
gpio_usb()
{
# TRX_OFF state (transceiver pull-up/downs inactive)
# -xxxS-L- -x-----n InMM-S--
# T E R RSIO C
step "GPIO scan (TRX_OFF)"
cmd "$LOCAL_EXEC atrf-gpio -d $LOCAL_DUT \
HHHH0HzH.HxHxHHHh.oHHHHHHH '# TRX_OFF state (H)' \
0HHH0HzH.HxHxHHHh.oHHHHHHH '# test B0' \
H0HH0HzH.HxHxHHHh.oHHHHHHH '# test B1 (ICSP SCK)' \
HH0H0HzH.HxHxHHHh.oHHHHHHH '# test B2 (ICSP MOSI)' \
HHH00HzH.HxHxHHHh.oHHHHHHH '# test B3 (ICSP MISO)' \
HHHH00zH.HxHxHHHh.oHHHHHHH '# test B5' \
HHHH0H0H.HxHxHHHh.oHHHHHHH '# test B6 (LED, 0)' \
HHHH0H1H.HxHxHHHh.oHHHHHHH '# test B6 (LED, 1)' \
HHHH0Hz0.HxHxHHHh.oHHHHHHH '# test B7' \
HHHH0HzH.0xHxHHHh.oHHHHHHH '# test C0' \
HHHH0HzH.Hx0xHHHh.oHHHHHHH '# test C2' \
HHHH0HzH.HxHx0HHh.oHHHHHHH '# test C4' \
HHHH0HzH.HxHxH0Hh.oHHHHHHH '# test C5' \
HHHH0HzH.HxHxHH0h.oHHHHHHH '# test C6' \
HHHH0HzH.HxHxHHH1.oHHHHHHH '# test C7 (nRST_RF)' \
HHHH0HzH.HxHxHHHh.0HHHHHHH '# test D0 (IRQ_RF)' \
HHHH0HzH.HxHxHHHh.o0zHHHHH '# test D1 (nSS)' \
HHHH0HzH.HxHxHHHh.oH0HHHHH '# test D2 (MISO)' \
HHHH0HzH.HxHxHHHh.oHz0HHHH '# test D3 (MOSI)' \
HHHH0HzH.HxHxHHHh.oHzH0HHH '# test D4' \
HHHH0HzH.HxHxHHHh.oHzHH0HH '# test D5 (SCLK)' \
HHHH0HzH.HxHxHHHh.oHzHHH0H '# test D6' \
HHHH0HzH.HxHxHHHh.oHzHHHH0 '# test D7' \
HHHH0HzH.HxHxHHHh.oHzHHHHH '# test LED'"
doit
# INT
# -xxxS-L- -x-----n InMM-S--
# T E R RSIO C
step "GPIO scan (INT)"
cmd "$LOCAL_EXEC atrf-gpio -d $LOCAL_DUT \
xxxxxxxx.xxxxxxxx.oxxxxxxx '# reset state' \
0x04=1 '# IRQ_POLARITY = 1' \
xxxxxxxx.xxxxxxxx.hxxxxxxx '# test INT (1)' \
xxxxxxxx.xxxxxxxx.h0xxxxxx '# test INT (2)' \
xxxxxxxx.xxxxxxxx.h1xxxxxx '# restore nSEL' \
0x04=0 '# IRQ_POLARITY = 0' \
xxxxxxxx.xxxxxxxx.o1xxxxxx '# test INT again'"
doit
# SLP_TR
# -xxxS-L- -x-----n InMM-S--
# T E R RSIO C
step "GPIO scan (SLP_TR)"
cmd "$LOCAL_EXEC atrf-gpio -d $LOCAL_DUT \
02=9 delay '# enter PLL_ON' \
02:9/0x1f '# verify state' \
frame '# one-byte frame' \
0xf: '# clear interrupts' \
0xe=8 '# enable TRX_END intr' \
xxxxxxxx.xxxxxxxx.oxxxxxxx '# confirm INT' \
slp_tr delay '# send frame' \
xxxxxxxx.xxxxxxxx.hxxxxxxx '# check INT'"
doit
# nRST
step "GPIO scan (nRST)"
cmd "$LOCAL_EXEC atrf-gpio -d $LOCAL_DUT \
02:8/0x1f '# verify TRX_OFF' \
reset '# reset transceiver' \
02:0/0x1f '# verify P_ON'"
doit
}
xtal_usb()
{
step "Crystal frequency"
cmd "$LOCAL_EXEC atrf-xtal -d $LOCAL_DUT -p $CLOCK_DRIFT_PPM"
expect_re ppm # we catch any problems via the exit code
}
begin usb.profile
enumerate
led
# power ?
gpio_usb
identify
xtal_usb
spectrum
transmit