26aa6de663
RESTRICTION: The PDP-15 FPP is only partially debugged. Do NOT enable this feature for normal operations. WARNING: The core simulator files (scp.c, sim_*.c) have been reorganized. Unzip V3.2-0 to an empty directory before attempting to compile the source. IMPORTANT: If you are compiling for UNIX, please read the notes for Ethernet very carefully. You may need to download a new version of the pcap library, or make changes to the makefile, to get Ethernet support to work. 1. New Features in 3.2-0 1.1 SCP and libraries - Added SHOW <device> RADIX command. - Added SHOW <device> MODIFIERS command. - Added SHOW <device> NAMES command. - Added SET/SHOW <device> DEBUG command. - Added sim_vm_parse_addr and sim_vm_fprint_addr optional interfaces. - Added REG_VMAD flag. - Split SCP into separate libraries for easier modification. - Added more room to the device and unit flag fields. - Changed terminal multiplexor library to support unlimited. number of async lines. 1.2 All DECtapes - Added STOP_EOR flag to enable end-of-reel error stop - Added device debug support. 1.3 Nova and Eclipse - Added QTY and ALM multiplexors (Bruce Ray). 1.4 LGP-30 - Added LGP-30/LGP-21 simulator. 1.5 PDP-11 - Added format, address increment inhibit, transfer overrun detection to RK. - Added device debug support to HK, RP, TM, TQ, TS. - Added DEUNA/DELUA (XU) support (Dave Hittner). - Add DZ per-line logging. 1.6 18b PDP's - Added support for 1-4 (PDP-9)/1-16 (PDP-15) additional terminals. 1.7 PDP-10 - Added DEUNA/DELUA (XU) support (Dave Hittner). 1.8 VAX - Added extended memory to 512MB (Mark Pizzolato). - Added RXV21 support. 2. Bugs Fixed in 3.2-0 2.1 SCP - Fixed double logging of SHOW BREAK (found by Mark Pizzolato). - Fixed implementation of REG_VMIO. 2.2 Nova and Eclipse - Fixed device enable/disable support (found by Bruce Ray). 2.3 PDP-1 - Fixed bug in LOAD (found by Mark Crispin). 2.4 PDP-10 - Fixed bug in floating point unpack. - Fixed bug in FIXR (found by Phil Stone, fixed by Chris Smith). 2.6 PDP-11 - Fixed bug in RQ interrupt control (found by Tom Evans). 2.6 PDP-18B - Fixed bug in PDP-15 XVM g_mode implementation. - Fixed bug in PDP-15 indexed address calculation. - Fixed bug in PDP-15 autoindexed address calculation. - Fixed bugs in FPP-15 instruction decode. - Fixed clock response to CAF. - Fixed bug in hardware read-in mode bootstrap. - Fixed PDP-15 XVM instruction decoding errors. 2.7 VAX - Fixed PC read fault in EXTxV. - Fixed PC write fault in INSV.
285 lines
9.8 KiB
C
285 lines
9.8 KiB
C
/* nova_defs.h: NOVA/Eclipse simulator definitions
|
||
|
||
Copyright (c) 1993-2004, 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.
|
||
|
||
14-Jan-04 BKR Added support for QTY and ALM
|
||
22-Nov-03 CEO Added support for PIT device
|
||
19-Jan-03 RMS Changed CMASK to CDMASK for Apple Dev kit conflict
|
||
03-Oct-02 RMS Added device information structure
|
||
22-Dec-00 RMS Added Bruce Ray's second terminal support
|
||
10-Dec-00 RMS Added Charles Owen's Eclipse support
|
||
08-Dec-00 RMS Added Bruce Ray's plotter support
|
||
15-Oct-00 RMS Added stack, byte, trap instructions
|
||
14-Apr-99 RMS Changed t_addr to unsigned
|
||
16-Mar-95 RMS Added dynamic memory size
|
||
06-Dec-95 RMS Added magnetic tape
|
||
|
||
The author gratefully acknowledges the help of Tom West, Diana Englebart,
|
||
Carl Friend, Bruce Ray, and Charles Owen in resolving questions about
|
||
the NOVA.
|
||
*/
|
||
|
||
#include "sim_defs.h" /* simulator defns */
|
||
|
||
/* Simulator stop codes */
|
||
|
||
#define STOP_RSRV 1 /* must be 1 */
|
||
#define STOP_HALT 2 /* HALT */
|
||
#define STOP_IBKPT 3 /* breakpoint */
|
||
#define STOP_IND 4 /* indirect loop */
|
||
#define STOP_IND_INT 5 /* ind loop, intr */
|
||
#define STOP_IND_TRP 6 /* ind loop, trap */
|
||
|
||
/* Memory */
|
||
|
||
#if defined (ECLIPSE)
|
||
#define MAXMEMSIZE 1048576 /* max memory size */
|
||
#else
|
||
#define MAXMEMSIZE 32768 /* max memory size */
|
||
#endif
|
||
#define AMASK 077777 /* logical addr mask */
|
||
#define PAMASK (MAXMEMSIZE - 1) /* physical addr mask */
|
||
#define MEMSIZE (cpu_unit.capac) /* actual memory size */
|
||
#define A_V_IND 15 /* ind: indirect */
|
||
#define A_IND (1 << A_V_IND)
|
||
#define MEM_ADDR_OK(x) (((uint32) (x)) < MEMSIZE)
|
||
|
||
/* Architectural constants */
|
||
|
||
#define SIGN 0100000 /* sign */
|
||
#define DMASK 0177777 /* data mask */
|
||
#define CBIT (DMASK + 1) /* carry bit */
|
||
#define CDMASK (CBIT | DMASK) /* carry + data */
|
||
|
||
/* Reserved memory locations */
|
||
|
||
#define INT_SAV 0 /* intr saved PC */
|
||
#define INT_JMP 1 /* intr jmp @ */
|
||
#define STK_JMP 3 /* stack jmp @ */
|
||
#define TRP_SAV 046 /* trap saved PC */
|
||
#define TRP_JMP 047 /* trap jmp @ */
|
||
#define AUTO_INC 020 /* start autoinc */
|
||
#define AUTO_DEC 030 /* start autodec */
|
||
|
||
/* Instruction format */
|
||
|
||
#define I_OPR 0100000 /* operate */
|
||
#define I_M_SRC 03 /* OPR: src AC */
|
||
#define I_V_SRC 13
|
||
#define I_GETSRC(x) (((x) >> I_V_SRC) & I_M_SRC)
|
||
#define I_M_DST 03 /* dst AC */
|
||
#define I_V_DST 11
|
||
#define I_GETDST(x) (((x) >> I_V_DST) & I_M_DST)
|
||
#define I_M_ALU 07 /* OPR: ALU op */
|
||
#define I_V_ALU 8
|
||
#define I_GETALU(x) (((x) >> I_V_ALU) & I_M_ALU)
|
||
#define I_M_SHF 03 /* OPR: shift */
|
||
#define I_V_SHF 6
|
||
#define I_GETSHF(x) (((x) >> I_V_SHF) & I_M_SHF)
|
||
#define I_M_CRY 03 /* OPR: carry */
|
||
#define I_V_CRY 4
|
||
#define I_GETCRY(x) (((x) >> I_V_CRY) & I_M_CRY)
|
||
#define I_V_NLD 3 /* OPR: no load */
|
||
#define I_NLD (1 << I_V_NLD)
|
||
#define I_M_SKP 07 /* OPR: skip */
|
||
#define I_V_SKP 0
|
||
#define I_GETSKP(x) (((x) >> I_V_SKP) & I_M_SKP)
|
||
|
||
#define I_M_OPAC 017 /* MRF: opcode + AC */
|
||
#define I_V_OPAC 11
|
||
#define I_GETOPAC(x) (((x) >> I_V_OPAC) & I_M_OPAC)
|
||
#define I_V_IND 10 /* MRF: indirect */
|
||
#define I_IND (1 << I_V_IND)
|
||
#define I_M_MODE 03 /* MRF: mode */
|
||
#define I_V_MODE 8
|
||
#define I_GETMODE(x) (((x) >> I_V_MODE) & I_M_MODE)
|
||
#define I_M_DISP 0377 /* MRF: disp */
|
||
#define I_V_DISP 0
|
||
#define I_GETDISP(x) (((x) >> I_V_DISP) & I_M_DISP)
|
||
#define DISPSIZE (I_M_DISP + 1) /* page size */
|
||
#define DISPSIGN (DISPSIZE >> 1) /* page sign */
|
||
|
||
#define I_M_IOT 07 /* IOT: code */
|
||
#define I_V_IOT 8
|
||
#define I_GETIOT(x) (((x) >> I_V_IOT) & I_M_IOT)
|
||
#define I_M_PULSE 03 /* IOT pulse */
|
||
#define I_V_PULSE 6
|
||
#define I_GETPULSE(x) (((x) >> I_V_PULSE) & I_M_PULSE)
|
||
#define I_M_DEV 077 /* IOT: device */
|
||
#define I_V_DEV 0
|
||
#define I_GETDEV(x) (((x) >> I_V_DEV) & I_M_DEV)
|
||
|
||
#define I_M_XOP 037 /* XOP: code */
|
||
#define I_V_XOP 6
|
||
#define I_GETXOP(x) (((x) >> I_V_XOP) & I_M_XOP)
|
||
|
||
/* IOT return codes */
|
||
|
||
#define IOT_V_REASON 16 /* set reason */
|
||
#define IORETURN(f,v) ((f)? (v): SCPE_OK) /* stop on error */
|
||
|
||
/* IOT fields */
|
||
|
||
#define ioNIO 0 /* opcode field */
|
||
#define ioDIA 1
|
||
#define ioDOA 2
|
||
#define ioDIB 3
|
||
#define ioDOB 4
|
||
#define ioDIC 5
|
||
#define ioDOC 6
|
||
#define ioSKP 7
|
||
|
||
#define iopN 0 /* pulse field */
|
||
#define iopS 1
|
||
#define iopC 2
|
||
#define iopP 3
|
||
|
||
/* Device numbers */
|
||
|
||
#define DEV_LOW 010 /* lowest intr dev */
|
||
#define DEV_HIGH 051 /* highest intr dev */
|
||
#define DEV_MDV 001 /* multiply/divide */
|
||
#define DEV_ECC 002 /* ECC memory control */
|
||
#define DEV_MAP 003 /* MMPU control */
|
||
#define DEV_TTI 010 /* console input */
|
||
#define DEV_TTO 011 /* console output */
|
||
#define DEV_PTR 012 /* paper tape reader */
|
||
#define DEV_PTP 013 /* paper tape punch */
|
||
#define DEV_CLK 014 /* clock */
|
||
#define DEV_PLT 015 /* plotter */
|
||
#define DEV_CDR 016 /* card reader */
|
||
#define DEV_LPT 017 /* line printer */
|
||
#define DEV_DSK 020 /* fixed head disk */
|
||
#define DEV_MTA 022 /* magtape */
|
||
#define DEV_DCM 024 /* data comm mux */
|
||
#define DEV_ADCV 030 /* A/D converter */
|
||
#define DEV_QTY 030 /* 4060 multiplexor */
|
||
#define DEV_DKP 033 /* disk pack */
|
||
#define DEV_CAS 034 /* cassette */
|
||
#define DEV_ALM 034 /* ALM/ULM multiplexor */
|
||
#define DEV_PIT 043 /* programmable interval timer */
|
||
#define DEV_TTI1 050 /* second console input */
|
||
#define DEV_TTO1 051 /* second console output */
|
||
#define DEV_CPU 077 /* CPU control */
|
||
|
||
/* I/O structure
|
||
|
||
The NOVA I/O structure is tied together by dev_table, indexed by
|
||
the device number. Each entry in dev_table consists of
|
||
|
||
mask device mask for busy, done (simulator representation)
|
||
pi pi disable bit (hardware representation)
|
||
routine IOT action routine
|
||
|
||
dev_table is populated at run time from the device information
|
||
blocks in each device.
|
||
*/
|
||
|
||
struct ndev {
|
||
int32 mask; /* done/busy mask */
|
||
int32 pi; /* assigned pi bit */
|
||
int32 (*routine)(); /* dispatch routine */
|
||
};
|
||
|
||
struct nova_dib {
|
||
int32 dnum; /* device number */
|
||
int32 mask; /* done/busy mask */
|
||
int32 pi; /* assigned pi bit */
|
||
int32 (*routine)(); /* dispatch routine */
|
||
};
|
||
|
||
typedef struct nova_dib DIB;
|
||
|
||
/* Device flags (simulator representation)
|
||
|
||
Priority (for INTA) runs from low numbers to high
|
||
*/
|
||
|
||
#define INT_V_PIT 2 /* PIT */
|
||
#define INT_V_DKP 3 /* moving head disk */
|
||
#define INT_V_DSK 4 /* fixed head disk */
|
||
#define INT_V_MTA 5 /* magnetic tape */
|
||
#define INT_V_LPT 6 /* line printer */
|
||
#define INT_V_CLK 7 /* clock */
|
||
#define INT_V_PTR 8 /* paper tape reader */
|
||
#define INT_V_PTP 9 /* paper tape punch */
|
||
#define INT_V_PLT 10 /* plotter */
|
||
#define INT_V_TTI 11 /* keyboard */
|
||
#define INT_V_TTO 12 /* terminal */
|
||
#define INT_V_TTI1 13 /* second keyboard */
|
||
#define INT_V_TTO1 14 /* second terminal */
|
||
#define INT_V_QTY 15 /* QTY multiplexor */
|
||
#define INT_V_ALM 16 /* ALM multiplexor */
|
||
#define INT_V_STK 17 /* stack overflow */
|
||
#define INT_V_NO_ION_PENDING 18 /* ion delay */
|
||
#define INT_V_ION 19 /* interrupts on */
|
||
|
||
#define INT_PIT (1 << INT_V_PIT)
|
||
#define INT_DKP (1 << INT_V_DKP)
|
||
#define INT_DSK (1 << INT_V_DSK)
|
||
#define INT_MTA (1 << INT_V_MTA)
|
||
#define INT_LPT (1 << INT_V_LPT)
|
||
#define INT_CLK (1 << INT_V_CLK)
|
||
#define INT_PTR (1 << INT_V_PTR)
|
||
#define INT_PTP (1 << INT_V_PTP)
|
||
#define INT_PLT (1 << INT_V_PLT)
|
||
#define INT_TTI (1 << INT_V_TTI)
|
||
#define INT_TTO (1 << INT_V_TTO)
|
||
#define INT_TTI1 (1 << INT_V_TTI1)
|
||
#define INT_TTO1 (1 << INT_V_TTO1)
|
||
#define INT_QTY (1 << INT_V_QTY)
|
||
#define INT_ALM (1 << INT_V_ALM)
|
||
#define INT_STK (1 << INT_V_STK)
|
||
#define INT_NO_ION_PENDING (1 << INT_V_NO_ION_PENDING)
|
||
#define INT_ION (1 << INT_V_ION)
|
||
#define INT_DEV ((1 << INT_V_STK) - 1) /* device ints */
|
||
#define INT_PENDING INT_ION+INT_NO_ION_PENDING
|
||
|
||
/* PI disable bits */
|
||
|
||
#define PI_PIT 0001000
|
||
#define PI_DKP 0000400
|
||
#define PI_DSK 0000100
|
||
#define PI_MTA 0000040
|
||
#define PI_LPT 0000010
|
||
#define PI_CLK 0000004
|
||
#define PI_PTR 0000020
|
||
#define PI_PTP 0000004
|
||
#define PI_PLT 0000010
|
||
#define PI_QTY 0000002
|
||
#define PI_ALM 0000002
|
||
#define PI_TTI 0000002
|
||
#define PI_TTO 0000001
|
||
#define PI_TTI1 PI_TTI
|
||
#define PI_TTO1 PI_TTO
|
||
/* #define PI_CDR 0000040 */
|
||
/* #define PI_DCM 0100000 */
|
||
/* #define PI_CAS 0000040 */
|
||
/* #define PI_ADCV 0000002 */
|
||
|
||
/* Function prototypes */
|
||
|
||
int32 MapAddr (int32 map, int32 addr);
|
||
t_stat set_enb (UNIT *uptr, int32 val, char *cptr, void *desc);
|
||
t_stat set_dsb (UNIT *uptr, int32 val, char *cptr, void *desc);
|