098200a126
1. New Features in 3.3-2 1.1 SCP and Libraries - Added ASSERT command (from Dave Bryan) 1.2 PDP-11, VAX - Added RA60, RA71, RA81 disks 2. Bugs Fixed in 3.3-2 2.1 H316 - Fixed IORETURN macro - PT: fixed bug in OCP '0001 (found by Philipp Hachtmann) - MT: fixed error reporting from OCP (found by Philipp Hachtmann) 2.2 Interdata 32b - Fixed branches to mask new PC (from Greg Johnson) 2.3 PDP-11 - Fixed bugs in RESET for 11/70 (reported by Tim Chapman) - Fixed bug in SHOW MODEL (from Sergey Okhapkin) - Made SYSID variable for 11/70 (from Tim Chapman) - Fixed MBRK write case for 11/70 (from Tim Chapman) - RY: fixed bug in boot code (reported by Graham Toal) 2.4 VAX - Fixed initial state of cpu_extmem 2.5 HP2100 (from Dave Bryan) - Fixed missing MPCK on JRS target - Removed EXECUTE instruction (is NOP in actual microcode) - Fixed missing negative overflow renorm in StoreFP 2.6 I1401 - Fixed bug in line printer write line (reported by Van Snyder)
205 lines
7.2 KiB
C
205 lines
7.2 KiB
C
/* h316_defs.h: Honeywell 316/516 simulator definitions
|
||
|
||
Copyright (c) 1999-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.
|
||
|
||
15-Feb-05 RMS Added start button interrupt
|
||
01-Dec-04 RMS Added double precision constants
|
||
24-Oct-03 RMS Added DMA/DMC support
|
||
25-Apr-03 RMS Revised for extended file support
|
||
*/
|
||
|
||
#ifndef _H316_DEFS_H_
|
||
#define _H316_DEFS_H_ 0
|
||
|
||
#include "sim_defs.h" /* simulator defns */
|
||
|
||
/* Simulator stop codes */
|
||
|
||
#define STOP_RSRV 1 /* must be 1 */
|
||
#define STOP_IODV 2 /* must be 2 */
|
||
#define STOP_HALT 3 /* HALT */
|
||
#define STOP_IBKPT 4 /* breakpoint */
|
||
#define STOP_IND 5 /* indirect loop */
|
||
#define STOP_DMAER 6 /* DMA error */
|
||
#define STOP_MTWRP 7 /* MT write protected */
|
||
#define STOP_DPOVR 8 /* DP write overrun */
|
||
#define STOP_DPFMT 9 /* DP invalid format */
|
||
|
||
/* Memory */
|
||
|
||
#define MAXMEMSIZE 32768 /* max memory size */
|
||
#define MEMSIZE (cpu_unit.capac) /* actual memory size */
|
||
#define X_AMASK (MAXMEMSIZE - 1) /* ext address mask */
|
||
#define NX_AMASK ((MAXMEMSIZE / 2) - 1) /* nx address mask */
|
||
#define MEM_ADDR_OK(x) (((uint32) (x)) < MEMSIZE)
|
||
|
||
/* Architectural constants */
|
||
|
||
#define SIGN 0100000 /* sign */
|
||
#define DP_SIGN 010000000000
|
||
#define DMASK 0177777 /* data mask */
|
||
#define MMASK (DMASK & ~SIGN) /* magnitude mask */
|
||
#define XR M[0]
|
||
#define M_CLK 061 /* clock location */
|
||
#define M_RSTINT 062 /* restrict int */
|
||
#define M_INT 063 /* int location */
|
||
|
||
/* CPU options */
|
||
|
||
#define UNIT_V_MSIZE (UNIT_V_UF + 0) /* dummy mask */
|
||
#define UNIT_V_EXT (UNIT_V_UF + 1) /* extended mem */
|
||
#define UNIT_V_HSA (UNIT_V_UF + 2) /* high speed arith */
|
||
#define UNIT_V_DMC (UNIT_V_UF + 3) /* DMC */
|
||
#define UNIT_MSIZE (1u << UNIT_V_MSIZE)
|
||
#define UNIT_EXT (1u << UNIT_V_EXT)
|
||
#define UNIT_HSA (1u << UNIT_V_HSA)
|
||
#define UNIT_DMC (1u << UNIT_V_DMC)
|
||
|
||
/* Instruction format */
|
||
|
||
#define I_M_OP 077 /* opcode */
|
||
#define I_V_OP 10
|
||
#define I_GETOP(x) (((x) >> I_V_OP) & I_M_OP)
|
||
#define I_M_FNC 017 /* function */
|
||
#define I_V_FNC 6
|
||
#define I_GETFNC(x) (((x) >> I_V_FNC) & I_M_FNC)
|
||
#define IA 0100000 /* indirect address */
|
||
#define IDX 0040000 /* indexed */
|
||
#define SC 0001000 /* sector */
|
||
#define DISP 0000777 /* page displacement */
|
||
#define PAGENO 0077000 /* page number */
|
||
#define INCLRA (010 << I_V_FNC) /* INA clear A */
|
||
#define DEVMASK 0000077 /* device mask */
|
||
#define SHFMASK 0000077 /* shift mask */
|
||
|
||
/* I/O opcodes */
|
||
|
||
#define ioOCP 0 /* output control */
|
||
#define ioSKS 1 /* skip if set */
|
||
#define ioINA 2 /* input to A */
|
||
#define ioOTA 3 /* output from A */
|
||
#define ioEND 4 /* channel end */
|
||
|
||
/* Device information block */
|
||
|
||
struct h316_dib {
|
||
uint32 dev; /* device number */
|
||
uint32 chan; /* dma/dmc channel */
|
||
uint32 num; /* number of slots */
|
||
int32 (*io) (int32 inst, int32 fnc, int32 dat, int32 dev); };
|
||
|
||
typedef struct h316_dib DIB;
|
||
|
||
/* DMA/DMC channel numbers */
|
||
|
||
#define IOBUS 0 /* IO bus */
|
||
#define DMA_MIN 1 /* 4 DMA channels */
|
||
#define DMA_MAX 4
|
||
#define DMC_MIN 1 /* 16 DMC channels */
|
||
#define DMC_MAX 16
|
||
|
||
#define DMA1 (DMA_MIN)
|
||
#define DMC1 (DMA_MAX+DMC_MIN)
|
||
|
||
/* DMA/DMC bit assignments in channel request word */
|
||
|
||
#define DMA_V_DMA1 0 /* DMA channels */
|
||
#define DMC_V_DMC1 4 /* DMC channels */
|
||
#define SET_CH_REQ(x) chan_req = chan_req | (1 << (x))
|
||
#define Q_DMA(x) (((x) >= 0) && ((x) < DMC_V_DMC1))
|
||
|
||
/* DMA/DMC definitions */
|
||
|
||
#define DMA_IN 0100000 /* input flag */
|
||
#define DMC_BASE 020 /* DMC memory base */
|
||
|
||
/* I/O device codes */
|
||
|
||
#define PTR 001 /* paper tape reader */
|
||
#define PTP 002 /* paper tape punch */
|
||
#define LPT 003 /* line printer */
|
||
#define TTY 004 /* console */
|
||
#define CDR 005 /* card reader */
|
||
#define MT 010 /* mag tape data */
|
||
#define CLK_KEYS 020 /* clock/keys (CPU) */
|
||
#define FHD 022 /* fixed head disk */
|
||
#define DMA 024 /* DMA control */
|
||
#define DP 025 /* moving head disk */
|
||
#define DEV_MAX 64
|
||
|
||
/* Interrupt flags, definitions correspond to SMK bits */
|
||
|
||
#define INT_V_CLK 0 /* clock */
|
||
#define INT_V_MPE 1 /* parity error */
|
||
#define INT_V_LPT 2 /* line printer */
|
||
#define INT_V_CDR 4 /* card reader */
|
||
#define INT_V_TTY 5 /* teletype */
|
||
#define INT_V_PTP 6 /* paper tape punch */
|
||
#define INT_V_PTR 7 /* paper tape reader */
|
||
#define INT_V_FHD 8 /* fixed head disk */
|
||
#define INT_V_DP 12 /* moving head disk */
|
||
#define INT_V_MT 15 /* mag tape */
|
||
#define INT_V_START 16 /* start button */
|
||
#define INT_V_NODEF 17 /* int not deferred */
|
||
#define INT_V_ON 18 /* int on */
|
||
|
||
/* I/O macros */
|
||
|
||
#define IOT_V_REASON 17
|
||
#define IOT_V_SKIP 16
|
||
#define IOT_SKIP (1u << IOT_V_SKIP)
|
||
#define IORETURN(f,v) (((f)? (v): SCPE_OK) << IOT_V_REASON)
|
||
#define IOBADFNC(x) (((stop_inst) << IOT_V_REASON) | (x))
|
||
#define IOSKIP(x) (IOT_SKIP | (x))
|
||
|
||
#define INT_CLK (1u << INT_V_CLK)
|
||
#define INT_MPE (1u << INT_V_MPE)
|
||
#define INT_LPT (1u << INT_V_LPT)
|
||
#define INT_CDR (1u << INT_V_CDR)
|
||
#define INT_TTY (1u << INT_V_TTY)
|
||
#define INT_PTP (1u << INT_V_PTP)
|
||
#define INT_PTR (1u << INT_V_PTR)
|
||
#define INT_FHD (1u << INT_V_FHD)
|
||
#define INT_DP (1u << INT_V_DP)
|
||
#define INT_MT (1u << INT_V_MT)
|
||
#define INT_START (1u << INT_V_START)
|
||
#define INT_NODEF (1u << INT_V_NODEF)
|
||
#define INT_ON (1u << INT_V_ON)
|
||
#define INT_NMI (INT_START)
|
||
#define INT_PEND (INT_ON | INT_NODEF)
|
||
|
||
#define SET_INT(x) dev_int = dev_int | (x)
|
||
#define CLR_INT(x) dev_int = dev_int & ~(x)
|
||
#define TST_INT(x) ((dev_int & (x)) != 0)
|
||
#define CLR_ENB(x) dev_enb = dev_enb & ~(x)
|
||
#define TST_INTREQ(x) ((dev_int & dev_enb & (x)) != 0)
|
||
|
||
/* Prototypes */
|
||
|
||
t_stat io_set_iobus (UNIT *uptr, int32 val, char *cptr, void *desc);
|
||
t_stat io_set_dma (UNIT *uptr, int32 val, char *cptr, void *desc);
|
||
t_stat io_set_dmc (UNIT *uptr, int32 val, char *cptr, void *desc);
|
||
t_stat io_show_chan (FILE *st, UNIT *uptr, int32 val, void *desc);
|
||
|
||
#endif
|