--- /dev/null Thu Jan 01 00:00:00 1970 +0000
+++ b/src/hotspot/share/jvmci/compilerRuntime.cpp Tue Sep 12 19:03:39 2017 +0200
@@ -0,0 +1,229 @@
+/*
+ * Copyright (c) 2016, Oracle and/or its affiliates. All rights reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
+ * or visit www.oracle.com if you need additional information or have any
+ * questions.
+ */
+
+#include "precompiled.hpp"
+#include "classfile/stringTable.hpp"
+#include "classfile/symbolTable.hpp"
+#include "jvmci/compilerRuntime.hpp"
+#include "runtime/compilationPolicy.hpp"
+#include "runtime/deoptimization.hpp"
+#include "runtime/interfaceSupport.hpp"
+
+// Resolve and allocate String
+JRT_BLOCK_ENTRY(void, CompilerRuntime::resolve_string_by_symbol(JavaThread *thread, void* string_result, const char* name))
+ JRT_BLOCK
+ oop str = *(oop*)string_result; // Is it resolved already?
+ if (str == NULL) { // Do resolution
+ // First 2 bytes of name contains length (number of bytes).
+ int len = build_u2_from((address)name);
+ name += 2;
+ TempNewSymbol sym = SymbolTable::new_symbol(name, len, CHECK);
+ str = StringTable::intern(sym, CHECK);
+ assert(java_lang_String::is_instance(str), "must be string");
+ *(oop*)string_result = str; // Store result
+ }
+ assert(str != NULL, "Should be allocated!");
+ thread->set_vm_result(str);
+ JRT_BLOCK_END
+JRT_END
+
+
+
+Klass* CompilerRuntime::resolve_klass_helper(JavaThread *thread, const char* name, int len, TRAPS) {
+ ResourceMark rm(THREAD);
+ // last java frame on stack (which includes native call frames)
+ RegisterMap cbl_map(thread, false);
+ // Skip stub
+ frame caller_frame = thread->last_frame().sender(&cbl_map);
+ CodeBlob* caller_cb = caller_frame.cb();
+ guarantee(caller_cb != NULL && caller_cb->is_compiled(), "must be called from compiled method");
+ CompiledMethod* caller_nm = caller_cb->as_compiled_method_or_null();
+ methodHandle caller(THREAD, caller_nm->method());
+
+ // Use class loader of aot method.
+ Handle loader(THREAD, caller->method_holder()->class_loader());
+ Handle protection_domain(THREAD, caller->method_holder()->protection_domain());
+
+ // Ignore wrapping L and ;
+ if (name[0] == 'L') {
+ assert(len > 2, "small name %s", name);
+ name++;
+ len -= 2;
+ }
+ TempNewSymbol sym = SymbolTable::new_symbol(name, len, CHECK_NULL);
+ if (sym == NULL) {
+ return NULL;
+ }
+ Klass* k = SystemDictionary::resolve_or_fail(sym, loader, protection_domain, true, CHECK_NULL);
+
+ return k;
+}
+
+// Resolve Klass
+JRT_BLOCK_ENTRY(Klass*, CompilerRuntime::resolve_klass_by_symbol(JavaThread *thread, Klass** klass_result, const char* name))
+ Klass* k = NULL;
+ JRT_BLOCK
+ k = *klass_result; // Is it resolved already?
+ if (k == NULL) { // Do resolution
+ // First 2 bytes of name contains length (number of bytes).
+ int len = build_u2_from((address)name);
+ name += 2;
+ k = CompilerRuntime::resolve_klass_helper(thread, name, len, CHECK_NULL);
+ *klass_result = k; // Store result
+ }
+ JRT_BLOCK_END
+ assert(k != NULL, " Should be loaded!");
+ return k;
+JRT_END
+
+
+Method* CompilerRuntime::resolve_method_helper(Klass* klass, const char* method_name, int method_name_len,
+ const char* signature_name, int signature_name_len) {
+ Method* m = NULL;
+ TempNewSymbol name_symbol = SymbolTable::probe(method_name, method_name_len);
+ TempNewSymbol signature_symbol = SymbolTable::probe(signature_name, signature_name_len);
+ if (name_symbol != NULL && signature_symbol != NULL) {
+ if (name_symbol == vmSymbols::object_initializer_name() ||
+ name_symbol == vmSymbols::class_initializer_name()) {
+ // Never search superclasses for constructors
+ if (klass->is_instance_klass()) {
+ m = InstanceKlass::cast(klass)->find_method(name_symbol, signature_symbol);
+ }
+ } else {
+ m = klass->lookup_method(name_symbol, signature_symbol);
+ if (m == NULL && klass->is_instance_klass()) {
+ m = InstanceKlass::cast(klass)->lookup_method_in_ordered_interfaces(name_symbol, signature_symbol);
+ }
+ }
+ }
+ return m;
+}
+
+JRT_BLOCK_ENTRY(MethodCounters*, CompilerRuntime::resolve_method_by_symbol_and_load_counters(JavaThread *thread, MethodCounters** counters_result, Klass* klass, const char* data))
+ MethodCounters* c = *counters_result; // Is it resolved already?
+ JRT_BLOCK
+ if (c == NULL) { // Do resolution
+ // Get method name and its length
+ int method_name_len = build_u2_from((address)data);
+ data += sizeof(u2);
+ const char* method_name = data;
+ data += method_name_len;
+
+ // Get signature and its length
+ int signature_name_len = build_u2_from((address)data);
+ data += sizeof(u2);
+ const char* signature_name = data;
+
+ assert(klass != NULL, "Klass parameter must not be null");
+ Method* m = resolve_method_helper(klass, method_name, method_name_len, signature_name, signature_name_len);
+ assert(m != NULL, "Method must resolve successfully");
+
+ // Create method counters immediately to avoid check at runtime.
+ c = m->get_method_counters(thread);
+ if (c == NULL) {
+ THROW_MSG_NULL(vmSymbols::java_lang_OutOfMemoryError(), "Cannot allocate method counters");
+ }
+
+ *counters_result = c;
+ }
+ JRT_BLOCK_END
+ return c;
+JRT_END
+
+// Resolve and initialize Klass
+JRT_BLOCK_ENTRY(Klass*, CompilerRuntime::initialize_klass_by_symbol(JavaThread *thread, Klass** klass_result, const char* name))
+ Klass* k = NULL;
+ JRT_BLOCK
+ k = klass_result[0]; // Is it initialized already?
+ if (k == NULL) { // Do initialized
+ k = klass_result[1]; // Is it resolved already?
+ if (k == NULL) { // Do resolution
+ // First 2 bytes of name contains length (number of bytes).
+ int len = build_u2_from((address)name);
+ const char *cname = name + 2;
+ k = CompilerRuntime::resolve_klass_helper(thread, cname, len, CHECK_NULL);
+ klass_result[1] = k; // Store resolved result
+ }
+ Klass* k0 = klass_result[0]; // Is it initialized already?
+ if (k0 == NULL && k != NULL && k->is_instance_klass()) {
+ // Force initialization of instance class
+ InstanceKlass::cast(k)->initialize(CHECK_NULL);
+ // Double-check that it was really initialized,
+ // because we could be doing a recursive call
+ // from inside <clinit>.
+ if (InstanceKlass::cast(k)->is_initialized()) {
+ klass_result[0] = k; // Store initialized result
+ }
+ }
+ }
+ JRT_BLOCK_END
+ assert(k != NULL, " Should be loaded!");
+ return k;
+JRT_END
+
+
+JRT_BLOCK_ENTRY(void, CompilerRuntime::invocation_event(JavaThread *thread, MethodCounters* counters))
+ if (!TieredCompilation) {
+ // Ignore the event if tiered is off
+ return;
+ }
+ JRT_BLOCK
+ methodHandle mh(THREAD, counters->method());
+ RegisterMap map(thread, false);
+
+ // Compute the enclosing method
+ frame fr = thread->last_frame().sender(&map);
+ CompiledMethod* cm = fr.cb()->as_compiled_method_or_null();
+ assert(cm != NULL && cm->is_compiled(), "Sanity check");
+ methodHandle emh(THREAD, cm->method());
+
+ assert(!HAS_PENDING_EXCEPTION, "Should not have any exceptions pending");
+ CompilationPolicy::policy()->event(emh, mh, InvocationEntryBci, InvocationEntryBci, CompLevel_aot, cm, thread);
+ assert(!HAS_PENDING_EXCEPTION, "Event handler should not throw any exceptions");
+ JRT_BLOCK_END
+JRT_END
+
+JRT_BLOCK_ENTRY(void, CompilerRuntime::backedge_event(JavaThread *thread, MethodCounters* counters, int branch_bci, int target_bci))
+ if (!TieredCompilation) {
+ // Ignore the event if tiered is off
+ return;
+ }
+ assert(branch_bci != InvocationEntryBci && target_bci != InvocationEntryBci, "Wrong bci");
+ assert(target_bci <= branch_bci, "Expected a back edge");
+ JRT_BLOCK
+ methodHandle mh(THREAD, counters->method());
+ RegisterMap map(thread, false);
+
+ // Compute the enclosing method
+ frame fr = thread->last_frame().sender(&map);
+ CompiledMethod* cm = fr.cb()->as_compiled_method_or_null();
+ assert(cm != NULL && cm->is_compiled(), "Sanity check");
+ methodHandle emh(THREAD, cm->method());
+ assert(!HAS_PENDING_EXCEPTION, "Should not have any exceptions pending");
+ nmethod* osr_nm = CompilationPolicy::policy()->event(emh, mh, branch_bci, target_bci, CompLevel_aot, cm, thread);
+ assert(!HAS_PENDING_EXCEPTION, "Event handler should not throw any exceptions");
+ if (osr_nm != NULL) {
+ Deoptimization::deoptimize_frame(thread, fr.id());
+ }
+ JRT_BLOCK_END
+JRT_END