/* TIc80 Simulator. Copyright (C) 1997, 1998 Free Software Foundation, Inc. Contributed by Cygnus Support. This file is part of GDB, the GNU debugger. 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, 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. */ /* TI C80 control registers */ typedef enum { EPC_CR, EIP_CR, CONFIG_CR, INTPEN_CR, IE_CR, FPST_CR, PPERROR_CR, PKTREQ_CR, TCOUNT_CR, TSCALE_CR, FLTOP_CR, FLTADR_CR, FLTTAG_CR, FLTDLT_CR, FLTDTH_CR, FLT005_CR, FLT006_CR, FLT007_CR, FLT008_CR, FLT009_CR, FLT010_CR, FLT011_CR, FLT012_CR, FLT013_CR, FLT014_CR, FLT015_CR, SYSSTK_CR, SYSTMP_CR, MPC_CR, MIP_CR, ECOMCNTL_CR, ANASTAT_CR, BRK1_CR, BRK2_CR, ITAG0_CR, ITAG1_CR, ITAG2_CR, ITAG3_CR, ITAG4_CR, ITAG5_CR, ITAG6_CR, ITAG7_CR, ITAG8_CR, ITAG9_CR, ITAG10_CR, ITAG11_CR, ITAG12_CR, ITAG13_CR, ITAG14_CR, ITAG15_CR, ILRU_CR, DTAG0_CR, DTAG1_CR, DTAG2_CR, DTAG3_CR, DTAG4_CR, DTAG5_CR, DTAG6_CR, DTAG7_CR, DTAG8_CR, DTAG9_CR, DTAG10_CR, DTAG11_CR, DTAG12_CR, DTAG13_CR, DTAG14_CR, DTAG15_CR, DLRU_CR, IN0P_CR, IN1P_CR, OUTP_CR, SCRATCH_CR, nr_tic80_control_regs, } tic80_control_regs; /* extern int tic80_cr2index (tic80_control_regs reg); */ /* Map an instruction CR index onto the corresponding internal cr enum or SCRATCH_CR if the index is invalid */ extern tic80_control_regs tic80_index2cr (int index); /* TIc80 interrupt register bits */ enum { IE_CR_PE = BIT32(31), IE_CR_X4 = BIT32(30), IE_CR_X3 = BIT32(29), IE_CR_BP = BIT32(28), IE_CR_PB = BIT32(27), IE_CR_PC = BIT32(26), IE_CR_MI = BIT32(25), /**/ IE_CR_P3 = BIT32(19), IE_CR_P2 = BIT32(18), IE_CR_P1 = BIT32(17), IE_CR_P0 = BIT32(16), IE_CR_IO = BIT32(15), IE_CR_MF = BIT32(14), /**/ IE_CR_X2 = BIT32(12), IE_CR_X1 = BIT32(11), IE_CR_TI = BIT32(10), IE_CR_F1 = BIT32(9), IE_CR_F0 = BIT32(8), IE_CR_FX = BIT32(7), IE_CR_FU = BIT32(6), IE_CR_FO = BIT32(5), /**/ IE_CR_FZ = BIT32(3), IE_CR_FI = BIT32(2), /**/ IE_CR_IE = BIT32(0), }; struct _sim_cpu { unsigned32 reg[32]; unsigned64 acc[4]; unsigned32 cr[nr_tic80_control_regs]; int is_user_mode; /* hidden mode latch */ sim_cia cia; sim_cpu_base base; }; #define CIA_GET(CPU) ((CPU)->cia) #define CIA_SET(CPU,VAL) ((CPU)->cia = (VAL)) #define GPR(N) ((CPU)->reg[N]) #define GPR_SET(N, VAL) ((CPU)->reg[N] = (VAL)) #define ACC(N) ((CPU)->acc[N]) #define CR(N) ((CPU)->cr[tic80_index2cr ((N))]) #if defined(WITH_TRACE) extern char *tic80_trace_alu3 PARAMS ((int, unsigned32, unsigned32, unsigned32)); extern char *tic80_trace_cmp PARAMS ((int, unsigned32, unsigned32, unsigned32)); extern char *tic80_trace_alu2 PARAMS ((int, unsigned32, unsigned32)); extern char *tic80_trace_shift PARAMS ((int, unsigned32, unsigned32, int, int, int, int, int)); extern void tic80_trace_fpu3 PARAMS ((SIM_DESC, sim_cpu *, sim_cia, int, sim_fpu *, sim_fpu *, sim_fpu *)); extern void tic80_trace_fpu2 PARAMS ((SIM_DESC, sim_cpu *, sim_cia, int, sim_fpu *, sim_fpu *)); extern void tic80_trace_fpu1 PARAMS ((SIM_DESC, sim_cpu *, sim_cia, int, sim_fpu *)); extern void tic80_trace_fpu2i PARAMS ((SIM_DESC, sim_cpu *, sim_cia, int, unsigned32, sim_fpu *, sim_fpu *)); extern void tic80_trace_fpu2cmp PARAMS ((SIM_DESC, sim_cpu *, sim_cia, int, unsigned32, sim_fpu *, sim_fpu *)); extern char *tic80_trace_nop PARAMS ((int)); extern char *tic80_trace_sink1 PARAMS ((int, unsigned32)); extern char *tic80_trace_sink2 PARAMS ((int, unsigned32, unsigned32)); extern char *tic80_trace_sink3 PARAMS ((int, unsigned32, unsigned32, unsigned32)); extern char *tic80_trace_cond_br PARAMS ((int, int, unsigned32, unsigned32, int, int)); extern char *tic80_trace_ucond_br PARAMS ((int, unsigned32)); extern void tic80_trace_ldst PARAMS ((SIM_DESC, sim_cpu *, sim_cia, int, int, int, int, unsigned32, unsigned32, unsigned32)); #define TRACE_ALU3(indx, result, input1, input2) \ do { \ if (TRACE_ALU_P (CPU)) { \ trace_one_insn (SD, CPU, cia.ip, 1, itable[indx].file, \ itable[indx].line_nr, "alu", \ tic80_trace_alu3 (indx, result, input1, input2)); \ } \ } while (0) #define TRACE_CMP(indx, result, input1, input2) \ do { \ if (TRACE_ALU_P (CPU)) { \ trace_one_insn (SD, CPU, cia.ip, 1, itable[indx].file, \ itable[indx].line_nr, "alu", \ tic80_trace_cmp (indx, result, input1, input2)); \ } \ } while (0) #define TRACE_ALU2(indx, result, input) \ do { \ if (TRACE_ALU_P (CPU)) { \ trace_one_insn (SD, CPU, cia.ip, 1, itable[indx].file, \ itable[indx].line_nr, "alu", \ tic80_trace_alu2 (indx, result, input)); \ } \ } while (0) #define TRACE_SHIFT(indx, result, input, i, n, merge, endmask, rotate) \ do { \ if (TRACE_ALU_P (CPU)) { \ trace_one_insn (SD, CPU, cia.ip, 1, itable[indx].file, \ itable[indx].line_nr, "shift", \ tic80_trace_shift (indx, result, input, i, n, \ merge, endmask, rotate)); \ } \ } while (0) #define TRACE_FPU3(result, input1, input2) \ do { \ if (TRACE_FPU_P (CPU)) { \ tic80_trace_fpu3 (SD, CPU, cia, MY_INDEX, \ &result, &input1, &input2); \ } \ } while (0) #define TRACE_FPU2(result, input) \ do { \ if (TRACE_FPU_P (CPU)) { \ tic80_trace_fpu2 (SD, CPU, cia, MY_INDEX, \ &result, &input); \ } \ } while (0) #define TRACE_FPU1(result) \ do { \ if (TRACE_FPU_P (CPU)) { \ tic80_trace_fpu1 (SD, CPU, cia, MY_INDEX, \ &result); \ } \ } while (0) #define TRACE_FPU2I(result, input1, input2) \ do { \ if (TRACE_FPU_P (CPU)) { \ tic80_trace_fpu2i (SD, CPU, cia, MY_INDEX, \ result, &input1, &input2); \ } \ } while (0) #define TRACE_FPU2CMP(result, input1, input2) \ do { \ if (TRACE_FPU_P (CPU)) { \ tic80_trace_fpu2cmp (SD, CPU, cia, MY_INDEX, \ result, &input1, &input2); \ } \ } while (0) #define TRACE_NOP(indx) \ do { \ if (TRACE_ALU_P (CPU)) { \ trace_one_insn (SD, CPU, cia.ip, 1, itable[indx].file, \ itable[indx].line_nr, "nop", \ tic80_trace_nop (indx)); \ } \ } while (0) #define TRACE_SINK1(indx, input) \ do { \ if (TRACE_ALU_P (CPU)) { \ trace_one_insn (SD, CPU, cia.ip, 1, itable[indx].file, \ itable[indx].line_nr, "nop", \ tic80_trace_sink1 (indx, input)); \ } \ } while (0) #define TRACE_SINK2(indx, input1, input2) \ do { \ if (TRACE_ALU_P (CPU)) { \ trace_one_insn (SD, CPU, cia.ip, 1, itable[indx].file, \ itable[indx].line_nr, "nop", \ tic80_trace_sink2 (indx, input1, input2)); \ } \ } while (0) #define TRACE_SINK3(indx, input1, input2, input3) \ do { \ if (TRACE_ALU_P (CPU)) { \ trace_one_insn (SD, CPU, cia.ip, 1, itable[indx].file, \ itable[indx].line_nr, "nop", \ tic80_trace_sink3 (indx, input1, input2, input3)); \ } \ } while (0) #define TRACE_COND_BR(indx, jump_p, cond, target, size, code) \ do { \ if (TRACE_BRANCH_P (CPU)) { \ trace_one_insn (SD, CPU, cia.ip, 1, itable[indx].file, \ itable[indx].line_nr, "branch", \ tic80_trace_cond_br (indx, jump_p, cond, target, \ size, code)); \ } \ } while (0) #define TRACE_UCOND_BR(indx, target) \ do { \ if (TRACE_BRANCH_P (CPU)) { \ trace_one_insn (SD, CPU, cia.ip, 1, itable[indx].file, \ itable[indx].line_nr, "branch", \ tic80_trace_ucond_br (indx, target)); \ } \ } while (0) #define TRACE_LD(result, m, s, addr1, addr2) \ do { \ if (TRACE_MEMORY_P (CPU)) { \ tic80_trace_ldst (SD, CPU, cia, MY_INDEX, \ 0, m, s, result, addr1, addr2); \ } \ } while (0) #define TRACE_ST(value, m, s, addr1, addr2) \ do { \ if (TRACE_MEMORY_P (CPU)) { \ tic80_trace_ldst (SD, CPU, cia, MY_INDEX, \ 1, m, s, value, addr1, addr2); \ } \ } while (0) #else #define TRACE_ALU3(indx, result, input1, input2) #define TRACE_ALU2(indx, result, input) #define TRACE_FPU3(result, input1, input2) #define TRACE_FPU2(result, input) #define TRACE_FPU1(result) #define TRACE_FPU2I(result, input1, input2) #define TRACE_NOP(indx) #define TRACE_SINK1(indx, input) #define TRACE_SINK2(indx, input1, input2) #define TRACE_SINK3(indx, input1, input2, input3) #define TRACE_COND_BR(indx, jump_p, cond, target, size, code) #define TRACE_UCOND_BR(indx, target) #define TRACE_LD(m, s, result, addr1, addr2) #define TRACE_ST(m, s, value, addr1, addr2) #endif