506 lines
15 KiB
JavaScript
506 lines
15 KiB
JavaScript
/**
|
|
* @fileoverview Implements the RX11 Disk Controller (for RX01 Diskettes)
|
|
* @author <a href="mailto:Jeff@pcjs.org">Jeff Parsons</a>
|
|
* @copyright © Jeff Parsons 2012-2017
|
|
*
|
|
* This file is part of PCjs, a computer emulation software project at <http://pcjs.org/>.
|
|
*
|
|
* It has been adapted from the JavaScript PDP 11/70 Emulator written by Paul Nankervis
|
|
* (paulnank@hotmail.com) at <http://skn.noip.me/pdp11/pdp11.html>. This code may be used
|
|
* freely provided the original authors are acknowledged in any modified source code.
|
|
*
|
|
* PCjs is free software: you can redistribute it and/or modify it under the terms of the
|
|
* GNU General Public License as published by the Free Software Foundation, either version 3
|
|
* of the License, or (at your option) any later version.
|
|
*
|
|
* PCjs is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without
|
|
* even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License along with PCjs. If not,
|
|
* see <http://www.gnu.org/licenses/gpl.html>.
|
|
*
|
|
* You are required to include the above copyright notice in every modified copy of this work
|
|
* and to display that copyright notice when the software starts running; see COPYRIGHT in
|
|
* <http://pcjs.org/modules/shared/lib/defines.js>.
|
|
*
|
|
* Some PCjs files also attempt to load external resource files, such as character-image files,
|
|
* ROM files, and disk image files. Those external resource files are not considered part of PCjs
|
|
* for purposes of the GNU General Public License, and the author does not claim any copyright
|
|
* as to their contents.
|
|
*/
|
|
|
|
"use strict";
|
|
|
|
if (NODE) {
|
|
var Str = require("../../shared/lib/strlib");
|
|
var PDP11 = require("./defines");
|
|
var MessagesPDP11 = require("./messages");
|
|
var DriveController = require("./drive");
|
|
}
|
|
|
|
class RX11 extends DriveController {
|
|
/**
|
|
* RX11(parms)
|
|
*
|
|
* The RX11 component has the following component-specific (parms) properties:
|
|
*
|
|
* autoMount: one or more JSON-encoded objects, each containing 'name' and 'path' properties
|
|
*
|
|
* The RX11 Disk Controller controls up to two RX01 disk drives, which in turn read/write
|
|
* disk cartridges. See [RX11 Disk Controller Configuration Files](/devices/pdp11/rx11/).
|
|
*
|
|
* RX01 diskettes are single-sided, with 77 tracks per side, 26 sectors per track, and a sector size
|
|
* of 128 bytes, for a total capacity of 250Kb (256,256 bytes). See [RX01 Disk Images](/disks/dec/rx01/).
|
|
*
|
|
* @param {Object} parms
|
|
*/
|
|
constructor(parms)
|
|
{
|
|
super("RX11", parms, MessagesPDP11.RX11, PDP11.RX11, PDP11.RX11.RX01, RX11.UNIBUS_IOTABLE);
|
|
|
|
/*
|
|
* Define all the registers required for this controller.
|
|
*/
|
|
this.regRXCS = this.regRXDB = 0;
|
|
this.regRXTA = this.regRXSA = this.regRXES = this.regError = 0;
|
|
/*
|
|
* Whenever a command is issued, we record the function code internally here, and when the command
|
|
* is completed, we set the internal function code back to UNUSED.
|
|
*/
|
|
this.funCode = RX11.FUNC.UNUSED;
|
|
this.iBuffer = 0;
|
|
/*
|
|
* We use the new ES6 fill() method to ensure that the buffer returns something reasonable if, for some
|
|
* strange reason, the first command we receive is an Empty Buffer command.
|
|
*/
|
|
this.abBuffer = new Array(128).fill(0);
|
|
}
|
|
|
|
/**
|
|
* initController(aRegs)
|
|
*
|
|
* @this {RX11}
|
|
* @param {Array} [aRegs]
|
|
* @return {boolean} true if successful, false if failure
|
|
*/
|
|
initController(aRegs)
|
|
{
|
|
if (!aRegs) {
|
|
aRegs = [0, 0];
|
|
}
|
|
|
|
/*
|
|
* ES6 ALERT: A handy destructuring assignment, which makes it easy to perform the inverse
|
|
* of what saveController() does when it collects a bunch of object properties into an array.
|
|
*/
|
|
[
|
|
this.regRXCS,
|
|
this.regRXDB,
|
|
this.regRXTA,
|
|
this.regRXSA,
|
|
this.regRXES,
|
|
this.regError,
|
|
this.iBuffer,
|
|
this.abBuffer
|
|
] = aRegs;
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* saveController()
|
|
*
|
|
* Basically, the inverse of initController().
|
|
*
|
|
* @this {RX11}
|
|
* @return {Array}
|
|
*/
|
|
saveController()
|
|
{
|
|
return [
|
|
this.regRXCS,
|
|
this.regRXDB,
|
|
this.regRXTA,
|
|
this.regRXSA,
|
|
this.regRXES,
|
|
this.regError,
|
|
this.iBuffer,
|
|
this.abBuffer
|
|
];
|
|
}
|
|
|
|
/**
|
|
* processCommand()
|
|
*
|
|
* @this {RX11}
|
|
*/
|
|
processCommand()
|
|
{
|
|
this.funCode = this.regRXCS & RX11.RXCS.FUNC;
|
|
this.regRXCS &= ~(RX11.RXCS.GO | RX11.RXCS.TR | RX11.RXCS.DONE | RX11.RXCS.ERR);
|
|
|
|
switch(this.funCode) {
|
|
|
|
case RX11.FUNC.FILL:
|
|
case RX11.FUNC.EMPTY:
|
|
case RX11.FUNC.READ:
|
|
case RX11.FUNC.WRITE:
|
|
case RX11.FUNC.WRDEL:
|
|
this.initCommand();
|
|
break;
|
|
|
|
case RX11.FUNC.RDSTAT:
|
|
this.readStatus();
|
|
break;
|
|
|
|
case RX11.FUNC.RDERR:
|
|
this.readError();
|
|
break;
|
|
|
|
default:
|
|
if (this.messageEnabled()) this.printMessage(this.type + ": UNSUPPORTED(" + this.funCode + ")");
|
|
this.funCode = RX11.FUNC.UNUSED;
|
|
break;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* initCommand()
|
|
*
|
|
* @this {RX11}
|
|
*/
|
|
initCommand()
|
|
{
|
|
this.iBuffer = 0;
|
|
}
|
|
|
|
/**
|
|
* doneCommand(nError)
|
|
*
|
|
* @this {RX11}
|
|
* @param {number} [nError]
|
|
*/
|
|
doneCommand(nError)
|
|
{
|
|
if (nError) {
|
|
this.regError = nError;
|
|
this.regRXDB = this.regRXES;
|
|
this.regRXCS |= RX11.RXCS.ERR;
|
|
}
|
|
this.funCode = RX11.FUNC.UNUSED;
|
|
this.regRXCS |= RX11.RXCS.DONE;
|
|
if (this.regRXCS & RX11.RXCS.IE) this.cpu.setIRQ(this.irq);
|
|
}
|
|
|
|
/**
|
|
* readData(drive, iCylinder, iHead, iSector, nWords, addr, inc, fCheck, done)
|
|
*
|
|
* This function is required ONLY if we want to support DriveController's bootSelectedDisk() function (and we do).
|
|
*
|
|
* @this {RX11}
|
|
* @param {Object} drive
|
|
* @param {number} iCylinder
|
|
* @param {number} iHead
|
|
* @param {number} iSector
|
|
* @param {number} nWords
|
|
* @param {number} addr
|
|
* @param {number} inc (normally 2, unless inhibited, in which case it's 0)
|
|
* @param {boolean} [fCheck]
|
|
* @param {function(...)} [done]
|
|
* @return {boolean|number} true if complete, false if queued (or if no done() is supplied, the error code, if any)
|
|
*/
|
|
readData(drive, iCylinder, iHead, iSector, nWords, addr, inc, fCheck, done)
|
|
{
|
|
var nError = 0;
|
|
var disk = drive.disk;
|
|
var sector = null, ibSector;
|
|
|
|
if (!disk) {
|
|
nError = drive.iDrive? RX11.ERROR.HOME1 : RX11.ERROR.HOME0;
|
|
nWords = 0;
|
|
}
|
|
|
|
var sWords = "";
|
|
while (nWords) {
|
|
if (!sector) {
|
|
if (iCylinder >= disk.nCylinders) {
|
|
nError = RX11.ERROR.NO_TRACK;
|
|
break;
|
|
}
|
|
sector = disk.seek(iCylinder, iHead, iSector);
|
|
if (!sector) {
|
|
nError = RX11.ERROR.NO_SECTOR;
|
|
break;
|
|
}
|
|
ibSector = 0;
|
|
if (++iSector >= disk.nSectors) {
|
|
iSector = 0;
|
|
if (++iHead >= disk.nHeads) {
|
|
iHead = 0;
|
|
++iCylinder;
|
|
}
|
|
}
|
|
}
|
|
var b0, b1;
|
|
if ((b0 = disk.read(sector, ibSector++)) < 0 || (b1 = disk.read(sector, ibSector++)) < 0) {
|
|
nError = RX11.ERROR.NO_DATA;
|
|
break;
|
|
}
|
|
var data = b0 | (b1 << 8);
|
|
this.bus.setWordDirect(this.cpu.mapUnibus(addr), data);
|
|
if (DEBUG && this.messageEnabled(MessagesPDP11.READ)) {
|
|
if (!sWords) sWords = Str.toOct(addr) + ": ";
|
|
sWords += Str.toOct(data) + ' ';
|
|
if (sWords.length >= 64) {
|
|
console.log(sWords);
|
|
sWords = "";
|
|
}
|
|
}
|
|
if (ibSector >= disk.cbSector) sector = null;
|
|
addr += inc;
|
|
nWords--;
|
|
}
|
|
return done? done(nError, iCylinder, iHead, iSector, nWords, addr) : nError;
|
|
}
|
|
|
|
/**
|
|
* readSector()
|
|
*
|
|
* @this {RX11}
|
|
*/
|
|
readSector()
|
|
{
|
|
var nError = 0;
|
|
var iDrive = (this.regRXCS & RX11.RXCS.UNIT)? 1 : 0;
|
|
var drive = this.aDrives[iDrive];
|
|
var disk = drive.disk;
|
|
var iCylinder = this.regRXTA & RX11.RXTA.MASK, iHead = 0, iSector = this.regRXSA & RX11.RXSA.MASK;
|
|
|
|
this.regRXES &= ~(RX11.RXES.CRC | RX11.RXES.PARITY | RX11.RXES.DEL | RX11.RXES.DRDY);
|
|
|
|
if (disk) {
|
|
this.regRXES |= RX11.RXES.DRDY;
|
|
this.assert(!iSector); // RX sector numbers (unlike RK and RL) are supposed to be 1-based
|
|
var sector = disk.seek(iCylinder, iHead, iSector, true);
|
|
if (sector) {
|
|
var i = 0, nBytes = this.abBuffer.length;
|
|
while (i < nBytes) {
|
|
var b = disk.read(sector, i);
|
|
if (b < 0) {
|
|
nError = RX11.ERROR.NO_DATA;
|
|
break;
|
|
}
|
|
this.abBuffer[i++] = b;
|
|
}
|
|
if (sector.deleted) this.regRXES |= RX11.RXES.DEL;
|
|
} else {
|
|
nError = RX11.ERROR.NO_SECTOR;
|
|
}
|
|
} else {
|
|
nError = iDrive? RX11.ERROR.HOME1 : RX11.ERROR.HOME0;
|
|
}
|
|
this.doneCommand(nError);
|
|
}
|
|
|
|
/**
|
|
* writeSector(fDeleted)
|
|
*
|
|
* @this {RX11}
|
|
* @param {boolean} fDeleted
|
|
*/
|
|
writeSector(fDeleted)
|
|
{
|
|
var nError = 0;
|
|
var iDrive = (this.regRXCS & RX11.RXCS.UNIT)? 1 : 0;
|
|
var drive = this.aDrives[iDrive];
|
|
var disk = drive.disk;
|
|
var iCylinder = this.regRXTA & RX11.RXTA.MASK, iHead = 0, iSector = this.regRXSA & RX11.RXSA.MASK;
|
|
|
|
this.regRXES &= ~(RX11.RXES.CRC | RX11.RXES.PARITY | RX11.RXES.DEL | RX11.RXES.DRDY);
|
|
|
|
if (disk) {
|
|
this.regRXES |= RX11.RXES.DRDY;
|
|
this.assert(!iSector); // RX sector numbers (unlike RK and RL) are supposed to be 1-based
|
|
var sector = disk.seek(iCylinder, iHead, iSector, true);
|
|
if (sector) {
|
|
if (fDeleted) sector.deleted = true;
|
|
var i = 0, nBytes = this.abBuffer.length;
|
|
while (i < nBytes) {
|
|
var data = this.abBuffer[i];
|
|
if (!disk.write(sector, i, data & 0xff)) {
|
|
nError = RX11.ERROR.NO_DATA;
|
|
break;
|
|
}
|
|
i++;
|
|
}
|
|
} else {
|
|
nError = RX11.ERROR.NO_SECTOR;
|
|
}
|
|
} else {
|
|
nError = iDrive? RX11.ERROR.HOME1 : RX11.ERROR.HOME0;
|
|
}
|
|
this.doneCommand(nError);
|
|
}
|
|
|
|
/**
|
|
* readStatus()
|
|
*
|
|
* @this {RX11}
|
|
*/
|
|
readStatus()
|
|
{
|
|
var iDrive = (this.regRXCS & RX11.RXCS.UNIT)? 1 : 0;
|
|
var drive = this.aDrives[iDrive];
|
|
|
|
this.regRXES &= ~RX11.RXES.DRDY;
|
|
if (drive && drive.disk) this.regRXES |= RX11.RXES.DRDY;
|
|
|
|
this.regRXDB = this.regRXES;
|
|
this.doneCommand();
|
|
}
|
|
|
|
/**
|
|
* readError()
|
|
*
|
|
* @this {RX11}
|
|
*/
|
|
readError()
|
|
{
|
|
this.regRXDB = this.regError;
|
|
this.doneCommand();
|
|
}
|
|
|
|
/**
|
|
* readRXCS(addr)
|
|
*
|
|
* @this {RX11}
|
|
* @param {number} addr (eg, PDP11.UNIBUS.RXCS or 177170)
|
|
* @return {number}
|
|
*/
|
|
readRXCS(addr)
|
|
{
|
|
var w = this.regRXCS & RX11.RXCS.RMASK;
|
|
switch(this.funCode) {
|
|
|
|
case RX11.FUNC.FILL:
|
|
if (this.iBuffer < this.abBuffer.length) {
|
|
this.regRXCS |= RX11.RXCS.TR;
|
|
}
|
|
break;
|
|
}
|
|
return w;
|
|
}
|
|
|
|
/**
|
|
* writeRXCS(data, addr)
|
|
*
|
|
* @this {RX11}
|
|
* @param {number} data
|
|
* @param {number} addr (eg, PDP11.UNIBUS.RXCS or 177170)
|
|
*/
|
|
writeRXCS(data, addr)
|
|
{
|
|
this.regRXCS = (this.regRXCS & ~RX11.RXCS.WMASK) | (data & RX11.RXCS.WMASK);
|
|
|
|
if (this.regRXCS & RX11.RXCS.GO) this.processCommand();
|
|
}
|
|
|
|
/**
|
|
* readRXDB(addr)
|
|
*
|
|
* @this {RX11}
|
|
* @param {number} addr (eg, PDP11.UNIBUS.RXDB or 177172)
|
|
* @return {number}
|
|
*/
|
|
readRXDB(addr)
|
|
{
|
|
switch(this.funCode) {
|
|
|
|
case RX11.FUNC.EMPTY:
|
|
if (this.regRXCS & RX11.RXCS.TR) {
|
|
this.regRXCS &= ~RX11.RXCS.TR;
|
|
this.assert(this.iBuffer < this.abBuffer.length);
|
|
this.regRXDB = this.abBuffer[this.iBuffer++] & 0xff;
|
|
if (this.iBuffer >= this.abBuffer.length) {
|
|
this.doneCommand();
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
return this.regRXDB;
|
|
}
|
|
|
|
/**
|
|
* writeRXDB(data, addr)
|
|
*
|
|
* @this {RX11}
|
|
* @param {number} data
|
|
* @param {number} addr (eg, PDP11.UNIBUS.RXDB or 177172)
|
|
*/
|
|
writeRXDB(data, addr)
|
|
{
|
|
switch(this.funCode) {
|
|
|
|
case RX11.FUNC.FILL:
|
|
if (this.regRXCS & RX11.RXCS.TR) {
|
|
this.regRXCS &= ~RX11.RXCS.TR;
|
|
this.assert(this.iBuffer < this.abBuffer.length);
|
|
this.abBuffer[this.iBuffer++] = data & 0xff;
|
|
if (this.iBuffer >= this.abBuffer.length) {
|
|
this.doneCommand();
|
|
}
|
|
}
|
|
break;
|
|
|
|
case RX11.FUNC.READ:
|
|
case RX11.FUNC.WRITE:
|
|
case RX11.FUNC.WRDEL:
|
|
if (this.regRXCS & RX11.RXCS.TR) {
|
|
this.regRXCS &= ~RX11.RXCS.TR;
|
|
|
|
switch(this.iBuffer++) {
|
|
case 0:
|
|
this.regRXSA = data;
|
|
break;
|
|
|
|
case 1:
|
|
this.regRXTA = data;
|
|
if (this.funCode == RX11.FUNC.READ) {
|
|
this.readSector();
|
|
} else {
|
|
this.writeSector(this.funCode == RX11.FUNC.WRDEL);
|
|
}
|
|
break;
|
|
|
|
default:
|
|
this.assert(false);
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
this.regRXDB = data;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Alias RX11 definitions as class constants
|
|
*/
|
|
RX11.RXCS = PDP11.RX11.RXCS; // 177170: Command and Status Register
|
|
RX11.RXDB = PDP11.RX11.RXDB; // 177172: Data Buffer Register
|
|
RX11.RXTA = PDP11.RX11.RXTA;
|
|
RX11.RXSA = PDP11.RX11.RXSA;
|
|
RX11.RXES = PDP11.RX11.RXES;
|
|
RX11.FUNC = PDP11.RX11.FUNC;
|
|
RX11.ERROR = PDP11.RX11.ERROR;
|
|
|
|
/*
|
|
* ES6 ALERT: As you can see below, I've finally started using computed property names.
|
|
*/
|
|
RX11.UNIBUS_IOTABLE = {
|
|
[PDP11.UNIBUS.RXCS]: /* 177170 */ [null, null, RX11.prototype.readRXCS, RX11.prototype.writeRXCS, "RXCS"],
|
|
[PDP11.UNIBUS.RXDB]: /* 177172 */ [null, null, RX11.prototype.readRXDB, RX11.prototype.writeRXDB, "RXDB"]
|
|
};
|
|
|
|
if (NODE) module.exports = RX11;
|