mirror of
https://github.com/sethm/symon.git
synced 2024-06-03 07:29:30 +00:00
38a4458aff
- The UI layout has changed, and will likely change again in the future. - Symon can now re-load ROM images from the File menu, under "Load ROM..." - Font size can be changed under the "View" menu
261 lines
6.7 KiB
Java
261 lines
6.7 KiB
Java
package com.loomcom.symon.devices;
|
|
|
|
import com.loomcom.symon.exceptions.*;
|
|
|
|
import java.util.logging.Level;
|
|
import java.util.logging.Logger;
|
|
|
|
|
|
/**
|
|
* This is a simulation of the MOS 6551 ACIA, with limited
|
|
* functionality. Interrupts are not supported.
|
|
* <p/>
|
|
* Unlike a 16550 UART, the 6551 ACIA has only one-byte transmit and
|
|
* receive buffers. It is the programmer's responsibility to check the
|
|
* status (full or empty) for transmit and receive buffers before
|
|
* writing / reading.
|
|
*/
|
|
public class Acia extends Device {
|
|
|
|
public static final int ACIA_SIZE = 4;
|
|
|
|
static final int DATA_REG = 0;
|
|
static final int STAT_REG = 1;
|
|
static final int CMND_REG = 2;
|
|
static final int CTRL_REG = 3;
|
|
|
|
/**
|
|
* Register addresses
|
|
*/
|
|
private int baseAddress;
|
|
|
|
/**
|
|
* Registers. These are ignored in the current implementation.
|
|
*/
|
|
private int commandRegister;
|
|
private int controlRegister;
|
|
|
|
private boolean overrun = false;
|
|
|
|
private long lastTxWrite = 0;
|
|
private long lastRxRead = 0;
|
|
private int baudRate = 0;
|
|
private long baudRateDelay = 0;
|
|
|
|
/**
|
|
* Read/Write buffers
|
|
*/
|
|
private int rxChar = 0;
|
|
private int txChar = 0;
|
|
|
|
private boolean rxFull = false;
|
|
private boolean txEmpty = true;
|
|
|
|
public Acia(int address) throws MemoryRangeException {
|
|
super(address, ACIA_SIZE, "ACIA");
|
|
this.baseAddress = address;
|
|
}
|
|
|
|
@Override
|
|
public int read(int address) throws MemoryAccessException {
|
|
switch (address) {
|
|
case DATA_REG:
|
|
return rxRead();
|
|
case STAT_REG:
|
|
return statusReg();
|
|
case CMND_REG:
|
|
return commandRegister;
|
|
case CTRL_REG:
|
|
return controlRegister;
|
|
default:
|
|
throw new MemoryAccessException("No register.");
|
|
}
|
|
}
|
|
|
|
@Override
|
|
public void write(int address, int data) throws MemoryAccessException {
|
|
switch (address) {
|
|
case 0:
|
|
txWrite(data);
|
|
break;
|
|
case 1:
|
|
reset();
|
|
break;
|
|
case 2:
|
|
commandRegister = data;
|
|
break;
|
|
case 3:
|
|
setControlRegister(data);
|
|
break;
|
|
default:
|
|
throw new MemoryAccessException("No register.");
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Set the control register and associated state.
|
|
*
|
|
* @param data
|
|
*/
|
|
public void setControlRegister(int data) {
|
|
this.controlRegister = data;
|
|
|
|
// If the value of the data is 0, this is a request to reset,
|
|
// otherwise it's a control update.
|
|
|
|
if (data == 0) {
|
|
reset();
|
|
} else {
|
|
// Mask the lower three bits to get the baud rate.
|
|
int baudSelector = data & 0x0f;
|
|
switch (baudSelector) {
|
|
case 0:
|
|
baudRate = 0;
|
|
break;
|
|
case 1:
|
|
baudRate = 50;
|
|
break;
|
|
case 2:
|
|
baudRate = 75;
|
|
break;
|
|
case 3:
|
|
baudRate = 110; // Real rate is actually 109.92
|
|
break;
|
|
case 4:
|
|
baudRate = 135; // Real rate is actually 134.58
|
|
break;
|
|
case 5:
|
|
baudRate = 150;
|
|
break;
|
|
case 6:
|
|
baudRate = 300;
|
|
break;
|
|
case 7:
|
|
baudRate = 600;
|
|
break;
|
|
case 8:
|
|
baudRate = 1200;
|
|
break;
|
|
case 9:
|
|
baudRate = 1800;
|
|
break;
|
|
case 10:
|
|
baudRate = 2400;
|
|
break;
|
|
case 11:
|
|
baudRate = 3600;
|
|
break;
|
|
case 12:
|
|
baudRate = 4800;
|
|
break;
|
|
case 13:
|
|
baudRate = 7200;
|
|
break;
|
|
case 14:
|
|
baudRate = 9600;
|
|
break;
|
|
case 15:
|
|
baudRate = 19200;
|
|
break;
|
|
}
|
|
|
|
// Recalculate the baud rate delay.
|
|
baudRateDelay = calculateBaudRateDelay();
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Calculate the delay in nanoseconds between successive read/write operations, based on the
|
|
* configured baud rate.
|
|
*/
|
|
private long calculateBaudRateDelay() {
|
|
if (baudRate > 0) {
|
|
// TODO: This is a pretty rough approximation based on 8 bits per character,
|
|
// and 1/baudRate per bit. It could certainly be improved
|
|
return (long)((1.0 / baudRate) * 1000000000 * 8);
|
|
} else {
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* @return The simulated baud rate in bps.
|
|
*/
|
|
public int getBaudRate() {
|
|
return baudRate;
|
|
}
|
|
|
|
/**
|
|
* Set the baud rate of the simulated ACIA.
|
|
*
|
|
* @param rate The baud rate in bps. 0 means no simulated baud rate delay.
|
|
*/
|
|
public void setBaudRate(int rate) {
|
|
this.baudRate = rate;
|
|
}
|
|
|
|
/**
|
|
* @return The contents of the status register.
|
|
*/
|
|
public int statusReg() {
|
|
// TODO: Overrun, Parity Error, Framing Error, DTR, DSR, and Interrupt flags.
|
|
int stat = 0;
|
|
if (rxFull && System.nanoTime() >= (lastRxRead + baudRateDelay)) {
|
|
stat |= 0x08;
|
|
}
|
|
if (txEmpty && System.nanoTime() >= (lastTxWrite + baudRateDelay)) {
|
|
stat |= 0x10;
|
|
}
|
|
return stat;
|
|
}
|
|
|
|
@Override
|
|
public String toString() {
|
|
return "ACIA@" + String.format("%04X", baseAddress);
|
|
}
|
|
|
|
public synchronized int rxRead() {
|
|
lastRxRead = System.nanoTime();
|
|
rxFull = false;
|
|
return rxChar;
|
|
}
|
|
|
|
public synchronized void rxWrite(int data) {
|
|
rxFull = true;
|
|
rxChar = data;
|
|
}
|
|
|
|
public synchronized int txRead() {
|
|
txEmpty = true;
|
|
return txChar;
|
|
}
|
|
|
|
public synchronized void txWrite(int data) {
|
|
lastTxWrite = System.nanoTime();
|
|
txEmpty = false;
|
|
txChar = data;
|
|
}
|
|
|
|
/**
|
|
* @return true if there is character data in the TX register.
|
|
*/
|
|
public boolean hasTxChar() {
|
|
return !txEmpty;
|
|
}
|
|
|
|
/**
|
|
* @return true if there is character data in the RX register.
|
|
*/
|
|
public boolean hasRxChar() {
|
|
return rxFull;
|
|
}
|
|
|
|
private synchronized void reset() {
|
|
txChar = 0;
|
|
txEmpty = true;
|
|
rxChar = 0;
|
|
rxFull = false;
|
|
}
|
|
|
|
}
|