| 1 | /* |
|---|
| 2 | * Copyright (c) 2011 Aeroflex Gaisler |
|---|
| 3 | * |
|---|
| 4 | * BSD license: |
|---|
| 5 | * |
|---|
| 6 | * Permission is hereby granted, free of charge, to any person obtaining a copy |
|---|
| 7 | * of this software and associated documentation files (the "Software"), to deal |
|---|
| 8 | * in the Software without restriction, including without limitation the rights |
|---|
| 9 | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
|---|
| 10 | * copies of the Software, and to permit persons to whom the Software is |
|---|
| 11 | * furnished to do so, subject to the following conditions: |
|---|
| 12 | * |
|---|
| 13 | * The above copyright notice and this permission notice shall be included in |
|---|
| 14 | * all copies or substantial portions of the Software. |
|---|
| 15 | * |
|---|
| 16 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
|---|
| 17 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
|---|
| 18 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL |
|---|
| 19 | * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
|---|
| 20 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
|---|
| 21 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN |
|---|
| 22 | * THE SOFTWARE. |
|---|
| 23 | */ |
|---|
| 24 | |
|---|
| 25 | |
|---|
| 26 | #include <asm-leon/leonstack.h> |
|---|
| 27 | #include <asm-leon/winmacros.h> |
|---|
| 28 | |
|---|
| 29 | /* Registers to not touch at all. */ |
|---|
| 30 | #define t_psr l0 |
|---|
| 31 | #define t_pc l1 |
|---|
| 32 | #define t_npc l2 |
|---|
| 33 | #define t_wim l3 |
|---|
| 34 | #define twin_tmp1 l4 |
|---|
| 35 | #define glob_tmp g4 |
|---|
| 36 | #define curptr g6 |
|---|
| 37 | |
|---|
| 38 | /* Number of register windows */ |
|---|
| 39 | .global _nwindows_min1, _nwindows |
|---|
| 40 | |
|---|
| 41 | .text |
|---|
| 42 | .align 4 |
|---|
| 43 | .globl leonbare_trapreturn_fast, schedule_callback |
|---|
| 44 | |
|---|
| 45 | |
|---|
| 46 | /* rtap return special for irqtrap.S */ |
|---|
| 47 | leonbare_trapreturn_fast: |
|---|
| 48 | |
|---|
| 49 | /* a optional scheduler can be called here */ |
|---|
| 50 | set schedule_callback, %g2 |
|---|
| 51 | ld [%g2], %g2 |
|---|
| 52 | cmp %g2,%g0 |
|---|
| 53 | beq 3f |
|---|
| 54 | nop |
|---|
| 55 | |
|---|
| 56 | jmpl %g2,%o7 |
|---|
| 57 | #ifndef _SOFT_FLOAT |
|---|
| 58 | add %sp, FW_REGS_SZ + 8 + SF_REGS_SZ , %o1 ! pt_regs ptr |
|---|
| 59 | #else |
|---|
| 60 | add %sp, SF_REGS_SZ , %o1 ! pt_regs ptr |
|---|
| 61 | #endif |
|---|
| 62 | |
|---|
| 63 | 3: |
|---|
| 64 | |
|---|
| 65 | #ifndef _SOFT_FLOAT |
|---|
| 66 | ld [%sp + (SF_REGS_SZ + PT_REGS_SZ + FW_REGS_SZ - 4)],%g2 |
|---|
| 67 | sethi %hi(fpustate_current), %g3 |
|---|
| 68 | st %g2, [%g3+%lo(fpustate_current)] |
|---|
| 69 | sethi %hi(fpustate_owner), %g3 |
|---|
| 70 | ld [%g3+%lo(fpustate_owner)], %g3 |
|---|
| 71 | cmp %g2, %g3 |
|---|
| 72 | bne didusefpu |
|---|
| 73 | nop |
|---|
| 74 | |
|---|
| 75 | /* avoid fpu exception */ |
|---|
| 76 | ld [%sp + (SF_REGS_SZ + PT_REGS_SZ + FW_REGS_SZ - 8)], %g2 |
|---|
| 77 | set SPARC_PSR_EF_MASK, %g3 |
|---|
| 78 | and %g2, %g3, %g2 |
|---|
| 79 | andn %t_psr, %g3, %t_psr |
|---|
| 80 | or %t_psr, %g2, %t_psr |
|---|
| 81 | ba,a 1f |
|---|
| 82 | |
|---|
| 83 | didusefpu: |
|---|
| 84 | add %sp,SF_REGS_SZ + PT_REGS_SZ,%g2 |
|---|
| 85 | cmp %g2, %g3 |
|---|
| 86 | bne 1f |
|---|
| 87 | |
|---|
| 88 | sethi %hi(fpustate_owner), %g3 |
|---|
| 89 | st %g0, [%g3+%lo(fpustate_owner)] |
|---|
| 90 | |
|---|
| 91 | 1: |
|---|
| 92 | #endif |
|---|
| 93 | |
|---|
| 94 | wr %t_psr, 0x0, %psr ! enable nesting again, clear ET |
|---|
| 95 | |
|---|
| 96 | #ifndef _FLAT |
|---|
| 97 | /* Will the rett land us in the invalid window? */ |
|---|
| 98 | mov 2, %g1 |
|---|
| 99 | sll %g1, %t_psr, %g1 |
|---|
| 100 | |
|---|
| 101 | sethi %hi(_nwindows), %g2 !NWINDOWS |
|---|
| 102 | ld [%g2+%lo(_nwindows)], %g2 |
|---|
| 103 | |
|---|
| 104 | srl %g1, %g2, %g2 |
|---|
| 105 | or %g1, %g2, %g1 |
|---|
| 106 | rd %wim, %g2 |
|---|
| 107 | andcc %g2, %g1, %g0 |
|---|
| 108 | be 1f ! Nope, just return from the trap |
|---|
| 109 | sll %g2, 0x1, %g1 |
|---|
| 110 | |
|---|
| 111 | /* We have to grab a window before returning. */ |
|---|
| 112 | sethi %hi(_nwindows_min1), %g3 !NWINDOWS-1 |
|---|
| 113 | ld [%g3+%lo(_nwindows_min1)], %g3 |
|---|
| 114 | |
|---|
| 115 | srl %g2, %g3, %g2 |
|---|
| 116 | or %g1, %g2, %g1 |
|---|
| 117 | and %g1, 0xff, %g1 |
|---|
| 118 | |
|---|
| 119 | wr %g1, 0x0, %wim |
|---|
| 120 | |
|---|
| 121 | /* Grrr, make sure we load from the right %sp... */ |
|---|
| 122 | PT_LOAD_ALL_FAST(sp, t_psr, t_pc, t_npc, g1) |
|---|
| 123 | |
|---|
| 124 | restore %g0, %g0, %g0 |
|---|
| 125 | RW_LOAD(sp) |
|---|
| 126 | b 2f |
|---|
| 127 | save %g0, %g0, %g0 |
|---|
| 128 | |
|---|
| 129 | /* Reload the entire frame in case this is from a |
|---|
| 130 | * kernel system call or whatever... |
|---|
| 131 | */ |
|---|
| 132 | 1: |
|---|
| 133 | #endif |
|---|
| 134 | PT_LOAD_ALL_FAST(sp, t_psr, t_pc, t_npc, g1) |
|---|
| 135 | |
|---|
| 136 | 2: /*PT_LOAD_GLOBALS(sp)*/ |
|---|
| 137 | |
|---|
| 138 | #ifdef _FLAT |
|---|
| 139 | restore |
|---|
| 140 | RW_LOAD(sp) |
|---|
| 141 | save |
|---|
| 142 | #endif |
|---|
| 143 | |
|---|
| 144 | wr %t_psr, 0x0, %psr |
|---|
| 145 | nop; nop; nop |
|---|
| 146 | |
|---|
| 147 | jmp %t_pc |
|---|
| 148 | rett %t_npc |
|---|
| 149 | |
|---|
| 150 | |
|---|
| 151 | |
|---|
| 152 | |
|---|
| 153 | |
|---|
| 154 | #ifdef _FLAT |
|---|
| 155 | #warning _FLAT not implemented |
|---|
| 156 | #endif |
|---|
| 157 | |
|---|
| 158 | |
|---|
