1 /***************************************************************************
2 * Copyright (C) 2006 by Magnus Lundin *
5 * Copyright (C) 2008 by Spencer Oliver *
6 * spen@spen-soft.co.uk *
8 * Copyright (C) 2009-2010 by Oyvind Harboe *
9 * oyvind.harboe@zylin.com *
11 * Copyright (C) 2009-2010 by David Brownell *
13 * This program is free software; you can redistribute it and/or modify *
14 * it under the terms of the GNU General Public License as published by *
15 * the Free Software Foundation; either version 2 of the License, or *
16 * (at your option) any later version. *
18 * This program is distributed in the hope that it will be useful, *
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
21 * GNU General Public License for more details. *
23 * You should have received a copy of the GNU General Public License *
24 * along with this program; if not, write to the *
25 * Free Software Foundation, Inc., *
26 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
27 ***************************************************************************/
31 * This file implements support for the ARM Debug Interface version 5 (ADIv5)
32 * debugging architecture. Compared with previous versions, this includes
33 * a low pin-count Serial Wire Debug (SWD) alternative to JTAG for message
34 * transport, and focusses on memory mapped resources as defined by the
35 * CoreSight architecture.
37 * A key concept in ADIv5 is the Debug Access Port, or DAP. A DAP has two
38 * basic components: a Debug Port (DP) transporting messages to and from a
39 * debugger, and an Access Port (AP) accessing resources. Three types of DP
40 * are defined. One uses only JTAG for communication, and is called JTAG-DP.
41 * One uses only SWD for communication, and is called SW-DP. The third can
42 * use either SWD or JTAG, and is called SWJ-DP. The most common type of AP
43 * is used to access memory mapped resources and is called a MEM-AP. Also a
44 * JTAG-AP is also defined, bridging to JTAG resources; those are uncommon.
46 * This programming interface allows DAP pipelined operations through a
47 * transaction queue. This primarily affects AP operations (such as using
48 * a MEM-AP to access memory or registers). If the current transaction has
49 * not finished by the time the next one must begin, and the ORUNDETECT bit
50 * is set in the DP_CTRL_STAT register, the SSTICKYORUN status is set and
51 * further AP operations will fail. There are two basic methods to avoid
52 * such overrun errors. One involves polling for status instead of using
53 * transaction piplining. The other involves adding delays to ensure the
54 * AP has enough time to complete one operation before starting the next
55 * one. (For JTAG these delays are controlled by memaccess_tck.)
59 * Relevant specifications from ARM include:
61 * ARM(tm) Debug Interface v5 Architecture Specification ARM IHI 0031A
62 * CoreSight(tm) v1.0 Architecture Specification ARM IHI 0029B
64 * CoreSight(tm) DAP-Lite TRM, ARM DDI 0316D
65 * Cortex-M3(tm) TRM, ARM DDI 0337G
73 #include "arm_adi_v5.h"
74 #include <helper/time_support.h>
77 /* ARM ADI Specification requires at least 10 bits used for TAR autoincrement */
80 uint32_t tar_block_size(uint32_t address)
81 Return the largest block starting at address that does not cross a tar block size alignment boundary
83 static uint32_t max_tar_block_size(uint32_t tar_autoincr_block
, uint32_t address
)
85 return (tar_autoincr_block
- ((tar_autoincr_block
- 1) & address
)) >> 2;
88 /***************************************************************************
90 * DP and MEM-AP register access through APACC and DPACC *
92 ***************************************************************************/
95 * Select one of the APs connected to the specified DAP. The
96 * selection is implicitly used with future AP transactions.
97 * This is a NOP if the specified AP is already selected.
100 * @param apsel Number of the AP to (implicitly) use with further
101 * transactions. This normally identifies a MEM-AP.
103 void dap_ap_select(struct adiv5_dap
*dap
,uint8_t apsel
)
105 uint32_t select_apsel
= (apsel
<< 24) & 0xFF000000;
107 if (select_apsel
!= dap
->apsel
)
109 dap
->apsel
= select_apsel
;
110 /* Switching AP invalidates cached values.
111 * Values MUST BE UPDATED BEFORE AP ACCESS.
113 dap
->ap_bank_value
= -1;
114 dap
->ap_csw_value
= -1;
115 dap
->ap_tar_value
= -1;
120 * Queue transactions setting up transfer parameters for the
121 * currently selected MEM-AP.
123 * Subsequent transfers using registers like AP_REG_DRW or AP_REG_BD2
124 * initiate data reads or writes using memory or peripheral addresses.
125 * If the CSW is configured for it, the TAR may be automatically
126 * incremented after each transfer.
128 * @todo Rename to reflect it being specifically a MEM-AP function.
130 * @param dap The DAP connected to the MEM-AP.
131 * @param csw MEM-AP Control/Status Word (CSW) register to assign. If this
132 * matches the cached value, the register is not changed.
133 * @param tar MEM-AP Transfer Address Register (TAR) to assign. If this
134 * matches the cached address, the register is not changed.
136 * @return ERROR_OK if the transaction was properly queued, else a fault code.
138 int dap_setup_accessport(struct adiv5_dap
*dap
, uint32_t csw
, uint32_t tar
)
142 csw
= csw
| CSW_DBGSWENABLE
| CSW_MASTER_DEBUG
| CSW_HPROT
;
143 if (csw
!= dap
->ap_csw_value
)
145 /* LOG_DEBUG("DAP: Set CSW %x",csw); */
146 retval
= dap_queue_ap_write(dap
, AP_REG_CSW
, csw
);
147 if (retval
!= ERROR_OK
)
149 dap
->ap_csw_value
= csw
;
151 if (tar
!= dap
->ap_tar_value
)
153 /* LOG_DEBUG("DAP: Set TAR %x",tar); */
154 retval
= dap_queue_ap_write(dap
, AP_REG_TAR
, tar
);
155 if (retval
!= ERROR_OK
)
157 dap
->ap_tar_value
= tar
;
159 /* Disable TAR cache when autoincrementing */
160 if (csw
& CSW_ADDRINC_MASK
)
161 dap
->ap_tar_value
= -1;
166 * Asynchronous (queued) read of a word from memory or a system register.
168 * @param dap The DAP connected to the MEM-AP performing the read.
169 * @param address Address of the 32-bit word to read; it must be
170 * readable by the currently selected MEM-AP.
171 * @param value points to where the word will be stored when the
172 * transaction queue is flushed (assuming no errors).
174 * @return ERROR_OK for success. Otherwise a fault code.
176 int mem_ap_read_u32(struct adiv5_dap
*dap
, uint32_t address
,
181 /* Use banked addressing (REG_BDx) to avoid some link traffic
182 * (updating TAR) when reading several consecutive addresses.
184 retval
= dap_setup_accessport(dap
, CSW_32BIT
| CSW_ADDRINC_OFF
,
185 address
& 0xFFFFFFF0);
186 if (retval
!= ERROR_OK
)
189 return dap_queue_ap_read(dap
, AP_REG_BD0
| (address
& 0xC), value
);
193 * Synchronous read of a word from memory or a system register.
194 * As a side effect, this flushes any queued transactions.
196 * @param dap The DAP connected to the MEM-AP performing the read.
197 * @param address Address of the 32-bit word to read; it must be
198 * readable by the currently selected MEM-AP.
199 * @param value points to where the result will be stored.
201 * @return ERROR_OK for success; *value holds the result.
202 * Otherwise a fault code.
204 int mem_ap_read_atomic_u32(struct adiv5_dap
*dap
, uint32_t address
,
209 retval
= mem_ap_read_u32(dap
, address
, value
);
210 if (retval
!= ERROR_OK
)
217 * Asynchronous (queued) write of a word to memory or a system register.
219 * @param dap The DAP connected to the MEM-AP.
220 * @param address Address to be written; it must be writable by
221 * the currently selected MEM-AP.
222 * @param value Word that will be written to the address when transaction
223 * queue is flushed (assuming no errors).
225 * @return ERROR_OK for success. Otherwise a fault code.
227 int mem_ap_write_u32(struct adiv5_dap
*dap
, uint32_t address
,
232 /* Use banked addressing (REG_BDx) to avoid some link traffic
233 * (updating TAR) when writing several consecutive addresses.
235 retval
= dap_setup_accessport(dap
, CSW_32BIT
| CSW_ADDRINC_OFF
,
236 address
& 0xFFFFFFF0);
237 if (retval
!= ERROR_OK
)
240 return dap_queue_ap_write(dap
, AP_REG_BD0
| (address
& 0xC),
245 * Synchronous write of a word to memory or a system register.
246 * As a side effect, this flushes any queued transactions.
248 * @param dap The DAP connected to the MEM-AP.
249 * @param address Address to be written; it must be writable by
250 * the currently selected MEM-AP.
251 * @param value Word that will be written.
253 * @return ERROR_OK for success; the data was written. Otherwise a fault code.
255 int mem_ap_write_atomic_u32(struct adiv5_dap
*dap
, uint32_t address
,
258 int retval
= mem_ap_write_u32(dap
, address
, value
);
260 if (retval
!= ERROR_OK
)
266 /*****************************************************************************
268 * mem_ap_write_buf(struct adiv5_dap *dap, uint8_t *buffer, int count, uint32_t address) *
270 * Write a buffer in target order (little endian) *
272 *****************************************************************************/
273 int mem_ap_write_buf_u32(struct adiv5_dap
*dap
, uint8_t *buffer
, int count
, uint32_t address
)
275 int wcount
, blocksize
, writecount
, errorcount
= 0, retval
= ERROR_OK
;
276 uint32_t adr
= address
;
277 uint8_t* pBuffer
= buffer
;
282 /* if we have an unaligned access - reorder data */
285 for (writecount
= 0; writecount
< count
; writecount
++)
289 memcpy(&outvalue
, pBuffer
, sizeof(uint32_t));
291 for (i
= 0; i
< 4; i
++)
293 *((uint8_t*)pBuffer
+ (adr
& 0x3)) = outvalue
;
297 pBuffer
+= sizeof(uint32_t);
303 /* Adjust to write blocks within boundaries aligned to the TAR autoincremnent size*/
304 blocksize
= max_tar_block_size(dap
->tar_autoincr_block
, address
);
305 if (wcount
< blocksize
)
308 /* handle unaligned data at 4k boundary */
312 retval
= dap_setup_accessport(dap
, CSW_32BIT
| CSW_ADDRINC_SINGLE
, address
);
313 if (retval
!= ERROR_OK
)
316 for (writecount
= 0; writecount
< blocksize
; writecount
++)
318 retval
= dap_queue_ap_write(dap
, AP_REG_DRW
,
319 *(uint32_t *) ((void *) (buffer
+ 4 * writecount
)));
320 if (retval
!= ERROR_OK
)
324 if ((retval
= dap_run(dap
)) == ERROR_OK
)
326 wcount
= wcount
- blocksize
;
327 address
= address
+ 4 * blocksize
;
328 buffer
= buffer
+ 4 * blocksize
;
337 LOG_WARNING("Block write error address 0x%" PRIx32
", wcount 0x%x", address
, wcount
);
345 static int mem_ap_write_buf_packed_u16(struct adiv5_dap
*dap
,
346 uint8_t *buffer
, int count
, uint32_t address
)
348 int retval
= ERROR_OK
;
349 int wcount
, blocksize
, writecount
, i
;
357 /* Adjust to write blocks within boundaries aligned to the TAR autoincremnent size*/
358 blocksize
= max_tar_block_size(dap
->tar_autoincr_block
, address
);
360 if (wcount
< blocksize
)
363 /* handle unaligned data at 4k boundary */
367 retval
= dap_setup_accessport(dap
, CSW_16BIT
| CSW_ADDRINC_PACKED
, address
);
368 if (retval
!= ERROR_OK
)
370 writecount
= blocksize
;
374 nbytes
= MIN((writecount
<< 1), 4);
378 retval
= mem_ap_write_buf_u16(dap
, buffer
,
380 if (retval
!= ERROR_OK
)
382 LOG_WARNING("Block write error address "
383 "0x%" PRIx32
", count 0x%x",
388 address
+= nbytes
>> 1;
393 memcpy(&outvalue
, buffer
, sizeof(uint32_t));
395 for (i
= 0; i
< nbytes
; i
++)
397 *((uint8_t*)buffer
+ (address
& 0x3)) = outvalue
;
402 memcpy(&outvalue
, buffer
, sizeof(uint32_t));
403 retval
= dap_queue_ap_write(dap
,
404 AP_REG_DRW
, outvalue
);
405 if (retval
!= ERROR_OK
)
408 if ((retval
= dap_run(dap
)) != ERROR_OK
)
410 LOG_WARNING("Block write error address "
411 "0x%" PRIx32
", count 0x%x",
417 buffer
+= nbytes
>> 1;
418 writecount
-= nbytes
>> 1;
420 } while (writecount
);
427 int mem_ap_write_buf_u16(struct adiv5_dap
*dap
, uint8_t *buffer
, int count
, uint32_t address
)
429 int retval
= ERROR_OK
;
432 return mem_ap_write_buf_packed_u16(dap
, buffer
, count
, address
);
436 retval
= dap_setup_accessport(dap
, CSW_16BIT
| CSW_ADDRINC_SINGLE
, address
);
437 if (retval
!= ERROR_OK
)
440 memcpy(&svalue
, buffer
, sizeof(uint16_t));
441 uint32_t outvalue
= (uint32_t)svalue
<< 8 * (address
& 0x3);
442 retval
= dap_queue_ap_write(dap
, AP_REG_DRW
, outvalue
);
443 if (retval
!= ERROR_OK
)
446 retval
= dap_run(dap
);
447 if (retval
!= ERROR_OK
)
458 static int mem_ap_write_buf_packed_u8(struct adiv5_dap
*dap
,
459 uint8_t *buffer
, int count
, uint32_t address
)
461 int retval
= ERROR_OK
;
462 int wcount
, blocksize
, writecount
, i
;
470 /* Adjust to write blocks within boundaries aligned to the TAR autoincremnent size*/
471 blocksize
= max_tar_block_size(dap
->tar_autoincr_block
, address
);
473 if (wcount
< blocksize
)
476 retval
= dap_setup_accessport(dap
, CSW_8BIT
| CSW_ADDRINC_PACKED
, address
);
477 if (retval
!= ERROR_OK
)
479 writecount
= blocksize
;
483 nbytes
= MIN(writecount
, 4);
487 retval
= mem_ap_write_buf_u8(dap
, buffer
, nbytes
, address
);
488 if (retval
!= ERROR_OK
)
490 LOG_WARNING("Block write error address "
491 "0x%" PRIx32
", count 0x%x",
501 memcpy(&outvalue
, buffer
, sizeof(uint32_t));
503 for (i
= 0; i
< nbytes
; i
++)
505 *((uint8_t*)buffer
+ (address
& 0x3)) = outvalue
;
510 memcpy(&outvalue
, buffer
, sizeof(uint32_t));
511 retval
= dap_queue_ap_write(dap
,
512 AP_REG_DRW
, outvalue
);
513 if (retval
!= ERROR_OK
)
516 if ((retval
= dap_run(dap
)) != ERROR_OK
)
518 LOG_WARNING("Block write error address "
519 "0x%" PRIx32
", count 0x%x",
526 writecount
-= nbytes
;
528 } while (writecount
);
535 int mem_ap_write_buf_u8(struct adiv5_dap
*dap
, uint8_t *buffer
, int count
, uint32_t address
)
537 int retval
= ERROR_OK
;
540 return mem_ap_write_buf_packed_u8(dap
, buffer
, count
, address
);
544 retval
= dap_setup_accessport(dap
, CSW_8BIT
| CSW_ADDRINC_SINGLE
, address
);
545 if (retval
!= ERROR_OK
)
547 uint32_t outvalue
= (uint32_t)*buffer
<< 8 * (address
& 0x3);
548 retval
= dap_queue_ap_write(dap
, AP_REG_DRW
, outvalue
);
549 if (retval
!= ERROR_OK
)
552 retval
= dap_run(dap
);
553 if (retval
!= ERROR_OK
)
564 /* FIXME don't import ... this is a temporary workaround for the
565 * mem_ap_read_buf_u32() mess, until it's no longer JTAG-specific.
567 extern int adi_jtag_dp_scan(struct adiv5_dap
*dap
,
568 uint8_t instr
, uint8_t reg_addr
, uint8_t RnW
,
569 uint8_t *outvalue
, uint8_t *invalue
, uint8_t *ack
);
572 * Synchronously read a block of 32-bit words into a buffer
573 * @param dap The DAP connected to the MEM-AP.
574 * @param buffer where the words will be stored (in host byte order).
575 * @param count How many words to read.
576 * @param address Memory address from which to read words; all the
577 * words must be readable by the currently selected MEM-AP.
579 int mem_ap_read_buf_u32(struct adiv5_dap
*dap
, uint8_t *buffer
,
580 int count
, uint32_t address
)
582 int wcount
, blocksize
, readcount
, errorcount
= 0, retval
= ERROR_OK
;
583 uint32_t adr
= address
;
584 uint8_t* pBuffer
= buffer
;
591 /* Adjust to read blocks within boundaries aligned to the
592 * TAR autoincrement size (at least 2^10). Autoincrement
593 * mode avoids an extra per-word roundtrip to update TAR.
595 blocksize
= max_tar_block_size(dap
->tar_autoincr_block
,
597 if (wcount
< blocksize
)
600 /* handle unaligned data at 4k boundary */
604 retval
= dap_setup_accessport(dap
, CSW_32BIT
| CSW_ADDRINC_SINGLE
,
606 if (retval
!= ERROR_OK
)
609 /* FIXME remove these three calls to adi_jtag_dp_scan(),
610 * so this routine becomes transport-neutral. Be careful
611 * not to cause performance problems with JTAG; would it
612 * suffice to loop over dap_queue_ap_read(), or would that
613 * be slower when JTAG is the chosen transport?
616 /* Scan out first read */
617 retval
= adi_jtag_dp_scan(dap
, JTAG_DP_APACC
, AP_REG_DRW
,
618 DPAP_READ
, 0, NULL
, NULL
);
619 if (retval
!= ERROR_OK
)
621 for (readcount
= 0; readcount
< blocksize
- 1; readcount
++)
623 /* Scan out next read; scan in posted value for the
624 * previous one. Assumes read is acked "OK/FAULT",
625 * and CTRL_STAT says that meant "OK".
627 retval
= adi_jtag_dp_scan(dap
, JTAG_DP_APACC
, AP_REG_DRW
,
628 DPAP_READ
, 0, buffer
+ 4 * readcount
,
630 if (retval
!= ERROR_OK
)
634 /* Scan in last posted value; RDBUFF has no other effect,
635 * assuming ack is OK/FAULT and CTRL_STAT says "OK".
637 retval
= adi_jtag_dp_scan(dap
, JTAG_DP_DPACC
, DP_RDBUFF
,
638 DPAP_READ
, 0, buffer
+ 4 * readcount
,
640 if (retval
!= ERROR_OK
)
643 retval
= dap_run(dap
);
644 if (retval
!= ERROR_OK
)
652 LOG_WARNING("Block read error address 0x%" PRIx32
, address
);
655 wcount
= wcount
- blocksize
;
656 address
+= 4 * blocksize
;
657 buffer
+= 4 * blocksize
;
660 /* if we have an unaligned access - reorder data */
663 for (readcount
= 0; readcount
< count
; readcount
++)
667 memcpy(&data
, pBuffer
, sizeof(uint32_t));
669 for (i
= 0; i
< 4; i
++)
671 *((uint8_t*)pBuffer
) =
672 (data
>> 8 * (adr
& 0x3));
682 static int mem_ap_read_buf_packed_u16(struct adiv5_dap
*dap
,
683 uint8_t *buffer
, int count
, uint32_t address
)
686 int retval
= ERROR_OK
;
687 int wcount
, blocksize
, readcount
, i
;
695 /* Adjust to read blocks within boundaries aligned to the TAR autoincremnent size*/
696 blocksize
= max_tar_block_size(dap
->tar_autoincr_block
, address
);
697 if (wcount
< blocksize
)
700 retval
= dap_setup_accessport(dap
, CSW_16BIT
| CSW_ADDRINC_PACKED
, address
);
701 if (retval
!= ERROR_OK
)
704 /* handle unaligned data at 4k boundary */
707 readcount
= blocksize
;
711 retval
= dap_queue_ap_read(dap
, AP_REG_DRW
, &invalue
);
712 if (retval
!= ERROR_OK
)
714 if ((retval
= dap_run(dap
)) != ERROR_OK
)
716 LOG_WARNING("Block read error address 0x%" PRIx32
", count 0x%x", address
, count
);
720 nbytes
= MIN((readcount
<< 1), 4);
722 for (i
= 0; i
< nbytes
; i
++)
724 *((uint8_t*)buffer
) = (invalue
>> 8 * (address
& 0x3));
729 readcount
-= (nbytes
>> 1);
738 * Synchronously read a block of 16-bit halfwords into a buffer
739 * @param dap The DAP connected to the MEM-AP.
740 * @param buffer where the halfwords will be stored (in host byte order).
741 * @param count How many halfwords to read.
742 * @param address Memory address from which to read words; all the
743 * words must be readable by the currently selected MEM-AP.
745 int mem_ap_read_buf_u16(struct adiv5_dap
*dap
, uint8_t *buffer
,
746 int count
, uint32_t address
)
749 int retval
= ERROR_OK
;
752 return mem_ap_read_buf_packed_u16(dap
, buffer
, count
, address
);
756 retval
= dap_setup_accessport(dap
, CSW_16BIT
| CSW_ADDRINC_SINGLE
, address
);
757 if (retval
!= ERROR_OK
)
759 retval
= dap_queue_ap_read(dap
, AP_REG_DRW
, &invalue
);
760 if (retval
!= ERROR_OK
)
763 retval
= dap_run(dap
);
764 if (retval
!= ERROR_OK
)
769 for (i
= 0; i
< 2; i
++)
771 *((uint8_t*)buffer
) = (invalue
>> 8 * (address
& 0x3));
778 uint16_t svalue
= (invalue
>> 8 * (address
& 0x3));
779 memcpy(buffer
, &svalue
, sizeof(uint16_t));
789 /* FIX!!! is this a potential performance bottleneck w.r.t. requiring too many
790 * roundtrips when jtag_execute_queue() has a large overhead(e.g. for USB)s?
792 * The solution is to arrange for a large out/in scan in this loop and
793 * and convert data afterwards.
795 static int mem_ap_read_buf_packed_u8(struct adiv5_dap
*dap
,
796 uint8_t *buffer
, int count
, uint32_t address
)
799 int retval
= ERROR_OK
;
800 int wcount
, blocksize
, readcount
, i
;
808 /* Adjust to read blocks within boundaries aligned to the TAR autoincremnent size*/
809 blocksize
= max_tar_block_size(dap
->tar_autoincr_block
, address
);
811 if (wcount
< blocksize
)
814 retval
= dap_setup_accessport(dap
, CSW_8BIT
| CSW_ADDRINC_PACKED
, address
);
815 if (retval
!= ERROR_OK
)
817 readcount
= blocksize
;
821 retval
= dap_queue_ap_read(dap
, AP_REG_DRW
, &invalue
);
822 if (retval
!= ERROR_OK
)
824 if ((retval
= dap_run(dap
)) != ERROR_OK
)
826 LOG_WARNING("Block read error address 0x%" PRIx32
", count 0x%x", address
, count
);
830 nbytes
= MIN(readcount
, 4);
832 for (i
= 0; i
< nbytes
; i
++)
834 *((uint8_t*)buffer
) = (invalue
>> 8 * (address
& 0x3));
848 * Synchronously read a block of bytes into a buffer
849 * @param dap The DAP connected to the MEM-AP.
850 * @param buffer where the bytes will be stored.
851 * @param count How many bytes to read.
852 * @param address Memory address from which to read data; all the
853 * data must be readable by the currently selected MEM-AP.
855 int mem_ap_read_buf_u8(struct adiv5_dap
*dap
, uint8_t *buffer
,
856 int count
, uint32_t address
)
859 int retval
= ERROR_OK
;
862 return mem_ap_read_buf_packed_u8(dap
, buffer
, count
, address
);
866 retval
= dap_setup_accessport(dap
, CSW_8BIT
| CSW_ADDRINC_SINGLE
, address
);
867 if (retval
!= ERROR_OK
)
869 retval
= dap_queue_ap_read(dap
, AP_REG_DRW
, &invalue
);
870 if (retval
!= ERROR_OK
)
872 retval
= dap_run(dap
);
873 if (retval
!= ERROR_OK
)
876 *((uint8_t*)buffer
) = (invalue
>> 8 * (address
& 0x3));
885 /*--------------------------------------------------------------------------*/
888 /* FIXME don't import ... just initialize as
889 * part of DAP transport setup
891 extern const struct dap_ops jtag_dp_ops
;
893 /*--------------------------------------------------------------------------*/
896 * Initialize a DAP. This sets up the power domains, prepares the DP
897 * for further use, and arranges to use AP #0 for all AP operations
898 * until dap_ap-select() changes that policy.
900 * @param dap The DAP being initialized.
902 * @todo Rename this. We also need an initialization scheme which account
903 * for SWD transports not just JTAG; that will need to address differences
904 * in layering. (JTAG is useful without any debug target; but not SWD.)
905 * And this may not even use an AHB-AP ... e.g. DAP-Lite uses an APB-AP.
907 int ahbap_debugport_init(struct adiv5_dap
*dap
)
916 /* JTAG-DP or SWJ-DP, in JTAG mode */
917 dap
->ops
= &jtag_dp_ops
;
919 /* Default MEM-AP setup.
921 * REVISIT AP #0 may be an inappropriate default for this.
922 * Should we probe, or take a hint from the caller?
923 * Presumably we can ignore the possibility of multiple APs.
926 dap_ap_select(dap
, 0);
928 /* DP initialization */
930 retval
= dap_queue_dp_read(dap
, DP_CTRL_STAT
, &dummy
);
931 if (retval
!= ERROR_OK
)
934 retval
= dap_queue_dp_write(dap
, DP_CTRL_STAT
, SSTICKYERR
);
935 if (retval
!= ERROR_OK
)
938 retval
= dap_queue_dp_read(dap
, DP_CTRL_STAT
, &dummy
);
939 if (retval
!= ERROR_OK
)
942 dap
->dp_ctrl_stat
= CDBGPWRUPREQ
| CSYSPWRUPREQ
;
943 retval
= dap_queue_dp_write(dap
, DP_CTRL_STAT
, dap
->dp_ctrl_stat
);
944 if (retval
!= ERROR_OK
)
947 retval
= dap_queue_dp_read(dap
, DP_CTRL_STAT
, &ctrlstat
);
948 if (retval
!= ERROR_OK
)
950 if ((retval
= dap_run(dap
)) != ERROR_OK
)
953 /* Check that we have debug power domains activated */
954 while (!(ctrlstat
& CDBGPWRUPACK
) && (cnt
++ < 10))
956 LOG_DEBUG("DAP: wait CDBGPWRUPACK");
957 retval
= dap_queue_dp_read(dap
, DP_CTRL_STAT
, &ctrlstat
);
958 if (retval
!= ERROR_OK
)
960 if ((retval
= dap_run(dap
)) != ERROR_OK
)
965 while (!(ctrlstat
& CSYSPWRUPACK
) && (cnt
++ < 10))
967 LOG_DEBUG("DAP: wait CSYSPWRUPACK");
968 retval
= dap_queue_dp_read(dap
, DP_CTRL_STAT
, &ctrlstat
);
969 if (retval
!= ERROR_OK
)
971 if ((retval
= dap_run(dap
)) != ERROR_OK
)
976 retval
= dap_queue_dp_read(dap
, DP_CTRL_STAT
, &dummy
);
977 if (retval
!= ERROR_OK
)
979 /* With debug power on we can activate OVERRUN checking */
980 dap
->dp_ctrl_stat
= CDBGPWRUPREQ
| CSYSPWRUPREQ
| CORUNDETECT
;
981 retval
= dap_queue_dp_write(dap
, DP_CTRL_STAT
, dap
->dp_ctrl_stat
);
982 if (retval
!= ERROR_OK
)
984 retval
= dap_queue_dp_read(dap
, DP_CTRL_STAT
, &dummy
);
985 if (retval
!= ERROR_OK
)
991 /* CID interpretation -- see ARM IHI 0029B section 3
992 * and ARM IHI 0031A table 13-3.
994 static const char *class_description
[16] ={
995 "Reserved", "ROM table", "Reserved", "Reserved",
996 "Reserved", "Reserved", "Reserved", "Reserved",
997 "Reserved", "CoreSight component", "Reserved", "Peripheral Test Block",
998 "Reserved", "OptimoDE DESS",
999 "Generic IP component", "PrimeCell or System component"
1003 is_dap_cid_ok(uint32_t cid3
, uint32_t cid2
, uint32_t cid1
, uint32_t cid0
)
1005 return cid3
== 0xb1 && cid2
== 0x05
1006 && ((cid1
& 0x0f) == 0) && cid0
== 0x0d;
1012 uint32_t correct_dbgbase
;
1015 { 0x80000000, 0x04770002, 0x60000000, "imx51" },
1018 int dap_get_debugbase(struct adiv5_dap
*dap
, int apsel
,
1019 uint32_t *out_dbgbase
, uint32_t *out_apid
)
1024 uint32_t dbgbase
, apid
;
1026 /* AP address is in bits 31:24 of DP_SELECT */
1028 return ERROR_INVALID_ARGUMENTS
;
1030 apselold
= dap
->apsel
;
1031 dap_ap_select(dap
, apsel
);
1033 retval
= dap_queue_ap_read(dap
, AP_REG_BASE
, &dbgbase
);
1034 if (retval
!= ERROR_OK
)
1036 retval
= dap_queue_ap_read(dap
, AP_REG_IDR
, &apid
);
1037 if (retval
!= ERROR_OK
)
1039 retval
= dap_run(dap
);
1040 if (retval
!= ERROR_OK
)
1043 /* Some CPUs are messed up, so fixup if needed. */
1044 for (i
= 0; i
< sizeof(broken_cpus
)/sizeof(struct broken_cpu
); i
++)
1045 if (broken_cpus
[i
].dbgbase
== dbgbase
&&
1046 broken_cpus
[i
].apid
== apid
) {
1047 LOG_WARNING("Found broken CPU (%s), trying to fixup "
1048 "ROM Table location from 0x%08x to 0x%08x",
1049 broken_cpus
[i
].model
, dbgbase
,
1050 broken_cpus
[i
].correct_dbgbase
);
1051 dbgbase
= broken_cpus
[i
].correct_dbgbase
;
1055 dap_ap_select(dap
, apselold
);
1057 /* The asignment happens only here to prevent modification of these
1058 * values before they are certain. */
1059 *out_dbgbase
= dbgbase
;
1065 int dap_lookup_cs_component(struct adiv5_dap
*dap
, int apsel
,
1066 uint32_t dbgbase
, uint8_t type
, uint32_t *addr
)
1069 uint32_t romentry
, entry_offset
= 0, component_base
, devtype
;
1070 int retval
= ERROR_FAIL
;
1073 return ERROR_INVALID_ARGUMENTS
;
1075 apselold
= dap
->apsel
;
1076 dap_ap_select(dap
, apsel
);
1080 retval
= mem_ap_read_atomic_u32(dap
, (dbgbase
&0xFFFFF000) |
1081 entry_offset
, &romentry
);
1082 if (retval
!= ERROR_OK
)
1085 component_base
= (dbgbase
& 0xFFFFF000)
1086 + (romentry
& 0xFFFFF000);
1088 if (romentry
& 0x1) {
1089 retval
= mem_ap_read_atomic_u32(dap
,
1090 (component_base
& 0xfffff000) | 0xfcc,
1092 if ((devtype
& 0xff) == type
) {
1093 *addr
= component_base
;
1099 } while (romentry
> 0);
1101 dap_ap_select(dap
, apselold
);
1106 static int dap_info_command(struct command_context
*cmd_ctx
,
1107 struct adiv5_dap
*dap
, int apsel
)
1110 uint32_t dbgbase
, apid
;
1111 int romtable_present
= 0;
1115 retval
= dap_get_debugbase(dap
, apsel
, &dbgbase
, &apid
);
1116 if (retval
!= ERROR_OK
)
1119 apselold
= dap
->apsel
;
1120 dap_ap_select(dap
, apsel
);
1122 /* Now we read ROM table ID registers, ref. ARM IHI 0029B sec */
1123 mem_ap
= ((apid
&0x10000) && ((apid
&0x0F) != 0));
1124 command_print(cmd_ctx
, "AP ID register 0x%8.8" PRIx32
, apid
);
1130 command_print(cmd_ctx
, "\tType is JTAG-AP");
1133 command_print(cmd_ctx
, "\tType is MEM-AP AHB");
1136 command_print(cmd_ctx
, "\tType is MEM-AP APB");
1139 command_print(cmd_ctx
, "\tUnknown AP type");
1143 /* NOTE: a MEM-AP may have a single CoreSight component that's
1144 * not a ROM table ... or have no such components at all.
1147 command_print(cmd_ctx
, "AP BASE 0x%8.8" PRIx32
,
1152 command_print(cmd_ctx
, "No AP found at this apsel 0x%x", apsel
);
1155 romtable_present
= ((mem_ap
) && (dbgbase
!= 0xFFFFFFFF));
1156 if (romtable_present
)
1158 uint32_t cid0
,cid1
,cid2
,cid3
,memtype
,romentry
;
1159 uint16_t entry_offset
;
1161 /* bit 16 of apid indicates a memory access port */
1163 command_print(cmd_ctx
, "\tValid ROM table present");
1165 command_print(cmd_ctx
, "\tROM table in legacy format");
1167 /* Now we read ROM table ID registers, ref. ARM IHI 0029B sec */
1168 retval
= mem_ap_read_u32(dap
, (dbgbase
&0xFFFFF000) | 0xFF0, &cid0
);
1169 if (retval
!= ERROR_OK
)
1171 retval
= mem_ap_read_u32(dap
, (dbgbase
&0xFFFFF000) | 0xFF4, &cid1
);
1172 if (retval
!= ERROR_OK
)
1174 retval
= mem_ap_read_u32(dap
, (dbgbase
&0xFFFFF000) | 0xFF8, &cid2
);
1175 if (retval
!= ERROR_OK
)
1177 retval
= mem_ap_read_u32(dap
, (dbgbase
&0xFFFFF000) | 0xFFC, &cid3
);
1178 if (retval
!= ERROR_OK
)
1180 retval
= mem_ap_read_u32(dap
, (dbgbase
&0xFFFFF000) | 0xFCC, &memtype
);
1181 if (retval
!= ERROR_OK
)
1183 retval
= dap_run(dap
);
1184 if (retval
!= ERROR_OK
)
1187 if (!is_dap_cid_ok(cid3
, cid2
, cid1
, cid0
))
1188 command_print(cmd_ctx
, "\tCID3 0x%2.2x"
1192 (unsigned) cid3
, (unsigned)cid2
,
1193 (unsigned) cid1
, (unsigned) cid0
);
1195 command_print(cmd_ctx
, "\tMEMTYPE system memory present on bus");
1197 command_print(cmd_ctx
, "\tMEMTYPE System memory not present. "
1198 "Dedicated debug bus.");
1200 /* Now we read ROM table entries from dbgbase&0xFFFFF000) | 0x000 until we get 0x00000000 */
1204 retval
= mem_ap_read_atomic_u32(dap
, (dbgbase
&0xFFFFF000) | entry_offset
, &romentry
);
1205 if (retval
!= ERROR_OK
)
1207 command_print(cmd_ctx
, "\tROMTABLE[0x%x] = 0x%" PRIx32
"",entry_offset
,romentry
);
1210 uint32_t c_cid0
, c_cid1
, c_cid2
, c_cid3
;
1211 uint32_t c_pid0
, c_pid1
, c_pid2
, c_pid3
, c_pid4
;
1212 uint32_t component_base
;
1216 component_base
= (dbgbase
& 0xFFFFF000)
1217 + (romentry
& 0xFFFFF000);
1219 /* IDs are in last 4K section */
1222 retval
= mem_ap_read_atomic_u32(dap
,
1223 component_base
+ 0xFE0, &c_pid0
);
1224 if (retval
!= ERROR_OK
)
1227 retval
= mem_ap_read_atomic_u32(dap
,
1228 component_base
+ 0xFE4, &c_pid1
);
1229 if (retval
!= ERROR_OK
)
1232 retval
= mem_ap_read_atomic_u32(dap
,
1233 component_base
+ 0xFE8, &c_pid2
);
1234 if (retval
!= ERROR_OK
)
1237 retval
= mem_ap_read_atomic_u32(dap
,
1238 component_base
+ 0xFEC, &c_pid3
);
1239 if (retval
!= ERROR_OK
)
1242 retval
= mem_ap_read_atomic_u32(dap
,
1243 component_base
+ 0xFD0, &c_pid4
);
1244 if (retval
!= ERROR_OK
)
1248 retval
= mem_ap_read_atomic_u32(dap
,
1249 component_base
+ 0xFF0, &c_cid0
);
1250 if (retval
!= ERROR_OK
)
1253 retval
= mem_ap_read_atomic_u32(dap
,
1254 component_base
+ 0xFF4, &c_cid1
);
1255 if (retval
!= ERROR_OK
)
1258 retval
= mem_ap_read_atomic_u32(dap
,
1259 component_base
+ 0xFF8, &c_cid2
);
1260 if (retval
!= ERROR_OK
)
1263 retval
= mem_ap_read_atomic_u32(dap
,
1264 component_base
+ 0xFFC, &c_cid3
);
1265 if (retval
!= ERROR_OK
)
1270 command_print(cmd_ctx
,
1271 "\t\tComponent base address 0x%" PRIx32
1272 ", start address 0x%" PRIx32
,
1274 /* component may take multiple 4K pages */
1275 component_base
- 0x1000*(c_pid4
>> 4));
1276 command_print(cmd_ctx
, "\t\tComponent class is 0x%x, %s",
1277 (int) (c_cid1
>> 4) & 0xf,
1278 /* See ARM IHI 0029B Table 3-3 */
1279 class_description
[(c_cid1
>> 4) & 0xf]);
1281 /* CoreSight component? */
1282 if (((c_cid1
>> 4) & 0x0f) == 9) {
1285 char *major
= "Reserved", *subtype
= "Reserved";
1287 retval
= mem_ap_read_atomic_u32(dap
,
1288 (component_base
& 0xfffff000) | 0xfcc,
1290 if (retval
!= ERROR_OK
)
1292 minor
= (devtype
>> 4) & 0x0f;
1293 switch (devtype
& 0x0f) {
1295 major
= "Miscellaneous";
1301 subtype
= "Validation component";
1306 major
= "Trace Sink";
1320 major
= "Trace Link";
1326 subtype
= "Funnel, router";
1332 subtype
= "FIFO, buffer";
1337 major
= "Trace Source";
1343 subtype
= "Processor";
1349 subtype
= "Engine/Coprocessor";
1357 major
= "Debug Control";
1363 subtype
= "Trigger Matrix";
1366 subtype
= "Debug Auth";
1371 major
= "Debug Logic";
1377 subtype
= "Processor";
1383 subtype
= "Engine/Coprocessor";
1388 command_print(cmd_ctx
, "\t\tType is 0x%2.2x, %s, %s",
1389 (unsigned) (devtype
& 0xff),
1391 /* REVISIT also show 0xfc8 DevId */
1394 if (!is_dap_cid_ok(cid3
, cid2
, cid1
, cid0
))
1395 command_print(cmd_ctx
,
1404 command_print(cmd_ctx
,
1405 "\t\tPeripheral ID[4..0] = hex "
1406 "%2.2x %2.2x %2.2x %2.2x %2.2x",
1407 (int) c_pid4
, (int) c_pid3
, (int) c_pid2
,
1408 (int) c_pid1
, (int) c_pid0
);
1410 /* Part number interpretations are from Cortex
1411 * core specs, the CoreSight components TRM
1412 * (ARM DDI 0314H), and ETM specs; also from
1413 * chip observation (e.g. TI SDTI).
1415 part_num
= (c_pid0
& 0xff);
1416 part_num
|= (c_pid1
& 0x0f) << 8;
1419 type
= "Cortex-M3 NVIC";
1420 full
= "(Interrupt Controller)";
1423 type
= "Cortex-M3 ITM";
1424 full
= "(Instrumentation Trace Module)";
1427 type
= "Cortex-M3 DWT";
1428 full
= "(Data Watchpoint and Trace)";
1431 type
= "Cortex-M3 FBP";
1432 full
= "(Flash Patch and Breakpoint)";
1435 type
= "CoreSight ETM11";
1436 full
= "(Embedded Trace)";
1438 // case 0x113: what?
1439 case 0x120: /* from OMAP3 memmap */
1441 full
= "(System Debug Trace Interface)";
1443 case 0x343: /* from OMAP3 memmap */
1448 type
= "Coresight CTI";
1449 full
= "(Cross Trigger)";
1452 type
= "Coresight ETB";
1453 full
= "(Trace Buffer)";
1456 type
= "Coresight CSTF";
1457 full
= "(Trace Funnel)";
1460 type
= "CoreSight ETM9";
1461 full
= "(Embedded Trace)";
1464 type
= "Coresight TPIU";
1465 full
= "(Trace Port Interface Unit)";
1468 type
= "Cortex-A8 ETM";
1469 full
= "(Embedded Trace)";
1472 type
= "Cortex-A8 CTI";
1473 full
= "(Cross Trigger)";
1476 type
= "Cortex-M3 TPIU";
1477 full
= "(Trace Port Interface Unit)";
1480 type
= "Cortex-M3 ETM";
1481 full
= "(Embedded Trace)";
1484 type
= "Cortex-A8 Debug";
1485 full
= "(Debug Unit)";
1488 type
= "-*- unrecognized -*-";
1492 command_print(cmd_ctx
, "\t\tPart is %s %s",
1498 command_print(cmd_ctx
, "\t\tComponent not present");
1500 command_print(cmd_ctx
, "\t\tEnd of ROM table");
1503 } while (romentry
> 0);
1507 command_print(cmd_ctx
, "\tNo ROM table present");
1509 dap_ap_select(dap
, apselold
);
1514 COMMAND_HANDLER(handle_dap_info_command
)
1516 struct target
*target
= get_current_target(CMD_CTX
);
1517 struct arm
*arm
= target_to_arm(target
);
1518 struct adiv5_dap
*dap
= arm
->dap
;
1526 COMMAND_PARSE_NUMBER(u32
, CMD_ARGV
[0], apsel
);
1529 return ERROR_COMMAND_SYNTAX_ERROR
;
1532 return dap_info_command(CMD_CTX
, dap
, apsel
);
1535 COMMAND_HANDLER(dap_baseaddr_command
)
1537 struct target
*target
= get_current_target(CMD_CTX
);
1538 struct arm
*arm
= target_to_arm(target
);
1539 struct adiv5_dap
*dap
= arm
->dap
;
1541 uint32_t apsel
, apselsave
, baseaddr
;
1544 apselsave
= dap
->apsel
;
1550 COMMAND_PARSE_NUMBER(u32
, CMD_ARGV
[0], apsel
);
1551 /* AP address is in bits 31:24 of DP_SELECT */
1553 return ERROR_INVALID_ARGUMENTS
;
1556 return ERROR_COMMAND_SYNTAX_ERROR
;
1559 if (apselsave
!= apsel
)
1560 dap_ap_select(dap
, apsel
);
1562 /* NOTE: assumes we're talking to a MEM-AP, which
1563 * has a base address. There are other kinds of AP,
1564 * though they're not common for now. This should
1565 * use the ID register to verify it's a MEM-AP.
1567 retval
= dap_queue_ap_read(dap
, AP_REG_BASE
, &baseaddr
);
1568 if (retval
!= ERROR_OK
)
1570 retval
= dap_run(dap
);
1571 if (retval
!= ERROR_OK
)
1574 command_print(CMD_CTX
, "0x%8.8" PRIx32
, baseaddr
);
1576 if (apselsave
!= apsel
)
1577 dap_ap_select(dap
, apselsave
);
1582 COMMAND_HANDLER(dap_memaccess_command
)
1584 struct target
*target
= get_current_target(CMD_CTX
);
1585 struct arm
*arm
= target_to_arm(target
);
1586 struct adiv5_dap
*dap
= arm
->dap
;
1588 uint32_t memaccess_tck
;
1592 memaccess_tck
= dap
->memaccess_tck
;
1595 COMMAND_PARSE_NUMBER(u32
, CMD_ARGV
[0], memaccess_tck
);
1598 return ERROR_COMMAND_SYNTAX_ERROR
;
1600 dap
->memaccess_tck
= memaccess_tck
;
1602 command_print(CMD_CTX
, "memory bus access delay set to %" PRIi32
" tck",
1603 dap
->memaccess_tck
);
1608 COMMAND_HANDLER(dap_apsel_command
)
1610 struct target
*target
= get_current_target(CMD_CTX
);
1611 struct arm
*arm
= target_to_arm(target
);
1612 struct adiv5_dap
*dap
= arm
->dap
;
1614 uint32_t apsel
, apid
;
1622 COMMAND_PARSE_NUMBER(u32
, CMD_ARGV
[0], apsel
);
1623 /* AP address is in bits 31:24 of DP_SELECT */
1625 return ERROR_INVALID_ARGUMENTS
;
1628 return ERROR_COMMAND_SYNTAX_ERROR
;
1631 dap_ap_select(dap
, apsel
);
1632 retval
= dap_queue_ap_read(dap
, AP_REG_IDR
, &apid
);
1633 if (retval
!= ERROR_OK
)
1635 retval
= dap_run(dap
);
1636 if (retval
!= ERROR_OK
)
1639 command_print(CMD_CTX
, "ap %" PRIi32
" selected, identification register 0x%8.8" PRIx32
,
1645 COMMAND_HANDLER(dap_apid_command
)
1647 struct target
*target
= get_current_target(CMD_CTX
);
1648 struct arm
*arm
= target_to_arm(target
);
1649 struct adiv5_dap
*dap
= arm
->dap
;
1651 uint32_t apsel
, apselsave
, apid
;
1654 apselsave
= dap
->apsel
;
1660 COMMAND_PARSE_NUMBER(u32
, CMD_ARGV
[0], apsel
);
1661 /* AP address is in bits 31:24 of DP_SELECT */
1663 return ERROR_INVALID_ARGUMENTS
;
1666 return ERROR_COMMAND_SYNTAX_ERROR
;
1669 if (apselsave
!= apsel
)
1670 dap_ap_select(dap
, apsel
);
1672 retval
= dap_queue_ap_read(dap
, AP_REG_IDR
, &apid
);
1673 if (retval
!= ERROR_OK
)
1675 retval
= dap_run(dap
);
1676 if (retval
!= ERROR_OK
)
1679 command_print(CMD_CTX
, "0x%8.8" PRIx32
, apid
);
1680 if (apselsave
!= apsel
)
1681 dap_ap_select(dap
, apselsave
);
1686 static const struct command_registration dap_commands
[] = {
1689 .handler
= handle_dap_info_command
,
1690 .mode
= COMMAND_EXEC
,
1691 .help
= "display ROM table for MEM-AP "
1692 "(default currently selected AP)",
1693 .usage
= "[ap_num]",
1697 .handler
= dap_apsel_command
,
1698 .mode
= COMMAND_EXEC
,
1699 .help
= "Set the currently selected AP (default 0) "
1700 "and display the result",
1701 .usage
= "[ap_num]",
1705 .handler
= dap_apid_command
,
1706 .mode
= COMMAND_EXEC
,
1707 .help
= "return ID register from AP "
1708 "(default currently selected AP)",
1709 .usage
= "[ap_num]",
1713 .handler
= dap_baseaddr_command
,
1714 .mode
= COMMAND_EXEC
,
1715 .help
= "return debug base address from MEM-AP "
1716 "(default currently selected AP)",
1717 .usage
= "[ap_num]",
1720 .name
= "memaccess",
1721 .handler
= dap_memaccess_command
,
1722 .mode
= COMMAND_EXEC
,
1723 .help
= "set/get number of extra tck for MEM-AP memory "
1724 "bus access [0-255]",
1725 .usage
= "[cycles]",
1727 COMMAND_REGISTRATION_DONE
1730 const struct command_registration dap_command_handlers
[] = {
1733 .mode
= COMMAND_EXEC
,
1734 .help
= "DAP command group",
1735 .chain
= dap_commands
,
1737 COMMAND_REGISTRATION_DONE