1 /* 2 * Copyright (c) 1999, 2015, Oracle and/or its affiliates. All rights reserved. 3 * Copyright 2013, 2015 SAP AG. All rights reserved. 4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 5 * 6 * This code is free software; you can redistribute it and/or modify it 7 * under the terms of the GNU General Public License version 2 only, as 8 * published by the Free Software Foundation. 9 * 10 * This code is distributed in the hope that it will be useful, but WITHOUT 11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 12 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 13 * version 2 for more details (a copy is included in the LICENSE file that 14 * accompanied this code). 15 * 16 * You should have received a copy of the GNU General Public License version 17 * 2 along with this work; if not, write to the Free Software Foundation, 18 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 19 * 20 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 21 * or visit www.oracle.com if you need additional information or have any 22 * questions. 23 * 24 */ 25 26 #ifndef OS_AIX_VM_OS_AIX_HPP 27 #define OS_AIX_VM_OS_AIX_HPP 28 29 // Information about the protection of the page at address '0' on this os. 30 static bool zero_page_read_protected() { return false; } 31 32 // Class Aix defines the interface to the Aix operating systems. 33 34 class Aix { 35 friend class os; 36 37 // For signal-chaining 38 // highest so far (AIX 5.2 - 6.1) is SIGSAK (63) 39 #define MAXSIGNUM 63 40 // Length of strings included in the libperfstat structures. 41 #define IDENTIFIER_LENGTH 64 42 43 static struct sigaction sigact[MAXSIGNUM]; // saved preinstalled sigactions 44 static unsigned int sigs; // mask of signals that have 45 // preinstalled signal handlers 46 static bool libjsig_is_loaded; // libjsig that interposes sigaction(), 47 // __sigaction(), signal() is loaded 48 static struct sigaction *(*get_signal_action)(int); 49 static struct sigaction *get_preinstalled_handler(int); 50 static void save_preinstalled_handler(int, struct sigaction&); 51 52 static void check_signal_handler(int sig); 53 54 // For signal flags diagnostics 55 static int sigflags[MAXSIGNUM]; 56 57 protected: 58 59 static julong _physical_memory; 60 static pthread_t _main_thread; 61 static Mutex* _createThread_lock; 62 static int _page_size; 63 static int _logical_cpus; 64 65 // -1 = uninitialized, 0 = AIX, 1 = OS/400 (PASE) 66 static int _on_pase; 67 68 // -1 = uninitialized, otherwise 16 bit number: 69 // lower 8 bit - minor version 70 // higher 8 bit - major version 71 // For AIX, e.g. 0x0601 for AIX 6.1 72 // for OS/400 e.g. 0x0504 for OS/400 V5R4 73 static int _os_version; 74 75 // -1 = uninitialized, 76 // 0 - SPEC1170 not requested (XPG_SUS_ENV is OFF or not set) 77 // 1 - SPEC1170 requested (XPG_SUS_ENV is ON) 78 static int _xpg_sus_mode; 79 80 // -1 = uninitialized, 81 // 0 - EXTSHM=OFF or not set 82 // 1 - EXTSHM=ON 83 static int _extshm; 84 85 // page sizes on AIX. 86 // 87 // AIX supports four different page sizes - 4K, 64K, 16MB, 16GB. The latter two 88 // (16M "large" resp. 16G "huge" pages) require special setup and are normally 89 // not available. 90 // 91 // AIX supports multiple page sizes per process, for: 92 // - Stack (of the primordial thread, so not relevant for us) 93 // - Data - data, bss, heap, for us also pthread stacks 94 // - Text - text code 95 // - shared memory 96 // 97 // Default page sizes can be set via linker options (-bdatapsize, -bstacksize, ...) 98 // and via environment variable LDR_CNTRL (DATAPSIZE, STACKPSIZE, ...) 99 // 100 // For shared memory, page size can be set dynamically via shmctl(). Different shared memory 101 // regions can have different page sizes. 102 // 103 // More information can be found at AIBM info center: 104 // http://publib.boulder.ibm.com/infocenter/aix/v6r1/index.jsp?topic=/com.ibm.aix.prftungd/doc/prftungd/multiple_page_size_app_support.htm 105 // 106 // ----- 107 // We want to support 4K and 64K and, if the machine is set up correctly, 16MB pages. 108 // 109 110 // page size of the stack of newly created pthreads 111 // (should be LDR_CNTRL DATAPSIZE because stack is allocated on heap by pthread lib) 112 static int _stack_page_size; 113 114 static julong available_memory(); 115 static julong physical_memory() { return _physical_memory; } 116 static void initialize_system_info(); 117 118 // OS recognitions (PASE/AIX, OS level) call this before calling any 119 // one of Aix::on_pase(), Aix::os_version(). 120 static void initialize_os_info(); 121 122 // Scan environment for important settings which might effect the 123 // VM. Trace out settings. Warn about invalid settings and/or 124 // correct them. 125 // 126 // Must run after os::Aix::initialue_os_info(). 127 static void scan_environment(); 128 129 // Initialize libo4 (on PASE) and libperfstat (on AIX). Call this 130 // before relying on functions from either lib, e.g. Aix::get_meminfo(). 131 static void initialize_libo4(); 132 static void initialize_libperfstat(); 133 134 static bool supports_variable_stack_size(); 135 136 public: 137 static void init_thread_fpu_state(); 138 static pthread_t main_thread(void) { return _main_thread; } 139 // returns kernel thread id (similar to LWP id on Solaris), which can be 140 // used to access /proc 141 static pid_t gettid(); 142 static void set_createThread_lock(Mutex* lk) { _createThread_lock = lk; } 143 static Mutex* createThread_lock(void) { return _createThread_lock; } 144 static void hotspot_sigmask(Thread* thread); 145 146 // Given an address, returns the size of the page backing that address 147 static size_t query_pagesize(void* p); 148 149 // Return `true' if the calling thread is the primordial thread. The 150 // primordial thread is the thread which contains the main function, 151 // *not* necessarily the thread which initialized the VM by calling 152 // JNI_CreateJavaVM. 153 static bool is_primordial_thread(void); 154 155 static int page_size(void) { 156 assert(_page_size != -1, "not initialized"); 157 return _page_size; 158 } 159 160 // Accessor methods for stack page size which may be different from usual page size. 161 static int stack_page_size(void) { 162 assert(_stack_page_size != -1, "not initialized"); 163 return _stack_page_size; 164 } 165 166 // This is used to scale stack space (guard pages etc.). The name is somehow misleading. 167 static int vm_default_page_size(void ) { return 8*K; } 168 169 static address ucontext_get_pc(const ucontext_t* uc); 170 static intptr_t* ucontext_get_sp(ucontext_t* uc); 171 static intptr_t* ucontext_get_fp(ucontext_t* uc); 172 // Set PC into context. Needed for continuation after signal. 173 static void ucontext_set_pc(ucontext_t* uc, address pc); 174 175 // This boolean allows users to forward their own non-matching signals 176 // to JVM_handle_aix_signal, harmlessly. 177 static bool signal_handlers_are_installed; 178 179 static int get_our_sigflags(int); 180 static void set_our_sigflags(int, int); 181 static void signal_sets_init(); 182 static void install_signal_handlers(); 183 static void set_signal_handler(int, bool); 184 static bool is_sig_ignored(int sig); 185 186 static sigset_t* unblocked_signals(); 187 static sigset_t* vm_signals(); 188 static sigset_t* allowdebug_blocked_signals(); 189 190 // For signal-chaining 191 static struct sigaction *get_chained_signal_action(int sig); 192 static bool chained_handler(int sig, siginfo_t* siginfo, void* context); 193 194 // libpthread version string 195 static void libpthread_init(); 196 197 // Minimum stack size a thread can be created with (allowing 198 // the VM to completely create the thread and enter user code) 199 static size_t min_stack_allowed; 200 201 // Return default stack size or guard size for the specified thread type 202 static size_t default_stack_size(os::ThreadType thr_type); 203 static size_t default_guard_size(os::ThreadType thr_type); 204 205 // Function returns true if we run on OS/400 (pase), false if we run 206 // on AIX. 207 static bool on_pase() { 208 assert(_on_pase != -1, "not initialized"); 209 return _on_pase ? true : false; 210 } 211 212 // Function returns true if we run on AIX, false if we run on OS/400 213 // (pase). 214 static bool on_aix() { 215 assert(_on_pase != -1, "not initialized"); 216 return _on_pase ? false : true; 217 } 218 219 // -1 = uninitialized, otherwise 16 bit number: 220 // lower 8 bit - minor version 221 // higher 8 bit - major version 222 // For AIX, e.g. 0x0601 for AIX 6.1 223 // for OS/400 e.g. 0x0504 for OS/400 V5R4 224 static int os_version () { 225 assert(_os_version != -1, "not initialized"); 226 return _os_version; 227 } 228 229 // Convenience method: returns true if running on PASE V5R4 or older. 230 static bool on_pase_V5R4_or_older() { 231 return on_pase() && os_version() <= 0x0504; 232 } 233 234 // Convenience method: returns true if running on AIX 5.3 or older. 235 static bool on_aix_53_or_older() { 236 return on_aix() && os_version() <= 0x0503; 237 } 238 239 // Returns true if we run in SPEC1170 compliant mode (XPG_SUS_ENV=ON). 240 static bool xpg_sus_mode() { 241 assert(_xpg_sus_mode != -1, "not initialized"); 242 return _xpg_sus_mode; 243 } 244 245 // Returns true if EXTSHM=ON. 246 static bool extshm() { 247 assert(_extshm != -1, "not initialized"); 248 return _extshm; 249 } 250 251 // result struct for get_meminfo() 252 struct meminfo_t { 253 254 // Amount of virtual memory (in units of 4 KB pages) 255 unsigned long long virt_total; 256 257 // Amount of real memory, in bytes 258 unsigned long long real_total; 259 260 // Amount of free real memory, in bytes 261 unsigned long long real_free; 262 263 // Total amount of paging space, in bytes 264 unsigned long long pgsp_total; 265 266 // Amount of free paging space, in bytes 267 unsigned long long pgsp_free; 268 269 }; 270 271 // Result struct for get_cpuinfo(). 272 struct cpuinfo_t { 273 char description[IDENTIFIER_LENGTH]; // processor description (type/official name) 274 u_longlong_t processorHZ; // processor speed in Hz 275 int ncpus; // number of active logical processors 276 double loadavg[3]; // (1<<SBITS) times the average number of runnables processes during the last 1, 5 and 15 minutes. 277 // To calculate the load average, divide the numbers by (1<<SBITS). SBITS is defined in <sys/proc.h>. 278 char version[20]; // processor version from _system_configuration (sys/systemcfg.h) 279 }; 280 281 // Functions to retrieve memory information on AIX, PASE. 282 // (on AIX, using libperfstat, on PASE with libo4.so). 283 // Returns true if ok, false if error. 284 static bool get_meminfo(meminfo_t* pmi); 285 286 // Function to retrieve cpu information on AIX 287 // (on AIX, using libperfstat) 288 // Returns true if ok, false if error. 289 static bool get_cpuinfo(cpuinfo_t* pci); 290 291 }; // os::Aix class 292 293 294 class PlatformEvent : public CHeapObj<mtInternal> { 295 private: 296 double CachePad [4]; // increase odds that _mutex is sole occupant of cache line 297 volatile int _Event; 298 volatile int _nParked; 299 pthread_mutex_t _mutex [1]; 300 pthread_cond_t _cond [1]; 301 double PostPad [2]; 302 Thread * _Assoc; 303 304 public: // TODO-FIXME: make dtor private 305 ~PlatformEvent() { guarantee (0, "invariant"); } 306 307 public: 308 PlatformEvent() { 309 int status; 310 status = pthread_cond_init (_cond, NULL); 311 assert_status(status == 0, status, "cond_init"); 312 status = pthread_mutex_init (_mutex, NULL); 313 assert_status(status == 0, status, "mutex_init"); 314 _Event = 0; 315 _nParked = 0; 316 _Assoc = NULL; 317 } 318 319 // Use caution with reset() and fired() -- they may require MEMBARs 320 void reset() { _Event = 0; } 321 int fired() { return _Event; } 322 void park (); 323 void unpark (); 324 int TryPark (); 325 int park (jlong millis); 326 void SetAssociation (Thread * a) { _Assoc = a; } 327 }; 328 329 class PlatformParker : public CHeapObj<mtInternal> { 330 protected: 331 pthread_mutex_t _mutex [1]; 332 pthread_cond_t _cond [1]; 333 334 public: // TODO-FIXME: make dtor private 335 ~PlatformParker() { guarantee (0, "invariant"); } 336 337 public: 338 PlatformParker() { 339 int status; 340 status = pthread_cond_init (_cond, NULL); 341 assert_status(status == 0, status, "cond_init"); 342 status = pthread_mutex_init (_mutex, NULL); 343 assert_status(status == 0, status, "mutex_init"); 344 } 345 }; 346 347 #endif // OS_AIX_VM_OS_AIX_HPP