1 /***************************************************************************
2 * Copyright (C) 2009 by Mathias Kuester *
3 * mkdorg@users.sourceforge.net *
5 * This program is free software; you can redistribute it and/or modify *
6 * it under the terms of the GNU General Public License as published by *
7 * the Free Software Foundation; either version 2 of the License, or *
8 * (at your option) any later version. *
10 * This program is distributed in the hope that it will be useful, *
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
13 * GNU General Public License for more details. *
15 * You should have received a copy of the GNU General Public License *
16 * along with this program. If not, see <http://www.gnu.org/licenses/>. *
17 ***************************************************************************/
26 #include "target_type.h"
29 #include "dsp563xx_once.h"
31 #define JTAG_STATUS_STATIC_MASK 0x03
32 #define JTAG_STATUS_STATIC_VALUE 0x01
34 #define JTAG_STATUS_NORMAL 0x01
35 #define JTAG_STATUS_STOPWAIT 0x05
36 #define JTAG_STATUS_BUSY 0x09
37 #define JTAG_STATUS_DEBUG 0x0d
39 #define JTAG_INSTR_EXTEST 0x00
40 #define JTAG_INSTR_SAMPLE_PRELOAD 0x01
41 #define JTAG_INSTR_IDCODE 0x02
42 #define JTAG_INSTR_HIZ 0x04
43 #define JTAG_INSTR_CLAMP 0x05
44 #define JTAG_INSTR_ENABLE_ONCE 0x06
45 #define JTAG_INSTR_DEBUG_REQUEST 0x07
46 #define JTAG_INSTR_BYPASS 0x0F
49 static inline int dsp563xx_write_dr(struct jtag_tap *tap, uint8_t *dr_in, uint8_t *dr_out, int dr_len, int rti)
51 jtag_add_plain_dr_scan(dr_len, dr_out, dr_in, TAP_IDLE);
57 static inline int dsp563xx_write_dr_u8(struct jtag_tap *tap, uint8_t *dr_in, uint8_t dr_out, int dr_len, int rti)
59 return dsp563xx_write_dr(tap, dr_in, &dr_out, dr_len, rti);
63 static inline int dsp563xx_write_dr_u32(struct jtag_tap *tap, uint32_t *dr_in, uint32_t dr_out, int dr_len, int rti)
65 return dsp563xx_write_dr(tap, (uint8_t *) dr_in, (uint8_t *) &dr_out, dr_len, rti);
68 /** single word instruction */
69 static inline int dsp563xx_once_ir_exec(struct jtag_tap *tap, int flush, uint8_t instr,
70 uint8_t rw, uint8_t go, uint8_t ex)
74 err = dsp563xx_write_dr_u8(tap, 0, instr | (ex << 5) | (go << 6) | (rw << 7), 8, 0);
78 err = jtag_execute_queue();
82 /* IR and DR functions */
83 static inline int dsp563xx_write_ir(struct jtag_tap *tap, uint8_t *ir_in, uint8_t *ir_out, int ir_len, int rti)
85 jtag_add_plain_ir_scan(tap->ir_length, ir_out, ir_in, TAP_IDLE);
90 static inline int dsp563xx_write_ir_u8(struct jtag_tap *tap, uint8_t *ir_in, uint8_t ir_out, int ir_len, int rti)
92 return dsp563xx_write_ir(tap, ir_in, &ir_out, ir_len, rti);
95 static inline int dsp563xx_jtag_sendinstr(struct jtag_tap *tap, uint8_t *ir_in, uint8_t ir_out)
97 return dsp563xx_write_ir_u8(tap, ir_in, ir_out, tap->ir_length, 1);
101 int dsp563xx_once_target_status(struct jtag_tap *tap)
106 err = dsp563xx_jtag_sendinstr(tap, &jtag_status, JTAG_INSTR_ENABLE_ONCE);
108 return TARGET_UNKNOWN;
109 err = jtag_execute_queue();
111 return TARGET_UNKNOWN;
113 /* verify correct static status pattern */
114 if ((jtag_status & JTAG_STATUS_STATIC_MASK) != JTAG_STATUS_STATIC_VALUE)
115 return TARGET_UNKNOWN;
117 if (jtag_status != JTAG_STATUS_DEBUG)
118 return TARGET_RUNNING;
120 return TARGET_HALTED;
124 int dsp563xx_once_request_debug(struct jtag_tap *tap, int reset_state)
127 uint8_t ir_in = 0, pattern = 0;
130 /* in reset state we only get a ACK
131 * from the interface */
135 pattern = JTAG_STATUS_DEBUG;
137 /* wait until we get the ack */
138 while (ir_in != pattern) {
139 err = dsp563xx_jtag_sendinstr(tap, &ir_in, JTAG_INSTR_DEBUG_REQUEST);
142 err = jtag_execute_queue();
146 LOG_DEBUG("debug request: %02X", ir_in);
149 return ERROR_TARGET_FAILURE;
152 /* we cant enable the once in reset state */
156 /* try to enable once */
159 while (ir_in != pattern) {
160 err = dsp563xx_jtag_sendinstr(tap, &ir_in, JTAG_INSTR_ENABLE_ONCE);
163 err = jtag_execute_queue();
167 LOG_DEBUG("enable once: %02X", ir_in);
169 if (retry++ == 100) {
171 return ERROR_TARGET_FAILURE;
175 if (ir_in != JTAG_STATUS_DEBUG)
176 return ERROR_TARGET_FAILURE;
181 /** once read registers */
182 int dsp563xx_once_read_register(struct jtag_tap *tap, int flush, struct once_reg *regs, int len)
187 for (i = 0; i < len; i++) {
188 err = dsp563xx_once_reg_read_ex(tap, flush, regs[i].addr, regs[i].len, ®s[i].reg);
194 err = jtag_execute_queue();
198 /** once read register with register len */
199 int dsp563xx_once_reg_read_ex(struct jtag_tap *tap, int flush, uint8_t reg, uint8_t len, uint32_t *data)
203 err = dsp563xx_once_ir_exec(tap, 1, reg, 1, 0, 0);
206 err = dsp563xx_write_dr_u32(tap, data, 0x00, len, 0);
210 err = jtag_execute_queue();
215 /** once read register */
216 int dsp563xx_once_reg_read(struct jtag_tap *tap, int flush, uint8_t reg, uint32_t *data)
220 err = dsp563xx_once_ir_exec(tap, flush, reg, 1, 0, 0);
223 err = dsp563xx_write_dr_u32(tap, data, 0x00, 24, 0);
227 err = jtag_execute_queue();
232 /** once write register */
233 int dsp563xx_once_reg_write(struct jtag_tap *tap, int flush, uint8_t reg, uint32_t data)
237 err = dsp563xx_once_ir_exec(tap, flush, reg, 0, 0, 0);
240 err = dsp563xx_write_dr_u32(tap, 0x00, data, 24, 0);
244 err = jtag_execute_queue();
248 /** single word instruction */
249 int dsp563xx_once_execute_sw_ir(struct jtag_tap *tap, int flush, uint32_t opcode)
253 err = dsp563xx_once_ir_exec(tap, flush, DSP563XX_ONCE_OPDBR, 0, 1, 0);
256 err = dsp563xx_write_dr_u32(tap, 0, opcode, 24, 0);
260 err = jtag_execute_queue();
264 /** double word instruction */
265 int dsp563xx_once_execute_dw_ir(struct jtag_tap *tap, int flush, uint32_t opcode, uint32_t operand)
269 err = dsp563xx_once_ir_exec(tap, flush, DSP563XX_ONCE_OPDBR, 0, 0, 0);
272 err = dsp563xx_write_dr_u32(tap, 0, opcode, 24, 0);
276 err = jtag_execute_queue();
281 err = dsp563xx_once_ir_exec(tap, flush, DSP563XX_ONCE_OPDBR, 0, 1, 0);
284 err = dsp563xx_write_dr_u32(tap, 0, operand, 24, 0);
288 err = jtag_execute_queue();