![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to romemu_luna1.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 romemu_luna1.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:
7: // LUNA-I の ROM エミュレーション
8:
9: // IODevice
10: // |
11: // +----------+---------------------+
12: // v v
13: // ROMDevice LunaPROMEmuDeivce (ROM エミュレーションの共通部分)
14: // | |
15: // | +------------+----------------+
16: // v v v
17: // PROMDevice Luna1PROMEmuDevice Luna88kPROMEmuDevice
18: // (実ROM) (LUNA-I エミュレーション) (LUNA88K エミュレーション)
19:
20: #include "romemu_luna1.h"
21: #include "bitmap.h"
22: #include "ethernet.h"
23: #include "mainapp.h"
24: #include "memorystream.h"
25: #include "mk48t02.h"
26: #include "mpu680x0.h"
27: #include "pio.h"
28: #include "ram.h"
29:
30: // コンストラクタ
31: Luna1PROMEmuDevice::Luna1PROMEmuDevice()
32: {
33: // LUNA-I の ROM の特定アドレスを読み出す人がいるので、
34: // サイズは実 ROM と同じにしておく必要がある。
35: devlen = 128 * 1024;
36: romdata.reset(new uint8 [devlen]);
37: }
38:
39: // デストラクタ
40: Luna1PROMEmuDevice::~Luna1PROMEmuDevice()
41: {
42: }
43:
44: bool
45: Luna1PROMEmuDevice::Init()
46: {
47: // 親クラス
48: if (inherited::Init() == false) {
49: return false;
50: }
51:
52: MemoryStreamBE ms(romdata.get());
53: ms.Write32(0x00002000); // +00: リセットベクタ SP
54: ms.Write32(0x41000400); // +04: リセットベクタ PC
55: ms.Write32(0); // +08
56: ms.Write32(0x41000500); // +0c: メモリサイズ格納先
57:
58: // リセット時に実行する命令
59: ms.SetPtr(&romdata[0x400]);
60: ms.Write16(0x2039); // move.l (ROMIO_INIT),d0
61: ms.Write32(ROMIO_INIT);
62: ms.Write16(0x660c); // bne _go ; 起動先あればGO
63: //_prompt:
64: ms.Write32(0x4e722500); // stop #0x2500 ; キー入力を待つ
65: ms.Write16(0x2039); // move.l (ROMIO_ENTRY),d0
66: ms.Write32(ROMIO_ENTRY); // ; キー入力処理
67: ms.Write16(0x67f4); // beq _prompt ; 起動先なければループ
68: //_go:
69: ms.Write16(0x2040); // move.l d0,a0 ; ジャンプ先を a0 にセット
70: ms.Write16(0x2039); // move.l (ROMIO_CLOSE),d0
71: ms.Write32(ROMIO_CLOSE); // ; 後始末
72: ms.Write16(0x4ed0); // jmp (a0) ; ジャンプ
73:
74: // Lv6 (SIO) 割り込みハンドラ
75: // キーボード割り込みが上がったら KEYIN をコールする
76: ms.SetPtr(&romdata[0x600]);
77: ms.Write16(0x4ab9); // tst.l (ROMIO_KEYIN)
78: ms.Write32(ROMIO_KEYIN); // ; キー入力処理
79: ms.Write16(0x4e73); // rte
80:
81: // MAC アドレス
82: const macaddr_t macaddr = gEthernet->GetMacAddr();
83: strcpy((char *)&romdata[0x1ffd8], "ENADDR");
84: memcpy(&romdata[0x1ffe0], macaddr.to_string().c_str(), 12);
85:
86: // RAM にベクタを書き込む
87: // XXX VBR を 41000000 に向けるのとどっちが楽かはある
88: gRAM->Write32(0x78, 0x41000600); // +78: Lv6 割り込み
89:
90: return true;
91: }
92:
93: void
94: Luna1PROMEmuDevice::ResetHard()
95: {
96: inherited::ResetHard();
97:
98: x_executed = false;
99: x_entrypoint = 0;
100: }
101:
102: // 起動時の処理を行う。
103: // 次段実行ファイルの読み込みに成功すればそのエントリポイントを返す。
104: // そうでなければ 0 を返すので、プロンプトに処理を移すこと。
105: uint32
106: Luna1PROMEmuDevice::ROM_Init()
107: {
108: MemoryStreamBE ms;
109: uint32 entry;
110:
111: // デバイスの初期化 (親クラス)
112: InitDevice();
113:
114: // ROM 0x41000000.L リセットベクタ(SP,PC)もカーネルが参照している
115: // (これは Init() が用意している)
116: // ROM 0x4100000c.L メモリサイズ(バイト数)格納先アドレス
117: // ROM 0x410000b8.L プレーンマスク格納先アドレス
118:
119: // メモリサイズはとりあえず 0x41000500 に格納
120: ms.SetPtr(&romdata[0x500]);
121: ms.Write32(gRAM->GetSize());
122:
123: // プレーン数(1..4)をプレーンマスク(0x01..0x0f)に
124: int nplane = gBitmap->GetPlaneCount();
125: int planemask = (1 << nplane) - 1;
126: // 実際は RAM 上を指しているのだが、とりあえずすぐ隣に置いておく。
127: ms.SetPtr(&romdata[0xb8]);
128: ms.Write32(0x410000bc);
129: ms.Write32(planemask);
130:
131: prompt_idx = 0;
132: prompt = default_prompt;
133:
134: // スクリーンを初期化
135: InitScreen("LUNA-I");
136:
137: entry = 0;
138:
139: // 表示環境が整ったところで NVRAM を照合
140: if (VerifyNVRAM() == false) {
141: InitNVRAM();
142: text.Print("** NVRAM Initialized.\n");
143: text.Print("\n");
144: // NVRAM をクリアしたら DIPSW によらずプロンプトに降りる
145: goto done;
146: }
147:
148: // DIPSW#1-1 が UP なら自動起動、DOWN なら ROM モニタ起動なので、
149: // これを真似する。
150: if ((gPIO0->GetDIPSW1() & 1)) {
151: if (gMainApp.host_file) {
152: // ホストのファイルを読み込んでエントリポイントアドレスを
153: // この Read アクセスの読み出し値として返す。
154: // エラーがあればエラーメッセージは呼び出し先側で表示してある。
155: entry = LoadHostFile();
156: } else {
157: // NVRAM の設定に従ってブート先を探す。
158: errmsg.clear();
159:
160: bootinfo_t bootinfo;
161: GetNVRAM(bootinfo);
162: entry = LoadGuestFile(bootinfo);
163: if (entry == 0) {
164: text.Print("** %s\n", errmsg.c_str());
165: }
166: }
167: }
168:
169: // ここまでタイトルなどを Print してはいるが、実際の画面更新は
170: // ConsoleUpdate() を呼ぶまで行われないことを利用(悪用?)して、
171: // ここでエラーなくブートプログラムに制御を渡せる場合には何も表示せずに
172: // ゲストに処理を移す。意図して或いは意図せずプロンプトに降りる場合だけ
173: // ConsoleUpdate を呼ぶことでタイトルを含めて画面を表示する。
174: done:
175: if (entry == 0) {
176: ConsoleUpdate();
177: }
178:
179: return entry;
180: }
181:
182: // ROM 処理。エントリポイントを返す。
183: uint32
184: Luna1PROMEmuDevice::ROM_Entry()
185: {
186: if (x_executed && x_entrypoint != 0) {
187: return x_entrypoint;
188: } else {
189: return 0;
190: }
191: }
192:
193: // ROM 処理のクローズ。
194: // 次段プログラムにジャンプするための処理も含む。
195: void
196: Luna1PROMEmuDevice::ROM_Close()
197: {
198: inherited::ROM_Close();
199:
200: // NetBSD のブートローダがカーネルを読み込む時にはいくつかレジスタ
201: // 渡しのパラメータがあるので、ここで用意する。本当はターゲットが
202: // NetBSD カーネルの時に限定すべきのような気もするけど、とりあえず。
203: // ROM がブートローダを読み込む時にはそのような取り決め事は一切ない
204: // ので、ブートローダを読む時にも同じ値が入ってしまうが気にしない
205: // ことにする。
206: // 必要なパラメータは
207: // %d6 に bootdev、NetBSD/luna68k の場合は
208: // bootdev = $MACUPP00
209: // ||||++-- パーティション番号
210: // |||+---- SCSI ID (XXX ただしここでは 6 決め打ち)
211: // ||+----- unit (spc0 なら 0 のやつのはず)
212: // |+------ アダプタ (spc = 0、lance = 1)
213: // +------- magic ($a)
214: //
215: // %d7 に howto (0 でよい)
216: // (と %a0 にジャンプ先を入れるがこれは Init() が書き出した ROM
217: // アセンブラコード側で行っている)
218: m68kcpu *cpu = gMPU680x0->GetCPU();
219: RegD(6) = 0xa0060000;
220: RegD(7) = 0;
221: }
222:
223: // 入力コマンド処理 (入力行が揃ったところで呼ばれる)。
224: void
225: Luna1PROMEmuDevice::Command()
226: {
227: std::vector<char> buf(inputbuf.length() + 1);
228: std::vector<std::string> arg;
229:
230: // 1ワードごとに分解
231: strcpy(&buf[0], inputbuf.c_str());
232: char *p = &buf[0];
1.1.1.2 ! root 233: for (char *ap; (ap = strsep(&p, " ")) != NULL; ) {
! 234: if (*ap != '\0') {
! 235: arg.push_back(std::string(ap));
1.1 root 236: }
237: }
238: if (loglevel >= 1) {
239: for (int i = 0; i < arg.size(); i++) {
240: putmsgn("arg[%d]=|%s|", i, arg[i].c_str());
241: }
242: }
243:
244: // "k" コマンド中ならここで先に処理する
245: if (prompt_idx != 0) {
246: CommandK(arg);
247: return;
248: }
249:
250: // 空行
251: if (arg.size() == 0) {
252: return;
253: }
254:
255: // 1ワード目がコマンド
256: if (arg[0] == "h") {
257: // ヘルプメッセージ
258: text.Print("Commands\n");
259: text.Print(
260: " g [<filename>] : load program\n"
261: " gh : load host program (specified by -A option)\n"
262: " h : show this message\n"
263: " k : show/set boot constants\n"
264: " x : execute loaded program\n"
265: );
266: return;
267: }
268: if (arg[0] == "g") {
269: CommandG(arg);
270: return;
271: }
272: if (arg[0] == "gh") {
273: CommandGH();
274: return;
275: }
276: if (arg[0] == "k") {
277: CommandK(arg);
278: return;
279: }
280: if (arg[0] == "x") {
281: CommandX();
282: return;
283: }
284:
285: text.Print("** Unknown command: %s\n", arg[0].c_str());
286: }
287:
288: // "g" コマンド
289: // g なら NVRAM の情報に従ってプログラムをロード。
290: // g <fname> なら NVRAM の fname だけ指定の名前を使ってロード。NVRAM には
291: // 書き込まない。
292: void
293: Luna1PROMEmuDevice::CommandG(const std::vector<std::string>& arg)
294: {
295: std::string ctlr = nvram->PeekString(0x0030);
296: if (ctlr == "dk") { // harddisk
297: std::string fname {};
298:
299: switch (arg.size()) {
300: case 1:
301: break;
302: case 2:
303: fname = arg[1];
304: break;
305: default:
306: text.Print("** Invalid argument.\n");
307: return;
308: }
309: errmsg.clear();
310:
311: bootinfo_t bootinfo;
312: GetNVRAM(bootinfo);
313: // 引数で指定されたらファイル名だけ上書き
314: if (!fname.empty()) {
315: bootinfo.dkfile = fname;
316: }
317: x_entrypoint = LoadGuestFile(bootinfo);
318: if (x_entrypoint == 0) {
319: text.Print("** %s\n", errmsg.c_str());
320: }
321:
322: } else if (ctlr == "et" || // netboot
323: ctlr == "sd" || // cassette tape
324: ctlr == "fl" ) // floppy
325: {
326: text.Print("** %s boot not supported.\n", ctlr.c_str());
327: return;
328: } else {
329: // 起きないはず
330: text.Print("** Invalid boot controller name.\n");
331: return;
332: }
333:
334: if (x_entrypoint) {
335: text.Print("Loaded. Entry point = $%08x\n", x_entrypoint);
336: }
337: }
338:
339: // "gh" コマンド (勝手に拡張)
340: // -A オプションで指定されたホストプログラムをロードする。
341: void
342: Luna1PROMEmuDevice::CommandGH()
343: {
344: // 指定されてたら読み込む
345: if (gMainApp.host_file == NULL) {
346: text.Print("** Cannot loaded; host program is not specified.\n");
347: return;
348: }
349: x_entrypoint = LoadHostFile();
350: }
351:
352:
353: // k コマンドのパラメータ表
354: struct kinfo {
355: uint32 offset; // NVRAM 上のオフセット
356: const char * const name; // 表示名
357: int next; // 次インデックス
358: };
359: static const struct kinfo kinfo[] = {
360: { 0 }, // 0 は通常プロンプトを指すのでここでは使わない
361: { 0x0030, "controller", 0 }, // [1] BOOT (next は動的判定する)
362: { 0x0090, "drive unit", 3 }, // [2] DKUNIT
363: { 0x00b0, "partition ", 4 }, // [3] DKPART
364: { 0x00d0, "filename ", 0 }, // [4] FLNAME
365: { 0x0050, "hostname ", 6 }, // [5] HOST
366: { 0x0070, "servername", 7 }, // [6] SERVER
367: { 0x0190, "filename ", 8 }, // [7] ETBOOT
368: { 0x01b0, "", 0 }, // [8] ETFILE (ETBOOT と1行で処理する)
369: };
370:
371: // "k" コマンド
372: void
373: Luna1PROMEmuDevice::CommandK(const std::vector<std::string>& arg)
374: {
375: uint32 offset;
376: const char *name;
377: int next;
378:
379: // 入力を処理
380: if (prompt_idx == 0) {
381: // ここは1行目表示前なので前行の入力はない。
382: next = 1;
383: } else {
384: std::string val;
385: bool rv;
386:
387: // 入力があれば更新
388: if (arg.size() != 0) {
389: rv = CommandKInput(arg[0]);
390: } else {
391: // [7] の時に入力があれば CommandKInput() の中で更新されるが、
392: // 入力がなければそこを通らないので、こっちでやらないといけない。
393: // うーん。
394: if (prompt_idx == 7) {
395: prompt_idx = kinfo[prompt_idx].next;
396: }
397: rv = true;
398: }
399:
400: // これ以降は更新後の prompt_idx を使う
401:
402: // 入力エラーがあった時はこの行を再入力するため
403: next = prompt_idx;
404:
405: if (rv == true) {
406: // 入力があっても空でも次インデックスへ。
407: if (prompt_idx == 1) {
408: // BOOT なら現在値によって次のインデックスが変わる
409: // "dk" なら [2]、"et" なら [5]。他は未対応
410: offset = kinfo[prompt_idx].offset;
411: val = nvram->PeekString(offset);
412: if (val == "dk") {
413: next = 2;
414: } else if (val == "et") {
415: next = 5;
416: } else {
417: // 起きることはないはず
418: text.Print("** Inconsistent boot parameter: %s\n",
419: val.c_str());
420: }
421: } else {
422: // それ以外はテーブルにかかれている通り
423: next = kinfo[prompt_idx].next;
424: }
425: }
426: }
427:
428: // この行のプロンプト文字列を作成
429: prompt_idx = next;
430: if (prompt_idx == 0) {
431: // 最終行なら元に戻す
432: prompt = default_prompt;
433: } else {
434: // 次のプロンプトに変更
435: name = kinfo[prompt_idx].name;
436: offset = kinfo[prompt_idx].offset;
437: std::string val = nvram->PeekString(offset);
438:
439: // [7] ETBOOT だけ1行で ETBOOT:ETFILE 形式
440: if (prompt_idx == 7) {
441: next = kinfo[prompt_idx].next; // ETFILE
442: offset = kinfo[next].offset;
443: val += ":";
444: val += nvram->PeekString(offset);
445: }
446:
447: prompt = string_format("%s: %s ?", name, val.c_str());
448: }
449: }
450:
451: // k コマンドの入力値を処理する部分。
452: // 成功すれば true を返す。
453: // 失敗すれば false を返す。
454: // 実機 ROM は入力値にエラーがあると黙って再入力を促す。
455: // エラーメッセージくらい表示してもいいかもだがとりあえず真似しておく。
456: bool
457: Luna1PROMEmuDevice::CommandKInput(const std::string& val)
458: {
459: int offset;
460: bool rv = true;
461:
462: offset = kinfo[prompt_idx].offset;
463:
464: switch (prompt_idx) {
465: case 1: // BOOT
466: // 正常な入力値は "dk", "et", "sd", "fl" のみ。
467: if (val != "dk" && val != "et" && val != "sd" && val != "fl") {
468: return false;
469: }
470: rv = nvram->WriteString(offset, val);
471: if (rv == false) {
472: return false;
473: }
474: break;
475:
476: case 7: // ETBOOT
477: {
478: // こいつだけ ETBOOT:ETFILE 形式で2つのパラメータを同時に処理する
479:
480: // ':' で前後に分ける
481: int sep = val.find(':');
482: if (sep == std::string::npos) {
483: return false;
484: }
485: std::string etboot = val.substr(0, sep);
486: std::string etfile = val.substr(sep + 1, val.size() - sep + 1);
487: if (etboot.empty() || etfile.empty()) {
488: return false;
489: }
490:
491: // ETBOOT
492: rv = nvram->WriteString(offset, etboot);
493: if (rv == false) {
494: return false;
495: }
496:
497: // 次へ
498: prompt_idx = kinfo[prompt_idx].next;
499:
500: // ETFILE
501: offset = kinfo[prompt_idx].offset;
502: rv = nvram->WriteString(offset, etfile);
503: if (rv == false) {
504: return false;
505: }
506: break;
507: }
508:
509: default:
510: rv = nvram->WriteString(offset, val);
511: if (rv == false) {
512: return false;
513: }
514: break;
515: }
516:
517: WriteNVRAMCsum();
518: return rv;
519: }
520:
521: // "x" コマンド
522: // 読み込まれていたらフラグを立てるだけ。
523: void
524: Luna1PROMEmuDevice::CommandX()
525: {
526: if (x_entrypoint == 0) {
527: text.Print("** Program is not loaded.\n");
528: } else {
529: x_executed = true;
530: }
531: }
532:
533: // NVRAM のチェックサムを返す
534: uint8
535: Luna1PROMEmuDevice::CalcNVRAMCsum()
536: {
537: uint8 eor = 0;
538: for (uint32 addr = 0x20; addr < 0x560; addr++) {
539: eor ^= nvram->Peek(addr);
540: }
541: return eor;
542: }
543:
544: // NVRAM のチェックサムを計算して書き込む
545: void
546: Luna1PROMEmuDevice::WriteNVRAMCsum()
547: {
548: uint8 eor = CalcNVRAMCsum();
549:
550: nvram->Write(0x001c, eor);
551: nvram->Write(0x001d, eor);
552: nvram->Write(0x001e, eor);
553: }
554:
555: // NVRAM のマジックとチェックサムを照合する
556: bool
557: Luna1PROMEmuDevice::VerifyNVRAM()
558: {
559: if (nvram->PeekString(0x0004) != "<nv>") {
560: return false;
561: }
562:
563: uint8 eor = CalcNVRAMCsum();
564: for (uint32 addr = 0x1c; addr < 0x1f; addr++) {
565: if (nvram->Peek(addr) != eor) {
566: return false;
567: }
568: }
569: return true;
570: }
571:
572: // NVRAM を初期化する
573: bool
574: Luna1PROMEmuDevice::InitNVRAM()
575: {
576: // 初期値どうしたもんか
577: nvram->WriteString(0x0004, "<nv>");
578: nvram->WriteString(0x0020, "BOOT");
579: nvram->WriteString(0x0030, "dk");
580: nvram->WriteString(0x0040, "HOST");
581: nvram->WriteString(0x0050, "nono"); // 偽札的なアレ
582: nvram->WriteString(0x0060, "SERVER");
583: nvram->WriteString(0x0070, "servername");
584: nvram->WriteString(0x0080, "DKUNIT");
585: nvram->WriteString(0x0090, "0");
586: nvram->WriteString(0x00a0, "DKPART");
587: nvram->WriteString(0x00b0, "c");
588: nvram->WriteString(0x00c0, "DKFILE");
589: nvram->WriteString(0x00d0, "vmunix");
590: nvram->WriteString(0x00e0, "FLUNIT");
591: nvram->WriteString(0x00f0, "2");
592: nvram->WriteString(0x0100, "FLFILE");
593: nvram->WriteString(0x0110, "vmunix");
594: nvram->WriteString(0x0120, "STUNIT");
595: nvram->WriteString(0x0130, "0");
596: nvram->WriteString(0x0140, "STFLNO");
597: nvram->WriteString(0x0150, "1");
598: nvram->WriteString(0x0160, "STFILE");
599: nvram->WriteString(0x0170, "vmunix");
600: nvram->WriteString(0x0180, "ETBOOT");
601: nvram->WriteString(0x0190, "server");
602: nvram->WriteString(0x01a0, "ETFILE");
603: nvram->WriteString(0x01b0, "/vmunix");
604: nvram->WriteString(0x0560, "ENADDR");
605: nvram->WriteString(0x0570, ""); // どうするか
606:
607: // チェックサム再計算
608: WriteNVRAMCsum();
609:
610: return true;
611: }
612:
613: // NVRAM のブート設定を bootinfo に取得する。
614: void
615: Luna1PROMEmuDevice::GetNVRAM(bootinfo_t& bootinfo)
616: {
617: // 起動先情報を NVRAM (mk48t02) に問い合わせる
618: // DKUNIT が装置番号(今はまだ SCSI ID=6 固定)。
619: // DKPART が 'a'..'h' でパーティション。
620: // DKFILE が読み込む次段プログラム (NetBSD では通常 /boot のこと)。
621: bootinfo.dkunit = nvram->Peek(0x0090) - '0';
622: bootinfo.dkpart = nvram->Peek(0x00b0) - 'a';
623: bootinfo.dkfile = nvram->PeekString(0x00d0);
624: putmsg(1, "%s DKUNIT=%d", __func__, bootinfo.dkunit);
625: putmsg(1, "%s DKPART=%c", __func__, bootinfo.dkpart + 'a');
626: putmsg(1, "%s DKFILE=|%s|", __func__, bootinfo.dkfile.c_str());
627: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.