| /* OBSOLETE /* This file is part of the program psim. */ |
| /* OBSOLETE */ |
| /* OBSOLETE Copyright (C) 1994-1996, Andrew Cagney <cagney@highland.com.au> */ |
| /* OBSOLETE Copyright (C) 1997, Free Software Foundation */ |
| /* 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 of the License, or */ |
| /* OBSOLETE (at your option) 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 */ |
| /* OBSOLETE along with this program; if not, write to the Free Software */ |
| /* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ |
| /* OBSOLETE */ |
| /* OBSOLETE */ */ |
| /* OBSOLETE */ |
| /* OBSOLETE */ |
| /* OBSOLETE #include <stdarg.h> */ |
| /* OBSOLETE #include <ctype.h> */ |
| /* OBSOLETE */ |
| /* OBSOLETE #include "sim-main.h" */ |
| /* OBSOLETE #include "sim-options.h" */ |
| /* OBSOLETE */ |
| /* OBSOLETE #include "bfd.h" */ |
| /* OBSOLETE #include "sim-utils.h" */ |
| /* OBSOLETE */ |
| /* OBSOLETE #ifdef HAVE_STDLIB_H */ |
| /* OBSOLETE #include <stdlib.h> */ |
| /* OBSOLETE #endif */ |
| /* OBSOLETE */ |
| /* OBSOLETE static unsigned long extmem_size = 1024*1024*8; /* 8 meg is the maximum listed in the arch. manual */ */ |
| /* OBSOLETE */ |
| /* OBSOLETE static const char * get_insn_name (sim_cpu *, int); */ |
| /* OBSOLETE */ |
| /* OBSOLETE #define SIM_ADDR unsigned */ |
| /* OBSOLETE */ |
| /* OBSOLETE */ |
| /* OBSOLETE #define OPTION_TRACE_CALL 200 */ |
| /* OBSOLETE #define OPTION_TRACE_TRAPDUMP 201 */ |
| /* OBSOLETE #define OPTION_EXTMEM_SIZE 202 */ |
| /* OBSOLETE */ |
| /* OBSOLETE static SIM_RC */ |
| /* OBSOLETE d30v_option_handler (SIM_DESC sd, */ |
| /* OBSOLETE sim_cpu *cpu, */ |
| /* OBSOLETE int opt, */ |
| /* OBSOLETE char *arg, */ |
| /* OBSOLETE int command_p) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE char *suffix; */ |
| /* OBSOLETE */ |
| /* OBSOLETE switch (opt) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE default: */ |
| /* OBSOLETE break; */ |
| /* OBSOLETE */ |
| /* OBSOLETE case OPTION_TRACE_CALL: */ |
| /* OBSOLETE if (arg == NULL || strcmp (arg, "yes") == 0 || strcmp (arg, "on") == 0) */ |
| /* OBSOLETE TRACE_CALL_P = 1; */ |
| /* OBSOLETE else if (strcmp (arg, "no") == 0 || strcmp (arg, "off") == 0) */ |
| /* OBSOLETE TRACE_CALL_P = 0; */ |
| /* OBSOLETE else */ |
| /* OBSOLETE { */ |
| /* OBSOLETE sim_io_eprintf (sd, "Unreconized --trace-call option `%s'\n", arg); */ |
| /* OBSOLETE return SIM_RC_FAIL; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE return SIM_RC_OK; */ |
| /* OBSOLETE */ |
| /* OBSOLETE case OPTION_TRACE_TRAPDUMP: */ |
| /* OBSOLETE if (arg == NULL || strcmp (arg, "yes") == 0 || strcmp (arg, "on") == 0) */ |
| /* OBSOLETE TRACE_TRAP_P = 1; */ |
| /* OBSOLETE else if (strcmp (arg, "no") == 0 || strcmp (arg, "off") == 0) */ |
| /* OBSOLETE TRACE_TRAP_P = 0; */ |
| /* OBSOLETE else */ |
| /* OBSOLETE { */ |
| /* OBSOLETE sim_io_eprintf (sd, "Unreconized --trace-call option `%s'\n", arg); */ |
| /* OBSOLETE return SIM_RC_FAIL; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE return SIM_RC_OK; */ |
| /* OBSOLETE */ |
| /* OBSOLETE case OPTION_EXTMEM_SIZE: */ |
| /* OBSOLETE if (arg == NULL || !isdigit (*arg)) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE sim_io_eprintf (sd, "Invalid memory size `%s'", arg); */ |
| /* OBSOLETE return SIM_RC_FAIL; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE suffix = arg; */ |
| /* OBSOLETE extmem_size = strtol (arg, &suffix, 0); */ |
| /* OBSOLETE if (*suffix == 'm' || *suffix == 'M') */ |
| /* OBSOLETE extmem_size <<= 20; */ |
| /* OBSOLETE else if (*suffix == 'k' || *suffix == 'K') */ |
| /* OBSOLETE extmem_size <<= 10; */ |
| /* OBSOLETE sim_do_commandf (sd, "memory delete 0x80000000"); */ |
| /* OBSOLETE sim_do_commandf (sd, "memory region 0x80000000,0x%lx", extmem_size); */ |
| /* OBSOLETE */ |
| /* OBSOLETE return SIM_RC_OK; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE sim_io_eprintf (sd, "Unknown option (%d)\n", opt); */ |
| /* OBSOLETE return SIM_RC_FAIL; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE static const OPTION d30v_options[] = */ |
| /* OBSOLETE { */ |
| /* OBSOLETE { {"trace-call", optional_argument, NULL, OPTION_TRACE_CALL}, */ |
| /* OBSOLETE '\0', "on|off", "Enable tracing of calls and returns, checking saved registers", */ |
| /* OBSOLETE d30v_option_handler }, */ |
| /* OBSOLETE { {"trace-trapdump", optional_argument, NULL, OPTION_TRACE_TRAPDUMP}, */ |
| /* OBSOLETE '\0', "on|off", */ |
| /* OBSOLETE #if TRAPDUMP */ |
| /* OBSOLETE "Traps 0..30 dump out all of the registers (defaults on)", */ |
| /* OBSOLETE #else */ |
| /* OBSOLETE "Traps 0..30 dump out all of the registers", */ |
| /* OBSOLETE #endif */ |
| /* OBSOLETE d30v_option_handler }, */ |
| /* OBSOLETE { {"extmem-size", required_argument, NULL, OPTION_EXTMEM_SIZE}, */ |
| /* OBSOLETE '\0', "size", "Change size of external memory, default 8 meg", */ |
| /* OBSOLETE d30v_option_handler }, */ |
| /* OBSOLETE { {NULL, no_argument, NULL, 0}, '\0', NULL, NULL, NULL } */ |
| /* OBSOLETE }; */ |
| /* OBSOLETE */ |
| /* OBSOLETE /* Return name of an insn, used by insn profiling. */ */ |
| /* OBSOLETE */ |
| /* OBSOLETE static const char * */ |
| /* OBSOLETE get_insn_name (sim_cpu *cpu, int i) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE return itable[i].name; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE /* Structures used by the simulator, for gdb just have static structures */ */ |
| /* OBSOLETE */ |
| /* OBSOLETE SIM_DESC */ |
| /* OBSOLETE sim_open (SIM_OPEN_KIND kind, */ |
| /* OBSOLETE host_callback *callback, */ |
| /* OBSOLETE struct _bfd *abfd, */ |
| /* OBSOLETE char **argv) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE SIM_DESC sd = sim_state_alloc (kind, callback); */ |
| /* OBSOLETE */ |
| /* OBSOLETE /* FIXME: watchpoints code shouldn't need this */ */ |
| /* OBSOLETE STATE_WATCHPOINTS (sd)->pc = &(PC); */ |
| /* OBSOLETE STATE_WATCHPOINTS (sd)->sizeof_pc = sizeof (PC); */ |
| /* OBSOLETE STATE_WATCHPOINTS (sd)->interrupt_handler = d30v_interrupt_event; */ |
| /* OBSOLETE */ |
| /* OBSOLETE /* Initialize the mechanism for doing insn profiling. */ */ |
| /* OBSOLETE CPU_INSN_NAME (STATE_CPU (sd, 0)) = get_insn_name; */ |
| /* OBSOLETE CPU_MAX_INSNS (STATE_CPU (sd, 0)) = nr_itable_entries; */ |
| /* OBSOLETE */ |
| /* OBSOLETE #ifdef TRAPDUMP */ |
| /* OBSOLETE TRACE_TRAP_P = TRAPDUMP; */ |
| /* OBSOLETE #endif */ |
| /* OBSOLETE */ |
| /* OBSOLETE if (sim_pre_argv_init (sd, argv[0]) != SIM_RC_OK) */ |
| /* OBSOLETE return 0; */ |
| /* OBSOLETE sim_add_option_table (sd, NULL, d30v_options); */ |
| /* OBSOLETE */ |
| /* OBSOLETE /* Memory and EEPROM */ */ |
| /* OBSOLETE /* internal instruction RAM - fixed */ */ |
| /* OBSOLETE sim_do_commandf (sd, "memory region 0,0x10000"); */ |
| /* OBSOLETE /* internal data RAM - fixed */ */ |
| /* OBSOLETE sim_do_commandf (sd, "memory region 0x20000000,0x8000"); */ |
| /* OBSOLETE /* control register dummy area */ */ |
| /* OBSOLETE sim_do_commandf (sd, "memory region 0x40000000,0x10000"); */ |
| /* OBSOLETE /* external RAM */ */ |
| /* OBSOLETE sim_do_commandf (sd, "memory region 0x80000000,0x%lx", extmem_size); */ |
| /* OBSOLETE /* EIT RAM */ */ |
| /* OBSOLETE sim_do_commandf (sd, "memory region 0xfffff000,0x1000"); */ |
| /* OBSOLETE */ |
| /* OBSOLETE /* getopt will print the error message so we just have to exit if this fails. */ |
| /* OBSOLETE FIXME: Hmmm... in the case of gdb we need getopt to call */ |
| /* OBSOLETE print_filtered. */ */ |
| /* OBSOLETE if (sim_parse_args (sd, argv) != SIM_RC_OK) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE /* Uninstall the modules to avoid memory leaks, */ |
| /* OBSOLETE file descriptor leaks, etc. */ */ |
| /* OBSOLETE sim_module_uninstall (sd); */ |
| /* OBSOLETE return 0; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE /* check for/establish the a reference program image */ */ |
| /* OBSOLETE if (sim_analyze_program (sd, */ |
| /* OBSOLETE (STATE_PROG_ARGV (sd) != NULL */ |
| /* OBSOLETE ? *STATE_PROG_ARGV (sd) */ |
| /* OBSOLETE : NULL), */ |
| /* OBSOLETE abfd) != SIM_RC_OK) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE sim_module_uninstall (sd); */ |
| /* OBSOLETE return 0; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE /* establish any remaining configuration options */ */ |
| /* OBSOLETE if (sim_config (sd) != SIM_RC_OK) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE sim_module_uninstall (sd); */ |
| /* OBSOLETE return 0; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE if (sim_post_argv_init (sd) != SIM_RC_OK) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE /* Uninstall the modules to avoid memory leaks, */ |
| /* OBSOLETE file descriptor leaks, etc. */ */ |
| /* OBSOLETE sim_module_uninstall (sd); */ |
| /* OBSOLETE return 0; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE return sd; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE */ |
| /* OBSOLETE void */ |
| /* OBSOLETE sim_close (SIM_DESC sd, int quitting) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE /* Uninstall the modules to avoid memory leaks, */ |
| /* OBSOLETE file descriptor leaks, etc. */ */ |
| /* OBSOLETE sim_module_uninstall (sd); */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE */ |
| /* OBSOLETE SIM_RC */ |
| /* OBSOLETE sim_create_inferior (SIM_DESC sd, */ |
| /* OBSOLETE struct _bfd *abfd, */ |
| /* OBSOLETE char **argv, */ |
| /* OBSOLETE char **envp) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE /* clear all registers */ */ |
| /* OBSOLETE memset (&STATE_CPU (sd, 0)->regs, 0, sizeof (STATE_CPU (sd, 0)->regs)); */ |
| /* OBSOLETE EIT_VB = EIT_VB_DEFAULT; */ |
| /* OBSOLETE STATE_CPU (sd, 0)->unit = any_unit; */ |
| /* OBSOLETE sim_module_init (sd); */ |
| /* OBSOLETE if (abfd != NULL) */ |
| /* OBSOLETE PC = bfd_get_start_address (abfd); */ |
| /* OBSOLETE else */ |
| /* OBSOLETE PC = 0xfffff000; /* reset value */ */ |
| /* OBSOLETE return SIM_RC_OK; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE void */ |
| /* OBSOLETE sim_do_command (SIM_DESC sd, char *cmd) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE if (sim_args_command (sd, cmd) != SIM_RC_OK) */ |
| /* OBSOLETE sim_io_printf (sd, "Unknown command `%s'\n", cmd); */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE /* The following register definitions were ripped off from */ |
| /* OBSOLETE gdb/config/tm-d30v.h. If any of those defs changes, this table needs to */ |
| /* OBSOLETE be updated. */ */ |
| /* OBSOLETE */ |
| /* OBSOLETE #define NUM_REGS 86 */ |
| /* OBSOLETE */ |
| /* OBSOLETE #define R0_REGNUM 0 */ |
| /* OBSOLETE #define FP_REGNUM 11 */ |
| /* OBSOLETE #define LR_REGNUM 62 */ |
| /* OBSOLETE #define SP_REGNUM 63 */ |
| /* OBSOLETE #define SPI_REGNUM 64 /* Interrupt stack pointer */ */ |
| /* OBSOLETE #define SPU_REGNUM 65 /* User stack pointer */ */ |
| /* OBSOLETE #define CREGS_START 66 */ |
| /* OBSOLETE */ |
| /* OBSOLETE #define PSW_REGNUM (CREGS_START + 0) /* psw, bpsw, or dpsw??? */ */ |
| /* OBSOLETE #define PSW_SM 0x80000000 /* Stack mode: 0 == interrupt (SPI), */ |
| /* OBSOLETE 1 == user (SPU) */ */ |
| /* OBSOLETE #define BPSW_REGNUM (CREGS_START + 1) /* Backup PSW (on interrupt) */ */ |
| /* OBSOLETE #define PC_REGNUM (CREGS_START + 2) /* pc, bpc, or dpc??? */ */ |
| /* OBSOLETE #define BPC_REGNUM (CREGS_START + 3) /* Backup PC (on interrupt) */ */ |
| /* OBSOLETE #define DPSW_REGNUM (CREGS_START + 4) /* Backup PSW (on debug trap) */ */ |
| /* OBSOLETE #define DPC_REGNUM (CREGS_START + 5) /* Backup PC (on debug trap) */ */ |
| /* OBSOLETE #define RPT_C_REGNUM (CREGS_START + 7) /* Loop count */ */ |
| /* OBSOLETE #define RPT_S_REGNUM (CREGS_START + 8) /* Loop start address*/ */ |
| /* OBSOLETE #define RPT_E_REGNUM (CREGS_START + 9) /* Loop end address */ */ |
| /* OBSOLETE #define MOD_S_REGNUM (CREGS_START + 10) */ |
| /* OBSOLETE #define MOD_E_REGNUM (CREGS_START + 11) */ |
| /* OBSOLETE #define IBA_REGNUM (CREGS_START + 14) /* Instruction break address */ */ |
| /* OBSOLETE #define EIT_VB_REGNUM (CREGS_START + 15) /* Vector base address */ */ |
| /* OBSOLETE #define INT_S_REGNUM (CREGS_START + 16) /* Interrupt status */ */ |
| /* OBSOLETE #define INT_M_REGNUM (CREGS_START + 17) /* Interrupt mask */ */ |
| /* OBSOLETE #define A0_REGNUM 84 */ |
| /* OBSOLETE #define A1_REGNUM 85 */ |
| /* OBSOLETE */ |
| /* OBSOLETE int */ |
| /* OBSOLETE sim_fetch_register (sd, regno, buf, length) */ |
| /* OBSOLETE SIM_DESC sd; */ |
| /* OBSOLETE int regno; */ |
| /* OBSOLETE unsigned char *buf; */ |
| /* OBSOLETE int length; */ |
| /* OBSOLETE { */ |
| /* OBSOLETE if (regno < A0_REGNUM) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE unsigned32 reg; */ |
| /* OBSOLETE */ |
| /* OBSOLETE if (regno <= R0_REGNUM + 63) */ |
| /* OBSOLETE reg = sd->cpu[0].regs.general_purpose[regno]; */ |
| /* OBSOLETE else if (regno <= SPU_REGNUM) */ |
| /* OBSOLETE reg = sd->cpu[0].regs.sp[regno - SPI_REGNUM]; */ |
| /* OBSOLETE else */ |
| /* OBSOLETE reg = sd->cpu[0].regs.control[regno - CREGS_START]; */ |
| /* OBSOLETE */ |
| /* OBSOLETE buf[0] = reg >> 24; */ |
| /* OBSOLETE buf[1] = reg >> 16; */ |
| /* OBSOLETE buf[2] = reg >> 8; */ |
| /* OBSOLETE buf[3] = reg; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE else if (regno < NUM_REGS) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE unsigned32 reg; */ |
| /* OBSOLETE */ |
| /* OBSOLETE reg = sd->cpu[0].regs.accumulator[regno - A0_REGNUM] >> 32; */ |
| /* OBSOLETE */ |
| /* OBSOLETE buf[0] = reg >> 24; */ |
| /* OBSOLETE buf[1] = reg >> 16; */ |
| /* OBSOLETE buf[2] = reg >> 8; */ |
| /* OBSOLETE buf[3] = reg; */ |
| /* OBSOLETE */ |
| /* OBSOLETE reg = sd->cpu[0].regs.accumulator[regno - A0_REGNUM]; */ |
| /* OBSOLETE */ |
| /* OBSOLETE buf[4] = reg >> 24; */ |
| /* OBSOLETE buf[5] = reg >> 16; */ |
| /* OBSOLETE buf[6] = reg >> 8; */ |
| /* OBSOLETE buf[7] = reg; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE else */ |
| /* OBSOLETE abort (); */ |
| /* OBSOLETE return -1; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE */ |
| /* OBSOLETE int */ |
| /* OBSOLETE sim_store_register (sd, regno, buf, length) */ |
| /* OBSOLETE SIM_DESC sd; */ |
| /* OBSOLETE int regno; */ |
| /* OBSOLETE unsigned char *buf; */ |
| /* OBSOLETE int length; */ |
| /* OBSOLETE { */ |
| /* OBSOLETE if (regno < A0_REGNUM) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE unsigned32 reg; */ |
| /* OBSOLETE */ |
| /* OBSOLETE reg = (buf[0] << 24) | (buf[1] << 16) | (buf[2] << 8) | buf[3]; */ |
| /* OBSOLETE */ |
| /* OBSOLETE if (regno <= R0_REGNUM + 63) */ |
| /* OBSOLETE sd->cpu[0].regs.general_purpose[regno] = reg; */ |
| /* OBSOLETE else if (regno <= SPU_REGNUM) */ |
| /* OBSOLETE sd->cpu[0].regs.sp[regno - SPI_REGNUM] = reg; */ |
| /* OBSOLETE else */ |
| /* OBSOLETE sd->cpu[0].regs.control[regno - CREGS_START] = reg; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE else if (regno < NUM_REGS) */ |
| /* OBSOLETE { */ |
| /* OBSOLETE unsigned32 reg; */ |
| /* OBSOLETE */ |
| /* OBSOLETE reg = (buf[0] << 24) | (buf[1] << 16) | (buf[2] << 8) | buf[3]; */ |
| /* OBSOLETE */ |
| /* OBSOLETE sd->cpu[0].regs.accumulator[regno - A0_REGNUM] = (unsigned64)reg << 32; */ |
| /* OBSOLETE */ |
| /* OBSOLETE reg = (buf[4] << 24) | (buf[5] << 16) | (buf[6] << 8) | buf[7]; */ |
| /* OBSOLETE */ |
| /* OBSOLETE sd->cpu[0].regs.accumulator[regno - A0_REGNUM] |= reg; */ |
| /* OBSOLETE } */ |
| /* OBSOLETE else */ |
| /* OBSOLETE abort (); */ |
| /* OBSOLETE return -1; */ |
| /* OBSOLETE } */ |
