2 #ft2232_device_desc "BeagleBone A"
4 ft2232_vid_pid 0x0403 0xa6d0
8 reset_config trst_and_srst
13 if { [info exists CHIPNAME] } {
14 set _CHIPNAME $CHIPNAME
19 proc icepick_d_tapenable {jrc port} {
21 irscan $jrc 7 -endstate IRPAUSE
22 drscan $jrc 8 0x89 -endstate DRPAUSE
25 irscan $jrc 2 -endstate IRPAUSE
26 drscan $jrc 32 [expr 0xa0002108 + ($port << 24)] -endstate DRPAUSE
29 irscan $jrc 2 -endstate IRPAUSE
30 drscan $jrc 32 0xe0002008 -endstate DRPAUSE
32 irscan $jrc 0x3F -endstate RUN/IDLE
39 if { [info exists M3_DAP_TAPID] } {
40 set _M3_DAP_TAPID $M3_DAP_TAPID
42 set _M3_DAP_TAPID 0x4b6b902f
44 jtag newtap $_CHIPNAME m3_dap -irlen 4 -ircapture 0x1 -irmask 0xf -expected-id $_M3_DAP_TAPID -disable
45 jtag configure $_CHIPNAME.m3_dap -event tap-enable "icepick_d_tapenable $_CHIPNAME.jrc 11"
50 if { [info exists DAP_TAPID ] } {
51 set _DAP_TAPID $DAP_TAPID
53 set _DAP_TAPID 0x4b6b902f
55 jtag newtap $_CHIPNAME dap -irlen 4 -ircapture 0x1 -irmask 0xf -expected-id $_DAP_TAPID -disable
56 jtag configure $_CHIPNAME.dap -event tap-enable "icepick_d_tapenable $_CHIPNAME.jrc 12"
59 # ICEpick-D (JTAG route controller)
61 if { [info exists JRC_TAPID ] } {
62 set _JRC_TAPID $JRC_TAPID
64 set _JRC_TAPID 0x0b94402f
66 jtag newtap $_CHIPNAME jrc -irlen 6 -ircapture 0x1 -irmask 0x3f -expected-id $_JRC_TAPID
67 jtag configure $_CHIPNAME.jrc -event setup "jtag tapenable $_CHIPNAME.dap"
68 # some TCK tycles are required to activate the DEBUG power domain
69 jtag configure $_CHIPNAME.jrc -event post-reset "runtest 100"
74 set _TARGETNAME $_CHIPNAME.cpu
75 target create $_TARGETNAME cortex_a8 -chain-position $_CHIPNAME.dap -dbgbase 0x80001000
77 # SRAM: 64K at 0x4030.0000; use the first 16K
78 $_TARGETNAME configure -work-area-phys 0x40300000 -work-area-size 0x4000
80 $_TARGETNAME configure -event gdb-attach {