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

Comparing SheepShaver/src/Unix/ppc_asm.S (file contents):
Revision 1.2 by gbeauche, 2005-02-27T21:52:06Z vs.
Revision 1.4 by gbeauche, 2005-06-24T22:58:55Z

# Line 245 | Line 245 | C_SYMBOL_NAME(jump_to_rom):
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 344 | 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 380 | 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)
384 <        RESTORE_SYSTEM_R2
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          RESTORE_SYSTEM_R2
424          RESTORE_SYSTEM_R13
425 <        addi    r3,r1,24
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 595 | Line 597 | ASM_MACRO_START        prolog
597   ASM_MACRO_END
598  
599   ASM_MACRO_START epilog
598        RESTORE_SYSTEM_R2
599        RESTORE_SYSTEM_R13
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 708 | Line 710 | C_SYMBOL_NAME(call_macos7):
710   *  Native resource manager patches
711   */
712  
713 <        ASM_GLOBAL_DIRECTIVE C_SYMBOL_NAME(get_resource)
712 < C_SYMBOL_NAME(get_resource):
713 > ASM_MACRO_START do_get_resource XLM_OLD_GET_RESOURCE
714          // Create stack frame
715          mflr    r0
716          stw     r0,8(r1)
# Line 720 | 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,\XLM_OLD_GET_RESOURCE(0)
725          lwz     r2,XLM_RES_LIB_TOC(0)
726          mtctr   r0
727          bctrl
727        RESTORE_SYSTEM_R2
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 739 | 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
746 <        mflr    r0
747 <        stw     r0,8(r1)
748 <        stwu    r1,-(56+12)(r1)
749 <
750 <        // Save type/ID
751 <        stw     r3,56(r1)
752 <        stw     r4,56+4(r1)
753 <
754 <        // Call old routine
755 <        lwz     r0,XLM_GET_1_RESOURCE(0)
756 <        lwz     r2,XLM_RES_LIB_TOC(0)
757 <        mtctr   r0
758 <        bctrl
759 <        RESTORE_SYSTEM_R2
760 <        stw     r3,56+8(r1)             // Save handle
761 <
762 <        // Call CheckLoad
763 <        lwz     r3,56(r1)
764 <        lha     r4,56+6(r1)
765 <        lwz     r5,56+8(r1)
766 <        bl      C_SYMBOL_NAME(check_load_invoc)
767 <        lwz     r3,56+8(r1)             // Restore handle
768 <
769 <        // Return to caller
770 <        lwz     r0,56+12+8(r1)
771 <        mtlr    r0
772 <        addi    r1,r1,56+12
773 <        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
778 <        mflr    r0
779 <        stw     r0,8(r1)
780 <        stwu    r1,-(56+12)(r1)
781 <
782 <        // Save type/index
783 <        stw     r3,56(r1)
784 <        stw     r4,56+4(r1)
785 <
786 <        // Call old routine
787 <        lwz     r0,XLM_GET_IND_RESOURCE(0)
788 <        lwz     r2,XLM_RES_LIB_TOC(0)
789 <        mtctr   r0
790 <        bctrl
791 <        RESTORE_SYSTEM_R2
792 <        stw     r3,56+8(r1)             // Save handle
793 <
794 <        // Call CheckLoad
795 <        lwz     r3,56(r1)
796 <        lha     r4,56+6(r1)
797 <        lwz     r5,56+8(r1)
798 <        bl      C_SYMBOL_NAME(check_load_invoc)
799 <        lwz     r3,56+8(r1)             // Restore handle
800 <
801 <        // Return to caller
802 <        lwz     r0,56+12+8(r1)
803 <        mtlr    r0
804 <        addi    r1,r1,56+12
805 <        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
810 <        mflr    r0
811 <        stw     r0,8(r1)
812 <        stwu    r1,-(56+12)(r1)
813 <
814 <        // Save type/index
815 <        stw     r3,56(r1)
816 <        stw     r4,56+4(r1)
817 <
818 <        // Call old routine
819 <        lwz     r0,XLM_GET_1_IND_RESOURCE(0)
820 <        lwz     r2,XLM_RES_LIB_TOC(0)
821 <        mtctr   r0
822 <        bctrl
823 <        RESTORE_SYSTEM_R2
824 <        stw     r3,56+8(r1)             // Save handle
825 <
826 <        // Call CheckLoad
827 <        lwz     r3,56(r1)
828 <        lha     r4,56+6(r1)
829 <        lwz     r5,56+8(r1)
830 <        bl      C_SYMBOL_NAME(check_load_invoc)
831 <        lwz     r3,56+8(r1)             // Restore handle
832 <
833 <        // Return to caller
834 <        lwz     r0,56+12+8(r1)
835 <        mtlr    r0
836 <        addi    r1,r1,56+12
837 <        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
842 <        mflr    r0
843 <        stw     r0,8(r1)
844 <        stwu    r1,-(56+12)(r1)
845 <
846 <        // Save type/ID
847 <        stw     r3,56(r1)
848 <        stw     r4,56+4(r1)
849 <
850 <        // Call old routine
851 <        lwz     r0,XLM_R_GET_RESOURCE(0)
852 <        lwz     r2,XLM_RES_LIB_TOC(0)
853 <        mtctr   r0
854 <        bctrl
855 <        RESTORE_SYSTEM_R2
856 <        stw     r3,56+8(r1)             // Save handle
857 <
858 <        // Call CheckLoad
859 <        lwz     r3,56(r1)
860 <        lha     r4,56+6(r1)
861 <        lwz     r5,56+8(r1)
862 <        bl      C_SYMBOL_NAME(check_load_invoc)
863 <        lwz     r3,56+8(r1)             // Restore handle
864 <
865 <        // Return to caller
866 <        lwz     r0,56+12+8(r1)
867 <        mtlr    r0
868 <        addi    r1,r1,56+12
869 <        blr
764 >        do_get_resource XLM_R_GET_RESOURCE
765  
766  
767   /*
# Line 916 | Line 811 | C_SYMBOL_NAME(ppc_interrupt):
811          // Enter nanokernel
812          mtlr    r3
813          blr
919
920
921 /*
922 *  Glue for glibc with TLS support which clobbers r2
923 *
924 *  The following is derived from dietlibc and only provides
925 *  pass-through to kernel syscalls. You also lose asynchronous
926 *  cancellation support.
927 */
928
929 #if defined(__linux__)
930 #define __NR_getpid             20
931 #define __NR__newselect         142
932
933 #define syscall_weak(name,wsym,sym) \
934 .text; \
935 .type wsym,@function; \
936 .weak wsym; \
937 wsym: ; \
938 .type sym,@function; \
939 .global sym; \
940 sym: \
941        li      0,__NR_##name; \
942        b       __unified_syscall
943
944 #define syscall(name,sym) \
945 .text; \
946 .type sym,@function; \
947 .global sym; \
948 sym: \
949        li      0,__NR_##name; \
950        b       __unified_syscall
951
952
953        .type __unified_syscall,@function
954 __unified_syscall:
955        sc
956        bnslr+
957        stwu    1,-16(1)
958        mflr    0
959        stw     0,20(1)
960        stw     3,12(1)
961        bl      __errno_location
962        lwz     0,12(1)
963        stw     0,0(3)
964        lwz     0,20(1)
965        mtlr    0
966        addi    1,1,16
967        blr
968
969 /*              name            weak symbol     symbol          */
970 syscall(        getpid,         getpid)
971 syscall_weak(   _newselect,     select,         __select)
972 #endif

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines