--- nono/vm/rp5c15.cpp	2026/04/29 17:04:59	1.1.1.9
+++ nono/vm/rp5c15.cpp	2026/04/29 17:05:17	1.1.1.12
@@ -4,29 +4,32 @@
 // Licensed under nono-license.txt
 //
 
-#include "rp5c15.h"
-#include "mpu.h"
-#include <sys/time.h>
+//
+// 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.func = ToMonitorCallback(&RP5C15Device::MonitorUpdate);
 	monitor.SetSize(41, 22);
 	monitor.Regist(ID_MONITOR_RTC);
 }
 
+// デストラクタ
 RP5C15Device::~RP5C15Device()
 {
 }
@@ -35,12 +38,19 @@ RP5C15Device::~RP5C15Device()
 bool
 RP5C15Device::Init()
 {
+	if (inherited::Init() == false) {
+		return false;
+	}
+
+	mfp = GetMFPDevice();
+	power = GetPowerDevice();
+
 	// デフォルトで 24 時間計にしておく
 	reg.sel24 = 0x01;
 	// デフォルトで 1HZ_ON, 16HZ_ON をネゲート(1)しておく
 	reg.reset = RP5C15::RESET_1Hz | RP5C15::RESET_16Hz;
 
-	return inherited::Init();
+	return true;
 }
 
 uint64
@@ -49,7 +59,7 @@ RP5C15Device::Read(uint32 offset)
 	uint8 data;
 	int n;
 
-	gMPU->AddCycle(29);	// InsideOut p.135
+	mpu->AddCycle(29);	// InsideOut p.135
 
 	// バンクを展開する
 	int bank = (reg.mode & RP5C15::MODE_BANK);
@@ -68,7 +78,7 @@ RP5C15Device::Read(uint32 offset)
 		data = reg.r[n];
 		break;
 	 default:
-		__unreachable();
+		VMPANIC("corrupted n=$%x", n);
 	}
 
 	// 下位4ビット(RP5C15) の中の未実装ビットは %0 だが
@@ -84,7 +94,7 @@ RP5C15Device::Write(uint32 offset, uint3
 {
 	int n;
 
-	gMPU->AddCycle(38);	// InsideOut p.135
+	mpu->AddCycle(38);	// InsideOut p.135
 
 	// バンクを展開する
 	int bank = (reg.mode & RP5C15::MODE_BANK);
@@ -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,6 +221,7 @@ RP5C15Device::Write(uint32 offset, uint3
 		if ((reg.reset & RP5C15::RESET_1Hz)) {
 			alarm_1Hz = false;
 		}
+		ChangeAlarmOut();
 		break;
 
 	 default:
@@ -240,7 +251,7 @@ RP5C15Device::Peek(uint32 offset)
 		return reg.r[n] | 0xf0;
 
 	 default:
-		__unreachable();
+		return 0xff;
 	}
 }
 
@@ -368,7 +379,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 +512,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 +544,7 @@ RP5C15Device::Tick32Hz()
 	// アラーム端子 16Hz パルス出力は %0 ならオン
 	if ((reg.reset & RP5C15::RESET_16Hz) == 0) {
 		alarm_16Hz = !alarm_16Hz;
+		ChangeAlarmOut();
 	}
 }
 
@@ -526,11 +554,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 +570,7 @@ RP5C15Device::Tick2Hz()
 	// アラーム端子 16Hz パルス出力は %0 ならオン
 	if ((reg.reset & RP5C15::RESET_1Hz) == 0) {
 		alarm_1Hz = !alarm_1Hz;
+		ChangeAlarmOut();
 	}
 }
 
@@ -563,7 +592,7 @@ RP5C15Device::Tick1Hz()
 	// としか書かれておらず、00 or 30 秒で動作するとは書かれていない。
 	// データシートの図からはカレンダとは独立しているように読める。
 
-	// 1/60Hz CLKOUT のための 60sec カウンタ
+	// 1/60Hz CLKOUT のための 60sec カウンタ。
 	// このカウンタは clksel によらず常にカウントする。
 	cnt_60sec++;
 	if (cnt_60sec == 60) {
@@ -571,7 +600,7 @@ RP5C15Device::Tick1Hz()
 	}
 
 	if (reg.clksel == 6) {
-		// CLKOUT 1/60Hz は duty50% なので ON/OFF 駆動は 30sec になる
+		// CLKOUT 1/60Hz は duty50% なのでオン/オフ駆動は 30sec になる
 		clkout = (cnt_60sec < 30);
 	}
 }