os_solaris.hpp revision 641:6af0a709d52b 
1/*
2 * Copyright 1997-2009 Sun Microsystems, Inc.  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 Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
20 * CA 95054 USA or visit www.sun.com if you need additional information or
21 * have any questions.
22 *
23 */
24
25// Solaris_OS defines the interface to Solaris operating systems
26
27class Solaris {
28  friend class os;
29
30 private:
31
32  // Support for "new" libthread APIs for getting & setting thread context (2.8)
33  #define TRS_VALID       0
34  #define TRS_NONVOLATILE 1
35  #define TRS_LWPID       2
36  #define TRS_INVALID     3
37
38  // _T2_libthread is true if we believe we are running with the newer
39  // SunSoft lib/lwp/libthread: default Solaris 9, available Solaris 8
40  // which is a lightweight libthread that also supports all T1
41  static bool _T2_libthread;
42  // These refer to new libthread interface functions
43  // They get intialized if we dynamically detect new libthread
44  static int_fnP_thread_t_iP_uP_stack_tP_gregset_t _thr_getstate;
45  static int_fnP_thread_t_i_gregset_t _thr_setstate;
46  static int_fnP_thread_t_i _thr_setmutator;
47  static int_fnP_thread_t _thr_suspend_mutator;
48  static int_fnP_thread_t _thr_continue_mutator;
49  // libthread_init sets the above, if the new functionality is detected
50
51  // initialized to libthread or lwp synchronization primitives depending on UseLWPSychronization
52  static int_fnP_mutex_tP _mutex_lock;
53  static int_fnP_mutex_tP _mutex_trylock;
54  static int_fnP_mutex_tP _mutex_unlock;
55  static int_fnP_mutex_tP_i_vP _mutex_init;
56  static int_fnP_mutex_tP _mutex_destroy;
57  static int _mutex_scope;
58
59  static int_fnP_cond_tP_mutex_tP_timestruc_tP _cond_timedwait;
60  static int_fnP_cond_tP_mutex_tP _cond_wait;
61  static int_fnP_cond_tP _cond_signal;
62  static int_fnP_cond_tP _cond_broadcast;
63  static int_fnP_cond_tP_i_vP _cond_init;
64  static int_fnP_cond_tP _cond_destroy;
65  static int _cond_scope;
66
67  typedef uintptr_t       lgrp_cookie_t;
68  typedef id_t            lgrp_id_t;
69  typedef int             lgrp_rsrc_t;
70  typedef enum lgrp_view {
71        LGRP_VIEW_CALLER,       /* what's available to the caller */
72        LGRP_VIEW_OS            /* what's available to operating system */
73  } lgrp_view_t;
74
75  typedef uint_t (*getisax_func_t)(uint32_t* array, uint_t n);
76
77  typedef lgrp_id_t (*lgrp_home_func_t)(idtype_t idtype, id_t id);
78  typedef lgrp_cookie_t (*lgrp_init_func_t)(lgrp_view_t view);
79  typedef int (*lgrp_fini_func_t)(lgrp_cookie_t cookie);
80  typedef lgrp_id_t (*lgrp_root_func_t)(lgrp_cookie_t cookie);
81  typedef int (*lgrp_children_func_t)(lgrp_cookie_t  cookie,  lgrp_id_t  parent,
82                                      lgrp_id_t *lgrp_array, uint_t lgrp_array_size);
83  typedef int (*lgrp_resources_func_t)(lgrp_cookie_t  cookie,  lgrp_id_t  lgrp,
84                                      lgrp_id_t *lgrp_array, uint_t lgrp_array_size,
85                                      lgrp_rsrc_t type);
86  typedef int (*lgrp_nlgrps_func_t)(lgrp_cookie_t cookie);
87  typedef int (*lgrp_cookie_stale_func_t)(lgrp_cookie_t cookie);
88  typedef int (*meminfo_func_t)(const uint64_t inaddr[],   int addr_count,
89                                const uint_t  info_req[],  int info_count,
90                                uint64_t  outdata[], uint_t validity[]);
91
92  static getisax_func_t _getisax;
93
94  static lgrp_home_func_t _lgrp_home;
95  static lgrp_init_func_t _lgrp_init;
96  static lgrp_fini_func_t _lgrp_fini;
97  static lgrp_root_func_t _lgrp_root;
98  static lgrp_children_func_t _lgrp_children;
99  static lgrp_resources_func_t _lgrp_resources;
100  static lgrp_nlgrps_func_t _lgrp_nlgrps;
101  static lgrp_cookie_stale_func_t _lgrp_cookie_stale;
102  static lgrp_cookie_t _lgrp_cookie;
103
104  static meminfo_func_t _meminfo;
105
106  // Large Page Support--mpss.
107  static bool set_mpss_range(caddr_t start, size_t bytes, size_t align);
108
109  static void init_thread_fpu_state(void);
110
111  static void try_enable_extended_io();
112
113  // For signal-chaining
114  static unsigned long sigs;                 // mask of signals that have
115                                             // preinstalled signal handlers
116  static struct sigaction *(*get_signal_action)(int);
117  static struct sigaction *get_preinstalled_handler(int);
118  static int (*get_libjsig_version)();
119  static void save_preinstalled_handler(int, struct sigaction&);
120  static void check_signal_handler(int sig);
121  // For overridable signals
122  static int _SIGinterrupt;                  // user-overridable INTERRUPT_SIGNAL
123  static int _SIGasync;                      // user-overridable ASYNC_SIGNAL
124  static void set_SIGinterrupt(int newsig) { _SIGinterrupt = newsig; }
125  static void set_SIGasync(int newsig) { _SIGasync = newsig; }
126
127
128 public:
129  // Large Page Support--ISM.
130  static bool largepage_range(char* addr, size_t size);
131
132  static int SIGinterrupt() { return _SIGinterrupt; }
133  static int SIGasync() { return _SIGasync; }
134  static address handler_start, handler_end; // start and end pc of thr_sighndlrinfo
135
136  static bool valid_stack_address(Thread* thread, address sp);
137  static bool valid_ucontext(Thread* thread, ucontext_t* valid, ucontext_t* suspect);
138  static ucontext_t* get_valid_uc_in_signal_handler(Thread* thread,
139    ucontext_t* uc);
140
141  static ExtendedPC  ucontext_get_ExtendedPC(ucontext_t* uc);
142  static intptr_t*   ucontext_get_sp(ucontext_t* uc);
143  // ucontext_get_fp() is only used by Solaris X86 (see note below)
144  static intptr_t*   ucontext_get_fp(ucontext_t* uc);
145
146  // For Analyzer Forte AsyncGetCallTrace profiling support:
147  // Parameter ret_fp is only used by Solaris X86.
148  //
149  // We should have different declarations of this interface in
150  // os_solaris_i486.hpp and os_solaris_sparc.hpp, but that file
151  // provides extensions to the os class and not the Solaris class.
152  static ExtendedPC fetch_frame_from_ucontext(Thread* thread, ucontext_t* uc,
153    intptr_t** ret_sp, intptr_t** ret_fp);
154
155  static void hotspot_sigmask(Thread* thread);
156
157 protected:
158  // Solaris-specific interface goes here
159  static julong available_memory();
160  static julong physical_memory() { return _physical_memory; }
161  static julong _physical_memory;
162  static void initialize_system_info();
163  static int _dev_zero_fd;
164  static int get_dev_zero_fd() { return _dev_zero_fd; }
165  static void set_dev_zero_fd(int fd) { _dev_zero_fd = fd; }
166  static char* mmap_chunk(char *addr, size_t size, int flags, int prot);
167  static char* anon_mmap(char* requested_addr, size_t bytes, size_t alignment_hint, bool fixed);
168  static bool mpss_sanity_check(bool warn, size_t * page_size);
169  static bool ism_sanity_check (bool warn, size_t * page_size);
170
171  // Workaround for 4352906. thr_stksegment sometimes returns
172  // a bad value for the primordial thread's stack base when
173  // it is called more than one time.
174  // Workaround is to cache the initial value to avoid further
175  // calls to thr_stksegment.
176  // It appears that someone (Hotspot?) is trashing the user's
177  // proc_t structure (note that this is a system struct).
178  static address _main_stack_base;
179
180 public:
181  static void libthread_init();
182  static void synchronization_init();
183  static bool liblgrp_init();
184  // Load miscellaneous symbols.
185  static void misc_sym_init();
186  // This boolean allows users to forward their own non-matching signals
187  // to JVM_handle_solaris_signal, harmlessly.
188  static bool signal_handlers_are_installed;
189
190  static void signal_sets_init();
191  static void install_signal_handlers();
192  static void set_signal_handler(int sig, bool set_installed, bool oktochain);
193  static void init_signal_mem();
194  static bool is_sig_ignored(int sig);
195  static void set_our_sigflags(int, int);
196  static int get_our_sigflags(int);
197
198  // For signal-chaining
199  static bool libjsig_is_loaded; // libjsig that interposes sigaction(),
200                                 // signal(), sigset() is loaded
201  static struct sigaction *get_chained_signal_action(int sig);
202  static bool chained_handler(int sig, siginfo_t *siginfo, void *context);
203
204  // The following allow us to link against both the old and new libthread (2.8)
205  // and exploit the new libthread functionality if available.
206
207  static bool T2_libthread()                                { return _T2_libthread; }
208  static void set_T2_libthread(bool T2_libthread) { _T2_libthread = T2_libthread; }
209
210  static int thr_getstate(thread_t tid, int *flag, unsigned *lwp, stack_t *ss, gregset_t rs)
211    { return _thr_getstate(tid, flag, lwp, ss, rs); }
212  static void set_thr_getstate(int_fnP_thread_t_iP_uP_stack_tP_gregset_t func)
213    { _thr_getstate = func; }
214
215  static int thr_setstate(thread_t tid, int flag, gregset_t rs)   { return _thr_setstate(tid, flag, rs); }
216  static void set_thr_setstate(int_fnP_thread_t_i_gregset_t func) { _thr_setstate = func; }
217
218  static int thr_setmutator(thread_t tid, int enabled)    { return _thr_setmutator(tid, enabled); }
219  static void set_thr_setmutator(int_fnP_thread_t_i func) { _thr_setmutator = func; }
220
221  static int  thr_suspend_mutator(thread_t tid)              { return _thr_suspend_mutator(tid); }
222  static void set_thr_suspend_mutator(int_fnP_thread_t func) { _thr_suspend_mutator = func; }
223
224  static int  thr_continue_mutator(thread_t tid)              { return _thr_continue_mutator(tid); }
225  static void set_thr_continue_mutator(int_fnP_thread_t func) { _thr_continue_mutator = func; }
226
227  // Allows us to switch between lwp and thread -based synchronization
228  static int mutex_lock(mutex_t *mx)    { return _mutex_lock(mx); }
229  static int mutex_trylock(mutex_t *mx) { return _mutex_trylock(mx); }
230  static int mutex_unlock(mutex_t *mx)  { return _mutex_unlock(mx); }
231  static int mutex_init(mutex_t *mx)    { return _mutex_init(mx, os::Solaris::mutex_scope(), NULL); }
232  static int mutex_destroy(mutex_t *mx) { return _mutex_destroy(mx); }
233  static int mutex_scope()              { return _mutex_scope; }
234
235  static void set_mutex_lock(int_fnP_mutex_tP func)      { _mutex_lock = func; }
236  static void set_mutex_trylock(int_fnP_mutex_tP func)   { _mutex_trylock = func; }
237  static void set_mutex_unlock(int_fnP_mutex_tP func)    { _mutex_unlock = func; }
238  static void set_mutex_init(int_fnP_mutex_tP_i_vP func) { _mutex_init = func; }
239  static void set_mutex_destroy(int_fnP_mutex_tP func)   { _mutex_destroy = func; }
240  static void set_mutex_scope(int scope)                 { _mutex_scope = scope; }
241
242  static int cond_timedwait(cond_t *cv, mutex_t *mx, timestruc_t *abst)
243                                                { return _cond_timedwait(cv, mx, abst); }
244  static int cond_wait(cond_t *cv, mutex_t *mx) { return _cond_wait(cv, mx); }
245  static int cond_signal(cond_t *cv)            { return _cond_signal(cv); }
246  static int cond_broadcast(cond_t *cv)         { return _cond_broadcast(cv); }
247  static int cond_init(cond_t *cv)              { return _cond_init(cv, os::Solaris::cond_scope(), NULL); }
248  static int cond_destroy(cond_t *cv)           { return _cond_destroy(cv); }
249  static int cond_scope()                       { return _cond_scope; }
250
251  static void set_cond_timedwait(int_fnP_cond_tP_mutex_tP_timestruc_tP func)
252                                                           { _cond_timedwait = func; }
253  static void set_cond_wait(int_fnP_cond_tP_mutex_tP func) { _cond_wait = func; }
254  static void set_cond_signal(int_fnP_cond_tP func)        { _cond_signal = func; }
255  static void set_cond_broadcast(int_fnP_cond_tP func)     { _cond_broadcast = func; }
256  static void set_cond_init(int_fnP_cond_tP_i_vP func)     { _cond_init = func; }
257  static void set_cond_destroy(int_fnP_cond_tP func)       { _cond_destroy = func; }
258  static void set_cond_scope(int scope)                    { _cond_scope = scope; }
259
260  static void set_lgrp_home(lgrp_home_func_t func) { _lgrp_home = func; }
261  static void set_lgrp_init(lgrp_init_func_t func) { _lgrp_init = func; }
262  static void set_lgrp_fini(lgrp_fini_func_t func) { _lgrp_fini = func; }
263  static void set_lgrp_root(lgrp_root_func_t func) { _lgrp_root = func; }
264  static void set_lgrp_children(lgrp_children_func_t func)   { _lgrp_children = func; }
265  static void set_lgrp_resources(lgrp_resources_func_t func) { _lgrp_resources = func; }
266  static void set_lgrp_nlgrps(lgrp_nlgrps_func_t func)       { _lgrp_nlgrps = func; }
267  static void set_lgrp_cookie_stale(lgrp_cookie_stale_func_t func) { _lgrp_cookie_stale = func; }
268  static void set_lgrp_cookie(lgrp_cookie_t cookie)  { _lgrp_cookie = cookie; }
269
270  static id_t lgrp_home(idtype_t type, id_t id)      { return _lgrp_home != NULL ? _lgrp_home(type, id) : -1; }
271  static lgrp_cookie_t lgrp_init(lgrp_view_t view)   { return _lgrp_init != NULL ? _lgrp_init(view) : 0; }
272  static int lgrp_fini(lgrp_cookie_t cookie)         { return _lgrp_fini != NULL ? _lgrp_fini(cookie) : -1; }
273  static lgrp_id_t lgrp_root(lgrp_cookie_t cookie)   { return _lgrp_root != NULL ? _lgrp_root(cookie) : -1; };
274  static int lgrp_children(lgrp_cookie_t  cookie,  lgrp_id_t  parent,
275                    lgrp_id_t *lgrp_array, uint_t lgrp_array_size) {
276    return _lgrp_children != NULL ? _lgrp_children(cookie, parent, lgrp_array, lgrp_array_size) : -1;
277  }
278  static int lgrp_resources(lgrp_cookie_t  cookie,  lgrp_id_t  lgrp,
279                            lgrp_id_t *lgrp_array, uint_t lgrp_array_size,
280                            lgrp_rsrc_t type) {
281    return _lgrp_resources != NULL ? _lgrp_resources(cookie, lgrp, lgrp_array, lgrp_array_size, type) : -1;
282  }
283
284  static int lgrp_nlgrps(lgrp_cookie_t cookie)       { return _lgrp_nlgrps != NULL ? _lgrp_nlgrps(cookie) : -1; }
285  static int lgrp_cookie_stale(lgrp_cookie_t cookie) {
286    return _lgrp_cookie_stale != NULL ? _lgrp_cookie_stale(cookie) : -1;
287  }
288  static lgrp_cookie_t lgrp_cookie()                 { return _lgrp_cookie; }
289
290  static bool supports_getisax()                     { return _getisax != NULL; }
291  static uint_t getisax(uint32_t* array, uint_t n);
292
293  static void set_meminfo(meminfo_func_t func)       { _meminfo = func; }
294  static int meminfo (const uint64_t inaddr[],   int addr_count,
295                     const uint_t  info_req[],  int info_count,
296                     uint64_t  outdata[], uint_t validity[]) {
297    return _meminfo != NULL ? _meminfo(inaddr, addr_count, info_req, info_count,
298                                       outdata, validity) : -1;
299  }
300
301  enum {
302    clear_interrupted = true
303  };
304  static void setup_interruptible(JavaThread* thread);
305  static void setup_interruptible_already_blocked(JavaThread* thread);
306  static JavaThread* setup_interruptible();
307  static void cleanup_interruptible(JavaThread* thread);
308
309  // perf counter incrementers used by _INTERRUPTIBLE
310
311  static void bump_interrupted_before_count();
312  static void bump_interrupted_during_count();
313
314#ifdef ASSERT
315  static JavaThread* setup_interruptible_native();
316  static void cleanup_interruptible_native(JavaThread* thread);
317#endif
318
319  static sigset_t* unblocked_signals();
320  static sigset_t* vm_signals();
321  static sigset_t* allowdebug_blocked_signals();
322
323  // %%% Following should be promoted to os.hpp:
324  // Trace number of created threads
325  static          jint  _os_thread_limit;
326  static volatile jint  _os_thread_count;
327
328  // Minimum stack size a thread can be created with (allowing
329  // the VM to completely create the thread and enter user code)
330
331  static size_t min_stack_allowed;
332
333  // Stack overflow handling
334
335  static int max_register_window_saves_before_flushing();
336
337  // Stack repair handling
338
339  // none present
340
341};
342
343class PlatformEvent : public CHeapObj {
344  private:
345    double CachePad [4] ;   // increase odds that _mutex is sole occupant of cache line
346    volatile int _Event ;
347    int _nParked ;
348    int _pipev [2] ;
349    mutex_t _mutex  [1] ;
350    cond_t  _cond   [1] ;
351    double PostPad  [2] ;
352
353  protected:
354    // Defining a protected ctor effectively gives us an abstract base class.
355    // That is, a PlatformEvent can never be instantiated "naked" but only
356    // as a part of a ParkEvent (recall that ParkEvent extends PlatformEvent).
357    // TODO-FIXME: make dtor private
358    ~PlatformEvent() { guarantee (0, "invariant") ; }
359    PlatformEvent() {
360      int status;
361      status = os::Solaris::cond_init(_cond);
362      assert_status(status == 0, status, "cond_init");
363      status = os::Solaris::mutex_init(_mutex);
364      assert_status(status == 0, status, "mutex_init");
365      _Event   = 0 ;
366      _nParked = 0 ;
367      _pipev[0] = _pipev[1] = -1 ;
368    }
369
370  public:
371    // Exercise caution using reset() and fired() -- they may require MEMBARs
372    void reset() { _Event = 0 ; }
373    int  fired() { return _Event; }
374    void park () ;
375    int  park (jlong millis) ;
376    int  TryPark () ;
377    void unpark () ;
378} ;
379
380class PlatformParker : public CHeapObj {
381  protected:
382    mutex_t _mutex [1] ;
383    cond_t  _cond  [1] ;
384
385  public:       // TODO-FIXME: make dtor private
386    ~PlatformParker() { guarantee (0, "invariant") ; }
387
388  public:
389    PlatformParker() {
390      int status;
391      status = os::Solaris::cond_init(_cond);
392      assert_status(status == 0, status, "cond_init");
393      status = os::Solaris::mutex_init(_mutex);
394      assert_status(status == 0, status, "mutex_init");
395    }
396} ;
397