truffle: src/share/vm/graal/graalRuntime.cpp annotate

annotate src/share/vm/graal/graalRuntime.cpp @ 21519:cecb4e39521c

Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them

author	Gilles Duboscq <gilles.m.duboscq@oracle.com>
date	Wed, 27 May 2015 17:40:26 +0200
parents	fe4a77bec5b7
children	fad971028755

rev	line source
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1 /*
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	2 * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	4 *
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	5 * This code is free software; you can redistribute it and/or modify it
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	6 * under the terms of the GNU General Public License version 2 only, as
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	7 * published by the Free Software Foundation.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	8 *
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	9 * This code is distributed in the hope that it will be useful, but WITHOUT
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	12 * version 2 for more details (a copy is included in the LICENSE file that
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	13 * accompanied this code).
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	14 *
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	15 * You should have received a copy of the GNU General Public License version
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	16 * 2 along with this work; if not, write to the Free Software Foundation,
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	18 *
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	20 * or visit www.oracle.com if you need additional information or have any
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	21 * questions.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	22 */
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	23
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	24 #include "precompiled.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	25 #include "asm/codeBuffer.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	26 #include "compiler/compileBroker.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	27 #include "compiler/disassembler.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	28 #include "graal/graalRuntime.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	29 #include "graal/graalCompilerToVM.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	30 #include "graal/graalCompiler.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	31 #include "graal/graalJavaAccess.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	32 #include "graal/graalEnv.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	33 #include "memory/oopFactory.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	34 #include "prims/jvm.h"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	35 #include "runtime/biasedLocking.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	36 #include "runtime/interfaceSupport.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	37 #include "runtime/arguments.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	38 #include "runtime/reflection.hpp"
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	39 #include "utilities/debug.hpp"
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	40 #include "utilities/defaultStream.hpp"
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	41
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	42 jobject GraalRuntime::_HotSpotGraalRuntime_instance = NULL;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	43 bool GraalRuntime::_HotSpotGraalRuntime_initialized = false;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	44 bool GraalRuntime::_shutdown_called = false;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	45
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	46 void GraalRuntime::initialize_natives(JNIEnv *env, jclass c2vmClass) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	47 uintptr_t heap_end = (uintptr_t) Universe::heap()->reserved_region().end();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	48 uintptr_t allocation_end = heap_end + ((uintptr_t)16) * 1024 * 1024 * 1024;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	49 AMD64_ONLY(guarantee(heap_end < allocation_end, "heap end too close to end of address space (might lead to erroneous TLAB allocations)"));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	50 NOT_LP64(error("check TLAB allocation code for address space conflicts"));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	51
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	52 ensure_graal_class_loader_is_initialized();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	53
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	54 JavaThread* THREAD = JavaThread::current();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	55 {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	56 ThreadToNativeFromVM trans(THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	57
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	58 ResourceMark rm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	59 HandleMark hm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	60
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	61 graal_compute_offsets();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	62
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	63 // Ensure _non_oop_bits is initialized
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	64 Universe::non_oop_word();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	65
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	66 env->RegisterNatives(c2vmClass, CompilerToVM_methods, CompilerToVM_methods_count());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	67 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	68 if (HAS_PENDING_EXCEPTION) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	69 abort_on_pending_exception(PENDING_EXCEPTION, "Could not register natives");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	70 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	71 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	72
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	73 BufferBlob* GraalRuntime::initialize_buffer_blob() {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	74 JavaThread* THREAD = JavaThread::current();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	75 BufferBlob* buffer_blob = THREAD->get_buffer_blob();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	76 if (buffer_blob == NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	77 buffer_blob = BufferBlob::create("Graal thread-local CodeBuffer", GraalNMethodSizeLimit);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	78 if (buffer_blob != NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	79 THREAD->set_buffer_blob(buffer_blob);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	80 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	81 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	82 return buffer_blob;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	83 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	84
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	85 BasicType GraalRuntime::kindToBasicType(jchar ch) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	86 switch(ch) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	87 case 'z': return T_BOOLEAN;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	88 case 'b': return T_BYTE;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	89 case 's': return T_SHORT;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	90 case 'c': return T_CHAR;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	91 case 'i': return T_INT;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	92 case 'f': return T_FLOAT;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	93 case 'j': return T_LONG;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	94 case 'd': return T_DOUBLE;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	95 case 'a': return T_OBJECT;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	96 case '-': return T_ILLEGAL;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	97 default:
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	98 fatal(err_msg("unexpected Kind: %c", ch));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	99 break;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	100 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	101 return T_ILLEGAL;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	102 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	103
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	104 // Simple helper to see if the caller of a runtime stub which
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	105 // entered the VM has been deoptimized
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	106
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	107 static bool caller_is_deopted() {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	108 JavaThread* thread = JavaThread::current();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	109 RegisterMap reg_map(thread, false);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	110 frame runtime_frame = thread->last_frame();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	111 frame caller_frame = runtime_frame.sender(&reg_map);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	112 assert(caller_frame.is_compiled_frame(), "must be compiled");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	113 return caller_frame.is_deoptimized_frame();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	114 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	115
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	116 // Stress deoptimization
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	117 static void deopt_caller() {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	118 if ( !caller_is_deopted()) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	119 JavaThread* thread = JavaThread::current();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	120 RegisterMap reg_map(thread, false);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	121 frame runtime_frame = thread->last_frame();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	122 frame caller_frame = runtime_frame.sender(&reg_map);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	123 Deoptimization::deoptimize_frame(thread, caller_frame.id(), Deoptimization::Reason_constraint);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	124 assert(caller_is_deopted(), "Must be deoptimized");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	125 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	126 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	127
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	128 JRT_BLOCK_ENTRY(void, GraalRuntime::new_instance(JavaThread* thread, Klass* klass))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	129 JRT_BLOCK;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	130 assert(klass->is_klass(), "not a class");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	131 instanceKlassHandle h(thread, klass);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	132 h->check_valid_for_instantiation(true, CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	133 // make sure klass is initialized
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	134 h->initialize(CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	135 // allocate instance and return via TLS
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	136 oop obj = h->allocate_instance(CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	137 thread->set_vm_result(obj);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	138 JRT_BLOCK_END;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	139
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	140 if (GraalDeferredInitBarriers) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	141 new_store_pre_barrier(thread);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	142 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	143 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	144
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	145 JRT_BLOCK_ENTRY(void, GraalRuntime::new_array(JavaThread* thread, Klass* array_klass, jint length))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	146 JRT_BLOCK;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	147 // Note: no handle for klass needed since they are not used
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	148 // anymore after new_objArray() and no GC can happen before.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	149 // (This may have to change if this code changes!)
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	150 assert(array_klass->is_klass(), "not a class");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	151 oop obj;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	152 if (array_klass->oop_is_typeArray()) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	153 BasicType elt_type = TypeArrayKlass::cast(array_klass)->element_type();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	154 obj = oopFactory::new_typeArray(elt_type, length, CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	155 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	156 Klass* elem_klass = ObjArrayKlass::cast(array_klass)->element_klass();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	157 obj = oopFactory::new_objArray(elem_klass, length, CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	158 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	159 thread->set_vm_result(obj);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	160 // This is pretty rare but this runtime patch is stressful to deoptimization
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	161 // if we deoptimize here so force a deopt to stress the path.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	162 if (DeoptimizeALot) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	163 static int deopts = 0;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	164 // Alternate between deoptimizing and raising an error (which will also cause a deopt)
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	165 if (deopts++ % 2 == 0) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	166 ResourceMark rm(THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	167 THROW(vmSymbols::java_lang_OutOfMemoryError());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	168 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	169 deopt_caller();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	170 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	171 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	172 JRT_BLOCK_END;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	173
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	174 if (GraalDeferredInitBarriers) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	175 new_store_pre_barrier(thread);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	176 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	177 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	178
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	179 void GraalRuntime::new_store_pre_barrier(JavaThread* thread) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	180 // After any safepoint, just before going back to compiled code,
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	181 // we inform the GC that we will be doing initializing writes to
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	182 // this object in the future without emitting card-marks, so
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	183 // GC may take any compensating steps.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	184 // NOTE: Keep this code consistent with GraphKit::store_barrier.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	185
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	186 oop new_obj = thread->vm_result();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	187 if (new_obj == NULL) return;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	188
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	189 assert(Universe::heap()->can_elide_tlab_store_barriers(),
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	190 "compiler must check this first");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	191 // GC may decide to give back a safer copy of new_obj.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	192 new_obj = Universe::heap()->new_store_pre_barrier(thread, new_obj);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	193 thread->set_vm_result(new_obj);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	194 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	195
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	196 JRT_ENTRY(void, GraalRuntime::new_multi_array(JavaThread* thread, Klass* klass, int rank, jint* dims))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	197 assert(klass->is_klass(), "not a class");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	198 assert(rank >= 1, "rank must be nonzero");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	199 oop obj = ArrayKlass::cast(klass)->multi_allocate(rank, dims, CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	200 thread->set_vm_result(obj);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	201 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	202
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	203 JRT_ENTRY(void, GraalRuntime::dynamic_new_array(JavaThread* thread, oopDesc* element_mirror, jint length))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	204 oop obj = Reflection::reflect_new_array(element_mirror, length, CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	205 thread->set_vm_result(obj);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	206 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	207
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	208 JRT_ENTRY(void, GraalRuntime::dynamic_new_instance(JavaThread* thread, oopDesc* type_mirror))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	209 instanceKlassHandle klass(THREAD, java_lang_Class::as_Klass(type_mirror));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	210
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	211 if (klass == NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	212 ResourceMark rm(THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	213 THROW(vmSymbols::java_lang_InstantiationException());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	214 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	215
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	216 // Create new instance (the receiver)
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	217 klass->check_valid_for_instantiation(false, CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	218
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	219 // Make sure klass gets initialized
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	220 klass->initialize(CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	221
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	222 oop obj = klass->allocate_instance(CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	223 thread->set_vm_result(obj);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	224 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	225
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	226 extern void vm_exit(int code);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	227
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	228 // Enter this method from compiled code handler below. This is where we transition
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	229 // to VM mode. This is done as a helper routine so that the method called directly
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	230 // from compiled code does not have to transition to VM. This allows the entry
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	231 // method to see if the nmethod that we have just looked up a handler for has
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	232 // been deoptimized while we were in the vm. This simplifies the assembly code
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	233 // cpu directories.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	234 //
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	235 // We are entering here from exception stub (via the entry method below)
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	236 // If there is a compiled exception handler in this method, we will continue there;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	237 // otherwise we will unwind the stack and continue at the caller of top frame method
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	238 // Note: we enter in Java using a special JRT wrapper. This wrapper allows us to
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	239 // control the area where we can allow a safepoint. After we exit the safepoint area we can
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	240 // check to see if the handler we are going to return is now in a nmethod that has
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	241 // been deoptimized. If that is the case we return the deopt blob
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	242 // unpack_with_exception entry instead. This makes life for the exception blob easier
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	243 // because making that same check and diverting is painful from assembly language.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	244 JRT_ENTRY_NO_ASYNC(static address, exception_handler_for_pc_helper(JavaThread* thread, oopDesc* ex, address pc, nmethod*& nm))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	245 // Reset method handle flag.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	246 thread->set_is_method_handle_return(false);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	247
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	248 Handle exception(thread, ex);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	249 nm = CodeCache::find_nmethod(pc);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	250 assert(nm != NULL, "this is not an nmethod");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	251 // Adjust the pc as needed/
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	252 if (nm->is_deopt_pc(pc)) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	253 RegisterMap map(thread, false);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	254 frame exception_frame = thread->last_frame().sender(&map);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	255 // if the frame isn't deopted then pc must not correspond to the caller of last_frame
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	256 assert(exception_frame.is_deoptimized_frame(), "must be deopted");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	257 pc = exception_frame.pc();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	258 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	259 #ifdef ASSERT
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	260 assert(exception.not_null(), "NULL exceptions should be handled by throw_exception");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	261 assert(exception->is_oop(), "just checking");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	262 // Check that exception is a subclass of Throwable, otherwise we have a VerifyError
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	263 if (!(exception->is_a(SystemDictionary::Throwable_klass()))) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	264 if (ExitVMOnVerifyError) vm_exit(-1);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	265 ShouldNotReachHere();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	266 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	267 #endif
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	268
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	269 // Check the stack guard pages and reenable them if necessary and there is
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	270 // enough space on the stack to do so. Use fast exceptions only if the guard
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	271 // pages are enabled.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	272 bool guard_pages_enabled = thread->stack_yellow_zone_enabled();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	273 if (!guard_pages_enabled) guard_pages_enabled = thread->reguard_stack();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	274
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	275 if (JvmtiExport::can_post_on_exceptions()) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	276 // To ensure correct notification of exception catches and throws
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	277 // we have to deoptimize here. If we attempted to notify the
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	278 // catches and throws during this exception lookup it's possible
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	279 // we could deoptimize on the way out of the VM and end back in
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	280 // the interpreter at the throw site. This would result in double
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	281 // notifications since the interpreter would also notify about
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	282 // these same catches and throws as it unwound the frame.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	283
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	284 RegisterMap reg_map(thread);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	285 frame stub_frame = thread->last_frame();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	286 frame caller_frame = stub_frame.sender(&reg_map);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	287
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	288 // We don't really want to deoptimize the nmethod itself since we
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	289 // can actually continue in the exception handler ourselves but I
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	290 // don't see an easy way to have the desired effect.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	291 Deoptimization::deoptimize_frame(thread, caller_frame.id(), Deoptimization::Reason_constraint);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	292 assert(caller_is_deopted(), "Must be deoptimized");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	293
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	294 return SharedRuntime::deopt_blob()->unpack_with_exception_in_tls();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	295 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	296
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	297 // ExceptionCache is used only for exceptions at call sites and not for implicit exceptions
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	298 if (guard_pages_enabled) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	299 address fast_continuation = nm->handler_for_exception_and_pc(exception, pc);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	300 if (fast_continuation != NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	301 // Set flag if return address is a method handle call site.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	302 thread->set_is_method_handle_return(nm->is_method_handle_return(pc));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	303 return fast_continuation;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	304 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	305 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	306
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	307 // If the stack guard pages are enabled, check whether there is a handler in
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	308 // the current method. Otherwise (guard pages disabled), force an unwind and
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	309 // skip the exception cache update (i.e., just leave continuation==NULL).
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	310 address continuation = NULL;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	311 if (guard_pages_enabled) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	312
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	313 // New exception handling mechanism can support inlined methods
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	314 // with exception handlers since the mappings are from PC to PC
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	315
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	316 // debugging support
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	317 // tracing
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	318 if (TraceExceptions) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	319 ttyLocker ttyl;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	320 ResourceMark rm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	321 tty->print_cr("Exception <%s> (" INTPTR_FORMAT ") thrown in compiled method <%s> at PC " INTPTR_FORMAT " for thread " INTPTR_FORMAT "",
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	322 exception->print_value_string(), p2i((address)exception()), nm->method()->print_value_string(), p2i(pc), p2i(thread));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	323 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	324 // for AbortVMOnException flag
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	325 NOT_PRODUCT(Exceptions::debug_check_abort(exception));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	326
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	327 // Clear out the exception oop and pc since looking up an
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	328 // exception handler can cause class loading, which might throw an
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	329 // exception and those fields are expected to be clear during
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	330 // normal bytecode execution.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	331 thread->clear_exception_oop_and_pc();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	332
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	333 continuation = SharedRuntime::compute_compiled_exc_handler(nm, pc, exception, false, false);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	334 // If an exception was thrown during exception dispatch, the exception oop may have changed
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	335 thread->set_exception_oop(exception());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	336 thread->set_exception_pc(pc);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	337
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	338 // the exception cache is used only by non-implicit exceptions
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	339 if (continuation != NULL && !SharedRuntime::deopt_blob()->contains(continuation)) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	340 nm->add_handler_for_exception_and_pc(exception, pc, continuation);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	341 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	342 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	343
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	344 // Set flag if return address is a method handle call site.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	345 thread->set_is_method_handle_return(nm->is_method_handle_return(pc));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	346
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	347 if (TraceExceptions) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	348 ttyLocker ttyl;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	349 ResourceMark rm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	350 tty->print_cr("Thread " PTR_FORMAT " continuing at PC " PTR_FORMAT " for exception thrown at PC " PTR_FORMAT,
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	351 p2i(thread), p2i(continuation), p2i(pc));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	352 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	353
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	354 return continuation;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	355 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	356
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	357 // Enter this method from compiled code only if there is a Java exception handler
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	358 // in the method handling the exception.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	359 // We are entering here from exception stub. We don't do a normal VM transition here.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	360 // We do it in a helper. This is so we can check to see if the nmethod we have just
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	361 // searched for an exception handler has been deoptimized in the meantime.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	362 address GraalRuntime::exception_handler_for_pc(JavaThread* thread) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	363 oop exception = thread->exception_oop();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	364 address pc = thread->exception_pc();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	365 // Still in Java mode
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	366 DEBUG_ONLY(ResetNoHandleMark rnhm);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	367 nmethod* nm = NULL;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	368 address continuation = NULL;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	369 {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	370 // Enter VM mode by calling the helper
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	371 ResetNoHandleMark rnhm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	372 continuation = exception_handler_for_pc_helper(thread, exception, pc, nm);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	373 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	374 // Back in JAVA, use no oops DON'T safepoint
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	375
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	376 // Now check to see if the nmethod we were called from is now deoptimized.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	377 // If so we must return to the deopt blob and deoptimize the nmethod
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	378 if (nm != NULL && caller_is_deopted()) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	379 continuation = SharedRuntime::deopt_blob()->unpack_with_exception_in_tls();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	380 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	381
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	382 assert(continuation != NULL, "no handler found");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	383 return continuation;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	384 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	385
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	386 JRT_ENTRY(void, GraalRuntime::create_null_exception(JavaThread* thread))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	387 SharedRuntime::throw_and_post_jvmti_exception(thread, vmSymbols::java_lang_NullPointerException());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	388 thread->set_vm_result(PENDING_EXCEPTION);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	389 CLEAR_PENDING_EXCEPTION;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	390 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	391
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	392 JRT_ENTRY(void, GraalRuntime::create_out_of_bounds_exception(JavaThread* thread, jint index))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	393 char message[jintAsStringSize];
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	394 sprintf(message, "%d", index);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	395 SharedRuntime::throw_and_post_jvmti_exception(thread, vmSymbols::java_lang_ArrayIndexOutOfBoundsException(), message);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	396 thread->set_vm_result(PENDING_EXCEPTION);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	397 CLEAR_PENDING_EXCEPTION;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	398 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	399
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	400 JRT_ENTRY_NO_ASYNC(void, GraalRuntime::monitorenter(JavaThread* thread, oopDesc* obj, BasicLock* lock))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	401 if (TraceGraal >= 3) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	402 char type[O_BUFLEN];
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	403 obj->klass()->name()->as_C_string(type, O_BUFLEN);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	404 markOop mark = obj->mark();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	405 tty->print_cr("%s: entered locking slow case with obj=" INTPTR_FORMAT ", type=%s, mark=" INTPTR_FORMAT ", lock=" INTPTR_FORMAT, thread->name(), p2i(obj), type, p2i(mark), p2i(lock));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	406 tty->flush();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	407 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	408 #ifdef ASSERT
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	409 if (PrintBiasedLockingStatistics) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	410 Atomic::inc(BiasedLocking::slow_path_entry_count_addr());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	411 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	412 #endif
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	413 Handle h_obj(thread, obj);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	414 assert(h_obj()->is_oop(), "must be NULL or an object");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	415 if (UseBiasedLocking) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	416 // Retry fast entry if bias is revoked to avoid unnecessary inflation
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	417 ObjectSynchronizer::fast_enter(h_obj, lock, true, CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	418 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	419 if (GraalUseFastLocking) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	420 // When using fast locking, the compiled code has already tried the fast case
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	421 ObjectSynchronizer::slow_enter(h_obj, lock, THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	422 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	423 ObjectSynchronizer::fast_enter(h_obj, lock, false, THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	424 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	425 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	426 if (TraceGraal >= 3) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	427 tty->print_cr("%s: exiting locking slow with obj=" INTPTR_FORMAT, thread->name(), p2i(obj));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	428 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	429 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	430
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	431 JRT_LEAF(void, GraalRuntime::monitorexit(JavaThread* thread, oopDesc* obj, BasicLock* lock))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	432 assert(thread == JavaThread::current(), "threads must correspond");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	433 assert(thread->last_Java_sp(), "last_Java_sp must be set");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	434 // monitorexit is non-blocking (leaf routine) => no exceptions can be thrown
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	435 EXCEPTION_MARK;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	436
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	437 #ifdef DEBUG
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	438 if (!obj->is_oop()) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	439 ResetNoHandleMark rhm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	440 nmethod* method = thread->last_frame().cb()->as_nmethod_or_null();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	441 if (method != NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	442 tty->print_cr("ERROR in monitorexit in method %s wrong obj " INTPTR_FORMAT, method->name(), p2i(obj));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	443 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	444 thread->print_stack_on(tty);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	445 assert(false, "invalid lock object pointer dected");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	446 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	447 #endif
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	448
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	449 if (GraalUseFastLocking) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	450 // When using fast locking, the compiled code has already tried the fast case
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	451 ObjectSynchronizer::slow_exit(obj, lock, THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	452 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	453 ObjectSynchronizer::fast_exit(obj, lock, THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	454 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	455 if (TraceGraal >= 3) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	456 char type[O_BUFLEN];
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	457 obj->klass()->name()->as_C_string(type, O_BUFLEN);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	458 tty->print_cr("%s: exited locking slow case with obj=" INTPTR_FORMAT ", type=%s, mark=" INTPTR_FORMAT ", lock=" INTPTR_FORMAT, thread->name(), p2i(obj), type, p2i(obj->mark()), p2i(lock));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	459 tty->flush();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	460 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	461 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	462
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	463 JRT_LEAF(void, GraalRuntime::log_object(JavaThread* thread, oopDesc* obj, jint flags))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	464 bool string = mask_bits_are_true(flags, LOG_OBJECT_STRING);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	465 bool addr = mask_bits_are_true(flags, LOG_OBJECT_ADDRESS);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	466 bool newline = mask_bits_are_true(flags, LOG_OBJECT_NEWLINE);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	467 if (!string) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	468 if (!addr && obj->is_oop_or_null(true)) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	469 char buf[O_BUFLEN];
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	470 tty->print("%s@" INTPTR_FORMAT, obj->klass()->name()->as_C_string(buf, O_BUFLEN), p2i(obj));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	471 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	472 tty->print(INTPTR_FORMAT, p2i(obj));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	473 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	474 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	475 ResourceMark rm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	476 assert(obj != NULL && java_lang_String::is_instance(obj), "must be");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	477 char *buf = java_lang_String::as_utf8_string(obj);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	478 tty->print_raw(buf);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	479 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	480 if (newline) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	481 tty->cr();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	482 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	483 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	484
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	485 JRT_LEAF(void, GraalRuntime::write_barrier_pre(JavaThread* thread, oopDesc* obj))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	486 thread->satb_mark_queue().enqueue(obj);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	487 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	488
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	489 JRT_LEAF(void, GraalRuntime::write_barrier_post(JavaThread* thread, void* card_addr))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	490 thread->dirty_card_queue().enqueue(card_addr);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	491 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	492
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	493 JRT_LEAF(jboolean, GraalRuntime::validate_object(JavaThread* thread, oopDesc* parent, oopDesc* child))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	494 bool ret = true;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	495 if(!Universe::heap()->is_in_closed_subset(parent)) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	496 tty->print_cr("Parent Object "INTPTR_FORMAT" not in heap", p2i(parent));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	497 parent->print();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	498 ret=false;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	499 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	500 if(!Universe::heap()->is_in_closed_subset(child)) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	501 tty->print_cr("Child Object "INTPTR_FORMAT" not in heap", p2i(child));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	502 child->print();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	503 ret=false;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	504 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	505 return (jint)ret;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	506 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	507
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	508 JRT_ENTRY(void, GraalRuntime::vm_error(JavaThread* thread, jlong where, jlong format, jlong value))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	509 ResourceMark rm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	510 const char error_msg = where == 0L ? "<internal Graal error>" : (char) (address) where;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	511 char *detail_msg = NULL;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	512 if (format != 0L) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	513 const char* buf = (char*) (address) format;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	514 size_t detail_msg_length = strlen(buf) * 2;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	515 detail_msg = (char *) NEW_RESOURCE_ARRAY(u_char, detail_msg_length);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	516 jio_snprintf(detail_msg, detail_msg_length, buf, value);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	517 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	518 report_vm_error(__FILE__, __LINE__, error_msg, detail_msg);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	519 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	520
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	521 JRT_LEAF(oopDesc, GraalRuntime::load_and_clear_exception(JavaThread thread))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	522 oop exception = thread->exception_oop();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	523 assert(exception != NULL, "npe");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	524 thread->set_exception_oop(NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	525 thread->set_exception_pc(0);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	526 return exception;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	527 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	528
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	529 JRT_LEAF(void, GraalRuntime::log_printf(JavaThread* thread, oopDesc* format, jlong v1, jlong v2, jlong v3))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	530 ResourceMark rm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	531 assert(format != NULL && java_lang_String::is_instance(format), "must be");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	532 char *buf = java_lang_String::as_utf8_string(format);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	533 tty->print(buf, v1, v2, v3);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	534 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	535
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	536 static void decipher(jlong v, bool ignoreZero) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	537 if (v != 0 \|\| !ignoreZero) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	538 void* p = (void *)(address) v;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	539 CodeBlob* cb = CodeCache::find_blob(p);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	540 if (cb) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	541 if (cb->is_nmethod()) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	542 char buf[O_BUFLEN];
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	543 tty->print("%s [" INTPTR_FORMAT "+" JLONG_FORMAT "]", cb->as_nmethod_or_null()->method()->name_and_sig_as_C_string(buf, O_BUFLEN), p2i(cb->code_begin()), (jlong)((address)v - cb->code_begin()));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	544 return;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	545 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	546 cb->print_value_on(tty);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	547 return;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	548 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	549 if (Universe::heap()->is_in(p)) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	550 oop obj = oop(p);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	551 obj->print_value_on(tty);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	552 return;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	553 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	554 tty->print(INTPTR_FORMAT " [long: " JLONG_FORMAT ", double %lf, char %c]",p2i((void *)v), (jlong)v, (jdouble)v, (char)v);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	555 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	556 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	557
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	558 JRT_LEAF(void, GraalRuntime::vm_message(jboolean vmError, jlong format, jlong v1, jlong v2, jlong v3))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	559 ResourceMark rm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	560 char buf = (char) (address) format;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	561 if (vmError) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	562 if (buf != NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	563 fatal(err_msg(buf, v1, v2, v3));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	564 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	565 fatal("<anonymous error>");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	566 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	567 } else if (buf != NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	568 tty->print(buf, v1, v2, v3);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	569 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	570 assert(v2 == 0, "v2 != 0");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	571 assert(v3 == 0, "v3 != 0");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	572 decipher(v1, false);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	573 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	574 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	575
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	576 JRT_LEAF(void, GraalRuntime::log_primitive(JavaThread* thread, jchar typeChar, jlong value, jboolean newline))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	577 union {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	578 jlong l;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	579 jdouble d;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	580 jfloat f;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	581 } uu;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	582 uu.l = value;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	583 switch (typeChar) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	584 case 'z': tty->print(value == 0 ? "false" : "true"); break;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	585 case 'b': tty->print("%d", (jbyte) value); break;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	586 case 'c': tty->print("%c", (jchar) value); break;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	587 case 's': tty->print("%d", (jshort) value); break;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	588 case 'i': tty->print("%d", (jint) value); break;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	589 case 'f': tty->print("%f", uu.f); break;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	590 case 'j': tty->print(JLONG_FORMAT, value); break;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	591 case 'd': tty->print("%lf", uu.d); break;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	592 default: assert(false, "unknown typeChar"); break;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	593 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	594 if (newline) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	595 tty->cr();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	596 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	597 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	598
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	599 JRT_ENTRY(jint, GraalRuntime::identity_hash_code(JavaThread* thread, oopDesc* obj))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	600 return (jint) obj->identity_hash();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	601 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	602
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	603 JRT_ENTRY(jboolean, GraalRuntime::thread_is_interrupted(JavaThread* thread, oopDesc* receiver, jboolean clear_interrupted))
21207 93dc70e47fb0 documented why THREAD_IS_INTERRUPTED foreign call is NOT_LEAF Doug Simon <doug.simon@oracle.com> parents: 21123 diff changeset	604 // Ensure that the C++ Thread and OSThread structures aren't freed before we operate.
93dc70e47fb0 documented why THREAD_IS_INTERRUPTED foreign call is NOT_LEAF Doug Simon <doug.simon@oracle.com> parents: 21123 diff changeset	605 // This locking requires thread_in_vm which is why this method cannot be JRT_LEAF.
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	606 Handle receiverHandle(thread, receiver);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	607 MutexLockerEx ml(thread->threadObj() == (void*)receiver ? NULL : Threads_lock);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	608 JavaThread* receiverThread = java_lang_Thread::thread(receiverHandle());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	609 if (receiverThread == NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	610 // The other thread may exit during this process, which is ok so return false.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	611 return JNI_FALSE;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	612 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	613 return (jint) Thread::is_interrupted(receiverThread, clear_interrupted != 0);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	614 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	615 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	616
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	617 JRT_ENTRY(jint, GraalRuntime::test_deoptimize_call_int(JavaThread* thread, int value))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	618 deopt_caller();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	619 return value;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	620 JRT_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	621
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	622 // private static void Factory.init()
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	623 JVM_ENTRY(void, JVM_InitGraalClassLoader(JNIEnv *env, jclass c, jobject loader_handle))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	624 SystemDictionary::init_graal_loader(JNIHandles::resolve(loader_handle));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	625 SystemDictionary::WKID scan = SystemDictionary::FIRST_GRAAL_WKID;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	626 SystemDictionary::initialize_wk_klasses_through(SystemDictionary::LAST_GRAAL_WKID, scan, CHECK);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	627 JVM_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	628
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	629 // boolean com.oracle.graal.hotspot.HotSpotOptions.isCITimingEnabled()
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	630 JVM_ENTRY(jboolean, JVM_IsCITimingEnabled(JNIEnv *env, jclass c))
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	631 return CITime \|\| CITimeEach;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	632 JVM_END
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	633
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	634 // private static GraalRuntime Graal.initializeRuntime()
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	635 JVM_ENTRY(jobject, JVM_GetGraalRuntime(JNIEnv *env, jclass c))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	636 GraalRuntime::initialize_HotSpotGraalRuntime();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	637 return GraalRuntime::get_HotSpotGraalRuntime_jobject();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	638 JVM_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	639
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	640 // private static String[] Services.getServiceImpls(Class service)
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	641 JVM_ENTRY(jobject, JVM_GetGraalServiceImpls(JNIEnv *env, jclass c, jclass serviceClass))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	642 HandleMark hm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	643 ResourceMark rm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	644 KlassHandle serviceKlass(THREAD, java_lang_Class::as_Klass(JNIHandles::resolve_non_null(serviceClass)));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	645 return JNIHandles::make_local(THREAD, GraalRuntime::get_service_impls(serviceKlass, THREAD)());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	646 JVM_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	647
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	648 // private static TruffleRuntime Truffle.createRuntime()
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	649 JVM_ENTRY(jobject, JVM_CreateTruffleRuntime(JNIEnv *env, jclass c))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	650 GraalRuntime::ensure_graal_class_loader_is_initialized();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	651 TempNewSymbol name = SymbolTable::new_symbol("com/oracle/graal/truffle/hotspot/HotSpotTruffleRuntime", CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	652 KlassHandle klass = GraalRuntime::resolve_or_fail(name, CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	653
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	654 TempNewSymbol makeInstance = SymbolTable::new_symbol("makeInstance", CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	655 TempNewSymbol sig = SymbolTable::new_symbol("()Lcom/oracle/truffle/api/TruffleRuntime;", CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	656 JavaValue result(T_OBJECT);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	657 JavaCalls::call_static(&result, klass, makeInstance, sig, CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	658 return JNIHandles::make_local(THREAD, (oop) result.get_jobject());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	659 JVM_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	660
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	661 // private static NativeFunctionInterfaceRuntime.createInterface()
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	662 JVM_ENTRY(jobject, JVM_CreateNativeFunctionInterface(JNIEnv *env, jclass c))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	663 GraalRuntime::ensure_graal_class_loader_is_initialized();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	664 TempNewSymbol name = SymbolTable::new_symbol("com/oracle/graal/truffle/hotspot/HotSpotTruffleRuntime", CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	665 KlassHandle klass = GraalRuntime::resolve_or_fail(name, CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	666
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	667 TempNewSymbol makeInstance = SymbolTable::new_symbol("createNativeFunctionInterface", CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	668 TempNewSymbol sig = SymbolTable::new_symbol("()Lcom/oracle/nfi/api/NativeFunctionInterface;", CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	669 JavaValue result(T_OBJECT);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	670 JavaCalls::call_static(&result, klass, makeInstance, sig, CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	671 return JNIHandles::make_local(THREAD, (oop) result.get_jobject());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	672 JVM_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	673
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	674 Handle GraalRuntime::callInitializer(const char* className, const char* methodName, const char* returnType) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	675 guarantee(!_HotSpotGraalRuntime_initialized, "cannot reinitialize HotSpotGraalRuntime");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	676 Thread* THREAD = Thread::current();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	677
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	678 TempNewSymbol name = SymbolTable::new_symbol(className, CHECK_ABORT_(Handle()));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	679 KlassHandle klass = load_required_class(name);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	680 TempNewSymbol runtime = SymbolTable::new_symbol(methodName, CHECK_ABORT_(Handle()));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	681 TempNewSymbol sig = SymbolTable::new_symbol(returnType, CHECK_ABORT_(Handle()));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	682 JavaValue result(T_OBJECT);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	683 JavaCalls::call_static(&result, klass, runtime, sig, CHECK_ABORT_(Handle()));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	684 return Handle((oop)result.get_jobject());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	685 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	686
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	687 void GraalRuntime::initialize_HotSpotGraalRuntime() {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	688 if (JNIHandles::resolve(_HotSpotGraalRuntime_instance) == NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	689 #ifdef ASSERT
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	690 // This should only be called in the context of the Graal class being initialized
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	691 Thread* THREAD = Thread::current();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	692 TempNewSymbol name = SymbolTable::new_symbol("com/oracle/graal/api/runtime/Graal", CHECK_ABORT);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	693 instanceKlassHandle klass = InstanceKlass::cast(load_required_class(name));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	694 assert(klass->is_being_initialized() && klass->is_reentrant_initialization(THREAD),
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	695 "HotSpotGraalRuntime initialization should only be triggered through Graal initialization");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	696 #endif
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	697
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	698 Handle result = callInitializer("com/oracle/graal/hotspot/HotSpotGraalRuntime", "runtime",
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	699 "()Lcom/oracle/graal/hotspot/HotSpotGraalRuntime;");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	700 _HotSpotGraalRuntime_initialized = true;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	701 _HotSpotGraalRuntime_instance = JNIHandles::make_global(result());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	702 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	703 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	704
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	705 void GraalRuntime::initialize_Graal() {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	706 if (JNIHandles::resolve(_HotSpotGraalRuntime_instance) == NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	707 callInitializer("com/oracle/graal/api/runtime/Graal", "getRuntime", "()Lcom/oracle/graal/api/runtime/GraalRuntime;");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	708 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	709 assert(_HotSpotGraalRuntime_initialized == true, "what?");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	710 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	711
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	712 // private static void CompilerToVMImpl.init()
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	713 JVM_ENTRY(void, JVM_InitializeGraalNatives(JNIEnv *env, jclass c2vmClass))
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	714 GraalRuntime::initialize_natives(env, c2vmClass);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	715 JVM_END
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	716
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	717 void GraalRuntime::ensure_graal_class_loader_is_initialized() {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	718 // This initialization code is guarded by a static pointer to the Factory class.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	719 // Once it is non-null, the Graal class loader and well known Graal classes are
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	720 // guaranteed to have been initialized. By going through the static
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	721 // initializer of Factory, we can rely on class initialization semantics to
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	722 // synchronize threads racing to do the initialization.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	723 static Klass* _FactoryKlass = NULL;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	724 if (_FactoryKlass == NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	725 Thread* THREAD = Thread::current();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	726 TempNewSymbol name = SymbolTable::new_symbol("com/oracle/graal/hotspot/loader/Factory", CHECK_ABORT);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	727 KlassHandle klass = SystemDictionary::resolve_or_fail(name, true, THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	728 if (HAS_PENDING_EXCEPTION) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	729 static volatile int seen_error = 0;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	730 if (!seen_error && Atomic::cmpxchg(1, &seen_error, 0) == 0) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	731 // Only report the failure on the first thread that hits it
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	732 abort_on_pending_exception(PENDING_EXCEPTION, "Graal classes are not available");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	733 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	734 CLEAR_PENDING_EXCEPTION;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	735 // Give first thread time to report the error.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	736 os::sleep(THREAD, 100, false);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	737 vm_abort(false);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	738 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	739 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	740
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	741 // We cannot use graalJavaAccess for this because we are currently in the
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	742 // process of initializing that mechanism.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	743 TempNewSymbol field_name = SymbolTable::new_symbol("useGraalClassLoader", CHECK_ABORT);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	744 fieldDescriptor field_desc;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	745 if (klass->find_field(field_name, vmSymbols::bool_signature(), &field_desc) == NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	746 ResourceMark rm;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	747 fatal(err_msg("Invalid layout of %s at %s", field_name->as_C_string(), klass->external_name()));
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	748 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	749
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	750 InstanceKlass* ik = InstanceKlass::cast(klass());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	751 address addr = ik->static_field_addr(field_desc.offset() - InstanceMirrorKlass::offset_of_static_fields());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	752 ((jboolean ) addr) = (jboolean) UseGraalClassLoader;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	753 klass->initialize(CHECK_ABORT);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	754 _FactoryKlass = klass();
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	755 assert(!UseGraalClassLoader \|\| SystemDictionary::graal_loader() != NULL, "Graal classloader should have been initialized");
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	756 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	757 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	758
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	759 OptionsValueTable* GraalRuntime::parse_arguments() {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	760 OptionsTable* table = OptionsTable::load_options();
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	761 if (table == NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	762 return NULL;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	763 }
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	764
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	765 OptionsValueTable* options = new OptionsValueTable(table);
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	766
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	767 // Process option overrides from graal.options first
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	768 parse_graal_options_file(options);
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	769
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	770 // Now process options on the command line
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	771 int numOptions = Arguments::num_graal_args();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	772 for (int i = 0; i < numOptions; i++) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	773 char* arg = Arguments::graal_args_array()[i];
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	774 if (!parse_argument(options, arg)) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	775 delete options;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	776 return NULL;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	777 }
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	778 }
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	779 return options;
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	780 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	781
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	782 void not_found(OptionsTable* table, const char* argname, size_t namelen) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	783 jio_fprintf(defaultStream::error_stream(),"Unrecognized VM option '%.*s'\n", namelen, argname);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	784 OptionDesc* fuzzy_matched = table->fuzzy_match(argname, strlen(argname));
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	785 if (fuzzy_matched != NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	786 jio_fprintf(defaultStream::error_stream(),
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	787 "Did you mean '%s%s%s'?\n",
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	788 (fuzzy_matched->type == _boolean) ? "(+/-)" : "",
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	789 fuzzy_matched->name,
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	790 (fuzzy_matched->type == _boolean) ? "" : "=<value>");
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	791 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	792 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	793
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	794 bool GraalRuntime::parse_argument(OptionsValueTable* options, const char* arg) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	795 OptionsTable* table = options->options_table();
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	796 char first = arg[0];
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	797 const char* name;
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	798 size_t name_len;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	799 if (first == '+' \|\| first == '-') {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	800 name = arg + 1;
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	801 OptionDesc* optionDesc = table->get(name);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	802 if (optionDesc == NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	803 not_found(table, name, strlen(name));
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	804 return false;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	805 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	806 if (optionDesc->type != _boolean) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	807 jio_fprintf(defaultStream::error_stream(), "Unexpected +/- setting in VM option '%s'\n", name);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	808 return false;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	809 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	810 OptionValue value;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	811 value.desc = *optionDesc;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	812 value.boolean_value = first == '+';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	813 options->put(value);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	814 return true;
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	815 } else {
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	816 const char* sep = strchr(arg, '=');
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	817 name = arg;
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	818 const char* value = NULL;
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	819 if (sep != NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	820 name_len = sep - name;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	821 value = sep + 1;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	822 } else {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	823 name_len = strlen(name);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	824 }
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	825 OptionDesc* optionDesc = table->get(name, name_len);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	826 if (optionDesc == NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	827 not_found(table, name, name_len);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	828 return false;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	829 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	830 if (optionDesc->type == _boolean) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	831 jio_fprintf(defaultStream::error_stream(), "Missing +/- setting for VM option '%s'\n", name);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	832 return false;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	833 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	834 if (value == NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	835 jio_fprintf(defaultStream::error_stream(), "Must use '-G:%.s=<value>' format for %.s option", name_len, name, name_len, name);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	836 return false;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	837 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	838 OptionValue optionValue;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	839 optionValue.desc = *optionDesc;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	840 char* check;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	841 errno = 0;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	842 switch(optionDesc->type) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	843 case _int: {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	844 long int int_value = ::strtol(value, &check, 10);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	845 if (*check != '\0' \|\| errno == ERANGE \|\| int_value > max_jint \|\| int_value < min_jint) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	846 jio_fprintf(defaultStream::error_stream(), "Expected int value for VM option '%s'\n", name);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	847 return false;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	848 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	849 optionValue.int_value = int_value;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	850 break;
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	851 }
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	852 case _long: {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	853 long long int long_value = ::strtoll(value, &check, 10);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	854 if (*check != '\0' \|\| errno == ERANGE \|\| long_value > max_jlong \|\| long_value < min_jlong) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	855 jio_fprintf(defaultStream::error_stream(), "Expected long value for VM option '%s'\n", name);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	856 return false;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	857 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	858 optionValue.long_value = long_value;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	859 break;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	860 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	861 case _float: {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	862 optionValue.float_value = ::strtof(value, &check);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	863 if (*check != '\0' \|\| errno == ERANGE) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	864 jio_fprintf(defaultStream::error_stream(), "Expected float value for VM option '%s'\n", name);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	865 return false;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	866 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	867 break;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	868 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	869 case _double: {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	870 optionValue.double_value = ::strtod(value, &check);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	871 if (*check != '\0' \|\| errno == ERANGE) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	872 jio_fprintf(defaultStream::error_stream(), "Expected double value for VM option '%s'\n", name);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	873 return false;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	874 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	875 break;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	876 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	877 case _string: {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	878 char* copy = NEW_C_HEAP_ARRAY(char, strlen(value) + 1, mtCompiler);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	879 strcpy(copy, value);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	880 optionValue.string_value = copy;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	881 break;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	882 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	883 default:
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	884 ShouldNotReachHere();
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	885 }
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	886 options->put(optionValue);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	887 return true;
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	888 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	889 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	890
21516 fe4a77bec5b7 Use GraalRuntime::parse_lines in GraalRuntime::parse_graal_options_file Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21515 diff changeset	891 class GraalOptionParseClosure : public ParseClosure {
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	892 OptionsValueTable* _options;
21516 fe4a77bec5b7 Use GraalRuntime::parse_lines in GraalRuntime::parse_graal_options_file Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21515 diff changeset	893 public:
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	894 GraalOptionParseClosure(OptionsValueTable* options) : _options(options) {}
21516 fe4a77bec5b7 Use GraalRuntime::parse_lines in GraalRuntime::parse_graal_options_file Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21515 diff changeset	895 void do_line(char* line) {
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	896 if (!GraalRuntime::parse_argument(_options, line)) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	897 warn("There was an error parsing an argument. Skipping it.");
21516 fe4a77bec5b7 Use GraalRuntime::parse_lines in GraalRuntime::parse_graal_options_file Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21515 diff changeset	898 }
fe4a77bec5b7 Use GraalRuntime::parse_lines in GraalRuntime::parse_graal_options_file Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21515 diff changeset	899 }
fe4a77bec5b7 Use GraalRuntime::parse_lines in GraalRuntime::parse_graal_options_file Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21515 diff changeset	900 };
fe4a77bec5b7 Use GraalRuntime::parse_lines in GraalRuntime::parse_graal_options_file Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21515 diff changeset	901
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	902 void GraalRuntime::parse_graal_options_file(OptionsValueTable* options) {
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	903 const char* home = Arguments::get_java_home();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	904 size_t path_len = strlen(home) + strlen("/lib/graal.options") + 1;
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	905 char path[JVM_MAXPATHLEN];
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	906 char sep = os::file_separator()[0];
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	907 jio_snprintf(path, JVM_MAXPATHLEN, "%s%clib%cgraal.options", home, sep, sep);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	908 GraalOptionParseClosure closure(options);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	909 parse_lines(path, &closure, false);
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	910 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	911
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	912 #define CHECK_WARN_ABORT_(message) THREAD); \
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	913 if (HAS_PENDING_EXCEPTION) { \
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	914 warning(message); \
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	915 char buf[512]; \
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	916 jio_snprintf(buf, 512, "Uncaught exception at %s:%d", __FILE__, __LINE__); \
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	917 GraalRuntime::abort_on_pending_exception(PENDING_EXCEPTION, buf); \
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	918 return; \
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	919 } \
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	920 (void)(0
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	921
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	922 class SetOptionClosure : public ValueClosure<OptionValue> {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	923 Thread* _thread;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	924 public:
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	925 SetOptionClosure(TRAPS) : _thread(THREAD) {}
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	926 void do_value(OptionValue* optionValue) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	927 TRAPS = _thread;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	928 const char* declaringClass = optionValue->desc.declaringClass;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	929 if (declaringClass == NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	930 // skip PrintFlags pseudo-option
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	931 return;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	932 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	933 const char* fieldName = optionValue->desc.name;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	934 const char* fieldClass = optionValue->desc.fieldClass;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	935
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	936 size_t fieldSigLen = 2 + strlen(fieldClass);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	937 char* fieldSig = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, fieldSigLen + 1);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	938 jio_snprintf(fieldSig, fieldSigLen + 1, "L%s;", fieldClass);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	939 for (size_t i = 0; i < fieldSigLen; ++i) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	940 if (fieldSig[i] == '.') {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	941 fieldSig[i] = '/';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	942 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	943 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	944 fieldSig[fieldSigLen] = '\0';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	945 size_t declaringClassLen = strlen(declaringClass);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	946 char* declaringClassBinary = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, declaringClassLen + 1);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	947 for (size_t i = 0; i < declaringClassLen; ++i) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	948 if (declaringClass[i] == '.') {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	949 declaringClassBinary[i] = '/';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	950 } else {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	951 declaringClassBinary[i] = declaringClass[i];
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	952 }
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	953 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	954 declaringClassBinary[declaringClassLen] = '\0';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	955
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	956 TempNewSymbol name = SymbolTable::new_symbol(declaringClassBinary, CHECK_WARN_ABORT_("Declaring class could not be found"));
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	957 Klass* klass = GraalRuntime::resolve_or_null(name, CHECK_WARN_ABORT_("Declaring class could not be resolved"));
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	958
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	959 if (klass == NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	960 warning("Declaring class for option %s could not be resolved", declaringClass);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	961 abort();
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	962 return;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	963 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	964
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	965 // The class has been loaded so the field and signature should already be in the symbol
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	966 // table. If they're not there, the field doesn't exist.
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	967 TempNewSymbol fieldname = SymbolTable::probe(fieldName, (int)strlen(fieldName));
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	968 TempNewSymbol signame = SymbolTable::probe(fieldSig, (int)fieldSigLen);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	969 if (fieldname == NULL \|\| signame == NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	970 warning("Symbols for field for option %s not found (in %s)", fieldName, declaringClass);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	971 abort();
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	972 return;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	973 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	974 // Make sure class is initialized before handing id's out to fields
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	975 klass->initialize(CHECK_WARN_ABORT_("Error while initializing declaring class for option"));
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	976
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	977 fieldDescriptor fd;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	978 if (!InstanceKlass::cast(klass)->find_field(fieldname, signame, true, &fd)) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	979 warning("Field for option %s not found (in %s)", fieldName, declaringClass);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	980 abort();
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	981 return;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	982 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	983 oop value;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	984 switch(optionValue->desc.type) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	985 case _boolean: {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	986 jvalue jv;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	987 jv.z = optionValue->boolean_value;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	988 value = java_lang_boxing_object::create(T_BOOLEAN, &jv, THREAD);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	989 break;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	990 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	991 case _int: {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	992 jvalue jv;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	993 jv.i = optionValue->int_value;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	994 value = java_lang_boxing_object::create(T_INT, &jv, THREAD);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	995 break;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	996 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	997 case _long: {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	998 jvalue jv;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	999 jv.j = optionValue->long_value;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1000 value = java_lang_boxing_object::create(T_LONG, &jv, THREAD);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1001 break;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1002 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1003 case _float: {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1004 jvalue jv;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1005 jv.f = optionValue->float_value;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1006 value = java_lang_boxing_object::create(T_FLOAT, &jv, THREAD);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1007 break;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1008 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1009 case _double: {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1010 jvalue jv;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1011 jv.d = optionValue->double_value;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1012 value = java_lang_boxing_object::create(T_DOUBLE, &jv, THREAD);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1013 break;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1014 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1015 case _string:
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1016 value = java_lang_String::create_from_str(optionValue->string_value, THREAD)();
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1017 break;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1018 default:
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1019 ShouldNotReachHere();
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1020 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1021
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1022 oop optionValueOop = klass->java_mirror()->obj_field(fd.offset());
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1023
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1024 if (optionValueOop == NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1025 warning("Option field was null, can not set %s", fieldName);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1026 abort();
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1027 return;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1028 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1029
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1030 if (!InstanceKlass::cast(optionValueOop->klass())->find_field(vmSymbols::value_name(), vmSymbols::object_signature(), false, &fd)) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1031 warning("'Object value' field not found in option class %s, can not set option %s", fieldClass, fieldName);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1032 abort();
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1033 return;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1034 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1035
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1036 optionValueOop->obj_field_put(fd.offset(), value);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1037 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1038 };
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1039
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1040 void GraalRuntime::set_options(OptionsValueTable* options, TRAPS) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1041 ensure_graal_class_loader_is_initialized();
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1042 {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1043 ResourceMark rm;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1044 SetOptionClosure closure(THREAD);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1045 options->for_each(&closure);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1046 if (closure.is_aborted()) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1047 vm_abort(false);
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1048 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1049 }
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1050 OptionValue* printFlags = options->get(PRINT_FLAGS_ARG);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1051 if (printFlags != NULL && printFlags->boolean_value) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1052 print_flags_helper(CHECK_ABORT);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1053 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1054 }
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1055
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1056 void GraalRuntime::print_flags_helper(TRAPS) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1057 // TODO(gd) write this in C++?
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1058 HandleMark hm(THREAD);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1059 TempNewSymbol name = SymbolTable::new_symbol("com/oracle/graal/hotspot/HotSpotOptions", CHECK_ABORT);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1060 KlassHandle hotSpotOptionsClass = load_required_class(name);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1061 TempNewSymbol setOption = SymbolTable::new_symbol("printFlags", CHECK);
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1062 JavaValue result(T_VOID);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1063 JavaCallArguments args;
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1064 JavaCalls::call_static(&result, hotSpotOptionsClass, setOption, vmSymbols::void_method_signature(), &args, CHECK);
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1065 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1066
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1067 Handle GraalRuntime::create_Service(const char* name, TRAPS) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1068 TempNewSymbol kname = SymbolTable::new_symbol(name, CHECK_NH);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1069 Klass* k = resolve_or_fail(kname, CHECK_NH);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1070 instanceKlassHandle klass(THREAD, k);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1071 klass->initialize(CHECK_NH);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1072 klass->check_valid_for_instantiation(true, CHECK_NH);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1073 JavaValue result(T_VOID);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1074 instanceHandle service = klass->allocate_instance_handle(CHECK_NH);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1075 JavaCalls::call_special(&result, service, klass, vmSymbols::object_initializer_name(), vmSymbols::void_method_signature(), THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1076 return service;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1077 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1078
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1079 void GraalRuntime::shutdown() {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1080 if (_HotSpotGraalRuntime_instance != NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1081 _shutdown_called = true;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1082 JavaThread* THREAD = JavaThread::current();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1083 HandleMark hm(THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1084 TempNewSymbol name = SymbolTable::new_symbol("com/oracle/graal/hotspot/HotSpotGraalRuntime", CHECK_ABORT);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1085 KlassHandle klass = load_required_class(name);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1086 JavaValue result(T_VOID);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1087 JavaCallArguments args;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1088 args.push_oop(get_HotSpotGraalRuntime());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1089 JavaCalls::call_special(&result, klass, vmSymbols::shutdown_method_name(), vmSymbols::void_method_signature(), &args, CHECK_ABORT);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1090
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1091 JNIHandles::destroy_global(_HotSpotGraalRuntime_instance);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1092 _HotSpotGraalRuntime_instance = NULL;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1093 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1094 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1095
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1096 void GraalRuntime::call_printStackTrace(Handle exception, Thread* thread) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1097 assert(exception->is_a(SystemDictionary::Throwable_klass()), "Throwable instance expected");
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1098 JavaValue result(T_VOID);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1099 JavaCalls::call_virtual(&result,
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1100 exception,
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1101 KlassHandle(thread,
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1102 SystemDictionary::Throwable_klass()),
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1103 vmSymbols::printStackTrace_name(),
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1104 vmSymbols::void_method_signature(),
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1105 thread);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1106 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1107
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1108 void GraalRuntime::abort_on_pending_exception(Handle exception, const char* message, bool dump_core) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1109 Thread* THREAD = Thread::current();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1110 CLEAR_PENDING_EXCEPTION;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1111 tty->print_raw_cr(message);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1112 call_printStackTrace(exception, THREAD);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1113
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1114 // Give other aborting threads to also print their stack traces.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1115 // This can be very useful when debugging class initialization
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1116 // failures.
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1117 os::sleep(THREAD, 200, false);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1118
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1119 vm_abort(dump_core);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1120 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1121
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1122 Klass* GraalRuntime::resolve_or_null(Symbol* name, TRAPS) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1123 return SystemDictionary::resolve_or_null(name, SystemDictionary::graal_loader(), Handle(), CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1124 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1125
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1126 Klass* GraalRuntime::resolve_or_fail(Symbol* name, TRAPS) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1127 return SystemDictionary::resolve_or_fail(name, SystemDictionary::graal_loader(), Handle(), true, CHECK_NULL);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1128 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1129
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1130 Klass* GraalRuntime::load_required_class(Symbol* name) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1131 Klass* klass = resolve_or_null(name, Thread::current());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1132 if (klass == NULL) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1133 tty->print_cr("Could not load class %s", name->as_C_string());
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1134 vm_abort(false);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1135 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1136 return klass;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1137 }
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1138
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1139 void GraalRuntime::parse_lines(char* path, ParseClosure* closure, bool warnStatFailure) {
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1140 struct stat st;
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1141 if (os::stat(path, &st) == 0 && (st.st_mode & S_IFREG) == S_IFREG) { // exists & is regular file
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1142 int file_handle = os::open(path, 0, 0);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1143 if (file_handle != -1) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1144 char* buffer = NEW_C_HEAP_ARRAY(char, st.st_size + 1, mtInternal);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1145 int num_read = (int) os::read(file_handle, (char*) buffer, st.st_size);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1146 if (num_read == -1) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1147 warning("Error reading file %s due to %s", path, strerror(errno));
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1148 } else if (num_read != st.st_size) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1149 warning("Only read %d of " SIZE_FORMAT " bytes from %s", num_read, (size_t) st.st_size, path);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1150 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1151 os::close(file_handle);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1152 closure->set_filename(path);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1153 if (num_read == st.st_size) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1154 buffer[num_read] = '\0';
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1155
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1156 char* line = buffer;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1157 while (line - buffer < num_read && !closure->is_aborted()) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1158 // find line end (\r, \n or \r\n)
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1159 char* nextline = NULL;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1160 char* cr = strchr(line, '\r');
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1161 char* lf = strchr(line, '\n');
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1162 if (cr != NULL && lf != NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1163 char* min = MIN2(cr, lf);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1164 *min = '\0';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1165 if (lf == cr + 1) {
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1166 nextline = lf + 1;
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1167 } else {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1168 nextline = min + 1;
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1169 }
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1170 } else if (cr != NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1171 *cr = '\0';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1172 nextline = cr + 1;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1173 } else if (lf != NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1174 *lf = '\0';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1175 nextline = lf + 1;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1176 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1177 // trim left
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1178 while (line == ' ' \|\| line == '\t') line++;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1179 char* end = line + strlen(line);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1180 // trim right
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1181 while (end > line && ((end -1) == ' ' \|\| (end -1) == '\t')) end--;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1182 *end = '\0';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1183 // skip comments and empty lines
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1184 if (*line != '#' && strlen(line) > 0) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1185 closure->parse_line(line);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1186 }
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1187 if (nextline != NULL) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1188 line = nextline;
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1189 } else {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1190 // File without newline at the end
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1191 break;
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1192 }
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1193 }
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1194 }
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1195 FREE_C_HEAP_ARRAY(char, buffer, mtInternal);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1196 } else {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1197 warning("Error opening file %s due to %s", path, strerror(errno));
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1198 }
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1199 } else if (warnStatFailure) {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1200 warning("Could not stat file %s due to %s", path, strerror(errno));
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1201 }
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1202 }
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1203
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1204 class ServiceParseClosure : public ParseClosure {
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1205 GrowableArray<char*> _implNames;
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1206 public:
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1207 ServiceParseClosure() : _implNames() {}
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1208 void do_line(char* line) {
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1209 size_t lineLen = strlen(line);
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1210 char* implName = NEW_C_HEAP_ARRAY(char, lineLen + 1, mtCompiler); // TODO (gd) i'm leaking
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1211 // Turn all '.'s into '/'s
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1212 for (size_t index = 0; index < lineLen; ++index) {
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1213 if (line[index] == '.') {
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1214 implName[index] = '/';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1215 } else {
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1216 implName[index] = line[index];
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1217 }
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1218 }
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1219 implName[lineLen] = '\0';
cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1220 _implNames.append(implName);
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1221 }
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1222 GrowableArray<char> implNames() {return &_implNames;}
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1223 };
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1224
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1225
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1226 Handle GraalRuntime::get_service_impls(KlassHandle serviceKlass, TRAPS) {
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1227 const char* home = Arguments::get_java_home();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1228 const char* serviceName = serviceKlass->external_name();
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1229 size_t path_len = strlen(home) + strlen("/lib/graal/services/") + strlen(serviceName) + 1;
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1230 char* path = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, path_len);
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1231 char sep = os::file_separator()[0];
4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1232 sprintf(path, "%s%clib%cgraal%cservices%c%s", home, sep, sep, sep, sep, serviceName);
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1233 ServiceParseClosure closure;
21519 cecb4e39521c Use files in lib/graal/options to define Graal options (-G:...) instead of generating code for them Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21516 diff changeset	1234 parse_lines(path, &closure, true); // TODO(gd) cache parsing results?
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1235
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1236 GrowableArray<char> implNames = closure.implNames();
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1237 objArrayOop servicesOop = oopFactory::new_objArray(serviceKlass(), implNames->length(), CHECK_NH);
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1238 objArrayHandle services(THREAD, servicesOop);
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1239 for (int i = 0; i < implNames->length(); ++i) {
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1240 char* implName = implNames->at(i);
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1241 Handle service = create_Service(implName, CHECK_NH);
1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1242 services->obj_at_put(i, service());
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1243 }
21515 1ab7802d35c9 Factor GraalRuntime::parse_lines out of GraalRuntime::get_service_impls Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21207 diff changeset	1244 return services;
21033 4527d2428f37 Convert graalRuntime.cpp to unix line delimiters Gilles Duboscq <gilles.m.duboscq@oracle.com> parents: 21031 diff changeset	1245 }

Mercurial > hg > truffle

annotate src/share/vm/graal/graalRuntime.cpp @ 21519:cecb4e39521c