diff options
| author | cheapie <no-email-for-you@example.com> | 2026-05-25 17:17:52 -0500 |
|---|---|---|
| committer | cheapie <no-email-for-you@example.com> | 2026-05-25 17:17:52 -0500 |
| commit | e6b8c97d92f3a4de21cc6c2dfb4206665b4fa58a (patch) | |
| tree | 2da77456bf6cb56f39c3d4218d41ea6e2ecc9b9c | |
| parent | 2ecf97e382b4aff25bb97ea730a0c36d08747998 (diff) | |
| download | rvcontroller-e6b8c97d92f3a4de21cc6c2dfb4206665b4fa58a.tar rvcontroller-e6b8c97d92f3a4de21cc6c2dfb4206665b4fa58a.tar.gz rvcontroller-e6b8c97d92f3a4de21cc6c2dfb4206665b4fa58a.tar.bz2 rvcontroller-e6b8c97d92f3a4de21cc6c2dfb4206665b4fa58a.tar.xz rvcontroller-e6b8c97d92f3a4de21cc6c2dfb4206665b4fa58a.zip | |
| -rw-r--r-- | rvcontroller.lua | 43 |
1 files changed, 42 insertions, 1 deletions
diff --git a/rvcontroller.lua b/rvcontroller.lua index d804f75..57f458c 100644 --- a/rvcontroller.lua +++ b/rvcontroller.lua @@ -2553,6 +2553,41 @@ elseif event.channel == "monitorkb" then mem.breakpoint = address elseif argv[1] == "clearbreak" then mem.breakpoint = -1 + elseif argv[1] == "rdcsr" then + local address = validateandclamp(argv[2],0,0xfff) + if not address then + digiline_send("monitordisp","Bad CSR address") + return + end + digiline_send("monitordisp",string.format("%03X: %08X",address,readcsr(address))) + elseif argv[1] == "wrcsr" then + local address = validateandclamp(argv[2],0,0xfff) + if not address then + digiline_send("monitordisp","Bad CSR address") + return + end + local data = validateandclamp(argv[3],0,0xfff) + if not data then + digiline_send("monitordisp","Bad data") + return + end + writecsr(address,data) + --Read it back in case the target field was RO or WARL + digiline_send("monitordisp",string.format("%03X: %08X",address,readcsr(address))) + elseif argv[1] == "endian" then + if argc == 1 then + digiline_send("monitordisp",mem.bigendian and "Big-endian" or "Little-endian") + elseif argv[2] == "b" or argv[2] == "big" then + local bits = explodebits(readcsr(0x310),32) --mstatush + bits[5] = true --MBE + writecsr(0x310,implodebits(bits,32)) + digiline_send("monitordisp","Big-endian") + elseif argv[2] == "l" or argv[2] == "little" then + local bits = explodebits(readcsr(0x310),32) --mstatush + bits[5] = false --MBE + writecsr(0x310,implodebits(bits,32)) + digiline_send("monitordisp","Little-endian") + end elseif argv[1] == "help" then if argc == 1 or argv[2] == "1" then digiline_send("monitordisp","Use: help <command>") @@ -2584,13 +2619,19 @@ elseif event.channel == "monitorkb" then elseif argv[2] == "help" then digiline_send("monitordisp","help [command]\nShows information\nabout the specified\ncommand, or a list\nof commands if none\nis supplied") elseif argv[2] == "2" then - digiline_send("monitordisp","Page 2\nreset stop help\nsetbreak clearbreak") + digiline_send("monitordisp","Page 2\nreset stop help\nsetbreak clearbreak\nrdcsr wrcsr endian") elseif argv[2] == "h" then digiline_send("monitordisp","h\nhhhhhhhhhh") elseif argv[2] == "setbreak" then digiline_send("monitordisp","setbreak <address>\nSets a breakpoint\nat the specified\naddress") elseif argv[2] == "clearbreak" then digiline_send("monitordisp","clearbreak\nClears any set\nbreakpoint") + elseif argv[2] == "rdcsr" then + digiline_send("monitordisp","rdcsr <address>\nReads the value of\nthe specified CSR") + elseif argv[2] == "wrcsr" then + digiline_send("monitordisp","wrcsr <addr> <data>\nWrites the specifed\nvalue into the\nspecified CSR") + elseif argv[2] == "endian" then + digiline_send("monitordisp","endian [b | e]\nDisplays or changes\nthe current\nendianness") else digiline_send("monitordisp","No such command or\nno help available") end |