1/*
2 * Copyright (c) 2016, 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#include "precompiled.hpp"
25
26#include "aot/aotCodeHeap.hpp"
27#include "aot/aotLoader.hpp"
28#include "classfile/javaAssertions.hpp"
29#include "gc/g1/heapRegion.hpp"
30#include "gc/shared/gcLocker.hpp"
31#include "interpreter/abstractInterpreter.hpp"
32#include "jvmci/compilerRuntime.hpp"
33#include "jvmci/jvmciRuntime.hpp"
34#include "oops/method.hpp"
35#include "runtime/os.hpp"
36#include "runtime/sharedRuntime.hpp"
37#include "runtime/vm_operations.hpp"
38
39bool AOTLib::_narrow_oop_shift_initialized = false;
40int  AOTLib::_narrow_oop_shift = 0;
41int  AOTLib::_narrow_klass_shift = 0;
42
43address AOTLib::load_symbol(const char *name) {
44  address symbol = (address) dlsym(_dl_handle, name);
45  if (symbol == NULL) {
46    tty->print_cr("Shared file %s error: missing %s", _name, name);
47    vm_exit(1);
48  }
49  return symbol;
50}
51
52Klass* AOTCodeHeap::get_klass_from_got(const char* klass_name, int klass_len, const Method* method) {
53  AOTKlassData* klass_data = (AOTKlassData*)_lib->load_symbol(klass_name);
54  Klass* k = (Klass*)_metaspace_got[klass_data->_got_index];
55  if (k == NULL) {
56    Thread* thread = Thread::current();
57    k = lookup_klass(klass_name, klass_len, method, thread);
58    // Note, exceptions are cleared.
59    if (k == NULL) {
60      fatal("Shared file %s error: klass %s should be resolved already", _lib->name(), klass_name);
61      vm_exit(1);
62    }
63    _metaspace_got[klass_data->_got_index] = k;
64  }
65  return k;
66}
67
68Klass* AOTCodeHeap::lookup_klass(const char* name, int len, const Method* method, Thread* thread) {
69  ResourceMark rm(thread);
70  assert(method != NULL, "incorrect call parameter");
71  methodHandle caller(thread, (Method*)method);
72
73  // Use class loader of aot method.
74  Handle loader(thread, caller->method_holder()->class_loader());
75  Handle protection_domain(thread, caller->method_holder()->protection_domain());
76
77  // Ignore wrapping L and ;
78  if (name[0] == 'L') {
79    assert(len > 2, "small name %s", name);
80    name++;
81    len -= 2;
82  }
83  TempNewSymbol sym = SymbolTable::probe(name, len);
84  if (sym == NULL) {
85    log_debug(aot, class, resolve)("Probe failed for AOT class %s", name);
86    return NULL;
87  }
88  Klass* k = SystemDictionary::find_instance_or_array_klass(sym, loader, protection_domain, thread);
89  assert(!thread->has_pending_exception(), "should not throw");
90
91  if (k != NULL) {
92    log_info(aot, class, resolve)("%s %s (lookup)", caller->method_holder()->external_name(), k->external_name());
93  }
94  return k;
95}
96
97void AOTLib::handle_config_error(const char* format, ...) {
98  if (PrintAOT) {
99    va_list ap;
100    va_start(ap, format);
101    tty->vprint_cr(format, ap);
102    va_end(ap);
103  }
104  if (UseAOTStrictLoading) {
105    vm_exit(1);
106  }
107  _valid = false;
108}
109
110void AOTLib::verify_flag(bool aot_flag, bool flag, const char* name) {
111  if (_valid && aot_flag != flag) {
112    handle_config_error("Shared file %s error: %s has different value '%s' from current '%s'", _name, name , (aot_flag ? "true" : "false"), (flag ? "true" : "false"));
113  }
114}
115
116void AOTLib::verify_flag(int aot_flag, int flag, const char* name) {
117  if (_valid && aot_flag != flag) {
118    handle_config_error("Shared file %s error: %s has different value '%d' from current '%d'", _name, name , aot_flag, flag);
119  }
120}
121
122void AOTLib::verify_config() {
123  GrowableArray<AOTLib*>* libraries = AOTLoader::libraries();
124  for (GrowableArrayIterator<AOTLib*> lib = libraries->begin(); lib != libraries->end(); ++lib) {
125    if ((*lib)->_config == _config) {
126      handle_config_error("AOT library %s already loaded.", (*lib)->_name);
127      return;
128    }
129  }
130
131  if (_header->_version != AOTHeader::AOT_SHARED_VERSION) {
132    handle_config_error("Invalid version of the shared file %s. Expected %d but was %d", _name, _header->_version, AOTHeader::AOT_SHARED_VERSION);
133    return;
134  }
135
136  const char* aot_jvm_version = (const char*)_header + _header->_jvm_version_offset + 2;
137  if (strcmp(aot_jvm_version, VM_Version::jre_release_version()) != 0) {
138    handle_config_error("JVM version '%s' recorded in the shared file %s does not match current version '%s'", aot_jvm_version, _name, VM_Version::jre_release_version());
139    return;
140  }
141
142  // Debug VM has different layout of runtime and metadata structures
143#ifdef ASSERT
144  verify_flag(_config->_debug_VM, true, "Debug VM version");
145#else
146  verify_flag(!(_config->_debug_VM), true, "Product VM version");
147#endif
148  // Check configuration size
149  verify_flag(_config->_config_size, AOTConfiguration::CONFIG_SIZE, "AOT configuration size");
150
151  // Check flags
152  verify_flag(_config->_useCompressedOops, UseCompressedOops, "UseCompressedOops");
153  verify_flag(_config->_useCompressedClassPointers, UseCompressedClassPointers, "UseCompressedClassPointers");
154  verify_flag(_config->_useG1GC, UseG1GC, "UseG1GC");
155  verify_flag(_config->_useCMSGC, UseConcMarkSweepGC, "UseConcMarkSweepGC");
156  verify_flag(_config->_useTLAB, UseTLAB, "UseTLAB");
157  verify_flag(_config->_useBiasedLocking, UseBiasedLocking, "UseBiasedLocking");
158  verify_flag(_config->_objectAlignment, ObjectAlignmentInBytes, "ObjectAlignmentInBytes");
159  verify_flag(_config->_contendedPaddingWidth, ContendedPaddingWidth, "ContendedPaddingWidth");
160  verify_flag(_config->_fieldsAllocationStyle, FieldsAllocationStyle, "FieldsAllocationStyle");
161  verify_flag(_config->_compactFields, CompactFields, "CompactFields");
162  verify_flag(_config->_enableContended, EnableContended, "EnableContended");
163  verify_flag(_config->_restrictContended, RestrictContended, "RestrictContended");
164
165  if (!TieredCompilation && _config->_tieredAOT) {
166    handle_config_error("Shared file %s error: Expected to run with tiered compilation on", _name);
167  }
168
169  // Shifts are static values which initialized by 0 until java heap initialization.
170  // AOT libs are loaded before heap initialized so shift values are not set.
171  // It is okay since ObjectAlignmentInBytes flag which defines shifts value is set before AOT libs are loaded.
172  // Set shifts value based on first AOT library config.
173  if (UseCompressedOops && _valid) {
174    if (!_narrow_oop_shift_initialized) {
175      _narrow_oop_shift = _config->_narrowOopShift;
176      if (UseCompressedClassPointers) { // It is set only if UseCompressedOops is set
177        _narrow_klass_shift = _config->_narrowKlassShift;
178      }
179      _narrow_oop_shift_initialized = true;
180    } else {
181      verify_flag(_config->_narrowOopShift, _narrow_oop_shift, "aot_config->_narrowOopShift");
182      if (UseCompressedClassPointers) { // It is set only if UseCompressedOops is set
183        verify_flag(_config->_narrowKlassShift, _narrow_klass_shift, "aot_config->_narrowKlassShift");
184      }
185    }
186  }
187}
188
189AOTLib::~AOTLib() {
190  free((void*) _name);
191}
192
193AOTCodeHeap::~AOTCodeHeap() {
194  if (_classes != NULL) {
195    FREE_C_HEAP_ARRAY(AOTClass, _classes);
196  }
197  if (_code_to_aot != NULL) {
198    FREE_C_HEAP_ARRAY(CodeToAMethod, _code_to_aot);
199  }
200}
201
202AOTLib::AOTLib(void* handle, const char* name, int dso_id) : _valid(true), _dl_handle(handle), _dso_id(dso_id) {
203  _name = (const char*) strdup(name);
204
205  // Verify that VM runs with the same parameters as AOT tool.
206  _config = (AOTConfiguration*) load_symbol("JVM.config");
207  _header = (AOTHeader*) load_symbol("JVM.header");
208
209  verify_config();
210
211  if (!_valid && PrintAOT) {
212      tty->print("%7d ", (int) tty->time_stamp().milliseconds());
213      tty->print_cr("%4d     skipped %s  aot library", _dso_id, _name);
214  }
215}
216
217AOTCodeHeap::AOTCodeHeap(AOTLib* lib) :
218    CodeHeap("CodeHeap 'AOT'", CodeBlobType::AOT), _lib(lib), _classes(NULL), _code_to_aot(NULL) {
219  assert(_lib->is_valid(), "invalid library");
220
221  _lib_symbols_initialized = false;
222  _aot_id = 0;
223
224  _class_count = _lib->header()->_class_count;
225  _method_count = _lib->header()->_method_count;
226
227  // Collect metaspace info: names -> address in .got section
228  _metaspace_names = (const char*) _lib->load_symbol("JVM.metaspace.names");
229  _method_metadata =     (address) _lib->load_symbol("JVM.method.metadata");
230  _methods_offsets =     (address) _lib->load_symbol("JVM.methods.offsets");
231  _klasses_offsets =     (address) _lib->load_symbol("JVM.klasses.offsets");
232  _dependencies    =     (address) _lib->load_symbol("JVM.klasses.dependencies");
233  _code_space      =     (address) _lib->load_symbol("JVM.text");
234
235  // First cell is number of elements.
236  jlong* got_sect;
237  _metaspace_got      = (Metadata**) _lib->load_symbol("JVM.metaspace.got");
238  _metaspace_got_size = _lib->header()->_metaspace_got_size;
239
240  _metadata_got      = (Metadata**) _lib->load_symbol("JVM.metadata.got");
241  _metadata_got_size = _lib->header()->_metadata_got_size;
242
243  _oop_got      = (oop*) _lib->load_symbol("JVM.oop.got");
244  _oop_got_size = _lib->header()->_oop_got_size;
245
246  // Collect stubs info
247  _stubs_offsets = (int*) _lib->load_symbol("JVM.stubs.offsets");
248
249  // code segments table
250  _code_segments = (address) _lib->load_symbol("JVM.code.segments");
251
252  // method state
253  _method_state = (jlong*) _lib->load_symbol("JVM.method.state");
254
255  // Create a table for mapping classes
256  _classes = NEW_C_HEAP_ARRAY(AOTClass, _class_count, mtCode);
257  memset(_classes, 0, _class_count * sizeof(AOTClass));
258
259  // Create table for searching AOTCompiledMethod based on pc.
260  _code_to_aot = NEW_C_HEAP_ARRAY(CodeToAMethod, _method_count, mtCode);
261  memset(_code_to_aot, 0, _method_count * sizeof(CodeToAMethod));
262
263  _low_boundary = _code_space;
264  _memory.set_low_boundary((char *)_code_space);
265  _memory.set_high_boundary((char *)_code_space);
266  _memory.set_low((char *)_code_space);
267  _memory.set_high((char *)_code_space);
268
269  _segmap.set_low_boundary((char *)_code_segments);
270  _segmap.set_low((char *)_code_segments);
271
272  _log2_segment_size = exact_log2(_lib->config()->_codeSegmentSize);
273
274  // Register aot stubs
275  register_stubs();
276
277  if (PrintAOT || (PrintCompilation && PrintAOT)) {
278    tty->print("%7d ", (int) tty->time_stamp().milliseconds());
279    tty->print_cr("%4d     loaded    %s  aot library", _lib->id(), _lib->name());
280  }
281}
282
283void AOTCodeHeap::publish_aot(const methodHandle& mh, AOTMethodData* method_data, int code_id) {
284  // The method may be explicitly excluded by the user.
285  // Or Interpreter uses an intrinsic for this method.
286  if (CompilerOracle::should_exclude(mh) || !AbstractInterpreter::can_be_compiled(mh)) {
287    return;
288  }
289
290  address code = method_data->_code;
291  const char* name = method_data->_name;
292  aot_metadata* meta = method_data->_meta;
293
294  if (meta->scopes_pcs_begin() == meta->scopes_pcs_end()) {
295    // When the AOT compiler compiles something big we fail to generate metadata
296    // in CodeInstaller::gather_metadata. In that case the scopes_pcs_begin == scopes_pcs_end.
297    // In all successful cases we always have 2 entries of scope pcs.
298    log_info(aot, class, resolve)("Failed to load %s (no metadata available)", mh->name_and_sig_as_C_string());
299    _code_to_aot[code_id]._state = invalid;
300    return;
301  }
302
303  jlong* state_adr = &_method_state[code_id];
304  address metadata_table = method_data->_metadata_table;
305  int metadata_size = method_data->_metadata_size;
306  assert(code_id < _method_count, "sanity");
307  _aot_id++;
308
309#ifdef ASSERT
310  if (_aot_id > CIStop || _aot_id < CIStart) {
311    // Skip compilation
312    return;
313  }
314#endif
315  // Check one more time.
316  if (_code_to_aot[code_id]._state == invalid) {
317    return;
318  }
319  AOTCompiledMethod *aot = new AOTCompiledMethod(code, mh(), meta, metadata_table, metadata_size, state_adr, this, name, code_id, _aot_id);
320  assert(_code_to_aot[code_id]._aot == NULL, "should be not initialized");
321  _code_to_aot[code_id]._aot = aot; // Should set this first
322  if (Atomic::cmpxchg(in_use, (jint*)&_code_to_aot[code_id]._state, not_set) != not_set) {
323    _code_to_aot[code_id]._aot = NULL; // Clean
324  } else { // success
325    // Publish method
326#ifdef TIERED
327    mh->set_aot_code(aot);
328#endif
329    Method::set_code(mh, aot);
330    if (PrintAOT || (PrintCompilation && PrintAOT)) {
331      aot->print_on(tty, NULL);
332    }
333    // Publish oop only after we are visible to CompiledMethodIterator
334    aot->set_oop(mh()->method_holder()->klass_holder());
335  }
336}
337
338void AOTCodeHeap::link_primitive_array_klasses() {
339  ResourceMark rm;
340  for (int i = T_BOOLEAN; i <= T_CONFLICT; i++) {
341    BasicType t = (BasicType)i;
342    if (is_java_primitive(t)) {
343      const Klass* arr_klass = Universe::typeArrayKlassObj(t);
344      AOTKlassData* klass_data = (AOTKlassData*) dlsym(_lib->dl_handle(), arr_klass->signature_name());
345      if (klass_data != NULL) {
346        // Set both GOT cells, resolved and initialized klass pointers.
347        // _got_index points to second cell - resolved klass pointer.
348        _metaspace_got[klass_data->_got_index-1] = (Metadata*)arr_klass; // Initialized
349        _metaspace_got[klass_data->_got_index  ] = (Metadata*)arr_klass; // Resolved
350        if (PrintAOT) {
351          tty->print_cr("[Found  %s  in  %s]", arr_klass->internal_name(), _lib->name());
352        }
353      }
354    }
355  }
356}
357
358void AOTCodeHeap::register_stubs() {
359  int stubs_count = _stubs_offsets[0]; // contains number
360  _stubs_offsets++;
361  AOTMethodOffsets* stub_offsets = (AOTMethodOffsets*)_stubs_offsets;
362  for (int i = 0; i < stubs_count; ++i) {
363    const char* stub_name = _metaspace_names + stub_offsets[i]._name_offset;
364    address entry = _code_space  + stub_offsets[i]._code_offset;
365    aot_metadata* meta = (aot_metadata *) (_method_metadata + stub_offsets[i]._meta_offset);
366    address metadata_table = (address)_metadata_got + stub_offsets[i]._metadata_got_offset;
367    int metadata_size = stub_offsets[i]._metadata_got_size;
368    int code_id = stub_offsets[i]._code_id;
369    assert(code_id < _method_count, "sanity");
370    jlong* state_adr = &_method_state[code_id];
371    int len = build_u2_from((address)stub_name);
372    stub_name += 2;
373    char* full_name = NEW_C_HEAP_ARRAY(char, len+5, mtCode);
374    if (full_name == NULL) { // No memory?
375      break;
376    }
377    memcpy(full_name, "AOT ", 4);
378    memcpy(full_name+4, stub_name, len);
379    full_name[len+4] = 0;
380    guarantee(_code_to_aot[code_id]._state != invalid, "stub %s can't be invalidated", full_name);
381    AOTCompiledMethod* aot = new AOTCompiledMethod(entry, NULL, meta, metadata_table, metadata_size, state_adr, this, full_name, code_id, i);
382    assert(_code_to_aot[code_id]._aot  == NULL, "should be not initialized");
383    _code_to_aot[code_id]._aot  = aot;
384    if (Atomic::cmpxchg(in_use, (jint*)&_code_to_aot[code_id]._state, not_set) != not_set) {
385      fatal("stab '%s' code state is %d", full_name, _code_to_aot[code_id]._state);
386    }
387    // Adjust code buffer boundaries only for stubs because they are last in the buffer.
388    adjust_boundaries(aot);
389    if (PrintAOT && Verbose) {
390      aot->print_on(tty, NULL);
391    }
392  }
393}
394
395#define SET_AOT_GLOBAL_SYMBOL_VALUE(AOTSYMNAME, AOTSYMTYPE, VMSYMVAL) \
396  {                                                                   \
397    char* error;                                                      \
398    /* Clear any existing error */                                    \
399    dlerror();                                                        \
400    AOTSYMTYPE * adr = (AOTSYMTYPE *) dlsym(_lib->dl_handle(), AOTSYMNAME);  \
401    /* Check for any dlsym lookup error */                            \
402    error = dlerror();                                                \
403    guarantee(error == NULL, "%s", error);                            \
404    *adr = (AOTSYMTYPE) VMSYMVAL;                                     \
405  }
406
407void AOTCodeHeap::link_graal_runtime_symbols()  {
408    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_monitorenter", address, JVMCIRuntime::monitorenter);
409    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_monitorexit", address, JVMCIRuntime::monitorexit);
410    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_log_object", address, JVMCIRuntime::log_object);
411    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_log_printf", address, JVMCIRuntime::log_printf);
412    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_log_primitive", address, JVMCIRuntime::log_primitive);
413    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_new_instance", address, JVMCIRuntime::new_instance);
414    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_new_array", address, JVMCIRuntime::new_array);
415    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_new_multi_array", address, JVMCIRuntime::new_multi_array);
416    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_dynamic_new_array", address, JVMCIRuntime::dynamic_new_array);
417    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_validate_object", address, JVMCIRuntime::validate_object);
418    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_write_barrier_pre", address, JVMCIRuntime::write_barrier_pre);
419    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_identity_hash_code", address, JVMCIRuntime::identity_hash_code);
420    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_write_barrier_post", address, JVMCIRuntime::write_barrier_post);
421    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_dynamic_new_instance", address, JVMCIRuntime::dynamic_new_instance);
422    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_thread_is_interrupted", address, JVMCIRuntime::thread_is_interrupted);
423    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_exception_handler_for_pc", address, JVMCIRuntime::exception_handler_for_pc);
424    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_test_deoptimize_call_int", address, JVMCIRuntime::test_deoptimize_call_int);
425    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_throw_and_post_jvmti_exception", address, JVMCIRuntime::throw_and_post_jvmti_exception);
426    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_throw_klass_external_name_exception", address, JVMCIRuntime::throw_klass_external_name_exception);
427    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_throw_class_cast_exception", address, JVMCIRuntime::throw_class_cast_exception);
428    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_vm_message", address, JVMCIRuntime::vm_message);
429    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_jvmci_runtime_vm_error", address, JVMCIRuntime::vm_error);
430}
431
432void AOTCodeHeap::link_shared_runtime_symbols() {
433    SET_AOT_GLOBAL_SYMBOL_VALUE("_resolve_static_entry", address, SharedRuntime::get_resolve_static_call_stub());
434    SET_AOT_GLOBAL_SYMBOL_VALUE("_resolve_virtual_entry", address, SharedRuntime::get_resolve_virtual_call_stub());
435    SET_AOT_GLOBAL_SYMBOL_VALUE("_resolve_opt_virtual_entry", address, SharedRuntime::get_resolve_opt_virtual_call_stub());
436    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_deopt_blob_unpack", address, SharedRuntime::deopt_blob()->unpack());
437    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_deopt_blob_uncommon_trap", address, SharedRuntime::deopt_blob()->uncommon_trap());
438    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_ic_miss_stub", address, SharedRuntime::get_ic_miss_stub());
439    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_handle_wrong_method_stub", address, SharedRuntime::get_handle_wrong_method_stub());
440    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_exception_handler_for_return_address", address, SharedRuntime::exception_handler_for_return_address);
441    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_register_finalizer", address, SharedRuntime::register_finalizer);
442    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_OSR_migration_end", address, SharedRuntime::OSR_migration_end);
443    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_resolve_string_by_symbol", address, CompilerRuntime::resolve_string_by_symbol);
444    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_resolve_klass_by_symbol", address, CompilerRuntime::resolve_klass_by_symbol);
445    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_resolve_method_by_symbol_and_load_counters", address, CompilerRuntime::resolve_method_by_symbol_and_load_counters);
446    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_initialize_klass_by_symbol", address, CompilerRuntime::initialize_klass_by_symbol);
447    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_invocation_event", address, CompilerRuntime::invocation_event);
448    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_backedge_event", address, CompilerRuntime::backedge_event);
449
450    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_shared_runtime_dpow", address, SharedRuntime::dpow);
451    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_shared_runtime_dexp", address, SharedRuntime::dexp);
452    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_shared_runtime_dcos", address, SharedRuntime::dcos);
453    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_shared_runtime_dsin", address, SharedRuntime::dsin);
454    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_shared_runtime_dtan", address, SharedRuntime::dtan);
455    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_shared_runtime_dlog", address, SharedRuntime::dlog);
456    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_shared_runtime_dlog10", address, SharedRuntime::dlog10);
457}
458
459void AOTCodeHeap::link_stub_routines_symbols() {
460    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_jbyte_arraycopy", address, StubRoutines::_jbyte_arraycopy);
461    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_jshort_arraycopy", address, StubRoutines::_jshort_arraycopy);
462    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_jint_arraycopy", address, StubRoutines::_jint_arraycopy);
463    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_jlong_arraycopy", address, StubRoutines::_jlong_arraycopy);
464    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_oop_arraycopy", address, StubRoutines::_oop_arraycopy);
465    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_oop_arraycopy_uninit", address, StubRoutines::_oop_arraycopy_uninit);
466
467    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_jbyte_disjoint_arraycopy", address, StubRoutines::_jbyte_disjoint_arraycopy);
468    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_jshort_disjoint_arraycopy", address, StubRoutines::_jshort_disjoint_arraycopy);
469    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_jint_disjoint_arraycopy", address, StubRoutines::_jint_disjoint_arraycopy);
470    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_jlong_disjoint_arraycopy", address, StubRoutines::_jlong_disjoint_arraycopy);
471    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_oop_disjoint_arraycopy", address, StubRoutines::_oop_disjoint_arraycopy);
472    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_oop_disjoint_arraycopy_uninit", address, StubRoutines::_oop_disjoint_arraycopy_uninit);
473
474    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_jbyte_arraycopy", address, StubRoutines::_arrayof_jbyte_arraycopy);
475    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_jshort_arraycopy", address, StubRoutines::_arrayof_jshort_arraycopy);
476    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_jint_arraycopy", address, StubRoutines::_arrayof_jint_arraycopy);
477    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_jlong_arraycopy", address, StubRoutines::_arrayof_jlong_arraycopy);
478    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_oop_arraycopy", address, StubRoutines::_arrayof_oop_arraycopy);
479    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_oop_arraycopy_uninit", address, StubRoutines::_arrayof_oop_arraycopy_uninit);
480
481    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_jbyte_disjoint_arraycopy", address, StubRoutines::_arrayof_jbyte_disjoint_arraycopy);
482    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_jshort_disjoint_arraycopy", address, StubRoutines::_arrayof_jshort_disjoint_arraycopy);
483    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_jint_disjoint_arraycopy", address, StubRoutines::_arrayof_jint_disjoint_arraycopy);
484    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_jlong_disjoint_arraycopy", address, StubRoutines::_arrayof_jlong_disjoint_arraycopy);
485    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_oop_disjoint_arraycopy", address, StubRoutines::_arrayof_oop_disjoint_arraycopy);
486    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_arrayof_oop_disjoint_arraycopy_uninit", address, StubRoutines::_arrayof_oop_disjoint_arraycopy_uninit);
487
488    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_checkcast_arraycopy", address, StubRoutines::_checkcast_arraycopy);
489
490    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_aescrypt_encryptBlock", address, StubRoutines::_aescrypt_encryptBlock);
491    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_aescrypt_decryptBlock", address, StubRoutines::_aescrypt_decryptBlock);
492    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_cipherBlockChaining_encryptAESCrypt", address, StubRoutines::_cipherBlockChaining_encryptAESCrypt);
493    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_cipherBlockChaining_decryptAESCrypt", address, StubRoutines::_cipherBlockChaining_decryptAESCrypt);
494    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_update_bytes_crc32", address, StubRoutines::_updateBytesCRC32);
495    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_crc_table_adr", address, StubRoutines::_crc_table_adr);
496
497
498    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_sha1_implCompress", address, StubRoutines::_sha1_implCompress);
499    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_sha1_implCompressMB", address, StubRoutines::_sha1_implCompressMB);
500    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_sha256_implCompress", address, StubRoutines::_sha256_implCompress);
501    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_sha256_implCompressMB", address, StubRoutines::_sha256_implCompressMB);
502    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_sha512_implCompress", address, StubRoutines::_sha512_implCompress);
503    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_sha512_implCompressMB", address, StubRoutines::_sha512_implCompressMB);
504    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_multiplyToLen", address, StubRoutines::_multiplyToLen);
505
506    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_counterMode_AESCrypt", address, StubRoutines::_counterMode_AESCrypt);
507    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_ghash_processBlocks", address, StubRoutines::_ghash_processBlocks);
508    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_crc32c_table_addr", address, StubRoutines::_crc32c_table_addr);
509    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_updateBytesCRC32C", address, StubRoutines::_updateBytesCRC32C);
510    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_updateBytesAdler32", address, StubRoutines::_updateBytesAdler32);
511    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_squareToLen", address, StubRoutines::_squareToLen);
512    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_mulAdd", address, StubRoutines::_mulAdd);
513    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_montgomeryMultiply",  address, StubRoutines::_montgomeryMultiply);
514    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_montgomerySquare", address, StubRoutines::_montgomerySquare);
515    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_vectorizedMismatch", address, StubRoutines::_vectorizedMismatch);
516
517    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_stub_routines_throw_delayed_StackOverflowError_entry", address, StubRoutines::_throw_delayed_StackOverflowError_entry);
518
519}
520
521void AOTCodeHeap::link_os_symbols() {
522    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_os_javaTimeMillis", address, os::javaTimeMillis);
523    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_os_javaTimeNanos", address, os::javaTimeNanos);
524}
525
526/*
527 * Link any global symbols in precompiled DSO with dlopen() _dl_handle
528 * dso_handle.
529 */
530
531void AOTCodeHeap::link_global_lib_symbols() {
532  if (!_lib_symbols_initialized) {
533    _lib_symbols_initialized = true;
534
535    CollectedHeap* heap = Universe::heap();
536    CardTableModRefBS* ct = (CardTableModRefBS*)(heap->barrier_set());
537    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_card_table_address", address, ct->byte_map_base);
538    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_heap_top_address", address, (heap->supports_inline_contig_alloc() ? heap->top_addr() : NULL));
539    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_heap_end_address", address, (heap->supports_inline_contig_alloc() ? heap->end_addr() : NULL));
540    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_polling_page", address, os::get_polling_page());
541    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_narrow_klass_base_address", address, Universe::narrow_klass_base());
542    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_narrow_oop_base_address", address, Universe::narrow_oop_base());
543    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_log_of_heap_region_grain_bytes", int, HeapRegion::LogOfHRGrainBytes);
544    SET_AOT_GLOBAL_SYMBOL_VALUE("_aot_inline_contiguous_allocation_supported", bool, heap->supports_inline_contig_alloc());
545    link_shared_runtime_symbols();
546    link_stub_routines_symbols();
547    link_os_symbols();
548    link_graal_runtime_symbols();
549
550    // Link primitive array klasses.
551    link_primitive_array_klasses();
552  }
553}
554
555#ifndef PRODUCT
556int AOTCodeHeap::klasses_seen = 0;
557int AOTCodeHeap::aot_klasses_found = 0;
558int AOTCodeHeap::aot_klasses_fp_miss = 0;
559int AOTCodeHeap::aot_klasses_cl_miss = 0;
560int AOTCodeHeap::aot_methods_found = 0;
561
562void AOTCodeHeap::print_statistics() {
563  tty->print_cr("Classes seen: %d  AOT classes found: %d  AOT methods found: %d", klasses_seen, aot_klasses_found, aot_methods_found);
564  tty->print_cr("AOT fingerprint mismatches: %d  AOT class loader mismatches: %d", aot_klasses_fp_miss, aot_klasses_cl_miss);
565}
566#endif
567
568Method* AOTCodeHeap::find_method(KlassHandle klass, Thread* thread, const char* method_name) {
569  int method_name_len = build_u2_from((address)method_name);
570  method_name += 2;
571  const char* signature_name = method_name + method_name_len;
572  int signature_name_len = build_u2_from((address)signature_name);
573  signature_name += 2;
574  // The class should have been loaded so the method and signature should already be
575  // in the symbol table.  If they're not there, the method doesn't exist.
576  TempNewSymbol name = SymbolTable::probe(method_name, method_name_len);
577  TempNewSymbol signature = SymbolTable::probe(signature_name, signature_name_len);
578
579  Method* m;
580  if (name == NULL || signature == NULL) {
581    m = NULL;
582  } else if (name == vmSymbols::object_initializer_name() ||
583             name == vmSymbols::class_initializer_name()) {
584    // Never search superclasses for constructors
585    if (klass->is_instance_klass()) {
586      m = InstanceKlass::cast(klass())->find_method(name, signature);
587    } else {
588      m = NULL;
589    }
590  } else {
591    m = klass->lookup_method(name, signature);
592    if (m == NULL && klass->is_instance_klass()) {
593      m = InstanceKlass::cast(klass())->lookup_method_in_ordered_interfaces(name, signature);
594    }
595  }
596  if (m == NULL) {
597    // Fatal error because we assume classes and methods should not be changed since aot compilation.
598    const char* klass_name = klass->external_name();
599    int klass_len = (int)strlen(klass_name);
600    char* meta_name = NEW_RESOURCE_ARRAY(char, klass_len + 1 + method_name_len + signature_name_len + 1);
601    memcpy(meta_name, klass_name, klass_len);
602    meta_name[klass_len] = '.';
603    memcpy(&meta_name[klass_len + 1], method_name, method_name_len);
604    memcpy(&meta_name[klass_len + 1 + method_name_len], signature_name, signature_name_len);
605    meta_name[klass_len + 1 + method_name_len + signature_name_len] = '\0';
606    Handle exception = Exceptions::new_exception(thread, vmSymbols::java_lang_NoSuchMethodError(), meta_name);
607    java_lang_Throwable::print(exception, tty);
608    tty->cr();
609    java_lang_Throwable::print_stack_trace(exception(), tty);
610    tty->cr();
611    fatal("Failed to find method '%s'", meta_name);
612  }
613  NOT_PRODUCT( aot_methods_found++; )
614  return m;
615}
616
617AOTKlassData* AOTCodeHeap::find_klass(InstanceKlass* ik) {
618  ResourceMark rm;
619  AOTKlassData* klass_data = (AOTKlassData*) dlsym(_lib->dl_handle(), ik->signature_name());
620  return klass_data;
621}
622
623bool AOTCodeHeap::is_dependent_method(Klass* dependee, AOTCompiledMethod* aot) {
624  InstanceKlass *dependee_ik = InstanceKlass::cast(dependee);
625  AOTKlassData* klass_data = find_klass(dependee_ik);
626  if (klass_data == NULL) {
627    return false; // no AOT records for this class - no dependencies
628  }
629  if (!dependee_ik->has_passed_fingerprint_check()) {
630    return false; // different class
631  }
632
633  int methods_offset = klass_data->_dependent_methods_offset;
634  if (methods_offset >= 0) {
635    address methods_cnt_adr = _dependencies + methods_offset;
636    int methods_cnt = *(int*)methods_cnt_adr;
637    int* indexes = (int*)(methods_cnt_adr + 4);
638    for (int i = 0; i < methods_cnt; ++i) {
639      int code_id = indexes[i];
640      if (_code_to_aot[code_id]._aot == aot) {
641        return true; // found dependent method
642      }
643    }
644  }
645  return false;
646}
647
648void AOTCodeHeap::sweep_dependent_methods(AOTKlassData* klass_data) {
649  // Make dependent methods non_entrant forever.
650  int methods_offset = klass_data->_dependent_methods_offset;
651  if (methods_offset >= 0) {
652    int marked = 0;
653    address methods_cnt_adr = _dependencies + methods_offset;
654    int methods_cnt = *(int*)methods_cnt_adr;
655    int* indexes = (int*)(methods_cnt_adr + 4);
656    for (int i = 0; i < methods_cnt; ++i) {
657      int code_id = indexes[i];
658      // Invalidate aot code.
659      if (Atomic::cmpxchg(invalid, (jint*)&_code_to_aot[code_id]._state, not_set) != not_set) {
660        if (_code_to_aot[code_id]._state == in_use) {
661          AOTCompiledMethod* aot = _code_to_aot[code_id]._aot;
662          assert(aot != NULL, "aot should be set");
663          if (!aot->is_runtime_stub()) { // Something is wrong - should not invalidate stubs.
664            aot->mark_for_deoptimization(false);
665            marked++;
666          }
667        }
668      }
669    }
670    if (marked > 0) {
671      VM_Deoptimize op;
672      VMThread::execute(&op);
673    }
674  }
675}
676
677bool AOTCodeHeap::load_klass_data(instanceKlassHandle kh, Thread* thread) {
678  ResourceMark rm;
679
680  NOT_PRODUCT( klasses_seen++; )
681
682  AOTKlassData* klass_data = find_klass(kh());
683  if (klass_data == NULL) {
684    return false;
685  }
686
687  if (!kh->has_passed_fingerprint_check()) {
688    NOT_PRODUCT( aot_klasses_fp_miss++; )
689    log_trace(aot, class, fingerprint)("class  %s%s  has bad fingerprint in  %s tid=" INTPTR_FORMAT,
690                                   kh->internal_name(), kh->is_shared() ? " (shared)" : "",
691                                   _lib->name(), p2i(thread));
692    sweep_dependent_methods(klass_data);
693    return false;
694  }
695
696  if (kh->has_been_redefined()) {
697    log_trace(aot, class, load)("class  %s%s in %s  has been redefined tid=" INTPTR_FORMAT,
698                                   kh->internal_name(), kh->is_shared() ? " (shared)" : "",
699                                   _lib->name(), p2i(thread));
700    sweep_dependent_methods(klass_data);
701    return false;
702  }
703
704  assert(klass_data->_class_id < _class_count, "invalid class id");
705  AOTClass* aot_class = &_classes[klass_data->_class_id];
706  if (aot_class->_classloader != NULL && aot_class->_classloader != kh->class_loader_data()) {
707    log_trace(aot, class, load)("class  %s  in  %s already loaded for classloader %p vs %p tid=" INTPTR_FORMAT,
708                             kh->internal_name(), _lib->name(), aot_class->_classloader, kh->class_loader_data(), p2i(thread));
709    NOT_PRODUCT( aot_klasses_cl_miss++; )
710    return false;
711  }
712
713  if (_lib->config()->_omitAssertions && JavaAssertions::enabled(kh->name()->as_C_string(), kh->class_loader() == NULL)) {
714    log_trace(aot, class, load)("class  %s  in  %s does not have java assertions in compiled code, but assertions are enabled for this execution.", kh->internal_name(), _lib->name());
715    sweep_dependent_methods(klass_data);
716    return false;
717  }
718
719  NOT_PRODUCT( aot_klasses_found++; )
720
721  log_trace(aot, class, load)("found  %s  in  %s for classloader %p tid=" INTPTR_FORMAT, kh->internal_name(), _lib->name(), kh->class_loader_data(), p2i(thread));
722
723  aot_class->_classloader = kh->class_loader_data();
724  // Set klass's Resolve (second) got cell.
725  _metaspace_got[klass_data->_got_index] = kh();
726
727  // Initialize global symbols of the DSO to the corresponding VM symbol values.
728  link_global_lib_symbols();
729
730  int methods_offset = klass_data->_compiled_methods_offset;
731  if (methods_offset >= 0) {
732    address methods_cnt_adr = _methods_offsets + methods_offset;
733    int methods_cnt = *(int*)methods_cnt_adr;
734    // Collect data about compiled methods
735    AOTMethodData* methods_data = NEW_RESOURCE_ARRAY(AOTMethodData, methods_cnt);
736    AOTMethodOffsets* methods_offsets = (AOTMethodOffsets*)(methods_cnt_adr + 4);
737    for (int i = 0; i < methods_cnt; ++i) {
738      AOTMethodOffsets* method_offsets = &methods_offsets[i];
739      int code_id = method_offsets->_code_id;
740      if (_code_to_aot[code_id]._state == invalid) {
741        continue; // skip AOT methods slots which have been invalidated
742      }
743      AOTMethodData* method_data = &methods_data[i];
744      const char* aot_name = _metaspace_names + method_offsets->_name_offset;
745      method_data->_name = aot_name;
746      method_data->_code = _code_space  + method_offsets->_code_offset;
747      method_data->_meta = (aot_metadata*)(_method_metadata + method_offsets->_meta_offset);
748      method_data->_metadata_table = (address)_metadata_got + method_offsets->_metadata_got_offset;
749      method_data->_metadata_size  = method_offsets->_metadata_got_size;
750      // aot_name format: "<u2_size>Ljava/lang/ThreadGroup;<u2_size>addUnstarted<u2_size>()V"
751      int klass_len = build_u2_from((address)aot_name);
752      const char* method_name = aot_name + 2 + klass_len;
753      Method* m = AOTCodeHeap::find_method(kh, thread, method_name);
754      methodHandle mh(thread, m);
755      if (mh->code() != NULL) { // Does it have already compiled code?
756        continue; // Don't overwrite
757      }
758      publish_aot(mh, method_data, code_id);
759    }
760  }
761  return true;
762}
763
764AOTCompiledMethod* AOTCodeHeap::next_in_use_at(int start) const {
765  for (int index = start; index < _method_count; index++) {
766    if (_code_to_aot[index]._state != in_use) {
767      continue; // Skip uninitialized entries.
768    }
769    AOTCompiledMethod* aot = _code_to_aot[index]._aot;
770    return aot;
771  }
772  return NULL;
773}
774
775void* AOTCodeHeap::first() const {
776  return next_in_use_at(0);
777}
778
779void* AOTCodeHeap::next(void* p) const {
780  AOTCompiledMethod *aot = (AOTCompiledMethod *)p;
781  int next_index = aot->method_index() + 1;
782  assert(next_index <= _method_count, "");
783  if (next_index == _method_count) {
784    return NULL;
785  }
786  return next_in_use_at(next_index);
787}
788
789void* AOTCodeHeap::find_start(void* p) const {
790  if (!contains(p)) {
791    return NULL;
792  }
793  size_t offset = pointer_delta(p, low_boundary(), 1);
794  // Use segments table
795  size_t seg_idx = offset / _lib->config()->_codeSegmentSize;
796  if ((int)(_code_segments[seg_idx]) == 0xff) {
797    return NULL;
798  }
799  while (_code_segments[seg_idx] > 0) {
800    seg_idx -= (int)_code_segments[seg_idx];
801  }
802  int code_offset = (int)seg_idx * _lib->config()->_codeSegmentSize;
803  int aot_index = *(int*)(_code_space + code_offset);
804  AOTCompiledMethod* aot = _code_to_aot[aot_index]._aot;
805  assert(aot != NULL, "should find registered aot method");
806  return aot;
807}
808
809AOTCompiledMethod* AOTCodeHeap::find_aot(address p) const {
810  assert(contains(p), "should be here");
811  return (AOTCompiledMethod *)find_start(p);
812}
813
814CodeBlob* AOTCodeHeap::find_blob_unsafe(void* start) const {
815  return (CodeBlob*)AOTCodeHeap::find_start(start);
816}
817
818void AOTCodeHeap::oops_do(OopClosure* f) {
819  for (int i = 0; i < _oop_got_size; i++) {
820    oop* p = &_oop_got[i];
821    if (*p == NULL)  continue;  // skip non-oops
822    f->do_oop(p);
823  }
824  for (int index = 0; index < _method_count; index++) {
825    if (_code_to_aot[index]._state != in_use) {
826      continue; // Skip uninitialized entries.
827    }
828    AOTCompiledMethod* aot = _code_to_aot[index]._aot;
829    aot->do_oops(f);
830  }
831}
832
833// Scan only metaspace_got cells which should have only Klass*,
834// metadata_got cells are scanned only for alive AOT methods
835// by AOTCompiledMethod::metadata_do().
836void AOTCodeHeap::got_metadata_do(void f(Metadata*)) {
837  for (int i = 1; i < _metaspace_got_size; i++) {
838    Metadata** p = &_metaspace_got[i];
839    Metadata* md = *p;
840    if (md == NULL)  continue;  // skip non-oops
841    if (Metaspace::contains(md)) {
842      f(md);
843    } else {
844      intptr_t meta = (intptr_t)md;
845      fatal("Invalid value in _metaspace_got[%d] = " INTPTR_FORMAT, i, meta);
846    }
847  }
848}
849
850void AOTCodeHeap::cleanup_inline_caches() {
851  for (int index = 0; index < _method_count; index++) {
852    if (_code_to_aot[index]._state != in_use) {
853      continue; // Skip uninitialized entries.
854    }
855    AOTCompiledMethod* aot = _code_to_aot[index]._aot;
856    aot->cleanup_inline_caches();
857  }
858}
859
860#ifdef ASSERT
861int AOTCodeHeap::verify_icholder_relocations() {
862  int count = 0;
863  for (int index = 0; index < _method_count; index++) {
864    if (_code_to_aot[index]._state != in_use) {
865      continue; // Skip uninitialized entries.
866    }
867    AOTCompiledMethod* aot = _code_to_aot[index]._aot;
868    count += aot->verify_icholder_relocations();
869  }
870  return count;
871}
872#endif
873
874void AOTCodeHeap::flush_evol_dependents_on(instanceKlassHandle dependee) {
875  for (int index = 0; index < _method_count; index++) {
876    if (_code_to_aot[index]._state != in_use) {
877      continue; // Skip uninitialized entries.
878    }
879    AOTCompiledMethod* aot = _code_to_aot[index]._aot;
880    aot->flush_evol_dependents_on(dependee);
881  }
882}
883
884void AOTCodeHeap::metadata_do(void f(Metadata*)) {
885  for (int index = 0; index < _method_count; index++) {
886    if (_code_to_aot[index]._state != in_use) {
887      continue; // Skip uninitialized entries.
888    }
889    AOTCompiledMethod* aot = _code_to_aot[index]._aot;
890    if (aot->_is_alive()) {
891      aot->metadata_do(f);
892    }
893  }
894  // Scan metaspace_got cells.
895  got_metadata_do(f);
896}
897