![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to prom.cpp CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Isaki's NoNo m68k/m88k emulator] / nono / vm|
Return to prom.cpp CVS log | Up to [Isaki's NoNo m68k/m88k emulator] / nono / vm |
1.1 root 1: //
2: // nono
3: // Copyright (C) 2020 nono project
4: // Licensed under nono-license.txt
5: //
6:
1.1.1.10 root 7: //
1.1.1.12 root 8: // PROM (LUNA-I, LUNA-88K 共通)
1.1.1.8 root 9: //
1.1.1.10 root 10:
1.1.1.8 root 11: // IODevice
1.1.1.15 root 12: // |
13: // +- ROMDevice (LoadROM()、ウェイト、マスク等を持つ)
14: // | |
15: // | | +------------+
16: // | +-| PROMDevice | (LUNA* の PROM)
17: // | | +------------+
18: // | |
19: // | +- IPLROM1Device (X680x0 の IPLROM 後半)
20: // | +- IPLROM2Device (X680x0 の IPLROM 前半)
21: // | +- CGROMDevice (X680x0 の CGROM)
22: // | |
23: // | +- ROMEmuDevice
24: // | +- LunaPROMEmuDevice (LUNA PROM エミュレーションの共通部分)
25: // | | +- Luna1PROMEmuDevice (LUNA-I の PROM エミュレーション)
26: // | | +- Luna88kPROMEmuDevice (LUNA-88K の PROM エミュレーション)
27: // | +- NewsROMEmuDevice (NEWS の ROM エミュレーション)
28: // | +- ROM30EmuDevice (X68030 の ROM30 エミュレーション)
29: // | +- Virt68kROMEmuDevice (virt-m68k の IPLROM 相当の何か)
30: // |
31: // +- PROM0Device (LUNA* のブートページ切り替え用プロキシ)
32: // +- IPLROM0Device (X680x0 のブートページ切り替え用プロキシ)
1.1 root 33:
34: #include "prom.h"
35: #include "config.h"
1.1.1.8 root 36: #include "ethernet.h"
1.1 root 37: #include "mainapp.h"
1.1.1.14 root 38: #include "mainbus.h"
39: #include "mpu.h"
1.1 root 40:
1.1.1.8 root 41: //
42: // PROM0
43: //
44: // PROM0 は PROM のブートページ担当。
45: // これ自身はメモリ領域を持たず PROM へのプロキシとして動作する。
46: //
47: // リセット後最初の ROM 領域への書き込みアクセスでブートページを RAM に
48: // 切り替える。
49: // LUNA のブートページのアドレス範囲は不明なので、とりあえず devtable の
50: // 1区画である 16MB ($0000'0000..$00ff'ffff) とする。実害はない。
51:
52: // コンストラクタ
53: PROM0Device::PROM0Device()
1.1.1.12 root 54: : inherited(OBJ_PROM_BOOT)
1.1.1.8 root 55: {
1.1.1.12 root 56: // 通常ここからログを出すことはない
1.1.1.8 root 57: ClearAlias();
58: }
59:
60: // デストラクタ
61: PROM0Device::~PROM0Device()
62: {
63: }
64:
1.1.1.12 root 65: // 初期化
1.1.1.8 root 66: bool
67: PROM0Device::Init()
68: {
1.1.1.12 root 69: prom = GetPROMDevice();
70:
1.1.1.8 root 71: return true;
72: }
73:
1.1.1.10 root 74: // リセット
1.1.1.8 root 75: void
1.1.1.10 root 76: PROM0Device::ResetHard(bool poweron)
1.1.1.8 root 77: {
1.1.1.14 root 78: auto mainbus = GetMainbusDevice();
79: mainbus->SwitchBootPageToROM();
1.1.1.8 root 80: }
81:
82: // アドレスデコーダ
83: /*static*/ inline uint32
84: PROM0Device::Decoder(uint32 addr)
85: {
86: // ここはブートページか ROM かの比較だけで十分 (それ以外はここに来ない)
87: if (addr < 0x0100'0000) {
88: addr += 0x4100'0000;
89: }
90: return addr;
91: }
92:
1.1.1.14 root 93: busdata
1.1.1.15 root 94: PROM0Device::Read(busaddr addr)
1.1.1.8 root 95: {
1.1.1.15 root 96: addr.ChangeAddr(Decoder(addr.Addr()));
97: return prom->Read(addr);
1.1.1.8 root 98: }
99:
100: // LUNA では PROM へのライトアクセスでブートページを RAM に切り替えている。
101: // - LUNA-I では最初に $41000000.B への書き込みがあるが、
102: // それ以降も $41000000.L への書き込みが(複数回)あるようだ。
1.1.1.12 root 103: // - LUNA-88K では $4100000c.L への書き込みがある。
1.1.1.8 root 104: //
105: // よってアドレスを定めず PROM 全域への書き込みで最初の1回だけ発動する
106: // ようにしておく。サイズも今の所ワード(16bit)アクセスは確認してないけど
107: // 統一的に対処しておく。
1.1.1.14 root 108: busdata
1.1.1.15 root 109: PROM0Device::Write(busaddr addr, uint32 data)
1.1.1.8 root 110: {
1.1.1.14 root 111: auto mainbus = GetMainbusDevice();
112: mainbus->SwitchBootPageToRAM();
1.1.1.8 root 113:
114: // バスエラーは起きない
1.1.1.15 root 115: busdata r = 0;
116: r |= busdata::Size(addr.GetSize());
117: return r;
1.1.1.8 root 118: }
119:
1.1.1.14 root 120: busdata
1.1.1.15 root 121: PROM0Device::Peek1(uint32 addr)
1.1.1.8 root 122: {
123: addr = Decoder(addr);
1.1.1.15 root 124: return prom->Peek1(addr);
1.1.1.8 root 125: }
126:
127:
128: //
129: // PROM
130: //
131:
1.1 root 132: // コンストラクタ
133: PROMDevice::PROMDevice()
1.1.1.12 root 134: : inherited(OBJ_PROM)
1.1 root 135: {
1.1.1.8 root 136: // LUNA では ROM への書き込みは何も起きない
137: write_op = 0;
1.1 root 138: }
139:
140: // デストラクタ
141: PROMDevice::~PROMDevice()
142: {
143: }
144:
1.1.1.12 root 145: // 初期化
1.1 root 146: bool
147: PROMDevice::Init()
148: {
1.1.1.11 root 149: VMType vmtype = gMainApp.GetVMType();
1.1 root 150:
151: switch (vmtype) {
1.1.1.11 root 152: case VMType::LUNA1:
1.1.1.12 root 153: if (gMainApp.msxdos_mode) {
154: return true;
155: } else {
156: return InitLuna1();
157: }
1.1 root 158:
1.1.1.11 root 159: case VMType::LUNA88K:
1.1 root 160: return InitLuna88k();
161:
162: default:
1.1.1.15 root 163: PANIC("unknown vmtype %u", (uint)vmtype);
1.1 root 164: }
165: }
166:
167: // LUNA-I の場合
168: bool
1.1.1.6 root 169: PROMDevice::InitLuna1()
1.1 root 170: {
1.1.1.12 root 171: uint devlen = 128 * 1024;
1.1 root 172: mask = devlen - 1;
173:
174: // ファイル名が存在してる時しかここに来ない
175: const ConfigItem& item = gConfig->Find("prom-image");
176: if (LoadROM(item.AsString().c_str(), devlen) == false) {
177: return false;
178: }
179:
1.1.1.8 root 180: // XXX アクセスウェイトは未調査。とりあえず RAM と同程度にしておく
1.1.1.14 root 181: wait = busdata::Wait(1 * mpu->GetClock_nsec());
1.1.1.8 root 182:
1.1.1.2 root 183: // ROM バージョンを確認。確認されてるのは
184: // V4.02 (Wed Oct 12 17:07:11 1988)
185: // V4.22 (Thu Jul 27 11:45:42 1989)
186: // V4.25
187: //
188: // とりあえず V4.22 は +$00d390 からにタイムスタンプ文字列があるので
189: // それで判別してみる。
190: //00d390 54 68 75 20 4a 75 6c 20 32 37 20 31 31 3a 34 35 |Thu Jul 27 11:45|
191: //00d3a0 3a 34 32 20 31 39 38 39 00 00 00 00 4e 56 fd f8 |:42 1989....NV..|
192:
193: if (strcmp((const char *)&mem[0xd390], "Thu Jul 27 11:45:42 1989") == 0) {
1.1.1.12 root 194: romver = 422;
195: }
196:
197: if (romver == 0) {
198: putmsg(0, "Unknown PROM version");
199: } else {
1.1.1.15 root 200: putmsg(1, "v%u.%02u detected", romver / 100, romver % 100);
1.1.1.12 root 201: }
202:
203: if (romver == 422) {
204: // V4.22。他の ROM は何も分からないので何もしない。
1.1.1.2 root 205:
206: // MAC アドレスは ROM に書き込まれているので、ここで上書き
207: if (strcmp((const char *)&mem[0x1ffd8], "ENADDR") != 0) {
208: warnx("ENADDR not found; unknown ROM V4.22 variants?");
209: return false;
210: }
211:
212: // MAC アドレスは12桁の16進数文字列として書き込まれている。例えば
213: // 前半の 00:00:0A 部分は 30 30 30 30 30 41 "00000A" という感じ。
1.1.1.16! root 214: MacAddr macaddr {};
1.1.1.13 root 215: if (EthernetDevice::GetConfigMacAddr(0, &macaddr, true) == false) {
1.1.1.12 root 216: // エラーメッセージは表示済み
217: return false;
218: }
219:
220: const char *msg;
221: if (macaddr.Empty()) {
222: // "rom" なら元イメージのままにする。
223: msg = "ROM";
224: } else {
225: // 指定されたら上書き。
226: memcpy(&imagebuf[0x1ffe0], macaddr.ToString().c_str(), 12);
227: msg = "config";
228: }
229: putmsg(1, "macaddr=%c%c:%c%c:%c%c:%c%c:%c%c:%c%c (from %s)",
230: std::tolower(imagebuf[0x1ffe0]),
231: std::tolower(imagebuf[0x1ffe1]),
232: std::tolower(imagebuf[0x1ffe2]),
233: std::tolower(imagebuf[0x1ffe3]),
234: std::tolower(imagebuf[0x1ffe4]),
235: std::tolower(imagebuf[0x1ffe5]),
236: std::tolower(imagebuf[0x1ffe6]),
237: std::tolower(imagebuf[0x1ffe7]),
238: std::tolower(imagebuf[0x1ffe8]),
239: std::tolower(imagebuf[0x1ffe9]),
240: std::tolower(imagebuf[0x1ffea]),
241: std::tolower(imagebuf[0x1ffeb]),
242: msg);
1.1.1.2 root 243:
244: // SCSI デバッグビット
245: bool scsi_debug_bit = gConfig->Find(".prom-scsi-debug").AsInt();
1.1.1.11 root 246: imagebuf[0x4100981d - 0x41000000] = (scsi_debug_bit) ? 0x01 : 0;
1.1 root 247: }
248:
249: return true;
250: }
251:
1.1.1.12 root 252: // LUNA-88K の場合
1.1 root 253: bool
254: PROMDevice::InitLuna88k()
255: {
1.1.1.12 root 256: uint devlen = 256 * 1024;
1.1 root 257: mask = devlen - 1;
258:
259: // ファイル名が存在してる時しかここに来ない
260: const ConfigItem& item = gConfig->Find("prom-image");
261: if (LoadROM(item.AsString().c_str(), devlen) == false) {
262: return false;
263: }
264:
1.1.1.8 root 265: // XXX アクセスウェイトは未調査。とりあえず RAM と同程度にしておく
1.1.1.14 root 266: wait = busdata::Wait(3 * mpu->GetClock_nsec());
1.1.1.8 root 267:
1.1.1.12 root 268: // ROM バージョンを照合。どこかに日付が埋まってるっぽい。
269: //
270: // 1.20:
271: //02c190 00 00 04 b0 28 0d 2f e1 28 0d 2f e1 54 68 75 20 |....(./.(./.Thu |
272: //02c1a0 41 70 72 20 31 38 20 31 34 3a 33 34 3a 32 35 20 |Apr 18 14:34:25 |
273: //02c1b0 31 39 39 31 00 00 00 00 41 02 c1 9c 00 00 00 00 |1991....A.......|
274: //
275: // 1.31:
276: //03c940 00 00 05 1e 2a 0f 28 78 2a 0f 28 78 54 75 65 20 |....*.(x*.(xTue |
277: //03c950 4d 61 79 20 31 32 20 31 31 3a 30 37 3a 35 32 20 |May 12 11:07:52 |
278: //03c960 31 39 39 32 00 00 00 00 41 03 c9 4c 00 00 00 00 |1992....A..L....|
279: //
280: // 1.37:
281: //03cf30 00 00 05 5a 2b 5a 4a 7d 2b 5a 4a 7d 4d 6f 6e 20 |...Z+ZJ}+ZJ}Mon |
282: //03cf40 4a 61 6e 20 31 38 20 31 35 3a 31 33 3a 31 37 20 |Jan 18 15:13:17 |
283: //03cf50 31 39 39 33 00 00 00 00 41 03 cf 3c 00 00 00 00 |1993....A..<....|
284:
285: if (strcmp((const char *)&mem[0x2c19c], "Thu Apr 18 14:34:25 1991") == 0) {
286: romver = 120;
287: } else
288: if (strcmp((const char *)&mem[0x3c94c], "Tue May 12 11:07:52 1992") == 0) {
289: romver = 131;
290: } else
291: if (strcmp((const char *)&mem[0x3cf3c], "Mon Jan 18 15:13:17 1993") == 0) {
292: romver = 137;
293: }
294:
295: if (romver == 0) {
296: putmsg(0, "Unknown PROM version");
297: } else {
1.1.1.15 root 298: putmsg(1, "v%u.%02u detected", romver / 100, romver % 100);
1.1.1.12 root 299: }
300:
1.1 root 301: return true;
302: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.