1 /*
2 * Copyright (c) 1997, 2011, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation.
8 *
9 * This code is distributed in the hope that it will be useful, but WITHOUT
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
12 * version 2 for more details (a copy is included in the LICENSE file that
13 * accompanied this code).
14 *
15 * You should have received a copy of the GNU General Public License version
16 * 2 along with this work; if not, write to the Free Software Foundation,
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
20 * or visit www.oracle.com if you need additional information or have any
21 * questions.
22 *
23 */
24
25 #include "precompiled.hpp"
26 #include "classfile/systemDictionary.hpp"
27 #include "classfile/vmSymbols.hpp"
28 #include "compiler/compileBroker.hpp"
29 #include "gc_interface/collectedHeap.hpp"
30 #include "interpreter/interpreter.hpp"
31 #include "interpreter/interpreterRuntime.hpp"
32 #include "interpreter/linkResolver.hpp"
33 #include "interpreter/templateTable.hpp"
34 #include "memory/oopFactory.hpp"
35 #include "memory/universe.inline.hpp"
36 #include "oops/constantPoolOop.hpp"
37 #include "oops/cpCacheOop.hpp"
38 #include "oops/instanceKlass.hpp"
39 #include "oops/methodDataOop.hpp"
40 #include "oops/objArrayKlass.hpp"
41 #include "oops/oop.inline.hpp"
42 #include "oops/symbol.hpp"
43 #include "prims/jvmtiExport.hpp"
44 #include "prims/nativeLookup.hpp"
45 #include "runtime/biasedLocking.hpp"
46 #include "runtime/compilationPolicy.hpp"
47 #include "runtime/deoptimization.hpp"
48 #include "runtime/fieldDescriptor.hpp"
49 #include "runtime/handles.inline.hpp"
50 #include "runtime/interfaceSupport.hpp"
51 #include "runtime/java.hpp"
52 #include "runtime/jfieldIDWorkaround.hpp"
53 #include "runtime/osThread.hpp"
54 #include "runtime/sharedRuntime.hpp"
55 #include "runtime/stubRoutines.hpp"
56 #include "runtime/synchronizer.hpp"
57 #include "runtime/threadCritical.hpp"
58 #include "utilities/events.hpp"
59 #ifdef TARGET_ARCH_x86
60 # include "vm_version_x86.hpp"
61 #endif
62 #ifdef TARGET_ARCH_sparc
63 # include "vm_version_sparc.hpp"
64 #endif
65 #ifdef TARGET_ARCH_zero
66 # include "vm_version_zero.hpp"
67 #endif
68 #ifdef TARGET_ARCH_arm
69 # include "vm_version_arm.hpp"
70 #endif
71 #ifdef TARGET_ARCH_ppc
72 # include "vm_version_ppc.hpp"
73 #endif
74 #ifdef COMPILER2
75 #include "opto/runtime.hpp"
76 #endif
77
78 class UnlockFlagSaver {
79 private:
80 JavaThread* _thread;
81 bool _do_not_unlock;
82 public:
83 UnlockFlagSaver(JavaThread* t) {
84 _thread = t;
85 _do_not_unlock = t->do_not_unlock_if_synchronized();
86 t->set_do_not_unlock_if_synchronized(false);
87 }
88 ~UnlockFlagSaver() {
89 _thread->set_do_not_unlock_if_synchronized(_do_not_unlock);
90 }
91 };
92
93 //------------------------------------------------------------------------------------------------------------------------
94 // State accessors
95
96 void InterpreterRuntime::set_bcp_and_mdp(address bcp, JavaThread *thread) {
97 last_frame(thread).interpreter_frame_set_bcp(bcp);
98 if (ProfileInterpreter) {
99 // ProfileTraps uses MDOs independently of ProfileInterpreter.
100 // That is why we must check both ProfileInterpreter and mdo != NULL.
101 methodDataOop mdo = last_frame(thread).interpreter_frame_method()->method_data();
102 if (mdo != NULL) {
103 NEEDS_CLEANUP;
104 last_frame(thread).interpreter_frame_set_mdp(mdo->bci_to_dp(last_frame(thread).interpreter_frame_bci()));
105 }
106 }
107 }
108
109 //------------------------------------------------------------------------------------------------------------------------
110 // Constants
111
112
113 IRT_ENTRY(void, InterpreterRuntime::ldc(JavaThread* thread, bool wide))
114 // access constant pool
115 constantPoolOop pool = method(thread)->constants();
116 int index = wide ? get_index_u2(thread, Bytecodes::_ldc_w) : get_index_u1(thread, Bytecodes::_ldc);
117 constantTag tag = pool->tag_at(index);
118
119 if (tag.is_unresolved_klass() || tag.is_klass()) {
120 klassOop klass = pool->klass_at(index, CHECK);
121 oop java_class = klass->java_mirror();
122 thread->set_vm_result(java_class);
123 } else {
124 #ifdef ASSERT
125 // If we entered this runtime routine, we believed the tag contained
126 // an unresolved string, an unresolved class or a resolved class.
127 // However, another thread could have resolved the unresolved string
128 // or class by the time we go there.
129 assert(tag.is_unresolved_string()|| tag.is_string(), "expected string");
130 #endif
131 oop s_oop = pool->string_at(index, CHECK);
132 thread->set_vm_result(s_oop);
133 }
134 IRT_END
135
136 IRT_ENTRY(void, InterpreterRuntime::resolve_ldc(JavaThread* thread, Bytecodes::Code bytecode)) {
137 assert(bytecode == Bytecodes::_fast_aldc ||
138 bytecode == Bytecodes::_fast_aldc_w, "wrong bc");
139 ResourceMark rm(thread);
140 methodHandle m (thread, method(thread));
141 Bytecode_loadconstant ldc(m, bci(thread));
142 oop result = ldc.resolve_constant(CHECK);
143 #ifdef ASSERT
144 {
145 // The bytecode wrappers aren't GC-safe so construct a new one
146 Bytecode_loadconstant ldc2(m, bci(thread));
147 ConstantPoolCacheEntry* cpce = m->constants()->cache()->entry_at(ldc2.cache_index());
148 assert(result == cpce->f1(), "expected result for assembly code");
149 }
150 #endif
151 }
152 IRT_END
153
154
155 //------------------------------------------------------------------------------------------------------------------------
156 // Allocation
157
158 IRT_ENTRY(void, InterpreterRuntime::_new(JavaThread* thread, constantPoolOopDesc* pool, int index))
159 klassOop k_oop = pool->klass_at(index, CHECK);
160 instanceKlassHandle klass (THREAD, k_oop);
161
162 // Make sure we are not instantiating an abstract klass
163 klass->check_valid_for_instantiation(true, CHECK);
164
165 // Make sure klass is initialized
166 klass->initialize(CHECK);
167
168 // At this point the class may not be fully initialized
169 // because of recursive initialization. If it is fully
170 // initialized & has_finalized is not set, we rewrite
171 // it into its fast version (Note: no locking is needed
172 // here since this is an atomic byte write and can be
173 // done more than once).
174 //
175 // Note: In case of classes with has_finalized we don't
176 // rewrite since that saves us an extra check in
177 // the fast version which then would call the
178 // slow version anyway (and do a call back into
179 // Java).
180 // If we have a breakpoint, then we don't rewrite
181 // because the _breakpoint bytecode would be lost.
182 oop obj = klass->allocate_instance(CHECK);
183 thread->set_vm_result(obj);
184 IRT_END
185
186
187 IRT_ENTRY(void, InterpreterRuntime::newarray(JavaThread* thread, BasicType type, jint size))
188 oop obj = oopFactory::new_typeArray(type, size, CHECK);
189 thread->set_vm_result(obj);
190 IRT_END
191
192
193 IRT_ENTRY(void, InterpreterRuntime::anewarray(JavaThread* thread, constantPoolOopDesc* pool, int index, jint size))
194 // Note: no oopHandle for pool & klass needed since they are not used
195 // anymore after new_objArray() and no GC can happen before.
196 // (This may have to change if this code changes!)
197 klassOop klass = pool->klass_at(index, CHECK);
198 objArrayOop obj = oopFactory::new_objArray(klass, size, CHECK);
199 thread->set_vm_result(obj);
200 IRT_END
201
202
203 IRT_ENTRY(void, InterpreterRuntime::multianewarray(JavaThread* thread, jint* first_size_address))
204 // We may want to pass in more arguments - could make this slightly faster
205 constantPoolOop constants = method(thread)->constants();
206 int i = get_index_u2(thread, Bytecodes::_multianewarray);
207 klassOop klass = constants->klass_at(i, CHECK);
208 int nof_dims = number_of_dimensions(thread);
209 assert(oop(klass)->is_klass(), "not a class");
210 assert(nof_dims >= 1, "multianewarray rank must be nonzero");
211
212 // We must create an array of jints to pass to multi_allocate.
213 ResourceMark rm(thread);
214 const int small_dims = 10;
215 jint dim_array[small_dims];
216 jint *dims = &dim_array[0];
217 if (nof_dims > small_dims) {
218 dims = (jint*) NEW_RESOURCE_ARRAY(jint, nof_dims);
219 }
220 for (int index = 0; index < nof_dims; index++) {
221 // offset from first_size_address is addressed as local[index]
222 int n = Interpreter::local_offset_in_bytes(index)/jintSize;
223 dims[index] = first_size_address[n];
224 }
225 oop obj = arrayKlass::cast(klass)->multi_allocate(nof_dims, dims, CHECK);
226 thread->set_vm_result(obj);
227 IRT_END
228
229
230 IRT_ENTRY(void, InterpreterRuntime::register_finalizer(JavaThread* thread, oopDesc* obj))
231 assert(obj->is_oop(), "must be a valid oop");
232 assert(obj->klass()->klass_part()->has_finalizer(), "shouldn't be here otherwise");
233 instanceKlass::register_finalizer(instanceOop(obj), CHECK);
234 IRT_END
235
236
237 // Quicken instance-of and check-cast bytecodes
238 IRT_ENTRY(void, InterpreterRuntime::quicken_io_cc(JavaThread* thread))
239 // Force resolving; quicken the bytecode
240 int which = get_index_u2(thread, Bytecodes::_checkcast);
241 constantPoolOop cpool = method(thread)->constants();
242 // We'd expect to assert that we're only here to quicken bytecodes, but in a multithreaded
243 // program we might have seen an unquick'd bytecode in the interpreter but have another
244 // thread quicken the bytecode before we get here.
245 // assert( cpool->tag_at(which).is_unresolved_klass(), "should only come here to quicken bytecodes" );
246 klassOop klass = cpool->klass_at(which, CHECK);
247 thread->set_vm_result(klass);
248 IRT_END
249
250
251 //------------------------------------------------------------------------------------------------------------------------
252 // Exceptions
253
254 // Assume the compiler is (or will be) interested in this event.
255 // If necessary, create an MDO to hold the information, and record it.
256 void InterpreterRuntime::note_trap(JavaThread* thread, int reason, TRAPS) {
257 assert(ProfileTraps, "call me only if profiling");
258 methodHandle trap_method(thread, method(thread));
259
260 if (trap_method.not_null()) {
261 methodDataHandle trap_mdo(thread, trap_method->method_data());
262 if (trap_mdo.is_null()) {
263 methodOopDesc::build_interpreter_method_data(trap_method, THREAD);
264 if (HAS_PENDING_EXCEPTION) {
265 assert((PENDING_EXCEPTION->is_a(SystemDictionary::OutOfMemoryError_klass())), "we expect only an OOM error here");
266 CLEAR_PENDING_EXCEPTION;
267 }
268 trap_mdo = methodDataHandle(thread, trap_method->method_data());
269 // and fall through...
270 }
271 if (trap_mdo.not_null()) {
272 // Update per-method count of trap events. The interpreter
273 // is updating the MDO to simulate the effect of compiler traps.
274 int trap_bci = trap_method->bci_from(bcp(thread));
275 Deoptimization::update_method_data_from_interpreter(trap_mdo, trap_bci, reason);
276 }
277 }
278 }
279
280 static Handle get_preinitialized_exception(klassOop k, TRAPS) {
281 // get klass
282 instanceKlass* klass = instanceKlass::cast(k);
283 assert(klass->is_initialized(),
284 "this klass should have been initialized during VM initialization");
285 // create instance - do not call constructor since we may have no
286 // (java) stack space left (should assert constructor is empty)
287 Handle exception;
288 oop exception_oop = klass->allocate_instance(CHECK_(exception));
289 exception = Handle(THREAD, exception_oop);
290 if (StackTraceInThrowable) {
291 java_lang_Throwable::fill_in_stack_trace(exception);
292 }
293 return exception;
294 }
295
296 // Special handling for stack overflow: since we don't have any (java) stack
297 // space left we use the pre-allocated & pre-initialized StackOverflowError
298 // klass to create an stack overflow error instance. We do not call its
299 // constructor for the same reason (it is empty, anyway).
300 IRT_ENTRY(void, InterpreterRuntime::throw_StackOverflowError(JavaThread* thread))
301 Handle exception = get_preinitialized_exception(
302 SystemDictionary::StackOverflowError_klass(),
303 CHECK);
304 THROW_HANDLE(exception);
305 IRT_END
306
307
308 IRT_ENTRY(void, InterpreterRuntime::create_exception(JavaThread* thread, char* name, char* message))
309 // lookup exception klass
310 TempNewSymbol s = SymbolTable::new_symbol(name, CHECK);
311 if (ProfileTraps) {
312 if (s == vmSymbols::java_lang_ArithmeticException()) {
313 note_trap(thread, Deoptimization::Reason_div0_check, CHECK);
314 } else if (s == vmSymbols::java_lang_NullPointerException()) {
315 note_trap(thread, Deoptimization::Reason_null_check, CHECK);
316 }
317 }
318 // create exception
319 Handle exception = Exceptions::new_exception(thread, s, message);
320 thread->set_vm_result(exception());
321 IRT_END
322
323
324 IRT_ENTRY(void, InterpreterRuntime::create_klass_exception(JavaThread* thread, char* name, oopDesc* obj))
325 ResourceMark rm(thread);
326 const char* klass_name = Klass::cast(obj->klass())->external_name();
327 // lookup exception klass
328 TempNewSymbol s = SymbolTable::new_symbol(name, CHECK);
329 if (ProfileTraps) {
330 note_trap(thread, Deoptimization::Reason_class_check, CHECK);
331 }
332 // create exception, with klass name as detail message
333 Handle exception = Exceptions::new_exception(thread, s, klass_name);
334 thread->set_vm_result(exception());
335 IRT_END
336
337
338 IRT_ENTRY(void, InterpreterRuntime::throw_ArrayIndexOutOfBoundsException(JavaThread* thread, char* name, jint index))
339 char message[jintAsStringSize];
340 // lookup exception klass
341 TempNewSymbol s = SymbolTable::new_symbol(name, CHECK);
342 if (ProfileTraps) {
343 note_trap(thread, Deoptimization::Reason_range_check, CHECK);
344 }
345 // create exception
346 sprintf(message, "%d", index);
347 THROW_MSG(s, message);
348 IRT_END
349
350 IRT_ENTRY(void, InterpreterRuntime::throw_ClassCastException(
351 JavaThread* thread, oopDesc* obj))
352
353 ResourceMark rm(thread);
354 char* message = SharedRuntime::generate_class_cast_message(
355 thread, Klass::cast(obj->klass())->external_name());
356
357 if (ProfileTraps) {
358 note_trap(thread, Deoptimization::Reason_class_check, CHECK);
359 }
360
361 // create exception
362 THROW_MSG(vmSymbols::java_lang_ClassCastException(), message);
363 IRT_END
364
365 // exception_handler_for_exception(...) returns the continuation address,
366 // the exception oop (via TLS) and sets the bci/bcp for the continuation.
367 // The exception oop is returned to make sure it is preserved over GC (it
368 // is only on the stack if the exception was thrown explicitly via athrow).
369 // During this operation, the expression stack contains the values for the
370 // bci where the exception happened. If the exception was propagated back
371 // from a call, the expression stack contains the values for the bci at the
372 // invoke w/o arguments (i.e., as if one were inside the call).
373 IRT_ENTRY(address, InterpreterRuntime::exception_handler_for_exception(JavaThread* thread, oopDesc* exception))
374
375 Handle h_exception(thread, exception);
376 methodHandle h_method (thread, method(thread));
377 constantPoolHandle h_constants(thread, h_method->constants());
378 typeArrayHandle h_extable (thread, h_method->exception_table());
379 bool should_repeat;
380 int handler_bci;
381 int current_bci = bci(thread);
382
383 // Need to do this check first since when _do_not_unlock_if_synchronized
384 // is set, we don't want to trigger any classloading which may make calls
385 // into java, or surprisingly find a matching exception handler for bci 0
386 // since at this moment the method hasn't been "officially" entered yet.
387 if (thread->do_not_unlock_if_synchronized()) {
388 ResourceMark rm;
389 assert(current_bci == 0, "bci isn't zero for do_not_unlock_if_synchronized");
390 thread->set_vm_result(exception);
391 #ifdef CC_INTERP
392 return (address) -1;
393 #else
394 return Interpreter::remove_activation_entry();
395 #endif
396 }
397
398 do {
399 should_repeat = false;
400
401 // assertions
402 #ifdef ASSERT
403 assert(h_exception.not_null(), "NULL exceptions should be handled by athrow");
404 assert(h_exception->is_oop(), "just checking");
405 // Check that exception is a subclass of Throwable, otherwise we have a VerifyError
406 if (!(h_exception->is_a(SystemDictionary::Throwable_klass()))) {
407 if (ExitVMOnVerifyError) vm_exit(-1);
408 ShouldNotReachHere();
409 }
410 #endif
411
412 // tracing
413 if (TraceExceptions) {
414 ttyLocker ttyl;
415 ResourceMark rm(thread);
416 tty->print_cr("Exception <%s> (" INTPTR_FORMAT ")", h_exception->print_value_string(), (address)h_exception());
417 tty->print_cr(" thrown in interpreter method <%s>", h_method->print_value_string());
418 tty->print_cr(" at bci %d for thread " INTPTR_FORMAT, current_bci, thread);
419 }
420 // Don't go paging in something which won't be used.
421 // else if (h_extable->length() == 0) {
422 // // disabled for now - interpreter is not using shortcut yet
423 // // (shortcut is not to call runtime if we have no exception handlers)
424 // // warning("performance bug: should not call runtime if method has no exception handlers");
425 // }
426 // for AbortVMOnException flag
427 NOT_PRODUCT(Exceptions::debug_check_abort(h_exception));
428
429 // exception handler lookup
430 KlassHandle h_klass(THREAD, h_exception->klass());
431 handler_bci = h_method->fast_exception_handler_bci_for(h_klass, current_bci, THREAD);
432 if (HAS_PENDING_EXCEPTION) {
433 // We threw an exception while trying to find the exception handler.
434 // Transfer the new exception to the exception handle which will
435 // be set into thread local storage, and do another lookup for an
436 // exception handler for this exception, this time starting at the
437 // BCI of the exception handler which caused the exception to be
438 // thrown (bug 4307310).
439 h_exception = Handle(THREAD, PENDING_EXCEPTION);
440 CLEAR_PENDING_EXCEPTION;
441 if (handler_bci >= 0) {
442 current_bci = handler_bci;
443 should_repeat = true;
444 }
445 }
446 } while (should_repeat == true);
447
448 // notify JVMTI of an exception throw; JVMTI will detect if this is a first
449 // time throw or a stack unwinding throw and accordingly notify the debugger
450 if (JvmtiExport::can_post_on_exceptions()) {
451 JvmtiExport::post_exception_throw(thread, h_method(), bcp(thread), h_exception());
452 }
453
454 #ifdef CC_INTERP
455 address continuation = (address)(intptr_t) handler_bci;
456 #else
457 address continuation = NULL;
458 #endif
459 address handler_pc = NULL;
460 if (handler_bci < 0 || !thread->reguard_stack((address) &continuation)) {
461 // Forward exception to callee (leaving bci/bcp untouched) because (a) no
462 // handler in this method, or (b) after a stack overflow there is not yet
463 // enough stack space available to reprotect the stack.
464 #ifndef CC_INTERP
465 continuation = Interpreter::remove_activation_entry();
466 #endif
467 // Count this for compilation purposes
468 h_method->interpreter_throwout_increment();
469 } else {
470 // handler in this method => change bci/bcp to handler bci/bcp and continue there
471 handler_pc = h_method->code_base() + handler_bci;
472 #ifndef CC_INTERP
473 set_bcp_and_mdp(handler_pc, thread);
474 continuation = Interpreter::dispatch_table(vtos)[*handler_pc];
475 #endif
476 }
477 // notify debugger of an exception catch
478 // (this is good for exceptions caught in native methods as well)
479 if (JvmtiExport::can_post_on_exceptions()) {
480 JvmtiExport::notice_unwind_due_to_exception(thread, h_method(), handler_pc, h_exception(), (handler_pc != NULL));
481 }
482
483 thread->set_vm_result(h_exception());
484 return continuation;
485 IRT_END
486
487
488 IRT_ENTRY(void, InterpreterRuntime::throw_pending_exception(JavaThread* thread))
489 assert(thread->has_pending_exception(), "must only ne called if there's an exception pending");
490 // nothing to do - eventually we should remove this code entirely (see comments @ call sites)
491 IRT_END
492
493
494 IRT_ENTRY(void, InterpreterRuntime::throw_AbstractMethodError(JavaThread* thread))
495 THROW(vmSymbols::java_lang_AbstractMethodError());
496 IRT_END
497
498
499 IRT_ENTRY(void, InterpreterRuntime::throw_IncompatibleClassChangeError(JavaThread* thread))
500 THROW(vmSymbols::java_lang_IncompatibleClassChangeError());
501 IRT_END
502
503
504 //------------------------------------------------------------------------------------------------------------------------
505 // Fields
506 //
507
508 IRT_ENTRY(void, InterpreterRuntime::resolve_get_put(JavaThread* thread, Bytecodes::Code bytecode))
509 // resolve field
510 FieldAccessInfo info;
511 constantPoolHandle pool(thread, method(thread)->constants());
512 bool is_static = (bytecode == Bytecodes::_getstatic || bytecode == Bytecodes::_putstatic);
513
514 {
515 JvmtiHideSingleStepping jhss(thread);
516 LinkResolver::resolve_field(info, pool, get_index_u2_cpcache(thread, bytecode),
517 bytecode, false, CHECK);
518 } // end JvmtiHideSingleStepping
519
520 // check if link resolution caused cpCache to be updated
521 if (already_resolved(thread)) return;
522
523 // compute auxiliary field attributes
524 TosState state = as_TosState(info.field_type());
525
526 // We need to delay resolving put instructions on final fields
527 // until we actually invoke one. This is required so we throw
528 // exceptions at the correct place. If we do not resolve completely
529 // in the current pass, leaving the put_code set to zero will
530 // cause the next put instruction to reresolve.
531 bool is_put = (bytecode == Bytecodes::_putfield ||
532 bytecode == Bytecodes::_putstatic);
533 Bytecodes::Code put_code = (Bytecodes::Code)0;
534
535 // We also need to delay resolving getstatic instructions until the
536 // class is intitialized. This is required so that access to the static
537 // field will call the initialization function every time until the class
538 // is completely initialized ala. in 2.17.5 in JVM Specification.
539 instanceKlass *klass = instanceKlass::cast(info.klass()->as_klassOop());
540 bool uninitialized_static = ((bytecode == Bytecodes::_getstatic || bytecode == Bytecodes::_putstatic) &&
541 !klass->is_initialized());
542 Bytecodes::Code get_code = (Bytecodes::Code)0;
543
544
545 if (!uninitialized_static) {
546 get_code = ((is_static) ? Bytecodes::_getstatic : Bytecodes::_getfield);
547 if (is_put || !info.access_flags().is_final()) {
548 put_code = ((is_static) ? Bytecodes::_putstatic : Bytecodes::_putfield);
549 }
550 }
551
552 cache_entry(thread)->set_field(
553 get_code,
554 put_code,
555 info.klass(),
556 info.field_index(),
557 info.field_offset(),
558 state,
559 info.access_flags().is_final(),
560 info.access_flags().is_volatile()
561 );
562 IRT_END
563
564
565 //------------------------------------------------------------------------------------------------------------------------
566 // Synchronization
567 //
568 // The interpreter's synchronization code is factored out so that it can
569 // be shared by method invocation and synchronized blocks.
570 //%note synchronization_3
571
572 static void trace_locking(Handle& h_locking_obj, bool is_locking) {
573 ObjectSynchronizer::trace_locking(h_locking_obj, false, true, is_locking);
574 }
575
576
577 //%note monitor_1
578 IRT_ENTRY_NO_ASYNC(void, InterpreterRuntime::monitorenter(JavaThread* thread, BasicObjectLock* elem))
579 #ifdef ASSERT
580 thread->last_frame().interpreter_frame_verify_monitor(elem);
581 #endif
582 if (PrintBiasedLockingStatistics) {
583 Atomic::inc(BiasedLocking::slow_path_entry_count_addr());
584 }
585 Handle h_obj(thread, elem->obj());
586 assert(Universe::heap()->is_in_reserved_or_null(h_obj()),
587 "must be NULL or an object");
588 if (UseBiasedLocking) {
589 // Retry fast entry if bias is revoked to avoid unnecessary inflation
590 ObjectSynchronizer::fast_enter(h_obj, elem->lock(), true, CHECK);
591 } else {
592 ObjectSynchronizer::slow_enter(h_obj, elem->lock(), CHECK);
593 }
594 assert(Universe::heap()->is_in_reserved_or_null(elem->obj()),
595 "must be NULL or an object");
596 #ifdef ASSERT
597 thread->last_frame().interpreter_frame_verify_monitor(elem);
598 #endif
599 IRT_END
600
601
602 //%note monitor_1
603 IRT_ENTRY_NO_ASYNC(void, InterpreterRuntime::monitorexit(JavaThread* thread, BasicObjectLock* elem))
604 #ifdef ASSERT
605 thread->last_frame().interpreter_frame_verify_monitor(elem);
606 #endif
607 Handle h_obj(thread, elem->obj());
608 assert(Universe::heap()->is_in_reserved_or_null(h_obj()),
609 "must be NULL or an object");
610 if (elem == NULL || h_obj()->is_unlocked()) {
611 THROW(vmSymbols::java_lang_IllegalMonitorStateException());
612 }
613 ObjectSynchronizer::slow_exit(h_obj(), elem->lock(), thread);
614 // Free entry. This must be done here, since a pending exception might be installed on
615 // exit. If it is not cleared, the exception handling code will try to unlock the monitor again.
616 elem->set_obj(NULL);
617 #ifdef ASSERT
618 thread->last_frame().interpreter_frame_verify_monitor(elem);
619 #endif
620 IRT_END
621
622
623 IRT_ENTRY(void, InterpreterRuntime::throw_illegal_monitor_state_exception(JavaThread* thread))
624 THROW(vmSymbols::java_lang_IllegalMonitorStateException());
625 IRT_END
626
627
628 IRT_ENTRY(void, InterpreterRuntime::new_illegal_monitor_state_exception(JavaThread* thread))
629 // Returns an illegal exception to install into the current thread. The
630 // pending_exception flag is cleared so normal exception handling does not
631 // trigger. Any current installed exception will be overwritten. This
632 // method will be called during an exception unwind.
633
634 assert(!HAS_PENDING_EXCEPTION, "no pending exception");
635 Handle exception(thread, thread->vm_result());
636 assert(exception() != NULL, "vm result should be set");
637 thread->set_vm_result(NULL); // clear vm result before continuing (may cause memory leaks and assert failures)
638 if (!exception->is_a(SystemDictionary::ThreadDeath_klass())) {
639 exception = get_preinitialized_exception(
640 SystemDictionary::IllegalMonitorStateException_klass(),
641 CATCH);
642 }
643 thread->set_vm_result(exception());
644 IRT_END
645
646
647 //------------------------------------------------------------------------------------------------------------------------
648 // Invokes
649
650 IRT_ENTRY(Bytecodes::Code, InterpreterRuntime::get_original_bytecode_at(JavaThread* thread, methodOopDesc* method, address bcp))
651 return method->orig_bytecode_at(method->bci_from(bcp));
652 IRT_END
653
654 IRT_ENTRY(void, InterpreterRuntime::set_original_bytecode_at(JavaThread* thread, methodOopDesc* method, address bcp, Bytecodes::Code new_code))
655 method->set_orig_bytecode_at(method->bci_from(bcp), new_code);
656 IRT_END
657
658 IRT_ENTRY(void, InterpreterRuntime::_breakpoint(JavaThread* thread, methodOopDesc* method, address bcp))
659 JvmtiExport::post_raw_breakpoint(thread, method, bcp);
660 IRT_END
661
662 IRT_ENTRY(void, InterpreterRuntime::resolve_invoke(JavaThread* thread, Bytecodes::Code bytecode))
663 // extract receiver from the outgoing argument list if necessary
664 Handle receiver(thread, NULL);
665 if (bytecode == Bytecodes::_invokevirtual || bytecode == Bytecodes::_invokeinterface) {
666 ResourceMark rm(thread);
667 methodHandle m (thread, method(thread));
668 Bytecode_invoke call(m, bci(thread));
669 Symbol* signature = call.signature();
670 receiver = Handle(thread,
671 thread->last_frame().interpreter_callee_receiver(signature));
672 assert(Universe::heap()->is_in_reserved_or_null(receiver()),
673 "sanity check");
674 assert(receiver.is_null() ||
675 Universe::heap()->is_in_reserved(receiver->klass()),
676 "sanity check");
677 }
678
679 // resolve method
680 CallInfo info;
681 constantPoolHandle pool(thread, method(thread)->constants());
682
683 {
684 JvmtiHideSingleStepping jhss(thread);
685 LinkResolver::resolve_invoke(info, receiver, pool,
686 get_index_u2_cpcache(thread, bytecode), bytecode, CHECK);
687 if (JvmtiExport::can_hotswap_or_post_breakpoint()) {
688 int retry_count = 0;
689 while (info.resolved_method()->is_old()) {
690 // It is very unlikely that method is redefined more than 100 times
691 // in the middle of resolve. If it is looping here more than 100 times
692 // means then there could be a bug here.
693 guarantee((retry_count++ < 100),
694 "Could not resolve to latest version of redefined method");
695 // method is redefined in the middle of resolve so re-try.
696 LinkResolver::resolve_invoke(info, receiver, pool,
697 get_index_u2_cpcache(thread, bytecode), bytecode, CHECK);
698 }
699 }
700 } // end JvmtiHideSingleStepping
701
702 // check if link resolution caused cpCache to be updated
703 if (already_resolved(thread)) return;
704
705 if (bytecode == Bytecodes::_invokeinterface) {
706
707 if (TraceItables && Verbose) {
708 ResourceMark rm(thread);
709 tty->print_cr("Resolving: klass: %s to method: %s", info.resolved_klass()->name()->as_C_string(), info.resolved_method()->name()->as_C_string());
710 }
711 if (info.resolved_method()->method_holder() ==
712 SystemDictionary::Object_klass()) {
713 // NOTE: THIS IS A FIX FOR A CORNER CASE in the JVM spec
714 // (see also cpCacheOop.cpp for details)
715 methodHandle rm = info.resolved_method();
716 assert(rm->is_final() || info.has_vtable_index(),
717 "should have been set already");
718 cache_entry(thread)->set_method(bytecode, rm, info.vtable_index());
719 } else {
720 // Setup itable entry
721 int index = klassItable::compute_itable_index(info.resolved_method()());
722 cache_entry(thread)->set_interface_call(info.resolved_method(), index);
723 }
724 } else {
725 cache_entry(thread)->set_method(
726 bytecode,
727 info.resolved_method(),
728 info.vtable_index());
729 }
730 IRT_END
731
732
733 // First time execution: Resolve symbols, create a permanent CallSite object.
734 IRT_ENTRY(void, InterpreterRuntime::resolve_invokedynamic(JavaThread* thread)) {
735 ResourceMark rm(thread);
736
737 assert(EnableInvokeDynamic, "");
738
739 const Bytecodes::Code bytecode = Bytecodes::_invokedynamic;
740
741 methodHandle caller_method(thread, method(thread));
742
743 constantPoolHandle pool(thread, caller_method->constants());
744 pool->set_invokedynamic(); // mark header to flag active call sites
745
746 int caller_bci = 0;
747 int site_index = 0;
748 { address caller_bcp = bcp(thread);
749 caller_bci = caller_method->bci_from(caller_bcp);
750 site_index = Bytes::get_native_u4(caller_bcp+1);
751 }
752 assert(site_index == InterpreterRuntime::bytecode(thread).get_index_u4(bytecode), "");
753 assert(constantPoolCacheOopDesc::is_secondary_index(site_index), "proper format");
754 // there is a second CPC entries that is of interest; it caches signature info:
755 int main_index = pool->cache()->secondary_entry_at(site_index)->main_entry_index();
756 int pool_index = pool->cache()->entry_at(main_index)->constant_pool_index();
757
758 // first resolve the signature to a MH.invoke methodOop
759 if (!pool->cache()->entry_at(main_index)->is_resolved(bytecode)) {
760 JvmtiHideSingleStepping jhss(thread);
761 CallInfo callinfo;
762 LinkResolver::resolve_invoke(callinfo, Handle(), pool,
763 site_index, bytecode, CHECK);
764 // The main entry corresponds to a JVM_CONSTANT_InvokeDynamic, and serves
765 // as a common reference point for all invokedynamic call sites with
766 // that exact call descriptor. We will link it in the CP cache exactly
767 // as if it were an invokevirtual of MethodHandle.invoke.
768 pool->cache()->entry_at(main_index)->set_method(
769 bytecode,
770 callinfo.resolved_method(),
771 callinfo.vtable_index());
772 }
773
774 // The method (f2 entry) of the main entry is the MH.invoke for the
775 // invokedynamic target call signature.
776 oop f1_value = pool->cache()->entry_at(main_index)->f1();
777 methodHandle signature_invoker(THREAD, (methodOop) f1_value);
778 assert(signature_invoker.not_null() && signature_invoker->is_method() && signature_invoker->is_method_handle_invoke(),
779 "correct result from LinkResolver::resolve_invokedynamic");
780
781 Handle info; // optional argument(s) in JVM_CONSTANT_InvokeDynamic
782 Handle bootm = SystemDictionary::find_bootstrap_method(caller_method, caller_bci,
783 main_index, info, CHECK);
784 if (!java_lang_invoke_MethodHandle::is_instance(bootm())) {
785 THROW_MSG(vmSymbols::java_lang_IllegalStateException(),
786 "no bootstrap method found for invokedynamic");
787 }
788
789 // Short circuit if CallSite has been bound already:
790 if (!pool->cache()->secondary_entry_at(site_index)->is_f1_null())
791 return;
792
793 Symbol* call_site_name = pool->name_ref_at(site_index);
794
795 Handle call_site
796 = SystemDictionary::make_dynamic_call_site(bootm,
797 // Callee information:
798 call_site_name,
799 signature_invoker,
800 info,
801 // Caller information:
802 caller_method,
803 caller_bci,
804 CHECK);
805
806 // In the secondary entry, the f1 field is the call site, and the f2 (index)
807 // field is some data about the invoke site. Currently, it is just the BCI.
808 // Later, it might be changed to help manage inlining dependencies.
809 pool->cache()->secondary_entry_at(site_index)->set_dynamic_call(call_site, signature_invoker);
810 }
811 IRT_END
812
813
814 //------------------------------------------------------------------------------------------------------------------------
815 // Miscellaneous
816
817
818 nmethod* InterpreterRuntime::frequency_counter_overflow(JavaThread* thread, address branch_bcp) {
819 nmethod* nm = frequency_counter_overflow_inner(thread, branch_bcp);
820 assert(branch_bcp != NULL || nm == NULL, "always returns null for non OSR requests");
821 if (branch_bcp != NULL && nm != NULL) {
822 // This was a successful request for an OSR nmethod. Because
823 // frequency_counter_overflow_inner ends with a safepoint check,
824 // nm could have been unloaded so look it up again. It's unsafe
825 // to examine nm directly since it might have been freed and used
826 // for something else.
827 frame fr = thread->last_frame();
828 methodOop method = fr.interpreter_frame_method();
829 int bci = method->bci_from(fr.interpreter_frame_bcp());
830 nm = method->lookup_osr_nmethod_for(bci, CompLevel_none, false);
831 }
832 return nm;
833 }
834
835 IRT_ENTRY(nmethod*,
836 InterpreterRuntime::frequency_counter_overflow_inner(JavaThread* thread, address branch_bcp))
837 // use UnlockFlagSaver to clear and restore the _do_not_unlock_if_synchronized
838 // flag, in case this method triggers classloading which will call into Java.
839 UnlockFlagSaver fs(thread);
840
841 frame fr = thread->last_frame();
842 assert(fr.is_interpreted_frame(), "must come from interpreter");
843 methodHandle method(thread, fr.interpreter_frame_method());
844 const int branch_bci = branch_bcp != NULL ? method->bci_from(branch_bcp) : InvocationEntryBci;
845 const int bci = branch_bcp != NULL ? method->bci_from(fr.interpreter_frame_bcp()) : InvocationEntryBci;
846
847 nmethod* osr_nm = CompilationPolicy::policy()->event(method, method, branch_bci, bci, CompLevel_none, thread);
848
849 if (osr_nm != NULL) {
850 // We may need to do on-stack replacement which requires that no
851 // monitors in the activation are biased because their
852 // BasicObjectLocks will need to migrate during OSR. Force
853 // unbiasing of all monitors in the activation now (even though
854 // the OSR nmethod might be invalidated) because we don't have a
855 // safepoint opportunity later once the migration begins.
856 if (UseBiasedLocking) {
857 ResourceMark rm;
858 GrowableArray<Handle>* objects_to_revoke = new GrowableArray<Handle>();
859 for( BasicObjectLock *kptr = fr.interpreter_frame_monitor_end();
860 kptr < fr.interpreter_frame_monitor_begin();
861 kptr = fr.next_monitor_in_interpreter_frame(kptr) ) {
862 if( kptr->obj() != NULL ) {
863 objects_to_revoke->append(Handle(THREAD, kptr->obj()));
864 }
865 }
866 BiasedLocking::revoke(objects_to_revoke);
867 }
868 }
869 return osr_nm;
870 IRT_END
871
872 IRT_LEAF(jint, InterpreterRuntime::bcp_to_di(methodOopDesc* method, address cur_bcp))
873 assert(ProfileInterpreter, "must be profiling interpreter");
874 int bci = method->bci_from(cur_bcp);
875 methodDataOop mdo = method->method_data();
876 if (mdo == NULL) return 0;
877 return mdo->bci_to_di(bci);
878 IRT_END
879
880 IRT_ENTRY(void, InterpreterRuntime::profile_method(JavaThread* thread))
881 // use UnlockFlagSaver to clear and restore the _do_not_unlock_if_synchronized
882 // flag, in case this method triggers classloading which will call into Java.
883 UnlockFlagSaver fs(thread);
884
885 assert(ProfileInterpreter, "must be profiling interpreter");
886 frame fr = thread->last_frame();
887 assert(fr.is_interpreted_frame(), "must come from interpreter");
888 methodHandle method(thread, fr.interpreter_frame_method());
889 methodOopDesc::build_interpreter_method_data(method, THREAD);
890 if (HAS_PENDING_EXCEPTION) {
891 assert((PENDING_EXCEPTION->is_a(SystemDictionary::OutOfMemoryError_klass())), "we expect only an OOM error here");
892 CLEAR_PENDING_EXCEPTION;
893 // and fall through...
894 }
895 IRT_END
896
897
898 #ifdef ASSERT
899 IRT_LEAF(void, InterpreterRuntime::verify_mdp(methodOopDesc* method, address bcp, address mdp))
900 assert(ProfileInterpreter, "must be profiling interpreter");
901
902 methodDataOop mdo = method->method_data();
903 assert(mdo != NULL, "must not be null");
904
905 int bci = method->bci_from(bcp);
906
907 address mdp2 = mdo->bci_to_dp(bci);
908 if (mdp != mdp2) {
909 ResourceMark rm;
910 ResetNoHandleMark rnm; // In a LEAF entry.
911 HandleMark hm;
912 tty->print_cr("FAILED verify : actual mdp %p expected mdp %p @ bci %d", mdp, mdp2, bci);
913 int current_di = mdo->dp_to_di(mdp);
914 int expected_di = mdo->dp_to_di(mdp2);
915 tty->print_cr(" actual di %d expected di %d", current_di, expected_di);
916 int expected_approx_bci = mdo->data_at(expected_di)->bci();
917 int approx_bci = -1;
918 if (current_di >= 0) {
919 approx_bci = mdo->data_at(current_di)->bci();
920 }
921 tty->print_cr(" actual bci is %d expected bci %d", approx_bci, expected_approx_bci);
922 mdo->print_on(tty);
923 method->print_codes();
924 }
925 assert(mdp == mdp2, "wrong mdp");
926 IRT_END
927 #endif // ASSERT
928
929 IRT_ENTRY(void, InterpreterRuntime::update_mdp_for_ret(JavaThread* thread, int return_bci))
930 assert(ProfileInterpreter, "must be profiling interpreter");
931 ResourceMark rm(thread);
932 HandleMark hm(thread);
933 frame fr = thread->last_frame();
934 assert(fr.is_interpreted_frame(), "must come from interpreter");
935 methodDataHandle h_mdo(thread, fr.interpreter_frame_method()->method_data());
936
937 // Grab a lock to ensure atomic access to setting the return bci and
938 // the displacement. This can block and GC, invalidating all naked oops.
939 MutexLocker ml(RetData_lock);
940
941 // ProfileData is essentially a wrapper around a derived oop, so we
942 // need to take the lock before making any ProfileData structures.
943 ProfileData* data = h_mdo->data_at(h_mdo->dp_to_di(fr.interpreter_frame_mdp()));
944 RetData* rdata = data->as_RetData();
945 address new_mdp = rdata->fixup_ret(return_bci, h_mdo);
946 fr.interpreter_frame_set_mdp(new_mdp);
947 IRT_END
948
949
950 IRT_ENTRY(void, InterpreterRuntime::at_safepoint(JavaThread* thread))
951 // We used to need an explict preserve_arguments here for invoke bytecodes. However,
952 // stack traversal automatically takes care of preserving arguments for invoke, so
953 // this is no longer needed.
954
955 // IRT_END does an implicit safepoint check, hence we are guaranteed to block
956 // if this is called during a safepoint
957
958 if (JvmtiExport::should_post_single_step()) {
959 // We are called during regular safepoints and when the VM is
960 // single stepping. If any thread is marked for single stepping,
961 // then we may have JVMTI work to do.
962 JvmtiExport::at_single_stepping_point(thread, method(thread), bcp(thread));
963 }
964 IRT_END
965
966 IRT_ENTRY(void, InterpreterRuntime::post_field_access(JavaThread *thread, oopDesc* obj,
967 ConstantPoolCacheEntry *cp_entry))
968
969 // check the access_flags for the field in the klass
970
971 instanceKlass* ik = instanceKlass::cast(java_lang_Class::as_klassOop(cp_entry->f1()));
972 typeArrayOop fields = ik->fields();
973 int index = cp_entry->field_index();
974 assert(index < fields->length(), "holders field index is out of range");
975 // bail out if field accesses are not watched
976 if ((fields->ushort_at(index) & JVM_ACC_FIELD_ACCESS_WATCHED) == 0) return;
977
978 switch(cp_entry->flag_state()) {
979 case btos: // fall through
980 case ctos: // fall through
981 case stos: // fall through
982 case itos: // fall through
983 case ftos: // fall through
984 case ltos: // fall through
985 case dtos: // fall through
986 case atos: break;
987 default: ShouldNotReachHere(); return;
988 }
989 bool is_static = (obj == NULL);
990 HandleMark hm(thread);
991
992 Handle h_obj;
993 if (!is_static) {
994 // non-static field accessors have an object, but we need a handle
995 h_obj = Handle(thread, obj);
996 }
997 instanceKlassHandle h_cp_entry_f1(thread, java_lang_Class::as_klassOop(cp_entry->f1()));
998 jfieldID fid = jfieldIDWorkaround::to_jfieldID(h_cp_entry_f1, cp_entry->f2(), is_static);
999 JvmtiExport::post_field_access(thread, method(thread), bcp(thread), h_cp_entry_f1, h_obj, fid);
1000 IRT_END
1001
1002 IRT_ENTRY(void, InterpreterRuntime::post_field_modification(JavaThread *thread,
1003 oopDesc* obj, ConstantPoolCacheEntry *cp_entry, jvalue *value))
1004
1005 klassOop k = java_lang_Class::as_klassOop(cp_entry->f1());
1006
1007 // check the access_flags for the field in the klass
1008 instanceKlass* ik = instanceKlass::cast(k);
1009 typeArrayOop fields = ik->fields();
1010 int index = cp_entry->field_index();
1011 assert(index < fields->length(), "holders field index is out of range");
1012 // bail out if field modifications are not watched
1013 if ((fields->ushort_at(index) & JVM_ACC_FIELD_MODIFICATION_WATCHED) == 0) return;
1014
1015 char sig_type = '\0';
1016
1017 switch(cp_entry->flag_state()) {
1018 case btos: sig_type = 'Z'; break;
1019 case ctos: sig_type = 'C'; break;
1020 case stos: sig_type = 'S'; break;
1021 case itos: sig_type = 'I'; break;
1022 case ftos: sig_type = 'F'; break;
1023 case atos: sig_type = 'L'; break;
1024 case ltos: sig_type = 'J'; break;
1025 case dtos: sig_type = 'D'; break;
1026 default: ShouldNotReachHere(); return;
1027 }
1028 bool is_static = (obj == NULL);
1029
1030 HandleMark hm(thread);
1031 instanceKlassHandle h_klass(thread, k);
1032 jfieldID fid = jfieldIDWorkaround::to_jfieldID(h_klass, cp_entry->f2(), is_static);
1033 jvalue fvalue;
1034 #ifdef _LP64
1035 fvalue = *value;
1036 #else
1037 // Long/double values are stored unaligned and also noncontiguously with
1038 // tagged stacks. We can't just do a simple assignment even in the non-
1039 // J/D cases because a C++ compiler is allowed to assume that a jvalue is
1040 // 8-byte aligned, and interpreter stack slots are only 4-byte aligned.
1041 // We assume that the two halves of longs/doubles are stored in interpreter
1042 // stack slots in platform-endian order.
1043 jlong_accessor u;
1044 jint* newval = (jint*)value;
1045 u.words[0] = newval[0];
1046 u.words[1] = newval[Interpreter::stackElementWords]; // skip if tag
1047 fvalue.j = u.long_value;
1048 #endif // _LP64
1049
1050 Handle h_obj;
1051 if (!is_static) {
1052 // non-static field accessors have an object, but we need a handle
1053 h_obj = Handle(thread, obj);
1054 }
1055
1056 JvmtiExport::post_raw_field_modification(thread, method(thread), bcp(thread), h_klass, h_obj,
1057 fid, sig_type, &fvalue);
1058 IRT_END
1059
1060 IRT_ENTRY(void, InterpreterRuntime::post_method_entry(JavaThread *thread))
1061 JvmtiExport::post_method_entry(thread, InterpreterRuntime::method(thread), InterpreterRuntime::last_frame(thread));
1062 IRT_END
1063
1064
1065 IRT_ENTRY(void, InterpreterRuntime::post_method_exit(JavaThread *thread))
1066 JvmtiExport::post_method_exit(thread, InterpreterRuntime::method(thread), InterpreterRuntime::last_frame(thread));
1067 IRT_END
1068
1069 IRT_LEAF(int, InterpreterRuntime::interpreter_contains(address pc))
1070 {
1071 return (Interpreter::contains(pc) ? 1 : 0);
1072 }
1073 IRT_END
1074
1075
1076 // Implementation of SignatureHandlerLibrary
1077
1078 address SignatureHandlerLibrary::set_handler_blob() {
1079 BufferBlob* handler_blob = BufferBlob::create("native signature handlers", blob_size);
1080 if (handler_blob == NULL) {
1081 return NULL;
1082 }
1083 address handler = handler_blob->code_begin();
1084 _handler_blob = handler_blob;
1085 _handler = handler;
1086 return handler;
1087 }
1088
1089 void SignatureHandlerLibrary::initialize() {
1090 if (_fingerprints != NULL) {
1091 return;
1092 }
1093 if (set_handler_blob() == NULL) {
1094 vm_exit_out_of_memory(blob_size, "native signature handlers");
1095 }
1096
1097 BufferBlob* bb = BufferBlob::create("Signature Handler Temp Buffer",
1098 SignatureHandlerLibrary::buffer_size);
1099 _buffer = bb->code_begin();
1100
1101 _fingerprints = new(ResourceObj::C_HEAP)GrowableArray<uint64_t>(32, true);
1102 _handlers = new(ResourceObj::C_HEAP)GrowableArray<address>(32, true);
1103 }
1104
1105 address SignatureHandlerLibrary::set_handler(CodeBuffer* buffer) {
1106 address handler = _handler;
1107 int insts_size = buffer->pure_insts_size();
1108 if (handler + insts_size > _handler_blob->code_end()) {
1109 // get a new handler blob
1110 handler = set_handler_blob();
1111 }
1112 if (handler != NULL) {
1113 memcpy(handler, buffer->insts_begin(), insts_size);
1114 pd_set_handler(handler);
1115 ICache::invalidate_range(handler, insts_size);
1116 _handler = handler + insts_size;
1117 }
1118 return handler;
1119 }
1120
1121 void SignatureHandlerLibrary::add(methodHandle method) {
1122 if (method->signature_handler() == NULL) {
1123 // use slow signature handler if we can't do better
1124 int handler_index = -1;
1125 // check if we can use customized (fast) signature handler
1126 if (UseFastSignatureHandlers && method->size_of_parameters() <= Fingerprinter::max_size_of_parameters) {
1127 // use customized signature handler
1128 MutexLocker mu(SignatureHandlerLibrary_lock);
1129 // make sure data structure is initialized
1130 initialize();
1131 // lookup method signature's fingerprint
1132 uint64_t fingerprint = Fingerprinter(method).fingerprint();
1133 handler_index = _fingerprints->find(fingerprint);
1134 // create handler if necessary
1135 if (handler_index < 0) {
1136 ResourceMark rm;
1137 ptrdiff_t align_offset = (address)
1138 round_to((intptr_t)_buffer, CodeEntryAlignment) - (address)_buffer;
1139 CodeBuffer buffer((address)(_buffer + align_offset),
1140 SignatureHandlerLibrary::buffer_size - align_offset);
1141 InterpreterRuntime::SignatureHandlerGenerator(method, &buffer).generate(fingerprint);
1142 // copy into code heap
1143 address handler = set_handler(&buffer);
1144 if (handler == NULL) {
1145 // use slow signature handler
1146 } else {
1147 // debugging suppport
1148 if (PrintSignatureHandlers) {
1149 tty->cr();
1150 tty->print_cr("argument handler #%d for: %s %s (fingerprint = " UINT64_FORMAT ", %d bytes generated)",
1151 _handlers->length(),
1152 (method->is_static() ? "static" : "receiver"),
1153 method->name_and_sig_as_C_string(),
1154 fingerprint,
1155 buffer.insts_size());
1156 Disassembler::decode(handler, handler + buffer.insts_size());
1157 #ifndef PRODUCT
1158 tty->print_cr(" --- associated result handler ---");
1159 address rh_begin = Interpreter::result_handler(method()->result_type());
1160 address rh_end = rh_begin;
1161 while (*(int*)rh_end != 0) {
1162 rh_end += sizeof(int);
1163 }
1164 Disassembler::decode(rh_begin, rh_end);
1165 #endif
1166 }
1167 // add handler to library
1168 _fingerprints->append(fingerprint);
1169 _handlers->append(handler);
1170 // set handler index
1171 assert(_fingerprints->length() == _handlers->length(), "sanity check");
1172 handler_index = _fingerprints->length() - 1;
1173 }
1174 }
1175 // Set handler under SignatureHandlerLibrary_lock
1176 if (handler_index < 0) {
1177 // use generic signature handler
1178 method->set_signature_handler(Interpreter::slow_signature_handler());
1179 } else {
1180 // set handler
1181 method->set_signature_handler(_handlers->at(handler_index));
1182 }
1183 } else {
1184 CHECK_UNHANDLED_OOPS_ONLY(Thread::current()->clear_unhandled_oops());
1185 // use generic signature handler
1186 method->set_signature_handler(Interpreter::slow_signature_handler());
1187 }
1188 }
1189 #ifdef ASSERT
1190 int handler_index = -1;
1191 int fingerprint_index = -2;
1192 {
1193 // '_handlers' and '_fingerprints' are 'GrowableArray's and are NOT synchronized
1194 // in any way if accessed from multiple threads. To avoid races with another
1195 // thread which may change the arrays in the above, mutex protected block, we
1196 // have to protect this read access here with the same mutex as well!
1197 MutexLocker mu(SignatureHandlerLibrary_lock);
1198 if (_handlers != NULL) {
1199 handler_index = _handlers->find(method->signature_handler());
1200 fingerprint_index = _fingerprints->find(Fingerprinter(method).fingerprint());
1201 }
1202 }
1203 assert(method->signature_handler() == Interpreter::slow_signature_handler() ||
1204 handler_index == fingerprint_index, "sanity check");
1205 #endif // ASSERT
1206 }
1207
1208
1209 BufferBlob* SignatureHandlerLibrary::_handler_blob = NULL;
1210 address SignatureHandlerLibrary::_handler = NULL;
1211 GrowableArray<uint64_t>* SignatureHandlerLibrary::_fingerprints = NULL;
1212 GrowableArray<address>* SignatureHandlerLibrary::_handlers = NULL;
1213 address SignatureHandlerLibrary::_buffer = NULL;
1214
1215
1216 IRT_ENTRY(void, InterpreterRuntime::prepare_native_call(JavaThread* thread, methodOopDesc* method))
1217 methodHandle m(thread, method);
1218 assert(m->is_native(), "sanity check");
1219 // lookup native function entry point if it doesn't exist
1220 bool in_base_library;
1221 if (!m->has_native_function()) {
1222 NativeLookup::lookup(m, in_base_library, CHECK);
1223 }
1224 // make sure signature handler is installed
1225 SignatureHandlerLibrary::add(m);
1226 // The interpreter entry point checks the signature handler first,
1227 // before trying to fetch the native entry point and klass mirror.
1228 // We must set the signature handler last, so that multiple processors
1229 // preparing the same method will be sure to see non-null entry & mirror.
1230 IRT_END
1231
1232 #if defined(IA32) || defined(AMD64)
1233 IRT_LEAF(void, InterpreterRuntime::popframe_move_outgoing_args(JavaThread* thread, void* src_address, void* dest_address))
1234 if (src_address == dest_address) {
1235 return;
1236 }
1237 ResetNoHandleMark rnm; // In a LEAF entry.
1238 HandleMark hm;
1239 ResourceMark rm;
1240 frame fr = thread->last_frame();
1241 assert(fr.is_interpreted_frame(), "");
1242 jint bci = fr.interpreter_frame_bci();
1243 methodHandle mh(thread, fr.interpreter_frame_method());
1244 Bytecode_invoke invoke(mh, bci);
1245 ArgumentSizeComputer asc(invoke.signature());
1246 int size_of_arguments = (asc.size() + (invoke.has_receiver() ? 1 : 0)); // receiver
1247 Copy::conjoint_jbytes(src_address, dest_address,
1248 size_of_arguments * Interpreter::stackElementSize);
1249 IRT_END
1250 #endif