1 |
|
/* |
2 |
|
* rsrc_patches.cpp - Resource patches |
3 |
|
* |
4 |
< |
* SheepShaver (C) 1997-2004 Christian Bauer and Marc Hellwig |
4 |
> |
* SheepShaver (C) 1997-2005 Christian Bauer and Marc Hellwig |
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 |
124 |
|
D(bug("boot 3 found\n")); |
125 |
|
size >>= 1; |
126 |
|
while (size--) { |
127 |
< |
if (PM(0,0x2e49)) { |
128 |
< |
// Set boot stack pointer (7.5.2, 7.5.3, 7.5.5, 7.6, 7.6.1, 8.0, 8.1, 8.5, 8.6) |
129 |
< |
p[0] = htons(M68K_EMUL_OP_FIX_BOOTSTACK); |
127 |
> |
if (PM(0,0x51c9) && PM(2,0x2e49)) { |
128 |
> |
// Set boot stack pointer (7.5.2, 7.5.3, 7.5.5, 7.6, 7.6.1, 8.0, 8.1, 8.5, 8.6, 9.0) |
129 |
> |
p[2] = htons(M68K_EMUL_OP_FIX_BOOTSTACK); |
130 |
|
D(bug(" patch 1 applied\n")); |
131 |
|
} else if (PM(0,0x4267) && PM(1,0x3f01) && PM(2,0x3f2a) && PM(3,0x0006) && PM(4,0x6100)) { |
132 |
|
// Check when ntrb 17 is installed (for native Resource Manager patch) (7.5.3, 7.5.5) |
144 |
|
// Check when ntrb 17 is installed (for native Resource Manager patch) (9.0) |
145 |
|
p[7] = htons(M68K_EMUL_OP_NTRB_17_PATCH4); |
146 |
|
p[8] = htons(ntohs(p[8]) & 0xf0ff); // bra |
147 |
< |
D(bug(" patch 8 applied\n")); |
147 |
> |
D(bug(" patch 5 applied\n")); |
148 |
|
} else if (PM(0,0x0c39) && PM(1,0x0001) && PM(2,0xf800) && PM(3,0x0008) && PM(4,0x6f00)) { |
149 |
< |
// Don't read from 0xf8000008 (8.5 with Zanzibar ROM, 8.6) |
149 |
> |
// Don't read from 0xf8000008 (8.5 with Zanzibar ROM, 8.6, 9.0) |
150 |
|
p[0] = htons(M68K_NOP); |
151 |
|
p[1] = htons(M68K_NOP); |
152 |
|
p[2] = htons(M68K_NOP); |
153 |
|
p[3] = htons(M68K_NOP); |
154 |
|
p[4] = htons(0x6000); // bra |
155 |
< |
D(bug(" patch 5 applied\n")); |
155 |
> |
D(bug(" patch 6 applied\n")); |
156 |
|
} else if (PM(0,0x2f3c) && PM(1,0x6b72) && PM(2,0x6e6c) && PM(3,0x4267) && PM(4,0xa9a0) && PM(5,0x265f) && PM(6,0x200b) && PM(7,0x6700)) { |
157 |
< |
// Don't replace nanokernel ("krnl" resource) (8.6) |
157 |
> |
// Don't replace nanokernel ("krnl" resource) (8.6, 9.0) |
158 |
|
p[0] = htons(M68K_NOP); |
159 |
|
p[1] = htons(M68K_NOP); |
160 |
|
p[2] = htons(M68K_NOP); |
161 |
|
p[3] = htons(M68K_NOP); |
162 |
|
p[4] = htons(M68K_NOP); |
163 |
|
p[7] = htons(0x6000); // bra |
164 |
< |
D(bug(" patch 6 applied\n")); |
164 |
> |
D(bug(" patch 7 applied\n")); |
165 |
|
} else if (PM(0,0xa8fe) && PM(1,0x3038) && PM(2,0x017a) && PM(3,0x0c40) && PM(4,0x8805) && PM(5,0x6710)) { |
166 |
|
// No SCSI (calls via 0x205c jump vector which is not initialized in NewWorld ROM 1.6) (8.6) |
167 |
|
if (ROMType == ROMTYPE_NEWWORLD) { |
168 |
|
p[5] = htons(0x6010); // bra |
169 |
< |
D(bug(" patch 7 applied\n")); |
169 |
> |
D(bug(" patch 8 applied\n")); |
170 |
|
} |
171 |
+ |
} else if (PM(0,0x2f3c) && PM(1,0x7665) && PM(2,0x7273) && PM(3,0x3f3c) && PM(4,0x0001) && PM(10,0x2041) && PM(11,0x2248) && PM(12,0x2050) && PM(20,0x7066) && PM(21,0xa9c9)) { |
172 |
+ |
// Check when vers 1 is installed (for safe abort if MacOS < 8.1 is used with a NewWorld ROM) |
173 |
+ |
p[10] = htons(M68K_EMUL_OP_CHECK_SYSV); |
174 |
+ |
p[11] = htons(0x4a81); // tst.l d1 |
175 |
+ |
p[12] = htons(0x670e); // beq.s <SysError #dsOldSystem> |
176 |
+ |
D(bug(" patch 9 applied\n")); |
177 |
|
} |
178 |
|
p++; |
179 |
|
} |
230 |
|
D(bug(" patch 2 applied\n")); |
231 |
|
break; |
232 |
|
} else if (PM(0,0xa030) && PM(1,0x5240) && PM(2,0x7000) && PM(3,0x302e) && PM(4,0xfecc) && PM(5,0x323c) && PM(6,0x0100)) { |
233 |
< |
// Disable VM (8.5, 8.6) |
233 |
> |
// Disable VM (8.5, 8.6, 9.0) |
234 |
|
p[8] = htons(M68K_NOP); |
235 |
|
p[15] = htons(M68K_NOP); |
236 |
|
D(bug(" patch 3 applied\n")); |
273 |
|
p[0] = htons(0x606e); |
274 |
|
D(bug(" patch 3 applied\n")); |
275 |
|
} else if (PM(0,0x6400) && PM(1,0x011c) && PM(2,0x2278) && PM(3,0x0134)) { |
276 |
< |
// We don't have SonyVars (7.6.1, 8.0, 8.1, 8.5, 8.6) |
276 |
> |
// We don't have SonyVars (7.6.1, 8.0, 8.1, 8.5, 8.6, 9.0) |
277 |
|
p[0] = htons(0x6000); |
278 |
|
D(bug(" patch 4 applied\n")); |
279 |
|
} else if (PM(0,0x6400) && PM(1,0x00e6) && PM(2,0x2278) && PM(3,0x0134)) { |
346 |
|
p[2] = htons(M68K_NOP); |
347 |
|
D(bug(" patch 2 applied\n")); |
348 |
|
} else if (PM(0,0x700a) && PM(1,0xfe0a)) { |
349 |
< |
// Don't call FE0A opcode (7.6, 7.6.1, 8.0, 8.1, 8.5, 8.6) |
350 |
< |
p[1] = htons(0x7000); |
349 |
> |
// Don't call FE0A opcode (7.6, 7.6.1, 8.0, 8.1, 8.5, 8.6, 9.0) |
350 |
> |
p[1] = htons(0x2008); // move.l a0,d0 |
351 |
|
D(bug(" patch 3 applied\n")); |
346 |
– |
} else if (PM(0,0x6c00) && PM(1,0x016a) && PM(2,0x2278) && PM(3,0x0134)) { |
347 |
– |
// We don't have SonyVars (8.6) |
348 |
– |
p[-4] = htons(0x21fc); // move.l $40810000,($0000) |
349 |
– |
p[-3] = htons(0x4081); |
350 |
– |
p[-2] = htons(0x0000); |
351 |
– |
p[-1] = htons(0x0000); |
352 |
– |
p[0] = htons(0x6000); |
353 |
– |
D(bug(" patch 4 applied\n")); |
352 |
|
} |
353 |
|
p++; |
354 |
|
} |
461 |
|
size >>= 1; |
462 |
|
while (size--) { |
463 |
|
if (PM(0,0x203c) && PM(1,0x0100) && PM(2,0x0000) && PM(3,0xc0ae) && PM(4,0xfffc)) { |
464 |
< |
// Don't replace SCSI Manager (8.1, 8.5, 8.6) |
464 |
> |
// Don't replace SCSI Manager (8.1, 8.5, 8.6, 9.0) |
465 |
|
p[5] = htons((ntohs(p[5]) & 0xff) | 0x6000); // beq |
466 |
|
D(bug(" patch 1 applied\n")); |
467 |
|
break; |
520 |
|
} else if (type == FOURCC('s','c','o','d') && id == -16465) { |
521 |
|
D(bug("scod -16465 found\n")); |
522 |
|
|
523 |
< |
// Don't crash in Process Manager on reset/shutdown (8.6) |
523 |
> |
// Don't crash in Process Manager on reset/shutdown (8.6, 9.0) |
524 |
|
static const uint8 dat[] = {0x4e, 0x56, 0x00, 0x00, 0x48, 0xe7, 0x03, 0x18, 0x2c, 0x2e, 0x00, 0x10}; |
525 |
|
base = find_rsrc_data((uint8 *)p, size, dat, sizeof(dat)); |
526 |
|
if (base) { |
573 |
|
|
574 |
|
|
575 |
|
/* |
576 |
+ |
* Resource patches via GetNamedResource() and Get1NamedResource() |
577 |
+ |
*/ |
578 |
+ |
|
579 |
+ |
void CheckLoad(uint32 type, const char *name, uint8 *p, uint32 size) |
580 |
+ |
{ |
581 |
+ |
uint16 *p16; |
582 |
+ |
uint32 base; |
583 |
+ |
D(bug("vCheckLoad %c%c%c%c (%08x) name \"%*s\", data %p, size %d\n", type >> 24, (type >> 16) & 0xff, (type >> 8) & 0xff, type & 0xff, type, name[0], &name[1], p, size)); |
584 |
+ |
|
585 |
+ |
// Don't modify resources in ROM |
586 |
+ |
if ((uintptr)p >= (uintptr)ROMBaseHost && (uintptr)p <= (uintptr)(ROMBaseHost + ROM_SIZE)) |
587 |
+ |
return; |
588 |
+ |
|
589 |
+ |
if (type == FOURCC('D','R','V','R') && strncmp(&name[1], ".AFPTranslator", name[0]) == 0) { |
590 |
+ |
D(bug(" DRVR .AFPTranslator found\n")); |
591 |
+ |
|
592 |
+ |
// Don't access ROM85 as it it was a pointer to a ROM version number (8.0, 8.1) |
593 |
+ |
static const uint8 dat[] = {0x3a, 0x2e, 0x00, 0x0a, 0x55, 0x4f, 0x3e, 0xb8, 0x02, 0x8e, 0x30, 0x1f, 0x48, 0xc0, 0x24, 0x40, 0x20, 0x40}; |
594 |
+ |
base = find_rsrc_data(p, size, dat, sizeof(dat)); |
595 |
+ |
if (base) { |
596 |
+ |
p16 = (uint16 *)(p + base + 4); |
597 |
+ |
*p16++ = htons(0x303c); // move.l #ROM85,%d0 |
598 |
+ |
*p16++ = htons(0x028e); |
599 |
+ |
*p16++ = htons(M68K_NOP); |
600 |
+ |
*p16++ = htons(M68K_NOP); |
601 |
+ |
D(bug(" patch 1 applied\n")); |
602 |
+ |
} |
603 |
+ |
} |
604 |
+ |
} |
605 |
+ |
|
606 |
+ |
|
607 |
+ |
/* |
608 |
|
* Native Resource Manager patches |
609 |
|
*/ |
610 |
|
|
626 |
|
} |
627 |
|
|
628 |
|
#ifdef __BEOS__ |
629 |
+ |
static |
630 |
+ |
#else |
631 |
+ |
extern "C" |
632 |
+ |
#endif |
633 |
+ |
void named_check_load_invoc(uint32 type, uint32 name, uint32 h) |
634 |
+ |
{ |
635 |
+ |
if (h == 0) |
636 |
+ |
return; |
637 |
+ |
uint32 p = ReadMacInt32(h); |
638 |
+ |
if (p == 0) |
639 |
+ |
return; |
640 |
+ |
uint32 size = ReadMacInt32(p - 2 * 4) & 0xffffff; |
641 |
+ |
|
642 |
+ |
CheckLoad(type, (char *)Mac2HostAddr(name), Mac2HostAddr(p), size); |
643 |
+ |
} |
644 |
+ |
|
645 |
+ |
#ifdef __BEOS__ |
646 |
|
static asm void **get_resource(register uint32 type, register int16 id) |
647 |
|
{ |
648 |
|
// Create stack frame |
807 |
|
addi r1,r1,56+12 |
808 |
|
blr |
809 |
|
} |
810 |
+ |
|
811 |
+ |
static asm void **get_named_resource(register uint32 type, register uint32 name) |
812 |
+ |
{ |
813 |
+ |
// Create stack frame |
814 |
+ |
mflr r0 |
815 |
+ |
stw r0,8(r1) |
816 |
+ |
stwu r1,-(56+12)(r1) |
817 |
+ |
|
818 |
+ |
// Save type/ID |
819 |
+ |
stw r3,56(r1) |
820 |
+ |
stw r4,56+4(r1) |
821 |
+ |
|
822 |
+ |
// Call old routine |
823 |
+ |
lwz r0,XLM_GET_NAMED_RESOURCE |
824 |
+ |
lwz r2,XLM_RES_LIB_TOC |
825 |
+ |
mtctr r0 |
826 |
+ |
bctrl |
827 |
+ |
lwz r2,XLM_TOC // Get TOC |
828 |
+ |
stw r3,56+8(r1) // Save handle |
829 |
+ |
|
830 |
+ |
// Call CheckLoad |
831 |
+ |
lwz r3,56(r1) |
832 |
+ |
lwz r4,56+4(r1) |
833 |
+ |
lwz r5,56+8(r1) |
834 |
+ |
bl named_check_load_invoc |
835 |
+ |
lwz r3,56+8(r1) // Restore handle |
836 |
+ |
|
837 |
+ |
// Return to caller |
838 |
+ |
lwz r0,56+12+8(r1) |
839 |
+ |
mtlr r0 |
840 |
+ |
addi r1,r1,56+12 |
841 |
+ |
blr |
842 |
+ |
} |
843 |
+ |
|
844 |
+ |
static asm void **get_1_named_resource(register uint32 type, register uint32 name) |
845 |
+ |
{ |
846 |
+ |
// Create stack frame |
847 |
+ |
mflr r0 |
848 |
+ |
stw r0,8(r1) |
849 |
+ |
stwu r1,-(56+12)(r1) |
850 |
+ |
|
851 |
+ |
// Save type/ID |
852 |
+ |
stw r3,56(r1) |
853 |
+ |
stw r4,56+4(r1) |
854 |
+ |
|
855 |
+ |
// Call old routine |
856 |
+ |
lwz r0,XLM_GET_1_NAMED_RESOURCE |
857 |
+ |
lwz r2,XLM_RES_LIB_TOC |
858 |
+ |
mtctr r0 |
859 |
+ |
bctrl |
860 |
+ |
lwz r2,XLM_TOC // Get TOC |
861 |
+ |
stw r3,56+8(r1) // Save handle |
862 |
+ |
|
863 |
+ |
// Call CheckLoad |
864 |
+ |
lwz r3,56(r1) |
865 |
+ |
lwz r4,56+4(r1) |
866 |
+ |
lwz r5,56+8(r1) |
867 |
+ |
bl named_check_load_invoc |
868 |
+ |
lwz r3,56+8(r1) // Restore handle |
869 |
+ |
|
870 |
+ |
// Return to caller |
871 |
+ |
lwz r0,56+12+8(r1) |
872 |
+ |
mtlr r0 |
873 |
+ |
addi r1,r1,56+12 |
874 |
+ |
blr |
875 |
+ |
} |
876 |
|
#else |
877 |
|
// Routines in asm_linux.S |
878 |
|
extern "C" void get_resource(void); |
880 |
|
extern "C" void get_ind_resource(void); |
881 |
|
extern "C" void get_1_ind_resource(void); |
882 |
|
extern "C" void r_get_resource(void); |
883 |
+ |
extern "C" void get_named_resource(void); |
884 |
+ |
extern "C" void get_1_named_resource(void); |
885 |
|
#endif |
886 |
|
|
887 |
|
void PatchNativeResourceManager(void) |
975 |
|
WriteMacInt32(tvec, (uint32)r_get_resource); |
976 |
|
#endif |
977 |
|
#endif |
978 |
+ |
|
979 |
+ |
// Patch native GetNamedResource() |
980 |
+ |
upp = ReadMacInt32(0x1484); |
981 |
+ |
tvec = ReadMacInt32(upp + 5 * 4); |
982 |
+ |
D(bug(" GetNamedResource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4))); |
983 |
+ |
WriteMacInt32(XLM_GET_NAMED_RESOURCE, ReadMacInt32(tvec)); |
984 |
+ |
#if EMULATED_PPC |
985 |
+ |
WriteMacInt32(tvec, NativeFunction(NATIVE_GET_NAMED_RESOURCE)); |
986 |
+ |
#else |
987 |
+ |
#ifdef __BEOS__ |
988 |
+ |
tvec2 = (uint32 *)get_named_resource; |
989 |
+ |
WriteMacInt32(tvec, tvec2[0]); |
990 |
+ |
WriteMacInt32(tvec + 4, tvec2[1]); |
991 |
+ |
#else |
992 |
+ |
WriteMacInt32(tvec, (uint32)get_named_resource); |
993 |
+ |
#endif |
994 |
+ |
#endif |
995 |
+ |
|
996 |
+ |
// Patch native Get1NamedResource() |
997 |
+ |
upp = ReadMacInt32(0x0e80); |
998 |
+ |
tvec = ReadMacInt32(upp + 5 * 4); |
999 |
+ |
D(bug(" Get1NamedResource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4))); |
1000 |
+ |
WriteMacInt32(XLM_GET_1_NAMED_RESOURCE, ReadMacInt32(tvec)); |
1001 |
+ |
#if EMULATED_PPC |
1002 |
+ |
WriteMacInt32(tvec, NativeFunction(NATIVE_GET_1_NAMED_RESOURCE)); |
1003 |
+ |
#else |
1004 |
+ |
#ifdef __BEOS__ |
1005 |
+ |
tvec2 = (uint32 *)get_1_named_resource; |
1006 |
+ |
WriteMacInt32(tvec, tvec2[0]); |
1007 |
+ |
WriteMacInt32(tvec + 4, tvec2[1]); |
1008 |
+ |
#else |
1009 |
+ |
WriteMacInt32(tvec, (uint32)get_1_named_resource); |
1010 |
+ |
#endif |
1011 |
+ |
#endif |
1012 |
|
} |