331 lines
16 KiB
C
331 lines
16 KiB
C
/* hp2100_cpu.h: HP 2100 CPU definitions
|
|
|
|
Copyright (c) 2005-2010, Robert M. Supnik
|
|
|
|
Permission is hereby granted, free of charge, to any person obtaining a
|
|
copy of this software and associated documentation files (the "Software"),
|
|
to deal in the Software without restriction, including without limitation
|
|
the rights to use, copy, modify, merge, publish, distribute, sublicense,
|
|
and/or sell copies of the Software, and to permit persons to whom the
|
|
Software is furnished to do so, subject to the following conditions:
|
|
|
|
The above copyright notice and this permission notice shall be included in
|
|
all copies or substantial portions of the Software.
|
|
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
|
|
ROBERT M SUPNIK BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
|
|
IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
|
|
CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
|
|
Except as contained in this notice, the name of Robert M Supnik shall not
|
|
be used in advertising or otherwise to promote the sale, use or other dealings
|
|
in this Software without prior written authorization from Robert M Supnik.
|
|
|
|
03-Jan-10 RMS Changed declarations of mp_control, mp_mefvv, for VMS compiler
|
|
15-Jul-08 JDB Rearranged declarations with hp2100_cpu.c and hp2100_defs.h
|
|
26-Jun-08 JDB Added mp_control to CPU state externals
|
|
24-Apr-08 JDB Added calc_defer() prototype
|
|
20-Apr-08 JDB Added DEB_VIS and DEB_SIG debug flags
|
|
26-Nov-07 JDB Added extern sim_deb, cpu_dev, DEB flags for debug printouts
|
|
05-Nov-07 JDB Added extern intaddr, mp_viol, mp_mevff, calc_int, dev_ctl,
|
|
ReadIO, WriteIO for RTE-6/VM microcode support
|
|
16-Dec-06 JDB Added UNIT_2115 and UNIT_2114
|
|
16-Oct-06 JDB Moved ReadF to hp2100_cpu1.c
|
|
26-Sep-06 JDB Added CPU externs for microcode simulators
|
|
16-Aug-06 JDB Added UNIT_EMA for future RTE-4 EMA microcode
|
|
Added UNIT_VMA for future RTE-6 VMA and OS microcode
|
|
Added UNIT_1000_F for future F-Series support
|
|
09-Aug-06 JDB Added UNIT_DBI for double integer microcode
|
|
21-Jan-05 JDB Reorganized CPU option flags
|
|
14-Jan-05 RMS Cloned from hp2100_cpu.c
|
|
|
|
CPU models are broken down into family, type, and series to facilitate option
|
|
validation. Bit 3 encodes the family, bit 2 encodes the type, and bits 1:0
|
|
encode the series within the type.
|
|
*/
|
|
|
|
#ifndef _HP2100_CPU_H_
|
|
#define _HP2100_CPU_H_ 0
|
|
|
|
#include <setjmp.h>
|
|
|
|
|
|
/* CPU model definition flags */
|
|
|
|
#define CPU_V_SERIES 0
|
|
#define CPU_V_TYPE 2
|
|
#define CPU_V_FAMILY 3
|
|
|
|
#define FAMILY_21XX (0 << CPU_V_FAMILY)
|
|
#define FAMILY_1000 (1 << CPU_V_FAMILY)
|
|
|
|
#define TYPE_211X (0 << CPU_V_TYPE) /* 2114, 2115, 2116 */
|
|
#define TYPE_2100 (1 << CPU_V_TYPE) /* 2100A, 2100S */
|
|
#define TYPE_1000MEF (0 << CPU_V_TYPE) /* 1000-M, 1000-E, 1000-F */
|
|
#define TYPE_1000AL (1 << CPU_V_TYPE) /* 1000-L, A600, A700, A900, A990 */
|
|
|
|
#define SERIES_16 (0 << CPU_V_SERIES) /* 211X */
|
|
#define SERIES_15 (1 << CPU_V_SERIES) /* 211X */
|
|
#define SERIES_14 (2 << CPU_V_SERIES) /* 211X */
|
|
#define SERIES_00 (0 << CPU_V_SERIES) /* 2100 */
|
|
#define SERIES_M (0 << CPU_V_SERIES) /* 1000 */
|
|
#define SERIES_E (1 << CPU_V_SERIES) /* 1000 */
|
|
#define SERIES_F (2 << CPU_V_SERIES) /* 1000 */
|
|
|
|
/* CPU unit flags */
|
|
|
|
#define UNIT_M_CPU 017 /* CPU model mask [3:0] */
|
|
#define UNIT_M_TYPE 014 /* CPU type mask [3:2] */
|
|
#define UNIT_M_FAMILY 010 /* CPU family mask [3:3] */
|
|
|
|
#define UNIT_V_CPU (UNIT_V_UF + 0) /* CPU model bits 0-3 */
|
|
#define UNIT_V_EAU (UNIT_V_UF + 4) /* EAU installed */
|
|
#define UNIT_V_FP (UNIT_V_UF + 5) /* FP installed */
|
|
#define UNIT_V_IOP (UNIT_V_UF + 6) /* IOP installed */
|
|
#define UNIT_V_DMS (UNIT_V_UF + 7) /* DMS installed */
|
|
#define UNIT_V_FFP (UNIT_V_UF + 8) /* FFP installed */
|
|
#define UNIT_V_DBI (UNIT_V_UF + 9) /* DBI installed */
|
|
#define UNIT_V_EMA (UNIT_V_UF + 10) /* RTE-4 EMA installed */
|
|
#define UNIT_V_VMAOS (UNIT_V_UF + 11) /* RTE-6 VMA/OS installed */
|
|
#define UNIT_V_VIS (UNIT_V_UF + 12) /* VIS installed */
|
|
#define UNIT_V_SIGNAL (UNIT_V_UF + 13) /* SIGNAL/1000 installed */
|
|
/* Future microcode expansion; reuse flags bottom-up if needed */
|
|
#define UNIT_V_DS (UNIT_V_UF + 14) /* DS installed */
|
|
|
|
/* Unit models */
|
|
|
|
#define UNIT_MODEL_MASK (UNIT_M_CPU << UNIT_V_CPU)
|
|
|
|
#define UNIT_2116 ((FAMILY_21XX | TYPE_211X | SERIES_16) << UNIT_V_CPU)
|
|
#define UNIT_2115 ((FAMILY_21XX | TYPE_211X | SERIES_15) << UNIT_V_CPU)
|
|
#define UNIT_2114 ((FAMILY_21XX | TYPE_211X | SERIES_14) << UNIT_V_CPU)
|
|
#define UNIT_2100 ((FAMILY_21XX | TYPE_2100 | SERIES_00) << UNIT_V_CPU)
|
|
#define UNIT_1000_M ((FAMILY_1000 | TYPE_1000MEF | SERIES_M) << UNIT_V_CPU)
|
|
#define UNIT_1000_E ((FAMILY_1000 | TYPE_1000MEF | SERIES_E) << UNIT_V_CPU)
|
|
#define UNIT_1000_F ((FAMILY_1000 | TYPE_1000MEF | SERIES_F) << UNIT_V_CPU)
|
|
|
|
/* Unit types */
|
|
|
|
#define UNIT_TYPE_MASK (UNIT_M_TYPE << UNIT_V_CPU)
|
|
|
|
#define UNIT_TYPE_211X ((FAMILY_21XX | TYPE_211X) << UNIT_V_CPU)
|
|
#define UNIT_TYPE_2100 ((FAMILY_21XX | TYPE_2100) << UNIT_V_CPU)
|
|
#define UNIT_TYPE_1000 ((FAMILY_1000 | TYPE_1000MEF) << UNIT_V_CPU)
|
|
|
|
/* Unit families */
|
|
|
|
#define UNIT_FAMILY_MASK (UNIT_M_FAMILY << UNIT_V_CPU)
|
|
|
|
#define UNIT_FAMILY_21XX (FAMILY_21XX << UNIT_V_CPU)
|
|
#define UNIT_FAMILY_1000 (FAMILY_1000 << UNIT_V_CPU)
|
|
|
|
/* Unit accessors */
|
|
|
|
#define UNIT_CPU_MODEL (cpu_unit.flags & UNIT_MODEL_MASK)
|
|
#define UNIT_CPU_TYPE (cpu_unit.flags & UNIT_TYPE_MASK)
|
|
#define UNIT_CPU_FAMILY (cpu_unit.flags & UNIT_FAMILY_MASK)
|
|
|
|
#define CPU_MODEL_INDEX (UNIT_CPU_MODEL >> UNIT_V_CPU)
|
|
|
|
/* Unit features */
|
|
|
|
#define UNIT_EAU (1 << UNIT_V_EAU)
|
|
#define UNIT_FP (1 << UNIT_V_FP)
|
|
#define UNIT_IOP (1 << UNIT_V_IOP)
|
|
#define UNIT_DMS (1 << UNIT_V_DMS)
|
|
#define UNIT_FFP (1 << UNIT_V_FFP)
|
|
#define UNIT_DBI (1 << UNIT_V_DBI)
|
|
#define UNIT_EMA (1 << UNIT_V_EMA)
|
|
#define UNIT_VMAOS (1 << UNIT_V_VMAOS)
|
|
#define UNIT_VIS (1 << UNIT_V_VIS)
|
|
#define UNIT_DS (1 << UNIT_V_DS)
|
|
#define UNIT_SIGNAL (1 << UNIT_V_SIGNAL)
|
|
|
|
#define UNIT_EMA_VMA (UNIT_EMA | UNIT_VMAOS)
|
|
|
|
#define UNIT_OPTS (UNIT_EAU | UNIT_FP | UNIT_IOP | \
|
|
UNIT_DMS | UNIT_FFP | UNIT_DBI | \
|
|
UNIT_EMA | UNIT_VMAOS | \
|
|
UNIT_VIS | UNIT_DS | UNIT_SIGNAL)
|
|
|
|
/* "Pseudo-option" flags used only for option testing; never set into UNIT structure. */
|
|
|
|
#define UNIT_V_PFAIL (UNIT_V_UF - 1) /* Power fail installed */
|
|
#define UNIT_V_DMA (UNIT_V_UF - 2) /* DMA installed */
|
|
#define UNIT_V_MP (UNIT_V_UF - 3) /* Memory protect installed */
|
|
|
|
#define UNIT_PFAIL (1 << UNIT_V_PFAIL)
|
|
#define UNIT_DMA (1 << UNIT_V_DMA)
|
|
#define UNIT_MP (1 << UNIT_V_MP)
|
|
|
|
#define UNIT_NONE 0 /* no options */
|
|
|
|
/* Debug flags */
|
|
|
|
#define DEB_OS (1 << 0) /* RTE-6/VM OS firmware non-TBG processing */
|
|
#define DEB_OSTBG (1 << 1) /* RTE-6/VM OS firmware TBG processing */
|
|
#define DEB_VMA (1 << 2) /* RTE-6/VM VMA firmware instructions */
|
|
#define DEB_EMA (1 << 3) /* RTE-6/VM EMA firmware instructions */
|
|
#define DEB_VIS (1 << 4) /* E/F-Series VIS firmware instructions */
|
|
#define DEB_SIG (1 << 5) /* F-Series SIGNAL/1000 firmware instructions */
|
|
|
|
/* PC queue. */
|
|
|
|
#define PCQ_SIZE 64 /* must be 2**n */
|
|
#define PCQ_MASK (PCQ_SIZE - 1)
|
|
#define PCQ_ENTRY pcq[pcq_p = (pcq_p - 1) & PCQ_MASK] = err_PC
|
|
|
|
/* Memory reference instructions */
|
|
|
|
#define I_IA 0100000 /* indirect address */
|
|
#define I_AB 0004000 /* A/B select */
|
|
#define I_CP 0002000 /* current page */
|
|
#define I_DISP 0001777 /* page displacement */
|
|
#define I_PAGENO 0076000 /* page number */
|
|
|
|
/* Other instructions */
|
|
|
|
#define I_NMRMASK 0172000 /* non-mrf opcode */
|
|
#define I_ASKP 0002000 /* alter/skip */
|
|
#define I_IO 0102000 /* I/O */
|
|
#define I_CTL 0004000 /* CTL on/off */
|
|
#define I_HC 0001000 /* hold/clear */
|
|
#define I_DEVMASK 0000077 /* device select code mask */
|
|
#define I_GETIOOP(x) (((x) >> 6) & 07) /* I/O sub op */
|
|
|
|
/* Instruction masks */
|
|
|
|
#define I_MRG 0074000 /* MRG instructions */
|
|
#define I_MRG_I (I_MRG | I_IA) /* MRG indirect instruction group */
|
|
#define I_JSB 0014000 /* JSB instruction */
|
|
#define I_JSB_I (I_JSB | I_IA) /* JSB,I instruction */
|
|
#define I_JMP 0024000 /* JMP instruction */
|
|
#define I_ISZ 0034000 /* ISZ instruction */
|
|
|
|
#define I_IOG 0107700 /* I/O group instruction */
|
|
#define I_SFS 0102300 /* SFS instruction */
|
|
#define I_STF 0102100 /* STF instruction */
|
|
|
|
/* Memory management */
|
|
|
|
#define VA_N_OFF 10 /* offset width */
|
|
#define VA_M_OFF ((1 << VA_N_OFF) - 1) /* offset mask */
|
|
#define VA_GETOFF(x) ((x) & VA_M_OFF)
|
|
#define VA_N_PAG (VA_N_SIZE - VA_N_OFF) /* page width */
|
|
#define VA_V_PAG (VA_N_OFF) /* page offset */
|
|
#define VA_M_PAG ((1 << VA_N_PAG) - 1) /* page mask */
|
|
#define VA_GETPAG(x) (((x) >> VA_V_PAG) & VA_M_PAG)
|
|
|
|
/* Maps */
|
|
|
|
#define MAP_NUM 4 /* num maps */
|
|
#define MAP_LNT (1 << VA_N_PAG) /* map length */
|
|
#define MAP_MASK ((MAP_NUM * MAP_LNT) - 1)
|
|
#define SMAP 0 /* system map */
|
|
#define UMAP (SMAP + MAP_LNT) /* user map */
|
|
#define PAMAP (UMAP + MAP_LNT) /* port A map */
|
|
#define PBMAP (PAMAP + MAP_LNT) /* port B map */
|
|
|
|
/* DMS map entries */
|
|
|
|
#define MAP_V_RPR 15 /* read prot */
|
|
#define MAP_V_WPR 14 /* write prot */
|
|
#define RDPROT (1 << MAP_V_RPR) /* read access check */
|
|
#define WRPROT (1 << MAP_V_WPR) /* write access check */
|
|
#define NOPROT 0 /* no access check */
|
|
#define MAP_RSVD 0036000 /* reserved bits */
|
|
#define MAP_N_PAG (PA_N_SIZE - VA_N_OFF) /* page width */
|
|
#define MAP_V_PAG (VA_N_OFF)
|
|
#define MAP_M_PAG ((1 << MAP_N_PAG) - 1)
|
|
#define MAP_GETPAG(x) (((x) & MAP_M_PAG) << MAP_V_PAG)
|
|
|
|
/* MEM status register */
|
|
|
|
#define MST_ENBI 0100000 /* MEM enabled at interrupt */
|
|
#define MST_UMPI 0040000 /* User map selected at inerrupt */
|
|
#define MST_ENB 0020000 /* MEM enabled currently */
|
|
#define MST_UMP 0010000 /* User map selected currently */
|
|
#define MST_PRO 0004000 /* Protected mode enabled currently */
|
|
#define MST_FLT 0002000 /* Base page portion mapped */
|
|
#define MST_FENCE 0001777 /* Base page fence */
|
|
|
|
/* MEM violation register */
|
|
|
|
#define MVI_V_RPR 15 /* must be same as */
|
|
#define MVI_V_WPR 14 /* MAP_V_xPR */
|
|
#define MVI_RPR (1 << MVI_V_RPR) /* rd viol */
|
|
#define MVI_WPR (1 << MVI_V_WPR) /* wr viol */
|
|
#define MVI_BPG 0020000 /* base page viol */
|
|
#define MVI_PRV 0010000 /* priv viol */
|
|
#define MVI_MEB 0000200 /* me bus enb @ viol */
|
|
#define MVI_MEM 0000100 /* mem enb @ viol */
|
|
#define MVI_UMP 0000040 /* usr map @ viol */
|
|
#define MVI_PAG 0000037 /* pag sel */
|
|
|
|
/* CPU registers */
|
|
|
|
#define AR ABREG[0] /* A = reg 0 */
|
|
#define BR ABREG[1] /* B = reg 1 */
|
|
|
|
extern uint16 ABREG[2]; /* A/B regs (use AR/BR) */
|
|
extern uint32 PC; /* P register */
|
|
extern uint32 SR; /* S register */
|
|
extern uint32 MR; /* M register */
|
|
extern uint32 TR; /* T register */
|
|
extern uint32 XR; /* X register */
|
|
extern uint32 YR; /* Y register */
|
|
extern uint32 E; /* E register */
|
|
extern uint32 O; /* O register */
|
|
|
|
/* CPU state */
|
|
|
|
extern uint32 err_PC;
|
|
extern uint32 dms_enb;
|
|
extern uint32 dms_ump;
|
|
extern uint32 dms_sr;
|
|
extern uint32 dms_vr;
|
|
extern FLIP_FLOP mp_control;
|
|
extern uint32 mp_fence;
|
|
extern uint32 mp_viol;
|
|
extern FLIP_FLOP mp_mevff;
|
|
extern uint32 iop_sp;
|
|
extern t_bool ion_defer;
|
|
extern uint32 intaddr;
|
|
extern uint16 pcq [PCQ_SIZE];
|
|
extern uint32 pcq_p;
|
|
extern uint32 stop_inst;
|
|
extern UNIT cpu_unit;
|
|
extern DEVICE cpu_dev;
|
|
extern jmp_buf save_env;
|
|
|
|
|
|
/* CPU functions */
|
|
|
|
#define MP_ABORT(va) longjmp (save_env, (va))
|
|
|
|
extern t_stat resolve (uint32 MA, uint32 *addr, uint32 irq);
|
|
extern uint16 ReadPW (uint32 pa);
|
|
extern uint8 ReadB (uint32 va);
|
|
extern uint8 ReadBA (uint32 va);
|
|
extern uint16 ReadW (uint32 va);
|
|
extern uint16 ReadWA (uint32 va);
|
|
extern uint16 ReadIO (uint32 va, uint32 map);
|
|
extern void WritePW (uint32 pa, uint32 dat);
|
|
extern void WriteB (uint32 va, uint32 dat);
|
|
extern void WriteBA (uint32 va, uint32 dat);
|
|
extern void WriteW (uint32 va, uint32 dat);
|
|
extern void WriteWA (uint32 va, uint32 dat);
|
|
extern void WriteIO (uint32 va, uint32 dat, uint32 map);
|
|
extern t_stat iogrp (uint32 ir, uint32 iotrap);
|
|
extern uint32 calc_int (void);
|
|
extern t_bool calc_defer (void);
|
|
extern void mp_dms_jmp (uint32 va, uint32 plb);
|
|
extern uint16 dms_rmap (uint32 mapi);
|
|
extern void dms_wmap (uint32 mapi, uint32 dat);
|
|
extern void dms_viol (uint32 va, uint32 st);
|
|
extern uint32 dms_upd_vr (uint32 va);
|
|
extern uint32 dms_upd_sr (void);
|
|
|
|
#endif
|