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