Understanding interrupt handling within SIMH (see echo_int.pal)

Add list of Bugs

Add event log file parser

More changes associated with widening the ctlregs (FIXME add a typedef)

Add some keyboard instructions

1 files changed, 41 insertions, 3 deletions

diff --git a/io/model.cpp b/io/model.cpp
index 4b37be4..e9caba0 100644
--- a/io/model.cpp
+++ b/io/model.cpp
@@ -1,4 +1,5 @@
 #include <array>
+#include <cassert>
 #include <cstdint>
 #include <iostream>
 #include <utility>
@@ -17,8 +18,7 @@ bool iomodel::interact(std::array<std::uint_fast32_t, NUM_CTLREGS> &ctlregs) {
     ++time;
 
     if (ctlregs[TT_BITS] & TTO_TX) {
-        // PDP-8 doesn't really have support for 8-bit output, this is Jules' contribution
-        std::cout << (char)(((ctlregs[TT_BITS] & TTO_DATA) >> TTO_DATA_SHIFT) ^ 0x80) << std::flush;
+        std::cout << (char)(((ctlregs[TT_BITS] & TTO_DATA) >> TTO_DATA_SHIFT) & 0x7f) << std::flush;
         ctlregs[TT_BITS] &= ~TTO_TX & ~TTO_DATA;
         log.emplace(time + TT_OUTPUT_DELAY, event(TT_BITS, TTO_FLAG, 0));
     }
@@ -46,4 +46,42 @@ bool iomodel::interact(std::array<std::uint_fast32_t, NUM_CTLREGS> &ctlregs) {
     }
 
     return interrupt;
-};
+}
+
+void iomodel::load_evt(std::istream &fh) {
+    // File format:
+    //  +time                   advances time by relative increment
+    //  regname=value/mask      adds event that sets regname = (regname & ~mask) | value
+    //  regname=value           adds event that sets regname = value
+    // FIXME: add assertions
+    // FIXME: add DMA
+    for (std::string line; std::getline(fh, line); ) {
+        if (line.size() == 0)
+            continue;
+        if (line[0] == '+') {
+            char *end = nullptr;
+            auto step = std::strtoull(line.c_str(), &end, 0);
+            assert(end && *end == '\0');
+            load_time += step;
+        } else {
+            auto eqpos = line.find('=');
+            assert(eqpos != std::string::npos);
+            auto regname = line.substr(0, eqpos);
+            ctlreg reg = ctlreg_map.at(regname);
+            std::uint_fast32_t value, mask;
+            auto slashpos = line.find('/', eqpos);
+            auto valuestr = line.substr(eqpos + 1, slashpos - (eqpos + 1));
+            char *end = nullptr;
+            value = std::strtoull(valuestr.c_str(), &end, 0);
+            assert(end && *end == '\0');
+            if (slashpos == std::string::npos) {
+                mask = ~(std::uint_fast32_t)0;
+            } else {
+                auto maskstr = line.substr(slashpos + 1);
+                mask = std::strtoull(maskstr.c_str(), &end, 0);
+                assert(end && *end == '\0');
+            }
+            log.emplace(load_time, event(reg, value, mask));
+        }
+    }
+}