ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/SheepShaver/src/rsrc_patches.cpp
(Generate patch)

Comparing SheepShaver/src/rsrc_patches.cpp (file contents):
Revision 1.14 by gbeauche, 2005-01-30T17:39:44Z vs.
Revision 1.19 by gbeauche, 2006-05-05T19:05:24Z

# Line 1 | Line 1
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
# Line 124 | Line 124 | void CheckLoad(uint32 type, int16 id, ui
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)
# Line 144 | Line 144 | void CheckLoad(uint32 type, int16 id, ui
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                  }
# Line 224 | Line 230 | void CheckLoad(uint32 type, int16 id, ui
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"));
# Line 267 | Line 273 | void CheckLoad(uint32 type, int16 id, ui
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)) {
# Line 340 | Line 346 | void CheckLoad(uint32 type, int16 id, ui
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                  }
# Line 463 | Line 461 | void CheckLoad(uint32 type, int16 id, ui
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;
# Line 522 | Line 520 | void CheckLoad(uint32 type, int16 id, ui
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) {
# Line 575 | Line 573 | void CheckLoad(uint32 type, int16 id, ui
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  
# Line 596 | Line 626 | void check_load_invoc(uint32 type, int16
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
# Line 760 | Line 807 | static asm void **r_get_resource(registe
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);
# Line 767 | Line 880 | extern "C" void get_1_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)
# Line 860 | Line 975 | 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   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines