--- nono/vm/romemu_luna1.cpp 2026/04/29 17:05:06 1.1.1.5 +++ nono/vm/romemu_luna1.cpp 2026/04/29 17:05:17 1.1.1.7 @@ -4,8 +4,10 @@ // Licensed under nono-license.txt // +// // LUNA-I の ROM エミュレーション // + // IODevice // | // +-- ROMDevice (LoadROM()、ウェイト、マスク等を持つ) @@ -17,30 +19,52 @@ // | +-- LunaPROMEmuDevice (LUNA PROM エミュレーションの共通部分) // | | // | | +--------------------+ -// | +--| Luna1PROMEmuDevice | (LUNA1 の PROM エミュレーション) +// | +--| Luna1PROMEmuDevice | (LUNA-I の PROM エミュレーション) // | | +--------------------+ // | | -// | +-- Luna88kPROMEmuDevice (LUNA88K の PROM エミュレーション) +// | +-- Luna88kPROMEmuDevice (LUNA-88K の PROM エミュレーション) // | // +-- PROM0Device (LUNA* のブートページ切り替え用プロキシ) // +-- IPLROM0Device (X680x0 のブートページ切り替え用プロキシ) +// ROM マップ +// +// 先頭の "*" は仕様または実機と揃える必要があるアドレスを示す。 +// そうでないものはこっちが適当に割り振っているアドレスで、変更可。 +// +// *4100'0000.L リセットベクタ(SP) +// *4100'0004.L リセットベクタ(PC) +// *4100'000c.L メモリサイズ格納先アドレス (実 ROM は RAM をさしている) +// 4100'0010.L メモリサイズ +// *4100'00b8.L プレーンマスク格納先アドレス (実 ROM は RAM をさしている) +// 4100'00bc.L プレーンマスク +// +// 4100'0400 リセットハンドラ +// 4100'0600 Lv6 (SIO) 割り込みハンドラ +// 4100'0700 Lv7 (NMI) 割り込みハンドラ +// 4100'0800 デフォルトハンドラ +// +// *4101'ffd8〜 "ENADDR",0,0 +// *4101'ffe0〜 MACアドレス(文字列形式、英大文字、区切りなし) +// 0123456789ab c +// "0011223344AA",0 + #include "romemu_luna1.h" +#include "bt45x.h" #include "ethernet.h" -#include "lunafb.h" #include "mainapp.h" +#include "mainram.h" #include "memorystream.h" #include "mk48t02.h" #include "mpu680x0.h" #include "pio.h" -#include "ram.h" // コンストラクタ Luna1PROMEmuDevice::Luna1PROMEmuDevice() { // LUNA-I の ROM の特定アドレスを読み出す人がいるので、 // サイズは実 ROM と同じにしておく必要がある。 - devlen = 128 * 1024; + uint devlen = 128 * 1024; imagebuf.reset(new uint8 [devlen]); memset(&imagebuf[0], 0, devlen); mem = &imagebuf[0]; @@ -53,10 +77,10 @@ Luna1PROMEmuDevice::~Luna1PROMEmuDevice( { } +// 初期化 bool Luna1PROMEmuDevice::Init() { - // 親クラス if (inherited::Init() == false) { return false; } @@ -65,16 +89,21 @@ Luna1PROMEmuDevice::Init() ms.Write32(0x00002000); // +00: リセットベクタ SP ms.Write32(0x41000400); // +04: リセットベクタ PC ms.Write32(0); // +08 - ms.Write32(0x41000500); // +0c: メモリサイズ格納先 + ms.Write32(0x41000010); // +0c: メモリサイズ格納先 + // +10: 値は ROM_Init() でセット + ms.SetOffset(0xb8); + ms.Write32(0x410000bc); // +b8: プレーンマスク格納先 + // +bc: 値は ROM_Init() でセット // リセット時に実行する命令 - ms.SetPtr(&imagebuf[0x400]); + ms.SetOffset(0x400); ms.Write16(0x13c0); // move.b d0,#0x41000000 ; RAMに切り替え ms.Write32(0x41000000); ms.Write16(0x2039); // move.l (ROMIO_INIT),d0 ms.Write32(ROMIO_INIT); - ms.Write16(0x660c); // bne _go ; 起動先あればGO + ms.Write16(0x6a0c); // bpl _go ; 起動先あればGO //_prompt: + uint32 _prompt = ms.GetOffset(); ms.Write32(0x4e722500); // stop #0x2500 ; キー入力を待つ ms.Write16(0x2039); // move.l (ROMIO_ENTRY),d0 ms.Write32(ROMIO_ENTRY); // ; キー入力処理 @@ -87,72 +116,87 @@ Luna1PROMEmuDevice::Init() // Lv6 (SIO) 割り込みハンドラ // キーボード割り込みが上がったら KEYIN をコールする - ms.SetPtr(&imagebuf[0x600]); + ms.SetOffset(0x600); ms.Write16(0x4ab9); // tst.l (ROMIO_KEYIN) ms.Write32(ROMIO_KEYIN); // ; キー入力処理 ms.Write16(0x4e73); // rte + // NMI のハンドラ + ms.SetOffset(0x700); + ms.Write32(0x46fc2700); // move.w #0x2700,sr + ms.Write16(0x91c8); // suba.l a0,a0 + ms.Write32(0x4e7b8801); // movec a0,vbr + ms.Write16(0x2e50); // movea.l (a0),sp + ms.Write16(0x4ef9); // jmp _prompt + ms.Write32(0x41000000 + _prompt); + + // デフォルトのハンドラ + ms.SetOffset(0x800); + ms.Write16(0x4e73); // rte + // MAC アドレス - const macaddr_t macaddr = gEthernet->GetMacAddr(); + macaddr_t macaddr; + if (EthernetDevice::GetConfigMacAddr(&macaddr, false) == false) { + // エラーメッセージは表示済み + return false; + } + putmsg(1, "macaddr=%s", macaddr.ToString(':').c_str()); strcpy((char *)&imagebuf[0x1ffd8], "ENADDR"); - memcpy(&imagebuf[0x1ffe0], macaddr.to_string().c_str(), 12); - - // RAM にベクタを書き込む - // XXX VBR を 41000000 に向けるのとどっちが楽かはある - gRAM->Write32(0x78, 0x41000600); // +78: Lv6 割り込み + memcpy(&imagebuf[0x1ffe0], macaddr.ToString().c_str(), 12); return true; } -void -Luna1PROMEmuDevice::ResetHard() -{ - x_executed = false; - x_entrypoint = 0; -} - // 起動時の処理を行う。 // 次段実行ファイルの読み込みに成功すればそのエントリポイントを返す。 -// そうでなければ 0 を返すので、プロンプトに処理を移すこと。 +// そうでなければ -1 を返すので、プロンプトに処理を移すこと。 uint32 Luna1PROMEmuDevice::ROM_Init() { - MemoryStreamBE ms; + MemoryStreamBE ms(imagebuf.get()); uint32 entry; // デバイスの初期化 (親クラス) InitDevice(); - // ROM 0x41000000.L リセットベクタ(SP,PC)もカーネルが参照している - // (これは Init() が用意している) - // ROM 0x4100000c.L メモリサイズ(バイト数)格納先アドレス - // ROM 0x410000b8.L プレーンマスク格納先アドレス - - // メモリサイズはとりあえず 0x41000500 に格納 - ms.SetPtr(&imagebuf[0x500]); - ms.Write32(gRAM->GetSize()); + auto pio0 = GetPIO0Device(); - // プレーン数(1..4)をプレーンマスク(0x01..0x0f)に - int nplane = gLunafb->GetPlaneCount(); + // +0010: メモリサイズ + ms.SetOffset(0x10); + ms.Write32(mainram->GetSize()); + + // プレーン数(1,4,8)をプレーンマスク(0x01, 0x0f, 0xff)に + int nplane = bt45x->GetPlaneCount(); int planemask = (1 << nplane) - 1; - // 実際は RAM 上を指しているのだが、とりあえずすぐ隣に置いておく。 - ms.SetPtr(&imagebuf[0xb8]); - ms.Write32(0x410000bc); + // プレーンマスク。実際は RAM に書き込まれるがとりあえず + ms.SetOffset(0xbc); ms.Write32(planemask); + // RAM にベクタを書き込む + ms.SetOffset(0); + mainram->Write32(0, ms.Read32()); // ROM のリセットベクタをコピー + mainram->Write32(4, ms.Read32()); + + for (int i = 2; i < 256; i++) { // デフォルトベクタで埋める + mainram->Write32(i * 4, 0x41000800); + } + mainram->Write32(0x78, 0x41000600); // +78: Lv6 割り込み + mainram->Write32(0x7c, 0x41000700); // +7c: Lv7 割り込み = RESET + prompt_idx = 0; prompt = default_prompt; // スクリーンを初期化 - InitScreen("LUNA-I"); + InitScreen(); - entry = 0; + entry = -1; + x_executed = false; + x_entrypoint = -1; // 表示環境が整ったところで NVRAM を照合 if (VerifyNVRAM() == false) { InitNVRAM(); - text.Print("** NVRAM Initialized.\n"); - text.Print("\n"); + errmsg = "NVRAM Initialized."; // NVRAM をクリアしたら DIPSW によらずプロンプトに降りる goto done; } @@ -172,28 +216,23 @@ Luna1PROMEmuDevice::ROM_Init() } else { // DIPSW#1-1 が UP なら自動起動、DOWN なら ROM モニタ起動なので、 // これを真似する。 - if ((gPIO0->GetDIPSW1() & 1)) { + if (pio0->IsDIPSW11Up()) { // NVRAM の設定に従ってブート先を探す。 errmsg.clear(); bootinfo_t bootinfo; GetNVRAM(bootinfo); entry = LoadGuestFile(bootinfo); - if (entry == 0) { - text.Print("** %s\n", errmsg.c_str()); - } } } - // ここまでタイトルなどを Print してはいるが、実際の画面更新は - // ConsoleUpdate() を呼ぶまで行われないことを利用(悪用?)して、 - // ここでエラーなくブートプログラムに制御を渡せる場合には何も表示せずに - // ゲストに処理を移す。意図して或いは意図せずプロンプトに降りる場合だけ - // ConsoleUpdate を呼ぶことでタイトルを含めて画面を表示する。 done: - if (entry == 0) { + if (entry == -1) { + PrintTitle("LUNA-I"); + if (errmsg.empty() == false) { + Print("** %s\n\n", errmsg.c_str()); + } ClearPrompt(); - ConsoleUpdate(); } return entry; @@ -235,9 +274,12 @@ Luna1PROMEmuDevice::ROM_Close() // %d7 に howto (0 でよい) // (と %a0 にジャンプ先を入れるがこれは Init() が書き出した ROM // アセンブラコード側で行っている) - m68kcpu *cpu = gMPU680x0->GetCPU(); - RegD(6) = 0xa0060000; - RegD(7) = 0; + m68kreg& reg = GetMPU680x0Device()->reg; + reg.D[6] = 0xa0060000; + reg.D[7] = 0; + + x_entrypoint = -1; + x_executed = false; } // 入力コマンド処理 (入力行が揃ったところで呼ばれる)。 @@ -275,8 +317,8 @@ Luna1PROMEmuDevice::Command() // 1ワード目がコマンド if (arg[0] == "h") { // ヘルプメッセージ - text.Print("Commands\n"); - text.Print( + Print("Commands\n"); + Print( " g [] : load program\n" " gh : load host program (specified by --load-only option)\n" " h : show this message\n" @@ -302,7 +344,7 @@ Luna1PROMEmuDevice::Command() return; } - text.Print("** Unknown command: %s\n", arg[0].c_str()); + Print("** Unknown command: %s\n", arg[0].c_str()); } // "g" コマンド @@ -323,7 +365,7 @@ Luna1PROMEmuDevice::CommandG(const std:: fname = arg[1]; break; default: - text.Print("** Invalid argument.\n"); + Print("** Invalid argument.\n"); return; } errmsg.clear(); @@ -335,24 +377,24 @@ Luna1PROMEmuDevice::CommandG(const std:: bootinfo.dkfile = fname; } x_entrypoint = LoadGuestFile(bootinfo); - if (x_entrypoint == 0) { - text.Print("** %s\n", errmsg.c_str()); + if (x_entrypoint == -1) { + Print("** %s\n", errmsg.c_str()); } } else if (ctlr == "et" || // netboot ctlr == "sd" || // cassette tape ctlr == "fl" ) // floppy { - text.Print("** %s boot not supported.\n", ctlr.c_str()); + Print("** %s boot not supported.\n", ctlr.c_str()); return; } else { // 起きないはず - text.Print("** Invalid boot controller name.\n"); + Print("** Invalid boot controller name.\n"); return; } - if (x_entrypoint) { - text.Print("Loaded. Entry point = $%08x\n", x_entrypoint); + if (x_entrypoint != -1) { + Print("Loaded. Entry point = $%08x\n", x_entrypoint); } } @@ -363,7 +405,7 @@ Luna1PROMEmuDevice::CommandGH() { // 指定されてたら読み込む if (gMainApp.exec_file == NULL) { - text.Print("** Cannot loaded; host program is not specified.\n"); + Print("** Cannot loaded; host program is not specified.\n"); return; } x_entrypoint = LoadHostFile(); @@ -435,7 +477,7 @@ Luna1PROMEmuDevice::CommandK(const std:: next = 5; } else { // 起きることはないはず - text.Print("** Inconsistent boot parameter: %s\n", + Print("** Inconsistent boot parameter: %s\n", val.c_str()); } } else { @@ -543,8 +585,8 @@ Luna1PROMEmuDevice::CommandKInput(const void Luna1PROMEmuDevice::CommandX() { - if (x_entrypoint == 0) { - text.Print("** Program is not loaded.\n"); + if (x_entrypoint == -1) { + Print("** Program is not loaded.\n"); } else { x_executed = true; }