src/share/vm/ci/ciEnv.cpp

Wed, 27 Aug 2014 08:19:12 -0400

author
zgu
date
Wed, 27 Aug 2014 08:19:12 -0400
changeset 7074
833b0f92429a
parent 6911
ce8f6bb717c9
child 7183
dd89808e49ba
permissions
-rw-r--r--

8046598: Scalable Native memory tracking development
Summary: Enhance scalability of native memory tracking
Reviewed-by: coleenp, ctornqvi, gtriantafill

     1 /*
     2  * Copyright (c) 1999, 2014, 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  */
    25 #include "precompiled.hpp"
    26 #include "ci/ciConstant.hpp"
    27 #include "ci/ciEnv.hpp"
    28 #include "ci/ciField.hpp"
    29 #include "ci/ciInstance.hpp"
    30 #include "ci/ciInstanceKlass.hpp"
    31 #include "ci/ciMethod.hpp"
    32 #include "ci/ciNullObject.hpp"
    33 #include "ci/ciReplay.hpp"
    34 #include "ci/ciUtilities.hpp"
    35 #include "classfile/systemDictionary.hpp"
    36 #include "classfile/vmSymbols.hpp"
    37 #include "code/scopeDesc.hpp"
    38 #include "compiler/compileBroker.hpp"
    39 #include "compiler/compileLog.hpp"
    40 #include "compiler/compilerOracle.hpp"
    41 #include "gc_interface/collectedHeap.inline.hpp"
    42 #include "interpreter/linkResolver.hpp"
    43 #include "memory/allocation.inline.hpp"
    44 #include "memory/oopFactory.hpp"
    45 #include "memory/universe.inline.hpp"
    46 #include "oops/methodData.hpp"
    47 #include "oops/objArrayKlass.hpp"
    48 #include "oops/oop.inline.hpp"
    49 #include "oops/oop.inline2.hpp"
    50 #include "prims/jvmtiExport.hpp"
    51 #include "runtime/init.hpp"
    52 #include "runtime/reflection.hpp"
    53 #include "runtime/sharedRuntime.hpp"
    54 #include "runtime/thread.inline.hpp"
    55 #include "utilities/dtrace.hpp"
    56 #include "utilities/macros.hpp"
    57 #ifdef COMPILER1
    58 #include "c1/c1_Runtime1.hpp"
    59 #endif
    60 #ifdef COMPILER2
    61 #include "opto/runtime.hpp"
    62 #endif
    64 // ciEnv
    65 //
    66 // This class is the top level broker for requests from the compiler
    67 // to the VM.
    69 ciObject*              ciEnv::_null_object_instance;
    71 #define WK_KLASS_DEFN(name, ignore_s, ignore_o) ciInstanceKlass* ciEnv::_##name = NULL;
    72 WK_KLASSES_DO(WK_KLASS_DEFN)
    73 #undef WK_KLASS_DEFN
    75 ciSymbol*        ciEnv::_unloaded_cisymbol = NULL;
    76 ciInstanceKlass* ciEnv::_unloaded_ciinstance_klass = NULL;
    77 ciObjArrayKlass* ciEnv::_unloaded_ciobjarrayklass = NULL;
    79 jobject ciEnv::_ArrayIndexOutOfBoundsException_handle = NULL;
    80 jobject ciEnv::_ArrayStoreException_handle = NULL;
    81 jobject ciEnv::_ClassCastException_handle = NULL;
    83 #ifndef PRODUCT
    84 static bool firstEnv = true;
    85 #endif /* PRODUCT */
    87 // ------------------------------------------------------------------
    88 // ciEnv::ciEnv
    89 ciEnv::ciEnv(CompileTask* task, int system_dictionary_modification_counter)
    90   : _ciEnv_arena(mtCompiler) {
    91   VM_ENTRY_MARK;
    93   // Set up ciEnv::current immediately, for the sake of ciObjectFactory, etc.
    94   thread->set_env(this);
    95   assert(ciEnv::current() == this, "sanity");
    97   _oop_recorder = NULL;
    98   _debug_info = NULL;
    99   _dependencies = NULL;
   100   _failure_reason = NULL;
   101   _compilable = MethodCompilable;
   102   _break_at_compile = false;
   103   _compiler_data = NULL;
   104 #ifndef PRODUCT
   105   assert(!firstEnv, "not initialized properly");
   106 #endif /* !PRODUCT */
   108   _system_dictionary_modification_counter = system_dictionary_modification_counter;
   109   _num_inlined_bytecodes = 0;
   110   assert(task == NULL || thread->task() == task, "sanity");
   111   _task = task;
   112   _log = NULL;
   114   // Temporary buffer for creating symbols and such.
   115   _name_buffer = NULL;
   116   _name_buffer_len = 0;
   118   _arena   = &_ciEnv_arena;
   119   _factory = new (_arena) ciObjectFactory(_arena, 128);
   121   // Preload commonly referenced system ciObjects.
   123   // During VM initialization, these instances have not yet been created.
   124   // Assertions ensure that these instances are not accessed before
   125   // their initialization.
   127   assert(Universe::is_fully_initialized(), "should be complete");
   129   oop o = Universe::null_ptr_exception_instance();
   130   assert(o != NULL, "should have been initialized");
   131   _NullPointerException_instance = get_object(o)->as_instance();
   132   o = Universe::arithmetic_exception_instance();
   133   assert(o != NULL, "should have been initialized");
   134   _ArithmeticException_instance = get_object(o)->as_instance();
   136   _ArrayIndexOutOfBoundsException_instance = NULL;
   137   _ArrayStoreException_instance = NULL;
   138   _ClassCastException_instance = NULL;
   139   _the_null_string = NULL;
   140   _the_min_jint_string = NULL;
   141 }
   143 ciEnv::ciEnv(Arena* arena) : _ciEnv_arena(mtCompiler) {
   144   ASSERT_IN_VM;
   146   // Set up ciEnv::current immediately, for the sake of ciObjectFactory, etc.
   147   CompilerThread* current_thread = CompilerThread::current();
   148   assert(current_thread->env() == NULL, "must be");
   149   current_thread->set_env(this);
   150   assert(ciEnv::current() == this, "sanity");
   152   _oop_recorder = NULL;
   153   _debug_info = NULL;
   154   _dependencies = NULL;
   155   _failure_reason = NULL;
   156   _compilable = MethodCompilable_never;
   157   _break_at_compile = false;
   158   _compiler_data = NULL;
   159 #ifndef PRODUCT
   160   assert(firstEnv, "must be first");
   161   firstEnv = false;
   162 #endif /* !PRODUCT */
   164   _system_dictionary_modification_counter = 0;
   165   _num_inlined_bytecodes = 0;
   166   _task = NULL;
   167   _log = NULL;
   169   // Temporary buffer for creating symbols and such.
   170   _name_buffer = NULL;
   171   _name_buffer_len = 0;
   173   _arena   = arena;
   174   _factory = new (_arena) ciObjectFactory(_arena, 128);
   176   // Preload commonly referenced system ciObjects.
   178   // During VM initialization, these instances have not yet been created.
   179   // Assertions ensure that these instances are not accessed before
   180   // their initialization.
   182   assert(Universe::is_fully_initialized(), "must be");
   184   _NullPointerException_instance = NULL;
   185   _ArithmeticException_instance = NULL;
   186   _ArrayIndexOutOfBoundsException_instance = NULL;
   187   _ArrayStoreException_instance = NULL;
   188   _ClassCastException_instance = NULL;
   189   _the_null_string = NULL;
   190   _the_min_jint_string = NULL;
   191 }
   193 ciEnv::~ciEnv() {
   194   CompilerThread* current_thread = CompilerThread::current();
   195   _factory->remove_symbols();
   196   // Need safepoint to clear the env on the thread.  RedefineClasses might
   197   // be reading it.
   198   GUARDED_VM_ENTRY(current_thread->set_env(NULL);)
   199 }
   201 // ------------------------------------------------------------------
   202 // Cache Jvmti state
   203 void ciEnv::cache_jvmti_state() {
   204   VM_ENTRY_MARK;
   205   // Get Jvmti capabilities under lock to get consistant values.
   206   MutexLocker mu(JvmtiThreadState_lock);
   207   _jvmti_can_hotswap_or_post_breakpoint = JvmtiExport::can_hotswap_or_post_breakpoint();
   208   _jvmti_can_access_local_variables     = JvmtiExport::can_access_local_variables();
   209   _jvmti_can_post_on_exceptions         = JvmtiExport::can_post_on_exceptions();
   210 }
   212 // ------------------------------------------------------------------
   213 // Cache DTrace flags
   214 void ciEnv::cache_dtrace_flags() {
   215   // Need lock?
   216   _dtrace_extended_probes = ExtendedDTraceProbes;
   217   if (_dtrace_extended_probes) {
   218     _dtrace_monitor_probes  = true;
   219     _dtrace_method_probes   = true;
   220     _dtrace_alloc_probes    = true;
   221   } else {
   222     _dtrace_monitor_probes  = DTraceMonitorProbes;
   223     _dtrace_method_probes   = DTraceMethodProbes;
   224     _dtrace_alloc_probes    = DTraceAllocProbes;
   225   }
   226 }
   228 // ------------------------------------------------------------------
   229 // helper for lazy exception creation
   230 ciInstance* ciEnv::get_or_create_exception(jobject& handle, Symbol* name) {
   231   VM_ENTRY_MARK;
   232   if (handle == NULL) {
   233     // Cf. universe.cpp, creation of Universe::_null_ptr_exception_instance.
   234     Klass* k = SystemDictionary::find(name, Handle(), Handle(), THREAD);
   235     jobject objh = NULL;
   236     if (!HAS_PENDING_EXCEPTION && k != NULL) {
   237       oop obj = InstanceKlass::cast(k)->allocate_instance(THREAD);
   238       if (!HAS_PENDING_EXCEPTION)
   239         objh = JNIHandles::make_global(obj);
   240     }
   241     if (HAS_PENDING_EXCEPTION) {
   242       CLEAR_PENDING_EXCEPTION;
   243     } else {
   244       handle = objh;
   245     }
   246   }
   247   oop obj = JNIHandles::resolve(handle);
   248   return obj == NULL? NULL: get_object(obj)->as_instance();
   249 }
   251 ciInstance* ciEnv::ArrayIndexOutOfBoundsException_instance() {
   252   if (_ArrayIndexOutOfBoundsException_instance == NULL) {
   253     _ArrayIndexOutOfBoundsException_instance
   254           = get_or_create_exception(_ArrayIndexOutOfBoundsException_handle,
   255           vmSymbols::java_lang_ArrayIndexOutOfBoundsException());
   256   }
   257   return _ArrayIndexOutOfBoundsException_instance;
   258 }
   259 ciInstance* ciEnv::ArrayStoreException_instance() {
   260   if (_ArrayStoreException_instance == NULL) {
   261     _ArrayStoreException_instance
   262           = get_or_create_exception(_ArrayStoreException_handle,
   263           vmSymbols::java_lang_ArrayStoreException());
   264   }
   265   return _ArrayStoreException_instance;
   266 }
   267 ciInstance* ciEnv::ClassCastException_instance() {
   268   if (_ClassCastException_instance == NULL) {
   269     _ClassCastException_instance
   270           = get_or_create_exception(_ClassCastException_handle,
   271           vmSymbols::java_lang_ClassCastException());
   272   }
   273   return _ClassCastException_instance;
   274 }
   276 ciInstance* ciEnv::the_null_string() {
   277   if (_the_null_string == NULL) {
   278     VM_ENTRY_MARK;
   279     _the_null_string = get_object(Universe::the_null_string())->as_instance();
   280   }
   281   return _the_null_string;
   282 }
   284 ciInstance* ciEnv::the_min_jint_string() {
   285   if (_the_min_jint_string == NULL) {
   286     VM_ENTRY_MARK;
   287     _the_min_jint_string = get_object(Universe::the_min_jint_string())->as_instance();
   288   }
   289   return _the_min_jint_string;
   290 }
   292 // ------------------------------------------------------------------
   293 // ciEnv::get_method_from_handle
   294 ciMethod* ciEnv::get_method_from_handle(Method* method) {
   295   VM_ENTRY_MARK;
   296   return get_metadata(method)->as_method();
   297 }
   299 // ------------------------------------------------------------------
   300 // ciEnv::array_element_offset_in_bytes
   301 int ciEnv::array_element_offset_in_bytes(ciArray* a_h, ciObject* o_h) {
   302   VM_ENTRY_MARK;
   303   objArrayOop a = (objArrayOop)a_h->get_oop();
   304   assert(a->is_objArray(), "");
   305   int length = a->length();
   306   oop o = o_h->get_oop();
   307   for (int i = 0; i < length; i++) {
   308     if (a->obj_at(i) == o)  return i;
   309   }
   310   return -1;
   311 }
   314 // ------------------------------------------------------------------
   315 // ciEnv::check_klass_accessiblity
   316 //
   317 // Note: the logic of this method should mirror the logic of
   318 // ConstantPool::verify_constant_pool_resolve.
   319 bool ciEnv::check_klass_accessibility(ciKlass* accessing_klass,
   320                                       Klass* resolved_klass) {
   321   if (accessing_klass == NULL || !accessing_klass->is_loaded()) {
   322     return true;
   323   }
   324   if (accessing_klass->is_obj_array_klass()) {
   325     accessing_klass = accessing_klass->as_obj_array_klass()->base_element_klass();
   326   }
   327   if (!accessing_klass->is_instance_klass()) {
   328     return true;
   329   }
   331   if (resolved_klass->oop_is_objArray()) {
   332     // Find the element klass, if this is an array.
   333     resolved_klass = ObjArrayKlass::cast(resolved_klass)->bottom_klass();
   334   }
   335   if (resolved_klass->oop_is_instance()) {
   336     return Reflection::verify_class_access(accessing_klass->get_Klass(),
   337                                            resolved_klass,
   338                                            true);
   339   }
   340   return true;
   341 }
   343 // ------------------------------------------------------------------
   344 // ciEnv::get_klass_by_name_impl
   345 ciKlass* ciEnv::get_klass_by_name_impl(ciKlass* accessing_klass,
   346                                        constantPoolHandle cpool,
   347                                        ciSymbol* name,
   348                                        bool require_local) {
   349   ASSERT_IN_VM;
   350   EXCEPTION_CONTEXT;
   352   // Now we need to check the SystemDictionary
   353   Symbol* sym = name->get_symbol();
   354   if (sym->byte_at(0) == 'L' &&
   355     sym->byte_at(sym->utf8_length()-1) == ';') {
   356     // This is a name from a signature.  Strip off the trimmings.
   357     // Call recursive to keep scope of strippedsym.
   358     TempNewSymbol strippedsym = SymbolTable::new_symbol(sym->as_utf8()+1,
   359                     sym->utf8_length()-2,
   360                     KILL_COMPILE_ON_FATAL_(_unloaded_ciinstance_klass));
   361     ciSymbol* strippedname = get_symbol(strippedsym);
   362     return get_klass_by_name_impl(accessing_klass, cpool, strippedname, require_local);
   363   }
   365   // Check for prior unloaded klass.  The SystemDictionary's answers
   366   // can vary over time but the compiler needs consistency.
   367   ciKlass* unloaded_klass = check_get_unloaded_klass(accessing_klass, name);
   368   if (unloaded_klass != NULL) {
   369     if (require_local)  return NULL;
   370     return unloaded_klass;
   371   }
   373   Handle loader(THREAD, (oop)NULL);
   374   Handle domain(THREAD, (oop)NULL);
   375   if (accessing_klass != NULL) {
   376     loader = Handle(THREAD, accessing_klass->loader());
   377     domain = Handle(THREAD, accessing_klass->protection_domain());
   378   }
   380   // setup up the proper type to return on OOM
   381   ciKlass* fail_type;
   382   if (sym->byte_at(0) == '[') {
   383     fail_type = _unloaded_ciobjarrayklass;
   384   } else {
   385     fail_type = _unloaded_ciinstance_klass;
   386   }
   387   KlassHandle found_klass;
   388   {
   389     ttyUnlocker ttyul;  // release tty lock to avoid ordering problems
   390     MutexLocker ml(Compile_lock);
   391     Klass* kls;
   392     if (!require_local) {
   393       kls = SystemDictionary::find_constrained_instance_or_array_klass(sym, loader,
   394                                                                        KILL_COMPILE_ON_FATAL_(fail_type));
   395     } else {
   396       kls = SystemDictionary::find_instance_or_array_klass(sym, loader, domain,
   397                                                            KILL_COMPILE_ON_FATAL_(fail_type));
   398     }
   399     found_klass = KlassHandle(THREAD, kls);
   400   }
   402   // If we fail to find an array klass, look again for its element type.
   403   // The element type may be available either locally or via constraints.
   404   // In either case, if we can find the element type in the system dictionary,
   405   // we must build an array type around it.  The CI requires array klasses
   406   // to be loaded if their element klasses are loaded, except when memory
   407   // is exhausted.
   408   if (sym->byte_at(0) == '[' &&
   409       (sym->byte_at(1) == '[' || sym->byte_at(1) == 'L')) {
   410     // We have an unloaded array.
   411     // Build it on the fly if the element class exists.
   412     TempNewSymbol elem_sym = SymbolTable::new_symbol(sym->as_utf8()+1,
   413                                                  sym->utf8_length()-1,
   414                                                  KILL_COMPILE_ON_FATAL_(fail_type));
   416     // Get element ciKlass recursively.
   417     ciKlass* elem_klass =
   418       get_klass_by_name_impl(accessing_klass,
   419                              cpool,
   420                              get_symbol(elem_sym),
   421                              require_local);
   422     if (elem_klass != NULL && elem_klass->is_loaded()) {
   423       // Now make an array for it
   424       return ciObjArrayKlass::make_impl(elem_klass);
   425     }
   426   }
   428   if (found_klass() == NULL && !cpool.is_null() && cpool->has_preresolution()) {
   429     // Look inside the constant pool for pre-resolved class entries.
   430     for (int i = cpool->length() - 1; i >= 1; i--) {
   431       if (cpool->tag_at(i).is_klass()) {
   432         Klass* kls = cpool->resolved_klass_at(i);
   433         if (kls->name() == sym) {
   434           found_klass = KlassHandle(THREAD, kls);
   435           break;
   436         }
   437       }
   438     }
   439   }
   441   if (found_klass() != NULL) {
   442     // Found it.  Build a CI handle.
   443     return get_klass(found_klass());
   444   }
   446   if (require_local)  return NULL;
   448   // Not yet loaded into the VM, or not governed by loader constraints.
   449   // Make a CI representative for it.
   450   return get_unloaded_klass(accessing_klass, name);
   451 }
   453 // ------------------------------------------------------------------
   454 // ciEnv::get_klass_by_name
   455 ciKlass* ciEnv::get_klass_by_name(ciKlass* accessing_klass,
   456                                   ciSymbol* klass_name,
   457                                   bool require_local) {
   458   GUARDED_VM_ENTRY(return get_klass_by_name_impl(accessing_klass,
   459                                                  constantPoolHandle(),
   460                                                  klass_name,
   461                                                  require_local);)
   462 }
   464 // ------------------------------------------------------------------
   465 // ciEnv::get_klass_by_index_impl
   466 //
   467 // Implementation of get_klass_by_index.
   468 ciKlass* ciEnv::get_klass_by_index_impl(constantPoolHandle cpool,
   469                                         int index,
   470                                         bool& is_accessible,
   471                                         ciInstanceKlass* accessor) {
   472   EXCEPTION_CONTEXT;
   473   KlassHandle klass; // = NULL;
   474   Symbol* klass_name = NULL;
   476   if (cpool->tag_at(index).is_symbol()) {
   477     klass_name = cpool->symbol_at(index);
   478   } else {
   479     // Check if it's resolved if it's not a symbol constant pool entry.
   480     klass = KlassHandle(THREAD, ConstantPool::klass_at_if_loaded(cpool, index));
   482   if (klass.is_null()) {
   483     // The klass has not been inserted into the constant pool.
   484     // Try to look it up by name.
   485     {
   486       // We have to lock the cpool to keep the oop from being resolved
   487       // while we are accessing it.
   488         MonitorLockerEx ml(cpool->lock());
   489       constantTag tag = cpool->tag_at(index);
   490       if (tag.is_klass()) {
   491         // The klass has been inserted into the constant pool
   492         // very recently.
   493         klass = KlassHandle(THREAD, cpool->resolved_klass_at(index));
   494       } else {
   495         assert(cpool->tag_at(index).is_unresolved_klass(), "wrong tag");
   496         klass_name = cpool->unresolved_klass_at(index);
   497       }
   498     }
   499   }
   500   }
   502   if (klass.is_null()) {
   503     // Not found in constant pool.  Use the name to do the lookup.
   504     ciKlass* k = get_klass_by_name_impl(accessor,
   505                                         cpool,
   506                                         get_symbol(klass_name),
   507                                         false);
   508     // Calculate accessibility the hard way.
   509     if (!k->is_loaded()) {
   510       is_accessible = false;
   511     } else if (k->loader() != accessor->loader() &&
   512                get_klass_by_name_impl(accessor, cpool, k->name(), true) == NULL) {
   513       // Loaded only remotely.  Not linked yet.
   514       is_accessible = false;
   515     } else {
   516       // Linked locally, and we must also check public/private, etc.
   517       is_accessible = check_klass_accessibility(accessor, k->get_Klass());
   518     }
   519     return k;
   520   }
   522   // Check for prior unloaded klass.  The SystemDictionary's answers
   523   // can vary over time but the compiler needs consistency.
   524   ciSymbol* name = get_symbol(klass()->name());
   525   ciKlass* unloaded_klass = check_get_unloaded_klass(accessor, name);
   526   if (unloaded_klass != NULL) {
   527     is_accessible = false;
   528     return unloaded_klass;
   529   }
   531   // It is known to be accessible, since it was found in the constant pool.
   532   is_accessible = true;
   533   return get_klass(klass());
   534 }
   536 // ------------------------------------------------------------------
   537 // ciEnv::get_klass_by_index
   538 //
   539 // Get a klass from the constant pool.
   540 ciKlass* ciEnv::get_klass_by_index(constantPoolHandle cpool,
   541                                    int index,
   542                                    bool& is_accessible,
   543                                    ciInstanceKlass* accessor) {
   544   GUARDED_VM_ENTRY(return get_klass_by_index_impl(cpool, index, is_accessible, accessor);)
   545 }
   547 // ------------------------------------------------------------------
   548 // ciEnv::get_constant_by_index_impl
   549 //
   550 // Implementation of get_constant_by_index().
   551 ciConstant ciEnv::get_constant_by_index_impl(constantPoolHandle cpool,
   552                                              int pool_index, int cache_index,
   553                                              ciInstanceKlass* accessor) {
   554   bool ignore_will_link;
   555   EXCEPTION_CONTEXT;
   556   int index = pool_index;
   557   if (cache_index >= 0) {
   558     assert(index < 0, "only one kind of index at a time");
   559     oop obj = cpool->resolved_references()->obj_at(cache_index);
   560     if (obj != NULL) {
   561       ciObject* ciobj = get_object(obj);
   562       return ciConstant(T_OBJECT, ciobj);
   563     }
   564     index = cpool->object_to_cp_index(cache_index);
   565   }
   566   constantTag tag = cpool->tag_at(index);
   567   if (tag.is_int()) {
   568     return ciConstant(T_INT, (jint)cpool->int_at(index));
   569   } else if (tag.is_long()) {
   570     return ciConstant((jlong)cpool->long_at(index));
   571   } else if (tag.is_float()) {
   572     return ciConstant((jfloat)cpool->float_at(index));
   573   } else if (tag.is_double()) {
   574     return ciConstant((jdouble)cpool->double_at(index));
   575   } else if (tag.is_string()) {
   576     oop string = NULL;
   577     assert(cache_index >= 0, "should have a cache index");
   578     if (cpool->is_pseudo_string_at(index)) {
   579       string = cpool->pseudo_string_at(index, cache_index);
   580     } else {
   581       string = cpool->string_at(index, cache_index, THREAD);
   582       if (HAS_PENDING_EXCEPTION) {
   583         CLEAR_PENDING_EXCEPTION;
   584         record_out_of_memory_failure();
   585         return ciConstant();
   586       }
   587     }
   588     ciObject* constant = get_object(string);
   589     assert (constant->is_instance(), "must be an instance, or not? ");
   590     return ciConstant(T_OBJECT, constant);
   591   } else if (tag.is_klass() || tag.is_unresolved_klass()) {
   592     // 4881222: allow ldc to take a class type
   593     ciKlass* klass = get_klass_by_index_impl(cpool, index, ignore_will_link, accessor);
   594     if (HAS_PENDING_EXCEPTION) {
   595       CLEAR_PENDING_EXCEPTION;
   596       record_out_of_memory_failure();
   597       return ciConstant();
   598     }
   599     assert (klass->is_instance_klass() || klass->is_array_klass(),
   600             "must be an instance or array klass ");
   601     return ciConstant(T_OBJECT, klass->java_mirror());
   602   } else if (tag.is_method_type()) {
   603     // must execute Java code to link this CP entry into cache[i].f1
   604     ciSymbol* signature = get_symbol(cpool->method_type_signature_at(index));
   605     ciObject* ciobj = get_unloaded_method_type_constant(signature);
   606     return ciConstant(T_OBJECT, ciobj);
   607   } else if (tag.is_method_handle()) {
   608     // must execute Java code to link this CP entry into cache[i].f1
   609     int ref_kind        = cpool->method_handle_ref_kind_at(index);
   610     int callee_index    = cpool->method_handle_klass_index_at(index);
   611     ciKlass* callee     = get_klass_by_index_impl(cpool, callee_index, ignore_will_link, accessor);
   612     ciSymbol* name      = get_symbol(cpool->method_handle_name_ref_at(index));
   613     ciSymbol* signature = get_symbol(cpool->method_handle_signature_ref_at(index));
   614     ciObject* ciobj     = get_unloaded_method_handle_constant(callee, name, signature, ref_kind);
   615     return ciConstant(T_OBJECT, ciobj);
   616   } else {
   617     ShouldNotReachHere();
   618     return ciConstant();
   619   }
   620 }
   622 // ------------------------------------------------------------------
   623 // ciEnv::get_constant_by_index
   624 //
   625 // Pull a constant out of the constant pool.  How appropriate.
   626 //
   627 // Implementation note: this query is currently in no way cached.
   628 ciConstant ciEnv::get_constant_by_index(constantPoolHandle cpool,
   629                                         int pool_index, int cache_index,
   630                                         ciInstanceKlass* accessor) {
   631   GUARDED_VM_ENTRY(return get_constant_by_index_impl(cpool, pool_index, cache_index, accessor);)
   632 }
   634 // ------------------------------------------------------------------
   635 // ciEnv::get_field_by_index_impl
   636 //
   637 // Implementation of get_field_by_index.
   638 //
   639 // Implementation note: the results of field lookups are cached
   640 // in the accessor klass.
   641 ciField* ciEnv::get_field_by_index_impl(ciInstanceKlass* accessor,
   642                                         int index) {
   643   ciConstantPoolCache* cache = accessor->field_cache();
   644   if (cache == NULL) {
   645     ciField* field = new (arena()) ciField(accessor, index);
   646     return field;
   647   } else {
   648     ciField* field = (ciField*)cache->get(index);
   649     if (field == NULL) {
   650       field = new (arena()) ciField(accessor, index);
   651       cache->insert(index, field);
   652     }
   653     return field;
   654   }
   655 }
   657 // ------------------------------------------------------------------
   658 // ciEnv::get_field_by_index
   659 //
   660 // Get a field by index from a klass's constant pool.
   661 ciField* ciEnv::get_field_by_index(ciInstanceKlass* accessor,
   662                                    int index) {
   663   GUARDED_VM_ENTRY(return get_field_by_index_impl(accessor, index);)
   664 }
   666 // ------------------------------------------------------------------
   667 // ciEnv::lookup_method
   668 //
   669 // Perform an appropriate method lookup based on accessor, holder,
   670 // name, signature, and bytecode.
   671 Method* ciEnv::lookup_method(InstanceKlass*  accessor,
   672                                InstanceKlass*  holder,
   673                                Symbol*       name,
   674                                Symbol*       sig,
   675                                Bytecodes::Code bc) {
   676   EXCEPTION_CONTEXT;
   677   KlassHandle h_accessor(THREAD, accessor);
   678   KlassHandle h_holder(THREAD, holder);
   679   LinkResolver::check_klass_accessability(h_accessor, h_holder, KILL_COMPILE_ON_FATAL_(NULL));
   680   methodHandle dest_method;
   681   switch (bc) {
   682   case Bytecodes::_invokestatic:
   683     dest_method =
   684       LinkResolver::resolve_static_call_or_null(h_holder, name, sig, h_accessor);
   685     break;
   686   case Bytecodes::_invokespecial:
   687     dest_method =
   688       LinkResolver::resolve_special_call_or_null(h_holder, name, sig, h_accessor);
   689     break;
   690   case Bytecodes::_invokeinterface:
   691     dest_method =
   692       LinkResolver::linktime_resolve_interface_method_or_null(h_holder, name, sig,
   693                                                               h_accessor, true);
   694     break;
   695   case Bytecodes::_invokevirtual:
   696     dest_method =
   697       LinkResolver::linktime_resolve_virtual_method_or_null(h_holder, name, sig,
   698                                                             h_accessor, true);
   699     break;
   700   default: ShouldNotReachHere();
   701   }
   703   return dest_method();
   704 }
   707 // ------------------------------------------------------------------
   708 // ciEnv::get_method_by_index_impl
   709 ciMethod* ciEnv::get_method_by_index_impl(constantPoolHandle cpool,
   710                                           int index, Bytecodes::Code bc,
   711                                           ciInstanceKlass* accessor) {
   712   if (bc == Bytecodes::_invokedynamic) {
   713     ConstantPoolCacheEntry* cpce = cpool->invokedynamic_cp_cache_entry_at(index);
   714     bool is_resolved = !cpce->is_f1_null();
   715     // FIXME: code generation could allow for null (unlinked) call site
   716     // The call site could be made patchable as follows:
   717     // Load the appendix argument from the constant pool.
   718     // Test the appendix argument and jump to a known deopt routine if it is null.
   719     // Jump through a patchable call site, which is initially a deopt routine.
   720     // Patch the call site to the nmethod entry point of the static compiled lambda form.
   721     // As with other two-component call sites, both values must be independently verified.
   723     if (is_resolved) {
   724       // Get the invoker Method* from the constant pool.
   725       // (The appendix argument, if any, will be noted in the method's signature.)
   726       Method* adapter = cpce->f1_as_method();
   727       return get_method(adapter);
   728     }
   730     // Fake a method that is equivalent to a declared method.
   731     ciInstanceKlass* holder    = get_instance_klass(SystemDictionary::MethodHandle_klass());
   732     ciSymbol*        name      = ciSymbol::invokeBasic_name();
   733     ciSymbol*        signature = get_symbol(cpool->signature_ref_at(index));
   734     return get_unloaded_method(holder, name, signature, accessor);
   735   } else {
   736     const int holder_index = cpool->klass_ref_index_at(index);
   737     bool holder_is_accessible;
   738     ciKlass* holder = get_klass_by_index_impl(cpool, holder_index, holder_is_accessible, accessor);
   739     ciInstanceKlass* declared_holder = get_instance_klass_for_declared_method_holder(holder);
   741     // Get the method's name and signature.
   742     Symbol* name_sym = cpool->name_ref_at(index);
   743     Symbol* sig_sym  = cpool->signature_ref_at(index);
   745     if (cpool->has_preresolution()
   746         || (holder == ciEnv::MethodHandle_klass() &&
   747             MethodHandles::is_signature_polymorphic_name(holder->get_Klass(), name_sym))) {
   748       // Short-circuit lookups for JSR 292-related call sites.
   749       // That is, do not rely only on name-based lookups, because they may fail
   750       // if the names are not resolvable in the boot class loader (7056328).
   751       switch (bc) {
   752       case Bytecodes::_invokevirtual:
   753       case Bytecodes::_invokeinterface:
   754       case Bytecodes::_invokespecial:
   755       case Bytecodes::_invokestatic:
   756         {
   757           Method* m = ConstantPool::method_at_if_loaded(cpool, index);
   758           if (m != NULL) {
   759             return get_method(m);
   760           }
   761         }
   762         break;
   763       }
   764     }
   766     if (holder_is_accessible) {  // Our declared holder is loaded.
   767       InstanceKlass* lookup = declared_holder->get_instanceKlass();
   768       Method* m = lookup_method(accessor->get_instanceKlass(), lookup, name_sym, sig_sym, bc);
   769       if (m != NULL &&
   770           (bc == Bytecodes::_invokestatic
   771            ?  m->method_holder()->is_not_initialized()
   772            : !m->method_holder()->is_loaded())) {
   773         m = NULL;
   774       }
   775 #ifdef ASSERT
   776       if (m != NULL && ReplayCompiles && !ciReplay::is_loaded(m)) {
   777         m = NULL;
   778       }
   779 #endif
   780       if (m != NULL) {
   781         // We found the method.
   782         return get_method(m);
   783       }
   784     }
   786     // Either the declared holder was not loaded, or the method could
   787     // not be found.  Create a dummy ciMethod to represent the failed
   788     // lookup.
   789     ciSymbol* name      = get_symbol(name_sym);
   790     ciSymbol* signature = get_symbol(sig_sym);
   791     return get_unloaded_method(declared_holder, name, signature, accessor);
   792   }
   793 }
   796 // ------------------------------------------------------------------
   797 // ciEnv::get_instance_klass_for_declared_method_holder
   798 ciInstanceKlass* ciEnv::get_instance_klass_for_declared_method_holder(ciKlass* method_holder) {
   799   // For the case of <array>.clone(), the method holder can be a ciArrayKlass
   800   // instead of a ciInstanceKlass.  For that case simply pretend that the
   801   // declared holder is Object.clone since that's where the call will bottom out.
   802   // A more correct fix would trickle out through many interfaces in CI,
   803   // requiring ciInstanceKlass* to become ciKlass* and many more places would
   804   // require checks to make sure the expected type was found.  Given that this
   805   // only occurs for clone() the more extensive fix seems like overkill so
   806   // instead we simply smear the array type into Object.
   807   guarantee(method_holder != NULL, "no method holder");
   808   if (method_holder->is_instance_klass()) {
   809     return method_holder->as_instance_klass();
   810   } else if (method_holder->is_array_klass()) {
   811     return current()->Object_klass();
   812   } else {
   813     ShouldNotReachHere();
   814   }
   815   return NULL;
   816 }
   819 // ------------------------------------------------------------------
   820 // ciEnv::get_method_by_index
   821 ciMethod* ciEnv::get_method_by_index(constantPoolHandle cpool,
   822                                      int index, Bytecodes::Code bc,
   823                                      ciInstanceKlass* accessor) {
   824   GUARDED_VM_ENTRY(return get_method_by_index_impl(cpool, index, bc, accessor);)
   825 }
   828 // ------------------------------------------------------------------
   829 // ciEnv::name_buffer
   830 char *ciEnv::name_buffer(int req_len) {
   831   if (_name_buffer_len < req_len) {
   832     if (_name_buffer == NULL) {
   833       _name_buffer = (char*)arena()->Amalloc(sizeof(char)*req_len);
   834       _name_buffer_len = req_len;
   835     } else {
   836       _name_buffer =
   837         (char*)arena()->Arealloc(_name_buffer, _name_buffer_len, req_len);
   838       _name_buffer_len = req_len;
   839     }
   840   }
   841   return _name_buffer;
   842 }
   844 // ------------------------------------------------------------------
   845 // ciEnv::is_in_vm
   846 bool ciEnv::is_in_vm() {
   847   return JavaThread::current()->thread_state() == _thread_in_vm;
   848 }
   850 bool ciEnv::system_dictionary_modification_counter_changed() {
   851   return _system_dictionary_modification_counter != SystemDictionary::number_of_modifications();
   852 }
   854 // ------------------------------------------------------------------
   855 // ciEnv::validate_compile_task_dependencies
   856 //
   857 // Check for changes during compilation (e.g. class loads, evolution,
   858 // breakpoints, call site invalidation).
   859 void ciEnv::validate_compile_task_dependencies(ciMethod* target) {
   860   if (failing())  return;  // no need for further checks
   862   // First, check non-klass dependencies as we might return early and
   863   // not check klass dependencies if the system dictionary
   864   // modification counter hasn't changed (see below).
   865   for (Dependencies::DepStream deps(dependencies()); deps.next(); ) {
   866     if (deps.is_klass_type())  continue;  // skip klass dependencies
   867     Klass* witness = deps.check_dependency();
   868     if (witness != NULL) {
   869       record_failure("invalid non-klass dependency");
   870       return;
   871     }
   872   }
   874   // Klass dependencies must be checked when the system dictionary
   875   // changes.  If logging is enabled all violated dependences will be
   876   // recorded in the log.  In debug mode check dependencies even if
   877   // the system dictionary hasn't changed to verify that no invalid
   878   // dependencies were inserted.  Any violated dependences in this
   879   // case are dumped to the tty.
   880   bool counter_changed = system_dictionary_modification_counter_changed();
   882   bool verify_deps = trueInDebug;
   883   if (!counter_changed && !verify_deps)  return;
   885   int klass_violations = 0;
   886   for (Dependencies::DepStream deps(dependencies()); deps.next(); ) {
   887     if (!deps.is_klass_type())  continue;  // skip non-klass dependencies
   888     Klass* witness = deps.check_dependency();
   889     if (witness != NULL) {
   890       klass_violations++;
   891       if (!counter_changed) {
   892         // Dependence failed but counter didn't change.  Log a message
   893         // describing what failed and allow the assert at the end to
   894         // trigger.
   895         deps.print_dependency(witness);
   896       } else if (xtty == NULL) {
   897         // If we're not logging then a single violation is sufficient,
   898         // otherwise we want to log all the dependences which were
   899         // violated.
   900         break;
   901       }
   902     }
   903   }
   905   if (klass_violations != 0) {
   906 #ifdef ASSERT
   907     if (!counter_changed && !PrintCompilation) {
   908       // Print out the compile task that failed
   909       _task->print_line();
   910     }
   911 #endif
   912     assert(counter_changed, "failed dependencies, but counter didn't change");
   913     record_failure("concurrent class loading");
   914   }
   915 }
   917 // ------------------------------------------------------------------
   918 // ciEnv::register_method
   919 void ciEnv::register_method(ciMethod* target,
   920                             int entry_bci,
   921                             CodeOffsets* offsets,
   922                             int orig_pc_offset,
   923                             CodeBuffer* code_buffer,
   924                             int frame_words,
   925                             OopMapSet* oop_map_set,
   926                             ExceptionHandlerTable* handler_table,
   927                             ImplicitExceptionTable* inc_table,
   928                             AbstractCompiler* compiler,
   929                             int comp_level,
   930                             bool has_unsafe_access,
   931                             bool has_wide_vectors,
   932                             RTMState  rtm_state) {
   933   VM_ENTRY_MARK;
   934   nmethod* nm = NULL;
   935   {
   936     // To prevent compile queue updates.
   937     MutexLocker locker(MethodCompileQueue_lock, THREAD);
   939     // Prevent SystemDictionary::add_to_hierarchy from running
   940     // and invalidating our dependencies until we install this method.
   941     // No safepoints are allowed. Otherwise, class redefinition can occur in between.
   942     MutexLocker ml(Compile_lock);
   943     No_Safepoint_Verifier nsv;
   945     // Change in Jvmti state may invalidate compilation.
   946     if (!failing() &&
   947         ( (!jvmti_can_hotswap_or_post_breakpoint() &&
   948            JvmtiExport::can_hotswap_or_post_breakpoint()) ||
   949           (!jvmti_can_access_local_variables() &&
   950            JvmtiExport::can_access_local_variables()) ||
   951           (!jvmti_can_post_on_exceptions() &&
   952            JvmtiExport::can_post_on_exceptions()) )) {
   953       record_failure("Jvmti state change invalidated dependencies");
   954     }
   956     // Change in DTrace flags may invalidate compilation.
   957     if (!failing() &&
   958         ( (!dtrace_extended_probes() && ExtendedDTraceProbes) ||
   959           (!dtrace_method_probes() && DTraceMethodProbes) ||
   960           (!dtrace_alloc_probes() && DTraceAllocProbes) )) {
   961       record_failure("DTrace flags change invalidated dependencies");
   962     }
   964     if (!failing()) {
   965       if (log() != NULL) {
   966         // Log the dependencies which this compilation declares.
   967         dependencies()->log_all_dependencies();
   968       }
   970       // Encode the dependencies now, so we can check them right away.
   971       dependencies()->encode_content_bytes();
   973       // Check for {class loads, evolution, breakpoints, ...} during compilation
   974       validate_compile_task_dependencies(target);
   975     }
   977     methodHandle method(THREAD, target->get_Method());
   979 #if INCLUDE_RTM_OPT
   980     if (!failing() && (rtm_state != NoRTM) &&
   981         (method()->method_data() != NULL) &&
   982         (method()->method_data()->rtm_state() != rtm_state)) {
   983       // Preemptive decompile if rtm state was changed.
   984       record_failure("RTM state change invalidated rtm code");
   985     }
   986 #endif
   988     if (failing()) {
   989       // While not a true deoptimization, it is a preemptive decompile.
   990       MethodData* mdo = method()->method_data();
   991       if (mdo != NULL) {
   992         mdo->inc_decompile_count();
   993       }
   995       // All buffers in the CodeBuffer are allocated in the CodeCache.
   996       // If the code buffer is created on each compile attempt
   997       // as in C2, then it must be freed.
   998       code_buffer->free_blob();
   999       return;
  1002     assert(offsets->value(CodeOffsets::Deopt) != -1, "must have deopt entry");
  1003     assert(offsets->value(CodeOffsets::Exceptions) != -1, "must have exception entry");
  1005     nm =  nmethod::new_nmethod(method,
  1006                                compile_id(),
  1007                                entry_bci,
  1008                                offsets,
  1009                                orig_pc_offset,
  1010                                debug_info(), dependencies(), code_buffer,
  1011                                frame_words, oop_map_set,
  1012                                handler_table, inc_table,
  1013                                compiler, comp_level);
  1014     // Free codeBlobs
  1015     code_buffer->free_blob();
  1017     if (nm != NULL) {
  1018       nm->set_has_unsafe_access(has_unsafe_access);
  1019       nm->set_has_wide_vectors(has_wide_vectors);
  1020 #if INCLUDE_RTM_OPT
  1021       nm->set_rtm_state(rtm_state);
  1022 #endif
  1024       // Record successful registration.
  1025       // (Put nm into the task handle *before* publishing to the Java heap.)
  1026       if (task() != NULL) {
  1027         task()->set_code(nm);
  1030       if (entry_bci == InvocationEntryBci) {
  1031         if (TieredCompilation) {
  1032           // If there is an old version we're done with it
  1033           nmethod* old = method->code();
  1034           if (TraceMethodReplacement && old != NULL) {
  1035             ResourceMark rm;
  1036             char *method_name = method->name_and_sig_as_C_string();
  1037             tty->print_cr("Replacing method %s", method_name);
  1039           if (old != NULL) {
  1040             old->make_not_entrant();
  1043         if (TraceNMethodInstalls) {
  1044           ResourceMark rm;
  1045           char *method_name = method->name_and_sig_as_C_string();
  1046           ttyLocker ttyl;
  1047           tty->print_cr("Installing method (%d) %s ",
  1048                         comp_level,
  1049                         method_name);
  1051         // Allow the code to be executed
  1052         method->set_code(method, nm);
  1053       } else {
  1054         if (TraceNMethodInstalls) {
  1055           ResourceMark rm;
  1056           char *method_name = method->name_and_sig_as_C_string();
  1057           ttyLocker ttyl;
  1058           tty->print_cr("Installing osr method (%d) %s @ %d",
  1059                         comp_level,
  1060                         method_name,
  1061                         entry_bci);
  1063         method->method_holder()->add_osr_nmethod(nm);
  1066   }  // safepoints are allowed again
  1068   if (nm != NULL) {
  1069     // JVMTI -- compiled method notification (must be done outside lock)
  1070     nm->post_compiled_method_load_event();
  1071   } else {
  1072     // The CodeCache is full. Print out warning and disable compilation.
  1073     record_failure("code cache is full");
  1074     CompileBroker::handle_full_code_cache();
  1079 // ------------------------------------------------------------------
  1080 // ciEnv::find_system_klass
  1081 ciKlass* ciEnv::find_system_klass(ciSymbol* klass_name) {
  1082   VM_ENTRY_MARK;
  1083   return get_klass_by_name_impl(NULL, constantPoolHandle(), klass_name, false);
  1086 // ------------------------------------------------------------------
  1087 // ciEnv::comp_level
  1088 int ciEnv::comp_level() {
  1089   if (task() == NULL)  return CompLevel_highest_tier;
  1090   return task()->comp_level();
  1093 // ------------------------------------------------------------------
  1094 // ciEnv::compile_id
  1095 uint ciEnv::compile_id() {
  1096   if (task() == NULL)  return 0;
  1097   return task()->compile_id();
  1100 // ------------------------------------------------------------------
  1101 // ciEnv::notice_inlined_method()
  1102 void ciEnv::notice_inlined_method(ciMethod* method) {
  1103   _num_inlined_bytecodes += method->code_size_for_inlining();
  1106 // ------------------------------------------------------------------
  1107 // ciEnv::num_inlined_bytecodes()
  1108 int ciEnv::num_inlined_bytecodes() const {
  1109   return _num_inlined_bytecodes;
  1112 // ------------------------------------------------------------------
  1113 // ciEnv::record_failure()
  1114 void ciEnv::record_failure(const char* reason) {
  1115   if (log() != NULL) {
  1116     log()->elem("failure reason='%s'", reason);
  1118   if (_failure_reason == NULL) {
  1119     // Record the first failure reason.
  1120     _failure_reason = reason;
  1124 // ------------------------------------------------------------------
  1125 // ciEnv::record_method_not_compilable()
  1126 void ciEnv::record_method_not_compilable(const char* reason, bool all_tiers) {
  1127   int new_compilable =
  1128     all_tiers ? MethodCompilable_never : MethodCompilable_not_at_tier ;
  1130   // Only note transitions to a worse state
  1131   if (new_compilable > _compilable) {
  1132     if (log() != NULL) {
  1133       if (all_tiers) {
  1134         log()->elem("method_not_compilable");
  1135       } else {
  1136         log()->elem("method_not_compilable_at_tier level='%d'",
  1137                     current()->task()->comp_level());
  1140     _compilable = new_compilable;
  1142     // Reset failure reason; this one is more important.
  1143     _failure_reason = NULL;
  1144     record_failure(reason);
  1148 // ------------------------------------------------------------------
  1149 // ciEnv::record_out_of_memory_failure()
  1150 void ciEnv::record_out_of_memory_failure() {
  1151   // If memory is low, we stop compiling methods.
  1152   record_method_not_compilable("out of memory");
  1155 ciInstance* ciEnv::unloaded_ciinstance() {
  1156   GUARDED_VM_ENTRY(return _factory->get_unloaded_object_constant();)
  1159 // ------------------------------------------------------------------
  1160 // ciEnv::dump_replay_data*
  1162 // Don't change thread state and acquire any locks.
  1163 // Safe to call from VM error reporter.
  1165 void ciEnv::dump_compile_data(outputStream* out) {
  1166   CompileTask* task = this->task();
  1167   Method* method = task->method();
  1168   int entry_bci = task->osr_bci();
  1169   int comp_level = task->comp_level();
  1170   out->print("compile %s %s %s %d %d",
  1171                 method->klass_name()->as_quoted_ascii(),
  1172                 method->name()->as_quoted_ascii(),
  1173                 method->signature()->as_quoted_ascii(),
  1174                 entry_bci, comp_level);
  1175   if (compiler_data() != NULL) {
  1176     if (is_c2_compile(comp_level)) { // C2 or Shark
  1177 #ifdef COMPILER2
  1178       // Dump C2 inlining data.
  1179       ((Compile*)compiler_data())->dump_inline_data(out);
  1180 #endif
  1181     } else if (is_c1_compile(comp_level)) { // C1
  1182 #ifdef COMPILER1
  1183       // Dump C1 inlining data.
  1184       ((Compilation*)compiler_data())->dump_inline_data(out);
  1185 #endif
  1188   out->cr();
  1191 void ciEnv::dump_replay_data_unsafe(outputStream* out) {
  1192   ResourceMark rm;
  1193 #if INCLUDE_JVMTI
  1194   out->print_cr("JvmtiExport can_access_local_variables %d",     _jvmti_can_access_local_variables);
  1195   out->print_cr("JvmtiExport can_hotswap_or_post_breakpoint %d", _jvmti_can_hotswap_or_post_breakpoint);
  1196   out->print_cr("JvmtiExport can_post_on_exceptions %d",         _jvmti_can_post_on_exceptions);
  1197 #endif // INCLUDE_JVMTI
  1199   GrowableArray<ciMetadata*>* objects = _factory->get_ci_metadata();
  1200   out->print_cr("# %d ciObject found", objects->length());
  1201   for (int i = 0; i < objects->length(); i++) {
  1202     objects->at(i)->dump_replay_data(out);
  1204   dump_compile_data(out);
  1205   out->flush();
  1208 void ciEnv::dump_replay_data(outputStream* out) {
  1209   GUARDED_VM_ENTRY(
  1210     MutexLocker ml(Compile_lock);
  1211     dump_replay_data_unsafe(out);
  1215 void ciEnv::dump_replay_data(int compile_id) {
  1216   static char buffer[O_BUFLEN];
  1217   int ret = jio_snprintf(buffer, O_BUFLEN, "replay_pid%p_compid%d.log", os::current_process_id(), compile_id);
  1218   if (ret > 0) {
  1219     int fd = open(buffer, O_RDWR | O_CREAT | O_TRUNC, 0666);
  1220     if (fd != -1) {
  1221       FILE* replay_data_file = os::open(fd, "w");
  1222       if (replay_data_file != NULL) {
  1223         fileStream replay_data_stream(replay_data_file, /*need_close=*/true);
  1224         dump_replay_data(&replay_data_stream);
  1225         tty->print_cr("# Compiler replay data is saved as: %s", buffer);
  1226       } else {
  1227         tty->print_cr("# Can't open file to dump replay data.");
  1233 void ciEnv::dump_inline_data(int compile_id) {
  1234   static char buffer[O_BUFLEN];
  1235   int ret = jio_snprintf(buffer, O_BUFLEN, "inline_pid%p_compid%d.log", os::current_process_id(), compile_id);
  1236   if (ret > 0) {
  1237     int fd = open(buffer, O_RDWR | O_CREAT | O_TRUNC, 0666);
  1238     if (fd != -1) {
  1239       FILE* inline_data_file = os::open(fd, "w");
  1240       if (inline_data_file != NULL) {
  1241         fileStream replay_data_stream(inline_data_file, /*need_close=*/true);
  1242         GUARDED_VM_ENTRY(
  1243           MutexLocker ml(Compile_lock);
  1244           dump_compile_data(&replay_data_stream);
  1246         replay_data_stream.flush();
  1247         tty->print("# Compiler inline data is saved as: ");
  1248         tty->print_cr("%s", buffer);
  1249       } else {
  1250         tty->print_cr("# Can't open file to dump inline data.");

mercurial