/*
 * Copyright 1999-2008 Sun Microsystems, Inc.  All Rights Reserved.
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
 *
 * This code is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License version 2 only, as
 * published by the Free Software Foundation.
 *
 * This code is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
 * version 2 for more details (a copy is included in the LICENSE file that
 * accompanied this code).
 *
 * You should have received a copy of the GNU General Public License version
 * 2 along with this work; if not, write to the Free Software Foundation,
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
 *
 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
 * CA 95054 USA or visit www.sun.com if you need additional information or
 * have any questions.
 *
 */

#include "incls/_precompiled.incl"
#include "incls/_assembler_solaris_x86_32.cpp.incl"


void MacroAssembler::int3() {
  pushl(rax);
  pushl(rdx);
  pushl(rcx);
  call(RuntimeAddress(CAST_FROM_FN_PTR(address, os::breakpoint)));
  popl(rcx);
  popl(rdx);
  popl(rax);
}

void MacroAssembler::get_thread(Register thread) {

  // Try to emit a Solaris-specific fast TSD/TLS accessor.
  ThreadLocalStorage::pd_tlsAccessMode tlsMode = ThreadLocalStorage::pd_getTlsAccessMode () ;
  if (tlsMode == ThreadLocalStorage::pd_tlsAccessIndirect) {            // T1
     // Use thread as a temporary: mov r, gs:[0]; mov r, [r+tlsOffset]
     emit_byte (Assembler::GS_segment) ;
     // ExternalAddress doesn't work because it can't take NULL
     AddressLiteral null(0, relocInfo::none);
     movptr (thread, null);
     movl (thread, Address(thread, ThreadLocalStorage::pd_getTlsOffset())) ;
     return ;
  } else
  if (tlsMode == ThreadLocalStorage::pd_tlsAccessDirect) {              // T2
     // mov r, gs:[tlsOffset]
     emit_byte (Assembler::GS_segment) ;
     AddressLiteral tls((address)ThreadLocalStorage::pd_getTlsOffset(), relocInfo::none);
     movptr (thread, tls);
     return ;
  }

  // slow call to of thr_getspecific
  // int thr_getspecific(thread_key_t key, void **value);
  // Consider using pthread_getspecific instead.

  pushl(0);                                                             // allocate space for return value
  if (thread != rax) pushl(rax);                                        // save rax, if caller still wants it
  pushl(rcx);                                                           // save caller save
  pushl(rdx);                                                           // save caller save
  if (thread != rax) {
    leal(thread, Address(rsp, 3 * sizeof(int)));                        // address of return value
  } else {
    leal(thread, Address(rsp, 2 * sizeof(int)));                        // address of return value
  }
  pushl(thread);                                                        // and pass the address
  pushl(ThreadLocalStorage::thread_index());                            // the key
  call(RuntimeAddress(CAST_FROM_FN_PTR(address, thr_getspecific)));
  increment(rsp, 2 * wordSize);
  popl(rdx);
  popl(rcx);
  if (thread != rax) popl(rax);
  popl(thread);
}

bool MacroAssembler::needs_explicit_null_check(intptr_t offset) {
  // Identical to Sparc/Solaris code
  bool offset_in_first_page =   0 <= offset  &&  offset < os::vm_page_size();
  return !offset_in_first_page;
}