newlib-cygwin/libgloss/sparc_leon/kernel_context.S

113 lines
3.2 KiB
ArmAsm

/*
* Copyright (c) 2011 Aeroflex Gaisler
*
* BSD license:
*
* Permission is hereby granted, free of charge, to any person obtaining a copy
* of this software and associated documentation files (the "Software"), to deal
* in the Software without restriction, including without limitation the rights
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
* copies of the Software, and to permit persons to whom the Software is
* furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be included in
* all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
* THE SOFTWARE.
*/
#include <asm-leon/elfmacro.h>
#include <asm-leon/leon.h>
#include <asm-leon/leonstack.h>
#include <asm-leon/contextswitch.h>
#include <asm-leon/winmacros.h>
#include <asm-leon/leonbare_kernel.h>
FUNC_EXPORT(_leonbare_kernel_switchto)
FUNC_EXPORT(_leonbare_Stop)
FUNC_IMPORT(leonbare_disable_traps)
.text
/* unsigned int _leonbare_kernel_switchto(struct leonbare_thread_ctx *thread,struct leonbare_thread_ctx *thread) */
FUNC_BEGIN(_leonbare_kernel_switchto)
/* =================================*/
/* save context */
/* =================================*/
mov %o0, %g1
mov %o1, %g2
mov %o7, %g3
rd %psr, %g4 /* psr.cwp should stay same because irq path rely on it. */
call leonbare_disable_traps /* psr in %o0, modify %o0, %o1, %o7 */
nop
set TACODE_IRQCALL_FLUSH,%o1
ta TACODE_IRQCALL
st %g4, [%g1 + LEONBARE_THREAD_CTX_STACK_PSR] /* psr */
set LEONBARE_THREAD_CTX_MAGIC,%g4
st %g4, [%g1 + LEONBARE_THREAD_CTX_STACK_MAGIC]
mov %g3, %o7 ! restore %o7
LEONBARE_THREAD_CTX_STORE_INS(g1)
LEONBARE_THREAD_CTX_STORE_LOCALS(g1)
LEONBARE_THREAD_CTX_STORE_OUTS(g1)
/* =================================*/
/* restore context */
/* =================================*/
/* check valid context stack area */
ld [%g2 + LEONBARE_THREAD_CTX_STACK_MAGIC], %o1
set LEONBARE_THREAD_CTX_MAGIC,%o2
cmp %o1, %o2
beq 1f
nop
/* stop all */
ta 0x0
1:
/* get psr */
ld [%g2 + LEONBARE_THREAD_CTX_STACK_PSR],%g1 /* psr.cwp should stay same because irq path rely on it. */
set SPARC_PSR_EF_MASK,%g3 ! clear ef bit
andn %g1, %g3, %g1
wr %g0,%wim
nop; nop; nop;
andn %g1, SPARC_PSR_ET_MASK, %g3 ! disable traps, up to PSR_EF imm andn ok
wr %g3, %psr
nop; nop; nop;
LEONBARE_THREAD_CTX_LOAD_INS(g2)
LEONBARE_THREAD_CTX_LOAD_LOCALS(g2)
LEONBARE_THREAD_CTX_LOAD_OUTS(g2)
SET_WIM_CWPMIN1(g1,o1,o2,o3,o4) ! calc wim from psr_cwp so that next restore traps
wr %g1,%psr
nop; nop; nop;
retl
nop
FUNC_END(_leonbare_kernel_switchto)
FUNC_BEGIN(_leonbare_Stop)
ta 0x0
FUNC_END(_leonbare_Stop)