ViewVC Help

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

root/cebix/SheepShaver/src/Unix/ppc_asm.S

Comparing SheepShaver/src/Unix/ppc_asm.S (file contents):
Revision 1.1 by gbeauche, 2005-02-20T18:25:45Z vs.
Revision 1.7 by gbeauche, 2005-06-28T16:47:32Z

#	Line 25 | Line 25
25
26
27		/*
28	<	*  void *get_toc(void) - Get TOC pointer (small data pointer r13 under Linux)
28	>	*  void *get_sp(void) - Get stack pointer
29		*/
30
31	<	ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_toc)
32	<	C_SYMBOL_NAME(get_toc):
33	<	mr      r3,r13
31	>	ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_sp)
32	>	C_SYMBOL_NAME(get_sp):
33	>	mr      r3,r1
34		blr
35
36
37		/*
38	<	*  void *get_sp(void) - Get stack pointer
38	>	*  void *get_r2(void) - Get r2
39		*/
40
41	<	ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_sp)
42	<	C_SYMBOL_NAME(get_sp):
43	<	mr      r3,r1
41	>	ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_r2)
42	>	C_SYMBOL_NAME(get_r2):
43	>	mr      r3,r2
44		blr
45
46
47		/*
48	<	*  void set_r2(uint32 val {r3}) - Set r2
48	>	*  void set_r2(void *val {r3}) - Set r2
49		*/
50
51		ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(set_r2)
#	Line 55 | Line 55 | C_SYMBOL_NAME(set_r2):
55
56
57		/*
58	+	*  void *get_r13(void) - Get r13 (small data pointer under Linux)
59	+	*/
60	+
61	+	ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_r13)
62	+	C_SYMBOL_NAME(get_r13):
63	+	mr      r3,r13
64	+	blr
65	+
66	+	/*
67	+	*  void set_r13(void *val {r3}) - Set r13 (small data pointer under Linux)
68	+	*/
69	+
70	+	ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(set_r13)
71	+	C_SYMBOL_NAME(set_r13):
72	+	mr      r13,r3
73	+	blr
74	+
75	+
76	+	/*
77		*  void flush_icache_range(void *start {r3}, void *end {r3}) - Flush D and I cache
78		*/
79
#	Line 161 | Line 180 | C_SYMBOL_NAME(test_and_set):
180		isync
181		lwarx   r5,0,r3
182		cmpi    0,r5,0x0000
183	<	beq     1f
183	>	bne     1f
184		stwcx.  r4,0,r3
185		bne-    0b
186		1:      isync
#	Line 225 | Line 244 | C_SYMBOL_NAME(jump_to_rom):
244
245		// Restore PowerPC registers
246		lwz     r1,XLM_EMUL_RETURN_STACK(0)
247	+	RESTORE_SYSTEM_R2
248	+	RESTORE_SYSTEM_R13
249		lmw     r13,20(r1)
250		lfd     f14,20+19*4+0*8(r1)
251		lfd     f15,20+19*4+1*8(r1)
#	Line 324 | Line 345 | C_SYMBOL_NAME(jump_to_rom):
345		lwz     r0,56+19*4+18*8+4(r1)
346		mtlr    r0
347		addi    r1,r1,56+19*4+18*8
348	+	RESTORE_SYSTEM_R2
349	+	RESTORE_SYSTEM_R13
350		blr
351
352
#	Line 360 | Line 383 | C_SYMBOL_NAME(jump_to_rom):
383		mfxer   r0
384		stw     r0,16(r1)
385		stw     r2,12(r1)
386	<	stwu    r1,-(24+16*4+15*8)(r1)
386	>	stwu    r1,-(56+16*4+15*8)(r1)
387
388		// Save 68k registers (M68kRegisters)
389	<	stw     r8,24+0*4(r1)   // d[0]..d[7]
390	<	stw     r9,24+1*4(r1)
391	<	stw     r10,24+2*4(r1)
392	<	stw     r11,24+3*4(r1)
393	<	stw     r12,24+4*4(r1)
394	<	stw     r13,24+5*4(r1)
395	<	stw     r14,24+6*4(r1)
396	<	stw     r15,24+7*4(r1)
397	<	stw     r16,24+8*4(r1)  // a[0]..a[7]
398	<	stw     r17,24+9*4(r1)
399	<	stw     r18,24+10*4(r1)
400	<	stw     r19,24+11*4(r1)
401	<	stw     r20,24+12*4(r1)
402	<	stw     r21,24+13*4(r1)
403	<	stw     r22,24+14*4(r1)
404	<	stw     r3,24+15*4(r1)
405	<	stfd    f0,24+16*4+0*8(r1)
406	<	stfd    f1,24+16*4+1*8(r1)
407	<	stfd    f2,24+16*4+2*8(r1)
408	<	stfd    f3,24+16*4+3*8(r1)
409	<	stfd    f4,24+16*4+4*8(r1)
410	<	stfd    f5,24+16*4+5*8(r1)
411	<	stfd    f6,24+16*4+6*8(r1)
412	<	stfd    f7,24+16*4+7*8(r1)
389	>	stw     r8,56+0*4(r1)   // d[0]..d[7]
390	>	stw     r9,56+1*4(r1)
391	>	stw     r10,56+2*4(r1)
392	>	stw     r11,56+3*4(r1)
393	>	stw     r12,56+4*4(r1)
394	>	stw     r13,56+5*4(r1)
395	>	stw     r14,56+6*4(r1)
396	>	stw     r15,56+7*4(r1)
397	>	stw     r16,56+8*4(r1)  // a[0]..a[7]
398	>	stw     r17,56+9*4(r1)
399	>	stw     r18,56+10*4(r1)
400	>	stw     r19,56+11*4(r1)
401	>	stw     r20,56+12*4(r1)
402	>	stw     r21,56+13*4(r1)
403	>	stw     r22,56+14*4(r1)
404	>	stw     r3,56+15*4(r1)
405	>	stfd    f0,56+16*4+0*8(r1)
406	>	stfd    f1,56+16*4+1*8(r1)
407	>	stfd    f2,56+16*4+2*8(r1)
408	>	stfd    f3,56+16*4+3*8(r1)
409	>	stfd    f4,56+16*4+4*8(r1)
410	>	stfd    f5,56+16*4+5*8(r1)
411	>	stfd    f6,56+16*4+6*8(r1)
412	>	stfd    f7,56+16*4+7*8(r1)
413		mffs    f0
414	<	stfd    f8,24+16*4+8*8(r1)
415	<	stfd    f9,24+16*4+9*8(r1)
416	<	stfd    f10,24+16*4+10*8(r1)
417	<	stfd    f11,24+16*4+11*8(r1)
418	<	stfd    f12,24+16*4+12*8(r1)
419	<	stfd    f13,24+16*4+13*8(r1)
420	<	stfd    f0,24+16*4+14*8(r1)
414	>	stfd    f8,56+16*4+8*8(r1)
415	>	stfd    f9,56+16*4+9*8(r1)
416	>	stfd    f10,56+16*4+10*8(r1)
417	>	stfd    f11,56+16*4+11*8(r1)
418	>	stfd    f12,56+16*4+12*8(r1)
419	>	stfd    f13,56+16*4+13*8(r1)
420	>	stfd    f0,56+16*4+14*8(r1)
421
422		// Execute native routine
423	<	lwz     r13,XLM_TOC(0)
424	<	addi    r3,r1,24
423	>	RESTORE_SYSTEM_R2
424	>	RESTORE_SYSTEM_R13
425	>	addi    r3,r1,56
426		mr      r4,r24
427		bl      C_SYMBOL_NAME(EmulOp)
428
429		// Restore 68k registers (M68kRegisters)
430	<	lwz     r8,24+0*4(r1)   // d[0]..d[7]
431	<	lwz     r9,24+1*4(r1)
432	<	lwz     r10,24+2*4(r1)
433	<	lwz     r11,24+3*4(r1)
434	<	lwz     r12,24+4*4(r1)
435	<	lwz     r13,24+5*4(r1)
436	<	lwz     r14,24+6*4(r1)
437	<	lwz     r15,24+7*4(r1)
438	<	lwz     r16,24+8*4(r1)  // a[0]..a[7]
439	<	lwz     r17,24+9*4(r1)
440	<	lwz     r18,24+10*4(r1)
441	<	lwz     r19,24+11*4(r1)
442	<	lwz     r20,24+12*4(r1)
443	<	lwz     r21,24+13*4(r1)
444	<	lwz     r22,24+14*4(r1)
445	<	lwz     r3,24+15*4(r1)
446	<	lfd     f13,24+16*4+14*8(r1)
447	<	lfd     f0,24+16*4+0*8(r1)
448	<	lfd     f1,24+16*4+1*8(r1)
449	<	lfd     f2,24+16*4+2*8(r1)
450	<	lfd     f3,24+16*4+3*8(r1)
451	<	lfd     f4,24+16*4+4*8(r1)
452	<	lfd     f5,24+16*4+5*8(r1)
453	<	lfd     f6,24+16*4+6*8(r1)
454	<	lfd     f7,24+16*4+7*8(r1)
430	>	lwz     r8,56+0*4(r1)   // d[0]..d[7]
431	>	lwz     r9,56+1*4(r1)
432	>	lwz     r10,56+2*4(r1)
433	>	lwz     r11,56+3*4(r1)
434	>	lwz     r12,56+4*4(r1)
435	>	lwz     r13,56+5*4(r1)
436	>	lwz     r14,56+6*4(r1)
437	>	lwz     r15,56+7*4(r1)
438	>	lwz     r16,56+8*4(r1)  // a[0]..a[7]
439	>	lwz     r17,56+9*4(r1)
440	>	lwz     r18,56+10*4(r1)
441	>	lwz     r19,56+11*4(r1)
442	>	lwz     r20,56+12*4(r1)
443	>	lwz     r21,56+13*4(r1)
444	>	lwz     r22,56+14*4(r1)
445	>	lwz     r3,56+15*4(r1)
446	>	lfd     f13,56+16*4+14*8(r1)
447	>	lfd     f0,56+16*4+0*8(r1)
448	>	lfd     f1,56+16*4+1*8(r1)
449	>	lfd     f2,56+16*4+2*8(r1)
450	>	lfd     f3,56+16*4+3*8(r1)
451	>	lfd     f4,56+16*4+4*8(r1)
452	>	lfd     f5,56+16*4+5*8(r1)
453	>	lfd     f6,56+16*4+6*8(r1)
454	>	lfd     f7,56+16*4+7*8(r1)
455		mtfsf   0xff,f13
456	<	lfd     f8,24+16*4+8*8(r1)
457	<	lfd     f9,24+16*4+9*8(r1)
458	<	lfd     f10,24+16*4+10*8(r1)
459	<	lfd     f11,24+16*4+11*8(r1)
460	<	lfd     f12,24+16*4+12*8(r1)
461	<	lfd     f13,24+16*4+13*8(r1)
456	>	lfd     f8,56+16*4+8*8(r1)
457	>	lfd     f9,56+16*4+9*8(r1)
458	>	lfd     f10,56+16*4+10*8(r1)
459	>	lfd     f11,56+16*4+11*8(r1)
460	>	lfd     f12,56+16*4+12*8(r1)
461	>	lfd     f13,56+16*4+13*8(r1)
462
463		// Delete PowerPC stack frame
464	<	lwz     r2,24+16*4+15*8+12(r1)
465	<	lwz     r0,24+16*4+15*8+16(r1)
464	>	lwz     r2,56+16*4+15*8+12(r1)
465	>	lwz     r0,56+16*4+15*8+16(r1)
466		mtxer   r0
467	<	lwz     r0,24+16*4+15*8+4(r1)
467	>	lwz     r0,56+16*4+15*8+4(r1)
468		mtcrf   0xff,r0
469		mr      r1,r3
470
#	Line 573 | Line 597 | ASM_MACRO_START        prolog
597		ASM_MACRO_END
598
599		ASM_MACRO_START epilog
576	–	lwz     r13,XLM_TOC(0)
600		lwz     r0,64+4(r1)
601		mtlr    r0
602		addi    r1,r1,64
603	+	RESTORE_SYSTEM_R2
604	+	RESTORE_SYSTEM_R13
605		blr
606		ASM_MACRO_END
607
#	Line 685 | Line 710 | C_SYMBOL_NAME(call_macos7):
710		*  Native resource manager patches
711		*/
712
713	<	ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_resource)
689	<	C_SYMBOL_NAME(get_resource):
713	>	ASM_MACRO_START do_get_resource ASM_MACRO_ARG0_DEF
714		// Create stack frame
715		mflr    r0
716		stw     r0,8(r1)
#	Line 697 | Line 721 | C_SYMBOL_NAME(get_resource):
721		stw     r4,56+4(r1)
722
723		// Call old routine
724	<	lwz     r0,XLM_GET_RESOURCE(0)
724	>	lwz     r0,ASM_MACRO_ARG0(0)
725		lwz     r2,XLM_RES_LIB_TOC(0)
726		mtctr   r0
727		bctrl
728		stw     r3,56+8(r1)             // Save handle
729
730		// Call CheckLoad
731	+	RESTORE_SYSTEM_R2
732	+	RESTORE_SYSTEM_R13
733		lwz     r3,56(r1)
734		lha     r4,56+6(r1)
735		lwz     r5,56+8(r1)
#	Line 715 | Line 741 | C_SYMBOL_NAME(get_resource):
741		mtlr    r0
742		addi    r1,r1,56+12
743		blr
744	+	ASM_MACRO_END
745	+
746	+	ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_resource)
747	+	C_SYMBOL_NAME(get_resource):
748	+	do_get_resource XLM_GET_RESOURCE
749
750		ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_1_resource)
751		C_SYMBOL_NAME(get_1_resource):
752	<	// Create stack frame
722	<	mflr    r0
723	<	stw     r0,8(r1)
724	<	stwu    r1,-(56+12)(r1)
725	<
726	<	// Save type/ID
727	<	stw     r3,56(r1)
728	<	stw     r4,56+4(r1)
729	<
730	<	// Call old routine
731	<	lwz     r0,XLM_GET_1_RESOURCE(0)
732	<	lwz     r2,XLM_RES_LIB_TOC(0)
733	<	mtctr   r0
734	<	bctrl
735	<	stw     r3,56+8(r1)             // Save handle
736	<
737	<	// Call CheckLoad
738	<	lwz     r3,56(r1)
739	<	lha     r4,56+6(r1)
740	<	lwz     r5,56+8(r1)
741	<	bl      C_SYMBOL_NAME(check_load_invoc)
742	<	lwz     r3,56+8(r1)             // Restore handle
743	<
744	<	// Return to caller
745	<	lwz     r0,56+12+8(r1)
746	<	mtlr    r0
747	<	addi    r1,r1,56+12
748	<	blr
752	>	do_get_resource XLM_GET_1_RESOURCE
753
754		ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_ind_resource)
755		C_SYMBOL_NAME(get_ind_resource):
756	<	// Create stack frame
753	<	mflr    r0
754	<	stw     r0,8(r1)
755	<	stwu    r1,-(56+12)(r1)
756	<
757	<	// Save type/index
758	<	stw     r3,56(r1)
759	<	stw     r4,56+4(r1)
760	<
761	<	// Call old routine
762	<	lwz     r0,XLM_GET_IND_RESOURCE(0)
763	<	lwz     r2,XLM_RES_LIB_TOC(0)
764	<	mtctr   r0
765	<	bctrl
766	<	stw     r3,56+8(r1)             // Save handle
767	<
768	<	// Call CheckLoad
769	<	lwz     r3,56(r1)
770	<	lha     r4,56+6(r1)
771	<	lwz     r5,56+8(r1)
772	<	bl      C_SYMBOL_NAME(check_load_invoc)
773	<	lwz     r3,56+8(r1)             // Restore handle
774	<
775	<	// Return to caller
776	<	lwz     r0,56+12+8(r1)
777	<	mtlr    r0
778	<	addi    r1,r1,56+12
779	<	blr
756	>	do_get_resource XLM_GET_IND_RESOURCE
757
758		ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_1_ind_resource)
759		C_SYMBOL_NAME(get_1_ind_resource):
760	<	// Create stack frame
784	<	mflr    r0
785	<	stw     r0,8(r1)
786	<	stwu    r1,-(56+12)(r1)
787	<
788	<	// Save type/index
789	<	stw     r3,56(r1)
790	<	stw     r4,56+4(r1)
791	<
792	<	// Call old routine
793	<	lwz     r0,XLM_GET_1_IND_RESOURCE(0)
794	<	lwz     r2,XLM_RES_LIB_TOC(0)
795	<	mtctr   r0
796	<	bctrl
797	<	stw     r3,56+8(r1)             // Save handle
798	<
799	<	// Call CheckLoad
800	<	lwz     r3,56(r1)
801	<	lha     r4,56+6(r1)
802	<	lwz     r5,56+8(r1)
803	<	bl      C_SYMBOL_NAME(check_load_invoc)
804	<	lwz     r3,56+8(r1)             // Restore handle
805	<
806	<	// Return to caller
807	<	lwz     r0,56+12+8(r1)
808	<	mtlr    r0
809	<	addi    r1,r1,56+12
810	<	blr
760	>	do_get_resource XLM_GET_1_IND_RESOURCE
761
762		ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(r_get_resource)
763		C_SYMBOL_NAME(r_get_resource):
764	<	// Create stack frame
815	<	mflr    r0
816	<	stw     r0,8(r1)
817	<	stwu    r1,-(56+12)(r1)
818	<
819	<	// Save type/ID
820	<	stw     r3,56(r1)
821	<	stw     r4,56+4(r1)
822	<
823	<	// Call old routine
824	<	lwz     r0,XLM_R_GET_RESOURCE(0)
825	<	lwz     r2,XLM_RES_LIB_TOC(0)
826	<	mtctr   r0
827	<	bctrl
828	<	stw     r3,56+8(r1)             // Save handle
829	<
830	<	// Call CheckLoad
831	<	lwz     r3,56(r1)
832	<	lha     r4,56+6(r1)
833	<	lwz     r5,56+8(r1)
834	<	bl      C_SYMBOL_NAME(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
764	>	do_get_resource XLM_R_GET_RESOURCE
765
766
767		/*
#	Line 888 | Line 811 | C_SYMBOL_NAME(ppc_interrupt):
811		// Enter nanokernel
812		mtlr    r3
813		blr
814	+
815	+
816	+	/*
817	+	*  Define signal handlers with alternate stack initialization magic
818	+	*/
819	+
820	+	#define SIG_STACK_SIZE 0x10000
821	+
822	+	ASM_MACRO_START do_define_signal_handler        \
823	+	ASM_MACRO_ARG0_DEF /* name */           \
824	+	ASM_MACRO_ARG1_DEF /* stack */          \
825	+	ASM_MACRO_ARG2_DEF /* stack id */       \
826	+	ASM_MACRO_ARG3_DEF /* signal handler */
827	+
828	+	// Alternate stack lower base for this signal handler
829	+	.lcomm ASM_MACRO_ARG1,SIG_STACK_SIZE,ASM_ALIGN_2(4)
830	+	ASM_TYPE(ASM_MACRO_ARG1,@object)
831	+
832	+	// Represents the current nest level for this signal handler
833	+	// Note that in SheepShaver, SIGUSR2 signals are blocked while
834	+	// handling other signals so, it's unlikely we ever get a nest
835	+	// level greater than 1
836	+	.lcomm ASM_MACRO_ARG2,4,ASM_ALIGN_2(2)
837	+	ASM_TYPE(ASM_MACRO_ARG2,@object)
838	+
839	+	ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(ASM_MACRO_ARG0)
840	+	C_SYMBOL_NAME(ASM_MACRO_ARG0):
841	+	// Preserve args in scratch registers
842	+	mflr    r14
843	+	mr      r15,r3
844	+	mr      r16,r4
845	+	mr      r17,r5
846	+	mr      r18,r1
847	+
848	+	// Atomically increase stack_id
849	+	lis     r19,ASM_HA16(ASM_MACRO_ARG2)
850	+	la      r19,ASM_LO16(ASM_MACRO_ARG2,r19)
851	+	li      r4,1
852	+	mr      r3,r19
853	+	bl      C_SYMBOL_NAME(atomic_add)
854	+	cmpwi   r3,0
855	+	bne-    1f
856	+
857	+	// ID was 0, we can use the local stack
858	+	lis     r9,ASM_HA16(ASM_MACRO_ARG1)
859	+	lis     r3,(SIG_STACK_SIZE>>16)
860	+	la      r9,ASM_LO16(ASM_MACRO_ARG1,r9)
861	+	addi    r3,r3,((SIG_STACK_SIZE&0xffff)-64)
862	+	add     r1,r9,r3
863	+
864	+	1:      // Invoke signal handler
865	+	stwu    r1,-16(r1)
866	+	mr      r3,r15
867	+	mr      r4,r16
868	+	mr      r5,r17
869	+	bl      C_SYMBOL_NAME(ASM_MACRO_ARG3)
870	+	addi    r1,r1,16
871	+
872	+	// Atomically decrease stack id
873	+	mr      r3,r19
874	+	li      r4,-1
875	+	bl      C_SYMBOL_NAME(atomic_add)
876	+
877	+	// Restore kernel stack and return
878	+	mtlr    r14
879	+	mr      r1,r18
880	+	blr
881	+	ASM_MACRO_END
882	+
883	+	#define DEFINE_SIGNAL_HANDLER(NAME)               \
884	+	do_define_signal_handler                  \
885	+	NAME##_handler_init     ASM_MACRO_ARG_SEP \
886	+	NAME##_stack            ASM_MACRO_ARG_SEP \
887	+	NAME##_stack_id         ASM_MACRO_ARG_SEP \
888	+	NAME##_handler
889	+
890	+	DEFINE_SIGNAL_HANDLER(sigusr2)

Diff Legend

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