[deliverable/binutils-gdb.git] / sim / mn10300 / mn10300_sim.h

#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"

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 *);
Commit	Line	Data
c906108c SS	1	#include <stdio.h>
	2	#include <ctype.h>
	3	#include "ansidecl.h"
3c25f8c7	4	#include "gdb/callback.h"
c906108c SS	5	#include "opcode/mn10300.h"
c906108c SS	6	#include <limits.h>
3c25f8c7	7	#include "gdb/remote-sim.h"
c906108c	8	#include "bfd.h"
c76b4bab	9	#include "sim-fpu.h"
c906108c	10
c906108c SS	11	extern host_callback *mn10300_callback;
	12	extern SIM_DESC simulator;
	13
	14	#define DEBUG_TRACE 0x00000001
	15	#define DEBUG_VALUES 0x00000002
	16
	17	extern int mn10300_debug;
	18
	19	#if UCHAR_MAX == 255
	20	typedef unsigned char uint8;
	21	typedef signed char int8;
	22	#else
	23	#error "Char is not an 8-bit type"
	24	#endif
	25
	26	#if SHRT_MAX == 32767
	27	typedef unsigned short uint16;
	28	typedef signed short int16;
	29	#else
	30	#error "Short is not a 16-bit type"
	31	#endif
	32
	33	#if INT_MAX == 2147483647
	34
	35	typedef unsigned int uint32;
	36	typedef signed int int32;
	37
	38	#else
	39	# if LONG_MAX == 2147483647
	40
	41	typedef unsigned long uint32;
	42	typedef signed long int32;
	43
	44	# else
	45	# error "Neither int nor long is a 32-bit type"
	46	# endif
	47	#endif
	48
c76b4bab AO	49	typedef struct
	50	{
	51	uint32 low, high;
	52	} dword;
c906108c SS	53	typedef uint32 reg_t;
	54
	55	struct simops
	56	{
	57	long opcode;
	58	long mask;
	59	void (*func)();
	60	int length;
	61	int format;
	62	int numops;
	63	int operands[16];
	64	};
	65
	66	/* The current state of the processor; registers, memory, etc. */
	67
	68	struct _state
	69	{
	70	reg_t regs[32]; /* registers, d0-d3, a0-a3, sp, pc, mdr, psw,
	71	lir, lar, mdrq, plus some room for processor
	72	specific regs. */
c76b4bab AO	73	union
	74	{
	75	reg_t fs[32]; /* FS0-31 */
	76	dword fd[16]; /* FD0,2,...,30 */
	77	} fpregs;
c906108c SS	78	uint8 mem; / main memory */
	79	int exception;
	80	int exited;
	81
	82	/* All internal state modified by signal_exception() that may need to be
	83	rolled back for passing moment-of-exception image back to gdb. */
	84	reg_t exc_trigger_regs[32];
	85	reg_t exc_suspend_regs[32];
	86	int exc_suspended;
	87
	88	#define SIM_CPU_EXCEPTION_TRIGGER(SD,CPU,CIA) mn10300_cpu_exception_trigger(SD,CPU,CIA)
	89	#define SIM_CPU_EXCEPTION_SUSPEND(SD,CPU,EXC) mn10300_cpu_exception_suspend(SD,CPU,EXC)
	90	#define SIM_CPU_EXCEPTION_RESUME(SD,CPU,EXC) mn10300_cpu_exception_resume(SD,CPU,EXC)
	91	};
	92
	93	extern struct _state State;
	94	extern uint32 OP[4];
	95	extern struct simops Simops[];
	96
	97	#define PC (State.regs[REG_PC])
	98	#define SP (State.regs[REG_SP])
	99
	100	#define PSW (State.regs[11])
	101	#define PSW_Z 0x1
	102	#define PSW_N 0x2
	103	#define PSW_C 0x4
	104	#define PSW_V 0x8
	105	#define PSW_IE LSBIT (11)
	106	#define PSW_LM LSMASK (10, 8)
	107
	108	#define EXTRACT_PSW_LM LSEXTRACTED16 (PSW, 10, 8)
	109	#define INSERT_PSW_LM(l) LSINSERTED16 ((l), 10, 8)
	110
	111	#define REG_D0 0
	112	#define REG_A0 4
	113	#define REG_SP 8
	114	#define REG_PC 9
	115	#define REG_MDR 10
	116	#define REG_PSW 11
	117	#define REG_LIR 12
	118	#define REG_LAR 13
	119	#define REG_MDRQ 14
c2d11a7d JM	120	#define REG_E0 15
	121	#define REG_SSP 23
	122	#define REG_MSP 24
	123	#define REG_USP 25
	124	#define REG_MCRH 26
	125	#define REG_MCRL 27
	126	#define REG_MCVF 28
c906108c	127
c76b4bab AO	128	#define REG_FPCR 29
	129
	130	#define FPCR (State.regs[REG_FPCR])
	131
	132	#define FCC_MASK LSMASK (21, 18)
	133	#define RM_MASK LSMASK (17, 16) /* Must always be zero. */
	134	#define EC_MASK LSMASK (14, 10)
	135	#define EE_MASK LSMASK ( 9, 5)
	136	#define EF_MASK LSMASK ( 4, 0)
	137	#define FPCR_MASK (FCC_MASK \| EC_MASK \| EE_MASK \| EF_MASK)
	138
	139	#define FCC_L LSBIT (21)
	140	#define FCC_G LSBIT (20)
	141	#define FCC_E LSBIT (19)
	142	#define FCC_U LSBIT (18)
	143
	144	#define EC_V LSBIT (14)
	145	#define EC_Z LSBIT (13)
	146	#define EC_O LSBIT (12)
	147	#define EC_U LSBIT (11)
	148	#define EC_I LSBIT (10)
	149
	150	#define EE_V LSBIT (9)
	151	#define EE_Z LSBIT (8)
	152	#define EE_O LSBIT (7)
	153	#define EE_U LSBIT (6)
	154	#define EE_I LSBIT (5)
	155
	156	#define EF_V LSBIT (4)
	157	#define EF_Z LSBIT (3)
	158	#define EF_O LSBIT (2)
	159	#define EF_U LSBIT (1)
	160	#define EF_I LSBIT (0)
	161
	162	#define PSW_FE LSBIT(20)
	163	#define FPU_DISABLED !(PSW & PSW_FE)
	164
	165	#define XS2FS(X,S) State.fpregs.fs[((X<<4)\|(S))]
	166	#define AS2FS(A,S) State.fpregs.fs[((A<<2)\|(S))]
	167	#define Xf2FD(X,f) State.fpregs.fd[((X<<3)\|(f))]
	168
	169	#define FS2FPU(FS,F) sim_fpu_32to (&(F), (FS))
	170	#define FD2FPU(FD,F) sim_fpu_232to (&(F), ((FD).high), ((FD).low))
	171	#define FPU2FS(F,FS) sim_fpu_to32 (&(FS), &(F))
	172	#define FPU2FD(F,FD) sim_fpu_to232 (&((FD).high), &((FD).low), &(F))
	173
c906108c SS	174	#ifdef _WIN32
	175	#define SIGTRAP 5
	176	#define SIGQUIT 3
	177	#endif
	178
c906108c SS	179	#define FETCH32(a,b,c,d) \
	180	((a)+((b)<<8)+((c)<<16)+((d)<<24))
	181
	182	#define FETCH24(a,b,c) \
	183	((a)+((b)<<8)+((c)<<16))
	184
	185	#define FETCH16(a,b) ((a)+((b)<<8))
	186
	187	#define load_byte(ADDR) \
	188	sim_core_read_unaligned_1 (STATE_CPU (simulator, 0), PC, read_map, (ADDR))
	189
	190	#define load_half(ADDR) \
	191	sim_core_read_unaligned_2 (STATE_CPU (simulator, 0), PC, read_map, (ADDR))
	192
	193	#define load_word(ADDR) \
	194	sim_core_read_unaligned_4 (STATE_CPU (simulator, 0), PC, read_map, (ADDR))
	195
c76b4bab AO	196	#define load_dword(ADDR) \
	197	u642dw (sim_core_read_unaligned_8 (STATE_CPU (simulator, 0), \
	198	PC, read_map, (ADDR)))
	199
	200	static INLINE dword
	201	u642dw (unsigned64 dw)
	202	{
	203	dword r;
	204
	205	r.low = (unsigned32)dw;
	206	r.high = (unsigned32)(dw >> 32);
	207	return r;
	208	}
	209
c906108c SS	210	#define store_byte(ADDR, DATA) \
	211	sim_core_write_unaligned_1 (STATE_CPU (simulator, 0), \
	212	PC, write_map, (ADDR), (DATA))
	213
	214
	215	#define store_half(ADDR, DATA) \
	216	sim_core_write_unaligned_2 (STATE_CPU (simulator, 0), \
	217	PC, write_map, (ADDR), (DATA))
	218
	219
	220	#define store_word(ADDR, DATA) \
	221	sim_core_write_unaligned_4 (STATE_CPU (simulator, 0), \
	222	PC, write_map, (ADDR), (DATA))
c76b4bab AO	223	#define store_dword(ADDR, DATA) \
	224	sim_core_write_unaligned_8 (STATE_CPU (simulator, 0), \
	225	PC, write_map, (ADDR), dw2u64 (DATA))
	226
	227	static INLINE unsigned64
	228	dw2u64 (dword data)
	229	{
	230	return data.low \| (((unsigned64)data.high) << 32);
	231	}
c906108c SS	232
	233	/* Function declarations. */
	234
489503ee AO	235	uint32 get_word (uint8 *);
	236	uint16 get_half (uint8 *);
	237	uint8 get_byte (uint8 *);
	238	void put_word (uint8 *, uint32);
	239	void put_half (uint8 *, uint16);
	240	void put_byte (uint8 *, uint8);
	241
	242	extern uint8 *map (SIM_ADDR addr);
	243
	244	INLINE_SIM_MAIN (void) genericAdd (unsigned32 source, unsigned32 destReg);
	245	INLINE_SIM_MAIN (void) genericSub (unsigned32 source, unsigned32 destReg);
	246	INLINE_SIM_MAIN (void) genericCmp (unsigned32 leftOpnd, unsigned32 rightOpnd);
	247	INLINE_SIM_MAIN (void) genericOr (unsigned32 source, unsigned32 destReg);
	248	INLINE_SIM_MAIN (void) genericXor (unsigned32 source, unsigned32 destReg);
	249	INLINE_SIM_MAIN (void) genericBtst (unsigned32 leftOpnd, unsigned32 rightOpnd);
	250	INLINE_SIM_MAIN (int) syscall_read_mem (host_callback *cb,
	251	struct cb_syscall *sc,
	252	unsigned long taddr,
	253	char *buf,
	254	int bytes);
	255	INLINE_SIM_MAIN (int) syscall_write_mem (host_callback *cb,
	256	struct cb_syscall *sc,
	257	unsigned long taddr,
	258	const char *buf,
	259	int bytes);
	260	INLINE_SIM_MAIN (void) do_syscall (void);
c906108c SS	261	void program_interrupt (SIM_DESC sd, sim_cpu *cpu, sim_cia cia, SIM_SIGNAL sig);
	262
	263	void mn10300_cpu_exception_trigger(SIM_DESC sd, sim_cpu* cpu, address_word pc);
	264	void mn10300_cpu_exception_suspend(SIM_DESC sd, sim_cpu* cpu, int exception);
	265	void mn10300_cpu_exception_resume(SIM_DESC sd, sim_cpu* cpu, int exception);
c76b4bab AO	266
	267	void fpu_disabled_exception (SIM_DESC, sim_cpu *, address_word);
	268	void fpu_unimp_exception (SIM_DESC, sim_cpu *, address_word);
	269	void fpu_check_signal_exception (SIM_DESC, sim_cpu *, address_word);
	270
	271	extern const struct fp_prec_t
	272	{
	273	void (* reg2val) (const void , sim_fpu );
	274	int (* round) (sim_fpu *);
	275	void (* val2reg) (const sim_fpu , void );
	276	} fp_single_prec, fp_double_prec;
	277
	278	#define FP_SINGLE (&fp_single_prec)
	279	#define FP_DOUBLE (&fp_double_prec)
	280
	281	void fpu_rsqrt (SIM_DESC, sim_cpu , address_word, const void , void , const struct fp_prec_t );
	282	void fpu_sqrt (SIM_DESC, sim_cpu , address_word, const void , void , const struct fp_prec_t );
	283	void fpu_cmp (SIM_DESC, sim_cpu , address_word, const void , const void , const struct fp_prec_t );
	284	void fpu_add (SIM_DESC, sim_cpu , address_word, const void , const void , void , const struct fp_prec_t *);
	285	void fpu_sub (SIM_DESC, sim_cpu , address_word, const void , const void , void , const struct fp_prec_t *);
	286	void fpu_mul (SIM_DESC, sim_cpu , address_word, const void , const void , void , const struct fp_prec_t *);
	287	void fpu_div (SIM_DESC, sim_cpu , address_word, const void , const void , void , const struct fp_prec_t *);
	288	void fpu_fmadd (SIM_DESC, sim_cpu , address_word, const void , const void , const void , void , const struct fp_prec_t );
	289	void fpu_fmsub (SIM_DESC, sim_cpu , address_word, const void , const void , const void , void , const struct fp_prec_t );
	290	void fpu_fnmadd (SIM_DESC, sim_cpu , address_word, const void , const void , const void , void , const struct fp_prec_t );
	291	void fpu_fnmsub (SIM_DESC, sim_cpu , address_word, const void , const void , const void , void , const struct fp_prec_t );