1/* 2 * Mesa 3-D graphics library 3 * 4 * Copyright (C) 2017 Red Hat 5 * 6 * Permission is hereby granted, free of charge, to any person obtaining a 7 * copy of this software and associated documentation files (the "Software"), 8 * to deal in the Software without restriction, including without limitation 9 * the rights to use, copy, modify, merge, publish, distribute, sublicense, 10 * and/or sell copies of the Software, and to permit persons to whom the 11 * Software is furnished to do so, subject to the following conditions: 12 * 13 * The above copyright notice and this permission notice shall be included 14 * in 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 21 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER 22 * DEALINGS IN THE SOFTWARE. 23 * 24 * Authors: 25 * Ben Crocker <bcrocker@redhat.com> 26 */ 27 28#ifdef HAVE_FUNC_ATTRIBUTE_VISIBILITY 29#define HIDDEN __attribute__((visibility("hidden"))) 30#else 31#define HIDDEN 32#endif 33 34// NOTE: These must be powers of two: 35#define PPC64LE_ENTRY_SIZE 256 36#define PPC64LE_PAGE_ALIGN 65536 37#if ((PPC64LE_ENTRY_SIZE & (PPC64LE_ENTRY_SIZE - 1)) != 0) 38#error PPC64LE_ENTRY_SIZE must be a power of two! 39#endif 40#if ((PPC64LE_PAGE_ALIGN & (PPC64LE_PAGE_ALIGN - 1)) != 0) 41#error PPC64LE_PAGE_ALIGN must be a power of two! 42#endif 43 44__asm__(".text\n" 45 ".balign " U_STRINGIFY(PPC64LE_ENTRY_SIZE) "\n" 46 "ppc64le_entry_start:"); 47 48#define STUB_ASM_ENTRY(func) \ 49 ".globl " func "\n" \ 50 ".type " func ", @function\n" \ 51 ".balign " U_STRINGIFY(PPC64LE_ENTRY_SIZE) "\n" \ 52 func ":\n\t" \ 53 " addis 2, 12, .TOC.-" func "@ha\n\t" \ 54 " addi 2, 2, .TOC.-" func "@l\n\t" \ 55 " .localentry " func ", .-" func "\n\t" 56 57#define STUB_ASM_CODE(slot) \ 58 " addis 11, 2, " ENTRY_CURRENT_TABLE "@got@ha\n\t" \ 59 " ld 11, " ENTRY_CURRENT_TABLE "@got@l(11)\n\t" \ 60 " ld 11, 0(11)\n\t" \ 61 " cmpldi 11, 0\n\t" \ 62 " beq 2000f\n" \ 63 "1050:\n\t" \ 64 " ld 12, " slot "*8(11)\n\t" \ 65 " mtctr 12\n\t" \ 66 " bctr\n" \ 67 "2000:\n\t" \ 68 " mflr 0\n\t" \ 69 " std 0, 16(1)\n\t" \ 70 " std 2, 40(1)\n\t" \ 71 " stdu 1, -144(1)\n\t" \ 72 " std 3, 56(1)\n\t" \ 73 " std 4, 64(1)\n\t" \ 74 " std 5, 72(1)\n\t" \ 75 " std 6, 80(1)\n\t" \ 76 " std 7, 88(1)\n\t" \ 77 " std 8, 96(1)\n\t" \ 78 " std 9, 104(1)\n\t" \ 79 " std 10, 112(1)\n\t" \ 80 " std 12, 128(1)\n\t" \ 81 " addis 12, 2, " ENTRY_CURRENT_TABLE_GET "@got@ha\n\t" \ 82 " ld 12, " ENTRY_CURRENT_TABLE_GET "@got@l(12)\n\t" \ 83 " mtctr 12\n\t" \ 84 " bctrl\n\t" \ 85 " ld 2, 144+40(1)\n\t" \ 86 " mr 11, 3\n\t" \ 87 " ld 3, 56(1)\n\t" \ 88 " ld 4, 64(1)\n\t" \ 89 " ld 5, 72(1)\n\t" \ 90 " ld 6, 80(1)\n\t" \ 91 " ld 7, 88(1)\n\t" \ 92 " ld 8, 96(1)\n\t" \ 93 " ld 9, 104(1)\n\t" \ 94 " ld 10, 112(1)\n\t" \ 95 " ld 12, 128(1)\n\t" \ 96 " addi 1, 1, 144\n\t" \ 97 " ld 0, 16(1)\n\t" \ 98 " mtlr 0\n\t" \ 99 " b 1050b\n" 100 101#define MAPI_TMP_STUB_ASM_GCC 102#include "mapi_tmp.h" 103 104#ifndef MAPI_MODE_BRIDGE 105 106#include <string.h> 107#include "u_execmem.h" 108 109void 110entry_patch_public(void) 111{ 112} 113 114extern char 115ppc64le_entry_start[] HIDDEN; 116 117mapi_func 118entry_get_public(int slot) 119{ 120 return (mapi_func) (ppc64le_entry_start + slot * PPC64LE_ENTRY_SIZE); 121} 122 123static const uint32_t code_templ[] = { 124 // This should be functionally the same code as would be generated from 125 // the STUB_ASM_CODE macro, but defined as a buffer. 126 // This is used to generate new dispatch stubs. Mesa will copy this 127 // data to the dispatch stub, and then it will patch the slot number and 128 // any addresses that it needs to. 129 // NOTE!!! NOTE!!! NOTE!!! 130 // This representation is correct for both little- and big-endian systems. 131 // However, more work needs to be done for big-endian Linux because it 132 // adheres to an older, AIX-compatible ABI that uses function descriptors. 133 // 1000: 134 0x7C0802A6, // <ENTRY+000>: mflr 0 135 0xF8010010, // <ENTRY+004>: std 0, 16(1) 136 0xE96C0098, // <ENTRY+008>: ld 11, 9000f-1000b+0(12) 137 0xE96B0000, // <ENTRY+012>: ld 11, 0(11) 138 0x282B0000, // <ENTRY+016>: cmpldi 11, 0 139 0x41820014, // <ENTRY+020>: beq 2000f 140 // 1050: 141 0xE80C00A8, // <ENTRY+024>: ld 0, 9000f-1000b+16(12) 142 0x7D8B002A, // <ENTRY+028>: ldx 12, 11, 0 143 0x7D8903A6, // <ENTRY+032>: mtctr 12 144 0x4E800420, // <ENTRY+036>: bctr 145 // 2000: 146 0xF8410028, // <ENTRY+040>: std 2, 40(1) 147 0xF821FF71, // <ENTRY+044>: stdu 1, -144(1) 148 0xF8610038, // <ENTRY+048>: std 3, 56(1) 149 0xF8810040, // <ENTRY+052>: std 4, 64(1) 150 0xF8A10048, // <ENTRY+056>: std 5, 72(1) 151 0xF8C10050, // <ENTRY+060>: std 6, 80(1) 152 0xF8E10058, // <ENTRY+064>: std 7, 88(1) 153 0xF9010060, // <ENTRY+068>: std 8, 96(1) 154 0xF9210068, // <ENTRY+072>: std 9, 104(1) 155 0xF9410070, // <ENTRY+076>: std 10, 112(1) 156 0xF9810080, // <ENTRY+080>: std 12, 128(1) 157 0xE98C00A0, // <ENTRY+084>: ld 12, 9000f-1000b+8(12) 158 0x7D8903A6, // <ENTRY+088>: mtctr 12 159 0x4E800421, // <ENTRY+092>: bctrl 160 0x7C6B1B78, // <ENTRY+096>: mr 11, 3 161 0xE8610038, // <ENTRY+100>: ld 3, 56(1) 162 0xE8810040, // <ENTRY+104>: ld 4, 64(1) 163 0xE8A10048, // <ENTRY+108>: ld 5, 72(1) 164 0xE8C10050, // <ENTRY+112>: ld 6, 80(1) 165 0xE8E10058, // <ENTRY+116>: ld 7, 88(1) 166 0xE9010060, // <ENTRY+120>: ld 8, 96(1) 167 0xE9210068, // <ENTRY+124>: ld 9, 104(1) 168 0xE9410070, // <ENTRY+128>: ld 10, 112(1) 169 0xE9810080, // <ENTRY+132>: ld 12, 128(1) 170 0x38210090, // <ENTRY+136>: addi 1, 1, 144 171 0xE8010010, // <ENTRY+140>: ld 0, 16(1) 172 0x7C0803A6, // <ENTRY+144>: mtlr 0 173 0x4BFFFF84, // <ENTRY+148>: b 1050b 174 // 9000: 175 0, 0, // <ENTRY+152>: .quad ENTRY_CURRENT_TABLE 176 0, 0, // <ENTRY+160>: .quad ENTRY_CURRENT_TABLE_GET 177 0, 0 // <ENTRY+168>: .quad <slot>*8 178}; 179static const uint64_t TEMPLATE_OFFSET_CURRENT_TABLE = sizeof(code_templ) - 3*8; 180static const uint64_t TEMPLATE_OFFSET_CURRENT_TABLE_GET = sizeof(code_templ) - 2*8; 181static const uint64_t TEMPLATE_OFFSET_SLOT = sizeof(code_templ) - 1*8; 182 183void 184entry_patch(mapi_func entry, int slot) 185{ 186 char *code = (char *) entry; 187 *((uint64_t *) (code + TEMPLATE_OFFSET_CURRENT_TABLE)) = (uint64_t) ENTRY_CURRENT_TABLE; 188 *((uint64_t *) (code + TEMPLATE_OFFSET_CURRENT_TABLE_GET)) = (uint64_t) ENTRY_CURRENT_TABLE_GET; 189 *((uint64_t *) (code + TEMPLATE_OFFSET_SLOT)) = slot * sizeof(mapi_func); 190} 191 192mapi_func 193entry_generate(int slot) 194{ 195 char *code; 196 mapi_func entry; 197 198 code = u_execmem_alloc(sizeof(code_templ)); 199 if (!code) 200 return NULL; 201 202 memcpy(code, code_templ, sizeof(code_templ)); 203 204 entry = (mapi_func) code; 205 entry_patch(entry, slot); 206 207 return entry; 208} 209 210#endif /* MAPI_MODE_BRIDGE */ 211