1 |
|
/* |
2 |
|
* rom_patches.cpp - ROM patches |
3 |
|
* |
4 |
< |
* Basilisk II (C) 1997-1999 Christian Bauer |
4 |
> |
* Basilisk II (C) 1997-2000 Christian Bauer |
5 |
|
* |
6 |
|
* This program is free software; you can redistribute it and/or modify |
7 |
|
* it under the terms of the GNU General Public License as published by |
30 |
|
#include "disk.h" |
31 |
|
#include "cdrom.h" |
32 |
|
#include "video.h" |
33 |
+ |
#include "extfs.h" |
34 |
|
#include "prefs.h" |
35 |
|
#include "rom_patches.h" |
36 |
|
|
38 |
|
#include "debug.h" |
39 |
|
|
40 |
|
|
40 |
– |
// Breakpoint |
41 |
– |
//#define M68K_BREAKPOINT 0x2310 // CritError |
42 |
– |
//#define M68K_BREAKPOINT 0x1d10 // BootMe |
43 |
– |
|
41 |
|
// Global variables |
42 |
< |
uint32 UniversalInfo; // ROM offset of UniversalInfo |
43 |
< |
uint32 PutScrapPatch; // Mac address of PutScrap() patch |
44 |
< |
|
45 |
< |
static uint32 sony_offset; // ROM offset of .Sony driver |
46 |
< |
static uint32 serd_offset; // ROM offset of SERD resource (serial drivers) |
47 |
< |
static uint32 microseconds_offset; // ROM offset of Microseconds() replacement routine |
48 |
< |
static uint32 memory_dispatch_offset; // ROM offset of MemoryDispatch() replacement routine |
42 |
> |
uint32 UniversalInfo; // ROM offset of UniversalInfo |
43 |
> |
uint32 PutScrapPatch; // Mac address of PutScrap() patch |
44 |
> |
uint32 ROMBreakpoint = 0; // ROM offset of breakpoint (0 = disabled, 0x2310 = CritError) |
45 |
> |
bool PrintROMInfo = false; // Flag: print ROM information in PatchROM() |
46 |
> |
|
47 |
> |
static uint32 sony_offset; // ROM offset of .Sony driver |
48 |
> |
static uint32 serd_offset; // ROM offset of SERD resource (serial drivers) |
49 |
> |
static uint32 microseconds_offset; // ROM offset of Microseconds() replacement routine |
50 |
|
|
51 |
|
// Prototypes |
52 |
|
uint16 ROMVersion; |
81 |
|
|
82 |
|
if (!cont) |
83 |
|
rsrc_ptr = x; |
84 |
+ |
else |
85 |
+ |
rsrc_ptr = ReadMacInt32(ROMBaseMac + rsrc_ptr + 8); |
86 |
|
|
87 |
|
for (;;) { |
88 |
|
lp = ROMBaseMac + rsrc_ptr; |
141 |
|
|
142 |
|
|
143 |
|
/* |
144 |
+ |
* Print ROM information to stream, |
145 |
+ |
*/ |
146 |
+ |
|
147 |
+ |
static void list_rom_resources(void) |
148 |
+ |
{ |
149 |
+ |
printf("ROM Resources:\n"); |
150 |
+ |
printf("Offset\t Type\tID\tSize\tName\n"); |
151 |
+ |
printf("------------------------------------------------\n"); |
152 |
+ |
|
153 |
+ |
uint32 lp = ROMBaseMac + ReadMacInt32(ROMBaseMac + 0x1a); |
154 |
+ |
uint32 rsrc_ptr = ReadMacInt32(lp); |
155 |
+ |
|
156 |
+ |
for (;;) { |
157 |
+ |
lp = ROMBaseMac + rsrc_ptr; |
158 |
+ |
uint32 data = ReadMacInt32(lp + 12); |
159 |
+ |
|
160 |
+ |
char name[32]; |
161 |
+ |
int name_len = ReadMacInt8(lp + 23), i; |
162 |
+ |
for (i=0; i<name_len; i++) |
163 |
+ |
name[i] = ReadMacInt8(lp + 24 + i); |
164 |
+ |
name[i] = 0; |
165 |
+ |
|
166 |
+ |
printf("%08x %c%c%c%c\t%d\t%d\t%s\n", data, ReadMacInt8(lp + 16), ReadMacInt8(lp + 17), ReadMacInt8(lp + 18), ReadMacInt8(lp + 19), ReadMacInt16(lp + 20), ReadMacInt32(ROMBaseMac + data - 8), name); |
167 |
+ |
|
168 |
+ |
rsrc_ptr = ReadMacInt32(lp + 8); |
169 |
+ |
if (!rsrc_ptr) |
170 |
+ |
break; |
171 |
+ |
} |
172 |
+ |
printf("\n"); |
173 |
+ |
} |
174 |
+ |
|
175 |
+ |
// Mapping of Model IDs to Model names |
176 |
+ |
struct mac_desc { |
177 |
+ |
char *name; |
178 |
+ |
int32 id; |
179 |
+ |
}; |
180 |
+ |
|
181 |
+ |
static mac_desc MacDesc[] = { |
182 |
+ |
{"Classic" , 1}, |
183 |
+ |
{"Mac XL" , 2}, |
184 |
+ |
{"Mac 512KE" , 3}, |
185 |
+ |
{"Mac Plus" , 4}, |
186 |
+ |
{"Mac SE" , 5}, |
187 |
+ |
{"Mac II" , 6}, |
188 |
+ |
{"Mac IIx" , 7}, |
189 |
+ |
{"Mac IIcx" , 8}, |
190 |
+ |
{"Mac SE/030" , 9}, |
191 |
+ |
{"Mac Portable" , 10}, |
192 |
+ |
{"Mac IIci" , 11}, |
193 |
+ |
{"Mac IIfx" , 13}, |
194 |
+ |
{"Mac Classic" , 17}, |
195 |
+ |
{"Mac IIsi" , 18}, |
196 |
+ |
{"Mac LC" , 19}, |
197 |
+ |
{"Quadra 900" , 20}, |
198 |
+ |
{"PowerBook 170" , 21}, |
199 |
+ |
{"Quadra 700" , 22}, |
200 |
+ |
{"Classic II" , 23}, |
201 |
+ |
{"PowerBook 100" , 24}, |
202 |
+ |
{"PowerBook 140" , 25}, |
203 |
+ |
{"Quadra 950" , 26}, |
204 |
+ |
{"Mac LCIII/Performa 450", 27}, |
205 |
+ |
{"PowerBook Duo 210" , 29}, |
206 |
+ |
{"Centris 650" , 30}, |
207 |
+ |
{"PowerBook Duo 230" , 32}, |
208 |
+ |
{"PowerBook 180" , 33}, |
209 |
+ |
{"PowerBook 160" , 34}, |
210 |
+ |
{"Quadra 800" , 35}, |
211 |
+ |
{"Quadra 650" , 36}, |
212 |
+ |
{"Mac LCII" , 37}, |
213 |
+ |
{"PowerBook Duo 250" , 38}, |
214 |
+ |
{"Mac IIvi" , 44}, |
215 |
+ |
{"Mac IIvm/Performa 600", 45}, |
216 |
+ |
{"Mac IIvx" , 48}, |
217 |
+ |
{"Color Classic/Performa 250", 49}, |
218 |
+ |
{"PowerBook 165c" , 50}, |
219 |
+ |
{"Centris 610" , 52}, |
220 |
+ |
{"Quadra 610" , 53}, |
221 |
+ |
{"PowerBook 145" , 54}, |
222 |
+ |
{"Mac LC520" , 56}, |
223 |
+ |
{"Quadra/Centris 660AV" , 60}, |
224 |
+ |
{"Performa 46x" , 62}, |
225 |
+ |
{"PowerBook 180c" , 71}, |
226 |
+ |
{"PowerBook 520/520c/540/540c", 72}, |
227 |
+ |
{"PowerBook Duo 270c" , 77}, |
228 |
+ |
{"Quadra 840AV" , 78}, |
229 |
+ |
{"Performa 550" , 80}, |
230 |
+ |
{"PowerBook 165" , 84}, |
231 |
+ |
{"PowerBook 190" , 85}, |
232 |
+ |
{"Mac TV" , 88}, |
233 |
+ |
{"Mac LC475/Performa 47x", 89}, |
234 |
+ |
{"Mac LC575" , 92}, |
235 |
+ |
{"Quadra 605" , 94}, |
236 |
+ |
{"Quadra 630" , 98}, |
237 |
+ |
{"Mac LC580" , 99}, |
238 |
+ |
{"PowerBook Duo 280" , 102}, |
239 |
+ |
{"PowerBook Duo 280c" , 103}, |
240 |
+ |
{"PowerBook 150" , 115}, |
241 |
+ |
{"unknown", -1} |
242 |
+ |
}; |
243 |
+ |
|
244 |
+ |
static void print_universal_info(uint32 info) |
245 |
+ |
{ |
246 |
+ |
uint8 id = ReadMacInt8(info + 18); |
247 |
+ |
uint16 hwcfg = ReadMacInt16(info + 16); |
248 |
+ |
uint16 rom85 = ReadMacInt16(info + 20); |
249 |
+ |
|
250 |
+ |
// Find model name |
251 |
+ |
char *name = "unknown"; |
252 |
+ |
for (int i=0; MacDesc[i].id >= 0; i++) |
253 |
+ |
if (MacDesc[i].id == id + 6) { |
254 |
+ |
name = MacDesc[i].name; |
255 |
+ |
break; |
256 |
+ |
} |
257 |
+ |
|
258 |
+ |
printf("%08x %02x\t%04x\t%04x\t%s\n", info - ROMBaseMac, id, hwcfg, rom85, name); |
259 |
+ |
} |
260 |
+ |
|
261 |
+ |
static void list_universal_infos(void) |
262 |
+ |
{ |
263 |
+ |
uint32 ofs = 0x3000; |
264 |
+ |
for (int i=0; i<0x2000; i+=2, ofs+=2) |
265 |
+ |
if (ReadMacInt32(ROMBaseMac + ofs) == 0xdc000505) { |
266 |
+ |
ofs -= 16; |
267 |
+ |
uint32 q; |
268 |
+ |
for (q=ofs; q > 0 && ReadMacInt32(ROMBaseMac + q) != ofs - q; q-=4) ; |
269 |
+ |
if (q > 0) { |
270 |
+ |
printf("Universal Table at %08x:\n", q); |
271 |
+ |
printf("Offset\t ID\tHWCfg\tROM85\tModel\n"); |
272 |
+ |
printf("------------------------------------------------\n"); |
273 |
+ |
while (ofs = ReadMacInt32(ROMBaseMac + q)) { |
274 |
+ |
print_universal_info(ROMBaseMac + ofs + q); |
275 |
+ |
q += 4; |
276 |
+ |
} |
277 |
+ |
} |
278 |
+ |
break; |
279 |
+ |
} |
280 |
+ |
printf("\n"); |
281 |
+ |
} |
282 |
+ |
|
283 |
+ |
static void print_rom_info(void) |
284 |
+ |
{ |
285 |
+ |
printf("\nROM Info:\n"); |
286 |
+ |
printf("Checksum : %08x\n", ReadMacInt32(ROMBaseMac)); |
287 |
+ |
printf("Version : %04x\n", ROMVersion); |
288 |
+ |
printf("Sub Version : %04x\n", ReadMacInt16(ROMBaseMac + 18)); |
289 |
+ |
printf("Resource Map: %08x\n", ReadMacInt32(ROMBaseMac + 26)); |
290 |
+ |
printf("Trap Tables : %08x\n\n", ReadMacInt32(ROMBaseMac + 34)); |
291 |
+ |
if (ROMVersion == ROM_VERSION_32) { |
292 |
+ |
list_rom_resources(); |
293 |
+ |
list_universal_infos(); |
294 |
+ |
} |
295 |
+ |
} |
296 |
+ |
|
297 |
+ |
|
298 |
+ |
/* |
299 |
|
* Driver stubs |
300 |
|
*/ |
301 |
|
|
302 |
|
static const uint8 sony_driver[] = { // Replacement for .Sony driver |
303 |
|
// Driver header |
304 |
< |
SonyDriverFlags >> 8, SonyDriverFlags & 0xff, SonyDriverDelay >> 8, SonyDriverDelay & 0xff, 0x00, 0x00, 0x00, 0x00, |
304 |
> |
SonyDriverFlags >> 8, SonyDriverFlags & 0xff, 0, 0, 0, 0, 0, 0, |
305 |
|
0x00, 0x18, // Open() offset |
306 |
|
0x00, 0x1c, // Prime() offset |
307 |
|
0x00, 0x20, // Control() offset |
349 |
|
|
350 |
|
static const uint8 disk_driver[] = { // Generic disk driver |
351 |
|
// Driver header |
352 |
< |
DiskDriverFlags >> 8, DiskDriverFlags & 0xff, DiskDriverDelay >> 8, DiskDriverDelay & 0xff, 0x00, 0x00, 0x00, 0x00, |
352 |
> |
DiskDriverFlags >> 8, DiskDriverFlags & 0xff, 0, 0, 0, 0, 0, 0, |
353 |
|
0x00, 0x18, // Open() offset |
354 |
|
0x00, 0x1c, // Prime() offset |
355 |
|
0x00, 0x20, // Control() offset |
397 |
|
|
398 |
|
static const uint8 cdrom_driver[] = { // CD-ROM driver |
399 |
|
// Driver header |
400 |
< |
CDROMDriverFlags >> 8, CDROMDriverFlags & 0xff, CDROMDriverDelay >> 8, CDROMDriverDelay & 0xff, 0x00, 0x00, 0x00, 0x00, |
400 |
> |
CDROMDriverFlags >> 8, CDROMDriverFlags & 0xff, 0, 0, 0, 0, 0, 0, |
401 |
|
0x00, 0x1c, // Open() offset |
402 |
|
0x00, 0x20, // Prime() offset |
403 |
|
0x00, 0x24, // Control() offset |
710 |
|
uint32 dce = ReadMacInt32(r.a[0]); |
711 |
|
WriteMacInt32(dce + dCtlDriver, ROMBaseMac + sony_offset + 0x100); |
712 |
|
WriteMacInt16(dce + dCtlFlags, DiskDriverFlags); |
558 |
– |
WriteMacInt16(dce + dCtlDelay, DiskDriverDelay); |
713 |
|
|
714 |
|
// Open disk driver |
715 |
|
WriteMacInt32(pb + ioNamePtr, ROMBaseMac + sony_offset + 0x112); |
728 |
|
dce = ReadMacInt32(r.a[0]); |
729 |
|
WriteMacInt32(dce + dCtlDriver, ROMBaseMac + sony_offset + 0x200); |
730 |
|
WriteMacInt16(dce + dCtlFlags, CDROMDriverFlags); |
577 |
– |
WriteMacInt16(dce + dCtlDelay, CDROMDriverDelay); |
731 |
|
|
732 |
|
// Open CD-ROM driver |
733 |
|
WriteMacInt32(pb + ioNamePtr, ROMBaseMac + sony_offset + 0x212); |
796 |
|
|
797 |
|
void PatchAfterStartup(void) |
798 |
|
{ |
799 |
< |
// Install MemoryDispatch() replacement routine |
800 |
< |
M68kRegisters r; |
801 |
< |
r.a[0] = ROMBaseMac + memory_dispatch_offset; |
802 |
< |
r.d[0] = 0xa05c; |
650 |
< |
Execute68kTrap(0xa247, &r); // SetOSTrapAddress() |
799 |
> |
#if SUPPORTS_EXTFS |
800 |
> |
// Install external file system |
801 |
> |
InstallExtFS(); |
802 |
> |
#endif |
803 |
|
} |
804 |
|
|
805 |
|
|
816 |
|
// Real addressing mode requires a 32-bit clean ROM |
817 |
|
return ROMVersion == ROM_VERSION_32; |
818 |
|
#else |
819 |
< |
// Virtual addressing mode works with 32-bit clean Mac II ROMs and Classic ROMs (experimental) |
819 |
> |
// Virtual addressing mode works with 32-bit clean Mac II ROMs and Classic ROMs |
820 |
|
return (ROMVersion == ROM_VERSION_CLASSIC) || (ROMVersion == ROM_VERSION_32); |
821 |
|
#endif |
822 |
|
} |
989 |
|
// ROM patches for 32-bit clean Mac-II ROMs (version $067c) |
990 |
|
static bool patch_rom_32(void) |
991 |
|
{ |
992 |
+ |
uint32 *lp; |
993 |
|
uint16 *wp; |
994 |
|
uint8 *bp; |
995 |
|
uint32 base; |
1305 |
|
*wp++ = htons(M68K_NOP); |
1306 |
|
*wp = htons(M68K_NOP); |
1307 |
|
|
1308 |
< |
// Fix logical/physical RAM size (CompBootStack) (must be done after InitMemMgr!) |
1309 |
< |
static const uint8 fix_memsize_dat[] = {0x4e, 0x75}; |
1310 |
< |
if ((base = find_rom_data(0x490, 0x4b0, fix_memsize_dat, sizeof(fix_memsize_dat))) == 0) return false; |
1311 |
< |
D(bug("fix_memsize %08lx\n", base)); |
1312 |
< |
wp = (uint16 *)(ROMBaseHost + base); |
1308 |
> |
// Compute boot stack pointer and fix logical/physical RAM size (CompBootStack) (must be done after InitMemMgr!) |
1309 |
> |
wp = (uint16 *)(ROMBaseHost + 0x490); |
1310 |
> |
*wp++ = htons(0x2038); // move.l $10c,d0 |
1311 |
> |
*wp++ = htons(0x010c); |
1312 |
> |
*wp++ = htons(0xd0b8); // add.l $2a6,d0 |
1313 |
> |
*wp++ = htons(0x02a6); |
1314 |
> |
*wp++ = htons(0xe288); // lsr.l #1,d0 |
1315 |
> |
*wp++ = htons(0x0880); // bclr #0,d0 |
1316 |
> |
*wp++ = htons(0x0000); |
1317 |
> |
*wp++ = htons(0x0440); // subi.w #$400,d0 |
1318 |
> |
*wp++ = htons(0x0400); |
1319 |
> |
*wp++ = htons(0x2040); // move.l d0,a0 |
1320 |
|
*wp++ = htons(M68K_EMUL_OP_FIX_MEMSIZE); |
1321 |
< |
*wp = htons(M68K_RTS); |
1321 |
> |
*wp++ = htons(M68K_RTS); |
1322 |
|
|
1323 |
|
static const uint8 fix_memsize2_dat[] = {0x22, 0x30, 0x81, 0xe2, 0x0d, 0xdc, 0xff, 0xba, 0xd2, 0xb0, 0x81, 0xe2, 0x0d, 0xdc, 0xff, 0xec, 0x21, 0xc1, 0x1e, 0xf8}; |
1324 |
|
base = find_rom_data(0x4c000, 0x4c080, fix_memsize2_dat, sizeof(fix_memsize2_dat)); |
1451 |
|
} |
1452 |
|
} |
1453 |
|
|
1454 |
+ |
// Don't set MemoryDispatch() to unimplemented trap |
1455 |
+ |
static const uint8 memdisp_dat[] = {0x30, 0x3c, 0xa8, 0x9f, 0xa7, 0x46, 0x30, 0x3c, 0xa0, 0x5c, 0xa2, 0x47}; |
1456 |
+ |
base = find_rom_data(0x4f100, 0x4f180, memdisp_dat, sizeof(memdisp_dat)); |
1457 |
+ |
D(bug("memdisp %08lx\n", base)); |
1458 |
+ |
if (base) { // ROM15/22/23/26/27/32 |
1459 |
+ |
wp = (uint16 *)(ROMBaseHost + base + 10); |
1460 |
+ |
*wp = htons(M68K_NOP); |
1461 |
+ |
} |
1462 |
+ |
|
1463 |
|
// Patch .EDisk driver (don't scan for EDisks in the area ROMBase..0xe00000) |
1464 |
|
uint32 edisk_offset = find_rom_resource('DRVR', 51); |
1465 |
|
if (edisk_offset) { |
1561 |
|
*wp++ = htons(base >> 16); |
1562 |
|
*wp = htons(base & 0xffff); |
1563 |
|
|
1564 |
< |
// Install MemoryDispatch() replacement routine (activated in PatchAfterStartup()) |
1565 |
< |
memory_dispatch_offset = sony_offset + 0xc20; |
1566 |
< |
wp = (uint16 *)(ROMBaseHost + memory_dispatch_offset); |
1567 |
< |
*wp++ = htons(M68K_EMUL_OP_MEMORY_DISPATCH); |
1564 |
> |
#if EMULATED_68K |
1565 |
> |
// Replace BlockMove() |
1566 |
> |
wp = (uint16 *)(ROMBaseHost + find_rom_trap(0xa02e)); // BlockMove() |
1567 |
> |
*wp++ = htons(M68K_EMUL_OP_BLOCK_MOVE); |
1568 |
> |
*wp++ = htons(0x7000); |
1569 |
|
*wp = htons(M68K_RTS); |
1570 |
+ |
#endif |
1571 |
+ |
|
1572 |
+ |
// Look for double PACK 4 resources |
1573 |
+ |
if ((base = find_rom_resource('PACK', 4)) == 0) return false; |
1574 |
+ |
if ((base = find_rom_resource('PACK', 4, true)) == 0 && FPUType == 0) |
1575 |
+ |
printf("WARNING: This ROM seems to require an FPU\n"); |
1576 |
|
|
1577 |
|
// Patch VIA interrupt handler |
1578 |
|
wp = (uint16 *)(ROMBaseHost + 0x9bc4); // Level 1 handler |
1591 |
|
|
1592 |
|
bool PatchROM(void) |
1593 |
|
{ |
1594 |
< |
// Print ROM info |
1595 |
< |
D(bug("ROM Info:\n")); |
1596 |
< |
D(bug("Checksum: %08lx\n", ReadMacInt32(ROMBaseMac))); |
1421 |
< |
D(bug("Version: %04x\n", ROMVersion)); |
1422 |
< |
D(bug("Sub Version: %04x\n", ReadMacInt16(ROMBaseMac + 18))); |
1594 |
> |
// Print some information about the ROM |
1595 |
> |
if (PrintROMInfo) |
1596 |
> |
print_rom_info(); |
1597 |
|
|
1598 |
|
// Patch ROM depending on version |
1599 |
|
switch (ROMVersion) { |
1609 |
|
return false; |
1610 |
|
} |
1611 |
|
|
1438 |
– |
#ifdef M68K_BREAKPOINT |
1612 |
|
// Install breakpoint |
1613 |
< |
uint16 *wp = (uint16 *)(ROMBaseHost + M68K_BREAKPOINT); |
1614 |
< |
*wp = htons(M68K_EMUL_BREAK); |
1615 |
< |
#endif |
1613 |
> |
if (ROMBreakpoint) { |
1614 |
> |
uint16 *wp = (uint16 *)(ROMBaseHost + ROMBreakpoint); |
1615 |
> |
*wp = htons(M68K_EMUL_BREAK); |
1616 |
> |
} |
1617 |
|
|
1618 |
|
// Clear caches as we loaded and patched code |
1619 |
|
FlushCodeCache(ROMBaseHost, ROMSize); |