1 /*
   2  * Copyright (c) 1997, 2011, 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/javaClasses.hpp"
  27 #include "classfile/symbolTable.hpp"
  28 #include "classfile/vmSymbols.hpp"
  29 #include "code/debugInfo.hpp"
  30 #include "code/pcDesc.hpp"
  31 #include "interpreter/interpreter.hpp"
  32 #include "memory/oopFactory.hpp"
  33 #include "memory/resourceArea.hpp"
  34 #include "memory/universe.inline.hpp"
  35 #include "oops/instanceKlass.hpp"
  36 #include "oops/klass.hpp"
  37 #include "oops/klassOop.hpp"
  38 #include "oops/methodOop.hpp"
  39 #include "oops/symbol.hpp"
  40 #include "oops/typeArrayOop.hpp"
  41 #include "runtime/fieldDescriptor.hpp"
  42 #include "runtime/handles.inline.hpp"
  43 #include "runtime/interfaceSupport.hpp"
  44 #include "runtime/java.hpp"
  45 #include "runtime/javaCalls.hpp"
  46 #include "runtime/safepoint.hpp"
  47 #include "runtime/vframe.hpp"
  48 #include "utilities/preserveException.hpp"
  49 #ifdef TARGET_OS_FAMILY_linux
  50 # include "thread_linux.inline.hpp"
  51 #endif
  52 #ifdef TARGET_OS_FAMILY_solaris
  53 # include "thread_solaris.inline.hpp"
  54 #endif
  55 #ifdef TARGET_OS_FAMILY_windows
  56 # include "thread_windows.inline.hpp"
  57 #endif
  58 
  59 static bool find_field(instanceKlass* ik,
  60                        Symbol* name_symbol, Symbol* signature_symbol,
  61                        fieldDescriptor* fd,
  62                        bool allow_super = false) {
  63   if (allow_super)
  64     return ik->find_field(name_symbol, signature_symbol, fd) != NULL;
  65   else
  66     return ik->find_local_field(name_symbol, signature_symbol, fd);
  67 }
  68 
  69 static bool find_hacked_field(instanceKlass* ik,
  70                               Symbol* name_symbol, Symbol* signature_symbol,
  71                               fieldDescriptor* fd,
  72                               bool allow_super = false) {
  73   bool found = find_field(ik, name_symbol, signature_symbol, fd, allow_super);
  74   if (!found && AllowTransitionalJSR292) {
  75     Symbol* backup_sig = SystemDictionary::find_backup_signature(signature_symbol);
  76     if (backup_sig != NULL) {
  77       found = find_field(ik, name_symbol, backup_sig, fd, allow_super);
  78       if (TraceMethodHandles) {
  79         ResourceMark rm;
  80         tty->print_cr("MethodHandles: %s.%s: backup for %s => %s%s",
  81                       ik->name()->as_C_string(), name_symbol->as_C_string(),
  82                       signature_symbol->as_C_string(), backup_sig->as_C_string(),
  83                       (found ? "" : " (NOT FOUND)"));
  84       }
  85     }
  86   }
  87   return found;
  88 }
  89 #define find_field find_hacked_field  /* remove after AllowTransitionalJSR292 */
  90 
  91 // Helpful routine for computing field offsets at run time rather than hardcoding them
  92 static void
  93 compute_offset(int &dest_offset,
  94                klassOop klass_oop, Symbol* name_symbol, Symbol* signature_symbol,
  95                bool allow_super = false) {
  96   fieldDescriptor fd;
  97   instanceKlass* ik = instanceKlass::cast(klass_oop);
  98   if (!find_field(ik, name_symbol, signature_symbol, &fd, allow_super)) {
  99     ResourceMark rm;
 100     tty->print_cr("Invalid layout of %s at %s", ik->external_name(), name_symbol->as_C_string());
 101     fatal("Invalid layout of preloaded class");
 102   }
 103   dest_offset = fd.offset();
 104 }
 105 
 106 // Same as above but for "optional" offsets that might not be present in certain JDK versions
 107 static void
 108 compute_optional_offset(int& dest_offset,
 109                         klassOop klass_oop, Symbol* name_symbol, Symbol* signature_symbol,
 110                         bool allow_super = false) {
 111   fieldDescriptor fd;
 112   instanceKlass* ik = instanceKlass::cast(klass_oop);
 113   if (find_field(ik, name_symbol, signature_symbol, &fd, allow_super)) {
 114     dest_offset = fd.offset();
 115   }
 116 }
 117 
 118 
 119 Handle java_lang_String::basic_create(int length, bool tenured, TRAPS) {
 120   // Create the String object first, so there's a chance that the String
 121   // and the char array it points to end up in the same cache line.
 122   oop obj;
 123   if (tenured) {
 124     obj = instanceKlass::cast(SystemDictionary::String_klass())->allocate_permanent_instance(CHECK_NH);
 125   } else {
 126     obj = instanceKlass::cast(SystemDictionary::String_klass())->allocate_instance(CHECK_NH);
 127   }
 128 
 129   // Create the char array.  The String object must be handlized here
 130   // because GC can happen as a result of the allocation attempt.
 131   Handle h_obj(THREAD, obj);
 132   typeArrayOop buffer;
 133   if (tenured) {
 134     buffer = oopFactory::new_permanent_charArray(length, CHECK_NH);
 135   } else {
 136     buffer = oopFactory::new_charArray(length, CHECK_NH);
 137   }
 138 
 139   // Point the String at the char array
 140   obj = h_obj();
 141   set_value(obj, buffer);
 142   // No need to zero the offset, allocation zero'ed the entire String object
 143   assert(offset(obj) == 0, "initial String offset should be zero");
 144 //set_offset(obj, 0);
 145   set_count(obj, length);
 146 
 147   return h_obj;
 148 }
 149 
 150 Handle java_lang_String::basic_create_from_unicode(jchar* unicode, int length, bool tenured, TRAPS) {
 151   Handle h_obj = basic_create(length, tenured, CHECK_NH);
 152   typeArrayOop buffer = value(h_obj());
 153   for (int index = 0; index < length; index++) {
 154     buffer->char_at_put(index, unicode[index]);
 155   }
 156   return h_obj;
 157 }
 158 
 159 Handle java_lang_String::create_from_unicode(jchar* unicode, int length, TRAPS) {
 160   return basic_create_from_unicode(unicode, length, false, CHECK_NH);
 161 }
 162 
 163 Handle java_lang_String::create_tenured_from_unicode(jchar* unicode, int length, TRAPS) {
 164   return basic_create_from_unicode(unicode, length, true, CHECK_NH);
 165 }
 166 
 167 oop java_lang_String::create_oop_from_unicode(jchar* unicode, int length, TRAPS) {
 168   Handle h_obj = basic_create_from_unicode(unicode, length, false, CHECK_0);
 169   return h_obj();
 170 }
 171 
 172 Handle java_lang_String::create_from_str(const char* utf8_str, TRAPS) {
 173   if (utf8_str == NULL) {
 174     return Handle();
 175   }
 176   int length = UTF8::unicode_length(utf8_str);
 177   Handle h_obj = basic_create(length, false, CHECK_NH);
 178   if (length > 0) {
 179     UTF8::convert_to_unicode(utf8_str, value(h_obj())->char_at_addr(0), length);
 180   }
 181   return h_obj;
 182 }
 183 
 184 oop java_lang_String::create_oop_from_str(const char* utf8_str, TRAPS) {
 185   Handle h_obj = create_from_str(utf8_str, CHECK_0);
 186   return h_obj();
 187 }
 188 
 189 Handle java_lang_String::create_from_symbol(Symbol* symbol, TRAPS) {
 190   int length = UTF8::unicode_length((char*)symbol->bytes(), symbol->utf8_length());
 191   Handle h_obj = basic_create(length, false, CHECK_NH);
 192   if (length > 0) {
 193     UTF8::convert_to_unicode((char*)symbol->bytes(), value(h_obj())->char_at_addr(0), length);
 194   }
 195   return h_obj;
 196 }
 197 
 198 // Converts a C string to a Java String based on current encoding
 199 Handle java_lang_String::create_from_platform_dependent_str(const char* str, TRAPS) {
 200   assert(str != NULL, "bad arguments");
 201 
 202   typedef jstring (*to_java_string_fn_t)(JNIEnv*, const char *);
 203   static to_java_string_fn_t _to_java_string_fn = NULL;
 204 
 205   if (_to_java_string_fn == NULL) {
 206     void *lib_handle = os::native_java_library();
 207     _to_java_string_fn = CAST_TO_FN_PTR(to_java_string_fn_t, os::dll_lookup(lib_handle, "NewStringPlatform"));
 208     if (_to_java_string_fn == NULL) {
 209       fatal("NewStringPlatform missing");
 210     }
 211   }
 212 
 213   jstring js = NULL;
 214   { JavaThread* thread = (JavaThread*)THREAD;
 215     assert(thread->is_Java_thread(), "must be java thread");
 216     HandleMark hm(thread);
 217     ThreadToNativeFromVM ttn(thread);
 218     js = (_to_java_string_fn)(thread->jni_environment(), str);
 219   }
 220   return Handle(THREAD, JNIHandles::resolve(js));
 221 }
 222 
 223 // Converts a Java String to a native C string that can be used for
 224 // native OS calls.
 225 char* java_lang_String::as_platform_dependent_str(Handle java_string, TRAPS) {
 226 
 227   typedef char* (*to_platform_string_fn_t)(JNIEnv*, jstring, bool*);
 228   static to_platform_string_fn_t _to_platform_string_fn = NULL;
 229 
 230   if (_to_platform_string_fn == NULL) {
 231     void *lib_handle = os::native_java_library();
 232     _to_platform_string_fn = CAST_TO_FN_PTR(to_platform_string_fn_t, os::dll_lookup(lib_handle, "GetStringPlatformChars"));
 233     if (_to_platform_string_fn == NULL) {
 234       fatal("GetStringPlatformChars missing");
 235     }
 236   }
 237 
 238   char *native_platform_string;
 239   { JavaThread* thread = (JavaThread*)THREAD;
 240     assert(thread->is_Java_thread(), "must be java thread");
 241     JNIEnv *env = thread->jni_environment();
 242     jstring js = (jstring) JNIHandles::make_local(env, java_string());
 243     bool is_copy;
 244     HandleMark hm(thread);
 245     ThreadToNativeFromVM ttn(thread);
 246     native_platform_string = (_to_platform_string_fn)(env, js, &is_copy);
 247     assert(is_copy == JNI_TRUE, "is_copy value changed");
 248     JNIHandles::destroy_local(js);
 249   }
 250   return native_platform_string;
 251 }
 252 
 253 Handle java_lang_String::char_converter(Handle java_string, jchar from_char, jchar to_char, TRAPS) {
 254   oop          obj    = java_string();
 255   // Typical usage is to convert all '/' to '.' in string.
 256   typeArrayOop value  = java_lang_String::value(obj);
 257   int          offset = java_lang_String::offset(obj);
 258   int          length = java_lang_String::length(obj);
 259 
 260   // First check if any from_char exist
 261   int index; // Declared outside, used later
 262   for (index = 0; index < length; index++) {
 263     if (value->char_at(index + offset) == from_char) {
 264       break;
 265     }
 266   }
 267   if (index == length) {
 268     // No from_char, so do not copy.
 269     return java_string;
 270   }
 271 
 272   // Create new UNICODE buffer. Must handlize value because GC
 273   // may happen during String and char array creation.
 274   typeArrayHandle h_value(THREAD, value);
 275   Handle string = basic_create(length, false, CHECK_NH);
 276 
 277   typeArrayOop from_buffer = h_value();
 278   typeArrayOop to_buffer   = java_lang_String::value(string());
 279 
 280   // Copy contents
 281   for (index = 0; index < length; index++) {
 282     jchar c = from_buffer->char_at(index + offset);
 283     if (c == from_char) {
 284       c = to_char;
 285     }
 286     to_buffer->char_at_put(index, c);
 287   }
 288   return string;
 289 }
 290 
 291 jchar* java_lang_String::as_unicode_string(oop java_string, int& length) {
 292   typeArrayOop value  = java_lang_String::value(java_string);
 293   int          offset = java_lang_String::offset(java_string);
 294                length = java_lang_String::length(java_string);
 295 
 296   jchar* result = NEW_RESOURCE_ARRAY(jchar, length);
 297   for (int index = 0; index < length; index++) {
 298     result[index] = value->char_at(index + offset);
 299   }
 300   return result;
 301 }
 302 
 303 Symbol* java_lang_String::as_symbol(Handle java_string, TRAPS) {
 304   oop          obj    = java_string();
 305   typeArrayOop value  = java_lang_String::value(obj);
 306   int          offset = java_lang_String::offset(obj);
 307   int          length = java_lang_String::length(obj);
 308   jchar* base = (length == 0) ? NULL : value->char_at_addr(offset);
 309   Symbol* sym = SymbolTable::lookup_unicode(base, length, THREAD);
 310   return sym;
 311 }
 312 
 313 Symbol* java_lang_String::as_symbol_or_null(oop java_string) {
 314   typeArrayOop value  = java_lang_String::value(java_string);
 315   int          offset = java_lang_String::offset(java_string);
 316   int          length = java_lang_String::length(java_string);
 317   jchar* base = (length == 0) ? NULL : value->char_at_addr(offset);
 318   return SymbolTable::probe_unicode(base, length);
 319 }
 320 
 321 
 322 int java_lang_String::utf8_length(oop java_string) {
 323   typeArrayOop value  = java_lang_String::value(java_string);
 324   int          offset = java_lang_String::offset(java_string);
 325   int          length = java_lang_String::length(java_string);
 326   jchar* position = (length == 0) ? NULL : value->char_at_addr(offset);
 327   return UNICODE::utf8_length(position, length);
 328 }
 329 
 330 char* java_lang_String::as_utf8_string(oop java_string) {
 331   typeArrayOop value  = java_lang_String::value(java_string);
 332   int          offset = java_lang_String::offset(java_string);
 333   int          length = java_lang_String::length(java_string);
 334   jchar* position = (length == 0) ? NULL : value->char_at_addr(offset);
 335   return UNICODE::as_utf8(position, length);
 336 }
 337 
 338 char* java_lang_String::as_utf8_string(oop java_string, char* buf, int buflen) {
 339   typeArrayOop value  = java_lang_String::value(java_string);
 340   int          offset = java_lang_String::offset(java_string);
 341   int          length = java_lang_String::length(java_string);
 342   jchar* position = (length == 0) ? NULL : value->char_at_addr(offset);
 343   return UNICODE::as_utf8(position, length, buf, buflen);
 344 }
 345 
 346 char* java_lang_String::as_utf8_string(oop java_string, int start, int len) {
 347   typeArrayOop value  = java_lang_String::value(java_string);
 348   int          offset = java_lang_String::offset(java_string);
 349   int          length = java_lang_String::length(java_string);
 350   assert(start + len <= length, "just checking");
 351   jchar* position = value->char_at_addr(offset + start);
 352   return UNICODE::as_utf8(position, len);
 353 }
 354 
 355 bool java_lang_String::equals(oop java_string, jchar* chars, int len) {
 356   assert(SharedSkipVerify ||
 357          java_string->klass() == SystemDictionary::String_klass(),
 358          "must be java_string");
 359   typeArrayOop value  = java_lang_String::value(java_string);
 360   int          offset = java_lang_String::offset(java_string);
 361   int          length = java_lang_String::length(java_string);
 362   if (length != len) {
 363     return false;
 364   }
 365   for (int i = 0; i < len; i++) {
 366     if (value->char_at(i + offset) != chars[i]) {
 367       return false;
 368     }
 369   }
 370   return true;
 371 }
 372 
 373 void java_lang_String::print(Handle java_string, outputStream* st) {
 374   oop          obj    = java_string();
 375   assert(obj->klass() == SystemDictionary::String_klass(), "must be java_string");
 376   typeArrayOop value  = java_lang_String::value(obj);
 377   int          offset = java_lang_String::offset(obj);
 378   int          length = java_lang_String::length(obj);
 379 
 380   int end = MIN2(length, 100);
 381   if (value == NULL) {
 382     // This can happen if, e.g., printing a String
 383     // object before its initializer has been called
 384     st->print_cr("NULL");
 385   } else {
 386     st->print("\"");
 387     for (int index = 0; index < length; index++) {
 388       st->print("%c", value->char_at(index + offset));
 389     }
 390     st->print("\"");
 391   }
 392 }
 393 
 394 
 395 oop java_lang_Class::create_mirror(KlassHandle k, TRAPS) {
 396   assert(k->java_mirror() == NULL, "should only assign mirror once");
 397   // Use this moment of initialization to cache modifier_flags also,
 398   // to support Class.getModifiers().  Instance classes recalculate
 399   // the cached flags after the class file is parsed, but before the
 400   // class is put into the system dictionary.
 401   int computed_modifiers = k->compute_modifier_flags(CHECK_0);
 402   k->set_modifier_flags(computed_modifiers);
 403   if (SystemDictionary::Class_klass_loaded()) {
 404     // Allocate mirror (java.lang.Class instance)
 405     Handle mirror = instanceKlass::cast(SystemDictionary::Class_klass())->allocate_permanent_instance(CHECK_0);
 406     // Setup indirections
 407     mirror->obj_field_put(klass_offset,  k());
 408     k->set_java_mirror(mirror());
 409     // It might also have a component mirror.  This mirror must already exist.
 410     if (k->oop_is_javaArray()) {
 411       Handle comp_mirror;
 412       if (k->oop_is_typeArray()) {
 413         BasicType type = typeArrayKlass::cast(k->as_klassOop())->element_type();
 414         comp_mirror = Universe::java_mirror(type);
 415         assert(comp_mirror.not_null(), "must have primitive mirror");
 416       } else if (k->oop_is_objArray()) {
 417         klassOop element_klass = objArrayKlass::cast(k->as_klassOop())->element_klass();
 418         if (element_klass != NULL
 419             && (Klass::cast(element_klass)->oop_is_instance() ||
 420                 Klass::cast(element_klass)->oop_is_javaArray())) {
 421           comp_mirror = Klass::cast(element_klass)->java_mirror();
 422           assert(comp_mirror.not_null(), "must have element mirror");
 423         }
 424         // else some object array internal to the VM, like systemObjArrayKlassObj
 425       }
 426       if (comp_mirror.not_null()) {
 427         // Two-way link between the array klass and its component mirror:
 428         arrayKlass::cast(k->as_klassOop())->set_component_mirror(comp_mirror());
 429         set_array_klass(comp_mirror(), k->as_klassOop());
 430       }
 431     }
 432     return mirror();
 433   } else {
 434     return NULL;
 435   }
 436 }
 437 
 438 
 439 oop java_lang_Class::create_basic_type_mirror(const char* basic_type_name, BasicType type, TRAPS) {
 440   // This should be improved by adding a field at the Java level or by
 441   // introducing a new VM klass (see comment in ClassFileParser)
 442   oop java_class = instanceKlass::cast(SystemDictionary::Class_klass())->allocate_permanent_instance(CHECK_0);
 443   if (type != T_VOID) {
 444     klassOop aklass = Universe::typeArrayKlassObj(type);
 445     assert(aklass != NULL, "correct bootstrap");
 446     set_array_klass(java_class, aklass);
 447   }
 448   return java_class;
 449 }
 450 
 451 
 452 klassOop java_lang_Class::as_klassOop(oop java_class) {
 453   //%note memory_2
 454   klassOop k = klassOop(java_class->obj_field(klass_offset));
 455   assert(k == NULL || k->is_klass(), "type check");
 456   return k;
 457 }
 458 
 459 
 460 void java_lang_Class::print_signature(oop java_class, outputStream* st) {
 461   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
 462   Symbol* name = NULL;
 463   bool is_instance = false;
 464   if (is_primitive(java_class)) {
 465     name = vmSymbols::type_signature(primitive_type(java_class));
 466   } else {
 467     klassOop k = as_klassOop(java_class);
 468     is_instance = Klass::cast(k)->oop_is_instance();
 469     name = Klass::cast(k)->name();
 470   }
 471   if (name == NULL) {
 472     st->print("<null>");
 473     return;
 474   }
 475   if (is_instance)  st->print("L");
 476   st->write((char*) name->base(), (int) name->utf8_length());
 477   if (is_instance)  st->print(";");
 478 }
 479 
 480 Symbol* java_lang_Class::as_signature(oop java_class, bool intern_if_not_found, TRAPS) {
 481   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
 482   Symbol* name;
 483   if (is_primitive(java_class)) {
 484     name = vmSymbols::type_signature(primitive_type(java_class));
 485     // Because this can create a new symbol, the caller has to decrement
 486     // the refcount, so make adjustment here and below for symbols returned
 487     // that are not created or incremented due to a successful lookup.
 488     name->increment_refcount();
 489   } else {
 490     klassOop k = as_klassOop(java_class);
 491     if (!Klass::cast(k)->oop_is_instance()) {
 492       name = Klass::cast(k)->name();
 493       name->increment_refcount();
 494     } else {
 495       ResourceMark rm;
 496       const char* sigstr = Klass::cast(k)->signature_name();
 497       int         siglen = (int) strlen(sigstr);
 498       if (!intern_if_not_found) {
 499         name = SymbolTable::probe(sigstr, siglen);
 500       } else {
 501         name = SymbolTable::new_symbol(sigstr, siglen, THREAD);
 502       }
 503     }
 504   }
 505   return name;
 506 }
 507 
 508 
 509 klassOop java_lang_Class::array_klass(oop java_class) {
 510   klassOop k = klassOop(java_class->obj_field(array_klass_offset));
 511   assert(k == NULL || k->is_klass() && Klass::cast(k)->oop_is_javaArray(), "should be array klass");
 512   return k;
 513 }
 514 
 515 
 516 void java_lang_Class::set_array_klass(oop java_class, klassOop klass) {
 517   assert(klass->is_klass() && Klass::cast(klass)->oop_is_javaArray(), "should be array klass");
 518   java_class->obj_field_put(array_klass_offset, klass);
 519 }
 520 
 521 
 522 methodOop java_lang_Class::resolved_constructor(oop java_class) {
 523   oop constructor = java_class->obj_field(resolved_constructor_offset);
 524   assert(constructor == NULL || constructor->is_method(), "should be method");
 525   return methodOop(constructor);
 526 }
 527 
 528 
 529 void java_lang_Class::set_resolved_constructor(oop java_class, methodOop constructor) {
 530   assert(constructor->is_method(), "should be method");
 531   java_class->obj_field_put(resolved_constructor_offset, constructor);
 532 }
 533 
 534 
 535 bool java_lang_Class::is_primitive(oop java_class) {
 536   // should assert:
 537   //assert(java_lang_Class::is_instance(java_class), "must be a Class object");
 538   klassOop k = klassOop(java_class->obj_field(klass_offset));
 539   return k == NULL;
 540 }
 541 
 542 
 543 BasicType java_lang_Class::primitive_type(oop java_class) {
 544   assert(java_lang_Class::is_primitive(java_class), "just checking");
 545   klassOop ak = klassOop(java_class->obj_field(array_klass_offset));
 546   BasicType type = T_VOID;
 547   if (ak != NULL) {
 548     // Note: create_basic_type_mirror above initializes ak to a non-null value.
 549     type = arrayKlass::cast(ak)->element_type();
 550   } else {
 551     assert(java_class == Universe::void_mirror(), "only valid non-array primitive");
 552   }
 553   assert(Universe::java_mirror(type) == java_class, "must be consistent");
 554   return type;
 555 }
 556 
 557 BasicType java_lang_Class::as_BasicType(oop java_class, klassOop* reference_klass) {
 558   assert(java_lang_Class::is_instance(java_class), "must be a Class object");
 559   if (is_primitive(java_class)) {
 560     if (reference_klass != NULL)
 561       (*reference_klass) = NULL;
 562     return primitive_type(java_class);
 563   } else {
 564     if (reference_klass != NULL)
 565       (*reference_klass) = as_klassOop(java_class);
 566     return T_OBJECT;
 567   }
 568 }
 569 
 570 
 571 oop java_lang_Class::primitive_mirror(BasicType t) {
 572   oop mirror = Universe::java_mirror(t);
 573   assert(mirror != NULL && mirror->is_a(SystemDictionary::Class_klass()), "must be a Class");
 574   assert(java_lang_Class::is_primitive(mirror), "must be primitive");
 575   return mirror;
 576 }
 577 
 578 bool java_lang_Class::offsets_computed = false;
 579 int  java_lang_Class::classRedefinedCount_offset = -1;
 580 int  java_lang_Class::parallelCapable_offset = -1;
 581 
 582 void java_lang_Class::compute_offsets() {
 583   assert(!offsets_computed, "offsets should be initialized only once");
 584   offsets_computed = true;
 585 
 586   klassOop k = SystemDictionary::Class_klass();
 587   // The classRedefinedCount field is only present starting in 1.5,
 588   // so don't go fatal.
 589   compute_optional_offset(classRedefinedCount_offset,
 590     k, vmSymbols::classRedefinedCount_name(), vmSymbols::int_signature());
 591 
 592   // The field indicating parallelCapable (parallelLockMap) is only present starting in 7,
 593   klassOop k1 = SystemDictionary::ClassLoader_klass();
 594   compute_optional_offset(parallelCapable_offset,
 595     k1, vmSymbols::parallelCapable_name(), vmSymbols::concurrenthashmap_signature());
 596 }
 597 
 598 // For class loader classes, parallelCapable defined
 599 // based on non-null field
 600 // Written to by java.lang.ClassLoader, vm only reads this field, doesn't set it
 601 bool java_lang_Class::parallelCapable(oop class_loader) {
 602   if (!JDK_Version::is_gte_jdk17x_version()
 603      || parallelCapable_offset == -1) {
 604      // Default for backward compatibility is false
 605      return false;
 606   }
 607   return (class_loader->obj_field(parallelCapable_offset) != NULL);
 608 }
 609 
 610 int java_lang_Class::classRedefinedCount(oop the_class_mirror) {
 611   if (!JDK_Version::is_gte_jdk15x_version()
 612       || classRedefinedCount_offset == -1) {
 613     // The classRedefinedCount field is only present starting in 1.5.
 614     // If we don't have an offset for it then just return -1 as a marker.
 615     return -1;
 616   }
 617 
 618   return the_class_mirror->int_field(classRedefinedCount_offset);
 619 }
 620 
 621 void java_lang_Class::set_classRedefinedCount(oop the_class_mirror, int value) {
 622   if (!JDK_Version::is_gte_jdk15x_version()
 623       || classRedefinedCount_offset == -1) {
 624     // The classRedefinedCount field is only present starting in 1.5.
 625     // If we don't have an offset for it then nothing to set.
 626     return;
 627   }
 628 
 629   the_class_mirror->int_field_put(classRedefinedCount_offset, value);
 630 }
 631 
 632 
 633 // Note: JDK1.1 and before had a privateInfo_offset field which was used for the
 634 //       platform thread structure, and a eetop offset which was used for thread
 635 //       local storage (and unused by the HotSpot VM). In JDK1.2 the two structures
 636 //       merged, so in the HotSpot VM we just use the eetop field for the thread
 637 //       instead of the privateInfo_offset.
 638 //
 639 // Note: The stackSize field is only present starting in 1.4.
 640 
 641 int java_lang_Thread::_name_offset = 0;
 642 int java_lang_Thread::_group_offset = 0;
 643 int java_lang_Thread::_contextClassLoader_offset = 0;
 644 int java_lang_Thread::_inheritedAccessControlContext_offset = 0;
 645 int java_lang_Thread::_priority_offset = 0;
 646 int java_lang_Thread::_eetop_offset = 0;
 647 int java_lang_Thread::_daemon_offset = 0;
 648 int java_lang_Thread::_stillborn_offset = 0;
 649 int java_lang_Thread::_stackSize_offset = 0;
 650 int java_lang_Thread::_tid_offset = 0;
 651 int java_lang_Thread::_thread_status_offset = 0;
 652 int java_lang_Thread::_park_blocker_offset = 0;
 653 int java_lang_Thread::_park_event_offset = 0 ;
 654 
 655 
 656 void java_lang_Thread::compute_offsets() {
 657   assert(_group_offset == 0, "offsets should be initialized only once");
 658 
 659   klassOop k = SystemDictionary::Thread_klass();
 660   compute_offset(_name_offset,      k, vmSymbols::name_name(),      vmSymbols::char_array_signature());
 661   compute_offset(_group_offset,     k, vmSymbols::group_name(),     vmSymbols::threadgroup_signature());
 662   compute_offset(_contextClassLoader_offset, k, vmSymbols::contextClassLoader_name(), vmSymbols::classloader_signature());
 663   compute_offset(_inheritedAccessControlContext_offset, k, vmSymbols::inheritedAccessControlContext_name(), vmSymbols::accesscontrolcontext_signature());
 664   compute_offset(_priority_offset,  k, vmSymbols::priority_name(),  vmSymbols::int_signature());
 665   compute_offset(_daemon_offset,    k, vmSymbols::daemon_name(),    vmSymbols::bool_signature());
 666   compute_offset(_eetop_offset,     k, vmSymbols::eetop_name(),     vmSymbols::long_signature());
 667   compute_offset(_stillborn_offset, k, vmSymbols::stillborn_name(), vmSymbols::bool_signature());
 668   // The stackSize field is only present starting in 1.4, so don't go fatal.
 669   compute_optional_offset(_stackSize_offset, k, vmSymbols::stackSize_name(), vmSymbols::long_signature());
 670   // The tid and thread_status fields are only present starting in 1.5, so don't go fatal.
 671   compute_optional_offset(_tid_offset, k, vmSymbols::thread_id_name(), vmSymbols::long_signature());
 672   compute_optional_offset(_thread_status_offset, k, vmSymbols::thread_status_name(), vmSymbols::int_signature());
 673   // The parkBlocker field is only present starting in 1.6, so don't go fatal.
 674   compute_optional_offset(_park_blocker_offset, k, vmSymbols::park_blocker_name(), vmSymbols::object_signature());
 675   compute_optional_offset(_park_event_offset, k, vmSymbols::park_event_name(),
 676  vmSymbols::long_signature());
 677 }
 678 
 679 
 680 JavaThread* java_lang_Thread::thread(oop java_thread) {
 681   return (JavaThread*)java_thread->address_field(_eetop_offset);
 682 }
 683 
 684 
 685 void java_lang_Thread::set_thread(oop java_thread, JavaThread* thread) {
 686   java_thread->address_field_put(_eetop_offset, (address)thread);
 687 }
 688 
 689 
 690 typeArrayOop java_lang_Thread::name(oop java_thread) {
 691   oop name = java_thread->obj_field(_name_offset);
 692   assert(name == NULL || (name->is_typeArray() && typeArrayKlass::cast(name->klass())->element_type() == T_CHAR), "just checking");
 693   return typeArrayOop(name);
 694 }
 695 
 696 
 697 void java_lang_Thread::set_name(oop java_thread, typeArrayOop name) {
 698   assert(java_thread->obj_field(_name_offset) == NULL, "name should be NULL");
 699   java_thread->obj_field_put(_name_offset, name);
 700 }
 701 
 702 
 703 ThreadPriority java_lang_Thread::priority(oop java_thread) {
 704   return (ThreadPriority)java_thread->int_field(_priority_offset);
 705 }
 706 
 707 
 708 void java_lang_Thread::set_priority(oop java_thread, ThreadPriority priority) {
 709   java_thread->int_field_put(_priority_offset, priority);
 710 }
 711 
 712 
 713 oop java_lang_Thread::threadGroup(oop java_thread) {
 714   return java_thread->obj_field(_group_offset);
 715 }
 716 
 717 
 718 bool java_lang_Thread::is_stillborn(oop java_thread) {
 719   return java_thread->bool_field(_stillborn_offset) != 0;
 720 }
 721 
 722 
 723 // We never have reason to turn the stillborn bit off
 724 void java_lang_Thread::set_stillborn(oop java_thread) {
 725   java_thread->bool_field_put(_stillborn_offset, true);
 726 }
 727 
 728 
 729 bool java_lang_Thread::is_alive(oop java_thread) {
 730   JavaThread* thr = java_lang_Thread::thread(java_thread);
 731   return (thr != NULL);
 732 }
 733 
 734 
 735 bool java_lang_Thread::is_daemon(oop java_thread) {
 736   return java_thread->bool_field(_daemon_offset) != 0;
 737 }
 738 
 739 
 740 void java_lang_Thread::set_daemon(oop java_thread) {
 741   java_thread->bool_field_put(_daemon_offset, true);
 742 }
 743 
 744 oop java_lang_Thread::context_class_loader(oop java_thread) {
 745   return java_thread->obj_field(_contextClassLoader_offset);
 746 }
 747 
 748 oop java_lang_Thread::inherited_access_control_context(oop java_thread) {
 749   return java_thread->obj_field(_inheritedAccessControlContext_offset);
 750 }
 751 
 752 
 753 jlong java_lang_Thread::stackSize(oop java_thread) {
 754   // The stackSize field is only present starting in 1.4
 755   if (_stackSize_offset > 0) {
 756     assert(JDK_Version::is_gte_jdk14x_version(), "sanity check");
 757     return java_thread->long_field(_stackSize_offset);
 758   } else {
 759     return 0;
 760   }
 761 }
 762 
 763 // Write the thread status value to threadStatus field in java.lang.Thread java class.
 764 void java_lang_Thread::set_thread_status(oop java_thread,
 765                                          java_lang_Thread::ThreadStatus status) {
 766   assert(JavaThread::current()->thread_state() == _thread_in_vm, "Java Thread is not running in vm");
 767   // The threadStatus is only present starting in 1.5
 768   if (_thread_status_offset > 0) {
 769     java_thread->int_field_put(_thread_status_offset, status);
 770   }
 771 }
 772 
 773 // Read thread status value from threadStatus field in java.lang.Thread java class.
 774 java_lang_Thread::ThreadStatus java_lang_Thread::get_thread_status(oop java_thread) {
 775   assert(Thread::current()->is_VM_thread() ||
 776          JavaThread::current()->thread_state() == _thread_in_vm,
 777          "Java Thread is not running in vm");
 778   // The threadStatus is only present starting in 1.5
 779   if (_thread_status_offset > 0) {
 780     return (java_lang_Thread::ThreadStatus)java_thread->int_field(_thread_status_offset);
 781   } else {
 782     // All we can easily figure out is if it is alive, but that is
 783     // enough info for a valid unknown status.
 784     // These aren't restricted to valid set ThreadStatus values, so
 785     // use JVMTI values and cast.
 786     JavaThread* thr = java_lang_Thread::thread(java_thread);
 787     if (thr == NULL) {
 788       // the thread hasn't run yet or is in the process of exiting
 789       return NEW;
 790     }
 791     return (java_lang_Thread::ThreadStatus)JVMTI_THREAD_STATE_ALIVE;
 792   }
 793 }
 794 
 795 
 796 jlong java_lang_Thread::thread_id(oop java_thread) {
 797   // The thread ID field is only present starting in 1.5
 798   if (_tid_offset > 0) {
 799     return java_thread->long_field(_tid_offset);
 800   } else {
 801     return 0;
 802   }
 803 }
 804 
 805 oop java_lang_Thread::park_blocker(oop java_thread) {
 806   assert(JDK_Version::current().supports_thread_park_blocker() &&
 807          _park_blocker_offset != 0, "Must support parkBlocker field");
 808 
 809   if (_park_blocker_offset > 0) {
 810     return java_thread->obj_field(_park_blocker_offset);
 811   }
 812 
 813   return NULL;
 814 }
 815 
 816 jlong java_lang_Thread::park_event(oop java_thread) {
 817   if (_park_event_offset > 0) {
 818     return java_thread->long_field(_park_event_offset);
 819   }
 820   return 0;
 821 }
 822 
 823 bool java_lang_Thread::set_park_event(oop java_thread, jlong ptr) {
 824   if (_park_event_offset > 0) {
 825     java_thread->long_field_put(_park_event_offset, ptr);
 826     return true;
 827   }
 828   return false;
 829 }
 830 
 831 
 832 const char* java_lang_Thread::thread_status_name(oop java_thread) {
 833   assert(JDK_Version::is_gte_jdk15x_version() && _thread_status_offset != 0, "Must have thread status");
 834   ThreadStatus status = (java_lang_Thread::ThreadStatus)java_thread->int_field(_thread_status_offset);
 835   switch (status) {
 836     case NEW                      : return "NEW";
 837     case RUNNABLE                 : return "RUNNABLE";
 838     case SLEEPING                 : return "TIMED_WAITING (sleeping)";
 839     case IN_OBJECT_WAIT           : return "WAITING (on object monitor)";
 840     case IN_OBJECT_WAIT_TIMED     : return "TIMED_WAITING (on object monitor)";
 841     case PARKED                   : return "WAITING (parking)";
 842     case PARKED_TIMED             : return "TIMED_WAITING (parking)";
 843     case BLOCKED_ON_MONITOR_ENTER : return "BLOCKED (on object monitor)";
 844     case TERMINATED               : return "TERMINATED";
 845     default                       : return "UNKNOWN";
 846   };
 847 }
 848 int java_lang_ThreadGroup::_parent_offset = 0;
 849 int java_lang_ThreadGroup::_name_offset = 0;
 850 int java_lang_ThreadGroup::_threads_offset = 0;
 851 int java_lang_ThreadGroup::_groups_offset = 0;
 852 int java_lang_ThreadGroup::_maxPriority_offset = 0;
 853 int java_lang_ThreadGroup::_destroyed_offset = 0;
 854 int java_lang_ThreadGroup::_daemon_offset = 0;
 855 int java_lang_ThreadGroup::_vmAllowSuspension_offset = 0;
 856 int java_lang_ThreadGroup::_nthreads_offset = 0;
 857 int java_lang_ThreadGroup::_ngroups_offset = 0;
 858 
 859 oop  java_lang_ThreadGroup::parent(oop java_thread_group) {
 860   assert(java_thread_group->is_oop(), "thread group must be oop");
 861   return java_thread_group->obj_field(_parent_offset);
 862 }
 863 
 864 // ("name as oop" accessor is not necessary)
 865 
 866 typeArrayOop java_lang_ThreadGroup::name(oop java_thread_group) {
 867   oop name = java_thread_group->obj_field(_name_offset);
 868   // ThreadGroup.name can be null
 869   return name == NULL ? (typeArrayOop)NULL : java_lang_String::value(name);
 870 }
 871 
 872 int java_lang_ThreadGroup::nthreads(oop java_thread_group) {
 873   assert(java_thread_group->is_oop(), "thread group must be oop");
 874   return java_thread_group->int_field(_nthreads_offset);
 875 }
 876 
 877 objArrayOop java_lang_ThreadGroup::threads(oop java_thread_group) {
 878   oop threads = java_thread_group->obj_field(_threads_offset);
 879   assert(threads != NULL, "threadgroups should have threads");
 880   assert(threads->is_objArray(), "just checking"); // Todo: Add better type checking code
 881   return objArrayOop(threads);
 882 }
 883 
 884 int java_lang_ThreadGroup::ngroups(oop java_thread_group) {
 885   assert(java_thread_group->is_oop(), "thread group must be oop");
 886   return java_thread_group->int_field(_ngroups_offset);
 887 }
 888 
 889 objArrayOop java_lang_ThreadGroup::groups(oop java_thread_group) {
 890   oop groups = java_thread_group->obj_field(_groups_offset);
 891   assert(groups == NULL || groups->is_objArray(), "just checking"); // Todo: Add better type checking code
 892   return objArrayOop(groups);
 893 }
 894 
 895 ThreadPriority java_lang_ThreadGroup::maxPriority(oop java_thread_group) {
 896   assert(java_thread_group->is_oop(), "thread group must be oop");
 897   return (ThreadPriority) java_thread_group->int_field(_maxPriority_offset);
 898 }
 899 
 900 bool java_lang_ThreadGroup::is_destroyed(oop java_thread_group) {
 901   assert(java_thread_group->is_oop(), "thread group must be oop");
 902   return java_thread_group->bool_field(_destroyed_offset) != 0;
 903 }
 904 
 905 bool java_lang_ThreadGroup::is_daemon(oop java_thread_group) {
 906   assert(java_thread_group->is_oop(), "thread group must be oop");
 907   return java_thread_group->bool_field(_daemon_offset) != 0;
 908 }
 909 
 910 bool java_lang_ThreadGroup::is_vmAllowSuspension(oop java_thread_group) {
 911   assert(java_thread_group->is_oop(), "thread group must be oop");
 912   return java_thread_group->bool_field(_vmAllowSuspension_offset) != 0;
 913 }
 914 
 915 void java_lang_ThreadGroup::compute_offsets() {
 916   assert(_parent_offset == 0, "offsets should be initialized only once");
 917 
 918   klassOop k = SystemDictionary::ThreadGroup_klass();
 919 
 920   compute_offset(_parent_offset,      k, vmSymbols::parent_name(),      vmSymbols::threadgroup_signature());
 921   compute_offset(_name_offset,        k, vmSymbols::name_name(),        vmSymbols::string_signature());
 922   compute_offset(_threads_offset,     k, vmSymbols::threads_name(),     vmSymbols::thread_array_signature());
 923   compute_offset(_groups_offset,      k, vmSymbols::groups_name(),      vmSymbols::threadgroup_array_signature());
 924   compute_offset(_maxPriority_offset, k, vmSymbols::maxPriority_name(), vmSymbols::int_signature());
 925   compute_offset(_destroyed_offset,   k, vmSymbols::destroyed_name(),   vmSymbols::bool_signature());
 926   compute_offset(_daemon_offset,      k, vmSymbols::daemon_name(),      vmSymbols::bool_signature());
 927   compute_offset(_vmAllowSuspension_offset, k, vmSymbols::vmAllowSuspension_name(), vmSymbols::bool_signature());
 928   compute_offset(_nthreads_offset,    k, vmSymbols::nthreads_name(),    vmSymbols::int_signature());
 929   compute_offset(_ngroups_offset,     k, vmSymbols::ngroups_name(),     vmSymbols::int_signature());
 930 }
 931 
 932 oop java_lang_Throwable::backtrace(oop throwable) {
 933   return throwable->obj_field_acquire(backtrace_offset);
 934 }
 935 
 936 
 937 void java_lang_Throwable::set_backtrace(oop throwable, oop value) {
 938   throwable->release_obj_field_put(backtrace_offset, value);
 939 }
 940 
 941 
 942 oop java_lang_Throwable::message(oop throwable) {
 943   return throwable->obj_field(detailMessage_offset);
 944 }
 945 
 946 
 947 oop java_lang_Throwable::message(Handle throwable) {
 948   return throwable->obj_field(detailMessage_offset);
 949 }
 950 
 951 
 952 void java_lang_Throwable::set_message(oop throwable, oop value) {
 953   throwable->obj_field_put(detailMessage_offset, value);
 954 }
 955 
 956 
 957 void java_lang_Throwable::clear_stacktrace(oop throwable) {
 958   assert(JDK_Version::is_gte_jdk14x_version(), "should only be called in >= 1.4");
 959   throwable->obj_field_put(stackTrace_offset, NULL);
 960 }
 961 
 962 
 963 void java_lang_Throwable::print(oop throwable, outputStream* st) {
 964   ResourceMark rm;
 965   klassOop k = throwable->klass();
 966   assert(k != NULL, "just checking");
 967   st->print("%s", instanceKlass::cast(k)->external_name());
 968   oop msg = message(throwable);
 969   if (msg != NULL) {
 970     st->print(": %s", java_lang_String::as_utf8_string(msg));
 971   }
 972 }
 973 
 974 
 975 void java_lang_Throwable::print(Handle throwable, outputStream* st) {
 976   ResourceMark rm;
 977   klassOop k = throwable->klass();
 978   assert(k != NULL, "just checking");
 979   st->print("%s", instanceKlass::cast(k)->external_name());
 980   oop msg = message(throwable);
 981   if (msg != NULL) {
 982     st->print(": %s", java_lang_String::as_utf8_string(msg));
 983   }
 984 }
 985 
 986 // Print stack trace element to resource allocated buffer
 987 char* java_lang_Throwable::print_stack_element_to_buffer(methodOop method, int bci) {
 988   // Get strings and string lengths
 989   instanceKlass* klass = instanceKlass::cast(method->method_holder());
 990   const char* klass_name  = klass->external_name();
 991   int buf_len = (int)strlen(klass_name);
 992   char* source_file_name;
 993   if (klass->source_file_name() == NULL) {
 994     source_file_name = NULL;
 995   } else {
 996     source_file_name = klass->source_file_name()->as_C_string();
 997     buf_len += (int)strlen(source_file_name);
 998   }
 999   char* method_name = method->name()->as_C_string();
1000   buf_len += (int)strlen(method_name);
1001 
1002   // Allocate temporary buffer with extra space for formatting and line number
1003   char* buf = NEW_RESOURCE_ARRAY(char, buf_len + 64);
1004 
1005   // Print stack trace line in buffer
1006   sprintf(buf, "\tat %s.%s", klass_name, method_name);
1007   if (method->is_native()) {
1008     strcat(buf, "(Native Method)");
1009   } else {
1010     int line_number = method->line_number_from_bci(bci);
1011     if (source_file_name != NULL && (line_number != -1)) {
1012       // Sourcename and linenumber
1013       sprintf(buf + (int)strlen(buf), "(%s:%d)", source_file_name, line_number);
1014     } else if (source_file_name != NULL) {
1015       // Just sourcename
1016       sprintf(buf + (int)strlen(buf), "(%s)", source_file_name);
1017     } else {
1018       // Neither soucename and linenumber
1019       sprintf(buf + (int)strlen(buf), "(Unknown Source)");
1020     }
1021     nmethod* nm = method->code();
1022     if (WizardMode && nm != NULL) {
1023       sprintf(buf + (int)strlen(buf), "(nmethod " PTR_FORMAT ")", (intptr_t)nm);
1024     }
1025   }
1026 
1027   return buf;
1028 }
1029 
1030 
1031 void java_lang_Throwable::print_stack_element(Handle stream, methodOop method, int bci) {
1032   ResourceMark rm;
1033   char* buf = print_stack_element_to_buffer(method, bci);
1034   print_to_stream(stream, buf);
1035 }
1036 
1037 void java_lang_Throwable::print_stack_element(outputStream *st, methodOop method, int bci) {
1038   ResourceMark rm;
1039   char* buf = print_stack_element_to_buffer(method, bci);
1040   st->print_cr("%s", buf);
1041 }
1042 
1043 void java_lang_Throwable::print_to_stream(Handle stream, const char* str) {
1044   if (stream.is_null()) {
1045     tty->print_cr("%s", str);
1046   } else {
1047     EXCEPTION_MARK;
1048     JavaValue result(T_VOID);
1049     Handle arg (THREAD, oopFactory::new_charArray(str, THREAD));
1050     if (!HAS_PENDING_EXCEPTION) {
1051       JavaCalls::call_virtual(&result,
1052                               stream,
1053                               KlassHandle(THREAD, stream->klass()),
1054                               vmSymbols::println_name(),
1055                               vmSymbols::char_array_void_signature(),
1056                               arg,
1057                               THREAD);
1058     }
1059     // Ignore any exceptions. we are in the middle of exception handling. Same as classic VM.
1060     if (HAS_PENDING_EXCEPTION) CLEAR_PENDING_EXCEPTION;
1061   }
1062 
1063 }
1064 
1065 
1066 const char* java_lang_Throwable::no_stack_trace_message() {
1067   return "\t<<no stack trace available>>";
1068 }
1069 
1070 
1071 // Currently used only for exceptions occurring during startup
1072 void java_lang_Throwable::print_stack_trace(oop throwable, outputStream* st) {
1073   Thread *THREAD = Thread::current();
1074   Handle h_throwable(THREAD, throwable);
1075   while (h_throwable.not_null()) {
1076     objArrayHandle result (THREAD, objArrayOop(backtrace(h_throwable())));
1077     if (result.is_null()) {
1078       st->print_cr(no_stack_trace_message());
1079       return;
1080     }
1081 
1082     while (result.not_null()) {
1083       objArrayHandle methods (THREAD,
1084                               objArrayOop(result->obj_at(trace_methods_offset)));
1085       typeArrayHandle bcis (THREAD,
1086                             typeArrayOop(result->obj_at(trace_bcis_offset)));
1087 
1088       if (methods.is_null() || bcis.is_null()) {
1089         st->print_cr(no_stack_trace_message());
1090         return;
1091       }
1092 
1093       int length = methods()->length();
1094       for (int index = 0; index < length; index++) {
1095         methodOop method = methodOop(methods()->obj_at(index));
1096         if (method == NULL) goto handle_cause;
1097         int bci = bcis->ushort_at(index);
1098         print_stack_element(st, method, bci);
1099       }
1100       result = objArrayHandle(THREAD, objArrayOop(result->obj_at(trace_next_offset)));
1101     }
1102   handle_cause:
1103     {
1104       EXCEPTION_MARK;
1105       JavaValue result(T_OBJECT);
1106       JavaCalls::call_virtual(&result,
1107                               h_throwable,
1108                               KlassHandle(THREAD, h_throwable->klass()),
1109                               vmSymbols::getCause_name(),
1110                               vmSymbols::void_throwable_signature(),
1111                               THREAD);
1112       // Ignore any exceptions. we are in the middle of exception handling. Same as classic VM.
1113       if (HAS_PENDING_EXCEPTION) {
1114         CLEAR_PENDING_EXCEPTION;
1115         h_throwable = Handle();
1116       } else {
1117         h_throwable = Handle(THREAD, (oop) result.get_jobject());
1118         if (h_throwable.not_null()) {
1119           st->print("Caused by: ");
1120           print(h_throwable, st);
1121           st->cr();
1122         }
1123       }
1124     }
1125   }
1126 }
1127 
1128 
1129 void java_lang_Throwable::print_stack_trace(oop throwable, oop print_stream) {
1130   // Note: this is no longer used in Merlin, but we support it for compatibility.
1131   Thread *thread = Thread::current();
1132   Handle stream(thread, print_stream);
1133   objArrayHandle result (thread, objArrayOop(backtrace(throwable)));
1134   if (result.is_null()) {
1135     print_to_stream(stream, no_stack_trace_message());
1136     return;
1137   }
1138 
1139   while (result.not_null()) {
1140     objArrayHandle methods (thread,
1141                             objArrayOop(result->obj_at(trace_methods_offset)));
1142     typeArrayHandle bcis (thread,
1143                           typeArrayOop(result->obj_at(trace_bcis_offset)));
1144 
1145     if (methods.is_null() || bcis.is_null()) {
1146       print_to_stream(stream, no_stack_trace_message());
1147       return;
1148     }
1149 
1150     int length = methods()->length();
1151     for (int index = 0; index < length; index++) {
1152       methodOop method = methodOop(methods()->obj_at(index));
1153       if (method == NULL) return;
1154       int bci = bcis->ushort_at(index);
1155       print_stack_element(stream, method, bci);
1156     }
1157     result = objArrayHandle(thread, objArrayOop(result->obj_at(trace_next_offset)));
1158   }
1159 }
1160 
1161 // This class provides a simple wrapper over the internal structure of
1162 // exception backtrace to insulate users of the backtrace from needing
1163 // to know what it looks like.
1164 class BacktraceBuilder: public StackObj {
1165  private:
1166   Handle          _backtrace;
1167   objArrayOop     _head;
1168   objArrayOop     _methods;
1169   typeArrayOop    _bcis;
1170   int             _index;
1171   bool            _dirty;
1172   No_Safepoint_Verifier _nsv;
1173 
1174  public:
1175 
1176   enum {
1177     trace_methods_offset = java_lang_Throwable::trace_methods_offset,
1178     trace_bcis_offset    = java_lang_Throwable::trace_bcis_offset,
1179     trace_next_offset    = java_lang_Throwable::trace_next_offset,
1180     trace_size           = java_lang_Throwable::trace_size,
1181     trace_chunk_size     = java_lang_Throwable::trace_chunk_size
1182   };
1183 
1184   // constructor for new backtrace
1185   BacktraceBuilder(TRAPS): _methods(NULL), _bcis(NULL), _head(NULL), _dirty(false) {
1186     expand(CHECK);
1187     _backtrace = _head;
1188     _index = 0;
1189   }
1190 
1191   void flush() {
1192     // The following appears to have been an optimization to save from
1193     // doing a barrier for each individual store into the _methods array,
1194     // but rather to do it for the entire array after the series of writes.
1195     // That optimization seems to have been lost when compressed oops was
1196     // implemented. However, the extra card-marks below was left in place,
1197     // but is now redundant because the individual stores into the
1198     // _methods array already execute the barrier code. CR 6918185 has
1199     // been filed so the original code may be restored by deferring the
1200     // barriers until after the entire sequence of stores, thus re-enabling
1201     // the intent of the original optimization. In the meantime the redundant
1202     // card mark below is now disabled.
1203     if (_dirty && _methods != NULL) {
1204 #if 0
1205       BarrierSet* bs = Universe::heap()->barrier_set();
1206       assert(bs->has_write_ref_array_opt(), "Barrier set must have ref array opt");
1207       bs->write_ref_array((HeapWord*)_methods->base(), _methods->length());
1208 #endif
1209       _dirty = false;
1210     }
1211   }
1212 
1213   void expand(TRAPS) {
1214     flush();
1215 
1216     objArrayHandle old_head(THREAD, _head);
1217     Pause_No_Safepoint_Verifier pnsv(&_nsv);
1218 
1219     objArrayOop head = oopFactory::new_objectArray(trace_size, CHECK);
1220     objArrayHandle new_head(THREAD, head);
1221 
1222     objArrayOop methods = oopFactory::new_objectArray(trace_chunk_size, CHECK);
1223     objArrayHandle new_methods(THREAD, methods);
1224 
1225     typeArrayOop bcis = oopFactory::new_shortArray(trace_chunk_size, CHECK);
1226     typeArrayHandle new_bcis(THREAD, bcis);
1227 
1228     if (!old_head.is_null()) {
1229       old_head->obj_at_put(trace_next_offset, new_head());
1230     }
1231     new_head->obj_at_put(trace_methods_offset, new_methods());
1232     new_head->obj_at_put(trace_bcis_offset, new_bcis());
1233 
1234     _head    = new_head();
1235     _methods = new_methods();
1236     _bcis    = new_bcis();
1237     _index = 0;
1238   }
1239 
1240   oop backtrace() {
1241     flush();
1242     return _backtrace();
1243   }
1244 
1245   inline void push(methodOop method, short bci, TRAPS) {
1246     if (_index >= trace_chunk_size) {
1247       methodHandle mhandle(THREAD, method);
1248       expand(CHECK);
1249       method = mhandle();
1250     }
1251 
1252     _methods->obj_at_put(_index, method);
1253     _bcis->ushort_at_put(_index, bci);
1254     _index++;
1255     _dirty = true;
1256   }
1257 
1258   methodOop current_method() {
1259     assert(_index >= 0 && _index < trace_chunk_size, "out of range");
1260     return methodOop(_methods->obj_at(_index));
1261   }
1262 
1263   jushort current_bci() {
1264     assert(_index >= 0 && _index < trace_chunk_size, "out of range");
1265     return _bcis->ushort_at(_index);
1266   }
1267 };
1268 
1269 
1270 void java_lang_Throwable::fill_in_stack_trace(Handle throwable, TRAPS) {
1271   if (!StackTraceInThrowable) return;
1272   ResourceMark rm(THREAD);
1273 
1274   // Start out by clearing the backtrace for this object, in case the VM
1275   // runs out of memory while allocating the stack trace
1276   set_backtrace(throwable(), NULL);
1277   if (JDK_Version::is_gte_jdk14x_version()) {
1278     // New since 1.4, clear lazily constructed Java level stacktrace if
1279     // refilling occurs
1280     clear_stacktrace(throwable());
1281   }
1282 
1283   int max_depth = MaxJavaStackTraceDepth;
1284   JavaThread* thread = (JavaThread*)THREAD;
1285   BacktraceBuilder bt(CHECK);
1286 
1287   // Instead of using vframe directly, this version of fill_in_stack_trace
1288   // basically handles everything by hand. This significantly improved the
1289   // speed of this method call up to 28.5% on Solaris sparc. 27.1% on Windows.
1290   // See bug 6333838 for  more details.
1291   // The "ASSERT" here is to verify this method generates the exactly same stack
1292   // trace as utilizing vframe.
1293 #ifdef ASSERT
1294   vframeStream st(thread);
1295   methodHandle st_method(THREAD, st.method());
1296 #endif
1297   int total_count = 0;
1298   RegisterMap map(thread, false);
1299   int decode_offset = 0;
1300   nmethod* nm = NULL;
1301   bool skip_fillInStackTrace_check = false;
1302   bool skip_throwableInit_check = false;
1303 
1304   for (frame fr = thread->last_frame(); max_depth != total_count;) {
1305     methodOop method = NULL;
1306     int bci = 0;
1307 
1308     // Compiled java method case.
1309     if (decode_offset != 0) {
1310       DebugInfoReadStream stream(nm, decode_offset);
1311       decode_offset = stream.read_int();
1312       method = (methodOop)nm->oop_at(stream.read_int());
1313       bci = stream.read_bci();
1314     } else {
1315       if (fr.is_first_frame()) break;
1316       address pc = fr.pc();
1317       if (fr.is_interpreted_frame()) {
1318         intptr_t bcx = fr.interpreter_frame_bcx();
1319         method = fr.interpreter_frame_method();
1320         bci =  fr.is_bci(bcx) ? bcx : method->bci_from((address)bcx);
1321         fr = fr.sender(&map);
1322       } else {
1323         CodeBlob* cb = fr.cb();
1324         // HMMM QQQ might be nice to have frame return nm as NULL if cb is non-NULL
1325         // but non nmethod
1326         fr = fr.sender(&map);
1327         if (cb == NULL || !cb->is_nmethod()) {
1328           continue;
1329         }
1330         nm = (nmethod*)cb;
1331         if (nm->method()->is_native()) {
1332           method = nm->method();
1333           bci = 0;
1334         } else {
1335           PcDesc* pd = nm->pc_desc_at(pc);
1336           decode_offset = pd->scope_decode_offset();
1337           // if decode_offset is not equal to 0, it will execute the
1338           // "compiled java method case" at the beginning of the loop.
1339           continue;
1340         }
1341       }
1342     }
1343 #ifdef ASSERT
1344   assert(st_method() == method && st.bci() == bci,
1345          "Wrong stack trace");
1346   st.next();
1347   // vframeStream::method isn't GC-safe so store off a copy
1348   // of the methodOop in case we GC.
1349   if (!st.at_end()) {
1350     st_method = st.method();
1351   }
1352 #endif
1353     if (!skip_fillInStackTrace_check) {
1354       // check "fillInStackTrace" only once, so we negate the flag
1355       // after the first time check.
1356       skip_fillInStackTrace_check = true;
1357       if (method->name() == vmSymbols::fillInStackTrace_name()) {
1358         continue;
1359       }
1360     }
1361     // skip <init> methods of the exceptions klass. If there is <init> methods
1362     // that belongs to a superclass of the exception  we are going to skipping
1363     // them in stack trace. This is simlar to classic VM.
1364     if (!skip_throwableInit_check) {
1365       if (method->name() == vmSymbols::object_initializer_name() &&
1366           throwable->is_a(method->method_holder())) {
1367         continue;
1368       } else {
1369         // if no "Throwable.init()" method found, we stop checking it next time.
1370         skip_throwableInit_check = true;
1371       }
1372     }
1373     bt.push(method, bci, CHECK);
1374     total_count++;
1375   }
1376 
1377   // Put completed stack trace into throwable object
1378   set_backtrace(throwable(), bt.backtrace());
1379 }
1380 
1381 void java_lang_Throwable::fill_in_stack_trace(Handle throwable) {
1382   // No-op if stack trace is disabled
1383   if (!StackTraceInThrowable) {
1384     return;
1385   }
1386 
1387   // Disable stack traces for some preallocated out of memory errors
1388   if (!Universe::should_fill_in_stack_trace(throwable)) {
1389     return;
1390   }
1391 
1392   PRESERVE_EXCEPTION_MARK;
1393 
1394   JavaThread* thread = JavaThread::active();
1395   fill_in_stack_trace(throwable, thread);
1396   // ignore exceptions thrown during stack trace filling
1397   CLEAR_PENDING_EXCEPTION;
1398 }
1399 
1400 void java_lang_Throwable::allocate_backtrace(Handle throwable, TRAPS) {
1401   // Allocate stack trace - backtrace is created but not filled in
1402 
1403   // No-op if stack trace is disabled
1404   if (!StackTraceInThrowable) return;
1405 
1406   objArrayOop h_oop = oopFactory::new_objectArray(trace_size, CHECK);
1407   objArrayHandle backtrace  (THREAD, h_oop);
1408   objArrayOop m_oop = oopFactory::new_objectArray(trace_chunk_size, CHECK);
1409   objArrayHandle methods (THREAD, m_oop);
1410   typeArrayOop b = oopFactory::new_shortArray(trace_chunk_size, CHECK);
1411   typeArrayHandle bcis(THREAD, b);
1412 
1413   // backtrace has space for one chunk (next is NULL)
1414   backtrace->obj_at_put(trace_methods_offset, methods());
1415   backtrace->obj_at_put(trace_bcis_offset, bcis());
1416   set_backtrace(throwable(), backtrace());
1417 }
1418 
1419 
1420 void java_lang_Throwable::fill_in_stack_trace_of_preallocated_backtrace(Handle throwable) {
1421   // Fill in stack trace into preallocated backtrace (no GC)
1422 
1423   // No-op if stack trace is disabled
1424   if (!StackTraceInThrowable) return;
1425 
1426   assert(throwable->is_a(SystemDictionary::Throwable_klass()), "sanity check");
1427 
1428   oop backtrace = java_lang_Throwable::backtrace(throwable());
1429   assert(backtrace != NULL, "backtrace not preallocated");
1430 
1431   oop m = objArrayOop(backtrace)->obj_at(trace_methods_offset);
1432   objArrayOop methods = objArrayOop(m);
1433   assert(methods != NULL && methods->length() > 0, "method array not preallocated");
1434 
1435   oop b = objArrayOop(backtrace)->obj_at(trace_bcis_offset);
1436   typeArrayOop bcis = typeArrayOop(b);
1437   assert(bcis != NULL, "bci array not preallocated");
1438 
1439   assert(methods->length() == bcis->length(), "method and bci arrays should match");
1440 
1441   JavaThread* thread = JavaThread::current();
1442   ResourceMark rm(thread);
1443   vframeStream st(thread);
1444 
1445   // Unlike fill_in_stack_trace we do not skip fillInStackTrace or throwable init
1446   // methods as preallocated errors aren't created by "java" code.
1447 
1448   // fill in as much stack trace as possible
1449   int max_chunks = MIN2(methods->length(), (int)MaxJavaStackTraceDepth);
1450   int chunk_count = 0;
1451 
1452   for (;!st.at_end(); st.next()) {
1453     // add element
1454     bcis->ushort_at_put(chunk_count, st.bci());
1455     methods->obj_at_put(chunk_count, st.method());
1456 
1457     chunk_count++;
1458 
1459     // Bail-out for deep stacks
1460     if (chunk_count >= max_chunks) break;
1461   }
1462 }
1463 
1464 
1465 int java_lang_Throwable::get_stack_trace_depth(oop throwable, TRAPS) {
1466   if (throwable == NULL) {
1467     THROW_0(vmSymbols::java_lang_NullPointerException());
1468   }
1469   objArrayOop chunk = objArrayOop(backtrace(throwable));
1470   int depth = 0;
1471   if (chunk != NULL) {
1472     // Iterate over chunks and count full ones
1473     while (true) {
1474       objArrayOop next = objArrayOop(chunk->obj_at(trace_next_offset));
1475       if (next == NULL) break;
1476       depth += trace_chunk_size;
1477       chunk = next;
1478     }
1479     assert(chunk != NULL && chunk->obj_at(trace_next_offset) == NULL, "sanity check");
1480     // Count element in remaining partial chunk
1481     objArrayOop methods = objArrayOop(chunk->obj_at(trace_methods_offset));
1482     typeArrayOop bcis = typeArrayOop(chunk->obj_at(trace_bcis_offset));
1483     assert(methods != NULL && bcis != NULL, "sanity check");
1484     for (int i = 0; i < methods->length(); i++) {
1485       if (methods->obj_at(i) == NULL) break;
1486       depth++;
1487     }
1488   }
1489   return depth;
1490 }
1491 
1492 
1493 oop java_lang_Throwable::get_stack_trace_element(oop throwable, int index, TRAPS) {
1494   if (throwable == NULL) {
1495     THROW_0(vmSymbols::java_lang_NullPointerException());
1496   }
1497   if (index < 0) {
1498     THROW_(vmSymbols::java_lang_IndexOutOfBoundsException(), NULL);
1499   }
1500   // Compute how many chunks to skip and index into actual chunk
1501   objArrayOop chunk = objArrayOop(backtrace(throwable));
1502   int skip_chunks = index / trace_chunk_size;
1503   int chunk_index = index % trace_chunk_size;
1504   while (chunk != NULL && skip_chunks > 0) {
1505     chunk = objArrayOop(chunk->obj_at(trace_next_offset));
1506         skip_chunks--;
1507   }
1508   if (chunk == NULL) {
1509     THROW_(vmSymbols::java_lang_IndexOutOfBoundsException(), NULL);
1510   }
1511   // Get method,bci from chunk
1512   objArrayOop methods = objArrayOop(chunk->obj_at(trace_methods_offset));
1513   typeArrayOop bcis = typeArrayOop(chunk->obj_at(trace_bcis_offset));
1514   assert(methods != NULL && bcis != NULL, "sanity check");
1515   methodHandle method(THREAD, methodOop(methods->obj_at(chunk_index)));
1516   int bci = bcis->ushort_at(chunk_index);
1517   // Chunk can be partial full
1518   if (method.is_null()) {
1519     THROW_(vmSymbols::java_lang_IndexOutOfBoundsException(), NULL);
1520   }
1521 
1522   oop element = java_lang_StackTraceElement::create(method, bci, CHECK_0);
1523   return element;
1524 }
1525 
1526 oop java_lang_StackTraceElement::create(methodHandle method, int bci, TRAPS) {
1527   // SystemDictionary::stackTraceElement_klass() will be null for pre-1.4 JDKs
1528   assert(JDK_Version::is_gte_jdk14x_version(), "should only be called in >= 1.4");
1529 
1530   // Allocate java.lang.StackTraceElement instance
1531   klassOop k = SystemDictionary::StackTraceElement_klass();
1532   assert(k != NULL, "must be loaded in 1.4+");
1533   instanceKlassHandle ik (THREAD, k);
1534   if (ik->should_be_initialized()) {
1535     ik->initialize(CHECK_0);
1536   }
1537 
1538   Handle element = ik->allocate_instance_handle(CHECK_0);
1539   // Fill in class name
1540   ResourceMark rm(THREAD);
1541   const char* str = instanceKlass::cast(method->method_holder())->external_name();
1542   oop classname = StringTable::intern((char*) str, CHECK_0);
1543   java_lang_StackTraceElement::set_declaringClass(element(), classname);
1544   // Fill in method name
1545   oop methodname = StringTable::intern(method->name(), CHECK_0);
1546   java_lang_StackTraceElement::set_methodName(element(), methodname);
1547   // Fill in source file name
1548   Symbol* source = instanceKlass::cast(method->method_holder())->source_file_name();
1549   oop filename = StringTable::intern(source, CHECK_0);
1550   java_lang_StackTraceElement::set_fileName(element(), filename);
1551   // File in source line number
1552   int line_number;
1553   if (method->is_native()) {
1554     // Negative value different from -1 below, enabling Java code in
1555     // class java.lang.StackTraceElement to distinguish "native" from
1556     // "no LineNumberTable".
1557     line_number = -2;
1558   } else {
1559     // Returns -1 if no LineNumberTable, and otherwise actual line number
1560     line_number = method->line_number_from_bci(bci);
1561   }
1562   java_lang_StackTraceElement::set_lineNumber(element(), line_number);
1563 
1564   return element();
1565 }
1566 
1567 
1568 void java_lang_reflect_AccessibleObject::compute_offsets() {
1569   klassOop k = SystemDictionary::reflect_AccessibleObject_klass();
1570   compute_offset(override_offset, k, vmSymbols::override_name(), vmSymbols::bool_signature());
1571 }
1572 
1573 jboolean java_lang_reflect_AccessibleObject::override(oop reflect) {
1574   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1575   return (jboolean) reflect->bool_field(override_offset);
1576 }
1577 
1578 void java_lang_reflect_AccessibleObject::set_override(oop reflect, jboolean value) {
1579   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1580   reflect->bool_field_put(override_offset, (int) value);
1581 }
1582 
1583 void java_lang_reflect_Method::compute_offsets() {
1584   klassOop k = SystemDictionary::reflect_Method_klass();
1585   compute_offset(clazz_offset,          k, vmSymbols::clazz_name(),          vmSymbols::class_signature());
1586   compute_offset(name_offset,           k, vmSymbols::name_name(),           vmSymbols::string_signature());
1587   compute_offset(returnType_offset,     k, vmSymbols::returnType_name(),     vmSymbols::class_signature());
1588   compute_offset(parameterTypes_offset, k, vmSymbols::parameterTypes_name(), vmSymbols::class_array_signature());
1589   compute_offset(exceptionTypes_offset, k, vmSymbols::exceptionTypes_name(), vmSymbols::class_array_signature());
1590   compute_offset(slot_offset,           k, vmSymbols::slot_name(),           vmSymbols::int_signature());
1591   compute_offset(modifiers_offset,      k, vmSymbols::modifiers_name(),      vmSymbols::int_signature());
1592   // The generic signature and annotations fields are only present in 1.5
1593   signature_offset = -1;
1594   annotations_offset = -1;
1595   parameter_annotations_offset = -1;
1596   annotation_default_offset = -1;
1597   compute_optional_offset(signature_offset,             k, vmSymbols::signature_name(),             vmSymbols::string_signature());
1598   compute_optional_offset(annotations_offset,           k, vmSymbols::annotations_name(),           vmSymbols::byte_array_signature());
1599   compute_optional_offset(parameter_annotations_offset, k, vmSymbols::parameter_annotations_name(), vmSymbols::byte_array_signature());
1600   compute_optional_offset(annotation_default_offset,    k, vmSymbols::annotation_default_name(),    vmSymbols::byte_array_signature());
1601 }
1602 
1603 Handle java_lang_reflect_Method::create(TRAPS) {
1604   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1605   klassOop klass = SystemDictionary::reflect_Method_klass();
1606   // This class is eagerly initialized during VM initialization, since we keep a refence
1607   // to one of the methods
1608   assert(instanceKlass::cast(klass)->is_initialized(), "must be initialized");
1609   return instanceKlass::cast(klass)->allocate_instance_handle(CHECK_NH);
1610 }
1611 
1612 oop java_lang_reflect_Method::clazz(oop reflect) {
1613   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1614   return reflect->obj_field(clazz_offset);
1615 }
1616 
1617 void java_lang_reflect_Method::set_clazz(oop reflect, oop value) {
1618   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1619    reflect->obj_field_put(clazz_offset, value);
1620 }
1621 
1622 int java_lang_reflect_Method::slot(oop reflect) {
1623   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1624   return reflect->int_field(slot_offset);
1625 }
1626 
1627 void java_lang_reflect_Method::set_slot(oop reflect, int value) {
1628   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1629   reflect->int_field_put(slot_offset, value);
1630 }
1631 
1632 oop java_lang_reflect_Method::name(oop method) {
1633   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1634   return method->obj_field(name_offset);
1635 }
1636 
1637 void java_lang_reflect_Method::set_name(oop method, oop value) {
1638   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1639   method->obj_field_put(name_offset, value);
1640 }
1641 
1642 oop java_lang_reflect_Method::return_type(oop method) {
1643   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1644   return method->obj_field(returnType_offset);
1645 }
1646 
1647 void java_lang_reflect_Method::set_return_type(oop method, oop value) {
1648   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1649   method->obj_field_put(returnType_offset, value);
1650 }
1651 
1652 oop java_lang_reflect_Method::parameter_types(oop method) {
1653   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1654   return method->obj_field(parameterTypes_offset);
1655 }
1656 
1657 void java_lang_reflect_Method::set_parameter_types(oop method, oop value) {
1658   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1659   method->obj_field_put(parameterTypes_offset, value);
1660 }
1661 
1662 oop java_lang_reflect_Method::exception_types(oop method) {
1663   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1664   return method->obj_field(exceptionTypes_offset);
1665 }
1666 
1667 void java_lang_reflect_Method::set_exception_types(oop method, oop value) {
1668   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1669   method->obj_field_put(exceptionTypes_offset, value);
1670 }
1671 
1672 int java_lang_reflect_Method::modifiers(oop method) {
1673   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1674   return method->int_field(modifiers_offset);
1675 }
1676 
1677 void java_lang_reflect_Method::set_modifiers(oop method, int value) {
1678   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1679   method->int_field_put(modifiers_offset, value);
1680 }
1681 
1682 bool java_lang_reflect_Method::has_signature_field() {
1683   return (signature_offset >= 0);
1684 }
1685 
1686 oop java_lang_reflect_Method::signature(oop method) {
1687   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1688   assert(has_signature_field(), "signature field must be present");
1689   return method->obj_field(signature_offset);
1690 }
1691 
1692 void java_lang_reflect_Method::set_signature(oop method, oop value) {
1693   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1694   assert(has_signature_field(), "signature field must be present");
1695   method->obj_field_put(signature_offset, value);
1696 }
1697 
1698 bool java_lang_reflect_Method::has_annotations_field() {
1699   return (annotations_offset >= 0);
1700 }
1701 
1702 oop java_lang_reflect_Method::annotations(oop method) {
1703   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1704   assert(has_annotations_field(), "annotations field must be present");
1705   return method->obj_field(annotations_offset);
1706 }
1707 
1708 void java_lang_reflect_Method::set_annotations(oop method, oop value) {
1709   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1710   assert(has_annotations_field(), "annotations field must be present");
1711   method->obj_field_put(annotations_offset, value);
1712 }
1713 
1714 bool java_lang_reflect_Method::has_parameter_annotations_field() {
1715   return (parameter_annotations_offset >= 0);
1716 }
1717 
1718 oop java_lang_reflect_Method::parameter_annotations(oop method) {
1719   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1720   assert(has_parameter_annotations_field(), "parameter annotations field must be present");
1721   return method->obj_field(parameter_annotations_offset);
1722 }
1723 
1724 void java_lang_reflect_Method::set_parameter_annotations(oop method, oop value) {
1725   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1726   assert(has_parameter_annotations_field(), "parameter annotations field must be present");
1727   method->obj_field_put(parameter_annotations_offset, value);
1728 }
1729 
1730 bool java_lang_reflect_Method::has_annotation_default_field() {
1731   return (annotation_default_offset >= 0);
1732 }
1733 
1734 oop java_lang_reflect_Method::annotation_default(oop method) {
1735   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1736   assert(has_annotation_default_field(), "annotation default field must be present");
1737   return method->obj_field(annotation_default_offset);
1738 }
1739 
1740 void java_lang_reflect_Method::set_annotation_default(oop method, oop value) {
1741   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1742   assert(has_annotation_default_field(), "annotation default field must be present");
1743   method->obj_field_put(annotation_default_offset, value);
1744 }
1745 
1746 void java_lang_reflect_Constructor::compute_offsets() {
1747   klassOop k = SystemDictionary::reflect_Constructor_klass();
1748   compute_offset(clazz_offset,          k, vmSymbols::clazz_name(),          vmSymbols::class_signature());
1749   compute_offset(parameterTypes_offset, k, vmSymbols::parameterTypes_name(), vmSymbols::class_array_signature());
1750   compute_offset(exceptionTypes_offset, k, vmSymbols::exceptionTypes_name(), vmSymbols::class_array_signature());
1751   compute_offset(slot_offset,           k, vmSymbols::slot_name(),           vmSymbols::int_signature());
1752   compute_offset(modifiers_offset,      k, vmSymbols::modifiers_name(),      vmSymbols::int_signature());
1753   // The generic signature and annotations fields are only present in 1.5
1754   signature_offset = -1;
1755   annotations_offset = -1;
1756   parameter_annotations_offset = -1;
1757   compute_optional_offset(signature_offset,             k, vmSymbols::signature_name(),             vmSymbols::string_signature());
1758   compute_optional_offset(annotations_offset,           k, vmSymbols::annotations_name(),           vmSymbols::byte_array_signature());
1759   compute_optional_offset(parameter_annotations_offset, k, vmSymbols::parameter_annotations_name(), vmSymbols::byte_array_signature());
1760 }
1761 
1762 Handle java_lang_reflect_Constructor::create(TRAPS) {
1763   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1764   Symbol* name = vmSymbols::java_lang_reflect_Constructor();
1765   klassOop k = SystemDictionary::resolve_or_fail(name, true, CHECK_NH);
1766   instanceKlassHandle klass (THREAD, k);
1767   // Ensure it is initialized
1768   klass->initialize(CHECK_NH);
1769   return klass->allocate_instance_handle(CHECK_NH);
1770 }
1771 
1772 oop java_lang_reflect_Constructor::clazz(oop reflect) {
1773   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1774   return reflect->obj_field(clazz_offset);
1775 }
1776 
1777 void java_lang_reflect_Constructor::set_clazz(oop reflect, oop value) {
1778   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1779    reflect->obj_field_put(clazz_offset, value);
1780 }
1781 
1782 oop java_lang_reflect_Constructor::parameter_types(oop constructor) {
1783   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1784   return constructor->obj_field(parameterTypes_offset);
1785 }
1786 
1787 void java_lang_reflect_Constructor::set_parameter_types(oop constructor, oop value) {
1788   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1789   constructor->obj_field_put(parameterTypes_offset, value);
1790 }
1791 
1792 oop java_lang_reflect_Constructor::exception_types(oop constructor) {
1793   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1794   return constructor->obj_field(exceptionTypes_offset);
1795 }
1796 
1797 void java_lang_reflect_Constructor::set_exception_types(oop constructor, oop value) {
1798   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1799   constructor->obj_field_put(exceptionTypes_offset, value);
1800 }
1801 
1802 int java_lang_reflect_Constructor::slot(oop reflect) {
1803   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1804   return reflect->int_field(slot_offset);
1805 }
1806 
1807 void java_lang_reflect_Constructor::set_slot(oop reflect, int value) {
1808   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1809   reflect->int_field_put(slot_offset, value);
1810 }
1811 
1812 int java_lang_reflect_Constructor::modifiers(oop constructor) {
1813   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1814   return constructor->int_field(modifiers_offset);
1815 }
1816 
1817 void java_lang_reflect_Constructor::set_modifiers(oop constructor, int value) {
1818   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1819   constructor->int_field_put(modifiers_offset, value);
1820 }
1821 
1822 bool java_lang_reflect_Constructor::has_signature_field() {
1823   return (signature_offset >= 0);
1824 }
1825 
1826 oop java_lang_reflect_Constructor::signature(oop constructor) {
1827   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1828   assert(has_signature_field(), "signature field must be present");
1829   return constructor->obj_field(signature_offset);
1830 }
1831 
1832 void java_lang_reflect_Constructor::set_signature(oop constructor, oop value) {
1833   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1834   assert(has_signature_field(), "signature field must be present");
1835   constructor->obj_field_put(signature_offset, value);
1836 }
1837 
1838 bool java_lang_reflect_Constructor::has_annotations_field() {
1839   return (annotations_offset >= 0);
1840 }
1841 
1842 oop java_lang_reflect_Constructor::annotations(oop constructor) {
1843   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1844   assert(has_annotations_field(), "annotations field must be present");
1845   return constructor->obj_field(annotations_offset);
1846 }
1847 
1848 void java_lang_reflect_Constructor::set_annotations(oop constructor, oop value) {
1849   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1850   assert(has_annotations_field(), "annotations field must be present");
1851   constructor->obj_field_put(annotations_offset, value);
1852 }
1853 
1854 bool java_lang_reflect_Constructor::has_parameter_annotations_field() {
1855   return (parameter_annotations_offset >= 0);
1856 }
1857 
1858 oop java_lang_reflect_Constructor::parameter_annotations(oop method) {
1859   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1860   assert(has_parameter_annotations_field(), "parameter annotations field must be present");
1861   return method->obj_field(parameter_annotations_offset);
1862 }
1863 
1864 void java_lang_reflect_Constructor::set_parameter_annotations(oop method, oop value) {
1865   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1866   assert(has_parameter_annotations_field(), "parameter annotations field must be present");
1867   method->obj_field_put(parameter_annotations_offset, value);
1868 }
1869 
1870 void java_lang_reflect_Field::compute_offsets() {
1871   klassOop k = SystemDictionary::reflect_Field_klass();
1872   compute_offset(clazz_offset,     k, vmSymbols::clazz_name(),     vmSymbols::class_signature());
1873   compute_offset(name_offset,      k, vmSymbols::name_name(),      vmSymbols::string_signature());
1874   compute_offset(type_offset,      k, vmSymbols::type_name(),      vmSymbols::class_signature());
1875   compute_offset(slot_offset,      k, vmSymbols::slot_name(),      vmSymbols::int_signature());
1876   compute_offset(modifiers_offset, k, vmSymbols::modifiers_name(), vmSymbols::int_signature());
1877   // The generic signature and annotations fields are only present in 1.5
1878   signature_offset = -1;
1879   annotations_offset = -1;
1880   compute_optional_offset(signature_offset, k, vmSymbols::signature_name(), vmSymbols::string_signature());
1881   compute_optional_offset(annotations_offset,  k, vmSymbols::annotations_name(),  vmSymbols::byte_array_signature());
1882 }
1883 
1884 Handle java_lang_reflect_Field::create(TRAPS) {
1885   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1886   Symbol* name = vmSymbols::java_lang_reflect_Field();
1887   klassOop k = SystemDictionary::resolve_or_fail(name, true, CHECK_NH);
1888   instanceKlassHandle klass (THREAD, k);
1889   // Ensure it is initialized
1890   klass->initialize(CHECK_NH);
1891   return klass->allocate_instance_handle(CHECK_NH);
1892 }
1893 
1894 oop java_lang_reflect_Field::clazz(oop reflect) {
1895   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1896   return reflect->obj_field(clazz_offset);
1897 }
1898 
1899 void java_lang_reflect_Field::set_clazz(oop reflect, oop value) {
1900   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1901    reflect->obj_field_put(clazz_offset, value);
1902 }
1903 
1904 oop java_lang_reflect_Field::name(oop field) {
1905   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1906   return field->obj_field(name_offset);
1907 }
1908 
1909 void java_lang_reflect_Field::set_name(oop field, oop value) {
1910   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1911   field->obj_field_put(name_offset, value);
1912 }
1913 
1914 oop java_lang_reflect_Field::type(oop field) {
1915   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1916   return field->obj_field(type_offset);
1917 }
1918 
1919 void java_lang_reflect_Field::set_type(oop field, oop value) {
1920   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1921   field->obj_field_put(type_offset, value);
1922 }
1923 
1924 int java_lang_reflect_Field::slot(oop reflect) {
1925   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1926   return reflect->int_field(slot_offset);
1927 }
1928 
1929 void java_lang_reflect_Field::set_slot(oop reflect, int value) {
1930   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1931   reflect->int_field_put(slot_offset, value);
1932 }
1933 
1934 int java_lang_reflect_Field::modifiers(oop field) {
1935   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1936   return field->int_field(modifiers_offset);
1937 }
1938 
1939 void java_lang_reflect_Field::set_modifiers(oop field, int value) {
1940   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1941   field->int_field_put(modifiers_offset, value);
1942 }
1943 
1944 bool java_lang_reflect_Field::has_signature_field() {
1945   return (signature_offset >= 0);
1946 }
1947 
1948 oop java_lang_reflect_Field::signature(oop field) {
1949   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1950   assert(has_signature_field(), "signature field must be present");
1951   return field->obj_field(signature_offset);
1952 }
1953 
1954 void java_lang_reflect_Field::set_signature(oop field, oop value) {
1955   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1956   assert(has_signature_field(), "signature field must be present");
1957   field->obj_field_put(signature_offset, value);
1958 }
1959 
1960 bool java_lang_reflect_Field::has_annotations_field() {
1961   return (annotations_offset >= 0);
1962 }
1963 
1964 oop java_lang_reflect_Field::annotations(oop field) {
1965   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1966   assert(has_annotations_field(), "annotations field must be present");
1967   return field->obj_field(annotations_offset);
1968 }
1969 
1970 void java_lang_reflect_Field::set_annotations(oop field, oop value) {
1971   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1972   assert(has_annotations_field(), "annotations field must be present");
1973   field->obj_field_put(annotations_offset, value);
1974 }
1975 
1976 
1977 void sun_reflect_ConstantPool::compute_offsets() {
1978   klassOop k = SystemDictionary::reflect_ConstantPool_klass();
1979   // This null test can be removed post beta
1980   if (k != NULL) {
1981     compute_offset(_cp_oop_offset, k, vmSymbols::constantPoolOop_name(), vmSymbols::object_signature());
1982   }
1983 }
1984 
1985 
1986 Handle sun_reflect_ConstantPool::create(TRAPS) {
1987   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1988   klassOop k = SystemDictionary::reflect_ConstantPool_klass();
1989   instanceKlassHandle klass (THREAD, k);
1990   // Ensure it is initialized
1991   klass->initialize(CHECK_NH);
1992   return klass->allocate_instance_handle(CHECK_NH);
1993 }
1994 
1995 
1996 oop sun_reflect_ConstantPool::cp_oop(oop reflect) {
1997   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
1998   return reflect->obj_field(_cp_oop_offset);
1999 }
2000 
2001 
2002 void sun_reflect_ConstantPool::set_cp_oop(oop reflect, oop value) {
2003   assert(Universe::is_fully_initialized(), "Need to find another solution to the reflection problem");
2004   reflect->obj_field_put(_cp_oop_offset, value);
2005 }
2006 
2007 void sun_reflect_UnsafeStaticFieldAccessorImpl::compute_offsets() {
2008   klassOop k = SystemDictionary::reflect_UnsafeStaticFieldAccessorImpl_klass();
2009   // This null test can be removed post beta
2010   if (k != NULL) {
2011     compute_offset(_base_offset, k,
2012                    vmSymbols::base_name(), vmSymbols::object_signature());
2013   }
2014 }
2015 
2016 oop java_lang_boxing_object::initialize_and_allocate(BasicType type, TRAPS) {
2017   klassOop k = SystemDictionary::box_klass(type);
2018   if (k == NULL)  return NULL;
2019   instanceKlassHandle h (THREAD, k);
2020   if (!h->is_initialized())  h->initialize(CHECK_0);
2021   return h->allocate_instance(THREAD);
2022 }
2023 
2024 
2025 oop java_lang_boxing_object::create(BasicType type, jvalue* value, TRAPS) {
2026   oop box = initialize_and_allocate(type, CHECK_0);
2027   if (box == NULL)  return NULL;
2028   switch (type) {
2029     case T_BOOLEAN:
2030       box->bool_field_put(value_offset, value->z);
2031       break;
2032     case T_CHAR:
2033       box->char_field_put(value_offset, value->c);
2034       break;
2035     case T_FLOAT:
2036       box->float_field_put(value_offset, value->f);
2037       break;
2038     case T_DOUBLE:
2039       box->double_field_put(long_value_offset, value->d);
2040       break;
2041     case T_BYTE:
2042       box->byte_field_put(value_offset, value->b);
2043       break;
2044     case T_SHORT:
2045       box->short_field_put(value_offset, value->s);
2046       break;
2047     case T_INT:
2048       box->int_field_put(value_offset, value->i);
2049       break;
2050     case T_LONG:
2051       box->long_field_put(long_value_offset, value->j);
2052       break;
2053     default:
2054       return NULL;
2055   }
2056   return box;
2057 }
2058 
2059 
2060 BasicType java_lang_boxing_object::basic_type(oop box) {
2061   if (box == NULL)  return T_ILLEGAL;
2062   BasicType type = SystemDictionary::box_klass_type(box->klass());
2063   if (type == T_OBJECT)         // 'unknown' value returned by SD::bkt
2064     return T_ILLEGAL;
2065   return type;
2066 }
2067 
2068 
2069 BasicType java_lang_boxing_object::get_value(oop box, jvalue* value) {
2070   BasicType type = SystemDictionary::box_klass_type(box->klass());
2071   switch (type) {
2072   case T_BOOLEAN:
2073     value->z = box->bool_field(value_offset);
2074     break;
2075   case T_CHAR:
2076     value->c = box->char_field(value_offset);
2077     break;
2078   case T_FLOAT:
2079     value->f = box->float_field(value_offset);
2080     break;
2081   case T_DOUBLE:
2082     value->d = box->double_field(long_value_offset);
2083     break;
2084   case T_BYTE:
2085     value->b = box->byte_field(value_offset);
2086     break;
2087   case T_SHORT:
2088     value->s = box->short_field(value_offset);
2089     break;
2090   case T_INT:
2091     value->i = box->int_field(value_offset);
2092     break;
2093   case T_LONG:
2094     value->j = box->long_field(long_value_offset);
2095     break;
2096   default:
2097     return T_ILLEGAL;
2098   } // end switch
2099   return type;
2100 }
2101 
2102 
2103 BasicType java_lang_boxing_object::set_value(oop box, jvalue* value) {
2104   BasicType type = SystemDictionary::box_klass_type(box->klass());
2105   switch (type) {
2106   case T_BOOLEAN:
2107     box->bool_field_put(value_offset, value->z);
2108     break;
2109   case T_CHAR:
2110     box->char_field_put(value_offset, value->c);
2111     break;
2112   case T_FLOAT:
2113     box->float_field_put(value_offset, value->f);
2114     break;
2115   case T_DOUBLE:
2116     box->double_field_put(long_value_offset, value->d);
2117     break;
2118   case T_BYTE:
2119     box->byte_field_put(value_offset, value->b);
2120     break;
2121   case T_SHORT:
2122     box->short_field_put(value_offset, value->s);
2123     break;
2124   case T_INT:
2125     box->int_field_put(value_offset, value->i);
2126     break;
2127   case T_LONG:
2128     box->long_field_put(long_value_offset, value->j);
2129     break;
2130   default:
2131     return T_ILLEGAL;
2132   } // end switch
2133   return type;
2134 }
2135 
2136 
2137 void java_lang_boxing_object::print(BasicType type, jvalue* value, outputStream* st) {
2138   switch (type) {
2139   case T_BOOLEAN:   st->print("%s", value->z ? "true" : "false");   break;
2140   case T_CHAR:      st->print("%d", value->c);                      break;
2141   case T_BYTE:      st->print("%d", value->b);                      break;
2142   case T_SHORT:     st->print("%d", value->s);                      break;
2143   case T_INT:       st->print("%d", value->i);                      break;
2144   case T_LONG:      st->print(INT64_FORMAT, value->j);              break;
2145   case T_FLOAT:     st->print("%f", value->f);                      break;
2146   case T_DOUBLE:    st->print("%lf", value->d);                     break;
2147   default:          st->print("type %d?", type);                    break;
2148   }
2149 }
2150 
2151 
2152 // Support for java_lang_ref_Reference
2153 oop java_lang_ref_Reference::pending_list_lock() {
2154   instanceKlass* ik = instanceKlass::cast(SystemDictionary::Reference_klass());
2155   char *addr = (((char *)ik->start_of_static_fields()) + static_lock_offset);
2156   if (UseCompressedOops) {
2157     return oopDesc::load_decode_heap_oop((narrowOop *)addr);
2158   } else {
2159     return oopDesc::load_decode_heap_oop((oop*)addr);
2160   }
2161 }
2162 
2163 HeapWord *java_lang_ref_Reference::pending_list_addr() {
2164   instanceKlass* ik = instanceKlass::cast(SystemDictionary::Reference_klass());
2165   char *addr = (((char *)ik->start_of_static_fields()) + static_pending_offset);
2166   // XXX This might not be HeapWord aligned, almost rather be char *.
2167   return (HeapWord*)addr;
2168 }
2169 
2170 oop java_lang_ref_Reference::pending_list() {
2171   char *addr = (char *)pending_list_addr();
2172   if (UseCompressedOops) {
2173     return oopDesc::load_decode_heap_oop((narrowOop *)addr);
2174   } else {
2175     return oopDesc::load_decode_heap_oop((oop*)addr);
2176   }
2177 }
2178 
2179 
2180 // Support for java_lang_ref_SoftReference
2181 
2182 jlong java_lang_ref_SoftReference::timestamp(oop ref) {
2183   return ref->long_field(timestamp_offset);
2184 }
2185 
2186 jlong java_lang_ref_SoftReference::clock() {
2187   instanceKlass* ik = instanceKlass::cast(SystemDictionary::SoftReference_klass());
2188   int offset = ik->offset_of_static_fields() + static_clock_offset;
2189 
2190   return SystemDictionary::SoftReference_klass()->long_field(offset);
2191 }
2192 
2193 void java_lang_ref_SoftReference::set_clock(jlong value) {
2194   instanceKlass* ik = instanceKlass::cast(SystemDictionary::SoftReference_klass());
2195   int offset = ik->offset_of_static_fields() + static_clock_offset;
2196 
2197   SystemDictionary::SoftReference_klass()->long_field_put(offset, value);
2198 }
2199 
2200 
2201 // Support for java_dyn_MethodHandle
2202 
2203 int java_dyn_MethodHandle::_type_offset;
2204 int java_dyn_MethodHandle::_vmtarget_offset;
2205 int java_dyn_MethodHandle::_vmentry_offset;
2206 int java_dyn_MethodHandle::_vmslots_offset;
2207 
2208 int sun_dyn_MemberName::_clazz_offset;
2209 int sun_dyn_MemberName::_name_offset;
2210 int sun_dyn_MemberName::_type_offset;
2211 int sun_dyn_MemberName::_flags_offset;
2212 int sun_dyn_MemberName::_vmtarget_offset;
2213 int sun_dyn_MemberName::_vmindex_offset;
2214 
2215 int sun_dyn_DirectMethodHandle::_vmindex_offset;
2216 
2217 int sun_dyn_BoundMethodHandle::_argument_offset;
2218 int sun_dyn_BoundMethodHandle::_vmargslot_offset;
2219 
2220 int sun_dyn_AdapterMethodHandle::_conversion_offset;
2221 
2222 void java_dyn_MethodHandle::compute_offsets() {
2223   klassOop k = SystemDictionary::MethodHandle_klass();
2224   if (k != NULL && EnableMethodHandles) {
2225     bool allow_super = false;
2226     if (AllowTransitionalJSR292)  allow_super = true;  // temporary, to access sun.dyn.MethodHandleImpl
2227     compute_offset(_type_offset,      k, vmSymbols::type_name(),      vmSymbols::java_dyn_MethodType_signature(), allow_super);
2228     compute_offset(_vmtarget_offset,  k, vmSymbols::vmtarget_name(),  vmSymbols::object_signature(), allow_super);
2229     compute_offset(_vmentry_offset,   k, vmSymbols::vmentry_name(),   vmSymbols::machine_word_signature(), allow_super);
2230 
2231     // Note:  MH.vmslots (if it is present) is a hoisted copy of MH.type.form.vmslots.
2232     // It is optional pending experiments to keep or toss.
2233     compute_optional_offset(_vmslots_offset, k, vmSymbols::vmslots_name(), vmSymbols::int_signature(), allow_super);
2234   }
2235 }
2236 
2237 void sun_dyn_MemberName::compute_offsets() {
2238   klassOop k = SystemDictionary::MemberName_klass();
2239   if (k != NULL && EnableMethodHandles) {
2240     compute_offset(_clazz_offset,     k, vmSymbols::clazz_name(),     vmSymbols::class_signature());
2241     compute_offset(_name_offset,      k, vmSymbols::name_name(),      vmSymbols::string_signature());
2242     compute_offset(_type_offset,      k, vmSymbols::type_name(),      vmSymbols::object_signature());
2243     compute_offset(_flags_offset,     k, vmSymbols::flags_name(),     vmSymbols::int_signature());
2244     compute_offset(_vmtarget_offset,  k, vmSymbols::vmtarget_name(),  vmSymbols::object_signature());
2245     compute_offset(_vmindex_offset,   k, vmSymbols::vmindex_name(),   vmSymbols::int_signature());
2246   }
2247 }
2248 
2249 void sun_dyn_DirectMethodHandle::compute_offsets() {
2250   klassOop k = SystemDictionary::DirectMethodHandle_klass();
2251   if (k != NULL && EnableMethodHandles) {
2252     compute_offset(_vmindex_offset,   k, vmSymbols::vmindex_name(),   vmSymbols::int_signature(),    true);
2253   }
2254 }
2255 
2256 void sun_dyn_BoundMethodHandle::compute_offsets() {
2257   klassOop k = SystemDictionary::BoundMethodHandle_klass();
2258   if (k != NULL && EnableMethodHandles) {
2259     compute_offset(_vmargslot_offset, k, vmSymbols::vmargslot_name(), vmSymbols::int_signature(),    true);
2260     compute_offset(_argument_offset,  k, vmSymbols::argument_name(),  vmSymbols::object_signature(), true);
2261   }
2262 }
2263 
2264 void sun_dyn_AdapterMethodHandle::compute_offsets() {
2265   klassOop k = SystemDictionary::AdapterMethodHandle_klass();
2266   if (k != NULL && EnableMethodHandles) {
2267     compute_offset(_conversion_offset, k, vmSymbols::conversion_name(), vmSymbols::int_signature(), true);
2268   }
2269 }
2270 
2271 oop java_dyn_MethodHandle::type(oop mh) {
2272   return mh->obj_field(_type_offset);
2273 }
2274 
2275 void java_dyn_MethodHandle::set_type(oop mh, oop mtype) {
2276   mh->obj_field_put(_type_offset, mtype);
2277 }
2278 
2279 int java_dyn_MethodHandle::vmslots(oop mh) {
2280   int vmslots_offset = _vmslots_offset;
2281   if (vmslots_offset != 0) {
2282 #ifdef ASSERT
2283     int x = mh->int_field(vmslots_offset);
2284     int y = compute_vmslots(mh);
2285     assert(x == y, "correct hoisted value");
2286 #endif
2287     return mh->int_field(vmslots_offset);
2288   } else {
2289     return compute_vmslots(mh);
2290   }
2291 }
2292 
2293 // if MH.vmslots exists, hoist into it the value of type.form.vmslots
2294 void java_dyn_MethodHandle::init_vmslots(oop mh) {
2295   int vmslots_offset = _vmslots_offset;
2296   if (vmslots_offset != 0) {
2297     mh->int_field_put(vmslots_offset, compute_vmslots(mh));
2298   }
2299 }
2300 
2301 // fetch type.form.vmslots, which is the number of JVM stack slots
2302 // required to carry the arguments of this MH
2303 int java_dyn_MethodHandle::compute_vmslots(oop mh) {
2304   oop mtype = type(mh);
2305   if (mtype == NULL)  return 0;  // Java code would get NPE
2306   oop form = java_dyn_MethodType::form(mtype);
2307   if (form == NULL)   return 0;  // Java code would get NPE
2308   return java_dyn_MethodTypeForm::vmslots(form);
2309 }
2310 
2311 // fetch the low-level entry point for this mh
2312 MethodHandleEntry* java_dyn_MethodHandle::vmentry(oop mh) {
2313   return (MethodHandleEntry*) mh->address_field(_vmentry_offset);
2314 }
2315 
2316 void java_dyn_MethodHandle::set_vmentry(oop mh, MethodHandleEntry* me) {
2317   assert(_vmentry_offset != 0, "must be present");
2318 
2319   // This is always the final step that initializes a valid method handle:
2320   mh->release_address_field_put(_vmentry_offset, (address) me);
2321 
2322   // There should be enough memory barriers on exit from native methods
2323   // to ensure that the MH is fully initialized to all threads before
2324   // Java code can publish it in global data structures.
2325   // But just in case, we use release_address_field_put.
2326 }
2327 
2328 /// MemberName accessors
2329 
2330 oop sun_dyn_MemberName::clazz(oop mname) {
2331   assert(is_instance(mname), "wrong type");
2332   return mname->obj_field(_clazz_offset);
2333 }
2334 
2335 void sun_dyn_MemberName::set_clazz(oop mname, oop clazz) {
2336   assert(is_instance(mname), "wrong type");
2337   mname->obj_field_put(_clazz_offset, clazz);
2338 }
2339 
2340 oop sun_dyn_MemberName::name(oop mname) {
2341   assert(is_instance(mname), "wrong type");
2342   return mname->obj_field(_name_offset);
2343 }
2344 
2345 void sun_dyn_MemberName::set_name(oop mname, oop name) {
2346   assert(is_instance(mname), "wrong type");
2347   mname->obj_field_put(_name_offset, name);
2348 }
2349 
2350 oop sun_dyn_MemberName::type(oop mname) {
2351   assert(is_instance(mname), "wrong type");
2352   return mname->obj_field(_type_offset);
2353 }
2354 
2355 void sun_dyn_MemberName::set_type(oop mname, oop type) {
2356   assert(is_instance(mname), "wrong type");
2357   mname->obj_field_put(_type_offset, type);
2358 }
2359 
2360 int sun_dyn_MemberName::flags(oop mname) {
2361   assert(is_instance(mname), "wrong type");
2362   return mname->int_field(_flags_offset);
2363 }
2364 
2365 void sun_dyn_MemberName::set_flags(oop mname, int flags) {
2366   assert(is_instance(mname), "wrong type");
2367   mname->int_field_put(_flags_offset, flags);
2368 }
2369 
2370 oop sun_dyn_MemberName::vmtarget(oop mname) {
2371   assert(is_instance(mname), "wrong type");
2372   return mname->obj_field(_vmtarget_offset);
2373 }
2374 
2375 void sun_dyn_MemberName::set_vmtarget(oop mname, oop ref) {
2376   assert(is_instance(mname), "wrong type");
2377   mname->obj_field_put(_vmtarget_offset, ref);
2378 }
2379 
2380 int sun_dyn_MemberName::vmindex(oop mname) {
2381   assert(is_instance(mname), "wrong type");
2382   return mname->int_field(_vmindex_offset);
2383 }
2384 
2385 void sun_dyn_MemberName::set_vmindex(oop mname, int index) {
2386   assert(is_instance(mname), "wrong type");
2387   mname->int_field_put(_vmindex_offset, index);
2388 }
2389 
2390 oop java_dyn_MethodHandle::vmtarget(oop mh) {
2391   assert(is_instance(mh), "MH only");
2392   return mh->obj_field(_vmtarget_offset);
2393 }
2394 
2395 void java_dyn_MethodHandle::set_vmtarget(oop mh, oop ref) {
2396   assert(is_instance(mh), "MH only");
2397   mh->obj_field_put(_vmtarget_offset, ref);
2398 }
2399 
2400 int sun_dyn_DirectMethodHandle::vmindex(oop mh) {
2401   assert(is_instance(mh), "DMH only");
2402   return mh->int_field(_vmindex_offset);
2403 }
2404 
2405 void sun_dyn_DirectMethodHandle::set_vmindex(oop mh, int index) {
2406   assert(is_instance(mh), "DMH only");
2407   mh->int_field_put(_vmindex_offset, index);
2408 }
2409 
2410 int sun_dyn_BoundMethodHandle::vmargslot(oop mh) {
2411   assert(is_instance(mh), "BMH only");
2412   return mh->int_field(_vmargslot_offset);
2413 }
2414 
2415 oop sun_dyn_BoundMethodHandle::argument(oop mh) {
2416   assert(is_instance(mh), "BMH only");
2417   return mh->obj_field(_argument_offset);
2418 }
2419 
2420 int sun_dyn_AdapterMethodHandle::conversion(oop mh) {
2421   assert(is_instance(mh), "AMH only");
2422   return mh->int_field(_conversion_offset);
2423 }
2424 
2425 void sun_dyn_AdapterMethodHandle::set_conversion(oop mh, int conv) {
2426   assert(is_instance(mh), "AMH only");
2427   mh->int_field_put(_conversion_offset, conv);
2428 }
2429 
2430 
2431 // Support for java_dyn_MethodType
2432 
2433 int java_dyn_MethodType::_rtype_offset;
2434 int java_dyn_MethodType::_ptypes_offset;
2435 int java_dyn_MethodType::_form_offset;
2436 
2437 void java_dyn_MethodType::compute_offsets() {
2438   klassOop k = SystemDictionary::MethodType_klass();
2439   if (k != NULL) {
2440     compute_offset(_rtype_offset,  k, vmSymbols::rtype_name(),  vmSymbols::class_signature());
2441     compute_offset(_ptypes_offset, k, vmSymbols::ptypes_name(), vmSymbols::class_array_signature());
2442     compute_offset(_form_offset,   k, vmSymbols::form_name(),   vmSymbols::java_dyn_MethodTypeForm_signature());
2443   }
2444 }
2445 
2446 void java_dyn_MethodType::print_signature(oop mt, outputStream* st) {
2447   st->print("(");
2448   objArrayOop pts = ptypes(mt);
2449   for (int i = 0, limit = pts->length(); i < limit; i++) {
2450     java_lang_Class::print_signature(pts->obj_at(i), st);
2451   }
2452   st->print(")");
2453   java_lang_Class::print_signature(rtype(mt), st);
2454 }
2455 
2456 Symbol* java_dyn_MethodType::as_signature(oop mt, bool intern_if_not_found, TRAPS) {
2457   ResourceMark rm;
2458   stringStream buffer(128);
2459   print_signature(mt, &buffer);
2460   const char* sigstr =       buffer.base();
2461   int         siglen = (int) buffer.size();
2462   Symbol *name;
2463   if (!intern_if_not_found) {
2464     name = SymbolTable::probe(sigstr, siglen);
2465   } else {
2466     name = SymbolTable::new_symbol(sigstr, siglen, THREAD);
2467   }
2468   return name;
2469 }
2470 
2471 oop java_dyn_MethodType::rtype(oop mt) {
2472   assert(is_instance(mt), "must be a MethodType");
2473   return mt->obj_field(_rtype_offset);
2474 }
2475 
2476 objArrayOop java_dyn_MethodType::ptypes(oop mt) {
2477   assert(is_instance(mt), "must be a MethodType");
2478   return (objArrayOop) mt->obj_field(_ptypes_offset);
2479 }
2480 
2481 oop java_dyn_MethodType::form(oop mt) {
2482   assert(is_instance(mt), "must be a MethodType");
2483   return mt->obj_field(_form_offset);
2484 }
2485 
2486 oop java_dyn_MethodType::ptype(oop mt, int idx) {
2487   return ptypes(mt)->obj_at(idx);
2488 }
2489 
2490 int java_dyn_MethodType::ptype_count(oop mt) {
2491   return ptypes(mt)->length();
2492 }
2493 
2494 
2495 
2496 // Support for java_dyn_MethodTypeForm
2497 
2498 int java_dyn_MethodTypeForm::_vmslots_offset;
2499 int java_dyn_MethodTypeForm::_erasedType_offset;
2500 int java_dyn_MethodTypeForm::_genericInvoker_offset;
2501 
2502 void java_dyn_MethodTypeForm::compute_offsets() {
2503   klassOop k = SystemDictionary::MethodTypeForm_klass();
2504   if (k != NULL) {
2505     compute_optional_offset(_vmslots_offset,    k, vmSymbols::vmslots_name(),    vmSymbols::int_signature(), true);
2506     compute_optional_offset(_erasedType_offset, k, vmSymbols::erasedType_name(), vmSymbols::java_dyn_MethodType_signature(), true);
2507     compute_optional_offset(_genericInvoker_offset, k, vmSymbols::genericInvoker_name(), vmSymbols::java_dyn_MethodHandle_signature(), true);
2508     if (_genericInvoker_offset == 0)  _genericInvoker_offset = -1;  // set to explicit "empty" value
2509   }
2510 }
2511 
2512 int java_dyn_MethodTypeForm::vmslots(oop mtform) {
2513   assert(mtform->klass() == SystemDictionary::MethodTypeForm_klass(), "MTForm only");
2514   return mtform->int_field(_vmslots_offset);
2515 }
2516 
2517 oop java_dyn_MethodTypeForm::erasedType(oop mtform) {
2518   assert(mtform->klass() == SystemDictionary::MethodTypeForm_klass(), "MTForm only");
2519   return mtform->obj_field(_erasedType_offset);
2520 }
2521 
2522 oop java_dyn_MethodTypeForm::genericInvoker(oop mtform) {
2523   assert(mtform->klass() == SystemDictionary::MethodTypeForm_klass(), "MTForm only");
2524   return mtform->obj_field(_genericInvoker_offset);
2525 }
2526 
2527 
2528 // Support for java_dyn_CallSite
2529 
2530 int java_dyn_CallSite::_target_offset;
2531 
2532 void java_dyn_CallSite::compute_offsets() {
2533   if (!EnableInvokeDynamic)  return;
2534   klassOop k = SystemDictionary::CallSite_klass();
2535   if (k != NULL) {
2536     compute_offset(_target_offset, k, vmSymbols::target_name(), vmSymbols::java_dyn_MethodHandle_signature());
2537   }
2538 }
2539 
2540 oop java_dyn_CallSite::target(oop site) {
2541   return site->obj_field(_target_offset);
2542 }
2543 
2544 void java_dyn_CallSite::set_target(oop site, oop target) {
2545   site->obj_field_put(_target_offset, target);
2546 }
2547 
2548 
2549 // Support for java_security_AccessControlContext
2550 
2551 int java_security_AccessControlContext::_context_offset = 0;
2552 int java_security_AccessControlContext::_privilegedContext_offset = 0;
2553 int java_security_AccessControlContext::_isPrivileged_offset = 0;
2554 
2555 void java_security_AccessControlContext::compute_offsets() {
2556   assert(_isPrivileged_offset == 0, "offsets should be initialized only once");
2557   fieldDescriptor fd;
2558   instanceKlass* ik = instanceKlass::cast(SystemDictionary::AccessControlContext_klass());
2559 
2560   if (!ik->find_local_field(vmSymbols::context_name(), vmSymbols::protectiondomain_signature(), &fd)) {
2561     fatal("Invalid layout of java.security.AccessControlContext");
2562   }
2563   _context_offset = fd.offset();
2564 
2565   if (!ik->find_local_field(vmSymbols::privilegedContext_name(), vmSymbols::accesscontrolcontext_signature(), &fd)) {
2566     fatal("Invalid layout of java.security.AccessControlContext");
2567   }
2568   _privilegedContext_offset = fd.offset();
2569 
2570   if (!ik->find_local_field(vmSymbols::isPrivileged_name(), vmSymbols::bool_signature(), &fd)) {
2571     fatal("Invalid layout of java.security.AccessControlContext");
2572   }
2573   _isPrivileged_offset = fd.offset();
2574 }
2575 
2576 
2577 oop java_security_AccessControlContext::create(objArrayHandle context, bool isPrivileged, Handle privileged_context, TRAPS) {
2578   assert(_isPrivileged_offset != 0, "offsets should have been initialized");
2579   // Ensure klass is initialized
2580   instanceKlass::cast(SystemDictionary::AccessControlContext_klass())->initialize(CHECK_0);
2581   // Allocate result
2582   oop result = instanceKlass::cast(SystemDictionary::AccessControlContext_klass())->allocate_instance(CHECK_0);
2583   // Fill in values
2584   result->obj_field_put(_context_offset, context());
2585   result->obj_field_put(_privilegedContext_offset, privileged_context());
2586   result->bool_field_put(_isPrivileged_offset, isPrivileged);
2587   return result;
2588 }
2589 
2590 
2591 // Support for java_lang_ClassLoader
2592 
2593 oop java_lang_ClassLoader::parent(oop loader) {
2594   assert(loader->is_oop(), "loader must be oop");
2595   return loader->obj_field(parent_offset);
2596 }
2597 
2598 
2599 bool java_lang_ClassLoader::is_trusted_loader(oop loader) {
2600   // Fix for 4474172; see evaluation for more details
2601   loader = non_reflection_class_loader(loader);
2602 
2603   oop cl = SystemDictionary::java_system_loader();
2604   while(cl != NULL) {
2605     if (cl == loader) return true;
2606     cl = parent(cl);
2607   }
2608   return false;
2609 }
2610 
2611 oop java_lang_ClassLoader::non_reflection_class_loader(oop loader) {
2612   if (loader != NULL) {
2613     // See whether this is one of the class loaders associated with
2614     // the generated bytecodes for reflection, and if so, "magically"
2615     // delegate to its parent to prevent class loading from occurring
2616     // in places where applications using reflection didn't expect it.
2617     klassOop delegating_cl_class = SystemDictionary::reflect_DelegatingClassLoader_klass();
2618     // This might be null in non-1.4 JDKs
2619     if (delegating_cl_class != NULL && loader->is_a(delegating_cl_class)) {
2620       return parent(loader);
2621     }
2622   }
2623   return loader;
2624 }
2625 
2626 
2627 // Support for java_lang_System
2628 
2629 void java_lang_System::compute_offsets() {
2630   assert(offset_of_static_fields == 0, "offsets should be initialized only once");
2631 
2632   instanceKlass* ik = instanceKlass::cast(SystemDictionary::System_klass());
2633   offset_of_static_fields = ik->offset_of_static_fields();
2634 }
2635 
2636 int java_lang_System::in_offset_in_bytes() {
2637   return (offset_of_static_fields + static_in_offset);
2638 }
2639 
2640 
2641 int java_lang_System::out_offset_in_bytes() {
2642   return (offset_of_static_fields + static_out_offset);
2643 }
2644 
2645 
2646 int java_lang_System::err_offset_in_bytes() {
2647   return (offset_of_static_fields + static_err_offset);
2648 }
2649 
2650 
2651 
2652 int java_lang_String::value_offset;
2653 int java_lang_String::offset_offset;
2654 int java_lang_String::count_offset;
2655 int java_lang_String::hash_offset;
2656 int java_lang_Class::klass_offset;
2657 int java_lang_Class::array_klass_offset;
2658 int java_lang_Class::resolved_constructor_offset;
2659 int java_lang_Class::number_of_fake_oop_fields;
2660 int java_lang_Throwable::backtrace_offset;
2661 int java_lang_Throwable::detailMessage_offset;
2662 int java_lang_Throwable::cause_offset;
2663 int java_lang_Throwable::stackTrace_offset;
2664 int java_lang_reflect_AccessibleObject::override_offset;
2665 int java_lang_reflect_Method::clazz_offset;
2666 int java_lang_reflect_Method::name_offset;
2667 int java_lang_reflect_Method::returnType_offset;
2668 int java_lang_reflect_Method::parameterTypes_offset;
2669 int java_lang_reflect_Method::exceptionTypes_offset;
2670 int java_lang_reflect_Method::slot_offset;
2671 int java_lang_reflect_Method::modifiers_offset;
2672 int java_lang_reflect_Method::signature_offset;
2673 int java_lang_reflect_Method::annotations_offset;
2674 int java_lang_reflect_Method::parameter_annotations_offset;
2675 int java_lang_reflect_Method::annotation_default_offset;
2676 int java_lang_reflect_Constructor::clazz_offset;
2677 int java_lang_reflect_Constructor::parameterTypes_offset;
2678 int java_lang_reflect_Constructor::exceptionTypes_offset;
2679 int java_lang_reflect_Constructor::slot_offset;
2680 int java_lang_reflect_Constructor::modifiers_offset;
2681 int java_lang_reflect_Constructor::signature_offset;
2682 int java_lang_reflect_Constructor::annotations_offset;
2683 int java_lang_reflect_Constructor::parameter_annotations_offset;
2684 int java_lang_reflect_Field::clazz_offset;
2685 int java_lang_reflect_Field::name_offset;
2686 int java_lang_reflect_Field::type_offset;
2687 int java_lang_reflect_Field::slot_offset;
2688 int java_lang_reflect_Field::modifiers_offset;
2689 int java_lang_reflect_Field::signature_offset;
2690 int java_lang_reflect_Field::annotations_offset;
2691 int java_lang_boxing_object::value_offset;
2692 int java_lang_boxing_object::long_value_offset;
2693 int java_lang_ref_Reference::referent_offset;
2694 int java_lang_ref_Reference::queue_offset;
2695 int java_lang_ref_Reference::next_offset;
2696 int java_lang_ref_Reference::discovered_offset;
2697 int java_lang_ref_Reference::static_lock_offset;
2698 int java_lang_ref_Reference::static_pending_offset;
2699 int java_lang_ref_Reference::number_of_fake_oop_fields;
2700 int java_lang_ref_SoftReference::timestamp_offset;
2701 int java_lang_ref_SoftReference::static_clock_offset;
2702 int java_lang_ClassLoader::parent_offset;
2703 int java_lang_System::offset_of_static_fields;
2704 int java_lang_System::static_in_offset;
2705 int java_lang_System::static_out_offset;
2706 int java_lang_System::static_err_offset;
2707 int java_lang_StackTraceElement::declaringClass_offset;
2708 int java_lang_StackTraceElement::methodName_offset;
2709 int java_lang_StackTraceElement::fileName_offset;
2710 int java_lang_StackTraceElement::lineNumber_offset;
2711 int java_lang_AssertionStatusDirectives::classes_offset;
2712 int java_lang_AssertionStatusDirectives::classEnabled_offset;
2713 int java_lang_AssertionStatusDirectives::packages_offset;
2714 int java_lang_AssertionStatusDirectives::packageEnabled_offset;
2715 int java_lang_AssertionStatusDirectives::deflt_offset;
2716 int java_nio_Buffer::_limit_offset;
2717 int sun_misc_AtomicLongCSImpl::_value_offset;
2718 int java_util_concurrent_locks_AbstractOwnableSynchronizer::_owner_offset = 0;
2719 int sun_reflect_ConstantPool::_cp_oop_offset;
2720 int sun_reflect_UnsafeStaticFieldAccessorImpl::_base_offset;
2721 
2722 
2723 // Support for java_lang_StackTraceElement
2724 
2725 void java_lang_StackTraceElement::set_fileName(oop element, oop value) {
2726   element->obj_field_put(fileName_offset, value);
2727 }
2728 
2729 void java_lang_StackTraceElement::set_declaringClass(oop element, oop value) {
2730   element->obj_field_put(declaringClass_offset, value);
2731 }
2732 
2733 void java_lang_StackTraceElement::set_methodName(oop element, oop value) {
2734   element->obj_field_put(methodName_offset, value);
2735 }
2736 
2737 void java_lang_StackTraceElement::set_lineNumber(oop element, int value) {
2738   element->int_field_put(lineNumber_offset, value);
2739 }
2740 
2741 
2742 // Support for java Assertions - java_lang_AssertionStatusDirectives.
2743 
2744 void java_lang_AssertionStatusDirectives::set_classes(oop o, oop val) {
2745   o->obj_field_put(classes_offset, val);
2746 }
2747 
2748 void java_lang_AssertionStatusDirectives::set_classEnabled(oop o, oop val) {
2749   o->obj_field_put(classEnabled_offset, val);
2750 }
2751 
2752 void java_lang_AssertionStatusDirectives::set_packages(oop o, oop val) {
2753   o->obj_field_put(packages_offset, val);
2754 }
2755 
2756 void java_lang_AssertionStatusDirectives::set_packageEnabled(oop o, oop val) {
2757   o->obj_field_put(packageEnabled_offset, val);
2758 }
2759 
2760 void java_lang_AssertionStatusDirectives::set_deflt(oop o, bool val) {
2761   o->bool_field_put(deflt_offset, val);
2762 }
2763 
2764 
2765 // Support for intrinsification of java.nio.Buffer.checkIndex
2766 int java_nio_Buffer::limit_offset() {
2767   return _limit_offset;
2768 }
2769 
2770 
2771 void java_nio_Buffer::compute_offsets() {
2772   klassOop k = SystemDictionary::java_nio_Buffer_klass();
2773   assert(k != NULL, "must be loaded in 1.4+");
2774   compute_offset(_limit_offset, k, vmSymbols::limit_name(), vmSymbols::int_signature());
2775 }
2776 
2777 // Support for intrinsification of sun.misc.AtomicLongCSImpl.attemptUpdate
2778 int sun_misc_AtomicLongCSImpl::value_offset() {
2779   assert(SystemDictionary::sun_misc_AtomicLongCSImpl_klass() != NULL, "can't call this");
2780   return _value_offset;
2781 }
2782 
2783 
2784 void sun_misc_AtomicLongCSImpl::compute_offsets() {
2785   klassOop k = SystemDictionary::sun_misc_AtomicLongCSImpl_klass();
2786   // If this class is not present, its value field offset won't be referenced.
2787   if (k != NULL) {
2788     compute_offset(_value_offset, k, vmSymbols::value_name(), vmSymbols::long_signature());
2789   }
2790 }
2791 
2792 void java_util_concurrent_locks_AbstractOwnableSynchronizer::initialize(TRAPS) {
2793   if (_owner_offset != 0) return;
2794 
2795   assert(JDK_Version::is_gte_jdk16x_version(), "Must be JDK 1.6 or later");
2796   SystemDictionary::load_abstract_ownable_synchronizer_klass(CHECK);
2797   klassOop k = SystemDictionary::abstract_ownable_synchronizer_klass();
2798   compute_offset(_owner_offset, k,
2799                  vmSymbols::exclusive_owner_thread_name(), vmSymbols::thread_signature());
2800 }
2801 
2802 oop java_util_concurrent_locks_AbstractOwnableSynchronizer::get_owner_threadObj(oop obj) {
2803   assert(_owner_offset != 0, "Must be initialized");
2804   return obj->obj_field(_owner_offset);
2805 }
2806 
2807 // Compute hard-coded offsets
2808 // Invoked before SystemDictionary::initialize, so pre-loaded classes
2809 // are not available to determine the offset_of_static_fields.
2810 void JavaClasses::compute_hard_coded_offsets() {
2811   const int x = heapOopSize;
2812   const int header = instanceOopDesc::base_offset_in_bytes();
2813 
2814   // Do the String Class
2815   java_lang_String::value_offset  = java_lang_String::hc_value_offset  * x + header;
2816   java_lang_String::offset_offset = java_lang_String::hc_offset_offset * x + header;
2817   java_lang_String::count_offset  = java_lang_String::offset_offset + sizeof (jint);
2818   java_lang_String::hash_offset   = java_lang_String::count_offset + sizeof (jint);
2819 
2820   // Do the Class Class
2821   java_lang_Class::klass_offset = java_lang_Class::hc_klass_offset * x + header;
2822   java_lang_Class::array_klass_offset = java_lang_Class::hc_array_klass_offset * x + header;
2823   java_lang_Class::resolved_constructor_offset = java_lang_Class::hc_resolved_constructor_offset * x + header;
2824 
2825   // This is NOT an offset
2826   java_lang_Class::number_of_fake_oop_fields = java_lang_Class::hc_number_of_fake_oop_fields;
2827 
2828   // Throwable Class
2829   java_lang_Throwable::backtrace_offset  = java_lang_Throwable::hc_backtrace_offset  * x + header;
2830   java_lang_Throwable::detailMessage_offset = java_lang_Throwable::hc_detailMessage_offset * x + header;
2831   java_lang_Throwable::cause_offset      = java_lang_Throwable::hc_cause_offset      * x + header;
2832   java_lang_Throwable::stackTrace_offset = java_lang_Throwable::hc_stackTrace_offset * x + header;
2833 
2834   // java_lang_boxing_object
2835   java_lang_boxing_object::value_offset = java_lang_boxing_object::hc_value_offset + header;
2836   java_lang_boxing_object::long_value_offset = align_size_up((java_lang_boxing_object::hc_value_offset + header), BytesPerLong);
2837 
2838   // java_lang_ref_Reference:
2839   java_lang_ref_Reference::referent_offset = java_lang_ref_Reference::hc_referent_offset * x + header;
2840   java_lang_ref_Reference::queue_offset = java_lang_ref_Reference::hc_queue_offset * x + header;
2841   java_lang_ref_Reference::next_offset  = java_lang_ref_Reference::hc_next_offset * x + header;
2842   java_lang_ref_Reference::discovered_offset  = java_lang_ref_Reference::hc_discovered_offset * x + header;
2843   java_lang_ref_Reference::static_lock_offset = java_lang_ref_Reference::hc_static_lock_offset *  x;
2844   java_lang_ref_Reference::static_pending_offset = java_lang_ref_Reference::hc_static_pending_offset * x;
2845   // Artificial fields for java_lang_ref_Reference
2846   // The first field is for the discovered field added in 1.4
2847   java_lang_ref_Reference::number_of_fake_oop_fields = 1;
2848 
2849   // java_lang_ref_SoftReference Class
2850   java_lang_ref_SoftReference::timestamp_offset = align_size_up((java_lang_ref_SoftReference::hc_timestamp_offset * x + header), BytesPerLong);
2851   // Don't multiply static fields because they are always in wordSize units
2852   java_lang_ref_SoftReference::static_clock_offset = java_lang_ref_SoftReference::hc_static_clock_offset * x;
2853 
2854   // java_lang_ClassLoader
2855   java_lang_ClassLoader::parent_offset = java_lang_ClassLoader::hc_parent_offset * x + header;
2856 
2857   // java_lang_System
2858   java_lang_System::static_in_offset  = java_lang_System::hc_static_in_offset  * x;
2859   java_lang_System::static_out_offset = java_lang_System::hc_static_out_offset * x;
2860   java_lang_System::static_err_offset = java_lang_System::hc_static_err_offset * x;
2861 
2862   // java_lang_StackTraceElement
2863   java_lang_StackTraceElement::declaringClass_offset = java_lang_StackTraceElement::hc_declaringClass_offset  * x + header;
2864   java_lang_StackTraceElement::methodName_offset = java_lang_StackTraceElement::hc_methodName_offset * x + header;
2865   java_lang_StackTraceElement::fileName_offset   = java_lang_StackTraceElement::hc_fileName_offset   * x + header;
2866   java_lang_StackTraceElement::lineNumber_offset = java_lang_StackTraceElement::hc_lineNumber_offset * x + header;
2867   java_lang_AssertionStatusDirectives::classes_offset = java_lang_AssertionStatusDirectives::hc_classes_offset * x + header;
2868   java_lang_AssertionStatusDirectives::classEnabled_offset = java_lang_AssertionStatusDirectives::hc_classEnabled_offset * x + header;
2869   java_lang_AssertionStatusDirectives::packages_offset = java_lang_AssertionStatusDirectives::hc_packages_offset * x + header;
2870   java_lang_AssertionStatusDirectives::packageEnabled_offset = java_lang_AssertionStatusDirectives::hc_packageEnabled_offset * x + header;
2871   java_lang_AssertionStatusDirectives::deflt_offset = java_lang_AssertionStatusDirectives::hc_deflt_offset * x + header;
2872 
2873 }
2874 
2875 
2876 // Compute non-hard-coded field offsets of all the classes in this file
2877 void JavaClasses::compute_offsets() {
2878 
2879   java_lang_Class::compute_offsets();
2880   java_lang_System::compute_offsets();
2881   java_lang_Thread::compute_offsets();
2882   java_lang_ThreadGroup::compute_offsets();
2883   if (EnableMethodHandles) {
2884     java_dyn_MethodHandle::compute_offsets();
2885     sun_dyn_MemberName::compute_offsets();
2886     sun_dyn_DirectMethodHandle::compute_offsets();
2887     sun_dyn_BoundMethodHandle::compute_offsets();
2888     sun_dyn_AdapterMethodHandle::compute_offsets();
2889     java_dyn_MethodType::compute_offsets();
2890     java_dyn_MethodTypeForm::compute_offsets();
2891   }
2892   if (EnableInvokeDynamic) {
2893     java_dyn_CallSite::compute_offsets();
2894   }
2895   java_security_AccessControlContext::compute_offsets();
2896   // Initialize reflection classes. The layouts of these classes
2897   // changed with the new reflection implementation in JDK 1.4, and
2898   // since the Universe doesn't know what JDK version it is until this
2899   // point we defer computation of these offsets until now.
2900   java_lang_reflect_AccessibleObject::compute_offsets();
2901   java_lang_reflect_Method::compute_offsets();
2902   java_lang_reflect_Constructor::compute_offsets();
2903   java_lang_reflect_Field::compute_offsets();
2904   if (JDK_Version::is_gte_jdk14x_version()) {
2905     java_nio_Buffer::compute_offsets();
2906   }
2907   if (JDK_Version::is_gte_jdk15x_version()) {
2908     sun_reflect_ConstantPool::compute_offsets();
2909     sun_reflect_UnsafeStaticFieldAccessorImpl::compute_offsets();
2910   }
2911   sun_misc_AtomicLongCSImpl::compute_offsets();
2912 
2913   // generated interpreter code wants to know about the offsets we just computed:
2914   AbstractAssembler::update_delayed_values();
2915 }
2916 
2917 #ifndef PRODUCT
2918 
2919 // These functions exist to assert the validity of hard-coded field offsets to guard
2920 // against changes in the class files
2921 
2922 bool JavaClasses::check_offset(const char *klass_name, int hardcoded_offset, const char *field_name, const char* field_sig) {
2923   EXCEPTION_MARK;
2924   fieldDescriptor fd;
2925   TempNewSymbol klass_sym = SymbolTable::new_symbol(klass_name, CATCH);
2926   klassOop k = SystemDictionary::resolve_or_fail(klass_sym, true, CATCH);
2927   instanceKlassHandle h_klass (THREAD, k);
2928   TempNewSymbol f_name = SymbolTable::new_symbol(field_name, CATCH);
2929   TempNewSymbol f_sig  = SymbolTable::new_symbol(field_sig, CATCH);
2930   if (!h_klass->find_local_field(f_name, f_sig, &fd)) {
2931     tty->print_cr("Nonstatic field %s.%s not found", klass_name, field_name);
2932     return false;
2933   }
2934   if (fd.is_static()) {
2935     tty->print_cr("Nonstatic field %s.%s appears to be static", klass_name, field_name);
2936     return false;
2937   }
2938   if (fd.offset() == hardcoded_offset ) {
2939     return true;
2940   } else {
2941     tty->print_cr("Offset of nonstatic field %s.%s is hardcoded as %d but should really be %d.",
2942                   klass_name, field_name, hardcoded_offset, fd.offset());
2943     return false;
2944   }
2945 }
2946 
2947 
2948 bool JavaClasses::check_static_offset(const char *klass_name, int hardcoded_offset, const char *field_name, const char* field_sig) {
2949   EXCEPTION_MARK;
2950   fieldDescriptor fd;
2951   TempNewSymbol klass_sym = SymbolTable::new_symbol(klass_name, CATCH);
2952   klassOop k = SystemDictionary::resolve_or_fail(klass_sym, true, CATCH);
2953   instanceKlassHandle h_klass (THREAD, k);
2954   TempNewSymbol f_name = SymbolTable::new_symbol(field_name, CATCH);
2955   TempNewSymbol f_sig  = SymbolTable::new_symbol(field_sig, CATCH);
2956   if (!h_klass->find_local_field(f_name, f_sig, &fd)) {
2957     tty->print_cr("Static field %s.%s not found", klass_name, field_name);
2958     return false;
2959   }
2960   if (!fd.is_static()) {
2961     tty->print_cr("Static field %s.%s appears to be nonstatic", klass_name, field_name);
2962     return false;
2963   }
2964   if (fd.offset() == hardcoded_offset + h_klass->offset_of_static_fields()) {
2965     return true;
2966   } else {
2967     tty->print_cr("Offset of static field %s.%s is hardcoded as %d but should really be %d.", klass_name, field_name, hardcoded_offset, fd.offset() - h_klass->offset_of_static_fields());
2968     return false;
2969   }
2970 }
2971 
2972 
2973 bool JavaClasses::check_constant(const char *klass_name, int hardcoded_constant, const char *field_name, const char* field_sig) {
2974   EXCEPTION_MARK;
2975   fieldDescriptor fd;
2976   TempNewSymbol klass_sym = SymbolTable::new_symbol(klass_name, CATCH);
2977   klassOop k = SystemDictionary::resolve_or_fail(klass_sym, true, CATCH);
2978   instanceKlassHandle h_klass (THREAD, k);
2979   TempNewSymbol f_name = SymbolTable::new_symbol(field_name, CATCH);
2980   TempNewSymbol f_sig  = SymbolTable::new_symbol(field_sig, CATCH);
2981   if (!h_klass->find_local_field(f_name, f_sig, &fd)) {
2982     tty->print_cr("Static field %s.%s not found", klass_name, field_name);
2983     return false;
2984   }
2985   if (!fd.is_static() || !fd.has_initial_value()) {
2986     tty->print_cr("Static field %s.%s appears to be non-constant", klass_name, field_name);
2987     return false;
2988   }
2989   if (!fd.initial_value_tag().is_int()) {
2990     tty->print_cr("Static field %s.%s is not an int", klass_name, field_name);
2991     return false;
2992   }
2993   jint field_value = fd.int_initial_value();
2994   if (field_value == hardcoded_constant) {
2995     return true;
2996   } else {
2997     tty->print_cr("Constant value of static field %s.%s is hardcoded as %d but should really be %d.", klass_name, field_name, hardcoded_constant, field_value);
2998     return false;
2999   }
3000 }
3001 
3002 
3003 // Check the hard-coded field offsets of all the classes in this file
3004 
3005 void JavaClasses::check_offsets() {
3006   bool valid = true;
3007 
3008 #define CHECK_OFFSET(klass_name, cpp_klass_name, field_name, field_sig) \
3009   valid &= check_offset(klass_name, cpp_klass_name :: field_name ## _offset, #field_name, field_sig)
3010 
3011 #define CHECK_LONG_OFFSET(klass_name, cpp_klass_name, field_name, field_sig) \
3012   valid &= check_offset(klass_name, cpp_klass_name :: long_ ## field_name ## _offset, #field_name, field_sig)
3013 
3014 #define CHECK_STATIC_OFFSET(klass_name, cpp_klass_name, field_name, field_sig) \
3015   valid &= check_static_offset(klass_name, cpp_klass_name :: static_ ## field_name ## _offset, #field_name, field_sig)
3016 
3017 #define CHECK_CONSTANT(klass_name, cpp_klass_name, field_name, field_sig) \
3018   valid &= check_constant(klass_name, cpp_klass_name :: field_name, #field_name, field_sig)
3019 
3020   // java.lang.String
3021 
3022   CHECK_OFFSET("java/lang/String", java_lang_String, value, "[C");
3023   CHECK_OFFSET("java/lang/String", java_lang_String, offset, "I");
3024   CHECK_OFFSET("java/lang/String", java_lang_String, count, "I");
3025   CHECK_OFFSET("java/lang/String", java_lang_String, hash, "I");
3026 
3027   // java.lang.Class
3028 
3029   // Fake fields
3030   // CHECK_OFFSET("java/lang/Class", java_lang_Class, klass); // %%% this needs to be checked
3031   // CHECK_OFFSET("java/lang/Class", java_lang_Class, array_klass); // %%% this needs to be checked
3032   // CHECK_OFFSET("java/lang/Class", java_lang_Class, resolved_constructor); // %%% this needs to be checked
3033 
3034   // java.lang.Throwable
3035 
3036   CHECK_OFFSET("java/lang/Throwable", java_lang_Throwable, backtrace, "Ljava/lang/Object;");
3037   CHECK_OFFSET("java/lang/Throwable", java_lang_Throwable, detailMessage, "Ljava/lang/String;");
3038   CHECK_OFFSET("java/lang/Throwable", java_lang_Throwable, cause, "Ljava/lang/Throwable;");
3039   CHECK_OFFSET("java/lang/Throwable", java_lang_Throwable, stackTrace, "[Ljava/lang/StackTraceElement;");
3040 
3041   // Boxed primitive objects (java_lang_boxing_object)
3042 
3043   CHECK_OFFSET("java/lang/Boolean",   java_lang_boxing_object, value, "Z");
3044   CHECK_OFFSET("java/lang/Character", java_lang_boxing_object, value, "C");
3045   CHECK_OFFSET("java/lang/Float",     java_lang_boxing_object, value, "F");
3046   CHECK_LONG_OFFSET("java/lang/Double", java_lang_boxing_object, value, "D");
3047   CHECK_OFFSET("java/lang/Byte",      java_lang_boxing_object, value, "B");
3048   CHECK_OFFSET("java/lang/Short",     java_lang_boxing_object, value, "S");
3049   CHECK_OFFSET("java/lang/Integer",   java_lang_boxing_object, value, "I");
3050   CHECK_LONG_OFFSET("java/lang/Long", java_lang_boxing_object, value, "J");
3051 
3052   // java.lang.ClassLoader
3053 
3054   CHECK_OFFSET("java/lang/ClassLoader", java_lang_ClassLoader, parent,      "Ljava/lang/ClassLoader;");
3055 
3056   // java.lang.System
3057 
3058   CHECK_STATIC_OFFSET("java/lang/System", java_lang_System,  in, "Ljava/io/InputStream;");
3059   CHECK_STATIC_OFFSET("java/lang/System", java_lang_System, out, "Ljava/io/PrintStream;");
3060   CHECK_STATIC_OFFSET("java/lang/System", java_lang_System, err, "Ljava/io/PrintStream;");
3061 
3062   // java.lang.StackTraceElement
3063 
3064   CHECK_OFFSET("java/lang/StackTraceElement", java_lang_StackTraceElement, declaringClass, "Ljava/lang/String;");
3065   CHECK_OFFSET("java/lang/StackTraceElement", java_lang_StackTraceElement, methodName, "Ljava/lang/String;");
3066   CHECK_OFFSET("java/lang/StackTraceElement", java_lang_StackTraceElement,   fileName, "Ljava/lang/String;");
3067   CHECK_OFFSET("java/lang/StackTraceElement", java_lang_StackTraceElement, lineNumber, "I");
3068 
3069   // java.lang.ref.Reference
3070 
3071   CHECK_OFFSET("java/lang/ref/Reference", java_lang_ref_Reference, referent, "Ljava/lang/Object;");
3072   CHECK_OFFSET("java/lang/ref/Reference", java_lang_ref_Reference, queue, "Ljava/lang/ref/ReferenceQueue;");
3073   CHECK_OFFSET("java/lang/ref/Reference", java_lang_ref_Reference, next, "Ljava/lang/ref/Reference;");
3074   // Fake field
3075   //CHECK_OFFSET("java/lang/ref/Reference", java_lang_ref_Reference, discovered, "Ljava/lang/ref/Reference;");
3076   CHECK_STATIC_OFFSET("java/lang/ref/Reference", java_lang_ref_Reference, lock, "Ljava/lang/ref/Reference$Lock;");
3077   CHECK_STATIC_OFFSET("java/lang/ref/Reference", java_lang_ref_Reference, pending, "Ljava/lang/ref/Reference;");
3078 
3079   // java.lang.ref.SoftReference
3080 
3081   CHECK_OFFSET("java/lang/ref/SoftReference", java_lang_ref_SoftReference, timestamp, "J");
3082   CHECK_STATIC_OFFSET("java/lang/ref/SoftReference", java_lang_ref_SoftReference, clock, "J");
3083 
3084   // java.lang.AssertionStatusDirectives
3085   //
3086   // The CheckAssertionStatusDirectives boolean can be removed from here and
3087   // globals.hpp after the AssertionStatusDirectives class has been integrated
3088   // into merlin "for some time."  Without it, the vm will fail with early
3089   // merlin builds.
3090 
3091   if (CheckAssertionStatusDirectives && JDK_Version::is_gte_jdk14x_version()) {
3092     const char* nm = "java/lang/AssertionStatusDirectives";
3093     const char* sig = "[Ljava/lang/String;";
3094     CHECK_OFFSET(nm, java_lang_AssertionStatusDirectives, classes, sig);
3095     CHECK_OFFSET(nm, java_lang_AssertionStatusDirectives, classEnabled, "[Z");
3096     CHECK_OFFSET(nm, java_lang_AssertionStatusDirectives, packages, sig);
3097     CHECK_OFFSET(nm, java_lang_AssertionStatusDirectives, packageEnabled, "[Z");
3098     CHECK_OFFSET(nm, java_lang_AssertionStatusDirectives, deflt, "Z");
3099   }
3100 
3101   if (!valid) vm_exit_during_initialization("Hard-coded field offset verification failed");
3102 }
3103 
3104 #endif // PRODUCT
3105 
3106 void javaClasses_init() {
3107   JavaClasses::compute_offsets();
3108   JavaClasses::check_offsets();
3109   FilteredFieldsMap::initialize();  // must be done after computing offsets.
3110 }