1 /* 2 * Copyright (c) 1998, 2010, 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 SHARE_VM_UTILITIES_GLOBALDEFINITIONS_GCC_HPP 26 #define SHARE_VM_UTILITIES_GLOBALDEFINITIONS_GCC_HPP 27 28 #include "prims/jni.h" 29 30 // This file holds compiler-dependent includes, 31 // globally used constants & types, class (forward) 32 // declarations and a few frequently used utility functions. 33 34 #include <ctype.h> 35 #include <string.h> 36 #include <stdarg.h> 37 #include <stddef.h> 38 #include <stdio.h> 39 #include <stdlib.h> 40 #include <wchar.h> 41 42 #ifdef SOLARIS 43 #include <ieeefp.h> 44 #endif // SOLARIS 45 46 #include <math.h> 47 #ifndef FP_PZERO 48 // Linux doesn't have positive/negative zero 49 #define FP_PZERO FP_ZERO 50 #endif 51 #if (!defined fpclass) && ((!defined SPARC) || (!defined SOLARIS)) 52 #define fpclass fpclassify 53 #endif 54 55 #include <time.h> 56 #include <fcntl.h> 57 #include <dlfcn.h> 58 #include <pthread.h> 59 60 #ifdef SOLARIS 61 #include <thread.h> 62 #endif // SOLARIS 63 64 #include <limits.h> 65 #include <errno.h> 66 67 #ifdef SOLARIS 68 #include <sys/trap.h> 69 #include <sys/regset.h> 70 #include <sys/procset.h> 71 #include <ucontext.h> 72 #include <setjmp.h> 73 #endif // SOLARIS 74 75 # ifdef SOLARIS_MUTATOR_LIBTHREAD 76 # include <sys/procfs.h> 77 # endif 78 79 #ifdef LINUX 80 #include <inttypes.h> 81 #include <signal.h> 82 #include <ucontext.h> 83 #include <sys/time.h> 84 #endif // LINUX 85 86 // 4810578: varargs unsafe on 32-bit integer/64-bit pointer architectures 87 // When __cplusplus is defined, NULL is defined as 0 (32-bit constant) in 88 // system header files. On 32-bit architectures, there is no problem. 89 // On 64-bit architectures, defining NULL as a 32-bit constant can cause 90 // problems with varargs functions: C++ integral promotion rules say for 91 // varargs, we pass the argument 0 as an int. So, if NULL was passed to a 92 // varargs function it will remain 32-bits. Depending on the calling 93 // convention of the machine, if the argument is passed on the stack then 94 // only 32-bits of the "NULL" pointer may be initialized to zero. The 95 // other 32-bits will be garbage. If the varargs function is expecting a 96 // pointer when it extracts the argument, then we have a problem. 97 // 98 // Solution: For 64-bit architectures, redefine NULL as 64-bit constant 0. 99 // 100 // Note: this fix doesn't work well on Linux because NULL will be overwritten 101 // whenever a system header file is included. Linux handles NULL correctly 102 // through a special type '__null'. 103 #ifdef SOLARIS 104 #ifdef _LP64 105 #undef NULL 106 #define NULL 0L 107 #else 108 #ifndef NULL 109 #define NULL 0 110 #endif 111 #endif 112 #endif 113 114 // NULL vs NULL_WORD: 115 // On Linux NULL is defined as a special type '__null'. Assigning __null to 116 // integer variable will cause gcc warning. Use NULL_WORD in places where a 117 // pointer is stored as integer value. On some platforms, sizeof(intptr_t) > 118 // sizeof(void*), so here we want something which is integer type, but has the 119 // same size as a pointer. 120 #ifdef LINUX 121 #ifdef _LP64 122 #define NULL_WORD 0L 123 #else 124 // Cast 0 to intptr_t rather than int32_t since they are not the same type 125 // on platforms such as Mac OS X. 126 #define NULL_WORD ((intptr_t)0) 127 #endif 128 #else 129 #define NULL_WORD NULL 130 #endif 131 132 #ifndef LINUX 133 // Compiler-specific primitive types 134 typedef unsigned short uint16_t; 135 #ifndef _UINT32_T 136 #define _UINT32_T 137 typedef unsigned int uint32_t; 138 #endif // _UINT32_T 139 140 #if !defined(_SYS_INT_TYPES_H) 141 #ifndef _UINT64_T 142 #define _UINT64_T 143 typedef unsigned long long uint64_t; 144 #endif // _UINT64_T 145 // %%%% how to access definition of intptr_t portably in 5.5 onward? 146 typedef int intptr_t; 147 typedef unsigned int uintptr_t; 148 // If this gets an error, figure out a symbol XXX that implies the 149 // prior definition of intptr_t, and add "&& !defined(XXX)" above. 150 #endif // _SYS_INT_TYPES_H 151 152 #endif // !LINUX 153 154 // Additional Java basic types 155 156 typedef uint8_t jubyte; 157 typedef uint16_t jushort; 158 typedef uint32_t juint; 159 typedef uint64_t julong; 160 161 //---------------------------------------------------------------------------------------------------- 162 // Special (possibly not-portable) casts 163 // Cast floats into same-size integers and vice-versa w/o changing bit-pattern 164 // %%%%%% These seem like standard C++ to me--how about factoring them out? - Ungar 165 166 inline jint jint_cast (jfloat x) { return *(jint* )&x; } 167 inline jlong jlong_cast (jdouble x) { return *(jlong* )&x; } 168 169 inline jfloat jfloat_cast (jint x) { return *(jfloat* )&x; } 170 inline jdouble jdouble_cast(jlong x) { return *(jdouble*)&x; } 171 172 //---------------------------------------------------------------------------------------------------- 173 // Constant for jlong (specifying an long long canstant is C++ compiler specific) 174 175 // Build a 64bit integer constant 176 #define CONST64(x) (x ## LL) 177 #define UCONST64(x) (x ## ULL) 178 179 const jlong min_jlong = CONST64(0x8000000000000000); 180 const jlong max_jlong = CONST64(0x7fffffffffffffff); 181 182 183 #ifdef SOLARIS 184 //---------------------------------------------------------------------------------------------------- 185 // ANSI C++ fixes 186 // NOTE:In the ANSI committee's continuing attempt to make each version 187 // of C++ incompatible with the previous version, you can no longer cast 188 // pointers to functions without specifying linkage unless you want to get 189 // warnings. 190 // 191 // This also means that pointers to functions can no longer be "hidden" 192 // in opaque types like void * because at the invokation point warnings 193 // will be generated. While this makes perfect sense from a type safety 194 // point of view it causes a lot of warnings on old code using C header 195 // files. Here are some typedefs to make the job of silencing warnings 196 // a bit easier. 197 // 198 // The final kick in the teeth is that you can only have extern "C" linkage 199 // specified at file scope. So these typedefs are here rather than in the 200 // .hpp for the class (os:Solaris usually) that needs them. 201 202 extern "C" { 203 typedef int (*int_fnP_thread_t_iP_uP_stack_tP_gregset_t)(thread_t, int*, unsigned *, stack_t*, gregset_t); 204 typedef int (*int_fnP_thread_t_i_gregset_t)(thread_t, int, gregset_t); 205 typedef int (*int_fnP_thread_t_i)(thread_t, int); 206 typedef int (*int_fnP_thread_t)(thread_t); 207 208 typedef int (*int_fnP_cond_tP_mutex_tP_timestruc_tP)(cond_t *cv, mutex_t *mx, timestruc_t *abst); 209 typedef int (*int_fnP_cond_tP_mutex_tP)(cond_t *cv, mutex_t *mx); 210 211 // typedef for missing API in libc 212 typedef int (*int_fnP_mutex_tP_i_vP)(mutex_t *, int, void *); 213 typedef int (*int_fnP_mutex_tP)(mutex_t *); 214 typedef int (*int_fnP_cond_tP_i_vP)(cond_t *cv, int scope, void *arg); 215 typedef int (*int_fnP_cond_tP)(cond_t *cv); 216 }; 217 #endif // SOLARIS 218 219 //---------------------------------------------------------------------------------------------------- 220 // Debugging 221 222 #define DEBUG_EXCEPTION ::abort(); 223 224 #ifdef ARM 225 #ifdef SOLARIS 226 #define BREAKPOINT __asm__ volatile (".long 0xe1200070") 227 #else 228 #define BREAKPOINT __asm__ volatile (".long 0xe7f001f0") 229 #endif 230 #else 231 extern "C" void breakpoint(); 232 #define BREAKPOINT ::breakpoint() 233 #endif 234 235 // checking for nanness 236 #ifdef SOLARIS 237 #ifdef SPARC 238 inline int g_isnan(float f) { return isnanf(f); } 239 #else 240 // isnanf() broken on Intel Solaris use isnand() 241 inline int g_isnan(float f) { return isnand(f); } 242 #endif 243 inline int g_isnan(double f) { return isnand(f); } 244 #elif LINUX 245 inline int g_isnan(float f) { return isnanf(f); } 246 inline int g_isnan(double f) { return isnan(f); } 247 #else 248 #error "missing platform-specific definition here" 249 #endif 250 251 // GCC 4.3 does not allow 0.0/0.0 to produce a NAN value 252 #if (__GNUC__ == 4) && (__GNUC_MINOR__ > 2) 253 #define CAN_USE_NAN_DEFINE 1 254 #endif 255 256 257 // Checking for finiteness 258 259 inline int g_isfinite(jfloat f) { return finite(f); } 260 inline int g_isfinite(jdouble f) { return finite(f); } 261 262 263 // Wide characters 264 265 inline int wcslen(const jchar* x) { return wcslen((const wchar_t*)x); } 266 267 268 // Portability macros 269 #define PRAGMA_INTERFACE #pragma interface 270 #define PRAGMA_IMPLEMENTATION #pragma implementation 271 #define VALUE_OBJ_CLASS_SPEC 272 273 #if (__GNUC__ == 2) && (__GNUC_MINOR__ < 95) 274 #define TEMPLATE_TABLE_BUG 275 #endif 276 #if (__GNUC__ == 2) && (__GNUC_MINOR__ >= 96) 277 #define CONST_SDM_BUG 278 #endif 279 280 // Formatting. 281 #ifdef _LP64 282 #define FORMAT64_MODIFIER "l" 283 #else // !_LP64 284 #define FORMAT64_MODIFIER "ll" 285 #endif // _LP64 286 287 // HACK: gcc warns about applying offsetof() to non-POD object or calculating 288 // offset directly when base address is NULL. Use 16 to get around the 289 // warning. gcc-3.4 has an option -Wno-invalid-offsetof to suppress 290 // this warning. 291 #define offset_of(klass,field) (size_t)((intx)&(((klass*)16)->field) - 16) 292 293 #ifdef offsetof 294 # undef offsetof 295 #endif 296 #define offsetof(klass,field) offset_of(klass,field) 297 298 #endif // SHARE_VM_UTILITIES_GLOBALDEFINITIONS_GCC_HPP