arm720t.c 15.7 KB
Newer Older
1
2
3
4
/***************************************************************************
 *   Copyright (C) 2005 by Dominic Rath                                    *
 *   Dominic.Rath@gmx.de                                                   *
 *                                                                         *
5
6
7
 *   Copyright (C) 2009 by Øyvind Harboe                                   *
 *   oyvind.harboe@zylin.com                                               *
 *                                                                         *
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 *   This program is distributed in the hope that it will be useful,       *
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
 *   GNU General Public License for more details.                          *
 *                                                                         *
 *   You should have received a copy of the GNU General Public License     *
 *   along with this program; if not, write to the                         *
 *   Free Software Foundation, Inc.,                                       *
 *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
 ***************************************************************************/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include "arm720t.h"
oharboe's avatar
oharboe committed
28
#include "time_support.h"
29
#include "target_type.h"
30
#include "register.h"
31
32


33
34
35
36
37
/*
 * ARM720 is an ARM7TDMI-S with MMU and ETM7.  For information, see
 * ARM DDI 0229C especially Chapter 9 about debug support.
 */

38
39
40
41
#if 0
#define _DEBUG_INSTRUCTION_EXECUTION_
#endif

Zachary T Welch's avatar
Zachary T Welch committed
42
static int arm720t_scan_cp15(struct target *target,
43
		uint32_t out, uint32_t *in, int instruction, int clock)
44
{
45
	int retval;
46
	struct arm720t_common *arm720t = target_to_arm720(target);
47
	struct arm_jtag *jtag_info;
48
	struct scan_field fields[2];
49
50
	uint8_t out_buf[4];
	uint8_t instruction_buf = instruction;
51

52
	jtag_info = &arm720t->arm7_9_common.jtag_info;
53

54
	buf_set_u32(out_buf, 0, 32, flip_u32(out, 32));
55

56
	jtag_set_end_state(TAP_DRPAUSE);
zwelch's avatar
zwelch committed
57
	if ((retval = arm_jtag_scann(jtag_info, 0xf)) != ERROR_OK)
58
59
60
	{
		return retval;
	}
zwelch's avatar
zwelch committed
61
	if ((retval = arm_jtag_set_instr(jtag_info, jtag_info->intest_instr, NULL)) != ERROR_OK)
62
63
64
	{
		return retval;
	}
65

66
	fields[0].tap = jtag_info->tap;
67
68
69
70
	fields[0].num_bits = 1;
	fields[0].out_value = &instruction_buf;
	fields[0].in_value = NULL;

71
	fields[1].tap = jtag_info->tap;
72
73
74
	fields[1].num_bits = 32;
	fields[1].out_value = out_buf;
	fields[1].in_value = NULL;
75

76
77
	if (in)
	{
78
		fields[1].in_value = (uint8_t *)in;
79
		jtag_add_dr_scan(2, fields, jtag_get_end_state());
80
		jtag_add_callback(arm7flip32, (jtag_callback_data_t)in);
81
82
	} else
	{
83
		jtag_add_dr_scan(2, fields, jtag_get_end_state());
84
85
86
	}

	if (clock)
87
		jtag_add_runtest(0, jtag_get_end_state());
88
89

#ifdef _DEBUG_INSTRUCTION_EXECUTION_
zwelch's avatar
zwelch committed
90
	if ((retval = jtag_execute_queue()) != ERROR_OK)
91
92
93
	{
		return retval;
	}
94
95

	if (in)
96
		LOG_DEBUG("out: %8.8x, in: %8.8x, instruction: %i, clock: %i", out, *in, instruction, clock);
97
	else
98
		LOG_DEBUG("out: %8.8x, instruction: %i, clock: %i", out, instruction, clock);
99
#else
duane's avatar
duane committed
100
		LOG_DEBUG("out: %8.8" PRIx32 ", instruction: %i, clock: %i", out, instruction, clock);
101
102
103
104
105
#endif

	return ERROR_OK;
}

Zachary T Welch's avatar
Zachary T Welch committed
106
static int arm720t_read_cp15(struct target *target, uint32_t opcode, uint32_t *value)
107
108
109
110
111
112
113
114
115
116
117
118
{
	/* fetch CP15 opcode */
	arm720t_scan_cp15(target, opcode, NULL, 1, 1);
	/* "DECODE" stage */
	arm720t_scan_cp15(target, ARMV4_5_NOP, NULL, 1, 1);
	/* "EXECUTE" stage (1) */
	arm720t_scan_cp15(target, ARMV4_5_NOP, NULL, 1, 0);
	arm720t_scan_cp15(target, 0x0, NULL, 0, 1);
	/* "EXECUTE" stage (2) */
	arm720t_scan_cp15(target, 0x0, NULL, 0, 1);
	/* "EXECUTE" stage (3), CDATA is read */
	arm720t_scan_cp15(target, ARMV4_5_NOP, value, 1, 1);
119

120
121
122
	return ERROR_OK;
}

Zachary T Welch's avatar
Zachary T Welch committed
123
static int arm720t_write_cp15(struct target *target, uint32_t opcode, uint32_t value)
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
{
	/* fetch CP15 opcode */
	arm720t_scan_cp15(target, opcode, NULL, 1, 1);
	/* "DECODE" stage */
	arm720t_scan_cp15(target, ARMV4_5_NOP, NULL, 1, 1);
	/* "EXECUTE" stage (1) */
	arm720t_scan_cp15(target, ARMV4_5_NOP, NULL, 1, 0);
	arm720t_scan_cp15(target, 0x0, NULL, 0, 1);
	/* "EXECUTE" stage (2) */
	arm720t_scan_cp15(target, value, NULL, 0, 1);
	arm720t_scan_cp15(target, ARMV4_5_NOP, NULL, 1, 1);

	return ERROR_OK;
}

Zachary T Welch's avatar
Zachary T Welch committed
139
static uint32_t arm720t_get_ttb(struct target *target)
140
{
141
	uint32_t ttb = 0x0;
142
143
144

	arm720t_read_cp15(target, 0xee120f10, &ttb);
	jtag_execute_queue();
145

146
	ttb &= 0xffffc000;
147

148
149
150
	return ttb;
}

Zachary T Welch's avatar
Zachary T Welch committed
151
static void arm720t_disable_mmu_caches(struct target *target,
152
		int mmu, int d_u_cache, int i_cache)
153
{
154
	uint32_t cp15_control;
155
156
157
158

	/* read cp15 control register */
	arm720t_read_cp15(target, 0xee110f10, &cp15_control);
	jtag_execute_queue();
159

160
161
	if (mmu)
		cp15_control &= ~0x1U;
162

163
164
165
166
167
168
	if (d_u_cache || i_cache)
		cp15_control &= ~0x4U;

	arm720t_write_cp15(target, 0xee010f10, cp15_control);
}

Zachary T Welch's avatar
Zachary T Welch committed
169
static void arm720t_enable_mmu_caches(struct target *target,
170
		int mmu, int d_u_cache, int i_cache)
171
{
172
	uint32_t cp15_control;
173
174
175
176

	/* read cp15 control register */
	arm720t_read_cp15(target, 0xee110f10, &cp15_control);
	jtag_execute_queue();
177

178
179
	if (mmu)
		cp15_control |= 0x1U;
180

181
182
	if (d_u_cache || i_cache)
		cp15_control |= 0x4U;
183

184
185
186
	arm720t_write_cp15(target, 0xee010f10, cp15_control);
}

Zachary T Welch's avatar
Zachary T Welch committed
187
static void arm720t_post_debug_entry(struct target *target)
188
{
189
	struct arm720t_common *arm720t = target_to_arm720(target);
190

191
192
193
	/* examine cp15 control reg */
	arm720t_read_cp15(target, 0xee110f10, &arm720t->cp15_control_reg);
	jtag_execute_queue();
duane's avatar
duane committed
194
	LOG_DEBUG("cp15_control_reg: %8.8" PRIx32 "", arm720t->cp15_control_reg);
195
196
197
198
199
200
201
202
203
204
205

	arm720t->armv4_5_mmu.mmu_enabled = (arm720t->cp15_control_reg & 0x1U) ? 1 : 0;
	arm720t->armv4_5_mmu.armv4_5_cache.d_u_cache_enabled = (arm720t->cp15_control_reg & 0x4U) ? 1 : 0;
	arm720t->armv4_5_mmu.armv4_5_cache.i_cache_enabled = 0;

	/* save i/d fault status and address register */
	arm720t_read_cp15(target, 0xee150f10, &arm720t->fsr_reg);
	arm720t_read_cp15(target, 0xee160f10, &arm720t->far_reg);
	jtag_execute_queue();
}

Zachary T Welch's avatar
Zachary T Welch committed
206
static void arm720t_pre_restore_context(struct target *target)
207
{
208
	struct arm720t_common *arm720t = target_to_arm720(target);
209

210
211
212
213
214
	/* restore i/d fault status and address register */
	arm720t_write_cp15(target, 0xee050f10, arm720t->fsr_reg);
	arm720t_write_cp15(target, 0xee060f10, arm720t->far_reg);
}

215
static int arm720t_verify_pointer(struct command_context *cmd_ctx,
216
		struct arm720t_common *arm720t)
217
{
218
219
220
	if (arm720t->common_magic != ARM720T_COMMON_MAGIC) {
		command_print(cmd_ctx, "target is not an ARM720");
		return ERROR_TARGET_INVALID;
221
222
223
224
	}
	return ERROR_OK;
}

Zachary T Welch's avatar
Zachary T Welch committed
225
static int arm720t_arch_state(struct target *target)
226
{
227
	struct arm720t_common *arm720t = target_to_arm720(target);
228
	struct arm *armv4_5;
229

230
	static const char *state[] =
231
232
233
	{
		"disabled", "enabled"
	};
234

235
	armv4_5 = &arm720t->arm7_9_common.armv4_5_common;
236

237
	LOG_USER("target halted in %s state due to %s, current mode: %s\n"
duane's avatar
duane committed
238
			"cpsr: 0x%8.8" PRIx32 " pc: 0x%8.8" PRIx32 "\n"
239
240
			"MMU: %s, Cache: %s",
			 armv4_5_state_strings[armv4_5->core_state],
241
			 Jim_Nvp_value2name_simple(nvp_target_debug_reason, target->debug_reason)->name ,
David Brownell's avatar
David Brownell committed
242
			 arm_mode_name(armv4_5->core_mode),
David Brownell's avatar
David Brownell committed
243
			 buf_get_u32(armv4_5->cpsr->value, 0, 32),
244
245
246
			 buf_get_u32(armv4_5->core_cache->reg_list[15].value, 0, 32),
			 state[arm720t->armv4_5_mmu.mmu_enabled],
			 state[arm720t->armv4_5_mmu.armv4_5_cache.d_u_cache_enabled]);
247

248
249
250
	return ERROR_OK;
}

Zachary T Welch's avatar
Zachary T Welch committed
251
static int arm720_mmu(struct target *target, int *enabled)
252
253
254
255
256
257
258
259
260
261
{
	if (target->state != TARGET_HALTED) {
		LOG_ERROR("%s: target not halted", __func__);
		return ERROR_TARGET_INVALID;
	}

	*enabled = target_to_arm720(target)->armv4_5_mmu.mmu_enabled;
	return ERROR_OK;
}

Zachary T Welch's avatar
Zachary T Welch committed
262
static int arm720_virt2phys(struct target *target,
263
264
265
266
267
268
269
		uint32_t virt, uint32_t *phys)
{
	/** @todo Implement this!  */
	LOG_ERROR("%s: not implemented", __func__);
	return ERROR_FAIL;
}

Zachary T Welch's avatar
Zachary T Welch committed
270
static int arm720t_read_memory(struct target *target,
271
		uint32_t address, uint32_t size, uint32_t count, uint8_t *buffer)
272
273
{
	int retval;
274
	struct arm720t_common *arm720t = target_to_arm720(target);
275

276
277
278
	/* disable cache, but leave MMU enabled */
	if (arm720t->armv4_5_mmu.armv4_5_cache.d_u_cache_enabled)
		arm720t_disable_mmu_caches(target, 0, 1, 0);
279

280
	retval = arm7_9_read_memory(target, address, size, count, buffer);
281

282
283
	if (arm720t->armv4_5_mmu.armv4_5_cache.d_u_cache_enabled)
		arm720t_enable_mmu_caches(target, 0, 1, 0);
284

285
286
287
	return retval;
}

Zachary T Welch's avatar
Zachary T Welch committed
288
static int arm720t_read_phys_memory(struct target *target,
289
		uint32_t address, uint32_t size, uint32_t count, uint8_t *buffer)
290
{
291
	struct arm720t_common *arm720t = target_to_arm720(target);
292
293
294
295

	return armv4_5_mmu_read_physical(target, &arm720t->armv4_5_mmu, address, size, count, buffer);
}

Zachary T Welch's avatar
Zachary T Welch committed
296
static int arm720t_write_phys_memory(struct target *target,
297
		uint32_t address, uint32_t size, uint32_t count, uint8_t *buffer)
298
{
299
	struct arm720t_common *arm720t = target_to_arm720(target);
300
301
302
303

	return armv4_5_mmu_write_physical(target, &arm720t->armv4_5_mmu, address, size, count, buffer);
}

Zachary T Welch's avatar
Zachary T Welch committed
304
static int arm720t_soft_reset_halt(struct target *target)
305
{
306
	int retval = ERROR_OK;
307
	struct arm720t_common *arm720t = target_to_arm720(target);
308
	struct reg *dbg_stat = &arm720t->arm7_9_common
309
			.eice_cache->reg_list[EICE_DBG_STAT];
310
	struct arm *armv4_5 = &arm720t->arm7_9_common
311
			.armv4_5_common;
312

313
314
315
316
	if ((retval = target_halt(target)) != ERROR_OK)
	{
		return retval;
	}
317

zwelch's avatar
zwelch committed
318
	long long then = timeval_ms();
oharboe's avatar
oharboe committed
319
	int timeout;
zwelch's avatar
zwelch committed
320
	while (!(timeout = ((timeval_ms()-then) > 1000)))
321
	{
322
323
324
		if (buf_get_u32(dbg_stat->value, EICE_DBG_STATUS_DBGACK, 1) == 0)
		{
			embeddedice_read_reg(dbg_stat);
325
326
327
328
			if ((retval = jtag_execute_queue()) != ERROR_OK)
			{
				return retval;
			}
329
330
331
332
		} else
		{
			break;
		}
zwelch's avatar
zwelch committed
333
		if (debug_level >= 3)
oharboe's avatar
oharboe committed
334
335
336
337
338
339
		{
			alive_sleep(100);
		} else
		{
			keep_alive();
		}
340
	}
oharboe's avatar
oharboe committed
341
	if (timeout)
342
343
344
	{
		LOG_ERROR("Failed to halt CPU after 1 sec");
		return ERROR_TARGET_TIMEOUT;
345
	}
346

347
	target->state = TARGET_HALTED;
348

349
	/* SVC, ARM state, IRQ and FIQ disabled */
350
351
352
353
354
355
	uint32_t cpsr;

	cpsr = buf_get_u32(armv4_5->cpsr->value, 0, 32);
	cpsr &= ~0xff;
	cpsr |= 0xd3;
	arm_set_cpsr(armv4_5, cpsr);
David Brownell's avatar
David Brownell committed
356
	armv4_5->cpsr->dirty = 1;
357

358
359
360
361
	/* start fetching from 0x0 */
	buf_set_u32(armv4_5->core_cache->reg_list[15].value, 0, 32, 0x0);
	armv4_5->core_cache->reg_list[15].dirty = 1;
	armv4_5->core_cache->reg_list[15].valid = 1;
362

363
364
365
366
367
	arm720t_disable_mmu_caches(target, 1, 1, 1);
	arm720t->armv4_5_mmu.mmu_enabled = 0;
	arm720t->armv4_5_mmu.armv4_5_cache.d_u_cache_enabled = 0;
	arm720t->armv4_5_mmu.armv4_5_cache.i_cache_enabled = 0;

368
369
370
371
	if ((retval = target_call_event_callbacks(target, TARGET_EVENT_HALTED)) != ERROR_OK)
	{
		return retval;
	}
372

373
374
375
	return ERROR_OK;
}

376
static int arm720t_init_target(struct command_context *cmd_ctx, struct target *target)
377
{
378
	return arm7tdmi_init_target(cmd_ctx, target);
379
380
}

Zachary T Welch's avatar
Zachary T Welch committed
381
static int arm720t_init_arch_info(struct target *target,
382
		struct arm720t_common *arm720t, struct jtag_tap *tap)
383
{
384
	struct arm7_9_common *arm7_9 = &arm720t->arm7_9_common;
385

386
	arm7tdmi_init_arch_info(target, arm7_9, tap);
387
388

	arm720t->common_magic = ARM720T_COMMON_MAGIC;
389

390
391
	arm7_9->post_debug_entry = arm720t_post_debug_entry;
	arm7_9->pre_restore_context = arm720t_pre_restore_context;
392

393
394
395
396
397
398
399
400
	arm720t->armv4_5_mmu.armv4_5_cache.ctype = -1;
	arm720t->armv4_5_mmu.get_ttb = arm720t_get_ttb;
	arm720t->armv4_5_mmu.read_memory = arm7_9_read_memory;
	arm720t->armv4_5_mmu.write_memory = arm7_9_write_memory;
	arm720t->armv4_5_mmu.disable_mmu_caches = arm720t_disable_mmu_caches;
	arm720t->armv4_5_mmu.enable_mmu_caches = arm720t_enable_mmu_caches;
	arm720t->armv4_5_mmu.has_tiny_pages = 0;
	arm720t->armv4_5_mmu.mmu_enabled = 0;
401

402
403
404
	return ERROR_OK;
}

Zachary T Welch's avatar
Zachary T Welch committed
405
static int arm720t_target_create(struct target *target, Jim_Interp *interp)
406
{
407
	struct arm720t_common *arm720t = calloc(1, sizeof(*arm720t));
408

409
	arm720t->arm7_9_common.armv4_5_common.is_armv4 = true;
410
	return arm720t_init_arch_info(target, arm720t, target->tap);
411
412
}

413
COMMAND_HANDLER(arm720t_handle_cp15_command)
414
415
{
	int retval;
416
	struct target *target = get_current_target(CMD_CTX);
417
	struct arm720t_common *arm720t = target_to_arm720(target);
418
	struct arm_jtag *jtag_info;
419

420
	retval = arm720t_verify_pointer(CMD_CTX, arm720t);
421
422
	if (retval != ERROR_OK)
		return retval;
423

424
	jtag_info = &arm720t->arm7_9_common.jtag_info;
425

426
427
	if (target->state != TARGET_HALTED)
	{
428
		command_print(CMD_CTX, "target must be stopped for \"%s\" command", CMD_NAME);
429
430
431
432
		return ERROR_OK;
	}

	/* one or more argument, access a single register (write if second argument is given */
433
	if (CMD_ARGC >= 1)
434
	{
435
		uint32_t opcode;
436
		COMMAND_PARSE_NUMBER(u32, CMD_ARGV[0], opcode);
437

438
		if (CMD_ARGC == 1)
439
		{
440
			uint32_t value;
441
442
			if ((retval = arm720t_read_cp15(target, opcode, &value)) != ERROR_OK)
			{
443
				command_print(CMD_CTX, "couldn't access cp15 with opcode 0x%8.8" PRIx32 "", opcode);
444
445
				return ERROR_OK;
			}
446
447
448
449
450

			if ((retval = jtag_execute_queue()) != ERROR_OK)
			{
				return retval;
			}
451

452
			command_print(CMD_CTX, "0x%8.8" PRIx32 ": 0x%8.8" PRIx32 "", opcode, value);
453
		}
454
		else if (CMD_ARGC == 2)
455
		{
456
			uint32_t value;
457
			COMMAND_PARSE_NUMBER(u32, CMD_ARGV[1], value);
458

459
460
			if ((retval = arm720t_write_cp15(target, opcode, value)) != ERROR_OK)
			{
461
				command_print(CMD_CTX, "couldn't access cp15 with opcode 0x%8.8" PRIx32 "", opcode);
462
463
				return ERROR_OK;
			}
464
			command_print(CMD_CTX, "0x%8.8" PRIx32 ": 0x%8.8" PRIx32 "", opcode, value);
465
466
467
468
469
		}
	}

	return ERROR_OK;
}
470

Zachary T Welch's avatar
Zachary T Welch committed
471
static int arm720t_mrc(struct target *target, int cpnum, uint32_t op1, uint32_t op2, uint32_t CRn, uint32_t CRm, uint32_t *value)
472
473
474
475
476
477
478
479
480
481
482
{
	if (cpnum!=15)
	{
		LOG_ERROR("Only cp15 is supported");
		return ERROR_FAIL;
	}

	return arm720t_read_cp15(target, mrc_opcode(cpnum, op1, op2, CRn, CRm), value);

}

Zachary T Welch's avatar
Zachary T Welch committed
483
static int arm720t_mcr(struct target *target, int cpnum, uint32_t op1, uint32_t op2, uint32_t CRn, uint32_t CRm, uint32_t value)
484
485
486
487
488
489
490
491
492
493
{
	if (cpnum!=15)
	{
		LOG_ERROR("Only cp15 is supported");
		return ERROR_FAIL;
	}

	return arm720t_write_cp15(target, mrc_opcode(cpnum, op1, op2, CRn, CRm), value);
}

494
495
496
497
498
499
500
501
502
503
504
505
static const struct command_registration arm720t_exec_command_handlers[] = {
	{
		.name = "cp15",
		.handler = arm720t_handle_cp15_command,
		.mode = COMMAND_EXEC,
		.usage = "<opcode> [value]",
		.help = "display/modify cp15 register",
	},
	COMMAND_REGISTRATION_DONE
};

static const struct command_registration arm720t_command_handlers[] = {
506
507
508
	{
		.chain = arm7_9_command_handlers,
	},
509
510
511
512
513
514
515
516
517
	{
		.name = "arm720t",
		.mode = COMMAND_ANY,
		.help = "arm720t command group",
		.chain = arm720t_exec_command_handlers,
	},
	COMMAND_REGISTRATION_DONE
};

518
/** Holds methods for ARM720 targets. */
519
struct target_type arm720t_target =
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
{
	.name = "arm720t",

	.poll = arm7_9_poll,
	.arch_state = arm720t_arch_state,

	.halt = arm7_9_halt,
	.resume = arm7_9_resume,
	.step = arm7_9_step,

	.assert_reset = arm7_9_assert_reset,
	.deassert_reset = arm7_9_deassert_reset,
	.soft_reset_halt = arm720t_soft_reset_halt,

	.get_gdb_reg_list = armv4_5_get_gdb_reg_list,

	.read_memory = arm720t_read_memory,
	.write_memory = arm7_9_write_memory,
	.read_phys_memory = arm720t_read_phys_memory,
	.write_phys_memory = arm720t_write_phys_memory,
540
541
542
	.mmu = arm720_mmu,
	.virt2phys = arm720_virt2phys,

543
	.bulk_write_memory = arm7_9_bulk_write_memory,
544
545
546

	.checksum_memory = arm_checksum_memory,
	.blank_check_memory = arm_blank_check_memory,
547

548
549
550
551
552
553
554
	.run_algorithm = armv4_5_run_algorithm,

	.add_breakpoint = arm7_9_add_breakpoint,
	.remove_breakpoint = arm7_9_remove_breakpoint,
	.add_watchpoint = arm7_9_add_watchpoint,
	.remove_watchpoint = arm7_9_remove_watchpoint,

555
	.commands = arm720t_command_handlers,
556
557
	.target_create = arm720t_target_create,
	.init_target = arm720t_init_target,
558
	.examine = arm7_9_examine,
559
560
561
	.mrc = arm720t_mrc,
	.mcr = arm720t_mcr,
};