67ff8a6b452a11524bc005487af391fd8bca6c3b
[fw/openocd] / src / target / arm966e.c
1 /***************************************************************************
2  *   Copyright (C) 2005 by Dominic Rath                                    *
3  *   Dominic.Rath@gmx.de                                                   *
4  *                                                                         *
5  *   Copyright (C) 2008 by Spencer Oliver                                  *
6  *   spen@spen-soft.co.uk                                                  *
7  *                                                                         *
8  *   This program is free software; you can redistribute it and/or modify  *
9  *   it under the terms of the GNU General Public License as published by  *
10  *   the Free Software Foundation; either version 2 of the License, or     *
11  *   (at your option) any later version.                                   *
12  *                                                                         *
13  *   This program is distributed in the hope that it will be useful,       *
14  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
15  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
16  *   GNU General Public License for more details.                          *
17  *                                                                         *
18  *   You should have received a copy of the GNU General Public License     *
19  *   along with this program; if not, write to the                         *
20  *   Free Software Foundation, Inc.,                                       *
21  *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
22  ***************************************************************************/
23 #ifdef HAVE_CONFIG_H
24 #include "config.h"
25 #endif
26
27 #include "arm966e.h"
28 #include "target_type.h"
29
30
31 #if 0
32 #define _DEBUG_INSTRUCTION_EXECUTION_
33 #endif
34
35 /* cli handling */
36 int arm966e_register_commands(struct command_context_s *cmd_ctx);
37
38 /* forward declarations */
39 int arm966e_target_create(struct target_s *target, Jim_Interp *interp);
40 int arm966e_init_target(struct command_context_s *cmd_ctx, struct target_s *target);
41 int arm966e_quit(void);
42
43 target_type_t arm966e_target =
44 {
45         .name = "arm966e",
46
47         .poll = arm7_9_poll,
48         .arch_state = armv4_5_arch_state,
49
50         .target_request_data = arm7_9_target_request_data,
51
52         .halt = arm7_9_halt,
53         .resume = arm7_9_resume,
54         .step = arm7_9_step,
55
56         .assert_reset = arm7_9_assert_reset,
57         .deassert_reset = arm7_9_deassert_reset,
58         .soft_reset_halt = arm7_9_soft_reset_halt,
59
60         .get_gdb_reg_list = armv4_5_get_gdb_reg_list,
61
62         .read_memory = arm7_9_read_memory,
63         .write_memory = arm7_9_write_memory,
64         .bulk_write_memory = arm7_9_bulk_write_memory,
65         .checksum_memory = arm7_9_checksum_memory,
66         .blank_check_memory = arm7_9_blank_check_memory,
67
68         .run_algorithm = armv4_5_run_algorithm,
69
70         .add_breakpoint = arm7_9_add_breakpoint,
71         .remove_breakpoint = arm7_9_remove_breakpoint,
72         .add_watchpoint = arm7_9_add_watchpoint,
73         .remove_watchpoint = arm7_9_remove_watchpoint,
74
75         .register_commands = arm966e_register_commands,
76         .target_create = arm966e_target_create,
77         .init_target = arm966e_init_target,
78         .examine = arm9tdmi_examine,
79         .quit = arm966e_quit,
80 };
81
82 int arm966e_init_target(struct command_context_s *cmd_ctx, struct target_s *target)
83 {
84         arm9tdmi_init_target(cmd_ctx, target);
85
86         return ERROR_OK;
87 }
88
89 int arm966e_quit(void)
90 {
91         return ERROR_OK;
92 }
93
94 int arm966e_init_arch_info(target_t *target, arm966e_common_t *arm966e, jtag_tap_t *tap)
95 {
96         arm9tdmi_common_t *arm9tdmi = &arm966e->arm9tdmi_common;
97         arm7_9_common_t *arm7_9 = &arm9tdmi->arm7_9_common;
98
99         arm9tdmi_init_arch_info(target, arm9tdmi, tap);
100
101         arm9tdmi->arch_info = arm966e;
102         arm966e->common_magic = ARM966E_COMMON_MAGIC;
103
104         /* The ARM966E-S implements the ARMv5TE architecture which
105          * has the BKPT instruction, so we don't have to use a watchpoint comparator
106          */
107         arm7_9->arm_bkpt = ARMV5_BKPT(0x0);
108         arm7_9->thumb_bkpt = ARMV5_T_BKPT(0x0) & 0xffff;
109
110         return ERROR_OK;
111 }
112
113 int arm966e_target_create( struct target_s *target, Jim_Interp *interp )
114 {
115         arm966e_common_t *arm966e = calloc(1,sizeof(arm966e_common_t));
116
117         arm966e_init_arch_info(target, arm966e, target->tap);
118
119         return ERROR_OK;
120 }
121
122 int arm966e_get_arch_pointers(target_t *target, armv4_5_common_t **armv4_5_p, arm7_9_common_t **arm7_9_p, arm9tdmi_common_t **arm9tdmi_p, arm966e_common_t **arm966e_p)
123 {
124         armv4_5_common_t *armv4_5 = target->arch_info;
125         arm7_9_common_t *arm7_9;
126         arm9tdmi_common_t *arm9tdmi;
127         arm966e_common_t *arm966e;
128
129         if (armv4_5->common_magic != ARMV4_5_COMMON_MAGIC)
130         {
131                 return -1;
132         }
133
134         arm7_9 = armv4_5->arch_info;
135         if (arm7_9->common_magic != ARM7_9_COMMON_MAGIC)
136         {
137                 return -1;
138         }
139
140         arm9tdmi = arm7_9->arch_info;
141         if (arm9tdmi->common_magic != ARM9TDMI_COMMON_MAGIC)
142         {
143                 return -1;
144         }
145
146         arm966e = arm9tdmi->arch_info;
147         if (arm966e->common_magic != ARM966E_COMMON_MAGIC)
148         {
149                 return -1;
150         }
151
152         *armv4_5_p = armv4_5;
153         *arm7_9_p = arm7_9;
154         *arm9tdmi_p = arm9tdmi;
155         *arm966e_p = arm966e;
156
157         return ERROR_OK;
158 }
159
160 int arm966e_read_cp15(target_t *target, int reg_addr, uint32_t *value)
161 {
162         int retval = ERROR_OK;
163         armv4_5_common_t *armv4_5 = target->arch_info;
164         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
165         arm_jtag_t *jtag_info = &arm7_9->jtag_info;
166         scan_field_t fields[3];
167         uint8_t reg_addr_buf = reg_addr & 0x3f;
168         uint8_t nr_w_buf = 0;
169
170         jtag_set_end_state(TAP_IDLE);
171         if ((retval = arm_jtag_scann(jtag_info, 0xf)) != ERROR_OK)
172         {
173                 return retval;
174         }
175         arm_jtag_set_instr(jtag_info, jtag_info->intest_instr, NULL);
176
177         fields[0].tap = jtag_info->tap;
178         fields[0].num_bits = 32;
179         fields[0].out_value = NULL;
180         fields[0].in_value = NULL;
181
182         fields[1].tap = jtag_info->tap;
183         fields[1].num_bits = 6;
184         fields[1].out_value = &reg_addr_buf;
185         fields[1].in_value = NULL;
186
187         fields[2].tap = jtag_info->tap;
188         fields[2].num_bits = 1;
189         fields[2].out_value = &nr_w_buf;
190         fields[2].in_value = NULL;
191
192         jtag_add_dr_scan(3, fields, jtag_get_end_state());
193
194         fields[1].in_value = (uint8_t *)value;
195
196         jtag_add_dr_scan(3, fields, jtag_get_end_state());
197
198         jtag_add_callback(arm_le_to_h_u32, (jtag_callback_data_t)value);
199
200
201 #ifdef _DEBUG_INSTRUCTION_EXECUTION_
202         if ((retval = jtag_execute_queue()) != ERROR_OK)
203         {
204                 return retval;
205         }
206         LOG_DEBUG("addr: 0x%x value: %8.8x", reg_addr, *value);
207 #endif
208
209         return ERROR_OK;
210 }
211
212 int arm966e_write_cp15(target_t *target, int reg_addr, uint32_t value)
213 {
214         int retval = ERROR_OK;
215         armv4_5_common_t *armv4_5 = target->arch_info;
216         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
217         arm_jtag_t *jtag_info = &arm7_9->jtag_info;
218         scan_field_t fields[3];
219         uint8_t reg_addr_buf = reg_addr & 0x3f;
220         uint8_t nr_w_buf = 1;
221         uint8_t value_buf[4];
222
223         buf_set_u32(value_buf, 0, 32, value);
224
225         jtag_set_end_state(TAP_IDLE);
226         if ((retval = arm_jtag_scann(jtag_info, 0xf)) != ERROR_OK)
227         {
228                 return retval;
229         }
230         arm_jtag_set_instr(jtag_info, jtag_info->intest_instr, NULL);
231
232         fields[0].tap = jtag_info->tap;
233         fields[0].num_bits = 32;
234         fields[0].out_value = value_buf;
235         fields[0].in_value = NULL;
236
237         fields[1].tap = jtag_info->tap;
238         fields[1].num_bits = 6;
239         fields[1].out_value = &reg_addr_buf;
240         fields[1].in_value = NULL;
241
242         fields[2].tap = jtag_info->tap;
243         fields[2].num_bits = 1;
244         fields[2].out_value = &nr_w_buf;
245         fields[2].in_value = NULL;
246
247         jtag_add_dr_scan(3, fields, jtag_get_end_state());
248
249 #ifdef _DEBUG_INSTRUCTION_EXECUTION_
250         LOG_DEBUG("addr: 0x%x value: %8.8x", reg_addr, value);
251 #endif
252
253         return ERROR_OK;
254 }
255
256 int arm966e_handle_cp15_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
257 {
258         int retval;
259         target_t *target = get_current_target(cmd_ctx);
260         armv4_5_common_t *armv4_5;
261         arm7_9_common_t *arm7_9;
262         arm9tdmi_common_t *arm9tdmi;
263         arm966e_common_t *arm966e;
264         arm_jtag_t *jtag_info;
265
266         if (arm966e_get_arch_pointers(target, &armv4_5, &arm7_9, &arm9tdmi, &arm966e) != ERROR_OK)
267         {
268                 command_print(cmd_ctx, "current target isn't an ARM966e target");
269                 return ERROR_OK;
270         }
271
272         jtag_info = &arm7_9->jtag_info;
273
274         if (target->state != TARGET_HALTED)
275         {
276                 command_print(cmd_ctx, "target must be stopped for \"%s\" command", cmd);
277                 return ERROR_OK;
278         }
279
280         /* one or more argument, access a single register (write if second argument is given */
281         if (argc >= 1)
282         {
283                 int address = strtoul(args[0], NULL, 0);
284
285                 if (argc == 1)
286                 {
287                         uint32_t value;
288                         if ((retval = arm966e_read_cp15(target, address, &value)) != ERROR_OK)
289                         {
290                                 command_print(cmd_ctx, "couldn't access reg %i", address);
291                                 return ERROR_OK;
292                         }
293                         if ((retval = jtag_execute_queue()) != ERROR_OK)
294                         {
295                                 return retval;
296                         }
297
298                         command_print(cmd_ctx, "%i: %8.8" PRIx32 "", address, value);
299                 }
300                 else if (argc == 2)
301                 {
302                         uint32_t value = strtoul(args[1], NULL, 0);
303                         if ((retval = arm966e_write_cp15(target, address, value)) != ERROR_OK)
304                         {
305                                 command_print(cmd_ctx, "couldn't access reg %i", address);
306                                 return ERROR_OK;
307                         }
308                         command_print(cmd_ctx, "%i: %8.8" PRIx32 "", address, value);
309                 }
310         }
311
312         return ERROR_OK;
313 }
314
315 int arm966e_register_commands(struct command_context_s *cmd_ctx)
316 {
317         int retval;
318         command_t *arm966e_cmd;
319
320         retval = arm9tdmi_register_commands(cmd_ctx);
321         arm966e_cmd = register_command(cmd_ctx, NULL, "arm966e", NULL, COMMAND_ANY, "arm966e specific commands");
322         register_command(cmd_ctx, arm966e_cmd, "cp15", arm966e_handle_cp15_command, COMMAND_EXEC, "display/modify cp15 register <num> [value]");
323
324         return retval;
325 }