Thu, 16 Feb 2012 17:12:49 -0800
7145346: VerifyStackAtCalls is broken
Summary: Replace call_epilog() encoding with macroassembler use. Moved duplicated code to x86.ad. Fixed return_addr() definition.
Reviewed-by: never
duke@435 | 1 | /* |
stefank@2314 | 2 | * Copyright (c) 1999, 2010, Oracle and/or its affiliates. All rights reserved. |
duke@435 | 3 | * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
duke@435 | 4 | * |
duke@435 | 5 | * This code is free software; you can redistribute it and/or modify it |
duke@435 | 6 | * under the terms of the GNU General Public License version 2 only, as |
duke@435 | 7 | * published by the Free Software Foundation. |
duke@435 | 8 | * |
duke@435 | 9 | * This code is distributed in the hope that it will be useful, but WITHOUT |
duke@435 | 10 | * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
duke@435 | 11 | * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
duke@435 | 12 | * version 2 for more details (a copy is included in the LICENSE file that |
duke@435 | 13 | * accompanied this code). |
duke@435 | 14 | * |
duke@435 | 15 | * You should have received a copy of the GNU General Public License version |
duke@435 | 16 | * 2 along with this work; if not, write to the Free Software Foundation, |
duke@435 | 17 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. |
duke@435 | 18 | * |
trims@1907 | 19 | * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
trims@1907 | 20 | * or visit www.oracle.com if you need additional information or have any |
trims@1907 | 21 | * questions. |
duke@435 | 22 | * |
duke@435 | 23 | */ |
duke@435 | 24 | |
stefank@2314 | 25 | #include "precompiled.hpp" |
stefank@2314 | 26 | #include "asm/assembler.hpp" |
stefank@2314 | 27 | #include "assembler_x86.inline.hpp" |
stefank@2314 | 28 | #include "runtime/os.hpp" |
stefank@2314 | 29 | #include "runtime/threadLocalStorage.hpp" |
duke@435 | 30 | |
duke@435 | 31 | |
duke@435 | 32 | void MacroAssembler::int3() { |
never@739 | 33 | push(rax); |
never@739 | 34 | push(rdx); |
never@739 | 35 | push(rcx); |
duke@435 | 36 | call(RuntimeAddress(CAST_FROM_FN_PTR(address, os::breakpoint))); |
never@739 | 37 | pop(rcx); |
never@739 | 38 | pop(rdx); |
never@739 | 39 | pop(rax); |
duke@435 | 40 | } |
duke@435 | 41 | |
never@739 | 42 | #define __ _masm-> |
never@739 | 43 | #ifndef _LP64 |
never@739 | 44 | static void slow_call_thr_specific(MacroAssembler* _masm, Register thread) { |
duke@435 | 45 | |
duke@435 | 46 | // slow call to of thr_getspecific |
duke@435 | 47 | // int thr_getspecific(thread_key_t key, void **value); |
duke@435 | 48 | // Consider using pthread_getspecific instead. |
duke@435 | 49 | |
never@739 | 50 | __ push(0); // allocate space for return value |
never@739 | 51 | if (thread != rax) __ push(rax); // save rax, if caller still wants it |
never@739 | 52 | __ push(rcx); // save caller save |
never@739 | 53 | __ push(rdx); // save caller save |
duke@435 | 54 | if (thread != rax) { |
never@739 | 55 | __ lea(thread, Address(rsp, 3 * sizeof(int))); // address of return value |
duke@435 | 56 | } else { |
never@739 | 57 | __ lea(thread, Address(rsp, 2 * sizeof(int))); // address of return value |
duke@435 | 58 | } |
never@739 | 59 | __ push(thread); // and pass the address |
never@739 | 60 | __ push(ThreadLocalStorage::thread_index()); // the key |
never@739 | 61 | __ call(RuntimeAddress(CAST_FROM_FN_PTR(address, thr_getspecific))); |
never@739 | 62 | __ increment(rsp, 2 * wordSize); |
never@739 | 63 | __ pop(rdx); |
never@739 | 64 | __ pop(rcx); |
never@739 | 65 | if (thread != rax) __ pop(rax); |
never@739 | 66 | __ pop(thread); |
never@739 | 67 | |
duke@435 | 68 | } |
never@739 | 69 | #else |
never@739 | 70 | static void slow_call_thr_specific(MacroAssembler* _masm, Register thread) { |
never@739 | 71 | // slow call to of thr_getspecific |
never@739 | 72 | // int thr_getspecific(thread_key_t key, void **value); |
never@739 | 73 | // Consider using pthread_getspecific instead. |
never@739 | 74 | |
never@739 | 75 | if (thread != rax) { |
never@739 | 76 | __ push(rax); |
never@739 | 77 | } |
never@739 | 78 | __ push(0); // space for return value |
never@739 | 79 | __ push(rdi); |
never@739 | 80 | __ push(rsi); |
never@739 | 81 | __ lea(rsi, Address(rsp, 16)); // pass return value address |
never@739 | 82 | __ push(rdx); |
never@739 | 83 | __ push(rcx); |
never@739 | 84 | __ push(r8); |
never@739 | 85 | __ push(r9); |
never@739 | 86 | __ push(r10); |
never@739 | 87 | // XXX |
never@739 | 88 | __ mov(r10, rsp); |
never@739 | 89 | __ andptr(rsp, -16); |
never@739 | 90 | __ push(r10); |
never@739 | 91 | __ push(r11); |
never@739 | 92 | |
never@739 | 93 | __ movl(rdi, ThreadLocalStorage::thread_index()); |
never@739 | 94 | __ call(RuntimeAddress(CAST_FROM_FN_PTR(address, thr_getspecific))); |
never@739 | 95 | |
never@739 | 96 | __ pop(r11); |
never@739 | 97 | __ pop(rsp); |
never@739 | 98 | __ pop(r10); |
never@739 | 99 | __ pop(r9); |
never@739 | 100 | __ pop(r8); |
never@739 | 101 | __ pop(rcx); |
never@739 | 102 | __ pop(rdx); |
never@739 | 103 | __ pop(rsi); |
never@739 | 104 | __ pop(rdi); |
never@739 | 105 | __ pop(thread); // load return value |
never@739 | 106 | if (thread != rax) { |
never@739 | 107 | __ pop(rax); |
never@739 | 108 | } |
never@739 | 109 | } |
never@739 | 110 | #endif //LP64 |
never@739 | 111 | |
never@739 | 112 | void MacroAssembler::get_thread(Register thread) { |
never@739 | 113 | |
never@739 | 114 | int segment = NOT_LP64(Assembler::GS_segment) LP64_ONLY(Assembler::FS_segment); |
never@739 | 115 | // Try to emit a Solaris-specific fast TSD/TLS accessor. |
never@739 | 116 | ThreadLocalStorage::pd_tlsAccessMode tlsMode = ThreadLocalStorage::pd_getTlsAccessMode (); |
never@739 | 117 | if (tlsMode == ThreadLocalStorage::pd_tlsAccessIndirect) { // T1 |
never@739 | 118 | // Use thread as a temporary: mov r, gs:[0]; mov r, [r+tlsOffset] |
never@739 | 119 | emit_byte (segment); |
never@739 | 120 | // ExternalAddress doesn't work because it can't take NULL |
never@739 | 121 | AddressLiteral null(0, relocInfo::none); |
never@739 | 122 | movptr (thread, null); |
never@739 | 123 | movptr(thread, Address(thread, ThreadLocalStorage::pd_getTlsOffset())) ; |
never@739 | 124 | return ; |
never@739 | 125 | } else |
never@739 | 126 | if (tlsMode == ThreadLocalStorage::pd_tlsAccessDirect) { // T2 |
never@739 | 127 | // mov r, gs:[tlsOffset] |
never@739 | 128 | emit_byte (segment); |
never@739 | 129 | AddressLiteral tls_off((address)ThreadLocalStorage::pd_getTlsOffset(), relocInfo::none); |
never@739 | 130 | movptr (thread, tls_off); |
never@739 | 131 | return ; |
never@739 | 132 | } |
never@739 | 133 | |
never@739 | 134 | slow_call_thr_specific(this, thread); |
never@739 | 135 | |
never@739 | 136 | } |