--- nono/vm/sysctlr.cpp 2026/04/29 17:04:59 1.1.1.6 +++ nono/vm/sysctlr.cpp 2026/04/29 17:05:17 1.1.1.10 @@ -4,15 +4,24 @@ // Licensed under nono-license.txt // -// LUNA88K のシステムコントローラのような何か +// +// LUNA-88K のシステムコントローラのような何か +// -#include "sysctlr.h" -#include "ethernet.h" -#include "mpu88xx0.h" -#include "prom.h" -#include "sio.h" -#include "spc.h" -#include "sysclk.h" +// IODevice +// | +// +-- InterruptDevice (割り込みコントローラの共通部) +// | +// +-- M680x0Interrupt (m68k 割り込みコントローラの共通部) +// | | +// | +-- X68030Interrupt (X68030 の割り込みコントローラ) +// | +-- LunaInterrupt (LUNA-I の割り込みコントローラ) +// | +// +-- PEDECDevice (X68030 の Lv1 担当コントローラ) +// | +// | +---------------+ +// +--| SysCtlrDevice | (LUNA-88K の割り込みコントローラ) +// +---------------+ // この辺を全部一つのデバイスで受け付けておくか。BusIO はまた後で考える。 // $6500000n.b HW 割り込みレベル (n*4 = CPU#n) @@ -24,7 +33,7 @@ // $6d00000n CPU#n をリセット(?) // $6d000010 全 CPU をリセット -// LUNA88K +// LUNA-88K // 割り込みコントロールレジスタ // $6500_000n // n: CPU ID * 4 (0,4,8,c) @@ -106,14 +115,14 @@ // LUNA-I からの類推及び、OpenBSD mainbus.c に記述あり。OpenBSD のほうは // 低レベルかどうかは不明。 // 3:SPC -// ROM1.2, OpenBSD ともに使用。 +// PROM 1.20, OpenBSD ともに使用。 // 4:LANCE // ROM はまだ不明。OpenBSD は使用。 // 4:拡張スロット // LUNA-I からの類推のみ。不明。 // 5:拡張PC98 -// LUNA-I からの類推のみ。LUNA88K にはスロットがないようなので、 -// LUNA88K2 が必要。 +// LUNA-I からの類推のみ。LUNA-88K にはスロットがないようなので、 +// LUNA-88K2 が必要。 // OpenBSD mainbus.c に記述あり。 // 5:シリアル(7201) // OpenBSD mainbus.c に記述。 @@ -144,15 +153,25 @@ // リードアクセスで読み込まれる値も不定のようだ。 // 要はアドレスバスとR/W信号線しか見ていない。 +#include "sysctlr.h" +#include "lance.h" +#include "mpu88xx0.h" +#include "nmi.h" +#include "prom.h" +#include "sio.h" +#include "spc.h" +#include "sysclk.h" // コンストラクタ SysCtlrDevice::SysCtlrDevice() - : inherited("SystemCtlr") + : inherited(OBJ_INTERRUPT) { + SetName("SystemCtlr"); + AddAlias("SystemCtlr"); AddAlias("SysCtlr"); - monitor.func = (MonitorCallback_t)&SysCtlrDevice::MonitorUpdate; - monitor.SetSize(24, 10); + monitor.func = ToMonitorCallback(&SysCtlrDevice::MonitorUpdate); + monitor.SetSize(40, 12); monitor.Regist(ID_MONITOR_INTERRUPT); } @@ -161,12 +180,31 @@ SysCtlrDevice::~SysCtlrDevice() { } +// 初期化 +bool +SysCtlrDevice::Init() +{ + if (inherited::Init() == false) { + return false; + } + + lance = GetLanceDevice(); + mpu88xx0 = GetMPU88xx0Device(); + nmi = GetNMIDevice(); + sio = GetSIODevice(); + spc = GetSPCDevice(); + sysclk = GetSysClkDevice(); + + return true; +} + +// リセット void -SysCtlrDevice::ResetHard() +SysCtlrDevice::ResetHard(bool poweron) { // さすがにリセットくらいはされるだろう… - intmap = 0x00000001; - memset(&counter, 0, sizeof(counter)); + inherited::ResetHard(poweron); + for (int i = 0; i < 4; i++) { // XXX 初期値は分からないがとりあえず割り込み禁止にしておく cpu[i].maskval = 0xfc000000; @@ -197,15 +235,15 @@ SysCtlrDevice::Read32(uint32 addr) } if (0x6d000000 <= addr && addr < 0x6d000010) { - putlog(0, "CPU%d リセット 未実装読み込み", n); + putlog(0, "Read CPU%d reset (NOT IMPLEMENTED)", n); return 0xffffffff; } if (addr == 0x6d000010) { - putlog(0, "CPU ALL リセット 未実装読み込み"); + putlog(0, "Read All CPU reset (NOT IMPLEMENTED)"); return 0xffffffff; } - putlog(0, "未実装読み込み $%08x", addr); + putlog(0, "Read $%08x (NOT IMPLEMENTED)", addr); return 0xffffffff; } @@ -219,9 +257,9 @@ SysCtlrDevice::Write32(uint32 addr, uint // 割り込みレベル変えるたびに表示されるのですごく多い。 // さらに同レベルが書き込まれることも多い…。 if (cpu[n].maskval != data) { - putlog(2, "割り込みマスク(CPU#%d) <- $%08x", n, data); + putlog(2, "Interrupt Mask(CPU#%d) <- $%08x", n, data); } else { - putlog(3, "割り込みマスク(CPU#%d) <- $%08x", n, data); + putlog(3, "Interrupt Mask(CPU#%d) <- $%08x", n, data); } // 設定値を保存 @@ -240,18 +278,23 @@ SysCtlrDevice::Write32(uint32 addr, uint return 0; } if (0x6d000000 <= addr && addr < 0x6d000010) { - putlog(0, "CPU%d リセット 未実装書き込み", n); + putlog(0, "Write CPU%d reset (NOT IMPLEMENTED)", n); return 0; } if (addr == 0x6d000010) { putlog(1, "Reset All CPUs"); - gPROM0->ResetHard(); - gMPU->ResetHard(); - gMPU->Release(); + // XXX このあたりもう少し整理する必要がある + // 今は MPU.ResetHard() が func を ResetCallback に、time をリセット + // 間隔に書き換えて Start() した後、この書き込み命令から戻ったところの + // ExecCallback が time だけ所要サイクルに書き換えて再度 Start() する + // ため、時間はともかく幸い ResetCallback() が呼ばれることで動いている。 + GetPROM0Device()->ResetHard(false); + mpu->ResetHard(false); + ResetHard(false); return 0; } - putlog(0, "未実装書き込み $%08x <- $%08x", addr, data); + putlog(0, "Write $%08x <- $%08x (NOT IMPLEMENTED)", addr, data); return 0; } @@ -276,9 +319,8 @@ SysCtlrDevice::Peek8(uint32 addr) case 3: return data & 0xff; default: - break; + __unreachable(); } - __unreachable(); } void @@ -291,9 +333,11 @@ SysCtlrDevice::MonitorUpdate(Monitor *, } table[] = { { "NMI", IntmapNMI }, { "Clock", IntmapSysClk }, + { "XP(Hi)", IntmapXPHigh }, { "SIO", IntmapSIO }, { "Lance", IntmapLance }, { "SPC", IntmapSPC }, + { "XP(Lo)", IntmapXPLow }, { "Soft#0", IntmapSoft0 }, { "Soft#1", IntmapSoft1 }, { "Soft#2", IntmapSoft2 }, @@ -301,20 +345,26 @@ SysCtlrDevice::MonitorUpdate(Monitor *, }; // CPU の割り込み可否は本当は関係ないけど、便宜的に一緒に表示したい - bool ei = gMPU88xx0->GetCPU()->IsIntrEnable(); + bool ei = mpu88xx0->IsIntrEnable(); screen.Clear(); + + // 0 1 2 3 4 + // 01234567890123456789012345678901234567890 + // Lv Device CPU0 Count + y = 0; - // XXX CPU の実装数によってウィンドウ幅を変える。 - // はみ出したところは描画されないのでヘッダは4つ分出力しておく - screen.Print(0, y++, "Lv Device Count CPU0 CPU1 CPU2 CPU3"); + // XXX CPU の実装数によってウィンドウ幅を変えること。 + screen.Print(0, y, "Lv Device CPU0"); + screen.Puts(35, y, "Count"); + y++; for (int i = 0; i < countof(table); i++) { uint32 map = table[i].map; int clz = __builtin_clz(map); int lv = (31 - clz) / 4; screen.Print(0, y, "%d", lv); - screen.Print(2, y, TA::OnOff(intmap & map), "%s", table[i].name); - screen.Print(8, y, "%10u", counter[clz]); + screen.Print(3, y, TA::OnOff(intmap & map), "%s", table[i].name); + screen.Print(14, y, "%26s", format_number(counter[clz]).c_str()); // CPU ごとのマスク // XXX 今は CPU は1つしかない @@ -323,11 +373,11 @@ SysCtlrDevice::MonitorUpdate(Monitor *, // 動作としては常にマスクされてて通過しないから問題ないが、 // 見せる分にはマスクされているではなく無効と見せたほうがいい。 if (lv == 1 && map != (IntmapSoft0 << n)) { - screen.Puts(20 + n * 5, y, "----"); + screen.Puts(10 + n * 5, y, "----"); } else if ((cpu[n].intmask & map) == 0) { - screen.Puts(20 + n * 5, y, "Mask"); + screen.Puts(10 + n * 5, y, "Mask"); } else if (!ei) { - screen.Puts(20 + n * 5, y, "IND"); + screen.Puts(10 + n * 5, y, "IND"); } } @@ -339,47 +389,28 @@ SysCtlrDevice::MonitorUpdate(Monitor *, uint32 SysCtlrDevice::GetIntmap(Device *source) const { - if (__predict_true(source == gSysClk.get())) { + if (__predict_true(source == sysclk)) { return IntmapSysClk; } - if (__predict_true(source == gSIO.get())) { + if (__predict_true(source == sio)) { return IntmapSIO; } - if (__predict_true(source == gEthernet.get())) { + if (__predict_true(source == lance)) { return IntmapLance; } - if (__predict_true(source == gSPC.get())) { + if (__predict_true(source == spc)) { return IntmapSPC; } - PANIC("Unknown interrupt source?"); -} - -// 外部デバイスが割り込み信号線をアサートした -void -SysCtlrDevice::AssertINT(Device *source) -{ - uint32 oldmap; - uint32 srcmap; - - oldmap = intmap; - srcmap = GetIntmap(source); - intmap |= srcmap; - - if ((oldmap ^ intmap) != 0) { - // 立ち上がりエッジでカウント - counter[__builtin_clz(srcmap)]++; + if (__predict_true(source == DEVICE_XPINT_HIGH)) { + return IntmapXPHigh; } - - ChangeInterrupt(); -} - -// 外部デバイスが割り込み信号線をネゲートした -void -SysCtlrDevice::NegateINT(Device *source) -{ - intmap &= ~GetIntmap(source); - - ChangeInterrupt(); + if (__predict_true(source == DEVICE_XPINT_LOW)) { + return IntmapXPLow; + } + if (source == nmi) { + return IntmapNMI; + } + PANIC("Unknown interrupt source?"); } // 割り込みアクノリッジはない @@ -400,11 +431,11 @@ SysCtlrDevice::ChangeInterrupt() // intmap の最下位ビットは常に立ててあり localmap は 0 にならない int newipl = (uint)(31 - __builtin_clz(localmap)) / 4; - // アサートによって割り込みレベルが変わったら、新しいレベルを通知 + // 割り込みレベルが変わったら、新しいレベルを通知 if (newipl != cpu[i].ipl) { cpu[i].ipl = newipl; // MPU 側は 1 レベルしかない - gMPU->Interrupt(cpu[i].ipl ? 1 : 0); + mpu->Interrupt(cpu[i].ipl ? 1 : 0); } } } @@ -431,4 +462,3 @@ SysCtlrDevice::MakeIntMask(uint32 data, return val; } -