f87f37a5e2878e2fe48ffa44e231e58c8ea3cec4
[openocd.git] / src / target / arm_jtag.c
1 /***************************************************************************
2 * Copyright (C) 2005 by Dominic Rath *
3 * Dominic.Rath@gmx.de *
4 * *
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. *
9 * *
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. *
14 * *
15 * You should have received a copy of the GNU General Public License *
16 * along with this program; if not, write to the *
17 * Free Software Foundation, Inc., *
18 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
19 ***************************************************************************/
20 #ifdef HAVE_CONFIG_H
21 #include "config.h"
22 #endif
23
24 #include "arm_jtag.h"
25
26 #include "binarybuffer.h"
27 #include "log.h"
28 #include "jtag.h"
29
30 #include <stdlib.h>
31
32 #if 0
33 #define _ARM_JTAG_SCAN_N_CHECK_
34 #endif
35
36 int arm_jtag_set_instr_error_handler(u8 *in_value, void *priv)
37 {
38 ERROR("setting the new JTAG instruction failed, debugging is likely to be broken");
39
40 return ERROR_OK;
41 }
42
43 int arm_jtag_set_instr(arm_jtag_t *jtag_info, u32 new_instr, error_handler_t *caller_error_handler)
44 {
45 jtag_device_t *device = jtag_get_device(jtag_info->chain_pos);
46
47 if (buf_get_u32(device->cur_instr, 0, device->ir_length) != new_instr)
48 {
49 scan_field_t field;
50
51 field.device = jtag_info->chain_pos;
52 field.num_bits = device->ir_length;
53 field.out_value = calloc(CEIL(field.num_bits, 8), 1);
54 buf_set_u32(field.out_value, 0, field.num_bits, new_instr);
55 field.out_mask = NULL;
56 field.in_value = NULL;
57 field.in_check_value = NULL;
58 field.in_check_mask = NULL;
59 field.in_handler = NULL;
60 field.in_handler_priv = NULL;
61
62
63
64 if (caller_error_handler)
65 {
66 jtag_set_check_value(&field, NULL, NULL, caller_error_handler);
67 }
68 else
69 {
70 error_handler_t error_handler;
71 error_handler.error_handler = arm_jtag_set_instr_error_handler;
72 error_handler.error_handler_priv = NULL;
73 jtag_set_check_value(&field, NULL, NULL, &error_handler);
74 }
75 jtag_add_ir_scan(1, &field, -1, NULL);
76
77
78 free(field.out_value);
79 }
80
81 return ERROR_OK;
82 }
83
84 int arm_jtag_scann(arm_jtag_t *jtag_info, u32 new_scan_chain)
85 {
86 if(jtag_info->cur_scan_chain != new_scan_chain)
87 {
88 #ifdef _ARM_JTAG_SCAN_N_CHECK_
89 u8 scan_n_check_value = 0x10;
90 #endif
91 scan_field_t field;
92
93 field.device = jtag_info->chain_pos;
94 field.num_bits = jtag_info->scann_size;
95 field.out_value = calloc(CEIL(field.num_bits, 8), 1);
96 buf_set_u32(field.out_value, 0, field.num_bits, new_scan_chain);
97 field.out_mask = NULL;
98 field.in_value = NULL;
99 #ifdef _ARM_JTAG_SCAN_N_CHECK_
100 jtag_set_check_value(&field, &scan_n_check_value, NULL, NULL, NULL);
101 #else
102 field.in_handler = NULL;
103 field.in_handler_priv = NULL;
104 #endif
105
106
107 arm_jtag_set_instr(jtag_info, jtag_info->scann_instr, NULL);
108 jtag_add_dr_scan(1, &field, -1, NULL);
109
110 jtag_info->cur_scan_chain = new_scan_chain;
111
112 free(field.out_value);
113 }
114
115 return ERROR_OK;
116 }
117
118 int arm_jtag_reset_callback(enum jtag_event event, void *priv)
119 {
120 arm_jtag_t *jtag_info = priv;
121
122 if (event == JTAG_TRST_ASSERTED)
123 {
124 jtag_info->cur_scan_chain = 0;
125 }
126
127 return ERROR_OK;
128 }
129
130 int arm_jtag_setup_connection(arm_jtag_t *jtag_info)
131 {
132 jtag_info->scann_instr = 0x2;
133 jtag_info->cur_scan_chain = 0;
134 jtag_info->intest_instr = 0xc;
135
136 jtag_register_event_callback(arm_jtag_reset_callback, jtag_info);
137
138 return ERROR_OK;
139 }
140
141 /* read JTAG buffer into host-endian u32, flipping bit-order */
142 int arm_jtag_buf_to_u32_flip(u8 *in_buf, void *priv)
143 {
144 u32 *dest = priv;
145 *dest = flip_u32(le_to_h_u32(in_buf), 32);
146 return ERROR_OK;
147 }
148
149 /* read JTAG buffer into little-endian u32, flipping bit-order */
150 int arm_jtag_buf_to_le32_flip(u8 *in_buf, void *priv)
151 {
152 h_u32_to_le(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32));
153 return ERROR_OK;
154 }
155
156 /* read JTAG buffer into little-endian u16, flipping bit-order */
157 int arm_jtag_buf_to_le16_flip(u8 *in_buf, void *priv)
158 {
159 h_u16_to_le(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32) & 0xffff);
160 return ERROR_OK;
161 }
162
163 /* read JTAG buffer into big-endian u32, flipping bit-order */
164 int arm_jtag_buf_to_be32_flip(u8 *in_buf, void *priv)
165 {
166 h_u32_to_be(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32));
167 return ERROR_OK;
168 }
169
170 /* read JTAG buffer into big-endian u16, flipping bit-order */
171 int arm_jtag_buf_to_be16_flip(u8 *in_buf, void *priv)
172 {
173 h_u16_to_be(((u8*)priv), flip_u32(le_to_h_u32(in_buf), 32) & 0xffff);
174 return ERROR_OK;
175 }
176
177 /* read JTAG buffer into u8, flipping bit-order */
178 int arm_jtag_buf_to_8_flip(u8 *in_buf, void *priv)
179 {
180 u8 *dest = priv;
181 *dest = flip_u32(le_to_h_u32(in_buf), 32) & 0xff;
182 return ERROR_OK;
183 }
184
185 /* not-flipping variants */
186 /* read JTAG buffer into host-endian u32 */
187 int arm_jtag_buf_to_u32(u8 *in_buf, void *priv)
188 {
189 u32 *dest = priv;
190 *dest = le_to_h_u32(in_buf);
191 return ERROR_OK;
192 }
193
194 /* read JTAG buffer into little-endian u32 */
195 int arm_jtag_buf_to_le32(u8 *in_buf, void *priv)
196 {
197 h_u32_to_le(((u8*)priv), le_to_h_u32(in_buf));
198 return ERROR_OK;
199 }
200
201 /* read JTAG buffer into little-endian u16 */
202 int arm_jtag_buf_to_le16(u8 *in_buf, void *priv)
203 {
204 h_u16_to_le(((u8*)priv), le_to_h_u32(in_buf) & 0xffff);
205 return ERROR_OK;
206 }
207
208 /* read JTAG buffer into big-endian u32 */
209 int arm_jtag_buf_to_be32(u8 *in_buf, void *priv)
210 {
211 h_u32_to_be(((u8*)priv), le_to_h_u32(in_buf));
212 return ERROR_OK;
213 }
214
215 /* read JTAG buffer into big-endian u16 */
216 int arm_jtag_buf_to_be16(u8 *in_buf, void *priv)
217 {
218 h_u16_to_be(((u8*)priv), le_to_h_u32(in_buf) & 0xffff);
219 return ERROR_OK;
220 }
221
222 /* read JTAG buffer into u8 */
223 int arm_jtag_buf_to_8(u8 *in_buf, void *priv)
224 {
225 u8 *dest = priv;
226 *dest = le_to_h_u32(in_buf) & 0xff;
227 return ERROR_OK;
228 }