2002-07-14 00:15:20 +00:00
|
|
|
|
/* OBSOLETE /* Mitsubishi Electric Corp. D30V Simulator. */
|
|
|
|
|
/* OBSOLETE Copyright (C) 1997, Free Software Foundation, Inc. */
|
|
|
|
|
/* OBSOLETE Contributed by Cygnus Support. */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE This file is part of GDB, the GNU debugger. */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE This program is free software; you can redistribute it and/or modify */
|
|
|
|
|
/* OBSOLETE it under the terms of the GNU General Public License as published by */
|
|
|
|
|
/* OBSOLETE the Free Software Foundation; either version 2, or (at your option) */
|
|
|
|
|
/* OBSOLETE any later version. */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE This program is distributed in the hope that it will be useful, */
|
|
|
|
|
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */
|
|
|
|
|
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */
|
|
|
|
|
/* OBSOLETE GNU General Public License for more details. */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE You should have received a copy of the GNU General Public License along */
|
|
|
|
|
/* OBSOLETE with this program; if not, write to the Free Software Foundation, Inc., */
|
|
|
|
|
/* OBSOLETE 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE #ifndef _CPU_C_ */
|
|
|
|
|
/* OBSOLETE #define _CPU_C_ */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE #include "sim-main.h" */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE int */
|
|
|
|
|
/* OBSOLETE is_wrong_slot (SIM_DESC sd, */
|
|
|
|
|
/* OBSOLETE address_word cia, */
|
|
|
|
|
/* OBSOLETE itable_index index) */
|
|
|
|
|
/* OBSOLETE { */
|
|
|
|
|
/* OBSOLETE switch (STATE_CPU (sd, 0)->unit) */
|
|
|
|
|
/* OBSOLETE { */
|
|
|
|
|
/* OBSOLETE case memory_unit: */
|
|
|
|
|
/* OBSOLETE return !itable[index].option[itable_option_mu]; */
|
|
|
|
|
/* OBSOLETE case integer_unit: */
|
|
|
|
|
/* OBSOLETE return !itable[index].option[itable_option_iu]; */
|
|
|
|
|
/* OBSOLETE case any_unit: */
|
|
|
|
|
/* OBSOLETE return 0; */
|
|
|
|
|
/* OBSOLETE default: */
|
|
|
|
|
/* OBSOLETE sim_engine_abort (sd, STATE_CPU (sd, 0), cia, */
|
|
|
|
|
/* OBSOLETE "internal error - is_wrong_slot - bad switch"); */
|
|
|
|
|
/* OBSOLETE return -1; */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE int */
|
|
|
|
|
/* OBSOLETE is_condition_ok (SIM_DESC sd, */
|
|
|
|
|
/* OBSOLETE address_word cia, */
|
|
|
|
|
/* OBSOLETE int cond) */
|
|
|
|
|
/* OBSOLETE { */
|
|
|
|
|
/* OBSOLETE switch (cond) */
|
|
|
|
|
/* OBSOLETE { */
|
|
|
|
|
/* OBSOLETE case 0x0: */
|
|
|
|
|
/* OBSOLETE return 1; */
|
|
|
|
|
/* OBSOLETE case 0x1: */
|
|
|
|
|
/* OBSOLETE return PSW_VAL(PSW_F0); */
|
|
|
|
|
/* OBSOLETE case 0x2: */
|
|
|
|
|
/* OBSOLETE return !PSW_VAL(PSW_F0); */
|
|
|
|
|
/* OBSOLETE case 0x3: */
|
|
|
|
|
/* OBSOLETE return PSW_VAL(PSW_F1); */
|
|
|
|
|
/* OBSOLETE case 0x4: */
|
|
|
|
|
/* OBSOLETE return !PSW_VAL(PSW_F1); */
|
|
|
|
|
/* OBSOLETE case 0x5: */
|
|
|
|
|
/* OBSOLETE return PSW_VAL(PSW_F0) && PSW_VAL(PSW_F1); */
|
|
|
|
|
/* OBSOLETE case 0x6: */
|
|
|
|
|
/* OBSOLETE return PSW_VAL(PSW_F0) && !PSW_VAL(PSW_F1); */
|
|
|
|
|
/* OBSOLETE case 0x7: */
|
|
|
|
|
/* OBSOLETE sim_engine_abort (sd, STATE_CPU (sd, 0), cia, */
|
|
|
|
|
/* OBSOLETE "is_condition_ok - bad instruction condition bits"); */
|
|
|
|
|
/* OBSOLETE return 0; */
|
|
|
|
|
/* OBSOLETE default: */
|
|
|
|
|
/* OBSOLETE sim_engine_abort (sd, STATE_CPU (sd, 0), cia, */
|
|
|
|
|
/* OBSOLETE "internal error - is_condition_ok - bad switch"); */
|
|
|
|
|
/* OBSOLETE return -1; */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE /* If --trace-call, trace calls, remembering the current state of */
|
|
|
|
|
/* OBSOLETE registers. */ */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE typedef struct _call_stack { */
|
|
|
|
|
/* OBSOLETE struct _call_stack *prev; */
|
|
|
|
|
/* OBSOLETE registers regs; */
|
|
|
|
|
/* OBSOLETE } call_stack; */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE static call_stack *call_stack_head = (call_stack *)0; */
|
|
|
|
|
/* OBSOLETE static int call_depth = 0; */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE void call_occurred (SIM_DESC sd, */
|
|
|
|
|
/* OBSOLETE sim_cpu *cpu, */
|
|
|
|
|
/* OBSOLETE address_word cia, */
|
|
|
|
|
/* OBSOLETE address_word nia) */
|
|
|
|
|
/* OBSOLETE { */
|
|
|
|
|
/* OBSOLETE call_stack *ptr = ZALLOC (call_stack); */
|
|
|
|
|
/* OBSOLETE ptr->regs = cpu->regs; */
|
|
|
|
|
/* OBSOLETE ptr->prev = call_stack_head; */
|
|
|
|
|
/* OBSOLETE call_stack_head = ptr; */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE trace_one_insn (sd, cpu, nia, 1, "", 0, "call", */
|
|
|
|
|
/* OBSOLETE "Depth %3d, Return 0x%.8lx, Args 0x%.8lx 0x%.8lx", */
|
|
|
|
|
/* OBSOLETE ++call_depth, (unsigned long)cia+8, (unsigned long)GPR[2], */
|
|
|
|
|
/* OBSOLETE (unsigned long)GPR[3]); */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE /* If --trace-call, trace returns, checking if any saved register was changed. */ */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE void return_occurred (SIM_DESC sd, */
|
|
|
|
|
/* OBSOLETE sim_cpu *cpu, */
|
|
|
|
|
/* OBSOLETE address_word cia, */
|
|
|
|
|
/* OBSOLETE address_word nia) */
|
|
|
|
|
/* OBSOLETE { */
|
|
|
|
|
/* OBSOLETE char buffer[1024]; */
|
|
|
|
|
/* OBSOLETE char *buf_ptr = buffer; */
|
|
|
|
|
/* OBSOLETE call_stack *ptr = call_stack_head; */
|
|
|
|
|
/* OBSOLETE int regno; */
|
|
|
|
|
/* OBSOLETE char *prefix = ", Registers that differ: "; */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE *buf_ptr = '\0'; */
|
|
|
|
|
/* OBSOLETE for (regno = 34; regno <= 63; regno++) { */
|
|
|
|
|
/* OBSOLETE if (cpu->regs.general_purpose[regno] != ptr->regs.general_purpose[regno]) { */
|
|
|
|
|
/* OBSOLETE sprintf (buf_ptr, "%sr%d", prefix, regno); */
|
|
|
|
|
/* OBSOLETE buf_ptr += strlen (buf_ptr); */
|
|
|
|
|
/* OBSOLETE prefix = " "; */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE if (cpu->regs.accumulator[1] != ptr->regs.accumulator[1]) { */
|
|
|
|
|
/* OBSOLETE sprintf (buf_ptr, "%sa1", prefix); */
|
|
|
|
|
/* OBSOLETE buf_ptr += strlen (buf_ptr); */
|
|
|
|
|
/* OBSOLETE prefix = " "; */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE trace_one_insn (sd, cpu, cia, 1, "", 0, "return", */
|
|
|
|
|
/* OBSOLETE "Depth %3d, Return 0x%.8lx, Ret. 0x%.8lx 0x%.8lx%s", */
|
|
|
|
|
/* OBSOLETE call_depth--, (unsigned long)nia, (unsigned long)GPR[2], */
|
|
|
|
|
/* OBSOLETE (unsigned long)GPR[3], buffer); */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE call_stack_head = ptr->prev; */
|
|
|
|
|
/* OBSOLETE zfree (ptr); */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE /* Read/write functions for system call interface. */ */
|
|
|
|
|
/* OBSOLETE int */
|
|
|
|
|
/* OBSOLETE d30v_read_mem (host_callback *cb, */
|
|
|
|
|
/* OBSOLETE struct cb_syscall *sc, */
|
|
|
|
|
/* OBSOLETE unsigned long taddr, */
|
|
|
|
|
/* OBSOLETE char *buf, */
|
|
|
|
|
/* OBSOLETE int bytes) */
|
|
|
|
|
/* OBSOLETE { */
|
|
|
|
|
/* OBSOLETE SIM_DESC sd = (SIM_DESC) sc->p1; */
|
|
|
|
|
/* OBSOLETE sim_cpu *cpu = STATE_CPU (sd, 0); */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE return sim_core_read_buffer (sd, cpu, read_map, buf, taddr, bytes); */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE int */
|
|
|
|
|
/* OBSOLETE d30v_write_mem (host_callback *cb, */
|
|
|
|
|
/* OBSOLETE struct cb_syscall *sc, */
|
|
|
|
|
/* OBSOLETE unsigned long taddr, */
|
|
|
|
|
/* OBSOLETE const char *buf, */
|
|
|
|
|
/* OBSOLETE int bytes) */
|
|
|
|
|
/* OBSOLETE { */
|
|
|
|
|
/* OBSOLETE SIM_DESC sd = (SIM_DESC) sc->p1; */
|
|
|
|
|
/* OBSOLETE sim_cpu *cpu = STATE_CPU (sd, 0); */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE return sim_core_write_buffer (sd, cpu, write_map, buf, taddr, bytes); */
|
|
|
|
|
/* OBSOLETE } */
|
|
|
|
|
/* OBSOLETE */
|
|
|
|
|
/* OBSOLETE #endif /* _CPU_C_ */ */
|