--- nono/vm/rp5c15.cpp 2026/04/29 17:04:59 1.1.1.9 +++ nono/vm/rp5c15.cpp 2026/04/29 17:05:25 1.1.1.14 @@ -4,29 +4,32 @@ // Licensed under nono-license.txt // -#include "rp5c15.h" -#include "mpu.h" -#include +// +// RTC (RP5C15) +// // アラームは未実装 -// XXX RTC の読み書きはロックしたほうがいいような気がする +#include "rp5c15.h" +#include "mfp.h" +#include "mpu.h" +#include "power.h" +// コンストラクタ RP5C15Device::RP5C15Device() - : inherited("RTC") + : inherited() { - devaddr = 0xe8a000; - devlen = 0x2000; - - // X68k は 1980 年の時、年カウンタに 0 をセット + // X68k の RTC epoch は 1980年固定で変更の必要はないので、設定も見ない。 year_epoch = 1980; + // X68k は通常ローカルタイム (というか JST) で使用する前提 use_localtime = true; - monitor.func = (MonitorCallback_t)&RP5C15Device::MonitorUpdate; - monitor.SetSize(41, 22); + monitor.func = ToMonitorCallback(&RP5C15Device::MonitorUpdate); + monitor.SetSize(38, 22); monitor.Regist(ID_MONITOR_RTC); } +// デストラクタ RP5C15Device::~RP5C15Device() { } @@ -35,22 +38,27 @@ RP5C15Device::~RP5C15Device() bool RP5C15Device::Init() { + if (inherited::Init() == false) { + return false; + } + + mfp = GetMFPDevice(); + power = dynamic_cast(GetPowerDevice()); + // デフォルトで 24 時間計にしておく reg.sel24 = 0x01; // デフォルトで 1HZ_ON, 16HZ_ON をネゲート(1)しておく reg.reset = RP5C15::RESET_1Hz | RP5C15::RESET_16Hz; - return inherited::Init(); + return true; } -uint64 +busdata RP5C15Device::Read(uint32 offset) { - uint8 data; + busdata data; int n; - gMPU->AddCycle(29); // InsideOut p.135 - // バンクを展開する int bank = (reg.mode & RP5C15::MODE_BANK); n = bank * 0x10 + offset; @@ -68,29 +76,31 @@ RP5C15Device::Read(uint32 offset) data = reg.r[n]; break; default: - __unreachable(); + VMPANIC("corrupted n=$%x", n); } // 下位4ビット(RP5C15) の中の未実装ビットは %0 だが // 上位4ビットは %1 になる。 data |= 0xf0; - putlog(2, "RTC Bank%d $%x -> $%02x", bank, offset, data); + putlog(2, "Bank%d $%x -> $%02x", bank, offset, data.Data()); + + // InsideOut p.135 + const busdata read_wait = busdata::Wait(29 * 40_nsec); + data |= read_wait; return data; } -uint64 +busdata RP5C15Device::Write(uint32 offset, uint32 data) { int n; - gMPU->AddCycle(38); // InsideOut p.135 - // バンクを展開する int bank = (reg.mode & RP5C15::MODE_BANK); n = bank * 0x10 + offset; - putlog(2, "RTC Bank%d $%x <- $%x", bank, offset, (data & 0x0f)); + putlog(2, "Bank%d $%x <- $%x", bank, offset, (data & 0x0f)); switch (n) { case RP5C15::SEC1: @@ -191,7 +201,7 @@ RP5C15Device::Write(uint32 offset, uint3 if (data == 0) { // 通常 0 を書き込むこと、となっているので 0 は許可 } else { - putlog(0, "TEST <- $%1x 未実装書き込み", data); + putlog(0, "TEST <- $%1x (NOT IMPLEMENTED)", data); } reg.test = data; break; @@ -211,15 +221,20 @@ RP5C15Device::Write(uint32 offset, uint3 if ((reg.reset & RP5C15::RESET_1Hz)) { alarm_1Hz = false; } + ChangeAlarmOut(); break; default: break; } - return 0; + + // InsideOut p.135 + const busdata write_wait = busdata::Wait(38 * 40_nsec); + + return write_wait; } -uint64 +busdata RP5C15Device::Peek(uint32 offset) { int n; @@ -240,7 +255,7 @@ RP5C15Device::Peek(uint32 offset) return reg.r[n] | 0xf0; default: - __unreachable(); + return 0xff; } } @@ -342,24 +357,22 @@ RP5C15Device::MonitorUpdate(Monitor *, T // MODE y = 17; - screen.Print(0, y, "$d(MODE): %x", reg.mode); - screen.Puts(13, y, TA::OnOff(reg.mode & RP5C15::MODE_TIMER_EN), "TIMER_EN"); - screen.Puts(22, y, TA::OnOff(reg.mode & RP5C15::MODE_ALARM_EN), "ALARM_EN"); - screen.Print(31, y, "BANK=%d", reg.mode & RP5C15::MODE_BANK); + screen.Print(0, y, "$d(MODE): %x", reg.mode); + screen.Puts(14, y, TA::OnOff(reg.mode & RP5C15::MODE_TIMER_EN), "TIMER_EN"); + screen.Puts(23, y, TA::OnOff(reg.mode & RP5C15::MODE_ALARM_EN), "ALARM_EN"); + screen.Print(32, y, "BANK=%d", reg.mode & RP5C15::MODE_BANK); // TEST y++; - screen.Print(0, y, "$e(TEST): %x", reg.test); + screen.Print(0, y, "$e(TEST): %x", reg.test); // RESET y++; - screen.Print(0, y, "$f(RESET): %x", reg.reset); - screen.Print(13, y, "1Hz=%s", - (reg.reset & RP5C15::RESET_1Hz) ? "OFF" : "ON"); - screen.Print(21, y, "16Hz=%s", - (reg.reset & RP5C15::RESET_16Hz) ? "OFF" : "ON"); - screen.Puts(30, y, TA::OnOff(reg.reset & RP5C15::RESET_TIMER), "TIMER"); - screen.Puts(36, y, TA::OnOff(reg.reset & RP5C15::RESET_ALARM), "ALARM"); + screen.Print(0, y, "$f(RESET): %x", reg.reset); + screen.Print(14, y, TA::OnOff(reg.reset & RP5C15::RESET_1Hz), "!1Hz"); + screen.Print(19, y, TA::OnOff(reg.reset & RP5C15::RESET_16Hz), "!16Hz"); + screen.Puts(25, y, TA::OnOff(reg.reset & RP5C15::RESET_TIMER), "TIMER"); + screen.Puts(31, y, TA::OnOff(reg.reset & RP5C15::RESET_ALARM), "ALARM"); // PIN y++; @@ -368,7 +381,7 @@ RP5C15Device::MonitorUpdate(Monitor *, T // ここでは分かりやすさ優先で正論理としている。 screen.Print(0, y, "Pin: CLKOUT=%c ALARM=%c", clkout ? 'H' : 'L', - AlarmOut() ? 'H' : 'L'); + alarm_out ? 'H' : 'L'); } // 秒を取得 @@ -501,12 +514,28 @@ RP5C15Device::SetLeap(uint v) reg.leap = v & 3; } +// ALARM OUT 信号 +void +RP5C15Device::ChangeAlarmOut() +{ + bool old = alarm_out; + + // アラーム出力は内部のアラーム用 16Hz, 1Hz と + // アラーム時刻一致の alarm_on との OR 論理となっている。 + alarm_out = alarm_16Hz | alarm_1Hz | alarm_on; + + if (old != alarm_out) { + power->SetAlarmOut(alarm_out); + mfp->SetAlarmOut(alarm_out); + } +} + // 32Hz 仮想 RTC からのコール void RP5C15Device::Tick32Hz() { if (reg.clksel == 4) { - // CLKOUT 16Hz は duty50% なので ON/OFF 駆動は 32Hz になる + // CLKOUT 16Hz は duty50% なのでオン/オフ駆動は 32Hz になる clkout = ((cnt & 1) == 0); } @@ -517,6 +546,7 @@ RP5C15Device::Tick32Hz() // アラーム端子 16Hz パルス出力は %0 ならオン if ((reg.reset & RP5C15::RESET_16Hz) == 0) { alarm_16Hz = !alarm_16Hz; + ChangeAlarmOut(); } } @@ -526,11 +556,11 @@ void RP5C15Device::Tick2Hz() { if (reg.clksel == 5) { - // CLKOUT 1Hz は duty50% なので ON/OFF 駆動は 2Hz になる + // CLKOUT 1Hz は duty50% なのでオン/オフ駆動は 2Hz になる。 // CLKOUT 端子は秒の繰り上がりに同期している。 // TIMER_EN (秒への繰り上がり) が無効でも反転自体は起きる気が // するので、ここでは UPDATE_SEC ではなく cnt で判定する。 - // CLKOUT は 1秒の繰り上がりが起きる時に 'H' になる + // CLKOUT は 1秒の繰り上がりが起きる時に 'H' になる。 clkout = ((cnt & 15) == 0); } @@ -542,6 +572,7 @@ RP5C15Device::Tick2Hz() // アラーム端子 16Hz パルス出力は %0 ならオン if ((reg.reset & RP5C15::RESET_1Hz) == 0) { alarm_1Hz = !alarm_1Hz; + ChangeAlarmOut(); } } @@ -563,7 +594,7 @@ RP5C15Device::Tick1Hz() // としか書かれておらず、00 or 30 秒で動作するとは書かれていない。 // データシートの図からはカレンダとは独立しているように読める。 - // 1/60Hz CLKOUT のための 60sec カウンタ + // 1/60Hz CLKOUT のための 60sec カウンタ。 // このカウンタは clksel によらず常にカウントする。 cnt_60sec++; if (cnt_60sec == 60) { @@ -571,7 +602,7 @@ RP5C15Device::Tick1Hz() } if (reg.clksel == 6) { - // CLKOUT 1/60Hz は duty50% なので ON/OFF 駆動は 30sec になる + // CLKOUT 1/60Hz は duty50% なのでオン/オフ駆動は 30sec になる clkout = (cnt_60sec < 30); } }