1 /*
2 * Copyright (c) 2012, 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 #ifndef SHARE_VM_JVMCI_JVMCI_RUNTIME_HPP
25 #define SHARE_VM_JVMCI_JVMCI_RUNTIME_HPP
26
27 #include "interpreter/interpreter.hpp"
28 #include "memory/allocation.hpp"
29 #include "runtime/arguments.hpp"
30 #include "runtime/deoptimization.hpp"
31
32 #define JVMCI_ERROR(...) \
33 { Exceptions::fthrow(THREAD_AND_LOCATION, vmSymbols::jdk_vm_ci_common_JVMCIError(), __VA_ARGS__); return; }
34
35 #define JVMCI_ERROR_(ret, ...) \
36 { Exceptions::fthrow(THREAD_AND_LOCATION, vmSymbols::jdk_vm_ci_common_JVMCIError(), __VA_ARGS__); return ret; }
37
38 #define JVMCI_ERROR_0(...) JVMCI_ERROR_(0, __VA_ARGS__)
39 #define JVMCI_ERROR_NULL(...) JVMCI_ERROR_(NULL, __VA_ARGS__)
40 #define JVMCI_ERROR_OK(...) JVMCI_ERROR_(JVMCIEnv::ok, __VA_ARGS__)
41 #define CHECK_OK CHECK_(JVMCIEnv::ok)
42
43 class ParseClosure : public StackObj {
44 int _lineNo;
45 char* _filename;
46 bool _abort;
47 protected:
48 void abort() { _abort = true; }
49 void warn_and_abort(const char* message) {
50 warn(message);
51 abort();
52 }
53 void warn(const char* message) {
54 warning("Error at line %d while parsing %s: %s", _lineNo, _filename == NULL ? "?" : _filename, message);
55 }
56 public:
57 ParseClosure() : _lineNo(0), _filename(NULL), _abort(false) {}
58 void parse_line(char* line) {
59 _lineNo++;
60 do_line(line);
61 }
62 virtual void do_line(char* line) = 0;
63 int lineNo() { return _lineNo; }
64 bool is_aborted() { return _abort; }
65 void set_filename(char* path) {_filename = path; _lineNo = 0;}
66 };
67
68 class JVMCIRuntime: public AllStatic {
69 private:
70 static jobject _HotSpotJVMCIRuntime_instance;
71 static bool _HotSpotJVMCIRuntime_initialized;
72 static bool _well_known_classes_initialized;
73 static const char* _compiler;
74
75 static int _trivial_prefixes_count;
76 static char** _trivial_prefixes;
77
78 static bool _shutdown_called;
79
80 /**
81 * Instantiates a service object, calls its default constructor and returns it.
82 *
83 * @param name the name of a class implementing jdk.vm.ci.service.Service
84 */
85 static Handle create_Service(const char* name, TRAPS);
86
87 public:
88
89 /**
90 * Parses *.properties files in jre/lib/jvmci/ and adds the properties to plist.
91 */
92 static void init_system_properties(SystemProperty** plist);
93
94 /**
95 * Saves the value of the "jvmci.compiler" system property for processing
96 * when JVMCI is initialized.
97 */
98 static void save_compiler(const char* compiler);
99
100 static bool is_HotSpotJVMCIRuntime_initialized() { return _HotSpotJVMCIRuntime_initialized; }
101
102 /**
103 * Gets the singleton HotSpotJVMCIRuntime instance, initializing it if necessary
104 */
105 static Handle get_HotSpotJVMCIRuntime(TRAPS) {
106 initialize_JVMCI(CHECK_(Handle()));
107 return Handle(JNIHandles::resolve_non_null(_HotSpotJVMCIRuntime_instance));
108 }
109
110 static jobject get_HotSpotJVMCIRuntime_jobject(TRAPS) {
111 initialize_JVMCI(CHECK_NULL);
112 assert(_HotSpotJVMCIRuntime_initialized, "must be");
113 return _HotSpotJVMCIRuntime_instance;
114 }
115
116 static Handle callStatic(const char* className, const char* methodName, const char* returnType, JavaCallArguments* args, TRAPS);
117
118 /**
119 * Trigger initialization of HotSpotJVMCIRuntime through JVMCI.getRuntime()
120 */
121 static void initialize_JVMCI(TRAPS);
122
123 /**
124 * Explicitly initialize HotSpotJVMCIRuntime itself
125 */
126 static void initialize_HotSpotJVMCIRuntime(TRAPS);
127
128 static void initialize_well_known_classes(TRAPS);
129
130 static void metadata_do(void f(Metadata*));
131
132 static void shutdown(TRAPS);
133
134 static bool shutdown_called() {
135 return _shutdown_called;
136 }
137
138 static bool treat_as_trivial(Method* method);
139 static void parse_lines(char* path, ParseClosure* closure, bool warnStatFailure);
140
141 static BasicType kindToBasicType(Handle kind, TRAPS);
142
143 // The following routines are all called from compiled JVMCI code
144
145 static void new_instance(JavaThread* thread, Klass* klass);
146 static void new_array(JavaThread* thread, Klass* klass, jint length);
147 static void new_multi_array(JavaThread* thread, Klass* klass, int rank, jint* dims);
148 static void dynamic_new_array(JavaThread* thread, oopDesc* element_mirror, jint length);
149 static void dynamic_new_instance(JavaThread* thread, oopDesc* type_mirror);
150 static jboolean thread_is_interrupted(JavaThread* thread, oopDesc* obj, jboolean clear_interrupted);
151 static void vm_message(jboolean vmError, jlong format, jlong v1, jlong v2, jlong v3);
152 static jint identity_hash_code(JavaThread* thread, oopDesc* obj);
153 static address exception_handler_for_pc(JavaThread* thread);
154 static void monitorenter(JavaThread* thread, oopDesc* obj, BasicLock* lock);
155 static void monitorexit (JavaThread* thread, oopDesc* obj, BasicLock* lock);
156 static void create_null_exception(JavaThread* thread);
157 static void create_out_of_bounds_exception(JavaThread* thread, jint index);
158 static void vm_error(JavaThread* thread, jlong where, jlong format, jlong value);
159 static oopDesc* load_and_clear_exception(JavaThread* thread);
160 static void log_printf(JavaThread* thread, oopDesc* format, jlong v1, jlong v2, jlong v3);
161 static void log_primitive(JavaThread* thread, jchar typeChar, jlong value, jboolean newline);
162 // Print the passed in object, optionally followed by a newline. If
163 // as_string is true and the object is a java.lang.String then it
164 // printed as a string, otherwise the type of the object is printed
165 // followed by its address.
166 static void log_object(JavaThread* thread, oopDesc* object, bool as_string, bool newline);
167 static void write_barrier_pre(JavaThread* thread, oopDesc* obj);
168 static void write_barrier_post(JavaThread* thread, void* card);
169 static jboolean validate_object(JavaThread* thread, oopDesc* parent, oopDesc* child);
170 static void new_store_pre_barrier(JavaThread* thread);
171
172 // Test only function
173 static int test_deoptimize_call_int(JavaThread* thread, int value);
174 };
175
176 // Tracing macros.
177
178 #define IF_TRACE_jvmci_1 if (!(JVMCITraceLevel >= 1)) ; else
179 #define IF_TRACE_jvmci_2 if (!(JVMCITraceLevel >= 2)) ; else
180 #define IF_TRACE_jvmci_3 if (!(JVMCITraceLevel >= 3)) ; else
181 #define IF_TRACE_jvmci_4 if (!(JVMCITraceLevel >= 4)) ; else
182 #define IF_TRACE_jvmci_5 if (!(JVMCITraceLevel >= 5)) ; else
183
184 #define TRACE_jvmci_1 if (!(JVMCITraceLevel >= 1 && (tty->print("JVMCITrace-1: "), true))) ; else tty->print_cr
185 #define TRACE_jvmci_2 if (!(JVMCITraceLevel >= 2 && (tty->print(" JVMCITrace-2: "), true))) ; else tty->print_cr
186 #define TRACE_jvmci_3 if (!(JVMCITraceLevel >= 3 && (tty->print(" JVMCITrace-3: "), true))) ; else tty->print_cr
187 #define TRACE_jvmci_4 if (!(JVMCITraceLevel >= 4 && (tty->print(" JVMCITrace-4: "), true))) ; else tty->print_cr
188 #define TRACE_jvmci_5 if (!(JVMCITraceLevel >= 5 && (tty->print(" JVMCITrace-5: "), true))) ; else tty->print_cr
189
190 #endif // SHARE_VM_JVMCI_JVMCI_RUNTIME_HPP