mirror of
https://github.com/simh/simh.git
synced 2026-01-25 19:56:25 +00:00
Notes For V3.0-0
Because some key files have changed, V3.0 should be unzipped to a clean directory. 1. New Features in 3.0-0 1.1 SCP and Libraries - Added ASSIGN/DEASSIGN (logical name) commands. - Changed RESTORE to unconditionally detach files. - Added E11 and TPC format support to magtape library. - Fixed bug in SHOW CONNECTIONS. - Added USE_ADDR64 support 1.2 All magtapes - Magtapes support SIMH format, E11 format, and TPC format (read only). - SET <tape_unit> FORMAT=format sets the specified tape unit's format. - SHOW <tape_unit> FORMAT displays the specified tape unit's format. - Tape format can also be set as part of the ATTACH command, using the -F switch. 1.3 VAX - VAX can be compiled without USE_INT64. - If compiled with USE_INT64 and USE_ADDR64, RQ and TQ controllers support files > 2GB. - VAX ROM has speed control (SET ROM DELAY/NODELAY). 2. Bugs Fixed in 3.01-0 2.1 VAX - Fixed CVTfi bug: integer overflow not set if exponent out of range - Fixed EMODx bugs: o First and second operands reversed o Separated fraction received wrong exponent o Overflow calculation on separated integer incorrect o Fraction not set to zero if exponent out of range - Fixed interval timer and ROM access to pass power-up self-test even on very fast host processors (fixes from Mark Pizzolato). 2.2 1401 - Fixed mnemonic, instruction lengths, and reverse scan length check bug for MCS. - Fixed MCE bug, BS off by 1 if zero suppress. - Fixed chaining bug, D lost if return to SCP. - Fixed H branch, branch occurs after continue. - Added check for invalid 8 character MCW, LCA. - Fixed magtape load-mode end of record response. 2.3 Nova - Fixed DSK variable size interaction with restore. 2.4 PDP-1 - Fixed DT variable size interaction with restore. 2.5 PDP-11 - Fixed DT variable size interaction with restore. - Fixed bug in MMR1 update (found by Tim Stark). - Added XQ features and fixed bugs: o Corrected XQ interrupts on IE state transition (code by Tom Evans). o Added XQ interrupt clear on soft reset. o Removed XQ interrupt when setting XL or RL (multiple people). o Added SET/SHOW XQ STATS. o Added SHOW XQ FILTERS. o Added ability to split received packet into multiple buffers. o Added explicit runt and giant packet processing. 2.6 PDP-18B - Fixed DT, RF variable size interaction with restore. - Fixed MT bug in MTTR. 2.7 PDP-8 - Fixed DT, DF, RF, RX variable size interaction with restore. - Fixed MT bug in SKTR. 2.8 HP2100 - Fixed bug in DP (13210A controller only), DQ read status. - Fixed bug in DP, DQ seek complete. 2.9 GRI - Fixed bug in SC queue pointer management. 3. New Features in 3.0 vs prior releases N/A 4. Bugs Fixed in 3.0 vs prior releases N/A 5. General Notes WARNING: The RESTORE command has changed. RESTORE will now detach an attached file on a unit, if that unit did not have an attached file in the saved configuration. This is required to assure that the unit flags and the file state are consistent. WARNING: The compilation scheme for the PDP-10, PDP-11, and VAX has changed. Use one of the supplied build files, or read the documentation carefully, before compiling any of these simulators.
This commit is contained in:
committed by
Mark Pizzolato
parent
43385c9616
commit
4ffd3be790
@@ -2,7 +2,7 @@
|
||||
|
||||
Modified from the original NOVA simulator by Robert Supnik.
|
||||
|
||||
Copyright (c) 1998-2002, Charles E Owen
|
||||
Copyright (c) 1998-2003, Charles E Owen
|
||||
Portions Copyright (c) 1993-2002, Robert M Supnik
|
||||
|
||||
Permission is hereby granted, free of charge, to any person obtaining a
|
||||
@@ -2953,7 +2953,7 @@ int32 pushrtn(int32 pc)
|
||||
int32 GetMap(int32 addr)
|
||||
{
|
||||
int32 page;
|
||||
t_addr paddr;
|
||||
uint32 paddr;
|
||||
|
||||
switch (Usermap) {
|
||||
case 0:
|
||||
@@ -3015,7 +3015,7 @@ int32 GetMap(int32 addr)
|
||||
int32 PutMap(int32 addr, int32 data)
|
||||
{
|
||||
int32 page;
|
||||
t_addr paddr;
|
||||
uint32 paddr;
|
||||
|
||||
switch (Usermap) {
|
||||
case 0:
|
||||
@@ -3060,7 +3060,7 @@ int32 PutMap(int32 addr, int32 data)
|
||||
#if 0
|
||||
int16 GetDCHMap(int32 map, int32 addr)
|
||||
{
|
||||
t_addr paddr;
|
||||
uint32 paddr;
|
||||
if (!(MapStat & 02)) return M[addr];
|
||||
paddr = ((Map[map][(addr >> 10) & 037] & PAGEMASK) << 10) | (addr & 001777);
|
||||
if (paddr < MEMSIZE)
|
||||
@@ -3070,7 +3070,7 @@ int16 GetDCHMap(int32 map, int32 addr)
|
||||
|
||||
int16 PutDCHMap(int32 map, int32 addr, int16 data)
|
||||
{
|
||||
t_addr paddr;
|
||||
uint32 paddr;
|
||||
if (!(MapStat & 02)) {
|
||||
M[addr] = data;
|
||||
return (data);
|
||||
@@ -3192,7 +3192,7 @@ return SCPE_OK;
|
||||
t_stat cpu_set_size (UNIT *uptr, int32 val, char *cptr, void *desc)
|
||||
{
|
||||
int32 mc = 0;
|
||||
t_addr i;
|
||||
uint32 i;
|
||||
|
||||
if ((val <= 0) || (val > MAXMEMSIZE) || ((val & 07777) != 0))
|
||||
return SCPE_ARG;
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
/* eclipse_tt.c: Eclipse console terminal simulator
|
||||
|
||||
Copyright (c) 1998-2002, Charles E Owen
|
||||
Copyright (c) 1998-2003, Charles E Owen
|
||||
Portions copyright (c) 1993-2002, Robert M Supnik
|
||||
Written by Charles Owen, used by gracious permission
|
||||
Commercial use prohibited
|
||||
@@ -8,6 +8,7 @@
|
||||
tti terminal input
|
||||
tto terminal output
|
||||
|
||||
25-Apr-03 RMS Revised for extended file support
|
||||
03-Oct-02 RMS Added DIBs
|
||||
30-May-02 RMS Widened POS to 32b
|
||||
28-Jan-02 RMS Cleaned up compiler warnings
|
||||
@@ -49,7 +50,7 @@ REG tti_reg[] = {
|
||||
{ FLDATA (DONE, dev_done, INT_V_TTI) },
|
||||
{ FLDATA (DISABLE, dev_disable, INT_V_TTI) },
|
||||
{ FLDATA (INT, int_req, INT_V_TTI) },
|
||||
{ DRDATA (POS, tti_unit.pos, 32), PV_LEFT },
|
||||
{ DRDATA (POS, tti_unit.pos, T_ADDR_W), PV_LEFT },
|
||||
{ DRDATA (TIME, tti_unit.wait, 24), REG_NZ + PV_LEFT },
|
||||
{ NULL } };
|
||||
|
||||
@@ -82,7 +83,7 @@ REG tto_reg[] = {
|
||||
{ FLDATA (DONE, dev_done, INT_V_TTO) },
|
||||
{ FLDATA (DISABLE, dev_disable, INT_V_TTO) },
|
||||
{ FLDATA (INT, int_req, INT_V_TTO) },
|
||||
{ DRDATA (POS, tto_unit.pos, 32), PV_LEFT },
|
||||
{ DRDATA (POS, tto_unit.pos, T_ADDR_W), PV_LEFT },
|
||||
{ DRDATA (TIME, tto_unit.wait, 24), PV_LEFT },
|
||||
{ NULL } };
|
||||
|
||||
|
||||
@@ -674,9 +674,9 @@ else { /* IOT */
|
||||
case ioDOC:
|
||||
if ((dstAC == 2) && (cpu_unit.flags & UNIT_MDV)) {
|
||||
uint32 mddata, uAC0, uAC1, uAC2;
|
||||
uAC0 = (unsigned int32) AC[0];
|
||||
uAC1 = (unsigned int32) AC[1];
|
||||
uAC2 = (unsigned int32) AC[2];
|
||||
uAC0 = (uint32) AC[0];
|
||||
uAC1 = (uint32) AC[1];
|
||||
uAC2 = (uint32) AC[2];
|
||||
if (pulse == iopP) { /* mul */
|
||||
mddata = (uAC1 * uAC2) + uAC0;
|
||||
AC[0] = (mddata >> 16) & DMASK;
|
||||
@@ -704,8 +704,8 @@ else { /* IOT */
|
||||
C = CBIT;
|
||||
else C = 0;
|
||||
AC[0] = AC[0] & DMASK; } } }
|
||||
break; } /* end case code */
|
||||
} /* end if mul/div */
|
||||
break; } /* end case code */
|
||||
} /* end if mul/div */
|
||||
|
||||
/* IOT, continued */
|
||||
|
||||
|
||||
@@ -61,7 +61,7 @@
|
||||
#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) (((t_addr) (x)) < MEMSIZE)
|
||||
#define MEM_ADDR_OK(x) (((uint32) (x)) < MEMSIZE)
|
||||
|
||||
/* Architectural constants */
|
||||
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
/* nova_dkp.c: NOVA moving head disk simulator
|
||||
|
||||
Copyright (c) 1993-2002, Robert M. Supnik
|
||||
Copyright (c) 1993-2003, 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"),
|
||||
@@ -25,6 +25,7 @@
|
||||
|
||||
dkp moving head disk
|
||||
|
||||
25-Apr-03 RMS Revised autosizing
|
||||
08-Oct-02 RMS Added DIB
|
||||
06-Jan-02 RMS Revised enable/disable support
|
||||
30-Nov-01 RMS Added read only unit, extended SET/SHOW support
|
||||
@@ -76,10 +77,10 @@
|
||||
#define USSC_M_UNIT 03
|
||||
#define USSC_UNIT (USSC_M_UNIT << USSC_V_UNIT)
|
||||
#define GET_COUNT(x) (((x) >> USSC_V_COUNT) & USSC_M_COUNT)
|
||||
#define GET_SECT(x,dt) ((drv_tab[dt].new)? \
|
||||
#define GET_SECT(x,dt) ((drv_tab[dt].newf)? \
|
||||
(((x) >> USSC_V_NSECTOR) & USSC_M_NSECTOR): \
|
||||
(((x) >> USSC_V_OSECTOR) & USSC_M_OSECTOR) )
|
||||
#define GET_SURF(x,dt) ((drv_tab[dt].new)? \
|
||||
#define GET_SURF(x,dt) ((drv_tab[dt].newf)? \
|
||||
(((x) >> USSC_V_NSURFACE) & USSC_M_NSURFACE): \
|
||||
(((x) >> USSC_V_OSURFACE) & USSC_M_OSURFACE) )
|
||||
#define GET_UNIT(x) (((x) >> USSC_V_UNIT) & USSC_M_UNIT)
|
||||
@@ -105,10 +106,10 @@
|
||||
#define FCCY_SEEK 2
|
||||
#define FCCY_RECAL 3
|
||||
#define FCCY_FLAGS 0174000 /* flags */
|
||||
#define GET_CMD(x,dt) ((drv_tab[dt].new)? \
|
||||
#define GET_CMD(x,dt) ((drv_tab[dt].newf)? \
|
||||
(((x) >> FCCY_V_NCMD) & FCCY_M_NCMD): \
|
||||
(((x) >> FCCY_V_OCMD) & FCCY_M_OCMD) )
|
||||
#define GET_CYL(x,dt) ((drv_tab[dt].new)? \
|
||||
#define GET_CYL(x,dt) ((drv_tab[dt].newf)? \
|
||||
(((x) >> FCCY_V_NCYL) & FCCY_M_NCYL): \
|
||||
((((x) >> FCCY_V_OCYL) & FCCY_M_OCYL) | \
|
||||
((dt != TYPE_D44)? 0: \
|
||||
@@ -254,7 +255,7 @@ struct drvtyp {
|
||||
int32 surf; /* surfaces */
|
||||
int32 cyl; /* cylinders */
|
||||
int32 size; /* #blocks */
|
||||
int32 new; /* new format flag */
|
||||
int32 newf; /* new format flag */
|
||||
};
|
||||
|
||||
struct drvtyp drv_tab[] = {
|
||||
@@ -323,7 +324,7 @@ REG dkp_reg[] = {
|
||||
{ FLDATA (DISABLE, dev_disable, INT_V_DKP) },
|
||||
{ DRDATA (STIME, dkp_swait, 24), PV_LEFT },
|
||||
{ DRDATA (RTIME, dkp_rwait, 24), PV_LEFT },
|
||||
{ URDATA (CAPAC, dkp_unit[0].capac, 10, 31, 0,
|
||||
{ URDATA (CAPAC, dkp_unit[0].capac, 10, T_ADDR_W, 0,
|
||||
DKP_NUMDR, PV_LEFT | REG_HRO) },
|
||||
{ NULL } };
|
||||
|
||||
@@ -460,7 +461,7 @@ case ioDIB: /* DIB */
|
||||
break;
|
||||
case ioDOB: /* DOB */
|
||||
if ((dev_busy & INT_DKP) == 0) dkp_ma =
|
||||
AC & (drv_tab[dtype].new? DMASK: AMASK);
|
||||
AC & (drv_tab[dtype].newf? DMASK: AMASK);
|
||||
break;
|
||||
case ioDIC: /* DIC */
|
||||
rval = dkp_ussc; /* return unit, sect */
|
||||
@@ -576,7 +577,7 @@ else if ((uptr->CYL >= drv_tab[dtype].cyl) || /* bad cylinder */
|
||||
(GET_SECT (dkp_ussc, dtype) >= drv_tab[dtype].sect)) /* or bad sector? */
|
||||
dkp_sta = dkp_sta | STA_DONE | STA_ERR | STA_UNS;
|
||||
|
||||
else if (GET_CYL (dkp_fccy, dtype) != uptr->CYL) /* address error? */
|
||||
else if (GET_CYL (dkp_fccy, dtype) != uptr->CYL) /* address error? */
|
||||
dkp_sta = dkp_sta | STA_DONE | STA_ERR | STA_UNS;
|
||||
|
||||
else { sc = 16 - GET_COUNT (dkp_ussc); /* get sector count */
|
||||
@@ -618,7 +619,7 @@ else { sc = 16 - GET_COUNT (dkp_ussc); /* get sector count */
|
||||
newsect = sa % drv_tab[dtype].sect;
|
||||
newsurf = (sa / drv_tab[dtype].sect) % drv_tab[dtype].surf;
|
||||
dkp_ussc = (dkp_ussc & USSC_UNIT) | ((dkp_ussc + sc) & USSC_M_COUNT) |
|
||||
((drv_tab[dtype].new)?
|
||||
((drv_tab[dtype].newf)?
|
||||
((newsurf << USSC_V_NSURFACE) | (newsect << USSC_V_NSECTOR)):
|
||||
((newsurf << USSC_V_OSURFACE) | (newsect << USSC_V_OSECTOR)) );
|
||||
dkp_sta = dkp_sta | STA_DONE; } /* set status */
|
||||
@@ -716,7 +717,7 @@ for (i = 0; i < BOOT_LEN; i++) M[BOOT_START + i] = boot_rom[i];
|
||||
unitno = unitno & USSC_M_UNIT;
|
||||
dtype = GET_DTYPE (dkp_unit[unitno].flags);
|
||||
M[BOOT_UNIT] = M[BOOT_UNIT] | (unitno << USSC_V_UNIT);
|
||||
if (drv_tab[dtype].new) M[BOOT_SEEK] = 0176000;
|
||||
if (drv_tab[dtype].newf) M[BOOT_SEEK] = 0176000;
|
||||
saved_PC = BOOT_START;
|
||||
return SCPE_OK;
|
||||
}
|
||||
|
||||
@@ -25,6 +25,7 @@
|
||||
|
||||
dsk fixed head disk
|
||||
|
||||
14-Mar-03 RMS Fixed variable capacity interaction with save/restore
|
||||
03-Mar-03 RMS Fixed variable capacity and autosizing
|
||||
03-Oct-02 RMS Added DIB
|
||||
06-Jan-02 RMS Revised enable/disable support
|
||||
@@ -44,6 +45,7 @@
|
||||
#define UNIT_V_AUTO (UNIT_V_UF + 0) /* autosize */
|
||||
#define UNIT_V_PLAT (UNIT_V_UF + 1) /* #platters - 1 */
|
||||
#define UNIT_M_PLAT 07
|
||||
#define UNIT_PLAT (UNIT_M_PLAT << UNIT_V_PLAT)
|
||||
#define UNIT_GETP(x) ((((x) >> UNIT_V_PLAT) & UNIT_M_PLAT) + 1)
|
||||
#define UNIT_AUTO (1 << UNIT_V_AUTO)
|
||||
#define UNIT_PLAT (UNIT_M_PLAT << UNIT_V_PLAT)
|
||||
@@ -184,7 +186,7 @@ if ((pulse == iopP) && ((dsk_wlk >> GET_DISK (dsk_da)) & 1)) { /* wrt lock? */
|
||||
return rval; }
|
||||
|
||||
if (pulse & 1) { /* read or write? */
|
||||
if (((t_addr) (dsk_da * DSK_NUMWD)) >= dsk_unit.capac) { /* inv sev? */
|
||||
if (((uint32) (dsk_da * DSK_NUMWD)) >= dsk_unit.capac) { /* inv sev? */
|
||||
dev_done = dev_done | INT_DSK; /* set done */
|
||||
int_req = (int_req & ~INT_DEV) | (dev_done & ~dev_disable);
|
||||
dsk_stat = DSKS_ERR + DSKS_NSD; /* set status */
|
||||
@@ -222,7 +224,7 @@ if (uptr->FUNC == iopP) { /* write? */
|
||||
for (i = 0; i < DSK_NUMWD; i++) { /* copy sector */
|
||||
pa = MapAddr (0, (dsk_ma + i) & AMASK); /* map address */
|
||||
*(((int16 *) uptr->filebuf) + da + i) = M[pa]; }
|
||||
if (((t_addr) (da + i)) >= uptr->hwmark) /* past end? */
|
||||
if (((uint32) (da + i)) >= uptr->hwmark) /* past end? */
|
||||
uptr->hwmark = da + i + 1; /* upd hwmark */
|
||||
dsk_ma = (dsk_ma + DSK_NUMWD + 3) & AMASK; }
|
||||
|
||||
@@ -271,15 +273,15 @@ return SCPE_OK;
|
||||
|
||||
t_stat dsk_attach (UNIT *uptr, char *cptr)
|
||||
{
|
||||
t_addr sz, p;
|
||||
t_addr ds_bytes = DSK_DKSIZE * sizeof (int16);
|
||||
uint32 sz, p;
|
||||
uint32 ds_bytes = DSK_DKSIZE * sizeof (int16);
|
||||
|
||||
if ((uptr->flags & UNIT_AUTO) && (sz = sim_fsize (cptr))) {
|
||||
p = (sz + ds_bytes - 1) / ds_bytes;
|
||||
if (p == 0) p = 1;
|
||||
if (p > DSK_NUMDK) p = DSK_NUMDK; }
|
||||
else p = UNIT_GETP (uptr->flags); /* get # plat */
|
||||
uptr->capac = p * DSK_DKSIZE; /* set capacity */
|
||||
if (p >= DSK_NUMDK) p = DSK_NUMDK - 1;
|
||||
uptr->flags = (uptr->flags & ~UNIT_PLAT) |
|
||||
(p << UNIT_V_PLAT); }
|
||||
uptr->capac = UNIT_GETP (uptr->flags) * DSK_DKSIZE; /* set capacity */
|
||||
return attach_unit (uptr, cptr);
|
||||
}
|
||||
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
/* nova_lp.c: NOVA line printer simulator
|
||||
|
||||
Copyright (c) 1993-2002, Robert M. Supnik
|
||||
Copyright (c) 1993-2003, 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"),
|
||||
@@ -25,6 +25,7 @@
|
||||
|
||||
lpt line printer
|
||||
|
||||
25-Apr-03 RMS Revised for extended file support
|
||||
30-May-02 RMS Widened POS to 32b
|
||||
*/
|
||||
|
||||
@@ -56,7 +57,7 @@ REG lpt_reg[] = {
|
||||
{ FLDATA (DONE, dev_done, INT_V_LPT) },
|
||||
{ FLDATA (DISABLE, dev_disable, INT_V_LPT) },
|
||||
{ FLDATA (INT, int_req, INT_V_LPT) },
|
||||
{ DRDATA (POS, lpt_unit.pos, 32), PV_LEFT },
|
||||
{ DRDATA (POS, lpt_unit.pos, T_ADDR_W), PV_LEFT },
|
||||
{ DRDATA (TIME, lpt_unit.wait, 24), PV_LEFT },
|
||||
{ FLDATA (STOP_IOE, lpt_stopioe, 0) },
|
||||
{ NULL } };
|
||||
@@ -106,7 +107,7 @@ if (putc (lpt_unit.buf, lpt_unit.fileref) == EOF) {
|
||||
perror ("LPT I/O error");
|
||||
clearerr (lpt_unit.fileref);
|
||||
return SCPE_IOERR; }
|
||||
lpt_unit.pos = ftell (lpt_unit.fileref);
|
||||
lpt_unit.pos = lpt_unit.pos + 1;
|
||||
return SCPE_OK;
|
||||
}
|
||||
|
||||
|
||||
@@ -25,6 +25,8 @@
|
||||
|
||||
mta magnetic tape
|
||||
|
||||
25-Apr-03 RMS Revised for extended file support
|
||||
28-Mar-03 RMS Added multiformat support
|
||||
28-Feb-03 RMS Revised for magtape library
|
||||
30-Oct-02 RMS Fixed BOT handling, added error record handling
|
||||
08-Oct-02 RMS Added DIB
|
||||
@@ -203,13 +205,15 @@ REG mta_reg[] = {
|
||||
{ DRDATA (CTIME, mta_cwait, 24), PV_LEFT },
|
||||
{ DRDATA (RTIME, mta_rwait, 24), PV_LEFT },
|
||||
{ URDATA (UST, mta_unit[0].USTAT, 8, 32, 0, MTA_NUMDR, 0) },
|
||||
{ URDATA (POS, mta_unit[0].pos, 8, 32, 0,
|
||||
{ URDATA (POS, mta_unit[0].pos, 8, T_ADDR_W, 0,
|
||||
MTA_NUMDR, REG_RO | PV_LEFT) },
|
||||
{ NULL } };
|
||||
|
||||
MTAB mta_mod[] = {
|
||||
{ MTUF_WLK, 0, "write enabled", "WRITEENABLED", &mta_vlock },
|
||||
{ MTUF_WLK, MTUF_WLK, "write locked", "LOCKED", &mta_vlock },
|
||||
{ MTAB_XTD|MTAB_VUN, 0, "FORMAT", "FORMAT",
|
||||
&sim_tape_set_fmt, &sim_tape_show_fmt, NULL },
|
||||
{ 0 } };
|
||||
|
||||
DEVICE mta_dev = {
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
/* nova_plt.c: NOVA plotter simulator
|
||||
|
||||
Copyright (c) 2000-2002, Robert M. Supnik
|
||||
Copyright (c) 2000-2003, Robert M. Supnik
|
||||
Written by Bruce Ray and used with his gracious permission.
|
||||
|
||||
Permission is hereby granted, free of charge, to any person obtaining a
|
||||
@@ -26,6 +26,7 @@
|
||||
|
||||
plt plotter
|
||||
|
||||
25-Apr-03 RMS Revised for extended file support
|
||||
03-Oct-02 RMS Added DIB
|
||||
30-May-02 RMS Widened POS to 32b
|
||||
06-Jan-02 RMS Revised enable/disable support
|
||||
@@ -61,7 +62,7 @@ REG plt_reg[] = {
|
||||
{ FLDATA (DONE, dev_done, INT_V_PLT) },
|
||||
{ FLDATA (DISABLE, dev_disable, INT_V_PLT) },
|
||||
{ FLDATA (INT, int_req, INT_V_PLT) },
|
||||
{ DRDATA (POS, plt_unit.pos, 32), PV_LEFT },
|
||||
{ DRDATA (POS, plt_unit.pos, T_ADDR_W), PV_LEFT },
|
||||
{ DRDATA (TIME, plt_unit.wait, 24), PV_LEFT },
|
||||
{ FLDATA (STOP_IOE, plt_stopioe, 0) },
|
||||
{ NULL } };
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
/* nova_pt.c: NOVA paper tape read/punch simulator
|
||||
|
||||
Copyright (c) 1993-2002, Robert M. Supnik
|
||||
Copyright (c) 1993-2003, 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"),
|
||||
@@ -26,6 +26,7 @@
|
||||
ptr paper tape reader
|
||||
ptp paper tape punch
|
||||
|
||||
25-Apr-03 RMS Revised for extended file support
|
||||
03-Oct-02 RMS Added DIBs
|
||||
30-May-02 RMS Widened POS to 32b
|
||||
29-Nov-01 RMS Added read only unit support
|
||||
@@ -63,7 +64,7 @@ REG ptr_reg[] = {
|
||||
{ FLDATA (DONE, dev_done, INT_V_PTR) },
|
||||
{ FLDATA (DISABLE, dev_disable, INT_V_PTR) },
|
||||
{ FLDATA (INT, int_req, INT_V_PTR) },
|
||||
{ DRDATA (POS, ptr_unit.pos, 32), PV_LEFT },
|
||||
{ DRDATA (POS, ptr_unit.pos, T_ADDR_W), PV_LEFT },
|
||||
{ DRDATA (TIME, ptr_unit.wait, 24), PV_LEFT },
|
||||
{ FLDATA (STOP_IOE, ptr_stopioe, 0) },
|
||||
{ NULL } };
|
||||
@@ -93,7 +94,7 @@ REG ptp_reg[] = {
|
||||
{ FLDATA (DONE, dev_done, INT_V_PTP) },
|
||||
{ FLDATA (DISABLE, dev_disable, INT_V_PTP) },
|
||||
{ FLDATA (INT, int_req, INT_V_PTP) },
|
||||
{ DRDATA (POS, ptp_unit.pos, 32), PV_LEFT },
|
||||
{ DRDATA (POS, ptp_unit.pos, T_ADDR_W), PV_LEFT },
|
||||
{ DRDATA (TIME, ptp_unit.wait, 24), PV_LEFT },
|
||||
{ FLDATA (STOP_IOE, ptp_stopioe, 0) },
|
||||
{ NULL } };
|
||||
|
||||
@@ -1,6 +1,6 @@
|
||||
/* nova_sys.c: NOVA simulator interface
|
||||
|
||||
Copyright (c) 1993-2002, Robert M. Supnik
|
||||
Copyright (c) 1993-2003, 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"),
|
||||
@@ -127,7 +127,7 @@ const char *sim_stop_messages[] = {
|
||||
t_stat sim_load (FILE *fileref, char *cptr, char *fnam, int flag)
|
||||
{
|
||||
int32 data, csum, count, state, i;
|
||||
t_addr origin;
|
||||
uint32 origin;
|
||||
|
||||
if ((*cptr != 0) || (flag != 0)) return SCPE_ARG;
|
||||
state = 0;
|
||||
|
||||
@@ -26,6 +26,7 @@
|
||||
tti terminal input
|
||||
tto terminal output
|
||||
|
||||
25-Apr-03 RMS Revised for extended file support
|
||||
05-Jan-02 RMS Fixed calling sequence for setmod
|
||||
03-Oct-02 RMS Added DIBs
|
||||
30-May-02 RMS Widened POS to 32b
|
||||
@@ -67,7 +68,7 @@ REG tti_reg[] = {
|
||||
{ FLDATA (DONE, dev_done, INT_V_TTI) },
|
||||
{ FLDATA (DISABLE, dev_disable, INT_V_TTI) },
|
||||
{ FLDATA (INT, int_req, INT_V_TTI) },
|
||||
{ DRDATA (POS, tti_unit.pos, 32), PV_LEFT },
|
||||
{ DRDATA (POS, tti_unit.pos, T_ADDR_W), PV_LEFT },
|
||||
{ DRDATA (TIME, tti_unit.wait, 24), REG_NZ + PV_LEFT },
|
||||
{ NULL } };
|
||||
|
||||
@@ -100,7 +101,7 @@ REG tto_reg[] = {
|
||||
{ FLDATA (DONE, dev_done, INT_V_TTO) },
|
||||
{ FLDATA (DISABLE, dev_disable, INT_V_TTO) },
|
||||
{ FLDATA (INT, int_req, INT_V_TTO) },
|
||||
{ DRDATA (POS, tto_unit.pos, 32), PV_LEFT },
|
||||
{ DRDATA (POS, tto_unit.pos, T_ADDR_W), PV_LEFT },
|
||||
{ DRDATA (TIME, tto_unit.wait, 24), PV_LEFT },
|
||||
{ NULL } };
|
||||
|
||||
|
||||
@@ -27,6 +27,7 @@
|
||||
tti1 second terminal input
|
||||
tto1 second terminal output
|
||||
|
||||
09-May-03 RMS Added network device flag
|
||||
05-Jan-03 RMS Fixed calling sequence for setmod
|
||||
03-Oct-02 RMS Added DIBs
|
||||
22-Aug-02 RMS Updated for changes in sim_tmxr
|
||||
@@ -105,7 +106,7 @@ DEVICE tti1_dev = {
|
||||
1, 10, 31, 1, 8, 8,
|
||||
&tmxr_ex, &tmxr_dep, &tti1_reset,
|
||||
NULL, &tti1_attach, &tti1_detach,
|
||||
&tti1_dib, DEV_DISABLE };
|
||||
&tti1_dib, DEV_NET | DEV_DISABLE };
|
||||
|
||||
/* TTO1 data structures
|
||||
|
||||
|
||||
Reference in New Issue
Block a user