![[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:
7: // PROM (LUNA-I, LUNA88K 共通)
8:
9: // IODevice
10: // |
11: // +----------------------------------------+
12: // | |
13: // v v
14: // ROMDevice Luna*PROMEmuDeivce
15: // | (ROM エミュレーションはここ)
16: // +---------+---------------+
17: // v v
18: // PROMDevice CGROMDevice など
19: // (LUNA* の実ROM共通) (X68k の各種ROM)
20:
21: #include "prom.h"
22: #include "config.h"
23: #include "mainapp.h"
24:
25: // コンストラクタ
26: PROMDevice::PROMDevice()
27: {
28: logname = "prom";
29: devname = "PROM";
30: devaddr = 0x41000000;
31: }
32:
33: // デストラクタ
34: PROMDevice::~PROMDevice()
35: {
36: }
37:
38: bool
39: PROMDevice::Init()
40: {
41: vmtype_t vmtype = gMainApp.GetVMType();
42:
43: switch (vmtype) {
44: case VMTYPE_LUNA1:
45: return InitLuna();
46:
47: case VMTYPE_LUNA88K:
48: return InitLuna88k();
49:
50: default:
51: PANIC("unknown vmtype %d", vmtype);
52: }
53: }
54:
55: // LUNA-I の場合
56: bool
57: PROMDevice::InitLuna()
58: {
59: devlen = 128 * 1024;
60: mask = devlen - 1;
61:
62: // ファイル名が存在してる時しかここに来ない
63: const ConfigItem& item = gConfig->Find("prom-image");
64: if (LoadROM(item.AsString().c_str(), devlen) == false) {
65: return false;
66: }
67:
1.1.1.2 root 68: // ROM バージョンを確認。確認されてるのは
69: // V4.02 (Wed Oct 12 17:07:11 1988)
70: // V4.22 (Thu Jul 27 11:45:42 1989)
71: // V4.25
72: //
73: // とりあえず V4.22 は +$00d390 からにタイムスタンプ文字列があるので
74: // それで判別してみる。
75: //00d390 54 68 75 20 4a 75 6c 20 32 37 20 31 31 3a 34 35 |Thu Jul 27 11:45|
76: //00d3a0 3a 34 32 20 31 39 38 39 00 00 00 00 4e 56 fd f8 |:42 1989....NV..|
77:
78: if (strcmp((const char *)&mem[0xd390], "Thu Jul 27 11:45:42 1989") == 0) {
79: // V4.22
80: putlog(1, "V4.22 detected");
81:
82: // MAC アドレスは ROM に書き込まれているので、ここで上書き
83: if (strcmp((const char *)&mem[0x1ffd8], "ENADDR") != 0) {
84: warnx("ENADDR not found; unknown ROM V4.22 variants?");
85: return false;
86: }
87:
88: // MAC アドレスは12桁の16進数文字列として書き込まれている。例えば
89: // 前半の 00:00:0A 部分は 30 30 30 30 30 41 "00000A" という感じ。
90: const macaddr_t macaddr = gEthernet->GetMacAddr();
91: memcpy(&mem[0x1ffe0], macaddr.to_string().c_str(), 12);
92:
93: // SCSI デバッグビット
94: bool scsi_debug_bit = gConfig->Find(".prom-scsi-debug").AsInt();
95: mem[0x4100981d - 0x41000000] = (scsi_debug_bit) ? 0x01 : 0;
96: } else {
97: // 他の ROM は何も分からないので何もしない。
98: putlog(0, "Unknown PROM Version");
1.1 root 99: }
100:
101: return true;
102: }
103:
104: // LUNA88K の場合
105: bool
106: PROMDevice::InitLuna88k()
107: {
108: devlen = 256 * 1024;
109: mask = devlen - 1;
110:
111: // ファイル名が存在してる時しかここに来ない
112: const ConfigItem& item = gConfig->Find("prom-image");
113: if (LoadROM(item.AsString().c_str(), devlen) == false) {
114: return false;
115: }
116:
117: return true;
118: }
119:
120: bool
121: PROMDevice::PowerOn()
122: {
123: // パフォーマンス測定に電源オン時の実時刻を記憶。
124: // Write8() 参照。
125: start_time = ::GetRealTime();
126: return true;
127: }
128:
129: uint64
130: PROMDevice::Read8(uint32 addr)
131: {
132: // パフォーマンス測定のためのバックドア。
133: // 0x42000004 番地をバイト読み込みを行うと VM 電源オン時から現在までの
134: // 実時間をホスト (ログ) に出力する。NetBSD のマルチユーザブートが
135: // あらかた終わってログインプロンプトが出る少し前に実行される
136: // /etc/rc.local に
137: // dd if=/dev/mem skip=1107296260 bs=1 count=1
138: // と書いておくことでここまでにかかる時間を表示できる。ただしこの値は
139: // ホスト性能に依存するため、同一環境下での相対的な比較のみが可能。
140: // 実機ではこの動作では PROM のミラーが読めるだけなので副作用はないはず。
141: // PROM は仕様では 0x4100_0000 から 128KB なので、ここでは通常アクセス
142: // するはずのない 0x4200_0004 からの1バイトの読み込みをバックドアに使う。
143: // 0x4100_0000..0x41ff_ffff への書き込みは 0番地付近を ROM から RAM に
144: // 切り替えるらしいが実際に PROM がアクセスするのは 0x4100_0000.[BL]
145: // のみなので、ここではそれを避けて 0x4200_0004.B を使う。
146: // 書き込みをバックドアにしたかったが dd で書き込めなさそうだったので
147: // 読み込みを使う。ちゃんと調べてない。
148: if (addr == 0x42000004) {
149: uint64 end, result;
150: uint64 vt;
151:
152: // 電源オン時からここまでの時間を表示するだけでリセット等はしない。
153: end = ::GetRealTime();
1.1.1.3 ! root 154: vt = gMPU->GetVirtTime();
1.1 root 155: result = end - start_time;
156: putlog(0, "電源オンから %d.%03d 秒経過 %3.3f%%",
157: (int)(result / (1000 * 1000 * 1000)),
158: (int)((result / (1000 * 1000)) % 1000),
159: (double)vt / result * 100);
160: }
161:
162: // それ以外は通常動作
163: return inherited::Read8(addr);
164: }
165:
166: uint64
167: PROMDevice::Write8(uint32 addr, uint32 data)
168: {
169: // LUNA では PROM への書き込みで 0番地付近を RAM に切り替えている。
170: // nono では 0番地付近を ROM に見せること自体をしていないので、
171: // ここでは何もしなくてよく、単に無視する。
172: // LUNA-I だと最初に $41000000.B への書き込みがあるが、それ以降も
173: // $41000000.L への書き込みがあるようなので Write32() でも対処している。
174:
175: if (addr == 0x41000000) {
176: return 0;
177: }
178: return inherited::Write8(addr, data);
179: }
180:
181: uint64
182: PROMDevice::Write32(uint32 addr, uint32 data)
183: {
184: // PROM への書き込みで 0番地付近を RAM に切り替えている。
185: // すぐ上の Write8() のコメントも参照。
186: // LUNA88K では $4100000c.L への書き込みが最初にある。
187: // LUNA-I でも $41000000.L への書き込みがあるので、ここでは両方無視する。
188: if (addr < 0x41000010) {
189: return 0;
190: }
191: return inherited::Write32(addr, data);
192: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.