From df59058c91acc99f7fe59d3a89990f2138336482 Mon Sep 17 00:00:00 2001 From: Jason Molenda Date: Wed, 27 Jan 1999 01:51:26 +0000 Subject: [PATCH] 1999-01-26 Jason Molenda (jsm@bugshack.cygnus.com) * simops.c (OP_5605): Sign extend MIN32 and MAX32 before saturation comparison. (OP_5607): Ditto. (OP_2A00): Ditto. (OP_2800): Ditto. PRs 18435 18436 18437 18439. --- sim/d10v/ChangeLog | 26 + sim/d10v/simops.c | 1900 ++++++++++++++++++++++++-------------------- 2 files changed, 1058 insertions(+), 868 deletions(-) diff --git a/sim/d10v/ChangeLog b/sim/d10v/ChangeLog index 030b9f5d8f6..d8923c8e7b5 100644 --- a/sim/d10v/ChangeLog +++ b/sim/d10v/ChangeLog @@ -1,3 +1,29 @@ +1999-01-26 Jason Molenda (jsm@bugshack.cygnus.com) + + * simops.c (OP_5605): Sign extend MIN32 and MAX32 before saturation + comparison. + (OP_5607): Ditto. + (OP_2A00): Ditto. + (OP_2800): Ditto. + +1999-01-13 Jason Molenda (jsm@bugshack.cygnus.com) + + * simops.c (OP_1223): Sign extend MIN32 and MAX32 before saturation + comparison. + +Tue Nov 24 17:04:43 1998 Andrew Cagney + + * simops.c (sys/syscall.h): Include targ-vals.h instead. + (SYS_*): Replace with TARGET_SYS_*. + + * Makefile.in: Add dependency on targ-vals.h. + (NL_TARGET): Define as NL_TARGET_d10v. + +Wed Sep 30 00:06:32 1998 Andrew Cagney + + * interp.c (xfer_mem): Missing break, instruction memory case + flowed into unified memory case. + Wed Sep 30 10:14:18 1998 Nick Clifton * simops.c: If load instruction with auto increment/decrement diff --git a/sim/d10v/simops.c b/sim/d10v/simops.c index ef34f9423b3..e0db5abc802 100644 --- a/sim/d10v/simops.c +++ b/sim/d10v/simops.c @@ -10,7 +10,7 @@ #include "d10v_sim.h" #include "simops.h" -#include "sys/syscall.h" +#include "targ-vals.h" extern char *strrchr (); @@ -40,82 +40,72 @@ enum op_types { OP_R0, OP_R1, OP_R2, - OP_R0R1 }; -void -move_to_cr (int cr, reg_t val) +enum { + PSW_MASK = (PSW_SM_BIT + | PSW_EA_BIT + | PSW_DB_BIT + | PSW_DM_BIT + | PSW_IE_BIT + | PSW_RP_BIT + | PSW_MD_BIT + | PSW_FX_BIT + | PSW_ST_BIT + | PSW_F0_BIT + | PSW_F1_BIT + | PSW_C_BIT), +}; + +reg_t +move_to_cr (int cr, reg_t mask, reg_t val) { + /* A MASK bit is set when the corresponding bit in the CR should + be left alone */ + /* This assumes that (VAL & MASK) == 0 */ switch (cr) { case PSW_CR: - State.sp[State.SM] = State.regs[SP_IDX]; /* save old SP */ - State.SM = (val & PSW_SM_BIT) != 0; - State.EA = (val & PSW_EA_BIT) != 0; - State.DB = (val & PSW_DB_BIT) != 0; - State.DM = (val & PSW_DM_BIT) != 0; - State.IE = (val & PSW_IE_BIT) != 0; - State.RP = (val & PSW_RP_BIT) != 0; - State.MD = (val & PSW_MD_BIT) != 0; - State.FX = (val & PSW_FX_BIT) != 0; - State.ST = (val & PSW_ST_BIT) != 0; - State.F0 = (val & PSW_F0_BIT) != 0; - State.F1 = (val & PSW_F1_BIT) != 0; - State.C = (val & PSW_C_BIT) != 0; - State.regs[SP_IDX] = State.sp[State.SM]; /* restore new SP */ - if (State.ST && !State.FX) + val &= PSW_MASK; + if ((mask & PSW_SM_BIT) == 0) { - (*d10v_callback->printf_filtered) - (d10v_callback, - "ERROR at PC 0x%x: ST can only be set when FX is set.\n", - PC<<2); - State.exception = SIGILL; + int new_sm = (val & PSW_SM_BIT) != 0; + SET_HELD_SP (PSW_SM, GPR (SP_IDX)); /* save old SP */ + if (PSW_SM != new_sm) + SET_GPR (SP_IDX, HELD_SP (new_sm)); /* restore new SP */ } - State.cregs[cr] = (val & ~0x4032); + if ((mask & (PSW_ST_BIT | PSW_FX_BIT)) == 0) + { + if (val & PSW_ST_BIT && !(val & PSW_FX_BIT)) + { + (*d10v_callback->printf_filtered) + (d10v_callback, + "ERROR at PC 0x%x: ST can only be set when FX is set.\n", + PC<<2); + State.exception = SIGILL; + } + } + /* keep an up-to-date psw around for tracing */ + State.trace.psw = (State.trace.psw & mask) | val; break; case BPSW_CR: case DPSW_CR: - State.cregs[cr] = (val & ~0x4032); + val &= PSW_MASK; break; case MOD_S_CR: case MOD_E_CR: - State.cregs[cr] = (val & ~0x1); + val &= ~1; break; default: - State.cregs[cr] = val; - break; - } -} - -reg_t -move_from_cr (int cr) -{ - reg_t val = 0; - switch (cr) - { - case PSW_CR: - if (State.SM) val |= PSW_SM_BIT; - if (State.EA) val |= PSW_EA_BIT; - if (State.DB) val |= PSW_DB_BIT; - if (State.DM) val |= PSW_DM_BIT; - if (State.IE) val |= PSW_IE_BIT; - if (State.RP) val |= PSW_RP_BIT; - if (State.MD) val |= PSW_MD_BIT; - if (State.FX) val |= PSW_FX_BIT; - if (State.ST) val |= PSW_ST_BIT; - if (State.F0) val |= PSW_F0_BIT; - if (State.F1) val |= PSW_F1_BIT; - if (State.C) val |= PSW_C_BIT; - break; - default: - val = State.cregs[cr]; break; } + /* only issue an update if the register is being changed */ + if ((State.cregs[cr] & ~mask) != val) + SLOT_PEND_MASK (State.cregs[cr], mask, val); return val; } - #ifdef DEBUG static void trace_input_func PARAMS ((char *name, enum op_types in1, @@ -124,10 +114,6 @@ static void trace_input_func PARAMS ((char *name, #define trace_input(name, in1, in2, in3) do { if (d10v_debug) trace_input_func (name, in1, in2, in3); } while (0) -static void trace_output_func PARAMS ((enum op_types result)); - -#define trace_output(result) do { if (d10v_debug) trace_output_func (result); } while (0) - #ifndef SIZE_INSTRUCTION #define SIZE_INSTRUCTION 8 #endif @@ -258,7 +244,6 @@ trace_input_func (name, in1, in2, in3) case OP_R0: case OP_R1: case OP_R2: - case OP_R0R1: break; case OP_REG: @@ -392,25 +377,25 @@ trace_input_func (name, in1, in2, in3) case OP_POSTINC: case OP_PREDEC: (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.4x", SIZE_VALUES-6, "", - (uint16)State.regs[OP[i]]); + (uint16) GPR (OP[i])); break; case OP_DREG: - tmp = (long)((((uint32) State.regs[OP[i]]) << 16) | ((uint32) State.regs[OP[i]+1])); + tmp = (long)((((uint32) GPR (OP[i])) << 16) | ((uint32) GPR (OP[i] + 1))); (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.8lx", SIZE_VALUES-10, "", tmp); break; case OP_CR: case OP_CR_REVERSE: (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.4x", SIZE_VALUES-6, "", - (uint16)State.cregs[OP[i]]); + (uint16) CREG (OP[i])); break; case OP_ACCUM: case OP_ACCUM_REVERSE: (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.2x%.8lx", SIZE_VALUES-12, "", - ((int)(State.a[OP[i]] >> 32) & 0xff), - ((unsigned long)State.a[OP[i]]) & 0xffffffff); + ((int)(ACC (OP[i]) >> 32) & 0xff), + ((unsigned long) ACC (OP[i])) & 0xffffffff); break; case OP_CONSTANT16: @@ -436,15 +421,15 @@ trace_input_func (name, in1, in2, in3) case OP_FLAG: if (OP[i] == 0) (*d10v_callback->printf_filtered) (d10v_callback, "%*sF0 = %d", SIZE_VALUES-6, "", - State.F0 != 0); + PSW_F0 != 0); else if (OP[i] == 1) (*d10v_callback->printf_filtered) (d10v_callback, "%*sF1 = %d", SIZE_VALUES-6, "", - State.F1 != 0); + PSW_F1 != 0); else (*d10v_callback->printf_filtered) (d10v_callback, "%*sC = %d", SIZE_VALUES-5, "", - State.C != 0); + PSW_C != 0); break; @@ -452,31 +437,25 @@ trace_input_func (name, in1, in2, in3) (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.4x", SIZE_VALUES-6, "", (uint16)OP[i]); (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.4x", SIZE_VALUES-6, "", - (uint16)State.regs[OP[++i]]); + (uint16)GPR (OP[i + 1])); + i++; break; case OP_R0: (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.4x", SIZE_VALUES-6, "", - (uint16)State.regs[0]); + (uint16) GPR (0)); break; case OP_R1: (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.4x", SIZE_VALUES-6, "", - (uint16)State.regs[1]); + (uint16) GPR (1)); break; case OP_R2: (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.4x", SIZE_VALUES-6, "", - (uint16)State.regs[2]); + (uint16) GPR (2)); break; - case OP_R0R1: - (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.4x", SIZE_VALUES-6, "", - (uint16)State.regs[0]); - (*d10v_callback->printf_filtered) (d10v_callback, "%*s0x%.4x", SIZE_VALUES-6, "", - (uint16)State.regs[1]); - i++; - break; } } } @@ -485,83 +464,90 @@ trace_input_func (name, in1, in2, in3) } static void -trace_output_func (result) - enum op_types result; +do_trace_output_flush (void) { - if ((d10v_debug & (DEBUG_TRACE | DEBUG_VALUES)) == (DEBUG_TRACE | DEBUG_VALUES)) - { - long tmp; - - switch (result) - { - default: - putchar ('\n'); - break; - - case OP_REG: - case OP_REG_OUTPUT: - (*d10v_callback->printf_filtered) (d10v_callback, " :: %*s0x%.4x F0=%d F1=%d C=%d\n", SIZE_VALUES-6, "", - (uint16)State.regs[OP[0]], - State.F0 != 0, State.F1 != 0, State.C != 0); - break; + (*d10v_callback->flush_stdout) (d10v_callback); +} - case OP_DREG: - case OP_DREG_OUTPUT: - tmp = (long)((((uint32) State.regs[OP[0]]) << 16) | ((uint32) State.regs[OP[0]+1])); - (*d10v_callback->printf_filtered) (d10v_callback, " :: %*s0x%.8lx F0=%d F1=%d C=%d\n", SIZE_VALUES-10, "", tmp, - State.F0 != 0, State.F1 != 0, State.C != 0); - break; +static void +do_trace_output_finish (void) +{ + (*d10v_callback->printf_filtered) (d10v_callback, + " F0=%d F1=%d C=%d\n", + (State.trace.psw & PSW_F0_BIT) != 0, + (State.trace.psw & PSW_F1_BIT) != 0, + (State.trace.psw & PSW_C_BIT) != 0); + (*d10v_callback->flush_stdout) (d10v_callback); +} - case OP_CR: - case OP_CR_OUTPUT: - (*d10v_callback->printf_filtered) (d10v_callback, " :: %*s0x%.4x F0=%d F1=%d C=%d\n", SIZE_VALUES-6, "", - (uint16)State.cregs[OP[0]], - State.F0 != 0, State.F1 != 0, State.C != 0); - break; +static void +trace_output_40 (uint64 val) +{ + if ((d10v_debug & (DEBUG_TRACE | DEBUG_VALUES)) == (DEBUG_TRACE | DEBUG_VALUES)) + { + (*d10v_callback->printf_filtered) (d10v_callback, + " :: %*s0x%.2x%.8lx", + SIZE_VALUES - 12, + "", + ((int)(val >> 32) & 0xff), + ((unsigned long) val) & 0xffffffff); + do_trace_output_finish (); + } +} - case OP_CR_REVERSE: - (*d10v_callback->printf_filtered) (d10v_callback, " :: %*s0x%.4x F0=%d F1=%d C=%d\n", SIZE_VALUES-6, "", - (uint16)State.cregs[OP[1]], - State.F0 != 0, State.F1 != 0, State.C != 0); - break; +static void +trace_output_32 (uint32 val) +{ + if ((d10v_debug & (DEBUG_TRACE | DEBUG_VALUES)) == (DEBUG_TRACE | DEBUG_VALUES)) + { + (*d10v_callback->printf_filtered) (d10v_callback, + " :: %*s0x%.8x", + SIZE_VALUES - 10, + "", + (int) val); + do_trace_output_finish (); + } +} - case OP_ACCUM: - case OP_ACCUM_OUTPUT: - (*d10v_callback->printf_filtered) (d10v_callback, " :: %*s0x%.2x%.8lx F0=%d F1=%d C=%d\n", SIZE_VALUES-12, "", - ((int)(State.a[OP[0]] >> 32) & 0xff), - ((unsigned long)State.a[OP[0]]) & 0xffffffff, - State.F0 != 0, State.F1 != 0, State.C != 0); - break; +static void +trace_output_16 (uint16 val) +{ + if ((d10v_debug & (DEBUG_TRACE | DEBUG_VALUES)) == (DEBUG_TRACE | DEBUG_VALUES)) + { + (*d10v_callback->printf_filtered) (d10v_callback, + " :: %*s0x%.4x", + SIZE_VALUES - 6, + "", + (int) val); + do_trace_output_finish (); + } +} - case OP_ACCUM_REVERSE: - (*d10v_callback->printf_filtered) (d10v_callback, " :: %*s0x%.2x%.8lx F0=%d F1=%d C=%d\n", SIZE_VALUES-12, "", - ((int)(State.a[OP[1]] >> 32) & 0xff), - ((unsigned long)State.a[OP[1]]) & 0xffffffff, - State.F0 != 0, State.F1 != 0, State.C != 0); - break; +static void +trace_output_void () +{ + if ((d10v_debug & (DEBUG_TRACE | DEBUG_VALUES)) == (DEBUG_TRACE | DEBUG_VALUES)) + { + (*d10v_callback->printf_filtered) (d10v_callback, "\n"); + do_trace_output_flush (); + } +} - case OP_FLAG: - case OP_FLAG_OUTPUT: - (*d10v_callback->printf_filtered) (d10v_callback, " :: %*s F0=%d F1=%d C=%d\n", SIZE_VALUES, "", - State.F0 != 0, State.F1 != 0, State.C != 0); - break; +static void +trace_output_flag () +{ + if ((d10v_debug & (DEBUG_TRACE | DEBUG_VALUES)) == (DEBUG_TRACE | DEBUG_VALUES)) + { + (*d10v_callback->printf_filtered) (d10v_callback, + " :: %*s", + SIZE_VALUES, + ""); + do_trace_output_finish (); + } +} - case OP_R0: - (*d10v_callback->printf_filtered) (d10v_callback, " :: %*s0x%.4x F0=%d F1=%d C=%d\n", SIZE_VALUES-6, "", - (uint16)State.regs[0], - State.F0 != 0, State.F1 != 0, State.C != 0); - break; - case OP_R0R1: - (*d10v_callback->printf_filtered) (d10v_callback, " :: %*s0x%.4x%.4x F0=%d F1=%d C=%d\n", SIZE_VALUES-10, "", - (uint16)State.regs[0], (uint16)State.regs[1], - State.F0 != 0, State.F1 != 0, State.C != 0); - break; - } - } - (*d10v_callback->flush_stdout) (d10v_callback); -} #else #define trace_input(NAME, IN1, IN2, IN3) @@ -572,16 +558,19 @@ trace_output_func (result) void OP_4607 () { + int16 tmp; trace_input ("abs", OP_REG, OP_VOID, OP_VOID); - State.F1 = State.F0; - if ((int16)(State.regs[OP[0]]) < 0) + SET_PSW_F1 (PSW_F0); + tmp = GPR(OP[0]); + if (tmp < 0) { - State.regs[OP[0]] = -(int16)(State.regs[OP[0]]); - State.F0 = 1; + tmp = - tmp; + SET_PSW_F0 (1); } else - State.F0 = 0; - trace_output (OP_REG); + SET_PSW_F0 (0); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* abs */ @@ -589,44 +578,46 @@ void OP_5607 () { int64 tmp; - trace_input ("abs", OP_ACCUM, OP_VOID, OP_VOID); - State.F1 = State.F0; - State.a[OP[0]] = SEXT40(State.a[OP[0]]); + SET_PSW_F1 (PSW_F0); - if (State.a[OP[0]] < 0 ) + tmp = SEXT40 (ACC (OP[0])); + if (tmp < 0 ) { - tmp = -State.a[OP[0]]; - if (State.ST) + tmp = - tmp; + if (PSW_ST) { - if (tmp > MAX32) - State.a[OP[0]] = MAX32; - else if (tmp < MIN32) - State.a[OP[0]] = MIN32; + if (tmp > SEXT40(MAX32)) + tmp = MAX32; + else if (tmp < SEXT40(MIN32)) + tmp = MIN32; else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; - State.F0 = 1; + tmp = (tmp & MASK40); + SET_PSW_F0 (1); } else - State.F0 = 0; - trace_output (OP_ACCUM); + { + tmp = (tmp & MASK40); + SET_PSW_F0 (0); + } + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* add */ void OP_200 () { - uint16 tmp = State.regs[OP[0]]; + uint16 a = GPR (OP[0]); + uint16 b = GPR (OP[1]); + uint16 tmp = (a + b); trace_input ("add", OP_REG, OP_REG, OP_VOID); - State.regs[OP[0]] += State.regs[OP[1]]; - if ( tmp > State.regs[OP[0]]) - State.C = 1; - else - State.C = 0; - trace_output (OP_REG); + SET_PSW_C (a > tmp); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* add */ @@ -634,21 +625,22 @@ void OP_1201 () { int64 tmp; - tmp = SEXT40(State.a[OP[0]]) + (SEXT16 (State.regs[OP[1]]) << 16 | State.regs[OP[1]+1]); + tmp = SEXT40(ACC (OP[0])) + (SEXT16 (GPR (OP[1])) << 16 | GPR (OP[1] + 1)); trace_input ("add", OP_ACCUM, OP_REG, OP_VOID); - if (State.ST) + if (PSW_ST) { if ( tmp > MAX32) - State.a[OP[0]] = MAX32; + tmp = MAX32; else if ( tmp < MIN32) - State.a[OP[0]] = MIN32; + tmp = MIN32; else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* add */ @@ -656,21 +648,22 @@ void OP_1203 () { int64 tmp; - tmp = SEXT40(State.a[OP[0]]) + SEXT40(State.a[OP[1]]); + tmp = SEXT40(ACC (OP[0])) + SEXT40(ACC (OP[1])); trace_input ("add", OP_ACCUM, OP_ACCUM, OP_VOID); - if (State.ST) + if (PSW_ST) { if (tmp > MAX32) - State.a[OP[0]] = MAX32; + tmp = MAX32; else if ( tmp < MIN32) - State.a[OP[0]] = MIN32; + tmp = MIN32; else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* add2w */ @@ -678,27 +671,27 @@ void OP_1200 () { uint32 tmp; - uint32 a = (State.regs[OP[0]]) << 16 | State.regs[OP[0]+1]; - uint32 b = (State.regs[OP[1]]) << 16 | State.regs[OP[1]+1]; - + uint32 a = (GPR (OP[0])) << 16 | GPR (OP[0] + 1); + uint32 b = (GPR (OP[1])) << 16 | GPR (OP[1] + 1); trace_input ("add2w", OP_DREG, OP_DREG, OP_VOID); tmp = a + b; - State.C = (tmp < a); - State.regs[OP[0]] = tmp >> 16; - State.regs[OP[0]+1] = tmp & 0xFFFF; - trace_output (OP_DREG); + SET_PSW_C (tmp < a); + SET_GPR (OP[0] + 0, (tmp >> 16)); + SET_GPR (OP[0] + 1, (tmp & 0xFFFF)); + trace_output_32 (tmp); } /* add3 */ void OP_1000000 () { - uint16 tmp = State.regs[OP[1]]; - State.regs[OP[0]] = tmp + OP[2]; - + uint16 a = GPR (OP[1]); + uint16 b = OP[2]; + uint16 tmp = (a + b); trace_input ("add3", OP_REG_OUTPUT, OP_REG, OP_CONSTANT16); - State.C = (State.regs[OP[0]] < tmp); - trace_output (OP_REG); + SET_PSW_C (tmp < a); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* addac3 */ @@ -706,12 +699,12 @@ void OP_17000200 () { int64 tmp; - tmp = SEXT40(State.a[OP[2]]) + SEXT40 ((State.regs[OP[1]] << 16) | State.regs[OP[1]+1]); + tmp = SEXT40(ACC (OP[2])) + SEXT40 ((GPR (OP[1]) << 16) | GPR (OP[1] + 1)); trace_input ("addac3", OP_DREG_OUTPUT, OP_DREG, OP_ACCUM); - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.regs[OP[0]+1] = tmp & 0xffff; - trace_output (OP_DREG); + SET_GPR (OP[0] + 0, ((tmp >> 16) & 0xffff)); + SET_GPR (OP[0] + 1, (tmp & 0xffff)); + trace_output_32 (tmp); } /* addac3 */ @@ -719,12 +712,12 @@ void OP_17000202 () { int64 tmp; - tmp = SEXT40(State.a[OP[1]]) + SEXT40(State.a[OP[2]]); + tmp = SEXT40(ACC (OP[1])) + SEXT40(ACC (OP[2])); trace_input ("addac3", OP_DREG_OUTPUT, OP_ACCUM, OP_ACCUM); - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.regs[OP[0]+1] = tmp & 0xffff; - trace_output (OP_DREG); + SET_GPR (OP[0] + 0, (tmp >> 16) & 0xffff); + SET_GPR (OP[0] + 1, tmp & 0xffff); + trace_output_32 (tmp); } /* addac3s */ @@ -732,29 +725,27 @@ void OP_17001200 () { int64 tmp; - State.F1 = State.F0; + SET_PSW_F1 (PSW_F0); trace_input ("addac3s", OP_DREG_OUTPUT, OP_DREG, OP_ACCUM); - tmp = SEXT40(State.a[OP[2]]) + SEXT40 ((State.regs[OP[1]] << 16) | State.regs[OP[1]+1]); + tmp = SEXT40 (ACC (OP[2])) + SEXT40 ((GPR (OP[1]) << 16) | GPR (OP[1] + 1)); if ( tmp > MAX32) { - State.regs[OP[0]] = 0x7fff; - State.regs[OP[0]+1] = 0xffff; - State.F0 = 1; + tmp = 0x7fffffff; + SET_PSW_F0 (1); } else if (tmp < MIN32) { - State.regs[OP[0]] = 0x8000; - State.regs[OP[0]+1] = 0; - State.F0 = 1; + tmp = 0x80000000; + SET_PSW_F0 (1); } else { - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.regs[OP[0]+1] = tmp & 0xffff; - State.F0 = 0; + SET_PSW_F0 (0); } - trace_output (OP_DREG); + SET_GPR (OP[0] + 0, (tmp >> 16) & 0xffff); + SET_GPR (OP[0] + 1, (tmp & 0xffff)); + trace_output_32 (tmp); } /* addac3s */ @@ -762,70 +753,75 @@ void OP_17001202 () { int64 tmp; - State.F1 = State.F0; + SET_PSW_F1 (PSW_F0); trace_input ("addac3s", OP_DREG_OUTPUT, OP_ACCUM, OP_ACCUM); - tmp = SEXT40(State.a[OP[1]]) + SEXT40(State.a[OP[2]]); + tmp = SEXT40(ACC (OP[1])) + SEXT40(ACC (OP[2])); if ( tmp > MAX32) { - State.regs[OP[0]] = 0x7fff; - State.regs[OP[0]+1] = 0xffff; - State.F0 = 1; + tmp = 0x7fffffff; + SET_PSW_F0 (1); } else if (tmp < MIN32) { - State.regs[OP[0]] = 0x8000; - State.regs[OP[0]+1] = 0; - State.F0 = 1; + tmp = 0x80000000; + SET_PSW_F0 (1); } else { - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.regs[OP[0]+1] = tmp & 0xffff; - State.F0 = 0; + SET_PSW_F0 (0); } - trace_output (OP_DREG); + SET_GPR (OP[0] + 0, (tmp >> 16) & 0xffff); + SET_GPR (OP[0] + 1, (tmp & 0xffff)); + trace_output_32 (tmp); } /* addi */ void OP_201 () { - uint tmp = State.regs[OP[0]]; + uint16 a = GPR (OP[0]); + uint16 b; + uint16 tmp; if (OP[1] == 0) OP[1] = 16; - + b = OP[1]; + tmp = (a + b); trace_input ("addi", OP_REG, OP_CONSTANT16, OP_VOID); - State.regs[OP[0]] += OP[1]; - State.C = (State.regs[OP[0]] < tmp); - trace_output (OP_REG); + SET_PSW_C (tmp < a); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* and */ void OP_C00 () { + uint16 tmp = GPR (OP[0]) & GPR (OP[1]); trace_input ("and", OP_REG, OP_REG, OP_VOID); - State.regs[OP[0]] &= State.regs[OP[1]]; - trace_output (OP_REG); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* and3 */ void OP_6000000 () { + uint16 tmp = GPR (OP[1]) & OP[2]; trace_input ("and3", OP_REG_OUTPUT, OP_REG, OP_CONSTANT16); - State.regs[OP[0]] = State.regs[OP[1]] & OP[2]; - trace_output (OP_REG); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* bclri */ void OP_C01 () { + int16 tmp; trace_input ("bclri", OP_REG, OP_CONSTANT16, OP_VOID); - State.regs[OP[0]] &= ~(0x8000 >> OP[1]); - trace_output (OP_REG); + tmp = (GPR (OP[0]) &~(0x8000 >> OP[1])); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* bl.s */ @@ -833,9 +829,9 @@ void OP_4900 () { trace_input ("bl.s", OP_CONSTANT8, OP_R0, OP_R1); - State.regs[13] = PC+1; + SET_GPR (13, PC + 1); JMP( PC + SEXT8 (OP[0])); - trace_output (OP_VOID); + trace_output_void (); } /* bl.l */ @@ -843,18 +839,20 @@ void OP_24800000 () { trace_input ("bl.l", OP_CONSTANT16, OP_R0, OP_R1); - State.regs[13] = PC+1; + SET_GPR (13, (PC + 1)); JMP (PC + OP[0]); - trace_output (OP_VOID); + trace_output_void (); } /* bnoti */ void OP_A01 () { + int16 tmp; trace_input ("bnoti", OP_REG, OP_CONSTANT16, OP_VOID); - State.regs[OP[0]] ^= 0x8000 >> OP[1]; - trace_output (OP_REG); + tmp = (GPR (OP[0]) ^ (0x8000 >> OP[1])); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* bra.s */ @@ -863,7 +861,7 @@ OP_4800 () { trace_input ("bra.s", OP_CONSTANT8, OP_VOID, OP_VOID); JMP (PC + SEXT8 (OP[0])); - trace_output (OP_VOID); + trace_output_void (); } /* bra.l */ @@ -872,7 +870,7 @@ OP_24000000 () { trace_input ("bra.l", OP_CONSTANT16, OP_VOID, OP_VOID); JMP (PC + OP[0]); - trace_output (OP_VOID); + trace_output_void (); } /* brf0f.s */ @@ -880,9 +878,9 @@ void OP_4A00 () { trace_input ("brf0f.s", OP_CONSTANT8, OP_VOID, OP_VOID); - if (State.F0 == 0) + if (!PSW_F0) JMP (PC + SEXT8 (OP[0])); - trace_output (OP_FLAG); + trace_output_flag (); } /* brf0f.l */ @@ -890,9 +888,9 @@ void OP_25000000 () { trace_input ("brf0f.l", OP_CONSTANT16, OP_VOID, OP_VOID); - if (State.F0 == 0) + if (!PSW_F0) JMP (PC + OP[0]); - trace_output (OP_FLAG); + trace_output_flag (); } /* brf0t.s */ @@ -900,9 +898,9 @@ void OP_4B00 () { trace_input ("brf0t.s", OP_CONSTANT8, OP_VOID, OP_VOID); - if (State.F0) + if (PSW_F0) JMP (PC + SEXT8 (OP[0])); - trace_output (OP_FLAG); + trace_output_flag (); } /* brf0t.l */ @@ -910,18 +908,20 @@ void OP_25800000 () { trace_input ("brf0t.l", OP_CONSTANT16, OP_VOID, OP_VOID); - if (State.F0) + if (PSW_F0) JMP (PC + OP[0]); - trace_output (OP_FLAG); + trace_output_flag (); } /* bseti */ void OP_801 () { + int16 tmp; trace_input ("bseti", OP_REG, OP_CONSTANT16, OP_VOID); - State.regs[OP[0]] |= 0x8000 >> OP[1]; - trace_output (OP_REG); + tmp = (GPR (OP[0]) | (0x8000 >> OP[1])); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* btsti */ @@ -929,9 +929,9 @@ void OP_E01 () { trace_input ("btsti", OP_REG, OP_CONSTANT16, OP_VOID); - State.F1 = State.F0; - State.F0 = (State.regs[OP[0]] & (0x8000 >> OP[1])) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 ((GPR (OP[0]) & (0x8000 >> OP[1])) ? 1 : 0); + trace_output_flag (); } /* clrac */ @@ -939,8 +939,8 @@ void OP_5601 () { trace_input ("clrac", OP_ACCUM_OUTPUT, OP_VOID, OP_VOID); - State.a[OP[0]] = 0; - trace_output (OP_ACCUM); + SET_ACC (OP[0], 0); + trace_output_40 (0); } /* cmp */ @@ -948,9 +948,9 @@ void OP_600 () { trace_input ("cmp", OP_REG, OP_REG, OP_VOID); - State.F1 = State.F0; - State.F0 = ((int16)(State.regs[OP[0]]) < (int16)(State.regs[OP[1]])) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 (((int16)(GPR (OP[0])) < (int16)(GPR (OP[1]))) ? 1 : 0); + trace_output_flag (); } /* cmp */ @@ -958,9 +958,9 @@ void OP_1603 () { trace_input ("cmp", OP_ACCUM, OP_ACCUM, OP_VOID); - State.F1 = State.F0; - State.F0 = (SEXT40(State.a[OP[0]]) < SEXT40(State.a[OP[1]])) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 ((SEXT40(ACC (OP[0])) < SEXT40(ACC (OP[1]))) ? 1 : 0); + trace_output_flag (); } /* cmpeq */ @@ -968,9 +968,9 @@ void OP_400 () { trace_input ("cmpeq", OP_REG, OP_REG, OP_VOID); - State.F1 = State.F0; - State.F0 = (State.regs[OP[0]] == State.regs[OP[1]]) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 ((GPR (OP[0]) == GPR (OP[1])) ? 1 : 0); + trace_output_flag (); } /* cmpeq */ @@ -978,9 +978,9 @@ void OP_1403 () { trace_input ("cmpeq", OP_ACCUM, OP_ACCUM, OP_VOID); - State.F1 = State.F0; - State.F0 = ((State.a[OP[0]] & MASK40) == (State.a[OP[1]] & MASK40)) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 (((ACC (OP[0]) & MASK40) == (ACC (OP[1]) & MASK40)) ? 1 : 0); + trace_output_flag (); } /* cmpeqi.s */ @@ -988,9 +988,9 @@ void OP_401 () { trace_input ("cmpeqi.s", OP_REG, OP_CONSTANT4, OP_VOID); - State.F1 = State.F0; - State.F0 = (State.regs[OP[0]] == (reg_t)SEXT4(OP[1])) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 ((GPR (OP[0]) == (reg_t) SEXT4 (OP[1])) ? 1 : 0); + trace_output_flag (); } /* cmpeqi.l */ @@ -998,9 +998,9 @@ void OP_2000000 () { trace_input ("cmpeqi.l", OP_REG, OP_CONSTANT16, OP_VOID); - State.F1 = State.F0; - State.F0 = (State.regs[OP[0]] == (reg_t)OP[1]) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 ((GPR (OP[0]) == (reg_t)OP[1]) ? 1 : 0); + trace_output_flag (); } /* cmpi.s */ @@ -1008,9 +1008,9 @@ void OP_601 () { trace_input ("cmpi.s", OP_REG, OP_CONSTANT4, OP_VOID); - State.F1 = State.F0; - State.F0 = ((int16)(State.regs[OP[0]]) < (int16)SEXT4(OP[1])) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 (((int16)(GPR (OP[0])) < (int16)SEXT4(OP[1])) ? 1 : 0); + trace_output_flag (); } /* cmpi.l */ @@ -1018,9 +1018,9 @@ void OP_3000000 () { trace_input ("cmpi.l", OP_REG, OP_CONSTANT16, OP_VOID); - State.F1 = State.F0; - State.F0 = ((int16)(State.regs[OP[0]]) < (int16)(OP[1])) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 (((int16)(GPR (OP[0])) < (int16)(OP[1])) ? 1 : 0); + trace_output_flag (); } /* cmpu */ @@ -1028,9 +1028,9 @@ void OP_4600 () { trace_input ("cmpu", OP_REG, OP_REG, OP_VOID); - State.F1 = State.F0; - State.F0 = (State.regs[OP[0]] < State.regs[OP[1]]) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 ((GPR (OP[0]) < GPR (OP[1])) ? 1 : 0); + trace_output_flag (); } /* cmpui */ @@ -1038,32 +1038,31 @@ void OP_23000000 () { trace_input ("cmpui", OP_REG, OP_CONSTANT16, OP_VOID); - State.F1 = State.F0; - State.F0 = (State.regs[OP[0]] < (reg_t)OP[1]) ? 1 : 0; - trace_output (OP_FLAG); + SET_PSW_F1 (PSW_F0); + SET_PSW_F0 ((GPR (OP[0]) < (reg_t)OP[1]) ? 1 : 0); + trace_output_flag (); } /* cpfg */ void OP_4E09 () { - uint8 *src, *dst; + uint8 val; trace_input ("cpfg", OP_FLAG_OUTPUT, OP_FLAG, OP_VOID); - if (OP[0] == 0) - dst = &State.F0; - else - dst = &State.F1; if (OP[1] == 0) - src = &State.F0; + val = PSW_F0; else if (OP[1] == 1) - src = &State.F1; + val = PSW_F1; else - src = &State.C; + val = PSW_C; + if (OP[0] == 0) + SET_PSW_F0 (val); + else + SET_PSW_F1 (val); - *dst = *src; - trace_output (OP_FLAG); + trace_output_flag (); } /* dbt */ @@ -1071,7 +1070,30 @@ void OP_5F20 () { /* d10v_callback->printf_filtered(d10v_callback, "***** DBT ***** PC=%x\n",PC); */ - State.exception = SIGTRAP; + + /* GDB uses the instruction pair ``dbt || nop'' as a break-point. + The conditional below is for either of the instruction pairs + ``dbt -> XXX'' or ``dbt <- XXX'' and treats them as as cases + where the dbt instruction should be interpreted. + + The module `sim-break' provides a more effective mechanism for + detecting GDB planted breakpoints. The code below may, + eventually, be changed to use that mechanism. */ + + if (State.ins_type == INS_LEFT + || State.ins_type == INS_RIGHT) + { + trace_input ("dbt", OP_VOID, OP_VOID, OP_VOID); + SET_DPC (PC + 1); + SET_DPSW (PSW); + SET_PSW (PSW_DM_BIT | (PSW & (PSW_F0_BIT | PSW_F1_BIT | PSW_C_BIT))); + JMP (DBT_VECTOR_START); + trace_output_void (); + } + else + { + State.exception = SIGTRAP; + } } /* divs */ @@ -1079,14 +1101,18 @@ void OP_14002800 () { uint16 foo, tmp, tmpf; + uint16 hi; + uint16 lo; trace_input ("divs", OP_DREG, OP_REG, OP_VOID); - foo = (State.regs[OP[0]] << 1) | (State.regs[OP[0]+1] >> 15); - tmp = (int16)foo - (int16)(State.regs[OP[1]]); - tmpf = (foo >= State.regs[OP[1]]) ? 1 : 0; - State.regs[OP[0]] = (tmpf == 1) ? tmp : foo; - State.regs[OP[0]+1] = (State.regs[OP[0]+1] << 1) | tmpf; - trace_output (OP_DREG); + foo = (GPR (OP[0]) << 1) | (GPR (OP[0] + 1) >> 15); + tmp = (int16)foo - (int16)(GPR (OP[1])); + tmpf = (foo >= GPR (OP[1])) ? 1 : 0; + hi = ((tmpf == 1) ? tmp : foo); + lo = ((GPR (OP[0] + 1) << 1) | tmpf); + SET_GPR (OP[0] + 0, hi); + SET_GPR (OP[0] + 1, lo); + trace_output_32 (((uint32) hi << 16) | lo); } /* exef0f */ @@ -1094,8 +1120,8 @@ void OP_4E04 () { trace_input ("exef0f", OP_VOID, OP_VOID, OP_VOID); - State.exe = (State.F0 == 0); - trace_output (OP_FLAG); + State.exe = (PSW_F0 == 0); + trace_output_flag (); } /* exef0t */ @@ -1103,8 +1129,8 @@ void OP_4E24 () { trace_input ("exef0t", OP_VOID, OP_VOID, OP_VOID); - State.exe = (State.F0 != 0); - trace_output (OP_FLAG); + State.exe = (PSW_F0 != 0); + trace_output_flag (); } /* exef1f */ @@ -1112,8 +1138,8 @@ void OP_4E40 () { trace_input ("exef1f", OP_VOID, OP_VOID, OP_VOID); - State.exe = (State.F1 == 0); - trace_output (OP_FLAG); + State.exe = (PSW_F1 == 0); + trace_output_flag (); } /* exef1t */ @@ -1121,8 +1147,8 @@ void OP_4E42 () { trace_input ("exef1t", OP_VOID, OP_VOID, OP_VOID); - State.exe = (State.F1 != 0); - trace_output (OP_FLAG); + State.exe = (PSW_F1 != 0); + trace_output_flag (); } /* exefaf */ @@ -1130,8 +1156,8 @@ void OP_4E00 () { trace_input ("exefaf", OP_VOID, OP_VOID, OP_VOID); - State.exe = (State.F0 == 0) & (State.F1 == 0); - trace_output (OP_FLAG); + State.exe = (PSW_F0 == 0) & (PSW_F1 == 0); + trace_output_flag (); } /* exefat */ @@ -1139,8 +1165,8 @@ void OP_4E02 () { trace_input ("exefat", OP_VOID, OP_VOID, OP_VOID); - State.exe = (State.F0 == 0) & (State.F1 != 0); - trace_output (OP_FLAG); + State.exe = (PSW_F0 == 0) & (PSW_F1 != 0); + trace_output_flag (); } /* exetaf */ @@ -1148,8 +1174,8 @@ void OP_4E20 () { trace_input ("exetaf", OP_VOID, OP_VOID, OP_VOID); - State.exe = (State.F0 != 0) & (State.F1 == 0); - trace_output (OP_FLAG); + State.exe = (PSW_F0 != 0) & (PSW_F1 == 0); + trace_output_flag (); } /* exetat */ @@ -1157,8 +1183,8 @@ void OP_4E22 () { trace_input ("exetat", OP_VOID, OP_VOID, OP_VOID); - State.exe = (State.F0 != 0) & (State.F1 != 0); - trace_output (OP_FLAG); + State.exe = (PSW_F0 != 0) & (PSW_F1 != 0); + trace_output_flag (); } /* exp */ @@ -1169,24 +1195,24 @@ OP_15002A00 () int i; trace_input ("exp", OP_REG_OUTPUT, OP_DREG, OP_VOID); - if (((int16)State.regs[OP[1]]) >= 0) - tmp = (State.regs[OP[1]] << 16) | State.regs[OP[1]+1]; + if (((int16)GPR (OP[1])) >= 0) + tmp = (GPR (OP[1]) << 16) | GPR (OP[1] + 1); else - tmp = ~((State.regs[OP[1]] << 16) | State.regs[OP[1]+1]); + tmp = ~((GPR (OP[1]) << 16) | GPR (OP[1] + 1)); foo = 0x40000000; for (i=1;i<17;i++) { if (tmp & foo) { - State.regs[OP[0]] = i-1; - trace_output (OP_REG); + SET_GPR (OP[0], (i - 1)); + trace_output_16 (i - 1); return; } foo >>= 1; } - State.regs[OP[0]] = 16; - trace_output (OP_REG); + SET_GPR (OP[0], 16); + trace_output_16 (16); } /* exp */ @@ -1197,7 +1223,7 @@ OP_15002A02 () int i; trace_input ("exp", OP_REG_OUTPUT, OP_ACCUM, OP_VOID); - tmp = SEXT40(State.a[OP[1]]); + tmp = SEXT40(ACC (OP[1])); if (tmp < 0) tmp = ~tmp & MASK40; @@ -1206,14 +1232,14 @@ OP_15002A02 () { if (tmp & foo) { - State.regs[OP[0]] = i-9; - trace_output (OP_REG); + SET_GPR (OP[0], i - 9); + trace_output_16 (i - 9); return; } foo >>= 1; } - State.regs[OP[0]] = 16; - trace_output (OP_REG); + SET_GPR (OP[0], 16); + trace_output_16 (16); } /* jl */ @@ -1221,9 +1247,9 @@ void OP_4D00 () { trace_input ("jl", OP_REG, OP_R0, OP_R1); - State.regs[13] = PC+1; - JMP (State.regs[OP[0]]); - trace_output (OP_VOID); + SET_GPR (13, PC + 1); + JMP (GPR (OP[0])); + trace_output_void (); } /* jmp */ @@ -1234,146 +1260,172 @@ OP_4C00 () (OP[0] == 13) ? OP_R0 : OP_VOID, (OP[0] == 13) ? OP_R1 : OP_VOID); - JMP (State.regs[OP[0]]); - trace_output (OP_VOID); + JMP (GPR (OP[0])); + trace_output_void (); } /* ld */ void OP_30000000 () { + uint16 tmp; trace_input ("ld", OP_REG_OUTPUT, OP_MEMREF2, OP_VOID); - State.regs[OP[0]] = RW (OP[1] + State.regs[OP[2]]); - trace_output (OP_REG); + tmp = RW (OP[1] + GPR (OP[2])); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* ld */ void OP_6401 () { + uint16 tmp; trace_input ("ld", OP_REG_OUTPUT, OP_POSTDEC, OP_VOID); - State.regs[OP[0]] = RW (State.regs[OP[1]]); - INC_ADDR(State.regs[OP[1]],-2); - trace_output (OP_REG); + tmp = RW (GPR (OP[1])); + SET_GPR (OP[0], tmp); + if (OP[0] != OP[1]) + INC_ADDR (OP[1], -2); + trace_output_16 (tmp); } /* ld */ void OP_6001 () { + uint16 tmp; trace_input ("ld", OP_REG_OUTPUT, OP_POSTINC, OP_VOID); - State.regs[OP[0]] = RW (State.regs[OP[1]]); - INC_ADDR(State.regs[OP[1]],2); - trace_output (OP_REG); + tmp = RW (GPR (OP[1])); + SET_GPR (OP[0], tmp); + if (OP[0] != OP[1]) + INC_ADDR (OP[1], 2); + trace_output_16 (tmp); } /* ld */ void OP_6000 () { + uint16 tmp; trace_input ("ld", OP_REG_OUTPUT, OP_MEMREF, OP_VOID); - State.regs[OP[0]] = RW (State.regs[OP[1]]); - trace_output (OP_REG); + tmp = RW (GPR (OP[1])); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* ld2w */ void OP_31000000 () { - uint16 addr = State.regs[OP[2]]; + int32 tmp; + uint16 addr = GPR (OP[2]); trace_input ("ld2w", OP_REG_OUTPUT, OP_MEMREF2, OP_VOID); - State.regs[OP[0]] = RW (OP[1] + addr); - State.regs[OP[0]+1] = RW (OP[1] + addr + 2); - trace_output (OP_DREG); + tmp = RLW (OP[1] + addr); + SET_GPR32 (OP[0], tmp); + trace_output_32 (tmp); } /* ld2w */ void OP_6601 () { - uint16 addr = State.regs[OP[1]]; + uint16 addr = GPR (OP[1]); + int32 tmp; trace_input ("ld2w", OP_REG_OUTPUT, OP_POSTDEC, OP_VOID); - State.regs[OP[0]] = RW (addr); - State.regs[OP[0]+1] = RW (addr+2); - INC_ADDR(State.regs[OP[1]],-4); - trace_output (OP_DREG); + tmp = RLW (addr); + SET_GPR32 (OP[0], tmp); + INC_ADDR (OP[1], -4); + trace_output_32 (tmp); } /* ld2w */ void OP_6201 () { - uint16 addr = State.regs[OP[1]]; + int32 tmp; + uint16 addr = GPR (OP[1]); trace_input ("ld2w", OP_REG_OUTPUT, OP_POSTINC, OP_VOID); - State.regs[OP[0]] = RW (addr); - State.regs[OP[0]+1] = RW (addr+2); - INC_ADDR(State.regs[OP[1]],4); - trace_output (OP_DREG); + tmp = RLW (addr); + SET_GPR32 (OP[0], tmp); + INC_ADDR (OP[1], 4); + trace_output_32 (tmp); } /* ld2w */ void OP_6200 () { - uint16 addr = State.regs[OP[1]]; + uint16 addr = GPR (OP[1]); + int32 tmp; trace_input ("ld2w", OP_REG_OUTPUT, OP_MEMREF, OP_VOID); - State.regs[OP[0]] = RW (addr); - State.regs[OP[0]+1] = RW (addr+2); - trace_output (OP_DREG); + tmp = RLW (addr + 0); + SET_GPR32 (OP[0], tmp); + trace_output_32 (tmp); } /* ldb */ void OP_38000000 () { + int16 tmp; trace_input ("ldb", OP_REG_OUTPUT, OP_MEMREF2, OP_VOID); - State.regs[OP[0]] = SEXT8 (RB (OP[1] + State.regs[OP[2]])); - trace_output (OP_REG); + tmp = SEXT8 (RB (OP[1] + GPR (OP[2]))); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* ldb */ void OP_7000 () { + int16 tmp; trace_input ("ldb", OP_REG_OUTPUT, OP_MEMREF, OP_VOID); - State.regs[OP[0]] = SEXT8 (RB (State.regs[OP[1]])); - trace_output (OP_REG); + tmp = SEXT8 (RB (GPR (OP[1]))); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* ldi.s */ void OP_4001 () { + int16 tmp; trace_input ("ldi.s", OP_REG_OUTPUT, OP_CONSTANT4, OP_VOID); - State.regs[OP[0]] = SEXT4(OP[1]); - trace_output (OP_REG); + tmp = SEXT4 (OP[1]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* ldi.l */ void OP_20000000 () { + int16 tmp; trace_input ("ldi.l", OP_REG_OUTPUT, OP_CONSTANT16, OP_VOID); - State.regs[OP[0]] = OP[1]; - trace_output (OP_REG); + tmp = OP[1]; + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* ldub */ void OP_39000000 () { + int16 tmp; trace_input ("ldub", OP_REG_OUTPUT, OP_MEMREF2, OP_VOID); - State.regs[OP[0]] = RB (OP[1] + State.regs[OP[2]]); - trace_output (OP_REG); + tmp = RB (OP[1] + GPR (OP[2])); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* ldub */ void OP_7200 () { + int16 tmp; trace_input ("ldub", OP_REG_OUTPUT, OP_MEMREF, OP_VOID); - State.regs[OP[0]] = RB (State.regs[OP[1]]); - trace_output (OP_REG); + tmp = RB (GPR (OP[1])); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* mac */ @@ -1383,27 +1435,28 @@ OP_2A00 () int64 tmp; trace_input ("mac", OP_ACCUM, OP_REG, OP_REG); - tmp = SEXT40 ((int16)(State.regs[OP[1]]) * (int16)(State.regs[OP[2]])); + tmp = SEXT40 ((int16)(GPR (OP[1])) * (int16)(GPR (OP[2]))); - if (State.FX) + if (PSW_FX) tmp = SEXT40( (tmp << 1) & MASK40); - if (State.ST && tmp > MAX32) + if (PSW_ST && tmp > SEXT40(MAX32)) tmp = MAX32; - tmp += SEXT40(State.a[OP[0]]); - if (State.ST) + tmp += SEXT40 (ACC (OP[0])); + if (PSW_ST) { - if (tmp > MAX32) - State.a[OP[0]] = MAX32; - else if (tmp < MIN32) - State.a[OP[0]] = MIN32; + if (tmp > SEXT40(MAX32)) + tmp = MAX32; + else if (tmp < SEXT40(MIN32)) + tmp = MIN32; else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* macsu */ @@ -1413,12 +1466,12 @@ OP_1A00 () int64 tmp; trace_input ("macsu", OP_ACCUM, OP_REG, OP_REG); - tmp = SEXT40 ((int16)State.regs[OP[1]] * State.regs[OP[2]]); - if (State.FX) - tmp = SEXT40( (tmp << 1) & MASK40); - - State.a[OP[0]] = (SEXT40 (State.a[OP[0]]) + tmp) & MASK40; - trace_output (OP_ACCUM); + tmp = SEXT40 ((int16) GPR (OP[1]) * GPR (OP[2])); + if (PSW_FX) + tmp = SEXT40 ((tmp << 1) & MASK40); + tmp = ((SEXT40 (ACC (OP[0])) + tmp) & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* macu */ @@ -1430,29 +1483,35 @@ OP_3A00 () uint32 src2; trace_input ("macu", OP_ACCUM, OP_REG, OP_REG); - src1 = (uint16) State.regs[OP[1]]; - src2 = (uint16) State.regs[OP[2]]; + src1 = (uint16) GPR (OP[1]); + src2 = (uint16) GPR (OP[2]); tmp = src1 * src2; - if (State.FX) + if (PSW_FX) tmp = (tmp << 1); - State.a[OP[0]] = (State.a[OP[0]] + tmp) & MASK40; - trace_output (OP_ACCUM); + tmp = ((ACC (OP[0]) + tmp) & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* max */ void OP_2600 () { + int16 tmp; trace_input ("max", OP_REG, OP_REG, OP_VOID); - State.F1 = State.F0; - if ((int16)State.regs[OP[1]] > (int16)State.regs[OP[0]]) + SET_PSW_F1 (PSW_F0); + if ((int16) GPR (OP[1]) > (int16)GPR (OP[0])) { - State.regs[OP[0]] = State.regs[OP[1]]; - State.F0 = 1; + tmp = GPR (OP[1]); + SET_PSW_F0 (1); } else - State.F0 = 0; - trace_output (OP_REG); + { + tmp = GPR (OP[0]); + SET_PSW_F0 (0); + } + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* max */ @@ -1462,32 +1521,41 @@ OP_3600 () int64 tmp; trace_input ("max", OP_ACCUM, OP_DREG, OP_VOID); - State.F1 = State.F0; - tmp = SEXT16 (State.regs[OP[1]]) << 16 | State.regs[OP[1]+1]; - if (tmp > SEXT40(State.a[OP[0]])) + SET_PSW_F1 (PSW_F0); + tmp = SEXT16 (GPR (OP[1])) << 16 | GPR (OP[1] + 1); + if (tmp > SEXT40 (ACC (OP[0]))) { - State.a[OP[0]] = tmp & MASK40; - State.F0 = 1; + tmp = (tmp & MASK40); + SET_PSW_F0 (1); } else - State.F0 = 0; - trace_output (OP_ACCUM); + { + tmp = ACC (OP[0]); + SET_PSW_F0 (0); + } + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* max */ void OP_3602 () { + int64 tmp; trace_input ("max", OP_ACCUM, OP_ACCUM, OP_VOID); - State.F1 = State.F0; - if (SEXT40(State.a[OP[1]]) > SEXT40(State.a[OP[0]])) + SET_PSW_F1 (PSW_F0); + if (SEXT40 (ACC (OP[1])) > SEXT40 (ACC (OP[0]))) { - State.a[OP[0]] = State.a[OP[1]]; - State.F0 = 1; + tmp = ACC (OP[1]); + SET_PSW_F0 (1); } else - State.F0 = 0; - trace_output (OP_ACCUM); + { + tmp = ACC (OP[0]); + SET_PSW_F0 (0); + } + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } @@ -1495,16 +1563,21 @@ OP_3602 () void OP_2601 () { + int16 tmp; trace_input ("min", OP_REG, OP_REG, OP_VOID); - State.F1 = State.F0; - if ((int16)State.regs[OP[1]] < (int16)State.regs[OP[0]]) + SET_PSW_F1 (PSW_F0); + if ((int16)GPR (OP[1]) < (int16)GPR (OP[0])) { - State.regs[OP[0]] = State.regs[OP[1]]; - State.F0 = 1; + tmp = GPR (OP[1]); + SET_PSW_F0 (1); } else - State.F0 = 0; - trace_output (OP_REG); + { + tmp = GPR (OP[0]); + SET_PSW_F0 (0); + } + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* min */ @@ -1514,32 +1587,41 @@ OP_3601 () int64 tmp; trace_input ("min", OP_ACCUM, OP_DREG, OP_VOID); - State.F1 = State.F0; - tmp = SEXT16 (State.regs[OP[1]]) << 16 | State.regs[OP[1]+1]; - if (tmp < SEXT40(State.a[OP[0]])) + SET_PSW_F1 (PSW_F0); + tmp = SEXT16 (GPR (OP[1])) << 16 | GPR (OP[1] + 1); + if (tmp < SEXT40(ACC (OP[0]))) { - State.a[OP[0]] = tmp & MASK40; - State.F0 = 1; + tmp = (tmp & MASK40); + SET_PSW_F0 (1); } else - State.F0 = 0; - trace_output (OP_ACCUM); + { + tmp = ACC (OP[0]); + SET_PSW_F0 (0); + } + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* min */ void OP_3603 () { + int64 tmp; trace_input ("min", OP_ACCUM, OP_ACCUM, OP_VOID); - State.F1 = State.F0; - if (SEXT40(State.a[OP[1]]) < SEXT40(State.a[OP[0]])) + SET_PSW_F1 (PSW_F0); + if (SEXT40(ACC (OP[1])) < SEXT40(ACC (OP[0]))) { - State.a[OP[0]] = State.a[OP[1]]; - State.F0 = 1; + tmp = ACC (OP[1]); + SET_PSW_F0 (1); } else - State.F0 = 0; - trace_output (OP_ACCUM); + { + tmp = ACC (OP[0]); + SET_PSW_F0 (0); + } + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* msb */ @@ -1549,27 +1631,30 @@ OP_2800 () int64 tmp; trace_input ("msb", OP_ACCUM, OP_REG, OP_REG); - tmp = SEXT40 ((int16)(State.regs[OP[1]]) * (int16)(State.regs[OP[2]])); + tmp = SEXT40 ((int16)(GPR (OP[1])) * (int16)(GPR (OP[2]))); - if (State.FX) + if (PSW_FX) tmp = SEXT40 ((tmp << 1) & MASK40); - if (State.ST && tmp > MAX32) + if (PSW_ST && tmp > SEXT40(MAX32)) tmp = MAX32; - tmp = SEXT40(State.a[OP[0]]) - tmp; - if (State.ST) + tmp = SEXT40(ACC (OP[0])) - tmp; + if (PSW_ST) { - if (tmp > MAX32) - State.a[OP[0]] = MAX32; - else if (tmp < MIN32) - State.a[OP[0]] = MIN32; + if (tmp > SEXT40(MAX32)) + tmp = MAX32; + else if (tmp < SEXT40(MIN32)) + tmp = MIN32; else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + { + tmp = (tmp & MASK40); + } + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* msbsu */ @@ -1579,12 +1664,12 @@ OP_1800 () int64 tmp; trace_input ("msbsu", OP_ACCUM, OP_REG, OP_REG); - tmp = SEXT40 ((int16)State.regs[OP[1]] * State.regs[OP[2]]); - if (State.FX) + tmp = SEXT40 ((int16)GPR (OP[1]) * GPR (OP[2])); + if (PSW_FX) tmp = SEXT40( (tmp << 1) & MASK40); - - State.a[OP[0]] = (SEXT40 (State.a[OP[0]]) - tmp) & MASK40; - trace_output (OP_ACCUM); + tmp = ((SEXT40 (ACC (OP[0])) - tmp) & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* msbu */ @@ -1596,23 +1681,25 @@ OP_3800 () uint32 src2; trace_input ("msbu", OP_ACCUM, OP_REG, OP_REG); - src1 = (uint16) State.regs[OP[1]]; - src2 = (uint16) State.regs[OP[2]]; + src1 = (uint16) GPR (OP[1]); + src2 = (uint16) GPR (OP[2]); tmp = src1 * src2; - if (State.FX) + if (PSW_FX) tmp = (tmp << 1); - - State.a[OP[0]] = (State.a[OP[0]] - tmp) & MASK40; - trace_output (OP_ACCUM); + tmp = ((ACC (OP[0]) - tmp) & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* mul */ void OP_2E00 () { + int16 tmp; trace_input ("mul", OP_REG, OP_REG, OP_VOID); - State.regs[OP[0]] *= State.regs[OP[1]]; - trace_output (OP_REG); + tmp = GPR (OP[0]) * GPR (OP[1]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* mulx */ @@ -1622,16 +1709,17 @@ OP_2C00 () int64 tmp; trace_input ("mulx", OP_ACCUM_OUTPUT, OP_REG, OP_REG); - tmp = SEXT40 ((int16)(State.regs[OP[1]]) * (int16)(State.regs[OP[2]])); + tmp = SEXT40 ((int16)(GPR (OP[1])) * (int16)(GPR (OP[2]))); - if (State.FX) + if (PSW_FX) tmp = SEXT40 ((tmp << 1) & MASK40); - if (State.ST && tmp > MAX32) - State.a[OP[0]] = MAX32; + if (PSW_ST && tmp > MAX32) + tmp = MAX32; else - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* mulxsu */ @@ -1641,13 +1729,13 @@ OP_1C00 () int64 tmp; trace_input ("mulxsu", OP_ACCUM_OUTPUT, OP_REG, OP_REG); - tmp = SEXT40 ((int16)(State.regs[OP[1]]) * State.regs[OP[2]]); + tmp = SEXT40 ((int16)(GPR (OP[1])) * GPR (OP[2])); - if (State.FX) + if (PSW_FX) tmp <<= 1; - - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* mulxu */ @@ -1659,184 +1747,224 @@ OP_3C00 () uint32 src2; trace_input ("mulxu", OP_ACCUM_OUTPUT, OP_REG, OP_REG); - src1 = (uint16) State.regs[OP[1]]; - src2 = (uint16) State.regs[OP[2]]; + src1 = (uint16) GPR (OP[1]); + src2 = (uint16) GPR (OP[2]); tmp = src1 * src2; - if (State.FX) + if (PSW_FX) tmp <<= 1; - - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* mv */ void OP_4000 () { + int16 tmp; trace_input ("mv", OP_REG_OUTPUT, OP_REG, OP_VOID); - State.regs[OP[0]] = State.regs[OP[1]]; - trace_output (OP_REG); + tmp = GPR (OP[1]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* mv2w */ void OP_5000 () { + int32 tmp; trace_input ("mv2w", OP_DREG_OUTPUT, OP_DREG, OP_VOID); - State.regs[OP[0]] = State.regs[OP[1]]; - State.regs[OP[0]+1] = State.regs[OP[1]+1]; - trace_output (OP_DREG); + tmp = GPR32 (OP[1]); + SET_GPR32 (OP[0], tmp); + trace_output_32 (tmp); } /* mv2wfac */ void OP_3E00 () { + int32 tmp; trace_input ("mv2wfac", OP_DREG_OUTPUT, OP_ACCUM, OP_VOID); - State.regs[OP[0]] = (State.a[OP[1]] >> 16) & 0xffff; - State.regs[OP[0]+1] = State.a[OP[1]] & 0xffff; - trace_output (OP_DREG); + tmp = ACC (OP[1]); + SET_GPR32 (OP[0], tmp); + trace_output_32 (tmp); } /* mv2wtac */ void OP_3E01 () { + int64 tmp; trace_input ("mv2wtac", OP_DREG, OP_ACCUM_OUTPUT, OP_VOID); - State.a[OP[1]] = (SEXT16 (State.regs[OP[0]]) << 16 | State.regs[OP[0]+1]) & MASK40; - trace_output (OP_ACCUM_REVERSE); + tmp = ((SEXT16 (GPR (OP[0])) << 16 | GPR (OP[0] + 1)) & MASK40); + SET_ACC (OP[1], tmp); + trace_output_40 (tmp); } /* mvac */ void OP_3E03 () { + int64 tmp; trace_input ("mvac", OP_ACCUM_OUTPUT, OP_ACCUM, OP_VOID); - State.a[OP[0]] = State.a[OP[1]]; - trace_output (OP_ACCUM); + tmp = ACC (OP[1]); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* mvb */ void OP_5400 () { + int16 tmp; trace_input ("mvb", OP_REG_OUTPUT, OP_REG, OP_VOID); - State.regs[OP[0]] = SEXT8 (State.regs[OP[1]] & 0xff); - trace_output (OP_REG); + tmp = SEXT8 (GPR (OP[1]) & 0xff); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* mvf0f */ void OP_4400 () { + int16 tmp; trace_input ("mf0f", OP_REG_OUTPUT, OP_REG, OP_VOID); - if (State.F0 == 0) - State.regs[OP[0]] = State.regs[OP[1]]; - trace_output (OP_REG); + if (PSW_F0 == 0) + { + tmp = GPR (OP[1]); + SET_GPR (OP[0], tmp); + } + else + tmp = GPR (OP[0]); + trace_output_16 (tmp); } /* mvf0t */ void OP_4401 () { + int16 tmp; trace_input ("mf0t", OP_REG_OUTPUT, OP_REG, OP_VOID); - if (State.F0) - State.regs[OP[0]] = State.regs[OP[1]]; - trace_output (OP_REG); + if (PSW_F0) + { + tmp = GPR (OP[1]); + SET_GPR (OP[0], tmp); + } + else + tmp = GPR (OP[0]); + trace_output_16 (tmp); } /* mvfacg */ void OP_1E04 () { + int16 tmp; trace_input ("mvfacg", OP_REG_OUTPUT, OP_ACCUM, OP_VOID); - State.regs[OP[0]] = (State.a[OP[1]] >> 32) & 0xff; - trace_output (OP_ACCUM); + tmp = ((ACC (OP[1]) >> 32) & 0xff); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* mvfachi */ void OP_1E00 () { + int16 tmp; trace_input ("mvfachi", OP_REG_OUTPUT, OP_ACCUM, OP_VOID); - State.regs[OP[0]] = (State.a[OP[1]] >> 16) & 0xffff; - trace_output (OP_REG); + tmp = (ACC (OP[1]) >> 16); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* mvfaclo */ void OP_1E02 () { + int16 tmp; trace_input ("mvfaclo", OP_REG_OUTPUT, OP_ACCUM, OP_VOID); - State.regs[OP[0]] = State.a[OP[1]] & 0xffff; - trace_output (OP_REG); + tmp = ACC (OP[1]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* mvfc */ void OP_5200 () { + int16 tmp; trace_input ("mvfc", OP_REG_OUTPUT, OP_CR, OP_VOID); - State.regs[OP[0]] = move_from_cr (OP[1]); - trace_output (OP_REG); + tmp = CREG (OP[1]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* mvtacg */ void OP_1E41 () { + int64 tmp; trace_input ("mvtacg", OP_REG, OP_ACCUM, OP_VOID); - State.a[OP[1]] &= MASK32; - State.a[OP[1]] |= (int64)(State.regs[OP[0]] & 0xff) << 32; - trace_output (OP_ACCUM_REVERSE); + tmp = ((ACC (OP[1]) & MASK32) + | ((int64)(GPR (OP[0]) & 0xff) << 32)); + SET_ACC (OP[1], tmp); + trace_output_40 (tmp); } /* mvtachi */ void OP_1E01 () { - uint16 tmp; - + uint64 tmp; trace_input ("mvtachi", OP_REG, OP_ACCUM, OP_VOID); - tmp = State.a[OP[1]] & 0xffff; - State.a[OP[1]] = (SEXT16 (State.regs[OP[0]]) << 16 | tmp) & MASK40; - trace_output (OP_ACCUM_REVERSE); + tmp = ACC (OP[1]) & 0xffff; + tmp = ((SEXT16 (GPR (OP[0])) << 16 | tmp) & MASK40); + SET_ACC (OP[1], tmp); + trace_output_40 (tmp); } /* mvtaclo */ void OP_1E21 () { + int64 tmp; trace_input ("mvtaclo", OP_REG, OP_ACCUM, OP_VOID); - State.a[OP[1]] = (SEXT16 (State.regs[OP[0]])) & MASK40; - trace_output (OP_ACCUM_REVERSE); + tmp = ((SEXT16 (GPR (OP[0]))) & MASK40); + SET_ACC (OP[1], tmp); + trace_output_40 (tmp); } /* mvtc */ void OP_5600 () { + int16 tmp; trace_input ("mvtc", OP_REG, OP_CR_OUTPUT, OP_VOID); - move_to_cr (OP[1], State.regs[OP[0]]); - trace_output (OP_CR_REVERSE); + tmp = GPR (OP[0]); + tmp = SET_CREG (OP[1], tmp); + trace_output_16 (tmp); } /* mvub */ void OP_5401 () { + int16 tmp; trace_input ("mvub", OP_REG_OUTPUT, OP_REG, OP_VOID); - State.regs[OP[0]] = State.regs[OP[1]] & 0xff; - trace_output (OP_REG); + tmp = (GPR (OP[1]) & 0xff); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* neg */ void OP_4605 () { + int16 tmp; trace_input ("neg", OP_REG, OP_VOID, OP_VOID); - State.regs[OP[0]] = 0 - State.regs[OP[0]]; - trace_output (OP_REG); + tmp = - GPR (OP[0]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* neg */ @@ -1846,19 +1974,20 @@ OP_5605 () int64 tmp; trace_input ("neg", OP_ACCUM, OP_VOID, OP_VOID); - tmp = -SEXT40(State.a[OP[0]]); - if (State.ST) + tmp = -SEXT40(ACC (OP[0])); + if (PSW_ST) { - if ( tmp > MAX32) - State.a[OP[0]] = MAX32; - else if (tmp < MIN32) - State.a[OP[0]] = MIN32; + if (tmp > SEXT40(MAX32)) + tmp = (MAX32); + else if (tmp < SEXT40(MIN32)) + tmp = (MIN32); else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } @@ -1900,34 +2029,40 @@ OP_5E00 () break; } - trace_output (OP_VOID); + trace_output_void (); } /* not */ void OP_4603 () { + int16 tmp; trace_input ("not", OP_REG, OP_VOID, OP_VOID); - State.regs[OP[0]] = ~(State.regs[OP[0]]); - trace_output (OP_REG); + tmp = ~GPR (OP[0]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* or */ void OP_800 () { + int16 tmp; trace_input ("or", OP_REG, OP_REG, OP_VOID); - State.regs[OP[0]] |= State.regs[OP[1]]; - trace_output (OP_REG); + tmp = (GPR (OP[0]) | GPR (OP[1])); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* or3 */ void OP_4000000 () { + int16 tmp; trace_input ("or3", OP_REG_OUTPUT, OP_REG, OP_CONSTANT16); - State.regs[OP[0]] = State.regs[OP[1]] | OP[2]; - trace_output (OP_REG); + tmp = (GPR (OP[1]) | OP[2]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* rac */ @@ -1946,8 +2081,8 @@ OP_5201 () State.exception = SIGILL; } - State.F1 = State.F0; - tmp = SEXT56 ((State.a[0] << 16) | (State.a[1] & 0xffff)); + SET_PSW_F1 (PSW_F0); + tmp = SEXT56 ((ACC (0) << 16) | (ACC (1) & 0xffff)); if (shift >=0) tmp <<= shift; else @@ -1956,23 +2091,20 @@ OP_5201 () tmp >>= 16; /* look at bits 0:43 */ if (tmp > SEXT44 (SIGNED64 (0x0007fffffff))) { - State.regs[OP[0]] = 0x7fff; - State.regs[OP[0]+1] = 0xffff; - State.F0 = 1; + tmp = 0x7fffffff; + SET_PSW_F0 (1); } else if (tmp < SEXT44 (SIGNED64 (0xfff80000000))) { - State.regs[OP[0]] = 0x8000; - State.regs[OP[0]+1] = 0; - State.F0 = 1; + tmp = 0x80000000; + SET_PSW_F0 (1); } else { - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.regs[OP[0]+1] = tmp & 0xffff; - State.F0 = 0; + SET_PSW_F0 (0); } - trace_output (OP_DREG); + SET_GPR32 (OP[0], tmp); + trace_output_32 (tmp); } /* rachi */ @@ -1983,29 +2115,30 @@ OP_4201 () int shift = SEXT3 (OP[2]); trace_input ("rachi", OP_REG_OUTPUT, OP_ACCUM, OP_CONSTANT3); - State.F1 = State.F0; + SET_PSW_F1 (PSW_F0); if (shift >=0) - tmp = SEXT40 (State.a[OP[1]]) << shift; + tmp = SEXT40 (ACC (OP[1])) << shift; else - tmp = SEXT40 (State.a[OP[1]]) >> -shift; + tmp = SEXT40 (ACC (OP[1])) >> -shift; tmp += 0x8000; if (tmp > SEXT44 (SIGNED64 (0x0007fffffff))) { - State.regs[OP[0]] = 0x7fff; - State.F0 = 1; + tmp = 0x7fff; + SET_PSW_F0 (1); } else if (tmp < SEXT44 (SIGNED64 (0xfff80000000))) { - State.regs[OP[0]] = 0x8000; - State.F0 = 1; + tmp = 0x8000; + SET_PSW_F0 (1); } else { - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.F0 = 0; + tmp = (tmp >> 16); + SET_PSW_F0 (0); } - trace_output (OP_REG); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* rep */ @@ -2013,11 +2146,11 @@ void OP_27000000 () { trace_input ("rep", OP_REG, OP_CONSTANT16, OP_VOID); - RPT_S = PC + 1; - RPT_E = PC + OP[1]; - RPT_C = State.regs[OP[0]]; - State.RP = 1; - if (RPT_C == 0) + SET_RPT_S (PC + 1); + SET_RPT_E (PC + OP[1]); + SET_RPT_C (GPR (OP[0])); + SET_PSW_RP (1); + if (GPR (OP[0]) == 0) { (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: rep with count=0 is illegal.\n"); State.exception = SIGILL; @@ -2027,7 +2160,7 @@ OP_27000000 () (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: rep must include at least 4 instructions.\n"); State.exception = SIGILL; } - trace_output (OP_VOID); + trace_output_void (); } /* repi */ @@ -2035,11 +2168,11 @@ void OP_2F000000 () { trace_input ("repi", OP_CONSTANT16, OP_CONSTANT16, OP_VOID); - RPT_S = PC + 1; - RPT_E = PC + OP[1]; - RPT_C = OP[0]; - State.RP = 1; - if (RPT_C == 0) + SET_RPT_S (PC + 1); + SET_RPT_E (PC + OP[1]); + SET_RPT_C (OP[0]); + SET_PSW_RP (1); + if (OP[0] == 0) { (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: repi with count=0 is illegal.\n"); State.exception = SIGILL; @@ -2049,15 +2182,17 @@ OP_2F000000 () (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: repi must include at least 4 instructions.\n"); State.exception = SIGILL; } - trace_output (OP_VOID); + trace_output_void (); } /* rtd */ void OP_5F60 () { - d10v_callback->printf_filtered(d10v_callback, "ERROR: rtd - NOT IMPLEMENTED\n"); - State.exception = SIGILL; + trace_input ("rtd", OP_VOID, OP_VOID, OP_VOID); + SET_CREG (PSW_CR, DPSW); + JMP(DPC); + trace_output_void (); } /* rte */ @@ -2065,9 +2200,9 @@ void OP_5F40 () { trace_input ("rte", OP_VOID, OP_VOID, OP_VOID); - move_to_cr (PSW_CR, BPSW); + SET_CREG (PSW_CR, BPSW); JMP(BPC); - trace_output (OP_VOID); + trace_output_void (); } /* sadd */ @@ -2077,37 +2212,42 @@ OP_1223 () int64 tmp; trace_input ("sadd", OP_ACCUM, OP_ACCUM, OP_VOID); - tmp = SEXT40(State.a[OP[0]]) + (SEXT40(State.a[OP[1]]) >> 16); - if (State.ST) + tmp = SEXT40(ACC (OP[0])) + (SEXT40(ACC (OP[1])) >> 16); + if (PSW_ST) { - if (tmp > MAX32) - State.a[OP[0]] = MAX32; - else if (tmp < MIN32) - State.a[OP[0]] = MIN32; + if (tmp > SEXT40(MAX32)) + tmp = (MAX32); + else if (tmp < SEXT40(MIN32)) + tmp = (MIN32); else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* setf0f */ void OP_4611 () { + int16 tmp; trace_input ("setf0f", OP_REG_OUTPUT, OP_VOID, OP_VOID); - State.regs[OP[0]] = (State.F0 == 0) ? 1 : 0; - trace_output (OP_REG); + tmp = ((PSW_F0 == 0) ? 1 : 0); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* setf0t */ void OP_4613 () { + int16 tmp; trace_input ("setf0t", OP_REG_OUTPUT, OP_VOID, OP_VOID); - State.regs[OP[0]] = (State.F0 == 1) ? 1 : 0; - trace_output (OP_REG); + tmp = ((PSW_F0 == 1) ? 1 : 0); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* sleep */ @@ -2115,17 +2255,19 @@ void OP_5FC0 () { trace_input ("sleep", OP_VOID, OP_VOID, OP_VOID); - State.IE = 1; - trace_output (OP_VOID); + SET_PSW_IE (1); + trace_output_void (); } /* sll */ void OP_2200 () { + int16 tmp; trace_input ("sll", OP_REG, OP_REG, OP_VOID); - State.regs[OP[0]] <<= (State.regs[OP[1]] & 0xf); - trace_output (OP_REG); + tmp = (GPR (OP[0]) << (GPR (OP[1]) & 0xf)); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* sll */ @@ -2134,36 +2276,39 @@ OP_3200 () { int64 tmp; trace_input ("sll", OP_ACCUM, OP_REG, OP_VOID); - if ((State.regs[OP[1]] & 31) <= 16) - tmp = SEXT40 (State.a[OP[0]]) << (State.regs[OP[1]] & 31); + if ((GPR (OP[1]) & 31) <= 16) + tmp = SEXT40 (ACC (OP[0])) << (GPR (OP[1]) & 31); else { - (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: shift value %d too large.\n", State.regs[OP[1]] & 31); + (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: shift value %d too large.\n", GPR (OP[1]) & 31); State.exception = SIGILL; return; } - if (State.ST) + if (PSW_ST) { if (tmp > MAX32) - State.a[OP[0]] = MAX32; + tmp = (MAX32); else if (tmp < 0xffffff80000000LL) - State.a[OP[0]] = MIN32; + tmp = (MIN32); else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* slli */ void OP_2201 () { + int16 tmp; trace_input ("slli", OP_REG, OP_CONSTANT16, OP_VOID); - State.regs[OP[0]] <<= OP[1]; - trace_output (OP_REG); + tmp = (GPR (OP[0]) << OP[1]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* slli */ @@ -2176,38 +2321,43 @@ OP_3201 () OP[1] = 16; trace_input ("slli", OP_ACCUM, OP_CONSTANT16, OP_VOID); - tmp = SEXT40(State.a[OP[0]]) << OP[1]; + tmp = SEXT40(ACC (OP[0])) << OP[1]; - if (State.ST) + if (PSW_ST) { if (tmp > MAX32) - State.a[OP[0]] = MAX32; + tmp = (MAX32); else if (tmp < 0xffffff80000000LL) - State.a[OP[0]] = MIN32; + tmp = (MIN32); else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; - trace_output (OP_ACCUM); + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* slx */ void OP_460B () { + int16 tmp; trace_input ("slx", OP_REG, OP_FLAG, OP_VOID); - State.regs[OP[0]] = (State.regs[OP[0]] << 1) | State.F0; - trace_output (OP_REG); + tmp = ((GPR (OP[0]) << 1) | PSW_F0); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* sra */ void OP_2400 () { + int16 tmp; trace_input ("sra", OP_REG, OP_REG, OP_VOID); - State.regs[OP[0]] = ((int16)(State.regs[OP[0]])) >> (State.regs[OP[1]] & 0xf); - trace_output (OP_REG); + tmp = (((int16)(GPR (OP[0]))) >> (GPR (OP[1]) & 0xf)); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* sra */ @@ -2215,46 +2365,54 @@ void OP_3400 () { trace_input ("sra", OP_ACCUM, OP_REG, OP_VOID); - if ((State.regs[OP[1]] & 31) <= 16) - State.a[OP[0]] = (SEXT40(State.a[OP[0]]) >> (State.regs[OP[1]] & 31)) & MASK40; + if ((GPR (OP[1]) & 31) <= 16) + { + int64 tmp = ((SEXT40(ACC (OP[0])) >> (GPR (OP[1]) & 31)) & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); + } else { - (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: shift value %d too large.\n", State.regs[OP[1]] & 31); + (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: shift value %d too large.\n", GPR (OP[1]) & 31); State.exception = SIGILL; return; } - - trace_output (OP_ACCUM); } /* srai */ void OP_2401 () { + int16 tmp; trace_input ("srai", OP_REG, OP_CONSTANT16, OP_VOID); - State.regs[OP[0]] = ((int16)(State.regs[OP[0]])) >> OP[1]; - trace_output (OP_REG); + tmp = (((int16)(GPR (OP[0]))) >> OP[1]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* srai */ void OP_3401 () { + int64 tmp; if (OP[1] == 0) OP[1] = 16; trace_input ("srai", OP_ACCUM, OP_CONSTANT16, OP_VOID); - State.a[OP[0]] = (SEXT40(State.a[OP[0]]) >> OP[1]) & MASK40; - trace_output (OP_ACCUM); + tmp = ((SEXT40(ACC (OP[0])) >> OP[1]) & MASK40); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* srl */ void OP_2000 () { + int16 tmp; trace_input ("srl", OP_REG, OP_REG, OP_VOID); - State.regs[OP[0]] >>= (State.regs[OP[1]] & 0xf); - trace_output (OP_REG); + tmp = (GPR (OP[0]) >> (GPR (OP[1]) & 0xf)); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* srl */ @@ -2262,37 +2420,44 @@ void OP_3000 () { trace_input ("srl", OP_ACCUM, OP_REG, OP_VOID); - if ((State.regs[OP[1]] & 31) <= 16) - State.a[OP[0]] = (uint64)((State.a[OP[0]] & MASK40) >> (State.regs[OP[1]] & 31)); + if ((GPR (OP[1]) & 31) <= 16) + { + int64 tmp = ((uint64)((ACC (OP[0]) & MASK40) >> (GPR (OP[1]) & 31))); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); + } else { - (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: shift value %d too large.\n", State.regs[OP[1]] & 31); + (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: shift value %d too large.\n", GPR (OP[1]) & 31); State.exception = SIGILL; return; } - trace_output (OP_ACCUM); } /* srli */ void OP_2001 () { + int16 tmp; trace_input ("srli", OP_REG, OP_CONSTANT16, OP_VOID); - State.regs[OP[0]] >>= OP[1]; - trace_output (OP_REG); + tmp = (GPR (OP[0]) >> OP[1]); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* srli */ void OP_3001 () { + int64 tmp; if (OP[1] == 0) OP[1] = 16; trace_input ("srli", OP_ACCUM, OP_CONSTANT16, OP_VOID); - State.a[OP[0]] = (uint64)(State.a[OP[0]] & MASK40) >> OP[1]; - trace_output (OP_ACCUM); + tmp = ((uint64)(ACC (OP[0]) & MASK40) >> OP[1]); + SET_ACC (OP[0], tmp); + trace_output_40 (tmp); } /* srx */ @@ -2300,11 +2465,11 @@ void OP_4609 () { uint16 tmp; - trace_input ("srx", OP_REG, OP_FLAG, OP_VOID); - tmp = State.F0 << 15; - State.regs[OP[0]] = (State.regs[OP[0]] >> 1) | tmp; - trace_output (OP_REG); + tmp = PSW_F0 << 15; + tmp = ((GPR (OP[0]) >> 1) | tmp); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* st */ @@ -2312,8 +2477,8 @@ void OP_34000000 () { trace_input ("st", OP_REG, OP_MEMREF2, OP_VOID); - SW (OP[1] + State.regs[OP[2]], State.regs[OP[0]]); - trace_output (OP_VOID); + SW (OP[1] + GPR (OP[2]), GPR (OP[0])); + trace_output_void (); } /* st */ @@ -2321,24 +2486,25 @@ void OP_6800 () { trace_input ("st", OP_REG, OP_MEMREF, OP_VOID); - SW (State.regs[OP[1]], State.regs[OP[0]]); - trace_output (OP_VOID); + SW (GPR (OP[1]), GPR (OP[0])); + trace_output_void (); } /* st */ void OP_6C1F () { + uint16 addr = GPR (OP[1]) - 2; trace_input ("st", OP_REG, OP_PREDEC, OP_VOID); - if ( OP[1] != 15 ) + if (OP[1] != 15) { (*d10v_callback->printf_filtered) (d10v_callback, "ERROR: cannot pre-decrement any registers but r15 (SP).\n"); State.exception = SIGILL; return; } - State.regs[OP[1]] -= 2; - SW (State.regs[OP[1]], State.regs[OP[0]]); - trace_output (OP_VOID); + SW (addr, GPR (OP[0])); + SET_GPR (OP[1], addr); + trace_output_void (); } /* st */ @@ -2346,9 +2512,9 @@ void OP_6801 () { trace_input ("st", OP_REG, OP_POSTINC, OP_VOID); - SW (State.regs[OP[1]], State.regs[OP[0]]); - INC_ADDR (State.regs[OP[1]],2); - trace_output (OP_VOID); + SW (GPR (OP[1]), GPR (OP[0])); + INC_ADDR (OP[1], 2); + trace_output_void (); } /* st */ @@ -2362,9 +2528,9 @@ OP_6C01 () State.exception = SIGILL; return; } - SW (State.regs[OP[1]], State.regs[OP[0]]); - INC_ADDR (State.regs[OP[1]],-2); - trace_output (OP_VOID); + SW (GPR (OP[1]), GPR (OP[0])); + INC_ADDR (OP[1], -2); + trace_output_void (); } /* st2w */ @@ -2372,9 +2538,9 @@ void OP_35000000 () { trace_input ("st2w", OP_DREG, OP_MEMREF2, OP_VOID); - SW (State.regs[OP[2]]+OP[1], State.regs[OP[0]]); - SW (State.regs[OP[2]]+OP[1]+2, State.regs[OP[0]+1]); - trace_output (OP_VOID); + SW (GPR (OP[2])+ OP[1] + 0, GPR (OP[0] + 0)); + SW (GPR (OP[2])+ OP[1] + 2, GPR (OP[0] + 1)); + trace_output_void (); } /* st2w */ @@ -2382,15 +2548,16 @@ void OP_6A00 () { trace_input ("st2w", OP_DREG, OP_MEMREF, OP_VOID); - SW (State.regs[OP[1]], State.regs[OP[0]]); - SW (State.regs[OP[1]]+2, State.regs[OP[0]+1]); - trace_output (OP_VOID); + SW (GPR (OP[1]) + 0, GPR (OP[0] + 0)); + SW (GPR (OP[1]) + 2, GPR (OP[0] + 1)); + trace_output_void (); } /* st2w */ void OP_6E1F () { + uint16 addr = GPR (OP[1]) - 4; trace_input ("st2w", OP_DREG, OP_PREDEC, OP_VOID); if ( OP[1] != 15 ) { @@ -2398,10 +2565,10 @@ OP_6E1F () State.exception = SIGILL; return; } - State.regs[OP[1]] -= 4; - SW (State.regs[OP[1]], State.regs[OP[0]]); - SW (State.regs[OP[1]]+2, State.regs[OP[0]+1]); - trace_output (OP_VOID); + SW (addr + 0, GPR (OP[0] + 0)); + SW (addr + 2, GPR (OP[0] + 1)); + SET_GPR (OP[1], addr); + trace_output_void (); } /* st2w */ @@ -2409,10 +2576,10 @@ void OP_6A01 () { trace_input ("st2w", OP_DREG, OP_POSTINC, OP_VOID); - SW (State.regs[OP[1]], State.regs[OP[0]]); - SW (State.regs[OP[1]]+2, State.regs[OP[0]+1]); - INC_ADDR (State.regs[OP[1]],4); - trace_output (OP_VOID); + SW (GPR (OP[1]) + 0, GPR (OP[0] + 0)); + SW (GPR (OP[1]) + 2, GPR (OP[0] + 1)); + INC_ADDR (OP[1], 4); + trace_output_void (); } /* st2w */ @@ -2426,10 +2593,10 @@ OP_6E01 () State.exception = SIGILL; return; } - SW (State.regs[OP[1]], State.regs[OP[0]]); - SW (State.regs[OP[1]]+2, State.regs[OP[0]+1]); - INC_ADDR (State.regs[OP[1]],-4); - trace_output (OP_VOID); + SW (GPR (OP[1]) + 0, GPR (OP[0] + 0)); + SW (GPR (OP[1]) + 2, GPR (OP[0] + 1)); + INC_ADDR (OP[1], -4); + trace_output_void (); } /* stb */ @@ -2437,8 +2604,8 @@ void OP_3C000000 () { trace_input ("stb", OP_REG, OP_MEMREF2, OP_VOID); - SB (State.regs[OP[2]]+OP[1], State.regs[OP[0]]); - trace_output (OP_VOID); + SB (GPR (OP[2]) + OP[1], GPR (OP[0])); + trace_output_void (); } /* stb */ @@ -2446,8 +2613,8 @@ void OP_7800 () { trace_input ("stb", OP_REG, OP_MEMREF, OP_VOID); - SB (State.regs[OP[1]], State.regs[OP[0]]); - trace_output (OP_VOID); + SB (GPR (OP[1]), GPR (OP[0])); + trace_output_void (); } /* stop */ @@ -2456,22 +2623,22 @@ OP_5FE0 () { trace_input ("stop", OP_VOID, OP_VOID, OP_VOID); State.exception = SIG_D10V_STOP; - trace_output (OP_VOID); + trace_output_void (); } /* sub */ void OP_0 () { - uint16 tmp; - + uint16 a = GPR (OP[0]); + uint16 b = GPR (OP[1]); + uint16 tmp = (a - b); trace_input ("sub", OP_REG, OP_REG, OP_VOID); /* see ../common/sim-alu.h for a more extensive discussion on how to compute the carry/overflow bits. */ - tmp = State.regs[OP[0]] - State.regs[OP[1]]; - State.C = ((uint16) State.regs[OP[0]] >= (uint16) State.regs[OP[1]]); - State.regs[OP[0]] = tmp; - trace_output (OP_REG); + SET_PSW_C (a >= b); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* sub */ @@ -2481,20 +2648,21 @@ OP_1001 () int64 tmp; trace_input ("sub", OP_ACCUM, OP_DREG, OP_VOID); - tmp = SEXT40(State.a[OP[0]]) - (SEXT16 (State.regs[OP[1]]) << 16 | State.regs[OP[1]+1]); - if (State.ST) + tmp = SEXT40(ACC (OP[0])) - (SEXT16 (GPR (OP[1])) << 16 | GPR (OP[1] + 1)); + if (PSW_ST) { if ( tmp > MAX32) - State.a[OP[0]] = MAX32; + tmp = (MAX32); else if ( tmp < MIN32) - State.a[OP[0]] = MIN32; + tmp = (MIN32); else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); - trace_output (OP_ACCUM); + trace_output_40 (tmp); } /* sub */ @@ -2505,38 +2673,38 @@ OP_1003 () int64 tmp; trace_input ("sub", OP_ACCUM, OP_ACCUM, OP_VOID); - tmp = SEXT40(State.a[OP[0]]) - SEXT40(State.a[OP[1]]); - if (State.ST) + tmp = SEXT40(ACC (OP[0])) - SEXT40(ACC (OP[1])); + if (PSW_ST) { if (tmp > MAX32) - State.a[OP[0]] = MAX32; + tmp = (MAX32); else if ( tmp < MIN32) - State.a[OP[0]] = MIN32; + tmp = (MIN32); else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); } else - State.a[OP[0]] = tmp & MASK40; + tmp = (tmp & MASK40); + SET_ACC (OP[0], tmp); - trace_output (OP_ACCUM); + trace_output_40 (tmp); } /* sub2w */ void OP_1000 () { - uint32 tmp,a,b; + uint32 tmp, a, b; trace_input ("sub2w", OP_DREG, OP_DREG, OP_VOID); - a = (uint32)((State.regs[OP[0]] << 16) | State.regs[OP[0]+1]); - b = (uint32)((State.regs[OP[1]] << 16) | State.regs[OP[1]+1]); + a = (uint32)((GPR (OP[0]) << 16) | GPR (OP[0] + 1)); + b = (uint32)((GPR (OP[1]) << 16) | GPR (OP[1] + 1)); /* see ../common/sim-alu.h for a more extensive discussion on how to compute the carry/overflow bits */ tmp = a - b; - State.C = (a >= b); - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.regs[OP[0]+1] = tmp & 0xffff; - trace_output (OP_DREG); + SET_PSW_C (a >= b); + SET_GPR32 (OP[0], tmp); + trace_output_32 (tmp); } /* subac3 */ @@ -2546,10 +2714,9 @@ OP_17000000 () int64 tmp; trace_input ("subac3", OP_DREG_OUTPUT, OP_DREG, OP_ACCUM); - tmp = SEXT40 ((State.regs[OP[1]] << 16) | State.regs[OP[1]+1]) - SEXT40 (State.a[OP[2]]); - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.regs[OP[0]+1] = tmp & 0xffff; - trace_output (OP_DREG); + tmp = SEXT40 ((GPR (OP[1]) << 16) | GPR (OP[1] + 1)) - SEXT40 (ACC (OP[2])); + SET_GPR32 (OP[0], tmp); + trace_output_32 (tmp); } /* subac3 */ @@ -2559,10 +2726,9 @@ OP_17000002 () int64 tmp; trace_input ("subac3", OP_DREG_OUTPUT, OP_ACCUM, OP_ACCUM); - tmp = SEXT40(State.a[OP[1]]) - SEXT40(State.a[OP[2]]); - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.regs[OP[0]+1] = tmp & 0xffff; - trace_output (OP_DREG); + tmp = SEXT40 (ACC (OP[1])) - SEXT40(ACC (OP[2])); + SET_GPR32 (OP[0], tmp); + trace_output_32 (tmp); } /* subac3s */ @@ -2572,27 +2738,24 @@ OP_17001000 () int64 tmp; trace_input ("subac3s", OP_DREG_OUTPUT, OP_DREG, OP_ACCUM); - State.F1 = State.F0; - tmp = SEXT40 ((State.regs[OP[1]] << 16) | State.regs[OP[1]+1]) - SEXT40(State.a[OP[2]]); + SET_PSW_F1 (PSW_F0); + tmp = SEXT40 ((GPR (OP[1]) << 16) | GPR (OP[1] + 1)) - SEXT40(ACC (OP[2])); if ( tmp > MAX32) { - State.regs[OP[0]] = 0x7fff; - State.regs[OP[0]+1] = 0xffff; - State.F0 = 1; + tmp = 0x7fffffff; + SET_PSW_F0 (1); } else if (tmp < MIN32) { - State.regs[OP[0]] = 0x8000; - State.regs[OP[0]+1] = 0; - State.F0 = 1; + tmp = 0x80000000; + SET_PSW_F0 (1); } else { - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.regs[OP[0]+1] = tmp & 0xffff; - State.F0 = 0; + SET_PSW_F0 (0); } - trace_output (OP_DREG); + SET_GPR32 (OP[0], tmp); + trace_output_32 (tmp); } /* subac3s */ @@ -2602,27 +2765,24 @@ OP_17001002 () int64 tmp; trace_input ("subac3s", OP_DREG_OUTPUT, OP_ACCUM, OP_ACCUM); - State.F1 = State.F0; - tmp = SEXT40(State.a[OP[1]]) - SEXT40(State.a[OP[2]]); + SET_PSW_F1 (PSW_F0); + tmp = SEXT40(ACC (OP[1])) - SEXT40(ACC (OP[2])); if ( tmp > MAX32) { - State.regs[OP[0]] = 0x7fff; - State.regs[OP[0]+1] = 0xffff; - State.F0 = 1; + tmp = 0x7fffffff; + SET_PSW_F0 (1); } else if (tmp < MIN32) { - State.regs[OP[0]] = 0x8000; - State.regs[OP[0]+1] = 0; - State.F0 = 1; + tmp = 0x80000000; + SET_PSW_F0 (1); } else { - State.regs[OP[0]] = (tmp >> 16) & 0xffff; - State.regs[OP[0]+1] = tmp & 0xffff; - State.F0 = 0; + SET_PSW_F0 (0); } - trace_output (OP_DREG); + SET_GPR32 (OP[0], tmp); + trace_output_32 (tmp); } /* subi */ @@ -2637,11 +2797,11 @@ OP_1 () /* see ../common/sim-alu.h for a more extensive discussion on how to compute the carry/overflow bits. */ /* since OP[1] is never <= 0, -OP[1] == ~OP[1]+1 can never overflow */ - tmp = ((unsigned)(unsigned16) State.regs[OP[0]] + tmp = ((unsigned)(unsigned16) GPR (OP[0]) + (unsigned)(unsigned16) ( - OP[1])); - State.C = (tmp >= (1 << 16)); - State.regs[OP[0]] = tmp; - trace_output (OP_REG); + SET_PSW_C (tmp >= (1 << 16)); + SET_GPR (OP[0], tmp); + trace_output_16 (tmp); } /* trap */ @@ -2649,7 +2809,7 @@ void OP_5F00 () { trace_input ("trap", OP_CONSTANT4, OP_VOID, OP_VOID); - trace_output (OP_VOID); + trace_output_void (); switch (OP[0]) { @@ -2657,9 +2817,9 @@ OP_5F00 () #if (DEBUG & DEBUG_TRAP) == 0 { uint16 vec = OP[0] + TRAP_VECTOR_START; - BPC = PC + 1; - move_to_cr (BPSW_CR, PSW); - move_to_cr (PSW_CR, PSW & PSW_SM_BIT); + SET_BPC (PC + 1); + SET_BPSW (PSW); + SET_PSW (PSW & PSW_SM_BIT); JMP (vec); break; } @@ -2680,15 +2840,15 @@ OP_5F00 () (*d10v_callback->printf_filtered) (d10v_callback, "Trap %2d 0x%.4x:", (int)OP[0], (int)PC); for (i = 0; i < 16; i++) - (*d10v_callback->printf_filtered) (d10v_callback, " %.4x", (int) State.regs[i]); + (*d10v_callback->printf_filtered) (d10v_callback, " %.4x", (int) GPR (i)); for (i = 0; i < 2; i++) (*d10v_callback->printf_filtered) (d10v_callback, " %.2x%.8lx", - ((int)(State.a[i] >> 32) & 0xff), - ((unsigned long)State.a[i]) & 0xffffffff); + ((int)(ACC (i) >> 32) & 0xff), + ((unsigned long) ACC (i)) & 0xffffffff); (*d10v_callback->printf_filtered) (d10v_callback, " %d %d %d\n", - State.F0 != 0, State.F1 != 0, State.C != 0); + PSW_F0 != 0, PSW_F1 != 0, PSW_C != 0); (*d10v_callback->flush_stdout) (d10v_callback); break; } @@ -2696,22 +2856,22 @@ OP_5F00 () case 15: /* new system call trap */ /* Trap 15 is used for simulating low-level I/O */ { + unsigned32 result = 0; errno = 0; /* Registers passed to trap 0 */ -#define FUNC State.regs[4] /* function number */ -#define PARM1 State.regs[0] /* optional parm 1 */ -#define PARM2 State.regs[1] /* optional parm 2 */ -#define PARM3 State.regs[2] /* optional parm 3 */ -#define PARM4 State.regs[3] /* optional parm 3 */ +#define FUNC GPR (4) /* function number */ +#define PARM1 GPR (0) /* optional parm 1 */ +#define PARM2 GPR (1) /* optional parm 2 */ +#define PARM3 GPR (2) /* optional parm 3 */ +#define PARM4 GPR (3) /* optional parm 3 */ /* Registers set by trap 0 */ -#define RETVAL State.regs[0] /* return value */ -#define RETVAL_HIGH State.regs[0] /* return value */ -#define RETVAL_LOW State.regs[1] /* return value */ -#define RETERR State.regs[4] /* return error code */ +#define RETVAL(X) do { result = (X); SET_GPR (0, result); } while (0) +#define RETVAL32(X) do { result = (X); SET_GPR (0, result >> 16); SET_GPR (1, result); } while (0) +#define RETERR(X) SET_GPR (4, (X)) /* return error code */ /* Turn a pointer in a register into a pointer into real memory. */ @@ -2720,23 +2880,24 @@ OP_5F00 () switch (FUNC) { #if !defined(__GO32__) && !defined(_WIN32) - case SYS_fork: - RETVAL = fork (); + case TARGET_SYS_fork: trace_input ("", OP_VOID, OP_VOID, OP_VOID); - trace_output (OP_R0); + RETVAL (fork ()); + trace_output_16 (result); break; - case SYS_getpid: +#define getpid() 47 + case TARGET_SYS_getpid: trace_input ("", OP_VOID, OP_VOID, OP_VOID); - RETVAL = getpid (); - trace_output (OP_R0); + RETVAL (getpid ()); + trace_output_16 (result); break; - case SYS_kill: - trace_input ("", OP_REG, OP_REG, OP_VOID); + case TARGET_SYS_kill: + trace_input ("", OP_R0, OP_R1, OP_VOID); if (PARM1 == getpid ()) { - trace_output (OP_VOID); + trace_output_void (); State.exception = PARM2; } else @@ -2847,133 +3008,130 @@ OP_5F00 () if (os_sig == -1) { - trace_output (OP_VOID); + trace_output_void (); (*d10v_callback->printf_filtered) (d10v_callback, "Unknown signal %d\n", PARM2); (*d10v_callback->flush_stdout) (d10v_callback); State.exception = SIGILL; } else { - RETVAL = kill (PARM1, PARM2); - trace_output (OP_R0); + RETVAL (kill (PARM1, PARM2)); + trace_output_16 (result); } } break; - case SYS_execve: - RETVAL = execve (MEMPTR (PARM1), (char **) MEMPTR (PARM2), - (char **)MEMPTR (PARM3)); + case TARGET_SYS_execve: trace_input ("", OP_R0, OP_R1, OP_R2); - trace_output (OP_R0); + RETVAL (execve (MEMPTR (PARM1), (char **) MEMPTR (PARM2), + (char **)MEMPTR (PARM3))); + trace_output_16 (result); break; -#ifdef SYS_execv - case SYS_execv: - RETVAL = execve (MEMPTR (PARM1), (char **) MEMPTR (PARM2), NULL); +#ifdef TARGET_SYS_execv + case TARGET_SYS_execv: trace_input ("", OP_R0, OP_R1, OP_VOID); - trace_output (OP_R0); + RETVAL (execve (MEMPTR (PARM1), (char **) MEMPTR (PARM2), NULL)); + trace_output_16 (result); break; #endif - case SYS_pipe: + case TARGET_SYS_pipe: { reg_t buf; int host_fd[2]; + trace_input ("", OP_R0, OP_VOID, OP_VOID); buf = PARM1; - RETVAL = pipe (host_fd); + RETVAL (pipe (host_fd)); SW (buf, host_fd[0]); buf += sizeof(uint16); SW (buf, host_fd[1]); - trace_input ("", OP_R0, OP_VOID, OP_VOID); - trace_output (OP_R0); + trace_output_16 (result); } break; -#ifdef SYS_wait - case SYS_wait: +#if 0 +#ifdef TARGET_SYS_wait + case TARGET_SYS_wait: { int status; - - RETVAL = wait (&status); + trace_input ("", OP_R0, OP_VOID, OP_VOID); + RETVAL (wait (&status)); if (PARM1) SW (PARM1, status); - trace_input ("", OP_R0, OP_VOID, OP_VOID); - trace_output (OP_R0); + trace_output_16 (result); } break; #endif +#endif #else - case SYS_getpid: + case TARGET_SYS_getpid: trace_input ("", OP_VOID, OP_VOID, OP_VOID); - RETVAL = 1; - trace_output (OP_R0); + RETVAL (1); + trace_output_16 (result); break; - case SYS_kill: + case TARGET_SYS_kill: trace_input ("", OP_REG, OP_REG, OP_VOID); - trace_output (OP_VOID); + trace_output_void (); State.exception = PARM2; break; #endif - case SYS_read: - RETVAL = d10v_callback->read (d10v_callback, PARM1, MEMPTR (PARM2), - PARM3); + case TARGET_SYS_read: trace_input ("", OP_R0, OP_R1, OP_R2); - trace_output (OP_R0); + RETVAL (d10v_callback->read (d10v_callback, PARM1, MEMPTR (PARM2), + PARM3)); + trace_output_16 (result); break; - case SYS_write: + case TARGET_SYS_write: + trace_input ("", OP_R0, OP_R1, OP_R2); if (PARM1 == 1) - RETVAL = (int)d10v_callback->write_stdout (d10v_callback, - MEMPTR (PARM2), PARM3); + RETVAL ((int)d10v_callback->write_stdout (d10v_callback, + MEMPTR (PARM2), PARM3)); else - RETVAL = (int)d10v_callback->write (d10v_callback, PARM1, - MEMPTR (PARM2), PARM3); - trace_input ("", OP_R0, OP_R1, OP_R2); - trace_output (OP_R0); + RETVAL ((int)d10v_callback->write (d10v_callback, PARM1, + MEMPTR (PARM2), PARM3)); + trace_output_16 (result); break; - case SYS_lseek: - { - unsigned long ret = d10v_callback->lseek (d10v_callback, PARM1, - (((unsigned long)PARM2) << 16) || (unsigned long)PARM3, - PARM4); - RETVAL_HIGH = ret >> 16; - RETVAL_LOW = ret & 0xffff; - } + case TARGET_SYS_lseek: trace_input ("", OP_R0, OP_R1, OP_R2); - trace_output (OP_R0R1); + RETVAL32 (d10v_callback->lseek (d10v_callback, PARM1, + ((((unsigned long) PARM2) << 16) + || (unsigned long) PARM3), + PARM4)); + trace_output_32 (result); break; - case SYS_close: - RETVAL = d10v_callback->close (d10v_callback, PARM1); + case TARGET_SYS_close: trace_input ("", OP_R0, OP_VOID, OP_VOID); - trace_output (OP_R0); + RETVAL (d10v_callback->close (d10v_callback, PARM1)); + trace_output_16 (result); break; - case SYS_open: - RETVAL = d10v_callback->open (d10v_callback, MEMPTR (PARM1), PARM2); - trace_input ("", OP_R0, OP_R1, OP_R2); - trace_output (OP_R0); + case TARGET_SYS_open: trace_input ("", OP_R0, OP_R1, OP_R2); - trace_output (OP_R0); + RETVAL (d10v_callback->open (d10v_callback, MEMPTR (PARM1), PARM2)); + trace_output_16 (result); break; - case SYS_exit: - State.exception = SIG_D10V_EXIT; + case TARGET_SYS_exit: trace_input ("", OP_R0, OP_VOID, OP_VOID); - trace_output (OP_VOID); + State.exception = SIG_D10V_EXIT; + trace_output_void (); break; - case SYS_stat: + case TARGET_SYS_stat: + trace_input ("", OP_R0, OP_R1, OP_VOID); /* stat system call */ { struct stat host_stat; reg_t buf; - RETVAL = stat (MEMPTR (PARM1), &host_stat); + RETVAL (stat (MEMPTR (PARM1), &host_stat)); buf = PARM2; @@ -2992,48 +3150,50 @@ OP_5F00 () SLW (buf+28, host_stat.st_mtime); SLW (buf+36, host_stat.st_ctime); } - trace_input ("", OP_R0, OP_R1, OP_VOID); - trace_output (OP_R0); + trace_output_16 (result); break; - case SYS_chown: - RETVAL = chown (MEMPTR (PARM1), PARM2, PARM3); + case TARGET_SYS_chown: trace_input ("", OP_R0, OP_R1, OP_R2); - trace_output (OP_R0); + RETVAL (chown (MEMPTR (PARM1), PARM2, PARM3)); + trace_output_16 (result); break; - case SYS_chmod: - RETVAL = chmod (MEMPTR (PARM1), PARM2); + case TARGET_SYS_chmod: trace_input ("", OP_R0, OP_R1, OP_R2); - trace_output (OP_R0); + RETVAL (chmod (MEMPTR (PARM1), PARM2)); + trace_output_16 (result); break; -#ifdef SYS_utime - case SYS_utime: +#if 0 +#ifdef TARGET_SYS_utime + case TARGET_SYS_utime: + trace_input ("", OP_R0, OP_R1, OP_R2); /* Cast the second argument to void *, to avoid type mismatch if a prototype is present. */ - RETVAL = utime (MEMPTR (PARM1), (void *) MEMPTR (PARM2)); - trace_input ("", OP_R0, OP_R1, OP_R2); - trace_output (OP_R0); + RETVAL (utime (MEMPTR (PARM1), (void *) MEMPTR (PARM2))); + trace_output_16 (result); break; #endif +#endif -#ifdef SYS_time - case SYS_time: - { - unsigned long ret = time (PARM1 ? MEMPTR (PARM1) : NULL); - RETVAL_HIGH = ret >> 16; - RETVAL_LOW = ret & 0xffff; - } +#if 0 +#ifdef TARGET_SYS_time + case TARGET_SYS_time: trace_input ("