mirror of https://gitee.com/openkylin/linux.git
1674 lines
34 KiB
ArmAsm
1674 lines
34 KiB
ArmAsm
/* arch/sparc/kernel/entry.S: Sparc trap low-level entry points.
|
|
*
|
|
* Copyright (C) 1995, 2007 David S. Miller (davem@davemloft.net)
|
|
* Copyright (C) 1996 Eddie C. Dost (ecd@skynet.be)
|
|
* Copyright (C) 1996 Miguel de Icaza (miguel@nuclecu.unam.mx)
|
|
* Copyright (C) 1996-1999 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
|
|
* Copyright (C) 1997 Anton Blanchard (anton@progsoc.uts.edu.au)
|
|
*/
|
|
|
|
#include <linux/errno.h>
|
|
|
|
#include <asm/head.h>
|
|
#include <asm/asi.h>
|
|
#include <asm/smp.h>
|
|
#include <asm/contregs.h>
|
|
#include <asm/ptrace.h>
|
|
#include <asm/asm-offsets.h>
|
|
#include <asm/psr.h>
|
|
#include <asm/vaddrs.h>
|
|
#include <asm/memreg.h>
|
|
#include <asm/page.h>
|
|
#include <asm/pgtable.h>
|
|
#ifdef CONFIG_SUN4
|
|
#include <asm/pgtsun4.h>
|
|
#else
|
|
#include <asm/pgtsun4c.h>
|
|
#endif
|
|
#include <asm/winmacro.h>
|
|
#include <asm/signal.h>
|
|
#include <asm/obio.h>
|
|
#include <asm/mxcc.h>
|
|
#include <asm/thread_info.h>
|
|
#include <asm/param.h>
|
|
#include <asm/unistd.h>
|
|
|
|
#include <asm/asmmacro.h>
|
|
|
|
#define curptr g6
|
|
|
|
/* These are just handy. */
|
|
#define _SV save %sp, -STACKFRAME_SZ, %sp
|
|
#define _RS restore
|
|
|
|
#define FLUSH_ALL_KERNEL_WINDOWS \
|
|
_SV; _SV; _SV; _SV; _SV; _SV; _SV; \
|
|
_RS; _RS; _RS; _RS; _RS; _RS; _RS;
|
|
|
|
.text
|
|
|
|
#ifdef CONFIG_KGDB
|
|
.align 4
|
|
.globl arch_kgdb_breakpoint
|
|
.type arch_kgdb_breakpoint,#function
|
|
arch_kgdb_breakpoint:
|
|
ta 0x7d
|
|
retl
|
|
nop
|
|
.size arch_kgdb_breakpoint,.-arch_kgdb_breakpoint
|
|
#endif
|
|
|
|
#if defined(CONFIG_BLK_DEV_FD) || defined(CONFIG_BLK_DEV_FD_MODULE)
|
|
.align 4
|
|
.globl floppy_hardint
|
|
floppy_hardint:
|
|
/*
|
|
* This code cannot touch registers %l0 %l1 and %l2
|
|
* because SAVE_ALL depends on their values. It depends
|
|
* on %l3 also, but we regenerate it before a call.
|
|
* Other registers are:
|
|
* %l3 -- base address of fdc registers
|
|
* %l4 -- pdma_vaddr
|
|
* %l5 -- scratch for ld/st address
|
|
* %l6 -- pdma_size
|
|
* %l7 -- scratch [floppy byte, ld/st address, aux. data]
|
|
*/
|
|
|
|
/* Do we have work to do? */
|
|
sethi %hi(doing_pdma), %l7
|
|
ld [%l7 + %lo(doing_pdma)], %l7
|
|
cmp %l7, 0
|
|
be floppy_dosoftint
|
|
nop
|
|
|
|
/* Load fdc register base */
|
|
sethi %hi(fdc_status), %l3
|
|
ld [%l3 + %lo(fdc_status)], %l3
|
|
|
|
/* Setup register addresses */
|
|
sethi %hi(pdma_vaddr), %l5 ! transfer buffer
|
|
ld [%l5 + %lo(pdma_vaddr)], %l4
|
|
sethi %hi(pdma_size), %l5 ! bytes to go
|
|
ld [%l5 + %lo(pdma_size)], %l6
|
|
next_byte:
|
|
ldub [%l3], %l7
|
|
|
|
andcc %l7, 0x80, %g0 ! Does fifo still have data
|
|
bz floppy_fifo_emptied ! fifo has been emptied...
|
|
andcc %l7, 0x20, %g0 ! in non-dma mode still?
|
|
bz floppy_overrun ! nope, overrun
|
|
andcc %l7, 0x40, %g0 ! 0=write 1=read
|
|
bz floppy_write
|
|
sub %l6, 0x1, %l6
|
|
|
|
/* Ok, actually read this byte */
|
|
ldub [%l3 + 1], %l7
|
|
orcc %g0, %l6, %g0
|
|
stb %l7, [%l4]
|
|
bne next_byte
|
|
add %l4, 0x1, %l4
|
|
|
|
b floppy_tdone
|
|
nop
|
|
|
|
floppy_write:
|
|
/* Ok, actually write this byte */
|
|
ldub [%l4], %l7
|
|
orcc %g0, %l6, %g0
|
|
stb %l7, [%l3 + 1]
|
|
bne next_byte
|
|
add %l4, 0x1, %l4
|
|
|
|
/* fall through... */
|
|
floppy_tdone:
|
|
sethi %hi(pdma_vaddr), %l5
|
|
st %l4, [%l5 + %lo(pdma_vaddr)]
|
|
sethi %hi(pdma_size), %l5
|
|
st %l6, [%l5 + %lo(pdma_size)]
|
|
/* Flip terminal count pin */
|
|
set auxio_register, %l7
|
|
ld [%l7], %l7
|
|
|
|
set sparc_cpu_model, %l5
|
|
ld [%l5], %l5
|
|
subcc %l5, 1, %g0 /* enum { sun4c = 1 }; */
|
|
be 1f
|
|
ldub [%l7], %l5
|
|
|
|
or %l5, 0xc2, %l5
|
|
stb %l5, [%l7]
|
|
andn %l5, 0x02, %l5
|
|
b 2f
|
|
nop
|
|
|
|
1:
|
|
or %l5, 0xf4, %l5
|
|
stb %l5, [%l7]
|
|
andn %l5, 0x04, %l5
|
|
|
|
2:
|
|
/* Kill some time so the bits set */
|
|
WRITE_PAUSE
|
|
WRITE_PAUSE
|
|
|
|
stb %l5, [%l7]
|
|
|
|
/* Prevent recursion */
|
|
sethi %hi(doing_pdma), %l7
|
|
b floppy_dosoftint
|
|
st %g0, [%l7 + %lo(doing_pdma)]
|
|
|
|
/* We emptied the FIFO, but we haven't read everything
|
|
* as of yet. Store the current transfer address and
|
|
* bytes left to read so we can continue when the next
|
|
* fast IRQ comes in.
|
|
*/
|
|
floppy_fifo_emptied:
|
|
sethi %hi(pdma_vaddr), %l5
|
|
st %l4, [%l5 + %lo(pdma_vaddr)]
|
|
sethi %hi(pdma_size), %l7
|
|
st %l6, [%l7 + %lo(pdma_size)]
|
|
|
|
/* Restore condition codes */
|
|
wr %l0, 0x0, %psr
|
|
WRITE_PAUSE
|
|
|
|
jmp %l1
|
|
rett %l2
|
|
|
|
floppy_overrun:
|
|
sethi %hi(pdma_vaddr), %l5
|
|
st %l4, [%l5 + %lo(pdma_vaddr)]
|
|
sethi %hi(pdma_size), %l5
|
|
st %l6, [%l5 + %lo(pdma_size)]
|
|
/* Prevent recursion */
|
|
sethi %hi(doing_pdma), %l7
|
|
st %g0, [%l7 + %lo(doing_pdma)]
|
|
|
|
/* fall through... */
|
|
floppy_dosoftint:
|
|
rd %wim, %l3
|
|
SAVE_ALL
|
|
|
|
/* Set all IRQs off. */
|
|
or %l0, PSR_PIL, %l4
|
|
wr %l4, 0x0, %psr
|
|
WRITE_PAUSE
|
|
wr %l4, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
mov 11, %o0 ! floppy irq level (unused anyway)
|
|
mov %g0, %o1 ! devid is not used in fast interrupts
|
|
call sparc_floppy_irq
|
|
add %sp, STACKFRAME_SZ, %o2 ! struct pt_regs *regs
|
|
|
|
RESTORE_ALL
|
|
|
|
#endif /* (CONFIG_BLK_DEV_FD) */
|
|
|
|
/* Bad trap handler */
|
|
.globl bad_trap_handler
|
|
bad_trap_handler:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0 ! pt_regs
|
|
call do_hw_interrupt
|
|
mov %l7, %o1 ! trap number
|
|
|
|
RESTORE_ALL
|
|
|
|
/* For now all IRQ's not registered get sent here. handler_irq() will
|
|
* see if a routine is registered to handle this interrupt and if not
|
|
* it will say so on the console.
|
|
*/
|
|
|
|
.align 4
|
|
.globl real_irq_entry, patch_handler_irq
|
|
real_irq_entry:
|
|
SAVE_ALL
|
|
|
|
#ifdef CONFIG_SMP
|
|
.globl patchme_maybe_smp_msg
|
|
|
|
cmp %l7, 12
|
|
patchme_maybe_smp_msg:
|
|
bgu maybe_smp4m_msg
|
|
nop
|
|
#endif
|
|
|
|
real_irq_continue:
|
|
or %l0, PSR_PIL, %g2
|
|
wr %g2, 0x0, %psr
|
|
WRITE_PAUSE
|
|
wr %g2, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
mov %l7, %o0 ! irq level
|
|
patch_handler_irq:
|
|
call handler_irq
|
|
add %sp, STACKFRAME_SZ, %o1 ! pt_regs ptr
|
|
or %l0, PSR_PIL, %g2 ! restore PIL after handler_irq
|
|
wr %g2, PSR_ET, %psr ! keep ET up
|
|
WRITE_PAUSE
|
|
|
|
RESTORE_ALL
|
|
|
|
#ifdef CONFIG_SMP
|
|
/* SMP per-cpu ticker interrupts are handled specially. */
|
|
smp4m_ticker:
|
|
bne real_irq_continue+4
|
|
or %l0, PSR_PIL, %g2
|
|
wr %g2, 0x0, %psr
|
|
WRITE_PAUSE
|
|
wr %g2, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
call smp4m_percpu_timer_interrupt
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
RESTORE_ALL
|
|
|
|
/* Here is where we check for possible SMP IPI passed to us
|
|
* on some level other than 15 which is the NMI and only used
|
|
* for cross calls. That has a separate entry point below.
|
|
*/
|
|
maybe_smp4m_msg:
|
|
GET_PROCESSOR4M_ID(o3)
|
|
set sun4m_interrupts, %l5
|
|
ld [%l5], %o5
|
|
sethi %hi(0x40000000), %o2
|
|
sll %o3, 12, %o3
|
|
ld [%o5 + %o3], %o1
|
|
andcc %o1, %o2, %g0
|
|
be,a smp4m_ticker
|
|
cmp %l7, 14
|
|
st %o2, [%o5 + 0x4]
|
|
WRITE_PAUSE
|
|
ld [%o5], %g0
|
|
WRITE_PAUSE
|
|
or %l0, PSR_PIL, %l4
|
|
wr %l4, 0x0, %psr
|
|
WRITE_PAUSE
|
|
wr %l4, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
call smp_reschedule_irq
|
|
nop
|
|
|
|
RESTORE_ALL
|
|
|
|
.align 4
|
|
.globl linux_trap_ipi15_sun4m
|
|
linux_trap_ipi15_sun4m:
|
|
SAVE_ALL
|
|
sethi %hi(0x80000000), %o2
|
|
GET_PROCESSOR4M_ID(o0)
|
|
set sun4m_interrupts, %l5
|
|
ld [%l5], %o5
|
|
sll %o0, 12, %o0
|
|
add %o5, %o0, %o5
|
|
ld [%o5], %o3
|
|
andcc %o3, %o2, %g0
|
|
be 1f ! Must be an NMI async memory error
|
|
st %o2, [%o5 + 4]
|
|
WRITE_PAUSE
|
|
ld [%o5], %g0
|
|
WRITE_PAUSE
|
|
or %l0, PSR_PIL, %l4
|
|
wr %l4, 0x0, %psr
|
|
WRITE_PAUSE
|
|
wr %l4, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
call smp4m_cross_call_irq
|
|
nop
|
|
b ret_trap_lockless_ipi
|
|
clr %l6
|
|
1:
|
|
/* NMI async memory error handling. */
|
|
sethi %hi(0x80000000), %l4
|
|
sethi %hi(0x4000), %o3
|
|
sub %o5, %o0, %o5
|
|
add %o5, %o3, %l5
|
|
st %l4, [%l5 + 0xc]
|
|
WRITE_PAUSE
|
|
ld [%l5], %g0
|
|
WRITE_PAUSE
|
|
or %l0, PSR_PIL, %l4
|
|
wr %l4, 0x0, %psr
|
|
WRITE_PAUSE
|
|
wr %l4, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
call sun4m_nmi
|
|
nop
|
|
st %l4, [%l5 + 0x8]
|
|
WRITE_PAUSE
|
|
ld [%l5], %g0
|
|
WRITE_PAUSE
|
|
RESTORE_ALL
|
|
|
|
.globl smp4d_ticker
|
|
/* SMP per-cpu ticker interrupts are handled specially. */
|
|
smp4d_ticker:
|
|
SAVE_ALL
|
|
or %l0, PSR_PIL, %g2
|
|
sethi %hi(CC_ICLR), %o0
|
|
sethi %hi(1 << 14), %o1
|
|
or %o0, %lo(CC_ICLR), %o0
|
|
stha %o1, [%o0] ASI_M_MXCC /* Clear PIL 14 in MXCC's ICLR */
|
|
wr %g2, 0x0, %psr
|
|
WRITE_PAUSE
|
|
wr %g2, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
call smp4d_percpu_timer_interrupt
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
RESTORE_ALL
|
|
|
|
.align 4
|
|
.globl linux_trap_ipi15_sun4d
|
|
linux_trap_ipi15_sun4d:
|
|
SAVE_ALL
|
|
sethi %hi(CC_BASE), %o4
|
|
sethi %hi(MXCC_ERR_ME|MXCC_ERR_PEW|MXCC_ERR_ASE|MXCC_ERR_PEE), %o2
|
|
or %o4, (CC_EREG - CC_BASE), %o0
|
|
ldda [%o0] ASI_M_MXCC, %o0
|
|
andcc %o0, %o2, %g0
|
|
bne 1f
|
|
sethi %hi(BB_STAT2), %o2
|
|
lduba [%o2] ASI_M_CTL, %o2
|
|
andcc %o2, BB_STAT2_MASK, %g0
|
|
bne 2f
|
|
or %o4, (CC_ICLR - CC_BASE), %o0
|
|
sethi %hi(1 << 15), %o1
|
|
stha %o1, [%o0] ASI_M_MXCC /* Clear PIL 15 in MXCC's ICLR */
|
|
or %l0, PSR_PIL, %l4
|
|
wr %l4, 0x0, %psr
|
|
WRITE_PAUSE
|
|
wr %l4, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
call smp4d_cross_call_irq
|
|
nop
|
|
b ret_trap_lockless_ipi
|
|
clr %l6
|
|
|
|
1: /* MXCC error */
|
|
2: /* BB error */
|
|
/* Disable PIL 15 */
|
|
set CC_IMSK, %l4
|
|
lduha [%l4] ASI_M_MXCC, %l5
|
|
sethi %hi(1 << 15), %l7
|
|
or %l5, %l7, %l5
|
|
stha %l5, [%l4] ASI_M_MXCC
|
|
/* FIXME */
|
|
1: b,a 1b
|
|
|
|
#endif /* CONFIG_SMP */
|
|
|
|
/* This routine handles illegal instructions and privileged
|
|
* instruction attempts from user code.
|
|
*/
|
|
.align 4
|
|
.globl bad_instruction
|
|
bad_instruction:
|
|
sethi %hi(0xc1f80000), %l4
|
|
ld [%l1], %l5
|
|
sethi %hi(0x81d80000), %l7
|
|
and %l5, %l4, %l5
|
|
cmp %l5, %l7
|
|
be 1f
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr ! re-enable traps
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov %l1, %o1
|
|
mov %l2, %o2
|
|
call do_illegal_instruction
|
|
mov %l0, %o3
|
|
|
|
RESTORE_ALL
|
|
|
|
1: /* unimplemented flush - just skip */
|
|
jmpl %l2, %g0
|
|
rett %l2 + 4
|
|
|
|
.align 4
|
|
.globl priv_instruction
|
|
priv_instruction:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov %l1, %o1
|
|
mov %l2, %o2
|
|
call do_priv_instruction
|
|
mov %l0, %o3
|
|
|
|
RESTORE_ALL
|
|
|
|
/* This routine handles unaligned data accesses. */
|
|
.align 4
|
|
.globl mna_handler
|
|
mna_handler:
|
|
andcc %l0, PSR_PS, %g0
|
|
be mna_fromuser
|
|
nop
|
|
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
ld [%l1], %o1
|
|
call kernel_unaligned_trap
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
|
|
RESTORE_ALL
|
|
|
|
mna_fromuser:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr ! re-enable traps
|
|
WRITE_PAUSE
|
|
|
|
ld [%l1], %o1
|
|
call user_unaligned_trap
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
|
|
RESTORE_ALL
|
|
|
|
/* This routine handles floating point disabled traps. */
|
|
.align 4
|
|
.globl fpd_trap_handler
|
|
fpd_trap_handler:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr ! re-enable traps
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov %l1, %o1
|
|
mov %l2, %o2
|
|
call do_fpd_trap
|
|
mov %l0, %o3
|
|
|
|
RESTORE_ALL
|
|
|
|
/* This routine handles Floating Point Exceptions. */
|
|
.align 4
|
|
.globl fpe_trap_handler
|
|
fpe_trap_handler:
|
|
set fpsave_magic, %l5
|
|
cmp %l1, %l5
|
|
be 1f
|
|
sethi %hi(fpsave), %l5
|
|
or %l5, %lo(fpsave), %l5
|
|
cmp %l1, %l5
|
|
bne 2f
|
|
sethi %hi(fpsave_catch2), %l5
|
|
or %l5, %lo(fpsave_catch2), %l5
|
|
wr %l0, 0x0, %psr
|
|
WRITE_PAUSE
|
|
jmp %l5
|
|
rett %l5 + 4
|
|
1:
|
|
sethi %hi(fpsave_catch), %l5
|
|
or %l5, %lo(fpsave_catch), %l5
|
|
wr %l0, 0x0, %psr
|
|
WRITE_PAUSE
|
|
jmp %l5
|
|
rett %l5 + 4
|
|
|
|
2:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr ! re-enable traps
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov %l1, %o1
|
|
mov %l2, %o2
|
|
call do_fpe_trap
|
|
mov %l0, %o3
|
|
|
|
RESTORE_ALL
|
|
|
|
/* This routine handles Tag Overflow Exceptions. */
|
|
.align 4
|
|
.globl do_tag_overflow
|
|
do_tag_overflow:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr ! re-enable traps
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov %l1, %o1
|
|
mov %l2, %o2
|
|
call handle_tag_overflow
|
|
mov %l0, %o3
|
|
|
|
RESTORE_ALL
|
|
|
|
/* This routine handles Watchpoint Exceptions. */
|
|
.align 4
|
|
.globl do_watchpoint
|
|
do_watchpoint:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr ! re-enable traps
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov %l1, %o1
|
|
mov %l2, %o2
|
|
call handle_watchpoint
|
|
mov %l0, %o3
|
|
|
|
RESTORE_ALL
|
|
|
|
/* This routine handles Register Access Exceptions. */
|
|
.align 4
|
|
.globl do_reg_access
|
|
do_reg_access:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr ! re-enable traps
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov %l1, %o1
|
|
mov %l2, %o2
|
|
call handle_reg_access
|
|
mov %l0, %o3
|
|
|
|
RESTORE_ALL
|
|
|
|
/* This routine handles Co-Processor Disabled Exceptions. */
|
|
.align 4
|
|
.globl do_cp_disabled
|
|
do_cp_disabled:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr ! re-enable traps
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov %l1, %o1
|
|
mov %l2, %o2
|
|
call handle_cp_disabled
|
|
mov %l0, %o3
|
|
|
|
RESTORE_ALL
|
|
|
|
/* This routine handles Co-Processor Exceptions. */
|
|
.align 4
|
|
.globl do_cp_exception
|
|
do_cp_exception:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr ! re-enable traps
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov %l1, %o1
|
|
mov %l2, %o2
|
|
call handle_cp_exception
|
|
mov %l0, %o3
|
|
|
|
RESTORE_ALL
|
|
|
|
/* This routine handles Hardware Divide By Zero Exceptions. */
|
|
.align 4
|
|
.globl do_hw_divzero
|
|
do_hw_divzero:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr ! re-enable traps
|
|
WRITE_PAUSE
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov %l1, %o1
|
|
mov %l2, %o2
|
|
call handle_hw_divzero
|
|
mov %l0, %o3
|
|
|
|
RESTORE_ALL
|
|
|
|
.align 4
|
|
.globl do_flush_windows
|
|
do_flush_windows:
|
|
SAVE_ALL
|
|
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
andcc %l0, PSR_PS, %g0
|
|
bne dfw_kernel
|
|
nop
|
|
|
|
call flush_user_windows
|
|
nop
|
|
|
|
/* Advance over the trap instruction. */
|
|
ld [%sp + STACKFRAME_SZ + PT_NPC], %l1
|
|
add %l1, 0x4, %l2
|
|
st %l1, [%sp + STACKFRAME_SZ + PT_PC]
|
|
st %l2, [%sp + STACKFRAME_SZ + PT_NPC]
|
|
|
|
RESTORE_ALL
|
|
|
|
.globl flush_patch_one
|
|
|
|
/* We get these for debugging routines using __builtin_return_address() */
|
|
dfw_kernel:
|
|
flush_patch_one:
|
|
FLUSH_ALL_KERNEL_WINDOWS
|
|
|
|
/* Advance over the trap instruction. */
|
|
ld [%sp + STACKFRAME_SZ + PT_NPC], %l1
|
|
add %l1, 0x4, %l2
|
|
st %l1, [%sp + STACKFRAME_SZ + PT_PC]
|
|
st %l2, [%sp + STACKFRAME_SZ + PT_NPC]
|
|
|
|
RESTORE_ALL
|
|
|
|
/* The getcc software trap. The user wants the condition codes from
|
|
* the %psr in register %g1.
|
|
*/
|
|
|
|
.align 4
|
|
.globl getcc_trap_handler
|
|
getcc_trap_handler:
|
|
srl %l0, 20, %g1 ! give user
|
|
and %g1, 0xf, %g1 ! only ICC bits in %psr
|
|
jmp %l2 ! advance over trap instruction
|
|
rett %l2 + 0x4 ! like this...
|
|
|
|
/* The setcc software trap. The user has condition codes in %g1
|
|
* that it would like placed in the %psr. Be careful not to flip
|
|
* any unintentional bits!
|
|
*/
|
|
|
|
.align 4
|
|
.globl setcc_trap_handler
|
|
setcc_trap_handler:
|
|
sll %g1, 0x14, %l4
|
|
set PSR_ICC, %l5
|
|
andn %l0, %l5, %l0 ! clear ICC bits in %psr
|
|
and %l4, %l5, %l4 ! clear non-ICC bits in user value
|
|
or %l4, %l0, %l4 ! or them in... mix mix mix
|
|
|
|
wr %l4, 0x0, %psr ! set new %psr
|
|
WRITE_PAUSE ! TI scumbags...
|
|
|
|
jmp %l2 ! advance over trap instruction
|
|
rett %l2 + 0x4 ! like this...
|
|
|
|
.align 4
|
|
.globl linux_trap_nmi_sun4c
|
|
linux_trap_nmi_sun4c:
|
|
SAVE_ALL
|
|
|
|
/* Ugh, we need to clear the IRQ line. This is now
|
|
* a very sun4c specific trap handler...
|
|
*/
|
|
sethi %hi(interrupt_enable), %l5
|
|
ld [%l5 + %lo(interrupt_enable)], %l5
|
|
ldub [%l5], %l6
|
|
andn %l6, INTS_ENAB, %l6
|
|
stb %l6, [%l5]
|
|
|
|
/* Now it is safe to re-enable traps without recursion. */
|
|
or %l0, PSR_PIL, %l0
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
/* Now call the c-code with the pt_regs frame ptr and the
|
|
* memory error registers as arguments. The ordering chosen
|
|
* here is due to unlatching semantics.
|
|
*/
|
|
sethi %hi(AC_SYNC_ERR), %o0
|
|
add %o0, 0x4, %o0
|
|
lda [%o0] ASI_CONTROL, %o2 ! sync vaddr
|
|
sub %o0, 0x4, %o0
|
|
lda [%o0] ASI_CONTROL, %o1 ! sync error
|
|
add %o0, 0xc, %o0
|
|
lda [%o0] ASI_CONTROL, %o4 ! async vaddr
|
|
sub %o0, 0x4, %o0
|
|
lda [%o0] ASI_CONTROL, %o3 ! async error
|
|
call sparc_lvl15_nmi
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
|
|
RESTORE_ALL
|
|
|
|
.align 4
|
|
.globl invalid_segment_patch1_ff
|
|
.globl invalid_segment_patch2_ff
|
|
invalid_segment_patch1_ff: cmp %l4, 0xff
|
|
invalid_segment_patch2_ff: mov 0xff, %l3
|
|
|
|
.align 4
|
|
.globl invalid_segment_patch1_1ff
|
|
.globl invalid_segment_patch2_1ff
|
|
invalid_segment_patch1_1ff: cmp %l4, 0x1ff
|
|
invalid_segment_patch2_1ff: mov 0x1ff, %l3
|
|
|
|
.align 4
|
|
.globl num_context_patch1_16, num_context_patch2_16
|
|
num_context_patch1_16: mov 0x10, %l7
|
|
num_context_patch2_16: mov 0x10, %l7
|
|
|
|
.align 4
|
|
.globl vac_linesize_patch_32
|
|
vac_linesize_patch_32: subcc %l7, 32, %l7
|
|
|
|
.align 4
|
|
.globl vac_hwflush_patch1_on, vac_hwflush_patch2_on
|
|
|
|
/*
|
|
* Ugly, but we cant use hardware flushing on the sun4 and we'd require
|
|
* two instructions (Anton)
|
|
*/
|
|
#ifdef CONFIG_SUN4
|
|
vac_hwflush_patch1_on: nop
|
|
#else
|
|
vac_hwflush_patch1_on: addcc %l7, -PAGE_SIZE, %l7
|
|
#endif
|
|
|
|
vac_hwflush_patch2_on: sta %g0, [%l3 + %l7] ASI_HWFLUSHSEG
|
|
|
|
.globl invalid_segment_patch1, invalid_segment_patch2
|
|
.globl num_context_patch1
|
|
.globl vac_linesize_patch, vac_hwflush_patch1
|
|
.globl vac_hwflush_patch2
|
|
|
|
.align 4
|
|
.globl sun4c_fault
|
|
|
|
! %l0 = %psr
|
|
! %l1 = %pc
|
|
! %l2 = %npc
|
|
! %l3 = %wim
|
|
! %l7 = 1 for textfault
|
|
! We want error in %l5, vaddr in %l6
|
|
sun4c_fault:
|
|
#ifdef CONFIG_SUN4
|
|
sethi %hi(sun4c_memerr_reg), %l4
|
|
ld [%l4+%lo(sun4c_memerr_reg)], %l4 ! memerr ctrl reg addr
|
|
ld [%l4], %l6 ! memerr ctrl reg
|
|
ld [%l4 + 4], %l5 ! memerr vaddr reg
|
|
andcc %l6, 0x80, %g0 ! check for error type
|
|
st %g0, [%l4 + 4] ! clear the error
|
|
be 0f ! normal error
|
|
sethi %hi(AC_BUS_ERROR), %l4 ! bus err reg addr
|
|
|
|
call prom_halt ! something weird happened
|
|
! what exactly did happen?
|
|
! what should we do here?
|
|
|
|
0: or %l4, %lo(AC_BUS_ERROR), %l4 ! bus err reg addr
|
|
lduba [%l4] ASI_CONTROL, %l6 ! bus err reg
|
|
|
|
cmp %l7, 1 ! text fault?
|
|
be 1f ! yes
|
|
nop
|
|
|
|
ld [%l1], %l4 ! load instruction that caused fault
|
|
srl %l4, 21, %l4
|
|
andcc %l4, 1, %g0 ! store instruction?
|
|
|
|
be 1f ! no
|
|
sethi %hi(SUN4C_SYNC_BADWRITE), %l4 ! yep
|
|
! %lo(SUN4C_SYNC_BADWRITE) = 0
|
|
or %l4, %l6, %l6 ! set write bit to emulate sun4c
|
|
1:
|
|
#else
|
|
sethi %hi(AC_SYNC_ERR), %l4
|
|
add %l4, 0x4, %l6 ! AC_SYNC_VA in %l6
|
|
lda [%l6] ASI_CONTROL, %l5 ! Address
|
|
lda [%l4] ASI_CONTROL, %l6 ! Error, retained for a bit
|
|
#endif
|
|
|
|
andn %l5, 0xfff, %l5 ! Encode all info into l7
|
|
srl %l6, 14, %l4
|
|
|
|
and %l4, 2, %l4
|
|
or %l5, %l4, %l4
|
|
|
|
or %l4, %l7, %l7 ! l7 = [addr,write,txtfault]
|
|
|
|
andcc %l0, PSR_PS, %g0
|
|
be sun4c_fault_fromuser
|
|
andcc %l7, 1, %g0 ! Text fault?
|
|
|
|
be 1f
|
|
sethi %hi(KERNBASE), %l4
|
|
|
|
mov %l1, %l5 ! PC
|
|
|
|
1:
|
|
cmp %l5, %l4
|
|
blu sun4c_fault_fromuser
|
|
sethi %hi(~((1 << SUN4C_REAL_PGDIR_SHIFT) - 1)), %l4
|
|
|
|
/* If the kernel references a bum kernel pointer, or a pte which
|
|
* points to a non existant page in ram, we will run this code
|
|
* _forever_ and lock up the machine!!!!! So we must check for
|
|
* this condition, the AC_SYNC_ERR bits are what we must examine.
|
|
* Also a parity error would make this happen as well. So we just
|
|
* check that we are in fact servicing a tlb miss and not some
|
|
* other type of fault for the kernel.
|
|
*/
|
|
andcc %l6, 0x80, %g0
|
|
be sun4c_fault_fromuser
|
|
and %l5, %l4, %l5
|
|
|
|
/* Test for NULL pte_t * in vmalloc area. */
|
|
sethi %hi(VMALLOC_START), %l4
|
|
cmp %l5, %l4
|
|
blu,a invalid_segment_patch1
|
|
lduXa [%l5] ASI_SEGMAP, %l4
|
|
|
|
sethi %hi(swapper_pg_dir), %l4
|
|
srl %l5, SUN4C_PGDIR_SHIFT, %l6
|
|
or %l4, %lo(swapper_pg_dir), %l4
|
|
sll %l6, 2, %l6
|
|
ld [%l4 + %l6], %l4
|
|
#ifdef CONFIG_SUN4
|
|
sethi %hi(PAGE_MASK), %l6
|
|
andcc %l4, %l6, %g0
|
|
#else
|
|
andcc %l4, PAGE_MASK, %g0
|
|
#endif
|
|
be sun4c_fault_fromuser
|
|
lduXa [%l5] ASI_SEGMAP, %l4
|
|
|
|
invalid_segment_patch1:
|
|
cmp %l4, 0x7f
|
|
bne 1f
|
|
sethi %hi(sun4c_kfree_ring), %l4
|
|
or %l4, %lo(sun4c_kfree_ring), %l4
|
|
ld [%l4 + 0x18], %l3
|
|
deccc %l3 ! do we have a free entry?
|
|
bcs,a 2f ! no, unmap one.
|
|
sethi %hi(sun4c_kernel_ring), %l4
|
|
|
|
st %l3, [%l4 + 0x18] ! sun4c_kfree_ring.num_entries--
|
|
|
|
ld [%l4 + 0x00], %l6 ! entry = sun4c_kfree_ring.ringhd.next
|
|
st %l5, [%l6 + 0x08] ! entry->vaddr = address
|
|
|
|
ld [%l6 + 0x00], %l3 ! next = entry->next
|
|
ld [%l6 + 0x04], %l7 ! entry->prev
|
|
|
|
st %l7, [%l3 + 0x04] ! next->prev = entry->prev
|
|
st %l3, [%l7 + 0x00] ! entry->prev->next = next
|
|
|
|
sethi %hi(sun4c_kernel_ring), %l4
|
|
or %l4, %lo(sun4c_kernel_ring), %l4
|
|
! head = &sun4c_kernel_ring.ringhd
|
|
|
|
ld [%l4 + 0x00], %l7 ! head->next
|
|
|
|
st %l4, [%l6 + 0x04] ! entry->prev = head
|
|
st %l7, [%l6 + 0x00] ! entry->next = head->next
|
|
st %l6, [%l7 + 0x04] ! head->next->prev = entry
|
|
|
|
st %l6, [%l4 + 0x00] ! head->next = entry
|
|
|
|
ld [%l4 + 0x18], %l3
|
|
inc %l3 ! sun4c_kernel_ring.num_entries++
|
|
st %l3, [%l4 + 0x18]
|
|
b 4f
|
|
ld [%l6 + 0x08], %l5
|
|
|
|
2:
|
|
or %l4, %lo(sun4c_kernel_ring), %l4
|
|
! head = &sun4c_kernel_ring.ringhd
|
|
|
|
ld [%l4 + 0x04], %l6 ! entry = head->prev
|
|
|
|
ld [%l6 + 0x08], %l3 ! tmp = entry->vaddr
|
|
|
|
! Flush segment from the cache.
|
|
#ifdef CONFIG_SUN4
|
|
sethi %hi((128 * 1024)), %l7
|
|
#else
|
|
sethi %hi((64 * 1024)), %l7
|
|
#endif
|
|
9:
|
|
vac_hwflush_patch1:
|
|
vac_linesize_patch:
|
|
subcc %l7, 16, %l7
|
|
bne 9b
|
|
vac_hwflush_patch2:
|
|
sta %g0, [%l3 + %l7] ASI_FLUSHSEG
|
|
|
|
st %l5, [%l6 + 0x08] ! entry->vaddr = address
|
|
|
|
ld [%l6 + 0x00], %l5 ! next = entry->next
|
|
ld [%l6 + 0x04], %l7 ! entry->prev
|
|
|
|
st %l7, [%l5 + 0x04] ! next->prev = entry->prev
|
|
st %l5, [%l7 + 0x00] ! entry->prev->next = next
|
|
st %l4, [%l6 + 0x04] ! entry->prev = head
|
|
|
|
ld [%l4 + 0x00], %l7 ! head->next
|
|
|
|
st %l7, [%l6 + 0x00] ! entry->next = head->next
|
|
st %l6, [%l7 + 0x04] ! head->next->prev = entry
|
|
st %l6, [%l4 + 0x00] ! head->next = entry
|
|
|
|
mov %l3, %l5 ! address = tmp
|
|
|
|
4:
|
|
num_context_patch1:
|
|
mov 0x08, %l7
|
|
|
|
ld [%l6 + 0x08], %l4
|
|
ldub [%l6 + 0x0c], %l3
|
|
or %l4, %l3, %l4 ! encode new vaddr/pseg into l4
|
|
|
|
sethi %hi(AC_CONTEXT), %l3
|
|
lduba [%l3] ASI_CONTROL, %l6
|
|
|
|
/* Invalidate old mapping, instantiate new mapping,
|
|
* for each context. Registers l6/l7 are live across
|
|
* this loop.
|
|
*/
|
|
3: deccc %l7
|
|
sethi %hi(AC_CONTEXT), %l3
|
|
stba %l7, [%l3] ASI_CONTROL
|
|
invalid_segment_patch2:
|
|
mov 0x7f, %l3
|
|
stXa %l3, [%l5] ASI_SEGMAP
|
|
andn %l4, 0x1ff, %l3
|
|
bne 3b
|
|
stXa %l4, [%l3] ASI_SEGMAP
|
|
|
|
sethi %hi(AC_CONTEXT), %l3
|
|
stba %l6, [%l3] ASI_CONTROL
|
|
|
|
andn %l4, 0x1ff, %l5
|
|
|
|
1:
|
|
sethi %hi(VMALLOC_START), %l4
|
|
cmp %l5, %l4
|
|
|
|
bgeu 1f
|
|
mov 1 << (SUN4C_REAL_PGDIR_SHIFT - PAGE_SHIFT), %l7
|
|
|
|
sethi %hi(KERNBASE), %l6
|
|
|
|
sub %l5, %l6, %l4
|
|
srl %l4, PAGE_SHIFT, %l4
|
|
sethi %hi((SUN4C_PAGE_KERNEL & 0xf4000000)), %l3
|
|
or %l3, %l4, %l3
|
|
|
|
sethi %hi(PAGE_SIZE), %l4
|
|
|
|
2:
|
|
sta %l3, [%l5] ASI_PTE
|
|
deccc %l7
|
|
inc %l3
|
|
bne 2b
|
|
add %l5, %l4, %l5
|
|
|
|
b 7f
|
|
sethi %hi(sun4c_kernel_faults), %l4
|
|
|
|
1:
|
|
srl %l5, SUN4C_PGDIR_SHIFT, %l3
|
|
sethi %hi(swapper_pg_dir), %l4
|
|
or %l4, %lo(swapper_pg_dir), %l4
|
|
sll %l3, 2, %l3
|
|
ld [%l4 + %l3], %l4
|
|
#ifndef CONFIG_SUN4
|
|
and %l4, PAGE_MASK, %l4
|
|
#else
|
|
sethi %hi(PAGE_MASK), %l6
|
|
and %l4, %l6, %l4
|
|
#endif
|
|
|
|
srl %l5, (PAGE_SHIFT - 2), %l6
|
|
and %l6, ((SUN4C_PTRS_PER_PTE - 1) << 2), %l6
|
|
add %l6, %l4, %l6
|
|
|
|
sethi %hi(PAGE_SIZE), %l4
|
|
|
|
2:
|
|
ld [%l6], %l3
|
|
deccc %l7
|
|
sta %l3, [%l5] ASI_PTE
|
|
add %l6, 0x4, %l6
|
|
bne 2b
|
|
add %l5, %l4, %l5
|
|
|
|
sethi %hi(sun4c_kernel_faults), %l4
|
|
7:
|
|
ld [%l4 + %lo(sun4c_kernel_faults)], %l3
|
|
inc %l3
|
|
st %l3, [%l4 + %lo(sun4c_kernel_faults)]
|
|
|
|
/* Restore condition codes */
|
|
wr %l0, 0x0, %psr
|
|
WRITE_PAUSE
|
|
jmp %l1
|
|
rett %l2
|
|
|
|
sun4c_fault_fromuser:
|
|
SAVE_ALL
|
|
nop
|
|
|
|
mov %l7, %o1 ! Decode the info from %l7
|
|
mov %l7, %o2
|
|
and %o1, 1, %o1 ! arg2 = text_faultp
|
|
mov %l7, %o3
|
|
and %o2, 2, %o2 ! arg3 = writep
|
|
andn %o3, 0xfff, %o3 ! arg4 = faulting address
|
|
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
call do_sun4c_fault
|
|
add %sp, STACKFRAME_SZ, %o0 ! arg1 = pt_regs ptr
|
|
|
|
RESTORE_ALL
|
|
|
|
.align 4
|
|
.globl srmmu_fault
|
|
srmmu_fault:
|
|
mov 0x400, %l5
|
|
mov 0x300, %l4
|
|
|
|
lda [%l5] ASI_M_MMUREGS, %l6 ! read sfar first
|
|
lda [%l4] ASI_M_MMUREGS, %l5 ! read sfsr last
|
|
|
|
andn %l6, 0xfff, %l6
|
|
srl %l5, 6, %l5 ! and encode all info into l7
|
|
|
|
and %l5, 2, %l5
|
|
or %l5, %l6, %l6
|
|
|
|
or %l6, %l7, %l7 ! l7 = [addr,write,txtfault]
|
|
|
|
SAVE_ALL
|
|
|
|
mov %l7, %o1
|
|
mov %l7, %o2
|
|
and %o1, 1, %o1 ! arg2 = text_faultp
|
|
mov %l7, %o3
|
|
and %o2, 2, %o2 ! arg3 = writep
|
|
andn %o3, 0xfff, %o3 ! arg4 = faulting address
|
|
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
call do_sparc_fault
|
|
add %sp, STACKFRAME_SZ, %o0 ! arg1 = pt_regs ptr
|
|
|
|
RESTORE_ALL
|
|
|
|
.align 4
|
|
.globl sys_nis_syscall
|
|
sys_nis_syscall:
|
|
mov %o7, %l5
|
|
add %sp, STACKFRAME_SZ, %o0 ! pt_regs *regs arg
|
|
call c_sys_nis_syscall
|
|
mov %l5, %o7
|
|
|
|
.align 4
|
|
.globl sys_execve
|
|
sys_execve:
|
|
mov %o7, %l5
|
|
add %sp, STACKFRAME_SZ, %o0 ! pt_regs *regs arg
|
|
call sparc_execve
|
|
mov %l5, %o7
|
|
|
|
.globl sunos_execv
|
|
sunos_execv:
|
|
st %g0, [%sp + STACKFRAME_SZ + PT_I2]
|
|
|
|
call sparc_execve
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
|
|
b ret_sys_call
|
|
ld [%sp + STACKFRAME_SZ + PT_I0], %o0
|
|
|
|
.align 4
|
|
.globl sys_pipe
|
|
sys_pipe:
|
|
mov %o7, %l5
|
|
add %sp, STACKFRAME_SZ, %o0 ! pt_regs *regs arg
|
|
call sparc_pipe
|
|
mov %l5, %o7
|
|
|
|
.align 4
|
|
.globl sys_sigaltstack
|
|
sys_sigaltstack:
|
|
mov %o7, %l5
|
|
mov %fp, %o2
|
|
call do_sigaltstack
|
|
mov %l5, %o7
|
|
|
|
.align 4
|
|
.globl sys_sigstack
|
|
sys_sigstack:
|
|
mov %o7, %l5
|
|
mov %fp, %o2
|
|
call do_sys_sigstack
|
|
mov %l5, %o7
|
|
|
|
.align 4
|
|
.globl sys_sigreturn
|
|
sys_sigreturn:
|
|
call do_sigreturn
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
|
|
ld [%curptr + TI_FLAGS], %l5
|
|
andcc %l5, _TIF_SYSCALL_TRACE, %g0
|
|
be 1f
|
|
nop
|
|
|
|
call syscall_trace
|
|
nop
|
|
|
|
1:
|
|
/* We don't want to muck with user registers like a
|
|
* normal syscall, just return.
|
|
*/
|
|
RESTORE_ALL
|
|
|
|
.align 4
|
|
.globl sys_rt_sigreturn
|
|
sys_rt_sigreturn:
|
|
call do_rt_sigreturn
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
|
|
ld [%curptr + TI_FLAGS], %l5
|
|
andcc %l5, _TIF_SYSCALL_TRACE, %g0
|
|
be 1f
|
|
nop
|
|
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
call syscall_trace
|
|
mov 1, %o1
|
|
|
|
1:
|
|
/* We are returning to a signal handler. */
|
|
RESTORE_ALL
|
|
|
|
/* Now that we have a real sys_clone, sys_fork() is
|
|
* implemented in terms of it. Our _real_ implementation
|
|
* of SunOS vfork() will use sys_vfork().
|
|
*
|
|
* XXX These three should be consolidated into mostly shared
|
|
* XXX code just like on sparc64... -DaveM
|
|
*/
|
|
.align 4
|
|
.globl sys_fork, flush_patch_two
|
|
sys_fork:
|
|
mov %o7, %l5
|
|
flush_patch_two:
|
|
FLUSH_ALL_KERNEL_WINDOWS;
|
|
ld [%curptr + TI_TASK], %o4
|
|
rd %psr, %g4
|
|
WRITE_PAUSE
|
|
mov SIGCHLD, %o0 ! arg0: clone flags
|
|
rd %wim, %g5
|
|
WRITE_PAUSE
|
|
mov %fp, %o1 ! arg1: usp
|
|
std %g4, [%o4 + AOFF_task_thread + AOFF_thread_fork_kpsr]
|
|
add %sp, STACKFRAME_SZ, %o2 ! arg2: pt_regs ptr
|
|
mov 0, %o3
|
|
call sparc_do_fork
|
|
mov %l5, %o7
|
|
|
|
/* Whee, kernel threads! */
|
|
.globl sys_clone, flush_patch_three
|
|
sys_clone:
|
|
mov %o7, %l5
|
|
flush_patch_three:
|
|
FLUSH_ALL_KERNEL_WINDOWS;
|
|
ld [%curptr + TI_TASK], %o4
|
|
rd %psr, %g4
|
|
WRITE_PAUSE
|
|
|
|
/* arg0,1: flags,usp -- loaded already */
|
|
cmp %o1, 0x0 ! Is new_usp NULL?
|
|
rd %wim, %g5
|
|
WRITE_PAUSE
|
|
be,a 1f
|
|
mov %fp, %o1 ! yes, use callers usp
|
|
andn %o1, 7, %o1 ! no, align to 8 bytes
|
|
1:
|
|
std %g4, [%o4 + AOFF_task_thread + AOFF_thread_fork_kpsr]
|
|
add %sp, STACKFRAME_SZ, %o2 ! arg2: pt_regs ptr
|
|
mov 0, %o3
|
|
call sparc_do_fork
|
|
mov %l5, %o7
|
|
|
|
/* Whee, real vfork! */
|
|
.globl sys_vfork, flush_patch_four
|
|
sys_vfork:
|
|
flush_patch_four:
|
|
FLUSH_ALL_KERNEL_WINDOWS;
|
|
ld [%curptr + TI_TASK], %o4
|
|
rd %psr, %g4
|
|
WRITE_PAUSE
|
|
rd %wim, %g5
|
|
WRITE_PAUSE
|
|
std %g4, [%o4 + AOFF_task_thread + AOFF_thread_fork_kpsr]
|
|
sethi %hi(0x4000 | 0x0100 | SIGCHLD), %o0
|
|
mov %fp, %o1
|
|
or %o0, %lo(0x4000 | 0x0100 | SIGCHLD), %o0
|
|
sethi %hi(sparc_do_fork), %l1
|
|
mov 0, %o3
|
|
jmpl %l1 + %lo(sparc_do_fork), %g0
|
|
add %sp, STACKFRAME_SZ, %o2
|
|
|
|
.align 4
|
|
linux_sparc_ni_syscall:
|
|
sethi %hi(sys_ni_syscall), %l7
|
|
b syscall_is_too_hard
|
|
or %l7, %lo(sys_ni_syscall), %l7
|
|
|
|
linux_fast_syscall:
|
|
andn %l7, 3, %l7
|
|
mov %i0, %o0
|
|
mov %i1, %o1
|
|
mov %i2, %o2
|
|
jmpl %l7 + %g0, %g0
|
|
mov %i3, %o3
|
|
|
|
linux_syscall_trace:
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
call syscall_trace
|
|
mov 0, %o1
|
|
cmp %o0, 0
|
|
bne 3f
|
|
mov -ENOSYS, %o0
|
|
mov %i0, %o0
|
|
mov %i1, %o1
|
|
mov %i2, %o2
|
|
mov %i3, %o3
|
|
b 2f
|
|
mov %i4, %o4
|
|
|
|
.globl ret_from_fork
|
|
ret_from_fork:
|
|
call schedule_tail
|
|
mov %g3, %o0
|
|
b ret_sys_call
|
|
ld [%sp + STACKFRAME_SZ + PT_I0], %o0
|
|
|
|
/* Linux native system calls enter here... */
|
|
.align 4
|
|
.globl linux_sparc_syscall
|
|
linux_sparc_syscall:
|
|
sethi %hi(PSR_SYSCALL), %l4
|
|
or %l0, %l4, %l0
|
|
/* Direct access to user regs, must faster. */
|
|
cmp %g1, NR_SYSCALLS
|
|
bgeu linux_sparc_ni_syscall
|
|
sll %g1, 2, %l4
|
|
ld [%l7 + %l4], %l7
|
|
andcc %l7, 1, %g0
|
|
bne linux_fast_syscall
|
|
/* Just do first insn from SAVE_ALL in the delay slot */
|
|
|
|
syscall_is_too_hard:
|
|
SAVE_ALL_HEAD
|
|
rd %wim, %l3
|
|
|
|
wr %l0, PSR_ET, %psr
|
|
mov %i0, %o0
|
|
mov %i1, %o1
|
|
mov %i2, %o2
|
|
|
|
ld [%curptr + TI_FLAGS], %l5
|
|
mov %i3, %o3
|
|
andcc %l5, _TIF_SYSCALL_TRACE, %g0
|
|
mov %i4, %o4
|
|
bne linux_syscall_trace
|
|
mov %i0, %l5
|
|
2:
|
|
call %l7
|
|
mov %i5, %o5
|
|
|
|
3:
|
|
st %o0, [%sp + STACKFRAME_SZ + PT_I0]
|
|
|
|
ret_sys_call:
|
|
ld [%curptr + TI_FLAGS], %l6
|
|
cmp %o0, -ERESTART_RESTARTBLOCK
|
|
ld [%sp + STACKFRAME_SZ + PT_PSR], %g3
|
|
set PSR_C, %g2
|
|
bgeu 1f
|
|
andcc %l6, _TIF_SYSCALL_TRACE, %g0
|
|
|
|
/* System call success, clear Carry condition code. */
|
|
andn %g3, %g2, %g3
|
|
clr %l6
|
|
st %g3, [%sp + STACKFRAME_SZ + PT_PSR]
|
|
bne linux_syscall_trace2
|
|
ld [%sp + STACKFRAME_SZ + PT_NPC], %l1 /* pc = npc */
|
|
add %l1, 0x4, %l2 /* npc = npc+4 */
|
|
st %l1, [%sp + STACKFRAME_SZ + PT_PC]
|
|
b ret_trap_entry
|
|
st %l2, [%sp + STACKFRAME_SZ + PT_NPC]
|
|
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
|
|
st %o0, [%sp + STACKFRAME_SZ + PT_I0]
|
|
mov 1, %l6
|
|
st %g3, [%sp + STACKFRAME_SZ + PT_PSR]
|
|
bne linux_syscall_trace2
|
|
ld [%sp + STACKFRAME_SZ + PT_NPC], %l1 /* pc = npc */
|
|
add %l1, 0x4, %l2 /* npc = npc+4 */
|
|
st %l1, [%sp + STACKFRAME_SZ + PT_PC]
|
|
b ret_trap_entry
|
|
st %l2, [%sp + STACKFRAME_SZ + PT_NPC]
|
|
|
|
linux_syscall_trace2:
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
mov 1, %o1
|
|
call syscall_trace
|
|
add %l1, 0x4, %l2 /* npc = npc+4 */
|
|
st %l1, [%sp + STACKFRAME_SZ + PT_PC]
|
|
b ret_trap_entry
|
|
st %l2, [%sp + STACKFRAME_SZ + PT_NPC]
|
|
|
|
|
|
/* Saving and restoring the FPU state is best done from lowlevel code.
|
|
*
|
|
* void fpsave(unsigned long *fpregs, unsigned long *fsr,
|
|
* void *fpqueue, unsigned long *fpqdepth)
|
|
*/
|
|
|
|
.globl fpsave
|
|
fpsave:
|
|
st %fsr, [%o1] ! this can trap on us if fpu is in bogon state
|
|
ld [%o1], %g1
|
|
set 0x2000, %g4
|
|
andcc %g1, %g4, %g0
|
|
be 2f
|
|
mov 0, %g2
|
|
|
|
/* We have an fpqueue to save. */
|
|
1:
|
|
std %fq, [%o2]
|
|
fpsave_magic:
|
|
st %fsr, [%o1]
|
|
ld [%o1], %g3
|
|
andcc %g3, %g4, %g0
|
|
add %g2, 1, %g2
|
|
bne 1b
|
|
add %o2, 8, %o2
|
|
|
|
2:
|
|
st %g2, [%o3]
|
|
|
|
std %f0, [%o0 + 0x00]
|
|
std %f2, [%o0 + 0x08]
|
|
std %f4, [%o0 + 0x10]
|
|
std %f6, [%o0 + 0x18]
|
|
std %f8, [%o0 + 0x20]
|
|
std %f10, [%o0 + 0x28]
|
|
std %f12, [%o0 + 0x30]
|
|
std %f14, [%o0 + 0x38]
|
|
std %f16, [%o0 + 0x40]
|
|
std %f18, [%o0 + 0x48]
|
|
std %f20, [%o0 + 0x50]
|
|
std %f22, [%o0 + 0x58]
|
|
std %f24, [%o0 + 0x60]
|
|
std %f26, [%o0 + 0x68]
|
|
std %f28, [%o0 + 0x70]
|
|
retl
|
|
std %f30, [%o0 + 0x78]
|
|
|
|
/* Thanks for Theo Deraadt and the authors of the Sprite/netbsd/openbsd
|
|
* code for pointing out this possible deadlock, while we save state
|
|
* above we could trap on the fsr store so our low level fpu trap
|
|
* code has to know how to deal with this.
|
|
*/
|
|
fpsave_catch:
|
|
b fpsave_magic + 4
|
|
st %fsr, [%o1]
|
|
|
|
fpsave_catch2:
|
|
b fpsave + 4
|
|
st %fsr, [%o1]
|
|
|
|
/* void fpload(unsigned long *fpregs, unsigned long *fsr); */
|
|
|
|
.globl fpload
|
|
fpload:
|
|
ldd [%o0 + 0x00], %f0
|
|
ldd [%o0 + 0x08], %f2
|
|
ldd [%o0 + 0x10], %f4
|
|
ldd [%o0 + 0x18], %f6
|
|
ldd [%o0 + 0x20], %f8
|
|
ldd [%o0 + 0x28], %f10
|
|
ldd [%o0 + 0x30], %f12
|
|
ldd [%o0 + 0x38], %f14
|
|
ldd [%o0 + 0x40], %f16
|
|
ldd [%o0 + 0x48], %f18
|
|
ldd [%o0 + 0x50], %f20
|
|
ldd [%o0 + 0x58], %f22
|
|
ldd [%o0 + 0x60], %f24
|
|
ldd [%o0 + 0x68], %f26
|
|
ldd [%o0 + 0x70], %f28
|
|
ldd [%o0 + 0x78], %f30
|
|
ld [%o1], %fsr
|
|
retl
|
|
nop
|
|
|
|
/* __ndelay and __udelay take two arguments:
|
|
* 0 - nsecs or usecs to delay
|
|
* 1 - per_cpu udelay_val (loops per jiffy)
|
|
*
|
|
* Note that ndelay gives HZ times higher resolution but has a 10ms
|
|
* limit. udelay can handle up to 1s.
|
|
*/
|
|
.globl __ndelay
|
|
__ndelay:
|
|
save %sp, -STACKFRAME_SZ, %sp
|
|
mov %i0, %o0
|
|
call .umul ! round multiplier up so large ns ok
|
|
mov 0x1ae, %o1 ! 2**32 / (1 000 000 000 / HZ)
|
|
call .umul
|
|
mov %i1, %o1 ! udelay_val
|
|
ba delay_continue
|
|
mov %o1, %o0 ! >>32 later for better resolution
|
|
|
|
.globl __udelay
|
|
__udelay:
|
|
save %sp, -STACKFRAME_SZ, %sp
|
|
mov %i0, %o0
|
|
sethi %hi(0x10c7), %o1 ! round multiplier up so large us ok
|
|
call .umul
|
|
or %o1, %lo(0x10c7), %o1 ! 2**32 / 1 000 000
|
|
call .umul
|
|
mov %i1, %o1 ! udelay_val
|
|
sethi %hi(0x028f4b62), %l0 ! Add in rounding constant * 2**32,
|
|
or %g0, %lo(0x028f4b62), %l0
|
|
addcc %o0, %l0, %o0 ! 2**32 * 0.009 999
|
|
bcs,a 3f
|
|
add %o1, 0x01, %o1
|
|
3:
|
|
call .umul
|
|
mov HZ, %o0 ! >>32 earlier for wider range
|
|
|
|
delay_continue:
|
|
cmp %o0, 0x0
|
|
1:
|
|
bne 1b
|
|
subcc %o0, 1, %o0
|
|
|
|
ret
|
|
restore
|
|
|
|
/* Handle a software breakpoint */
|
|
/* We have to inform parent that child has stopped */
|
|
.align 4
|
|
.globl breakpoint_trap
|
|
breakpoint_trap:
|
|
rd %wim,%l3
|
|
SAVE_ALL
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
st %i0, [%sp + STACKFRAME_SZ + PT_G0] ! for restarting syscalls
|
|
call sparc_breakpoint
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
|
|
RESTORE_ALL
|
|
|
|
#ifdef CONFIG_KGDB
|
|
.align 4
|
|
.globl kgdb_trap_low
|
|
.type kgdb_trap_low,#function
|
|
kgdb_trap_low:
|
|
rd %wim,%l3
|
|
SAVE_ALL
|
|
wr %l0, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
call kgdb_trap
|
|
add %sp, STACKFRAME_SZ, %o0
|
|
|
|
RESTORE_ALL
|
|
.size kgdb_trap_low,.-kgdb_trap_low
|
|
#endif
|
|
|
|
.align 4
|
|
.globl flush_patch_exception
|
|
flush_patch_exception:
|
|
FLUSH_ALL_KERNEL_WINDOWS;
|
|
ldd [%o0], %o6
|
|
jmpl %o7 + 0xc, %g0 ! see asm-sparc/processor.h
|
|
mov 1, %g1 ! signal EFAULT condition
|
|
|
|
.align 4
|
|
.globl kill_user_windows, kuw_patch1_7win
|
|
.globl kuw_patch1
|
|
kuw_patch1_7win: sll %o3, 6, %o3
|
|
|
|
/* No matter how much overhead this routine has in the worst
|
|
* case scenerio, it is several times better than taking the
|
|
* traps with the old method of just doing flush_user_windows().
|
|
*/
|
|
kill_user_windows:
|
|
ld [%g6 + TI_UWINMASK], %o0 ! get current umask
|
|
orcc %g0, %o0, %g0 ! if no bits set, we are done
|
|
be 3f ! nothing to do
|
|
rd %psr, %o5 ! must clear interrupts
|
|
or %o5, PSR_PIL, %o4 ! or else that could change
|
|
wr %o4, 0x0, %psr ! the uwinmask state
|
|
WRITE_PAUSE ! burn them cycles
|
|
1:
|
|
ld [%g6 + TI_UWINMASK], %o0 ! get consistent state
|
|
orcc %g0, %o0, %g0 ! did an interrupt come in?
|
|
be 4f ! yep, we are done
|
|
rd %wim, %o3 ! get current wim
|
|
srl %o3, 1, %o4 ! simulate a save
|
|
kuw_patch1:
|
|
sll %o3, 7, %o3 ! compute next wim
|
|
or %o4, %o3, %o3 ! result
|
|
andncc %o0, %o3, %o0 ! clean this bit in umask
|
|
bne kuw_patch1 ! not done yet
|
|
srl %o3, 1, %o4 ! begin another save simulation
|
|
wr %o3, 0x0, %wim ! set the new wim
|
|
st %g0, [%g6 + TI_UWINMASK] ! clear uwinmask
|
|
4:
|
|
wr %o5, 0x0, %psr ! re-enable interrupts
|
|
WRITE_PAUSE ! burn baby burn
|
|
3:
|
|
retl ! return
|
|
st %g0, [%g6 + TI_W_SAVED] ! no windows saved
|
|
|
|
.align 4
|
|
.globl restore_current
|
|
restore_current:
|
|
LOAD_CURRENT(g6, o0)
|
|
retl
|
|
nop
|
|
|
|
#ifdef CONFIG_PCI
|
|
#include <asm/pcic.h>
|
|
|
|
.align 4
|
|
.globl linux_trap_ipi15_pcic
|
|
linux_trap_ipi15_pcic:
|
|
rd %wim, %l3
|
|
SAVE_ALL
|
|
|
|
/*
|
|
* First deactivate NMI
|
|
* or we cannot drop ET, cannot get window spill traps.
|
|
* The busy loop is necessary because the PIO error
|
|
* sometimes does not go away quickly and we trap again.
|
|
*/
|
|
sethi %hi(pcic_regs), %o1
|
|
ld [%o1 + %lo(pcic_regs)], %o2
|
|
|
|
! Get pending status for printouts later.
|
|
ld [%o2 + PCI_SYS_INT_PENDING], %o0
|
|
|
|
mov PCI_SYS_INT_PENDING_CLEAR_ALL, %o1
|
|
stb %o1, [%o2 + PCI_SYS_INT_PENDING_CLEAR]
|
|
1:
|
|
ld [%o2 + PCI_SYS_INT_PENDING], %o1
|
|
andcc %o1, ((PCI_SYS_INT_PENDING_PIO|PCI_SYS_INT_PENDING_PCI)>>24), %g0
|
|
bne 1b
|
|
nop
|
|
|
|
or %l0, PSR_PIL, %l4
|
|
wr %l4, 0x0, %psr
|
|
WRITE_PAUSE
|
|
wr %l4, PSR_ET, %psr
|
|
WRITE_PAUSE
|
|
|
|
call pcic_nmi
|
|
add %sp, STACKFRAME_SZ, %o1 ! struct pt_regs *regs
|
|
RESTORE_ALL
|
|
|
|
.globl pcic_nmi_trap_patch
|
|
pcic_nmi_trap_patch:
|
|
sethi %hi(linux_trap_ipi15_pcic), %l3
|
|
jmpl %l3 + %lo(linux_trap_ipi15_pcic), %g0
|
|
rd %psr, %l0
|
|
.word 0
|
|
|
|
#endif /* CONFIG_PCI */
|
|
|
|
.globl flushw_all
|
|
flushw_all:
|
|
save %sp, -0x40, %sp
|
|
save %sp, -0x40, %sp
|
|
save %sp, -0x40, %sp
|
|
save %sp, -0x40, %sp
|
|
save %sp, -0x40, %sp
|
|
save %sp, -0x40, %sp
|
|
save %sp, -0x40, %sp
|
|
restore
|
|
restore
|
|
restore
|
|
restore
|
|
restore
|
|
restore
|
|
ret
|
|
restore
|
|
|
|
/* End of entry.S */
|