c76b4bab30
* am33-2.igen (fmadd, fmsub, fmnadd, fmnsub): Correct typo. 2000-05-29 Alexandre Oliva <aoliva@cygnus.com> * interp.c (fpu_disabled_exception, fpu_unimp_exception, fpu_check_signal_exception): Take additional state arguments. Print exception type and call program_interrupt. Adjust callers. (fpu_rsqrt, fpu_cmp, fpu_add, fpu_sub, fpu_mul, fpu_div, fpu_fmadd, fpu_fmsub, fpu_fnmadd, fpu_fnmsub): Take additional arguments. * mn10300_sim.h (fpu_disabled_exception, fpu_unimp_exception, fpu_check_signal_exception): Adjust prototypes. (fpu_rsqrt, fpu_cmp, fpu_add, fpu_sub, fpu_mul, fpu_div, fpu_fmadd, fpu_fmsub, fpu_fnmadd, fpu_fnmsub): Likewise. * am33-2.igen: Adjust calls. 2000-05-19 Alexandre Oliva <aoliva@cygnus.com> * op_utils.c (cmp2fcc): Moved... * interp.c: ... here. 2000-05-18 Alexandre Oliva <aoliva@cygnus.com> * am33-2.igen: Use `unsigned32', `signed32', `unsigned64' or `signed64' where type width is relevant. 2000-05-15 Alexandre Oliva <aoliva@cygnus.com> * mn10300_sim.h: Include sim-fpu.h. (FD2FPU, FPU2FD): Enclose the FD argument in parentheses. (fpu_check_signal_exception): Declare. (struct fp_prec_t, fp_single_prec, fp_double_prec): Likewise. (FP_SINGLE, FP_DOUBLE): Shorthands for fp_*_prec. (fpu_rsqrt, fpu_cmp, fpu_add, fpu_sub, fpu_mul, fpu_div, fpu_fmadd, fpu_fmsub, fpu_fnmadd, fpu_fnmsub): Declare. * interp.c (fpu_disabled_exception): Document. (fpu_unimp_exception): Likewise. (fpu_check_signal_exception): Define. (reg2val_32, round_32, val2reg_32, fp_single_prec): Likewise. (reg2val_64, round_64, val2reg_64, fp_double_prec): Likewise. (REG2VAL, ROUND, VAL2REG): Define shorthands. (fpu_status_ok): Define. (fpu_rsqrt, fpu_cmp, fpu_add, fpu_sub, fpu_mul, fpu_div, fpu_fmadd, fpu_fmsub, fpu_fnmadd, fpu_fnmsub): Define. * am33-2.igen (frsqrt, fcmp, fadd, fsub, fmul, fdiv, fmadd, fmsub, fnmadd, fnmsub): Use new functions. 2000-04-27 Alexandre Oliva <aoliva@cygnus.com> * interp.c (sim_create_inferior): Set PSW bit to enable FP insns if architecture is AM33/2.0. * am33.igen: Include am33-2.igen. 2000-04-23 Alexandre Oliva <aoliva@cygnus.com> * mn10300.igen (movm, call, ret, retf): Check for am33_2 too. * am33.igen (movm): Likewise. 2000-04-19 Alexandre Oliva <aoliva@cygnus.com> * am33.igen: Added `*am33_2' to some instructions that were missing it. 2000-04-07 Alexandre Oliva <aoliva@cygnus.com> * am33-2.igen: New file. All insns implemented, but FP flags are only set for fcmp, exceptional conditions are not handled yet. * Makefile.in (IGEN_INSN): Added am33-2.igen. (tmp-igen): Added -M am33_2. * mn10300.igen, am33.igen: Added `*am33_2' to all insns. * gencode.c: Support FMT_D3. * mn10300_sim.h (dword): New type. (struct _state): Added fpregs. (REG_FPCR, FPCR): New define. All assorted bitmaps. (XS2FS, AS2FS, Xf2FD): New macros. (FS2FPU, FD2FPU, FPU2FS, FPU2FD): Likewise. (load_dword, store_dword): New functions or macros. (u642dw, dw2u64): New functions. (fpu_disabled_exception, fpu_unimp_exception): Declared. * interp.c (fpu_disabled_exception): Defined; no actual implementation. (fpu_unimp_exception): Likewise. * op_utils.c (cmp2fcc): New function.
300 lines
8.3 KiB
C
300 lines
8.3 KiB
C
#include <stdio.h>
|
|
#include <ctype.h>
|
|
#include "ansidecl.h"
|
|
#include "gdb/callback.h"
|
|
#include "opcode/mn10300.h"
|
|
#include <limits.h>
|
|
#include "gdb/remote-sim.h"
|
|
#include "bfd.h"
|
|
#include "sim-fpu.h"
|
|
|
|
#ifndef INLINE
|
|
#ifdef __GNUC__
|
|
#define INLINE inline
|
|
#else
|
|
#define INLINE
|
|
#endif
|
|
#endif
|
|
|
|
extern host_callback *mn10300_callback;
|
|
extern SIM_DESC simulator;
|
|
|
|
#define DEBUG_TRACE 0x00000001
|
|
#define DEBUG_VALUES 0x00000002
|
|
|
|
extern int mn10300_debug;
|
|
|
|
#if UCHAR_MAX == 255
|
|
typedef unsigned char uint8;
|
|
typedef signed char int8;
|
|
#else
|
|
#error "Char is not an 8-bit type"
|
|
#endif
|
|
|
|
#if SHRT_MAX == 32767
|
|
typedef unsigned short uint16;
|
|
typedef signed short int16;
|
|
#else
|
|
#error "Short is not a 16-bit type"
|
|
#endif
|
|
|
|
#if INT_MAX == 2147483647
|
|
|
|
typedef unsigned int uint32;
|
|
typedef signed int int32;
|
|
|
|
#else
|
|
# if LONG_MAX == 2147483647
|
|
|
|
typedef unsigned long uint32;
|
|
typedef signed long int32;
|
|
|
|
# else
|
|
# error "Neither int nor long is a 32-bit type"
|
|
# endif
|
|
#endif
|
|
|
|
typedef struct
|
|
{
|
|
uint32 low, high;
|
|
} dword;
|
|
typedef uint32 reg_t;
|
|
|
|
struct simops
|
|
{
|
|
long opcode;
|
|
long mask;
|
|
void (*func)();
|
|
int length;
|
|
int format;
|
|
int numops;
|
|
int operands[16];
|
|
};
|
|
|
|
/* The current state of the processor; registers, memory, etc. */
|
|
|
|
struct _state
|
|
{
|
|
reg_t regs[32]; /* registers, d0-d3, a0-a3, sp, pc, mdr, psw,
|
|
lir, lar, mdrq, plus some room for processor
|
|
specific regs. */
|
|
union
|
|
{
|
|
reg_t fs[32]; /* FS0-31 */
|
|
dword fd[16]; /* FD0,2,...,30 */
|
|
} fpregs;
|
|
uint8 *mem; /* main memory */
|
|
int exception;
|
|
int exited;
|
|
|
|
/* All internal state modified by signal_exception() that may need to be
|
|
rolled back for passing moment-of-exception image back to gdb. */
|
|
reg_t exc_trigger_regs[32];
|
|
reg_t exc_suspend_regs[32];
|
|
int exc_suspended;
|
|
|
|
#define SIM_CPU_EXCEPTION_TRIGGER(SD,CPU,CIA) mn10300_cpu_exception_trigger(SD,CPU,CIA)
|
|
#define SIM_CPU_EXCEPTION_SUSPEND(SD,CPU,EXC) mn10300_cpu_exception_suspend(SD,CPU,EXC)
|
|
#define SIM_CPU_EXCEPTION_RESUME(SD,CPU,EXC) mn10300_cpu_exception_resume(SD,CPU,EXC)
|
|
};
|
|
|
|
extern struct _state State;
|
|
extern uint32 OP[4];
|
|
extern struct simops Simops[];
|
|
|
|
#define PC (State.regs[REG_PC])
|
|
#define SP (State.regs[REG_SP])
|
|
|
|
#define PSW (State.regs[11])
|
|
#define PSW_Z 0x1
|
|
#define PSW_N 0x2
|
|
#define PSW_C 0x4
|
|
#define PSW_V 0x8
|
|
#define PSW_IE LSBIT (11)
|
|
#define PSW_LM LSMASK (10, 8)
|
|
|
|
#define EXTRACT_PSW_LM LSEXTRACTED16 (PSW, 10, 8)
|
|
#define INSERT_PSW_LM(l) LSINSERTED16 ((l), 10, 8)
|
|
|
|
#define REG_D0 0
|
|
#define REG_A0 4
|
|
#define REG_SP 8
|
|
#define REG_PC 9
|
|
#define REG_MDR 10
|
|
#define REG_PSW 11
|
|
#define REG_LIR 12
|
|
#define REG_LAR 13
|
|
#define REG_MDRQ 14
|
|
#define REG_E0 15
|
|
#define REG_SSP 23
|
|
#define REG_MSP 24
|
|
#define REG_USP 25
|
|
#define REG_MCRH 26
|
|
#define REG_MCRL 27
|
|
#define REG_MCVF 28
|
|
|
|
#define REG_FPCR 29
|
|
|
|
#define FPCR (State.regs[REG_FPCR])
|
|
|
|
#define FCC_MASK LSMASK (21, 18)
|
|
#define RM_MASK LSMASK (17, 16) /* Must always be zero. */
|
|
#define EC_MASK LSMASK (14, 10)
|
|
#define EE_MASK LSMASK ( 9, 5)
|
|
#define EF_MASK LSMASK ( 4, 0)
|
|
#define FPCR_MASK (FCC_MASK | EC_MASK | EE_MASK | EF_MASK)
|
|
|
|
#define FCC_L LSBIT (21)
|
|
#define FCC_G LSBIT (20)
|
|
#define FCC_E LSBIT (19)
|
|
#define FCC_U LSBIT (18)
|
|
|
|
#define EC_V LSBIT (14)
|
|
#define EC_Z LSBIT (13)
|
|
#define EC_O LSBIT (12)
|
|
#define EC_U LSBIT (11)
|
|
#define EC_I LSBIT (10)
|
|
|
|
#define EE_V LSBIT (9)
|
|
#define EE_Z LSBIT (8)
|
|
#define EE_O LSBIT (7)
|
|
#define EE_U LSBIT (6)
|
|
#define EE_I LSBIT (5)
|
|
|
|
#define EF_V LSBIT (4)
|
|
#define EF_Z LSBIT (3)
|
|
#define EF_O LSBIT (2)
|
|
#define EF_U LSBIT (1)
|
|
#define EF_I LSBIT (0)
|
|
|
|
#define PSW_FE LSBIT(20)
|
|
#define FPU_DISABLED !(PSW & PSW_FE)
|
|
|
|
#define XS2FS(X,S) State.fpregs.fs[((X<<4)|(S))]
|
|
#define AS2FS(A,S) State.fpregs.fs[((A<<2)|(S))]
|
|
#define Xf2FD(X,f) State.fpregs.fd[((X<<3)|(f))]
|
|
|
|
#define FS2FPU(FS,F) sim_fpu_32to (&(F), (FS))
|
|
#define FD2FPU(FD,F) sim_fpu_232to (&(F), ((FD).high), ((FD).low))
|
|
#define FPU2FS(F,FS) sim_fpu_to32 (&(FS), &(F))
|
|
#define FPU2FD(F,FD) sim_fpu_to232 (&((FD).high), &((FD).low), &(F))
|
|
|
|
#ifdef _WIN32
|
|
#define SIGTRAP 5
|
|
#define SIGQUIT 3
|
|
#endif
|
|
|
|
#define FETCH32(a,b,c,d) \
|
|
((a)+((b)<<8)+((c)<<16)+((d)<<24))
|
|
|
|
#define FETCH24(a,b,c) \
|
|
((a)+((b)<<8)+((c)<<16))
|
|
|
|
#define FETCH16(a,b) ((a)+((b)<<8))
|
|
|
|
#define load_byte(ADDR) \
|
|
sim_core_read_unaligned_1 (STATE_CPU (simulator, 0), PC, read_map, (ADDR))
|
|
|
|
#define load_half(ADDR) \
|
|
sim_core_read_unaligned_2 (STATE_CPU (simulator, 0), PC, read_map, (ADDR))
|
|
|
|
#define load_word(ADDR) \
|
|
sim_core_read_unaligned_4 (STATE_CPU (simulator, 0), PC, read_map, (ADDR))
|
|
|
|
#define load_dword(ADDR) \
|
|
u642dw (sim_core_read_unaligned_8 (STATE_CPU (simulator, 0), \
|
|
PC, read_map, (ADDR)))
|
|
|
|
static INLINE dword
|
|
u642dw (unsigned64 dw)
|
|
{
|
|
dword r;
|
|
|
|
r.low = (unsigned32)dw;
|
|
r.high = (unsigned32)(dw >> 32);
|
|
return r;
|
|
}
|
|
|
|
#define store_byte(ADDR, DATA) \
|
|
sim_core_write_unaligned_1 (STATE_CPU (simulator, 0), \
|
|
PC, write_map, (ADDR), (DATA))
|
|
|
|
|
|
#define store_half(ADDR, DATA) \
|
|
sim_core_write_unaligned_2 (STATE_CPU (simulator, 0), \
|
|
PC, write_map, (ADDR), (DATA))
|
|
|
|
|
|
#define store_word(ADDR, DATA) \
|
|
sim_core_write_unaligned_4 (STATE_CPU (simulator, 0), \
|
|
PC, write_map, (ADDR), (DATA))
|
|
#define store_dword(ADDR, DATA) \
|
|
sim_core_write_unaligned_8 (STATE_CPU (simulator, 0), \
|
|
PC, write_map, (ADDR), dw2u64 (DATA))
|
|
|
|
static INLINE unsigned64
|
|
dw2u64 (dword data)
|
|
{
|
|
return data.low | (((unsigned64)data.high) << 32);
|
|
}
|
|
|
|
/* Function declarations. */
|
|
|
|
uint32 get_word (uint8 *);
|
|
uint16 get_half (uint8 *);
|
|
uint8 get_byte (uint8 *);
|
|
void put_word (uint8 *, uint32);
|
|
void put_half (uint8 *, uint16);
|
|
void put_byte (uint8 *, uint8);
|
|
|
|
extern uint8 *map (SIM_ADDR addr);
|
|
|
|
INLINE_SIM_MAIN (void) genericAdd (unsigned32 source, unsigned32 destReg);
|
|
INLINE_SIM_MAIN (void) genericSub (unsigned32 source, unsigned32 destReg);
|
|
INLINE_SIM_MAIN (void) genericCmp (unsigned32 leftOpnd, unsigned32 rightOpnd);
|
|
INLINE_SIM_MAIN (void) genericOr (unsigned32 source, unsigned32 destReg);
|
|
INLINE_SIM_MAIN (void) genericXor (unsigned32 source, unsigned32 destReg);
|
|
INLINE_SIM_MAIN (void) genericBtst (unsigned32 leftOpnd, unsigned32 rightOpnd);
|
|
INLINE_SIM_MAIN (int) syscall_read_mem (host_callback *cb,
|
|
struct cb_syscall *sc,
|
|
unsigned long taddr,
|
|
char *buf,
|
|
int bytes);
|
|
INLINE_SIM_MAIN (int) syscall_write_mem (host_callback *cb,
|
|
struct cb_syscall *sc,
|
|
unsigned long taddr,
|
|
const char *buf,
|
|
int bytes);
|
|
INLINE_SIM_MAIN (void) do_syscall (void);
|
|
void program_interrupt (SIM_DESC sd, sim_cpu *cpu, sim_cia cia, SIM_SIGNAL sig);
|
|
|
|
void mn10300_cpu_exception_trigger(SIM_DESC sd, sim_cpu* cpu, address_word pc);
|
|
void mn10300_cpu_exception_suspend(SIM_DESC sd, sim_cpu* cpu, int exception);
|
|
void mn10300_cpu_exception_resume(SIM_DESC sd, sim_cpu* cpu, int exception);
|
|
|
|
void fpu_disabled_exception (SIM_DESC, sim_cpu *, address_word);
|
|
void fpu_unimp_exception (SIM_DESC, sim_cpu *, address_word);
|
|
void fpu_check_signal_exception (SIM_DESC, sim_cpu *, address_word);
|
|
|
|
extern const struct fp_prec_t
|
|
{
|
|
void (* reg2val) (const void *, sim_fpu *);
|
|
int (* round) (sim_fpu *);
|
|
void (* val2reg) (const sim_fpu *, void *);
|
|
} fp_single_prec, fp_double_prec;
|
|
|
|
#define FP_SINGLE (&fp_single_prec)
|
|
#define FP_DOUBLE (&fp_double_prec)
|
|
|
|
void fpu_rsqrt (SIM_DESC, sim_cpu *, address_word, const void *, void *, const struct fp_prec_t *);
|
|
void fpu_sqrt (SIM_DESC, sim_cpu *, address_word, const void *, void *, const struct fp_prec_t *);
|
|
void fpu_cmp (SIM_DESC, sim_cpu *, address_word, const void *, const void *, const struct fp_prec_t *);
|
|
void fpu_add (SIM_DESC, sim_cpu *, address_word, const void *, const void *, void *, const struct fp_prec_t *);
|
|
void fpu_sub (SIM_DESC, sim_cpu *, address_word, const void *, const void *, void *, const struct fp_prec_t *);
|
|
void fpu_mul (SIM_DESC, sim_cpu *, address_word, const void *, const void *, void *, const struct fp_prec_t *);
|
|
void fpu_div (SIM_DESC, sim_cpu *, address_word, const void *, const void *, void *, const struct fp_prec_t *);
|
|
void fpu_fmadd (SIM_DESC, sim_cpu *, address_word, const void *, const void *, const void *, void *, const struct fp_prec_t *);
|
|
void fpu_fmsub (SIM_DESC, sim_cpu *, address_word, const void *, const void *, const void *, void *, const struct fp_prec_t *);
|
|
void fpu_fnmadd (SIM_DESC, sim_cpu *, address_word, const void *, const void *, const void *, void *, const struct fp_prec_t *);
|
|
void fpu_fnmsub (SIM_DESC, sim_cpu *, address_word, const void *, const void *, const void *, void *, const struct fp_prec_t *);
|