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