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