solaris/vm/os_solaris.inline.hpp

0N/A/*
2362N/A * Copyright (c) 1997, 2010, Oracle and/or its affiliates. All rights reserved.
0N/A * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
0N/A *
0N/A * This code is free software; you can redistribute it and/or modify it
0N/A * under the terms of the GNU General Public License version 2 only, as
2362N/A * published by the Free Software Foundation.
0N/A *
2362N/A * This code is distributed in the hope that it will be useful, but WITHOUT
0N/A * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
0N/A * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
0N/A * version 2 for more details (a copy is included in the LICENSE file that
0N/A * accompanied this code).
0N/A *
0N/A * You should have received a copy of the GNU General Public License version
0N/A * 2 along with this work; if not, write to the Free Software Foundation,
0N/A * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
0N/A *
0N/A * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
0N/A * or visit www.oracle.com if you need additional information or have any
2362N/A * questions.
2362N/A *
2362N/A */
0N/A
0N/A#ifndef OS_SOLARIS_VM_OS_SOLARIS_INLINE_HPP
0N/A#define OS_SOLARIS_VM_OS_SOLARIS_INLINE_HPP
0N/A
0N/A#include "runtime/atomic.hpp"
0N/A#include "runtime/os.hpp"
0N/A#ifdef TARGET_OS_ARCH_solaris_x86
0N/A# include "atomic_solaris_x86.inline.hpp"
0N/A# include "orderAccess_solaris_x86.inline.hpp"
0N/A#endif
0N/A#ifdef TARGET_OS_ARCH_solaris_sparc
0N/A# include "atomic_solaris_sparc.inline.hpp"
0N/A# include "orderAccess_solaris_sparc.inline.hpp"
0N/A#endif
0N/A
0N/A// System includes
0N/A#include <sys/param.h>
0N/A#include <dlfcn.h>
0N/A#include <sys/socket.h>
0N/A#include <sys/poll.h>
0N/A#include <sys/filio.h>
0N/A#include <unistd.h>
0N/A#include <netdb.h>
0N/A#include <setjmp.h>
0N/A
0N/Ainline const char* os::file_separator() { return "/"; }
0N/Ainline const char* os::line_separator() { return "\n"; }
0N/Ainline const char* os::path_separator() { return ":"; }
0N/A
0N/Ainline const char* os::jlong_format_specifier()   { return "%lld"; }
0N/Ainline const char* os::julong_format_specifier()  { return "%llu"; }
0N/A
0N/A// File names are case-sensitive on windows only
0N/Ainline int os::file_name_strcmp(const char* s1, const char* s2) {
0N/A  return strcmp(s1, s2);
0N/A}
0N/A
0N/Ainline bool os::uses_stack_guard_pages() {
0N/A  return true;
0N/A}
0N/A
0N/Ainline bool os::allocate_stack_guard_pages() {
0N/A  assert(uses_stack_guard_pages(), "sanity check");
0N/A  int r = thr_main() ;
0N/A  guarantee (r == 0 || r == 1, "CR6501650 or CR6493689") ;
0N/A  return r;
0N/A}
0N/A
0N/A
0N/A// On Solaris, reservations are made on a page by page basis, nothing to do.
0N/Ainline void os::pd_split_reserved_memory(char *base, size_t size,
0N/A                                      size_t split, bool realloc) {
0N/A}
0N/A
0N/A
0N/A// Bang the shadow pages if they need to be touched to be mapped.
0N/Ainline void os::bang_stack_shadow_pages() {
0N/A}
0N/Ainline void os::dll_unload(void *lib) { ::dlclose(lib); }
0N/A
0N/Ainline DIR* os::opendir(const char* dirname) {
0N/A  assert(dirname != NULL, "just checking");
0N/A  return ::opendir(dirname);
0N/A}
0N/A
0N/Ainline int os::readdir_buf_size(const char *path) {
0N/A  int size = pathconf(path, _PC_NAME_MAX);
0N/A  return (size < 0 ? MAXPATHLEN : size) + sizeof(dirent) + 1;
0N/A}
0N/A
0N/Ainline struct dirent* os::readdir(DIR* dirp, dirent* dbuf) {
0N/A  assert(dirp != NULL, "just checking");
0N/A#if defined(_LP64) || defined(_GNU_SOURCE) || _FILE_OFFSET_BITS==64
0N/A  dirent* p;
0N/A  int status;
0N/A
0N/A  if((status = ::readdir_r(dirp, dbuf, &p)) != 0) {
0N/A    errno = status;
0N/A    return NULL;
0N/A  } else
0N/A    return p;
0N/A#else  // defined(_LP64) || defined(_GNU_SOURCE) || _FILE_OFFSET_BITS==64
0N/A  return ::readdir_r(dirp, dbuf);
0N/A#endif // defined(_LP64) || defined(_GNU_SOURCE) || _FILE_OFFSET_BITS==64
0N/A}
0N/A
0N/Ainline int os::closedir(DIR *dirp) {
0N/A  assert(dirp != NULL, "argument is NULL");
0N/A  return ::closedir(dirp);
0N/A}
0N/A
0N/A//////////////////////////////////////////////////////////////////////////////
0N/A////////////////////////////////////////////////////////////////////////////////
0N/A
0N/A// macros for interruptible io and system calls and system call restarting
0N/A
0N/A#define _INTERRUPTIBLE(_setup, _cmd, _result, _thread, _clear, _before, _after, _int_enable) \
0N/Ado { \
0N/A  _setup; \
0N/A  _before; \
0N/A  OSThread* _osthread = _thread->osthread(); \
0N/A  if (_int_enable && _thread->has_last_Java_frame()) { \
0N/A    /* this is java interruptible io stuff */ \
0N/A    if (os::is_interrupted(_thread, _clear))  { \
0N/A      os::Solaris::bump_interrupted_before_count(); \
0N/A      _result = OS_INTRPT; \
0N/A    } else { \
0N/A      /* _cmd always expands to an assignment to _result */ \
0N/A      if ((_cmd) < 0 && errno == EINTR  \
0N/A       && os::is_interrupted(_thread, _clear)) { \
0N/A        os::Solaris::bump_interrupted_during_count(); \
0N/A        _result = OS_INTRPT; \
      } \
    } \
  } else { \
    /* this is normal blocking io stuff */ \
    _cmd; \
  } \
  _after; \
} while(false)

// Interruptible io support + restarting of interrupted system calls

#ifndef ASSERT

#define INTERRUPTIBLE(_cmd, _result, _clear) do { \
  _INTERRUPTIBLE( JavaThread* _thread = (JavaThread*)ThreadLocalStorage::thread(),_result = _cmd, _result, _thread, _clear, , , UseVMInterruptibleIO); \
} while((_result == OS_ERR) && (errno == EINTR))

#else

// This adds an assertion that it is only called from thread_in_native
// The call overhead is skipped for performance in product mode
#define INTERRUPTIBLE(_cmd, _result, _clear) do { \
  _INTERRUPTIBLE(JavaThread* _thread = os::Solaris::setup_interruptible_native(), _result = _cmd, _result, _thread, _clear, , os::Solaris::cleanup_interruptible_native(_thread), UseVMInterruptibleIO ); \
} while((_result == OS_ERR) && (errno == EINTR))

#endif

// Used for calls from _thread_in_vm, not from _thread_in_native
#define INTERRUPTIBLE_VM(_cmd, _result, _clear) do { \
  _INTERRUPTIBLE(JavaThread* _thread = os::Solaris::setup_interruptible(), _result = _cmd, _result, _thread, _clear, , os::Solaris::cleanup_interruptible(_thread), UseVMInterruptibleIO ); \
} while((_result == OS_ERR) && (errno == EINTR))

/* Use NORESTART when the system call cannot return EINTR, when something other
   than a system call is being invoked, or when the caller must do EINTR
   handling. */

#ifndef ASSERT

#define INTERRUPTIBLE_NORESTART(_cmd, _result, _clear) \
  _INTERRUPTIBLE( JavaThread* _thread = (JavaThread*)ThreadLocalStorage::thread(),_result = _cmd, _result, _thread, _clear, , , UseVMInterruptibleIO)

#else

// This adds an assertion that it is only called from thread_in_native
// The call overhead is skipped for performance in product mode
#define INTERRUPTIBLE_NORESTART(_cmd, _result, _clear) \
  _INTERRUPTIBLE(JavaThread* _thread = os::Solaris::setup_interruptible_native(), _result = _cmd, _result, _thread, _clear, , os::Solaris::cleanup_interruptible_native(_thread), UseVMInterruptibleIO )

#endif

// Don't attend to UseVMInterruptibleIO. Always allow interruption.
// Also assumes that it is called from the _thread_blocked state.
// Used by os_sleep().

#define INTERRUPTIBLE_NORESTART_VM_ALWAYS(_cmd, _result, _thread, _clear) \
  _INTERRUPTIBLE(os::Solaris::setup_interruptible_already_blocked(_thread), _result = _cmd, _result, _thread, _clear, , , true )

#define INTERRUPTIBLE_RETURN_INT(_cmd, _clear) do { \
  int _result; \
  do { \
    INTERRUPTIBLE(_cmd, _result, _clear); \
  } while((_result == OS_ERR) && (errno == EINTR)); \
  return _result; \
} while(false)

#define INTERRUPTIBLE_RETURN_INT_VM(_cmd, _clear) do { \
  int _result; \
  do { \
    INTERRUPTIBLE_VM(_cmd, _result, _clear); \
  } while((_result == OS_ERR) && (errno == EINTR)); \
  return _result; \
} while(false)

#define INTERRUPTIBLE_RETURN_INT_NORESTART(_cmd, _clear) do { \
  int _result; \
  INTERRUPTIBLE_NORESTART(_cmd, _result, _clear); \
  return _result; \
} while(false)

/* Use the RESTARTABLE macros when interruptible io is not needed */

#define RESTARTABLE(_cmd, _result) do { \
  do { \
    _result = _cmd; \
  } while((_result == OS_ERR) && (errno == EINTR)); \
} while(false)

#define RESTARTABLE_RETURN_INT(_cmd) do { \
  int _result; \
  RESTARTABLE(_cmd, _result); \
  return _result; \
} while(false)

inline bool os::numa_has_static_binding()   { return false; }
inline bool os::numa_has_group_homing()     { return true;  }

inline int    os::socket(int domain, int type, int protocol) {
  return ::socket(domain, type, protocol);
}

inline int    os::listen(int fd, int count) {
  if (fd < 0) return OS_ERR;

  return ::listen(fd, count);
}

inline int os::socket_shutdown(int fd, int howto){
  return ::shutdown(fd, howto);
}

inline int os::get_sock_name(int fd, struct sockaddr* him, socklen_t* len){
  return ::getsockname(fd, him, len);
}

inline int os::get_host_name(char* name, int namelen){
  return ::gethostname(name, namelen);
}

inline struct hostent* os::get_host_by_name(char* name) {
  return ::gethostbyname(name);
}

inline int os::get_sock_opt(int fd, int level, int optname,
                            char* optval, socklen_t* optlen) {
  return ::getsockopt(fd, level, optname, optval, optlen);
}

inline int os::set_sock_opt(int fd, int level, int optname,
                            const char *optval, socklen_t optlen) {
  return ::setsockopt(fd, level, optname, optval, optlen);
}
#endif // OS_SOLARIS_VM_OS_SOLARIS_INLINE_HPP