| 1 | /* |
| 2 | * This file is part of the MicroPython project, http://micropython.org/ |
| 3 | * |
| 4 | * The MIT License (MIT) |
| 5 | * |
| 6 | * Copyright (c) 2019, Michael Neuling, IBM Corporation. |
| 7 | * |
| 8 | * Permission is hereby granted, free of charge, to any person obtaining a copy |
| 9 | * of this software and associated documentation files (the "Software"), to deal |
| 10 | * in the Software without restriction, including without limitation the rights |
| 11 | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
| 12 | * copies of the Software, and to permit persons to whom the Software is |
| 13 | * furnished to do so, subject to the following conditions: |
| 14 | * |
| 15 | * The above copyright notice and this permission notice shall be included in |
| 16 | * all copies or substantial portions of the Software. |
| 17 | * |
| 18 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
| 19 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
| 20 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
| 21 | * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
| 22 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
| 23 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN |
| 24 | * THE SOFTWARE. |
| 25 | */ |
| 26 | |
| 27 | #include "py/mpstate.h" |
| 28 | |
| 29 | #if MICROPY_NLR_POWERPC |
| 30 | |
| 31 | #undef nlr_push |
| 32 | |
| 33 | // Saving all ABI non-vol registers here |
| 34 | |
| 35 | unsigned int nlr_push(nlr_buf_t *nlr) { |
| 36 | |
| 37 | __asm__ volatile ( |
| 38 | "li 4, 0x4eed ; " // Store canary |
| 39 | "std 4, 0x00(%0) ;" |
| 40 | "std 0, 0x08(%0) ;" |
| 41 | "std 1, 0x10(%0) ;" |
| 42 | "std 2, 0x18(%0) ;" |
| 43 | "std 14, 0x20(%0) ;" |
| 44 | "std 15, 0x28(%0) ;" |
| 45 | "std 16, 0x30(%0) ;" |
| 46 | "std 17, 0x38(%0) ;" |
| 47 | "std 18, 0x40(%0) ;" |
| 48 | "std 19, 0x48(%0) ;" |
| 49 | "std 20, 0x50(%0) ;" |
| 50 | "std 21, 0x58(%0) ;" |
| 51 | "std 22, 0x60(%0) ;" |
| 52 | "std 23, 0x68(%0) ;" |
| 53 | "std 24, 0x70(%0) ;" |
| 54 | "std 25, 0x78(%0) ;" |
| 55 | "std 26, 0x80(%0) ;" |
| 56 | "std 27, 0x88(%0) ;" |
| 57 | "std 28, 0x90(%0) ;" |
| 58 | "std 29, 0x98(%0) ;" |
| 59 | "std 30, 0xA0(%0) ;" |
| 60 | "std 31, 0xA8(%0) ;" |
| 61 | |
| 62 | "mfcr 4 ; " |
| 63 | "std 4, 0xB0(%0) ;" |
| 64 | "mflr 4 ;" |
| 65 | "std 4, 0xB8(%0) ;" |
| 66 | "li 4, nlr_push_tail@l ;" |
| 67 | "oris 4, 4, nlr_push_tail@h ;" |
| 68 | "mtctr 4 ;" |
| 69 | "mr 3, %1 ; " |
| 70 | "bctr ;" |
| 71 | : |
| 72 | : "r" (&nlr->regs), "r" (nlr) |
| 73 | : |
| 74 | ); |
| 75 | |
| 76 | return 0; |
| 77 | } |
| 78 | |
| 79 | NORETURN void nlr_jump(void *val) { |
| 80 | MP_NLR_JUMP_HEAD(val, top) |
| 81 | |
| 82 | __asm__ volatile ( |
| 83 | "ld 3, 0x0(%0) ;" |
| 84 | "cmpdi 3, 0x4eed ; " // Check canary |
| 85 | "bne . ; " |
| 86 | "ld 0, 0x08(%0) ;" |
| 87 | "ld 1, 0x10(%0) ;" |
| 88 | "ld 2, 0x18(%0) ;" |
| 89 | "ld 14, 0x20(%0) ;" |
| 90 | "ld 15, 0x28(%0) ;" |
| 91 | "ld 16, 0x30(%0) ;" |
| 92 | "ld 17, 0x38(%0) ;" |
| 93 | "ld 18, 0x40(%0) ;" |
| 94 | "ld 19, 0x48(%0) ;" |
| 95 | "ld 20, 0x50(%0) ;" |
| 96 | "ld 21, 0x58(%0) ;" |
| 97 | "ld 22, 0x60(%0) ;" |
| 98 | "ld 23, 0x68(%0) ;" |
| 99 | "ld 24, 0x70(%0) ;" |
| 100 | "ld 25, 0x78(%0) ;" |
| 101 | "ld 26, 0x80(%0) ;" |
| 102 | "ld 27, 0x88(%0) ;" |
| 103 | "ld 28, 0x90(%0) ;" |
| 104 | "ld 29, 0x98(%0) ;" |
| 105 | "ld 30, 0xA0(%0) ;" |
| 106 | "ld 31, 0xA8(%0) ;" |
| 107 | "ld 3, 0xB0(%0) ;" |
| 108 | "mtcr 3 ;" |
| 109 | "ld 3, 0xB8(%0) ;" |
| 110 | "mtlr 3 ; " |
| 111 | "li 3, 1;" |
| 112 | "blr ;" |
| 113 | : |
| 114 | : "r" (&top->regs) |
| 115 | : |
| 116 | ); |
| 117 | |
| 118 | MP_UNREACHABLE; |
| 119 | } |
| 120 | |
| 121 | #endif // MICROPY_NLR_POWERPC |
| 122 | |