xref: /linux-6.15/arch/xtensa/kernel/entry.S (revision 01858d1b)
15a0015d6SChris Zankel/*
25a0015d6SChris Zankel * arch/xtensa/kernel/entry.S
35a0015d6SChris Zankel *
45a0015d6SChris Zankel * Low-level exception handling
55a0015d6SChris Zankel *
65a0015d6SChris Zankel * This file is subject to the terms and conditions of the GNU General Public
75a0015d6SChris Zankel * License.  See the file "COPYING" in the main directory of this archive
85a0015d6SChris Zankel * for more details.
95a0015d6SChris Zankel *
105a0015d6SChris Zankel * Copyright (C) 2004-2005 by Tensilica Inc.
115a0015d6SChris Zankel *
125a0015d6SChris Zankel * Chris Zankel <[email protected]>
135a0015d6SChris Zankel *
145a0015d6SChris Zankel */
155a0015d6SChris Zankel
165a0015d6SChris Zankel#include <linux/linkage.h>
170013a854SSam Ravnborg#include <asm/asm-offsets.h>
185a0015d6SChris Zankel#include <asm/processor.h>
195a0015d6SChris Zankel#include <asm/thread_info.h>
205a0015d6SChris Zankel#include <asm/uaccess.h>
215a0015d6SChris Zankel#include <asm/unistd.h>
225a0015d6SChris Zankel#include <asm/ptrace.h>
235a0015d6SChris Zankel#include <asm/current.h>
245a0015d6SChris Zankel#include <asm/pgtable.h>
255a0015d6SChris Zankel#include <asm/page.h>
265a0015d6SChris Zankel#include <asm/signal.h>
27173d6681SChris Zankel#include <asm/tlbflush.h>
285a0015d6SChris Zankel
295a0015d6SChris Zankel/* Unimplemented features. */
305a0015d6SChris Zankel
315a0015d6SChris Zankel#undef SIGNAL_HANDLING_IN_DOUBLE_EXCEPTION
325a0015d6SChris Zankel#undef KERNEL_STACK_OVERFLOW_CHECK
335a0015d6SChris Zankel#undef PREEMPTIBLE_KERNEL
345a0015d6SChris Zankel#undef ALLOCA_EXCEPTION_IN_IRAM
355a0015d6SChris Zankel
365a0015d6SChris Zankel/* Not well tested.
375a0015d6SChris Zankel *
385a0015d6SChris Zankel * - fast_coprocessor
395a0015d6SChris Zankel */
405a0015d6SChris Zankel
415a0015d6SChris Zankel/*
425a0015d6SChris Zankel * Macro to find first bit set in WINDOWBASE from the left + 1
435a0015d6SChris Zankel *
445a0015d6SChris Zankel * 100....0 -> 1
455a0015d6SChris Zankel * 010....0 -> 2
465a0015d6SChris Zankel * 000....1 -> WSBITS
475a0015d6SChris Zankel */
485a0015d6SChris Zankel
495a0015d6SChris Zankel	.macro ffs_ws bit mask
505a0015d6SChris Zankel
515a0015d6SChris Zankel#if XCHAL_HAVE_NSA
525a0015d6SChris Zankel	nsau    \bit, \mask			# 32-WSBITS ... 31 (32 iff 0)
535a0015d6SChris Zankel	addi    \bit, \bit, WSBITS - 32 + 1   	# uppest bit set -> return 1
545a0015d6SChris Zankel#else
555a0015d6SChris Zankel	movi    \bit, WSBITS
565a0015d6SChris Zankel#if WSBITS > 16
575a0015d6SChris Zankel	_bltui  \mask, 0x10000, 99f
585a0015d6SChris Zankel	addi    \bit, \bit, -16
595a0015d6SChris Zankel	extui   \mask, \mask, 16, 16
605a0015d6SChris Zankel#endif
615a0015d6SChris Zankel#if WSBITS > 8
625a0015d6SChris Zankel99:	_bltui  \mask, 0x100, 99f
635a0015d6SChris Zankel	addi    \bit, \bit, -8
645a0015d6SChris Zankel	srli    \mask, \mask, 8
655a0015d6SChris Zankel#endif
665a0015d6SChris Zankel99:	_bltui  \mask, 0x10, 99f
675a0015d6SChris Zankel	addi    \bit, \bit, -4
685a0015d6SChris Zankel	srli    \mask, \mask, 4
695a0015d6SChris Zankel99:	_bltui  \mask, 0x4, 99f
705a0015d6SChris Zankel	addi    \bit, \bit, -2
715a0015d6SChris Zankel	srli    \mask, \mask, 2
725a0015d6SChris Zankel99:	_bltui  \mask, 0x2, 99f
735a0015d6SChris Zankel	addi    \bit, \bit, -1
745a0015d6SChris Zankel99:
755a0015d6SChris Zankel
765a0015d6SChris Zankel#endif
775a0015d6SChris Zankel	.endm
785a0015d6SChris Zankel
795a0015d6SChris Zankel/* ----------------- DEFAULT FIRST LEVEL EXCEPTION HANDLERS ----------------- */
805a0015d6SChris Zankel
815a0015d6SChris Zankel/*
825a0015d6SChris Zankel * First-level exception handler for user exceptions.
835a0015d6SChris Zankel * Save some special registers, extra states and all registers in the AR
845a0015d6SChris Zankel * register file that were in use in the user task, and jump to the common
855a0015d6SChris Zankel * exception code.
865a0015d6SChris Zankel * We save SAR (used to calculate WMASK), and WB and WS (we don't have to
875a0015d6SChris Zankel * save them for kernel exceptions).
885a0015d6SChris Zankel *
895a0015d6SChris Zankel * Entry condition for user_exception:
905a0015d6SChris Zankel *
915a0015d6SChris Zankel *   a0:	trashed, original value saved on stack (PT_AREG0)
925a0015d6SChris Zankel *   a1:	a1
935a0015d6SChris Zankel *   a2:	new stack pointer, original value in depc
945a0015d6SChris Zankel *   a3:	dispatch table
955a0015d6SChris Zankel *   depc:	a2, original value saved on stack (PT_DEPC)
965a0015d6SChris Zankel *   excsave1:	a3
975a0015d6SChris Zankel *
985a0015d6SChris Zankel *   PT_DEPC >= VALID_DOUBLE_EXCEPTION_ADDRESS: double exception, DEPC
995a0015d6SChris Zankel *	     <  VALID_DOUBLE_EXCEPTION_ADDRESS: regular exception
1005a0015d6SChris Zankel *
1015a0015d6SChris Zankel * Entry condition for _user_exception:
1025a0015d6SChris Zankel *
1035a0015d6SChris Zankel *   a0-a3 and depc have been saved to PT_AREG0...PT_AREG3 and PT_DEPC
1045a0015d6SChris Zankel *   excsave has been restored, and
1055a0015d6SChris Zankel *   stack pointer (a1) has been set.
1065a0015d6SChris Zankel *
1075a0015d6SChris Zankel * Note: _user_exception might be at an odd adress. Don't use call0..call12
1085a0015d6SChris Zankel */
1095a0015d6SChris Zankel
1105a0015d6SChris ZankelENTRY(user_exception)
1115a0015d6SChris Zankel
1125a0015d6SChris Zankel	/* Save a2, a3, and depc, restore excsave_1 and set SP. */
1135a0015d6SChris Zankel
1145a0015d6SChris Zankel	xsr	a3, EXCSAVE_1
1155a0015d6SChris Zankel	rsr	a0, DEPC
1165a0015d6SChris Zankel	s32i	a1, a2, PT_AREG1
1175a0015d6SChris Zankel	s32i	a0, a2, PT_AREG2
1185a0015d6SChris Zankel	s32i	a3, a2, PT_AREG3
1195a0015d6SChris Zankel	mov	a1, a2
1205a0015d6SChris Zankel
1215a0015d6SChris Zankel	.globl _user_exception
1225a0015d6SChris Zankel_user_exception:
1235a0015d6SChris Zankel
1245a0015d6SChris Zankel	/* Save SAR and turn off single stepping */
1255a0015d6SChris Zankel
1265a0015d6SChris Zankel	movi	a2, 0
1275a0015d6SChris Zankel	rsr	a3, SAR
12829c4dfd9SChris Zankel	xsr	a2, ICOUNTLEVEL
1295a0015d6SChris Zankel	s32i	a3, a1, PT_SAR
13029c4dfd9SChris Zankel	s32i	a2, a1, PT_ICOUNTLEVEL
1315a0015d6SChris Zankel
1325a0015d6SChris Zankel	/* Rotate ws so that the current windowbase is at bit0. */
1335a0015d6SChris Zankel	/* Assume ws = xxwww1yyyy. Rotate ws right, so that a2 = yyyyxxwww1 */
1345a0015d6SChris Zankel
1355a0015d6SChris Zankel	rsr	a2, WINDOWBASE
1365a0015d6SChris Zankel	rsr	a3, WINDOWSTART
1375a0015d6SChris Zankel	ssr	a2
1385a0015d6SChris Zankel	s32i	a2, a1, PT_WINDOWBASE
1395a0015d6SChris Zankel	s32i	a3, a1, PT_WINDOWSTART
1405a0015d6SChris Zankel	slli	a2, a3, 32-WSBITS
1415a0015d6SChris Zankel	src	a2, a3, a2
1425a0015d6SChris Zankel	srli	a2, a2, 32-WSBITS
1435a0015d6SChris Zankel	s32i	a2, a1, PT_WMASK	# needed for restoring registers
1445a0015d6SChris Zankel
1455a0015d6SChris Zankel	/* Save only live registers. */
1465a0015d6SChris Zankel
1475a0015d6SChris Zankel	_bbsi.l	a2, 1, 1f
1485a0015d6SChris Zankel	s32i	a4, a1, PT_AREG4
1495a0015d6SChris Zankel	s32i	a5, a1, PT_AREG5
1505a0015d6SChris Zankel	s32i	a6, a1, PT_AREG6
1515a0015d6SChris Zankel	s32i	a7, a1, PT_AREG7
1525a0015d6SChris Zankel	_bbsi.l	a2, 2, 1f
1535a0015d6SChris Zankel	s32i	a8, a1, PT_AREG8
1545a0015d6SChris Zankel	s32i	a9, a1, PT_AREG9
1555a0015d6SChris Zankel	s32i	a10, a1, PT_AREG10
1565a0015d6SChris Zankel	s32i	a11, a1, PT_AREG11
1575a0015d6SChris Zankel	_bbsi.l	a2, 3, 1f
1585a0015d6SChris Zankel	s32i	a12, a1, PT_AREG12
1595a0015d6SChris Zankel	s32i	a13, a1, PT_AREG13
1605a0015d6SChris Zankel	s32i	a14, a1, PT_AREG14
1615a0015d6SChris Zankel	s32i	a15, a1, PT_AREG15
1625a0015d6SChris Zankel	_bnei	a2, 1, 1f		# only one valid frame?
1635a0015d6SChris Zankel
1645a0015d6SChris Zankel	/* Only one valid frame, skip saving regs. */
1655a0015d6SChris Zankel
1665a0015d6SChris Zankel	j	2f
1675a0015d6SChris Zankel
1685a0015d6SChris Zankel	/* Save the remaining registers.
1695a0015d6SChris Zankel	 * We have to save all registers up to the first '1' from
1705a0015d6SChris Zankel	 * the right, except the current frame (bit 0).
1715a0015d6SChris Zankel	 * Assume a2 is:  001001000110001
1725a0015d6SChris Zankel	 * All regiser frames starting from the top fiel to the marked '1'
1735a0015d6SChris Zankel	 * must be saved.
1745a0015d6SChris Zankel	 */
1755a0015d6SChris Zankel
1765a0015d6SChris Zankel1:	addi	a3, a2, -1		# eliminate '1' in bit 0: yyyyxxww0
1775a0015d6SChris Zankel	neg	a3, a3			# yyyyxxww0 -> YYYYXXWW1+1
1785a0015d6SChris Zankel	and	a3, a3, a2		# max. only one bit is set
1795a0015d6SChris Zankel
1805a0015d6SChris Zankel	/* Find number of frames to save */
1815a0015d6SChris Zankel
1825a0015d6SChris Zankel	ffs_ws	a0, a3			# number of frames to the '1' from left
1835a0015d6SChris Zankel
1845a0015d6SChris Zankel	/* Store information into WMASK:
1855a0015d6SChris Zankel	 * bits 0..3: xxx1 masked lower 4 bits of the rotated windowstart,
1865a0015d6SChris Zankel	 * bits 4...: number of valid 4-register frames
1875a0015d6SChris Zankel	 */
1885a0015d6SChris Zankel
1895a0015d6SChris Zankel	slli	a3, a0, 4		# number of frames to save in bits 8..4
1905a0015d6SChris Zankel	extui	a2, a2, 0, 4		# mask for the first 16 registers
1915a0015d6SChris Zankel	or	a2, a3, a2
1925a0015d6SChris Zankel	s32i	a2, a1, PT_WMASK	# needed when we restore the reg-file
1935a0015d6SChris Zankel
1945a0015d6SChris Zankel	/* Save 4 registers at a time */
1955a0015d6SChris Zankel
1965a0015d6SChris Zankel1:	rotw	-1
1975a0015d6SChris Zankel	s32i	a0, a5, PT_AREG_END - 16
1985a0015d6SChris Zankel	s32i	a1, a5, PT_AREG_END - 12
1995a0015d6SChris Zankel	s32i	a2, a5, PT_AREG_END - 8
2005a0015d6SChris Zankel	s32i	a3, a5, PT_AREG_END - 4
2015a0015d6SChris Zankel	addi	a0, a4, -1
2025a0015d6SChris Zankel	addi	a1, a5, -16
2035a0015d6SChris Zankel	_bnez	a0, 1b
2045a0015d6SChris Zankel
2055a0015d6SChris Zankel	/* WINDOWBASE still in SAR! */
2065a0015d6SChris Zankel
2075a0015d6SChris Zankel	rsr	a2, SAR			# original WINDOWBASE
2085a0015d6SChris Zankel	movi	a3, 1
2095a0015d6SChris Zankel	ssl	a2
2105a0015d6SChris Zankel	sll	a3, a3
2115a0015d6SChris Zankel	wsr	a3, WINDOWSTART		# set corresponding WINDOWSTART bit
2125a0015d6SChris Zankel	wsr	a2, WINDOWBASE		# and WINDOWSTART
2135a0015d6SChris Zankel	rsync
2145a0015d6SChris Zankel
2155a0015d6SChris Zankel	/* We are back to the original stack pointer (a1) */
2165a0015d6SChris Zankel
2175a0015d6SChris Zankel2:
2185a0015d6SChris Zankel#if XCHAL_EXTRA_SA_SIZE
2195a0015d6SChris Zankel
2205a0015d6SChris Zankel	/* For user exceptions, save the extra state into the user's TCB.
2215a0015d6SChris Zankel	 * Note: We must assume that xchal_extra_store_funcbody destroys a2..a15
2225a0015d6SChris Zankel	 */
2235a0015d6SChris Zankel
2245a0015d6SChris Zankel	GET_CURRENT(a2,a1)
2255a0015d6SChris Zankel	addi	a2, a2, THREAD_CP_SAVE
2265a0015d6SChris Zankel	xchal_extra_store_funcbody
2275a0015d6SChris Zankel#endif
2285a0015d6SChris Zankel
2295a0015d6SChris Zankel	/* Now, jump to the common exception handler. */
2305a0015d6SChris Zankel
2315a0015d6SChris Zankel	j	common_exception
2325a0015d6SChris Zankel
2335a0015d6SChris Zankel
2345a0015d6SChris Zankel/*
2355a0015d6SChris Zankel * First-level exit handler for kernel exceptions
2365a0015d6SChris Zankel * Save special registers and the live window frame.
2375a0015d6SChris Zankel * Note: Even though we changes the stack pointer, we don't have to do a
2385a0015d6SChris Zankel *	 MOVSP here, as we do that when we return from the exception.
2395a0015d6SChris Zankel *	 (See comment in the kernel exception exit code)
2405a0015d6SChris Zankel *
2415a0015d6SChris Zankel * Entry condition for kernel_exception:
2425a0015d6SChris Zankel *
2435a0015d6SChris Zankel *   a0:	trashed, original value saved on stack (PT_AREG0)
2445a0015d6SChris Zankel *   a1:	a1
2455a0015d6SChris Zankel *   a2:	new stack pointer, original in DEPC
2465a0015d6SChris Zankel *   a3:	dispatch table
2475a0015d6SChris Zankel *   depc:	a2, original value saved on stack (PT_DEPC)
2485a0015d6SChris Zankel *   excsave_1:	a3
2495a0015d6SChris Zankel *
2505a0015d6SChris Zankel *   PT_DEPC >= VALID_DOUBLE_EXCEPTION_ADDRESS: double exception, DEPC
2515a0015d6SChris Zankel *	     <  VALID_DOUBLE_EXCEPTION_ADDRESS: regular exception
2525a0015d6SChris Zankel *
2535a0015d6SChris Zankel * Entry condition for _kernel_exception:
2545a0015d6SChris Zankel *
2555a0015d6SChris Zankel *   a0-a3 and depc have been saved to PT_AREG0...PT_AREG3 and PT_DEPC
2565a0015d6SChris Zankel *   excsave has been restored, and
2575a0015d6SChris Zankel *   stack pointer (a1) has been set.
2585a0015d6SChris Zankel *
2595a0015d6SChris Zankel * Note: _kernel_exception might be at an odd adress. Don't use call0..call12
2605a0015d6SChris Zankel */
2615a0015d6SChris Zankel
2625a0015d6SChris ZankelENTRY(kernel_exception)
2635a0015d6SChris Zankel
2645a0015d6SChris Zankel	/* Save a0, a2, a3, DEPC and set SP. */
2655a0015d6SChris Zankel
2665a0015d6SChris Zankel	xsr	a3, EXCSAVE_1		# restore a3, excsave_1
2675a0015d6SChris Zankel	rsr	a0, DEPC		# get a2
2685a0015d6SChris Zankel	s32i	a1, a2, PT_AREG1
2695a0015d6SChris Zankel	s32i	a0, a2, PT_AREG2
2705a0015d6SChris Zankel	s32i	a3, a2, PT_AREG3
2715a0015d6SChris Zankel	mov	a1, a2
2725a0015d6SChris Zankel
2735a0015d6SChris Zankel	.globl _kernel_exception
2745a0015d6SChris Zankel_kernel_exception:
2755a0015d6SChris Zankel
2765a0015d6SChris Zankel	/* Save SAR and turn off single stepping */
2775a0015d6SChris Zankel
2785a0015d6SChris Zankel	movi	a2, 0
2795a0015d6SChris Zankel	rsr	a3, SAR
28029c4dfd9SChris Zankel	xsr	a2, ICOUNTLEVEL
2815a0015d6SChris Zankel	s32i	a3, a1, PT_SAR
28229c4dfd9SChris Zankel	s32i	a2, a1, PT_ICOUNTLEVEL
2835a0015d6SChris Zankel
2845a0015d6SChris Zankel	/* Rotate ws so that the current windowbase is at bit0. */
2855a0015d6SChris Zankel	/* Assume ws = xxwww1yyyy. Rotate ws right, so that a2 = yyyyxxwww1 */
2865a0015d6SChris Zankel
2875a0015d6SChris Zankel	rsr	a2, WINDOWBASE		# don't need to save these, we only
2885a0015d6SChris Zankel	rsr	a3, WINDOWSTART		# need shifted windowstart: windowmask
2895a0015d6SChris Zankel	ssr	a2
2905a0015d6SChris Zankel	slli	a2, a3, 32-WSBITS
2915a0015d6SChris Zankel	src	a2, a3, a2
2925a0015d6SChris Zankel	srli	a2, a2, 32-WSBITS
2935a0015d6SChris Zankel	s32i	a2, a1, PT_WMASK	# needed for kernel_exception_exit
2945a0015d6SChris Zankel
2955a0015d6SChris Zankel	/* Save only the live window-frame */
2965a0015d6SChris Zankel
2975a0015d6SChris Zankel	_bbsi.l	a2, 1, 1f
2985a0015d6SChris Zankel	s32i	a4, a1, PT_AREG4
2995a0015d6SChris Zankel	s32i	a5, a1, PT_AREG5
3005a0015d6SChris Zankel	s32i	a6, a1, PT_AREG6
3015a0015d6SChris Zankel	s32i	a7, a1, PT_AREG7
3025a0015d6SChris Zankel	_bbsi.l	a2, 2, 1f
3035a0015d6SChris Zankel	s32i	a8, a1, PT_AREG8
3045a0015d6SChris Zankel	s32i	a9, a1, PT_AREG9
3055a0015d6SChris Zankel	s32i	a10, a1, PT_AREG10
3065a0015d6SChris Zankel	s32i	a11, a1, PT_AREG11
3075a0015d6SChris Zankel	_bbsi.l	a2, 3, 1f
3085a0015d6SChris Zankel	s32i	a12, a1, PT_AREG12
3095a0015d6SChris Zankel	s32i	a13, a1, PT_AREG13
3105a0015d6SChris Zankel	s32i	a14, a1, PT_AREG14
3115a0015d6SChris Zankel	s32i	a15, a1, PT_AREG15
3125a0015d6SChris Zankel
3135a0015d6SChris Zankel1:
3145a0015d6SChris Zankel
3155a0015d6SChris Zankel#ifdef KERNEL_STACK_OVERFLOW_CHECK
3165a0015d6SChris Zankel
3175a0015d6SChris Zankel	/*  Stack overflow check, for debugging  */
3185a0015d6SChris Zankel	extui	a2, a1, TASK_SIZE_BITS,XX
3195a0015d6SChris Zankel	movi	a3, SIZE??
3205a0015d6SChris Zankel	_bge	a2, a3, out_of_stack_panic
3215a0015d6SChris Zankel
3225a0015d6SChris Zankel#endif
3235a0015d6SChris Zankel
3245a0015d6SChris Zankel/*
3255a0015d6SChris Zankel * This is the common exception handler.
3265a0015d6SChris Zankel * We get here from the user exception handler or simply by falling through
3275a0015d6SChris Zankel * from the kernel exception handler.
3285a0015d6SChris Zankel * Save the remaining special registers, switch to kernel mode, and jump
3295a0015d6SChris Zankel * to the second-level exception handler.
3305a0015d6SChris Zankel *
3315a0015d6SChris Zankel */
3325a0015d6SChris Zankel
3335a0015d6SChris Zankelcommon_exception:
3345a0015d6SChris Zankel
33529c4dfd9SChris Zankel	/* Save some registers, disable loops and clear the syscall flag. */
3365a0015d6SChris Zankel
3375a0015d6SChris Zankel	rsr	a2, DEBUGCAUSE
3385a0015d6SChris Zankel	rsr	a3, EPC_1
3395a0015d6SChris Zankel	s32i	a2, a1, PT_DEBUGCAUSE
3405a0015d6SChris Zankel	s32i	a3, a1, PT_PC
3415a0015d6SChris Zankel
34229c4dfd9SChris Zankel	movi	a2, -1
3435a0015d6SChris Zankel	rsr	a3, EXCVADDR
34429c4dfd9SChris Zankel	s32i	a2, a1, PT_SYSCALL
3455a0015d6SChris Zankel	movi	a2, 0
3465a0015d6SChris Zankel	s32i	a3, a1, PT_EXCVADDR
3475a0015d6SChris Zankel	xsr	a2, LCOUNT
3485a0015d6SChris Zankel	s32i	a2, a1, PT_LCOUNT
3495a0015d6SChris Zankel
3505a0015d6SChris Zankel	/* It is now save to restore the EXC_TABLE_FIXUP variable. */
3515a0015d6SChris Zankel
3525a0015d6SChris Zankel	rsr	a0, EXCCAUSE
3535a0015d6SChris Zankel	movi	a3, 0
3545a0015d6SChris Zankel	rsr	a2, EXCSAVE_1
3555a0015d6SChris Zankel	s32i	a0, a1, PT_EXCCAUSE
3565a0015d6SChris Zankel	s32i	a3, a2, EXC_TABLE_FIXUP
3575a0015d6SChris Zankel
3585a0015d6SChris Zankel	/* All unrecoverable states are saved on stack, now, and a1 is valid,
3595a0015d6SChris Zankel	 * so we can allow exceptions and interrupts (*) again.
3605a0015d6SChris Zankel	 * Set PS(EXCM = 0, UM = 0, RING = 0, OWB = 0, WOE = 1, INTLEVEL = X)
3615a0015d6SChris Zankel	 *
3625a0015d6SChris Zankel	 * (*) We only allow interrupts if PS.INTLEVEL was not set to 1 before
3635a0015d6SChris Zankel	 *     (interrupts disabled) and if this exception is not an interrupt.
3645a0015d6SChris Zankel	 */
3655a0015d6SChris Zankel
3665a0015d6SChris Zankel	rsr	a3, PS
3675a0015d6SChris Zankel	addi	a0, a0, -4
3685a0015d6SChris Zankel	movi	a2, 1
3695a0015d6SChris Zankel	extui	a3, a3, 0, 1		# a3 = PS.INTLEVEL[0]
3705a0015d6SChris Zankel	moveqz	a3, a2, a0		# a3 = 1 iff interrupt exception
371173d6681SChris Zankel	movi	a2, 1 << PS_WOE_BIT
3725a0015d6SChris Zankel	or	a3, a3, a2
3735a0015d6SChris Zankel	rsr	a0, EXCCAUSE
3745a0015d6SChris Zankel	xsr	a3, PS
3755a0015d6SChris Zankel
3765a0015d6SChris Zankel	s32i	a3, a1, PT_PS		# save ps
3775a0015d6SChris Zankel
3785a0015d6SChris Zankel	/* Save LBEG, LEND */
3795a0015d6SChris Zankel
3805a0015d6SChris Zankel	rsr	a2, LBEG
3815a0015d6SChris Zankel	rsr	a3, LEND
3825a0015d6SChris Zankel	s32i	a2, a1, PT_LBEG
3835a0015d6SChris Zankel	s32i	a3, a1, PT_LEND
3845a0015d6SChris Zankel
3855a0015d6SChris Zankel	/* Go to second-level dispatcher. Set up parameters to pass to the
3865a0015d6SChris Zankel	 * exception handler and call the exception handler.
3875a0015d6SChris Zankel	 */
3885a0015d6SChris Zankel
3895a0015d6SChris Zankel	movi	a4, exc_table
3905a0015d6SChris Zankel	mov	a6, a1			# pass stack frame
3915a0015d6SChris Zankel	mov	a7, a0			# pass EXCCAUSE
3925a0015d6SChris Zankel	addx4	a4, a0, a4
3935a0015d6SChris Zankel	l32i	a4, a4, EXC_TABLE_DEFAULT		# load handler
3945a0015d6SChris Zankel
3955a0015d6SChris Zankel	/* Call the second-level handler */
3965a0015d6SChris Zankel
3975a0015d6SChris Zankel	callx4	a4
3985a0015d6SChris Zankel
3995a0015d6SChris Zankel	/* Jump here for exception exit */
4005a0015d6SChris Zankel
4015a0015d6SChris Zankelcommon_exception_return:
4025a0015d6SChris Zankel
4035a0015d6SChris Zankel	/* Jump if we are returning from kernel exceptions. */
4045a0015d6SChris Zankel
4055a0015d6SChris Zankel1:	l32i	a3, a1, PT_PS
406173d6681SChris Zankel	_bbsi.l	a3, PS_UM_BIT, 2f
4075a0015d6SChris Zankel	j	kernel_exception_exit
4085a0015d6SChris Zankel
4095a0015d6SChris Zankel	/* Specific to a user exception exit:
4105a0015d6SChris Zankel	 * We need to check some flags for signal handling and rescheduling,
4115a0015d6SChris Zankel	 * and have to restore WB and WS, extra states, and all registers
4125a0015d6SChris Zankel	 * in the register file that were in use in the user task.
4135a0015d6SChris Zankel	 */
4145a0015d6SChris Zankel
4155a0015d6SChris Zankel2:	wsr	a3, PS		/* disable interrupts */
4165a0015d6SChris Zankel
4175a0015d6SChris Zankel	/* Check for signals (keep interrupts disabled while we read TI_FLAGS)
4185a0015d6SChris Zankel	 * Note: PS.INTLEVEL = 0, PS.EXCM = 1
4195a0015d6SChris Zankel	 */
4205a0015d6SChris Zankel
4215a0015d6SChris Zankel	GET_THREAD_INFO(a2,a1)
4225a0015d6SChris Zankel	l32i	a4, a2, TI_FLAGS
4235a0015d6SChris Zankel
4245a0015d6SChris Zankel	/* Enable interrupts again.
4255a0015d6SChris Zankel	 * Note: When we get here, we certainly have handled any interrupts.
4265a0015d6SChris Zankel	 *       (Hint: There is only one user exception frame on stack)
4275a0015d6SChris Zankel	 */
4285a0015d6SChris Zankel
429173d6681SChris Zankel	movi	a3, 1 << PS_WOE_BIT
4305a0015d6SChris Zankel
4315a0015d6SChris Zankel	_bbsi.l	a4, TIF_NEED_RESCHED, 3f
4325a0015d6SChris Zankel	_bbci.l	a4, TIF_SIGPENDING, 4f
4335a0015d6SChris Zankel
4345a0015d6SChris Zankel#ifndef SIGNAL_HANDLING_IN_DOUBLE_EXCEPTION
4355a0015d6SChris Zankel	l32i	a4, a1, PT_DEPC
4365a0015d6SChris Zankel	bgeui	a4, VALID_DOUBLE_EXCEPTION_ADDRESS, 4f
4375a0015d6SChris Zankel#endif
4385a0015d6SChris Zankel
4395a0015d6SChris Zankel	/* Reenable interrupts and call do_signal() */
4405a0015d6SChris Zankel
4415a0015d6SChris Zankel	wsr	a3, PS
4425a0015d6SChris Zankel	movi	a4, do_signal	# int do_signal(struct pt_regs*, sigset_t*)
4435a0015d6SChris Zankel	mov	a6, a1
4445a0015d6SChris Zankel	movi	a7, 0
4455a0015d6SChris Zankel	callx4	a4
4465a0015d6SChris Zankel	j	1b
4475a0015d6SChris Zankel
4485a0015d6SChris Zankel3:	/* Reenable interrupts and reschedule */
4495a0015d6SChris Zankel
4505a0015d6SChris Zankel	wsr	a3, PS
4515a0015d6SChris Zankel	movi	a4, schedule	# void schedule (void)
4525a0015d6SChris Zankel	callx4	a4
4535a0015d6SChris Zankel	j	1b
4545a0015d6SChris Zankel
4555a0015d6SChris Zankel	/* Restore the state of the task and return from the exception. */
4565a0015d6SChris Zankel
4575a0015d6SChris Zankel4:	/* a2 holds GET_CURRENT(a2,a1)  */
4585a0015d6SChris Zankel
4595a0015d6SChris Zankel#if XCHAL_EXTRA_SA_SIZE
4605a0015d6SChris Zankel
4615a0015d6SChris Zankel	/* For user exceptions, restore the extra state from the user's TCB. */
4625a0015d6SChris Zankel
4635a0015d6SChris Zankel	/* Note: a2 still contains GET_CURRENT(a2,a1) */
4645a0015d6SChris Zankel	addi	a2, a2, THREAD_CP_SAVE
4655a0015d6SChris Zankel	xchal_extra_load_funcbody
4665a0015d6SChris Zankel
4675a0015d6SChris Zankel	/* We must assume that xchal_extra_store_funcbody destroys
4685a0015d6SChris Zankel	 * registers a2..a15.  FIXME, this list can eventually be
4695a0015d6SChris Zankel	 * reduced once real register requirements of the macro are
4705a0015d6SChris Zankel	 * finalized. */
4715a0015d6SChris Zankel
4725a0015d6SChris Zankel#endif /* XCHAL_EXTRA_SA_SIZE */
4735a0015d6SChris Zankel
4745a0015d6SChris Zankel
4755a0015d6SChris Zankel	/* Switch to the user thread WINDOWBASE. Save SP temporarily in DEPC */
4765a0015d6SChris Zankel
4775a0015d6SChris Zankel	l32i	a2, a1, PT_WINDOWBASE
4785a0015d6SChris Zankel	l32i	a3, a1, PT_WINDOWSTART
4795a0015d6SChris Zankel	wsr	a1, DEPC		# use DEPC as temp storage
4805a0015d6SChris Zankel	wsr	a3, WINDOWSTART		# restore WINDOWSTART
4815a0015d6SChris Zankel	ssr	a2			# preserve user's WB in the SAR
4825a0015d6SChris Zankel	wsr	a2, WINDOWBASE		# switch to user's saved WB
4835a0015d6SChris Zankel	rsync
4845a0015d6SChris Zankel	rsr	a1, DEPC		# restore stack pointer
4855a0015d6SChris Zankel	l32i	a2, a1, PT_WMASK	# register frames saved (in bits 4...9)
4865a0015d6SChris Zankel	rotw	-1			# we restore a4..a7
4875a0015d6SChris Zankel	_bltui	a6, 16, 1f		# only have to restore current window?
4885a0015d6SChris Zankel
4895a0015d6SChris Zankel	/* The working registers are a0 and a3.  We are restoring to
4905a0015d6SChris Zankel	 * a4..a7.  Be careful not to destroy what we have just restored.
4915a0015d6SChris Zankel	 * Note: wmask has the format YYYYM:
4925a0015d6SChris Zankel	 *       Y: number of registers saved in groups of 4
4935a0015d6SChris Zankel	 *       M: 4 bit mask of first 16 registers
4945a0015d6SChris Zankel	 */
4955a0015d6SChris Zankel
4965a0015d6SChris Zankel	mov	a2, a6
4975a0015d6SChris Zankel	mov	a3, a5
4985a0015d6SChris Zankel
4995a0015d6SChris Zankel2:	rotw	-1			# a0..a3 become a4..a7
5005a0015d6SChris Zankel	addi	a3, a7, -4*4		# next iteration
5015a0015d6SChris Zankel	addi	a2, a6, -16		# decrementing Y in WMASK
5025a0015d6SChris Zankel	l32i	a4, a3, PT_AREG_END + 0
5035a0015d6SChris Zankel	l32i	a5, a3, PT_AREG_END + 4
5045a0015d6SChris Zankel	l32i	a6, a3, PT_AREG_END + 8
5055a0015d6SChris Zankel	l32i	a7, a3, PT_AREG_END + 12
5065a0015d6SChris Zankel	_bgeui	a2, 16, 2b
5075a0015d6SChris Zankel
5085a0015d6SChris Zankel	/* Clear unrestored registers (don't leak anything to user-land */
5095a0015d6SChris Zankel
5105a0015d6SChris Zankel1:	rsr	a0, WINDOWBASE
5115a0015d6SChris Zankel	rsr	a3, SAR
5125a0015d6SChris Zankel	sub	a3, a0, a3
5135a0015d6SChris Zankel	beqz	a3, 2f
5145a0015d6SChris Zankel	extui	a3, a3, 0, WBBITS
5155a0015d6SChris Zankel
5165a0015d6SChris Zankel1:	rotw	-1
5175a0015d6SChris Zankel	addi	a3, a7, -1
5185a0015d6SChris Zankel	movi	a4, 0
5195a0015d6SChris Zankel	movi	a5, 0
5205a0015d6SChris Zankel	movi	a6, 0
5215a0015d6SChris Zankel	movi	a7, 0
5225a0015d6SChris Zankel	bgei	a3, 1, 1b
5235a0015d6SChris Zankel
5245a0015d6SChris Zankel	/* We are back were we were when we started.
5255a0015d6SChris Zankel	 * Note: a2 still contains WMASK (if we've returned to the original
5265a0015d6SChris Zankel	 *	 frame where we had loaded a2), or at least the lower 4 bits
5275a0015d6SChris Zankel	 *	 (if we have restored WSBITS-1 frames).
5285a0015d6SChris Zankel	 */
5295a0015d6SChris Zankel
5305a0015d6SChris Zankel2:	j	common_exception_exit
5315a0015d6SChris Zankel
5325a0015d6SChris Zankel	/* This is the kernel exception exit.
5335a0015d6SChris Zankel	 * We avoided to do a MOVSP when we entered the exception, but we
5345a0015d6SChris Zankel	 * have to do it here.
5355a0015d6SChris Zankel	 */
5365a0015d6SChris Zankel
5375a0015d6SChris Zankelkernel_exception_exit:
5385a0015d6SChris Zankel
5395a0015d6SChris Zankel	/* Disable interrupts (a3 holds PT_PS) */
5405a0015d6SChris Zankel
5415a0015d6SChris Zankel	wsr	a3, PS
5425a0015d6SChris Zankel
5435a0015d6SChris Zankel#ifdef PREEMPTIBLE_KERNEL
5445a0015d6SChris Zankel
5455a0015d6SChris Zankel#ifdef CONFIG_PREEMPT
5465a0015d6SChris Zankel
5475a0015d6SChris Zankel	/*
5485a0015d6SChris Zankel	 * Note: We've just returned from a call4, so we have
5495a0015d6SChris Zankel	 * at least 4 addt'l regs.
5505a0015d6SChris Zankel	 */
5515a0015d6SChris Zankel
5525a0015d6SChris Zankel	/* Check current_thread_info->preempt_count */
5535a0015d6SChris Zankel
5545a0015d6SChris Zankel	GET_THREAD_INFO(a2)
5555a0015d6SChris Zankel	l32i	a3, a2, TI_PREEMPT
5565a0015d6SChris Zankel	bnez	a3, 1f
5575a0015d6SChris Zankel
5585a0015d6SChris Zankel	l32i	a2, a2, TI_FLAGS
5595a0015d6SChris Zankel
5605a0015d6SChris Zankel1:
5615a0015d6SChris Zankel
5625a0015d6SChris Zankel#endif
5635a0015d6SChris Zankel
5645a0015d6SChris Zankel#endif
5655a0015d6SChris Zankel
5665a0015d6SChris Zankel	/* Check if we have to do a movsp.
5675a0015d6SChris Zankel	 *
5685a0015d6SChris Zankel	 * We only have to do a movsp if the previous window-frame has
5695a0015d6SChris Zankel	 * been spilled to the *temporary* exception stack instead of the
5705a0015d6SChris Zankel	 * task's stack. This is the case if the corresponding bit in
5715a0015d6SChris Zankel	 * WINDOWSTART for the previous window-frame was set before
5725a0015d6SChris Zankel	 * (not spilled) but is zero now (spilled).
5735a0015d6SChris Zankel	 * If this bit is zero, all other bits except the one for the
5745a0015d6SChris Zankel	 * current window frame are also zero. So, we can use a simple test:
5755a0015d6SChris Zankel	 * 'and' WINDOWSTART and WINDOWSTART-1:
5765a0015d6SChris Zankel	 *
5775a0015d6SChris Zankel	 *  (XXXXXX1[0]* - 1) AND XXXXXX1[0]* = XXXXXX0[0]*
5785a0015d6SChris Zankel	 *
5795a0015d6SChris Zankel	 * The result is zero only if one bit was set.
5805a0015d6SChris Zankel	 *
5815a0015d6SChris Zankel	 * (Note: We might have gone through several task switches before
5825a0015d6SChris Zankel	 *        we come back to the current task, so WINDOWBASE might be
5835a0015d6SChris Zankel	 *        different from the time the exception occurred.)
5845a0015d6SChris Zankel	 */
5855a0015d6SChris Zankel
5865a0015d6SChris Zankel	/* Test WINDOWSTART before and after the exception.
5875a0015d6SChris Zankel	 * We actually have WMASK, so we only have to test if it is 1 or not.
5885a0015d6SChris Zankel	 */
5895a0015d6SChris Zankel
5905a0015d6SChris Zankel	l32i	a2, a1, PT_WMASK
5915a0015d6SChris Zankel	_beqi	a2, 1, common_exception_exit	# Spilled before exception,jump
5925a0015d6SChris Zankel
5935a0015d6SChris Zankel	/* Test WINDOWSTART now. If spilled, do the movsp */
5945a0015d6SChris Zankel
5955a0015d6SChris Zankel	rsr     a3, WINDOWSTART
5965a0015d6SChris Zankel	addi	a0, a3, -1
5975a0015d6SChris Zankel	and     a3, a3, a0
5985a0015d6SChris Zankel	_bnez	a3, common_exception_exit
5995a0015d6SChris Zankel
6005a0015d6SChris Zankel	/* Do a movsp (we returned from a call4, so we have at least a0..a7) */
6015a0015d6SChris Zankel
6025a0015d6SChris Zankel	addi    a0, a1, -16
6035a0015d6SChris Zankel	l32i    a3, a0, 0
6045a0015d6SChris Zankel	l32i    a4, a0, 4
6055a0015d6SChris Zankel	s32i    a3, a1, PT_SIZE+0
6065a0015d6SChris Zankel	s32i    a4, a1, PT_SIZE+4
6075a0015d6SChris Zankel	l32i    a3, a0, 8
6085a0015d6SChris Zankel	l32i    a4, a0, 12
6095a0015d6SChris Zankel	s32i    a3, a1, PT_SIZE+8
6105a0015d6SChris Zankel	s32i    a4, a1, PT_SIZE+12
6115a0015d6SChris Zankel
6125a0015d6SChris Zankel	/* Common exception exit.
6135a0015d6SChris Zankel	 * We restore the special register and the current window frame, and
6145a0015d6SChris Zankel	 * return from the exception.
6155a0015d6SChris Zankel	 *
6165a0015d6SChris Zankel	 * Note: We expect a2 to hold PT_WMASK
6175a0015d6SChris Zankel	 */
6185a0015d6SChris Zankel
6195a0015d6SChris Zankelcommon_exception_exit:
6205a0015d6SChris Zankel
6215a0015d6SChris Zankel	_bbsi.l	a2, 1, 1f
6225a0015d6SChris Zankel	l32i	a4,  a1, PT_AREG4
6235a0015d6SChris Zankel	l32i	a5,  a1, PT_AREG5
6245a0015d6SChris Zankel	l32i	a6,  a1, PT_AREG6
6255a0015d6SChris Zankel	l32i	a7,  a1, PT_AREG7
6265a0015d6SChris Zankel	_bbsi.l	a2, 2, 1f
6275a0015d6SChris Zankel	l32i	a8,  a1, PT_AREG8
6285a0015d6SChris Zankel	l32i	a9,  a1, PT_AREG9
6295a0015d6SChris Zankel	l32i	a10, a1, PT_AREG10
6305a0015d6SChris Zankel	l32i	a11, a1, PT_AREG11
6315a0015d6SChris Zankel	_bbsi.l	a2, 3, 1f
6325a0015d6SChris Zankel	l32i	a12, a1, PT_AREG12
6335a0015d6SChris Zankel	l32i	a13, a1, PT_AREG13
6345a0015d6SChris Zankel	l32i	a14, a1, PT_AREG14
6355a0015d6SChris Zankel	l32i	a15, a1, PT_AREG15
6365a0015d6SChris Zankel
6375a0015d6SChris Zankel	/* Restore PC, SAR */
6385a0015d6SChris Zankel
6395a0015d6SChris Zankel1:	l32i	a2, a1, PT_PC
6405a0015d6SChris Zankel	l32i	a3, a1, PT_SAR
6415a0015d6SChris Zankel	wsr	a2, EPC_1
6425a0015d6SChris Zankel	wsr	a3, SAR
6435a0015d6SChris Zankel
6445a0015d6SChris Zankel	/* Restore LBEG, LEND, LCOUNT */
6455a0015d6SChris Zankel
6465a0015d6SChris Zankel	l32i	a2, a1, PT_LBEG
6475a0015d6SChris Zankel	l32i	a3, a1, PT_LEND
6485a0015d6SChris Zankel	wsr	a2, LBEG
6495a0015d6SChris Zankel	l32i	a2, a1, PT_LCOUNT
6505a0015d6SChris Zankel	wsr	a3, LEND
6515a0015d6SChris Zankel	wsr	a2, LCOUNT
6525a0015d6SChris Zankel
65329c4dfd9SChris Zankel	/* We control single stepping through the ICOUNTLEVEL register. */
65429c4dfd9SChris Zankel
65529c4dfd9SChris Zankel	l32i	a2, a1, PT_ICOUNTLEVEL
65629c4dfd9SChris Zankel	movi	a3, -2
65729c4dfd9SChris Zankel	wsr	a2, ICOUNTLEVEL
65829c4dfd9SChris Zankel	wsr	a3, ICOUNT
65929c4dfd9SChris Zankel
6605a0015d6SChris Zankel	/* Check if it was double exception. */
6615a0015d6SChris Zankel
6625a0015d6SChris Zankel	l32i	a0, a1, PT_DEPC
6635a0015d6SChris Zankel	l32i	a3, a1, PT_AREG3
6645a0015d6SChris Zankel	l32i	a2, a1, PT_AREG2
6655a0015d6SChris Zankel	_bgeui	a0, VALID_DOUBLE_EXCEPTION_ADDRESS, 1f
6665a0015d6SChris Zankel
6675a0015d6SChris Zankel	/* Restore a0...a3 and return */
6685a0015d6SChris Zankel
6695a0015d6SChris Zankel	l32i	a0, a1, PT_AREG0
6705a0015d6SChris Zankel	l32i	a1, a1, PT_AREG1
6715a0015d6SChris Zankel	rfe
6725a0015d6SChris Zankel
6735a0015d6SChris Zankel1:	wsr	a0, DEPC
6745a0015d6SChris Zankel	l32i	a0, a1, PT_AREG0
6755a0015d6SChris Zankel	l32i	a1, a1, PT_AREG1
6765a0015d6SChris Zankel	rfde
6775a0015d6SChris Zankel
6785a0015d6SChris Zankel/*
6795a0015d6SChris Zankel * Debug exception handler.
6805a0015d6SChris Zankel *
6815a0015d6SChris Zankel * Currently, we don't support KGDB, so only user application can be debugged.
6825a0015d6SChris Zankel *
6835a0015d6SChris Zankel * When we get here,  a0 is trashed and saved to excsave[debuglevel]
6845a0015d6SChris Zankel */
6855a0015d6SChris Zankel
6865a0015d6SChris ZankelENTRY(debug_exception)
6875a0015d6SChris Zankel
6885a0015d6SChris Zankel	rsr	a0, EPS + XCHAL_DEBUGLEVEL
689173d6681SChris Zankel	bbsi.l	a0, PS_EXCM_BIT, 1f	# exception mode
6905a0015d6SChris Zankel
6915a0015d6SChris Zankel	/* Set EPC_1 and EXCCAUSE */
6925a0015d6SChris Zankel
6935a0015d6SChris Zankel	wsr	a2, DEPC		# save a2 temporarily
6945a0015d6SChris Zankel	rsr	a2, EPC + XCHAL_DEBUGLEVEL
6955a0015d6SChris Zankel	wsr	a2, EPC_1
6965a0015d6SChris Zankel
6975a0015d6SChris Zankel	movi	a2, EXCCAUSE_MAPPED_DEBUG
6985a0015d6SChris Zankel	wsr	a2, EXCCAUSE
6995a0015d6SChris Zankel
7005a0015d6SChris Zankel	/* Restore PS to the value before the debug exc but with PS.EXCM set.*/
7015a0015d6SChris Zankel
702173d6681SChris Zankel	movi	a2, 1 << PS_EXCM_BIT
7035a0015d6SChris Zankel	or	a2, a0, a2
7045a0015d6SChris Zankel	movi	a0, debug_exception	# restore a3, debug jump vector
7055a0015d6SChris Zankel	wsr	a2, PS
7065a0015d6SChris Zankel	xsr	a0, EXCSAVE + XCHAL_DEBUGLEVEL
7075a0015d6SChris Zankel
7085a0015d6SChris Zankel	/* Switch to kernel/user stack, restore jump vector, and save a0 */
7095a0015d6SChris Zankel
710173d6681SChris Zankel	bbsi.l	a2, PS_UM_BIT, 2f	# jump if user mode
7115a0015d6SChris Zankel
7125a0015d6SChris Zankel	addi	a2, a1, -16-PT_SIZE	# assume kernel stack
7135a0015d6SChris Zankel	s32i	a0, a2, PT_AREG0
7145a0015d6SChris Zankel	movi	a0, 0
7155a0015d6SChris Zankel	s32i	a1, a2, PT_AREG1
7165a0015d6SChris Zankel	s32i	a0, a2, PT_DEPC		# mark it as a regular exception
7175a0015d6SChris Zankel	xsr	a0, DEPC
7185a0015d6SChris Zankel	s32i	a3, a2, PT_AREG3
7195a0015d6SChris Zankel	s32i	a0, a2, PT_AREG2
7205a0015d6SChris Zankel	mov	a1, a2
7215a0015d6SChris Zankel	j	_kernel_exception
7225a0015d6SChris Zankel
7235a0015d6SChris Zankel2:	rsr	a2, EXCSAVE_1
7245a0015d6SChris Zankel	l32i	a2, a2, EXC_TABLE_KSTK	# load kernel stack pointer
7255a0015d6SChris Zankel	s32i	a0, a2, PT_AREG0
7265a0015d6SChris Zankel	movi	a0, 0
7275a0015d6SChris Zankel	s32i	a1, a2, PT_AREG1
7285a0015d6SChris Zankel	s32i	a0, a2, PT_DEPC
7295a0015d6SChris Zankel	xsr	a0, DEPC
7305a0015d6SChris Zankel	s32i	a3, a2, PT_AREG3
7315a0015d6SChris Zankel	s32i	a0, a2, PT_AREG2
7325a0015d6SChris Zankel	mov	a1, a2
7335a0015d6SChris Zankel	j	_user_exception
7345a0015d6SChris Zankel
7355a0015d6SChris Zankel	/* Debug exception while in exception mode. */
7365a0015d6SChris Zankel1:	j	1b	// FIXME!!
7375a0015d6SChris Zankel
7385a0015d6SChris Zankel
7395a0015d6SChris Zankel/*
7405a0015d6SChris Zankel * We get here in case of an unrecoverable exception.
7415a0015d6SChris Zankel * The only thing we can do is to be nice and print a panic message.
7425a0015d6SChris Zankel * We only produce a single stack frame for panic, so ???
7435a0015d6SChris Zankel *
7445a0015d6SChris Zankel *
7455a0015d6SChris Zankel * Entry conditions:
7465a0015d6SChris Zankel *
7475a0015d6SChris Zankel *   - a0 contains the caller address; original value saved in excsave1.
7485a0015d6SChris Zankel *   - the original a0 contains a valid return address (backtrace) or 0.
7495a0015d6SChris Zankel *   - a2 contains a valid stackpointer
7505a0015d6SChris Zankel *
7515a0015d6SChris Zankel * Notes:
7525a0015d6SChris Zankel *
7535a0015d6SChris Zankel *   - If the stack pointer could be invalid, the caller has to setup a
7545a0015d6SChris Zankel *     dummy stack pointer (e.g. the stack of the init_task)
7555a0015d6SChris Zankel *
7565a0015d6SChris Zankel *   - If the return address could be invalid, the caller has to set it
7575a0015d6SChris Zankel *     to 0, so the backtrace would stop.
7585a0015d6SChris Zankel *
7595a0015d6SChris Zankel */
7605a0015d6SChris Zankel	.align 4
7615a0015d6SChris Zankelunrecoverable_text:
7625a0015d6SChris Zankel	.ascii "Unrecoverable error in exception handler\0"
7635a0015d6SChris Zankel
7645a0015d6SChris ZankelENTRY(unrecoverable_exception)
7655a0015d6SChris Zankel
7665a0015d6SChris Zankel	movi	a0, 1
7675a0015d6SChris Zankel	movi	a1, 0
7685a0015d6SChris Zankel
7695a0015d6SChris Zankel	wsr	a0, WINDOWSTART
7705a0015d6SChris Zankel	wsr	a1, WINDOWBASE
7715a0015d6SChris Zankel	rsync
7725a0015d6SChris Zankel
773173d6681SChris Zankel	movi	a1, (1 << PS_WOE_BIT) | 1
7745a0015d6SChris Zankel	wsr	a1, PS
7755a0015d6SChris Zankel	rsync
7765a0015d6SChris Zankel
7775a0015d6SChris Zankel	movi	a1, init_task
7785a0015d6SChris Zankel	movi	a0, 0
7795a0015d6SChris Zankel	addi	a1, a1, PT_REGS_OFFSET
7805a0015d6SChris Zankel
7815a0015d6SChris Zankel	movi	a4, panic
7825a0015d6SChris Zankel	movi	a6, unrecoverable_text
7835a0015d6SChris Zankel
7845a0015d6SChris Zankel	callx4	a4
7855a0015d6SChris Zankel
7865a0015d6SChris Zankel1:	j	1b
7875a0015d6SChris Zankel
7885a0015d6SChris Zankel
7895a0015d6SChris Zankel/* -------------------------- FAST EXCEPTION HANDLERS ----------------------- */
7905a0015d6SChris Zankel
7915a0015d6SChris Zankel/*
7925a0015d6SChris Zankel * Fast-handler for alloca exceptions
7935a0015d6SChris Zankel *
7945a0015d6SChris Zankel *  The ALLOCA handler is entered when user code executes the MOVSP
7955a0015d6SChris Zankel *  instruction and the caller's frame is not in the register file.
7965a0015d6SChris Zankel *  In this case, the caller frame's a0..a3 are on the stack just
7975a0015d6SChris Zankel *  below sp (a1), and this handler moves them.
7985a0015d6SChris Zankel *
7995a0015d6SChris Zankel *  For "MOVSP <ar>,<as>" without destination register a1, this routine
8005a0015d6SChris Zankel *  simply moves the value from <as> to <ar> without moving the save area.
8015a0015d6SChris Zankel *
8025a0015d6SChris Zankel * Entry condition:
8035a0015d6SChris Zankel *
8045a0015d6SChris Zankel *   a0:	trashed, original value saved on stack (PT_AREG0)
8055a0015d6SChris Zankel *   a1:	a1
8065a0015d6SChris Zankel *   a2:	new stack pointer, original in DEPC
8075a0015d6SChris Zankel *   a3:	dispatch table
8085a0015d6SChris Zankel *   depc:	a2, original value saved on stack (PT_DEPC)
8095a0015d6SChris Zankel *   excsave_1:	a3
8105a0015d6SChris Zankel *
8115a0015d6SChris Zankel *   PT_DEPC >= VALID_DOUBLE_EXCEPTION_ADDRESS: double exception, DEPC
8125a0015d6SChris Zankel *	     <  VALID_DOUBLE_EXCEPTION_ADDRESS: regular exception
8135a0015d6SChris Zankel */
8145a0015d6SChris Zankel
8155a0015d6SChris Zankel#if XCHAL_HAVE_BE
8165a0015d6SChris Zankel#define _EXTUI_MOVSP_SRC(ar)	extui ar, ar, 4, 4
8175a0015d6SChris Zankel#define _EXTUI_MOVSP_DST(ar)	extui ar, ar, 0, 4
8185a0015d6SChris Zankel#else
8195a0015d6SChris Zankel#define _EXTUI_MOVSP_SRC(ar)	extui ar, ar, 0, 4
8205a0015d6SChris Zankel#define _EXTUI_MOVSP_DST(ar)	extui ar, ar, 4, 4
8215a0015d6SChris Zankel#endif
8225a0015d6SChris Zankel
8235a0015d6SChris ZankelENTRY(fast_alloca)
8245a0015d6SChris Zankel
8255a0015d6SChris Zankel	/* We shouldn't be in a double exception. */
8265a0015d6SChris Zankel
8275a0015d6SChris Zankel	l32i	a0, a2, PT_DEPC
8285a0015d6SChris Zankel	_bgeui	a0, VALID_DOUBLE_EXCEPTION_ADDRESS, .Lunhandled_double
8295a0015d6SChris Zankel
8305a0015d6SChris Zankel	rsr	a0, DEPC		# get a2
8315a0015d6SChris Zankel	s32i	a4, a2, PT_AREG4	# save a4 and
8325a0015d6SChris Zankel	s32i	a0, a2, PT_AREG2	# a2 to stack
8335a0015d6SChris Zankel
8345a0015d6SChris Zankel	/* Exit critical section. */
8355a0015d6SChris Zankel
8365a0015d6SChris Zankel	movi	a0, 0
8375a0015d6SChris Zankel	s32i	a0, a3, EXC_TABLE_FIXUP
8385a0015d6SChris Zankel
8395a0015d6SChris Zankel	/* Restore a3, excsave_1 */
8405a0015d6SChris Zankel
8415a0015d6SChris Zankel	xsr	a3, EXCSAVE_1		# make sure excsave_1 is valid for dbl.
8425a0015d6SChris Zankel	rsr	a4, EPC_1		# get exception address
8435a0015d6SChris Zankel	s32i	a3, a2, PT_AREG3	# save a3 to stack
8445a0015d6SChris Zankel
8455a0015d6SChris Zankel#ifdef ALLOCA_EXCEPTION_IN_IRAM
8465a0015d6SChris Zankel#error	iram not supported
8475a0015d6SChris Zankel#else
8485a0015d6SChris Zankel	/* Note: l8ui not allowed in IRAM/IROM!! */
8495a0015d6SChris Zankel	l8ui	a0, a4, 1		# read as(src) from MOVSP instruction
8505a0015d6SChris Zankel#endif
8515a0015d6SChris Zankel	movi	a3, .Lmovsp_src
8525a0015d6SChris Zankel	_EXTUI_MOVSP_SRC(a0)		# extract source register number
8535a0015d6SChris Zankel	addx8	a3, a0, a3
8545a0015d6SChris Zankel	jx	a3
8555a0015d6SChris Zankel
8565a0015d6SChris Zankel.Lunhandled_double:
8575a0015d6SChris Zankel	wsr	a0, EXCSAVE_1
8585a0015d6SChris Zankel	movi	a0, unrecoverable_exception
8595a0015d6SChris Zankel	callx0	a0
8605a0015d6SChris Zankel
8615a0015d6SChris Zankel	.align 8
8625a0015d6SChris Zankel.Lmovsp_src:
8635a0015d6SChris Zankel	l32i	a3, a2, PT_AREG0;	_j 1f;	.align 8
8645a0015d6SChris Zankel	mov	a3, a1;			_j 1f;	.align 8
8655a0015d6SChris Zankel	l32i	a3, a2, PT_AREG2;	_j 1f;	.align 8
8665a0015d6SChris Zankel	l32i	a3, a2, PT_AREG3;	_j 1f;	.align 8
8675a0015d6SChris Zankel	l32i	a3, a2, PT_AREG4;	_j 1f;	.align 8
8685a0015d6SChris Zankel	mov	a3, a5;			_j 1f;	.align 8
8695a0015d6SChris Zankel	mov	a3, a6;			_j 1f;	.align 8
8705a0015d6SChris Zankel	mov	a3, a7;			_j 1f;	.align 8
8715a0015d6SChris Zankel	mov	a3, a8;			_j 1f;	.align 8
8725a0015d6SChris Zankel	mov	a3, a9;			_j 1f;	.align 8
8735a0015d6SChris Zankel	mov	a3, a10;		_j 1f;	.align 8
8745a0015d6SChris Zankel	mov	a3, a11;		_j 1f;	.align 8
8755a0015d6SChris Zankel	mov	a3, a12;		_j 1f;	.align 8
8765a0015d6SChris Zankel	mov	a3, a13;		_j 1f;	.align 8
8775a0015d6SChris Zankel	mov	a3, a14;		_j 1f;	.align 8
8785a0015d6SChris Zankel	mov	a3, a15;		_j 1f;	.align 8
8795a0015d6SChris Zankel
8805a0015d6SChris Zankel1:
8815a0015d6SChris Zankel
8825a0015d6SChris Zankel#ifdef ALLOCA_EXCEPTION_IN_IRAM
8835a0015d6SChris Zankel#error	iram not supported
8845a0015d6SChris Zankel#else
8855a0015d6SChris Zankel	l8ui	a0, a4, 0		# read ar(dst) from MOVSP instruction
8865a0015d6SChris Zankel#endif
8875a0015d6SChris Zankel	addi	a4, a4, 3		# step over movsp
8885a0015d6SChris Zankel	_EXTUI_MOVSP_DST(a0)		# extract destination register
8895a0015d6SChris Zankel	wsr	a4, EPC_1		# save new epc_1
8905a0015d6SChris Zankel
8915a0015d6SChris Zankel	_bnei	a0, 1, 1f		# no 'movsp a1, ax': jump
8925a0015d6SChris Zankel
8935a0015d6SChris Zankel        /* Move the save area. This implies the use of the L32E
8945a0015d6SChris Zankel	 * and S32E instructions, because this move must be done with
8955a0015d6SChris Zankel	 * the user's PS.RING privilege levels, not with ring 0
8965a0015d6SChris Zankel	 * (kernel's) privileges currently active with PS.EXCM
8975a0015d6SChris Zankel	 * set. Note that we have stil registered a fixup routine with the
8985a0015d6SChris Zankel	 * double exception vector in case a double exception occurs.
8995a0015d6SChris Zankel	 */
9005a0015d6SChris Zankel
9015a0015d6SChris Zankel	/* a0,a4:avail a1:old user stack a2:exc. stack a3:new user stack. */
9025a0015d6SChris Zankel
9035a0015d6SChris Zankel	l32e	a0, a1, -16
9045a0015d6SChris Zankel	l32e	a4, a1, -12
9055a0015d6SChris Zankel	s32e	a0, a3, -16
9065a0015d6SChris Zankel	s32e	a4, a3, -12
9075a0015d6SChris Zankel	l32e	a0, a1, -8
9085a0015d6SChris Zankel	l32e	a4, a1, -4
9095a0015d6SChris Zankel	s32e	a0, a3, -8
9105a0015d6SChris Zankel	s32e	a4, a3, -4
9115a0015d6SChris Zankel
9125a0015d6SChris Zankel	/* Restore stack-pointer and all the other saved registers. */
9135a0015d6SChris Zankel
9145a0015d6SChris Zankel	mov	a1, a3
9155a0015d6SChris Zankel
9165a0015d6SChris Zankel	l32i	a4, a2, PT_AREG4
9175a0015d6SChris Zankel	l32i	a3, a2, PT_AREG3
9185a0015d6SChris Zankel	l32i	a0, a2, PT_AREG0
9195a0015d6SChris Zankel	l32i	a2, a2, PT_AREG2
9205a0015d6SChris Zankel	rfe
9215a0015d6SChris Zankel
9225a0015d6SChris Zankel	/*  MOVSP <at>,<as>  was invoked with <at> != a1.
9235a0015d6SChris Zankel	 *  Because the stack pointer is not being modified,
9245a0015d6SChris Zankel	 *  we should be able to just modify the pointer
9255a0015d6SChris Zankel	 *  without moving any save area.
9265a0015d6SChris Zankel	 *  The processor only traps these occurrences if the
9275a0015d6SChris Zankel	 *  caller window isn't live, so unfortunately we can't
9285a0015d6SChris Zankel	 *  use this as an alternate trap mechanism.
9295a0015d6SChris Zankel	 *  So we just do the move.  This requires that we
9305a0015d6SChris Zankel	 *  resolve the destination register, not just the source,
9315a0015d6SChris Zankel	 *  so there's some extra work.
9325a0015d6SChris Zankel	 *  (PERHAPS NOT REALLY NEEDED, BUT CLEANER...)
9335a0015d6SChris Zankel	 */
9345a0015d6SChris Zankel
9355a0015d6SChris Zankel	/* a0 dst-reg, a1 user-stack, a2 stack, a3 value of src reg. */
9365a0015d6SChris Zankel
9375a0015d6SChris Zankel1:	movi	a4, .Lmovsp_dst
9385a0015d6SChris Zankel	addx8	a4, a0, a4
9395a0015d6SChris Zankel	jx	a4
9405a0015d6SChris Zankel
9415a0015d6SChris Zankel	.align 8
9425a0015d6SChris Zankel.Lmovsp_dst:
9435a0015d6SChris Zankel	s32i	a3, a2, PT_AREG0;	_j 1f;	.align 8
9445a0015d6SChris Zankel	mov	a1, a3;			_j 1f;	.align 8
9455a0015d6SChris Zankel	s32i	a3, a2, PT_AREG2;	_j 1f;	.align 8
9465a0015d6SChris Zankel	s32i	a3, a2, PT_AREG3;	_j 1f;	.align 8
9475a0015d6SChris Zankel	s32i	a3, a2, PT_AREG4;	_j 1f;	.align 8
9485a0015d6SChris Zankel	mov	a5, a3;			_j 1f;	.align 8
9495a0015d6SChris Zankel	mov	a6, a3;			_j 1f;	.align 8
9505a0015d6SChris Zankel	mov	a7, a3;			_j 1f;	.align 8
9515a0015d6SChris Zankel	mov	a8, a3;			_j 1f;	.align 8
9525a0015d6SChris Zankel	mov	a9, a3;			_j 1f;	.align 8
9535a0015d6SChris Zankel	mov	a10, a3;		_j 1f;	.align 8
9545a0015d6SChris Zankel	mov	a11, a3;		_j 1f;	.align 8
9555a0015d6SChris Zankel	mov	a12, a3;		_j 1f;	.align 8
9565a0015d6SChris Zankel	mov	a13, a3;		_j 1f;	.align 8
9575a0015d6SChris Zankel	mov	a14, a3;		_j 1f;	.align 8
9585a0015d6SChris Zankel	mov	a15, a3;		_j 1f;	.align 8
9595a0015d6SChris Zankel
9605a0015d6SChris Zankel1:	l32i	a4, a2, PT_AREG4
9615a0015d6SChris Zankel	l32i	a3, a2, PT_AREG3
9625a0015d6SChris Zankel	l32i	a0, a2, PT_AREG0
9635a0015d6SChris Zankel	l32i	a2, a2, PT_AREG2
9645a0015d6SChris Zankel	rfe
9655a0015d6SChris Zankel
9665a0015d6SChris Zankel
9675a0015d6SChris Zankel/*
9685a0015d6SChris Zankel * fast system calls.
9695a0015d6SChris Zankel *
9705a0015d6SChris Zankel * WARNING:  The kernel doesn't save the entire user context before
9715a0015d6SChris Zankel * handling a fast system call.  These functions are small and short,
9725a0015d6SChris Zankel * usually offering some functionality not available to user tasks.
9735a0015d6SChris Zankel *
9745a0015d6SChris Zankel * BE CAREFUL TO PRESERVE THE USER'S CONTEXT.
9755a0015d6SChris Zankel *
9765a0015d6SChris Zankel * Entry condition:
9775a0015d6SChris Zankel *
9785a0015d6SChris Zankel *   a0:	trashed, original value saved on stack (PT_AREG0)
9795a0015d6SChris Zankel *   a1:	a1
9805a0015d6SChris Zankel *   a2:	new stack pointer, original in DEPC
9815a0015d6SChris Zankel *   a3:	dispatch table
9825a0015d6SChris Zankel *   depc:	a2, original value saved on stack (PT_DEPC)
9835a0015d6SChris Zankel *   excsave_1:	a3
9845a0015d6SChris Zankel */
9855a0015d6SChris Zankel
9865a0015d6SChris ZankelENTRY(fast_syscall_kernel)
9875a0015d6SChris Zankel
9885a0015d6SChris Zankel	/* Skip syscall. */
9895a0015d6SChris Zankel
9905a0015d6SChris Zankel	rsr	a0, EPC_1
9915a0015d6SChris Zankel	addi	a0, a0, 3
9925a0015d6SChris Zankel	wsr	a0, EPC_1
9935a0015d6SChris Zankel
9945a0015d6SChris Zankel	l32i	a0, a2, PT_DEPC
9955a0015d6SChris Zankel	bgeui	a0, VALID_DOUBLE_EXCEPTION_ADDRESS, fast_syscall_unrecoverable
9965a0015d6SChris Zankel
9975a0015d6SChris Zankel	rsr	a0, DEPC			# get syscall-nr
9985a0015d6SChris Zankel	_beqz	a0, fast_syscall_spill_registers
999fc4fb2adSChris Zankel	_beqi	a0, __NR_xtensa, fast_syscall_xtensa
10005a0015d6SChris Zankel
10015a0015d6SChris Zankel	j	kernel_exception
10025a0015d6SChris Zankel
10035a0015d6SChris ZankelENTRY(fast_syscall_user)
10045a0015d6SChris Zankel
10055a0015d6SChris Zankel	/* Skip syscall. */
10065a0015d6SChris Zankel
10075a0015d6SChris Zankel	rsr	a0, EPC_1
10085a0015d6SChris Zankel	addi	a0, a0, 3
10095a0015d6SChris Zankel	wsr	a0, EPC_1
10105a0015d6SChris Zankel
10115a0015d6SChris Zankel	l32i	a0, a2, PT_DEPC
10125a0015d6SChris Zankel	bgeui	a0, VALID_DOUBLE_EXCEPTION_ADDRESS, fast_syscall_unrecoverable
10135a0015d6SChris Zankel
10145a0015d6SChris Zankel	rsr	a0, DEPC			# get syscall-nr
10155a0015d6SChris Zankel	_beqz	a0, fast_syscall_spill_registers
1016fc4fb2adSChris Zankel	_beqi	a0, __NR_xtensa, fast_syscall_xtensa
10175a0015d6SChris Zankel
10185a0015d6SChris Zankel	j	user_exception
10195a0015d6SChris Zankel
10205a0015d6SChris ZankelENTRY(fast_syscall_unrecoverable)
10215a0015d6SChris Zankel
10225a0015d6SChris Zankel        /* Restore all states. */
10235a0015d6SChris Zankel
10245a0015d6SChris Zankel        l32i    a0, a2, PT_AREG0        # restore a0
10255a0015d6SChris Zankel        xsr     a2, DEPC                # restore a2, depc
10265a0015d6SChris Zankel        rsr     a3, EXCSAVE_1
10275a0015d6SChris Zankel
10285a0015d6SChris Zankel        wsr     a0, EXCSAVE_1
10295a0015d6SChris Zankel        movi    a0, unrecoverable_exception
10305a0015d6SChris Zankel        callx0  a0
10315a0015d6SChris Zankel
10325a0015d6SChris Zankel
10335a0015d6SChris Zankel
10345a0015d6SChris Zankel/*
10355a0015d6SChris Zankel * sysxtensa syscall handler
10365a0015d6SChris Zankel *
1037fc4fb2adSChris Zankel * int sysxtensa (SYS_XTENSA_ATOMIC_SET,     ptr, val,    unused);
1038fc4fb2adSChris Zankel * int sysxtensa (SYS_XTENSA_ATOMIC_ADD,     ptr, val,    unused);
1039fc4fb2adSChris Zankel * int sysxtensa (SYS_XTENSA_ATOMIC_EXG_ADD, ptr, val,    unused);
1040fc4fb2adSChris Zankel * int sysxtensa (SYS_XTENSA_ATOMIC_CMP_SWP, ptr, oldval, newval);
10415a0015d6SChris Zankel *        a2            a6                   a3    a4      a5
10425a0015d6SChris Zankel *
10435a0015d6SChris Zankel * Entry condition:
10445a0015d6SChris Zankel *
1045fc4fb2adSChris Zankel *   a0:	a2 (syscall-nr), original value saved on stack (PT_AREG0)
10465a0015d6SChris Zankel *   a1:	a1
1047fc4fb2adSChris Zankel *   a2:	new stack pointer, original in a0 and DEPC
1048fc4fb2adSChris Zankel *   a3:	dispatch table, original in excsave_1
1049fc4fb2adSChris Zankel *   a4..a15:	unchanged
10505a0015d6SChris Zankel *   depc:	a2, original value saved on stack (PT_DEPC)
10515a0015d6SChris Zankel *   excsave_1:	a3
10525a0015d6SChris Zankel *
10535a0015d6SChris Zankel *   PT_DEPC >= VALID_DOUBLE_EXCEPTION_ADDRESS: double exception, DEPC
10545a0015d6SChris Zankel *	     <  VALID_DOUBLE_EXCEPTION_ADDRESS: regular exception
10555a0015d6SChris Zankel *
10565a0015d6SChris Zankel * Note: we don't have to save a2; a2 holds the return value
10575a0015d6SChris Zankel *
10585a0015d6SChris Zankel * We use the two macros TRY and CATCH:
10595a0015d6SChris Zankel *
10605a0015d6SChris Zankel * TRY	 adds an entry to the __ex_table fixup table for the immediately
10615a0015d6SChris Zankel *	 following instruction.
10625a0015d6SChris Zankel *
10635a0015d6SChris Zankel * CATCH catches any exception that occurred at one of the preceeding TRY
10645a0015d6SChris Zankel *       statements and continues from there
10655a0015d6SChris Zankel *
10665a0015d6SChris Zankel * Usage TRY	l32i	a0, a1, 0
10675a0015d6SChris Zankel *		<other code>
10685a0015d6SChris Zankel *	 done:	rfe
10695a0015d6SChris Zankel *	 CATCH	<set return code>
10705a0015d6SChris Zankel *		j done
10715a0015d6SChris Zankel */
10725a0015d6SChris Zankel
10735a0015d6SChris Zankel#define TRY								\
10745a0015d6SChris Zankel	.section __ex_table, "a";					\
10755a0015d6SChris Zankel	.word	66f, 67f;						\
10765a0015d6SChris Zankel	.text;								\
10775a0015d6SChris Zankel66:
10785a0015d6SChris Zankel
10795a0015d6SChris Zankel#define CATCH								\
10805a0015d6SChris Zankel67:
10815a0015d6SChris Zankel
1082fc4fb2adSChris ZankelENTRY(fast_syscall_xtensa)
10835a0015d6SChris Zankel
1084fc4fb2adSChris Zankel	xsr	a3, EXCSAVE_1		# restore a3, excsave1
10855a0015d6SChris Zankel
1086fc4fb2adSChris Zankel	s32i	a7, a2, PT_AREG7	# we need an additional register
10875a0015d6SChris Zankel	movi	a7, 4			# sizeof(unsigned int)
1088fc4fb2adSChris Zankel	access_ok a3, a7, a0, a2, .Leac	# a0: scratch reg, a2: sp
10895a0015d6SChris Zankel
1090fc4fb2adSChris Zankel	addi	a6, a6, -1		# assuming SYS_XTENSA_ATOMIC_SET = 1
1091fc4fb2adSChris Zankel	_bgeui	a6, SYS_XTENSA_COUNT - 1, .Lill
1092fc4fb2adSChris Zankel	_bnei	a6, SYS_XTENSA_ATOMIC_CMP_SWP - 1, .Lnswp
10935a0015d6SChris Zankel
1094fc4fb2adSChris Zankel	/* Fall through for ATOMIC_CMP_SWP. */
10955a0015d6SChris Zankel
10965a0015d6SChris Zankel.Lswp:	/* Atomic compare and swap */
10975a0015d6SChris Zankel
1098fc4fb2adSChris ZankelTRY	l32i	a0, a3, 0		# read old value
1099fc4fb2adSChris Zankel	bne	a0, a4, 1f		# same as old value? jump
1100fc4fb2adSChris ZankelTRY	s32i	a5, a3, 0		# different, modify value
1101fc4fb2adSChris Zankel	l32i	a7, a2, PT_AREG7	# restore a7
1102fc4fb2adSChris Zankel	l32i	a0, a2, PT_AREG0	# restore a0
1103fc4fb2adSChris Zankel	movi	a2, 1			# and return 1
1104fc4fb2adSChris Zankel	addi	a6, a6, 1		# restore a6 (really necessary?)
1105fc4fb2adSChris Zankel	rfe
11065a0015d6SChris Zankel
1107fc4fb2adSChris Zankel1:	l32i	a7, a2, PT_AREG7	# restore a7
1108fc4fb2adSChris Zankel	l32i	a0, a2, PT_AREG0	# restore a0
1109fc4fb2adSChris Zankel	movi	a2, 0			# return 0 (note that we cannot set
1110fc4fb2adSChris Zankel	addi	a6, a6, 1		# restore a6 (really necessary?)
1111fc4fb2adSChris Zankel	rfe
11125a0015d6SChris Zankel
1113fc4fb2adSChris Zankel.Lnswp:	/* Atomic set, add, and exg_add. */
11145a0015d6SChris Zankel
1115fc4fb2adSChris ZankelTRY	l32i	a7, a3, 0		# orig
1116fc4fb2adSChris Zankel	add	a0, a4, a7		# + arg
1117fc4fb2adSChris Zankel	moveqz	a0, a4, a6		# set
1118fc4fb2adSChris ZankelTRY	s32i	a0, a3, 0		# write new value
11195a0015d6SChris Zankel
1120fc4fb2adSChris Zankel	mov	a0, a2
11215a0015d6SChris Zankel	mov	a2, a7
1122fc4fb2adSChris Zankel	l32i	a7, a0, PT_AREG7	# restore a7
1123fc4fb2adSChris Zankel	l32i	a0, a0, PT_AREG0	# restore a0
1124fc4fb2adSChris Zankel	addi	a6, a6, 1		# restore a6 (really necessary?)
11255a0015d6SChris Zankel	rfe
11265a0015d6SChris Zankel
11275a0015d6SChris ZankelCATCH
1128fc4fb2adSChris Zankel.Leac:	l32i	a7, a2, PT_AREG7	# restore a7
1129fc4fb2adSChris Zankel	l32i	a0, a2, PT_AREG0	# restore a0
1130fc4fb2adSChris Zankel	movi	a2, -EFAULT
1131fc4fb2adSChris Zankel	rfe
1132fc4fb2adSChris Zankel
1133fc4fb2adSChris Zankel.Lill:	l32i	a7, a2, PT_AREG0	# restore a7
1134fc4fb2adSChris Zankel	l32i	a0, a2, PT_AREG0	# restore a0
1135fc4fb2adSChris Zankel	movi	a2, -EINVAL
1136fc4fb2adSChris Zankel	rfe
1137fc4fb2adSChris Zankel
11385a0015d6SChris Zankel
11395a0015d6SChris Zankel
11405a0015d6SChris Zankel
11415a0015d6SChris Zankel/* fast_syscall_spill_registers.
11425a0015d6SChris Zankel *
11435a0015d6SChris Zankel * Entry condition:
11445a0015d6SChris Zankel *
11455a0015d6SChris Zankel *   a0:	trashed, original value saved on stack (PT_AREG0)
11465a0015d6SChris Zankel *   a1:	a1
11475a0015d6SChris Zankel *   a2:	new stack pointer, original in DEPC
11485a0015d6SChris Zankel *   a3:	dispatch table
11495a0015d6SChris Zankel *   depc:	a2, original value saved on stack (PT_DEPC)
11505a0015d6SChris Zankel *   excsave_1:	a3
11515a0015d6SChris Zankel *
11525a0015d6SChris Zankel * Note: We assume the stack pointer is EXC_TABLE_KSTK in the fixup handler.
11535a0015d6SChris Zankel * Note: We don't need to save a2 in depc (return value)
11545a0015d6SChris Zankel */
11555a0015d6SChris Zankel
11565a0015d6SChris ZankelENTRY(fast_syscall_spill_registers)
11575a0015d6SChris Zankel
11585a0015d6SChris Zankel	/* Register a FIXUP handler (pass current wb as a parameter) */
11595a0015d6SChris Zankel
11605a0015d6SChris Zankel	movi	a0, fast_syscall_spill_registers_fixup
11615a0015d6SChris Zankel	s32i	a0, a3, EXC_TABLE_FIXUP
11625a0015d6SChris Zankel	rsr	a0, WINDOWBASE
11635a0015d6SChris Zankel	s32i	a0, a3, EXC_TABLE_PARAM
11645a0015d6SChris Zankel
11655a0015d6SChris Zankel	/* Save a3 and SAR on stack. */
11665a0015d6SChris Zankel
11675a0015d6SChris Zankel	rsr	a0, SAR
11685a0015d6SChris Zankel	xsr	a3, EXCSAVE_1		# restore a3 and excsave_1
11695a0015d6SChris Zankel	s32i	a0, a2, PT_AREG4	# store SAR to PT_AREG4
11705a0015d6SChris Zankel	s32i	a3, a2, PT_AREG3
11715a0015d6SChris Zankel
11725a0015d6SChris Zankel	/* The spill routine might clobber a7, a11, and a15. */
11735a0015d6SChris Zankel
11745a0015d6SChris Zankel	s32i	a7, a2, PT_AREG5
11755a0015d6SChris Zankel	s32i	a11, a2, PT_AREG6
11765a0015d6SChris Zankel	s32i	a15, a2, PT_AREG7
11775a0015d6SChris Zankel
11785a0015d6SChris Zankel	call0	_spill_registers	# destroys a3, DEPC, and SAR
11795a0015d6SChris Zankel
11805a0015d6SChris Zankel	/* Advance PC, restore registers and SAR, and return from exception. */
11815a0015d6SChris Zankel
11825a0015d6SChris Zankel	l32i	a3, a2, PT_AREG4
11835a0015d6SChris Zankel	l32i	a0, a2, PT_AREG0
11845a0015d6SChris Zankel	wsr	a3, SAR
11855a0015d6SChris Zankel	l32i	a3, a2, PT_AREG3
11865a0015d6SChris Zankel
11875a0015d6SChris Zankel	/* Restore clobbered registers. */
11885a0015d6SChris Zankel
11895a0015d6SChris Zankel	l32i	a7, a2, PT_AREG5
11905a0015d6SChris Zankel	l32i	a11, a2, PT_AREG6
11915a0015d6SChris Zankel	l32i	a15, a2, PT_AREG7
11925a0015d6SChris Zankel
11935a0015d6SChris Zankel	movi	a2, 0
11945a0015d6SChris Zankel	rfe
11955a0015d6SChris Zankel
11965a0015d6SChris Zankel/* Fixup handler.
11975a0015d6SChris Zankel *
11985a0015d6SChris Zankel * We get here if the spill routine causes an exception, e.g. tlb miss.
11995a0015d6SChris Zankel * We basically restore WINDOWBASE and WINDOWSTART to the condition when
12005a0015d6SChris Zankel * we entered the spill routine and jump to the user exception handler.
12015a0015d6SChris Zankel *
12025a0015d6SChris Zankel * a0: value of depc, original value in depc
12035a0015d6SChris Zankel * a2: trashed, original value in EXC_TABLE_DOUBLE_SAVE
12045a0015d6SChris Zankel * a3: exctable, original value in excsave1
12055a0015d6SChris Zankel */
12065a0015d6SChris Zankel
12075a0015d6SChris Zankelfast_syscall_spill_registers_fixup:
12085a0015d6SChris Zankel
12095a0015d6SChris Zankel	rsr	a2, WINDOWBASE	# get current windowbase (a2 is saved)
12105a0015d6SChris Zankel	xsr	a0, DEPC	# restore depc and a0
12115a0015d6SChris Zankel	ssl	a2		# set shift (32 - WB)
12125a0015d6SChris Zankel
12135a0015d6SChris Zankel	/* We need to make sure the current registers (a0-a3) are preserved.
12145a0015d6SChris Zankel	 * To do this, we simply set the bit for the current window frame
12155a0015d6SChris Zankel	 * in WS, so that the exception handlers save them to the task stack.
12165a0015d6SChris Zankel	 */
12175a0015d6SChris Zankel
12185a0015d6SChris Zankel	rsr	a3, EXCSAVE_1	# get spill-mask
12195a0015d6SChris Zankel	slli	a2, a3, 1	# shift left by one
12205a0015d6SChris Zankel
12215a0015d6SChris Zankel	slli	a3, a2, 32-WSBITS
12225a0015d6SChris Zankel	src	a2, a2, a3	# a1 = xxwww1yyxxxwww1yy......
12235a0015d6SChris Zankel	wsr	a2, WINDOWSTART	# set corrected windowstart
12245a0015d6SChris Zankel
12255a0015d6SChris Zankel	movi	a3, exc_table
12265a0015d6SChris Zankel	l32i	a2, a3, EXC_TABLE_DOUBLE_SAVE	# restore a2
12275a0015d6SChris Zankel	l32i	a3, a3, EXC_TABLE_PARAM	# original WB (in user task)
12285a0015d6SChris Zankel
12295a0015d6SChris Zankel	/* Return to the original (user task) WINDOWBASE.
12305a0015d6SChris Zankel	 * We leave the following frame behind:
12315a0015d6SChris Zankel	 * a0, a1, a2	same
12325a0015d6SChris Zankel	 * a3:		trashed (saved in excsave_1)
12335a0015d6SChris Zankel	 * depc:	depc (we have to return to that address)
12345a0015d6SChris Zankel	 * excsave_1:	a3
12355a0015d6SChris Zankel	 */
12365a0015d6SChris Zankel
12375a0015d6SChris Zankel	wsr	a3, WINDOWBASE
12385a0015d6SChris Zankel	rsync
12395a0015d6SChris Zankel
12405a0015d6SChris Zankel	/* We are now in the original frame when we entered _spill_registers:
12415a0015d6SChris Zankel	 *  a0: return address
12425a0015d6SChris Zankel	 *  a1: used, stack pointer
12435a0015d6SChris Zankel	 *  a2: kernel stack pointer
12445a0015d6SChris Zankel	 *  a3: available, saved in EXCSAVE_1
12455a0015d6SChris Zankel	 *  depc: exception address
12465a0015d6SChris Zankel	 *  excsave: a3
12475a0015d6SChris Zankel	 * Note: This frame might be the same as above.
12485a0015d6SChris Zankel	 */
12495a0015d6SChris Zankel
12505a0015d6SChris Zankel#ifdef SIGNAL_HANDLING_IN_DOUBLE_EXCEPTION
12515a0015d6SChris Zankel	/* Restore registers we precautiously saved.
12525a0015d6SChris Zankel	 * We have the value of the 'right' a3
12535a0015d6SChris Zankel	 */
12545a0015d6SChris Zankel
12555a0015d6SChris Zankel	l32i	a7, a2, PT_AREG5
12565a0015d6SChris Zankel	l32i	a11, a2, PT_AREG6
12575a0015d6SChris Zankel	l32i	a15, a2, PT_AREG7
12585a0015d6SChris Zankel#endif
12595a0015d6SChris Zankel
12605a0015d6SChris Zankel	/* Setup stack pointer. */
12615a0015d6SChris Zankel
12625a0015d6SChris Zankel	addi	a2, a2, -PT_USER_SIZE
12635a0015d6SChris Zankel	s32i	a0, a2, PT_AREG0
12645a0015d6SChris Zankel
12655a0015d6SChris Zankel	/* Make sure we return to this fixup handler. */
12665a0015d6SChris Zankel
12675a0015d6SChris Zankel	movi	a3, fast_syscall_spill_registers_fixup_return
12685a0015d6SChris Zankel	s32i	a3, a2, PT_DEPC		# setup depc
12695a0015d6SChris Zankel
12705a0015d6SChris Zankel	/* Jump to the exception handler. */
12715a0015d6SChris Zankel
12725a0015d6SChris Zankel	movi	a3, exc_table
12735a0015d6SChris Zankel	rsr	a0, EXCCAUSE
12745a0015d6SChris Zankel        addx4   a0, a0, a3              	# find entry in table
12755a0015d6SChris Zankel        l32i    a0, a0, EXC_TABLE_FAST_USER     # load handler
12765a0015d6SChris Zankel        jx      a0
12775a0015d6SChris Zankel
12785a0015d6SChris Zankelfast_syscall_spill_registers_fixup_return:
12795a0015d6SChris Zankel
12805a0015d6SChris Zankel	/* When we return here, all registers have been restored (a2: DEPC) */
12815a0015d6SChris Zankel
12825a0015d6SChris Zankel	wsr	a2, DEPC		# exception address
12835a0015d6SChris Zankel
12845a0015d6SChris Zankel	/* Restore fixup handler. */
12855a0015d6SChris Zankel
12865a0015d6SChris Zankel	xsr	a3, EXCSAVE_1
12875a0015d6SChris Zankel	movi	a2, fast_syscall_spill_registers_fixup
12885a0015d6SChris Zankel	s32i	a2, a3, EXC_TABLE_FIXUP
12895a0015d6SChris Zankel	rsr	a2, WINDOWBASE
12905a0015d6SChris Zankel	s32i	a2, a3, EXC_TABLE_PARAM
12915a0015d6SChris Zankel	l32i	a2, a3, EXC_TABLE_KSTK
12925a0015d6SChris Zankel
12935a0015d6SChris Zankel#ifdef SIGNAL_HANDLING_IN_DOUBLE_EXCEPTION
12945a0015d6SChris Zankel	/* Save registers again that might be clobbered. */
12955a0015d6SChris Zankel
12965a0015d6SChris Zankel	s32i	a7, a2, PT_AREG5
12975a0015d6SChris Zankel	s32i	a11, a2, PT_AREG6
12985a0015d6SChris Zankel	s32i	a15, a2, PT_AREG7
12995a0015d6SChris Zankel#endif
13005a0015d6SChris Zankel
13015a0015d6SChris Zankel	/* Load WB at the time the exception occurred. */
13025a0015d6SChris Zankel
13035a0015d6SChris Zankel	rsr	a3, SAR			# WB is still in SAR
13045a0015d6SChris Zankel	neg	a3, a3
13055a0015d6SChris Zankel	wsr	a3, WINDOWBASE
13065a0015d6SChris Zankel	rsync
13075a0015d6SChris Zankel
13085a0015d6SChris Zankel	/* Restore a3 and return. */
13095a0015d6SChris Zankel
13105a0015d6SChris Zankel	movi	a3, exc_table
13115a0015d6SChris Zankel	xsr	a3, EXCSAVE_1
13125a0015d6SChris Zankel
13135a0015d6SChris Zankel	rfde
13145a0015d6SChris Zankel
13155a0015d6SChris Zankel
13165a0015d6SChris Zankel/*
13175a0015d6SChris Zankel * spill all registers.
13185a0015d6SChris Zankel *
13195a0015d6SChris Zankel * This is not a real function. The following conditions must be met:
13205a0015d6SChris Zankel *
13215a0015d6SChris Zankel *  - must be called with call0.
13225a0015d6SChris Zankel *  - uses DEPC, a3 and SAR.
13235a0015d6SChris Zankel *  - the last 'valid' register of each frame are clobbered.
13245a0015d6SChris Zankel *  - the caller must have registered a fixup handler
13255a0015d6SChris Zankel *    (or be inside a critical section)
13265a0015d6SChris Zankel *  - PS_EXCM must be set (PS_WOE cleared?)
13275a0015d6SChris Zankel */
13285a0015d6SChris Zankel
13295a0015d6SChris ZankelENTRY(_spill_registers)
13305a0015d6SChris Zankel
13315a0015d6SChris Zankel	/*
13325a0015d6SChris Zankel	 * Rotate ws so that the current windowbase is at bit 0.
13335a0015d6SChris Zankel	 * Assume ws = xxxwww1yy (www1 current window frame).
13345a0015d6SChris Zankel	 * Rotate ws right so that a2 = yyxxxwww1.
13355a0015d6SChris Zankel	 */
13365a0015d6SChris Zankel
13375a0015d6SChris Zankel	wsr	a2, DEPC		# preserve a2
13385a0015d6SChris Zankel	rsr	a2, WINDOWBASE
13395a0015d6SChris Zankel	rsr	a3, WINDOWSTART
13405a0015d6SChris Zankel	ssr	a2			# holds WB
13415a0015d6SChris Zankel	slli	a2, a3, WSBITS
13425a0015d6SChris Zankel	or	a3, a3, a2		# a2 = xxxwww1yyxxxwww1yy
13435a0015d6SChris Zankel	srl	a3, a3
13445a0015d6SChris Zankel
13455a0015d6SChris Zankel	/* We are done if there are no more than the current register frame. */
13465a0015d6SChris Zankel
13475a0015d6SChris Zankel	extui	a3, a3, 1, WSBITS-2	# a3 = 0yyxxxwww
13485a0015d6SChris Zankel	movi	a2, (1 << (WSBITS-1))
13495a0015d6SChris Zankel	_beqz	a3, .Lnospill		# only one active frame? jump
13505a0015d6SChris Zankel
13515a0015d6SChris Zankel	/* We want 1 at the top, so that we return to the current windowbase */
13525a0015d6SChris Zankel
13535a0015d6SChris Zankel	or	a3, a3, a2		# 1yyxxxwww
13545a0015d6SChris Zankel
13555a0015d6SChris Zankel	/* Skip empty frames - get 'oldest' WINDOWSTART-bit. */
13565a0015d6SChris Zankel
13575a0015d6SChris Zankel	wsr	a3, WINDOWSTART		# save shifted windowstart
13585a0015d6SChris Zankel	neg	a2, a3
13595a0015d6SChris Zankel	and	a3, a2, a3		# first bit set from right: 000010000
13605a0015d6SChris Zankel
13615a0015d6SChris Zankel	ffs_ws	a2, a3			# a2: shifts to skip empty frames
13625a0015d6SChris Zankel	movi	a3, WSBITS
13635a0015d6SChris Zankel	sub	a2, a3, a2		# WSBITS-a2:number of 0-bits from right
13645a0015d6SChris Zankel	ssr	a2			# save in SAR for later.
13655a0015d6SChris Zankel
13665a0015d6SChris Zankel	rsr	a3, WINDOWBASE
13675a0015d6SChris Zankel	add	a3, a3, a2
13685a0015d6SChris Zankel	rsr	a2, DEPC		# restore a2
13695a0015d6SChris Zankel	wsr	a3, WINDOWBASE
13705a0015d6SChris Zankel	rsync
13715a0015d6SChris Zankel
13725a0015d6SChris Zankel	rsr	a3, WINDOWSTART
13735a0015d6SChris Zankel	srl	a3, a3			# shift windowstart
13745a0015d6SChris Zankel
13755a0015d6SChris Zankel	/* WB is now just one frame below the oldest frame in the register
13765a0015d6SChris Zankel	   window. WS is shifted so the oldest frame is in bit 0, thus, WB
13775a0015d6SChris Zankel	   and WS differ by one 4-register frame. */
13785a0015d6SChris Zankel
13795a0015d6SChris Zankel	/* Save frames. Depending what call was used (call4, call8, call12),
13805a0015d6SChris Zankel	 * we have to save 4,8. or 12 registers.
13815a0015d6SChris Zankel	 */
13825a0015d6SChris Zankel
13835a0015d6SChris Zankel	_bbsi.l	a3, 1, .Lc4
13845a0015d6SChris Zankel	_bbsi.l	a3, 2, .Lc8
13855a0015d6SChris Zankel
13865a0015d6SChris Zankel	/* Special case: we have a call12-frame starting at a4. */
13875a0015d6SChris Zankel
13885a0015d6SChris Zankel	_bbci.l	a3, 3, .Lc12	# bit 3 shouldn't be zero! (Jump to Lc12 first)
13895a0015d6SChris Zankel
13905a0015d6SChris Zankel	s32e	a4, a1, -16	# a1 is valid with an empty spill area
13915a0015d6SChris Zankel	l32e	a4, a5, -12
13925a0015d6SChris Zankel	s32e	a8, a4, -48
13935a0015d6SChris Zankel	mov	a8, a4
13945a0015d6SChris Zankel	l32e	a4, a1, -16
13955a0015d6SChris Zankel	j	.Lc12c
13965a0015d6SChris Zankel
13975a0015d6SChris Zankel.Lloop: _bbsi.l	a3, 1, .Lc4
13985a0015d6SChris Zankel	_bbci.l	a3, 2, .Lc12
13995a0015d6SChris Zankel
14005a0015d6SChris Zankel.Lc8:	s32e	a4, a13, -16
14015a0015d6SChris Zankel	l32e	a4, a5, -12
14025a0015d6SChris Zankel	s32e	a8, a4, -32
14035a0015d6SChris Zankel	s32e	a5, a13, -12
14045a0015d6SChris Zankel	s32e	a6, a13, -8
14055a0015d6SChris Zankel	s32e	a7, a13, -4
14065a0015d6SChris Zankel	s32e	a9, a4, -28
14075a0015d6SChris Zankel	s32e	a10, a4, -24
14085a0015d6SChris Zankel	s32e	a11, a4, -20
14095a0015d6SChris Zankel
14105a0015d6SChris Zankel	srli	a11, a3, 2		# shift windowbase by 2
14115a0015d6SChris Zankel	rotw	2
14125a0015d6SChris Zankel	_bnei	a3, 1, .Lloop
14135a0015d6SChris Zankel
14145a0015d6SChris Zankel.Lexit: /* Done. Do the final rotation, set WS, and return. */
14155a0015d6SChris Zankel
14165a0015d6SChris Zankel	rotw	1
14175a0015d6SChris Zankel	rsr	a3, WINDOWBASE
14185a0015d6SChris Zankel	ssl	a3
14195a0015d6SChris Zankel	movi	a3, 1
14205a0015d6SChris Zankel	sll	a3, a3
14215a0015d6SChris Zankel	wsr	a3, WINDOWSTART
14225a0015d6SChris Zankel
14235a0015d6SChris Zankel.Lnospill:
14245a0015d6SChris Zankel	jx	a0
14255a0015d6SChris Zankel
14265a0015d6SChris Zankel.Lc4:	s32e	a4, a9, -16
14275a0015d6SChris Zankel	s32e	a5, a9, -12
14285a0015d6SChris Zankel	s32e	a6, a9, -8
14295a0015d6SChris Zankel	s32e	a7, a9, -4
14305a0015d6SChris Zankel
14315a0015d6SChris Zankel	srli	a7, a3, 1
14325a0015d6SChris Zankel	rotw	1
14335a0015d6SChris Zankel	_bnei	a3, 1, .Lloop
14345a0015d6SChris Zankel	j	.Lexit
14355a0015d6SChris Zankel
14365a0015d6SChris Zankel.Lc12:	_bbci.l	a3, 3, .Linvalid_mask	# bit 2 shouldn't be zero!
14375a0015d6SChris Zankel
14385a0015d6SChris Zankel	/* 12-register frame (call12) */
14395a0015d6SChris Zankel
14405a0015d6SChris Zankel	l32e	a2, a5, -12
14415a0015d6SChris Zankel	s32e	a8, a2, -48
14425a0015d6SChris Zankel	mov	a8, a2
14435a0015d6SChris Zankel
14445a0015d6SChris Zankel.Lc12c: s32e	a9, a8, -44
14455a0015d6SChris Zankel	s32e	a10, a8, -40
14465a0015d6SChris Zankel	s32e	a11, a8, -36
14475a0015d6SChris Zankel	s32e	a12, a8, -32
14485a0015d6SChris Zankel	s32e	a13, a8, -28
14495a0015d6SChris Zankel	s32e	a14, a8, -24
14505a0015d6SChris Zankel	s32e	a15, a8, -20
14515a0015d6SChris Zankel	srli	a15, a3, 3
14525a0015d6SChris Zankel
14535a0015d6SChris Zankel	/* The stack pointer for a4..a7 is out of reach, so we rotate the
14545a0015d6SChris Zankel	 * window, grab the stackpointer, and rotate back.
14555a0015d6SChris Zankel	 * Alternatively, we could also use the following approach, but that
14565a0015d6SChris Zankel	 * makes the fixup routine much more complicated:
14575a0015d6SChris Zankel	 * rotw	1
14585a0015d6SChris Zankel	 * s32e	a0, a13, -16
14595a0015d6SChris Zankel	 * ...
14605a0015d6SChris Zankel	 * rotw 2
14615a0015d6SChris Zankel	 */
14625a0015d6SChris Zankel
14635a0015d6SChris Zankel	rotw	1
14645a0015d6SChris Zankel	mov	a5, a13
14655a0015d6SChris Zankel	rotw	-1
14665a0015d6SChris Zankel
14675a0015d6SChris Zankel	s32e	a4, a9, -16
14685a0015d6SChris Zankel	s32e	a5, a9, -12
14695a0015d6SChris Zankel	s32e	a6, a9, -8
14705a0015d6SChris Zankel	s32e	a7, a9, -4
14715a0015d6SChris Zankel
14725a0015d6SChris Zankel	rotw	3
14735a0015d6SChris Zankel
14745a0015d6SChris Zankel	_beqi	a3, 1, .Lexit
14755a0015d6SChris Zankel	j	.Lloop
14765a0015d6SChris Zankel
14775a0015d6SChris Zankel.Linvalid_mask:
14785a0015d6SChris Zankel
14795a0015d6SChris Zankel	/* We get here because of an unrecoverable error in the window
14805a0015d6SChris Zankel	 * registers. If we are in user space, we kill the application,
14815a0015d6SChris Zankel	 * however, this condition is unrecoverable in kernel space.
14825a0015d6SChris Zankel	 */
14835a0015d6SChris Zankel
14845a0015d6SChris Zankel	rsr	a0, PS
1485173d6681SChris Zankel	_bbci.l	a0, PS_UM_BIT, 1f
14865a0015d6SChris Zankel
14875a0015d6SChris Zankel 	/* User space: Setup a dummy frame and kill application.
14885a0015d6SChris Zankel	 * Note: We assume EXC_TABLE_KSTK contains a valid stack pointer.
14895a0015d6SChris Zankel	 */
14905a0015d6SChris Zankel
14915a0015d6SChris Zankel	movi	a0, 1
14925a0015d6SChris Zankel	movi	a1, 0
14935a0015d6SChris Zankel
14945a0015d6SChris Zankel	wsr	a0, WINDOWSTART
14955a0015d6SChris Zankel	wsr	a1, WINDOWBASE
14965a0015d6SChris Zankel	rsync
14975a0015d6SChris Zankel
14985a0015d6SChris Zankel	movi	a0, 0
14995a0015d6SChris Zankel
15005a0015d6SChris Zankel	movi	a3, exc_table
15015a0015d6SChris Zankel	l32i	a1, a3, EXC_TABLE_KSTK
15025a0015d6SChris Zankel	wsr	a3, EXCSAVE_1
15035a0015d6SChris Zankel
1504173d6681SChris Zankel	movi	a4, (1 << PS_WOE_BIT) | 1
15055a0015d6SChris Zankel	wsr	a4, PS
15065a0015d6SChris Zankel	rsync
15075a0015d6SChris Zankel
15085a0015d6SChris Zankel	movi	a6, SIGSEGV
15095a0015d6SChris Zankel	movi	a4, do_exit
15105a0015d6SChris Zankel	callx4	a4
15115a0015d6SChris Zankel
15125a0015d6SChris Zankel1:	/* Kernel space: PANIC! */
15135a0015d6SChris Zankel
15145a0015d6SChris Zankel	wsr	a0, EXCSAVE_1
15155a0015d6SChris Zankel	movi	a0, unrecoverable_exception
15165a0015d6SChris Zankel	callx0	a0		# should not return
15175a0015d6SChris Zankel1:	j	1b
15185a0015d6SChris Zankel
15195a0015d6SChris Zankel/*
15205a0015d6SChris Zankel * We should never get here. Bail out!
15215a0015d6SChris Zankel */
15225a0015d6SChris Zankel
15235a0015d6SChris ZankelENTRY(fast_second_level_miss_double_kernel)
15245a0015d6SChris Zankel
15255a0015d6SChris Zankel1:	movi	a0, unrecoverable_exception
15265a0015d6SChris Zankel	callx0	a0		# should not return
15275a0015d6SChris Zankel1:	j	1b
15285a0015d6SChris Zankel
15295a0015d6SChris Zankel/* First-level entry handler for user, kernel, and double 2nd-level
15305a0015d6SChris Zankel * TLB miss exceptions.  Note that for now, user and kernel miss
15315a0015d6SChris Zankel * exceptions share the same entry point and are handled identically.
15325a0015d6SChris Zankel *
15335a0015d6SChris Zankel * An old, less-efficient C version of this function used to exist.
15345a0015d6SChris Zankel * We include it below, interleaved as comments, for reference.
15355a0015d6SChris Zankel *
15365a0015d6SChris Zankel * Entry condition:
15375a0015d6SChris Zankel *
15385a0015d6SChris Zankel *   a0:	trashed, original value saved on stack (PT_AREG0)
15395a0015d6SChris Zankel *   a1:	a1
15405a0015d6SChris Zankel *   a2:	new stack pointer, original in DEPC
15415a0015d6SChris Zankel *   a3:	dispatch table
15425a0015d6SChris Zankel *   depc:	a2, original value saved on stack (PT_DEPC)
15435a0015d6SChris Zankel *   excsave_1:	a3
15445a0015d6SChris Zankel *
15455a0015d6SChris Zankel *   PT_DEPC >= VALID_DOUBLE_EXCEPTION_ADDRESS: double exception, DEPC
15465a0015d6SChris Zankel *	     <  VALID_DOUBLE_EXCEPTION_ADDRESS: regular exception
15475a0015d6SChris Zankel */
15485a0015d6SChris Zankel
15495a0015d6SChris ZankelENTRY(fast_second_level_miss)
15505a0015d6SChris Zankel
15515a0015d6SChris Zankel	/* Save a1. Note: we don't expect a double exception. */
15525a0015d6SChris Zankel
15535a0015d6SChris Zankel	s32i	a1, a2, PT_AREG1
15545a0015d6SChris Zankel
15555a0015d6SChris Zankel	/* We need to map the page of PTEs for the user task.  Find
15565a0015d6SChris Zankel	 * the pointer to that page.  Also, it's possible for tsk->mm
15575a0015d6SChris Zankel	 * to be NULL while tsk->active_mm is nonzero if we faulted on
15585a0015d6SChris Zankel	 * a vmalloc address.  In that rare case, we must use
15595a0015d6SChris Zankel	 * active_mm instead to avoid a fault in this handler.  See
15605a0015d6SChris Zankel	 *
15615a0015d6SChris Zankel	 * http://mail.nl.linux.org/linux-mm/2002-08/msg00258.html
15625a0015d6SChris Zankel	 *   (or search Internet on "mm vs. active_mm")
15635a0015d6SChris Zankel	 *
15645a0015d6SChris Zankel	 *	if (!mm)
15655a0015d6SChris Zankel	 *		mm = tsk->active_mm;
15665a0015d6SChris Zankel	 *	pgd = pgd_offset (mm, regs->excvaddr);
15675a0015d6SChris Zankel	 *	pmd = pmd_offset (pgd, regs->excvaddr);
15685a0015d6SChris Zankel	 *	pmdval = *pmd;
15695a0015d6SChris Zankel	 */
15705a0015d6SChris Zankel
15715a0015d6SChris Zankel	GET_CURRENT(a1,a2)
15725a0015d6SChris Zankel	l32i	a0, a1, TASK_MM		# tsk->mm
15735a0015d6SChris Zankel	beqz	a0, 9f
15745a0015d6SChris Zankel
1575*01858d1bSChris Zankel
1576*01858d1bSChris Zankel	/* We deliberately destroy a3 that holds the exception table. */
1577*01858d1bSChris Zankel
1578*01858d1bSChris Zankel8:	rsr	a3, EXCVADDR		# fault address
1579*01858d1bSChris Zankel	_PGD_OFFSET(a0, a3, a1)
15805a0015d6SChris Zankel	l32i	a0, a0, 0		# read pmdval
15815a0015d6SChris Zankel	beqz	a0, 2f
15825a0015d6SChris Zankel
15835a0015d6SChris Zankel	/* Read ptevaddr and convert to top of page-table page.
15845a0015d6SChris Zankel	 *
15855a0015d6SChris Zankel	 * 	vpnval = read_ptevaddr_register() & PAGE_MASK;
15865a0015d6SChris Zankel	 * 	vpnval += DTLB_WAY_PGTABLE;
15875a0015d6SChris Zankel	 *	pteval = mk_pte (virt_to_page(pmd_val(pmdval)), PAGE_KERNEL);
15885a0015d6SChris Zankel	 *	write_dtlb_entry (pteval, vpnval);
15895a0015d6SChris Zankel	 *
15905a0015d6SChris Zankel	 * The messy computation for 'pteval' above really simplifies
15915a0015d6SChris Zankel	 * into the following:
15925a0015d6SChris Zankel	 *
15935a0015d6SChris Zankel	 * pteval = ((pmdval - PAGE_OFFSET) & PAGE_MASK) | PAGE_KERNEL
15945a0015d6SChris Zankel	 */
15955a0015d6SChris Zankel
15965a0015d6SChris Zankel	movi	a1, -PAGE_OFFSET
15975a0015d6SChris Zankel	add	a0, a0, a1		# pmdval - PAGE_OFFSET
15985a0015d6SChris Zankel	extui	a1, a0, 0, PAGE_SHIFT	# ... & PAGE_MASK
15995a0015d6SChris Zankel	xor	a0, a0, a1
16005a0015d6SChris Zankel
1601*01858d1bSChris Zankel	movi	a1, _PAGE_DIRECTORY
16025a0015d6SChris Zankel	or	a0, a0, a1		# ... | PAGE_DIRECTORY
16035a0015d6SChris Zankel
1604*01858d1bSChris Zankel	/*
1605*01858d1bSChris Zankel	 * We utilize all three wired-ways (7-9( to hold pmd translations.
1606*01858d1bSChris Zankel	 * Memory regions are mapped to the DTLBs according to bits 28 and 29.
1607*01858d1bSChris Zankel	 * This allows to map the three most common regions to three different
1608*01858d1bSChris Zankel	 * DTLBs:
1609*01858d1bSChris Zankel	 *  0,1 -> way 7	program (0040.0000) and virtual (c000.0000)
1610*01858d1bSChris Zankel	 *  2   -> way 8	shared libaries (2000.0000)
1611*01858d1bSChris Zankel	 *  3   -> way 0	stack (3000.0000)
1612*01858d1bSChris Zankel	 */
16135a0015d6SChris Zankel
1614*01858d1bSChris Zankel	extui	a3, a3, 28, 2		# addr. bit 28 and 29	0,1,2,3
1615*01858d1bSChris Zankel	rsr	a1, PTEVADDR
1616*01858d1bSChris Zankel	addx2	a3, a3, a3		# ->			0,3,6,9
1617*01858d1bSChris Zankel	srli	a1, a1, PAGE_SHIFT
1618*01858d1bSChris Zankel	extui	a3, a3, 2, 2		# ->			0,0,1,2
1619*01858d1bSChris Zankel	slli	a1, a1, PAGE_SHIFT	# ptevaddr & PAGE_MASK
1620*01858d1bSChris Zankel	addi	a3, a3, DTLB_WAY_PGD
1621*01858d1bSChris Zankel	add	a1, a1, a3		# ... + way_number
1622*01858d1bSChris Zankel
1623*01858d1bSChris Zankel3:	wdtlb	a0, a1
16245a0015d6SChris Zankel	dsync
16255a0015d6SChris Zankel
16265a0015d6SChris Zankel	/* Exit critical section. */
16275a0015d6SChris Zankel
1628*01858d1bSChris Zankel4:	movi	a3, exc_table		# restore a3
16295a0015d6SChris Zankel	movi	a0, 0
16305a0015d6SChris Zankel	s32i	a0, a3, EXC_TABLE_FIXUP
16315a0015d6SChris Zankel
16325a0015d6SChris Zankel	/* Restore the working registers, and return. */
16335a0015d6SChris Zankel
16345a0015d6SChris Zankel	l32i	a0, a2, PT_AREG0
16355a0015d6SChris Zankel	l32i	a1, a2, PT_AREG1
16365a0015d6SChris Zankel	l32i	a2, a2, PT_DEPC
16375a0015d6SChris Zankel	xsr	a3, EXCSAVE_1
16385a0015d6SChris Zankel
16395a0015d6SChris Zankel	bgeui	a2, VALID_DOUBLE_EXCEPTION_ADDRESS, 1f
16405a0015d6SChris Zankel
16415a0015d6SChris Zankel	/* Restore excsave1 and return. */
16425a0015d6SChris Zankel
16435a0015d6SChris Zankel	rsr	a2, DEPC
16445a0015d6SChris Zankel	rfe
16455a0015d6SChris Zankel
16465a0015d6SChris Zankel	/* Return from double exception. */
16475a0015d6SChris Zankel
16485a0015d6SChris Zankel1:	xsr	a2, DEPC
16495a0015d6SChris Zankel	esync
16505a0015d6SChris Zankel	rfde
16515a0015d6SChris Zankel
16525a0015d6SChris Zankel9:	l32i	a0, a1, TASK_ACTIVE_MM	# unlikely case mm == 0
16535a0015d6SChris Zankel	j	8b
16545a0015d6SChris Zankel
16555a0015d6SChris Zankel2:	/* Invalid PGD, default exception handling */
16565a0015d6SChris Zankel
1657*01858d1bSChris Zankel	movi	a3, exc_table
16585a0015d6SChris Zankel	rsr	a1, DEPC
16595a0015d6SChris Zankel	xsr	a3, EXCSAVE_1
16605a0015d6SChris Zankel	s32i	a1, a2, PT_AREG2
16615a0015d6SChris Zankel	s32i	a3, a2, PT_AREG3
16625a0015d6SChris Zankel	mov	a1, a2
16635a0015d6SChris Zankel
16645a0015d6SChris Zankel	rsr	a2, PS
1665173d6681SChris Zankel	bbsi.l	a2, PS_UM_BIT, 1f
16665a0015d6SChris Zankel	j	_kernel_exception
16675a0015d6SChris Zankel1:	j	_user_exception
16685a0015d6SChris Zankel
16695a0015d6SChris Zankel
16705a0015d6SChris Zankel/*
16715a0015d6SChris Zankel * StoreProhibitedException
16725a0015d6SChris Zankel *
16735a0015d6SChris Zankel * Update the pte and invalidate the itlb mapping for this pte.
16745a0015d6SChris Zankel *
16755a0015d6SChris Zankel * Entry condition:
16765a0015d6SChris Zankel *
16775a0015d6SChris Zankel *   a0:	trashed, original value saved on stack (PT_AREG0)
16785a0015d6SChris Zankel *   a1:	a1
16795a0015d6SChris Zankel *   a2:	new stack pointer, original in DEPC
16805a0015d6SChris Zankel *   a3:	dispatch table
16815a0015d6SChris Zankel *   depc:	a2, original value saved on stack (PT_DEPC)
16825a0015d6SChris Zankel *   excsave_1:	a3
16835a0015d6SChris Zankel *
16845a0015d6SChris Zankel *   PT_DEPC >= VALID_DOUBLE_EXCEPTION_ADDRESS: double exception, DEPC
16855a0015d6SChris Zankel *	     <  VALID_DOUBLE_EXCEPTION_ADDRESS: regular exception
16865a0015d6SChris Zankel */
16875a0015d6SChris Zankel
16885a0015d6SChris ZankelENTRY(fast_store_prohibited)
16895a0015d6SChris Zankel
16905a0015d6SChris Zankel	/* Save a1 and a4. */
16915a0015d6SChris Zankel
16925a0015d6SChris Zankel	s32i	a1, a2, PT_AREG1
16935a0015d6SChris Zankel	s32i	a4, a2, PT_AREG4
16945a0015d6SChris Zankel
16955a0015d6SChris Zankel	GET_CURRENT(a1,a2)
16965a0015d6SChris Zankel	l32i	a0, a1, TASK_MM		# tsk->mm
16975a0015d6SChris Zankel	beqz	a0, 9f
16985a0015d6SChris Zankel
16995a0015d6SChris Zankel8:	rsr	a1, EXCVADDR		# fault address
17005a0015d6SChris Zankel	_PGD_OFFSET(a0, a1, a4)
17015a0015d6SChris Zankel	l32i	a0, a0, 0
17025a0015d6SChris Zankel	beqz	a0, 2f
17035a0015d6SChris Zankel
1704*01858d1bSChris Zankel	/* Note that we assume _PAGE_WRITABLE_BIT is only set if pte is valid.*/
1705*01858d1bSChris Zankel
17065a0015d6SChris Zankel	_PTE_OFFSET(a0, a1, a4)
17075a0015d6SChris Zankel	l32i	a4, a0, 0		# read pteval
1708*01858d1bSChris Zankel	bbci.l	a4, _PAGE_WRITABLE_BIT, 2f
17095a0015d6SChris Zankel
1710*01858d1bSChris Zankel	movi	a1, _PAGE_ACCESSED | _PAGE_DIRTY | _PAGE_HW_WRITE
17115a0015d6SChris Zankel	or	a4, a4, a1
17125a0015d6SChris Zankel	rsr	a1, EXCVADDR
17135a0015d6SChris Zankel	s32i	a4, a0, 0
17145a0015d6SChris Zankel
17155a0015d6SChris Zankel	/* We need to flush the cache if we have page coloring. */
17165a0015d6SChris Zankel#if (DCACHE_WAY_SIZE > PAGE_SIZE) && XCHAL_DCACHE_IS_WRITEBACK
17175a0015d6SChris Zankel	dhwb	a0, 0
17185a0015d6SChris Zankel#endif
17195a0015d6SChris Zankel	pdtlb	a0, a1
17205a0015d6SChris Zankel	wdtlb	a4, a0
17215a0015d6SChris Zankel
17225a0015d6SChris Zankel	/* Exit critical section. */
17235a0015d6SChris Zankel
17245a0015d6SChris Zankel	movi	a0, 0
17255a0015d6SChris Zankel	s32i	a0, a3, EXC_TABLE_FIXUP
17265a0015d6SChris Zankel
17275a0015d6SChris Zankel	/* Restore the working registers, and return. */
17285a0015d6SChris Zankel
17295a0015d6SChris Zankel	l32i	a4, a2, PT_AREG4
17305a0015d6SChris Zankel	l32i	a1, a2, PT_AREG1
17315a0015d6SChris Zankel	l32i	a0, a2, PT_AREG0
17325a0015d6SChris Zankel	l32i	a2, a2, PT_DEPC
17335a0015d6SChris Zankel
17345a0015d6SChris Zankel	/* Restore excsave1 and a3. */
17355a0015d6SChris Zankel
17365a0015d6SChris Zankel	xsr	a3, EXCSAVE_1
17375a0015d6SChris Zankel	bgeui	a2, VALID_DOUBLE_EXCEPTION_ADDRESS, 1f
17385a0015d6SChris Zankel
17395a0015d6SChris Zankel	rsr	a2, DEPC
17405a0015d6SChris Zankel	rfe
17415a0015d6SChris Zankel
17425a0015d6SChris Zankel	/* Double exception. Restore FIXUP handler and return. */
17435a0015d6SChris Zankel
17445a0015d6SChris Zankel1:	xsr	a2, DEPC
17455a0015d6SChris Zankel	esync
17465a0015d6SChris Zankel	rfde
17475a0015d6SChris Zankel
17485a0015d6SChris Zankel9:	l32i	a0, a1, TASK_ACTIVE_MM	# unlikely case mm == 0
17495a0015d6SChris Zankel	j	8b
17505a0015d6SChris Zankel
17515a0015d6SChris Zankel2:	/* If there was a problem, handle fault in C */
17525a0015d6SChris Zankel
17535a0015d6SChris Zankel	rsr	a4, DEPC	# still holds a2
17545a0015d6SChris Zankel	xsr	a3, EXCSAVE_1
17555a0015d6SChris Zankel	s32i	a4, a2, PT_AREG2
17565a0015d6SChris Zankel	s32i	a3, a2, PT_AREG3
17575a0015d6SChris Zankel	l32i	a4, a2, PT_AREG4
17585a0015d6SChris Zankel	mov	a1, a2
17595a0015d6SChris Zankel
17605a0015d6SChris Zankel	rsr	a2, PS
1761173d6681SChris Zankel	bbsi.l	a2, PS_UM_BIT, 1f
17625a0015d6SChris Zankel	j	_kernel_exception
17635a0015d6SChris Zankel1:	j	_user_exception
17645a0015d6SChris Zankel
17655a0015d6SChris Zankel
17665a0015d6SChris Zankel#if XCHAL_EXTRA_SA_SIZE
17675a0015d6SChris Zankel
17685a0015d6SChris Zankel#warning fast_coprocessor untested
17695a0015d6SChris Zankel
17705a0015d6SChris Zankel/*
17715a0015d6SChris Zankel * Entry condition:
17725a0015d6SChris Zankel *
17735a0015d6SChris Zankel *   a0:	trashed, original value saved on stack (PT_AREG0)
17745a0015d6SChris Zankel *   a1:	a1
17755a0015d6SChris Zankel *   a2:	new stack pointer, original in DEPC
17765a0015d6SChris Zankel *   a3:	dispatch table
17775a0015d6SChris Zankel *   depc:	a2, original value saved on stack (PT_DEPC)
17785a0015d6SChris Zankel *   excsave_1:	a3
17795a0015d6SChris Zankel *
17805a0015d6SChris Zankel *   PT_DEPC >= VALID_DOUBLE_EXCEPTION_ADDRESS: double exception, DEPC
17815a0015d6SChris Zankel *	     <  VALID_DOUBLE_EXCEPTION_ADDRESS: regular exception
17825a0015d6SChris Zankel */
17835a0015d6SChris Zankel
17845a0015d6SChris ZankelENTRY(fast_coprocessor_double)
17855a0015d6SChris Zankel	wsr	a0, EXCSAVE_1
17865a0015d6SChris Zankel	movi	a0, unrecoverable_exception
17875a0015d6SChris Zankel	callx0	a0
17885a0015d6SChris Zankel
17895a0015d6SChris ZankelENTRY(fast_coprocessor)
17905a0015d6SChris Zankel
17915a0015d6SChris Zankel	/* Fatal if we are in a double exception. */
17925a0015d6SChris Zankel
17935a0015d6SChris Zankel	l32i	a0, a2, PT_DEPC
17945a0015d6SChris Zankel	_bgeui	a0, VALID_DOUBLE_EXCEPTION_ADDRESS, fast_coprocessor_double
17955a0015d6SChris Zankel
17965a0015d6SChris Zankel	/* Save some registers a1, a3, a4, SAR */
17975a0015d6SChris Zankel
17985a0015d6SChris Zankel	xsr	a3, EXCSAVE_1
17995a0015d6SChris Zankel	s32i	a3, a2, PT_AREG3
18005a0015d6SChris Zankel	rsr	a3, SAR
18015a0015d6SChris Zankel	s32i	a4, a2, PT_AREG4
18025a0015d6SChris Zankel	s32i	a1, a2, PT_AREG1
18035a0015d6SChris Zankel	s32i	a5, a1, PT_AREG5
18045a0015d6SChris Zankel	s32i	a3, a2, PT_SAR
18055a0015d6SChris Zankel	mov	a1, a2
18065a0015d6SChris Zankel
18075a0015d6SChris Zankel	/* Currently, the HAL macros only guarantee saving a0 and a1.
18085a0015d6SChris Zankel	 * These can and will be refined in the future, but for now,
18095a0015d6SChris Zankel	 * just save the remaining registers of a2...a15.
18105a0015d6SChris Zankel	 */
18115a0015d6SChris Zankel	s32i	a6, a1, PT_AREG6
18125a0015d6SChris Zankel	s32i	a7, a1, PT_AREG7
18135a0015d6SChris Zankel	s32i	a8, a1, PT_AREG8
18145a0015d6SChris Zankel	s32i	a9, a1, PT_AREG9
18155a0015d6SChris Zankel	s32i	a10, a1, PT_AREG10
18165a0015d6SChris Zankel	s32i	a11, a1, PT_AREG11
18175a0015d6SChris Zankel	s32i	a12, a1, PT_AREG12
18185a0015d6SChris Zankel	s32i	a13, a1, PT_AREG13
18195a0015d6SChris Zankel	s32i	a14, a1, PT_AREG14
18205a0015d6SChris Zankel	s32i	a15, a1, PT_AREG15
18215a0015d6SChris Zankel
18225a0015d6SChris Zankel	/* Find coprocessor number. Subtract first CP EXCCAUSE from EXCCAUSE */
18235a0015d6SChris Zankel
18245a0015d6SChris Zankel	rsr	a0, EXCCAUSE
18255a0015d6SChris Zankel	addi	a3, a0, -XCHAL_EXCCAUSE_COPROCESSOR0_DISABLED
18265a0015d6SChris Zankel
18275a0015d6SChris Zankel	/* Set corresponding CPENABLE bit */
18285a0015d6SChris Zankel
18295a0015d6SChris Zankel	movi	a4, 1
18305a0015d6SChris Zankel	ssl	a3			# SAR: 32 - coprocessor_number
18315a0015d6SChris Zankel	rsr	a5, CPENABLE
18325a0015d6SChris Zankel	sll	a4, a4
18335a0015d6SChris Zankel	or	a4, a5, a4
18345a0015d6SChris Zankel	wsr	a4, CPENABLE
18355a0015d6SChris Zankel	rsync
18365a0015d6SChris Zankel	movi	a5, coprocessor_info	# list of owner and offset into cp_save
18375a0015d6SChris Zankel	addx8	a0, a4, a5		# entry for CP
18385a0015d6SChris Zankel
18395a0015d6SChris Zankel	bne	a4, a5, .Lload		# bit wasn't set before, cp not in use
18405a0015d6SChris Zankel
18415a0015d6SChris Zankel	/* Now compare the current task with the owner of the coprocessor.
18425a0015d6SChris Zankel	 * If they are the same, there is no reason to save or restore any
18435a0015d6SChris Zankel	 * coprocessor state. Having already enabled the coprocessor,
18445a0015d6SChris Zankel	 * branch ahead to return.
18455a0015d6SChris Zankel	 */
18465a0015d6SChris Zankel	GET_CURRENT(a5,a1)
18475a0015d6SChris Zankel	l32i	a4, a0, COPROCESSOR_INFO_OWNER	# a4: current owner for this CP
18485a0015d6SChris Zankel	beq	a4, a5, .Ldone
18495a0015d6SChris Zankel
18505a0015d6SChris Zankel	/* Find location to dump current coprocessor state:
18515a0015d6SChris Zankel	 *  task_struct->task_cp_save_offset + coprocessor_offset[coprocessor]
18525a0015d6SChris Zankel	 *
18535a0015d6SChris Zankel	 * Note: a0 pointer to the entry in the coprocessor owner table,
18545a0015d6SChris Zankel	 *	 a3 coprocessor number,
18555a0015d6SChris Zankel         *	 a4 current owner of coprocessor.
18565a0015d6SChris Zankel	 */
18575a0015d6SChris Zankel	l32i	a5, a0, COPROCESSOR_INFO_OFFSET
18585a0015d6SChris Zankel	addi	a2, a4, THREAD_CP_SAVE
18595a0015d6SChris Zankel	add	a2, a2, a5
18605a0015d6SChris Zankel
18615a0015d6SChris Zankel	/* Store current coprocessor states. (a5 still has CP number) */
18625a0015d6SChris Zankel
18635a0015d6SChris Zankel	xchal_cpi_store_funcbody
18645a0015d6SChris Zankel
18655a0015d6SChris Zankel	/* The macro might have destroyed a3 (coprocessor number), but
18665a0015d6SChris Zankel	 * SAR still has 32 - coprocessor_number!
18675a0015d6SChris Zankel	 */
18685a0015d6SChris Zankel	movi	a3, 32
18695a0015d6SChris Zankel	rsr	a4, SAR
18705a0015d6SChris Zankel	sub	a3, a3, a4
18715a0015d6SChris Zankel
18725a0015d6SChris Zankel.Lload:	/* A new task now owns the corpocessors. Save its TCB pointer into
18735a0015d6SChris Zankel	 * the coprocessor owner table.
18745a0015d6SChris Zankel	 *
18755a0015d6SChris Zankel	 * Note: a0 pointer to the entry in the coprocessor owner table,
18765a0015d6SChris Zankel	 *	 a3 coprocessor number.
18775a0015d6SChris Zankel	 */
18785a0015d6SChris Zankel	GET_CURRENT(a4,a1)
18795a0015d6SChris Zankel	s32i	a4, a0, 0
18805a0015d6SChris Zankel
18815a0015d6SChris Zankel	/* Find location from where to restore the current coprocessor state.*/
18825a0015d6SChris Zankel
18835a0015d6SChris Zankel	l32i	a5, a0, COPROCESSOR_INFO_OFFSET
18845a0015d6SChris Zankel	addi	a2, a4, THREAD_CP_SAVE
18855a0015d6SChris Zankel	add	a2, a2, a4
18865a0015d6SChris Zankel
18875a0015d6SChris Zankel	xchal_cpi_load_funcbody
18885a0015d6SChris Zankel
18895a0015d6SChris Zankel	/* We must assume that the xchal_cpi_store_funcbody macro destroyed
18905a0015d6SChris Zankel	 * registers a2..a15.
18915a0015d6SChris Zankel	 */
18925a0015d6SChris Zankel
18935a0015d6SChris Zankel.Ldone:	l32i	a15, a1, PT_AREG15
18945a0015d6SChris Zankel	l32i	a14, a1, PT_AREG14
18955a0015d6SChris Zankel	l32i	a13, a1, PT_AREG13
18965a0015d6SChris Zankel	l32i	a12, a1, PT_AREG12
18975a0015d6SChris Zankel	l32i	a11, a1, PT_AREG11
18985a0015d6SChris Zankel	l32i	a10, a1, PT_AREG10
18995a0015d6SChris Zankel	l32i	a9, a1, PT_AREG9
19005a0015d6SChris Zankel	l32i	a8, a1, PT_AREG8
19015a0015d6SChris Zankel	l32i	a7, a1, PT_AREG7
19025a0015d6SChris Zankel	l32i	a6, a1, PT_AREG6
19035a0015d6SChris Zankel	l32i	a5, a1, PT_AREG5
19045a0015d6SChris Zankel	l32i	a4, a1, PT_AREG4
19055a0015d6SChris Zankel	l32i	a3, a1, PT_AREG3
19065a0015d6SChris Zankel	l32i	a2, a1, PT_AREG2
19075a0015d6SChris Zankel	l32i	a0, a1, PT_AREG0
19085a0015d6SChris Zankel	l32i	a1, a1, PT_AREG1
19095a0015d6SChris Zankel
19105a0015d6SChris Zankel	rfe
19115a0015d6SChris Zankel
19125a0015d6SChris Zankel#endif /* XCHAL_EXTRA_SA_SIZE */
19135a0015d6SChris Zankel
19145a0015d6SChris Zankel/*
1915fc4fb2adSChris Zankel * System Calls.
1916fc4fb2adSChris Zankel *
1917fc4fb2adSChris Zankel * void system_call (struct pt_regs* regs, int exccause)
1918fc4fb2adSChris Zankel *                            a2                 a3
1919fc4fb2adSChris Zankel */
1920fc4fb2adSChris Zankel
1921fc4fb2adSChris ZankelENTRY(system_call)
1922fc4fb2adSChris Zankel	entry	a1, 32
1923fc4fb2adSChris Zankel
1924fc4fb2adSChris Zankel	/* regs->syscall = regs->areg[2] */
1925fc4fb2adSChris Zankel
1926fc4fb2adSChris Zankel	l32i	a3, a2, PT_AREG2
1927fc4fb2adSChris Zankel	mov	a6, a2
1928fc4fb2adSChris Zankel	movi	a4, do_syscall_trace_enter
1929fc4fb2adSChris Zankel	s32i	a3, a2, PT_SYSCALL
1930fc4fb2adSChris Zankel	callx4	a4
1931fc4fb2adSChris Zankel
1932fc4fb2adSChris Zankel	/* syscall = sys_call_table[syscall_nr] */
1933fc4fb2adSChris Zankel
1934fc4fb2adSChris Zankel	movi	a4, sys_call_table;
1935fc4fb2adSChris Zankel	movi	a5, __NR_syscall_count
1936fc4fb2adSChris Zankel	movi	a6, -ENOSYS
1937fc4fb2adSChris Zankel	bgeu	a3, a5, 1f
1938fc4fb2adSChris Zankel
1939fc4fb2adSChris Zankel	addx4	a4, a3, a4
1940fc4fb2adSChris Zankel	l32i	a4, a4, 0
1941fc4fb2adSChris Zankel	movi	a5, sys_ni_syscall;
1942fc4fb2adSChris Zankel	beq	a4, a5, 1f
1943fc4fb2adSChris Zankel
1944fc4fb2adSChris Zankel	/* Load args: arg0 - arg5 are passed via regs. */
1945fc4fb2adSChris Zankel
1946fc4fb2adSChris Zankel	l32i	a6, a2, PT_AREG6
1947fc4fb2adSChris Zankel	l32i	a7, a2, PT_AREG3
1948fc4fb2adSChris Zankel	l32i	a8, a2, PT_AREG4
1949fc4fb2adSChris Zankel	l32i	a9, a2, PT_AREG5
1950fc4fb2adSChris Zankel	l32i	a10, a2, PT_AREG8
1951fc4fb2adSChris Zankel	l32i	a11, a2, PT_AREG9
1952fc4fb2adSChris Zankel
1953fc4fb2adSChris Zankel	/* Pass one additional argument to the syscall: pt_regs (on stack) */
1954fc4fb2adSChris Zankel	s32i	a2, a1, 0
1955fc4fb2adSChris Zankel
1956fc4fb2adSChris Zankel	callx4	a4
1957fc4fb2adSChris Zankel
1958fc4fb2adSChris Zankel1:	/* regs->areg[2] = return_value */
1959fc4fb2adSChris Zankel
1960fc4fb2adSChris Zankel	s32i	a6, a2, PT_AREG2
1961fc4fb2adSChris Zankel	movi	a4, do_syscall_trace_leave
1962fc4fb2adSChris Zankel	mov	a6, a2
1963fc4fb2adSChris Zankel	callx4	a4
1964fc4fb2adSChris Zankel	retw
1965fc4fb2adSChris Zankel
1966fc4fb2adSChris Zankel
1967fc4fb2adSChris Zankel/*
1968fc4fb2adSChris Zankel * Create a kernel thread
1969fc4fb2adSChris Zankel *
1970fc4fb2adSChris Zankel * int kernel_thread(int (*fn)(void *), void *arg, unsigned long flags)
1971fc4fb2adSChris Zankel * a2                    a2                 a3             a4
1972fc4fb2adSChris Zankel */
1973fc4fb2adSChris Zankel
1974fc4fb2adSChris ZankelENTRY(kernel_thread)
1975fc4fb2adSChris Zankel	entry	a1, 16
1976fc4fb2adSChris Zankel
1977fc4fb2adSChris Zankel	mov	a5, a2			# preserve fn over syscall
1978fc4fb2adSChris Zankel	mov	a7, a3			# preserve args over syscall
1979fc4fb2adSChris Zankel
1980fc4fb2adSChris Zankel	movi	a3, _CLONE_VM | _CLONE_UNTRACED
1981fc4fb2adSChris Zankel	movi	a2, __NR_clone
1982fc4fb2adSChris Zankel	or	a6, a4, a3		# arg0: flags
1983fc4fb2adSChris Zankel	mov	a3, a1			# arg1: sp
1984fc4fb2adSChris Zankel	syscall
1985fc4fb2adSChris Zankel
1986fc4fb2adSChris Zankel	beq	a3, a1, 1f		# branch if parent
1987fc4fb2adSChris Zankel	mov	a6, a7			# args
1988fc4fb2adSChris Zankel	callx4	a5			# fn(args)
1989fc4fb2adSChris Zankel
1990fc4fb2adSChris Zankel	movi	a2, __NR_exit
1991fc4fb2adSChris Zankel	syscall				# return value of fn(args) still in a6
1992fc4fb2adSChris Zankel
1993fc4fb2adSChris Zankel1:	retw
1994fc4fb2adSChris Zankel
1995fc4fb2adSChris Zankel/*
1996fc4fb2adSChris Zankel * Do a system call from kernel instead of calling sys_execve, so we end up
1997fc4fb2adSChris Zankel * with proper pt_regs.
1998fc4fb2adSChris Zankel *
1999fc4fb2adSChris Zankel * int kernel_execve(const char *fname, char *const argv[], charg *const envp[])
2000fc4fb2adSChris Zankel * a2                        a2               a3                  a4
2001fc4fb2adSChris Zankel */
2002fc4fb2adSChris Zankel
2003fc4fb2adSChris ZankelENTRY(kernel_execve)
2004fc4fb2adSChris Zankel	entry	a1, 16
2005fc4fb2adSChris Zankel	mov	a6, a2			# arg0 is in a6
2006fc4fb2adSChris Zankel	movi	a2, __NR_execve
2007fc4fb2adSChris Zankel	syscall
2008fc4fb2adSChris Zankel
2009fc4fb2adSChris Zankel	retw
2010fc4fb2adSChris Zankel
2011fc4fb2adSChris Zankel/*
20125a0015d6SChris Zankel * Task switch.
20135a0015d6SChris Zankel *
20145a0015d6SChris Zankel * struct task*  _switch_to (struct task* prev, struct task* next)
20155a0015d6SChris Zankel *         a2                              a2                 a3
20165a0015d6SChris Zankel */
20175a0015d6SChris Zankel
20185a0015d6SChris ZankelENTRY(_switch_to)
20195a0015d6SChris Zankel
20205a0015d6SChris Zankel	entry	a1, 16
20215a0015d6SChris Zankel
20225a0015d6SChris Zankel	mov	a4, a3			# preserve a3
20235a0015d6SChris Zankel
20245a0015d6SChris Zankel	s32i	a0, a2, THREAD_RA	# save return address
20255a0015d6SChris Zankel	s32i	a1, a2, THREAD_SP	# save stack pointer
20265a0015d6SChris Zankel
20275a0015d6SChris Zankel	/* Disable ints while we manipulate the stack pointer; spill regs. */
20285a0015d6SChris Zankel
2029173d6681SChris Zankel	movi	a5, (1 << PS_EXCM_BIT) | LOCKLEVEL
20305a0015d6SChris Zankel	xsr	a5, PS
20315a0015d6SChris Zankel	rsr	a3, EXCSAVE_1
20325a0015d6SChris Zankel	rsync
20335a0015d6SChris Zankel	s32i	a3, a3, EXC_TABLE_FIXUP	/* enter critical section */
20345a0015d6SChris Zankel
20355a0015d6SChris Zankel	call0	_spill_registers
20365a0015d6SChris Zankel
20375a0015d6SChris Zankel	/* Set kernel stack (and leave critical section)
20385a0015d6SChris Zankel	 * Note: It's save to set it here. The stack will not be overwritten
20395a0015d6SChris Zankel	 *       because the kernel stack will only be loaded again after
20405a0015d6SChris Zankel	 *       we return from kernel space.
20415a0015d6SChris Zankel	 */
20425a0015d6SChris Zankel
20435a0015d6SChris Zankel	l32i	a0, a4, TASK_THREAD_INFO
20445a0015d6SChris Zankel	rsr	a3, EXCSAVE_1		# exc_table
20455a0015d6SChris Zankel	movi	a1, 0
20465a0015d6SChris Zankel	addi	a0, a0, PT_REGS_OFFSET
20475a0015d6SChris Zankel	s32i	a1, a3, EXC_TABLE_FIXUP
20485a0015d6SChris Zankel	s32i	a0, a3, EXC_TABLE_KSTK
20495a0015d6SChris Zankel
20505a0015d6SChris Zankel	/* restore context of the task that 'next' addresses */
20515a0015d6SChris Zankel
20525a0015d6SChris Zankel	l32i	a0, a4, THREAD_RA	/* restore return address */
20535a0015d6SChris Zankel	l32i	a1, a4, THREAD_SP	/* restore stack pointer */
20545a0015d6SChris Zankel
20555a0015d6SChris Zankel	wsr	a5, PS
20565a0015d6SChris Zankel	rsync
20575a0015d6SChris Zankel
20585a0015d6SChris Zankel	retw
20595a0015d6SChris Zankel
20605a0015d6SChris Zankel
20615a0015d6SChris ZankelENTRY(ret_from_fork)
20625a0015d6SChris Zankel
20635a0015d6SChris Zankel	/* void schedule_tail (struct task_struct *prev)
20645a0015d6SChris Zankel	 * Note: prev is still in a6 (return value from fake call4 frame)
20655a0015d6SChris Zankel	 */
20665a0015d6SChris Zankel	movi	a4, schedule_tail
20675a0015d6SChris Zankel	callx4	a4
20685a0015d6SChris Zankel
2069fc4fb2adSChris Zankel	movi	a4, do_syscall_trace_leave
2070fc4fb2adSChris Zankel	mov	a6, a1
20715a0015d6SChris Zankel	callx4	a4
20725a0015d6SChris Zankel
20735a0015d6SChris Zankel	j	common_exception_return
20745a0015d6SChris Zankel
2075