| /* 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 */ |