src/target/arm926ejs.c

   1 /***************************************************************************
   2  *   Copyright (C) 2007 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 "arm926ejs.h"
  25 #include "jtag.h"
  26 #include "log.h"
  27 #include "time_support.h"
  28
  29 #include <stdlib.h>
  30 #include <string.h>
  31
  32 #if 0
  33 #define _DEBUG_INSTRUCTION_EXECUTION_
  34 #endif
  35
  36 /* cli handling */
  37 int arm926ejs_handle_cp15_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  38 int arm926ejs_handle_cp15i_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  39 int arm926ejs_handle_virt2phys_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  40 int arm926ejs_handle_cache_info_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  41 int arm926ejs_handle_md_phys_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  42 int arm926ejs_handle_mw_phys_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  43
  44 int arm926ejs_handle_read_cache_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  45 int arm926ejs_handle_read_mmu_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc);
  46
  47 /* forward declarations */
  48 int arm926ejs_target_create(struct target_s *target, Jim_Interp *interp);
  49 int arm926ejs_init_target(struct command_context_s *cmd_ctx, struct target_s *target);
  50 int arm926ejs_quit(void);
  51 int arm926ejs_read_memory(struct target_s *target, u32 address, u32 size, u32 count, u8 *buffer);
  52
  53 static int arm926ejs_virt2phys(struct target_s *target, u32 virtual, u32 *physical);
  54 static int arm926ejs_mmu(struct target_s *target, int *enabled);
  55
  56 target_type_t arm926ejs_target =
  57 {
  58         .name = "arm926ejs",
  59
  60         .poll = arm7_9_poll,
  61         .arch_state = arm926ejs_arch_state,
  62
  63         .target_request_data = arm7_9_target_request_data,
  64
  65         .halt = arm7_9_halt,
  66         .resume = arm7_9_resume,
  67         .step = arm7_9_step,
  68
  69         .assert_reset = arm7_9_assert_reset,
  70         .deassert_reset = arm7_9_deassert_reset,
  71         .soft_reset_halt = arm926ejs_soft_reset_halt,
  72
  73         .get_gdb_reg_list = armv4_5_get_gdb_reg_list,
  74
  75         .read_memory = arm7_9_read_memory,
  76         .write_memory = arm926ejs_write_memory,
  77         .bulk_write_memory = arm7_9_bulk_write_memory,
  78         .checksum_memory = arm7_9_checksum_memory,
  79         .blank_check_memory = arm7_9_blank_check_memory,
  80
  81         .run_algorithm = armv4_5_run_algorithm,
  82
  83         .add_breakpoint = arm7_9_add_breakpoint,
  84         .remove_breakpoint = arm7_9_remove_breakpoint,
  85         .add_watchpoint = arm7_9_add_watchpoint,
  86         .remove_watchpoint = arm7_9_remove_watchpoint,
  87
  88         .register_commands = arm926ejs_register_commands,
  89         .target_create = arm926ejs_target_create,
  90         .init_target = arm926ejs_init_target,
  91         .examine = arm9tdmi_examine,
  92         .quit = arm926ejs_quit,
  93         .virt2phys = arm926ejs_virt2phys,
  94         .mmu = arm926ejs_mmu
  95 };
  96
  97 int arm926ejs_catch_broken_irscan(u8 *captured, void *priv, scan_field_t *field)
  98 {
  99         /* FIX!!!! this code should be reenabled. For now it does not check
 100          * the queue...*/
 101         return 0;
 102 #if 0
 103         /* The ARM926EJ-S' instruction register is 4 bits wide */
 104         u8 t = *captured & 0xf;
 105         u8 t2 = *field->in_check_value & 0xf;
 106         if (t == t2)
 107         {
 108                 return ERROR_OK;
 109         }
 110         else if ((t == 0x0f) || (t == 0x00))
 111         {
 112                 LOG_DEBUG("caught ARM926EJ-S invalid Capture-IR result after CP15 access");
 113                 return ERROR_OK;
 114         }
 115         return ERROR_JTAG_QUEUE_FAILED;;
 116 #endif
 117 }
 118
 119 #define ARM926EJS_CP15_ADDR(opcode_1, opcode_2, CRn, CRm) ((opcode_1 << 11) | (opcode_2 << 8) | (CRn << 4) | (CRm << 0))
 120
 121 int arm926ejs_cp15_read(target_t *target, u32 op1, u32 op2, u32 CRn, u32 CRm, u32 *value)
 122 {
 123         int retval = ERROR_OK;
 124         armv4_5_common_t *armv4_5 = target->arch_info;
 125         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 126         arm_jtag_t *jtag_info = &arm7_9->jtag_info;
 127         u32 address = ARM926EJS_CP15_ADDR(op1, op2, CRn, CRm);
 128         scan_field_t fields[4];
 129         u8 address_buf[2];
 130         u8 nr_w_buf = 0;
 131         u8 access = 1;
 132
 133         buf_set_u32(address_buf, 0, 14, address);
 134
 135         jtag_add_end_state(TAP_IDLE);
 136         if((retval = arm_jtag_scann(jtag_info, 0xf)) != ERROR_OK)
 137         {
 138                 return retval;
 139         }
 140         arm_jtag_set_instr(jtag_info, jtag_info->intest_instr, NULL);
 141
 142         fields[0].tap = jtag_info->tap;
 143         fields[0].num_bits = 32;
 144         fields[0].out_value = NULL;
 145         u8 tmp[4];
 146         fields[0].in_value = tmp;
 147
 148
 149         fields[1].tap = jtag_info->tap;
 150         fields[1].num_bits = 1;
 151         fields[1].out_value = &access;
 152         fields[1].in_value = &access;
 153
 154
 155         fields[2].tap = jtag_info->tap;
 156         fields[2].num_bits = 14;
 157         fields[2].out_value = address_buf;
 158         fields[2].in_value = NULL;
 159
 160
 161
 162         fields[3].tap = jtag_info->tap;
 163         fields[3].num_bits = 1;
 164         fields[3].out_value = &nr_w_buf;
 165         fields[3].in_value = NULL;
 166
 167
 168         jtag_add_dr_scan(4, fields, TAP_INVALID);
 169
 170         /*TODO: add timeout*/
 171         do
 172         {
 173                 /* rescan with NOP, to wait for the access to complete */
 174                 access = 0;
 175                 nr_w_buf = 0;
 176                 jtag_add_dr_scan_now(4, fields, TAP_INVALID);
 177
 178                 *value=le_to_h_u32(tmp);
 179
 180                 if((retval = jtag_execute_queue()) != ERROR_OK)
 181                 {
 182                         return retval;
 183                 }
 184         } while (buf_get_u32(&access, 0, 1) != 1);
 185
 186 #ifdef _DEBUG_INSTRUCTION_EXECUTION_
 187         LOG_DEBUG("addr: 0x%x value: %8.8x", address, *value);
 188 #endif
 189
 190         arm_jtag_set_instr(jtag_info, 0xc, &arm926ejs_catch_broken_irscan);
 191
 192         return ERROR_OK;
 193 }
 194
 195 int arm926ejs_cp15_write(target_t *target, u32 op1, u32 op2, u32 CRn, u32 CRm, u32 value)
 196 {
 197         int retval = ERROR_OK;
 198         armv4_5_common_t *armv4_5 = target->arch_info;
 199         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 200         arm_jtag_t *jtag_info = &arm7_9->jtag_info;
 201         u32 address = ARM926EJS_CP15_ADDR(op1, op2, CRn, CRm);
 202         scan_field_t fields[4];
 203         u8 value_buf[4];
 204         u8 address_buf[2];
 205         u8 nr_w_buf = 1;
 206         u8 access = 1;
 207
 208         buf_set_u32(address_buf, 0, 14, address);
 209         buf_set_u32(value_buf, 0, 32, value);
 210
 211         jtag_add_end_state(TAP_IDLE);
 212         if((retval = arm_jtag_scann(jtag_info, 0xf)) != ERROR_OK)
 213         {
 214                 return retval;
 215         }
 216         arm_jtag_set_instr(jtag_info, jtag_info->intest_instr, NULL);
 217
 218         fields[0].tap = jtag_info->tap;
 219         fields[0].num_bits = 32;
 220         fields[0].out_value = value_buf;
 221
 222         fields[0].in_value = NULL;
 223
 224
 225
 226
 227
 228         fields[1].tap = jtag_info->tap;
 229         fields[1].num_bits = 1;
 230         fields[1].out_value = &access;
 231
 232         fields[1].in_value = &access;
 233
 234
 235
 236
 237
 238         fields[2].tap = jtag_info->tap;
 239         fields[2].num_bits = 14;
 240         fields[2].out_value = address_buf;
 241
 242         fields[2].in_value = NULL;
 243
 244
 245
 246
 247
 248         fields[3].tap = jtag_info->tap;
 249         fields[3].num_bits = 1;
 250         fields[3].out_value = &nr_w_buf;
 251
 252         fields[3].in_value = NULL;
 253
 254
 255
 256
 257
 258         jtag_add_dr_scan(4, fields, TAP_INVALID);
 259         /*TODO: add timeout*/
 260         do
 261         {
 262                 /* rescan with NOP, to wait for the access to complete */
 263                 access = 0;
 264                 nr_w_buf = 0;
 265                 jtag_add_dr_scan(4, fields, TAP_INVALID);
 266                 if((retval = jtag_execute_queue()) != ERROR_OK)
 267                 {
 268                         return retval;
 269                 }
 270         } while (buf_get_u32(&access, 0, 1) != 1);
 271
 272 #ifdef _DEBUG_INSTRUCTION_EXECUTION_
 273         LOG_DEBUG("addr: 0x%x value: %8.8x", address, value);
 274 #endif
 275
 276         arm_jtag_set_instr(jtag_info, 0xf, &arm926ejs_catch_broken_irscan);
 277
 278         return ERROR_OK;
 279 }
 280
 281 int arm926ejs_examine_debug_reason(target_t *target)
 282 {
 283         armv4_5_common_t *armv4_5 = target->arch_info;
 284         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 285         reg_t *dbg_stat = &arm7_9->eice_cache->reg_list[EICE_DBG_STAT];
 286         int debug_reason;
 287         int retval;
 288
 289         embeddedice_read_reg(dbg_stat);
 290         if ((retval = jtag_execute_queue()) != ERROR_OK)
 291                 return retval;
 292
 293         debug_reason = buf_get_u32(dbg_stat->value, 6, 4);
 294
 295         switch (debug_reason)
 296         {
 297                 case 1:
 298                         LOG_DEBUG("breakpoint from EICE unit 0");
 299                         target->debug_reason = DBG_REASON_BREAKPOINT;
 300                         break;
 301                 case 2:
 302                         LOG_DEBUG("breakpoint from EICE unit 1");
 303                         target->debug_reason = DBG_REASON_BREAKPOINT;
 304                         break;
 305                 case 3:
 306                         LOG_DEBUG("soft breakpoint (BKPT instruction)");
 307                         target->debug_reason = DBG_REASON_BREAKPOINT;
 308                         break;
 309                 case 4:
 310                         LOG_DEBUG("vector catch breakpoint");
 311                         target->debug_reason = DBG_REASON_BREAKPOINT;
 312                         break;
 313                 case 5:
 314                         LOG_DEBUG("external breakpoint");
 315                         target->debug_reason = DBG_REASON_BREAKPOINT;
 316                         break;
 317                 case 6:
 318                         LOG_DEBUG("watchpoint from EICE unit 0");
 319                         target->debug_reason = DBG_REASON_WATCHPOINT;
 320                         break;
 321                 case 7:
 322                         LOG_DEBUG("watchpoint from EICE unit 1");
 323                         target->debug_reason = DBG_REASON_WATCHPOINT;
 324                         break;
 325                 case 8:
 326                         LOG_DEBUG("external watchpoint");
 327                         target->debug_reason = DBG_REASON_WATCHPOINT;
 328                         break;
 329                 case 9:
 330                         LOG_DEBUG("internal debug request");
 331                         target->debug_reason = DBG_REASON_DBGRQ;
 332                         break;
 333                 case 10:
 334                         LOG_DEBUG("external debug request");
 335                         target->debug_reason = DBG_REASON_DBGRQ;
 336                         break;
 337                 case 11:
 338                         LOG_ERROR("BUG: debug re-entry from system speed access shouldn't be handled here");
 339                         break;
 340                 case 12:
 341                         /* FIX!!!! here be dragons!!! We need to fail here so
 342                          * the target will interpreted as halted but we won't
 343                          * try to talk to it right now... a resume + halt seems
 344                          * to sync things up again. Please send an email to
 345                          * openocd development mailing list if you have hardware
 346                          * to donate to look into this problem....
 347                          */
 348                         LOG_ERROR("mystery debug reason MOE=0xc. Try issuing a resume + halt.");
 349                         target->debug_reason = DBG_REASON_DBGRQ;
 350                         retval = ERROR_TARGET_FAILURE;
 351                         break;
 352                 default:
 353                         LOG_ERROR("BUG: unknown debug reason: 0x%x", debug_reason);
 354                         target->debug_reason = DBG_REASON_DBGRQ;
 355                         /* if we fail here, we won't talk to the target and it will
 356                          * be reported to be in the halted state */
 357                         retval = ERROR_TARGET_FAILURE;
 358                         break;
 359         }
 360
 361         return retval;
 362 }
 363
 364 u32 arm926ejs_get_ttb(target_t *target)
 365 {
 366         armv4_5_common_t *armv4_5 = target->arch_info;
 367         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 368         arm9tdmi_common_t *arm9tdmi = arm7_9->arch_info;
 369         arm926ejs_common_t *arm926ejs = arm9tdmi->arch_info;
 370         int retval;
 371         u32 ttb = 0x0;
 372
 373         if ((retval = arm926ejs->read_cp15(target, 0, 0, 2, 0, &ttb)) != ERROR_OK)
 374                 return retval;
 375
 376         return ttb;
 377 }
 378
 379 void arm926ejs_disable_mmu_caches(target_t *target, int mmu, int d_u_cache, int i_cache)
 380 {
 381         armv4_5_common_t *armv4_5 = target->arch_info;
 382         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 383         arm9tdmi_common_t *arm9tdmi = arm7_9->arch_info;
 384         arm926ejs_common_t *arm926ejs = arm9tdmi->arch_info;
 385         u32 cp15_control;
 386
 387         /* read cp15 control register */
 388         arm926ejs->read_cp15(target, 0, 0, 1, 0, &cp15_control);
 389         jtag_execute_queue();
 390
 391         if (mmu)
 392         {
 393                 /* invalidate TLB */
 394                 arm926ejs->write_cp15(target, 0, 0, 8, 7, 0x0);
 395
 396                 cp15_control &= ~0x1U;
 397         }
 398
 399         if (d_u_cache)
 400         {
 401                 u32 debug_override;
 402                 /* read-modify-write CP15 debug override register
 403                  * to enable "test and clean all" */
 404                 arm926ejs->read_cp15(target, 0, 0, 15, 0, &debug_override);
 405                 debug_override |= 0x80000;
 406                 arm926ejs->write_cp15(target, 0, 0, 15, 0, debug_override);
 407
 408                 /* clean and invalidate DCache */
 409                 arm926ejs->write_cp15(target, 0, 0, 7, 5, 0x0);
 410
 411                 /* write CP15 debug override register
 412                  * to disable "test and clean all" */
 413                 debug_override &= ~0x80000;
 414                 arm926ejs->write_cp15(target, 0, 0, 15, 0, debug_override);
 415
 416                 cp15_control &= ~0x4U;
 417         }
 418
 419         if (i_cache)
 420         {
 421                 /* invalidate ICache */
 422                 arm926ejs->write_cp15(target, 0, 0, 7, 5, 0x0);
 423
 424                 cp15_control &= ~0x1000U;
 425         }
 426
 427         arm926ejs->write_cp15(target, 0, 0, 1, 0, cp15_control);
 428 }
 429
 430 void arm926ejs_enable_mmu_caches(target_t *target, int mmu, int d_u_cache, int i_cache)
 431 {
 432         armv4_5_common_t *armv4_5 = target->arch_info;
 433         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 434         arm9tdmi_common_t *arm9tdmi = arm7_9->arch_info;
 435         arm926ejs_common_t *arm926ejs = arm9tdmi->arch_info;
 436         u32 cp15_control;
 437
 438         /* read cp15 control register */
 439         arm926ejs->read_cp15(target, 0, 0, 1, 0, &cp15_control);
 440         jtag_execute_queue();
 441
 442         if (mmu)
 443                 cp15_control |= 0x1U;
 444
 445         if (d_u_cache)
 446                 cp15_control |= 0x4U;
 447
 448         if (i_cache)
 449                 cp15_control |= 0x1000U;
 450
 451         arm926ejs->write_cp15(target, 0, 0, 1, 0, cp15_control);
 452 }
 453
 454 void arm926ejs_post_debug_entry(target_t *target)
 455 {
 456         armv4_5_common_t *armv4_5 = target->arch_info;
 457         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 458         arm9tdmi_common_t *arm9tdmi = arm7_9->arch_info;
 459         arm926ejs_common_t *arm926ejs = arm9tdmi->arch_info;
 460
 461         /* examine cp15 control reg */
 462         arm926ejs->read_cp15(target, 0, 0, 1, 0, &arm926ejs->cp15_control_reg);
 463         jtag_execute_queue();
 464         LOG_DEBUG("cp15_control_reg: %8.8x", arm926ejs->cp15_control_reg);
 465
 466         if (arm926ejs->armv4_5_mmu.armv4_5_cache.ctype == -1)
 467         {
 468                 u32 cache_type_reg;
 469                 /* identify caches */
 470                 arm926ejs->read_cp15(target, 0, 1, 0, 0, &cache_type_reg);
 471                 jtag_execute_queue();
 472                 armv4_5_identify_cache(cache_type_reg, &arm926ejs->armv4_5_mmu.armv4_5_cache);
 473         }
 474
 475         arm926ejs->armv4_5_mmu.mmu_enabled = (arm926ejs->cp15_control_reg & 0x1U) ? 1 : 0;
 476         arm926ejs->armv4_5_mmu.armv4_5_cache.d_u_cache_enabled = (arm926ejs->cp15_control_reg & 0x4U) ? 1 : 0;
 477         arm926ejs->armv4_5_mmu.armv4_5_cache.i_cache_enabled = (arm926ejs->cp15_control_reg & 0x1000U) ? 1 : 0;
 478
 479         /* save i/d fault status and address register */
 480         arm926ejs->read_cp15(target, 0, 0, 5, 0, &arm926ejs->d_fsr);
 481         arm926ejs->read_cp15(target, 0, 1, 5, 0, &arm926ejs->i_fsr);
 482         arm926ejs->read_cp15(target, 0, 0, 6, 0, &arm926ejs->d_far);
 483
 484         LOG_DEBUG("D FSR: 0x%8.8x, D FAR: 0x%8.8x, I FSR: 0x%8.8x",
 485                 arm926ejs->d_fsr, arm926ejs->d_far, arm926ejs->i_fsr);
 486
 487         u32 cache_dbg_ctrl;
 488
 489         /* read-modify-write CP15 cache debug control register
 490          * to disable I/D-cache linefills and force WT */
 491         arm926ejs->read_cp15(target, 7, 0, 15, 0, &cache_dbg_ctrl);
 492         cache_dbg_ctrl |= 0x7;
 493         arm926ejs->write_cp15(target, 7, 0, 15, 0, cache_dbg_ctrl);
 494 }
 495
 496 void arm926ejs_pre_restore_context(target_t *target)
 497 {
 498         armv4_5_common_t *armv4_5 = target->arch_info;
 499         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 500         arm9tdmi_common_t *arm9tdmi = arm7_9->arch_info;
 501         arm926ejs_common_t *arm926ejs = arm9tdmi->arch_info;
 502
 503         /* restore i/d fault status and address register */
 504         arm926ejs->write_cp15(target, 0, 0, 5, 0, arm926ejs->d_fsr);
 505         arm926ejs->write_cp15(target, 0, 1, 5, 0, arm926ejs->i_fsr);
 506         arm926ejs->write_cp15(target, 0, 0, 6, 0, arm926ejs->d_far);
 507
 508         u32 cache_dbg_ctrl;
 509
 510         /* read-modify-write CP15 cache debug control register
 511          * to reenable I/D-cache linefills and disable WT */
 512         arm926ejs->read_cp15(target, 7, 0, 15, 0, &cache_dbg_ctrl);
 513         cache_dbg_ctrl &= ~0x7;
 514         arm926ejs->write_cp15(target, 7, 0, 15, 0, cache_dbg_ctrl);
 515 }
 516
 517 int arm926ejs_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, arm926ejs_common_t **arm926ejs_p)
 518 {
 519         armv4_5_common_t *armv4_5 = target->arch_info;
 520         arm7_9_common_t *arm7_9;
 521         arm9tdmi_common_t *arm9tdmi;
 522         arm926ejs_common_t *arm926ejs;
 523
 524         if (armv4_5->common_magic != ARMV4_5_COMMON_MAGIC)
 525         {
 526                 return -1;
 527         }
 528
 529         arm7_9 = armv4_5->arch_info;
 530         if (arm7_9->common_magic != ARM7_9_COMMON_MAGIC)
 531         {
 532                 return -1;
 533         }
 534
 535         arm9tdmi = arm7_9->arch_info;
 536         if (arm9tdmi->common_magic != ARM9TDMI_COMMON_MAGIC)
 537         {
 538                 return -1;
 539         }
 540
 541         arm926ejs = arm9tdmi->arch_info;
 542         if (arm926ejs->common_magic != ARM926EJS_COMMON_MAGIC)
 543         {
 544                 return -1;
 545         }
 546
 547         *armv4_5_p = armv4_5;
 548         *arm7_9_p = arm7_9;
 549         *arm9tdmi_p = arm9tdmi;
 550         *arm926ejs_p = arm926ejs;
 551
 552         return ERROR_OK;
 553 }
 554
 555 int arm926ejs_arch_state(struct target_s *target)
 556 {
 557         armv4_5_common_t *armv4_5 = target->arch_info;
 558         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 559         arm9tdmi_common_t *arm9tdmi = arm7_9->arch_info;
 560         arm926ejs_common_t *arm926ejs = arm9tdmi->arch_info;
 561
 562         char *state[] =
 563         {
 564                 "disabled", "enabled"
 565         };
 566
 567         if (armv4_5->common_magic != ARMV4_5_COMMON_MAGIC)
 568         {
 569                 LOG_ERROR("BUG: called for a non-ARMv4/5 target");
 570                 exit(-1);
 571         }
 572
 573         LOG_USER(
 574                         "target halted in %s state due to %s, current mode: %s\n"
 575                         "cpsr: 0x%8.8x pc: 0x%8.8x\n"
 576                         "MMU: %s, D-Cache: %s, I-Cache: %s",
 577                          armv4_5_state_strings[armv4_5->core_state],
 578                          Jim_Nvp_value2name_simple( nvp_target_debug_reason,target->debug_reason)->name,
 579                          armv4_5_mode_strings[armv4_5_mode_to_number(armv4_5->core_mode)],
 580                          buf_get_u32(armv4_5->core_cache->reg_list[ARMV4_5_CPSR].value, 0, 32),
 581                          buf_get_u32(armv4_5->core_cache->reg_list[15].value, 0, 32),
 582                          state[arm926ejs->armv4_5_mmu.mmu_enabled],
 583                          state[arm926ejs->armv4_5_mmu.armv4_5_cache.d_u_cache_enabled],
 584                          state[arm926ejs->armv4_5_mmu.armv4_5_cache.i_cache_enabled]);
 585
 586         return ERROR_OK;
 587 }
 588
 589 int arm926ejs_soft_reset_halt(struct target_s *target)
 590 {
 591         int retval = ERROR_OK;
 592         armv4_5_common_t *armv4_5 = target->arch_info;
 593         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 594         arm9tdmi_common_t *arm9tdmi = arm7_9->arch_info;
 595         arm926ejs_common_t *arm926ejs = arm9tdmi->arch_info;
 596         reg_t *dbg_stat = &arm7_9->eice_cache->reg_list[EICE_DBG_STAT];
 597
 598         if((retval = target_halt(target)) != ERROR_OK)
 599         {
 600                 return retval;
 601         }
 602
 603         long long then=timeval_ms();
 604         int timeout;
 605         while (!(timeout=((timeval_ms()-then)>1000)))
 606         {
 607                 if (buf_get_u32(dbg_stat->value, EICE_DBG_STATUS_DBGACK, 1) == 0)
 608                 {
 609                         embeddedice_read_reg(dbg_stat);
 610                         if((retval = jtag_execute_queue()) != ERROR_OK)
 611                         {
 612                                 return retval;
 613                         }
 614                 }  else
 615                 {
 616                         break;
 617                 }
 618                 if (debug_level>=1)
 619                 {
 620                         /* do not eat all CPU, time out after 1 se*/
 621                         alive_sleep(100);
 622                 } else
 623                 {
 624                         keep_alive();
 625                 }
 626         }
 627         if (timeout)
 628         {
 629                 LOG_ERROR("Failed to halt CPU after 1 sec");
 630                 return ERROR_TARGET_TIMEOUT;
 631         }
 632
 633         target->state = TARGET_HALTED;
 634
 635         /* SVC, ARM state, IRQ and FIQ disabled */
 636         buf_set_u32(armv4_5->core_cache->reg_list[ARMV4_5_CPSR].value, 0, 8, 0xd3);
 637         armv4_5->core_cache->reg_list[ARMV4_5_CPSR].dirty = 1;
 638         armv4_5->core_cache->reg_list[ARMV4_5_CPSR].valid = 1;
 639
 640         /* start fetching from 0x0 */
 641         buf_set_u32(armv4_5->core_cache->reg_list[15].value, 0, 32, 0x0);
 642         armv4_5->core_cache->reg_list[15].dirty = 1;
 643         armv4_5->core_cache->reg_list[15].valid = 1;
 644
 645         armv4_5->core_mode = ARMV4_5_MODE_SVC;
 646         armv4_5->core_state = ARMV4_5_STATE_ARM;
 647
 648         arm926ejs_disable_mmu_caches(target, 1, 1, 1);
 649         arm926ejs->armv4_5_mmu.mmu_enabled = 0;
 650         arm926ejs->armv4_5_mmu.armv4_5_cache.d_u_cache_enabled = 0;
 651         arm926ejs->armv4_5_mmu.armv4_5_cache.i_cache_enabled = 0;
 652
 653         return target_call_event_callbacks(target, TARGET_EVENT_HALTED);
 654 }
 655
 656 int arm926ejs_write_memory(struct target_s *target, u32 address, u32 size, u32 count, u8 *buffer)
 657 {
 658         int retval;
 659         armv4_5_common_t *armv4_5 = target->arch_info;
 660         arm7_9_common_t *arm7_9 = armv4_5->arch_info;
 661         arm9tdmi_common_t *arm9tdmi = arm7_9->arch_info;
 662         arm926ejs_common_t *arm926ejs = arm9tdmi->arch_info;
 663
 664         if ((retval = arm7_9_write_memory(target, address, size, count, buffer)) != ERROR_OK)
 665                 return retval;
 666
 667         /* If ICache is enabled, we have to invalidate affected ICache lines
 668          * the DCache is forced to write-through, so we don't have to clean it here
 669          */
 670         if (arm926ejs->armv4_5_mmu.armv4_5_cache.i_cache_enabled)
 671         {
 672                 if (count <= 1)
 673                 {
 674                         /* invalidate ICache single entry with MVA */
 675                         arm926ejs->write_cp15(target, 0, 1, 7, 5, address);
 676                 }
 677                 else
 678                 {
 679                         /* invalidate ICache */
 680                         arm926ejs->write_cp15(target, 0, 0, 7, 5, address);
 681                 }
 682         }
 683
 684         return retval;
 685 }
 686
 687 int arm926ejs_init_target(struct command_context_s *cmd_ctx, struct target_s *target)
 688 {
 689         arm9tdmi_init_target(cmd_ctx, target);
 690
 691         return ERROR_OK;
 692 }
 693
 694 int arm926ejs_quit(void)
 695 {
 696         return ERROR_OK;
 697 }
 698
 699 int arm926ejs_init_arch_info(target_t *target, arm926ejs_common_t *arm926ejs, jtag_tap_t *tap)
 700 {
 701         arm9tdmi_common_t *arm9tdmi = &arm926ejs->arm9tdmi_common;
 702         arm7_9_common_t *arm7_9 = &arm9tdmi->arm7_9_common;
 703
 704         /* initialize arm9tdmi specific info (including arm7_9 and armv4_5)
 705          */
 706         arm9tdmi_init_arch_info(target, arm9tdmi, tap);
 707
 708         arm9tdmi->arch_info = arm926ejs;
 709         arm926ejs->common_magic = ARM926EJS_COMMON_MAGIC;
 710
 711         arm7_9->post_debug_entry = arm926ejs_post_debug_entry;
 712         arm7_9->pre_restore_context = arm926ejs_pre_restore_context;
 713
 714         arm926ejs->read_cp15 = arm926ejs_cp15_read;
 715         arm926ejs->write_cp15 = arm926ejs_cp15_write;
 716         arm926ejs->armv4_5_mmu.armv4_5_cache.ctype = -1;
 717         arm926ejs->armv4_5_mmu.get_ttb = arm926ejs_get_ttb;
 718         arm926ejs->armv4_5_mmu.read_memory = arm7_9_read_memory;
 719         arm926ejs->armv4_5_mmu.write_memory = arm7_9_write_memory;
 720         arm926ejs->armv4_5_mmu.disable_mmu_caches = arm926ejs_disable_mmu_caches;
 721         arm926ejs->armv4_5_mmu.enable_mmu_caches = arm926ejs_enable_mmu_caches;
 722         arm926ejs->armv4_5_mmu.has_tiny_pages = 1;
 723         arm926ejs->armv4_5_mmu.mmu_enabled = 0;
 724
 725         arm7_9->examine_debug_reason = arm926ejs_examine_debug_reason;
 726
 727         /* The ARM926EJ-S implements the ARMv5TE architecture which
 728          * has the BKPT instruction, so we don't have to use a watchpoint comparator
 729          */
 730         arm7_9->arm_bkpt = ARMV5_BKPT(0x0);
 731         arm7_9->thumb_bkpt = ARMV5_T_BKPT(0x0) & 0xffff;
 732
 733         return ERROR_OK;
 734 }
 735
 736 int arm926ejs_target_create(struct target_s *target, Jim_Interp *interp)
 737 {
 738         arm926ejs_common_t *arm926ejs = calloc(1,sizeof(arm926ejs_common_t));
 739
 740         arm926ejs_init_arch_info(target, arm926ejs, target->tap);
 741
 742         return ERROR_OK;
 743 }
 744
 745 int arm926ejs_register_commands(struct command_context_s *cmd_ctx)
 746 {
 747         int retval;
 748         command_t *arm926ejs_cmd;
 749
 750
 751         retval = arm9tdmi_register_commands(cmd_ctx);
 752
 753         arm926ejs_cmd = register_command(cmd_ctx, NULL, "arm926ejs", NULL, COMMAND_ANY, "arm926ejs specific commands");
 754
 755         register_command(cmd_ctx, arm926ejs_cmd, "cp15", arm926ejs_handle_cp15_command, COMMAND_EXEC, "display/modify cp15 register <opcode_1> <opcode_2> <CRn> <CRm> [value]");
 756
 757         register_command(cmd_ctx, arm926ejs_cmd, "cache_info", arm926ejs_handle_cache_info_command, COMMAND_EXEC, "display information about target caches");
 758         register_command(cmd_ctx, arm926ejs_cmd, "virt2phys", arm926ejs_handle_virt2phys_command, COMMAND_EXEC, "translate va to pa <va>");
 759
 760         register_command(cmd_ctx, arm926ejs_cmd, "mdw_phys", arm926ejs_handle_md_phys_command, COMMAND_EXEC, "display memory words <physical addr> [count]");
 761         register_command(cmd_ctx, arm926ejs_cmd, "mdh_phys", arm926ejs_handle_md_phys_command, COMMAND_EXEC, "display memory half-words <physical addr> [count]");
 762         register_command(cmd_ctx, arm926ejs_cmd, "mdb_phys", arm926ejs_handle_md_phys_command, COMMAND_EXEC, "display memory bytes <physical addr> [count]");
 763
 764         register_command(cmd_ctx, arm926ejs_cmd, "mww_phys", arm926ejs_handle_mw_phys_command, COMMAND_EXEC, "write memory word <physical addr> <value>");
 765         register_command(cmd_ctx, arm926ejs_cmd, "mwh_phys", arm926ejs_handle_mw_phys_command, COMMAND_EXEC, "write memory half-word <physical addr> <value>");
 766         register_command(cmd_ctx, arm926ejs_cmd, "mwb_phys", arm926ejs_handle_mw_phys_command, COMMAND_EXEC, "write memory byte <physical addr> <value>");
 767
 768         return retval;
 769 }
 770
 771 int arm926ejs_handle_cp15_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
 772 {
 773         int retval;
 774         target_t *target = get_current_target(cmd_ctx);
 775         armv4_5_common_t *armv4_5;
 776         arm7_9_common_t *arm7_9;
 777         arm9tdmi_common_t *arm9tdmi;
 778         arm926ejs_common_t *arm926ejs;
 779         int opcode_1;
 780         int opcode_2;
 781         int CRn;
 782         int CRm;
 783
 784         if ((argc < 4) || (argc > 5))
 785         {
 786                 command_print(cmd_ctx, "usage: arm926ejs cp15 <opcode_1> <opcode_2> <CRn> <CRm> [value]");
 787                 return ERROR_OK;
 788         }
 789
 790         opcode_1 = strtoul(args[0], NULL, 0);
 791         opcode_2 = strtoul(args[1], NULL, 0);
 792         CRn = strtoul(args[2], NULL, 0);
 793         CRm = strtoul(args[3], NULL, 0);
 794
 795         if (arm926ejs_get_arch_pointers(target, &armv4_5, &arm7_9, &arm9tdmi, &arm926ejs) != ERROR_OK)
 796         {
 797                 command_print(cmd_ctx, "current target isn't an ARM926EJ-S target");
 798                 return ERROR_OK;
 799         }
 800
 801         if (target->state != TARGET_HALTED)
 802         {
 803                 command_print(cmd_ctx, "target must be stopped for \"%s\" command", cmd);
 804                 return ERROR_OK;
 805         }
 806
 807         if (argc == 4)
 808         {
 809                 u32 value;
 810                 if ((retval = arm926ejs->read_cp15(target, opcode_1, opcode_2, CRn, CRm, &value)) != ERROR_OK)
 811                 {
 812                         command_print(cmd_ctx, "couldn't access register");
 813                         return ERROR_OK;
 814                 }
 815                 if((retval = jtag_execute_queue()) != ERROR_OK)
 816                 {
 817                         return retval;
 818                 }
 819
 820                 command_print(cmd_ctx, "%i %i %i %i: %8.8x", opcode_1, opcode_2, CRn, CRm, value);
 821         }
 822         else
 823         {
 824                 u32 value = strtoul(args[4], NULL, 0);
 825                 if ((retval = arm926ejs->write_cp15(target, opcode_1, opcode_2, CRn, CRm, value)) != ERROR_OK)
 826                 {
 827                         command_print(cmd_ctx, "couldn't access register");
 828                         return ERROR_OK;
 829                 }
 830                 command_print(cmd_ctx, "%i %i %i %i: %8.8x", opcode_1, opcode_2, CRn, CRm, value);
 831         }
 832
 833         return ERROR_OK;
 834 }
 835
 836 int arm926ejs_handle_cache_info_command(struct command_context_s *cmd_ctx, char *cmd, char **args, int argc)
 837 {
 838         target_t *target = get_current_target(cmd_ctx);
 839         armv4_5_common_t *armv4_5;
 840         arm7_9_common_t *arm7_9;
 841         arm9tdmi_common_t *arm9tdmi;
 842         arm926ejs_common_t *arm926ejs;
 843
 844         if (arm926ejs_get_arch_pointers(target, &armv4_5, &arm7_9, &arm9tdmi, &arm926ejs) != ERROR_OK)
 845         {
 846                 command_print(cmd_ctx, "current target isn't an ARM926EJ-S target");
 847                 return ERROR_OK;
 848         }
 849
 850         return armv4_5_handle_cache_info_command(cmd_ctx, &arm926ejs->armv4_5_mmu.armv4_5_cache);
 851 }
 852
 853 int arm926ejs_handle_virt2phys_command(command_context_t *cmd_ctx, char *cmd, char **args, int argc)
 854 {
 855         target_t *target = get_current_target(cmd_ctx);
 856         armv4_5_common_t *armv4_5;
 857         arm7_9_common_t *arm7_9;
 858         arm9tdmi_common_t *arm9tdmi;
 859         arm926ejs_common_t *arm926ejs;
 860         arm_jtag_t *jtag_info;
 861
 862         if (arm926ejs_get_arch_pointers(target, &armv4_5, &arm7_9, &arm9tdmi, &arm926ejs) != ERROR_OK)
 863         {
 864                 command_print(cmd_ctx, "current target isn't an ARM926EJ-S target");
 865                 return ERROR_OK;
 866         }
 867
 868         jtag_info = &arm7_9->jtag_info;
 869
 870         if (target->state != TARGET_HALTED)
 871         {
 872                 command_print(cmd_ctx, "target must be stopped for \"%s\" command", cmd);
 873                 return ERROR_OK;
 874         }
 875
 876         return armv4_5_mmu_handle_virt2phys_command(cmd_ctx, cmd, args, argc, target, &arm926ejs->armv4_5_mmu);
 877 }
 878
 879 int arm926ejs_handle_md_phys_command(command_context_t *cmd_ctx, char *cmd, char **args, int argc)
 880 {
 881         target_t *target = get_current_target(cmd_ctx);
 882         armv4_5_common_t *armv4_5;
 883         arm7_9_common_t *arm7_9;
 884         arm9tdmi_common_t *arm9tdmi;
 885         arm926ejs_common_t *arm926ejs;
 886         arm_jtag_t *jtag_info;
 887
 888         if (arm926ejs_get_arch_pointers(target, &armv4_5, &arm7_9, &arm9tdmi, &arm926ejs) != ERROR_OK)
 889         {
 890                 command_print(cmd_ctx, "current target isn't an ARM926EJ-S target");
 891                 return ERROR_OK;
 892         }
 893
 894         jtag_info = &arm7_9->jtag_info;
 895
 896         if (target->state != TARGET_HALTED)
 897         {
 898                 command_print(cmd_ctx, "target must be stopped for \"%s\" command", cmd);
 899                 return ERROR_OK;
 900         }
 901
 902         return armv4_5_mmu_handle_md_phys_command(cmd_ctx, cmd, args, argc, target, &arm926ejs->armv4_5_mmu);
 903 }
 904
 905 int arm926ejs_handle_mw_phys_command(command_context_t *cmd_ctx, char *cmd, char **args, int argc)
 906 {
 907         target_t *target = get_current_target(cmd_ctx);
 908         armv4_5_common_t *armv4_5;
 909         arm7_9_common_t *arm7_9;
 910         arm9tdmi_common_t *arm9tdmi;
 911         arm926ejs_common_t *arm926ejs;
 912         arm_jtag_t *jtag_info;
 913
 914         if (arm926ejs_get_arch_pointers(target, &armv4_5, &arm7_9, &arm9tdmi, &arm926ejs) != ERROR_OK)
 915         {
 916                 command_print(cmd_ctx, "current target isn't an ARM926EJ-S target");
 917                 return ERROR_OK;
 918         }
 919
 920         jtag_info = &arm7_9->jtag_info;
 921
 922         if (target->state != TARGET_HALTED)
 923         {
 924                 command_print(cmd_ctx, "target must be stopped for \"%s\" command", cmd);
 925                 return ERROR_OK;
 926         }
 927
 928         return armv4_5_mmu_handle_mw_phys_command(cmd_ctx, cmd, args, argc, target, &arm926ejs->armv4_5_mmu);
 929 }
 930
 931 static int arm926ejs_virt2phys(struct target_s *target, u32 virtual, u32 *physical)
 932 {
 933         int retval;
 934         int type;
 935         u32 cb;
 936         int domain;
 937         u32 ap;
 938
 939         armv4_5_common_t *armv4_5;
 940         arm7_9_common_t *arm7_9;
 941         arm9tdmi_common_t *arm9tdmi;
 942         arm926ejs_common_t *arm926ejs;
 943         retval= arm926ejs_get_arch_pointers(target, &armv4_5, &arm7_9, &arm9tdmi, &arm926ejs);
 944         if (retval != ERROR_OK)
 945         {
 946                 return retval;
 947         }
 948         u32 ret = armv4_5_mmu_translate_va(target, &arm926ejs->armv4_5_mmu, virtual, &type, &cb, &domain, &ap);
 949         if (type == -1)
 950         {
 951                 return ret;
 952         }
 953         *physical = ret;
 954         return ERROR_OK;
 955 }
 956
 957 static int arm926ejs_mmu(struct target_s *target, int *enabled)
 958 {
 959         armv4_5_common_t *armv4_5 = target->arch_info;
 960         arm926ejs_common_t *arm926ejs = armv4_5->arch_info;
 961
 962         if (target->state != TARGET_HALTED)
 963         {
 964                 LOG_ERROR("Target not halted");
 965                 return ERROR_TARGET_INVALID;
 966         }
 967         *enabled = arm926ejs->armv4_5_mmu.mmu_enabled;
 968         return ERROR_OK;
 969 }