| /* vax780_defs.h: VAX 780 model-specific definitions file | |
| Copyright (c) 2004-2015, 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. | |
| 29-Mar-15 RMS Added model specific IPR max | |
| 16-Dec-14 RMS Removed TQ boot code (780 VMB doesn't support tape boot) | |
| 05-Sep-14 RMS Fixed SBR test (found by Mark Pizzolato) | |
| 29-Nov-13 RMS Added system-specific unaligned routines | |
| 12-Dec-12 RMS Fixed IO base address for RQB, RQC, RQD | |
| 05-Nov-11 RMS Added VEC_QMODE definition | |
| 19-Nov-08 RMS Moved I/O support routines to I/O library | |
| 29-Apr-07 RMS Modified model-specific reserved operand check macros | |
| to reflect 780 microcode patches (found by Naoki Hamada) | |
| 29-Oct-06 RMS Added clock coscheduler function | |
| 17-May-06 RMS Added CR11/CD11 support (from John Dundas) | |
| 10-May-06 RMS Added model-specific reserved operand check macros | |
| This file covers the VAX 11/780, the first VAX. | |
| System memory map | |
| 0000 0000 - 1FFF FFFF main memory | |
| 2000 0000 - 2001 FFFF nexus register space | |
| 2002 0000 - 200F FFFF reserved | |
| 2010 0000 - 2013 FFFF Unibus address space, Unibus 0 | |
| 2014 0000 - 2017 FFFF Unibus address space, Unibus 1 | |
| 2018 0000 - 201B FFFF Unibus address space, Unibus 2 | |
| 201C 0000 - 201F FFFF Unibus address space, Unibus 3 | |
| 2020 0000 - 3FFF FFFF reserved | |
| */ | |
| #ifndef FULL_VAX | |
| #define FULL_VAX 1 | |
| #endif | |
| #ifndef VAX_780_DEFS_H_ | |
| #define VAX_780_DEFS_H_ 1 | |
| /* Microcode constructs */ | |
| #define VAX780_SID (1 << 24) /* system ID */ | |
| #define VAX780_TYP (0 << 23) /* sys type: 780 */ | |
| #define VAX785_TYP (1 << 23) /* sys type: 785 */ | |
| #define VAX780_ECO (7 << 19) /* ucode revision */ | |
| #define VAX780_PLANT (0 << 12) /* plant (Salem NH) */ | |
| #define VAX780_SN (1234) | |
| #define CON_HLTPIN 0x0200 /* external CPU halt */ | |
| #define CON_HLTINS 0x0600 /* HALT instruction */ | |
| #define MCHK_RD_F 0x00 /* read fault */ | |
| #define MCHK_RD_A 0xF4 /* read abort */ | |
| #define MCHK_IBUF 0x0D /* read istream */ | |
| #define VER_FPLA 0x0C /* FPLA version */ | |
| #define VER_WCSP (VER_FPLA) /* WCS primary version */ | |
| #define VER_WCSS 0x12 /* WCS secondary version */ | |
| #define VER_PCS ((VER_WCSS >> 4) & 0x3) /* PCS version */ | |
| #define VER_WCSP_785 0x01 /* 785 WCS primary version */ | |
| #define VER_WCSS_785 0x00 /* 785 WCS secondary version */ | |
| #define VER_PCS_785 0x04 /* 785 PCS version */ | |
| #define VER_MTCH_785 0x04 /* 785 PCS/WCS primary version */ | |
| /* Interrupts */ | |
| #define IPL_HMAX 0x17 /* highest hwre level */ | |
| #define IPL_HMIN 0x14 /* lowest hwre level */ | |
| #define IPL_HLVL (IPL_HMAX - IPL_HMIN + 1) /* # hardware levels */ | |
| #define IPL_SMAX 0xF /* highest swre level */ | |
| /* Nexus constants */ | |
| #define NEXUS_NUM 16 /* number of nexus */ | |
| #define MCTL_NUM 2 /* number of mem ctrl */ | |
| #define MBA_NUM 2 /* number of MBA's */ | |
| #define TR_MCTL0 1 /* nexus assignments */ | |
| #define TR_MCTL1 2 | |
| #define TR_UBA 3 | |
| #define TR_MBA0 8 | |
| #define TR_MBA1 9 | |
| #define NEXUS_HLVL (IPL_HMAX - IPL_HMIN + 1) | |
| #define SCB_NEXUS 0x100 /* nexus intr base */ | |
| #define SBI_FAULTS 0xFC000000 /* SBI fault flags */ | |
| /* Internal I/O interrupts - relative except for clock and console */ | |
| #define IPL_CLKINT 0x18 /* clock IPL */ | |
| #define IPL_TTINT 0x14 /* console IPL */ | |
| #define IPL_MCTL0 (0x15 - IPL_HMIN) | |
| #define IPL_MCTL1 (0x15 - IPL_HMIN) | |
| #define IPL_UBA (0x15 - IPL_HMIN) | |
| #define IPL_MBA0 (0x15 - IPL_HMIN) | |
| #define IPL_MBA1 (0x15 - IPL_HMIN) | |
| /* Nexus interrupt macros */ | |
| #define SET_NEXUS_INT(dv) nexus_req[IPL_##dv] |= (1 << TR_##dv) | |
| #define CLR_NEXUS_INT(dv) nexus_req[IPL_##dv] &= ~(1 << TR_##dv) | |
| /* Machine specific IPRs */ | |
| #define MT_ACCS 40 /* FPA control */ | |
| #define MT_ACCR 41 /* FPA maint */ | |
| #define MT_WCSA 44 /* WCS address */ | |
| #define MT_WCSD 45 /* WCS data */ | |
| #define MT_SBIFS 48 /* SBI fault status */ | |
| #define MT_SBIS 49 /* SBI silo */ | |
| #define MT_SBISC 50 /* SBI silo comparator */ | |
| #define MT_SBIMT 51 /* SBI maint */ | |
| #define MT_SBIER 52 /* SBI error */ | |
| #define MT_SBITA 53 /* SBI timeout addr */ | |
| #define MT_SBIQC 54 /* SBI timeout clear */ | |
| #define MT_MBRK 60 /* microbreak */ | |
| #define MT_MAX 63 /* last valid IPR */ | |
| /* Machine specific reserved operand tests */ | |
| /* 780 microcode patch 37 - only test LR<23:0> for appropriate length */ | |
| #define ML_LR_TEST(r) if (((uint32)((r) & 0xFFFFFF)) > 0x200000) RSVD_OPND_FAULT | |
| /* 780 microcode patch 38 - only test PxBR<31>=1, PxBR<30> = 0, and xBR<1:0> = 0 */ | |
| #define ML_PXBR_TEST(r) if (((((uint32)(r)) & 0x80000000) == 0) || \ | |
| ((((uint32)(r)) & 0x40000003) != 0)) RSVD_OPND_FAULT | |
| #define ML_SBR_TEST(r) if ((((uint32)(r)) & 0x00000003) != 0) RSVD_OPND_FAULT | |
| /* 780 microcode patch 78 - test xCBB<1:0> = 0 */ | |
| #define ML_PA_TEST(r) if ((((uint32)(r)) & 0x00000003) != 0) RSVD_OPND_FAULT | |
| #define LP_AST_TEST(r) if ((r) > AST_MAX) RSVD_OPND_FAULT | |
| #define LP_MBZ84_TEST(r) if ((((uint32)(r)) & 0xF8C00000) != 0) RSVD_OPND_FAULT | |
| #define LP_MBZ92_TEST(r) if ((((uint32)(r)) & 0x7FC00000) != 0) RSVD_OPND_FAULT | |
| /* Memory */ | |
| #define MAXMEMWIDTH 23 /* max mem, MS780C */ | |
| #define MAXMEMSIZE (1 << MAXMEMWIDTH) | |
| #define MAXMEMWIDTH_X 27 /* max mem, MS780E */ | |
| #define MAXMEMSIZE_X (1 << MAXMEMWIDTH_X) | |
| #define INITMEMSIZE (1 << MAXMEMWIDTH) /* initial memory size */ | |
| #define MEMSIZE (cpu_unit.capac) | |
| #define ADDR_IS_MEM(x) (((uint32) (x)) < MEMSIZE) | |
| #define MEM_MODIFIERS { UNIT_MSIZE, (1u << 20), NULL, "1M", &cpu_set_size, NULL, NULL, "Set Memory to 1M bytes" }, \ | |
| { UNIT_MSIZE, (1u << 21), NULL, "2M", &cpu_set_size, NULL, NULL, "Set Memory to 2M bytes" }, \ | |
| { UNIT_MSIZE, (1u << 22), NULL, "4M", &cpu_set_size, NULL, NULL, "Set Memory to 4M bytes" }, \ | |
| { UNIT_MSIZE, (1u << 23), NULL, "8M", &cpu_set_size, NULL, NULL, "Set Memory to 8M bytes" }, \ | |
| { UNIT_MSIZE, (1u << 24), NULL, "16M", &cpu_set_size, NULL, NULL, "Set Memory to 16M bytes" }, \ | |
| { UNIT_MSIZE, (1u << 25), NULL, "32M", &cpu_set_size, NULL, NULL, "Set Memory to 32M bytes" }, \ | |
| { UNIT_MSIZE, (1u << 25) + (1u << 24), NULL, "48M", &cpu_set_size, NULL, NULL, "Set Memory to 48M bytes" }, \ | |
| { UNIT_MSIZE, (1u << 26), NULL, "64M", &cpu_set_size, NULL, NULL, "Set Memory to 64M bytes" }, \ | |
| { UNIT_MSIZE, (1u << 27), NULL, "128M", &cpu_set_size, NULL, NULL, "Set Memory to 128M bytes" }, \ | |
| { MTAB_XTD|MTAB_VDV|MTAB_NMO, 0, "MEMORY", NULL, NULL, &cpu_show_memory, NULL, "Display memory configuration" } | |
| extern t_stat cpu_show_memory (FILE* st, UNIT* uptr, int32 val, void* desc); | |
| #define CPU_MODEL_MODIFIERS \ | |
| { MTAB_XTD|MTAB_VDV, 0, "MODEL", NULL, \ | |
| NULL, &cpu_show_model, NULL, "Display the simulator CPU Model" } | |
| /* Unibus I/O registers */ | |
| #define UBADDRWIDTH 18 /* Unibus addr width */ | |
| #define UBADDRSIZE (1u << UBADDRWIDTH) /* Unibus addr length */ | |
| #define UBADDRMASK (UBADDRSIZE - 1) /* Unibus addr mask */ | |
| #define IOPAGEAWIDTH 13 /* IO addr width */ | |
| #define IOPAGESIZE (1u << IOPAGEAWIDTH) /* IO page length */ | |
| #define IOPAGEMASK (IOPAGESIZE - 1) /* IO addr mask */ | |
| #define UBADDRBASE 0x20100000 /* Unibus addr base */ | |
| #define IOPAGEBASE 0x2013E000 /* IO page base */ | |
| #define ADDR_IS_IO(x) ((((uint32) (x)) >= UBADDRBASE) && \ | |
| (((uint32) (x)) < (UBADDRBASE + UBADDRSIZE))) | |
| #define ADDR_IS_IOP(x) (((uint32) (x)) >= IOPAGEBASE) | |
| /* Nexus register space */ | |
| #define REGAWIDTH 17 /* REG addr width */ | |
| #define REG_V_NEXUS 13 /* nexus number */ | |
| #define REG_M_NEXUS 0xF | |
| #define REG_V_OFS 2 /* register number */ | |
| #define REG_M_OFS 0x7FF | |
| #define REGSIZE (1u << REGAWIDTH) /* REG length */ | |
| #define REGBASE 0x20000000 /* REG addr base */ | |
| #define ADDR_IS_REG(x) ((((uint32) (x)) >= REGBASE) && \ | |
| (((uint32) (x)) < (REGBASE + REGSIZE))) | |
| #define NEXUS_GETNEX(x) (((x) >> REG_V_NEXUS) & REG_M_NEXUS) | |
| #define NEXUS_GETOFS(x) (((x) >> REG_V_OFS) & REG_M_OFS) | |
| /* ROM address space in memory controllers */ | |
| #define ROMAWIDTH 12 /* ROM addr width */ | |
| #define ROMSIZE (1u << ROMAWIDTH) /* ROM size */ | |
| #define ROM0BASE (REGBASE + (TR_MCTL0 << REG_V_NEXUS) + 0x1000) | |
| #define ROM1BASE (REGBASE + (TR_MCTL1 << REG_V_NEXUS) + 0x1000) | |
| #define ADDR_IS_ROM0(x) ((((uint32) (x)) >= ROM0BASE) && \ | |
| (((uint32) (x)) < (ROM0BASE + ROMSIZE))) | |
| #define ADDR_IS_ROM1(x) ((((uint32) (x)) >= ROM1BASE) && \ | |
| (((uint32) (x)) < (ROM1BASE + ROMSIZE))) | |
| #define ADDR_IS_ROM(x) (ADDR_IS_ROM0 (x) || ADDR_IS_ROM1 (x)) | |
| /* Other address spaces */ | |
| #define ADDR_IS_CDG(x) (0) | |
| #define ADDR_IS_NVR(x) (0) | |
| /* Unibus I/O modes */ | |
| #define READ 0 /* PDP-11 compatibility */ | |
| #define WRITE (L_WORD) | |
| #define WRITEB (L_BYTE) | |
| /* Common CSI flags */ | |
| #define CSR_V_GO 0 /* go */ | |
| #define CSR_V_IE 6 /* interrupt enable */ | |
| #define CSR_V_DONE 7 /* done */ | |
| #define CSR_V_BUSY 11 /* busy */ | |
| #define CSR_V_ERR 15 /* error */ | |
| #define CSR_GO (1u << CSR_V_GO) | |
| #define CSR_IE (1u << CSR_V_IE) | |
| #define CSR_DONE (1u << CSR_V_DONE) | |
| #define CSR_BUSY (1u << CSR_V_BUSY) | |
| #define CSR_ERR (1u << CSR_V_ERR) | |
| /* Timers */ | |
| #define TMR_CLK 0 /* 100Hz clock */ | |
| /* I/O system definitions */ | |
| #define DZ_MUXES 4 /* max # of DZV muxes */ | |
| #define DZ_LINES 8 /* lines per DZV mux */ | |
| #define VH_MUXES 4 /* max # of DHU muxes */ | |
| #define DLX_LINES 16 /* max # of KL11/DL11's */ | |
| #define DCX_LINES 16 /* max # of DC11's */ | |
| #define DUP_LINES 8 /* max # of DUP11's */ | |
| #define MT_MAXFR (1 << 16) /* magtape max rec */ | |
| #define DEV_V_UBUS (DEV_V_UF + 0) /* Unibus */ | |
| #define DEV_V_MBUS (DEV_V_UF + 1) /* Massbus */ | |
| #define DEV_V_NEXUS (DEV_V_UF + 2) /* Nexus */ | |
| #define DEV_V_FFUF (DEV_V_UF + 3) /* first free flag */ | |
| #define DEV_UBUS (1u << DEV_V_UBUS) | |
| #define DEV_MBUS (1u << DEV_V_MBUS) | |
| #define DEV_NEXUS (1u << DEV_V_NEXUS) | |
| #define DEV_QBUS (0) | |
| #define DEV_Q18 (0) | |
| #define UNIBUS TRUE /* Unibus only */ | |
| #define DEV_RDX 16 /* default device radix */ | |
| /* Device information block | |
| For Massbus devices, | |
| ba = Massbus number | |
| lnt = Massbus ctrl type | |
| ack[0] = abort routine | |
| For Nexus devices, | |
| ba = Nexus number | |
| lnt = number of consecutive nexi */ | |
| #define VEC_DEVMAX 4 /* max device vec */ | |
| typedef struct { | |
| uint32 ba; /* base addr */ | |
| uint32 lnt; /* length */ | |
| t_stat (*rd)(int32 *dat, int32 ad, int32 md); | |
| t_stat (*wr)(int32 dat, int32 ad, int32 md); | |
| int32 vnum; /* vectors: number */ | |
| int32 vloc; /* locator */ | |
| int32 vec; /* value */ | |
| int32 (*ack[VEC_DEVMAX])(void); /* ack routine */ | |
| uint32 ulnt; /* IO length per unit */ | |
| } DIB; | |
| /* Unibus I/O page layout - see pdp11_io_lib.c for address layout details | |
| Massbus devices (RP, TU) do not appear in the Unibus IO page */ | |
| #define IOBA_AUTO (0) /* Assigned by Auto Configure */ | |
| /* Interrupt assignments; within each level, priority is right to left */ | |
| #define INT_V_DZRX 0 /* BR5 */ | |
| #define INT_V_DZTX 1 | |
| #define INT_V_HK 2 | |
| #define INT_V_RL 3 | |
| #define INT_V_RQ 4 | |
| #define INT_V_TQ 5 | |
| #define INT_V_TS 6 | |
| #define INT_V_RY 7 | |
| #define INT_V_XU 8 | |
| #define INT_V_DMCRX 9 | |
| #define INT_V_DMCTX 10 | |
| #define INT_V_DUPRX 11 | |
| #define INT_V_DUPTX 12 | |
| #define INT_V_LPT 0 /* BR4 */ | |
| #define INT_V_PTR 1 | |
| #define INT_V_PTP 2 | |
| #define INT_V_CR 3 | |
| #define INT_V_VHRX 4 | |
| #define INT_V_VHTX 5 | |
| #define INT_DZRX (1u << INT_V_DZRX) | |
| #define INT_DZTX (1u << INT_V_DZTX) | |
| #define INT_HK (1u << INT_V_HK) | |
| #define INT_RL (1u << INT_V_RL) | |
| #define INT_RQ (1u << INT_V_RQ) | |
| #define INT_TQ (1u << INT_V_TQ) | |
| #define INT_TS (1u << INT_V_TS) | |
| #define INT_RY (1u << INT_V_RY) | |
| #define INT_XU (1u << INT_V_XU) | |
| #define INT_LPT (1u << INT_V_LPT) | |
| #define INT_VHRX (1u << INT_V_VHRX) | |
| #define INT_VHTX (1u << INT_V_VHTX) | |
| #define INT_PTR (1u << INT_V_PTR) | |
| #define INT_PTP (1u << INT_V_PTP) | |
| #define INT_CR (1u << INT_V_CR) | |
| #define INT_DMCRX (1u << INT_V_DMCRX) | |
| #define INT_DMCTX (1u << INT_V_DMCTX) | |
| #define INT_DUPRX (1u << INT_V_DUPRX) | |
| #define INT_DUPTX (1u << INT_V_DUPTX) | |
| #define IPL_DZRX (0x15 - IPL_HMIN) | |
| #define IPL_DZTX (0x15 - IPL_HMIN) | |
| #define IPL_HK (0x15 - IPL_HMIN) | |
| #define IPL_RL (0x15 - IPL_HMIN) | |
| #define IPL_RQ (0x15 - IPL_HMIN) | |
| #define IPL_TQ (0x15 - IPL_HMIN) | |
| #define IPL_TS (0x15 - IPL_HMIN) | |
| #define IPL_RY (0x15 - IPL_HMIN) | |
| #define IPL_XU (0x15 - IPL_HMIN) | |
| #define IPL_LPT (0x14 - IPL_HMIN) | |
| #define IPL_PTR (0x14 - IPL_HMIN) | |
| #define IPL_PTP (0x14 - IPL_HMIN) | |
| #define IPL_CR (0x14 - IPL_HMIN) | |
| #define IPL_VHRX (0x14 - IPL_HMIN) | |
| #define IPL_VHTX (0x14 - IPL_HMIN) | |
| #define IPL_DMCRX (0x15 - IPL_HMIN) | |
| #define IPL_DMCTX (0x15 - IPL_HMIN) | |
| #define IPL_DUPRX (0x15 - IPL_HMIN) | |
| #define IPL_DUPTX (0x15 - IPL_HMIN) | |
| /* Device vectors */ | |
| #define VEC_AUTO (0) /* Assigned by Auto Configure */ | |
| #define VEC_FLOAT (0) /* Assigned by Auto Configure */ | |
| #define VEC_QBUS 0 | |
| #define VEC_Q 0000 | |
| /* Interrupt macros */ | |
| #define IVCL(dv) ((IPL_##dv * 32) + INT_V_##dv) | |
| #define NVCL(dv) ((IPL_##dv * 32) + TR_##dv) | |
| #define IREQ(dv) int_req[IPL_##dv] | |
| #define SET_INT(dv) int_req[IPL_##dv] = int_req[IPL_##dv] | (INT_##dv) | |
| #define CLR_INT(dv) int_req[IPL_##dv] = int_req[IPL_##dv] & ~(INT_##dv) | |
| #define IORETURN(f,v) ((f)? (v): SCPE_OK) /* cond error return */ | |
| /* Logging */ | |
| #define LOG_CPU_I 0x1 /* intexc */ | |
| #define LOG_CPU_R 0x2 /* REI */ | |
| #define LOG_CPU_P 0x4 /* context */ | |
| /* Massbus definitions */ | |
| #define MBA_RP (TR_MBA0 - TR_MBA0) /* MBA for RP */ | |
| #define MBA_TU (TR_MBA1 - TR_MBA0) /* MBA for TU */ | |
| #define MBA_RMASK 0x1F /* max 32 reg */ | |
| #define MBE_NXD 1 /* nx drive */ | |
| #define MBE_NXR 2 /* nx reg */ | |
| #define MBE_GOE 3 /* err on GO */ | |
| /* Boot definitions */ | |
| #define BOOT_MB 0 /* device codes */ | |
| #define BOOT_HK 1 /* for VMB */ | |
| #define BOOT_RL 2 | |
| #define BOOT_UDA 17 | |
| #define BOOT_CS 64 | |
| /* Function prototypes for I/O */ | |
| int32 Map_ReadB (uint32 ba, int32 bc, uint8 *buf); | |
| int32 Map_ReadW (uint32 ba, int32 bc, uint16 *buf); | |
| int32 Map_WriteB (uint32 ba, int32 bc, uint8 *buf); | |
| int32 Map_WriteW (uint32 ba, int32 bc, uint16 *buf); | |
| int32 mba_rdbufW (uint32 mbus, int32 bc, uint16 *buf); | |
| int32 mba_wrbufW (uint32 mbus, int32 bc, uint16 *buf); | |
| int32 mba_chbufW (uint32 mbus, int32 bc, uint16 *buf); | |
| int32 mba_get_bc (uint32 mbus); | |
| void mba_upd_ata (uint32 mbus, uint32 val); | |
| void mba_set_exc (uint32 mbus); | |
| void mba_set_don (uint32 mbus); | |
| void mba_set_enbdis (uint32 mbus, t_bool dis); | |
| t_stat mba_show_num (FILE *st, UNIT *uptr, int32 val, void *desc); | |
| t_stat show_nexus (FILE *st, UNIT *uptr, int32 val, void *desc); | |
| void sbi_set_errcnf (void); | |
| /* Function prototypes for system-specific unaligned support | |
| 11/780 treats unaligned like aligned */ | |
| #define ReadIOU(p,l) ReadIO (p,l) | |
| #define ReadRegU(p,l) ReadReg (p,l) | |
| #define WriteIOU(p,v,l) WriteIO (p, v, l) | |
| #define WriteRegU(p,v,l) WriteReg (p, v, l) | |
| #include "pdp11_io_lib.h" | |
| /* Function prototypes for virtual and physical memory interface (inlined) */ | |
| #include "vax_mmu.h" | |
| #endif |