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