1 /*
   2  * Copyright (c) 1997, 2019, 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 "classfile/altHashing.hpp"
  27 #include "classfile/classLoaderData.inline.hpp"
  28 #include "classfile/javaClasses.inline.hpp"
  29 #include "classfile/moduleEntry.hpp"
  30 #include "classfile/stringTable.hpp"
  31 #include "classfile/vmSymbols.hpp"
  32 #include "code/debugInfo.hpp"
  33 #include "code/dependencyContext.hpp"
  34 #include "code/pcDesc.hpp"
  35 #include "interpreter/interpreter.hpp"
  36 #include "interpreter/linkResolver.hpp"
  37 #include "logging/log.hpp"
  38 #include "logging/logStream.hpp"
  39 #include "memory/heapShared.inline.hpp"
  40 #include "memory/metaspaceShared.hpp"
  41 #include "memory/oopFactory.hpp"
  42 #include "memory/resourceArea.hpp"
  43 #include "memory/universe.hpp"
  44 #include "oops/fieldStreams.hpp"
  45 #include "oops/instanceKlass.hpp"
  46 #include "oops/instanceMirrorKlass.hpp"
  47 #include "oops/klass.hpp"
  48 #include "oops/method.inline.hpp"
  49 #include "oops/objArrayOop.inline.hpp"
  50 #include "oops/oop.inline.hpp"
  51 #include "oops/symbol.hpp"
  52 #include "oops/typeArrayOop.inline.hpp"
  53 #include "oops/valueArrayKlass.hpp"
  54 #include "prims/jvmtiExport.hpp"
  55 #include "prims/resolvedMethodTable.hpp"
  56 #include "runtime/fieldDescriptor.inline.hpp"
  57 #include "runtime/frame.inline.hpp"
  58 #include "runtime/handles.inline.hpp"
  59 #include "runtime/interfaceSupport.inline.hpp"
  60 #include "runtime/java.hpp"
  61 #include "runtime/javaCalls.hpp"
  62 #include "runtime/jniHandles.inline.hpp"
  63 #include "runtime/safepoint.hpp"
  64 #include "runtime/safepointVerifiers.hpp"
  65 #include "runtime/thread.inline.hpp"
  66 #include "runtime/vframe.inline.hpp"
  67 #include "utilities/align.hpp"
  68 #include "utilities/preserveException.hpp"
  69 #include "utilities/utf8.hpp"
  70 #if INCLUDE_JVMCI
  71 #include "jvmci/jvmciJavaClasses.hpp"
  72 #endif
  73 
  74 #define INJECTED_FIELD_COMPUTE_OFFSET(klass, name, signature, may_be_java)    \
  75   klass::_##name##_offset = JavaClasses::compute_injected_offset(JavaClasses::klass##_##name##_enum);
  76 
  77 #if INCLUDE_CDS
  78 #define INJECTED_FIELD_SERIALIZE_OFFSET(klass, name, signature, may_be_java) \
  79   f->do_u4((u4*)&_##name##_offset);
  80 #endif
  81 
  82 #define DECLARE_INJECTED_FIELD(klass, name, signature, may_be_java)           \
  83   { SystemDictionary::WK_KLASS_ENUM_NAME(klass), vmSymbols::VM_SYMBOL_ENUM_NAME(name##_name), vmSymbols::VM_SYMBOL_ENUM_NAME(signature), may_be_java },
  84 
  85 InjectedField JavaClasses::_injected_fields[] = {
  86   ALL_INJECTED_FIELDS(DECLARE_INJECTED_FIELD)
  87 };
  88 
  89 int JavaClasses::compute_injected_offset(InjectedFieldID id) {
  90   return _injected_fields[id].compute_offset();
  91 }
  92 
  93 InjectedField* JavaClasses::get_injected(Symbol* class_name, int* field_count) {
  94   *field_count = 0;
  95 
  96   vmSymbols::SID sid = vmSymbols::find_sid(class_name);
  97   if (sid == vmSymbols::NO_SID) {
  98     // Only well known classes can inject fields
  99     return NULL;
 100   }
 101 
 102   int count = 0;
 103   int start = -1;
 104 
 105 #define LOOKUP_INJECTED_FIELD(klass, name, signature, may_be_java) \
 106   if (sid == vmSymbols::VM_SYMBOL_ENUM_NAME(klass)) {              \
 107     count++;                                                       \
 108     if (start == -1) start = klass##_##name##_enum;                \
 109   }
 110   ALL_INJECTED_FIELDS(LOOKUP_INJECTED_FIELD);
 111 #undef LOOKUP_INJECTED_FIELD
 112 
 113   if (start != -1) {
 114     *field_count = count;
 115     return _injected_fields + start;
 116   }
 117   return NULL;
 118 }
 119 
 120 
 121 // Helpful routine for computing field offsets at run time rather than hardcoding them
 122 // Finds local fields only, including static fields.  Static field offsets are from the
 123 // beginning of the mirror.
 124 static void compute_offset(int &dest_offset,
 125                            InstanceKlass* ik, Symbol* name_symbol, Symbol* signature_symbol,
 126                            bool is_static = false) {
 127   fieldDescriptor fd;
 128   if (ik == NULL) {
 129     ResourceMark rm;
 130     log_error(class)("Mismatch JDK version for field: %s type: %s", name_symbol->as_C_string(), signature_symbol->as_C_string());
 131     vm_exit_during_initialization("Invalid layout of well-known class");
 132   }
 133 
 134   if (!ik->find_local_field(name_symbol, signature_symbol, &fd) || fd.is_static() != is_static) {
 135     ResourceMark rm;
 136     log_error(class)("Invalid layout of %s field: %s type: %s", ik->external_name(),
 137                      name_symbol->as_C_string(), signature_symbol->as_C_string());
 138 #ifndef PRODUCT
 139     // Prints all fields and offsets
 140     Log(class) lt;
 141     LogStream ls(lt.error());
 142     ik->print_on(&ls);
 143 #endif //PRODUCT
 144     vm_exit_during_initialization("Invalid layout of well-known class: use -Xlog:class+load=info to see the origin of the problem class");
 145   }
 146   dest_offset = fd.offset();
 147 }
 148 
 149 // Overloading to pass name as a string.
 150 static void compute_offset(int& dest_offset, InstanceKlass* ik,
 151                            const char* name_string, Symbol* signature_symbol,
 152                            bool is_static = false) {
 153   TempNewSymbol name = SymbolTable::probe(name_string, (int)strlen(name_string));
 154   if (name == NULL) {
 155     ResourceMark rm;
 156     log_error(class)("Name %s should be in the SymbolTable since its class is loaded", name_string);
 157     vm_exit_during_initialization("Invalid layout of well-known class", ik->external_name());
 158   }
 159   compute_offset(dest_offset, ik, name, signature_symbol, is_static);
 160 }
 161 
 162 int java_lang_String::value_offset  = 0;
 163 int java_lang_String::hash_offset   = 0;
 164 int java_lang_String::hashIsZero_offset = 0;
 165 int java_lang_String::coder_offset  = 0;
 166 
 167 bool java_lang_String::initialized  = false;
 168 
 169 bool java_lang_String::is_instance(oop obj) {
 170   return is_instance_inlined(obj);
 171 }
 172 
 173 #if INCLUDE_CDS
 174 #define FIELD_SERIALIZE_OFFSET(offset, klass, name, signature, is_static) \
 175   f->do_u4((u4*)&offset)
 176 #endif
 177 
 178 #define FIELD_COMPUTE_OFFSET(offset, klass, name, signature, is_static) \
 179   compute_offset(offset, klass, name, vmSymbols::signature(), is_static)
 180 
 181 #define STRING_FIELDS_DO(macro) \
 182   macro(value_offset, k, vmSymbols::value_name(), byte_array_signature, false); \
 183   macro(hash_offset,  k, "hash",                  int_signature,        false); \
 184   macro(hashIsZero_offset, k, "hashIsZero",       bool_signature,       false); \
 185   macro(coder_offset, k, "coder",                 byte_signature,       false);
 186 
 187 void java_lang_String::compute_offsets() {
 188   if (initialized) {
 189     return;
 190   }
 191 
 192   InstanceKlass* k = SystemDictionary::String_klass();
 193   STRING_FIELDS_DO(FIELD_COMPUTE_OFFSET);
 194 
 195   initialized = true;
 196 }
 197 
 198 #if INCLUDE_CDS
 199 void java_lang_String::serialize_offsets(SerializeClosure* f) {
 200   STRING_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
 201   f->do_u4((u4*)&initialized);
 202 }
 203 #endif
 204 
 205 class CompactStringsFixup : public FieldClosure {
 206 private:
 207   bool _value;
 208 
 209 public:
 210   CompactStringsFixup(bool value) : _value(value) {}
 211 
 212   void do_field(fieldDescriptor* fd) {
 213     if (fd->name() == vmSymbols::compact_strings_name()) {
 214       oop mirror = fd->field_holder()->java_mirror();
 215       assert(fd->field_holder() == SystemDictionary::String_klass(), "Should be String");
 216       assert(mirror != NULL, "String must have mirror already");
 217       mirror->bool_field_put(fd->offset(), _value);
 218     }
 219   }
 220 };
 221 
 222 void java_lang_String::set_compact_strings(bool value) {
 223   CompactStringsFixup fix(value);
 224   SystemDictionary::String_klass()->do_local_static_fields(&fix);
 225 }
 226 
 227 Handle java_lang_String::basic_create(int length, bool is_latin1, TRAPS) {
 228   assert(initialized, "Must be initialized");
 229   assert(CompactStrings || !is_latin1, "Must be UTF16 without CompactStrings");
 230 
 231   // Create the String object first, so there's a chance that the String
 232   // and the char array it points to end up in the same cache line.
 233   oop obj;
 234   obj = SystemDictionary::String_klass()->allocate_instance(CHECK_NH);
 235 
 236   // Create the char array.  The String object must be handlized here
 237   // because GC can happen as a result of the allocation attempt.
 238   Handle h_obj(THREAD, obj);
 239   int arr_length = is_latin1 ? length : length << 1; // 2 bytes per UTF16.
 240   typeArrayOop buffer = oopFactory::new_byteArray(arr_length, CHECK_NH);;
 241 
 242   // Point the String at the char array
 243   obj = h_obj();
 244   set_value(obj, buffer);
 245   // No need to zero the offset, allocation zero'ed the entire String object
 246   set_coder(obj, is_latin1 ? CODER_LATIN1 : CODER_UTF16);
 247   return h_obj;
 248 }
 249 
 250 Handle java_lang_String::create_from_unicode(const jchar* unicode, int length, TRAPS) {
 251   bool is_latin1 = CompactStrings && UNICODE::is_latin1(unicode, length);
 252   Handle h_obj = basic_create(length, is_latin1, CHECK_NH);
 253   typeArrayOop buffer = value(h_obj());
 254   assert(TypeArrayKlass::cast(buffer->klass())->element_type() == T_BYTE, "only byte[]");
 255   if (is_latin1) {
 256     for (int index = 0; index < length; index++) {
 257       buffer->byte_at_put(index, (jbyte)unicode[index]);
 258     }
 259   } else {
 260     for (int index = 0; index < length; index++) {
 261       buffer->char_at_put(index, unicode[index]);
 262     }
 263   }
 264 
 265 #ifdef ASSERT
 266   {
 267     ResourceMark rm;
 268     char* expected = UNICODE::as_utf8(unicode, length);
 269     char* actual = as_utf8_string(h_obj());
 270     if (strcmp(expected, actual) != 0) {
 271       tty->print_cr("Unicode conversion failure: %s --> %s", expected, actual);
 272       ShouldNotReachHere();
 273     }
 274   }
 275 #endif
 276 
 277   return h_obj;
 278 }
 279 
 280 oop java_lang_String::create_oop_from_unicode(const jchar* unicode, int length, TRAPS) {
 281   Handle h_obj = create_from_unicode(unicode, length, CHECK_0);
 282   return h_obj();
 283 }
 284 
 285 Handle java_lang_String::create_from_str(const char* utf8_str, TRAPS) {
 286   if (utf8_str == NULL) {
 287     return Handle();
 288   }
 289   bool has_multibyte, is_latin1;
 290   int length = UTF8::unicode_length(utf8_str, is_latin1, has_multibyte);
 291   if (!CompactStrings) {
 292     has_multibyte = true;
 293     is_latin1 = false;
 294   }
 295 
 296   Handle h_obj = basic_create(length, is_latin1, CHECK_NH);
 297   if (length > 0) {
 298     if (!has_multibyte) {
 299       const jbyte* src = reinterpret_cast<const jbyte*>(utf8_str);
 300       ArrayAccess<>::arraycopy_from_native(src, value(h_obj()), typeArrayOopDesc::element_offset<jbyte>(0), length);
 301     } else if (is_latin1) {
 302       UTF8::convert_to_unicode(utf8_str, value(h_obj())->byte_at_addr(0), length);
 303     } else {
 304       UTF8::convert_to_unicode(utf8_str, value(h_obj())->char_at_addr(0), length);
 305     }
 306   }
 307 
 308 #ifdef ASSERT
 309   // This check is too strict because the input string is not necessarily valid UTF8.
 310   // For example, it may be created with arbitrary content via jni_NewStringUTF.
 311   /*
 312   {
 313     ResourceMark rm;
 314     const char* expected = utf8_str;
 315     char* actual = as_utf8_string(h_obj());
 316     if (strcmp(expected, actual) != 0) {
 317       tty->print_cr("String conversion failure: %s --> %s", expected, actual);
 318       ShouldNotReachHere();
 319     }
 320   }
 321   */
 322 #endif
 323 
 324   return h_obj;
 325 }
 326 
 327 oop java_lang_String::create_oop_from_str(const char* utf8_str, TRAPS) {
 328   Handle h_obj = create_from_str(utf8_str, CHECK_0);
 329   return h_obj();
 330 }
 331 
 332 Handle java_lang_String::create_from_symbol(Symbol* symbol, TRAPS) {
 333   const char* utf8_str = (char*)symbol->bytes();
 334   int utf8_len = symbol->utf8_length();
 335 
 336   bool has_multibyte, is_latin1;
 337   int length = UTF8::unicode_length(utf8_str, utf8_len, is_latin1, has_multibyte);
 338   if (!CompactStrings) {
 339     has_multibyte = true;
 340     is_latin1 = false;
 341   }
 342 
 343   Handle h_obj = basic_create(length, is_latin1, CHECK_NH);
 344   if (length > 0) {
 345     if (!has_multibyte) {
 346       const jbyte* src = reinterpret_cast<const jbyte*>(utf8_str);
 347       ArrayAccess<>::arraycopy_from_native(src, value(h_obj()), typeArrayOopDesc::element_offset<jbyte>(0), length);
 348     } else if (is_latin1) {
 349       UTF8::convert_to_unicode(utf8_str, value(h_obj())->byte_at_addr(0), length);
 350     } else {
 351       UTF8::convert_to_unicode(utf8_str, value(h_obj())->char_at_addr(0), length);
 352     }
 353   }
 354 
 355 #ifdef ASSERT
 356   {
 357     ResourceMark rm;
 358     const char* expected = symbol->as_utf8();
 359     char* actual = as_utf8_string(h_obj());
 360     if (strncmp(expected, actual, utf8_len) != 0) {
 361       tty->print_cr("Symbol conversion failure: %s --> %s", expected, actual);
 362       ShouldNotReachHere();
 363     }
 364   }
 365 #endif
 366 
 367   return h_obj;
 368 }
 369 
 370 // Converts a C string to a Java String based on current encoding
 371 Handle java_lang_String::create_from_platform_dependent_str(const char* str, TRAPS) {
 372   assert(str != NULL, "bad arguments");
 373 
 374   typedef jstring (*to_java_string_fn_t)(JNIEnv*, const char *);
 375   static to_java_string_fn_t _to_java_string_fn = NULL;
 376 
 377   if (_to_java_string_fn == NULL) {
 378     void *lib_handle = os::native_java_library();
 379     _to_java_string_fn = CAST_TO_FN_PTR(to_java_string_fn_t, os::dll_lookup(lib_handle, "NewStringPlatform"));
 380     if (_to_java_string_fn == NULL) {
 381       fatal("NewStringPlatform missing");
 382     }
 383   }
 384 
 385   jstring js = NULL;
 386   { JavaThread* thread = (JavaThread*)THREAD;
 387     assert(thread->is_Java_thread(), "must be java thread");
 388     HandleMark hm(thread);
 389     ThreadToNativeFromVM ttn(thread);
 390     js = (_to_java_string_fn)(thread->jni_environment(), str);
 391   }
 392   return Handle(THREAD, JNIHandles::resolve(js));
 393 }
 394 
 395 // Converts a Java String to a native C string that can be used for
 396 // native OS calls.
 397 char* java_lang_String::as_platform_dependent_str(Handle java_string, TRAPS) {
 398   typedef char* (*to_platform_string_fn_t)(JNIEnv*, jstring, bool*);
 399   static to_platform_string_fn_t _to_platform_string_fn = NULL;
 400 
 401   if (_to_platform_string_fn == NULL) {
 402     void *lib_handle = os::native_java_library();
 403     _to_platform_string_fn = CAST_TO_FN_PTR(to_platform_string_fn_t, os::dll_lookup(lib_handle, "GetStringPlatformChars"));
 404     if (_to_platform_string_fn == NULL) {
 405       fatal("GetStringPlatformChars missing");
 406     }
 407   }
 408 
 409   char *native_platform_string;
 410   { JavaThread* thread = (JavaThread*)THREAD;
 411     assert(thread->is_Java_thread(), "must be java thread");
 412     JNIEnv *env = thread->jni_environment();
 413     jstring js = (jstring) JNIHandles::make_local(env, java_string());
 414     bool is_copy;
 415     HandleMark hm(thread);
 416     ThreadToNativeFromVM ttn(thread);
 417     native_platform_string = (_to_platform_string_fn)(env, js, &is_copy);
 418     assert(is_copy == JNI_TRUE, "is_copy value changed");
 419     JNIHandles::destroy_local(js);
 420   }
 421   return native_platform_string;
 422 }
 423 
 424 Handle java_lang_String::char_converter(Handle java_string, jchar from_char, jchar to_char, TRAPS) {
 425   oop          obj    = java_string();
 426   // Typical usage is to convert all '/' to '.' in string.
 427   typeArrayOop value  = java_lang_String::value(obj);
 428   int          length = java_lang_String::length(obj, value);
 429   bool      is_latin1 = java_lang_String::is_latin1(obj);
 430 
 431   // First check if any from_char exist
 432   int index; // Declared outside, used later
 433   for (index = 0; index < length; index++) {
 434     jchar c = !is_latin1 ? value->char_at(index) :
 435                   ((jchar) value->byte_at(index)) & 0xff;
 436     if (c == from_char) {
 437       break;
 438     }
 439   }
 440   if (index == length) {
 441     // No from_char, so do not copy.
 442     return java_string;
 443   }
 444 
 445   // Check if result string will be latin1
 446   bool to_is_latin1 = false;
 447 
 448   // Replacement char must be latin1
 449   if (CompactStrings && UNICODE::is_latin1(to_char)) {
 450     if (is_latin1) {
 451       // Source string is latin1 as well
 452       to_is_latin1 = true;
 453     } else if (!UNICODE::is_latin1(from_char)) {
 454       // We are replacing an UTF16 char. Scan string to
 455       // check if result can be latin1 encoded.
 456       to_is_latin1 = true;
 457       for (index = 0; index < length; index++) {
 458         jchar c = value->char_at(index);
 459         if (c != from_char && !UNICODE::is_latin1(c)) {
 460           to_is_latin1 = false;
 461           break;
 462         }
 463       }
 464     }
 465   }
 466 
 467   // Create new UNICODE (or byte) buffer. Must handlize value because GC
 468   // may happen during String and char array creation.
 469   typeArrayHandle h_value(THREAD, value);
 470   Handle string = basic_create(length, to_is_latin1, CHECK_NH);
 471   typeArrayOop from_buffer = h_value();
 472   typeArrayOop to_buffer = java_lang_String::value(string());
 473 
 474   // Copy contents
 475   for (index = 0; index < length; index++) {
 476     jchar c = (!is_latin1) ? from_buffer->char_at(index) :
 477                     ((jchar) from_buffer->byte_at(index)) & 0xff;
 478     if (c == from_char) {
 479       c = to_char;
 480     }
 481     if (!to_is_latin1) {
 482       to_buffer->char_at_put(index, c);
 483     } else {
 484       to_buffer->byte_at_put(index, (jbyte) c);
 485     }
 486   }
 487   return string;
 488 }
 489 
 490 jchar* java_lang_String::as_unicode_string(oop java_string, int& length, TRAPS) {
 491   typeArrayOop value  = java_lang_String::value(java_string);
 492                length = java_lang_String::length(java_string, value);
 493   bool      is_latin1 = java_lang_String::is_latin1(java_string);
 494 
 495   jchar* result = NEW_RESOURCE_ARRAY_RETURN_NULL(jchar, length);
 496   if (result != NULL) {
 497     if (!is_latin1) {
 498       for (int index = 0; index < length; index++) {
 499         result[index] = value->char_at(index);
 500       }
 501     } else {
 502       for (int index = 0; index < length; index++) {
 503         result[index] = ((jchar) value->byte_at(index)) & 0xff;
 504       }
 505     }
 506   } else {
 507     THROW_MSG_0(vmSymbols::java_lang_OutOfMemoryError(), "could not allocate Unicode string");
 508   }
 509   return result;
 510 }
 511 
 512 unsigned int java_lang_String::hash_code(oop java_string) {
 513   // The hash and hashIsZero fields are subject to a benign data race,
 514   // making it crucial to ensure that any observable result of the
 515   // calculation in this method stays correct under any possible read of
 516   // these fields. Necessary restrictions to allow this to be correct
 517   // without explicit memory fences or similar concurrency primitives is
 518   // that we can ever only write to one of these two fields for a given
 519   // String instance, and that the computation is idempotent and derived
 520   // from immutable state
 521   assert(initialized && (hash_offset > 0) && (hashIsZero_offset > 0), "Must be initialized");
 522   if (java_lang_String::hash_is_set(java_string)) {
 523     return java_string->int_field(hash_offset);
 524   }
 525 
 526   typeArrayOop value = java_lang_String::value(java_string);
 527   int         length = java_lang_String::length(java_string, value);
 528   bool     is_latin1 = java_lang_String::is_latin1(java_string);
 529 
 530   unsigned int hash = 0;
 531   if (length > 0) {
 532     if (is_latin1) {
 533       hash = java_lang_String::hash_code(value->byte_at_addr(0), length);
 534     } else {
 535       hash = java_lang_String::hash_code(value->char_at_addr(0), length);
 536     }
 537   }
 538 
 539   if (hash != 0) {
 540     java_string->int_field_put(hash_offset, hash);
 541   } else {
 542     java_string->bool_field_put(hashIsZero_offset, true);
 543   }
 544   return hash;
 545 }
 546 
 547 char* java_lang_String::as_quoted_ascii(oop java_string) {
 548   typeArrayOop value  = java_lang_String::value(java_string);
 549   int          length = java_lang_String::length(java_string, value);
 550   bool      is_latin1 = java_lang_String::is_latin1(java_string);
 551 
 552   if (length == 0) return NULL;
 553 
 554   char* result;
 555   int result_length;
 556   if (!is_latin1) {
 557     jchar* base = value->char_at_addr(0);
 558     result_length = UNICODE::quoted_ascii_length(base, length) + 1;
 559     result = NEW_RESOURCE_ARRAY(char, result_length);
 560     UNICODE::as_quoted_ascii(base, length, result, result_length);
 561   } else {
 562     jbyte* base = value->byte_at_addr(0);
 563     result_length = UNICODE::quoted_ascii_length(base, length) + 1;
 564     result = NEW_RESOURCE_ARRAY(char, result_length);
 565     UNICODE::as_quoted_ascii(base, length, result, result_length);
 566   }
 567   assert(result_length >= length + 1, "must not be shorter");
 568   assert(result_length == (int)strlen(result) + 1, "must match");
 569   return result;
 570 }
 571 
 572 Symbol* java_lang_String::as_symbol(oop java_string, TRAPS) {
 573   typeArrayOop value  = java_lang_String::value(java_string);
 574   int          length = java_lang_String::length(java_string, value);
 575   bool      is_latin1 = java_lang_String::is_latin1(java_string);
 576   if (!is_latin1) {
 577     jchar* base = (length == 0) ? NULL : value->char_at_addr(0);
 578     Symbol* sym = SymbolTable::lookup_unicode(base, length, THREAD);
 579     return sym;
 580   } else {
 581     ResourceMark rm;
 582     jbyte* position = (length == 0) ? NULL : value->byte_at_addr(0);
 583     const char* base = UNICODE::as_utf8(position, length);
 584     Symbol* sym = SymbolTable::lookup(base, length, THREAD);
 585     return sym;
 586   }
 587 }
 588 
 589 Symbol* java_lang_String::as_symbol_or_null(oop java_string) {
 590   typeArrayOop value  = java_lang_String::value(java_string);
 591   int          length = java_lang_String::length(java_string, value);
 592   bool      is_latin1 = java_lang_String::is_latin1(java_string);
 593   if (!is_latin1) {
 594     jchar* base = (length == 0) ? NULL : value->char_at_addr(0);
 595     return SymbolTable::probe_unicode(base, length);
 596   } else {
 597     ResourceMark rm;
 598     jbyte* position = (length == 0) ? NULL : value->byte_at_addr(0);
 599     const char* base = UNICODE::as_utf8(position, length);
 600     return SymbolTable::probe(base, length);
 601   }
 602 }
 603 
 604 int java_lang_String::utf8_length(oop java_string, typeArrayOop value) {
 605   assert(value_equals(value, java_lang_String::value(java_string)),
 606          "value must be same as java_lang_String::value(java_string)");
 607   int length = java_lang_String::length(java_string, value);
 608   if (length == 0) {
 609     return 0;
 610   }
 611   if (!java_lang_String::is_latin1(java_string)) {
 612     return UNICODE::utf8_length(value->char_at_addr(0), length);
 613   } else {
 614     return UNICODE::utf8_length(value->byte_at_addr(0), length);
 615   }
 616 }
 617 
 618 int java_lang_String::utf8_length(oop java_string) {
 619   typeArrayOop value = java_lang_String::value(java_string);
 620   return utf8_length(java_string, value);
 621 }
 622 
 623 char* java_lang_String::as_utf8_string(oop java_string) {
 624   typeArrayOop value  = java_lang_String::value(java_string);
 625   int          length = java_lang_String::length(java_string, value);
 626   bool      is_latin1 = java_lang_String::is_latin1(java_string);
 627   if (!is_latin1) {
 628     jchar* position = (length == 0) ? NULL : value->char_at_addr(0);
 629     return UNICODE::as_utf8(position, length);
 630   } else {
 631     jbyte* position = (length == 0) ? NULL : value->byte_at_addr(0);
 632     return UNICODE::as_utf8(position, length);
 633   }
 634 }
 635 
 636 char* java_lang_String::as_utf8_string(oop java_string, typeArrayOop value, char* buf, int buflen) {
 637   assert(value_equals(value, java_lang_String::value(java_string)),
 638          "value must be same as java_lang_String::value(java_string)");
 639   int     length = java_lang_String::length(java_string, value);
 640   bool is_latin1 = java_lang_String::is_latin1(java_string);
 641   if (!is_latin1) {
 642     jchar* position = (length == 0) ? NULL : value->char_at_addr(0);
 643     return UNICODE::as_utf8(position, length, buf, buflen);
 644   } else {
 645     jbyte* position = (length == 0) ? NULL : value->byte_at_addr(0);
 646     return UNICODE::as_utf8(position, length, buf, buflen);
 647   }
 648 }
 649 
 650 char* java_lang_String::as_utf8_string(oop java_string, char* buf, int buflen) {
 651   typeArrayOop value = java_lang_String::value(java_string);
 652   return as_utf8_string(java_string, value, buf, buflen);
 653 }
 654 
 655 char* java_lang_String::as_utf8_string(oop java_string, int start, int len) {
 656   typeArrayOop value  = java_lang_String::value(java_string);
 657   bool      is_latin1 = java_lang_String::is_latin1(java_string);
 658   assert(start + len <= java_lang_String::length(java_string), "just checking");
 659   if (!is_latin1) {
 660     jchar* position = value->char_at_addr(start);
 661     return UNICODE::as_utf8(position, len);
 662   } else {
 663     jbyte* position = value->byte_at_addr(start);
 664     return UNICODE::as_utf8(position, len);
 665   }
 666 }
 667 
 668 char* java_lang_String::as_utf8_string(oop java_string, typeArrayOop value, int start, int len, char* buf, int buflen) {
 669   assert(value_equals(value, java_lang_String::value(java_string)),
 670          "value must be same as java_lang_String::value(java_string)");
 671   assert(start + len <= java_lang_String::length(java_string), "just checking");
 672   bool is_latin1 = java_lang_String::is_latin1(java_string);
 673   if (!is_latin1) {
 674     jchar* position = value->char_at_addr(start);
 675     return UNICODE::as_utf8(position, len, buf, buflen);
 676   } else {
 677     jbyte* position = value->byte_at_addr(start);
 678     return UNICODE::as_utf8(position, len, buf, buflen);
 679   }
 680 }
 681 
 682 bool java_lang_String::equals(oop java_string, const jchar* chars, int len) {
 683   assert(java_string->klass() == SystemDictionary::String_klass(),
 684          "must be java_string");
 685   typeArrayOop value = java_lang_String::value_no_keepalive(java_string);
 686   int length = java_lang_String::length(java_string, value);
 687   if (length != len) {
 688     return false;
 689   }
 690   bool is_latin1 = java_lang_String::is_latin1(java_string);
 691   if (!is_latin1) {
 692     for (int i = 0; i < len; i++) {
 693       if (value->char_at(i) != chars[i]) {
 694         return false;
 695       }
 696     }
 697   } else {
 698     for (int i = 0; i < len; i++) {
 699       if ((((jchar) value->byte_at(i)) & 0xff) != chars[i]) {
 700         return false;
 701       }
 702     }
 703   }
 704   return true;
 705 }
 706 
 707 bool java_lang_String::equals(oop str1, oop str2) {
 708   assert(str1->klass() == SystemDictionary::String_klass(),
 709          "must be java String");
 710   assert(str2->klass() == SystemDictionary::String_klass(),
 711          "must be java String");
 712   typeArrayOop value1    = java_lang_String::value_no_keepalive(str1);
 713   bool         is_latin1 = java_lang_String::is_latin1(str1);
 714   typeArrayOop value2    = java_lang_String::value_no_keepalive(str2);
 715   bool         is_latin2 = java_lang_String::is_latin1(str2);
 716 
 717   if (is_latin1 != is_latin2) {
 718     // Strings with different coders are never equal.
 719     return false;
 720   }
 721   return value_equals(value1, value2);
 722 }
 723 
 724 void java_lang_String::print(oop java_string, outputStream* st) {
 725   assert(java_string->klass() == SystemDictionary::String_klass(), "must be java_string");
 726   typeArrayOop value  = java_lang_String::value_no_keepalive(java_string);
 727 
 728   if (value == NULL) {
 729     // This can happen if, e.g., printing a String
 730     // object before its initializer has been called
 731     st->print("NULL");
 732     return;
 733   }
 734 
 735   int length = java_lang_String::length(java_string, value);
 736   bool is_latin1 = java_lang_String::is_latin1(java_string);
 737 
 738   st->print("\"");
 739   for (int index = 0; index < length; index++) {
 740     st->print("%c", (!is_latin1) ?  value->char_at(index) :
 741                            ((jchar) value->byte_at(index)) & 0xff );
 742   }
 743   st->print("\"");
 744 }
 745 
 746 
 747 static void initialize_static_field(fieldDescriptor* fd, Handle mirror, TRAPS) {
 748   assert(mirror.not_null() && fd->is_static(), "just checking");
 749   if (fd->has_initial_value()) {
 750     BasicType t = fd->field_type();
 751     switch (t) {
 752       case T_BYTE:
 753         mirror()->byte_field_put(fd->offset(), fd->int_initial_value());
 754               break;
 755       case T_BOOLEAN:
 756         mirror()->bool_field_put(fd->offset(), fd->int_initial_value());
 757               break;
 758       case T_CHAR:
 759         mirror()->char_field_put(fd->offset(), fd->int_initial_value());
 760               break;
 761       case T_SHORT:
 762         mirror()->short_field_put(fd->offset(), fd->int_initial_value());
 763               break;
 764       case T_INT:
 765         mirror()->int_field_put(fd->offset(), fd->int_initial_value());
 766         break;
 767       case T_FLOAT:
 768         mirror()->float_field_put(fd->offset(), fd->float_initial_value());
 769         break;
 770       case T_DOUBLE:
 771         mirror()->double_field_put(fd->offset(), fd->double_initial_value());
 772         break;
 773       case T_LONG:
 774         mirror()->long_field_put(fd->offset(), fd->long_initial_value());
 775         break;
 776       case T_OBJECT:
 777         {
 778           assert(fd->signature() == vmSymbols::string_signature(),
 779                  "just checking");
 780           if (DumpSharedSpaces && HeapShared::is_archived_object(mirror())) {
 781             // Archive the String field and update the pointer.
 782             oop s = mirror()->obj_field(fd->offset());
 783             oop archived_s = StringTable::create_archived_string(s, CHECK);
 784             mirror()->obj_field_put(fd->offset(), archived_s);
 785           } else {
 786             oop string = fd->string_initial_value(CHECK);
 787             mirror()->obj_field_put(fd->offset(), string);
 788           }
 789         }
 790         break;
 791       default:
 792         THROW_MSG(vmSymbols::java_lang_ClassFormatError(),
 793                   "Illegal ConstantValue attribute in class file");
 794     }
 795   }
 796 }
 797 
 798 
 799 void java_lang_Class::fixup_mirror(Klass* k, TRAPS) {
 800   assert(InstanceMirrorKlass::offset_of_static_fields() != 0, "must have been computed already");
 801 
 802   // If the offset was read from the shared archive, it was fixed up already
 803   if (!k->is_shared()) {
 804     if (k->is_instance_klass()) {
 805       // During bootstrap, java.lang.Class wasn't loaded so static field
 806       // offsets were computed without the size added it.  Go back and
 807       // update all the static field offsets to included the size.
 808       for (JavaFieldStream fs(InstanceKlass::cast(k)); !fs.done(); fs.next()) {
 809         if (fs.access_flags().is_static()) {
 810           int real_offset = fs.offset() + InstanceMirrorKlass::offset_of_static_fields();
 811           fs.set_offset(real_offset);
 812         }
 813       }
 814     }
 815   }
 816 
 817   if (k->is_shared() && k->has_raw_archived_mirror()) {
 818     if (HeapShared::open_archive_heap_region_mapped()) {
 819       bool present = restore_archived_mirror(k, Handle(), Handle(), Handle(), CHECK);
 820       assert(present, "Missing archived mirror for %s", k->external_name());
 821       return;
 822     } else {
 823       k->set_java_mirror_handle(NULL);
 824       k->clear_has_raw_archived_mirror();
 825     }
 826   }
 827   create_mirror(k, Handle(), Handle(), Handle(), CHECK);
 828 }
 829 
 830 void java_lang_Class::initialize_mirror_fields(Klass* k,
 831                                                Handle mirror,
 832                                                Handle protection_domain,
 833                                                TRAPS) {
 834   // Allocate a simple java object for a lock.
 835   // This needs to be a java object because during class initialization
 836   // it can be held across a java call.
 837   typeArrayOop r = oopFactory::new_typeArray(T_INT, 0, CHECK);
 838   set_init_lock(mirror(), r);
 839 
 840   // Set protection domain also
 841   set_protection_domain(mirror(), protection_domain());
 842 
 843   // Initialize static fields
 844   InstanceKlass::cast(k)->do_local_static_fields(&initialize_static_field, mirror, CHECK);
 845 }
 846 
 847 // Set the java.lang.Module module field in the java_lang_Class mirror
 848 void java_lang_Class::set_mirror_module_field(Klass* k, Handle mirror, Handle module, TRAPS) {
 849   if (module.is_null()) {
 850     // During startup, the module may be NULL only if java.base has not been defined yet.
 851     // Put the class on the fixup_module_list to patch later when the java.lang.Module
 852     // for java.base is known. But note that since we captured the NULL module another
 853     // thread may have completed that initialization.
 854 
 855     bool javabase_was_defined = false;
 856     {
 857       MutexLocker m1(Module_lock, THREAD);
 858       // Keep list of classes needing java.base module fixup
 859       if (!ModuleEntryTable::javabase_defined()) {
 860         assert(k->java_mirror() != NULL, "Class's mirror is null");
 861         k->class_loader_data()->inc_keep_alive();
 862         assert(fixup_module_field_list() != NULL, "fixup_module_field_list not initialized");
 863         fixup_module_field_list()->push(k);
 864       } else {
 865         javabase_was_defined = true;
 866       }
 867     }
 868 
 869     // If java.base was already defined then patch this particular class with java.base.
 870     if (javabase_was_defined) {
 871       ModuleEntry *javabase_entry = ModuleEntryTable::javabase_moduleEntry();
 872       assert(javabase_entry != NULL && javabase_entry->module() != NULL,
 873              "Setting class module field, " JAVA_BASE_NAME " should be defined");
 874       Handle javabase_handle(THREAD, javabase_entry->module());
 875       set_module(mirror(), javabase_handle());
 876     }
 877   } else {
 878     assert(Universe::is_module_initialized() ||
 879            (ModuleEntryTable::javabase_defined() &&
 880             (oopDesc::equals(module(), ModuleEntryTable::javabase_moduleEntry()->module()))),
 881            "Incorrect java.lang.Module specification while creating mirror");
 882     set_module(mirror(), module());
 883   }
 884 }
 885 
 886 // Statically allocate fixup lists because they always get created.
 887 void java_lang_Class::allocate_fixup_lists() {
 888   GrowableArray<Klass*>* mirror_list =
 889     new (ResourceObj::C_HEAP, mtClass) GrowableArray<Klass*>(40, true);
 890   set_fixup_mirror_list(mirror_list);
 891 
 892   GrowableArray<Klass*>* module_list =
 893     new (ResourceObj::C_HEAP, mtModule) GrowableArray<Klass*>(500, true);
 894   set_fixup_module_field_list(module_list);
 895 }
 896 
 897 void java_lang_Class::create_mirror(Klass* k, Handle class_loader,
 898                                     Handle module, Handle protection_domain, TRAPS) {
 899   assert(k != NULL, "Use create_basic_type_mirror for primitive types");
 900   assert(k->java_mirror() == NULL, "should only assign mirror once");
 901 
 902   // Use this moment of initialization to cache modifier_flags also,
 903   // to support Class.getModifiers().  Instance classes recalculate
 904   // the cached flags after the class file is parsed, but before the
 905   // class is put into the system dictionary.
 906   int computed_modifiers = k->compute_modifier_flags(CHECK);
 907   k->set_modifier_flags(computed_modifiers);
 908   // Class_klass has to be loaded because it is used to allocate
 909   // the mirror.
 910   if (SystemDictionary::Class_klass_loaded()) {
 911     // Allocate mirror (java.lang.Class instance)
 912     oop mirror_oop = InstanceMirrorKlass::cast(SystemDictionary::Class_klass())->allocate_instance(k, CHECK);
 913     Handle mirror(THREAD, mirror_oop);
 914     Handle comp_mirror;
 915 
 916     // Setup indirection from mirror->klass
 917     java_lang_Class::set_klass(mirror(), k);
 918 
 919     InstanceMirrorKlass* mk = InstanceMirrorKlass::cast(mirror->klass());
 920     assert(oop_size(mirror()) == mk->instance_size(k), "should have been set");
 921 
 922     java_lang_Class::set_static_oop_field_count(mirror(), mk->compute_static_oop_field_count(mirror()));
 923 
 924     // It might also have a component mirror.  This mirror must already exist.
 925     if (k->is_array_klass()) {
 926       if (k->is_valueArray_klass()) {
 927         Klass* element_klass = (Klass*) ValueArrayKlass::cast(k)->element_klass();
 928         if (element_klass->is_value()) {
 929           ValueKlass* vk = ValueKlass::cast(InstanceKlass::cast(element_klass));
 930           comp_mirror = Handle(THREAD, vk->value_mirror());
 931         } else {
 932           comp_mirror = Handle(THREAD, element_klass->java_mirror());
 933         }
 934       }
 935       else if (k->is_typeArray_klass()) {
 936         BasicType type = TypeArrayKlass::cast(k)->element_type();
 937         comp_mirror = Handle(THREAD, Universe::java_mirror(type));
 938       } else {
 939         assert(k->is_objArray_klass(), "Must be");
 940         Klass* element_klass = ObjArrayKlass::cast(k)->element_klass();
 941         assert(element_klass != NULL, "Must have an element klass");
 942         if (element_klass->is_value()) {
 943           ValueKlass* vk = ValueKlass::cast(InstanceKlass::cast(element_klass));
 944           comp_mirror = Handle(THREAD, vk->value_mirror());
 945         } else {
 946           comp_mirror = Handle(THREAD, element_klass->java_mirror());
 947         }
 948       }
 949       assert(comp_mirror() != NULL, "must have a mirror");
 950 
 951       // Two-way link between the array klass and its component mirror:
 952       // (array_klass) k -> mirror -> component_mirror -> array_klass -> k
 953       set_component_mirror(mirror(), comp_mirror());
 954       // See below for ordering dependencies between field array_klass in component mirror
 955       // and java_mirror in this klass.
 956     } else {
 957       assert(k->is_instance_klass(), "Must be");
 958 
 959       initialize_mirror_fields(k, mirror, protection_domain, THREAD);
 960       if (HAS_PENDING_EXCEPTION) {
 961         // If any of the fields throws an exception like OOM remove the klass field
 962         // from the mirror so GC doesn't follow it after the klass has been deallocated.
 963         // This mirror looks like a primitive type, which logically it is because it
 964         // it represents no class.
 965         java_lang_Class::set_klass(mirror(), NULL);
 966         return;
 967       }
 968     }
 969 
 970     // set the classLoader field in the java_lang_Class instance
 971     assert(oopDesc::equals(class_loader(), k->class_loader()), "should be same");
 972     set_class_loader(mirror(), class_loader());
 973 
 974     // Setup indirection from klass->mirror
 975     // after any exceptions can happen during allocations.
 976     k->set_java_mirror(mirror);
 977 
 978     // Set the module field in the java_lang_Class instance.  This must be done
 979     // after the mirror is set.
 980     set_mirror_module_field(k, mirror, module, THREAD);
 981 
 982     if (comp_mirror() != NULL) {
 983       // Set after k->java_mirror() is published, because compiled code running
 984       // concurrently doesn't expect a k to have a null java_mirror.
 985       release_set_array_klass(comp_mirror(), k);
 986     }
 987 
 988     if (k->is_value()) {
 989       // create the secondary mirror for value class
 990       oop value_mirror_oop = create_value_mirror(k, mirror, CHECK);
 991       set_box_mirror(mirror(), mirror());
 992       set_value_mirror(mirror(), value_mirror_oop);
 993     }
 994   } else {
 995     assert(fixup_mirror_list() != NULL, "fixup_mirror_list not initialized");
 996     fixup_mirror_list()->push(k);
 997   }
 998 }
 999 
1000 // Create the secondary mirror for value type. Sets all the fields of this java.lang.Class
1001 // instance with the same value as the primary mirror except signers.
1002 // Class::setSigners and getSigners will use the primary mirror when passed to the JVM.
1003 oop java_lang_Class::create_value_mirror(Klass* k, Handle mirror, TRAPS) {
1004     // Allocate mirror (java.lang.Class instance)
1005     oop mirror_oop = InstanceMirrorKlass::cast(SystemDictionary::Class_klass())->allocate_instance(k, CHECK_0);
1006     Handle value_mirror(THREAD, mirror_oop);
1007 
1008     java_lang_Class::set_klass(value_mirror(), k);
1009     java_lang_Class::set_static_oop_field_count(value_mirror(), static_oop_field_count(mirror()));
1010     // ## do we need to set init lock?
1011     java_lang_Class::set_init_lock(value_mirror(), init_lock(mirror()));
1012 
1013     if (k->is_array_klass()) {
1014       assert(component_mirror(mirror()) != NULL, "must have a mirror");
1015       set_component_mirror(value_mirror(), component_mirror(mirror()));
1016     }
1017 
1018     set_protection_domain(value_mirror(), protection_domain(mirror()));
1019     set_class_loader(value_mirror(), class_loader(mirror()));
1020     // ## handle if java.base is not yet defined
1021     set_module(value_mirror(), module(mirror()));
1022     set_box_mirror(value_mirror(), mirror());
1023     set_value_mirror(value_mirror(), value_mirror());
1024     return value_mirror();
1025 }
1026 
1027 #if INCLUDE_CDS_JAVA_HEAP
1028 // Clears mirror fields. Static final fields with initial values are reloaded
1029 // from constant pool. The object identity hash is in the object header and is
1030 // not affected.
1031 class ResetMirrorField: public FieldClosure {
1032  private:
1033   Handle _m;
1034 
1035  public:
1036   ResetMirrorField(Handle mirror) : _m(mirror) {}
1037 
1038   void do_field(fieldDescriptor* fd) {
1039     assert(DumpSharedSpaces, "dump time only");
1040     assert(_m.not_null(), "Mirror cannot be NULL");
1041 
1042     if (fd->is_static() && fd->has_initial_value()) {
1043       initialize_static_field(fd, _m, Thread::current());
1044       return;
1045     }
1046 
1047     BasicType ft = fd->field_type();
1048     switch (ft) {
1049       case T_BYTE:
1050         _m()->byte_field_put(fd->offset(), 0);
1051         break;
1052       case T_CHAR:
1053         _m()->char_field_put(fd->offset(), 0);
1054         break;
1055       case T_DOUBLE:
1056         _m()->double_field_put(fd->offset(), 0);
1057         break;
1058       case T_FLOAT:
1059         _m()->float_field_put(fd->offset(), 0);
1060         break;
1061       case T_INT:
1062         _m()->int_field_put(fd->offset(), 0);
1063         break;
1064       case T_LONG:
1065         _m()->long_field_put(fd->offset(), 0);
1066         break;
1067       case T_SHORT:
1068         _m()->short_field_put(fd->offset(), 0);
1069         break;
1070       case T_BOOLEAN:
1071         _m()->bool_field_put(fd->offset(), false);
1072         break;
1073       case T_ARRAY:
1074       case T_OBJECT: {
1075         // It might be useful to cache the String field, but
1076         // for now just clear out any reference field
1077         oop o = _m()->obj_field(fd->offset());
1078         _m()->obj_field_put(fd->offset(), NULL);
1079         break;
1080       }
1081       default:
1082         ShouldNotReachHere();
1083         break;
1084      }
1085   }
1086 };
1087 
1088 void java_lang_Class::archive_basic_type_mirrors(TRAPS) {
1089   assert(HeapShared::is_heap_object_archiving_allowed(),
1090          "HeapShared::is_heap_object_archiving_allowed() must be true");
1091 
1092   for (int t = 0; t <= T_VOID; t++) {
1093     oop m = Universe::_mirrors[t];
1094     if (m != NULL) {
1095       // Update the field at _array_klass_offset to point to the relocated array klass.
1096       oop archived_m = HeapShared::archive_heap_object(m, THREAD);
1097       assert(archived_m != NULL, "sanity");
1098       Klass *ak = (Klass*)(archived_m->metadata_field(_array_klass_offset));
1099       assert(ak != NULL || t == T_VOID, "should not be NULL");
1100       if (ak != NULL) {
1101         Klass *reloc_ak = MetaspaceShared::get_relocated_klass(ak);
1102         archived_m->metadata_field_put(_array_klass_offset, reloc_ak);
1103       }
1104 
1105       // Clear the fields. Just to be safe
1106       Klass *k = m->klass();
1107       Handle archived_mirror_h(THREAD, archived_m);
1108       ResetMirrorField reset(archived_mirror_h);
1109       InstanceKlass::cast(k)->do_nonstatic_fields(&reset);
1110 
1111       log_trace(cds, heap, mirror)(
1112         "Archived %s mirror object from " PTR_FORMAT " ==> " PTR_FORMAT,
1113         type2name((BasicType)t), p2i(Universe::_mirrors[t]), p2i(archived_m));
1114 
1115       Universe::_mirrors[t] = archived_m;
1116     }
1117   }
1118 
1119   assert(Universe::_mirrors[T_INT] != NULL &&
1120          Universe::_mirrors[T_FLOAT] != NULL &&
1121          Universe::_mirrors[T_DOUBLE] != NULL &&
1122          Universe::_mirrors[T_BYTE] != NULL &&
1123          Universe::_mirrors[T_BOOLEAN] != NULL &&
1124          Universe::_mirrors[T_CHAR] != NULL &&
1125          Universe::_mirrors[T_LONG] != NULL &&
1126          Universe::_mirrors[T_SHORT] != NULL &&
1127          Universe::_mirrors[T_VOID] != NULL, "sanity");
1128 
1129   Universe::set_int_mirror(Universe::_mirrors[T_INT]);
1130   Universe::set_float_mirror(Universe::_mirrors[T_FLOAT]);
1131   Universe::set_double_mirror(Universe::_mirrors[T_DOUBLE]);
1132   Universe::set_byte_mirror(Universe::_mirrors[T_BYTE]);
1133   Universe::set_bool_mirror(Universe::_mirrors[T_BOOLEAN]);
1134   Universe::set_char_mirror(Universe::_mirrors[T_CHAR]);
1135   Universe::set_long_mirror(Universe::_mirrors[T_LONG]);
1136   Universe::set_short_mirror(Universe::_mirrors[T_SHORT]);
1137   Universe::set_void_mirror(Universe::_mirrors[T_VOID]);
1138 }
1139 
1140 //
1141 // After the mirror object is successfully archived, the archived
1142 // klass is set with _has_archived_raw_mirror flag.
1143 //
1144 // The _has_archived_raw_mirror flag is cleared at runtime when the
1145 // archived mirror is restored. If archived java heap data cannot
1146 // be used at runtime, new mirror object is created for the shared
1147 // class. The _has_archived_raw_mirror is cleared also during the process.
1148 oop java_lang_Class::archive_mirror(Klass* k, TRAPS) {
1149   assert(HeapShared::is_heap_object_archiving_allowed(),
1150          "HeapShared::is_heap_object_archiving_allowed() must be true");
1151 
1152   // Mirror is already archived
1153   if (k->has_raw_archived_mirror()) {
1154     assert(k->archived_java_mirror_raw() != NULL, "no archived mirror");
1155     return k->archived_java_mirror_raw();
1156   }
1157 
1158   // No mirror
1159   oop mirror = k->java_mirror();
1160   if (mirror == NULL) {
1161     return NULL;
1162   }
1163 
1164   if (k->is_instance_klass()) {
1165     InstanceKlass *ik = InstanceKlass::cast(k);
1166     assert(ik->signers() == NULL, "class with signer should have been excluded");
1167 
1168     if (!(ik->is_shared_boot_class() || ik->is_shared_platform_class() ||
1169           ik->is_shared_app_class())) {
1170       // Archiving mirror for classes from non-builtin loaders is not
1171       // supported. Clear the _java_mirror within the archived class.
1172       k->set_java_mirror_handle(NULL);
1173       return NULL;
1174     }
1175   }
1176 
1177   // Now start archiving the mirror object
1178   oop archived_mirror = HeapShared::archive_heap_object(mirror, THREAD);
1179   if (archived_mirror == NULL) {
1180     return NULL;
1181   }
1182 
1183   archived_mirror = process_archived_mirror(k, mirror, archived_mirror, THREAD);
1184   if (archived_mirror == NULL) {
1185     return NULL;
1186   }
1187 
1188   k->set_archived_java_mirror_raw(archived_mirror);
1189 
1190   k->set_has_raw_archived_mirror();
1191 
1192   ResourceMark rm;
1193   log_trace(cds, heap, mirror)(
1194     "Archived %s mirror object from " PTR_FORMAT " ==> " PTR_FORMAT,
1195     k->external_name(), p2i(mirror), p2i(archived_mirror));
1196 
1197   return archived_mirror;
1198 }
1199 
1200 // The process is based on create_mirror().
1201 oop java_lang_Class::process_archived_mirror(Klass* k, oop mirror,
1202                                              oop archived_mirror,
1203                                              Thread *THREAD) {
1204   // Clear nonstatic fields in archived mirror. Some of the fields will be set
1205   // to archived metadata and objects below.
1206   Klass *c = archived_mirror->klass();
1207   Handle archived_mirror_h(THREAD, archived_mirror);
1208   ResetMirrorField reset(archived_mirror_h);
1209   InstanceKlass::cast(c)->do_nonstatic_fields(&reset);
1210 
1211   if (k->is_array_klass()) {
1212     oop archived_comp_mirror;
1213     if (k->is_typeArray_klass()) {
1214       // The primitive type mirrors are already archived. Get the archived mirror.
1215       oop comp_mirror = java_lang_Class::component_mirror(mirror);
1216       archived_comp_mirror = HeapShared::find_archived_heap_object(comp_mirror);
1217       assert(archived_comp_mirror != NULL, "Must be");
1218     } else {
1219       assert(k->is_objArray_klass(), "Must be");
1220       Klass* element_klass = ObjArrayKlass::cast(k)->element_klass();
1221       assert(element_klass != NULL, "Must have an element klass");
1222       archived_comp_mirror = archive_mirror(element_klass, THREAD);
1223       if (archived_comp_mirror == NULL) {
1224         return NULL;
1225       }
1226     }
1227     java_lang_Class::set_component_mirror(archived_mirror, archived_comp_mirror);
1228   } else {
1229     assert(k->is_instance_klass(), "Must be");
1230 
1231     // Reset local static fields in the mirror
1232     InstanceKlass::cast(k)->do_local_static_fields(&reset);
1233 
1234     java_lang_Class:set_init_lock(archived_mirror, NULL);
1235 
1236     set_protection_domain(archived_mirror, NULL);
1237   }
1238 
1239   // clear class loader and mirror_module_field
1240   set_class_loader(archived_mirror, NULL);
1241   set_module(archived_mirror, NULL);
1242 
1243   // The archived mirror's field at _klass_offset is still pointing to the original
1244   // klass. Updated the field in the archived mirror to point to the relocated
1245   // klass in the archive.
1246   Klass *reloc_k = MetaspaceShared::get_relocated_klass(as_Klass(mirror));
1247   log_debug(cds, heap, mirror)(
1248     "Relocate mirror metadata field at _klass_offset from " PTR_FORMAT " ==> " PTR_FORMAT,
1249     p2i(as_Klass(mirror)), p2i(reloc_k));
1250   archived_mirror->metadata_field_put(_klass_offset, reloc_k);
1251 
1252   // The field at _array_klass_offset is pointing to the original one dimension
1253   // higher array klass if exists. Relocate the pointer.
1254   Klass *arr = array_klass_acquire(mirror);
1255   if (arr != NULL) {
1256     Klass *reloc_arr = MetaspaceShared::get_relocated_klass(arr);
1257     log_debug(cds, heap, mirror)(
1258       "Relocate mirror metadata field at _array_klass_offset from " PTR_FORMAT " ==> " PTR_FORMAT,
1259       p2i(arr), p2i(reloc_arr));
1260     archived_mirror->metadata_field_put(_array_klass_offset, reloc_arr);
1261   }
1262   return archived_mirror;
1263 }
1264 
1265 // Returns true if the mirror is updated, false if no archived mirror
1266 // data is present. After the archived mirror object is restored, the
1267 // shared klass' _has_raw_archived_mirror flag is cleared.
1268 bool java_lang_Class::restore_archived_mirror(Klass *k,
1269                                               Handle class_loader, Handle module,
1270                                               Handle protection_domain, TRAPS) {
1271   // Postpone restoring archived mirror until java.lang.Class is loaded. Please
1272   // see more details in SystemDictionary::resolve_well_known_classes().
1273   if (!SystemDictionary::Class_klass_loaded()) {
1274     assert(fixup_mirror_list() != NULL, "fixup_mirror_list not initialized");
1275     fixup_mirror_list()->push(k);
1276     return true;
1277   }
1278 
1279   oop m = HeapShared::materialize_archived_object(k->archived_java_mirror_raw_narrow());
1280 
1281   if (m == NULL) {
1282     return false;
1283   }
1284 
1285   log_debug(cds, mirror)("Archived mirror is: " PTR_FORMAT, p2i(m));
1286 
1287   // mirror is archived, restore
1288   assert(HeapShared::is_archived_object(m), "must be archived mirror object");
1289   Handle mirror(THREAD, m);
1290 
1291   if (!k->is_array_klass()) {
1292     // - local static final fields with initial values were initialized at dump time
1293 
1294     // create the init_lock
1295     typeArrayOop r = oopFactory::new_typeArray(T_INT, 0, CHECK_(false));
1296     set_init_lock(mirror(), r);
1297 
1298     if (protection_domain.not_null()) {
1299       set_protection_domain(mirror(), protection_domain());
1300     }
1301   }
1302 
1303   assert(class_loader() == k->class_loader(), "should be same");
1304   if (class_loader.not_null()) {
1305     set_class_loader(mirror(), class_loader());
1306   }
1307 
1308   k->set_java_mirror(mirror);
1309   k->clear_has_raw_archived_mirror();
1310 
1311   set_mirror_module_field(k, mirror, module, THREAD);
1312 
1313   ResourceMark rm;
1314   log_trace(cds, heap, mirror)(
1315     "Restored %s archived mirror " PTR_FORMAT, k->external_name(), p2i(mirror()));
1316 
1317   return true;
1318 }
1319 #endif // INCLUDE_CDS_JAVA_HEAP
1320 
1321 void java_lang_Class::fixup_module_field(Klass* k, Handle module) {
1322   assert(_module_offset != 0, "must have been computed already");
1323   java_lang_Class::set_module(k->java_mirror(), module());
1324 }
1325 
1326 int  java_lang_Class::oop_size(oop java_class) {
1327   assert(_oop_size_offset != 0, "must be set");
1328   int size = java_class->int_field(_oop_size_offset);
1329   assert(size > 0, "Oop size must be greater than zero, not %d", size);
1330   return size;
1331 }
1332 
1333 
1334 void java_lang_Class::set_oop_size(HeapWord* java_class, int size) {
1335   assert(_oop_size_offset != 0, "must be set");
1336   assert(size > 0, "Oop size must be greater than zero, not %d", size);
1337   *(int*)(((char*)java_class) + _oop_size_offset) = size;
1338 }
1339 
1340 int  java_lang_Class::static_oop_field_count(oop java_class) {
1341   assert(_static_oop_field_count_offset != 0, "must be set");
1342   return java_class->int_field(_static_oop_field_count_offset);
1343 }
1344 
1345 int  java_lang_Class::static_oop_field_count_raw(oop java_class) {
1346   assert(_static_oop_field_count_offset != 0, "must be set");
1347   return java_class->int_field_raw(_static_oop_field_count_offset);
1348 }
1349 
1350 void java_lang_Class::set_static_oop_field_count(oop java_class, int size) {
1351   assert(_static_oop_field_count_offset != 0, "must be set");
1352   java_class->int_field_put(_static_oop_field_count_offset, size);
1353 }
1354 
1355 oop java_lang_Class::protection_domain(oop java_class) {
1356   assert(_protection_domain_offset != 0, "must be set");
1357   return java_class->obj_field(_protection_domain_offset);
1358 }
1359 void java_lang_Class::set_protection_domain(oop java_class, oop pd) {
1360   assert(_protection_domain_offset != 0, "must be set");
1361   java_class->obj_field_put(_protection_domain_offset, pd);
1362 }
1363 
1364 void java_lang_Class::set_component_mirror(oop java_class, oop comp_mirror) {
1365   assert(_component_mirror_offset != 0, "must be set");
1366     java_class->obj_field_put(_component_mirror_offset, comp_mirror);
1367   }
1368 oop java_lang_Class::component_mirror(oop java_class) {
1369   assert(_component_mirror_offset != 0, "must be set");
1370   return java_class->obj_field(_component_mirror_offset);
1371 }
1372 
1373 oop java_lang_Class::init_lock(oop java_class) {
1374   assert(_init_lock_offset != 0, "must be set");
1375   return java_class->obj_field(_init_lock_offset);
1376 }
1377 void java_lang_Class::set_init_lock(oop java_class, oop init_lock) {
1378   assert(_init_lock_offset != 0, "must be set");
1379   java_class->obj_field_put(_init_lock_offset, init_lock);
1380 }
1381 
1382 objArrayOop java_lang_Class::signers(oop java_class) {
1383   assert(_signers_offset != 0, "must be set");
1384   return (objArrayOop)java_class->obj_field(_signers_offset);
1385 }
1386 void java_lang_Class::set_signers(oop java_class, objArrayOop signers) {
1387   assert(_signers_offset != 0, "must be set");
1388   java_class->obj_field_put(_signers_offset, (oop)signers);
1389 }
1390 
1391 
1392 void java_lang_Class::set_class_loader(oop java_class, oop loader) {
1393   // jdk7 runs Queens in bootstrapping and jdk8-9 has no coordinated pushes yet.
1394   if (_class_loader_offset != 0) {
1395     java_class->obj_field_put(_class_loader_offset, loader);
1396   }
1397 }
1398 
1399 oop java_lang_Class::class_loader(oop java_class) {
1400   assert(_class_loader_offset != 0, "must be set");
1401   return java_class->obj_field(_class_loader_offset);
1402 }
1403 
1404 oop java_lang_Class::module(oop java_class) {
1405   assert(_module_offset != 0, "must be set");
1406   return java_class->obj_field(_module_offset);
1407 }
1408 
1409 void java_lang_Class::set_module(oop java_class, oop module) {
1410   assert(_module_offset != 0, "must be set");
1411   java_class->obj_field_put(_module_offset, module);
1412 }
1413 
1414 oop java_lang_Class::name(Handle java_class, TRAPS) {
1415   assert(_name_offset != 0, "must be set");
1416   oop o = java_class->obj_field(_name_offset);
1417   if (o == NULL) {
1418     o = StringTable::intern(java_lang_Class::as_external_name(java_class()), THREAD);
1419     java_class->obj_field_put(_name_offset, o);
1420   }
1421   return o;
1422 }
1423 
1424 oop java_lang_Class::source_file(oop java_class) {
1425   assert(_source_file_offset != 0, "must be set");
1426   return java_class->obj_field(_source_file_offset);
1427 }
1428 
1429 void java_lang_Class::set_source_file(oop java_class, oop source_file) {
1430   assert(_source_file_offset != 0, "must be set");
1431   java_class->obj_field_put(_source_file_offset, source_file);
1432 }
1433 
1434 oop java_lang_Class::value_mirror(oop java_class) {
1435   assert(_value_mirror_offset != 0, "must be set");
1436   return java_class->obj_field(_value_mirror_offset);
1437 }
1438 
1439 void java_lang_Class::set_value_mirror(oop java_class, oop mirror) {
1440   assert(_value_mirror_offset != 0, "must be set");
1441   java_class->obj_field_put(_value_mirror_offset, mirror);
1442 }
1443 
1444 oop java_lang_Class::box_mirror(oop java_class) {
1445   assert(_box_mirror_offset != 0, "must be set");
1446   return java_class->obj_field(_box_mirror_offset);
1447 }
1448 
1449 void java_lang_Class::set_box_mirror(oop java_class, oop mirror) {
1450   assert(_box_mirror_offset != 0, "must be set");
1451   java_class->obj_field_put(_box_mirror_offset, mirror);
1452 }
1453 
1454 oop java_lang_Class::create_basic_type_mirror(const char* basic_type_name, BasicType type, TRAPS) {
1455   // This should be improved by adding a field at the Java level or by
1456   // introducing a new VM klass (see comment in ClassFileParser)
1457   oop java_class = InstanceMirrorKlass::cast(SystemDictionary::Class_klass())->allocate_instance(NULL, CHECK_0);
1458   if (type != T_VOID) {
1459     Klass* aklass = Universe::typeArrayKlassObj(type);
1460     assert(aklass != NULL, "correct bootstrap");
1461     release_set_array_klass(java_class, aklass);
1462   }
1463 #ifdef ASSERT
1464   InstanceMirrorKlass* mk = InstanceMirrorKlass::cast(SystemDictionary::Class_klass());
1465   assert(java_lang_Class::static_oop_field_count(java_class) == 0, "should have been zeroed by allocation");
1466 #endif
1467   return java_class;
1468 }
1469 
1470 
1471 Klass* java_lang_Class::as_Klass(oop java_class) {
1472   //%note memory_2
1473   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
1474   Klass* k = ((Klass*)java_class->metadata_field(_klass_offset));
1475   assert(k == NULL || k->is_klass(), "type check");
1476   return k;
1477 }
1478 
1479 Klass* java_lang_Class::as_Klass_raw(oop java_class) {
1480   //%note memory_2
1481   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
1482   Klass* k = ((Klass*)java_class->metadata_field_raw(_klass_offset));
1483   assert(k == NULL || k->is_klass(), "type check");
1484   return k;
1485 }
1486 
1487 
1488 void java_lang_Class::set_klass(oop java_class, Klass* klass) {
1489   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
1490   java_class->metadata_field_put(_klass_offset, klass);
1491 }
1492 
1493 
1494 void java_lang_Class::print_signature(oop java_class, outputStream* st) {
1495   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
1496   Symbol* name = NULL;
1497   bool is_instance = false;
1498   bool is_value = false;
1499   if (is_primitive(java_class)) {
1500     name = vmSymbols::type_signature(primitive_type(java_class));
1501   } else {
1502     Klass* k = as_Klass(java_class);
1503     is_instance = k->is_instance_klass();
1504     is_value = k->is_value();
1505     name = k->name();
1506   }
1507   if (name == NULL) {
1508     st->print("<null>");
1509     return;
1510   }
1511   if (is_instance)  {
1512     if (is_value && (java_class == value_mirror(java_class))) {
1513       st->print("Q");
1514     } else {
1515       st->print("L");
1516     }
1517   }
1518   st->write((char*) name->base(), (int) name->utf8_length());
1519   if (is_instance)  st->print(";");
1520 }
1521 
1522 Symbol* java_lang_Class::as_signature(oop java_class, bool intern_if_not_found, TRAPS) {
1523   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
1524   Symbol* name;
1525   if (is_primitive(java_class)) {
1526     name = vmSymbols::type_signature(primitive_type(java_class));
1527     // Because this can create a new symbol, the caller has to decrement
1528     // the refcount, so make adjustment here and below for symbols returned
1529     // that are not created or incremented due to a successful lookup.
1530     name->increment_refcount();
1531   } else {
1532     Klass* k = as_Klass(java_class);
1533     if (!k->is_instance_klass()) {
1534       name = k->name();
1535       name->increment_refcount();
1536     } else {
1537       ResourceMark rm;
1538       const char* sigstr;
1539       if (k->is_value()) {
1540         char c = (java_class == value_mirror(java_class)) ? 'Q' : 'L';
1541         sigstr = InstanceKlass::cast(k)->signature_name_of(c);
1542       } else {
1543         sigstr = k->signature_name();
1544       }
1545       int siglen = (int) strlen(sigstr);
1546       if (!intern_if_not_found) {
1547         name = SymbolTable::probe(sigstr, siglen);
1548       } else {
1549         name = SymbolTable::new_symbol(sigstr, siglen, THREAD);
1550       }
1551     }
1552   }
1553   return name;
1554 }
1555 
1556 // Returns the Java name for this Java mirror (Resource allocated)
1557 // See Klass::external_name().
1558 // For primitive type Java mirrors, its type name is returned.
1559 const char* java_lang_Class::as_external_name(oop java_class) {
1560   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
1561   const char* name = NULL;
1562   if (is_primitive(java_class)) {
1563     name = type2name(primitive_type(java_class));
1564   } else {
1565     name = as_Klass(java_class)->external_name();
1566   }
1567   if (name == NULL) {
1568     name = "<null>";
1569   }
1570   return name;
1571 }
1572 
1573 Klass* java_lang_Class::array_klass_acquire(oop java_class) {
1574   Klass* k = ((Klass*)java_class->metadata_field_acquire(_array_klass_offset));
1575   assert(k == NULL || k->is_klass() && k->is_array_klass(), "should be array klass");
1576   return k;
1577 }
1578 
1579 
1580 void java_lang_Class::release_set_array_klass(oop java_class, Klass* klass) {
1581   assert(klass->is_klass() && klass->is_array_klass(), "should be array klass");
1582   java_class->release_metadata_field_put(_array_klass_offset, klass);
1583 }
1584 
1585 
1586 BasicType java_lang_Class::primitive_type(oop java_class) {
1587   assert(java_lang_Class::is_primitive(java_class), "just checking");
1588   Klass* ak = ((Klass*)java_class->metadata_field(_array_klass_offset));
1589   BasicType type = T_VOID;
1590   if (ak != NULL) {
1591     // Note: create_basic_type_mirror above initializes ak to a non-null value.
1592     type = ArrayKlass::cast(ak)->element_type();
1593   } else {
1594     assert(oopDesc::equals(java_class, Universe::void_mirror()), "only valid non-array primitive");
1595   }
1596   assert(oopDesc::equals(Universe::java_mirror(type), java_class), "must be consistent");
1597   return type;
1598 }
1599 
1600 BasicType java_lang_Class::as_BasicType(oop java_class, Klass** reference_klass) {
1601   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
1602   if (is_primitive(java_class)) {
1603     if (reference_klass != NULL)
1604       (*reference_klass) = NULL;
1605     return primitive_type(java_class);
1606   } else {
1607     if (reference_klass != NULL)
1608       (*reference_klass) = as_Klass(java_class);
1609     return T_OBJECT;
1610   }
1611 }
1612 
1613 
1614 oop java_lang_Class::primitive_mirror(BasicType t) {
1615   oop mirror = Universe::java_mirror(t);
1616   assert(mirror != NULL && mirror->is_a(SystemDictionary::Class_klass()), "must be a Class");
1617   assert(java_lang_Class::is_primitive(mirror), "must be primitive");
1618   return mirror;
1619 }
1620 
1621 bool java_lang_Class::offsets_computed = false;
1622 int  java_lang_Class::classRedefinedCount_offset = -1;
1623 
1624 #define CLASS_FIELDS_DO(macro) \
1625   macro(classRedefinedCount_offset, k, "classRedefinedCount", int_signature,         false) ; \
1626   macro(_class_loader_offset,       k, "classLoader",         classloader_signature, false); \
1627   macro(_component_mirror_offset,   k, "componentType",       class_signature,       false); \
1628   macro(_module_offset,             k, "module",              module_signature,      false); \
1629   macro(_name_offset,               k, "name",                string_signature,      false); \
1630   macro(_box_mirror_offset,         k, "boxType",             class_signature,       false); \
1631   macro(_value_mirror_offset,       k, "valueType",           class_signature,       false); \
1632 
1633 void java_lang_Class::compute_offsets() {
1634   if (offsets_computed) {
1635     return;
1636   }
1637 
1638   offsets_computed = true;
1639 
1640   InstanceKlass* k = SystemDictionary::Class_klass();
1641   CLASS_FIELDS_DO(FIELD_COMPUTE_OFFSET);
1642 
1643   // Init lock is a C union with component_mirror.  Only instanceKlass mirrors have
1644   // init_lock and only ArrayKlass mirrors have component_mirror.  Since both are oops
1645   // GC treats them the same.
1646   _init_lock_offset = _component_mirror_offset;
1647 
1648   CLASS_INJECTED_FIELDS(INJECTED_FIELD_COMPUTE_OFFSET);
1649 }
1650 
1651 #if INCLUDE_CDS
1652 void java_lang_Class::serialize_offsets(SerializeClosure* f) {
1653   f->do_u4((u4*)&offsets_computed);
1654   f->do_u4((u4*)&_init_lock_offset);
1655 
1656   CLASS_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
1657 
1658   CLASS_INJECTED_FIELDS(INJECTED_FIELD_SERIALIZE_OFFSET);
1659 }
1660 #endif
1661 
1662 int java_lang_Class::classRedefinedCount(oop the_class_mirror) {
1663   if (classRedefinedCount_offset == -1) {
1664     // If we don't have an offset for it then just return -1 as a marker.
1665     return -1;
1666   }
1667 
1668   return the_class_mirror->int_field(classRedefinedCount_offset);
1669 }
1670 
1671 void java_lang_Class::set_classRedefinedCount(oop the_class_mirror, int value) {
1672   if (classRedefinedCount_offset == -1) {
1673     // If we don't have an offset for it then nothing to set.
1674     return;
1675   }
1676 
1677   the_class_mirror->int_field_put(classRedefinedCount_offset, value);
1678 }
1679 
1680 
1681 // Note: JDK1.1 and before had a privateInfo_offset field which was used for the
1682 //       platform thread structure, and a eetop offset which was used for thread
1683 //       local storage (and unused by the HotSpot VM). In JDK1.2 the two structures
1684 //       merged, so in the HotSpot VM we just use the eetop field for the thread
1685 //       instead of the privateInfo_offset.
1686 //
1687 // Note: The stackSize field is only present starting in 1.4.
1688 
1689 int java_lang_Thread::_name_offset = 0;
1690 int java_lang_Thread::_group_offset = 0;
1691 int java_lang_Thread::_contextClassLoader_offset = 0;
1692 int java_lang_Thread::_inheritedAccessControlContext_offset = 0;
1693 int java_lang_Thread::_priority_offset = 0;
1694 int java_lang_Thread::_eetop_offset = 0;
1695 int java_lang_Thread::_daemon_offset = 0;
1696 int java_lang_Thread::_stillborn_offset = 0;
1697 int java_lang_Thread::_stackSize_offset = 0;
1698 int java_lang_Thread::_tid_offset = 0;
1699 int java_lang_Thread::_thread_status_offset = 0;
1700 int java_lang_Thread::_park_blocker_offset = 0;
1701 int java_lang_Thread::_park_event_offset = 0 ;
1702 
1703 #define THREAD_FIELDS_DO(macro) \
1704   macro(_name_offset,          k, vmSymbols::name_name(), string_signature, false); \
1705   macro(_group_offset,         k, vmSymbols::group_name(), threadgroup_signature, false); \
1706   macro(_contextClassLoader_offset, k, vmSymbols::contextClassLoader_name(), classloader_signature, false); \
1707   macro(_inheritedAccessControlContext_offset, k, vmSymbols::inheritedAccessControlContext_name(), accesscontrolcontext_signature, false); \
1708   macro(_priority_offset,      k, vmSymbols::priority_name(), int_signature, false); \
1709   macro(_daemon_offset,        k, vmSymbols::daemon_name(), bool_signature, false); \
1710   macro(_eetop_offset,         k, "eetop", long_signature, false); \
1711   macro(_stillborn_offset,     k, "stillborn", bool_signature, false); \
1712   macro(_stackSize_offset,     k, "stackSize", long_signature, false); \
1713   macro(_tid_offset,           k, "tid", long_signature, false); \
1714   macro(_thread_status_offset, k, "threadStatus", int_signature, false); \
1715   macro(_park_blocker_offset,  k, "parkBlocker", object_signature, false); \
1716   macro(_park_event_offset,    k, "nativeParkEventPointer", long_signature, false)
1717 
1718 void java_lang_Thread::compute_offsets() {
1719   assert(_group_offset == 0, "offsets should be initialized only once");
1720 
1721   InstanceKlass* k = SystemDictionary::Thread_klass();
1722   THREAD_FIELDS_DO(FIELD_COMPUTE_OFFSET);
1723 }
1724 
1725 #if INCLUDE_CDS
1726 void java_lang_Thread::serialize_offsets(SerializeClosure* f) {
1727   THREAD_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
1728 }
1729 #endif
1730 
1731 JavaThread* java_lang_Thread::thread(oop java_thread) {
1732   return (JavaThread*)java_thread->address_field(_eetop_offset);
1733 }
1734 
1735 
1736 void java_lang_Thread::set_thread(oop java_thread, JavaThread* thread) {
1737   java_thread->address_field_put(_eetop_offset, (address)thread);
1738 }
1739 
1740 
1741 oop java_lang_Thread::name(oop java_thread) {
1742   return java_thread->obj_field(_name_offset);
1743 }
1744 
1745 
1746 void java_lang_Thread::set_name(oop java_thread, oop name) {
1747   java_thread->obj_field_put(_name_offset, name);
1748 }
1749 
1750 
1751 ThreadPriority java_lang_Thread::priority(oop java_thread) {
1752   return (ThreadPriority)java_thread->int_field(_priority_offset);
1753 }
1754 
1755 
1756 void java_lang_Thread::set_priority(oop java_thread, ThreadPriority priority) {
1757   java_thread->int_field_put(_priority_offset, priority);
1758 }
1759 
1760 
1761 oop java_lang_Thread::threadGroup(oop java_thread) {
1762   return java_thread->obj_field(_group_offset);
1763 }
1764 
1765 
1766 bool java_lang_Thread::is_stillborn(oop java_thread) {
1767   return java_thread->bool_field(_stillborn_offset) != 0;
1768 }
1769 
1770 
1771 // We never have reason to turn the stillborn bit off
1772 void java_lang_Thread::set_stillborn(oop java_thread) {
1773   java_thread->bool_field_put(_stillborn_offset, true);
1774 }
1775 
1776 
1777 bool java_lang_Thread::is_alive(oop java_thread) {
1778   JavaThread* thr = java_lang_Thread::thread(java_thread);
1779   return (thr != NULL);
1780 }
1781 
1782 
1783 bool java_lang_Thread::is_daemon(oop java_thread) {
1784   return java_thread->bool_field(_daemon_offset) != 0;
1785 }
1786 
1787 
1788 void java_lang_Thread::set_daemon(oop java_thread) {
1789   java_thread->bool_field_put(_daemon_offset, true);
1790 }
1791 
1792 oop java_lang_Thread::context_class_loader(oop java_thread) {
1793   return java_thread->obj_field(_contextClassLoader_offset);
1794 }
1795 
1796 oop java_lang_Thread::inherited_access_control_context(oop java_thread) {
1797   return java_thread->obj_field(_inheritedAccessControlContext_offset);
1798 }
1799 
1800 
1801 jlong java_lang_Thread::stackSize(oop java_thread) {
1802   if (_stackSize_offset > 0) {
1803     return java_thread->long_field(_stackSize_offset);
1804   } else {
1805     return 0;
1806   }
1807 }
1808 
1809 // Write the thread status value to threadStatus field in java.lang.Thread java class.
1810 void java_lang_Thread::set_thread_status(oop java_thread,
1811                                          java_lang_Thread::ThreadStatus status) {
1812   // The threadStatus is only present starting in 1.5
1813   if (_thread_status_offset > 0) {
1814     java_thread->int_field_put(_thread_status_offset, status);
1815   }
1816 }
1817 
1818 // Read thread status value from threadStatus field in java.lang.Thread java class.
1819 java_lang_Thread::ThreadStatus java_lang_Thread::get_thread_status(oop java_thread) {
1820   // Make sure the caller is operating on behalf of the VM or is
1821   // running VM code (state == _thread_in_vm).
1822   assert(Threads_lock->owned_by_self() || Thread::current()->is_VM_thread() ||
1823          JavaThread::current()->thread_state() == _thread_in_vm,
1824          "Java Thread is not running in vm");
1825   // The threadStatus is only present starting in 1.5
1826   if (_thread_status_offset > 0) {
1827     return (java_lang_Thread::ThreadStatus)java_thread->int_field(_thread_status_offset);
1828   } else {
1829     // All we can easily figure out is if it is alive, but that is
1830     // enough info for a valid unknown status.
1831     // These aren't restricted to valid set ThreadStatus values, so
1832     // use JVMTI values and cast.
1833     JavaThread* thr = java_lang_Thread::thread(java_thread);
1834     if (thr == NULL) {
1835       // the thread hasn't run yet or is in the process of exiting
1836       return NEW;
1837     }
1838     return (java_lang_Thread::ThreadStatus)JVMTI_THREAD_STATE_ALIVE;
1839   }
1840 }
1841 
1842 
1843 jlong java_lang_Thread::thread_id(oop java_thread) {
1844   // The thread ID field is only present starting in 1.5
1845   if (_tid_offset > 0) {
1846     return java_thread->long_field(_tid_offset);
1847   } else {
1848     return 0;
1849   }
1850 }
1851 
1852 oop java_lang_Thread::park_blocker(oop java_thread) {
1853   assert(JDK_Version::current().supports_thread_park_blocker() &&
1854          _park_blocker_offset != 0, "Must support parkBlocker field");
1855 
1856   if (_park_blocker_offset > 0) {
1857     return java_thread->obj_field(_park_blocker_offset);
1858   }
1859 
1860   return NULL;
1861 }
1862 
1863 jlong java_lang_Thread::park_event(oop java_thread) {
1864   if (_park_event_offset > 0) {
1865     return java_thread->long_field(_park_event_offset);
1866   }
1867   return 0;
1868 }
1869 
1870 bool java_lang_Thread::set_park_event(oop java_thread, jlong ptr) {
1871   if (_park_event_offset > 0) {
1872     java_thread->long_field_put(_park_event_offset, ptr);
1873     return true;
1874   }
1875   return false;
1876 }
1877 
1878 
1879 const char* java_lang_Thread::thread_status_name(oop java_thread) {
1880   assert(_thread_status_offset != 0, "Must have thread status");
1881   ThreadStatus status = (java_lang_Thread::ThreadStatus)java_thread->int_field(_thread_status_offset);
1882   switch (status) {
1883     case NEW                      : return "NEW";
1884     case RUNNABLE                 : return "RUNNABLE";
1885     case SLEEPING                 : return "TIMED_WAITING (sleeping)";
1886     case IN_OBJECT_WAIT           : return "WAITING (on object monitor)";
1887     case IN_OBJECT_WAIT_TIMED     : return "TIMED_WAITING (on object monitor)";
1888     case PARKED                   : return "WAITING (parking)";
1889     case PARKED_TIMED             : return "TIMED_WAITING (parking)";
1890     case BLOCKED_ON_MONITOR_ENTER : return "BLOCKED (on object monitor)";
1891     case TERMINATED               : return "TERMINATED";
1892     default                       : return "UNKNOWN";
1893   };
1894 }
1895 int java_lang_ThreadGroup::_parent_offset = 0;
1896 int java_lang_ThreadGroup::_name_offset = 0;
1897 int java_lang_ThreadGroup::_threads_offset = 0;
1898 int java_lang_ThreadGroup::_groups_offset = 0;
1899 int java_lang_ThreadGroup::_maxPriority_offset = 0;
1900 int java_lang_ThreadGroup::_destroyed_offset = 0;
1901 int java_lang_ThreadGroup::_daemon_offset = 0;
1902 int java_lang_ThreadGroup::_nthreads_offset = 0;
1903 int java_lang_ThreadGroup::_ngroups_offset = 0;
1904 
1905 oop  java_lang_ThreadGroup::parent(oop java_thread_group) {
1906   assert(oopDesc::is_oop(java_thread_group), "thread group must be oop");
1907   return java_thread_group->obj_field(_parent_offset);
1908 }
1909 
1910 // ("name as oop" accessor is not necessary)
1911 
1912 const char* java_lang_ThreadGroup::name(oop java_thread_group) {
1913   oop name = java_thread_group->obj_field(_name_offset);
1914   // ThreadGroup.name can be null
1915   if (name != NULL) {
1916     return java_lang_String::as_utf8_string(name);
1917   }
1918   return NULL;
1919 }
1920 
1921 int java_lang_ThreadGroup::nthreads(oop java_thread_group) {
1922   assert(oopDesc::is_oop(java_thread_group), "thread group must be oop");
1923   return java_thread_group->int_field(_nthreads_offset);
1924 }
1925 
1926 objArrayOop java_lang_ThreadGroup::threads(oop java_thread_group) {
1927   oop threads = java_thread_group->obj_field(_threads_offset);
1928   assert(threads != NULL, "threadgroups should have threads");
1929   assert(threads->is_objArray(), "just checking"); // Todo: Add better type checking code
1930   return objArrayOop(threads);
1931 }
1932 
1933 int java_lang_ThreadGroup::ngroups(oop java_thread_group) {
1934   assert(oopDesc::is_oop(java_thread_group), "thread group must be oop");
1935   return java_thread_group->int_field(_ngroups_offset);
1936 }
1937 
1938 objArrayOop java_lang_ThreadGroup::groups(oop java_thread_group) {
1939   oop groups = java_thread_group->obj_field(_groups_offset);
1940   assert(groups == NULL || groups->is_objArray(), "just checking"); // Todo: Add better type checking code
1941   return objArrayOop(groups);
1942 }
1943 
1944 ThreadPriority java_lang_ThreadGroup::maxPriority(oop java_thread_group) {
1945   assert(oopDesc::is_oop(java_thread_group), "thread group must be oop");
1946   return (ThreadPriority) java_thread_group->int_field(_maxPriority_offset);
1947 }
1948 
1949 bool java_lang_ThreadGroup::is_destroyed(oop java_thread_group) {
1950   assert(oopDesc::is_oop(java_thread_group), "thread group must be oop");
1951   return java_thread_group->bool_field(_destroyed_offset) != 0;
1952 }
1953 
1954 bool java_lang_ThreadGroup::is_daemon(oop java_thread_group) {
1955   assert(oopDesc::is_oop(java_thread_group), "thread group must be oop");
1956   return java_thread_group->bool_field(_daemon_offset) != 0;
1957 }
1958 
1959 #define THREADGROUP_FIELDS_DO(macro) \
1960   macro(_parent_offset,      k, vmSymbols::parent_name(),      threadgroup_signature,       false); \
1961   macro(_name_offset,        k, vmSymbols::name_name(),        string_signature,            false); \
1962   macro(_threads_offset,     k, vmSymbols::threads_name(),     thread_array_signature,      false); \
1963   macro(_groups_offset,      k, vmSymbols::groups_name(),      threadgroup_array_signature, false); \
1964   macro(_maxPriority_offset, k, vmSymbols::maxPriority_name(), int_signature,               false); \
1965   macro(_destroyed_offset,   k, vmSymbols::destroyed_name(),   bool_signature,              false); \
1966   macro(_daemon_offset,      k, vmSymbols::daemon_name(),      bool_signature,              false); \
1967   macro(_nthreads_offset,    k, vmSymbols::nthreads_name(),    int_signature,               false); \
1968   macro(_ngroups_offset,     k, vmSymbols::ngroups_name(),     int_signature,               false)
1969 
1970 void java_lang_ThreadGroup::compute_offsets() {
1971   assert(_parent_offset == 0, "offsets should be initialized only once");
1972 
1973   InstanceKlass* k = SystemDictionary::ThreadGroup_klass();
1974   THREADGROUP_FIELDS_DO(FIELD_COMPUTE_OFFSET);
1975 }
1976 
1977 #if INCLUDE_CDS
1978 void java_lang_ThreadGroup::serialize_offsets(SerializeClosure* f) {
1979   THREADGROUP_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
1980 }
1981 #endif
1982 
1983 #define THROWABLE_FIELDS_DO(macro) \
1984   macro(backtrace_offset,     k, "backtrace",     object_signature,                  false); \
1985   macro(detailMessage_offset, k, "detailMessage", string_signature,                  false); \
1986   macro(stackTrace_offset,    k, "stackTrace",    java_lang_StackTraceElement_array, false); \
1987   macro(depth_offset,         k, "depth",         int_signature,                     false); \
1988   macro(static_unassigned_stacktrace_offset, k, "UNASSIGNED_STACK", java_lang_StackTraceElement_array, true)
1989 
1990 void java_lang_Throwable::compute_offsets() {
1991   InstanceKlass* k = SystemDictionary::Throwable_klass();
1992   THROWABLE_FIELDS_DO(FIELD_COMPUTE_OFFSET);
1993 }
1994 
1995 #if INCLUDE_CDS
1996 void java_lang_Throwable::serialize_offsets(SerializeClosure* f) {
1997   THROWABLE_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
1998 }
1999 #endif
2000 
2001 oop java_lang_Throwable::unassigned_stacktrace() {
2002   InstanceKlass* ik = SystemDictionary::Throwable_klass();
2003   oop base = ik->static_field_base_raw();
2004   return base->obj_field(static_unassigned_stacktrace_offset);
2005 }
2006 
2007 oop java_lang_Throwable::backtrace(oop throwable) {
2008   return throwable->obj_field_acquire(backtrace_offset);
2009 }
2010 
2011 
2012 void java_lang_Throwable::set_backtrace(oop throwable, oop value) {
2013   throwable->release_obj_field_put(backtrace_offset, value);
2014 }
2015 
2016 int java_lang_Throwable::depth(oop throwable) {
2017   return throwable->int_field(depth_offset);
2018 }
2019 
2020 void java_lang_Throwable::set_depth(oop throwable, int value) {
2021   throwable->int_field_put(depth_offset, value);
2022 }
2023 
2024 oop java_lang_Throwable::message(oop throwable) {
2025   return throwable->obj_field(detailMessage_offset);
2026 }
2027 
2028 
2029 // Return Symbol for detailed_message or NULL
2030 Symbol* java_lang_Throwable::detail_message(oop throwable) {
2031   PRESERVE_EXCEPTION_MARK;  // Keep original exception
2032   oop detailed_message = java_lang_Throwable::message(throwable);
2033   if (detailed_message != NULL) {
2034     return java_lang_String::as_symbol(detailed_message, THREAD);
2035   }
2036   return NULL;
2037 }
2038 
2039 void java_lang_Throwable::set_message(oop throwable, oop value) {
2040   throwable->obj_field_put(detailMessage_offset, value);
2041 }
2042 
2043 
2044 void java_lang_Throwable::set_stacktrace(oop throwable, oop st_element_array) {
2045   throwable->obj_field_put(stackTrace_offset, st_element_array);
2046 }
2047 
2048 void java_lang_Throwable::clear_stacktrace(oop throwable) {
2049   set_stacktrace(throwable, NULL);
2050 }
2051 
2052 
2053 void java_lang_Throwable::print(oop throwable, outputStream* st) {
2054   ResourceMark rm;
2055   Klass* k = throwable->klass();
2056   assert(k != NULL, "just checking");
2057   st->print("%s", k->external_name());
2058   oop msg = message(throwable);
2059   if (msg != NULL) {
2060     st->print(": %s", java_lang_String::as_utf8_string(msg));
2061   }
2062 }
2063 
2064 // After this many redefines, the stack trace is unreliable.
2065 const int MAX_VERSION = USHRT_MAX;
2066 
2067 static inline bool version_matches(Method* method, int version) {
2068   assert(version < MAX_VERSION, "version is too big");
2069   return method != NULL && (method->constants()->version() == version);
2070 }
2071 
2072 
2073 // This class provides a simple wrapper over the internal structure of
2074 // exception backtrace to insulate users of the backtrace from needing
2075 // to know what it looks like.
2076 class BacktraceBuilder: public StackObj {
2077  friend class BacktraceIterator;
2078  private:
2079   Handle          _backtrace;
2080   objArrayOop     _head;
2081   typeArrayOop    _methods;
2082   typeArrayOop    _bcis;
2083   objArrayOop     _mirrors;
2084   typeArrayOop    _names; // needed to insulate method name against redefinition
2085   int             _index;
2086   NoSafepointVerifier _nsv;
2087 
2088   enum {
2089     trace_methods_offset = java_lang_Throwable::trace_methods_offset,
2090     trace_bcis_offset    = java_lang_Throwable::trace_bcis_offset,
2091     trace_mirrors_offset = java_lang_Throwable::trace_mirrors_offset,
2092     trace_names_offset   = java_lang_Throwable::trace_names_offset,
2093     trace_next_offset    = java_lang_Throwable::trace_next_offset,
2094     trace_size           = java_lang_Throwable::trace_size,
2095     trace_chunk_size     = java_lang_Throwable::trace_chunk_size
2096   };
2097 
2098   // get info out of chunks
2099   static typeArrayOop get_methods(objArrayHandle chunk) {
2100     typeArrayOop methods = typeArrayOop(chunk->obj_at(trace_methods_offset));
2101     assert(methods != NULL, "method array should be initialized in backtrace");
2102     return methods;
2103   }
2104   static typeArrayOop get_bcis(objArrayHandle chunk) {
2105     typeArrayOop bcis = typeArrayOop(chunk->obj_at(trace_bcis_offset));
2106     assert(bcis != NULL, "bci array should be initialized in backtrace");
2107     return bcis;
2108   }
2109   static objArrayOop get_mirrors(objArrayHandle chunk) {
2110     objArrayOop mirrors = objArrayOop(chunk->obj_at(trace_mirrors_offset));
2111     assert(mirrors != NULL, "mirror array should be initialized in backtrace");
2112     return mirrors;
2113   }
2114   static typeArrayOop get_names(objArrayHandle chunk) {
2115     typeArrayOop names = typeArrayOop(chunk->obj_at(trace_names_offset));
2116     assert(names != NULL, "names array should be initialized in backtrace");
2117     return names;
2118   }
2119 
2120  public:
2121 
2122   // constructor for new backtrace
2123   BacktraceBuilder(TRAPS): _head(NULL), _methods(NULL), _bcis(NULL), _mirrors(NULL), _names(NULL) {
2124     expand(CHECK);
2125     _backtrace = Handle(THREAD, _head);
2126     _index = 0;
2127   }
2128 
2129   BacktraceBuilder(Thread* thread, objArrayHandle backtrace) {
2130     _methods = get_methods(backtrace);
2131     _bcis = get_bcis(backtrace);
2132     _mirrors = get_mirrors(backtrace);
2133     _names = get_names(backtrace);
2134     assert(_methods->length() == _bcis->length() &&
2135            _methods->length() == _mirrors->length() &&
2136            _mirrors->length() == _names->length(),
2137            "method and source information arrays should match");
2138 
2139     // head is the preallocated backtrace
2140     _head = backtrace();
2141     _backtrace = Handle(thread, _head);
2142     _index = 0;
2143   }
2144 
2145   void expand(TRAPS) {
2146     objArrayHandle old_head(THREAD, _head);
2147     PauseNoSafepointVerifier pnsv(&_nsv);
2148 
2149     objArrayOop head = oopFactory::new_objectArray(trace_size, CHECK);
2150     objArrayHandle new_head(THREAD, head);
2151 
2152     typeArrayOop methods = oopFactory::new_shortArray(trace_chunk_size, CHECK);
2153     typeArrayHandle new_methods(THREAD, methods);
2154 
2155     typeArrayOop bcis = oopFactory::new_intArray(trace_chunk_size, CHECK);
2156     typeArrayHandle new_bcis(THREAD, bcis);
2157 
2158     objArrayOop mirrors = oopFactory::new_objectArray(trace_chunk_size, CHECK);
2159     objArrayHandle new_mirrors(THREAD, mirrors);
2160 
2161     typeArrayOop names = oopFactory::new_symbolArray(trace_chunk_size, CHECK);
2162     typeArrayHandle new_names(THREAD, names);
2163 
2164     if (!old_head.is_null()) {
2165       old_head->obj_at_put(trace_next_offset, new_head());
2166     }
2167     new_head->obj_at_put(trace_methods_offset, new_methods());
2168     new_head->obj_at_put(trace_bcis_offset, new_bcis());
2169     new_head->obj_at_put(trace_mirrors_offset, new_mirrors());
2170     new_head->obj_at_put(trace_names_offset, new_names());
2171 
2172     _head    = new_head();
2173     _methods = new_methods();
2174     _bcis = new_bcis();
2175     _mirrors = new_mirrors();
2176     _names  = new_names();
2177     _index = 0;
2178   }
2179 
2180   oop backtrace() {
2181     return _backtrace();
2182   }
2183 
2184   inline void push(Method* method, int bci, TRAPS) {
2185     // Smear the -1 bci to 0 since the array only holds unsigned
2186     // shorts.  The later line number lookup would just smear the -1
2187     // to a 0 even if it could be recorded.
2188     if (bci == SynchronizationEntryBCI) bci = 0;
2189 
2190     if (_index >= trace_chunk_size) {
2191       methodHandle mhandle(THREAD, method);
2192       expand(CHECK);
2193       method = mhandle();
2194     }
2195 
2196     _methods->ushort_at_put(_index, method->orig_method_idnum());
2197     _bcis->int_at_put(_index, Backtrace::merge_bci_and_version(bci, method->constants()->version()));
2198 
2199     // Note:this doesn't leak symbols because the mirror in the backtrace keeps the
2200     // klass owning the symbols alive so their refcounts aren't decremented.
2201     Symbol* name = method->name();
2202     _names->symbol_at_put(_index, name);
2203 
2204     // We need to save the mirrors in the backtrace to keep the class
2205     // from being unloaded while we still have this stack trace.
2206     assert(method->method_holder()->java_mirror() != NULL, "never push null for mirror");
2207     _mirrors->obj_at_put(_index, method->method_holder()->java_mirror());
2208     _index++;
2209   }
2210 
2211 };
2212 
2213 struct BacktraceElement : public StackObj {
2214   int _method_id;
2215   int _bci;
2216   int _version;
2217   Symbol* _name;
2218   Handle _mirror;
2219   BacktraceElement(Handle mirror, int mid, int version, int bci, Symbol* name) :
2220                    _method_id(mid), _bci(bci), _version(version), _name(name), _mirror(mirror) {}
2221 };
2222 
2223 class BacktraceIterator : public StackObj {
2224   int _index;
2225   objArrayHandle  _result;
2226   objArrayHandle  _mirrors;
2227   typeArrayHandle _methods;
2228   typeArrayHandle _bcis;
2229   typeArrayHandle _names;
2230 
2231   void init(objArrayHandle result, Thread* thread) {
2232     // Get method id, bci, version and mirror from chunk
2233     _result = result;
2234     if (_result.not_null()) {
2235       _methods = typeArrayHandle(thread, BacktraceBuilder::get_methods(_result));
2236       _bcis = typeArrayHandle(thread, BacktraceBuilder::get_bcis(_result));
2237       _mirrors = objArrayHandle(thread, BacktraceBuilder::get_mirrors(_result));
2238       _names = typeArrayHandle(thread, BacktraceBuilder::get_names(_result));
2239       _index = 0;
2240     }
2241   }
2242  public:
2243   BacktraceIterator(objArrayHandle result, Thread* thread) {
2244     init(result, thread);
2245     assert(_methods.is_null() || _methods->length() == java_lang_Throwable::trace_chunk_size, "lengths don't match");
2246   }
2247 
2248   BacktraceElement next(Thread* thread) {
2249     BacktraceElement e (Handle(thread, _mirrors->obj_at(_index)),
2250                         _methods->ushort_at(_index),
2251                         Backtrace::version_at(_bcis->int_at(_index)),
2252                         Backtrace::bci_at(_bcis->int_at(_index)),
2253                         _names->symbol_at(_index));
2254     _index++;
2255 
2256     if (_index >= java_lang_Throwable::trace_chunk_size) {
2257       int next_offset = java_lang_Throwable::trace_next_offset;
2258       // Get next chunk
2259       objArrayHandle result (thread, objArrayOop(_result->obj_at(next_offset)));
2260       init(result, thread);
2261     }
2262     return e;
2263   }
2264 
2265   bool repeat() {
2266     return _result.not_null() && _mirrors->obj_at(_index) != NULL;
2267   }
2268 };
2269 
2270 
2271 // Print stack trace element to resource allocated buffer
2272 static void print_stack_element_to_stream(outputStream* st, Handle mirror, int method_id,
2273                                           int version, int bci, Symbol* name) {
2274   ResourceMark rm;
2275 
2276   // Get strings and string lengths
2277   InstanceKlass* holder = InstanceKlass::cast(java_lang_Class::as_Klass(mirror()));
2278   const char* klass_name  = holder->external_name();
2279   int buf_len = (int)strlen(klass_name);
2280 
2281   char* method_name = name->as_C_string();
2282   buf_len += (int)strlen(method_name);
2283 
2284   char* source_file_name = NULL;
2285   Symbol* source = Backtrace::get_source_file_name(holder, version);
2286   if (source != NULL) {
2287     source_file_name = source->as_C_string();
2288     buf_len += (int)strlen(source_file_name);
2289   }
2290 
2291   char *module_name = NULL, *module_version = NULL;
2292   ModuleEntry* module = holder->module();
2293   if (module->is_named()) {
2294     module_name = module->name()->as_C_string();
2295     buf_len += (int)strlen(module_name);
2296     if (module->version() != NULL) {
2297       module_version = module->version()->as_C_string();
2298       buf_len += (int)strlen(module_version);
2299     }
2300   }
2301 
2302   // Allocate temporary buffer with extra space for formatting and line number
2303   char* buf = NEW_RESOURCE_ARRAY(char, buf_len + 64);
2304 
2305   // Print stack trace line in buffer
2306   sprintf(buf, "\tat %s.%s(", klass_name, method_name);
2307 
2308   // Print module information
2309   if (module_name != NULL) {
2310     if (module_version != NULL) {
2311       sprintf(buf + (int)strlen(buf), "%s@%s/", module_name, module_version);
2312     } else {
2313       sprintf(buf + (int)strlen(buf), "%s/", module_name);
2314     }
2315   }
2316 
2317   // The method can be NULL if the requested class version is gone
2318   Method* method = holder->method_with_orig_idnum(method_id, version);
2319   if (!version_matches(method, version)) {
2320     strcat(buf, "Redefined)");
2321   } else {
2322     int line_number = Backtrace::get_line_number(method, bci);
2323     if (line_number == -2) {
2324       strcat(buf, "Native Method)");
2325     } else {
2326       if (source_file_name != NULL && (line_number != -1)) {
2327         // Sourcename and linenumber
2328         sprintf(buf + (int)strlen(buf), "%s:%d)", source_file_name, line_number);
2329       } else if (source_file_name != NULL) {
2330         // Just sourcename
2331         sprintf(buf + (int)strlen(buf), "%s)", source_file_name);
2332       } else {
2333         // Neither sourcename nor linenumber
2334         sprintf(buf + (int)strlen(buf), "Unknown Source)");
2335       }
2336       CompiledMethod* nm = method->code();
2337       if (WizardMode && nm != NULL) {
2338         sprintf(buf + (int)strlen(buf), "(nmethod " INTPTR_FORMAT ")", (intptr_t)nm);
2339       }
2340     }
2341   }
2342 
2343   st->print_cr("%s", buf);
2344 }
2345 
2346 void java_lang_Throwable::print_stack_element(outputStream *st, const methodHandle& method, int bci) {
2347   Handle mirror (Thread::current(),  method->method_holder()->java_mirror());
2348   int method_id = method->orig_method_idnum();
2349   int version = method->constants()->version();
2350   print_stack_element_to_stream(st, mirror, method_id, version, bci, method->name());
2351 }
2352 
2353 /**
2354  * Print the throwable message and its stack trace plus all causes by walking the
2355  * cause chain.  The output looks the same as of Throwable.printStackTrace().
2356  */
2357 void java_lang_Throwable::print_stack_trace(Handle throwable, outputStream* st) {
2358   // First, print the message.
2359   print(throwable(), st);
2360   st->cr();
2361 
2362   // Now print the stack trace.
2363   Thread* THREAD = Thread::current();
2364   while (throwable.not_null()) {
2365     objArrayHandle result (THREAD, objArrayOop(backtrace(throwable())));
2366     if (result.is_null()) {
2367       st->print_raw_cr("\t<<no stack trace available>>");
2368       return;
2369     }
2370     BacktraceIterator iter(result, THREAD);
2371 
2372     while (iter.repeat()) {
2373       BacktraceElement bte = iter.next(THREAD);
2374       print_stack_element_to_stream(st, bte._mirror, bte._method_id, bte._version, bte._bci, bte._name);
2375     }
2376     {
2377       // Call getCause() which doesn't necessarily return the _cause field.
2378       EXCEPTION_MARK;
2379       JavaValue cause(T_OBJECT);
2380       JavaCalls::call_virtual(&cause,
2381                               throwable,
2382                               throwable->klass(),
2383                               vmSymbols::getCause_name(),
2384                               vmSymbols::void_throwable_signature(),
2385                               THREAD);
2386       // Ignore any exceptions. we are in the middle of exception handling. Same as classic VM.
2387       if (HAS_PENDING_EXCEPTION) {
2388         CLEAR_PENDING_EXCEPTION;
2389         throwable = Handle();
2390       } else {
2391         throwable = Handle(THREAD, (oop) cause.get_jobject());
2392         if (throwable.not_null()) {
2393           st->print("Caused by: ");
2394           print(throwable(), st);
2395           st->cr();
2396         }
2397       }
2398     }
2399   }
2400 }
2401 
2402 /**
2403  * Print the throwable stack trace by calling the Java method java.lang.Throwable.printStackTrace().
2404  */
2405 void java_lang_Throwable::java_printStackTrace(Handle throwable, TRAPS) {
2406   assert(throwable->is_a(SystemDictionary::Throwable_klass()), "Throwable instance expected");
2407   JavaValue result(T_VOID);
2408   JavaCalls::call_virtual(&result,
2409                           throwable,
2410                           SystemDictionary::Throwable_klass(),
2411                           vmSymbols::printStackTrace_name(),
2412                           vmSymbols::void_method_signature(),
2413                           THREAD);
2414 }
2415 
2416 void java_lang_Throwable::fill_in_stack_trace(Handle throwable, const methodHandle& method, TRAPS) {
2417   if (!StackTraceInThrowable) return;
2418   ResourceMark rm(THREAD);
2419 
2420   // Start out by clearing the backtrace for this object, in case the VM
2421   // runs out of memory while allocating the stack trace
2422   set_backtrace(throwable(), NULL);
2423   // Clear lazily constructed Java level stacktrace if refilling occurs
2424   // This is unnecessary in 1.7+ but harmless
2425   clear_stacktrace(throwable());
2426 
2427   int max_depth = MaxJavaStackTraceDepth;
2428   JavaThread* thread = (JavaThread*)THREAD;
2429 
2430   BacktraceBuilder bt(CHECK);
2431 
2432   // If there is no Java frame just return the method that was being called
2433   // with bci 0
2434   if (!thread->has_last_Java_frame()) {
2435     if (max_depth >= 1 && method() != NULL) {
2436       bt.push(method(), 0, CHECK);
2437       log_info(stacktrace)("%s, %d", throwable->klass()->external_name(), 1);
2438       set_depth(throwable(), 1);
2439       set_backtrace(throwable(), bt.backtrace());
2440     }
2441     return;
2442   }
2443 
2444   // Instead of using vframe directly, this version of fill_in_stack_trace
2445   // basically handles everything by hand. This significantly improved the
2446   // speed of this method call up to 28.5% on Solaris sparc. 27.1% on Windows.
2447   // See bug 6333838 for  more details.
2448   // The "ASSERT" here is to verify this method generates the exactly same stack
2449   // trace as utilizing vframe.
2450 #ifdef ASSERT
2451   vframeStream st(thread);
2452   methodHandle st_method(THREAD, st.method());
2453 #endif
2454   int total_count = 0;
2455   RegisterMap map(thread, false);
2456   int decode_offset = 0;
2457   CompiledMethod* nm = NULL;
2458   bool skip_fillInStackTrace_check = false;
2459   bool skip_throwableInit_check = false;
2460   bool skip_hidden = !ShowHiddenFrames;
2461 
2462   for (frame fr = thread->last_frame(); max_depth == 0 || max_depth != total_count;) {
2463     Method* method = NULL;
2464     int bci = 0;
2465 
2466     // Compiled java method case.
2467     if (decode_offset != 0) {
2468       DebugInfoReadStream stream(nm, decode_offset);
2469       decode_offset = stream.read_int();
2470       method = (Method*)nm->metadata_at(stream.read_int());
2471       bci = stream.read_bci();
2472     } else {
2473       if (fr.is_first_frame()) break;
2474       address pc = fr.pc();
2475       if (fr.is_interpreted_frame()) {
2476         address bcp = fr.interpreter_frame_bcp();
2477         method = fr.interpreter_frame_method();
2478         bci =  method->bci_from(bcp);
2479         fr = fr.sender(&map);
2480       } else {
2481         CodeBlob* cb = fr.cb();
2482         // HMMM QQQ might be nice to have frame return nm as NULL if cb is non-NULL
2483         // but non nmethod
2484         fr = fr.sender(&map);
2485         if (cb == NULL || !cb->is_compiled()) {
2486           continue;
2487         }
2488         nm = cb->as_compiled_method();
2489         if (nm->method()->is_native()) {
2490           method = nm->method();
2491           bci = 0;
2492         } else {
2493           PcDesc* pd = nm->pc_desc_at(pc);
2494           decode_offset = pd->scope_decode_offset();
2495           // if decode_offset is not equal to 0, it will execute the
2496           // "compiled java method case" at the beginning of the loop.
2497           continue;
2498         }
2499       }
2500     }
2501 #ifdef ASSERT
2502     assert(st_method() == method && st.bci() == bci,
2503            "Wrong stack trace");
2504     st.next();
2505     // vframeStream::method isn't GC-safe so store off a copy
2506     // of the Method* in case we GC.
2507     if (!st.at_end()) {
2508       st_method = st.method();
2509     }
2510 #endif
2511 
2512     // the format of the stacktrace will be:
2513     // - 1 or more fillInStackTrace frames for the exception class (skipped)
2514     // - 0 or more <init> methods for the exception class (skipped)
2515     // - rest of the stack
2516 
2517     if (!skip_fillInStackTrace_check) {
2518       if (method->name() == vmSymbols::fillInStackTrace_name() &&
2519           throwable->is_a(method->method_holder())) {
2520         continue;
2521       }
2522       else {
2523         skip_fillInStackTrace_check = true; // gone past them all
2524       }
2525     }
2526     if (!skip_throwableInit_check) {
2527       assert(skip_fillInStackTrace_check, "logic error in backtrace filtering");
2528 
2529       // skip <init> methods of the exception class and superclasses
2530       // This is simlar to classic VM.
2531       if (method->name() == vmSymbols::object_initializer_name() &&
2532           throwable->is_a(method->method_holder())) {
2533         continue;
2534       } else {
2535         // there are none or we've seen them all - either way stop checking
2536         skip_throwableInit_check = true;
2537       }
2538     }
2539     if (method->is_hidden()) {
2540       if (skip_hidden)  continue;
2541     }
2542     bt.push(method, bci, CHECK);
2543     total_count++;
2544   }
2545 
2546   log_info(stacktrace)("%s, %d", throwable->klass()->external_name(), total_count);
2547 
2548   // Put completed stack trace into throwable object
2549   set_backtrace(throwable(), bt.backtrace());
2550   set_depth(throwable(), total_count);
2551 }
2552 
2553 void java_lang_Throwable::fill_in_stack_trace(Handle throwable, const methodHandle& method) {
2554   // No-op if stack trace is disabled
2555   if (!StackTraceInThrowable) {
2556     return;
2557   }
2558 
2559   // Disable stack traces for some preallocated out of memory errors
2560   if (!Universe::should_fill_in_stack_trace(throwable)) {
2561     return;
2562   }
2563 
2564   PRESERVE_EXCEPTION_MARK;
2565 
2566   JavaThread* thread = JavaThread::active();
2567   fill_in_stack_trace(throwable, method, thread);
2568   // ignore exceptions thrown during stack trace filling
2569   CLEAR_PENDING_EXCEPTION;
2570 }
2571 
2572 void java_lang_Throwable::allocate_backtrace(Handle throwable, TRAPS) {
2573   // Allocate stack trace - backtrace is created but not filled in
2574 
2575   // No-op if stack trace is disabled
2576   if (!StackTraceInThrowable) return;
2577   BacktraceBuilder bt(CHECK);   // creates a backtrace
2578   set_backtrace(throwable(), bt.backtrace());
2579 }
2580 
2581 
2582 void java_lang_Throwable::fill_in_stack_trace_of_preallocated_backtrace(Handle throwable) {
2583   // Fill in stack trace into preallocated backtrace (no GC)
2584 
2585   // No-op if stack trace is disabled
2586   if (!StackTraceInThrowable) return;
2587 
2588   assert(throwable->is_a(SystemDictionary::Throwable_klass()), "sanity check");
2589 
2590   JavaThread* THREAD = JavaThread::current();
2591 
2592   objArrayHandle backtrace (THREAD, (objArrayOop)java_lang_Throwable::backtrace(throwable()));
2593   assert(backtrace.not_null(), "backtrace should have been preallocated");
2594 
2595   ResourceMark rm(THREAD);
2596   vframeStream st(THREAD);
2597 
2598   BacktraceBuilder bt(THREAD, backtrace);
2599 
2600   // Unlike fill_in_stack_trace we do not skip fillInStackTrace or throwable init
2601   // methods as preallocated errors aren't created by "java" code.
2602 
2603   // fill in as much stack trace as possible
2604   int chunk_count = 0;
2605   for (;!st.at_end(); st.next()) {
2606     bt.push(st.method(), st.bci(), CHECK);
2607     chunk_count++;
2608 
2609     // Bail-out for deep stacks
2610     if (chunk_count >= trace_chunk_size) break;
2611   }
2612   set_depth(throwable(), chunk_count);
2613   log_info(stacktrace)("%s, %d", throwable->klass()->external_name(), chunk_count);
2614 
2615   // We support the Throwable immutability protocol defined for Java 7.
2616   java_lang_Throwable::set_stacktrace(throwable(), java_lang_Throwable::unassigned_stacktrace());
2617   assert(java_lang_Throwable::unassigned_stacktrace() != NULL, "not initialized");
2618 }
2619 
2620 void java_lang_Throwable::get_stack_trace_elements(Handle throwable,
2621                                                    objArrayHandle stack_trace_array_h, TRAPS) {
2622 
2623   if (throwable.is_null() || stack_trace_array_h.is_null()) {
2624     THROW(vmSymbols::java_lang_NullPointerException());
2625   }
2626 
2627   assert(stack_trace_array_h->is_objArray(), "Stack trace array should be an array of StackTraceElenent");
2628 
2629   if (stack_trace_array_h->length() != depth(throwable())) {
2630     THROW(vmSymbols::java_lang_IndexOutOfBoundsException());
2631   }
2632 
2633   objArrayHandle result(THREAD, objArrayOop(backtrace(throwable())));
2634   BacktraceIterator iter(result, THREAD);
2635 
2636   int index = 0;
2637   while (iter.repeat()) {
2638     BacktraceElement bte = iter.next(THREAD);
2639 
2640     Handle stack_trace_element(THREAD, stack_trace_array_h->obj_at(index++));
2641 
2642     if (stack_trace_element.is_null()) {
2643       THROW(vmSymbols::java_lang_NullPointerException());
2644     }
2645 
2646     InstanceKlass* holder = InstanceKlass::cast(java_lang_Class::as_Klass(bte._mirror()));
2647     methodHandle method (THREAD, holder->method_with_orig_idnum(bte._method_id, bte._version));
2648 
2649     java_lang_StackTraceElement::fill_in(stack_trace_element, holder,
2650                                          method,
2651                                          bte._version,
2652                                          bte._bci,
2653                                          bte._name, CHECK);
2654   }
2655 }
2656 
2657 oop java_lang_StackTraceElement::create(const methodHandle& method, int bci, TRAPS) {
2658   // Allocate java.lang.StackTraceElement instance
2659   InstanceKlass* k = SystemDictionary::StackTraceElement_klass();
2660   assert(k != NULL, "must be loaded in 1.4+");
2661   if (k->should_be_initialized()) {
2662     k->initialize(CHECK_0);
2663   }
2664 
2665   Handle element = k->allocate_instance_handle(CHECK_0);
2666 
2667   int version = method->constants()->version();
2668   fill_in(element, method->method_holder(), method, version, bci, method->name(), CHECK_0);
2669   return element();
2670 }
2671 
2672 void java_lang_StackTraceElement::fill_in(Handle element,
2673                                           InstanceKlass* holder, const methodHandle& method,
2674                                           int version, int bci, Symbol* name, TRAPS) {
2675   assert(element->is_a(SystemDictionary::StackTraceElement_klass()), "sanity check");
2676 
2677   ResourceMark rm(THREAD);
2678   HandleMark hm(THREAD);
2679 
2680   // Fill in class name
2681   Handle java_class(THREAD, holder->java_mirror());
2682   oop classname = java_lang_Class::name(java_class, CHECK);
2683   java_lang_StackTraceElement::set_declaringClass(element(), classname);
2684   java_lang_StackTraceElement::set_declaringClassObject(element(), java_class());
2685 
2686   oop loader = holder->class_loader();
2687   if (loader != NULL) {
2688     oop loader_name = java_lang_ClassLoader::name(loader);
2689     if (loader_name != NULL)
2690       java_lang_StackTraceElement::set_classLoaderName(element(), loader_name);
2691   }
2692 
2693   // Fill in method name
2694   oop methodname = StringTable::intern(name, CHECK);
2695   java_lang_StackTraceElement::set_methodName(element(), methodname);
2696 
2697   // Fill in module name and version
2698   ModuleEntry* module = holder->module();
2699   if (module->is_named()) {
2700     oop module_name = StringTable::intern(module->name(), CHECK);
2701     java_lang_StackTraceElement::set_moduleName(element(), module_name);
2702     oop module_version;
2703     if (module->version() != NULL) {
2704       module_version = StringTable::intern(module->version(), CHECK);
2705     } else {
2706       module_version = NULL;
2707     }
2708     java_lang_StackTraceElement::set_moduleVersion(element(), module_version);
2709   }
2710 
2711   if (method() == NULL || !version_matches(method(), version)) {
2712     // The method was redefined, accurate line number information isn't available
2713     java_lang_StackTraceElement::set_fileName(element(), NULL);
2714     java_lang_StackTraceElement::set_lineNumber(element(), -1);
2715   } else {
2716     // Fill in source file name and line number.
2717     Symbol* source = Backtrace::get_source_file_name(holder, version);
2718     oop source_file = java_lang_Class::source_file(java_class());
2719     if (source != NULL) {
2720       // Class was not redefined. We can trust its cache if set,
2721       // else we have to initialize it.
2722       if (source_file == NULL) {
2723         source_file = StringTable::intern(source, CHECK);
2724         java_lang_Class::set_source_file(java_class(), source_file);
2725       }
2726     } else {
2727       // Class was redefined. Dump the cache if it was set.
2728       if (source_file != NULL) {
2729         source_file = NULL;
2730         java_lang_Class::set_source_file(java_class(), source_file);
2731       }
2732       if (ShowHiddenFrames) {
2733         source = vmSymbols::unknown_class_name();
2734         source_file = StringTable::intern(source, CHECK);
2735       }
2736     }
2737     java_lang_StackTraceElement::set_fileName(element(), source_file);
2738 
2739     int line_number = Backtrace::get_line_number(method, bci);
2740     java_lang_StackTraceElement::set_lineNumber(element(), line_number);
2741   }
2742 }
2743 
2744 Method* java_lang_StackFrameInfo::get_method(Handle stackFrame, InstanceKlass* holder, TRAPS) {
2745   HandleMark hm(THREAD);
2746   Handle mname(THREAD, stackFrame->obj_field(_memberName_offset));
2747   Method* method = (Method*)java_lang_invoke_MemberName::vmtarget(mname());
2748   // we should expand MemberName::name when Throwable uses StackTrace
2749   // MethodHandles::expand_MemberName(mname, MethodHandles::_suppress_defc|MethodHandles::_suppress_type, CHECK_NULL);
2750   return method;
2751 }
2752 
2753 void java_lang_StackFrameInfo::set_method_and_bci(Handle stackFrame, const methodHandle& method, int bci, TRAPS) {
2754   // set Method* or mid/cpref
2755   HandleMark hm(THREAD);
2756   Handle mname(Thread::current(), stackFrame->obj_field(_memberName_offset));
2757   InstanceKlass* ik = method->method_holder();
2758   CallInfo info(method(), ik, CHECK);
2759   MethodHandles::init_method_MemberName(mname, info);
2760   // set bci
2761   java_lang_StackFrameInfo::set_bci(stackFrame(), bci);
2762   // method may be redefined; store the version
2763   int version = method->constants()->version();
2764   assert((jushort)version == version, "version should be short");
2765   java_lang_StackFrameInfo::set_version(stackFrame(), (short)version);
2766 }
2767 
2768 void java_lang_StackFrameInfo::to_stack_trace_element(Handle stackFrame, Handle stack_trace_element, TRAPS) {
2769   ResourceMark rm(THREAD);
2770   HandleMark hm(THREAD);
2771   Handle mname(THREAD, stackFrame->obj_field(java_lang_StackFrameInfo::_memberName_offset));
2772   Klass* clazz = java_lang_Class::as_Klass(java_lang_invoke_MemberName::clazz(mname()));
2773   InstanceKlass* holder = InstanceKlass::cast(clazz);
2774   Method* method = java_lang_StackFrameInfo::get_method(stackFrame, holder, CHECK);
2775 
2776   short version = stackFrame->short_field(_version_offset);
2777   short bci = stackFrame->short_field(_bci_offset);
2778   Symbol* name = method->name();
2779   java_lang_StackTraceElement::fill_in(stack_trace_element, holder, method, version, bci, name, CHECK);
2780 }
2781 
2782 #define STACKFRAMEINFO_FIELDS_DO(macro) \
2783   macro(_memberName_offset,     k, "memberName",  object_signature, false); \
2784   macro(_bci_offset,            k, "bci",         short_signature,  false)
2785 
2786 void java_lang_StackFrameInfo::compute_offsets() {
2787   InstanceKlass* k = SystemDictionary::StackFrameInfo_klass();
2788   STACKFRAMEINFO_FIELDS_DO(FIELD_COMPUTE_OFFSET);
2789   STACKFRAMEINFO_INJECTED_FIELDS(INJECTED_FIELD_COMPUTE_OFFSET);
2790 }
2791 
2792 #if INCLUDE_CDS
2793 void java_lang_StackFrameInfo::serialize_offsets(SerializeClosure* f) {
2794   STACKFRAMEINFO_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
2795   STACKFRAMEINFO_INJECTED_FIELDS(INJECTED_FIELD_SERIALIZE_OFFSET);
2796 }
2797 #endif
2798 
2799 #define LIVESTACKFRAMEINFO_FIELDS_DO(macro) \
2800   macro(_monitors_offset,   k, "monitors",    object_array_signature, false); \
2801   macro(_locals_offset,     k, "locals",      object_array_signature, false); \
2802   macro(_operands_offset,   k, "operands",    object_array_signature, false); \
2803   macro(_mode_offset,       k, "mode",        int_signature,          false)
2804 
2805 void java_lang_LiveStackFrameInfo::compute_offsets() {
2806   InstanceKlass* k = SystemDictionary::LiveStackFrameInfo_klass();
2807   LIVESTACKFRAMEINFO_FIELDS_DO(FIELD_COMPUTE_OFFSET);
2808 }
2809 
2810 #if INCLUDE_CDS
2811 void java_lang_LiveStackFrameInfo::serialize_offsets(SerializeClosure* f) {
2812   LIVESTACKFRAMEINFO_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
2813 }
2814 #endif
2815 
2816 #define ACCESSIBLEOBJECT_FIELDS_DO(macro) \
2817   macro(override_offset, k, "override", bool_signature, false)
2818 
2819 void java_lang_reflect_AccessibleObject::compute_offsets() {
2820   InstanceKlass* k = SystemDictionary::reflect_AccessibleObject_klass();
2821   ACCESSIBLEOBJECT_FIELDS_DO(FIELD_COMPUTE_OFFSET);
2822 }
2823 
2824 #if INCLUDE_CDS
2825 void java_lang_reflect_AccessibleObject::serialize_offsets(SerializeClosure* f) {
2826   ACCESSIBLEOBJECT_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
2827 }
2828 #endif
2829 
2830 jboolean java_lang_reflect_AccessibleObject::override(oop reflect) {
2831   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2832   return (jboolean) reflect->bool_field(override_offset);
2833 }
2834 
2835 void java_lang_reflect_AccessibleObject::set_override(oop reflect, jboolean value) {
2836   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2837   reflect->bool_field_put(override_offset, (int) value);
2838 }
2839 
2840 #define METHOD_FIELDS_DO(macro) \
2841   macro(clazz_offset,          k, vmSymbols::clazz_name(),          class_signature,       false); \
2842   macro(name_offset,           k, vmSymbols::name_name(),           string_signature,      false); \
2843   macro(returnType_offset,     k, vmSymbols::returnType_name(),     class_signature,       false); \
2844   macro(parameterTypes_offset, k, vmSymbols::parameterTypes_name(), class_array_signature, false); \
2845   macro(exceptionTypes_offset, k, vmSymbols::exceptionTypes_name(), class_array_signature, false); \
2846   macro(slot_offset,           k, vmSymbols::slot_name(),           int_signature,         false); \
2847   macro(modifiers_offset,      k, vmSymbols::modifiers_name(),      int_signature,         false); \
2848   macro(signature_offset,             k, vmSymbols::signature_name(),             string_signature,     false); \
2849   macro(annotations_offset,           k, vmSymbols::annotations_name(),           byte_array_signature, false); \
2850   macro(parameter_annotations_offset, k, vmSymbols::parameter_annotations_name(), byte_array_signature, false); \
2851   macro(annotation_default_offset,    k, vmSymbols::annotation_default_name(),    byte_array_signature, false);
2852 
2853 void java_lang_reflect_Method::compute_offsets() {
2854   InstanceKlass* k = SystemDictionary::reflect_Method_klass();
2855   METHOD_FIELDS_DO(FIELD_COMPUTE_OFFSET);
2856 }
2857 
2858 #if INCLUDE_CDS
2859 void java_lang_reflect_Method::serialize_offsets(SerializeClosure* f) {
2860   METHOD_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
2861 }
2862 #endif
2863 
2864 Handle java_lang_reflect_Method::create(TRAPS) {
2865   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2866   Klass* klass = SystemDictionary::reflect_Method_klass();
2867   // This class is eagerly initialized during VM initialization, since we keep a refence
2868   // to one of the methods
2869   assert(InstanceKlass::cast(klass)->is_initialized(), "must be initialized");
2870   return InstanceKlass::cast(klass)->allocate_instance_handle(THREAD);
2871 }
2872 
2873 oop java_lang_reflect_Method::clazz(oop reflect) {
2874   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2875   return reflect->obj_field(clazz_offset);
2876 }
2877 
2878 void java_lang_reflect_Method::set_clazz(oop reflect, oop value) {
2879   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2880    reflect->obj_field_put(clazz_offset, value);
2881 }
2882 
2883 int java_lang_reflect_Method::slot(oop reflect) {
2884   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2885   return reflect->int_field(slot_offset);
2886 }
2887 
2888 void java_lang_reflect_Method::set_slot(oop reflect, int value) {
2889   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2890   reflect->int_field_put(slot_offset, value);
2891 }
2892 
2893 void java_lang_reflect_Method::set_name(oop method, oop value) {
2894   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2895   method->obj_field_put(name_offset, value);
2896 }
2897 
2898 oop java_lang_reflect_Method::return_type(oop method) {
2899   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2900   return method->obj_field(returnType_offset);
2901 }
2902 
2903 void java_lang_reflect_Method::set_return_type(oop method, oop value) {
2904   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2905   method->obj_field_put(returnType_offset, value);
2906 }
2907 
2908 oop java_lang_reflect_Method::parameter_types(oop method) {
2909   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2910   return method->obj_field(parameterTypes_offset);
2911 }
2912 
2913 void java_lang_reflect_Method::set_parameter_types(oop method, oop value) {
2914   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2915   method->obj_field_put(parameterTypes_offset, value);
2916 }
2917 
2918 void java_lang_reflect_Method::set_exception_types(oop method, oop value) {
2919   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2920   method->obj_field_put(exceptionTypes_offset, value);
2921 }
2922 
2923 void java_lang_reflect_Method::set_modifiers(oop method, int value) {
2924   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2925   method->int_field_put(modifiers_offset, value);
2926 }
2927 
2928 void java_lang_reflect_Method::set_signature(oop method, oop value) {
2929   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2930   method->obj_field_put(signature_offset, value);
2931 }
2932 
2933 void java_lang_reflect_Method::set_annotations(oop method, oop value) {
2934   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2935   method->obj_field_put(annotations_offset, value);
2936 }
2937 
2938 void java_lang_reflect_Method::set_parameter_annotations(oop method, oop value) {
2939   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2940   method->obj_field_put(parameter_annotations_offset, value);
2941 }
2942 
2943 void java_lang_reflect_Method::set_annotation_default(oop method, oop value) {
2944   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2945   method->obj_field_put(annotation_default_offset, value);
2946 }
2947 
2948 #define CONSTRUCTOR_FIELDS_DO(macro) \
2949   macro(clazz_offset,          k, vmSymbols::clazz_name(),          class_signature,       false); \
2950   macro(parameterTypes_offset, k, vmSymbols::parameterTypes_name(), class_array_signature, false); \
2951   macro(exceptionTypes_offset, k, vmSymbols::exceptionTypes_name(), class_array_signature, false); \
2952   macro(slot_offset,           k, vmSymbols::slot_name(),           int_signature,         false); \
2953   macro(modifiers_offset,      k, vmSymbols::modifiers_name(),      int_signature,         false); \
2954   macro(signature_offset,             k, vmSymbols::signature_name(),             string_signature,     false); \
2955   macro(annotations_offset,           k, vmSymbols::annotations_name(),           byte_array_signature, false); \
2956   macro(parameter_annotations_offset, k, vmSymbols::parameter_annotations_name(), byte_array_signature, false);
2957 
2958 void java_lang_reflect_Constructor::compute_offsets() {
2959   InstanceKlass* k = SystemDictionary::reflect_Constructor_klass();
2960   CONSTRUCTOR_FIELDS_DO(FIELD_COMPUTE_OFFSET);
2961 }
2962 
2963 #if INCLUDE_CDS
2964 void java_lang_reflect_Constructor::serialize_offsets(SerializeClosure* f) {
2965   CONSTRUCTOR_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
2966 }
2967 #endif
2968 
2969 Handle java_lang_reflect_Constructor::create(TRAPS) {
2970   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2971   Symbol* name = vmSymbols::java_lang_reflect_Constructor();
2972   Klass* k = SystemDictionary::resolve_or_fail(name, true, CHECK_NH);
2973   InstanceKlass* ik = InstanceKlass::cast(k);
2974   // Ensure it is initialized
2975   ik->initialize(CHECK_NH);
2976   return ik->allocate_instance_handle(THREAD);
2977 }
2978 
2979 oop java_lang_reflect_Constructor::clazz(oop reflect) {
2980   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2981   return reflect->obj_field(clazz_offset);
2982 }
2983 
2984 void java_lang_reflect_Constructor::set_clazz(oop reflect, oop value) {
2985   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2986    reflect->obj_field_put(clazz_offset, value);
2987 }
2988 
2989 oop java_lang_reflect_Constructor::parameter_types(oop constructor) {
2990   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2991   return constructor->obj_field(parameterTypes_offset);
2992 }
2993 
2994 void java_lang_reflect_Constructor::set_parameter_types(oop constructor, oop value) {
2995   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2996   constructor->obj_field_put(parameterTypes_offset, value);
2997 }
2998 
2999 void java_lang_reflect_Constructor::set_exception_types(oop constructor, oop value) {
3000   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3001   constructor->obj_field_put(exceptionTypes_offset, value);
3002 }
3003 
3004 int java_lang_reflect_Constructor::slot(oop reflect) {
3005   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3006   return reflect->int_field(slot_offset);
3007 }
3008 
3009 void java_lang_reflect_Constructor::set_slot(oop reflect, int value) {
3010   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3011   reflect->int_field_put(slot_offset, value);
3012 }
3013 
3014 void java_lang_reflect_Constructor::set_modifiers(oop constructor, int value) {
3015   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3016   constructor->int_field_put(modifiers_offset, value);
3017 }
3018 
3019 void java_lang_reflect_Constructor::set_signature(oop constructor, oop value) {
3020   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3021   constructor->obj_field_put(signature_offset, value);
3022 }
3023 
3024 void java_lang_reflect_Constructor::set_annotations(oop constructor, oop value) {
3025   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3026   constructor->obj_field_put(annotations_offset, value);
3027 }
3028 
3029 void java_lang_reflect_Constructor::set_parameter_annotations(oop method, oop value) {
3030   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3031   method->obj_field_put(parameter_annotations_offset, value);
3032 }
3033 
3034 #define FIELD_FIELDS_DO(macro) \
3035   macro(clazz_offset,     k, vmSymbols::clazz_name(),     class_signature,  false); \
3036   macro(name_offset,      k, vmSymbols::name_name(),      string_signature, false); \
3037   macro(type_offset,      k, vmSymbols::type_name(),      class_signature,  false); \
3038   macro(slot_offset,      k, vmSymbols::slot_name(),      int_signature,    false); \
3039   macro(modifiers_offset, k, vmSymbols::modifiers_name(), int_signature,    false); \
3040   macro(signature_offset,        k, vmSymbols::signature_name(),        string_signature,     false); \
3041   macro(annotations_offset,      k, vmSymbols::annotations_name(),      byte_array_signature, false);
3042 
3043 void java_lang_reflect_Field::compute_offsets() {
3044   InstanceKlass* k = SystemDictionary::reflect_Field_klass();
3045   FIELD_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3046 }
3047 
3048 #if INCLUDE_CDS
3049 void java_lang_reflect_Field::serialize_offsets(SerializeClosure* f) {
3050   FIELD_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3051 }
3052 #endif
3053 
3054 Handle java_lang_reflect_Field::create(TRAPS) {
3055   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3056   Symbol* name = vmSymbols::java_lang_reflect_Field();
3057   Klass* k = SystemDictionary::resolve_or_fail(name, true, CHECK_NH);
3058   InstanceKlass* ik = InstanceKlass::cast(k);
3059   // Ensure it is initialized
3060   ik->initialize(CHECK_NH);
3061   return ik->allocate_instance_handle(THREAD);
3062 }
3063 
3064 oop java_lang_reflect_Field::clazz(oop reflect) {
3065   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3066   return reflect->obj_field(clazz_offset);
3067 }
3068 
3069 void java_lang_reflect_Field::set_clazz(oop reflect, oop value) {
3070   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3071    reflect->obj_field_put(clazz_offset, value);
3072 }
3073 
3074 oop java_lang_reflect_Field::name(oop field) {
3075   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3076   return field->obj_field(name_offset);
3077 }
3078 
3079 void java_lang_reflect_Field::set_name(oop field, oop value) {
3080   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3081   field->obj_field_put(name_offset, value);
3082 }
3083 
3084 oop java_lang_reflect_Field::type(oop field) {
3085   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3086   return field->obj_field(type_offset);
3087 }
3088 
3089 void java_lang_reflect_Field::set_type(oop field, oop value) {
3090   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3091   field->obj_field_put(type_offset, value);
3092 }
3093 
3094 int java_lang_reflect_Field::slot(oop reflect) {
3095   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3096   return reflect->int_field(slot_offset);
3097 }
3098 
3099 void java_lang_reflect_Field::set_slot(oop reflect, int value) {
3100   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3101   reflect->int_field_put(slot_offset, value);
3102 }
3103 
3104 int java_lang_reflect_Field::modifiers(oop field) {
3105   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3106   return field->int_field(modifiers_offset);
3107 }
3108 
3109 void java_lang_reflect_Field::set_modifiers(oop field, int value) {
3110   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3111   field->int_field_put(modifiers_offset, value);
3112 }
3113 
3114 void java_lang_reflect_Field::set_signature(oop field, oop value) {
3115   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3116   field->obj_field_put(signature_offset, value);
3117 }
3118 
3119 void java_lang_reflect_Field::set_annotations(oop field, oop value) {
3120   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3121   field->obj_field_put(annotations_offset, value);
3122 }
3123 
3124 #define CONSTANTPOOL_FIELDS_DO(macro) \
3125   macro(_oop_offset, k, "constantPoolOop", object_signature, false)
3126 
3127 void reflect_ConstantPool::compute_offsets() {
3128   InstanceKlass* k = SystemDictionary::reflect_ConstantPool_klass();
3129   // The field is called ConstantPool* in the sun.reflect.ConstantPool class.
3130   CONSTANTPOOL_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3131 }
3132 
3133 #if INCLUDE_CDS
3134 void reflect_ConstantPool::serialize_offsets(SerializeClosure* f) {
3135   CONSTANTPOOL_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3136 }
3137 #endif
3138 
3139 #define PARAMETER_FIELDS_DO(macro) \
3140   macro(name_offset,        k, vmSymbols::name_name(),        string_signature, false); \
3141   macro(modifiers_offset,   k, vmSymbols::modifiers_name(),   int_signature,    false); \
3142   macro(index_offset,       k, vmSymbols::index_name(),       int_signature,    false); \
3143   macro(executable_offset,  k, vmSymbols::executable_name(),  executable_signature, false)
3144 
3145 void java_lang_reflect_Parameter::compute_offsets() {
3146   InstanceKlass* k = SystemDictionary::reflect_Parameter_klass();
3147   PARAMETER_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3148 }
3149 
3150 #if INCLUDE_CDS
3151 void java_lang_reflect_Parameter::serialize_offsets(SerializeClosure* f) {
3152   PARAMETER_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3153 }
3154 #endif
3155 
3156 Handle java_lang_reflect_Parameter::create(TRAPS) {
3157   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3158   Symbol* name = vmSymbols::java_lang_reflect_Parameter();
3159   Klass* k = SystemDictionary::resolve_or_fail(name, true, CHECK_NH);
3160   InstanceKlass* ik = InstanceKlass::cast(k);
3161   // Ensure it is initialized
3162   ik->initialize(CHECK_NH);
3163   return ik->allocate_instance_handle(THREAD);
3164 }
3165 
3166 oop java_lang_reflect_Parameter::name(oop param) {
3167   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3168   return param->obj_field(name_offset);
3169 }
3170 
3171 void java_lang_reflect_Parameter::set_name(oop param, oop value) {
3172   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3173   param->obj_field_put(name_offset, value);
3174 }
3175 
3176 int java_lang_reflect_Parameter::modifiers(oop param) {
3177   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3178   return param->int_field(modifiers_offset);
3179 }
3180 
3181 void java_lang_reflect_Parameter::set_modifiers(oop param, int value) {
3182   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3183   param->int_field_put(modifiers_offset, value);
3184 }
3185 
3186 int java_lang_reflect_Parameter::index(oop param) {
3187   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3188   return param->int_field(index_offset);
3189 }
3190 
3191 void java_lang_reflect_Parameter::set_index(oop param, int value) {
3192   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3193   param->int_field_put(index_offset, value);
3194 }
3195 
3196 oop java_lang_reflect_Parameter::executable(oop param) {
3197   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3198   return param->obj_field(executable_offset);
3199 }
3200 
3201 void java_lang_reflect_Parameter::set_executable(oop param, oop value) {
3202   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3203   param->obj_field_put(executable_offset, value);
3204 }
3205 
3206 
3207 int java_lang_Module::loader_offset;
3208 int java_lang_Module::name_offset;
3209 int java_lang_Module::_module_entry_offset = -1;
3210 
3211 Handle java_lang_Module::create(Handle loader, Handle module_name, TRAPS) {
3212   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3213   return JavaCalls::construct_new_instance(SystemDictionary::Module_klass(),
3214                           vmSymbols::java_lang_module_init_signature(),
3215                           loader, module_name, CHECK_NH);
3216 }
3217 
3218 #define MODULE_FIELDS_DO(macro) \
3219   macro(loader_offset,  k, vmSymbols::loader_name(),  classloader_signature, false); \
3220   macro(name_offset,    k, vmSymbols::name_name(),    string_signature,      false)
3221 
3222 void java_lang_Module::compute_offsets() {
3223   InstanceKlass* k = SystemDictionary::Module_klass();
3224   MODULE_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3225   MODULE_INJECTED_FIELDS(INJECTED_FIELD_COMPUTE_OFFSET);
3226 }
3227 
3228 #if INCLUDE_CDS
3229 void java_lang_Module::serialize_offsets(SerializeClosure* f) {
3230   MODULE_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3231   MODULE_INJECTED_FIELDS(INJECTED_FIELD_SERIALIZE_OFFSET);
3232 }
3233 #endif
3234 
3235 oop java_lang_Module::loader(oop module) {
3236   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3237   return module->obj_field(loader_offset);
3238 }
3239 
3240 void java_lang_Module::set_loader(oop module, oop value) {
3241   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3242   module->obj_field_put(loader_offset, value);
3243 }
3244 
3245 oop java_lang_Module::name(oop module) {
3246   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3247   return module->obj_field(name_offset);
3248 }
3249 
3250 void java_lang_Module::set_name(oop module, oop value) {
3251   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3252   module->obj_field_put(name_offset, value);
3253 }
3254 
3255 ModuleEntry* java_lang_Module::module_entry(oop module) {
3256   assert(_module_entry_offset != -1, "Uninitialized module_entry_offset");
3257   assert(module != NULL, "module can't be null");
3258   assert(oopDesc::is_oop(module), "module must be oop");
3259 
3260   ModuleEntry* module_entry = (ModuleEntry*)module->address_field(_module_entry_offset);
3261   if (module_entry == NULL) {
3262     // If the inject field containing the ModuleEntry* is null then return the
3263     // class loader's unnamed module.
3264     oop loader = java_lang_Module::loader(module);
3265     Handle h_loader = Handle(Thread::current(), loader);
3266     ClassLoaderData* loader_cld = SystemDictionary::register_loader(h_loader);
3267     return loader_cld->unnamed_module();
3268   }
3269   return module_entry;
3270 }
3271 
3272 void java_lang_Module::set_module_entry(oop module, ModuleEntry* module_entry) {
3273   assert(_module_entry_offset != -1, "Uninitialized module_entry_offset");
3274   assert(module != NULL, "module can't be null");
3275   assert(oopDesc::is_oop(module), "module must be oop");
3276   module->address_field_put(_module_entry_offset, (address)module_entry);
3277 }
3278 
3279 Handle reflect_ConstantPool::create(TRAPS) {
3280   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3281   InstanceKlass* k = SystemDictionary::reflect_ConstantPool_klass();
3282   // Ensure it is initialized
3283   k->initialize(CHECK_NH);
3284   return k->allocate_instance_handle(THREAD);
3285 }
3286 
3287 
3288 void reflect_ConstantPool::set_cp(oop reflect, ConstantPool* value) {
3289   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3290   oop mirror = value->pool_holder()->java_mirror();
3291   // Save the mirror to get back the constant pool.
3292   reflect->obj_field_put(_oop_offset, mirror);
3293 }
3294 
3295 ConstantPool* reflect_ConstantPool::get_cp(oop reflect) {
3296   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
3297 
3298   oop mirror = reflect->obj_field(_oop_offset);
3299   Klass* k = java_lang_Class::as_Klass(mirror);
3300   assert(k->is_instance_klass(), "Must be");
3301 
3302   // Get the constant pool back from the klass.  Since class redefinition
3303   // merges the new constant pool into the old, this is essentially the
3304   // same constant pool as the original.  If constant pool merging is
3305   // no longer done in the future, this will have to change to save
3306   // the original.
3307   return InstanceKlass::cast(k)->constants();
3308 }
3309 
3310 #define UNSAFESTATICFIELDACCESSORIMPL_FIELDS_DO(macro) \
3311   macro(_base_offset, k, "base", object_signature, false)
3312 
3313 void reflect_UnsafeStaticFieldAccessorImpl::compute_offsets() {
3314   InstanceKlass* k = SystemDictionary::reflect_UnsafeStaticFieldAccessorImpl_klass();
3315   UNSAFESTATICFIELDACCESSORIMPL_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3316 }
3317 
3318 #if INCLUDE_CDS
3319 void reflect_UnsafeStaticFieldAccessorImpl::serialize_offsets(SerializeClosure* f) {
3320   UNSAFESTATICFIELDACCESSORIMPL_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3321 }
3322 #endif
3323 
3324 oop java_lang_boxing_object::initialize_and_allocate(BasicType type, TRAPS) {
3325   Klass* k = SystemDictionary::box_klass(type);
3326   if (k == NULL)  return NULL;
3327   InstanceKlass* ik = InstanceKlass::cast(k);
3328   if (!ik->is_initialized())  ik->initialize(CHECK_0);
3329   return ik->allocate_instance(THREAD);
3330 }
3331 
3332 
3333 oop java_lang_boxing_object::create(BasicType type, jvalue* value, TRAPS) {
3334   oop box = initialize_and_allocate(type, CHECK_0);
3335   if (box == NULL)  return NULL;
3336   switch (type) {
3337     case T_BOOLEAN:
3338       box->bool_field_put(value_offset, value->z);
3339       break;
3340     case T_CHAR:
3341       box->char_field_put(value_offset, value->c);
3342       break;
3343     case T_FLOAT:
3344       box->float_field_put(value_offset, value->f);
3345       break;
3346     case T_DOUBLE:
3347       box->double_field_put(long_value_offset, value->d);
3348       break;
3349     case T_BYTE:
3350       box->byte_field_put(value_offset, value->b);
3351       break;
3352     case T_SHORT:
3353       box->short_field_put(value_offset, value->s);
3354       break;
3355     case T_INT:
3356       box->int_field_put(value_offset, value->i);
3357       break;
3358     case T_LONG:
3359       box->long_field_put(long_value_offset, value->j);
3360       break;
3361     default:
3362       return NULL;
3363   }
3364   return box;
3365 }
3366 
3367 
3368 BasicType java_lang_boxing_object::basic_type(oop box) {
3369   if (box == NULL)  return T_ILLEGAL;
3370   BasicType type = SystemDictionary::box_klass_type(box->klass());
3371   if (type == T_OBJECT)         // 'unknown' value returned by SD::bkt
3372     return T_ILLEGAL;
3373   return type;
3374 }
3375 
3376 
3377 BasicType java_lang_boxing_object::get_value(oop box, jvalue* value) {
3378   BasicType type = SystemDictionary::box_klass_type(box->klass());
3379   switch (type) {
3380   case T_BOOLEAN:
3381     value->z = box->bool_field(value_offset);
3382     break;
3383   case T_CHAR:
3384     value->c = box->char_field(value_offset);
3385     break;
3386   case T_FLOAT:
3387     value->f = box->float_field(value_offset);
3388     break;
3389   case T_DOUBLE:
3390     value->d = box->double_field(long_value_offset);
3391     break;
3392   case T_BYTE:
3393     value->b = box->byte_field(value_offset);
3394     break;
3395   case T_SHORT:
3396     value->s = box->short_field(value_offset);
3397     break;
3398   case T_INT:
3399     value->i = box->int_field(value_offset);
3400     break;
3401   case T_LONG:
3402     value->j = box->long_field(long_value_offset);
3403     break;
3404   default:
3405     return T_ILLEGAL;
3406   } // end switch
3407   return type;
3408 }
3409 
3410 
3411 BasicType java_lang_boxing_object::set_value(oop box, jvalue* value) {
3412   BasicType type = SystemDictionary::box_klass_type(box->klass());
3413   switch (type) {
3414   case T_BOOLEAN:
3415     box->bool_field_put(value_offset, value->z);
3416     break;
3417   case T_CHAR:
3418     box->char_field_put(value_offset, value->c);
3419     break;
3420   case T_FLOAT:
3421     box->float_field_put(value_offset, value->f);
3422     break;
3423   case T_DOUBLE:
3424     box->double_field_put(long_value_offset, value->d);
3425     break;
3426   case T_BYTE:
3427     box->byte_field_put(value_offset, value->b);
3428     break;
3429   case T_SHORT:
3430     box->short_field_put(value_offset, value->s);
3431     break;
3432   case T_INT:
3433     box->int_field_put(value_offset, value->i);
3434     break;
3435   case T_LONG:
3436     box->long_field_put(long_value_offset, value->j);
3437     break;
3438   default:
3439     return T_ILLEGAL;
3440   } // end switch
3441   return type;
3442 }
3443 
3444 
3445 void java_lang_boxing_object::print(BasicType type, jvalue* value, outputStream* st) {
3446   switch (type) {
3447   case T_BOOLEAN:   st->print("%s", value->z ? "true" : "false");   break;
3448   case T_CHAR:      st->print("%d", value->c);                      break;
3449   case T_BYTE:      st->print("%d", value->b);                      break;
3450   case T_SHORT:     st->print("%d", value->s);                      break;
3451   case T_INT:       st->print("%d", value->i);                      break;
3452   case T_LONG:      st->print(JLONG_FORMAT, value->j);              break;
3453   case T_FLOAT:     st->print("%f", value->f);                      break;
3454   case T_DOUBLE:    st->print("%lf", value->d);                     break;
3455   default:          st->print("type %d?", type);                    break;
3456   }
3457 }
3458 
3459 // Support for java_lang_ref_Reference
3460 
3461 bool java_lang_ref_Reference::is_referent_field(oop obj, ptrdiff_t offset) {
3462   assert(obj != NULL, "sanity");
3463   if (offset != java_lang_ref_Reference::referent_offset) {
3464     return false;
3465   }
3466 
3467   Klass* k = obj->klass();
3468   if (!k->is_instance_klass()) {
3469     return false;
3470   }
3471 
3472   InstanceKlass* ik = InstanceKlass::cast(obj->klass());
3473   bool is_reference = ik->reference_type() != REF_NONE;
3474   assert(!is_reference || ik->is_subclass_of(SystemDictionary::Reference_klass()), "sanity");
3475   return is_reference;
3476 }
3477 
3478 // Support for java_lang_ref_SoftReference
3479 //
3480 
3481 #define SOFTREFERENCE_FIELDS_DO(macro) \
3482   macro(timestamp_offset,    k, "timestamp", long_signature, false); \
3483   macro(static_clock_offset, k, "clock",     long_signature, true)
3484 
3485 void java_lang_ref_SoftReference::compute_offsets() {
3486   InstanceKlass* k = SystemDictionary::SoftReference_klass();
3487   SOFTREFERENCE_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3488 }
3489 
3490 #if INCLUDE_CDS
3491 void java_lang_ref_SoftReference::serialize_offsets(SerializeClosure* f) {
3492   SOFTREFERENCE_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3493 }
3494 #endif
3495 
3496 jlong java_lang_ref_SoftReference::timestamp(oop ref) {
3497   return ref->long_field(timestamp_offset);
3498 }
3499 
3500 jlong java_lang_ref_SoftReference::clock() {
3501   InstanceKlass* ik = SystemDictionary::SoftReference_klass();
3502   oop base = ik->static_field_base_raw();
3503   return base->long_field(static_clock_offset);
3504 }
3505 
3506 void java_lang_ref_SoftReference::set_clock(jlong value) {
3507   InstanceKlass* ik = SystemDictionary::SoftReference_klass();
3508   oop base = ik->static_field_base_raw();
3509   base->long_field_put(static_clock_offset, value);
3510 }
3511 
3512 // Support for java_lang_invoke_DirectMethodHandle
3513 
3514 int java_lang_invoke_DirectMethodHandle::_member_offset;
3515 
3516 oop java_lang_invoke_DirectMethodHandle::member(oop dmh) {
3517   oop member_name = NULL;
3518   assert(oopDesc::is_oop(dmh) && java_lang_invoke_DirectMethodHandle::is_instance(dmh),
3519          "a DirectMethodHandle oop is expected");
3520   return dmh->obj_field(member_offset_in_bytes());
3521 }
3522 
3523 #define DIRECTMETHODHANDLE_FIELDS_DO(macro) \
3524   macro(_member_offset, k, "member", java_lang_invoke_MemberName_signature, false)
3525 
3526 void java_lang_invoke_DirectMethodHandle::compute_offsets() {
3527   InstanceKlass* k = SystemDictionary::DirectMethodHandle_klass();
3528   DIRECTMETHODHANDLE_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3529 }
3530 
3531 #if INCLUDE_CDS
3532 void java_lang_invoke_DirectMethodHandle::serialize_offsets(SerializeClosure* f) {
3533   DIRECTMETHODHANDLE_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3534 }
3535 #endif
3536 
3537 // Support for java_lang_invoke_MethodHandle
3538 
3539 int java_lang_invoke_MethodHandle::_type_offset;
3540 int java_lang_invoke_MethodHandle::_form_offset;
3541 
3542 int java_lang_invoke_MemberName::_clazz_offset;
3543 int java_lang_invoke_MemberName::_name_offset;
3544 int java_lang_invoke_MemberName::_type_offset;
3545 int java_lang_invoke_MemberName::_flags_offset;
3546 int java_lang_invoke_MemberName::_method_offset;
3547 int java_lang_invoke_MemberName::_vmindex_offset;
3548 
3549 int java_lang_invoke_ResolvedMethodName::_vmtarget_offset;
3550 int java_lang_invoke_ResolvedMethodName::_vmholder_offset;
3551 
3552 int java_lang_invoke_LambdaForm::_vmentry_offset;
3553 
3554 #define METHODHANDLE_FIELDS_DO(macro) \
3555   macro(_type_offset, k, vmSymbols::type_name(), java_lang_invoke_MethodType_signature, false); \
3556   macro(_form_offset, k, "form",                 java_lang_invoke_LambdaForm_signature, false)
3557 
3558 void java_lang_invoke_MethodHandle::compute_offsets() {
3559   InstanceKlass* k = SystemDictionary::MethodHandle_klass();
3560   METHODHANDLE_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3561 }
3562 
3563 #if INCLUDE_CDS
3564 void java_lang_invoke_MethodHandle::serialize_offsets(SerializeClosure* f) {
3565   METHODHANDLE_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3566 }
3567 #endif
3568 
3569 #define MEMBERNAME_FIELDS_DO(macro) \
3570   macro(_clazz_offset,   k, vmSymbols::clazz_name(),   class_signature,  false); \
3571   macro(_name_offset,    k, vmSymbols::name_name(),    string_signature, false); \
3572   macro(_type_offset,    k, vmSymbols::type_name(),    object_signature, false); \
3573   macro(_flags_offset,   k, vmSymbols::flags_name(),   int_signature,    false); \
3574   macro(_method_offset,  k, vmSymbols::method_name(),  java_lang_invoke_ResolvedMethodName_signature, false)
3575 
3576 void java_lang_invoke_MemberName::compute_offsets() {
3577   InstanceKlass* k = SystemDictionary::MemberName_klass();
3578   MEMBERNAME_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3579   MEMBERNAME_INJECTED_FIELDS(INJECTED_FIELD_COMPUTE_OFFSET);
3580 }
3581 
3582 #if INCLUDE_CDS
3583 void java_lang_invoke_MemberName::serialize_offsets(SerializeClosure* f) {
3584   MEMBERNAME_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3585   MEMBERNAME_INJECTED_FIELDS(INJECTED_FIELD_SERIALIZE_OFFSET);
3586 }
3587 #endif
3588 
3589 void java_lang_invoke_ResolvedMethodName::compute_offsets() {
3590   InstanceKlass* k = SystemDictionary::ResolvedMethodName_klass();
3591   assert(k != NULL, "jdk mismatch");
3592   RESOLVEDMETHOD_INJECTED_FIELDS(INJECTED_FIELD_COMPUTE_OFFSET);
3593 }
3594 
3595 #if INCLUDE_CDS
3596 void java_lang_invoke_ResolvedMethodName::serialize_offsets(SerializeClosure* f) {
3597   RESOLVEDMETHOD_INJECTED_FIELDS(INJECTED_FIELD_SERIALIZE_OFFSET);
3598 }
3599 #endif
3600 
3601 #define LAMBDAFORM_FIELDS_DO(macro) \
3602   macro(_vmentry_offset, k, "vmentry", java_lang_invoke_MemberName_signature, false)
3603 
3604 void java_lang_invoke_LambdaForm::compute_offsets() {
3605   InstanceKlass* k = SystemDictionary::LambdaForm_klass();
3606   assert (k != NULL, "jdk mismatch");
3607   LAMBDAFORM_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3608 }
3609 
3610 #if INCLUDE_CDS
3611 void java_lang_invoke_LambdaForm::serialize_offsets(SerializeClosure* f) {
3612   LAMBDAFORM_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3613 }
3614 #endif
3615 
3616 bool java_lang_invoke_LambdaForm::is_instance(oop obj) {
3617   return obj != NULL && is_subclass(obj->klass());
3618 }
3619 
3620 
3621 oop java_lang_invoke_MethodHandle::type(oop mh) {
3622   return mh->obj_field(_type_offset);
3623 }
3624 
3625 void java_lang_invoke_MethodHandle::set_type(oop mh, oop mtype) {
3626   mh->obj_field_put(_type_offset, mtype);
3627 }
3628 
3629 oop java_lang_invoke_MethodHandle::form(oop mh) {
3630   assert(_form_offset != 0, "");
3631   return mh->obj_field(_form_offset);
3632 }
3633 
3634 void java_lang_invoke_MethodHandle::set_form(oop mh, oop lform) {
3635   assert(_form_offset != 0, "");
3636   mh->obj_field_put(_form_offset, lform);
3637 }
3638 
3639 /// MemberName accessors
3640 
3641 oop java_lang_invoke_MemberName::clazz(oop mname) {
3642   assert(is_instance(mname), "wrong type");
3643   return mname->obj_field(_clazz_offset);
3644 }
3645 
3646 void java_lang_invoke_MemberName::set_clazz(oop mname, oop clazz) {
3647   assert(is_instance(mname), "wrong type");
3648   mname->obj_field_put(_clazz_offset, clazz);
3649 }
3650 
3651 oop java_lang_invoke_MemberName::name(oop mname) {
3652   assert(is_instance(mname), "wrong type");
3653   return mname->obj_field(_name_offset);
3654 }
3655 
3656 void java_lang_invoke_MemberName::set_name(oop mname, oop name) {
3657   assert(is_instance(mname), "wrong type");
3658   mname->obj_field_put(_name_offset, name);
3659 }
3660 
3661 oop java_lang_invoke_MemberName::type(oop mname) {
3662   assert(is_instance(mname), "wrong type");
3663   return mname->obj_field(_type_offset);
3664 }
3665 
3666 void java_lang_invoke_MemberName::set_type(oop mname, oop type) {
3667   assert(is_instance(mname), "wrong type");
3668   mname->obj_field_put(_type_offset, type);
3669 }
3670 
3671 int java_lang_invoke_MemberName::flags(oop mname) {
3672   assert(is_instance(mname), "wrong type");
3673   return mname->int_field(_flags_offset);
3674 }
3675 
3676 void java_lang_invoke_MemberName::set_flags(oop mname, int flags) {
3677   assert(is_instance(mname), "wrong type");
3678   mname->int_field_put(_flags_offset, flags);
3679 }
3680 
3681 
3682 // Return vmtarget from ResolvedMethodName method field through indirection
3683 Method* java_lang_invoke_MemberName::vmtarget(oop mname) {
3684   assert(is_instance(mname), "wrong type");
3685   oop method = mname->obj_field(_method_offset);
3686   return method == NULL ? NULL : java_lang_invoke_ResolvedMethodName::vmtarget(method);
3687 }
3688 
3689 bool java_lang_invoke_MemberName::is_method(oop mname) {
3690   assert(is_instance(mname), "must be MemberName");
3691   return (flags(mname) & (MN_IS_METHOD | MN_IS_CONSTRUCTOR)) > 0;
3692 }
3693 
3694 void java_lang_invoke_MemberName::set_method(oop mname, oop resolved_method) {
3695   assert(is_instance(mname), "wrong type");
3696   mname->obj_field_put(_method_offset, resolved_method);
3697 }
3698 
3699 intptr_t java_lang_invoke_MemberName::vmindex(oop mname) {
3700   assert(is_instance(mname), "wrong type");
3701   return (intptr_t) mname->address_field(_vmindex_offset);
3702 }
3703 
3704 void java_lang_invoke_MemberName::set_vmindex(oop mname, intptr_t index) {
3705   assert(is_instance(mname), "wrong type");
3706   mname->address_field_put(_vmindex_offset, (address) index);
3707 }
3708 
3709 
3710 Method* java_lang_invoke_ResolvedMethodName::vmtarget(oop resolved_method) {
3711   assert(is_instance(resolved_method), "wrong type");
3712   Method* m = (Method*)resolved_method->address_field(_vmtarget_offset);
3713   assert(m->is_method(), "must be");
3714   return m;
3715 }
3716 
3717 // Used by redefinition to change Method* to new Method* with same hash (name, signature)
3718 void java_lang_invoke_ResolvedMethodName::set_vmtarget(oop resolved_method, Method* m) {
3719   assert(is_instance(resolved_method), "wrong type");
3720   resolved_method->address_field_put(_vmtarget_offset, (address)m);
3721 }
3722 
3723 oop java_lang_invoke_ResolvedMethodName::find_resolved_method(const methodHandle& m, TRAPS) {
3724   // lookup ResolvedMethod oop in the table, or create a new one and intern it
3725   oop resolved_method = ResolvedMethodTable::find_method(m());
3726   if (resolved_method == NULL) {
3727     InstanceKlass* k = SystemDictionary::ResolvedMethodName_klass();
3728     if (!k->is_initialized()) {
3729       k->initialize(CHECK_NULL);
3730     }
3731     oop new_resolved_method = k->allocate_instance(CHECK_NULL);
3732     new_resolved_method->address_field_put(_vmtarget_offset, (address)m());
3733     // Add a reference to the loader (actually mirror because unsafe anonymous classes will not have
3734     // distinct loaders) to ensure the metadata is kept alive.
3735     // This mirror may be different than the one in clazz field.
3736     new_resolved_method->obj_field_put(_vmholder_offset, m->method_holder()->java_mirror());
3737     resolved_method = ResolvedMethodTable::add_method(m, Handle(THREAD, new_resolved_method));
3738   }
3739   return resolved_method;
3740 }
3741 
3742 oop java_lang_invoke_LambdaForm::vmentry(oop lform) {
3743   assert(is_instance(lform), "wrong type");
3744   return lform->obj_field(_vmentry_offset);
3745 }
3746 
3747 
3748 // Support for java_lang_invoke_MethodType
3749 
3750 int java_lang_invoke_MethodType::_rtype_offset;
3751 int java_lang_invoke_MethodType::_ptypes_offset;
3752 
3753 #define METHODTYPE_FIELDS_DO(macro) \
3754   macro(_rtype_offset,  k, "rtype",  class_signature,       false); \
3755   macro(_ptypes_offset, k, "ptypes", class_array_signature, false)
3756 
3757 void java_lang_invoke_MethodType::compute_offsets() {
3758   InstanceKlass* k = SystemDictionary::MethodType_klass();
3759   METHODTYPE_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3760 }
3761 
3762 #if INCLUDE_CDS
3763 void java_lang_invoke_MethodType::serialize_offsets(SerializeClosure* f) {
3764   METHODTYPE_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3765 }
3766 #endif
3767 
3768 void java_lang_invoke_MethodType::print_signature(oop mt, outputStream* st) {
3769   st->print("(");
3770   objArrayOop pts = ptypes(mt);
3771   for (int i = 0, limit = pts->length(); i < limit; i++) {
3772     java_lang_Class::print_signature(pts->obj_at(i), st);
3773   }
3774   st->print(")");
3775   java_lang_Class::print_signature(rtype(mt), st);
3776 }
3777 
3778 Symbol* java_lang_invoke_MethodType::as_signature(oop mt, bool intern_if_not_found, TRAPS) {
3779   ResourceMark rm;
3780   stringStream buffer(128);
3781   print_signature(mt, &buffer);
3782   const char* sigstr =       buffer.base();
3783   int         siglen = (int) buffer.size();
3784   Symbol *name;
3785   if (!intern_if_not_found) {
3786     name = SymbolTable::probe(sigstr, siglen);
3787   } else {
3788     name = SymbolTable::new_symbol(sigstr, siglen, THREAD);
3789   }
3790   return name;
3791 }
3792 
3793 bool java_lang_invoke_MethodType::equals(oop mt1, oop mt2) {
3794   if (oopDesc::equals(mt1, mt2))
3795     return true;
3796   if (!oopDesc::equals(rtype(mt1), rtype(mt2)))
3797     return false;
3798   if (ptype_count(mt1) != ptype_count(mt2))
3799     return false;
3800   for (int i = ptype_count(mt1) - 1; i >= 0; i--) {
3801     if (!oopDesc::equals(ptype(mt1, i), ptype(mt2, i)))
3802       return false;
3803   }
3804   return true;
3805 }
3806 
3807 oop java_lang_invoke_MethodType::rtype(oop mt) {
3808   assert(is_instance(mt), "must be a MethodType");
3809   return mt->obj_field(_rtype_offset);
3810 }
3811 
3812 objArrayOop java_lang_invoke_MethodType::ptypes(oop mt) {
3813   assert(is_instance(mt), "must be a MethodType");
3814   return (objArrayOop) mt->obj_field(_ptypes_offset);
3815 }
3816 
3817 oop java_lang_invoke_MethodType::ptype(oop mt, int idx) {
3818   return ptypes(mt)->obj_at(idx);
3819 }
3820 
3821 int java_lang_invoke_MethodType::ptype_count(oop mt) {
3822   return ptypes(mt)->length();
3823 }
3824 
3825 int java_lang_invoke_MethodType::ptype_slot_count(oop mt) {
3826   objArrayOop pts = ptypes(mt);
3827   int count = pts->length();
3828   int slots = 0;
3829   for (int i = 0; i < count; i++) {
3830     BasicType bt = java_lang_Class::as_BasicType(pts->obj_at(i));
3831     slots += type2size[bt];
3832   }
3833   return slots;
3834 }
3835 
3836 int java_lang_invoke_MethodType::rtype_slot_count(oop mt) {
3837   BasicType bt = java_lang_Class::as_BasicType(rtype(mt));
3838   return type2size[bt];
3839 }
3840 
3841 
3842 // Support for java_lang_invoke_CallSite
3843 
3844 int java_lang_invoke_CallSite::_target_offset;
3845 int java_lang_invoke_CallSite::_context_offset;
3846 
3847 #define CALLSITE_FIELDS_DO(macro) \
3848   macro(_target_offset,  k, "target", java_lang_invoke_MethodHandle_signature, false); \
3849   macro(_context_offset, k, "context", java_lang_invoke_MethodHandleNatives_CallSiteContext_signature, false)
3850 
3851 void java_lang_invoke_CallSite::compute_offsets() {
3852   InstanceKlass* k = SystemDictionary::CallSite_klass();
3853   CALLSITE_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3854 }
3855 
3856 #if INCLUDE_CDS
3857 void java_lang_invoke_CallSite::serialize_offsets(SerializeClosure* f) {
3858   CALLSITE_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3859 }
3860 #endif
3861 
3862 oop java_lang_invoke_CallSite::context_no_keepalive(oop call_site) {
3863   assert(java_lang_invoke_CallSite::is_instance(call_site), "");
3864 
3865   oop dep_oop = call_site->obj_field_access<AS_NO_KEEPALIVE>(_context_offset);
3866   return dep_oop;
3867 }
3868 
3869 // Support for java_lang_invoke_MethodHandleNatives_CallSiteContext
3870 
3871 int java_lang_invoke_MethodHandleNatives_CallSiteContext::_vmdependencies_offset;
3872 int java_lang_invoke_MethodHandleNatives_CallSiteContext::_last_cleanup_offset;
3873 
3874 void java_lang_invoke_MethodHandleNatives_CallSiteContext::compute_offsets() {
3875   InstanceKlass* k = SystemDictionary::Context_klass();
3876   CALLSITECONTEXT_INJECTED_FIELDS(INJECTED_FIELD_COMPUTE_OFFSET);
3877 }
3878 
3879 #if INCLUDE_CDS
3880 void java_lang_invoke_MethodHandleNatives_CallSiteContext::serialize_offsets(SerializeClosure* f) {
3881   CALLSITECONTEXT_INJECTED_FIELDS(INJECTED_FIELD_SERIALIZE_OFFSET);
3882 }
3883 #endif
3884 
3885 DependencyContext java_lang_invoke_MethodHandleNatives_CallSiteContext::vmdependencies(oop call_site) {
3886   assert(java_lang_invoke_MethodHandleNatives_CallSiteContext::is_instance(call_site), "");
3887   nmethodBucket* volatile* vmdeps_addr = (nmethodBucket* volatile*)call_site->field_addr(_vmdependencies_offset);
3888   volatile uint64_t* last_cleanup_addr = (volatile uint64_t*)call_site->field_addr(_last_cleanup_offset);
3889   DependencyContext dep_ctx(vmdeps_addr, last_cleanup_addr);
3890   return dep_ctx;
3891 }
3892 
3893 // Support for java_security_AccessControlContext
3894 
3895 int java_security_AccessControlContext::_context_offset = 0;
3896 int java_security_AccessControlContext::_privilegedContext_offset = 0;
3897 int java_security_AccessControlContext::_isPrivileged_offset = 0;
3898 int java_security_AccessControlContext::_isAuthorized_offset = -1;
3899 
3900 #define ACCESSCONTROLCONTEXT_FIELDS_DO(macro) \
3901   macro(_context_offset,           k, "context",      protectiondomain_signature, false); \
3902   macro(_privilegedContext_offset, k, "privilegedContext", accesscontrolcontext_signature, false); \
3903   macro(_isPrivileged_offset,      k, "isPrivileged", bool_signature, false); \
3904   macro(_isAuthorized_offset,      k, "isAuthorized", bool_signature, false)
3905 
3906 void java_security_AccessControlContext::compute_offsets() {
3907   assert(_isPrivileged_offset == 0, "offsets should be initialized only once");
3908   InstanceKlass* k = SystemDictionary::AccessControlContext_klass();
3909   ACCESSCONTROLCONTEXT_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3910 }
3911 
3912 #if INCLUDE_CDS
3913 void java_security_AccessControlContext::serialize_offsets(SerializeClosure* f) {
3914   ACCESSCONTROLCONTEXT_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3915 }
3916 #endif
3917 
3918 oop java_security_AccessControlContext::create(objArrayHandle context, bool isPrivileged, Handle privileged_context, TRAPS) {
3919   assert(_isPrivileged_offset != 0, "offsets should have been initialized");
3920   // Ensure klass is initialized
3921   SystemDictionary::AccessControlContext_klass()->initialize(CHECK_0);
3922   // Allocate result
3923   oop result = SystemDictionary::AccessControlContext_klass()->allocate_instance(CHECK_0);
3924   // Fill in values
3925   result->obj_field_put(_context_offset, context());
3926   result->obj_field_put(_privilegedContext_offset, privileged_context());
3927   result->bool_field_put(_isPrivileged_offset, isPrivileged);
3928   // whitelist AccessControlContexts created by the JVM if present
3929   if (_isAuthorized_offset != -1) {
3930     result->bool_field_put(_isAuthorized_offset, true);
3931   }
3932   return result;
3933 }
3934 
3935 
3936 // Support for java_lang_ClassLoader
3937 
3938 bool java_lang_ClassLoader::offsets_computed = false;
3939 int  java_lang_ClassLoader::_loader_data_offset = -1;
3940 int  java_lang_ClassLoader::parallelCapable_offset = -1;
3941 int  java_lang_ClassLoader::name_offset = -1;
3942 int  java_lang_ClassLoader::nameAndId_offset = -1;
3943 int  java_lang_ClassLoader::unnamedModule_offset = -1;
3944 
3945 ClassLoaderData* java_lang_ClassLoader::loader_data_acquire(oop loader) {
3946   assert(loader != NULL && oopDesc::is_oop(loader), "loader must be oop");
3947   return HeapAccess<MO_ACQUIRE>::load_at(loader, _loader_data_offset);
3948 }
3949 
3950 ClassLoaderData* java_lang_ClassLoader::loader_data_raw(oop loader) {
3951   assert(loader != NULL && oopDesc::is_oop(loader), "loader must be oop");
3952   return RawAccess<>::load_at(loader, _loader_data_offset);
3953 }
3954 
3955 void java_lang_ClassLoader::release_set_loader_data(oop loader, ClassLoaderData* new_data) {
3956   assert(loader != NULL && oopDesc::is_oop(loader), "loader must be oop");
3957   HeapAccess<MO_RELEASE>::store_at(loader, _loader_data_offset, new_data);
3958 }
3959 
3960 #define CLASSLOADER_FIELDS_DO(macro) \
3961   macro(parallelCapable_offset, k1, "parallelLockMap",      concurrenthashmap_signature, false); \
3962   macro(name_offset,            k1, vmSymbols::name_name(), string_signature, false); \
3963   macro(nameAndId_offset,       k1, "nameAndId",            string_signature, false); \
3964   macro(unnamedModule_offset,   k1, "unnamedModule",        module_signature, false); \
3965   macro(parent_offset,          k1, "parent",               classloader_signature, false)
3966 
3967 void java_lang_ClassLoader::compute_offsets() {
3968   assert(!offsets_computed, "offsets should be initialized only once");
3969   offsets_computed = true;
3970 
3971   InstanceKlass* k1 = SystemDictionary::ClassLoader_klass();
3972   CLASSLOADER_FIELDS_DO(FIELD_COMPUTE_OFFSET);
3973 
3974   CLASSLOADER_INJECTED_FIELDS(INJECTED_FIELD_COMPUTE_OFFSET);
3975 }
3976 
3977 #if INCLUDE_CDS
3978 void java_lang_ClassLoader::serialize_offsets(SerializeClosure* f) {
3979   CLASSLOADER_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
3980   CLASSLOADER_INJECTED_FIELDS(INJECTED_FIELD_SERIALIZE_OFFSET);
3981 }
3982 #endif
3983 
3984 oop java_lang_ClassLoader::parent(oop loader) {
3985   assert(is_instance(loader), "loader must be oop");
3986   return loader->obj_field(parent_offset);
3987 }
3988 
3989 // Returns the name field of this class loader.  If the name field has not
3990 // been set, null will be returned.
3991 oop java_lang_ClassLoader::name(oop loader) {
3992   assert(is_instance(loader), "loader must be oop");
3993   return loader->obj_field(name_offset);
3994 }
3995 
3996 // Returns the nameAndId field of this class loader. The format is
3997 // as follows:
3998 //   If the defining loader has a name explicitly set then '<loader-name>' @<id>
3999 //   If the defining loader has no name then <qualified-class-name> @<id>
4000 //   If built-in loader, then omit '@<id>' as there is only one instance.
4001 // Use ClassLoader::loader_name_id() to obtain this String as a char*.
4002 oop java_lang_ClassLoader::nameAndId(oop loader) {
4003   assert(is_instance(loader), "loader must be oop");
4004   return loader->obj_field(nameAndId_offset);
4005 }
4006 
4007 bool java_lang_ClassLoader::isAncestor(oop loader, oop cl) {
4008   assert(is_instance(loader), "loader must be oop");
4009   assert(cl == NULL || is_instance(cl), "cl argument must be oop");
4010   oop acl = loader;
4011   debug_only(jint loop_count = 0);
4012   // This loop taken verbatim from ClassLoader.java:
4013   do {
4014     acl = parent(acl);
4015     if (oopDesc::equals(cl, acl)) {
4016       return true;
4017     }
4018     assert(++loop_count > 0, "loop_count overflow");
4019   } while (acl != NULL);
4020   return false;
4021 }
4022 
4023 bool java_lang_ClassLoader::is_instance(oop obj) {
4024   return obj != NULL && is_subclass(obj->klass());
4025 }
4026 
4027 
4028 // For class loader classes, parallelCapable defined
4029 // based on non-null field
4030 // Written to by java.lang.ClassLoader, vm only reads this field, doesn't set it
4031 bool java_lang_ClassLoader::parallelCapable(oop class_loader) {
4032   if (parallelCapable_offset == -1) {
4033      // Default for backward compatibility is false
4034      return false;
4035   }
4036   return (class_loader->obj_field(parallelCapable_offset) != NULL);
4037 }
4038 
4039 bool java_lang_ClassLoader::is_trusted_loader(oop loader) {
4040   // Fix for 4474172; see evaluation for more details
4041   loader = non_reflection_class_loader(loader);
4042 
4043   oop cl = SystemDictionary::java_system_loader();
4044   while(cl != NULL) {
4045     if (oopDesc::equals(cl, loader)) return true;
4046     cl = parent(cl);
4047   }
4048   return false;
4049 }
4050 
4051 // Return true if this is one of the class loaders associated with
4052 // the generated bytecodes for reflection.
4053 bool java_lang_ClassLoader::is_reflection_class_loader(oop loader) {
4054   if (loader != NULL) {
4055     Klass* delegating_cl_class = SystemDictionary::reflect_DelegatingClassLoader_klass();
4056     // This might be null in non-1.4 JDKs
4057     return (delegating_cl_class != NULL && loader->is_a(delegating_cl_class));
4058   }
4059   return false;
4060 }
4061 
4062 oop java_lang_ClassLoader::non_reflection_class_loader(oop loader) {
4063   // See whether this is one of the class loaders associated with
4064   // the generated bytecodes for reflection, and if so, "magically"
4065   // delegate to its parent to prevent class loading from occurring
4066   // in places where applications using reflection didn't expect it.
4067   if (is_reflection_class_loader(loader)) {
4068     return parent(loader);
4069   }
4070   return loader;
4071 }
4072 
4073 oop java_lang_ClassLoader::unnamedModule(oop loader) {
4074   assert(is_instance(loader), "loader must be oop");
4075   return loader->obj_field(unnamedModule_offset);
4076 }
4077 
4078 // Support for java_lang_System
4079 //
4080 #define SYSTEM_FIELDS_DO(macro) \
4081   macro(static_in_offset,  k, "in",  input_stream_signature, true); \
4082   macro(static_out_offset, k, "out", print_stream_signature, true); \
4083   macro(static_err_offset, k, "err", print_stream_signature, true); \
4084   macro(static_security_offset, k, "security", security_manager_signature, true)
4085 
4086 void java_lang_System::compute_offsets() {
4087   InstanceKlass* k = SystemDictionary::System_klass();
4088   SYSTEM_FIELDS_DO(FIELD_COMPUTE_OFFSET);
4089 }
4090 
4091 #if INCLUDE_CDS
4092 void java_lang_System::serialize_offsets(SerializeClosure* f) {
4093    SYSTEM_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
4094 }
4095 #endif
4096 
4097 int java_lang_System::in_offset_in_bytes() { return static_in_offset; }
4098 int java_lang_System::out_offset_in_bytes() { return static_out_offset; }
4099 int java_lang_System::err_offset_in_bytes() { return static_err_offset; }
4100 
4101 // Support for jdk_internal_misc_UnsafeConstants
4102 //
4103 class UnsafeConstantsFixup : public FieldClosure {
4104 private:
4105   int _address_size;
4106   int _page_size;
4107   bool _big_endian;
4108   bool _use_unaligned_access;
4109 public:
4110   UnsafeConstantsFixup() {
4111     // round up values for all static final fields
4112     _address_size = sizeof(void*);
4113     _page_size = os::vm_page_size();
4114     _big_endian = LITTLE_ENDIAN_ONLY(false) BIG_ENDIAN_ONLY(true);
4115     _use_unaligned_access = UseUnalignedAccesses;
4116   }
4117 
4118   void do_field(fieldDescriptor* fd) {
4119     oop mirror = fd->field_holder()->java_mirror();
4120     assert(mirror != NULL, "UnsafeConstants must have mirror already");
4121     assert(fd->field_holder() == SystemDictionary::UnsafeConstants_klass(), "Should be UnsafeConstants");
4122     assert(fd->is_final(), "fields of UnsafeConstants must be final");
4123     assert(fd->is_static(), "fields of UnsafeConstants must be static");
4124     if (fd->name() == vmSymbols::address_size_name()) {
4125       mirror->int_field_put(fd->offset(), _address_size);
4126     } else if (fd->name() == vmSymbols::page_size_name()) {
4127       mirror->int_field_put(fd->offset(), _page_size);
4128     } else if (fd->name() == vmSymbols::big_endian_name()) {
4129       mirror->bool_field_put(fd->offset(), _big_endian);
4130     } else if (fd->name() == vmSymbols::use_unaligned_access_name()) {
4131       mirror->bool_field_put(fd->offset(), _use_unaligned_access);
4132     } else {
4133       assert(false, "unexpected UnsafeConstants field");
4134     }
4135   }
4136 };
4137 
4138 void jdk_internal_misc_UnsafeConstants::set_unsafe_constants() {
4139   UnsafeConstantsFixup fixup;
4140   SystemDictionary::UnsafeConstants_klass()->do_local_static_fields(&fixup);
4141 }
4142 
4143 int java_lang_Class::_klass_offset;
4144 int java_lang_Class::_array_klass_offset;
4145 int java_lang_Class::_oop_size_offset;
4146 int java_lang_Class::_static_oop_field_count_offset;
4147 int java_lang_Class::_class_loader_offset;
4148 int java_lang_Class::_module_offset;
4149 int java_lang_Class::_protection_domain_offset;
4150 int java_lang_Class::_component_mirror_offset;
4151 int java_lang_Class::_box_mirror_offset;
4152 int java_lang_Class::_value_mirror_offset;
4153 int java_lang_Class::_init_lock_offset;
4154 int java_lang_Class::_signers_offset;
4155 int java_lang_Class::_name_offset;
4156 int java_lang_Class::_source_file_offset;
4157 GrowableArray<Klass*>* java_lang_Class::_fixup_mirror_list = NULL;
4158 GrowableArray<Klass*>* java_lang_Class::_fixup_module_field_list = NULL;
4159 int java_lang_Throwable::backtrace_offset;
4160 int java_lang_Throwable::detailMessage_offset;
4161 int java_lang_Throwable::stackTrace_offset;
4162 int java_lang_Throwable::depth_offset;
4163 int java_lang_Throwable::static_unassigned_stacktrace_offset;
4164 int java_lang_reflect_AccessibleObject::override_offset;
4165 int java_lang_reflect_Method::clazz_offset;
4166 int java_lang_reflect_Method::name_offset;
4167 int java_lang_reflect_Method::returnType_offset;
4168 int java_lang_reflect_Method::parameterTypes_offset;
4169 int java_lang_reflect_Method::exceptionTypes_offset;
4170 int java_lang_reflect_Method::slot_offset;
4171 int java_lang_reflect_Method::modifiers_offset;
4172 int java_lang_reflect_Method::signature_offset;
4173 int java_lang_reflect_Method::annotations_offset;
4174 int java_lang_reflect_Method::parameter_annotations_offset;
4175 int java_lang_reflect_Method::annotation_default_offset;
4176 int java_lang_reflect_Constructor::clazz_offset;
4177 int java_lang_reflect_Constructor::parameterTypes_offset;
4178 int java_lang_reflect_Constructor::exceptionTypes_offset;
4179 int java_lang_reflect_Constructor::slot_offset;
4180 int java_lang_reflect_Constructor::modifiers_offset;
4181 int java_lang_reflect_Constructor::signature_offset;
4182 int java_lang_reflect_Constructor::annotations_offset;
4183 int java_lang_reflect_Constructor::parameter_annotations_offset;
4184 int java_lang_reflect_Field::clazz_offset;
4185 int java_lang_reflect_Field::name_offset;
4186 int java_lang_reflect_Field::type_offset;
4187 int java_lang_reflect_Field::slot_offset;
4188 int java_lang_reflect_Field::modifiers_offset;
4189 int java_lang_reflect_Field::signature_offset;
4190 int java_lang_reflect_Field::annotations_offset;
4191 int java_lang_reflect_Parameter::name_offset;
4192 int java_lang_reflect_Parameter::modifiers_offset;
4193 int java_lang_reflect_Parameter::index_offset;
4194 int java_lang_reflect_Parameter::executable_offset;
4195 int java_lang_boxing_object::value_offset;
4196 int java_lang_boxing_object::long_value_offset;
4197 int java_lang_ref_Reference::referent_offset;
4198 int java_lang_ref_Reference::queue_offset;
4199 int java_lang_ref_Reference::next_offset;
4200 int java_lang_ref_Reference::discovered_offset;
4201 int java_lang_ref_SoftReference::timestamp_offset;
4202 int java_lang_ref_SoftReference::static_clock_offset;
4203 int java_lang_ClassLoader::parent_offset;
4204 int java_lang_System::static_in_offset;
4205 int java_lang_System::static_out_offset;
4206 int java_lang_System::static_err_offset;
4207 int java_lang_System::static_security_offset;
4208 int java_lang_StackTraceElement::methodName_offset;
4209 int java_lang_StackTraceElement::fileName_offset;
4210 int java_lang_StackTraceElement::lineNumber_offset;
4211 int java_lang_StackTraceElement::moduleName_offset;
4212 int java_lang_StackTraceElement::moduleVersion_offset;
4213 int java_lang_StackTraceElement::classLoaderName_offset;
4214 int java_lang_StackTraceElement::declaringClass_offset;
4215 int java_lang_StackTraceElement::declaringClassObject_offset;
4216 int java_lang_StackFrameInfo::_memberName_offset;
4217 int java_lang_StackFrameInfo::_bci_offset;
4218 int java_lang_StackFrameInfo::_version_offset;
4219 int java_lang_LiveStackFrameInfo::_monitors_offset;
4220 int java_lang_LiveStackFrameInfo::_locals_offset;
4221 int java_lang_LiveStackFrameInfo::_operands_offset;
4222 int java_lang_LiveStackFrameInfo::_mode_offset;
4223 int java_lang_AssertionStatusDirectives::classes_offset;
4224 int java_lang_AssertionStatusDirectives::classEnabled_offset;
4225 int java_lang_AssertionStatusDirectives::packages_offset;
4226 int java_lang_AssertionStatusDirectives::packageEnabled_offset;
4227 int java_lang_AssertionStatusDirectives::deflt_offset;
4228 int java_nio_Buffer::_limit_offset;
4229 int java_util_concurrent_locks_AbstractOwnableSynchronizer::_owner_offset;
4230 int reflect_ConstantPool::_oop_offset;
4231 int reflect_UnsafeStaticFieldAccessorImpl::_base_offset;
4232 
4233 
4234 #define STACKTRACEELEMENT_FIELDS_DO(macro) \
4235   macro(declaringClassObject_offset,  k, "declaringClassObject", class_signature, false); \
4236   macro(classLoaderName_offset, k, "classLoaderName", string_signature, false); \
4237   macro(moduleName_offset,      k, "moduleName",      string_signature, false); \
4238   macro(moduleVersion_offset,   k, "moduleVersion",   string_signature, false); \
4239   macro(declaringClass_offset,  k, "declaringClass",  string_signature, false); \
4240   macro(methodName_offset,      k, "methodName",      string_signature, false); \
4241   macro(fileName_offset,        k, "fileName",        string_signature, false); \
4242   macro(lineNumber_offset,      k, "lineNumber",      int_signature,    false)
4243 
4244 // Support for java_lang_StackTraceElement
4245 void java_lang_StackTraceElement::compute_offsets() {
4246   InstanceKlass* k = SystemDictionary::StackTraceElement_klass();
4247   STACKTRACEELEMENT_FIELDS_DO(FIELD_COMPUTE_OFFSET);
4248 }
4249 
4250 #if INCLUDE_CDS
4251 void java_lang_StackTraceElement::serialize_offsets(SerializeClosure* f) {
4252   STACKTRACEELEMENT_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
4253 }
4254 #endif
4255 
4256 void java_lang_StackTraceElement::set_fileName(oop element, oop value) {
4257   element->obj_field_put(fileName_offset, value);
4258 }
4259 
4260 void java_lang_StackTraceElement::set_declaringClass(oop element, oop value) {
4261   element->obj_field_put(declaringClass_offset, value);
4262 }
4263 
4264 void java_lang_StackTraceElement::set_methodName(oop element, oop value) {
4265   element->obj_field_put(methodName_offset, value);
4266 }
4267 
4268 void java_lang_StackTraceElement::set_lineNumber(oop element, int value) {
4269   element->int_field_put(lineNumber_offset, value);
4270 }
4271 
4272 void java_lang_StackTraceElement::set_moduleName(oop element, oop value) {
4273   element->obj_field_put(moduleName_offset, value);
4274 }
4275 
4276 void java_lang_StackTraceElement::set_moduleVersion(oop element, oop value) {
4277   element->obj_field_put(moduleVersion_offset, value);
4278 }
4279 
4280 void java_lang_StackTraceElement::set_classLoaderName(oop element, oop value) {
4281   element->obj_field_put(classLoaderName_offset, value);
4282 }
4283 
4284 void java_lang_StackTraceElement::set_declaringClassObject(oop element, oop value) {
4285   element->obj_field_put(declaringClassObject_offset, value);
4286 }
4287 
4288 void java_lang_StackFrameInfo::set_version(oop element, short value) {
4289   element->short_field_put(_version_offset, value);
4290 }
4291 
4292 void java_lang_StackFrameInfo::set_bci(oop element, int value) {
4293   element->int_field_put(_bci_offset, value);
4294 }
4295 
4296 void java_lang_LiveStackFrameInfo::set_monitors(oop element, oop value) {
4297   element->obj_field_put(_monitors_offset, value);
4298 }
4299 
4300 void java_lang_LiveStackFrameInfo::set_locals(oop element, oop value) {
4301   element->obj_field_put(_locals_offset, value);
4302 }
4303 
4304 void java_lang_LiveStackFrameInfo::set_operands(oop element, oop value) {
4305   element->obj_field_put(_operands_offset, value);
4306 }
4307 
4308 void java_lang_LiveStackFrameInfo::set_mode(oop element, int value) {
4309   element->int_field_put(_mode_offset, value);
4310 }
4311 
4312 // Support for java Assertions - java_lang_AssertionStatusDirectives.
4313 #define ASSERTIONSTATUSDIRECTIVES_FIELDS_DO(macro) \
4314   macro(classes_offset,        k, "classes",        string_array_signature, false); \
4315   macro(classEnabled_offset,   k, "classEnabled",   bool_array_signature, false); \
4316   macro(packages_offset,       k, "packages",       string_array_signature, false); \
4317   macro(packageEnabled_offset, k, "packageEnabled", bool_array_signature,   false); \
4318   macro(deflt_offset,          k, "deflt",          bool_signature,         false)
4319 
4320 void java_lang_AssertionStatusDirectives::compute_offsets() {
4321   InstanceKlass* k = SystemDictionary::AssertionStatusDirectives_klass();
4322   ASSERTIONSTATUSDIRECTIVES_FIELDS_DO(FIELD_COMPUTE_OFFSET);
4323 }
4324 
4325 #if INCLUDE_CDS
4326 void java_lang_AssertionStatusDirectives::serialize_offsets(SerializeClosure* f) {
4327   ASSERTIONSTATUSDIRECTIVES_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
4328 }
4329 #endif
4330 
4331 void java_lang_AssertionStatusDirectives::set_classes(oop o, oop val) {
4332   o->obj_field_put(classes_offset, val);
4333 }
4334 
4335 void java_lang_AssertionStatusDirectives::set_classEnabled(oop o, oop val) {
4336   o->obj_field_put(classEnabled_offset, val);
4337 }
4338 
4339 void java_lang_AssertionStatusDirectives::set_packages(oop o, oop val) {
4340   o->obj_field_put(packages_offset, val);
4341 }
4342 
4343 void java_lang_AssertionStatusDirectives::set_packageEnabled(oop o, oop val) {
4344   o->obj_field_put(packageEnabled_offset, val);
4345 }
4346 
4347 void java_lang_AssertionStatusDirectives::set_deflt(oop o, bool val) {
4348   o->bool_field_put(deflt_offset, val);
4349 }
4350 
4351 
4352 // Support for intrinsification of java.nio.Buffer.checkIndex
4353 int java_nio_Buffer::limit_offset() {
4354   return _limit_offset;
4355 }
4356 
4357 #define BUFFER_FIELDS_DO(macro) \
4358   macro(_limit_offset, k, "limit", int_signature, false)
4359 
4360 void java_nio_Buffer::compute_offsets() {
4361   InstanceKlass* k = SystemDictionary::nio_Buffer_klass();
4362   assert(k != NULL, "must be loaded in 1.4+");
4363   BUFFER_FIELDS_DO(FIELD_COMPUTE_OFFSET);
4364 }
4365 
4366 #if INCLUDE_CDS
4367 void java_nio_Buffer::serialize_offsets(SerializeClosure* f) {
4368   BUFFER_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
4369 }
4370 #endif
4371 
4372 #define AOS_FIELDS_DO(macro) \
4373   macro(_owner_offset, k, "exclusiveOwnerThread", thread_signature, false)
4374 
4375 void java_util_concurrent_locks_AbstractOwnableSynchronizer::compute_offsets() {
4376   InstanceKlass* k = SystemDictionary::java_util_concurrent_locks_AbstractOwnableSynchronizer_klass();
4377   AOS_FIELDS_DO(FIELD_COMPUTE_OFFSET);
4378 }
4379 
4380 oop java_util_concurrent_locks_AbstractOwnableSynchronizer::get_owner_threadObj(oop obj) {
4381   assert(_owner_offset != 0, "Must be initialized");
4382   return obj->obj_field(_owner_offset);
4383 }
4384 
4385 #if INCLUDE_CDS
4386 void java_util_concurrent_locks_AbstractOwnableSynchronizer::serialize_offsets(SerializeClosure* f) {
4387   AOS_FIELDS_DO(FIELD_SERIALIZE_OFFSET);
4388 }
4389 #endif
4390 
4391 static int member_offset(int hardcoded_offset) {
4392   return (hardcoded_offset * heapOopSize) + instanceOopDesc::base_offset_in_bytes();
4393 }
4394 
4395 // Compute hard-coded offsets
4396 // Invoked before SystemDictionary::initialize, so pre-loaded classes
4397 // are not available to determine the offset_of_static_fields.
4398 void JavaClasses::compute_hard_coded_offsets() {
4399 
4400   // java_lang_boxing_object
4401   java_lang_boxing_object::value_offset      = member_offset(java_lang_boxing_object::hc_value_offset);
4402   java_lang_boxing_object::long_value_offset = align_up(member_offset(java_lang_boxing_object::hc_value_offset), BytesPerLong);
4403 
4404   // java_lang_ref_Reference
4405   java_lang_ref_Reference::referent_offset    = member_offset(java_lang_ref_Reference::hc_referent_offset);
4406   java_lang_ref_Reference::queue_offset       = member_offset(java_lang_ref_Reference::hc_queue_offset);
4407   java_lang_ref_Reference::next_offset        = member_offset(java_lang_ref_Reference::hc_next_offset);
4408   java_lang_ref_Reference::discovered_offset  = member_offset(java_lang_ref_Reference::hc_discovered_offset);
4409 }
4410 
4411 #define DO_COMPUTE_OFFSETS(k) k::compute_offsets();
4412 
4413 // Compute non-hard-coded field offsets of all the classes in this file
4414 void JavaClasses::compute_offsets() {
4415   if (UseSharedSpaces) {
4416     assert(JvmtiExport::is_early_phase() && !(JvmtiExport::should_post_class_file_load_hook() &&
4417                                               JvmtiExport::has_early_class_hook_env()),
4418            "JavaClasses::compute_offsets() must be called in early JVMTI phase.");
4419     // None of the classes used by the rest of this function can be replaced by
4420     // JMVTI ClassFileLoadHook.
4421     // We are safe to use the archived offsets, which have already been restored
4422     // by JavaClasses::serialize_offsets, without computing the offsets again.
4423     return;
4424   }
4425 
4426   // We have already called the compute_offsets() of the
4427   // BASIC_JAVA_CLASSES_DO_PART1 classes (java_lang_String and java_lang_Class)
4428   // earlier inside SystemDictionary::resolve_well_known_classes()
4429   BASIC_JAVA_CLASSES_DO_PART2(DO_COMPUTE_OFFSETS);
4430 
4431   // generated interpreter code wants to know about the offsets we just computed:
4432   AbstractAssembler::update_delayed_values();
4433 }
4434 
4435 #if INCLUDE_CDS
4436 #define DO_SERIALIZE_OFFSETS(k) k::serialize_offsets(soc);
4437 
4438 void JavaClasses::serialize_offsets(SerializeClosure* soc) {
4439   BASIC_JAVA_CLASSES_DO(DO_SERIALIZE_OFFSETS);
4440 }
4441 #endif
4442 
4443 
4444 #ifndef PRODUCT
4445 
4446 // These functions exist to assert the validity of hard-coded field offsets to guard
4447 // against changes in the class files
4448 
4449 bool JavaClasses::check_offset(const char *klass_name, int hardcoded_offset, const char *field_name, const char* field_sig) {
4450   EXCEPTION_MARK;
4451   fieldDescriptor fd;
4452   TempNewSymbol klass_sym = SymbolTable::new_symbol(klass_name, CATCH);
4453   Klass* k = SystemDictionary::resolve_or_fail(klass_sym, true, CATCH);
4454   InstanceKlass* ik = InstanceKlass::cast(k);
4455   TempNewSymbol f_name = SymbolTable::new_symbol(field_name, CATCH);
4456   TempNewSymbol f_sig  = SymbolTable::new_symbol(field_sig, CATCH);
4457   if (!ik->find_local_field(f_name, f_sig, &fd)) {
4458     tty->print_cr("Nonstatic field %s.%s not found", klass_name, field_name);
4459     return false;
4460   }
4461   if (fd.is_static()) {
4462     tty->print_cr("Nonstatic field %s.%s appears to be static", klass_name, field_name);
4463     return false;
4464   }
4465   if (fd.offset() == hardcoded_offset ) {
4466     return true;
4467   } else {
4468     tty->print_cr("Offset of nonstatic field %s.%s is hardcoded as %d but should really be %d.",
4469                   klass_name, field_name, hardcoded_offset, fd.offset());
4470     return false;
4471   }
4472 }
4473 
4474 // Check the hard-coded field offsets of all the classes in this file
4475 
4476 void JavaClasses::check_offsets() {
4477   bool valid = true;
4478 
4479 #define CHECK_OFFSET(klass_name, cpp_klass_name, field_name, field_sig) \
4480   valid &= check_offset(klass_name, cpp_klass_name :: field_name ## _offset, #field_name, field_sig)
4481 
4482 #define CHECK_LONG_OFFSET(klass_name, cpp_klass_name, field_name, field_sig) \
4483   valid &= check_offset(klass_name, cpp_klass_name :: long_ ## field_name ## _offset, #field_name, field_sig)
4484 
4485   // Boxed primitive objects (java_lang_boxing_object)
4486 
4487   CHECK_OFFSET("java/lang/Boolean",   java_lang_boxing_object, value, "Z");
4488   CHECK_OFFSET("java/lang/Character", java_lang_boxing_object, value, "C");
4489   CHECK_OFFSET("java/lang/Float",     java_lang_boxing_object, value, "F");
4490   CHECK_LONG_OFFSET("java/lang/Double", java_lang_boxing_object, value, "D");
4491   CHECK_OFFSET("java/lang/Byte",      java_lang_boxing_object, value, "B");
4492   CHECK_OFFSET("java/lang/Short",     java_lang_boxing_object, value, "S");
4493   CHECK_OFFSET("java/lang/Integer",   java_lang_boxing_object, value, "I");
4494   CHECK_LONG_OFFSET("java/lang/Long", java_lang_boxing_object, value, "J");
4495 
4496   // java.lang.ref.Reference
4497 
4498   CHECK_OFFSET("java/lang/ref/Reference", java_lang_ref_Reference, referent, "Ljava/lang/Object;");
4499   CHECK_OFFSET("java/lang/ref/Reference", java_lang_ref_Reference, queue, "Ljava/lang/ref/ReferenceQueue;");
4500   CHECK_OFFSET("java/lang/ref/Reference", java_lang_ref_Reference, next, "Ljava/lang/ref/Reference;");
4501   // Fake field
4502   //CHECK_OFFSET("java/lang/ref/Reference", java_lang_ref_Reference, discovered, "Ljava/lang/ref/Reference;");
4503 
4504   if (!valid) vm_exit_during_initialization("Hard-coded field offset verification failed");
4505 }
4506 
4507 #endif // PRODUCT
4508 
4509 int InjectedField::compute_offset() {
4510   InstanceKlass* ik = InstanceKlass::cast(klass());
4511   for (AllFieldStream fs(ik); !fs.done(); fs.next()) {
4512     if (!may_be_java && !fs.access_flags().is_internal()) {
4513       // Only look at injected fields
4514       continue;
4515     }
4516     if (fs.name() == name() && fs.signature() == signature()) {
4517       return fs.offset();
4518     }
4519   }
4520   ResourceMark rm;
4521   tty->print_cr("Invalid layout of %s at %s/%s%s", ik->external_name(), name()->as_C_string(), signature()->as_C_string(), may_be_java ? " (may_be_java)" : "");
4522 #ifndef PRODUCT
4523   ik->print();
4524   tty->print_cr("all fields:");
4525   for (AllFieldStream fs(ik); !fs.done(); fs.next()) {
4526     tty->print_cr("  name: %s, sig: %s, flags: %08x", fs.name()->as_C_string(), fs.signature()->as_C_string(), fs.access_flags().as_int());
4527   }
4528 #endif //PRODUCT
4529   vm_exit_during_initialization("Invalid layout of well-known class: use -Xlog:class+load=info to see the origin of the problem class");
4530   return -1;
4531 }
4532 
4533 void javaClasses_init() {
4534   JavaClasses::compute_offsets();
4535   JavaClasses::check_offsets();
4536   FilteredFieldsMap::initialize();  // must be done after computing offsets.
4537 }