--- nono/vm/pluto.cpp 2026/04/29 17:04:42 1.1.1.4 +++ nono/vm/pluto.cpp 2026/04/29 17:05:21 1.1.1.10 @@ -4,26 +4,31 @@ // Licensed under nono-license.txt // +// +// Pluto-X (独自の仮想ボード) +// + #include "pluto.h" -#include "aout.h" #include "mainapp.h" +#include "mainbus.h" +#include "mainram.h" #include "mpu680x0.h" -#include "ram.h" +#include "sram.h" +// コンストラクタ PlutoDevice::PlutoDevice() + : inherited(OBJ_PLUTO) { - logname = "pluto"; - devname = "Pluto"; - devaddr = 0xeac000; - devlen = 0x2000; } +// デストラクタ PlutoDevice::~PlutoDevice() { } +// リセット void -PlutoDevice::ResetHard() +PlutoDevice::ResetHard(bool poweron) { // XXX not yet m_count = 0; @@ -35,10 +40,12 @@ PlutoDevice::rom[] = { // ホストファイル起動 0x00ea, 0xc004, // .dc.l _start ; 起動アドレス //_start: + 0x46fc, 0x2700, // move.w #0x2700,%sr 0x2039, 0x00ea, 0xc450, // move.l (ROMIO_LOAD),%d0 - 0x6704, // beq.s _err - 0x2040, // move.l %d0,%a2 - 0x4ed0, // jmp (%a2) + 0x6b04, // bmi.s _err + 0x2040, // move.l %d0,%a0 + 0x46fc, 0x2000, // move.w #0x2000,%sr + 0x4e90, // jsr (%a0) //_err: 0x43fa, 0x000c, // lea.l (_errmsg),%a1 0x7021, 0x4e4f, // IOCS B_PRINT @@ -56,7 +63,7 @@ PlutoDevice::rom[] = { uint64 PlutoDevice::Read8(uint32 addr) { - uint32 offset = addr - devaddr; + uint32 offset = addr - baseaddr; uint32 data; if (offset < sizeof(rom)) { @@ -74,7 +81,7 @@ PlutoDevice::Read8(uint32 addr) uint64 PlutoDevice::Read16(uint32 addr) { - uint32 offset = addr - devaddr; + uint32 offset = addr - baseaddr; if (offset < sizeof(rom)) { return rom[offset / 2]; @@ -86,7 +93,7 @@ PlutoDevice::Read16(uint32 addr) uint64 PlutoDevice::Read32(uint32 addr) { - uint32 offset = addr - devaddr; + uint32 offset = addr - baseaddr; uint32 data; if (offset < sizeof(rom)) { @@ -128,7 +135,7 @@ PlutoDevice::Write16(uint32 addr, uint32 uint64 PlutoDevice::Peek8(uint32 addr) { - uint32 offset = addr - devaddr; + uint32 offset = addr - baseaddr; uint32 data; if (offset < sizeof(rom)) { @@ -147,42 +154,67 @@ PlutoDevice::Peek8(uint32 addr) // ホストファイル起動 // -// -A オプションで指定されたホストファイルをロードする。 +// -X オプションで指定されたホストファイルをロードする。 // ロードできればエントリポイントを返す。 -// host_file が指定されている時に呼ぶこと。 +// exec_file が指定されている時に呼ぶこと。 uint32 PlutoDevice::ROM_Load() { - assert(gMainApp.host_file); + assert(gMainApp.exec_file); + + auto mainbus = GetMainbusDevice(); + auto mainram = GetMainRAMDevice(); + auto mpu680x0 = GetMPU680x0Device(); + auto sram = GetSRAMDevice(); // ホストファイルをロード - uint32 entry = gRAM->LoadFile(gMainApp.host_file, AOUT_MID_M68K); + LoadInfo info(gMainApp.exec_file); + if (mainram->LoadFromFile(&info) == false) { + return -1; + } + + // NetBSD/x68k のプライマリブートローダが /boot を読み込む時、および + // /boot がカーネルを読み込む時には、レジスタ渡しのパラメータがあるので、 + // ここで用意する。 + // 本当はターゲットが NetBSD/x68k の /boot とカーネルの時に限定すべきの + // ような気もするけど、とりあえず。必要なパラメータは + // + // %d6 に bootdev、NetBSD/x68k の場合は + // bootdev = $MACULPTT + // ||||||++- major type + // |||||+--- パーティション番号 + // ||||+---- SCSI なら LUN、それ以外なら 0 + // |||+----- unit (SCSI なら SCSI ID、FD ならドライブ番号) + // ||+------ ctlr (spc0 なら 0 のやつ) + // |+------- adaptor (spc = 1、mha = 2) + // +-------- magic ($a) + // major type は fd=2、MemoryDisk=8、sd=4、(st=5、)、cd=7、ne=255。 + // + // %d7 に howto だが今の所使ってないようだ。 + // + // 一方、/boot がカーネルを読み込む時はこれに加えてスタック渡しの + // パラメータもある。これは (取り出す順に) + // firstpa.L .. 読み込んだカーネル先頭の物理アドレス? + // physsize.L .. RAM 容量 (SRAM の $ed0008.L の値) + // esym.L .. シンボルの後ろ、なので実質読み込んだ全体のサイズ + // + // これも本当はターゲットが NetBSD/x68k のカーネルの時に限定すべきの + // ような気もするけど、とりあえず。 + + mpu680x0->reg.D[6] = 0xa1000004; + mpu680x0->reg.D[7] = 0; + + mpu680x0->reg.A[7] = sram->GetRAMSize(); + mpu680x0->reg.A[7] -= 4; + mainbus->Write32(mpu680x0->reg.A[7], info.end - info.start); // esym - if (entry) { - // NetBSD/x68k のプライマリブートローダが /boot を読み込む時には - // いくつかレジスタ渡しのパラメータがあるので、ここで用意する。 - // 本当はターゲットが NetBSD/x68k の /boot の時に限定すべきのような - // 気もするけど、とりあえず。 - // 必要なパラメータは - // %d6 に bootdev、NetBSD/x68k の場合は - // bootdev = $MACULPTT - // ||||||++- major type - // |||||+--- パーティション番号 - // ||||+---- SCSI なら LUN、それ以外なら 0 - // |||+----- unit (SCSI なら SCSI ID、FD ならドライブ番号) - // ||+------ ctlr (spc0 なら 0 のやつ) - // |+------- adaptor (spc = 1、mha = 2) - // +-------- magic ($a) - // major type は fd=2、MemoryDisk=8、sd=4、(st=5、)、cd=7、ne=255。 - // - // %d7 に howto だが今の所使ってないようだ。 - - m68kcpu *cpu = gMPU680x0->GetCPU(); - RegD(6) = 0xa1000004; - RegD(7) = 0; - } + mpu680x0->reg.A[7] -= 4; + mainbus->Write32(mpu680x0->reg.A[7], sram->GetRAMSize()); // physsize + + mpu680x0->reg.A[7] -= 4; + mainbus->Write32(mpu680x0->reg.A[7], 0x00000000); // firstpa - return entry; + return info.entry; } // ベンチマーク開始 @@ -214,7 +246,7 @@ PlutoDevice::benchmark_start(uint32 data putlog(0, "ベンチマーク開始"); // 命令開始アドレス。この時点で REG_PC は次をさしている - m_start_addr = gMPU680x0->GetPPC(); + m_start_addr = mpu->GetPPC(); } // 測定開始 @@ -253,7 +285,7 @@ PlutoDevice::benchmark_end() gMainApp.benchmark_mode, m_count, t / 1000, t % 1000); // 1ループ中の命令セット数を算出。REG_PPC はこの命令の開始番地 - num_of_inst = (gMPU680x0->GetPPC() - m_start_addr) / m_inst_len; + num_of_inst = (mpu->GetPPC() - m_start_addr) / m_inst_len; // 68030 のクロック数 [MHz] に換算 speed = (double)(m_count * num_of_inst) * m_inst_cycle / t; @@ -293,6 +325,6 @@ PlutoDevice::write_8_benchmark(uint32 ad benchmark_start(data); break; default: - PANIC("not impl"); + VMPANIC("not impl"); } }