| /* $Id: entry64.S,v 1.7 2002/02/09 19:49:31 davem Exp $ |
| * entry64.S: Solaris syscall emulation entry point. |
| * |
| * Copyright (C) 1996,1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz) |
| * Copyright (C) 1995,1997 David S. Miller (davem@caip.rutgers.edu) |
| * Copyright (C) 1996 Miguel de Icaza (miguel@nuclecu.unam.mx) |
| */ |
| |
| #include <linux/errno.h> |
| |
| #include <asm/head.h> |
| #include <asm/asi.h> |
| #include <asm/smp.h> |
| #include <asm/ptrace.h> |
| #include <asm/page.h> |
| #include <asm/signal.h> |
| #include <asm/pgtable.h> |
| #include <asm/processor.h> |
| #include <asm/thread_info.h> |
| |
| #include "conv.h" |
| |
| #define NR_SYSCALLS 256 |
| |
| .text |
| solaris_syscall_trace: |
| add %sp, PTREGS_OFF, %o0 |
| call syscall_trace |
| mov 0, %o1 |
| srl %i0, 0, %o0 |
| mov %i4, %o4 |
| srl %i1, 0, %o1 |
| mov %i5, %o5 |
| andcc %l3, 1, %g0 |
| be,pt %icc, 2f |
| srl %i2, 0, %o2 |
| b,pt %xcc, 2f |
| add %sp, PTREGS_OFF, %o0 |
| |
| solaris_sucks: |
| /* Solaris is a big system which needs to be able to do all the things |
| * in Inf+1 different ways */ |
| add %i6, 0x5c, %o0 |
| mov %i0, %g1 |
| mov %i1, %i0 |
| mov %i2, %i1 |
| srl %o0, 0, %o0 |
| mov %i3, %i2 |
| movrz %g1, 256, %g1 /* Ensure we don't loop forever */ |
| mov %i4, %i3 |
| mov %i5, %i4 |
| ba,pt %xcc, solaris_sparc_syscall |
| exen: lduwa [%o0] ASI_S, %i5 |
| |
| exenf: ba,pt %xcc, solaris_sparc_syscall |
| clr %i5 |
| |
| /* For shared binaries, binfmt_elf32 already sets up personality |
| and exec_domain. This is to handle static binaries as well */ |
| solaris_reg: |
| call solaris_register |
| nop |
| ba,pt %xcc, 1f |
| mov %i4, %o4 |
| |
| linux_syscall_for_solaris: |
| sethi %hi(sys_call_table32), %l6 |
| or %l6, %lo(sys_call_table32), %l6 |
| sll %l3, 2, %l4 |
| ba,pt %xcc, 10f |
| lduw [%l6 + %l4], %l3 |
| |
| /* Solaris system calls enter here... */ |
| .align 32 |
| .globl solaris_sparc_syscall, entry64_personality_patch |
| solaris_sparc_syscall: |
| entry64_personality_patch: |
| ldub [%g4 + 0x0], %l0 |
| cmp %g1, 255 |
| bg,pn %icc, solaris_unimplemented |
| srl %g1, 0, %g1 |
| sethi %hi(solaris_sys_table), %l7 |
| or %l7, %lo(solaris_sys_table), %l7 |
| brz,pn %g1, solaris_sucks |
| mov %i4, %o4 |
| sll %g1, 2, %l4 |
| cmp %l0, 1 |
| bne,pn %icc, solaris_reg |
| 1: srl %i0, 0, %o0 |
| lduw [%l7 + %l4], %l3 |
| srl %i1, 0, %o1 |
| ldx [%g6 + TI_FLAGS], %l5 |
| cmp %l3, NR_SYSCALLS |
| bleu,a,pn %xcc, linux_syscall_for_solaris |
| nop |
| andcc %l3, 1, %g0 |
| bne,a,pn %icc, 10f |
| add %sp, PTREGS_OFF, %o0 |
| 10: srl %i2, 0, %o2 |
| mov %i5, %o5 |
| andn %l3, 3, %l7 |
| andcc %l5, _TIF_SYSCALL_TRACE, %g0 |
| bne,pn %icc, solaris_syscall_trace |
| mov %i0, %l5 |
| 2: call %l7 |
| srl %i3, 0, %o3 |
| ret_from_solaris: |
| stx %o0, [%sp + PTREGS_OFF + PT_V9_I0] |
| ldx [%g6 + TI_FLAGS], %l6 |
| sra %o0, 0, %o0 |
| mov %ulo(TSTATE_XCARRY | TSTATE_ICARRY), %g2 |
| ldx [%sp + PTREGS_OFF + PT_V9_TSTATE], %g3 |
| cmp %o0, -ERESTART_RESTARTBLOCK |
| sllx %g2, 32, %g2 |
| bgeu,pn %xcc, 1f |
| andcc %l6, _TIF_SYSCALL_TRACE, %l6 |
| |
| /* System call success, clear Carry condition code. */ |
| andn %g3, %g2, %g3 |
| stx %g3, [%sp + PTREGS_OFF + PT_V9_TSTATE] |
| bne,pn %icc, solaris_syscall_trace2 |
| ldx [%sp + PTREGS_OFF + PT_V9_TNPC], %l1 |
| andcc %l1, 1, %g0 |
| bne,pn %icc, 2f |
| clr %l6 |
| add %l1, 0x4, %l2 |
| stx %l1, [%sp + PTREGS_OFF + PT_V9_TPC] ! pc = npc |
| call rtrap |
| stx %l2, [%sp + PTREGS_OFF + PT_V9_TNPC] !npc = npc+4 |
| |
| /* When tnpc & 1, this comes from setcontext and we don't want to advance pc */ |
| 2: andn %l1, 3, %l1 |
| call rtrap |
| stx %l1, [%sp + PTREGS_OFF + PT_V9_TNPC] !npc = npc&~3 |
| |
| 1: |
| /* System call failure, set Carry condition code. |
| * Also, get abs(errno) to return to the process. |
| */ |
| sub %g0, %o0, %o0 |
| or %g3, %g2, %g3 |
| cmp %o0, ERANGE /* 0-ERANGE are identity mapped */ |
| bleu,pt %icc, 1f |
| cmp %o0, EMEDIUMTYPE |
| bgu,pn %icc, 1f |
| sethi %hi(solaris_err_table), %l6 |
| sll %o0, 2, %o0 |
| or %l6, %lo(solaris_err_table), %l6 |
| ldsw [%l6 + %o0], %o0 |
| 1: stx %o0, [%sp + PTREGS_OFF + PT_V9_I0] |
| mov 1, %l6 |
| stx %g3, [%sp + PTREGS_OFF + PT_V9_TSTATE] |
| bne,pn %icc, solaris_syscall_trace2 |
| ldx [%sp + PTREGS_OFF + PT_V9_TNPC], %l1 |
| andcc %l1, 1, %g0 |
| bne,pn %icc, 2b |
| add %l1, 0x4, %l2 |
| stx %l1, [%sp + PTREGS_OFF + PT_V9_TPC] ! pc = npc |
| call rtrap |
| stx %l2, [%sp + PTREGS_OFF + PT_V9_TNPC] !npc = npc+4 |
| |
| solaris_syscall_trace2: |
| add %sp, PTREGS_OFF, %o0 |
| call syscall_trace |
| mov 1, %o1 |
| add %l1, 0x4, %l2 /* npc = npc+4 */ |
| andcc %l1, 1, %g0 |
| bne,pn %icc, 2b |
| nop |
| stx %l1, [%sp + PTREGS_OFF + PT_V9_TPC] |
| call rtrap |
| stx %l2, [%sp + PTREGS_OFF + PT_V9_TNPC] |
| |
| /* This one is tricky, so that's why we do it in assembly */ |
| .globl solaris_sigsuspend |
| solaris_sigsuspend: |
| call do_sol_sigsuspend |
| nop |
| brlz,pn %o0, ret_from_solaris |
| nop |
| call sys_sigsuspend |
| stx %o0, [%sp + PTREGS_OFF + PT_V9_I0] |
| b,pt %xcc, ret_from_solaris |
| nop |
| |
| .globl solaris_getpid |
| solaris_getpid: |
| call sys_getppid |
| nop |
| call sys_getpid |
| stx %o0, [%sp + PTREGS_OFF + PT_V9_I1] |
| b,pt %xcc, ret_from_solaris |
| nop |
| |
| .globl solaris_getuid |
| solaris_getuid: |
| call sys_geteuid |
| nop |
| call sys_getuid |
| stx %o1, [%sp + PTREGS_OFF + PT_V9_I1] |
| b,pt %xcc, ret_from_solaris |
| nop |
| |
| .globl solaris_getgid |
| solaris_getgid: |
| call sys_getegid |
| nop |
| call sys_getgid |
| stx %o1, [%sp + PTREGS_OFF + PT_V9_I1] |
| b,pt %xcc, ret_from_solaris |
| nop |
| |
| .globl solaris_unimplemented |
| solaris_unimplemented: |
| call do_sol_unimplemented |
| add %sp, PTREGS_OFF, %o0 |
| ba,pt %xcc, ret_from_solaris |
| nop |
| |
| .section __ex_table,"a" |
| .align 4 |
| .word exen, exenf |
| |
