1 /*
   2  * Copyright (c) 1997, 2015, Oracle and/or its affiliates. All rights reserved.
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * This code is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License version 2 only, as
   7  * published by the Free Software Foundation.
   8  *
   9  * This code is distributed in the hope that it will be useful, but WITHOUT
  10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12  * version 2 for more details (a copy is included in the LICENSE file that
  13  * accompanied this code).
  14  *
  15  * You should have received a copy of the GNU General Public License version
  16  * 2 along with this work; if not, write to the Free Software Foundation,
  17  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  18  *
  19  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  20  * or visit www.oracle.com if you need additional information or have any
  21  * questions.
  22  *
  23  */
  24 
  25 #ifndef OS_SOLARIS_VM_OS_SOLARIS_HPP
  26 #define OS_SOLARIS_VM_OS_SOLARIS_HPP
  27 
  28 // Solaris_OS defines the interface to Solaris operating systems
  29 
  30 // see thr_setprio(3T) for the basis of these numbers
  31 #define MinimumPriority 0
  32 #define NormalPriority  64
  33 #define MaximumPriority 127
  34 
  35 // FX/60 is critical thread class/priority on T4
  36 #define FXCriticalPriority 60
  37 
  38 // Information about the protection of the page at address '0' on this os.
  39 static bool zero_page_read_protected() { return true; }
  40 
  41 class Solaris {
  42   friend class os;
  43 
  44  private:
  45 
  46   // Support for "new" libthread APIs for getting & setting thread context (2.8)
  47 #define TRS_VALID       0
  48 #define TRS_NONVOLATILE 1
  49 #define TRS_LWPID       2
  50 #define TRS_INVALID     3
  51 
  52   // initialized to libthread or lwp synchronization primitives depending on UseLWPSychronization
  53   static int_fnP_mutex_tP _mutex_lock;
  54   static int_fnP_mutex_tP _mutex_trylock;
  55   static int_fnP_mutex_tP _mutex_unlock;
  56   static int_fnP_mutex_tP_i_vP _mutex_init;
  57   static int_fnP_mutex_tP _mutex_destroy;
  58   static int _mutex_scope;
  59 
  60   static int_fnP_cond_tP_mutex_tP_timestruc_tP _cond_timedwait;
  61   static int_fnP_cond_tP_mutex_tP _cond_wait;
  62   static int_fnP_cond_tP _cond_signal;
  63   static int_fnP_cond_tP _cond_broadcast;
  64   static int_fnP_cond_tP_i_vP _cond_init;
  65   static int_fnP_cond_tP _cond_destroy;
  66   static int _cond_scope;
  67 
  68   typedef uintptr_t       lgrp_cookie_t;
  69   typedef id_t            lgrp_id_t;
  70   typedef int             lgrp_rsrc_t;
  71   typedef enum lgrp_view {
  72     LGRP_VIEW_CALLER,       // what's available to the caller
  73     LGRP_VIEW_OS            // what's available to operating system
  74   } lgrp_view_t;
  75 
  76   typedef uint_t (*getisax_func_t)(uint32_t* array, uint_t n);
  77 
  78   typedef lgrp_id_t (*lgrp_home_func_t)(idtype_t idtype, id_t id);
  79   typedef lgrp_cookie_t (*lgrp_init_func_t)(lgrp_view_t view);
  80   typedef int (*lgrp_fini_func_t)(lgrp_cookie_t cookie);
  81   typedef lgrp_id_t (*lgrp_root_func_t)(lgrp_cookie_t cookie);
  82   typedef int (*lgrp_children_func_t)(lgrp_cookie_t  cookie,  lgrp_id_t  parent,
  83                                       lgrp_id_t *lgrp_array, uint_t lgrp_array_size);
  84   typedef int (*lgrp_resources_func_t)(lgrp_cookie_t  cookie,  lgrp_id_t  lgrp,
  85                                        lgrp_id_t *lgrp_array, uint_t lgrp_array_size,
  86                                        lgrp_rsrc_t type);
  87   typedef int (*lgrp_nlgrps_func_t)(lgrp_cookie_t cookie);
  88   typedef int (*lgrp_cookie_stale_func_t)(lgrp_cookie_t cookie);
  89   typedef int (*meminfo_func_t)(const uint64_t inaddr[],   int addr_count,
  90                                 const uint_t  info_req[],  int info_count,
  91                                 uint64_t  outdata[], uint_t validity[]);
  92 
  93   static getisax_func_t _getisax;
  94 
  95   static lgrp_home_func_t _lgrp_home;
  96   static lgrp_init_func_t _lgrp_init;
  97   static lgrp_fini_func_t _lgrp_fini;
  98   static lgrp_root_func_t _lgrp_root;
  99   static lgrp_children_func_t _lgrp_children;
 100   static lgrp_resources_func_t _lgrp_resources;
 101   static lgrp_nlgrps_func_t _lgrp_nlgrps;
 102   static lgrp_cookie_stale_func_t _lgrp_cookie_stale;
 103   static lgrp_cookie_t _lgrp_cookie;
 104 
 105   static meminfo_func_t _meminfo;
 106 
 107   // Large Page Support
 108   static bool is_valid_page_size(size_t bytes);
 109   static size_t page_size_for_alignment(size_t alignment);
 110   static bool setup_large_pages(caddr_t start, size_t bytes, size_t align);
 111 
 112   static void init_thread_fpu_state(void);
 113 
 114   static void try_enable_extended_io();
 115 
 116   // For signal-chaining
 117   static unsigned long sigs;                 // mask of signals that have
 118                                              // preinstalled signal handlers
 119   static struct sigaction *(*get_signal_action)(int);
 120   static struct sigaction *get_preinstalled_handler(int);
 121   static int (*get_libjsig_version)();
 122   static void save_preinstalled_handler(int, struct sigaction&);
 123   static void check_signal_handler(int sig);
 124   // For overridable signals
 125   static int _SIGasync;                      // user-overridable ASYNC_SIGNAL
 126   static void set_SIGasync(int newsig) { _SIGasync = newsig; }
 127 
 128  public:
 129   // Large Page Support--ISM.
 130   static bool largepage_range(char* addr, size_t size);
 131 
 132   static int SIGasync() { return _SIGasync; }
 133   static address handler_start, handler_end; // start and end pc of thr_sighndlrinfo
 134 
 135   static bool valid_stack_address(Thread* thread, address sp);
 136   static bool valid_ucontext(Thread* thread, ucontext_t* valid, ucontext_t* suspect);
 137   static ucontext_t* get_valid_uc_in_signal_handler(Thread* thread,
 138                                                     ucontext_t* uc);
 139 
 140   static ExtendedPC  ucontext_get_ExtendedPC(ucontext_t* uc);
 141   static intptr_t*   ucontext_get_sp(ucontext_t* uc);
 142   // ucontext_get_fp() is only used by Solaris X86 (see note below)
 143   static intptr_t*   ucontext_get_fp(ucontext_t* uc);
 144   static address    ucontext_get_pc(ucontext_t* uc);
 145   static void ucontext_set_pc(ucontext_t* uc, address pc);
 146 
 147   // For Analyzer Forte AsyncGetCallTrace profiling support:
 148   // Parameter ret_fp is only used by Solaris X86.
 149   //
 150   // We should have different declarations of this interface in
 151   // os_solaris_i486.hpp and os_solaris_sparc.hpp, but that file
 152   // provides extensions to the os class and not the Solaris class.
 153   static ExtendedPC fetch_frame_from_ucontext(Thread* thread, ucontext_t* uc,
 154                                               intptr_t** ret_sp, intptr_t** ret_fp);
 155 
 156   static void hotspot_sigmask(Thread* thread);
 157 
 158   // SR_handler
 159   static void SR_handler(Thread* thread, ucontext_t* uc);
 160  protected:
 161   // Solaris-specific interface goes here
 162   static julong available_memory();
 163   static julong physical_memory() { return _physical_memory; }
 164   static julong _physical_memory;
 165   static void initialize_system_info();
 166   static int _dev_zero_fd;
 167   static int get_dev_zero_fd() { return _dev_zero_fd; }
 168   static void set_dev_zero_fd(int fd) { _dev_zero_fd = fd; }
 169   static int commit_memory_impl(char* addr, size_t bytes, bool exec);
 170   static int commit_memory_impl(char* addr, size_t bytes,
 171                                 size_t alignment_hint, bool exec);
 172   static char* mmap_chunk(char *addr, size_t size, int flags, int prot);
 173   static char* anon_mmap(char* requested_addr, size_t bytes, size_t alignment_hint, bool fixed);
 174   static bool mpss_sanity_check(bool warn, size_t * page_size);
 175 
 176   // Workaround for 4352906. thr_stksegment sometimes returns
 177   // a bad value for the primordial thread's stack base when
 178   // it is called more than one time.
 179   // Workaround is to cache the initial value to avoid further
 180   // calls to thr_stksegment.
 181   // It appears that someone (Hotspot?) is trashing the user's
 182   // proc_t structure (note that this is a system struct).
 183   static address _main_stack_base;
 184 
 185   static void print_distro_info(outputStream* st);
 186   static void print_libversion_info(outputStream* st);
 187 
 188  public:
 189   static void libthread_init();
 190   static void synchronization_init();
 191   static bool liblgrp_init();
 192   static void initialize_features_info();
 193   // Load miscellaneous symbols.
 194   static void misc_sym_init();
 195   // This boolean allows users to forward their own non-matching signals
 196   // to JVM_handle_solaris_signal, harmlessly.
 197   static bool signal_handlers_are_installed;
 198 
 199   static void signal_sets_init();
 200   static void install_signal_handlers();
 201   static void set_signal_handler(int sig, bool set_installed, bool oktochain);
 202   static void init_signal_mem();
 203   static bool is_sig_ignored(int sig);
 204   static void set_our_sigflags(int, int);
 205   static int get_our_sigflags(int);
 206 
 207   // For signal-chaining
 208   static bool libjsig_is_loaded; // libjsig that interposes sigaction(),
 209                                  // signal(), sigset() is loaded
 210   static struct sigaction *get_chained_signal_action(int sig);
 211   static bool chained_handler(int sig, siginfo_t *siginfo, void *context);
 212 
 213   // Allows us to switch between lwp and thread -based synchronization
 214   static int mutex_lock(mutex_t *mx)    { return _mutex_lock(mx); }
 215   static int mutex_trylock(mutex_t *mx) { return _mutex_trylock(mx); }
 216   static int mutex_unlock(mutex_t *mx)  { return _mutex_unlock(mx); }
 217   static int mutex_init(mutex_t *mx)    { return _mutex_init(mx, os::Solaris::mutex_scope(), NULL); }
 218   static int mutex_destroy(mutex_t *mx) { return _mutex_destroy(mx); }
 219   static int mutex_scope()              { return _mutex_scope; }
 220 
 221   static void set_mutex_lock(int_fnP_mutex_tP func)      { _mutex_lock = func; }
 222   static void set_mutex_trylock(int_fnP_mutex_tP func)   { _mutex_trylock = func; }
 223   static void set_mutex_unlock(int_fnP_mutex_tP func)    { _mutex_unlock = func; }
 224   static void set_mutex_init(int_fnP_mutex_tP_i_vP func) { _mutex_init = func; }
 225   static void set_mutex_destroy(int_fnP_mutex_tP func)   { _mutex_destroy = func; }
 226   static void set_mutex_scope(int scope)                 { _mutex_scope = scope; }
 227 
 228   static int cond_timedwait(cond_t *cv, mutex_t *mx, timestruc_t *abst) { return _cond_timedwait(cv, mx, abst); }
 229   static int cond_wait(cond_t *cv, mutex_t *mx) { return _cond_wait(cv, mx); }
 230   static int cond_signal(cond_t *cv)            { return _cond_signal(cv); }
 231   static int cond_broadcast(cond_t *cv)         { return _cond_broadcast(cv); }
 232   static int cond_init(cond_t *cv)              { return _cond_init(cv, os::Solaris::cond_scope(), NULL); }
 233   static int cond_destroy(cond_t *cv)           { return _cond_destroy(cv); }
 234   static int cond_scope()                       { return _cond_scope; }
 235 
 236   static void set_cond_timedwait(int_fnP_cond_tP_mutex_tP_timestruc_tP func) { _cond_timedwait = func; }
 237   static void set_cond_wait(int_fnP_cond_tP_mutex_tP func) { _cond_wait = func; }
 238   static void set_cond_signal(int_fnP_cond_tP func)        { _cond_signal = func; }
 239   static void set_cond_broadcast(int_fnP_cond_tP func)     { _cond_broadcast = func; }
 240   static void set_cond_init(int_fnP_cond_tP_i_vP func)     { _cond_init = func; }
 241   static void set_cond_destroy(int_fnP_cond_tP func)       { _cond_destroy = func; }
 242   static void set_cond_scope(int scope)                    { _cond_scope = scope; }
 243 
 244   static void set_lgrp_home(lgrp_home_func_t func) { _lgrp_home = func; }
 245   static void set_lgrp_init(lgrp_init_func_t func) { _lgrp_init = func; }
 246   static void set_lgrp_fini(lgrp_fini_func_t func) { _lgrp_fini = func; }
 247   static void set_lgrp_root(lgrp_root_func_t func) { _lgrp_root = func; }
 248   static void set_lgrp_children(lgrp_children_func_t func)   { _lgrp_children = func; }
 249   static void set_lgrp_resources(lgrp_resources_func_t func) { _lgrp_resources = func; }
 250   static void set_lgrp_nlgrps(lgrp_nlgrps_func_t func)       { _lgrp_nlgrps = func; }
 251   static void set_lgrp_cookie_stale(lgrp_cookie_stale_func_t func) { _lgrp_cookie_stale = func; }
 252   static void set_lgrp_cookie(lgrp_cookie_t cookie)  { _lgrp_cookie = cookie; }
 253 
 254   static id_t lgrp_home(idtype_t type, id_t id)      { return _lgrp_home != NULL ? _lgrp_home(type, id) : -1; }
 255   static lgrp_cookie_t lgrp_init(lgrp_view_t view)   { return _lgrp_init != NULL ? _lgrp_init(view) : 0; }
 256   static int lgrp_fini(lgrp_cookie_t cookie)         { return _lgrp_fini != NULL ? _lgrp_fini(cookie) : -1; }
 257   static lgrp_id_t lgrp_root(lgrp_cookie_t cookie)   { return _lgrp_root != NULL ? _lgrp_root(cookie) : -1; }
 258   static int lgrp_children(lgrp_cookie_t  cookie,  lgrp_id_t  parent,
 259                            lgrp_id_t *lgrp_array, uint_t lgrp_array_size) {
 260     return _lgrp_children != NULL ? _lgrp_children(cookie, parent, lgrp_array, lgrp_array_size) : -1;
 261   }
 262   static int lgrp_resources(lgrp_cookie_t  cookie,  lgrp_id_t  lgrp,
 263                             lgrp_id_t *lgrp_array, uint_t lgrp_array_size,
 264                             lgrp_rsrc_t type) {
 265     return _lgrp_resources != NULL ? _lgrp_resources(cookie, lgrp, lgrp_array, lgrp_array_size, type) : -1;
 266   }
 267 
 268   static int lgrp_nlgrps(lgrp_cookie_t cookie)       { return _lgrp_nlgrps != NULL ? _lgrp_nlgrps(cookie) : -1; }
 269   static int lgrp_cookie_stale(lgrp_cookie_t cookie) {
 270     return _lgrp_cookie_stale != NULL ? _lgrp_cookie_stale(cookie) : -1;
 271   }
 272   static lgrp_cookie_t lgrp_cookie()                 { return _lgrp_cookie; }
 273 
 274   static bool supports_getisax()                     { return _getisax != NULL; }
 275   static uint_t getisax(uint32_t* array, uint_t n);
 276 
 277   static void set_meminfo(meminfo_func_t func)       { _meminfo = func; }
 278   static int meminfo (const uint64_t inaddr[],   int addr_count,
 279                       const uint_t  info_req[],  int info_count,
 280                       uint64_t  outdata[], uint_t validity[]) {
 281     return _meminfo != NULL ? _meminfo(inaddr, addr_count, info_req, info_count,
 282                                        outdata, validity) : -1;
 283   }
 284 
 285   static sigset_t* unblocked_signals();
 286   static sigset_t* vm_signals();
 287   static sigset_t* allowdebug_blocked_signals();
 288 
 289   // %%% Following should be promoted to os.hpp:
 290   // Trace number of created threads
 291   static          jint  _os_thread_limit;
 292   static volatile jint  _os_thread_count;
 293 
 294   // Minimum stack size a thread can be created with (allowing
 295   // the VM to completely create the thread and enter user code)
 296 
 297   static size_t min_stack_allowed;
 298 
 299   // Stack overflow handling
 300 
 301   static int max_register_window_saves_before_flushing();
 302 
 303   // Stack repair handling
 304 
 305   // none present
 306 
 307 };
 308 
 309 class PlatformEvent : public CHeapObj<mtInternal> {
 310  private:
 311   double CachePad[4];   // increase odds that _mutex is sole occupant of cache line
 312   volatile int _Event;
 313   int _nParked;
 314   int _pipev[2];
 315   mutex_t _mutex[1];
 316   cond_t  _cond[1];
 317   double PostPad[2];
 318 
 319  protected:
 320   // Defining a protected ctor effectively gives us an abstract base class.
 321   // That is, a PlatformEvent can never be instantiated "naked" but only
 322   // as a part of a ParkEvent (recall that ParkEvent extends PlatformEvent).
 323   // TODO-FIXME: make dtor private
 324   ~PlatformEvent() { guarantee(0, "invariant"); }
 325   PlatformEvent() {
 326     int status;
 327     status = os::Solaris::cond_init(_cond);
 328     assert_status(status == 0, status, "cond_init");
 329     status = os::Solaris::mutex_init(_mutex);
 330     assert_status(status == 0, status, "mutex_init");
 331     _Event   = 0;
 332     _nParked = 0;
 333     _pipev[0] = _pipev[1] = -1;
 334   }
 335 
 336  public:
 337   // Exercise caution using reset() and fired() -- they may require MEMBARs
 338   void reset() { _Event = 0; }
 339   int  fired() { return _Event; }
 340   void park();
 341   int  park(jlong millis);
 342   void unpark();
 343 };
 344 
 345 class PlatformParker : public CHeapObj<mtInternal> {
 346  protected:
 347   mutex_t _mutex[1];
 348   cond_t  _cond[1];
 349 
 350  public:       // TODO-FIXME: make dtor private
 351   ~PlatformParker() { guarantee(0, "invariant"); }
 352 
 353  public:
 354   PlatformParker() {
 355     int status;
 356     status = os::Solaris::cond_init(_cond);
 357     assert_status(status == 0, status, "cond_init");
 358     status = os::Solaris::mutex_init(_mutex);
 359     assert_status(status == 0, status, "mutex_init");
 360   }
 361 };
 362 
 363 #endif // OS_SOLARIS_VM_OS_SOLARIS_HPP