|
|
1.1 root 1: //
2: // nono
1.1.1.2 root 3: // Copyright (C) 2020 nono project
4: // Licensed under nono-license.txt
1.1 root 5: //
6:
7: #include "vm_luna.h"
8: #include "aout.h"
9: #include "bitmap.h"
10: #include "bt454.h"
11: #include "busio.h"
1.1.1.2 root 12: #include "cmmu.h"
13: #include "config.h"
1.1 root 14: #include "crtc2.h"
15: #include "ethernet.h"
16: #include "fuserom.h"
1.1.1.4 root 17: #include "interrupt.h"
1.1 root 18: #include "lance.h"
19: #include "lcd.h"
20: #include "lunakbd.h"
21: #include "mainapp.h"
22: #include "mk48t02.h"
1.1.1.2 root 23: #include "mpu680x0.h"
24: #include "mpu88xx0.h"
1.1 root 25: #include "pio.h"
1.1.1.2 root 26: #include "prom.h"
1.1 root 27: #include "ram.h"
1.1.1.5 root 28: #include "ram_partial.h"
1.1 root 29: #include "renderer.h"
1.1.1.5 root 30: #include "romemu_luna1.h"
1.1 root 31: #include "romemu_luna88k.h"
32: #include "scheduler.h"
33: #include "sio.h"
34: #include "spc.h"
35: #include "sysclk.h"
1.1.1.2 root 36: #include "sysctlr.h"
37: #include "tas.h"
1.1 root 38: #include "zram.h"
39:
1.1.1.5 root 40: //
41: // LUNA 共通部
42: //
43:
44: // デバイスマップ用の識別子
45: enum {
46: NONE,
47: BUSERR,
48: PROM,
49: MK48,
50: PIO0,
51: PIO1,
52: SIO,
53: TAS,
54: SYSCLK,
55: ZRAM,
56: MROM,
57: BITMAP,
58: BT454,
59: CRTC2,
60: SCSI,
61: LANCE,
62: FUSE,
63: SYSCTL,
64: CMMU,
65: };
66:
67: // コンストラクタ
68: VM_LUNA::VM_LUNA()
69: {
70: // この機種に不要なパラメータはここで削除する
71: // (機種が決まるより前に全機種の設定の和集合を用意してあるため)。
72: // o LUNA-I は 68881 固定なので不要。
73: // o これは m68k パラメータなので LUNA88K には不要。
74: gConfig->Delete("mpu-has-fpu");
75:
76: // LUNA 共通だしここで作成しておく
77: gNull.reset(new NullDevice());
78: }
79:
80: // デストラクタ
81: VM_LUNA::~VM_LUNA()
82: {
83: }
84:
85: // デバイスマップから devtable を作成 (ここは共通にできる)
86: void
87: VM_LUNA::MakeDevtable(const uint8 *maptable)
88: {
89: for (uint i = 0; i < countof(::devtable); i++) {
90: IODevice *d;
91: switch (maptable[i]) {
92: case NONE: d = gNull.get(); break;
1.1.1.6 ! root 93: case BUSERR: d = gBusErr.get(); break;
1.1.1.5 root 94: case PROM: d = prom.get(); break;
95: case MK48: d = gRTC.get(); break;
96: case PIO0: d = gPIO0.get(); break;
97: case PIO1: d = gPIO1.get(); break;
98: case SIO: d = gSIO.get(); break;
99: case TAS: d = gTAS.get(); break;
100: case SYSCLK: d = gSysClk.get(); break;
101: case ZRAM: d = gZRAM.get(); break;
102: case MROM: d = gNull.get(); break;
103: case BITMAP: d = gBitmap.get(); break;
104: case BT454: d = gBT454.get(); break;
105: case CRTC2: d = gCRTC2.get(); break;
106: case SCSI: d = gSPC.get(); break;
107: case LANCE: d = gEthernet.get(); break;
108: case FUSE: d = gFuseROM.get(); break;
109: case SYSCTL: d = gInterrupt.get(); break;
110: case CMMU: d = gCMMU.get(); break;
111: default:
112: __unreachable();
113: }
114: ::devtable[i] = d;
115: }
116: }
117:
118: // 初期化
119: bool
120: VM_LUNA::Init()
121: {
122: // 親クラス
123: if (inherited::Init() == false) {
124: return false;
125: }
126:
127: // RAM 容量が確定したので、ここで devtable に RAM を配置。
128: int ram_size_MB = gRAM->GetSizeMB();
129: int i = 0;
130: while (ram_size_MB >= 16) {
131: // 16MB あれば RAM が直接担当
132: ::devtable[i++] = gRAM.get();
133: ram_size_MB -= 16;
134: }
135: // 16MB 未満なら PartialRAM が担当
136: if (ram_size_MB > 0) {
137: ::devtable[i] = gPartialRAM.get();
138: }
139:
140: return true;
141: }
142:
143: void
144: VM_LUNA::PowerButton()
145: {
146: // LUNA の電源ボタンは電源オンにしか使わない。
147: //
148: // 電源 ボタン
149: // ON PUSH (何も起きない)
150: // OFF PUSH 電源オン
151:
1.1.1.6 ! root 152: // スケジューラに指示
! 153: gScheduler->RequestPowerOn();
! 154: }
! 155:
! 156: // ブートページを切り替える。
! 157: void
! 158: VM_LUNA::SwitchBootPage(Device *parent, bool isrom)
! 159: {
! 160: // 共通処理
! 161: inherited::SwitchBootPage(parent, isrom);
! 162:
! 163: // ROM は 128KB しかないので 16MB まるごと切り替わったりはしないとは
! 164: // 思うけど、具体的にどの範囲が切り替わるのかを知る方法がないのと
! 165: // 大して副作用もないので、先頭の 1ブロックをまるごと切り替えておく。
! 166: if (isrom) {
! 167: ::devtable[0] = prom.get();
! 168: } else {
! 169: ::devtable[0] = gRAM.get();
! 170: }
1.1.1.5 root 171: }
172:
173:
174: //
175: // LUNA-I
176: //
177:
178: // LUNA-I のデバイス割り当て表 (上位8ビット)
1.1 root 179: //
180: // 仕様 実際
181: // 00 00 メインメモリ
182: // -- 01..03 二重バスフォールトするようだ
183: // -- 04..0f 何かよく分からないものが読める
184: // -- 10..3f BUSERR
185: // 41 40..43 PROM (B、N=128KBでミラー)
186: // 45 44..47 mk48t02 (B、N=2048でミラー)
187: // 49 48..4b pio0 (B、N=4でミラー)
188: // 4d 4c..4f pio1 (B、N=4でミラー)
189: // 51 50..53 sio (BB、N=4でミラー)
190: // -- 54..5f 0xff が読めるようだ
191: // 61 60..61 TAS (B、N=1でミラー)
192: // 63 62..63 システムクロック (B、N=1でミラー)
193: // -- 以降TASとSysClkで2枠ずつ。また無効ビットの読み出しは
194: // -- 必ずしも Hi とは限らず不安定のようだ。
195: // 71 70..7f 3ポートRAM (B、N=128KBでミラー)
196: // 81 80.. BUSERR (オンボード拡張スロットA)
197: // 83 ..8f BUSERR (オンボード拡張スロットB)
198: // 91 90..9f 0xff が読めるようだ (PC-9000 拡張スロット)
199: //
200: // a1 マスクROM
201: // a0,a2,a4,... BUSERR
202: // a1,a3,a5,... マスクROM(なければ0xffが読める)
203: // b1 ビットマップ
204: // b0,b2,b4,... BUSERR
205: // b1,b3,b5,... ビットマップ (内訳は bitmap.cpp 参照)
206: // c1 パレット
207: // c0,c2,c4,... BUSERR
208: // c1,c3,c5,... パレット (B、N=4でミラー)
209: // d1 CRTC-II
210: // d0,d2,d4,... BUSERR
211: // d1,d3,d5,... CRTC-II (B、N=2でミラー)
212: //
213: // e1 e0..e3 SCSI (BBBB、N=16 でミラー)
214: // -- e4..ef 0xff が読めるようだが不安定。
215: // f1 f0..f3 LANCE (WW、N=2 でミラー)
216: // -- f4..ff 0xff が読めるようだ
217:
218: /*static*/ const uint8
1.1.1.5 root 219: VM_LUNA1::maptable[256] = {
220: // (00,)01,02,03 は実際にはたぶんパリティチェックが入っていて(?)
221: // 非実装領域にアクセスすると二重バスフォールトになるがそれは未対応。
222: // RAM は Init() で動的に配置する。
223: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // 00
1.1 root 224: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // 08
225: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 10
226: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 18
227: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 20
228: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 28
229: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 30
230: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 38
231:
232: PROM, PROM, PROM, PROM, MK48, MK48, MK48, MK48, // 40
233: PIO0, PIO0, PIO0, PIO0, PIO1, PIO1, PIO1, PIO1, // 48
234: SIO, SIO, SIO, SIO, NONE, NONE, NONE, NONE, // 50
235: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // 58
236: TAS, TAS, SYSCLK, SYSCLK, TAS, TAS, SYSCLK, SYSCLK, // 60
237: TAS, TAS, SYSCLK, SYSCLK, TAS, TAS, SYSCLK, SYSCLK, // 68
238: ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, // 70
239: ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, // 78
240:
241: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 80
242: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 88
243: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // 90
244: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // 98
245: BUSERR, MROM, BUSERR, MROM, BUSERR, MROM, BUSERR, MROM, // a0
246: BUSERR, MROM, BUSERR, MROM, BUSERR, MROM, BUSERR, MROM, // a8
247: BUSERR, BITMAP, BUSERR, BITMAP, BUSERR, BITMAP, BUSERR, BITMAP, // b0
248: BUSERR, BITMAP, BUSERR, BITMAP, BUSERR, BITMAP, BUSERR, BITMAP, // b8
249:
250: BUSERR, BT454, BUSERR, BT454, BUSERR, BT454, BUSERR, BT454, // c0
251: BUSERR, BT454, BUSERR, BT454, BUSERR, BT454, BUSERR, BT454, // c8
252: BUSERR, CRTC2, BUSERR, CRTC2, BUSERR, CRTC2, BUSERR, CRTC2, // d0
253: BUSERR, CRTC2, BUSERR, CRTC2, BUSERR, CRTC2, BUSERR, CRTC2, // d8
254: SCSI, SCSI, SCSI, SCSI, NONE, NONE, NONE, NONE, // e0
255: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // e8
256: LANCE, LANCE, LANCE, LANCE, NONE, NONE, NONE, NONE, // f0
257: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // f8
258: };
259:
260: // コンストラクタ
1.1.1.5 root 261: VM_LUNA1::VM_LUNA1()
1.1 root 262: {
1.1.1.2 root 263: // 機種固有パラメータ
264: // MPU クロックの初期値は機種ごとに異なる。単位は MHz
265: gConfig->SetDefault("mpu-clock", 20);
266: // RAM 初期値は MAX にしておく
267: gConfig->SetDefault("ram-size", 16);
268: // SPC の入力クロック (おそらく 6.144MHz = 163ns が入ってる)
269: gConfig->Add("!spc-tCLF", 163);
270: // LUNA-I のクロック割り込みは 60Hz
271: gConfig->Add("!sysclk-period", 16.666667_msec);
272:
1.1 root 273: // デバイス (順序に注意)
1.1.1.5 root 274: // BusErrDevice, NullDevice は親コンストラクタで作成済み。
1.1.1.2 root 275:
1.1.1.6 ! root 276: gMPU.reset(new MPU680x0Device()); // required by Scheduler
1.1.1.2 root 277: gScheduler.reset(new Scheduler()); // required by *
1.1.1.4 root 278: gInterrupt.reset(new LunaInterrupt());
1.1.1.5 root 279: gRAM.reset(new RAMDevice()); // required by PartialRAM
280: gPartialRAM.reset(new PartialRAMDevice());
1.1.1.2 root 281: gEthernet.reset(new BusIO_W<LanceDevice>()); // required by PROM
282: if (gMainApp.host_file || gConfig->Find("prom-image").AsString().empty()) {
1.1.1.5 root 283: prom.reset(new Luna1PROMEmuDevice());
1.1 root 284: } else {
1.1.1.2 root 285: prom.reset(new PROMDevice());
1.1 root 286: }
287: gRTC.reset(new BusIO_B<MK48T02Device>());
288: gPIO0.reset(new BusIO_B<PIO0Device>());
289: gPIO1.reset(new BusIO_B<PIO1Device>());
290: gSIO.reset(new BusIO_BB<SIODevice>());
1.1.1.4 root 291: gSysClk.reset(new BusIO_B<SysClkDevice>());
1.1.1.2 root 292: gTAS.reset(new BusIO_B<TASDevice>());
1.1 root 293: gZRAM.reset(new ZRAMDevice());
1.1.1.2 root 294: gBitmap.reset(new BitmapDevice()); // required by BT454
1.1 root 295: gBT454.reset(new BusIO_B<BT454Device>());
1.1.1.5 root 296: gCRTC2.reset(new BusIO_B<CRTC2Device>());
1.1 root 297: gSPC.reset(new BusIO_BBBB<SPCDevice>());
298:
299: gLCD.reset(new LCDDevice());
300: gKeyboard.reset(new LunaKeyboard());
301: gRenderer.reset(new LunaRenderer());
302:
303: // デバイスマップから devtable を作成
1.1.1.5 root 304: MakeDevtable(maptable);
1.1 root 305: }
306:
307: // デストラクタ
1.1.1.5 root 308: VM_LUNA1::~VM_LUNA1()
1.1 root 309: {
310: }
311:
312: //
313: // LUNA88K
314: //
315:
316: /*static*/ const uint8
317: VM_LUNA88K::maptable[256] = {
1.1.1.5 root 318: // RAM は Init() で動的に配置する。
319: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // 00
1.1.1.6 ! root 320: NONE, NONE, NONE, NONE, NONE, NONE, NONE, BUSERR, // 08
1.1 root 321: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 10
322: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 18
323: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 20
324: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 28
325: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 30
326: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 38
327:
328: // LUNA88K2 は 47 に(も?) NVRAM がいるようだ
329: // 69,6b,6d にも何かのコントローラ?
330: PROM, PROM, PROM, FUSE, MK48, MK48, MK48, MK48, // 40
331: PIO0, PIO0, PIO0, PIO0, PIO1, PIO1, PIO1, PIO1, // 48
332: SIO, SIO, SIO, SIO, NONE, NONE, NONE, NONE, // 50
333: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // 58
1.1.1.2 root 334: TAS, TAS, SYSCLK, SYSCLK, NONE, SYSCTL, NONE, NONE, // 60
335: NONE, SYSCTL, NONE, NONE, NONE, SYSCTL, NONE, NONE, // 68
1.1 root 336: ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, // 70
337: ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, ZRAM, // 78
338:
339: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 80
340: BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, BUSERR, // 88
341: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // 90
342: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // 98
343: BUSERR, MROM, BUSERR, MROM, BUSERR, MROM, BUSERR, MROM, // a0
344: BUSERR, MROM, BUSERR, MROM, BUSERR, MROM, BUSERR, MROM, // a8
345: BUSERR, BITMAP, BUSERR, BITMAP, BUSERR, BITMAP, BUSERR, BITMAP, // b0
346: BUSERR, BITMAP, BUSERR, BITMAP, BUSERR, BITMAP, BUSERR, BITMAP, // b8
347:
348: // d0 にボードチェックレジスタ?
349: BUSERR, BT454, BUSERR, BT454, BUSERR, BT454, BUSERR, BT454, // c0
350: BUSERR, BT454, BUSERR, BT454, BUSERR, BT454, BUSERR, BT454, // c8
351: BUSERR, CRTC2, BUSERR, CRTC2, BUSERR, CRTC2, BUSERR, CRTC2, // d0
352: BUSERR, CRTC2, BUSERR, CRTC2, BUSERR, CRTC2, BUSERR, CRTC2, // d8
353: SCSI, SCSI, SCSI, SCSI, NONE, NONE, NONE, NONE, // e0
354: NONE, NONE, NONE, NONE, NONE, NONE, NONE, NONE, // e8
355: LANCE, LANCE, LANCE, LANCE, NONE, NONE, NONE, NONE, // f0
1.1.1.2 root 356: NONE, NONE, NONE, NONE, NONE, NONE, NONE, CMMU, // f8
1.1 root 357: };
358:
359: // コンストラクタ
360: VM_LUNA88K::VM_LUNA88K()
361: {
1.1.1.2 root 362: // 機種固有パラメータ
363: // MPU クロックの初期値は機種ごとに異なる。単位は MHz
364: gConfig->SetDefault("mpu-clock", 25);
365: // RAM 初期値は MAX にしておく
1.1.1.3 root 366: gConfig->SetDefault("ram-size", 64);
1.1.1.2 root 367: // SPC の入力クロック (XXX LUNA-I と同じ?)
368: gConfig->Add("!spc-tCLF", 163);
369: // LUNA-II, LUNA88K, LUNA88K2 のクロック割り込みは 100Hz らしい
370: gConfig->Add("!sysclk-period", 10_msec);
371:
1.1.1.5 root 372: // この機種に不要なパラメータはここで削除する
373: // (機種が決まるより前に全機種の設定の和集合を用意してあるため)
374: gConfig->Delete("mpu-has-fpu");
375:
1.1 root 376: // デバイス (順序に注意)
1.1.1.5 root 377: // BusErrDevice, NullDevice は親コンストラクタで作成済み。
1.1.1.2 root 378:
1.1.1.6 ! root 379: gMPU.reset(new MPU88xx0Device()); // required by Scheduler
1.1.1.2 root 380: gScheduler.reset(new Scheduler()); // required by *
1.1.1.4 root 381: gInterrupt.reset(new SysCtlrDevice());
1.1.1.5 root 382: gRAM.reset(new RAMDevice()); // required by PartialRAM
383: gPartialRAM.reset(new PartialRAMDevice());
1.1.1.2 root 384: if (gMainApp.host_file || gConfig->Find("prom-image").AsString().empty()) {
385: prom.reset(new Luna88kPROMEmuDevice());
1.1 root 386: } else {
1.1.1.2 root 387: prom.reset(new PROMDevice());
1.1 root 388: }
389: gRTC.reset(new BusIO_BFFF<MK48T02Device>());
1.1.1.2 root 390: gPIO0.reset(new BusIO_BFFF<PIO0Device>());
391: gPIO1.reset(new BusIO_BFFF<PIO1Device>());
1.1 root 392: gSIO.reset(new BusIO_BFFF<SIODevice>());
1.1.1.4 root 393: gSysClk.reset(new BusIO_BFFF<SysClkDevice>());
1.1.1.2 root 394: gTAS.reset(new BusIO_BFFF<TASDevice>());
1.1 root 395: gZRAM.reset(new ZRAMDevice());
1.1.1.2 root 396: gBitmap.reset(new BitmapDevice()); // required by BT454
1.1 root 397: gBT454.reset(new BusIO_B<BT454Device>());
1.1.1.5 root 398: gCRTC2.reset(new BusIO_BFFF<CRTC2Device>());
1.1 root 399: gSPC.reset(new BusIO_BFFF<SPCDevice>());
1.1.1.2 root 400: gEthernet.reset(new BusIO_WF<LanceDevice>()); // required by FuseROM
1.1.1.5 root 401: gFuseROM.reset(new BusIO_BFFF<FuseROMDevice>());
1.1.1.2 root 402: gCMMU.reset(new CMMUDevice());
1.1 root 403:
404: gLCD.reset(new LCDDevice());
405: gKeyboard.reset(new LunaKeyboard());
406: gRenderer.reset(new LunaRenderer());
407:
408: // デバイスマップから devtable を作成
1.1.1.5 root 409: MakeDevtable(maptable);
1.1 root 410: }
411:
412: // デストラクタ
413: VM_LUNA88K::~VM_LUNA88K()
414: {
415: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.