1 /*

     2  * Copyright (c) 1999, 2017, Oracle and/or its affiliates. All rights reserved.

     3  * Copyright 2008, 2009, 2010 Red Hat, Inc.

     4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

     5  *

     6  * This code is free software; you can redistribute it and/or modify it

     7  * under the terms of the GNU General Public License version 2 only, as

     8  * published by the Free Software Foundation.

     9  *

    10  * This code is distributed in the hope that it will be useful, but WITHOUT

    11  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

    12  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

    13  * version 2 for more details (a copy is included in the LICENSE file that

    14  * accompanied this code).

    15  *

    16  * You should have received a copy of the GNU General Public License version

    17  * 2 along with this work; if not, write to the Free Software Foundation,

    18  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

    19  *

    20  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

    21  * or visit www.oracle.com if you need additional information or have any

    22  * questions.

    23  *

    24  */

    25 

    26 #include "precompiled.hpp"

    27 #include "runtime/atomic.hpp"

    28 #include "runtime/biasedLocking.hpp"

    29 #include "runtime/deoptimization.hpp"

    30 #include "runtime/thread.hpp"

    31 #include "shark/llvmHeaders.hpp"

    32 #include "shark/sharkRuntime.hpp"

    33 #include "utilities/macros.hpp"

    34 #ifdef ZERO

    35 # include "stack_zero.inline.hpp"

    36 #endif

    37 

    38 using namespace llvm;

    39 

    40 JRT_ENTRY(int, SharkRuntime::find_exception_handler(JavaThread* thread,

    41                                                     int*        indexes,

    42                                                     int         num_indexes))

    43   constantPoolHandle pool(thread, method(thread)->constants());

    44   Klass* exc_klass = ((oop) tos_at(thread, 0))->klass();

    45 

    46   for (int i = 0; i < num_indexes; i++) {

    47     Klass* tmp = pool->klass_at(indexes[i], CHECK_0);

    48 

    49     if (exc_klass() == tmp)

    50       return i;

    51 

    52     if (exc_klass()->is_subtype_of(tmp))

    53       return i;

    54   }

    55 

    56   return -1;

    57 JRT_END

    58 

    59 JRT_ENTRY(void, SharkRuntime::monitorenter(JavaThread*      thread,

    60                                            BasicObjectLock* lock))

    61   if (PrintBiasedLockingStatistics)

    62     Atomic::inc(BiasedLocking::slow_path_entry_count_addr());

    63 

    64   Handle object(thread, lock->obj());

    65   assert(Universe::heap()->is_in_reserved_or_null(object()), "should be");

    66   if (UseBiasedLocking) {

    67     // Retry fast entry if bias is revoked to avoid unnecessary inflation

    68     ObjectSynchronizer::fast_enter(object, lock->lock(), true, CHECK);

    69   } else {

    70     ObjectSynchronizer::slow_enter(object, lock->lock(), CHECK);

    71   }

    72   assert(Universe::heap()->is_in_reserved_or_null(lock->obj()), "should be");

    73 JRT_END

    74 

    75 JRT_ENTRY(void, SharkRuntime::monitorexit(JavaThread*      thread,

    76                                           BasicObjectLock* lock))

    77   Handle object(thread, lock->obj());

    78   assert(Universe::heap()->is_in_reserved_or_null(object()), "should be");

    79   if (lock == NULL || object()->is_unlocked()) {

    80     THROW(vmSymbols::java_lang_IllegalMonitorStateException());

    81   }

    82   ObjectSynchronizer::slow_exit(object(), lock->lock(), thread);

    83 JRT_END

    84 

    85 JRT_ENTRY(void, SharkRuntime::new_instance(JavaThread* thread, int index))

    86   Klass* k_oop = method(thread)->constants()->klass_at(index, CHECK);

    87   InstanceKlass* klass = InstanceKlass::cast(k);

    88 

    89   // Make sure we are not instantiating an abstract klass

    90   klass->check_valid_for_instantiation(true, CHECK);

    91 

    92   // Make sure klass is initialized

    93   klass->initialize(CHECK);

    94 

    95   // At this point the class may not be fully initialized

    96   // because of recursive initialization. If it is fully

    97   // initialized & has_finalized is not set, we rewrite

    98   // it into its fast version (Note: no locking is needed

    99   // here since this is an atomic byte write and can be

   100   // done more than once).

   101   //

   102   // Note: In case of classes with has_finalized we don't

   103   //       rewrite since that saves us an extra check in

   104   //       the fast version which then would call the

   105   //       slow version anyway (and do a call back into

   106   //       Java).

   107   //       If we have a breakpoint, then we don't rewrite

   108   //       because the _breakpoint bytecode would be lost.

   109   oop obj = klass->allocate_instance(CHECK);

   110   thread->set_vm_result(obj);

   111 JRT_END

   112 

   113 JRT_ENTRY(void, SharkRuntime::newarray(JavaThread* thread,

   114                                        BasicType   type,

   115                                        int         size))

   116   oop obj = oopFactory::new_typeArray(type, size, CHECK);

   117   thread->set_vm_result(obj);

   118 JRT_END

   119 

   120 JRT_ENTRY(void, SharkRuntime::anewarray(JavaThread* thread,

   121                                         int         index,

   122                                         int         size))

   123   Klass* klass = method(thread)->constants()->klass_at(index, CHECK);

   124   objArrayOop obj = oopFactory::new_objArray(klass, size, CHECK);

   125   thread->set_vm_result(obj);

   126 JRT_END

   127 

   128 JRT_ENTRY(void, SharkRuntime::multianewarray(JavaThread* thread,

   129                                              int         index,

   130                                              int         ndims,

   131                                              int*        dims))

   132   Klass* klass = method(thread)->constants()->klass_at(index, CHECK);

   133   oop obj = ArrayKlass::cast(klass)->multi_allocate(ndims, dims, CHECK);

   134   thread->set_vm_result(obj);

   135 JRT_END

   136 

   137 JRT_ENTRY(void, SharkRuntime::register_finalizer(JavaThread* thread,

   138                                                  oop         object))

   139   assert(oopDesc::is_oop(object), "should be");

   140   assert(object->klass()->has_finalizer(), "should have");

   141   InstanceKlass::register_finalizer(instanceOop(object), CHECK);

   142 JRT_END

   143 

   144 JRT_ENTRY(void, SharkRuntime::throw_ArithmeticException(JavaThread* thread,

   145                                                         const char* file,

   146                                                         int         line))

   147   Exceptions::_throw_msg(

   148     thread, file, line,

   149     vmSymbols::java_lang_ArithmeticException(),

   150     "");

   151 JRT_END

   152 

   153 JRT_ENTRY(void, SharkRuntime::throw_ArrayIndexOutOfBoundsException(

   154                                                      JavaThread* thread,

   155                                                      const char* file,

   156                                                      int         line,

   157                                                      int         index))

   158   char msg[jintAsStringSize];

   159   snprintf(msg, sizeof(msg), "%d", index);

   160   Exceptions::_throw_msg(

   161     thread, file, line,

   162     vmSymbols::java_lang_ArrayIndexOutOfBoundsException(),

   163     msg);

   164 JRT_END

   165 

   166 JRT_ENTRY(void, SharkRuntime::throw_ClassCastException(JavaThread* thread,

   167                                                        const char* file,

   168                                                        int         line))

   169   Exceptions::_throw_msg(

   170     thread, file, line,

   171     vmSymbols::java_lang_ClassCastException(),

   172     "");

   173 JRT_END

   174 

   175 JRT_ENTRY(void, SharkRuntime::throw_NullPointerException(JavaThread* thread,

   176                                                          const char* file,

   177                                                          int         line))

   178   Exceptions::_throw_msg(

   179     thread, file, line,

   180     vmSymbols::java_lang_NullPointerException(),

   181     "");

   182 JRT_END

   183 

   184 // Non-VM calls

   185 // Nothing in these must ever GC!

   186 

   187 void SharkRuntime::dump(const char *name, intptr_t value) {

   188   oop valueOop = (oop) value;

   189   tty->print("%s = ", name);

   190   if (valueOop->is_oop(true))

   191     valueOop->print_on(tty);

   192   else if (value >= ' ' && value <= '~')

   193     tty->print("'%c' (%d)", value, value);

   194   else

   195     tty->print("%p", value);

   196   tty->print_cr("");

   197 }

   198 

   199 bool SharkRuntime::is_subtype_of(Klass* check_klass, Klass* object_klass) {

   200   return object_klass->is_subtype_of(check_klass);

   201 }

   202 

   203 int SharkRuntime::uncommon_trap(JavaThread* thread, int trap_request) {

   204   Thread *THREAD = thread;

   205 

   206   // In C2, uncommon_trap_blob creates a frame, so all the various

   207   // deoptimization functions expect to find the frame of the method

   208   // being deopted one frame down on the stack.  We create a dummy

   209   // frame to mirror this.

   210   FakeStubFrame *stubframe = FakeStubFrame::build(CHECK_0);

   211   thread->push_zero_frame(stubframe);

   212 

   213   // Initiate the trap

   214   thread->set_last_Java_frame();

   215   Deoptimization::UnrollBlock *urb =

   216     Deoptimization::uncommon_trap(thread, trap_request, Deoptimization::Unpack_uncommon_trap);

   217   thread->reset_last_Java_frame();

   218   assert(urb->unpack_kind() == Deoptimization::Unpack_uncommon_trap, "expected Unpack_uncommon_trap");

   219 

   220   // Pop our dummy frame and the frame being deoptimized

   221   thread->pop_zero_frame();

   222   thread->pop_zero_frame();

   223 

   224   // Push skeleton frames

   225   int number_of_frames = urb->number_of_frames();

   226   for (int i = 0; i < number_of_frames; i++) {

   227     intptr_t size = urb->frame_sizes()[i];

   228     InterpreterFrame *frame = InterpreterFrame::build(size, CHECK_0);

   229     thread->push_zero_frame(frame);

   230   }

   231 

   232   // Push another dummy frame

   233   stubframe = FakeStubFrame::build(CHECK_0);

   234   thread->push_zero_frame(stubframe);

   235 

   236   // Fill in the skeleton frames

   237   thread->set_last_Java_frame();

   238   Deoptimization::unpack_frames(thread, Deoptimization::Unpack_uncommon_trap);

   239   thread->reset_last_Java_frame();

   240 

   241   // Pop our dummy frame

   242   thread->pop_zero_frame();

   243 

   244   // Fall back into the interpreter

   245   return number_of_frames;

   246 }

   247 

   248 FakeStubFrame* FakeStubFrame::build(TRAPS) {

   249   ZeroStack *stack = ((JavaThread *) THREAD)->zero_stack();

   250   stack->overflow_check(header_words, CHECK_NULL);

   251 

   252   stack->push(0); // next_frame, filled in later

   253   intptr_t *fp = stack->sp();

   254   assert(fp - stack->sp() == next_frame_off, "should be");

   255 

   256   stack->push(FAKE_STUB_FRAME);

   257   assert(fp - stack->sp() == frame_type_off, "should be");

   258 

   259   return (FakeStubFrame *) fp;

   260 }