| // Copyright 2019 The Marl Authors. |
| // |
| // Licensed under the Apache License, Version 2.0 (the "License"); |
| // you may not use this file except in compliance with the License. |
| // You may obtain a copy of the License at |
| // |
| // https://www.apache.org/licenses/LICENSE-2.0 |
| // |
| // Unless required by applicable law or agreed to in writing, software |
| // distributed under the License is distributed on an "AS IS" BASIS, |
| // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. |
| // See the License for the specific language governing permissions and |
| // limitations under the License. |
| |
| #if defined(__powerpc64__) |
| |
| #define MARL_BUILD_ASM 1 |
| #include "osfiber_asm_ppc64.h" |
| |
| // void marl_fiber_swap(marl_fiber_context* from, const marl_fiber_context* to) |
| // r3: from |
| // r4: to |
| .text |
| .global marl_fiber_swap |
| .align 4 |
| #if !defined(_CALL_ELF) || (_CALL_ELF != 2) |
| .global .marl_fiber_swap |
| .pushsection ".opd","aw" |
| marl_fiber_swap: |
| .quad .marl_fiber_swap |
| .quad .TOC.@tocbase |
| .quad 0 |
| .popsection |
| .type .marl_fiber_swap,@function |
| .marl_fiber_swap: |
| #else |
| .type marl_fiber_swap @function |
| marl_fiber_swap: |
| #endif |
| |
| // Store non-volatile registers |
| std 1, MARL_REG_R1(3) |
| std 2, MARL_REG_R2(3) |
| std 13, MARL_REG_R13(3) |
| std 14, MARL_REG_R14(3) |
| std 15, MARL_REG_R15(3) |
| std 16, MARL_REG_R16(3) |
| std 17, MARL_REG_R17(3) |
| std 18, MARL_REG_R18(3) |
| std 19, MARL_REG_R19(3) |
| std 20, MARL_REG_R20(3) |
| std 21, MARL_REG_R21(3) |
| std 22, MARL_REG_R22(3) |
| std 23, MARL_REG_R23(3) |
| std 24, MARL_REG_R24(3) |
| std 25, MARL_REG_R25(3) |
| std 26, MARL_REG_R26(3) |
| std 27, MARL_REG_R27(3) |
| std 28, MARL_REG_R28(3) |
| std 29, MARL_REG_R29(3) |
| std 30, MARL_REG_R30(3) |
| std 31, MARL_REG_R31(3) |
| |
| // Store special registers |
| mflr 5 |
| std 5, MARL_REG_LR(3) |
| mfcr 5 |
| std 5, MARL_REG_CCR(3) |
| |
| // Store non-volatile floating point registers |
| stfd 14, MARL_REG_FPR14(3) |
| stfd 15, MARL_REG_FPR15(3) |
| stfd 16, MARL_REG_FPR16(3) |
| stfd 17, MARL_REG_FPR17(3) |
| stfd 18, MARL_REG_FPR18(3) |
| stfd 19, MARL_REG_FPR19(3) |
| stfd 20, MARL_REG_FPR20(3) |
| stfd 21, MARL_REG_FPR21(3) |
| stfd 22, MARL_REG_FPR22(3) |
| stfd 23, MARL_REG_FPR23(3) |
| stfd 24, MARL_REG_FPR24(3) |
| stfd 25, MARL_REG_FPR25(3) |
| stfd 26, MARL_REG_FPR26(3) |
| stfd 27, MARL_REG_FPR27(3) |
| stfd 28, MARL_REG_FPR28(3) |
| stfd 29, MARL_REG_FPR29(3) |
| stfd 30, MARL_REG_FPR30(3) |
| stfd 31, MARL_REG_FPR31(3) |
| |
| // Store non-volatile altivec registers |
| #ifdef __ALTIVEC__ |
| li 5, MARL_REG_VMX |
| stvxl 20, 3, 5 |
| addi 5, 5, 16 |
| stvxl 21, 3, 5 |
| addi 5, 5, 16 |
| stvxl 22, 3, 5 |
| addi 5, 5, 16 |
| stvxl 23, 3, 5 |
| addi 5, 5, 16 |
| stvxl 24, 3, 5 |
| addi 5, 5, 16 |
| stvxl 25, 3, 5 |
| addi 5, 5, 16 |
| stvxl 26, 3, 5 |
| addi 5, 5, 16 |
| stvxl 27, 3, 5 |
| addi 5, 5, 16 |
| stvxl 28, 3, 5 |
| addi 5, 5, 16 |
| stvxl 29, 3, 5 |
| addi 5, 5, 16 |
| stvxl 30, 3, 5 |
| addi 5, 5, 16 |
| stvxl 31, 3, 5 |
| |
| mfvrsave 5 |
| stw 5, MARL_REG_VRSAVE(3) |
| #endif // __ALTIVEC__ |
| |
| // Load non-volatile registers |
| ld 1, MARL_REG_R1(4) |
| ld 2, MARL_REG_R2(4) |
| ld 13, MARL_REG_R13(4) |
| ld 14, MARL_REG_R14(4) |
| ld 15, MARL_REG_R15(4) |
| ld 16, MARL_REG_R16(4) |
| ld 17, MARL_REG_R17(4) |
| ld 18, MARL_REG_R18(4) |
| ld 19, MARL_REG_R19(4) |
| ld 20, MARL_REG_R20(4) |
| ld 21, MARL_REG_R21(4) |
| ld 22, MARL_REG_R22(4) |
| ld 23, MARL_REG_R23(4) |
| ld 24, MARL_REG_R24(4) |
| ld 25, MARL_REG_R25(4) |
| ld 26, MARL_REG_R26(4) |
| ld 27, MARL_REG_R27(4) |
| ld 28, MARL_REG_R28(4) |
| ld 29, MARL_REG_R29(4) |
| ld 30, MARL_REG_R30(4) |
| ld 31, MARL_REG_R31(4) |
| |
| // Load non-volatile floating point registers |
| lfd 14, MARL_REG_FPR14(4) |
| lfd 15, MARL_REG_FPR15(4) |
| lfd 16, MARL_REG_FPR16(4) |
| lfd 17, MARL_REG_FPR17(4) |
| lfd 18, MARL_REG_FPR18(4) |
| lfd 19, MARL_REG_FPR19(4) |
| lfd 20, MARL_REG_FPR20(4) |
| lfd 21, MARL_REG_FPR21(4) |
| lfd 22, MARL_REG_FPR22(4) |
| lfd 23, MARL_REG_FPR23(4) |
| lfd 24, MARL_REG_FPR24(4) |
| lfd 25, MARL_REG_FPR25(4) |
| lfd 26, MARL_REG_FPR26(4) |
| lfd 27, MARL_REG_FPR27(4) |
| lfd 28, MARL_REG_FPR28(4) |
| lfd 29, MARL_REG_FPR29(4) |
| lfd 30, MARL_REG_FPR30(4) |
| lfd 31, MARL_REG_FPR31(4) |
| |
| // Load non-volatile altivec registers |
| #ifdef __ALTIVEC__ |
| li 5, MARL_REG_VMX |
| lvxl 20, 4, 5 |
| addi 5, 5, 16 |
| lvxl 21, 4, 5 |
| addi 5, 5, 16 |
| lvxl 22, 4, 5 |
| addi 5, 5, 16 |
| lvxl 23, 4, 5 |
| addi 5, 5, 16 |
| lvxl 24, 4, 5 |
| addi 5, 5, 16 |
| lvxl 25, 4, 5 |
| addi 5, 5, 16 |
| lvxl 26, 4, 5 |
| addi 5, 5, 16 |
| lvxl 27, 4, 5 |
| addi 5, 5, 16 |
| lvxl 28, 4, 5 |
| addi 5, 5, 16 |
| lvxl 29, 4, 5 |
| addi 5, 5, 16 |
| lvxl 30, 4, 5 |
| addi 5, 5, 16 |
| lvxl 31, 4, 5 |
| |
| lwz 5, MARL_REG_VRSAVE(4) |
| mtvrsave 5 |
| #endif // __ALTIVEC__ |
| |
| // Load parameters and entrypoint |
| ld 12, MARL_REG_LR(4) |
| ld 3, MARL_REG_R3(4) |
| ld 4, MARL_REG_R4(4) |
| mtlr 12 |
| |
| // Branch to entrypoint |
| blr |
| |
| #endif // defined(__powerpc64__) |
