480 lines
13 KiB
C
480 lines
13 KiB
C
/* Simulation code for the CR16 processor.
|
|
Copyright (C) 2008-2015 Free Software Foundation, Inc.
|
|
Contributed by M Ranga Swami Reddy <MR.Swami.Reddy@nsc.com>
|
|
|
|
This file is part of GDB, the GNU debugger.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 3, or (at your option)
|
|
any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
|
|
|
|
|
#include "config.h"
|
|
#include <stdio.h>
|
|
#include <ctype.h>
|
|
#include <limits.h>
|
|
#include "ansidecl.h"
|
|
#include "gdb/callback.h"
|
|
#include "opcode/cr16.h"
|
|
#include "bfd.h"
|
|
|
|
#define DEBUG_TRACE 0x00000001
|
|
#define DEBUG_VALUES 0x00000002
|
|
#define DEBUG_LINE_NUMBER 0x00000004
|
|
#define DEBUG_MEMSIZE 0x00000008
|
|
#define DEBUG_INSTRUCTION 0x00000010
|
|
#define DEBUG_TRAP 0x00000020
|
|
#define DEBUG_MEMORY 0x00000040
|
|
|
|
#ifndef DEBUG
|
|
#define DEBUG (DEBUG_TRACE | DEBUG_VALUES | DEBUG_LINE_NUMBER)
|
|
#endif
|
|
|
|
extern int cr16_debug;
|
|
|
|
#include "gdb/remote-sim.h"
|
|
#include "sim-config.h"
|
|
#include "sim-types.h"
|
|
|
|
typedef unsigned8 uint8;
|
|
typedef signed8 int8;
|
|
typedef unsigned16 uint16;
|
|
typedef signed16 int16;
|
|
typedef unsigned32 uint32;
|
|
typedef signed32 int32;
|
|
typedef unsigned64 uint64;
|
|
typedef signed64 int64;
|
|
|
|
/* FIXME: CR16 defines */
|
|
typedef uint16 reg_t;
|
|
typedef uint32 creg_t;
|
|
|
|
struct simops
|
|
{
|
|
char mnimonic[12];
|
|
uint32 size;
|
|
uint32 mask;
|
|
uint32 opcode;
|
|
int format;
|
|
char fname[12];
|
|
void (*func)();
|
|
int numops;
|
|
operand_desc operands[4];
|
|
};
|
|
|
|
enum _ins_type
|
|
{
|
|
INS_UNKNOWN, /* unknown instruction */
|
|
INS_NO_TYPE_INS,
|
|
INS_ARITH_INS,
|
|
INS_LD_STOR_INS,
|
|
INS_BRANCH_INS,
|
|
INS_ARITH_BYTE_INS,
|
|
INS_SHIFT_INS,
|
|
INS_BRANCH_NEQ_INS,
|
|
INS_STOR_IMM_INS,
|
|
INS_CSTBIT_INS,
|
|
INS_MAX
|
|
};
|
|
|
|
extern unsigned long ins_type_counters[ (int)INS_MAX ];
|
|
|
|
enum {
|
|
SP_IDX = 15,
|
|
};
|
|
|
|
/* Write-back slots */
|
|
union slot_data {
|
|
unsigned_1 _1;
|
|
unsigned_2 _2;
|
|
unsigned_4 _4;
|
|
};
|
|
struct slot {
|
|
void *dest;
|
|
int size;
|
|
union slot_data data;
|
|
union slot_data mask;
|
|
};
|
|
enum {
|
|
NR_SLOTS = 16
|
|
};
|
|
#define SLOT (State.slot)
|
|
#define SLOT_NR (State.slot_nr)
|
|
#define SLOT_PEND_MASK(DEST, MSK, VAL) \
|
|
do \
|
|
{ \
|
|
SLOT[SLOT_NR].dest = &(DEST); \
|
|
SLOT[SLOT_NR].size = sizeof (DEST); \
|
|
switch (sizeof (DEST)) \
|
|
{ \
|
|
case 1: \
|
|
SLOT[SLOT_NR].data._1 = (unsigned_1) (VAL); \
|
|
SLOT[SLOT_NR].mask._1 = (unsigned_1) (MSK); \
|
|
break; \
|
|
case 2: \
|
|
SLOT[SLOT_NR].data._2 = (unsigned_2) (VAL); \
|
|
SLOT[SLOT_NR].mask._2 = (unsigned_2) (MSK); \
|
|
break; \
|
|
case 4: \
|
|
SLOT[SLOT_NR].data._4 = (unsigned_4) (VAL); \
|
|
SLOT[SLOT_NR].mask._4 = (unsigned_4) (MSK); \
|
|
break; \
|
|
} \
|
|
SLOT_NR = (SLOT_NR + 1); \
|
|
} \
|
|
while (0)
|
|
#define SLOT_PEND(DEST, VAL) SLOT_PEND_MASK(DEST, 0, VAL)
|
|
#define SLOT_DISCARD() (SLOT_NR = 0)
|
|
#define SLOT_FLUSH() \
|
|
do \
|
|
{ \
|
|
int i; \
|
|
for (i = 0; i < SLOT_NR; i++) \
|
|
{ \
|
|
switch (SLOT[i].size) \
|
|
{ \
|
|
case 1: \
|
|
*(unsigned_1*) SLOT[i].dest &= SLOT[i].mask._1; \
|
|
*(unsigned_1*) SLOT[i].dest |= SLOT[i].data._1; \
|
|
break; \
|
|
case 2: \
|
|
*(unsigned_2*) SLOT[i].dest &= SLOT[i].mask._2; \
|
|
*(unsigned_2*) SLOT[i].dest |= SLOT[i].data._2; \
|
|
break; \
|
|
case 4: \
|
|
*(unsigned_4*) SLOT[i].dest &= SLOT[i].mask._4; \
|
|
*(unsigned_4*) SLOT[i].dest |= SLOT[i].data._4; \
|
|
break; \
|
|
} \
|
|
} \
|
|
SLOT_NR = 0; \
|
|
} \
|
|
while (0)
|
|
#define SLOT_DUMP() \
|
|
do \
|
|
{ \
|
|
int i; \
|
|
for (i = 0; i < SLOT_NR; i++) \
|
|
{ \
|
|
switch (SLOT[i].size) \
|
|
{ \
|
|
case 1: \
|
|
printf ("SLOT %d *0x%08lx & 0x%02x | 0x%02x\n", i, \
|
|
(long) SLOT[i].dest, \
|
|
(unsigned) SLOT[i].mask._1, \
|
|
(unsigned) SLOT[i].data._1); \
|
|
break; \
|
|
case 2: \
|
|
printf ("SLOT %d *0x%08lx & 0x%04x | 0x%04x\n", i, \
|
|
(long) SLOT[i].dest, \
|
|
(unsigned) SLOT[i].mask._2, \
|
|
(unsigned) SLOT[i].data._2); \
|
|
break; \
|
|
case 4: \
|
|
printf ("SLOT %d *0x%08lx & 0x%08x | 0x%08x\n", i, \
|
|
(long) SLOT[i].dest, \
|
|
(unsigned) SLOT[i].mask._4, \
|
|
(unsigned) SLOT[i].data._4); \
|
|
break; \
|
|
case 8: \
|
|
printf ("SLOT %d *0x%08lx & 0x%08x%08x | 0x%08x%08x\n", i, \
|
|
(long) SLOT[i].dest, \
|
|
(unsigned) (SLOT[i].mask._8 >> 32), \
|
|
(unsigned) SLOT[i].mask._8, \
|
|
(unsigned) (SLOT[i].data._8 >> 32), \
|
|
(unsigned) SLOT[i].data._8); \
|
|
break; \
|
|
} \
|
|
} \
|
|
} \
|
|
while (0)
|
|
|
|
/* cr16 memory: There are three separate cr16 memory regions IMEM,
|
|
UMEM and DMEM. The IMEM and DMEM are further broken down into
|
|
blocks (very like VM pages). */
|
|
|
|
enum
|
|
{
|
|
IMAP_BLOCK_SIZE = 0x2000000,
|
|
DMAP_BLOCK_SIZE = 0x4000000
|
|
};
|
|
|
|
/* Implement the three memory regions using sparse arrays. Allocate
|
|
memory using ``segments''. A segment must be at least as large as
|
|
a BLOCK - ensures that an access that doesn't cross a block
|
|
boundary can't cross a segment boundary */
|
|
|
|
enum
|
|
{
|
|
SEGMENT_SIZE = 0x2000000, /* 128KB - MAX(IMAP_BLOCK_SIZE,DMAP_BLOCK_SIZE) */
|
|
IMEM_SEGMENTS = 8, /* 1MB */
|
|
DMEM_SEGMENTS = 8, /* 1MB */
|
|
UMEM_SEGMENTS = 128 /* 16MB */
|
|
};
|
|
|
|
struct cr16_memory
|
|
{
|
|
uint8 *insn[IMEM_SEGMENTS];
|
|
uint8 *data[DMEM_SEGMENTS];
|
|
uint8 *unif[UMEM_SEGMENTS];
|
|
uint8 fault[16];
|
|
};
|
|
|
|
struct _state
|
|
{
|
|
creg_t regs[16]; /* general-purpose registers */
|
|
#define GPR(N) (State.regs[(N)] + 0)
|
|
#define SET_GPR(N,VAL) (State.regs[(N)] = (VAL))
|
|
|
|
#define GPR32(N) \
|
|
(N < 12) ? \
|
|
((((uint16) State.regs[(N) + 1]) << 16) | (uint16) State.regs[(N)]) \
|
|
: GPR (N)
|
|
|
|
#define SET_GPR32(N,VAL) do { \
|
|
if (N < 11) \
|
|
{ SET_GPR (N + 1, (VAL) >> 16); SET_GPR (N, ((VAL) & 0xffff));} \
|
|
else { if ( N == 11) \
|
|
{ SET_GPR (N + 1, ((GPR32 (12)) & 0xffff0000)|((VAL) >> 16)); \
|
|
SET_GPR (N, ((VAL) & 0xffff));} \
|
|
else SET_GPR (N, (VAL));} \
|
|
} while (0)
|
|
|
|
creg_t cregs[16]; /* control registers */
|
|
#define CREG(N) (State.cregs[(N)] + 0)
|
|
#define SET_CREG(N,VAL) move_to_cr ((N), 0, (VAL), 0)
|
|
#define SET_HW_CREG(N,VAL) move_to_cr ((N), 0, (VAL), 1)
|
|
|
|
reg_t sp[2]; /* holding area for SPI(0)/SPU(1) */
|
|
#define HELD_SP(N) (State.sp[(N)] + 0)
|
|
#define SET_HELD_SP(N,VAL) SLOT_PEND (State.sp[(N)], (VAL))
|
|
|
|
/* writeback info */
|
|
struct slot slot[NR_SLOTS];
|
|
int slot_nr;
|
|
|
|
/* trace data */
|
|
struct {
|
|
uint16 psw;
|
|
} trace;
|
|
|
|
uint8 exe;
|
|
int exception;
|
|
int pc_changed;
|
|
|
|
/* NOTE: everything below this line is not reset by
|
|
sim_create_inferior() */
|
|
|
|
struct cr16_memory mem;
|
|
|
|
enum _ins_type ins_type;
|
|
|
|
} State;
|
|
|
|
|
|
extern host_callback *cr16_callback;
|
|
extern uint32 OP[4];
|
|
extern uint32 sign_flag;
|
|
extern struct simops Simops[];
|
|
extern asection *text;
|
|
extern bfd_vma text_start;
|
|
extern bfd_vma text_end;
|
|
extern bfd *prog_bfd;
|
|
|
|
enum
|
|
{
|
|
PC_CR = 0,
|
|
BDS_CR = 1,
|
|
BSR_CR = 2,
|
|
DCR_CR = 3,
|
|
CAR0_CR = 5,
|
|
CAR1_CR = 7,
|
|
CFG_CR = 9,
|
|
PSR_CR = 10,
|
|
INTBASE_CR = 11,
|
|
ISP_CR = 13,
|
|
USP_CR = 15
|
|
};
|
|
|
|
enum
|
|
{
|
|
PSR_I_BIT = 0x0800,
|
|
PSR_P_BIT = 0x0400,
|
|
PSR_E_BIT = 0x0200,
|
|
PSR_N_BIT = 0x0080,
|
|
PSR_Z_BIT = 0x0040,
|
|
PSR_F_BIT = 0x0020,
|
|
PSR_U_BIT = 0x0008,
|
|
PSR_L_BIT = 0x0004,
|
|
PSR_T_BIT = 0x0002,
|
|
PSR_C_BIT = 0x0001
|
|
};
|
|
|
|
#define PSR CREG (PSR_CR)
|
|
#define SET_PSR(VAL) SET_CREG (PSR_CR, (VAL))
|
|
#define SET_HW_PSR(VAL) SET_HW_CREG (PSR_CR, (VAL))
|
|
#define SET_PSR_BIT(MASK,VAL) move_to_cr (PSR_CR, ~((creg_t) MASK), (VAL) ? (MASK) : 0, 1)
|
|
|
|
#define PSR_SM ((PSR & PSR_SM_BIT) != 0)
|
|
#define SET_PSR_SM(VAL) SET_PSR_BIT (PSR_SM_BIT, (VAL))
|
|
|
|
#define PSR_I ((PSR & PSR_I_BIT) != 0)
|
|
#define SET_PSR_I(VAL) SET_PSR_BIT (PSR_I_BIT, (VAL))
|
|
|
|
#define PSR_DB ((PSR & PSR_DB_BIT) != 0)
|
|
#define SET_PSR_DB(VAL) SET_PSR_BIT (PSR_DB_BIT, (VAL))
|
|
|
|
#define PSR_P ((PSR & PSR_P_BIT) != 0)
|
|
#define SET_PSR_P(VAL) SET_PSR_BIT (PSR_P_BIT, (VAL))
|
|
|
|
#define PSR_E ((PSR & PSR_E_BIT) != 0)
|
|
#define SET_PSR_E(VAL) SET_PSR_BIT (PSR_E_BIT, (VAL))
|
|
|
|
#define PSR_N ((PSR & PSR_N_BIT) != 0)
|
|
#define SET_PSR_N(VAL) SET_PSR_BIT (PSR_N_BIT, (VAL))
|
|
|
|
#define PSR_Z ((PSR & PSR_Z_BIT) != 0)
|
|
#define SET_PSR_Z(VAL) SET_PSR_BIT (PSR_Z_BIT, (VAL))
|
|
|
|
#define PSR_F ((PSR & PSR_F_BIT) != 0)
|
|
#define SET_PSR_F(VAL) SET_PSR_BIT (PSR_F_BIT, (VAL))
|
|
|
|
#define PSR_U ((PSR & PSR_U_BIT) != 0)
|
|
#define SET_PSR_U(VAL) SET_PSR_BIT (PSR_U_BIT, (VAL))
|
|
|
|
#define PSR_L ((PSR & PSR_L_BIT) != 0)
|
|
#define SET_PSR_L(VAL) SET_PSR_BIT (PSR_L_BIT, (VAL))
|
|
|
|
#define PSR_T ((PSR & PSR_T_BIT) != 0)
|
|
#define SET_PSR_T(VAL) SET_PSR_BIT (PSR_T_BIT, (VAL))
|
|
|
|
#define PSR_C ((PSR & PSR_C_BIT) != 0)
|
|
#define SET_PSR_C(VAL) SET_PSR_BIT (PSR_C_BIT, (VAL))
|
|
|
|
/* See simopsc.:move_to_cr() for registers that can not be read-from
|
|
or assigned-to directly */
|
|
|
|
#define PC CREG (PC_CR)
|
|
#define SET_PC(VAL) SET_CREG (PC_CR, (VAL))
|
|
//#define SET_PC(VAL) (State.cregs[PC_CR] = (VAL))
|
|
|
|
#define BPSR CREG (BPSR_CR)
|
|
#define SET_BPSR(VAL) SET_CREG (BPSR_CR, (VAL))
|
|
|
|
#define BPC CREG (BPC_CR)
|
|
#define SET_BPC(VAL) SET_CREG (BPC_CR, (VAL))
|
|
|
|
#define DPSR CREG (DPSR_CR)
|
|
#define SET_DPSR(VAL) SET_CREG (DPSR_CR, (VAL))
|
|
|
|
#define DPC CREG (DPC_CR)
|
|
#define SET_DPC(VAL) SET_CREG (DPC_CR, (VAL))
|
|
|
|
#define RPT_C CREG (RPT_C_CR)
|
|
#define SET_RPT_C(VAL) SET_CREG (RPT_C_CR, (VAL))
|
|
|
|
#define RPT_S CREG (RPT_S_CR)
|
|
#define SET_RPT_S(VAL) SET_CREG (RPT_S_CR, (VAL))
|
|
|
|
#define RPT_E CREG (RPT_E_CR)
|
|
#define SET_RPT_E(VAL) SET_CREG (RPT_E_CR, (VAL))
|
|
|
|
#define MOD_S CREG (MOD_S_CR)
|
|
#define SET_MOD_S(VAL) SET_CREG (MOD_S_CR, (VAL))
|
|
|
|
#define MOD_E CREG (MOD_E_CR)
|
|
#define SET_MOD_E(VAL) SET_CREG (MOD_E_CR, (VAL))
|
|
|
|
#define IBA CREG (IBA_CR)
|
|
#define SET_IBA(VAL) SET_CREG (IBA_CR, (VAL))
|
|
|
|
|
|
#define SIG_CR16_STOP -1
|
|
#define SIG_CR16_EXIT -2
|
|
#define SIG_CR16_BUS -3
|
|
#define SIG_CR16_IAD -4
|
|
|
|
#define SEXT3(x) ((((x)&0x7)^(~3))+4)
|
|
|
|
/* sign-extend a 4-bit number */
|
|
#define SEXT4(x) ((((x)&0xf)^(~7))+8)
|
|
|
|
/* sign-extend an 8-bit number */
|
|
#define SEXT8(x) ((((x)&0xff)^(~0x7f))+0x80)
|
|
|
|
/* sign-extend a 16-bit number */
|
|
#define SEXT16(x) ((((x)&0xffff)^(~0x7fff))+0x8000)
|
|
|
|
/* sign-extend a 24-bit number */
|
|
#define SEXT24(x) ((((x)&0xffffff)^(~0x7fffff))+0x800000)
|
|
|
|
/* sign-extend a 32-bit number */
|
|
#define SEXT32(x) ((((x)&0xffffffff)^(~0x7fffffff))+0x80000000)
|
|
|
|
extern uint8 *dmem_addr (uint32 offset);
|
|
extern uint8 *imem_addr (uint32);
|
|
extern bfd_vma decode_pc (void);
|
|
|
|
#define RB(x) (*(dmem_addr(x)))
|
|
#define SB(addr,data) ( RB(addr) = (data & 0xff))
|
|
|
|
#if defined(__GNUC__) && defined(__OPTIMIZE__) && !defined(NO_ENDIAN_INLINE)
|
|
#define ENDIAN_INLINE static __inline__
|
|
#include "endian.c"
|
|
#undef ENDIAN_INLINE
|
|
|
|
#else
|
|
extern uint32 get_longword (uint8 *);
|
|
extern uint16 get_word (uint8 *);
|
|
extern int64 get_longlong (uint8 *);
|
|
extern void write_word (uint8 *addr, uint16 data);
|
|
extern void write_longword (uint8 *addr, uint32 data);
|
|
extern void write_longlong (uint8 *addr, int64 data);
|
|
#endif
|
|
|
|
#define SW(addr,data) write_word(dmem_addr(addr),data)
|
|
#define RW(x) get_word(dmem_addr(x))
|
|
#define SLW(addr,data) write_longword(dmem_addr(addr),data)
|
|
#define RLW(x) get_longword(dmem_addr(x))
|
|
#define READ_16(x) get_word(x)
|
|
#define WRITE_16(addr,data) write_word(addr,data)
|
|
#define READ_64(x) get_longlong(x)
|
|
#define WRITE_64(addr,data) write_longlong(addr,data)
|
|
|
|
#define JMP(x) do { SET_PC (x); State.pc_changed = 1; } while (0)
|
|
|
|
#define RIE_VECTOR_START 0xffc2
|
|
#define AE_VECTOR_START 0xffc3
|
|
#define TRAP_VECTOR_START 0xffc4 /* vector for trap 0 */
|
|
#define DBT_VECTOR_START 0xffd4
|
|
#define SDBT_VECTOR_START 0xffd5
|
|
|
|
#define INT_VECTOR_START 0xFFFE00 /*maskable interrupt - mapped to ICU */
|
|
#define NMI_VECTOR_START 0xFFFF00 /*non-maskable interrupt;for observability*/
|
|
#define ISE_VECTOR_START 0xFFFC00 /*in-system emulation trap */
|
|
#define ADBG_VECTOR_START 0xFFFC02 /*alternate debug trap */
|
|
#define ATRC_VECTOR_START 0xFFFC0C /*alternate trace trap */
|
|
#define ABPT_VECTOR_START 0xFFFC0E /*alternate break point trap */
|
|
|
|
|
|
/* Scedule a store of VAL into cr[CR]. MASK indicates the bits in
|
|
cr[CR] that should not be modified (i.e. cr[CR] = (cr[CR] & MASK) |
|
|
(VAL & ~MASK)). In addition, unless PSR_HW_P, a VAL intended for
|
|
PSR is masked for zero bits. */
|
|
|
|
extern creg_t move_to_cr (int cr, creg_t mask, creg_t val, int psw_hw_p);
|
|
|
|
#ifndef SIGTRAP
|
|
#define SIGTRAP 5
|
|
#endif
|
|
/* Special purpose trap */
|
|
#define TRAP_BREAKPOINT 8
|