ViewVC Help

View File | Revision Log | Show Annotations | Revision Graph | Root Listing

root/cebix/SheepShaver/src/rsrc_patches.cpp

Comparing SheepShaver/src/rsrc_patches.cpp (file contents):
Revision 1.14 by gbeauche, 2005-01-30T17:39:44Z vs.
Revision 1.23 by gbeauche, 2008-01-01T09:47:38Z

#	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-2008 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 260 | Line 266 | void CheckLoad(uint32 type, int16 id, ui
266		p[-3] = htons(M68K_NOP);
267		p[0] = htons(0x6018);
268		D(bug(" patch 2 applied\n"));
269	+	} else if (PM(0,0x6660) && PM(1,0x2278) && PM(2,0x0134)) {
270	+	// We don't have SonyVars (7.5.3 Revision 2.2)
271	+	p[-6] = htons(M68K_NOP);
272	+	p[-3] = htons(M68K_NOP);
273	+	p[0] = htons(0x6060);
274	+	D(bug(" patch 3 applied\n"));
275		} else if (PM(0,0x666e) && PM(1,0x2278) && PM(2,0x0134)) {
276		// We don't have SonyVars (7.5.5)
277		p[-6] = htons(M68K_NOP);
278		p[-3] = htons(M68K_NOP);
279		p[0] = htons(0x606e);
280	<	D(bug(" patch 3 applied\n"));
280	>	D(bug(" patch 4 applied\n"));
281		} else if (PM(0,0x6400) && PM(1,0x011c) && PM(2,0x2278) && PM(3,0x0134)) {
282	<	// We don't have SonyVars (7.6.1, 8.0, 8.1, 8.5, 8.6)
282	>	// We don't have SonyVars (7.6.1, 8.0, 8.1, 8.5, 8.6, 9.0)
283		p[0] = htons(0x6000);
284	<	D(bug(" patch 4 applied\n"));
284	>	D(bug(" patch 5 applied\n"));
285		} else if (PM(0,0x6400) && PM(1,0x00e6) && PM(2,0x2278) && PM(3,0x0134)) {
286		// We don't have SonyVars (7.6)
287		p[0] = htons(0x6000);
288	<	D(bug(" patch 5 applied\n"));
288	>	D(bug(" patch 6 applied\n"));
289		}
290		p++;
291		}
#	Line 340 | Line 352 | void CheckLoad(uint32 type, int16 id, ui
352		p[2] = htons(M68K_NOP);
353		D(bug(" patch 2 applied\n"));
354		} else if (PM(0,0x700a) && PM(1,0xfe0a)) {
355	<	// Don't call FE0A opcode (7.6, 7.6.1, 8.0, 8.1, 8.5, 8.6)
356	<	p[1] = htons(0x7000);
355	>	// Don't call FE0A opcode (7.6, 7.6.1, 8.0, 8.1, 8.5, 8.6, 9.0)
356	>	p[1] = htons(0x2008);   // move.l a0,d0
357		D(bug(" patch 3 applied\n"));
358		} else if (PM(0,0x6c00) && PM(1,0x016a) && PM(2,0x2278) && PM(3,0x0134)) {
359		// We don't have SonyVars (8.6)
360	<	p[-4] = htons(0x21fc);  // move.l $40810000,($0000)
360	>	p[-4] = htons(0x21fc);  // move.l $40810000,($0000)
361		p[-3] = htons(0x4081);
362		p[-2] = htons(0x0000);
363		p[-1] = htons(0x0000);
#	Line 441 | Line 453 | void CheckLoad(uint32 type, int16 id, ui
453
454		} else if (type == FOURCC('n','s','r','d') && id == 1) {
455		D(bug("nsrd 1 found\n"));
456	<	if (p[(0x378 + 0x570) >> 1] == htons(0x7c08) && p[(0x37a + 0x570) >> 1] == htons(0x02a6)) {
456	>	if (p[(0x378 + 0x460) >> 1] == htons(0x7c08) && p[(0x37a + 0x460) >> 1] == htons(0x02a6)) {
457	>	// Don't overwrite our serial drivers (7.5.3 Revision 2.2)
458	>	p[(0x378 + 0x460) >> 1] = htons(0x4e80);                // blr
459	>	p[(0x37a + 0x460) >> 1] = htons(0x0020);
460	>	D(bug(" patch 1 applied\n"));
461	>	} else if (p[(0x378 + 0x570) >> 1] == htons(0x7c08) && p[(0x37a + 0x570) >> 1] == htons(0x02a6)) {
462		// Don't overwrite our serial drivers (8.0, 8.1)
463		p[(0x378 + 0x570) >> 1] = htons(0x4e80);                // blr
464		p[(0x37a + 0x570) >> 1] = htons(0x0020);
465	<	D(bug(" patch 1 applied\n"));
465	>	D(bug(" patch 2 applied\n"));
466		} else if (p[(0x378 + 0x6c0) >> 1] == htons(0x7c08) && p[(0x37a + 0x6c0) >> 1] == htons(0x02a6)) {
467		// Don't overwrite our serial drivers (8.5, 8.6)
468		p[(0x378 + 0x6c0) >> 1] = htons(0x4e80);                // blr
469		p[(0x37a + 0x6c0) >> 1] = htons(0x0020);
470	<	D(bug(" patch 2 applied\n"));
470	>	D(bug(" patch 3 applied\n"));
471		} else if (p[(0x374 + 0x510) >> 1] == htons(0x7c08) && p[(0x376 + 0x510) >> 1] == htons(0x02a6)) {
472		// Don't overwrite our serial drivers (9.0)
473		p[(0x374 + 0x510) >> 1] = htons(0x4e80);                // blr
474		p[(0x376 + 0x510) >> 1] = htons(0x0020);
475	<	D(bug(" patch 3 applied\n"));
475	>	D(bug(" patch 4 applied\n"));
476		}
477
478		} else if (type == FOURCC('c','i','t','t') && id == 45) {
#	Line 463 | Line 480 | void CheckLoad(uint32 type, int16 id, ui
480		size >>= 1;
481		while (size--) {
482		if (PM(0,0x203c) && PM(1,0x0100) && PM(2,0x0000) && PM(3,0xc0ae) && PM(4,0xfffc)) {
483	<	// Don't replace SCSI Manager (8.1, 8.5, 8.6)
483	>	// Don't replace SCSI Manager (8.1, 8.5, 8.6, 9.0)
484		p[5] = htons((ntohs(p[5]) & 0xff) | 0x6000);            // beq
485		D(bug(" patch 1 applied\n"));
486		break;
#	Line 522 | Line 539 | void CheckLoad(uint32 type, int16 id, ui
539		} else if (type == FOURCC('s','c','o','d') && id == -16465) {
540		D(bug("scod -16465 found\n"));
541
542	<	// Don't crash in Process Manager on reset/shutdown (8.6)
542	>	// Don't crash in Process Manager on reset/shutdown (8.6, 9.0)
543		static const uint8 dat[] = {0x4e, 0x56, 0x00, 0x00, 0x48, 0xe7, 0x03, 0x18, 0x2c, 0x2e, 0x00, 0x10};
544		base = find_rsrc_data((uint8 *)p, size, dat, sizeof(dat));
545		if (base) {
#	Line 570 | Line 587 | void CheckLoad(uint32 type, int16 id, ui
587		p[(base + 0x1a) >> 1] = htons(0x6064);
588		D(bug(" patch1 applied\n"));
589		}
590	+
591	+	} else if (type == FOURCC('i','n','f','n') && (id == 129 || id == 200)) {
592	+	D(bug("infn %d found\n", id));
593	+	size >>= 1;
594	+	while (size--) {
595	+	if (PM(0,0x203c) && PM(1,0xf800) && PM(2,0x0000) && PM(4,0x2040) && PM(5,0x1028) && PM(6,0x0090)) {
596	+	// Don't read from 0xf8000090 during MacOS (8.5, 9.0) installation
597	+	p[0] = htons(M68K_NOP);
598	+	p[1] = htons(M68K_NOP);
599	+	p[2] = htons(M68K_NOP);
600	+	p[3] = htons(M68K_NOP);
601	+	p[4] = htons(M68K_NOP);
602	+	p[5] = htons(M68K_NOP);
603	+	p[6] = htons(0x7000);   // moveq #0,d0
604	+	D(bug(" patch 1 applied\n"));
605	+	break;
606	+	}
607	+	p++;
608	+	}
609	+
610	+	}
611	+	}
612	+
613	+
614	+	/*
615	+	*  Resource patches via GetNamedResource() and Get1NamedResource()
616	+	*/
617	+
618	+	void CheckLoad(uint32 type, const char *name, uint8 *p, uint32 size)
619	+	{
620	+	uint16 *p16;
621	+	uint32 base;
622	+	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));
623	+
624	+	// Don't modify resources in ROM
625	+	if ((uintptr)p >= (uintptr)ROMBaseHost && (uintptr)p <= (uintptr)(ROMBaseHost + ROM_SIZE))
626	+	return;
627	+
628	+	if (type == FOURCC('D','R','V','R') && strncmp(&name[1], ".AFPTranslator", name[0]) == 0) {
629	+	D(bug(" DRVR .AFPTranslator found\n"));
630	+
631	+	// Don't access ROM85 as it it was a pointer to a ROM version number (8.0, 8.1)
632	+	static const uint8 dat[] = {0x3a, 0x2e, 0x00, 0x0a, 0x55, 0x4f, 0x3e, 0xb8, 0x02, 0x8e, 0x30, 0x1f, 0x48, 0xc0, 0x24, 0x40, 0x20, 0x40};
633	+	base = find_rsrc_data(p, size, dat, sizeof(dat));
634	+	if (base) {
635	+	p16 = (uint16 *)(p + base + 4);
636	+	*p16++ = htons(0x303c);         // move.l       #ROM85,%d0
637	+	*p16++ = htons(0x028e);
638	+	*p16++ = htons(M68K_NOP);
639	+	*p16++ = htons(M68K_NOP);
640	+	D(bug("  patch 1 applied\n"));
641	+	}
642		}
643		}
644
#	Line 596 | Line 665 | void check_load_invoc(uint32 type, int16
665		}
666
667		#ifdef __BEOS__
668	+	static
669	+	#else
670	+	extern "C"
671	+	#endif
672	+	void named_check_load_invoc(uint32 type, uint32 name, uint32 h)
673	+	{
674	+	if (h == 0)
675	+	return;
676	+	uint32 p = ReadMacInt32(h);
677	+	if (p == 0)
678	+	return;
679	+	uint32 size = ReadMacInt32(p - 2 * 4) & 0xffffff;
680	+
681	+	CheckLoad(type, (char *)Mac2HostAddr(name), Mac2HostAddr(p), size);
682	+	}
683	+
684	+	#ifdef __BEOS__
685		static asm void **get_resource(register uint32 type, register int16 id)
686		{
687		// Create stack frame
#	Line 760 | Line 846 | static asm void **r_get_resource(registe
846		addi    r1,r1,56+12
847		blr
848		}
849	+
850	+	static asm void **get_named_resource(register uint32 type, register uint32 name)
851	+	{
852	+	// Create stack frame
853	+	mflr    r0
854	+	stw             r0,8(r1)
855	+	stwu    r1,-(56+12)(r1)
856	+
857	+	// Save type/ID
858	+	stw             r3,56(r1)
859	+	stw             r4,56+4(r1)
860	+
861	+	// Call old routine
862	+	lwz             r0,XLM_GET_NAMED_RESOURCE
863	+	lwz             r2,XLM_RES_LIB_TOC
864	+	mtctr   r0
865	+	bctrl
866	+	lwz             r2,XLM_TOC              // Get TOC
867	+	stw             r3,56+8(r1)             // Save handle
868	+
869	+	// Call CheckLoad
870	+	lwz             r3,56(r1)
871	+	lwz             r4,56+4(r1)
872	+	lwz             r5,56+8(r1)
873	+	bl              named_check_load_invoc
874	+	lwz             r3,56+8(r1)             // Restore handle
875	+
876	+	// Return to caller
877	+	lwz             r0,56+12+8(r1)
878	+	mtlr    r0
879	+	addi    r1,r1,56+12
880	+	blr
881	+	}
882	+
883	+	static asm void **get_1_named_resource(register uint32 type, register uint32 name)
884	+	{
885	+	// Create stack frame
886	+	mflr    r0
887	+	stw             r0,8(r1)
888	+	stwu    r1,-(56+12)(r1)
889	+
890	+	// Save type/ID
891	+	stw             r3,56(r1)
892	+	stw             r4,56+4(r1)
893	+
894	+	// Call old routine
895	+	lwz             r0,XLM_GET_1_NAMED_RESOURCE
896	+	lwz             r2,XLM_RES_LIB_TOC
897	+	mtctr   r0
898	+	bctrl
899	+	lwz             r2,XLM_TOC              // Get TOC
900	+	stw             r3,56+8(r1)             // Save handle
901	+
902	+	// Call CheckLoad
903	+	lwz             r3,56(r1)
904	+	lwz             r4,56+4(r1)
905	+	lwz             r5,56+8(r1)
906	+	bl              named_check_load_invoc
907	+	lwz             r3,56+8(r1)             // Restore handle
908	+
909	+	// Return to caller
910	+	lwz             r0,56+12+8(r1)
911	+	mtlr    r0
912	+	addi    r1,r1,56+12
913	+	blr
914	+	}
915		#else
916		// Routines in asm_linux.S
917		extern "C" void get_resource(void);
#	Line 767 | Line 919 | extern "C" void get_1_resource(void);
919		extern "C" void get_ind_resource(void);
920		extern "C" void get_1_ind_resource(void);
921		extern "C" void r_get_resource(void);
922	+	extern "C" void get_named_resource(void);
923	+	extern "C" void get_1_named_resource(void);
924		#endif
925
926		void PatchNativeResourceManager(void)
#	Line 860 | Line 1014 | void PatchNativeResourceManager(void)
1014		WriteMacInt32(tvec, (uint32)r_get_resource);
1015		#endif
1016		#endif
1017	+
1018	+	// Patch native GetNamedResource()
1019	+	upp = ReadMacInt32(0x1484);
1020	+	tvec = ReadMacInt32(upp + 5 * 4);
1021	+	D(bug(" GetNamedResource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4)));
1022	+	WriteMacInt32(XLM_GET_NAMED_RESOURCE, ReadMacInt32(tvec));
1023	+	#if EMULATED_PPC
1024	+	WriteMacInt32(tvec, NativeFunction(NATIVE_GET_NAMED_RESOURCE));
1025	+	#else
1026	+	#ifdef __BEOS__
1027	+	tvec2 = (uint32 *)get_named_resource;
1028	+	WriteMacInt32(tvec, tvec2[0]);
1029	+	WriteMacInt32(tvec + 4, tvec2[1]);
1030	+	#else
1031	+	WriteMacInt32(tvec, (uint32)get_named_resource);
1032	+	#endif
1033	+	#endif
1034	+
1035	+	// Patch native Get1NamedResource()
1036	+	upp = ReadMacInt32(0x0e80);
1037	+	tvec = ReadMacInt32(upp + 5 * 4);
1038	+	D(bug(" Get1NamedResource() entry %08x, TOC %08x\n", ReadMacInt32(tvec), ReadMacInt32(tvec + 4)));
1039	+	WriteMacInt32(XLM_GET_1_NAMED_RESOURCE, ReadMacInt32(tvec));
1040	+	#if EMULATED_PPC
1041	+	WriteMacInt32(tvec, NativeFunction(NATIVE_GET_1_NAMED_RESOURCE));
1042	+	#else
1043	+	#ifdef __BEOS__
1044	+	tvec2 = (uint32 *)get_1_named_resource;
1045	+	WriteMacInt32(tvec, tvec2[0]);
1046	+	WriteMacInt32(tvec + 4, tvec2[1]);
1047	+	#else
1048	+	WriteMacInt32(tvec, (uint32)get_1_named_resource);
1049	+	#endif
1050	+	#endif
1051		}

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines