mirror of
https://github.com/open-simh/simh.git
synced 2026-04-30 13:41:55 +00:00
Notes For V3.1-0
RESTRICTION: The FP15 and XVM features of the PDP-15 are only partially debugged. Do NOT enable these features for normal operations. 1. New Features in 3.1-0 1.1 SCP and libraries - Added simulated Ethernet support for VMS, FreeBSD, Mac OS/X. - Added status return to tmxr_putc_ln. - Added sim_putchar_s to handle possible output stalls. 1.2 All DECtapes - Added "DECtape off reel" error stop. 1.3 All Asynchronous Consoles - Added support for output congestion stall if using a Telnet connection. 1.4 PDP-1 - Added Type 23 parallel drum support. 1.5 PDP-8 - Added instruction history. - Added TSC8-75 option support for ETOS. - Added TD8E DECtape support. 1.6 PDP-18b - Added instruction history. - Changed PDP-9, PDP-15 API default to enabled. 1.7 PDP-11 - Added support for 18b only Qbus devices. - Formalized bus and addressing definitions. - Added control to enable/disable autoconfiguration. - Added stub support for second Unibus Ethernet controller. 1.7 Interdata 32b - Added instruction history. 1.8 Eclipse - Added floating point support. - Added programmable interval timer support. 1.9 H316 - Added DMA/DMC support. - Added fixed head disk support. - Added moving head disk support. - Added magtape support. 1.10 IBM 1130 (Brian Knittel) - Added support for physical card reader, using the Cardread interface (www.ibm1130.org/sim/downloads). - Added support for physical printer (flushes output buffer after each line). 2. Bugs Fixed in 3.1-0 2.1 SCP and libraries - Fixed numerous bugs in Ethernet library. 2.2 All DECtapes - Fixed reverse checksum value in 'read all' mode. - Simplified (and sped up) timing. 2.3 PDP-8 - Fixed bug in RX28 read status (found by Charles Dickman). - Fixed RX28 double density write. 2.4 PDP-18b - Fixed autoincrement bug in PDP-4, PDP-7, PDP-9. 2.5 PDP-11/VAX - Revised RQ MB->LBN conversion for greater accuracy. - Fixed bug in IO configuration (found by David Hittner). - Fixed bug with multiple RQ RAUSER drives. - Fixed bug in second Qbus Ethernet controller interrupts. 2.6 Nova/Eclipse - Fixed bugs in DKP flag clear, map setup, map usage (Charles Owen). - Fixed bug in MT, reset completes despite I/O reset (Charles Owen). - Fixed bug in MT, space operations return word count (Charles Owen). 2.7 IBM 1130 (Brian Knittel) - Fixed bug in setting carry bit in subtract and subtract double. - Fixed timing problem in console printer simulation. 2.8 1620 - Fixed bug in branch digit (found by Dave Babcock). 3. New Features in 3.0 vs prior releases 3.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. 3.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. 3.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). 3.4 PDP-1 - Added block loader format support to LOAD. - Changed BOOT PTR to allow loading of all of the first bank of memory. - The LOAD command takes an optional argument specifying the memory field to be loaded. - The PTR BOOT command takes its starting memory field from the TA (address switch) register. 3.5 PDP-18b Family - Added PDP-4 EAE support. - Added PDP-15 FP15 support. - Added PDP-15 XVM support. - Added PDP-15 "re-entrancy ECO". - Added PDP-7, PDP-9, PDP-15 hardware RIM loader support in BOOT PTR. 4. Bugs Fixed in 3.0 vs prior releases 4.1 SCP and Libraries - Fixed end of file problem in dep, idep. - Fixed handling of trailing spaces in dep, idep. 4.2 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). - Fixed bug in user disk size (found by Chaskiel M Grundman). 4.3 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. - Revised fetch to model hardware more closely. - Fixed tape read end-of-record handling based on real 1401. - Added diagnostic read (space forward). 4.4 Nova - Fixed DSK variable size interaction with restore. - Fixed bug in DSK set size routine. 4.5 PDP-1 - Fixed DT variable size interaction with restore. - Updated CPU, line printer, standard devices to detect indefinite I/O wait. - Fixed incorrect logical, missing activate, break in drum simulator. - Fixed bugs in instruction decoding, overprinting for line printer. - Fixed system hang if continue after PTR error. - Fixed PTR to start/stop on successive rpa instructions. 4.6 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. - Fixed bug in user disk size (found by Chaskiel M Grundman). 4.7 PDP-18B - Fixed DT, RF variable size interaction with restore. - Fixed MT bug in MTTR. - Fixed bug in PDP-4 line printer overprinting. - Fixed bug in PDP-15 memory protect/skip interaction. - Fixed bug in RF set size routine. - Increased PTP TIME for PDP-15 operating systems. - Fixed priorities in PDP-15 API (differs from PDP-9). - Fixed sign handling in PDP-15 EAE unsigned mul/div (differs from PDP-9). - Fixed bug in CAF, clears API subsystem. 4.8 PDP-8 - Fixed DT, DF, RF, RX variable size interaction with restore. - Fixed MT bug in SKTR. - Fixed bug in DF, RF set size routine. 4.9 HP2100 - Fixed bug in DP (13210A controller only), DQ read status. - Fixed bug in DP, DQ seek complete. - Fixed DR drum sizes. - Fixed DR variable capacity interaction with SAVE/RESTORE. 4.10 GRI - Fixed bug in SC queue pointer management. 4.11 PDP-10 - Fixed bug in RP read header. 4.12 Ibm1130 - Fixed bugs found by APL 1130. 4.13 Altairz80 - Fixed bug in real-time clock on Windows host. 4.14 1620 - Fixed bug in immediate index add (found by Michael Short).
This commit is contained in:
committed by
Mark Pizzolato
parent
b2101ecdd4
commit
1da2d9452d
@@ -25,6 +25,9 @@
|
||||
|
||||
dkp moving head disk
|
||||
|
||||
28-Nov-03 CEO Boot from DP now puts device address in SR
|
||||
24-Nov-03 CEO Added support for disk sizing on 6099/6103
|
||||
19-Nov-03 CEO Corrected major DMA Mapping bug
|
||||
25-Apr-03 RMS Revised autosizing
|
||||
08-Oct-02 RMS Added DIB
|
||||
06-Jan-02 RMS Revised enable/disable support
|
||||
@@ -225,7 +228,7 @@
|
||||
#define TYPE_6070 8
|
||||
#define SECT_6070 24
|
||||
#define SURF_6070 4
|
||||
#define CYL_6070 408
|
||||
#define CYL_6070 408
|
||||
#define SIZE_6070 (SECT_6070 * SURF_6070 * CYL_6070 * DKP_NUMWD)
|
||||
#define NFMT_6070 TRUE
|
||||
|
||||
@@ -278,11 +281,13 @@ extern UNIT cpu_unit;
|
||||
extern int32 int_req, dev_busy, dev_done, dev_disable;
|
||||
|
||||
int32 dkp_ma = 0; /* memory address */
|
||||
int32 dkp_map = 0; /* DCH map 0=A 3=B */
|
||||
int32 dkp_ussc = 0; /* unit/sf/sc/cnt */
|
||||
int32 dkp_fccy = 0; /* flags/cylinder */
|
||||
int32 dkp_sta = 0; /* status register */
|
||||
int32 dkp_swait = 100; /* seek latency */
|
||||
int32 dkp_rwait = 100; /* rotate latency */
|
||||
int32 dkp_diagmode = 0; /* diagnostic mode */
|
||||
|
||||
DEVICE dkp_dev;
|
||||
int32 dkp (int32 pulse, int32 code, int32 AC);
|
||||
@@ -322,6 +327,8 @@ REG dkp_reg[] = {
|
||||
{ FLDATA (BUSY, dev_busy, INT_V_DKP) },
|
||||
{ FLDATA (DONE, dev_done, INT_V_DKP) },
|
||||
{ FLDATA (DISABLE, dev_disable, INT_V_DKP) },
|
||||
{ FLDATA (DIAG, dkp_diagmode, 0) },
|
||||
{ ORDATA (MAP, dkp_map, 2) },
|
||||
{ DRDATA (STIME, dkp_swait, 24), PV_LEFT },
|
||||
{ DRDATA (RTIME, dkp_rwait, 24), PV_LEFT },
|
||||
{ URDATA (CAPAC, dkp_unit[0].capac, 10, T_ADDR_W, 0,
|
||||
@@ -452,22 +459,32 @@ case ioDIA: /* DIA */
|
||||
rval = dkp_sta;
|
||||
break;
|
||||
case ioDOA: /* DOA */
|
||||
if (AC & 0100000) /* clear rw done? */
|
||||
dkp_sta = dkp_sta & ~(STA_CYL|STA_XCY|STA_UNS|STA_CRC);
|
||||
if ((dev_busy & INT_DKP) == 0) {
|
||||
dkp_fccy = AC; /* save cmd, cyl */
|
||||
dkp_sta = dkp_sta & ~(AC & FCCY_FLAGS); }
|
||||
if ((dkp_sta & STA_DFLGS) == 0) /* done flags = 0? */
|
||||
dev_done = dev_done & ~INT_DKP; /* clear intr */
|
||||
break;
|
||||
case ioDIB: /* DIB */
|
||||
rval = dkp_ma; /* return buf addr */
|
||||
break;
|
||||
case ioDOB: /* DOB */
|
||||
if ((dev_busy & INT_DKP) == 0) dkp_ma =
|
||||
AC & (drv_tab[dtype].newf? DMASK: AMASK);
|
||||
if ((dev_busy & INT_DKP) == 0) {
|
||||
dkp_ma = AC & (drv_tab[dtype].newf? DMASK: AMASK);
|
||||
if (AC & 0100000) dkp_map = 3; /* high bit is map */
|
||||
else dkp_map = 0;
|
||||
}
|
||||
break;
|
||||
case ioDIC: /* DIC */
|
||||
rval = dkp_ussc; /* return unit, sect */
|
||||
break;
|
||||
case ioDOC: /* DOC */
|
||||
if ((dev_busy & INT_DKP) == 0) dkp_ussc = AC; /* save unit, sect */
|
||||
if (((dtype == TYPE_6099) || /* for 6099 and 6103 */
|
||||
(dtype == TYPE_6103)) && /* if data<0> set, */
|
||||
AC & 010000) dkp_diagmode = 1; /* set diagnostic mode */
|
||||
break; } /* end switch code */
|
||||
|
||||
/* IOT, continued */
|
||||
@@ -478,7 +495,14 @@ case iopS: /* start */
|
||||
dev_busy = dev_busy | INT_DKP; /* set busy */
|
||||
dev_done = dev_done & ~INT_DKP; /* clear done */
|
||||
int_req = int_req & ~INT_DKP; /* clear int */
|
||||
if (dkp_go ()) break; /* new cmd, error? */
|
||||
if (dkp_diagmode) { /* in diagnostic mode? */
|
||||
dkp_diagmode = 0; /* reset it */
|
||||
if (dtype == TYPE_6099) dkp_ussc = 010002; /* return size bits */
|
||||
if (dtype == TYPE_6103) dkp_ussc = 010003; /* for certain types */
|
||||
}
|
||||
else { /* normal mode ... */
|
||||
if (dkp_go ()) break; /* new cmd, error? */
|
||||
}
|
||||
dev_busy = dev_busy & ~INT_DKP; /* clear busy */
|
||||
dev_done = dev_done | INT_DKP; /* set done */
|
||||
int_req = (int_req & ~INT_DEV) | (dev_done & ~dev_disable);
|
||||
@@ -558,6 +582,13 @@ static uint16 tbuf[DKP_NUMWD]; /* transfer buffer */
|
||||
|
||||
rval = SCPE_OK;
|
||||
dtype = GET_DTYPE (uptr->flags); /* get drive type */
|
||||
if (dkp_diagmode) { /* diagnostic mode? */
|
||||
dkp_sta = (dkp_sta | STA_DONE); /* Set error bit only */
|
||||
dev_busy = dev_busy & ~INT_DKP; /* clear busy */
|
||||
dev_done = dev_done | INT_DKP; /* set done */
|
||||
int_req = (int_req & ~INT_DEV) | (dev_done & ~dev_disable);
|
||||
return SCPE_OK; /* do not do function */
|
||||
}
|
||||
if (uptr->FUNC == FCCY_SEEK) { /* seek? */
|
||||
if (uptr->CYL >= drv_tab[dtype].cyl) /* bad cylinder? */
|
||||
dkp_sta = dkp_sta | STA_ERR | STA_CYL;
|
||||
@@ -597,14 +628,14 @@ else { sc = 16 - GET_COUNT (dkp_ussc); /* get sector count */
|
||||
for ( ; awc < DKP_NUMWD; awc++) tbuf[awc] = 0;
|
||||
if (err = ferror (uptr->fileref)) break;
|
||||
for (dx = 0; dx < DKP_NUMWD; dx++) { /* loop thru buffer */
|
||||
pa = MapAddr (0, dkp_ma);
|
||||
pa = MapAddr (dkp_map, (dkp_ma & AMASK));
|
||||
if (MEM_ADDR_OK (pa)) M[pa] = tbuf[dx];
|
||||
dkp_ma = (dkp_ma + 1) & AMASK; } } }
|
||||
|
||||
if (uptr->FUNC == FCCY_WRITE) { /* write? */
|
||||
for (sx = 0; sx < sc; sx++) { /* loop thru sectors */
|
||||
for (dx = 0; dx < DKP_NUMWD; dx++) { /* loop into buffer */
|
||||
pa = MapAddr (0, dkp_ma);
|
||||
pa = MapAddr (dkp_map, (dkp_ma & AMASK));
|
||||
tbuf[dx] = M[pa];
|
||||
dkp_ma = (dkp_ma + 1) & AMASK; }
|
||||
fxwrite (tbuf, sizeof(int16), DKP_NUMWD, uptr->fileref);
|
||||
@@ -641,6 +672,8 @@ dev_busy = dev_busy & ~INT_DKP; /* clear busy */
|
||||
dev_done = dev_done & ~INT_DKP; /* clear done, int */
|
||||
int_req = int_req & ~INT_DKP;
|
||||
dkp_fccy = dkp_ussc = dkp_ma = dkp_sta = 0; /* clear registers */
|
||||
dkp_diagmode = 0; /* clear diagnostic mode */
|
||||
dkp_map = 0;
|
||||
for (u = 0; u < DKP_NUMDR; u++) { /* loop thru units */
|
||||
uptr = dkp_dev.units + u;
|
||||
sim_cancel (uptr); /* cancel activity */
|
||||
@@ -685,33 +718,33 @@ return SCPE_OK;
|
||||
#define BOOT_LEN (sizeof (boot_rom) / sizeof (int))
|
||||
|
||||
static const int32 boot_rom[] = {
|
||||
060233, /* NIOC 0,DKP ; clear disk */
|
||||
020420, /* LDA 0,USSC ; unit, sfc, sec, cnt */
|
||||
063033, /* DOC 0,DKP ; select disk */
|
||||
020417, /* LDA 0,SEKCMD ; command, cylinder */
|
||||
061333, /* DOAP 0,DKP ; start seek */
|
||||
024415, /* LDA 1,SEKDN */
|
||||
060433, /* DIA 0,DKP ; get status */
|
||||
0060233, /* NIOC 0,DKP ; clear disk */
|
||||
0020420, /* LDA 0,USSC ; unit, sfc, sec, cnt */
|
||||
0063033, /* DOC 0,DKP ; select disk */
|
||||
0020417, /* LDA 0,SEKCMD ; command, cylinder */
|
||||
0061333, /* DOAP 0,DKP ; start seek */
|
||||
0024415, /* LDA 1,SEKDN */
|
||||
0060433, /* DIA 0,DKP ; get status */
|
||||
0123415, /* AND# 1,0,SZR ; skip if done */
|
||||
000776, /* JMP .-2 */
|
||||
0000776, /* JMP .-2 */
|
||||
0102400, /* SUB 0,0 ; mem addr = 0 */
|
||||
062033, /* DOB 0,DKP */
|
||||
020411, /* LDA 0,REDCMD ; command, cylinder */
|
||||
061133, /* DOAS 0,DKP ; start read */
|
||||
060433, /* DIA 0, DKP ; get status */
|
||||
0062033, /* DOB 0,DKP */
|
||||
0020411, /* LDA 0,REDCMD ; command, cylinder */
|
||||
0061133, /* DOAS 0,DKP ; start read */
|
||||
0060433, /* DIA 0, DKP ; get status */
|
||||
0101113, /* MOVL# 0,0,SNC ; skip if done */
|
||||
000776, /* JMP .-2 */
|
||||
000377, /* JMP 377 */
|
||||
000016, /* USSC: 0.B1+0.B7+0.B11+16 */
|
||||
0000776, /* JMP .-2 */
|
||||
0000377, /* JMP 377 */
|
||||
0000016, /* USSC: 0.B1+0.B7+0.B11+16 */
|
||||
0175000, /* SEKCMD: 175000 */
|
||||
074000, /* SEKDN: 074000 */
|
||||
0074000, /* SEKDN: 074000 */
|
||||
0174000 /* REDCMD: 174000 */
|
||||
};
|
||||
|
||||
t_stat dkp_boot (int32 unitno, DEVICE *dptr)
|
||||
{
|
||||
int32 i, dtype;
|
||||
extern int32 saved_PC;
|
||||
extern int32 saved_PC, SR;
|
||||
|
||||
for (i = 0; i < BOOT_LEN; i++) M[BOOT_START + i] = boot_rom[i];
|
||||
unitno = unitno & USSC_M_UNIT;
|
||||
@@ -719,5 +752,6 @@ dtype = GET_DTYPE (dkp_unit[unitno].flags);
|
||||
M[BOOT_UNIT] = M[BOOT_UNIT] | (unitno << USSC_V_UNIT);
|
||||
if (drv_tab[dtype].newf) M[BOOT_SEEK] = 0176000;
|
||||
saved_PC = BOOT_START;
|
||||
SR = 0100000 + DEV_DKP;
|
||||
return SCPE_OK;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user