src/os_cpu/solaris_x86/vm/assembler_solaris_x86.cpp

Thu, 21 Oct 2010 11:55:10 -0700

author
never
date
Thu, 21 Oct 2010 11:55:10 -0700
changeset 2262
1e9a9d2e6509
parent 1907
c18cbe5936b8
child 2314
f95d63e2154a
permissions
-rw-r--r--

6970683: improvements to hs_err output
Reviewed-by: kvn, jrose, dholmes, coleenp

duke@435 1 /*
trims@1907 2 * Copyright (c) 1999, 2008, 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
duke@435 25 #include "incls/_precompiled.incl"
never@739 26 #include "incls/_assembler_solaris_x86.cpp.incl"
duke@435 27
duke@435 28
duke@435 29 void MacroAssembler::int3() {
never@739 30 push(rax);
never@739 31 push(rdx);
never@739 32 push(rcx);
duke@435 33 call(RuntimeAddress(CAST_FROM_FN_PTR(address, os::breakpoint)));
never@739 34 pop(rcx);
never@739 35 pop(rdx);
never@739 36 pop(rax);
duke@435 37 }
duke@435 38
never@739 39 #define __ _masm->
never@739 40 #ifndef _LP64
never@739 41 static void slow_call_thr_specific(MacroAssembler* _masm, Register thread) {
duke@435 42
duke@435 43 // slow call to of thr_getspecific
duke@435 44 // int thr_getspecific(thread_key_t key, void **value);
duke@435 45 // Consider using pthread_getspecific instead.
duke@435 46
never@739 47 __ push(0); // allocate space for return value
never@739 48 if (thread != rax) __ push(rax); // save rax, if caller still wants it
never@739 49 __ push(rcx); // save caller save
never@739 50 __ push(rdx); // save caller save
duke@435 51 if (thread != rax) {
never@739 52 __ lea(thread, Address(rsp, 3 * sizeof(int))); // address of return value
duke@435 53 } else {
never@739 54 __ lea(thread, Address(rsp, 2 * sizeof(int))); // address of return value
duke@435 55 }
never@739 56 __ push(thread); // and pass the address
never@739 57 __ push(ThreadLocalStorage::thread_index()); // the key
never@739 58 __ call(RuntimeAddress(CAST_FROM_FN_PTR(address, thr_getspecific)));
never@739 59 __ increment(rsp, 2 * wordSize);
never@739 60 __ pop(rdx);
never@739 61 __ pop(rcx);
never@739 62 if (thread != rax) __ pop(rax);
never@739 63 __ pop(thread);
never@739 64
duke@435 65 }
never@739 66 #else
never@739 67 static void slow_call_thr_specific(MacroAssembler* _masm, Register thread) {
never@739 68 // slow call to of thr_getspecific
never@739 69 // int thr_getspecific(thread_key_t key, void **value);
never@739 70 // Consider using pthread_getspecific instead.
never@739 71
never@739 72 if (thread != rax) {
never@739 73 __ push(rax);
never@739 74 }
never@739 75 __ push(0); // space for return value
never@739 76 __ push(rdi);
never@739 77 __ push(rsi);
never@739 78 __ lea(rsi, Address(rsp, 16)); // pass return value address
never@739 79 __ push(rdx);
never@739 80 __ push(rcx);
never@739 81 __ push(r8);
never@739 82 __ push(r9);
never@739 83 __ push(r10);
never@739 84 // XXX
never@739 85 __ mov(r10, rsp);
never@739 86 __ andptr(rsp, -16);
never@739 87 __ push(r10);
never@739 88 __ push(r11);
never@739 89
never@739 90 __ movl(rdi, ThreadLocalStorage::thread_index());
never@739 91 __ call(RuntimeAddress(CAST_FROM_FN_PTR(address, thr_getspecific)));
never@739 92
never@739 93 __ pop(r11);
never@739 94 __ pop(rsp);
never@739 95 __ pop(r10);
never@739 96 __ pop(r9);
never@739 97 __ pop(r8);
never@739 98 __ pop(rcx);
never@739 99 __ pop(rdx);
never@739 100 __ pop(rsi);
never@739 101 __ pop(rdi);
never@739 102 __ pop(thread); // load return value
never@739 103 if (thread != rax) {
never@739 104 __ pop(rax);
never@739 105 }
never@739 106 }
never@739 107 #endif //LP64
never@739 108
never@739 109 void MacroAssembler::get_thread(Register thread) {
never@739 110
never@739 111 int segment = NOT_LP64(Assembler::GS_segment) LP64_ONLY(Assembler::FS_segment);
never@739 112 // Try to emit a Solaris-specific fast TSD/TLS accessor.
never@739 113 ThreadLocalStorage::pd_tlsAccessMode tlsMode = ThreadLocalStorage::pd_getTlsAccessMode ();
never@739 114 if (tlsMode == ThreadLocalStorage::pd_tlsAccessIndirect) { // T1
never@739 115 // Use thread as a temporary: mov r, gs:[0]; mov r, [r+tlsOffset]
never@739 116 emit_byte (segment);
never@739 117 // ExternalAddress doesn't work because it can't take NULL
never@739 118 AddressLiteral null(0, relocInfo::none);
never@739 119 movptr (thread, null);
never@739 120 movptr(thread, Address(thread, ThreadLocalStorage::pd_getTlsOffset())) ;
never@739 121 return ;
never@739 122 } else
never@739 123 if (tlsMode == ThreadLocalStorage::pd_tlsAccessDirect) { // T2
never@739 124 // mov r, gs:[tlsOffset]
never@739 125 emit_byte (segment);
never@739 126 AddressLiteral tls_off((address)ThreadLocalStorage::pd_getTlsOffset(), relocInfo::none);
never@739 127 movptr (thread, tls_off);
never@739 128 return ;
never@739 129 }
never@739 130
never@739 131 slow_call_thr_specific(this, thread);
never@739 132
never@739 133 }

mercurial