// OBSOLETE /* fr30 exception, interrupt, and trap (EIT) support // OBSOLETE Copyright (C) 1998, 1999 Free Software Foundation, Inc. // OBSOLETE Contributed by Cygnus Solutions. // OBSOLETE // OBSOLETE This file is part of the GNU simulators. // 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 #include "sim-main.h" // OBSOLETE #include "targ-vals.h" // OBSOLETE #include "cgen-engine.h" // OBSOLETE // OBSOLETE /* The semantic code invokes this for invalid (unrecognized) instructions. */ // OBSOLETE // OBSOLETE SEM_PC // OBSOLETE sim_engine_invalid_insn (SIM_CPU *current_cpu, IADDR cia, SEM_PC vpc) // OBSOLETE { // OBSOLETE SIM_DESC sd = CPU_STATE (current_cpu); // OBSOLETE // OBSOLETE #if 0 // OBSOLETE if (STATE_ENVIRONMENT (sd) == OPERATING_ENVIRONMENT) // OBSOLETE { // OBSOLETE h_bsm_set (current_cpu, h_sm_get (current_cpu)); // OBSOLETE h_bie_set (current_cpu, h_ie_get (current_cpu)); // OBSOLETE h_bcond_set (current_cpu, h_cond_get (current_cpu)); // OBSOLETE /* sm not changed */ // OBSOLETE h_ie_set (current_cpu, 0); // OBSOLETE h_cond_set (current_cpu, 0); // OBSOLETE // OBSOLETE h_bpc_set (current_cpu, cia); // OBSOLETE // OBSOLETE sim_engine_restart (CPU_STATE (current_cpu), current_cpu, NULL, // OBSOLETE EIT_RSVD_INSN_ADDR); // OBSOLETE } // OBSOLETE else // OBSOLETE #endif // OBSOLETE sim_engine_halt (sd, current_cpu, NULL, cia, sim_stopped, SIM_SIGILL); // OBSOLETE return vpc; // OBSOLETE } // OBSOLETE // OBSOLETE /* Process an address exception. */ // OBSOLETE // OBSOLETE void // OBSOLETE fr30_core_signal (SIM_DESC sd, SIM_CPU *current_cpu, sim_cia cia, // OBSOLETE unsigned int map, int nr_bytes, address_word addr, // OBSOLETE transfer_type transfer, sim_core_signals sig) // OBSOLETE { // OBSOLETE #if 0 // OBSOLETE if (STATE_ENVIRONMENT (sd) == OPERATING_ENVIRONMENT) // OBSOLETE { // OBSOLETE h_bsm_set (current_cpu, h_sm_get (current_cpu)); // OBSOLETE h_bie_set (current_cpu, h_ie_get (current_cpu)); // OBSOLETE h_bcond_set (current_cpu, h_cond_get (current_cpu)); // OBSOLETE /* sm not changed */ // OBSOLETE h_ie_set (current_cpu, 0); // OBSOLETE h_cond_set (current_cpu, 0); // OBSOLETE // OBSOLETE h_bpc_set (current_cpu, cia); // OBSOLETE // OBSOLETE sim_engine_restart (CPU_STATE (current_cpu), current_cpu, NULL, // OBSOLETE EIT_ADDR_EXCP_ADDR); // OBSOLETE } // OBSOLETE else // OBSOLETE #endif // OBSOLETE sim_core_signal (sd, current_cpu, cia, map, nr_bytes, addr, // OBSOLETE transfer, sig); // OBSOLETE } // OBSOLETE // OBSOLETE /* Read/write functions for system call interface. */ // OBSOLETE // OBSOLETE static int // OBSOLETE syscall_read_mem (host_callback *cb, struct cb_syscall *sc, // OBSOLETE unsigned long taddr, char *buf, int bytes) // OBSOLETE { // OBSOLETE SIM_DESC sd = (SIM_DESC) sc->p1; // OBSOLETE SIM_CPU *cpu = (SIM_CPU *) sc->p2; // OBSOLETE // OBSOLETE return sim_core_read_buffer (sd, cpu, read_map, buf, taddr, bytes); // OBSOLETE } // OBSOLETE // OBSOLETE static int // OBSOLETE syscall_write_mem (host_callback *cb, struct cb_syscall *sc, // OBSOLETE unsigned long taddr, const char *buf, int bytes) // OBSOLETE { // OBSOLETE SIM_DESC sd = (SIM_DESC) sc->p1; // OBSOLETE SIM_CPU *cpu = (SIM_CPU *) sc->p2; // OBSOLETE // OBSOLETE return sim_core_write_buffer (sd, cpu, write_map, buf, taddr, bytes); // OBSOLETE } // OBSOLETE // OBSOLETE /* Subroutine of fr30_int to save the PS and PC and setup for INT and INTE. */ // OBSOLETE // OBSOLETE static void // OBSOLETE setup_int (SIM_CPU *current_cpu, PCADDR pc) // OBSOLETE { // OBSOLETE USI ssp = fr30bf_h_dr_get (current_cpu, H_DR_SSP); // OBSOLETE USI ps = fr30bf_h_ps_get (current_cpu); // OBSOLETE // OBSOLETE ssp -= 4; // OBSOLETE SETMEMSI (current_cpu, pc, ssp, ps); // OBSOLETE ssp -= 4; // OBSOLETE SETMEMSI (current_cpu, pc, ssp, pc + 2); // OBSOLETE fr30bf_h_dr_set (current_cpu, H_DR_SSP, ssp); // OBSOLETE fr30bf_h_sbit_set (current_cpu, 0); // OBSOLETE } // OBSOLETE // OBSOLETE /* Trap support. // OBSOLETE The result is the pc address to continue at. // OBSOLETE Preprocessing like saving the various registers has already been done. */ // OBSOLETE // OBSOLETE USI // OBSOLETE fr30_int (SIM_CPU *current_cpu, PCADDR pc, int num) // OBSOLETE { // OBSOLETE SIM_DESC sd = CPU_STATE (current_cpu); // OBSOLETE host_callback *cb = STATE_CALLBACK (sd); // OBSOLETE // OBSOLETE #ifdef SIM_HAVE_BREAKPOINTS // OBSOLETE /* Check for breakpoints "owned" by the simulator first, regardless // OBSOLETE of --environment. */ // OBSOLETE if (num == TRAP_BREAKPOINT) // OBSOLETE { // OBSOLETE /* First try sim-break.c. If it's a breakpoint the simulator "owns" // OBSOLETE it doesn't return. Otherwise it returns and let's us try. */ // OBSOLETE sim_handle_breakpoint (sd, current_cpu, pc); // OBSOLETE /* Fall through. */ // OBSOLETE } // OBSOLETE #endif // OBSOLETE // OBSOLETE if (STATE_ENVIRONMENT (sd) == OPERATING_ENVIRONMENT) // OBSOLETE { // OBSOLETE /* The new pc is the trap vector entry. // OBSOLETE We assume there's a branch there to some handler. */ // OBSOLETE USI new_pc; // OBSOLETE setup_int (current_cpu, pc); // OBSOLETE fr30bf_h_ibit_set (current_cpu, 0); // OBSOLETE new_pc = GETMEMSI (current_cpu, pc, // OBSOLETE fr30bf_h_dr_get (current_cpu, H_DR_TBR) // OBSOLETE + 1024 - ((num + 1) * 4)); // OBSOLETE return new_pc; // OBSOLETE } // OBSOLETE // OBSOLETE switch (num) // OBSOLETE { // OBSOLETE case TRAP_SYSCALL : // OBSOLETE { // OBSOLETE /* TODO: find out what the ABI for this is */ // OBSOLETE CB_SYSCALL s; // OBSOLETE // OBSOLETE CB_SYSCALL_INIT (&s); // OBSOLETE s.func = fr30bf_h_gr_get (current_cpu, 0); // OBSOLETE s.arg1 = fr30bf_h_gr_get (current_cpu, 4); // OBSOLETE s.arg2 = fr30bf_h_gr_get (current_cpu, 5); // OBSOLETE s.arg3 = fr30bf_h_gr_get (current_cpu, 6); // OBSOLETE // OBSOLETE if (s.func == TARGET_SYS_exit) // OBSOLETE { // OBSOLETE sim_engine_halt (sd, current_cpu, NULL, pc, sim_exited, s.arg1); // OBSOLETE } // OBSOLETE // OBSOLETE s.p1 = (PTR) sd; // OBSOLETE s.p2 = (PTR) current_cpu; // OBSOLETE s.read_mem = syscall_read_mem; // OBSOLETE s.write_mem = syscall_write_mem; // OBSOLETE cb_syscall (cb, &s); // OBSOLETE fr30bf_h_gr_set (current_cpu, 2, s.errcode); /* TODO: check this one */ // OBSOLETE fr30bf_h_gr_set (current_cpu, 4, s.result); // OBSOLETE fr30bf_h_gr_set (current_cpu, 1, s.result2); /* TODO: check this one */ // OBSOLETE break; // OBSOLETE } // OBSOLETE // OBSOLETE case TRAP_BREAKPOINT: // OBSOLETE sim_engine_halt (sd, current_cpu, NULL, pc, // OBSOLETE sim_stopped, SIM_SIGTRAP); // OBSOLETE break; // OBSOLETE // OBSOLETE default : // OBSOLETE { // OBSOLETE USI new_pc; // OBSOLETE setup_int (current_cpu, pc); // OBSOLETE fr30bf_h_ibit_set (current_cpu, 0); // OBSOLETE new_pc = GETMEMSI (current_cpu, pc, // OBSOLETE fr30bf_h_dr_get (current_cpu, H_DR_TBR) // OBSOLETE + 1024 - ((num + 1) * 4)); // OBSOLETE return new_pc; // OBSOLETE } // OBSOLETE } // OBSOLETE // OBSOLETE /* Fake an "reti" insn. // OBSOLETE Since we didn't push anything to stack, all we need to do is // OBSOLETE update pc. */ // OBSOLETE return pc + 2; // OBSOLETE } // OBSOLETE // OBSOLETE USI // OBSOLETE fr30_inte (SIM_CPU *current_cpu, PCADDR pc, int num) // OBSOLETE { // OBSOLETE /* The new pc is the trap #9 vector entry. // OBSOLETE We assume there's a branch there to some handler. */ // OBSOLETE USI new_pc; // OBSOLETE setup_int (current_cpu, pc); // OBSOLETE fr30bf_h_ilm_set (current_cpu, 4); // OBSOLETE new_pc = GETMEMSI (current_cpu, pc, // OBSOLETE fr30bf_h_dr_get (current_cpu, H_DR_TBR) // OBSOLETE + 1024 - ((9 + 1) * 4)); // OBSOLETE return new_pc; // OBSOLETE }