machine_io.cpp

Go to the documentation of this file.

#include <iostream>
#include "machine.h"
 
namespace mixal {
 
IODevice* Computer::getDevice(int32_t index) {
    if (devices[index] == nullptr) {
        switch (index) {
        case 0: case 1: case 2: case 3:
        case 4: case 5: case 6: case 7:
            devices[index] = new IODeviceTape();
            break;
        case 8: case 9: case 10: case 11:
        case 12: case 13: case 14: case 15:
            devices[index] = new IODeviceDisk();
            break;
        case 16:
            devices[index] = new IODeviceCardReader();
            break;
        case 17:
            devices[index] = new IODeviceCardPunch();
            break;
        case 18:
            devices[index] = new IODeviceLinePrinter();
            break;
        case 19:
            devices[index] = new IODeviceTypewriter();
            break;
        case 20:
            devices[index] = new IODevicePaperTape();
            break;
        }
    }
    return devices[index];
}
 
void Computer::waitDevice(IODevice* device) {
    while (!device->ready(this->_elapsed)) {
        ++this->_elapsed;
    }
}
 
void Computer::waitDevices() {
    for (int i = 0; i < NUM_IO_DEVICE; ++i) {
        if (devices[i] != nullptr) {
            waitDevice(devices[i]);
        }
    }
}
 
ComputerWord& Computer::getDeviceWordAt(int32_t device, int32_t index) {
    return this->getDevice(device)->wordAt(index);
}
 
void Computer::executeJBUS(const InstructionWord& instruction) {
    auto device = getDevice(instruction.field());
    if (!device->ready(this->_elapsed)) {
        this->executeJMP(instruction);
    }
}
 
void Computer::executeIOC(const InstructionWord& instruction) {
    auto device = getDevice(instruction.field());
    waitDevice(device);
    if (device->type() == IODeviceType::DISK) {
        device->control(rX.value());
    } else {
        int32_t address = getIndexedAddress(instruction);
        device->control(address);
    }
}
 
void Computer::executeIN(const InstructionWord& instruction) {
    auto device = getDevice(instruction.field());
    if (!device->allowRead()) {
        throw RuntimeError(_lineOffset, "Device does not support read: " + std::to_string(instruction.field()));
    }
    waitDevice(device);
    int32_t address = getIndexedAddress(instruction, true);
    device->read(memory, address);
}
 
void Computer::executeOUT(const InstructionWord& instruction) {
    auto device = getDevice(instruction.field());
    if (!device->allowWrite()) {
        throw RuntimeError(_lineOffset, "Device does not support write: " + std::to_string(instruction.field()));
    }
    waitDevice(device);
    int32_t address = getIndexedAddress(instruction, true);
    device->write(memory, address);
}
 
void Computer::executeJRED(const InstructionWord& instruction) {
    auto device = getDevice(instruction.field());
    if (device->ready(this->_elapsed)) {
        this->executeJMP(instruction);
    }
}
 
};  // namespace mixal