--- nono/vm/scsidev.cpp	2026/04/29 17:05:25	1.1.1.17
+++ nono/vm/scsidev.cpp	2026/04/29 17:05:43	1.1.1.20
@@ -18,6 +18,7 @@
 
 #include "scsicmd.h"
 #include "scsidev.h"
+#include "scsidomain.h"
 #include "config.h"
 #include "mainapp.h"
 #include "scheduler.h"
@@ -28,9 +29,10 @@
 //
 
 // コンストラクタ
-SCSIDevice::SCSIDevice(int objid_)
+SCSIDevice::SCSIDevice(uint objid_)
 	: inherited(objid_)
 {
+	myid = -1;
 }
 
 // デストラクタ
@@ -38,25 +40,28 @@ SCSIDevice::~SCSIDevice()
 {
 }
 
+// バスに接続する。
+void
+SCSIDevice::Attach(SCSIBus *bus_)
+{
+	bus = bus_;
+}
+
 
 //
-// SCSI ホストデバイス
+// SCSI ホストデバイス (イニシエータ)
 //
 
 // コンストラクタ
-SCSIHostDevice::SCSIHostDevice(int objid_)
-	: inherited(objid_)
+SCSIHostDevice::SCSIHostDevice(SCSIDomain *domain_, IODevice *parent_)
+	: inherited(OBJ_NONE)
 {
+	domain = domain_;
+	parent = parent_;
+	// イニシエータの ID は実行時にコントローラによって決まる。
 	devtype = SCSI::DevType::Initiator;
 
-	monitor_devs.func = ToMonitorCallback(&SCSIHostDevice::MonitorUpdateDevs);
-	// サイズは Create で決まる
-	monitor_devs.Regist(ID_MONITOR_SCSIDEVS);
-
-	// バスデバイスを作成する。
-	// ただし自身がバスに参加するのは継承側で行う
-	// (例えば SPC なら BDID 書き込みで ID が決まった後、など)。
-	scsibus.reset(new SCSIBus());
+	SetLogLevel(parent->loglevel);
 }
 
 // デストラクタ
@@ -64,95 +69,29 @@ SCSIHostDevice::~SCSIHostDevice()
 {
 }
 
-// 設定ファイルに使われるこのホストデバイスを示す接頭語を設定する
-// (継承クラス側のコンストラクタで config_name を設定後に呼ぶこと)
+// SCSI ID を設定する。
+// (SCSIDomain からのみ呼ぶこと)
 void
-SCSIHostDevice::SetConfigName(const char *name_)
-{
-	config_name = name_;
-}
-
-bool
-SCSIHostDevice::Create()
+SCSIHostDevice::SetID(uint id_)
 {
-	// 設定を読み込む。
-	for (int id = 0; id < 8; id++) {
-		const std::string key = string_format("%s-id%d-image",
-			GetConfigName(), id);
-		const ConfigItem& item = gConfig->Find(key);
-		const std::string& image = item.AsString();
-
-		// 空ならデバイスなし
-		if (image.empty()) {
-			// 未接続部分のパラメータは減らしておくか。
-			// --show-config するとさすがに無駄に多くて邪魔なので。
-			const std::string wikey = string_format("%s-id%d-writeignore",
-				GetConfigName(), id);
-			const std::string wpkey = string_format("%s-id%d-writeprotect",
-				GetConfigName(), id);
-			const std::string stkey = string_format("%s-id%d-seektime",
-				GetConfigName(), id);
-			gConfig->Delete(wikey);
-			gConfig->Delete(wpkey);
-			gConfig->Delete(stkey);
-			continue;
-		}
-
-		// ',' より前がデバイス種別 (ここではパスは不要)
-		auto v = string_split(image, ',');
-		// 比較のため前後の空白を取り除いて小文字にする
-		std::string type = string_trim(v[0]);
-		type = string_tolower(type);
-
-		SCSI::DevType target_devtype;
-		if (type == "hd") {
-			target_devtype = SCSI::DevType::HD;
-		} else if (type == "cd") {
-			target_devtype = SCSI::DevType::CD;
-		} else if (type == "mo") {
-			target_devtype = SCSI::DevType::MO;
-		} else {
-			item.Err("Invaild device type '%s'", type.c_str());
-			return false;
-		}
-		target[id].reset(new SCSIDisk(this, id, target_devtype));
-		scsibus->Attach(target[id].get(), id);
-	}
-
-	return true;
+	myid = id_;
 }
 
-// 初期化。
-// 継承クラスが connected_devices をセットした後で呼ぶこと。
-bool
-SCSIHostDevice::Init()
+// SCSIBus からのコールバック関数を設定する。
+void
+SCSIHostDevice::SetBusCallback(
+	BusFreeCallback_t busfree_,
+	SCSIHostCallback_t selack_,
+	SCSIHostCallback_t xferreq_)
 {
-	if (inherited::Init() == false) {
-		return false;
-	}
-
-	// 初期化ではないけどログレベルがセットできたここでデバッグ表示。
-	// -L オプションの処理は Create() の後なので。
-	if (loglevel >= 1) {
-		for (int id = 0; id < 8; id++) {
-			std::string typestr;
-			if (target[id]) {
-				typestr = SCSI::GetDevTypeName(target[id]->GetDevType());
-				putmsgn("%s target #%d %s", GetConfigName(), id,
-					typestr.c_str());
-			}
-		}
-	}
-
-	// connected_devices によってモニタの大きさを決定。
-	monitor_devs.SetSize(75, (connected_devices.size() - 1) * 4 + 1);
-
-	return true;
+	BusFreeCallback = busfree_;
+	SelectionAckCallback = selack_;
+	TransferReqCallback = xferreq_;
 }
 
-// バスフリーコールバック (SCSIBus から呼ばれる)
+// バスフリーになった (SCSIBus から呼ばれる)
 void
-SCSIHostDevice::BusFreeCB(int id)
+SCSIHostDevice::OnBusFree(uint id)
 {
 	// 実際にはバスフリーを検出したデバイスは各自自身が送出している信号を
 	// 下げるのだが、色々面倒なので、ここではホストのバスフリーコールバックが
@@ -161,10 +100,10 @@ SCSIHostDevice::BusFreeCB(int id)
 
 	uint32 data;
 	while ((data = GetBSY()) != 0) {
-		bus->NegateBSY(DecodeID(data));
+		bus->NegateBSY(SCSIBus::DecodeID(data));
 	}
 	while ((data = GetSEL()) != 0) {
-		bus->NegateSEL(DecodeID(data));
+		bus->NegateSEL(SCSIBus::DecodeID(data));
 	}
 	if (GetREQ()) {
 		NegateREQ();
@@ -177,83 +116,35 @@ SCSIHostDevice::BusFreeCB(int id)
 	}
 	SetXfer(0);
 	SetData(0);
+
+	// 親のバスフリーコールバックを呼ぶ
+	(parent->*(BusFreeCallback))(id);
+
+	// RST が見えてる状態で親に通知はしたので、ここで下ろす。
+	if (GetRST()) {
+		NegateRST();
+	}
 }
 
-// SCSI デバイスモニタ
-// (どこでやるのがいいか分からんけど、SCSI デバイスを一括して表示したいので
-// とりあえずここで)
+// ターゲットがセレクションに応答した (SCSIBus から呼ばれる)
 void
-SCSIHostDevice::MonitorUpdateDevs(Monitor *, TextScreen& screen)
+SCSIHostDevice::OnSelectionAck()
 {
-	int y;
-
-// 012345678901234567890123456789012345678901234567890123456789012345678901234
-// ID6: HD(2048MB)
-//      MediumLoaded   Off      LogicalBlock 2048    ImageSize   2,147,483,648
-//      RemovalPrevent Off      WriteProtected
-
-
-	screen.Clear();
-
-	y = 0;
-	for (const auto dev : connected_devices) {
-		std::string desc = SCSI::GetDevTypeName(dev->GetDevType());
-		std::string pathname;
-
-		SCSIDisk *disk = dynamic_cast<SCSIDisk*>(dev);
-		if (disk && disk->IsMediumLoaded()) {
-			desc += string_format("(%dMB)",
-				(int)(disk->GetSize() / 1024 / 1024));
-			pathname = disk->GetPathName();
-		}
-		screen.Print(0, y, "ID%c: %s", '0' + dev->GetMyID(), desc.c_str());
-
-#if 1
-		(void)pathname;
-#else
-		// パス名の非ASCIIどうするか
-		if (!pathname.empty()) {
-			if (pathname.size() > screen.GetCol() - 16 - 3) {
-				pathname = pathname.substr(0, screen.GetCol() - 16 - 3);
-				pathname += "...";
-			}
-			screen.Puts(16, y, pathname.c_str());
-		}
-#endif
-		y++;
-
-		// イニシエータならここまで。(今の所イニシエータとディスクしかない)
-		if (disk == NULL) {
-			continue;
-		}
+	// ターゲットが BSY を立てて応答したので、
+	// こちらはデータバスをクリアして SEL を下げる。
+	// これによりセレクションフェーズは成功で完了する。
+	SetData(0);
+	NegateSEL();
 
-		const int x1 = 5;
-		const int x2 = 29;
-		const int x3 = 50;
-
-		// 1行目
-		screen.Print(x1, y,
-			(disk->IsRemovableDevice() ? TA::Normal : TA::Disable),
-			"MediumLoaded   %s",
-			disk->IsMediumLoaded() ? "On" : "Off");
-		screen.Print(x2, y, "LogicalBlock %d", disk->GetBlocksize());
-		std::string imagesize = format_number(disk->GetSize());
-		screen.Print(x3, y, "ImageSize   %13s", imagesize.c_str());
-		y++;
-
-		// 2行目
-		screen.Print(x1, y,
-			(disk->IsRemovableDevice() ? TA::Normal : TA::Disable),
-			"RemovalPrevent %s",
-			disk->IsMediumRemovalPrevented() ? "On" : "Off");
-
-		screen.Puts(x2, y,
-			(disk->IsMediumLoaded() ? TA::Normal : TA::Disable),
-			disk->GetWriteModeStr());
-		y++;
+	// 親のバスフリーコールバックを呼ぶ
+	(parent->*(SelectionAckCallback))();
+}
 
-		y++;
-	}
+// ターゲットが REQ を立てた (SCSIBus から呼ばれる)
+void
+SCSIHostDevice::OnTransferReq()
+{
+	(parent->*(TransferReqCallback))();
 }
 
 
@@ -262,11 +153,10 @@ SCSIHostDevice::MonitorUpdateDevs(Monito
 //
 
 // コンストラクタ。
-SCSITarget::SCSITarget(SCSIHostDevice *h, int id)
+SCSITarget::SCSITarget(SCSIDomain *domain_, uint id)
 	: inherited(OBJ_NONE)	// オブジェクト ID で検索することはない
 {
-	// ホストへのリンク (所有関係のないポインタ)
-	host = h;
+	domain = domain_;
 	myid = id;
 }
 
@@ -291,7 +181,7 @@ SCSITarget::ResetHard(bool poweron)
 
 // バスリセットされた (SCSIBus から呼ばれる)
 void
-SCSITarget::BusResetCB()
+SCSITarget::OnBusReset()
 {
 	// センスキーをクリア
 	ClearSense();
@@ -315,18 +205,18 @@ SCSITarget::BusResetCB()
 
 // セレクションで選択された (SCSIBus から呼ばれる)
 void
-SCSITarget::SelectionCB()
+SCSITarget::OnSelected()
 {
 	// ターゲットが、自身が選択されていることを認識してから BSY を
 	// 立てるまでの時間はもうバス側でカウントしてあるので、ここでは
 	// ただちに BSY を上げてよい。
-	putlog(4, "Selection Callback");
+	putlog(4, "OnSelected");
 	AssertBSY();
 }
 
 // 情報転送フェーズを開始する (SCSIBus から呼ばれる)
 void
-SCSITarget::StartTransferCB()
+SCSITarget::OnStartTransfer()
 {
 	// 最初はコマンドフェーズ。(ATN はとりあえず放置)
 	putlog(4, "Start Command Phase");
@@ -338,7 +228,7 @@ SCSITarget::StartTransferCB()
 
 // 情報転送フェーズ間の遷移について
 //
-// 情報転送フェーズは TransferCB() で1バイトずつ転送を行い、所定のバイト数
+// 情報転送フェーズは OnTransfer() で1バイトずつ転送を行い、所定のバイト数
 // の転送が完了すればフェーズを遷移する。遷移方法は入出力方向別で6通り。
 //  o IN  -> IN
 //  o IN  -> OUT
@@ -347,26 +237,26 @@ SCSITarget::StartTransferCB()
 //  o OUT -> IN
 //  o OUT -> END
 //
-// IN -> IN の遷移。TransferCB() で前フェーズの最終バイト受信後、フェーズを
+// IN -> IN の遷移。OnTransfer() で前フェーズの最終バイト受信後、フェーズを
 // 変更して REQ を立てるところまで。
 //
-// IN -> OUT の遷移。TransferCB() で前フェーズの最終バイト受信後、フェーズを
+// IN -> OUT の遷移。OnTransfer() で前フェーズの最終バイト受信後、フェーズを
 // 変更して (おそらく {Phase}Begin() を発行してから)、データをセットし REQ
 // を立てる?
 //
-// IN -> END の遷移。TransferCB() で前フェーズの最終バイト受信後、BSY を
+// IN -> END の遷移。OnTransfer() で前フェーズの最終バイト受信後、BSY を
 // 下げて終了。
 //
 // OUT -> OUT の遷移。前フェーズの最終バイトをイニシエータが受信後に
-// TransferCB() が呼ばれるので、フェーズを変更して (おそらく {Phase}Begin()
+// OnTransfer() が呼ばれるので、フェーズを変更して (おそらく {Phase}Begin()
 // を発行してから)、データをセットし REQ を立てる?
 //
 // OUT -> IN の遷移。前フェーズの最終バイトをイニシエータが受信後に
-// TransferCB() が呼ばれるので、フェーズを変更して (おそらく {Phase}Begin()
+// OnTransfer() が呼ばれるので、フェーズを変更して (おそらく {Phase}Begin()
 // を発行してから)、REQ を立てる?
 //
 // OUT -> END の遷移。前フェーズの最終バイトをイニシエータが受信後に
-// TransferCB() が呼ばれるので、BSY を下げる?
+// OnTransfer() が呼ばれるので、BSY を下げる?
 
 // 情報転送フェーズでイニシエータが ACK を上げた。(SCSIBus から呼ばれる)
 // OUT (イニシエータ → ターゲット方向) なら、ターゲットが上げた REQ に応答
@@ -374,7 +264,7 @@ SCSITarget::StartTransferCB()
 // IN (ターゲット → イニシエータ方向) なら、ターゲットがデータをデータバスに
 // 乗せて REQ を上げたのをイニシエータが受信した後でこれをコールしてくる。
 void
-SCSITarget::TransferCB()
+SCSITarget::OnTransfer()
 {
 	uint8 data;
 	SCSI::XferPhase xfer;
@@ -388,8 +278,8 @@ SCSITarget::TransferCB()
 		// コマンドフェーズだけいろいろ特殊なので別処理。
 		// 受信バッファが異なる、1バイト目で受信長が決まるなど。
 		data = GetData();
-		putlog(4, "TransferCB: cmdseq[%02d] = $%02x",
-			(int)cmdseq.size(), data);
+		putlog(4, "%s: cmdseq[%02u] = $%02x", __func__,
+			(uint)cmdseq.size(), data);
 		cmdseq.push_back(data);
 		if (cmdseq.size() == 1) {
 			// 1バイト目ならこのコマンドが何バイトか調べる
@@ -420,9 +310,20 @@ SCSITarget::TransferCB()
 				}
 				putlogn("%s", cmdbuf.c_str());
 			}
-			// 最終バイトを受信したらコマンドを選択
-			DispatchCmd();
+			// 最終バイトを受信したらコマンドを選択。
 			lastbyte = true;
+			SelectCommand();
+			if ((bool)cmd == false) {
+				std::string namebuf;
+				const char *name = SCSI::GetCommandName(cmdseq[0]);
+				if (name) {
+					namebuf = std::string(name);
+				} else {
+					namebuf = string_format("$%02x", cmdseq[0]);
+				}
+				putlog(0, "Failed to initialize command %s", namebuf.c_str());
+				AssertRST();
+			}
 		}
 	} else if (GetIO() == false) {
 		// OUT 方向 (ターゲットが受信側)
@@ -435,7 +336,7 @@ SCSITarget::TransferCB()
 	} else {
 		// IN 方向 (ターゲットが送信側)
 		// bytecount は加算方向。
-		// データは前のループの終わり (TransferAckCB()の下のほう) で
+		// データは前のループの終わり (OnTransferAck()の下のほう) で
 		// セットしているのでここでは引き取られた分をカウントする。
 		bytecount++;
 		if (bytecount >= cmd->buf.size()) {
@@ -448,7 +349,7 @@ SCSITarget::TransferCB()
 
 // 情報転送フェーズでイニシエータが ACK を下げた。(SCSIBus から呼ばれる)
 void
-SCSITarget::TransferAckCB()
+SCSITarget::OnTransferAck()
 {
 	SCSI::XferPhase xfer = GetXfer();
 
@@ -458,7 +359,7 @@ SCSITarget::TransferAckCB()
 		// フェーズ完了
 		switch (xfer) {
 		 case SCSI::XferPhase::Command:
-			next = cmd->Command(cmdseq);
+			next = cmd->ExecCommand(cmdseq);
 			break;
 		 case SCSI::XferPhase::DataOut:
 			next = cmd->DoneDataOut();
@@ -476,7 +377,7 @@ SCSITarget::TransferAckCB()
 			next = cmd->DoneStatus();
 			break;
 		 default:
-			PANIC("TransferCB unknown xfer done %d", (int)xfer);
+			PANIC("%s unknown xfer done %d", __func__, (int)xfer);
 		}
 		putlog(3, "%s done", SCSI::GetXferPhaseName(xfer));
 
@@ -489,6 +390,7 @@ SCSITarget::TransferAckCB()
 		if (next != xfer) {
 			// End ならバスフリーにして終了。
 			if (next == SCSI::XferPhase::End) {
+				cmd.reset();
 				NegateBSY();
 				return;
 			}
@@ -505,30 +407,30 @@ SCSITarget::TransferAckCB()
 			 case SCSI::XferPhase::DataOut:
 				cmd->buf.clear();
 				bytecount = cmd->recvbytes;
-				putlog(3, "DataOut begin (%d bytes)", bytecount);
+				putlog(3, "DataOut begin (%u bytes)", bytecount);
 				break;
 			 case SCSI::XferPhase::DataIn:
 				bytecount = 0;
-				putlog(3, "DataIn begin (%d bytes)", (int)cmd->buf.size());
+				putlog(3, "DataIn begin (%u bytes)", (uint)cmd->buf.size());
 				break;
 			 case SCSI::XferPhase::MsgOut:
 				cmd->BeginMsgOut();
 				cmd->buf.clear();
 				bytecount = cmd->recvbytes;
-				putlog(3, "MsgOut begin (%d bytes)", bytecount);
+				putlog(3, "MsgOut begin (%u bytes)", bytecount);
 				break;
 			 case SCSI::XferPhase::MsgIn:
 				cmd->BeginMsgIn();
 				bytecount = 0;
-				putlog(3, "MsgIn begin (%d bytes)", (int)cmd->buf.size());
+				putlog(3, "MsgIn begin (%u bytes)", (uint)cmd->buf.size());
 				break;
 			 case SCSI::XferPhase::Status:
 				cmd->BeginStatus();
 				bytecount = 0;
-				putlog(3, "Status begin (%d bytes)", (int)cmd->buf.size());
+				putlog(3, "Status begin (%u bytes)", (uint)cmd->buf.size());
 				break;
 			 default:
-				PANIC("TransferCB unknown xfer begin %d", (int)xfer);
+				PANIC("%s unknown xfer begin %d", __func__, (int)xfer);
 			}
 		}
 	}
@@ -543,7 +445,8 @@ SCSITarget::TransferAckCB()
 	AssertREQ();
 }
 
-// SCSI コマンドのディスパッチャ
+// SCSI コマンドのディスパッチャ。
+// C++ の例外は呼び出し側で捕捉している。
 void
 SCSITarget::DispatchCmd()
 {
@@ -581,32 +484,46 @@ SCSITarget::DispatchCmd()
 		if (cname) {
 			name = string_format(" %s", cname);
 		}
-		putlog(0, "SCSI Command $%02x%s len=%d not supported",
-			cmdseq[0], name.c_str(), (int)cmdseq.size());
+		putlog(0, "SCSI Command $%02x%s len=%u not supported",
+			cmdseq[0], name.c_str(), (uint)cmdseq.size());
 
 		cmd.reset(new SCSICmdNotSupportedCommand(this));
 		break;
 	}
 }
 
-// コマンド列を指定して対応するコマンドを選択する。なければ NULL を返す。
-// ROM30 エミュレーション用。
+// コマンド列を指定して対応するコマンドを選択する。
+// 知らないコマンドなら SCSICmdNotSupportedCommand という仮想のコマンドを返す。
+// コマンドインスタンスが生成できなければ NULL を返す。
+// 外部向け。
 SCSICmd *
 SCSITarget::SelectCommand(const std::vector<uint8>& cmdseq_)
 {
 	cmdseq = cmdseq_;
-	DispatchCmd();
+	SelectCommand();
 	return cmd.get();
 }
 
+// 内部版。
+// 入力コマンド列はメンバ変数 cmdseq だし、生成した cmd もメンバ変数。
+void
+SCSITarget::SelectCommand()
+{
+	cmd.reset();
+	// DispatchCmd() の中は new が多いので個別に捕捉せずこっちでやる。
+	try {
+		DispatchCmd();
+	} catch (...) { }
+}
+
 
 //
 // SCSI Disk
 //
 
 // コンストラクタ
-SCSIDisk::SCSIDisk(SCSIHostDevice *h, int id, SCSI::DevType devtype_)
-	: inherited(h, id)
+SCSIDisk::SCSIDisk(SCSIDomain *domain_, uint id, SCSI::DevType devtype_)
+	: inherited(domain_, id)
 {
 	devtype = devtype_;
 
@@ -616,11 +533,11 @@ SCSIDisk::SCSIDisk(SCSIHostDevice *h, in
 	// コンストラクタ本文でログ名などを設定する。その時の作法に
 	// 従っているのですこし面倒な手法が必要。
 	// lib/object.h 参照。
-	SetName(string_format("SCSI%s%d", devtypename, id));
+	SetName(string_format("SCSI%s%u", devtypename, id));
 	ClearAlias();
-	AddAlias(string_format("SCSI%s%d", devtypename, id));
-	AddAlias(string_format("SCSI%d", id));
-	AddAlias(string_format("%s%d", devtypename, id));
+	AddAlias(string_format("SCSI%s%u", devtypename, id));
+	AddAlias(string_format("SCSI%u", id));
+	AddAlias(string_format("%s%u", devtypename, id));
 
 	switch (devtype) {
 	 case SCSI::DevType::HD:
@@ -639,7 +556,7 @@ SCSIDisk::SCSIDisk(SCSIHostDevice *h, in
 		blocksize = 512;
 		break;
 	 default:
-		PANIC("corrupted devtype=%d", (int)devtype);
+		PANIC("corrupted devtype=%u", (uint)devtype);
 	}
 
 }
@@ -653,15 +570,10 @@ SCSIDisk::~SCSIDisk()
 bool
 SCSIDisk::Init()
 {
-	if (inherited::Init() == false) {
-		return false;
-	}
-
-	const std::string keybody = string_format("%s-id%d-",
-		host->GetConfigName(), myid);
+	const std::string keybody = string_format("%s-id%u-",
+		domain->GetConfigName(), myid);
 	const std::string imgkey = keybody + "image";
 	const std::string wikey  = keybody + "writeignore";
-	const std::string wpkey  = keybody + "writeprotect";
 	const std::string stkey  = keybody + "seektime";
 
 	// デバイス種別(v[0])とパス(v[1])に分解。
@@ -691,32 +603,7 @@ SCSIDisk::Init()
 	// オープン前に writeignore をチェック。
 	// この後パス名を処理するとすぐに UI に通知を出すため、それより前で
 	// 行わないといけない。うーん。
-	//
-	// 変数名は元々 -writeprotect だったが -writeignore に変更した。
-	// 単にリネームするだけだと、開発中に古いバージョンを二分探索とかする
-	// 必要が出来た場合に面倒なので、当面は古いほうも面倒を見る。
-	// 十分いらなくなった頃に削除する。
-	//
-	// wi指定	wp指定
-	// なし		なし	wi を採用。
-	// なし		あり	wp を採用。ただし警告
-	// あり		なし	wi を採用。
-	// あり		あり	wi を採用。ここは警告不要でいいだろう
-	//
-	const ConfigItem& wi = gConfig->Find(wikey);
-	const ConfigItem& wp = gConfig->Find(wpkey);
-	if (wi.GetFrom() == ConfigItem::FromInitial &&
-	    wp.GetFrom() != ConfigItem::FromInitial   )
-	{
-		// -writeignore (新)がなく -writeprotect (旧) だけが指定されると警告。
-		// エラー停止まではしなくていいか。
-		warnx("Warning: '%s' is obsolete. Use new '%s'",
-			wpkey.c_str(), wikey.c_str());
-
-		write_ignore = wp.AsInt();
-	} else {
-		write_ignore = wi.AsInt();
-	}
+	write_ignore = gConfig->Find(wikey).AsInt();
 
 	// 設定時点でファイルが指定されていればオープン
 	if (filename.empty() == false) {
@@ -730,9 +617,12 @@ SCSIDisk::Init()
 		MediaChanged();
 	}
 
-	// 設定は [msec]、変数は [nsec]。
-	seektime = gConfig->Find(stkey).AsInt();
-	seektime *= 1_msec;
+	// 平均シークタイム。設定は [msec]、変数は [nsec]。
+	// virtio-scsi にはない。
+	if (strncmp(stkey.c_str(), "virtio", 6) != 0) {
+		seektime = gConfig->Find(stkey).AsInt();
+		seektime *= 1_msec;
+	}
 
 	return true;
 }
@@ -749,14 +639,14 @@ SCSIDisk::ResetHard(bool poweron)
 	}
 }
 
-// バスリセット
+// バスリセットされた (SCSIBus から呼ばれる)
 void
-SCSIDisk::BusResetCB()
+SCSIDisk::OnBusReset()
 {
 	// メディアの取り出し禁止を解除
 	PreventMediumRemoval(false);
 
-	inherited::BusResetCB();
+	inherited::OnBusReset();
 }
 
 // バックエンドのディスクイメージを開く。
@@ -767,7 +657,7 @@ SCSIDisk::LoadDisk(const std::string& pa
 {
 	bool unloaded;
 	off_t size;
-	bool w_ok;
+	int w_ok;
 	bool read_only;
 
 	// すでにあればクローズ (ここでは通知は行わない)
@@ -779,13 +669,39 @@ SCSIDisk::LoadDisk(const std::string& pa
 		goto done;
 	}
 
-	if (image.GetInfo(&size, &w_ok) == false) {
+	w_ok = image.IsWriteable();
+	if (w_ok < 0) {
 		goto done;
 	}
 
+	// 書き込みモードをここで確定
+	if (IsWriteableDevice()) {
+		// 書き込み可能デバイスの場合
+		if (w_ok) {
+			if (write_ignore) {
+				write_mode = RW::WriteIgnore;
+			} else {
+				write_mode = RW::Writeable;
+			}
+		} else {
+			write_mode = RW::WriteProtect;
+		}
+	} else {
+		// 読み込み専用デバイスの場合
+		write_mode = RW::ReadOnly;
+	}
+
+	// ここでオープン
+	read_only = (GetWriteMode() != RW::Writeable);
+	if (image.Open(read_only, write_ignore) == false) {
+		goto done;
+	}
+
+	size = image.GetSize();
+
 	// セクタ単位になっていること
 	if (size % blocksize != 0) {
-		warnx("%s: Bad image size(%ju): Not a multiple of blocksize(%d)",
+		warnx("%s: Bad image size(%ju): Not a multiple of blocksize(%u)",
 			pathname.c_str(), (uintmax_t)size, blocksize);
 		goto done;
 	}
@@ -828,30 +744,7 @@ SCSIDisk::LoadDisk(const std::string& pa
 		}
 		break;
 	 default:
-		PANIC("corrupted devtype=%d", (int)devtype);
-	}
-
-	// 書き込みモードをここで確定
-	if (IsWriteableDevice()) {
-		// 書き込み可能デバイスの場合
-		if (w_ok) {
-			if (write_ignore) {
-				write_mode = RW::WriteIgnore;
-			} else {
-				write_mode = RW::Writeable;
-			}
-		} else {
-			write_mode = RW::WriteProtect;
-		}
-	} else {
-		// 読み込み専用デバイスの場合
-		write_mode = RW::ReadOnly;
-	}
-
-	// ここでオープン
-	read_only = (GetWriteMode() != RW::Writeable);
-	if (image.Open(read_only, write_ignore) == false) {
-		goto done;
+		PANIC("corrupted devtype=%u", (uint)devtype);
 	}
 
 	// 書き込み無視なら一応ログ出力
@@ -966,7 +859,8 @@ SCSIDisk::UnloadMessage(MessageID msgid,
 	UnloadDisk(force);
 }
 
-// SCSI コマンドのディスパッチャ
+// SCSI コマンドのディスパッチャ。
+// C++ の例外は呼び出し側で捕捉している。
 void
 SCSIDisk::DispatchCmd()
 {
@@ -1043,7 +937,7 @@ SCSIDisk::DispatchCmd()
 
 // Inquiry データを返す
 bool
-SCSIDisk::Inquiry(std::vector<uint8>& buf, int lun)
+SCSIDisk::Inquiry(std::vector<uint8>& buf, uint lun)
 {
 	uint8 inqtype;
 	const char *prodname;
@@ -1062,7 +956,7 @@ SCSIDisk::Inquiry(std::vector<uint8>& bu
 		prodname = "SCSIMO";
 		break;
 	 default:
-		PANIC("Unexpected devtype=%d", (int)devtype);
+		PANIC("Unexpected devtype=%u", (uint)devtype);
 	}
 
 	buf[0] = inqtype;