1 /*
   2  * Copyright 1997-2007 Sun Microsystems, Inc.  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 Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
  20  * CA 95054 USA or visit www.sun.com if you need additional information or
  21  * have any questions.
  22  *
  23  */
  24 
  25 #include "incls/_precompiled.incl"
  26 #include "incls/_classFileParser.cpp.incl"
  27 
  28 // We generally try to create the oops directly when parsing, rather than allocating
  29 // temporary data structures and copying the bytes twice. A temporary area is only
  30 // needed when parsing utf8 entries in the constant pool and when parsing line number
  31 // tables.
  32 
  33 // We add assert in debug mode when class format is not checked.
  34 
  35 #define JAVA_CLASSFILE_MAGIC              0xCAFEBABE
  36 #define JAVA_MIN_SUPPORTED_VERSION        45
  37 #define JAVA_MAX_SUPPORTED_VERSION        51
  38 #define JAVA_MAX_SUPPORTED_MINOR_VERSION  0
  39 
  40 // Used for two backward compatibility reasons:
  41 // - to check for new additions to the class file format in JDK1.5
  42 // - to check for bug fixes in the format checker in JDK1.5
  43 #define JAVA_1_5_VERSION                  49
  44 
  45 // Used for backward compatibility reasons:
  46 // - to check for javac bug fixes that happened after 1.5
  47 // - also used as the max version when running in jdk6
  48 #define JAVA_6_VERSION                    50
  49 
  50 
  51 void ClassFileParser::parse_constant_pool_entries(constantPoolHandle cp, int length, TRAPS) {
  52   // Use a local copy of ClassFileStream. It helps the C++ compiler to optimize
  53   // this function (_current can be allocated in a register, with scalar
  54   // replacement of aggregates). The _current pointer is copied back to
  55   // stream() when this function returns. DON'T call another method within
  56   // this method that uses stream().
  57   ClassFileStream* cfs0 = stream();
  58   ClassFileStream cfs1 = *cfs0;
  59   ClassFileStream* cfs = &cfs1;
  60 #ifdef ASSERT
  61   u1* old_current = cfs0->current();
  62 #endif
  63 
  64   // Used for batching symbol allocations.
  65   const char* names[SymbolTable::symbol_alloc_batch_size];
  66   int lengths[SymbolTable::symbol_alloc_batch_size];
  67   int indices[SymbolTable::symbol_alloc_batch_size];
  68   unsigned int hashValues[SymbolTable::symbol_alloc_batch_size];
  69   int names_count = 0;
  70 
  71   // parsing  Index 0 is unused
  72   for (int index = 1; index < length; index++) {
  73     // Each of the following case guarantees one more byte in the stream
  74     // for the following tag or the access_flags following constant pool,
  75     // so we don't need bounds-check for reading tag.
  76     u1 tag = cfs->get_u1_fast();
  77     switch (tag) {
  78       case JVM_CONSTANT_Class :
  79         {
  80           cfs->guarantee_more(3, CHECK);  // name_index, tag/access_flags
  81           u2 name_index = cfs->get_u2_fast();
  82           cp->klass_index_at_put(index, name_index);
  83         }
  84         break;
  85       case JVM_CONSTANT_Fieldref :
  86         {
  87           cfs->guarantee_more(5, CHECK);  // class_index, name_and_type_index, tag/access_flags
  88           u2 class_index = cfs->get_u2_fast();
  89           u2 name_and_type_index = cfs->get_u2_fast();
  90           cp->field_at_put(index, class_index, name_and_type_index);
  91         }
  92         break;
  93       case JVM_CONSTANT_Methodref :
  94         {
  95           cfs->guarantee_more(5, CHECK);  // class_index, name_and_type_index, tag/access_flags
  96           u2 class_index = cfs->get_u2_fast();
  97           u2 name_and_type_index = cfs->get_u2_fast();
  98           cp->method_at_put(index, class_index, name_and_type_index);
  99         }
 100         break;
 101       case JVM_CONSTANT_InterfaceMethodref :
 102         {
 103           cfs->guarantee_more(5, CHECK);  // class_index, name_and_type_index, tag/access_flags
 104           u2 class_index = cfs->get_u2_fast();
 105           u2 name_and_type_index = cfs->get_u2_fast();
 106           cp->interface_method_at_put(index, class_index, name_and_type_index);
 107         }
 108         break;
 109       case JVM_CONSTANT_String :
 110         {
 111           cfs->guarantee_more(3, CHECK);  // string_index, tag/access_flags
 112           u2 string_index = cfs->get_u2_fast();
 113           cp->string_index_at_put(index, string_index);
 114         }
 115         break;
 116       case JVM_CONSTANT_Integer :
 117         {
 118           cfs->guarantee_more(5, CHECK);  // bytes, tag/access_flags
 119           u4 bytes = cfs->get_u4_fast();
 120           cp->int_at_put(index, (jint) bytes);
 121         }
 122         break;
 123       case JVM_CONSTANT_Float :
 124         {
 125           cfs->guarantee_more(5, CHECK);  // bytes, tag/access_flags
 126           u4 bytes = cfs->get_u4_fast();
 127           cp->float_at_put(index, *(jfloat*)&bytes);
 128         }
 129         break;
 130       case JVM_CONSTANT_Long :
 131         // A mangled type might cause you to overrun allocated memory
 132         guarantee_property(index+1 < length,
 133                            "Invalid constant pool entry %u in class file %s",
 134                            index, CHECK);
 135         {
 136           cfs->guarantee_more(9, CHECK);  // bytes, tag/access_flags
 137           u8 bytes = cfs->get_u8_fast();
 138           cp->long_at_put(index, bytes);
 139         }
 140         index++;   // Skip entry following eigth-byte constant, see JVM book p. 98
 141         break;
 142       case JVM_CONSTANT_Double :
 143         // A mangled type might cause you to overrun allocated memory
 144         guarantee_property(index+1 < length,
 145                            "Invalid constant pool entry %u in class file %s",
 146                            index, CHECK);
 147         {
 148           cfs->guarantee_more(9, CHECK);  // bytes, tag/access_flags
 149           u8 bytes = cfs->get_u8_fast();
 150           cp->double_at_put(index, *(jdouble*)&bytes);
 151         }
 152         index++;   // Skip entry following eigth-byte constant, see JVM book p. 98
 153         break;
 154       case JVM_CONSTANT_NameAndType :
 155         {
 156           cfs->guarantee_more(5, CHECK);  // name_index, signature_index, tag/access_flags
 157           u2 name_index = cfs->get_u2_fast();
 158           u2 signature_index = cfs->get_u2_fast();
 159           cp->name_and_type_at_put(index, name_index, signature_index);
 160         }
 161         break;
 162       case JVM_CONSTANT_Utf8 :
 163         {
 164           cfs->guarantee_more(2, CHECK);  // utf8_length
 165           u2  utf8_length = cfs->get_u2_fast();
 166           u1* utf8_buffer = cfs->get_u1_buffer();
 167           assert(utf8_buffer != NULL, "null utf8 buffer");
 168           // Got utf8 string, guarantee utf8_length+1 bytes, set stream position forward.
 169           cfs->guarantee_more(utf8_length+1, CHECK);  // utf8 string, tag/access_flags
 170           cfs->skip_u1_fast(utf8_length);
 171           // Before storing the symbol, make sure it's legal
 172           if (_need_verify) {
 173             verify_legal_utf8((unsigned char*)utf8_buffer, utf8_length, CHECK);
 174           }
 175 
 176           unsigned int hash;
 177           symbolOop result = SymbolTable::lookup_only((char*)utf8_buffer, utf8_length, hash);
 178           if (result == NULL) {
 179             names[names_count] = (char*)utf8_buffer;
 180             lengths[names_count] = utf8_length;
 181             indices[names_count] = index;
 182             hashValues[names_count++] = hash;
 183             if (names_count == SymbolTable::symbol_alloc_batch_size) {
 184               oopFactory::new_symbols(cp, names_count, names, lengths, indices, hashValues, CHECK);
 185               names_count = 0;
 186             }
 187           } else {
 188             cp->symbol_at_put(index, result);
 189           }
 190         }
 191         break;
 192       default:
 193         classfile_parse_error(
 194           "Unknown constant tag %u in class file %s", tag, CHECK);
 195         break;
 196     }
 197   }
 198 
 199   // Allocate the remaining symbols
 200   if (names_count > 0) {
 201     oopFactory::new_symbols(cp, names_count, names, lengths, indices, hashValues, CHECK);
 202   }
 203 
 204   // Copy _current pointer of local copy back to stream().
 205 #ifdef ASSERT
 206   assert(cfs0->current() == old_current, "non-exclusive use of stream()");
 207 #endif
 208   cfs0->set_current(cfs1.current());
 209 }
 210 
 211 bool inline valid_cp_range(int index, int length) { return (index > 0 && index < length); }
 212 
 213 constantPoolHandle ClassFileParser::parse_constant_pool(TRAPS) {
 214   ClassFileStream* cfs = stream();
 215   constantPoolHandle nullHandle;
 216 
 217   cfs->guarantee_more(3, CHECK_(nullHandle)); // length, first cp tag
 218   u2 length = cfs->get_u2_fast();
 219   guarantee_property(
 220     length >= 1, "Illegal constant pool size %u in class file %s",
 221     length, CHECK_(nullHandle));
 222   constantPoolOop constant_pool =
 223                       oopFactory::new_constantPool(length, CHECK_(nullHandle));
 224   constantPoolHandle cp (THREAD, constant_pool);
 225 
 226   cp->set_partially_loaded();    // Enables heap verify to work on partial constantPoolOops
 227 
 228   // parsing constant pool entries
 229   parse_constant_pool_entries(cp, length, CHECK_(nullHandle));
 230 
 231   int index = 1;  // declared outside of loops for portability
 232 
 233   // first verification pass - validate cross references and fixup class and string constants
 234   for (index = 1; index < length; index++) {          // Index 0 is unused
 235     switch (cp->tag_at(index).value()) {
 236       case JVM_CONSTANT_Class :
 237         ShouldNotReachHere();     // Only JVM_CONSTANT_ClassIndex should be present
 238         break;
 239       case JVM_CONSTANT_Fieldref :
 240         // fall through
 241       case JVM_CONSTANT_Methodref :
 242         // fall through
 243       case JVM_CONSTANT_InterfaceMethodref : {
 244         if (!_need_verify) break;
 245         int klass_ref_index = cp->klass_ref_index_at(index);
 246         int name_and_type_ref_index = cp->name_and_type_ref_index_at(index);
 247         check_property(valid_cp_range(klass_ref_index, length) &&
 248                        cp->tag_at(klass_ref_index).is_klass_reference(),
 249                        "Invalid constant pool index %u in class file %s",
 250                        klass_ref_index,
 251                        CHECK_(nullHandle));
 252         check_property(valid_cp_range(name_and_type_ref_index, length) &&
 253                        cp->tag_at(name_and_type_ref_index).is_name_and_type(),
 254                        "Invalid constant pool index %u in class file %s",
 255                        name_and_type_ref_index,
 256                        CHECK_(nullHandle));
 257         break;
 258       }
 259       case JVM_CONSTANT_String :
 260         ShouldNotReachHere();     // Only JVM_CONSTANT_StringIndex should be present
 261         break;
 262       case JVM_CONSTANT_Integer :
 263         break;
 264       case JVM_CONSTANT_Float :
 265         break;
 266       case JVM_CONSTANT_Long :
 267       case JVM_CONSTANT_Double :
 268         index++;
 269         check_property(
 270           (index < length && cp->tag_at(index).is_invalid()),
 271           "Improper constant pool long/double index %u in class file %s",
 272           index, CHECK_(nullHandle));
 273         break;
 274       case JVM_CONSTANT_NameAndType : {
 275         if (!_need_verify) break;
 276         int name_ref_index = cp->name_ref_index_at(index);
 277         int signature_ref_index = cp->signature_ref_index_at(index);
 278         check_property(
 279           valid_cp_range(name_ref_index, length) &&
 280             cp->tag_at(name_ref_index).is_utf8(),
 281           "Invalid constant pool index %u in class file %s",
 282           name_ref_index, CHECK_(nullHandle));
 283         check_property(
 284           valid_cp_range(signature_ref_index, length) &&
 285             cp->tag_at(signature_ref_index).is_utf8(),
 286           "Invalid constant pool index %u in class file %s",
 287           signature_ref_index, CHECK_(nullHandle));
 288         break;
 289       }
 290       case JVM_CONSTANT_Utf8 :
 291         break;
 292       case JVM_CONSTANT_UnresolvedClass :         // fall-through
 293       case JVM_CONSTANT_UnresolvedClassInError:
 294         ShouldNotReachHere();     // Only JVM_CONSTANT_ClassIndex should be present
 295         break;
 296       case JVM_CONSTANT_ClassIndex :
 297         {
 298           int class_index = cp->klass_index_at(index);
 299           check_property(
 300             valid_cp_range(class_index, length) &&
 301               cp->tag_at(class_index).is_utf8(),
 302             "Invalid constant pool index %u in class file %s",
 303             class_index, CHECK_(nullHandle));
 304           cp->unresolved_klass_at_put(index, cp->symbol_at(class_index));
 305         }
 306         break;
 307       case JVM_CONSTANT_UnresolvedString :
 308         ShouldNotReachHere();     // Only JVM_CONSTANT_StringIndex should be present
 309         break;
 310       case JVM_CONSTANT_StringIndex :
 311         {
 312           int string_index = cp->string_index_at(index);
 313           check_property(
 314             valid_cp_range(string_index, length) &&
 315               cp->tag_at(string_index).is_utf8(),
 316             "Invalid constant pool index %u in class file %s",
 317             string_index, CHECK_(nullHandle));
 318           symbolOop sym = cp->symbol_at(string_index);
 319           cp->unresolved_string_at_put(index, sym);
 320         }
 321         break;
 322       default:
 323         fatal1("bad constant pool tag value %u", cp->tag_at(index).value());
 324         ShouldNotReachHere();
 325         break;
 326     } // end of switch
 327   } // end of for
 328 
 329   if (!_need_verify) {
 330     return cp;
 331   }
 332 
 333   // second verification pass - checks the strings are of the right format.
 334   for (index = 1; index < length; index++) {
 335     jbyte tag = cp->tag_at(index).value();
 336     switch (tag) {
 337       case JVM_CONSTANT_UnresolvedClass: {
 338         symbolHandle class_name(THREAD, cp->unresolved_klass_at(index));
 339         verify_legal_class_name(class_name, CHECK_(nullHandle));
 340         break;
 341       }
 342       case JVM_CONSTANT_Fieldref:
 343       case JVM_CONSTANT_Methodref:
 344       case JVM_CONSTANT_InterfaceMethodref: {
 345         int name_and_type_ref_index = cp->name_and_type_ref_index_at(index);
 346         // already verified to be utf8
 347         int name_ref_index = cp->name_ref_index_at(name_and_type_ref_index);
 348         // already verified to be utf8
 349         int signature_ref_index = cp->signature_ref_index_at(name_and_type_ref_index);
 350         symbolHandle name(THREAD, cp->symbol_at(name_ref_index));
 351         symbolHandle signature(THREAD, cp->symbol_at(signature_ref_index));
 352         if (tag == JVM_CONSTANT_Fieldref) {
 353           verify_legal_field_name(name, CHECK_(nullHandle));
 354           verify_legal_field_signature(name, signature, CHECK_(nullHandle));
 355         } else {
 356           verify_legal_method_name(name, CHECK_(nullHandle));
 357           verify_legal_method_signature(name, signature, CHECK_(nullHandle));
 358           if (tag == JVM_CONSTANT_Methodref) {
 359             // 4509014: If a class method name begins with '<', it must be "<init>".
 360             assert(!name.is_null(), "method name in constant pool is null");
 361             unsigned int name_len = name->utf8_length();
 362             assert(name_len > 0, "bad method name");  // already verified as legal name
 363             if (name->byte_at(0) == '<') {
 364               if (name() != vmSymbols::object_initializer_name()) {
 365                 classfile_parse_error(
 366                   "Bad method name at constant pool index %u in class file %s",
 367                   name_ref_index, CHECK_(nullHandle));
 368               }
 369             }
 370           }
 371         }
 372         break;
 373       }
 374     }  // end of switch
 375   }  // end of for
 376 
 377   return cp;
 378 }
 379 
 380 
 381 class NameSigHash: public ResourceObj {
 382  public:
 383   symbolOop     _name;       // name
 384   symbolOop     _sig;        // signature
 385   NameSigHash*  _next;       // Next entry in hash table
 386 };
 387 
 388 
 389 #define HASH_ROW_SIZE 256
 390 
 391 unsigned int hash(symbolOop name, symbolOop sig) {
 392   unsigned int raw_hash = 0;
 393   raw_hash += ((unsigned int)(uintptr_t)name) >> (LogHeapWordSize + 2);
 394   raw_hash += ((unsigned int)(uintptr_t)sig) >> LogHeapWordSize;
 395 
 396   return (raw_hash + (unsigned int)(uintptr_t)name) % HASH_ROW_SIZE;
 397 }
 398 
 399 
 400 void initialize_hashtable(NameSigHash** table) {
 401   memset((void*)table, 0, sizeof(NameSigHash*) * HASH_ROW_SIZE);
 402 }
 403 
 404 // Return false if the name/sig combination is found in table.
 405 // Return true if no duplicate is found. And name/sig is added as a new entry in table.
 406 // The old format checker uses heap sort to find duplicates.
 407 // NOTE: caller should guarantee that GC doesn't happen during the life cycle
 408 // of table since we don't expect symbolOop's to move.
 409 bool put_after_lookup(symbolOop name, symbolOop sig, NameSigHash** table) {
 410   assert(name != NULL, "name in constant pool is NULL");
 411 
 412   // First lookup for duplicates
 413   int index = hash(name, sig);
 414   NameSigHash* entry = table[index];
 415   while (entry != NULL) {
 416     if (entry->_name == name && entry->_sig == sig) {
 417       return false;
 418     }
 419     entry = entry->_next;
 420   }
 421 
 422   // No duplicate is found, allocate a new entry and fill it.
 423   entry = new NameSigHash();
 424   entry->_name = name;
 425   entry->_sig = sig;
 426 
 427   // Insert into hash table
 428   entry->_next = table[index];
 429   table[index] = entry;
 430 
 431   return true;
 432 }
 433 
 434 
 435 objArrayHandle ClassFileParser::parse_interfaces(constantPoolHandle cp,
 436                                                  int length,
 437                                                  Handle class_loader,
 438                                                  Handle protection_domain,
 439                                                  PerfTraceTime* vmtimer,
 440                                                  symbolHandle class_name,
 441                                                  TRAPS) {
 442   ClassFileStream* cfs = stream();
 443   assert(length > 0, "only called for length>0");
 444   objArrayHandle nullHandle;
 445   objArrayOop interface_oop = oopFactory::new_system_objArray(length, CHECK_(nullHandle));
 446   objArrayHandle interfaces (THREAD, interface_oop);
 447 
 448   int index;
 449   for (index = 0; index < length; index++) {
 450     u2 interface_index = cfs->get_u2(CHECK_(nullHandle));
 451     check_property(
 452       valid_cp_range(interface_index, cp->length()) &&
 453         cp->tag_at(interface_index).is_unresolved_klass(),
 454       "Interface name has bad constant pool index %u in class file %s",
 455       interface_index, CHECK_(nullHandle));
 456     symbolHandle unresolved_klass (THREAD, cp->klass_name_at(interface_index));
 457 
 458     // Don't need to check legal name because it's checked when parsing constant pool.
 459     // But need to make sure it's not an array type.
 460     guarantee_property(unresolved_klass->byte_at(0) != JVM_SIGNATURE_ARRAY,
 461                        "Bad interface name in class file %s", CHECK_(nullHandle));
 462 
 463     vmtimer->suspend();  // do not count recursive loading twice
 464     // Call resolve_super so classcircularity is checked
 465     klassOop k = SystemDictionary::resolve_super_or_fail(class_name,
 466                   unresolved_klass, class_loader, protection_domain,
 467                   false, CHECK_(nullHandle));
 468     KlassHandle interf (THREAD, k);
 469     vmtimer->resume();
 470 
 471     if (!Klass::cast(interf())->is_interface()) {
 472       THROW_MSG_(vmSymbols::java_lang_IncompatibleClassChangeError(), "Implementing class", nullHandle);
 473     }
 474     interfaces->obj_at_put(index, interf());
 475   }
 476 
 477   if (!_need_verify || length <= 1) {
 478     return interfaces;
 479   }
 480 
 481   // Check if there's any duplicates in interfaces
 482   ResourceMark rm(THREAD);
 483   NameSigHash** interface_names = NEW_RESOURCE_ARRAY_IN_THREAD(
 484     THREAD, NameSigHash*, HASH_ROW_SIZE);
 485   initialize_hashtable(interface_names);
 486   bool dup = false;
 487   {
 488     debug_only(No_Safepoint_Verifier nsv;)
 489     for (index = 0; index < length; index++) {
 490       klassOop k = (klassOop)interfaces->obj_at(index);
 491       symbolOop name = instanceKlass::cast(k)->name();
 492       // If no duplicates, add (name, NULL) in hashtable interface_names.
 493       if (!put_after_lookup(name, NULL, interface_names)) {
 494         dup = true;
 495         break;
 496       }
 497     }
 498   }
 499   if (dup) {
 500     classfile_parse_error("Duplicate interface name in class file %s",
 501                           CHECK_(nullHandle));
 502   }
 503 
 504   return interfaces;
 505 }
 506 
 507 
 508 void ClassFileParser::verify_constantvalue(int constantvalue_index, int signature_index, constantPoolHandle cp, TRAPS) {
 509   // Make sure the constant pool entry is of a type appropriate to this field
 510   guarantee_property(
 511     (constantvalue_index > 0 &&
 512       constantvalue_index < cp->length()),
 513     "Bad initial value index %u in ConstantValue attribute in class file %s",
 514     constantvalue_index, CHECK);
 515   constantTag value_type = cp->tag_at(constantvalue_index);
 516   switch ( cp->basic_type_for_signature_at(signature_index) ) {
 517     case T_LONG:
 518       guarantee_property(value_type.is_long(), "Inconsistent constant value type in class file %s", CHECK);
 519       break;
 520     case T_FLOAT:
 521       guarantee_property(value_type.is_float(), "Inconsistent constant value type in class file %s", CHECK);
 522       break;
 523     case T_DOUBLE:
 524       guarantee_property(value_type.is_double(), "Inconsistent constant value type in class file %s", CHECK);
 525       break;
 526     case T_BYTE: case T_CHAR: case T_SHORT: case T_BOOLEAN: case T_INT:
 527       guarantee_property(value_type.is_int(), "Inconsistent constant value type in class file %s", CHECK);
 528       break;
 529     case T_OBJECT:
 530       guarantee_property((cp->symbol_at(signature_index)->equals("Ljava/lang/String;", 18)
 531                          && (value_type.is_string() || value_type.is_unresolved_string())),
 532                          "Bad string initial value in class file %s", CHECK);
 533       break;
 534     default:
 535       classfile_parse_error(
 536         "Unable to set initial value %u in class file %s",
 537         constantvalue_index, CHECK);
 538   }
 539 }
 540 
 541 
 542 // Parse attributes for a field.
 543 void ClassFileParser::parse_field_attributes(constantPoolHandle cp,
 544                                              u2 attributes_count,
 545                                              bool is_static, u2 signature_index,
 546                                              u2* constantvalue_index_addr,
 547                                              bool* is_synthetic_addr,
 548                                              u2* generic_signature_index_addr,
 549                                              typeArrayHandle* field_annotations,
 550                                              TRAPS) {
 551   ClassFileStream* cfs = stream();
 552   assert(attributes_count > 0, "length should be greater than 0");
 553   u2 constantvalue_index = 0;
 554   u2 generic_signature_index = 0;
 555   bool is_synthetic = false;
 556   u1* runtime_visible_annotations = NULL;
 557   int runtime_visible_annotations_length = 0;
 558   u1* runtime_invisible_annotations = NULL;
 559   int runtime_invisible_annotations_length = 0;
 560   while (attributes_count--) {
 561     cfs->guarantee_more(6, CHECK);  // attribute_name_index, attribute_length
 562     u2 attribute_name_index = cfs->get_u2_fast();
 563     u4 attribute_length = cfs->get_u4_fast();
 564     check_property(valid_cp_range(attribute_name_index, cp->length()) &&
 565                    cp->tag_at(attribute_name_index).is_utf8(),
 566                    "Invalid field attribute index %u in class file %s",
 567                    attribute_name_index,
 568                    CHECK);
 569     symbolOop attribute_name = cp->symbol_at(attribute_name_index);
 570     if (is_static && attribute_name == vmSymbols::tag_constant_value()) {
 571       // ignore if non-static
 572       if (constantvalue_index != 0) {
 573         classfile_parse_error("Duplicate ConstantValue attribute in class file %s", CHECK);
 574       }
 575       check_property(
 576         attribute_length == 2,
 577         "Invalid ConstantValue field attribute length %u in class file %s",
 578         attribute_length, CHECK);
 579       constantvalue_index = cfs->get_u2(CHECK);
 580       if (_need_verify) {
 581         verify_constantvalue(constantvalue_index, signature_index, cp, CHECK);
 582       }
 583     } else if (attribute_name == vmSymbols::tag_synthetic()) {
 584       if (attribute_length != 0) {
 585         classfile_parse_error(
 586           "Invalid Synthetic field attribute length %u in class file %s",
 587           attribute_length, CHECK);
 588       }
 589       is_synthetic = true;
 590     } else if (attribute_name == vmSymbols::tag_deprecated()) { // 4276120
 591       if (attribute_length != 0) {
 592         classfile_parse_error(
 593           "Invalid Deprecated field attribute length %u in class file %s",
 594           attribute_length, CHECK);
 595       }
 596     } else if (_major_version >= JAVA_1_5_VERSION) {
 597       if (attribute_name == vmSymbols::tag_signature()) {
 598         if (attribute_length != 2) {
 599           classfile_parse_error(
 600             "Wrong size %u for field's Signature attribute in class file %s",
 601             attribute_length, CHECK);
 602         }
 603         generic_signature_index = cfs->get_u2(CHECK);
 604       } else if (attribute_name == vmSymbols::tag_runtime_visible_annotations()) {
 605         runtime_visible_annotations_length = attribute_length;
 606         runtime_visible_annotations = cfs->get_u1_buffer();
 607         assert(runtime_visible_annotations != NULL, "null visible annotations");
 608         cfs->skip_u1(runtime_visible_annotations_length, CHECK);
 609       } else if (PreserveAllAnnotations && attribute_name == vmSymbols::tag_runtime_invisible_annotations()) {
 610         runtime_invisible_annotations_length = attribute_length;
 611         runtime_invisible_annotations = cfs->get_u1_buffer();
 612         assert(runtime_invisible_annotations != NULL, "null invisible annotations");
 613         cfs->skip_u1(runtime_invisible_annotations_length, CHECK);
 614       } else {
 615         cfs->skip_u1(attribute_length, CHECK);  // Skip unknown attributes
 616       }
 617     } else {
 618       cfs->skip_u1(attribute_length, CHECK);  // Skip unknown attributes
 619     }
 620   }
 621 
 622   *constantvalue_index_addr = constantvalue_index;
 623   *is_synthetic_addr = is_synthetic;
 624   *generic_signature_index_addr = generic_signature_index;
 625   *field_annotations = assemble_annotations(runtime_visible_annotations,
 626                                             runtime_visible_annotations_length,
 627                                             runtime_invisible_annotations,
 628                                             runtime_invisible_annotations_length,
 629                                             CHECK);
 630   return;
 631 }
 632 
 633 
 634 // Field allocation types. Used for computing field offsets.
 635 
 636 enum FieldAllocationType {
 637   STATIC_OOP,           // Oops
 638   STATIC_BYTE,          // Boolean, Byte, char
 639   STATIC_SHORT,         // shorts
 640   STATIC_WORD,          // ints
 641   STATIC_DOUBLE,        // long or double
 642   STATIC_ALIGNED_DOUBLE,// aligned long or double
 643   NONSTATIC_OOP,
 644   NONSTATIC_BYTE,
 645   NONSTATIC_SHORT,
 646   NONSTATIC_WORD,
 647   NONSTATIC_DOUBLE,
 648   NONSTATIC_ALIGNED_DOUBLE
 649 };
 650 
 651 
 652 struct FieldAllocationCount {
 653   int static_oop_count;
 654   int static_byte_count;
 655   int static_short_count;
 656   int static_word_count;
 657   int static_double_count;
 658   int nonstatic_oop_count;
 659   int nonstatic_byte_count;
 660   int nonstatic_short_count;
 661   int nonstatic_word_count;
 662   int nonstatic_double_count;
 663 };
 664 
 665 typeArrayHandle ClassFileParser::parse_fields(constantPoolHandle cp, bool is_interface,
 666                                               struct FieldAllocationCount *fac,
 667                                               objArrayHandle* fields_annotations, TRAPS) {
 668   ClassFileStream* cfs = stream();
 669   typeArrayHandle nullHandle;
 670   cfs->guarantee_more(2, CHECK_(nullHandle));  // length
 671   u2 length = cfs->get_u2_fast();
 672   // Tuples of shorts [access, name index, sig index, initial value index, byte offset, generic signature index]
 673   typeArrayOop new_fields = oopFactory::new_permanent_shortArray(length*instanceKlass::next_offset, CHECK_(nullHandle));
 674   typeArrayHandle fields(THREAD, new_fields);
 675 
 676   int index = 0;
 677   typeArrayHandle field_annotations;
 678   for (int n = 0; n < length; n++) {
 679     cfs->guarantee_more(8, CHECK_(nullHandle));  // access_flags, name_index, descriptor_index, attributes_count
 680 
 681     AccessFlags access_flags;
 682     jint flags = cfs->get_u2_fast() & JVM_RECOGNIZED_FIELD_MODIFIERS;
 683     verify_legal_field_modifiers(flags, is_interface, CHECK_(nullHandle));
 684     access_flags.set_flags(flags);
 685 
 686     u2 name_index = cfs->get_u2_fast();
 687     int cp_size = cp->length();
 688     check_property(
 689       valid_cp_range(name_index, cp_size) && cp->tag_at(name_index).is_utf8(),
 690       "Invalid constant pool index %u for field name in class file %s",
 691       name_index, CHECK_(nullHandle));
 692     symbolHandle name(THREAD, cp->symbol_at(name_index));
 693     verify_legal_field_name(name, CHECK_(nullHandle));
 694 
 695     u2 signature_index = cfs->get_u2_fast();
 696     check_property(
 697       valid_cp_range(signature_index, cp_size) &&
 698         cp->tag_at(signature_index).is_utf8(),
 699       "Invalid constant pool index %u for field signature in class file %s",
 700       signature_index, CHECK_(nullHandle));
 701     symbolHandle sig(THREAD, cp->symbol_at(signature_index));
 702     verify_legal_field_signature(name, sig, CHECK_(nullHandle));
 703 
 704     u2 constantvalue_index = 0;
 705     bool is_synthetic = false;
 706     u2 generic_signature_index = 0;
 707     bool is_static = access_flags.is_static();
 708 
 709     u2 attributes_count = cfs->get_u2_fast();
 710     if (attributes_count > 0) {
 711       parse_field_attributes(cp, attributes_count, is_static, signature_index,
 712                              &constantvalue_index, &is_synthetic,
 713                              &generic_signature_index, &field_annotations,
 714                              CHECK_(nullHandle));
 715       if (field_annotations.not_null()) {
 716         if (fields_annotations->is_null()) {
 717           objArrayOop md = oopFactory::new_system_objArray(length, CHECK_(nullHandle));
 718           *fields_annotations = objArrayHandle(THREAD, md);
 719         }
 720         (*fields_annotations)->obj_at_put(n, field_annotations());
 721       }
 722       if (is_synthetic) {
 723         access_flags.set_is_synthetic();
 724       }
 725     }
 726 
 727     fields->short_at_put(index++, access_flags.as_short());
 728     fields->short_at_put(index++, name_index);
 729     fields->short_at_put(index++, signature_index);
 730     fields->short_at_put(index++, constantvalue_index);
 731 
 732     // Remember how many oops we encountered and compute allocation type
 733     BasicType type = cp->basic_type_for_signature_at(signature_index);
 734     FieldAllocationType atype;
 735     if ( is_static ) {
 736       switch ( type ) {
 737         case  T_BOOLEAN:
 738         case  T_BYTE:
 739           fac->static_byte_count++;
 740           atype = STATIC_BYTE;
 741           break;
 742         case  T_LONG:
 743         case  T_DOUBLE:
 744           if (Universe::field_type_should_be_aligned(type)) {
 745             atype = STATIC_ALIGNED_DOUBLE;
 746           } else {
 747             atype = STATIC_DOUBLE;
 748           }
 749           fac->static_double_count++;
 750           break;
 751         case  T_CHAR:
 752         case  T_SHORT:
 753           fac->static_short_count++;
 754           atype = STATIC_SHORT;
 755           break;
 756         case  T_FLOAT:
 757         case  T_INT:
 758           fac->static_word_count++;
 759           atype = STATIC_WORD;
 760           break;
 761         case  T_ARRAY:
 762         case  T_OBJECT:
 763           fac->static_oop_count++;
 764           atype = STATIC_OOP;
 765           break;
 766         case  T_ADDRESS:
 767         case  T_VOID:
 768         default:
 769           assert(0, "bad field type");
 770       }
 771     } else {
 772       switch ( type ) {
 773         case  T_BOOLEAN:
 774         case  T_BYTE:
 775           fac->nonstatic_byte_count++;
 776           atype = NONSTATIC_BYTE;
 777           break;
 778         case  T_LONG:
 779         case  T_DOUBLE:
 780           if (Universe::field_type_should_be_aligned(type)) {
 781             atype = NONSTATIC_ALIGNED_DOUBLE;
 782           } else {
 783             atype = NONSTATIC_DOUBLE;
 784           }
 785           fac->nonstatic_double_count++;
 786           break;
 787         case  T_CHAR:
 788         case  T_SHORT:
 789           fac->nonstatic_short_count++;
 790           atype = NONSTATIC_SHORT;
 791           break;
 792         case  T_FLOAT:
 793         case  T_INT:
 794           fac->nonstatic_word_count++;
 795           atype = NONSTATIC_WORD;
 796           break;
 797         case  T_ARRAY:
 798         case  T_OBJECT:
 799           fac->nonstatic_oop_count++;
 800           atype = NONSTATIC_OOP;
 801           break;
 802         case  T_ADDRESS:
 803         case  T_VOID:
 804         default:
 805           assert(0, "bad field type");
 806       }
 807     }
 808 
 809     // The correct offset is computed later (all oop fields will be located together)
 810     // We temporarily store the allocation type in the offset field
 811     fields->short_at_put(index++, atype);
 812     fields->short_at_put(index++, 0);  // Clear out high word of byte offset
 813     fields->short_at_put(index++, generic_signature_index);
 814   }
 815 
 816   if (_need_verify && length > 1) {
 817     // Check duplicated fields
 818     ResourceMark rm(THREAD);
 819     NameSigHash** names_and_sigs = NEW_RESOURCE_ARRAY_IN_THREAD(
 820       THREAD, NameSigHash*, HASH_ROW_SIZE);
 821     initialize_hashtable(names_and_sigs);
 822     bool dup = false;
 823     {
 824       debug_only(No_Safepoint_Verifier nsv;)
 825       for (int i = 0; i < length*instanceKlass::next_offset; i += instanceKlass::next_offset) {
 826         int name_index = fields->ushort_at(i + instanceKlass::name_index_offset);
 827         symbolOop name = cp->symbol_at(name_index);
 828         int sig_index = fields->ushort_at(i + instanceKlass::signature_index_offset);
 829         symbolOop sig = cp->symbol_at(sig_index);
 830         // If no duplicates, add name/signature in hashtable names_and_sigs.
 831         if (!put_after_lookup(name, sig, names_and_sigs)) {
 832           dup = true;
 833           break;
 834         }
 835       }
 836     }
 837     if (dup) {
 838       classfile_parse_error("Duplicate field name&signature in class file %s",
 839                             CHECK_(nullHandle));
 840     }
 841   }
 842 
 843   return fields;
 844 }
 845 
 846 
 847 static void copy_u2_with_conversion(u2* dest, u2* src, int length) {
 848   while (length-- > 0) {
 849     *dest++ = Bytes::get_Java_u2((u1*) (src++));
 850   }
 851 }
 852 
 853 
 854 typeArrayHandle ClassFileParser::parse_exception_table(u4 code_length,
 855                                                        u4 exception_table_length,
 856                                                        constantPoolHandle cp,
 857                                                        TRAPS) {
 858   ClassFileStream* cfs = stream();
 859   typeArrayHandle nullHandle;
 860 
 861   // 4-tuples of ints [start_pc, end_pc, handler_pc, catch_type index]
 862   typeArrayOop eh = oopFactory::new_permanent_intArray(exception_table_length*4, CHECK_(nullHandle));
 863   typeArrayHandle exception_handlers = typeArrayHandle(THREAD, eh);
 864 
 865   int index = 0;
 866   cfs->guarantee_more(8 * exception_table_length, CHECK_(nullHandle)); // start_pc, end_pc, handler_pc, catch_type_index
 867   for (unsigned int i = 0; i < exception_table_length; i++) {
 868     u2 start_pc = cfs->get_u2_fast();
 869     u2 end_pc = cfs->get_u2_fast();
 870     u2 handler_pc = cfs->get_u2_fast();
 871     u2 catch_type_index = cfs->get_u2_fast();
 872     // Will check legal target after parsing code array in verifier.
 873     if (_need_verify) {
 874       guarantee_property((start_pc < end_pc) && (end_pc <= code_length),
 875                          "Illegal exception table range in class file %s", CHECK_(nullHandle));
 876       guarantee_property(handler_pc < code_length,
 877                          "Illegal exception table handler in class file %s", CHECK_(nullHandle));
 878       if (catch_type_index != 0) {
 879         guarantee_property(valid_cp_range(catch_type_index, cp->length()) &&
 880                           (cp->tag_at(catch_type_index).is_klass() ||
 881                            cp->tag_at(catch_type_index).is_unresolved_klass()),
 882                            "Catch type in exception table has bad constant type in class file %s", CHECK_(nullHandle));
 883       }
 884     }
 885     exception_handlers->int_at_put(index++, start_pc);
 886     exception_handlers->int_at_put(index++, end_pc);
 887     exception_handlers->int_at_put(index++, handler_pc);
 888     exception_handlers->int_at_put(index++, catch_type_index);
 889   }
 890   return exception_handlers;
 891 }
 892 
 893 void ClassFileParser::parse_linenumber_table(
 894     u4 code_attribute_length, u4 code_length,
 895     CompressedLineNumberWriteStream** write_stream, TRAPS) {
 896   ClassFileStream* cfs = stream();
 897   unsigned int num_entries = cfs->get_u2(CHECK);
 898 
 899   // Each entry is a u2 start_pc, and a u2 line_number
 900   unsigned int length_in_bytes = num_entries * (sizeof(u2) + sizeof(u2));
 901 
 902   // Verify line number attribute and table length
 903   check_property(
 904     code_attribute_length == sizeof(u2) + length_in_bytes,
 905     "LineNumberTable attribute has wrong length in class file %s", CHECK);
 906 
 907   cfs->guarantee_more(length_in_bytes, CHECK);
 908 
 909   if ((*write_stream) == NULL) {
 910     if (length_in_bytes > fixed_buffer_size) {
 911       (*write_stream) = new CompressedLineNumberWriteStream(length_in_bytes);
 912     } else {
 913       (*write_stream) = new CompressedLineNumberWriteStream(
 914         linenumbertable_buffer, fixed_buffer_size);
 915     }
 916   }
 917 
 918   while (num_entries-- > 0) {
 919     u2 bci  = cfs->get_u2_fast(); // start_pc
 920     u2 line = cfs->get_u2_fast(); // line_number
 921     guarantee_property(bci < code_length,
 922         "Invalid pc in LineNumberTable in class file %s", CHECK);
 923     (*write_stream)->write_pair(bci, line);
 924   }
 925 }
 926 
 927 
 928 // Class file LocalVariableTable elements.
 929 class Classfile_LVT_Element VALUE_OBJ_CLASS_SPEC {
 930  public:
 931   u2 start_bci;
 932   u2 length;
 933   u2 name_cp_index;
 934   u2 descriptor_cp_index;
 935   u2 slot;
 936 };
 937 
 938 
 939 class LVT_Hash: public CHeapObj {
 940  public:
 941   LocalVariableTableElement  *_elem;  // element
 942   LVT_Hash*                   _next;  // Next entry in hash table
 943 };
 944 
 945 unsigned int hash(LocalVariableTableElement *elem) {
 946   unsigned int raw_hash = elem->start_bci;
 947 
 948   raw_hash = elem->length        + raw_hash * 37;
 949   raw_hash = elem->name_cp_index + raw_hash * 37;
 950   raw_hash = elem->slot          + raw_hash * 37;
 951 
 952   return raw_hash % HASH_ROW_SIZE;
 953 }
 954 
 955 void initialize_hashtable(LVT_Hash** table) {
 956   for (int i = 0; i < HASH_ROW_SIZE; i++) {
 957     table[i] = NULL;
 958   }
 959 }
 960 
 961 void clear_hashtable(LVT_Hash** table) {
 962   for (int i = 0; i < HASH_ROW_SIZE; i++) {
 963     LVT_Hash* current = table[i];
 964     LVT_Hash* next;
 965     while (current != NULL) {
 966       next = current->_next;
 967       current->_next = NULL;
 968       delete(current);
 969       current = next;
 970     }
 971     table[i] = NULL;
 972   }
 973 }
 974 
 975 LVT_Hash* LVT_lookup(LocalVariableTableElement *elem, int index, LVT_Hash** table) {
 976   LVT_Hash* entry = table[index];
 977 
 978   /*
 979    * 3-tuple start_bci/length/slot has to be unique key,
 980    * so the following comparison seems to be redundant:
 981    *       && elem->name_cp_index == entry->_elem->name_cp_index
 982    */
 983   while (entry != NULL) {
 984     if (elem->start_bci           == entry->_elem->start_bci
 985      && elem->length              == entry->_elem->length
 986      && elem->name_cp_index       == entry->_elem->name_cp_index
 987      && elem->slot                == entry->_elem->slot
 988     ) {
 989       return entry;
 990     }
 991     entry = entry->_next;
 992   }
 993   return NULL;
 994 }
 995 
 996 // Return false if the local variable is found in table.
 997 // Return true if no duplicate is found.
 998 // And local variable is added as a new entry in table.
 999 bool LVT_put_after_lookup(LocalVariableTableElement *elem, LVT_Hash** table) {
1000   // First lookup for duplicates
1001   int index = hash(elem);
1002   LVT_Hash* entry = LVT_lookup(elem, index, table);
1003 
1004   if (entry != NULL) {
1005       return false;
1006   }
1007   // No duplicate is found, allocate a new entry and fill it.
1008   if ((entry = new LVT_Hash()) == NULL) {
1009     return false;
1010   }
1011   entry->_elem = elem;
1012 
1013   // Insert into hash table
1014   entry->_next = table[index];
1015   table[index] = entry;
1016 
1017   return true;
1018 }
1019 
1020 void copy_lvt_element(Classfile_LVT_Element *src, LocalVariableTableElement *lvt) {
1021   lvt->start_bci           = Bytes::get_Java_u2((u1*) &src->start_bci);
1022   lvt->length              = Bytes::get_Java_u2((u1*) &src->length);
1023   lvt->name_cp_index       = Bytes::get_Java_u2((u1*) &src->name_cp_index);
1024   lvt->descriptor_cp_index = Bytes::get_Java_u2((u1*) &src->descriptor_cp_index);
1025   lvt->signature_cp_index  = 0;
1026   lvt->slot                = Bytes::get_Java_u2((u1*) &src->slot);
1027 }
1028 
1029 // Function is used to parse both attributes:
1030 //       LocalVariableTable (LVT) and LocalVariableTypeTable (LVTT)
1031 u2* ClassFileParser::parse_localvariable_table(u4 code_length,
1032                                                u2 max_locals,
1033                                                u4 code_attribute_length,
1034                                                constantPoolHandle cp,
1035                                                u2* localvariable_table_length,
1036                                                bool isLVTT,
1037                                                TRAPS) {
1038   ClassFileStream* cfs = stream();
1039   const char * tbl_name = (isLVTT) ? "LocalVariableTypeTable" : "LocalVariableTable";
1040   *localvariable_table_length = cfs->get_u2(CHECK_NULL);
1041   unsigned int size = (*localvariable_table_length) * sizeof(Classfile_LVT_Element) / sizeof(u2);
1042   // Verify local variable table attribute has right length
1043   if (_need_verify) {
1044     guarantee_property(code_attribute_length == (sizeof(*localvariable_table_length) + size * sizeof(u2)),
1045                        "%s has wrong length in class file %s", tbl_name, CHECK_NULL);
1046   }
1047   u2* localvariable_table_start = cfs->get_u2_buffer();
1048   assert(localvariable_table_start != NULL, "null local variable table");
1049   if (!_need_verify) {
1050     cfs->skip_u2_fast(size);
1051   } else {
1052     cfs->guarantee_more(size * 2, CHECK_NULL);
1053     for(int i = 0; i < (*localvariable_table_length); i++) {
1054       u2 start_pc = cfs->get_u2_fast();
1055       u2 length = cfs->get_u2_fast();
1056       u2 name_index = cfs->get_u2_fast();
1057       u2 descriptor_index = cfs->get_u2_fast();
1058       u2 index = cfs->get_u2_fast();
1059       // Assign to a u4 to avoid overflow
1060       u4 end_pc = (u4)start_pc + (u4)length;
1061 
1062       if (start_pc >= code_length) {
1063         classfile_parse_error(
1064           "Invalid start_pc %u in %s in class file %s",
1065           start_pc, tbl_name, CHECK_NULL);
1066       }
1067       if (end_pc > code_length) {
1068         classfile_parse_error(
1069           "Invalid length %u in %s in class file %s",
1070           length, tbl_name, CHECK_NULL);
1071       }
1072       int cp_size = cp->length();
1073       guarantee_property(
1074         valid_cp_range(name_index, cp_size) &&
1075           cp->tag_at(name_index).is_utf8(),
1076         "Name index %u in %s has bad constant type in class file %s",
1077         name_index, tbl_name, CHECK_NULL);
1078       guarantee_property(
1079         valid_cp_range(descriptor_index, cp_size) &&
1080           cp->tag_at(descriptor_index).is_utf8(),
1081         "Signature index %u in %s has bad constant type in class file %s",
1082         descriptor_index, tbl_name, CHECK_NULL);
1083 
1084       symbolHandle name(THREAD, cp->symbol_at(name_index));
1085       symbolHandle sig(THREAD, cp->symbol_at(descriptor_index));
1086       verify_legal_field_name(name, CHECK_NULL);
1087       u2 extra_slot = 0;
1088       if (!isLVTT) {
1089         verify_legal_field_signature(name, sig, CHECK_NULL);
1090 
1091         // 4894874: check special cases for double and long local variables
1092         if (sig() == vmSymbols::type_signature(T_DOUBLE) ||
1093             sig() == vmSymbols::type_signature(T_LONG)) {
1094           extra_slot = 1;
1095         }
1096       }
1097       guarantee_property((index + extra_slot) < max_locals,
1098                           "Invalid index %u in %s in class file %s",
1099                           index, tbl_name, CHECK_NULL);
1100     }
1101   }
1102   return localvariable_table_start;
1103 }
1104 
1105 
1106 void ClassFileParser::parse_type_array(u2 array_length, u4 code_length, u4* u1_index, u4* u2_index,
1107                                       u1* u1_array, u2* u2_array, constantPoolHandle cp, TRAPS) {
1108   ClassFileStream* cfs = stream();
1109   u2 index = 0; // index in the array with long/double occupying two slots
1110   u4 i1 = *u1_index;
1111   u4 i2 = *u2_index + 1;
1112   for(int i = 0; i < array_length; i++) {
1113     u1 tag = u1_array[i1++] = cfs->get_u1(CHECK);
1114     index++;
1115     if (tag == ITEM_Long || tag == ITEM_Double) {
1116       index++;
1117     } else if (tag == ITEM_Object) {
1118       u2 class_index = u2_array[i2++] = cfs->get_u2(CHECK);
1119       guarantee_property(valid_cp_range(class_index, cp->length()) &&
1120                          cp->tag_at(class_index).is_unresolved_klass(),
1121                          "Bad class index %u in StackMap in class file %s",
1122                          class_index, CHECK);
1123     } else if (tag == ITEM_Uninitialized) {
1124       u2 offset = u2_array[i2++] = cfs->get_u2(CHECK);
1125       guarantee_property(
1126         offset < code_length,
1127         "Bad uninitialized type offset %u in StackMap in class file %s",
1128         offset, CHECK);
1129     } else {
1130       guarantee_property(
1131         tag <= (u1)ITEM_Uninitialized,
1132         "Unknown variable type %u in StackMap in class file %s",
1133         tag, CHECK);
1134     }
1135   }
1136   u2_array[*u2_index] = index;
1137   *u1_index = i1;
1138   *u2_index = i2;
1139 }
1140 
1141 typeArrayOop ClassFileParser::parse_stackmap_table(
1142     u4 code_attribute_length, TRAPS) {
1143   if (code_attribute_length == 0)
1144     return NULL;
1145 
1146   ClassFileStream* cfs = stream();
1147   u1* stackmap_table_start = cfs->get_u1_buffer();
1148   assert(stackmap_table_start != NULL, "null stackmap table");
1149 
1150   // check code_attribute_length first
1151   stream()->skip_u1(code_attribute_length, CHECK_NULL);
1152 
1153   if (!_need_verify && !DumpSharedSpaces) {
1154     return NULL;
1155   }
1156 
1157   typeArrayOop stackmap_data =
1158     oopFactory::new_permanent_byteArray(code_attribute_length, CHECK_NULL);
1159 
1160   stackmap_data->set_length(code_attribute_length);
1161   memcpy((void*)stackmap_data->byte_at_addr(0),
1162          (void*)stackmap_table_start, code_attribute_length);
1163   return stackmap_data;
1164 }
1165 
1166 u2* ClassFileParser::parse_checked_exceptions(u2* checked_exceptions_length,
1167                                               u4 method_attribute_length,
1168                                               constantPoolHandle cp, TRAPS) {
1169   ClassFileStream* cfs = stream();
1170   cfs->guarantee_more(2, CHECK_NULL);  // checked_exceptions_length
1171   *checked_exceptions_length = cfs->get_u2_fast();
1172   unsigned int size = (*checked_exceptions_length) * sizeof(CheckedExceptionElement) / sizeof(u2);
1173   u2* checked_exceptions_start = cfs->get_u2_buffer();
1174   assert(checked_exceptions_start != NULL, "null checked exceptions");
1175   if (!_need_verify) {
1176     cfs->skip_u2_fast(size);
1177   } else {
1178     // Verify each value in the checked exception table
1179     u2 checked_exception;
1180     u2 len = *checked_exceptions_length;
1181     cfs->guarantee_more(2 * len, CHECK_NULL);
1182     for (int i = 0; i < len; i++) {
1183       checked_exception = cfs->get_u2_fast();
1184       check_property(
1185         valid_cp_range(checked_exception, cp->length()) &&
1186         cp->tag_at(checked_exception).is_klass_reference(),
1187         "Exception name has bad type at constant pool %u in class file %s",
1188         checked_exception, CHECK_NULL);
1189     }
1190   }
1191   // check exceptions attribute length
1192   if (_need_verify) {
1193     guarantee_property(method_attribute_length == (sizeof(*checked_exceptions_length) +
1194                                                    sizeof(u2) * size),
1195                       "Exceptions attribute has wrong length in class file %s", CHECK_NULL);
1196   }
1197   return checked_exceptions_start;
1198 }
1199 
1200 
1201 #define MAX_ARGS_SIZE 255
1202 #define MAX_CODE_SIZE 65535
1203 #define INITIAL_MAX_LVT_NUMBER 256
1204 
1205 // Note: the parse_method below is big and clunky because all parsing of the code and exceptions
1206 // attribute is inlined. This is curbersome to avoid since we inline most of the parts in the
1207 // methodOop to save footprint, so we only know the size of the resulting methodOop when the
1208 // entire method attribute is parsed.
1209 //
1210 // The promoted_flags parameter is used to pass relevant access_flags
1211 // from the method back up to the containing klass. These flag values
1212 // are added to klass's access_flags.
1213 
1214 methodHandle ClassFileParser::parse_method(constantPoolHandle cp, bool is_interface,
1215                                            AccessFlags *promoted_flags,
1216                                            typeArrayHandle* method_annotations,
1217                                            typeArrayHandle* method_parameter_annotations,
1218                                            typeArrayHandle* method_default_annotations,
1219                                            TRAPS) {
1220   ClassFileStream* cfs = stream();
1221   methodHandle nullHandle;
1222   ResourceMark rm(THREAD);
1223   // Parse fixed parts
1224   cfs->guarantee_more(8, CHECK_(nullHandle)); // access_flags, name_index, descriptor_index, attributes_count
1225 
1226   int flags = cfs->get_u2_fast();
1227   u2 name_index = cfs->get_u2_fast();
1228   int cp_size = cp->length();
1229   check_property(
1230     valid_cp_range(name_index, cp_size) &&
1231       cp->tag_at(name_index).is_utf8(),
1232     "Illegal constant pool index %u for method name in class file %s",
1233     name_index, CHECK_(nullHandle));
1234   symbolHandle name(THREAD, cp->symbol_at(name_index));
1235   verify_legal_method_name(name, CHECK_(nullHandle));
1236 
1237   u2 signature_index = cfs->get_u2_fast();
1238   guarantee_property(
1239     valid_cp_range(signature_index, cp_size) &&
1240       cp->tag_at(signature_index).is_utf8(),
1241     "Illegal constant pool index %u for method signature in class file %s",
1242     signature_index, CHECK_(nullHandle));
1243   symbolHandle signature(THREAD, cp->symbol_at(signature_index));
1244 
1245   AccessFlags access_flags;
1246   if (name == vmSymbols::class_initializer_name()) {
1247     // We ignore the access flags for a class initializer. (JVM Spec. p. 116)
1248     flags = JVM_ACC_STATIC;
1249   } else {
1250     verify_legal_method_modifiers(flags, is_interface, name, CHECK_(nullHandle));
1251   }
1252 
1253   int args_size = -1;  // only used when _need_verify is true
1254   if (_need_verify) {
1255     args_size = ((flags & JVM_ACC_STATIC) ? 0 : 1) +
1256                  verify_legal_method_signature(name, signature, CHECK_(nullHandle));
1257     if (args_size > MAX_ARGS_SIZE) {
1258       classfile_parse_error("Too many arguments in method signature in class file %s", CHECK_(nullHandle));
1259     }
1260   }
1261 
1262   access_flags.set_flags(flags & JVM_RECOGNIZED_METHOD_MODIFIERS);
1263 
1264   // Default values for code and exceptions attribute elements
1265   u2 max_stack = 0;
1266   u2 max_locals = 0;
1267   u4 code_length = 0;
1268   u1* code_start = 0;
1269   u2 exception_table_length = 0;
1270   typeArrayHandle exception_handlers(THREAD, Universe::the_empty_int_array());
1271   u2 checked_exceptions_length = 0;
1272   u2* checked_exceptions_start = NULL;
1273   CompressedLineNumberWriteStream* linenumber_table = NULL;
1274   int linenumber_table_length = 0;
1275   int total_lvt_length = 0;
1276   u2 lvt_cnt = 0;
1277   u2 lvtt_cnt = 0;
1278   bool lvt_allocated = false;
1279   u2 max_lvt_cnt = INITIAL_MAX_LVT_NUMBER;
1280   u2 max_lvtt_cnt = INITIAL_MAX_LVT_NUMBER;
1281   u2* localvariable_table_length;
1282   u2** localvariable_table_start;
1283   u2* localvariable_type_table_length;
1284   u2** localvariable_type_table_start;
1285   bool parsed_code_attribute = false;
1286   bool parsed_checked_exceptions_attribute = false;
1287   bool parsed_stackmap_attribute = false;
1288   // stackmap attribute - JDK1.5
1289   typeArrayHandle stackmap_data;
1290   u2 generic_signature_index = 0;
1291   u1* runtime_visible_annotations = NULL;
1292   int runtime_visible_annotations_length = 0;
1293   u1* runtime_invisible_annotations = NULL;
1294   int runtime_invisible_annotations_length = 0;
1295   u1* runtime_visible_parameter_annotations = NULL;
1296   int runtime_visible_parameter_annotations_length = 0;
1297   u1* runtime_invisible_parameter_annotations = NULL;
1298   int runtime_invisible_parameter_annotations_length = 0;
1299   u1* annotation_default = NULL;
1300   int annotation_default_length = 0;
1301 
1302   // Parse code and exceptions attribute
1303   u2 method_attributes_count = cfs->get_u2_fast();
1304   while (method_attributes_count--) {
1305     cfs->guarantee_more(6, CHECK_(nullHandle));  // method_attribute_name_index, method_attribute_length
1306     u2 method_attribute_name_index = cfs->get_u2_fast();
1307     u4 method_attribute_length = cfs->get_u4_fast();
1308     check_property(
1309       valid_cp_range(method_attribute_name_index, cp_size) &&
1310         cp->tag_at(method_attribute_name_index).is_utf8(),
1311       "Invalid method attribute name index %u in class file %s",
1312       method_attribute_name_index, CHECK_(nullHandle));
1313 
1314     symbolOop method_attribute_name = cp->symbol_at(method_attribute_name_index);
1315     if (method_attribute_name == vmSymbols::tag_code()) {
1316       // Parse Code attribute
1317       if (_need_verify) {
1318         guarantee_property(!access_flags.is_native() && !access_flags.is_abstract(),
1319                         "Code attribute in native or abstract methods in class file %s",
1320                          CHECK_(nullHandle));
1321       }
1322       if (parsed_code_attribute) {
1323         classfile_parse_error("Multiple Code attributes in class file %s", CHECK_(nullHandle));
1324       }
1325       parsed_code_attribute = true;
1326 
1327       // Stack size, locals size, and code size
1328       if (_major_version == 45 && _minor_version <= 2) {
1329         cfs->guarantee_more(4, CHECK_(nullHandle));
1330         max_stack = cfs->get_u1_fast();
1331         max_locals = cfs->get_u1_fast();
1332         code_length = cfs->get_u2_fast();
1333       } else {
1334         cfs->guarantee_more(8, CHECK_(nullHandle));
1335         max_stack = cfs->get_u2_fast();
1336         max_locals = cfs->get_u2_fast();
1337         code_length = cfs->get_u4_fast();
1338       }
1339       if (_need_verify) {
1340         guarantee_property(args_size <= max_locals,
1341                            "Arguments can't fit into locals in class file %s", CHECK_(nullHandle));
1342         guarantee_property(code_length > 0 && code_length <= MAX_CODE_SIZE,
1343                            "Invalid method Code length %u in class file %s",
1344                            code_length, CHECK_(nullHandle));
1345       }
1346       // Code pointer
1347       code_start = cfs->get_u1_buffer();
1348       assert(code_start != NULL, "null code start");
1349       cfs->guarantee_more(code_length, CHECK_(nullHandle));
1350       cfs->skip_u1_fast(code_length);
1351 
1352       // Exception handler table
1353       cfs->guarantee_more(2, CHECK_(nullHandle));  // exception_table_length
1354       exception_table_length = cfs->get_u2_fast();
1355       if (exception_table_length > 0) {
1356         exception_handlers =
1357               parse_exception_table(code_length, exception_table_length, cp, CHECK_(nullHandle));
1358       }
1359 
1360       // Parse additional attributes in code attribute
1361       cfs->guarantee_more(2, CHECK_(nullHandle));  // code_attributes_count
1362       u2 code_attributes_count = cfs->get_u2_fast();
1363 
1364       unsigned int calculated_attribute_length = 0;
1365 
1366       if (_major_version > 45 || (_major_version == 45 && _minor_version > 2)) {
1367         calculated_attribute_length =
1368             sizeof(max_stack) + sizeof(max_locals) + sizeof(code_length);
1369       } else {
1370         // max_stack, locals and length are smaller in pre-version 45.2 classes
1371         calculated_attribute_length = sizeof(u1) + sizeof(u1) + sizeof(u2);
1372       }
1373       calculated_attribute_length +=
1374         code_length +
1375         sizeof(exception_table_length) +
1376         sizeof(code_attributes_count) +
1377         exception_table_length *
1378             ( sizeof(u2) +   // start_pc
1379               sizeof(u2) +   // end_pc
1380               sizeof(u2) +   // handler_pc
1381               sizeof(u2) );  // catch_type_index
1382 
1383       while (code_attributes_count--) {
1384         cfs->guarantee_more(6, CHECK_(nullHandle));  // code_attribute_name_index, code_attribute_length
1385         u2 code_attribute_name_index = cfs->get_u2_fast();
1386         u4 code_attribute_length = cfs->get_u4_fast();
1387         calculated_attribute_length += code_attribute_length +
1388                                        sizeof(code_attribute_name_index) +
1389                                        sizeof(code_attribute_length);
1390         check_property(valid_cp_range(code_attribute_name_index, cp_size) &&
1391                        cp->tag_at(code_attribute_name_index).is_utf8(),
1392                        "Invalid code attribute name index %u in class file %s",
1393                        code_attribute_name_index,
1394                        CHECK_(nullHandle));
1395         if (LoadLineNumberTables &&
1396             cp->symbol_at(code_attribute_name_index) == vmSymbols::tag_line_number_table()) {
1397           // Parse and compress line number table
1398           parse_linenumber_table(code_attribute_length, code_length,
1399             &linenumber_table, CHECK_(nullHandle));
1400 
1401         } else if (LoadLocalVariableTables &&
1402                    cp->symbol_at(code_attribute_name_index) == vmSymbols::tag_local_variable_table()) {
1403           // Parse local variable table
1404           if (!lvt_allocated) {
1405             localvariable_table_length = NEW_RESOURCE_ARRAY_IN_THREAD(
1406               THREAD, u2,  INITIAL_MAX_LVT_NUMBER);
1407             localvariable_table_start = NEW_RESOURCE_ARRAY_IN_THREAD(
1408               THREAD, u2*, INITIAL_MAX_LVT_NUMBER);
1409             localvariable_type_table_length = NEW_RESOURCE_ARRAY_IN_THREAD(
1410               THREAD, u2,  INITIAL_MAX_LVT_NUMBER);
1411             localvariable_type_table_start = NEW_RESOURCE_ARRAY_IN_THREAD(
1412               THREAD, u2*, INITIAL_MAX_LVT_NUMBER);
1413             lvt_allocated = true;
1414           }
1415           if (lvt_cnt == max_lvt_cnt) {
1416             max_lvt_cnt <<= 1;
1417             REALLOC_RESOURCE_ARRAY(u2, localvariable_table_length, lvt_cnt, max_lvt_cnt);
1418             REALLOC_RESOURCE_ARRAY(u2*, localvariable_table_start, lvt_cnt, max_lvt_cnt);
1419           }
1420           localvariable_table_start[lvt_cnt] =
1421             parse_localvariable_table(code_length,
1422                                       max_locals,
1423                                       code_attribute_length,
1424                                       cp,
1425                                       &localvariable_table_length[lvt_cnt],
1426                                       false,    // is not LVTT
1427                                       CHECK_(nullHandle));
1428           total_lvt_length += localvariable_table_length[lvt_cnt];
1429           lvt_cnt++;
1430         } else if (LoadLocalVariableTypeTables &&
1431                    _major_version >= JAVA_1_5_VERSION &&
1432                    cp->symbol_at(code_attribute_name_index) == vmSymbols::tag_local_variable_type_table()) {
1433           if (!lvt_allocated) {
1434             localvariable_table_length = NEW_RESOURCE_ARRAY_IN_THREAD(
1435               THREAD, u2,  INITIAL_MAX_LVT_NUMBER);
1436             localvariable_table_start = NEW_RESOURCE_ARRAY_IN_THREAD(
1437               THREAD, u2*, INITIAL_MAX_LVT_NUMBER);
1438             localvariable_type_table_length = NEW_RESOURCE_ARRAY_IN_THREAD(
1439               THREAD, u2,  INITIAL_MAX_LVT_NUMBER);
1440             localvariable_type_table_start = NEW_RESOURCE_ARRAY_IN_THREAD(
1441               THREAD, u2*, INITIAL_MAX_LVT_NUMBER);
1442             lvt_allocated = true;
1443           }
1444           // Parse local variable type table
1445           if (lvtt_cnt == max_lvtt_cnt) {
1446             max_lvtt_cnt <<= 1;
1447             REALLOC_RESOURCE_ARRAY(u2, localvariable_type_table_length, lvtt_cnt, max_lvtt_cnt);
1448             REALLOC_RESOURCE_ARRAY(u2*, localvariable_type_table_start, lvtt_cnt, max_lvtt_cnt);
1449           }
1450           localvariable_type_table_start[lvtt_cnt] =
1451             parse_localvariable_table(code_length,
1452                                       max_locals,
1453                                       code_attribute_length,
1454                                       cp,
1455                                       &localvariable_type_table_length[lvtt_cnt],
1456                                       true,     // is LVTT
1457                                       CHECK_(nullHandle));
1458           lvtt_cnt++;
1459         } else if (UseSplitVerifier &&
1460                    _major_version >= Verifier::STACKMAP_ATTRIBUTE_MAJOR_VERSION &&
1461                    cp->symbol_at(code_attribute_name_index) == vmSymbols::tag_stack_map_table()) {
1462           // Stack map is only needed by the new verifier in JDK1.5.
1463           if (parsed_stackmap_attribute) {
1464             classfile_parse_error("Multiple StackMapTable attributes in class file %s", CHECK_(nullHandle));
1465           }
1466           typeArrayOop sm =
1467             parse_stackmap_table(code_attribute_length, CHECK_(nullHandle));
1468           stackmap_data = typeArrayHandle(THREAD, sm);
1469           parsed_stackmap_attribute = true;
1470         } else {
1471           // Skip unknown attributes
1472           cfs->skip_u1(code_attribute_length, CHECK_(nullHandle));
1473         }
1474       }
1475       // check method attribute length
1476       if (_need_verify) {
1477         guarantee_property(method_attribute_length == calculated_attribute_length,
1478                            "Code segment has wrong length in class file %s", CHECK_(nullHandle));
1479       }
1480     } else if (method_attribute_name == vmSymbols::tag_exceptions()) {
1481       // Parse Exceptions attribute
1482       if (parsed_checked_exceptions_attribute) {
1483         classfile_parse_error("Multiple Exceptions attributes in class file %s", CHECK_(nullHandle));
1484       }
1485       parsed_checked_exceptions_attribute = true;
1486       checked_exceptions_start =
1487             parse_checked_exceptions(&checked_exceptions_length,
1488                                      method_attribute_length,
1489                                      cp, CHECK_(nullHandle));
1490     } else if (method_attribute_name == vmSymbols::tag_synthetic()) {
1491       if (method_attribute_length != 0) {
1492         classfile_parse_error(
1493           "Invalid Synthetic method attribute length %u in class file %s",
1494           method_attribute_length, CHECK_(nullHandle));
1495       }
1496       // Should we check that there hasn't already been a synthetic attribute?
1497       access_flags.set_is_synthetic();
1498     } else if (method_attribute_name == vmSymbols::tag_deprecated()) { // 4276120
1499       if (method_attribute_length != 0) {
1500         classfile_parse_error(
1501           "Invalid Deprecated method attribute length %u in class file %s",
1502           method_attribute_length, CHECK_(nullHandle));
1503       }
1504     } else if (_major_version >= JAVA_1_5_VERSION) {
1505       if (method_attribute_name == vmSymbols::tag_signature()) {
1506         if (method_attribute_length != 2) {
1507           classfile_parse_error(
1508             "Invalid Signature attribute length %u in class file %s",
1509             method_attribute_length, CHECK_(nullHandle));
1510         }
1511         cfs->guarantee_more(2, CHECK_(nullHandle));  // generic_signature_index
1512         generic_signature_index = cfs->get_u2_fast();
1513       } else if (method_attribute_name == vmSymbols::tag_runtime_visible_annotations()) {
1514         runtime_visible_annotations_length = method_attribute_length;
1515         runtime_visible_annotations = cfs->get_u1_buffer();
1516         assert(runtime_visible_annotations != NULL, "null visible annotations");
1517         cfs->skip_u1(runtime_visible_annotations_length, CHECK_(nullHandle));
1518       } else if (PreserveAllAnnotations && method_attribute_name == vmSymbols::tag_runtime_invisible_annotations()) {
1519         runtime_invisible_annotations_length = method_attribute_length;
1520         runtime_invisible_annotations = cfs->get_u1_buffer();
1521         assert(runtime_invisible_annotations != NULL, "null invisible annotations");
1522         cfs->skip_u1(runtime_invisible_annotations_length, CHECK_(nullHandle));
1523       } else if (method_attribute_name == vmSymbols::tag_runtime_visible_parameter_annotations()) {
1524         runtime_visible_parameter_annotations_length = method_attribute_length;
1525         runtime_visible_parameter_annotations = cfs->get_u1_buffer();
1526         assert(runtime_visible_parameter_annotations != NULL, "null visible parameter annotations");
1527         cfs->skip_u1(runtime_visible_parameter_annotations_length, CHECK_(nullHandle));
1528       } else if (PreserveAllAnnotations && method_attribute_name == vmSymbols::tag_runtime_invisible_parameter_annotations()) {
1529         runtime_invisible_parameter_annotations_length = method_attribute_length;
1530         runtime_invisible_parameter_annotations = cfs->get_u1_buffer();
1531         assert(runtime_invisible_parameter_annotations != NULL, "null invisible parameter annotations");
1532         cfs->skip_u1(runtime_invisible_parameter_annotations_length, CHECK_(nullHandle));
1533       } else if (method_attribute_name == vmSymbols::tag_annotation_default()) {
1534         annotation_default_length = method_attribute_length;
1535         annotation_default = cfs->get_u1_buffer();
1536         assert(annotation_default != NULL, "null annotation default");
1537         cfs->skip_u1(annotation_default_length, CHECK_(nullHandle));
1538       } else {
1539         // Skip unknown attributes
1540         cfs->skip_u1(method_attribute_length, CHECK_(nullHandle));
1541       }
1542     } else {
1543       // Skip unknown attributes
1544       cfs->skip_u1(method_attribute_length, CHECK_(nullHandle));
1545     }
1546   }
1547 
1548   if (linenumber_table != NULL) {
1549     linenumber_table->write_terminator();
1550     linenumber_table_length = linenumber_table->position();
1551   }
1552 
1553   // Make sure there's at least one Code attribute in non-native/non-abstract method
1554   if (_need_verify) {
1555     guarantee_property(access_flags.is_native() || access_flags.is_abstract() || parsed_code_attribute,
1556                       "Absent Code attribute in method that is not native or abstract in class file %s", CHECK_(nullHandle));
1557   }
1558 
1559   // All sizing information for a methodOop is finally available, now create it
1560   methodOop m_oop  = oopFactory::new_method(
1561     code_length, access_flags, linenumber_table_length,
1562     total_lvt_length, checked_exceptions_length, CHECK_(nullHandle));
1563   methodHandle m (THREAD, m_oop);
1564 
1565   ClassLoadingService::add_class_method_size(m_oop->size()*HeapWordSize);
1566 
1567   // Fill in information from fixed part (access_flags already set)
1568   m->set_constants(cp());
1569   m->set_name_index(name_index);
1570   m->set_signature_index(signature_index);
1571   m->set_generic_signature_index(generic_signature_index);
1572 #ifdef CC_INTERP
1573   // hmm is there a gc issue here??
1574   ResultTypeFinder rtf(cp->symbol_at(signature_index));
1575   m->set_result_index(rtf.type());
1576 #endif
1577 
1578   if (args_size >= 0) {
1579     m->set_size_of_parameters(args_size);
1580   } else {
1581     m->compute_size_of_parameters(THREAD);
1582   }
1583 #ifdef ASSERT
1584   if (args_size >= 0) {
1585     m->compute_size_of_parameters(THREAD);
1586     assert(args_size == m->size_of_parameters(), "");
1587   }
1588 #endif
1589 
1590   // Fill in code attribute information
1591   m->set_max_stack(max_stack);
1592   m->set_max_locals(max_locals);
1593   m->constMethod()->set_stackmap_data(stackmap_data());
1594 
1595   /**
1596    * The exception_table field is the flag used to indicate
1597    * that the methodOop and it's associated constMethodOop are partially
1598    * initialized and thus are exempt from pre/post GC verification.  Once
1599    * the field is set, the oops are considered fully initialized so make
1600    * sure that the oops can pass verification when this field is set.
1601    */
1602   m->set_exception_table(exception_handlers());
1603 
1604   // Copy byte codes
1605   if (code_length > 0) {
1606     memcpy(m->code_base(), code_start, code_length);
1607   }
1608 
1609   // Copy line number table
1610   if (linenumber_table != NULL) {
1611     memcpy(m->compressed_linenumber_table(),
1612            linenumber_table->buffer(), linenumber_table_length);
1613   }
1614 
1615   // Copy checked exceptions
1616   if (checked_exceptions_length > 0) {
1617     int size = checked_exceptions_length * sizeof(CheckedExceptionElement) / sizeof(u2);
1618     copy_u2_with_conversion((u2*) m->checked_exceptions_start(), checked_exceptions_start, size);
1619   }
1620 
1621   /* Copy class file LVT's/LVTT's into the HotSpot internal LVT.
1622    *
1623    * Rules for LVT's and LVTT's are:
1624    *   - There can be any number of LVT's and LVTT's.
1625    *   - If there are n LVT's, it is the same as if there was just
1626    *     one LVT containing all the entries from the n LVT's.
1627    *   - There may be no more than one LVT entry per local variable.
1628    *     Two LVT entries are 'equal' if these fields are the same:
1629    *        start_pc, length, name, slot
1630    *   - There may be no more than one LVTT entry per each LVT entry.
1631    *     Each LVTT entry has to match some LVT entry.
1632    *   - HotSpot internal LVT keeps natural ordering of class file LVT entries.
1633    */
1634   if (total_lvt_length > 0) {
1635     int tbl_no, idx;
1636 
1637     promoted_flags->set_has_localvariable_table();
1638 
1639     LVT_Hash** lvt_Hash = NEW_RESOURCE_ARRAY(LVT_Hash*, HASH_ROW_SIZE);
1640     initialize_hashtable(lvt_Hash);
1641 
1642     // To fill LocalVariableTable in
1643     Classfile_LVT_Element*  cf_lvt;
1644     LocalVariableTableElement* lvt = m->localvariable_table_start();
1645 
1646     for (tbl_no = 0; tbl_no < lvt_cnt; tbl_no++) {
1647       cf_lvt = (Classfile_LVT_Element *) localvariable_table_start[tbl_no];
1648       for (idx = 0; idx < localvariable_table_length[tbl_no]; idx++, lvt++) {
1649         copy_lvt_element(&cf_lvt[idx], lvt);
1650         // If no duplicates, add LVT elem in hashtable lvt_Hash.
1651         if (LVT_put_after_lookup(lvt, lvt_Hash) == false
1652           && _need_verify
1653           && _major_version >= JAVA_1_5_VERSION ) {
1654           clear_hashtable(lvt_Hash);
1655           classfile_parse_error("Duplicated LocalVariableTable attribute "
1656                                 "entry for '%s' in class file %s",
1657                                  cp->symbol_at(lvt->name_cp_index)->as_utf8(),
1658                                  CHECK_(nullHandle));
1659         }
1660       }
1661     }
1662 
1663     // To merge LocalVariableTable and LocalVariableTypeTable
1664     Classfile_LVT_Element* cf_lvtt;
1665     LocalVariableTableElement lvtt_elem;
1666 
1667     for (tbl_no = 0; tbl_no < lvtt_cnt; tbl_no++) {
1668       cf_lvtt = (Classfile_LVT_Element *) localvariable_type_table_start[tbl_no];
1669       for (idx = 0; idx < localvariable_type_table_length[tbl_no]; idx++) {
1670         copy_lvt_element(&cf_lvtt[idx], &lvtt_elem);
1671         int index = hash(&lvtt_elem);
1672         LVT_Hash* entry = LVT_lookup(&lvtt_elem, index, lvt_Hash);
1673         if (entry == NULL) {
1674           if (_need_verify) {
1675             clear_hashtable(lvt_Hash);
1676             classfile_parse_error("LVTT entry for '%s' in class file %s "
1677                                   "does not match any LVT entry",
1678                                    cp->symbol_at(lvtt_elem.name_cp_index)->as_utf8(),
1679                                    CHECK_(nullHandle));
1680           }
1681         } else if (entry->_elem->signature_cp_index != 0 && _need_verify) {
1682           clear_hashtable(lvt_Hash);
1683           classfile_parse_error("Duplicated LocalVariableTypeTable attribute "
1684                                 "entry for '%s' in class file %s",
1685                                  cp->symbol_at(lvtt_elem.name_cp_index)->as_utf8(),
1686                                  CHECK_(nullHandle));
1687         } else {
1688           // to add generic signatures into LocalVariableTable
1689           entry->_elem->signature_cp_index = lvtt_elem.descriptor_cp_index;
1690         }
1691       }
1692     }
1693     clear_hashtable(lvt_Hash);
1694   }
1695 
1696   *method_annotations = assemble_annotations(runtime_visible_annotations,
1697                                              runtime_visible_annotations_length,
1698                                              runtime_invisible_annotations,
1699                                              runtime_invisible_annotations_length,
1700                                              CHECK_(nullHandle));
1701   *method_parameter_annotations = assemble_annotations(runtime_visible_parameter_annotations,
1702                                                        runtime_visible_parameter_annotations_length,
1703                                                        runtime_invisible_parameter_annotations,
1704                                                        runtime_invisible_parameter_annotations_length,
1705                                                        CHECK_(nullHandle));
1706   *method_default_annotations = assemble_annotations(annotation_default,
1707                                                      annotation_default_length,
1708                                                      NULL,
1709                                                      0,
1710                                                      CHECK_(nullHandle));
1711 
1712   if (name() == vmSymbols::finalize_method_name() &&
1713       signature() == vmSymbols::void_method_signature()) {
1714     if (m->is_empty_method()) {
1715       _has_empty_finalizer = true;
1716     } else {
1717       _has_finalizer = true;
1718     }
1719   }
1720   if (name() == vmSymbols::object_initializer_name() &&
1721       signature() == vmSymbols::void_method_signature() &&
1722       m->is_vanilla_constructor()) {
1723     _has_vanilla_constructor = true;
1724   }
1725 
1726   return m;
1727 }
1728 
1729 
1730 // The promoted_flags parameter is used to pass relevant access_flags
1731 // from the methods back up to the containing klass. These flag values
1732 // are added to klass's access_flags.
1733 
1734 objArrayHandle ClassFileParser::parse_methods(constantPoolHandle cp, bool is_interface,
1735                                               AccessFlags* promoted_flags,
1736                                               bool* has_final_method,
1737                                               objArrayOop* methods_annotations_oop,
1738                                               objArrayOop* methods_parameter_annotations_oop,
1739                                               objArrayOop* methods_default_annotations_oop,
1740                                               TRAPS) {
1741   ClassFileStream* cfs = stream();
1742   objArrayHandle nullHandle;
1743   typeArrayHandle method_annotations;
1744   typeArrayHandle method_parameter_annotations;
1745   typeArrayHandle method_default_annotations;
1746   cfs->guarantee_more(2, CHECK_(nullHandle));  // length
1747   u2 length = cfs->get_u2_fast();
1748   if (length == 0) {
1749     return objArrayHandle(THREAD, Universe::the_empty_system_obj_array());
1750   } else {
1751     objArrayOop m = oopFactory::new_system_objArray(length, CHECK_(nullHandle));
1752     objArrayHandle methods(THREAD, m);
1753     HandleMark hm(THREAD);
1754     objArrayHandle methods_annotations;
1755     objArrayHandle methods_parameter_annotations;
1756     objArrayHandle methods_default_annotations;
1757     for (int index = 0; index < length; index++) {
1758       methodHandle method = parse_method(cp, is_interface,
1759                                          promoted_flags,
1760                                          &method_annotations,
1761                                          &method_parameter_annotations,
1762                                          &method_default_annotations,
1763                                          CHECK_(nullHandle));
1764       if (method->is_final()) {
1765         *has_final_method = true;
1766       }
1767       methods->obj_at_put(index, method());
1768       if (method_annotations.not_null()) {
1769         if (methods_annotations.is_null()) {
1770           objArrayOop md = oopFactory::new_system_objArray(length, CHECK_(nullHandle));
1771           methods_annotations = objArrayHandle(THREAD, md);
1772         }
1773         methods_annotations->obj_at_put(index, method_annotations());
1774       }
1775       if (method_parameter_annotations.not_null()) {
1776         if (methods_parameter_annotations.is_null()) {
1777           objArrayOop md = oopFactory::new_system_objArray(length, CHECK_(nullHandle));
1778           methods_parameter_annotations = objArrayHandle(THREAD, md);
1779         }
1780         methods_parameter_annotations->obj_at_put(index, method_parameter_annotations());
1781       }
1782       if (method_default_annotations.not_null()) {
1783         if (methods_default_annotations.is_null()) {
1784           objArrayOop md = oopFactory::new_system_objArray(length, CHECK_(nullHandle));
1785           methods_default_annotations = objArrayHandle(THREAD, md);
1786         }
1787         methods_default_annotations->obj_at_put(index, method_default_annotations());
1788       }
1789     }
1790     if (_need_verify && length > 1) {
1791       // Check duplicated methods
1792       ResourceMark rm(THREAD);
1793       NameSigHash** names_and_sigs = NEW_RESOURCE_ARRAY_IN_THREAD(
1794         THREAD, NameSigHash*, HASH_ROW_SIZE);
1795       initialize_hashtable(names_and_sigs);
1796       bool dup = false;
1797       {
1798         debug_only(No_Safepoint_Verifier nsv;)
1799         for (int i = 0; i < length; i++) {
1800           methodOop m = (methodOop)methods->obj_at(i);
1801           // If no duplicates, add name/signature in hashtable names_and_sigs.
1802           if (!put_after_lookup(m->name(), m->signature(), names_and_sigs)) {
1803             dup = true;
1804             break;
1805           }
1806         }
1807       }
1808       if (dup) {
1809         classfile_parse_error("Duplicate method name&signature in class file %s",
1810                               CHECK_(nullHandle));
1811       }
1812     }
1813 
1814     *methods_annotations_oop = methods_annotations();
1815     *methods_parameter_annotations_oop = methods_parameter_annotations();
1816     *methods_default_annotations_oop = methods_default_annotations();
1817 
1818     return methods;
1819   }
1820 }
1821 
1822 
1823 typeArrayHandle ClassFileParser::sort_methods(objArrayHandle methods,
1824                                               objArrayHandle methods_annotations,
1825                                               objArrayHandle methods_parameter_annotations,
1826                                               objArrayHandle methods_default_annotations,
1827                                               TRAPS) {
1828   typeArrayHandle nullHandle;
1829   int length = methods()->length();
1830   // If JVMTI original method ordering is enabled we have to
1831   // remember the original class file ordering.
1832   // We temporarily use the vtable_index field in the methodOop to store the
1833   // class file index, so we can read in after calling qsort.
1834   if (JvmtiExport::can_maintain_original_method_order()) {
1835     for (int index = 0; index < length; index++) {
1836       methodOop m = methodOop(methods->obj_at(index));
1837       assert(!m->valid_vtable_index(), "vtable index should not be set");
1838       m->set_vtable_index(index);
1839     }
1840   }
1841   // Sort method array by ascending method name (for faster lookups & vtable construction)
1842   // Note that the ordering is not alphabetical, see symbolOopDesc::fast_compare
1843   methodOopDesc::sort_methods(methods(),
1844                               methods_annotations(),
1845                               methods_parameter_annotations(),
1846                               methods_default_annotations());
1847 
1848   // If JVMTI original method ordering is enabled construct int array remembering the original ordering
1849   if (JvmtiExport::can_maintain_original_method_order()) {
1850     typeArrayOop new_ordering = oopFactory::new_permanent_intArray(length, CHECK_(nullHandle));
1851     typeArrayHandle method_ordering(THREAD, new_ordering);
1852     for (int index = 0; index < length; index++) {
1853       methodOop m = methodOop(methods->obj_at(index));
1854       int old_index = m->vtable_index();
1855       assert(old_index >= 0 && old_index < length, "invalid method index");
1856       method_ordering->int_at_put(index, old_index);
1857       m->set_vtable_index(methodOopDesc::invalid_vtable_index);
1858     }
1859     return method_ordering;
1860   } else {
1861     return typeArrayHandle(THREAD, Universe::the_empty_int_array());
1862   }
1863 }
1864 
1865 
1866 void ClassFileParser::parse_classfile_sourcefile_attribute(constantPoolHandle cp, instanceKlassHandle k, TRAPS) {
1867   ClassFileStream* cfs = stream();
1868   cfs->guarantee_more(2, CHECK);  // sourcefile_index
1869   u2 sourcefile_index = cfs->get_u2_fast();
1870   check_property(
1871     valid_cp_range(sourcefile_index, cp->length()) &&
1872       cp->tag_at(sourcefile_index).is_utf8(),
1873     "Invalid SourceFile attribute at constant pool index %u in class file %s",
1874     sourcefile_index, CHECK);
1875   k->set_source_file_name(cp->symbol_at(sourcefile_index));
1876 }
1877 
1878 
1879 
1880 void ClassFileParser::parse_classfile_source_debug_extension_attribute(constantPoolHandle cp,
1881                                                                        instanceKlassHandle k,
1882                                                                        int length, TRAPS) {
1883   ClassFileStream* cfs = stream();
1884   u1* sde_buffer = cfs->get_u1_buffer();
1885   assert(sde_buffer != NULL, "null sde buffer");
1886 
1887   // Don't bother storing it if there is no way to retrieve it
1888   if (JvmtiExport::can_get_source_debug_extension()) {
1889     // Optimistically assume that only 1 byte UTF format is used
1890     // (common case)
1891     symbolOop sde_symbol = oopFactory::new_symbol((char*)sde_buffer,
1892                                                   length, CHECK);
1893     k->set_source_debug_extension(sde_symbol);
1894   }
1895   // Got utf8 string, set stream position forward
1896   cfs->skip_u1(length, CHECK);
1897 }
1898 
1899 
1900 // Inner classes can be static, private or protected (classic VM does this)
1901 #define RECOGNIZED_INNER_CLASS_MODIFIERS (JVM_RECOGNIZED_CLASS_MODIFIERS | JVM_ACC_PRIVATE | JVM_ACC_PROTECTED | JVM_ACC_STATIC)
1902 
1903 // Return number of classes in the inner classes attribute table
1904 u2 ClassFileParser::parse_classfile_inner_classes_attribute(constantPoolHandle cp, instanceKlassHandle k, TRAPS) {
1905   ClassFileStream* cfs = stream();
1906   cfs->guarantee_more(2, CHECK_0);  // length
1907   u2 length = cfs->get_u2_fast();
1908 
1909   // 4-tuples of shorts [inner_class_info_index, outer_class_info_index, inner_name_index, inner_class_access_flags]
1910   typeArrayOop ic = oopFactory::new_permanent_shortArray(length*4, CHECK_0);
1911   typeArrayHandle inner_classes(THREAD, ic);
1912   int index = 0;
1913   int cp_size = cp->length();
1914   cfs->guarantee_more(8 * length, CHECK_0);  // 4-tuples of u2
1915   for (int n = 0; n < length; n++) {
1916     // Inner class index
1917     u2 inner_class_info_index = cfs->get_u2_fast();
1918     check_property(
1919       inner_class_info_index == 0 ||
1920         (valid_cp_range(inner_class_info_index, cp_size) &&
1921         cp->tag_at(inner_class_info_index).is_klass_reference()),
1922       "inner_class_info_index %u has bad constant type in class file %s",
1923       inner_class_info_index, CHECK_0);
1924     // Outer class index
1925     u2 outer_class_info_index = cfs->get_u2_fast();
1926     check_property(
1927       outer_class_info_index == 0 ||
1928         (valid_cp_range(outer_class_info_index, cp_size) &&
1929         cp->tag_at(outer_class_info_index).is_klass_reference()),
1930       "outer_class_info_index %u has bad constant type in class file %s",
1931       outer_class_info_index, CHECK_0);
1932     // Inner class name
1933     u2 inner_name_index = cfs->get_u2_fast();
1934     check_property(
1935       inner_name_index == 0 || (valid_cp_range(inner_name_index, cp_size) &&
1936         cp->tag_at(inner_name_index).is_utf8()),
1937       "inner_name_index %u has bad constant type in class file %s",
1938       inner_name_index, CHECK_0);
1939     if (_need_verify) {
1940       guarantee_property(inner_class_info_index != outer_class_info_index,
1941                          "Class is both outer and inner class in class file %s", CHECK_0);
1942     }
1943     // Access flags
1944     AccessFlags inner_access_flags;
1945     jint flags = cfs->get_u2_fast() & RECOGNIZED_INNER_CLASS_MODIFIERS;
1946     if ((flags & JVM_ACC_INTERFACE) && _major_version < JAVA_6_VERSION) {
1947       // Set abstract bit for old class files for backward compatibility
1948       flags |= JVM_ACC_ABSTRACT;
1949     }
1950     verify_legal_class_modifiers(flags, CHECK_0);
1951     inner_access_flags.set_flags(flags);
1952 
1953     inner_classes->short_at_put(index++, inner_class_info_index);
1954     inner_classes->short_at_put(index++, outer_class_info_index);
1955     inner_classes->short_at_put(index++, inner_name_index);
1956     inner_classes->short_at_put(index++, inner_access_flags.as_short());
1957   }
1958 
1959   // 4347400: make sure there's no duplicate entry in the classes array
1960   if (_need_verify && _major_version >= JAVA_1_5_VERSION) {
1961     for(int i = 0; i < inner_classes->length(); i += 4) {
1962       for(int j = i + 4; j < inner_classes->length(); j += 4) {
1963         guarantee_property((inner_classes->ushort_at(i)   != inner_classes->ushort_at(j) ||
1964                             inner_classes->ushort_at(i+1) != inner_classes->ushort_at(j+1) ||
1965                             inner_classes->ushort_at(i+2) != inner_classes->ushort_at(j+2) ||
1966                             inner_classes->ushort_at(i+3) != inner_classes->ushort_at(j+3)),
1967                             "Duplicate entry in InnerClasses in class file %s",
1968                             CHECK_0);
1969       }
1970     }
1971   }
1972 
1973   // Update instanceKlass with inner class info.
1974   k->set_inner_classes(inner_classes());
1975   return length;
1976 }
1977 
1978 void ClassFileParser::parse_classfile_synthetic_attribute(constantPoolHandle cp, instanceKlassHandle k, TRAPS) {
1979   k->set_is_synthetic();
1980 }
1981 
1982 void ClassFileParser::parse_classfile_signature_attribute(constantPoolHandle cp, instanceKlassHandle k, TRAPS) {
1983   ClassFileStream* cfs = stream();
1984   u2 signature_index = cfs->get_u2(CHECK);
1985   check_property(
1986     valid_cp_range(signature_index, cp->length()) &&
1987       cp->tag_at(signature_index).is_utf8(),
1988     "Invalid constant pool index %u in Signature attribute in class file %s",
1989     signature_index, CHECK);
1990   k->set_generic_signature(cp->symbol_at(signature_index));
1991 }
1992 
1993 void ClassFileParser::parse_classfile_attributes(constantPoolHandle cp, instanceKlassHandle k, TRAPS) {
1994   ClassFileStream* cfs = stream();
1995   // Set inner classes attribute to default sentinel
1996   k->set_inner_classes(Universe::the_empty_short_array());
1997   cfs->guarantee_more(2, CHECK);  // attributes_count
1998   u2 attributes_count = cfs->get_u2_fast();
1999   bool parsed_sourcefile_attribute = false;
2000   bool parsed_innerclasses_attribute = false;
2001   bool parsed_enclosingmethod_attribute = false;
2002   u1* runtime_visible_annotations = NULL;
2003   int runtime_visible_annotations_length = 0;
2004   u1* runtime_invisible_annotations = NULL;
2005   int runtime_invisible_annotations_length = 0;
2006   // Iterate over attributes
2007   while (attributes_count--) {
2008     cfs->guarantee_more(6, CHECK);  // attribute_name_index, attribute_length
2009     u2 attribute_name_index = cfs->get_u2_fast();
2010     u4 attribute_length = cfs->get_u4_fast();
2011     check_property(
2012       valid_cp_range(attribute_name_index, cp->length()) &&
2013         cp->tag_at(attribute_name_index).is_utf8(),
2014       "Attribute name has bad constant pool index %u in class file %s",
2015       attribute_name_index, CHECK);
2016     symbolOop tag = cp->symbol_at(attribute_name_index);
2017     if (tag == vmSymbols::tag_source_file()) {
2018       // Check for SourceFile tag
2019       if (_need_verify) {
2020         guarantee_property(attribute_length == 2, "Wrong SourceFile attribute length in class file %s", CHECK);
2021       }
2022       if (parsed_sourcefile_attribute) {
2023         classfile_parse_error("Multiple SourceFile attributes in class file %s", CHECK);
2024       } else {
2025         parsed_sourcefile_attribute = true;
2026       }
2027       parse_classfile_sourcefile_attribute(cp, k, CHECK);
2028     } else if (tag == vmSymbols::tag_source_debug_extension()) {
2029       // Check for SourceDebugExtension tag
2030       parse_classfile_source_debug_extension_attribute(cp, k, (int)attribute_length, CHECK);
2031     } else if (tag == vmSymbols::tag_inner_classes()) {
2032       // Check for InnerClasses tag
2033       if (parsed_innerclasses_attribute) {
2034         classfile_parse_error("Multiple InnerClasses attributes in class file %s", CHECK);
2035       } else {
2036         parsed_innerclasses_attribute = true;
2037       }
2038       u2 num_of_classes = parse_classfile_inner_classes_attribute(cp, k, CHECK);
2039       if (_need_verify && _major_version >= JAVA_1_5_VERSION) {
2040         guarantee_property(attribute_length == sizeof(num_of_classes) + 4 * sizeof(u2) * num_of_classes,
2041                           "Wrong InnerClasses attribute length in class file %s", CHECK);
2042       }
2043     } else if (tag == vmSymbols::tag_synthetic()) {
2044       // Check for Synthetic tag
2045       // Shouldn't we check that the synthetic flags wasn't already set? - not required in spec
2046       if (attribute_length != 0) {
2047         classfile_parse_error(
2048           "Invalid Synthetic classfile attribute length %u in class file %s",
2049           attribute_length, CHECK);
2050       }
2051       parse_classfile_synthetic_attribute(cp, k, CHECK);
2052     } else if (tag == vmSymbols::tag_deprecated()) {
2053       // Check for Deprecatd tag - 4276120
2054       if (attribute_length != 0) {
2055         classfile_parse_error(
2056           "Invalid Deprecated classfile attribute length %u in class file %s",
2057           attribute_length, CHECK);
2058       }
2059     } else if (_major_version >= JAVA_1_5_VERSION) {
2060       if (tag == vmSymbols::tag_signature()) {
2061         if (attribute_length != 2) {
2062           classfile_parse_error(
2063             "Wrong Signature attribute length %u in class file %s",
2064             attribute_length, CHECK);
2065         }
2066         parse_classfile_signature_attribute(cp, k, CHECK);
2067       } else if (tag == vmSymbols::tag_runtime_visible_annotations()) {
2068         runtime_visible_annotations_length = attribute_length;
2069         runtime_visible_annotations = cfs->get_u1_buffer();
2070         assert(runtime_visible_annotations != NULL, "null visible annotations");
2071         cfs->skip_u1(runtime_visible_annotations_length, CHECK);
2072       } else if (PreserveAllAnnotations && tag == vmSymbols::tag_runtime_invisible_annotations()) {
2073         runtime_invisible_annotations_length = attribute_length;
2074         runtime_invisible_annotations = cfs->get_u1_buffer();
2075         assert(runtime_invisible_annotations != NULL, "null invisible annotations");
2076         cfs->skip_u1(runtime_invisible_annotations_length, CHECK);
2077       } else if (tag == vmSymbols::tag_enclosing_method()) {
2078         if (parsed_enclosingmethod_attribute) {
2079           classfile_parse_error("Multiple EnclosingMethod attributes in class file %s", CHECK);
2080         }   else {
2081           parsed_enclosingmethod_attribute = true;
2082         }
2083         cfs->guarantee_more(4, CHECK);  // class_index, method_index
2084         u2 class_index  = cfs->get_u2_fast();
2085         u2 method_index = cfs->get_u2_fast();
2086         if (class_index == 0) {
2087           classfile_parse_error("Invalid class index in EnclosingMethod attribute in class file %s", CHECK);
2088         }
2089         // Validate the constant pool indices and types
2090         if (!cp->is_within_bounds(class_index) ||
2091             !cp->tag_at(class_index).is_klass_reference()) {
2092           classfile_parse_error("Invalid or out-of-bounds class index in EnclosingMethod attribute in class file %s", CHECK);
2093         }
2094         if (method_index != 0 &&
2095             (!cp->is_within_bounds(method_index) ||
2096              !cp->tag_at(method_index).is_name_and_type())) {
2097           classfile_parse_error("Invalid or out-of-bounds method index in EnclosingMethod attribute in class file %s", CHECK);
2098         }
2099         k->set_enclosing_method_indices(class_index, method_index);
2100       } else {
2101         // Unknown attribute
2102         cfs->skip_u1(attribute_length, CHECK);
2103       }
2104     } else {
2105       // Unknown attribute
2106       cfs->skip_u1(attribute_length, CHECK);
2107     }
2108   }
2109   typeArrayHandle annotations = assemble_annotations(runtime_visible_annotations,
2110                                                      runtime_visible_annotations_length,
2111                                                      runtime_invisible_annotations,
2112                                                      runtime_invisible_annotations_length,
2113                                                      CHECK);
2114   k->set_class_annotations(annotations());
2115 }
2116 
2117 
2118 typeArrayHandle ClassFileParser::assemble_annotations(u1* runtime_visible_annotations,
2119                                                       int runtime_visible_annotations_length,
2120                                                       u1* runtime_invisible_annotations,
2121                                                       int runtime_invisible_annotations_length, TRAPS) {
2122   typeArrayHandle annotations;
2123   if (runtime_visible_annotations != NULL ||
2124       runtime_invisible_annotations != NULL) {
2125     typeArrayOop anno = oopFactory::new_permanent_byteArray(runtime_visible_annotations_length +
2126                                                             runtime_invisible_annotations_length, CHECK_(annotations));
2127     annotations = typeArrayHandle(THREAD, anno);
2128     if (runtime_visible_annotations != NULL) {
2129       memcpy(annotations->byte_at_addr(0), runtime_visible_annotations, runtime_visible_annotations_length);
2130     }
2131     if (runtime_invisible_annotations != NULL) {
2132       memcpy(annotations->byte_at_addr(runtime_visible_annotations_length), runtime_invisible_annotations, runtime_invisible_annotations_length);
2133     }
2134   }
2135   return annotations;
2136 }
2137 
2138 
2139 static void initialize_static_field(fieldDescriptor* fd, TRAPS) {
2140   KlassHandle h_k (THREAD, fd->field_holder());
2141   assert(h_k.not_null() && fd->is_static(), "just checking");
2142   if (fd->has_initial_value()) {
2143     BasicType t = fd->field_type();
2144     switch (t) {
2145       case T_BYTE:
2146         h_k()->byte_field_put(fd->offset(), fd->int_initial_value());
2147               break;
2148       case T_BOOLEAN:
2149         h_k()->bool_field_put(fd->offset(), fd->int_initial_value());
2150               break;
2151       case T_CHAR:
2152         h_k()->char_field_put(fd->offset(), fd->int_initial_value());
2153               break;
2154       case T_SHORT:
2155         h_k()->short_field_put(fd->offset(), fd->int_initial_value());
2156               break;
2157       case T_INT:
2158         h_k()->int_field_put(fd->offset(), fd->int_initial_value());
2159         break;
2160       case T_FLOAT:
2161         h_k()->float_field_put(fd->offset(), fd->float_initial_value());
2162         break;
2163       case T_DOUBLE:
2164         h_k()->double_field_put(fd->offset(), fd->double_initial_value());
2165         break;
2166       case T_LONG:
2167         h_k()->long_field_put(fd->offset(), fd->long_initial_value());
2168         break;
2169       case T_OBJECT:
2170         {
2171           #ifdef ASSERT
2172           symbolOop sym = oopFactory::new_symbol("Ljava/lang/String;", CHECK);
2173           assert(fd->signature() == sym, "just checking");
2174           #endif
2175           oop string = fd->string_initial_value(CHECK);
2176           h_k()->obj_field_put(fd->offset(), string);
2177         }
2178         break;
2179       default:
2180         THROW_MSG(vmSymbols::java_lang_ClassFormatError(),
2181                   "Illegal ConstantValue attribute in class file");
2182     }
2183   }
2184 }
2185 
2186 
2187 void ClassFileParser::java_lang_ref_Reference_fix_pre(typeArrayHandle* fields_ptr,
2188   constantPoolHandle cp, FieldAllocationCount *fac_ptr, TRAPS) {
2189   // This code is for compatibility with earlier jdk's that do not
2190   // have the "discovered" field in java.lang.ref.Reference.  For 1.5
2191   // the check for the "discovered" field should issue a warning if
2192   // the field is not found.  For 1.6 this code should be issue a
2193   // fatal error if the "discovered" field is not found.
2194   //
2195   // Increment fac.nonstatic_oop_count so that the start of the
2196   // next type of non-static oops leaves room for the fake oop.
2197   // Do not increment next_nonstatic_oop_offset so that the
2198   // fake oop is place after the java.lang.ref.Reference oop
2199   // fields.
2200   //
2201   // Check the fields in java.lang.ref.Reference for the "discovered"
2202   // field.  If it is not present, artifically create a field for it.
2203   // This allows this VM to run on early JDK where the field is not
2204   // present.
2205 
2206   //
2207   // Increment fac.nonstatic_oop_count so that the start of the
2208   // next type of non-static oops leaves room for the fake oop.
2209   // Do not increment next_nonstatic_oop_offset so that the
2210   // fake oop is place after the java.lang.ref.Reference oop
2211   // fields.
2212   //
2213   // Check the fields in java.lang.ref.Reference for the "discovered"
2214   // field.  If it is not present, artifically create a field for it.
2215   // This allows this VM to run on early JDK where the field is not
2216   // present.
2217   int reference_sig_index = 0;
2218   int reference_name_index = 0;
2219   int reference_index = 0;
2220   int extra = java_lang_ref_Reference::number_of_fake_oop_fields;
2221   const int n = (*fields_ptr)()->length();
2222   for (int i = 0; i < n; i += instanceKlass::next_offset ) {
2223     int name_index =
2224     (*fields_ptr)()->ushort_at(i + instanceKlass::name_index_offset);
2225     int sig_index  =
2226       (*fields_ptr)()->ushort_at(i + instanceKlass::signature_index_offset);
2227     symbolOop f_name = cp->symbol_at(name_index);
2228     symbolOop f_sig  = cp->symbol_at(sig_index);
2229     if (f_sig == vmSymbols::reference_signature() && reference_index == 0) {
2230       // Save the index for reference signature for later use.
2231       // The fake discovered field does not entries in the
2232       // constant pool so the index for its signature cannot
2233       // be extracted from the constant pool.  It will need
2234       // later, however.  It's signature is vmSymbols::reference_signature()
2235       // so same an index for that signature.
2236       reference_sig_index = sig_index;
2237       reference_name_index = name_index;
2238       reference_index = i;
2239     }
2240     if (f_name == vmSymbols::reference_discovered_name() &&
2241       f_sig == vmSymbols::reference_signature()) {
2242       // The values below are fake but will force extra
2243       // non-static oop fields and a corresponding non-static
2244       // oop map block to be allocated.
2245       extra = 0;
2246       break;
2247     }
2248   }
2249   if (extra != 0) {
2250     fac_ptr->nonstatic_oop_count += extra;
2251     // Add the additional entry to "fields" so that the klass
2252     // contains the "discoverd" field and the field will be initialized
2253     // in instances of the object.
2254     int fields_with_fix_length = (*fields_ptr)()->length() +
2255       instanceKlass::next_offset;
2256     typeArrayOop ff = oopFactory::new_permanent_shortArray(
2257                                                 fields_with_fix_length, CHECK);
2258     typeArrayHandle fields_with_fix(THREAD, ff);
2259 
2260     // Take everything from the original but the length.
2261     for (int idx = 0; idx < (*fields_ptr)->length(); idx++) {
2262       fields_with_fix->ushort_at_put(idx, (*fields_ptr)->ushort_at(idx));
2263     }
2264 
2265     // Add the fake field at the end.
2266     int i = (*fields_ptr)->length();
2267     // There is no name index for the fake "discovered" field nor
2268     // signature but a signature is needed so that the field will
2269     // be properly initialized.  Use one found for
2270     // one of the other reference fields. Be sure the index for the
2271     // name is 0.  In fieldDescriptor::initialize() the index of the
2272     // name is checked.  That check is by passed for the last nonstatic
2273     // oop field in a java.lang.ref.Reference which is assumed to be
2274     // this artificial "discovered" field.  An assertion checks that
2275     // the name index is 0.
2276     assert(reference_index != 0, "Missing signature for reference");
2277 
2278     int j;
2279     for (j = 0; j < instanceKlass::next_offset; j++) {
2280       fields_with_fix->ushort_at_put(i + j,
2281         (*fields_ptr)->ushort_at(reference_index +j));
2282     }
2283     // Clear the public access flag and set the private access flag.
2284     short flags;
2285     flags =
2286       fields_with_fix->ushort_at(i + instanceKlass::access_flags_offset);
2287     assert(!(flags & JVM_RECOGNIZED_FIELD_MODIFIERS), "Unexpected access flags set");
2288     flags = flags & (~JVM_ACC_PUBLIC);
2289     flags = flags | JVM_ACC_PRIVATE;
2290     AccessFlags access_flags;
2291     access_flags.set_flags(flags);
2292     assert(!access_flags.is_public(), "Failed to clear public flag");
2293     assert(access_flags.is_private(), "Failed to set private flag");
2294     fields_with_fix->ushort_at_put(i + instanceKlass::access_flags_offset,
2295       flags);
2296 
2297     assert(fields_with_fix->ushort_at(i + instanceKlass::name_index_offset)
2298       == reference_name_index, "The fake reference name is incorrect");
2299     assert(fields_with_fix->ushort_at(i + instanceKlass::signature_index_offset)
2300       == reference_sig_index, "The fake reference signature is incorrect");
2301     // The type of the field is stored in the low_offset entry during
2302     // parsing.
2303     assert(fields_with_fix->ushort_at(i + instanceKlass::low_offset) ==
2304       NONSTATIC_OOP, "The fake reference type is incorrect");
2305 
2306     // "fields" is allocated in the permanent generation.  Disgard
2307     // it and let it be collected.
2308     (*fields_ptr) = fields_with_fix;
2309   }
2310   return;
2311 }
2312 
2313 
2314 void ClassFileParser::java_lang_Class_fix_pre(objArrayHandle* methods_ptr,
2315   FieldAllocationCount *fac_ptr, TRAPS) {
2316   // Add fake fields for java.lang.Class instances
2317   //
2318   // This is not particularly nice. We should consider adding a
2319   // private transient object field at the Java level to
2320   // java.lang.Class. Alternatively we could add a subclass of
2321   // instanceKlass which provides an accessor and size computer for
2322   // this field, but that appears to be more code than this hack.
2323   //
2324   // NOTE that we wedge these in at the beginning rather than the
2325   // end of the object because the Class layout changed between JDK
2326   // 1.3 and JDK 1.4 with the new reflection implementation; some
2327   // nonstatic oop fields were added at the Java level. The offsets
2328   // of these fake fields can't change between these two JDK
2329   // versions because when the offsets are computed at bootstrap
2330   // time we don't know yet which version of the JDK we're running in.
2331 
2332   // The values below are fake but will force two non-static oop fields and
2333   // a corresponding non-static oop map block to be allocated.
2334   const int extra = java_lang_Class::number_of_fake_oop_fields;
2335   fac_ptr->nonstatic_oop_count += extra;
2336 }
2337 
2338 
2339 void ClassFileParser::java_lang_Class_fix_post(int* next_nonstatic_oop_offset_ptr) {
2340   // Cause the extra fake fields in java.lang.Class to show up before
2341   // the Java fields for layout compatibility between 1.3 and 1.4
2342   // Incrementing next_nonstatic_oop_offset here advances the
2343   // location where the real java fields are placed.
2344   const int extra = java_lang_Class::number_of_fake_oop_fields;
2345   (*next_nonstatic_oop_offset_ptr) += (extra * heapOopSize);
2346 }
2347 
2348 
2349 instanceKlassHandle ClassFileParser::parseClassFile(symbolHandle name,
2350                                                     Handle class_loader,
2351                                                     Handle protection_domain,
2352                                                     symbolHandle& parsed_name,
2353                                                     TRAPS) {
2354   // So that JVMTI can cache class file in the state before retransformable agents
2355   // have modified it
2356   unsigned char *cached_class_file_bytes = NULL;
2357   jint cached_class_file_length;
2358 
2359   ClassFileStream* cfs = stream();
2360   // Timing
2361   PerfTraceTime vmtimer(ClassLoader::perf_accumulated_time());
2362 
2363   _has_finalizer = _has_empty_finalizer = _has_vanilla_constructor = false;
2364 
2365   if (JvmtiExport::should_post_class_file_load_hook()) {
2366     unsigned char* ptr = cfs->buffer();
2367     unsigned char* end_ptr = cfs->buffer() + cfs->length();
2368 
2369     JvmtiExport::post_class_file_load_hook(name, class_loader, protection_domain,
2370                                            &ptr, &end_ptr,
2371                                            &cached_class_file_bytes,
2372                                            &cached_class_file_length);
2373 
2374     if (ptr != cfs->buffer()) {
2375       // JVMTI agent has modified class file data.
2376       // Set new class file stream using JVMTI agent modified
2377       // class file data.
2378       cfs = new ClassFileStream(ptr, end_ptr - ptr, cfs->source());
2379       set_stream(cfs);
2380     }
2381   }
2382 
2383 
2384   instanceKlassHandle nullHandle;
2385 
2386   // Figure out whether we can skip format checking (matching classic VM behavior)
2387   _need_verify = Verifier::should_verify_for(class_loader());
2388 
2389   // Set the verify flag in stream
2390   cfs->set_verify(_need_verify);
2391 
2392   // Save the class file name for easier error message printing.
2393   _class_name = name.not_null()? name : vmSymbolHandles::unknown_class_name();
2394 
2395   cfs->guarantee_more(8, CHECK_(nullHandle));  // magic, major, minor
2396   // Magic value
2397   u4 magic = cfs->get_u4_fast();
2398   guarantee_property(magic == JAVA_CLASSFILE_MAGIC,
2399                      "Incompatible magic value %u in class file %s",
2400                      magic, CHECK_(nullHandle));
2401 
2402   // Version numbers
2403   u2 minor_version = cfs->get_u2_fast();
2404   u2 major_version = cfs->get_u2_fast();
2405 
2406   // Check version numbers - we check this even with verifier off
2407   if (!is_supported_version(major_version, minor_version)) {
2408     if (name.is_null()) {
2409       Exceptions::fthrow(
2410         THREAD_AND_LOCATION,
2411         vmSymbolHandles::java_lang_UnsupportedClassVersionError(),
2412         "Unsupported major.minor version %u.%u",
2413         major_version,
2414         minor_version);
2415     } else {
2416       ResourceMark rm(THREAD);
2417       Exceptions::fthrow(
2418         THREAD_AND_LOCATION,
2419         vmSymbolHandles::java_lang_UnsupportedClassVersionError(),
2420         "%s : Unsupported major.minor version %u.%u",
2421         name->as_C_string(),
2422         major_version,
2423         minor_version);
2424     }
2425     return nullHandle;
2426   }
2427 
2428   _major_version = major_version;
2429   _minor_version = minor_version;
2430 
2431 
2432   // Check if verification needs to be relaxed for this class file
2433   // Do not restrict it to jdk1.0 or jdk1.1 to maintain backward compatibility (4982376)
2434   _relax_verify = Verifier::relax_verify_for(class_loader());
2435 
2436   // Constant pool
2437   constantPoolHandle cp = parse_constant_pool(CHECK_(nullHandle));
2438   int cp_size = cp->length();
2439 
2440   cfs->guarantee_more(8, CHECK_(nullHandle));  // flags, this_class, super_class, infs_len
2441 
2442   // Access flags
2443   AccessFlags access_flags;
2444   jint flags = cfs->get_u2_fast() & JVM_RECOGNIZED_CLASS_MODIFIERS;
2445 
2446   if ((flags & JVM_ACC_INTERFACE) && _major_version < JAVA_6_VERSION) {
2447     // Set abstract bit for old class files for backward compatibility
2448     flags |= JVM_ACC_ABSTRACT;
2449   }
2450   verify_legal_class_modifiers(flags, CHECK_(nullHandle));
2451   access_flags.set_flags(flags);
2452 
2453   // This class and superclass
2454   instanceKlassHandle super_klass;
2455   u2 this_class_index = cfs->get_u2_fast();
2456   check_property(
2457     valid_cp_range(this_class_index, cp_size) &&
2458       cp->tag_at(this_class_index).is_unresolved_klass(),
2459     "Invalid this class index %u in constant pool in class file %s",
2460     this_class_index, CHECK_(nullHandle));
2461 
2462   symbolHandle class_name (THREAD, cp->unresolved_klass_at(this_class_index));
2463   assert(class_name.not_null(), "class_name can't be null");
2464 
2465   // It's important to set parsed_name *before* resolving the super class.
2466   // (it's used for cleanup by the caller if parsing fails)
2467   parsed_name = class_name;
2468 
2469   // Update _class_name which could be null previously to be class_name
2470   _class_name = class_name;
2471 
2472   // Don't need to check whether this class name is legal or not.
2473   // It has been checked when constant pool is parsed.
2474   // However, make sure it is not an array type.
2475   if (_need_verify) {
2476     guarantee_property(class_name->byte_at(0) != JVM_SIGNATURE_ARRAY,
2477                        "Bad class name in class file %s",
2478                        CHECK_(nullHandle));
2479   }
2480 
2481   klassOop preserve_this_klass;   // for storing result across HandleMark
2482 
2483   // release all handles when parsing is done
2484   { HandleMark hm(THREAD);
2485 
2486     // Checks if name in class file matches requested name
2487     if (name.not_null() && class_name() != name()) {
2488       ResourceMark rm(THREAD);
2489       Exceptions::fthrow(
2490         THREAD_AND_LOCATION,
2491         vmSymbolHandles::java_lang_NoClassDefFoundError(),
2492         "%s (wrong name: %s)",
2493         name->as_C_string(),
2494         class_name->as_C_string()
2495       );
2496       return nullHandle;
2497     }
2498 
2499     if (TraceClassLoadingPreorder) {
2500       tty->print("[Loading %s", name()->as_klass_external_name());
2501       if (cfs->source() != NULL) tty->print(" from %s", cfs->source());
2502       tty->print_cr("]");
2503     }
2504 
2505     u2 super_class_index = cfs->get_u2_fast();
2506     if (super_class_index == 0) {
2507       check_property(class_name() == vmSymbols::java_lang_Object(),
2508                      "Invalid superclass index %u in class file %s",
2509                      super_class_index,
2510                      CHECK_(nullHandle));
2511     } else {
2512       check_property(valid_cp_range(super_class_index, cp_size) &&
2513                      cp->tag_at(super_class_index).is_unresolved_klass(),
2514                      "Invalid superclass index %u in class file %s",
2515                      super_class_index,
2516                      CHECK_(nullHandle));
2517       // The class name should be legal because it is checked when parsing constant pool.
2518       // However, make sure it is not an array type.
2519       if (_need_verify) {
2520         guarantee_property(cp->unresolved_klass_at(super_class_index)->byte_at(0) != JVM_SIGNATURE_ARRAY,
2521                           "Bad superclass name in class file %s", CHECK_(nullHandle));
2522       }
2523     }
2524 
2525     // Interfaces
2526     u2 itfs_len = cfs->get_u2_fast();
2527     objArrayHandle local_interfaces;
2528     if (itfs_len == 0) {
2529       local_interfaces = objArrayHandle(THREAD, Universe::the_empty_system_obj_array());
2530     } else {
2531       local_interfaces = parse_interfaces(cp, itfs_len, class_loader, protection_domain, &vmtimer, _class_name, CHECK_(nullHandle));
2532     }
2533 
2534     // Fields (offsets are filled in later)
2535     struct FieldAllocationCount fac = {0,0,0,0,0,0,0,0,0,0};
2536     objArrayHandle fields_annotations;
2537     typeArrayHandle fields = parse_fields(cp, access_flags.is_interface(), &fac, &fields_annotations, CHECK_(nullHandle));
2538     // Methods
2539     bool has_final_method = false;
2540     AccessFlags promoted_flags;
2541     promoted_flags.set_flags(0);
2542     // These need to be oop pointers because they are allocated lazily
2543     // inside parse_methods inside a nested HandleMark
2544     objArrayOop methods_annotations_oop = NULL;
2545     objArrayOop methods_parameter_annotations_oop = NULL;
2546     objArrayOop methods_default_annotations_oop = NULL;
2547     objArrayHandle methods = parse_methods(cp, access_flags.is_interface(),
2548                                            &promoted_flags,
2549                                            &has_final_method,
2550                                            &methods_annotations_oop,
2551                                            &methods_parameter_annotations_oop,
2552                                            &methods_default_annotations_oop,
2553                                            CHECK_(nullHandle));
2554 
2555     objArrayHandle methods_annotations(THREAD, methods_annotations_oop);
2556     objArrayHandle methods_parameter_annotations(THREAD, methods_parameter_annotations_oop);
2557     objArrayHandle methods_default_annotations(THREAD, methods_default_annotations_oop);
2558 
2559     // We check super class after class file is parsed and format is checked
2560     if (super_class_index > 0) {
2561       symbolHandle sk (THREAD, cp->klass_name_at(super_class_index));
2562       if (access_flags.is_interface()) {
2563         // Before attempting to resolve the superclass, check for class format
2564         // errors not checked yet.
2565         guarantee_property(sk() == vmSymbols::java_lang_Object(),
2566                            "Interfaces must have java.lang.Object as superclass in class file %s",
2567                            CHECK_(nullHandle));
2568       }
2569       klassOop k = SystemDictionary::resolve_super_or_fail(class_name,
2570                                                            sk,
2571                                                            class_loader,
2572                                                            protection_domain,
2573                                                            true,
2574                                                            CHECK_(nullHandle));
2575       KlassHandle kh (THREAD, k);
2576       super_klass = instanceKlassHandle(THREAD, kh());
2577       if (super_klass->is_interface()) {
2578         ResourceMark rm(THREAD);
2579         Exceptions::fthrow(
2580           THREAD_AND_LOCATION,
2581           vmSymbolHandles::java_lang_IncompatibleClassChangeError(),
2582           "class %s has interface %s as super class",
2583           class_name->as_klass_external_name(),
2584           super_klass->external_name()
2585         );
2586         return nullHandle;
2587       }
2588       // Make sure super class is not final
2589       if (super_klass->is_final()) {
2590         THROW_MSG_(vmSymbols::java_lang_VerifyError(), "Cannot inherit from final class", nullHandle);
2591       }
2592     }
2593 
2594     // Compute the transitive list of all unique interfaces implemented by this class
2595     objArrayHandle transitive_interfaces = compute_transitive_interfaces(super_klass, local_interfaces, CHECK_(nullHandle));
2596 
2597     // sort methods
2598     typeArrayHandle method_ordering = sort_methods(methods,
2599                                                    methods_annotations,
2600                                                    methods_parameter_annotations,
2601                                                    methods_default_annotations,
2602                                                    CHECK_(nullHandle));
2603 
2604     // promote flags from parse_methods() to the klass' flags
2605     access_flags.add_promoted_flags(promoted_flags.as_int());
2606 
2607     // Size of Java vtable (in words)
2608     int vtable_size = 0;
2609     int itable_size = 0;
2610     int num_miranda_methods = 0;
2611 
2612     klassVtable::compute_vtable_size_and_num_mirandas(vtable_size,
2613                                                       num_miranda_methods,
2614                                                       super_klass(),
2615                                                       methods(),
2616                                                       access_flags,
2617                                                       class_loader(),
2618                                                       class_name(),
2619                                                       local_interfaces());
2620 
2621     // Size of Java itable (in words)
2622     itable_size = access_flags.is_interface() ? 0 : klassItable::compute_itable_size(transitive_interfaces);
2623 
2624     // Field size and offset computation
2625     int nonstatic_field_size = super_klass() == NULL ? 0 : super_klass->nonstatic_field_size();
2626 #ifndef PRODUCT
2627     int orig_nonstatic_field_size = 0;
2628 #endif
2629     int static_field_size = 0;
2630     int next_static_oop_offset;
2631     int next_static_double_offset;
2632     int next_static_word_offset;
2633     int next_static_short_offset;
2634     int next_static_byte_offset;
2635     int next_static_type_offset;
2636     int next_nonstatic_oop_offset;
2637     int next_nonstatic_double_offset;
2638     int next_nonstatic_word_offset;
2639     int next_nonstatic_short_offset;
2640     int next_nonstatic_byte_offset;
2641     int next_nonstatic_type_offset;
2642     int first_nonstatic_oop_offset;
2643     int first_nonstatic_field_offset;
2644     int next_nonstatic_field_offset;
2645 
2646     // Calculate the starting byte offsets
2647     next_static_oop_offset      = (instanceKlass::header_size() +
2648                                   align_object_offset(vtable_size) +
2649                                   align_object_offset(itable_size)) * wordSize;
2650     next_static_double_offset   = next_static_oop_offset +
2651                                   (fac.static_oop_count * heapOopSize);
2652     if ( fac.static_double_count &&
2653          (Universe::field_type_should_be_aligned(T_DOUBLE) ||
2654           Universe::field_type_should_be_aligned(T_LONG)) ) {
2655       next_static_double_offset = align_size_up(next_static_double_offset, BytesPerLong);
2656     }
2657 
2658     next_static_word_offset     = next_static_double_offset +
2659                                   (fac.static_double_count * BytesPerLong);
2660     next_static_short_offset    = next_static_word_offset +
2661                                   (fac.static_word_count * BytesPerInt);
2662     next_static_byte_offset     = next_static_short_offset +
2663                                   (fac.static_short_count * BytesPerShort);
2664     next_static_type_offset     = align_size_up((next_static_byte_offset +
2665                                   fac.static_byte_count ), wordSize );
2666     static_field_size           = (next_static_type_offset -
2667                                   next_static_oop_offset) / wordSize;
2668     first_nonstatic_field_offset = (instanceOopDesc::header_size() +
2669                                     nonstatic_field_size) * wordSize;
2670     next_nonstatic_field_offset = first_nonstatic_field_offset;
2671 
2672     // Add fake fields for java.lang.Class instances (also see below)
2673     if (class_name() == vmSymbols::java_lang_Class() && class_loader.is_null()) {
2674       java_lang_Class_fix_pre(&methods, &fac, CHECK_(nullHandle));
2675     }
2676 
2677     // Add a fake "discovered" field if it is not present
2678     // for compatibility with earlier jdk's.
2679     if (class_name() == vmSymbols::java_lang_ref_Reference()
2680       && class_loader.is_null()) {
2681       java_lang_ref_Reference_fix_pre(&fields, cp, &fac, CHECK_(nullHandle));
2682     }
2683     // end of "discovered" field compactibility fix
2684 
2685     int nonstatic_double_count = fac.nonstatic_double_count;
2686     int nonstatic_word_count   = fac.nonstatic_word_count;
2687     int nonstatic_short_count  = fac.nonstatic_short_count;
2688     int nonstatic_byte_count   = fac.nonstatic_byte_count;
2689     int nonstatic_oop_count    = fac.nonstatic_oop_count;
2690 
2691     bool super_has_nonstatic_fields =
2692             (super_klass() != NULL && super_klass->has_nonstatic_fields());
2693     bool has_nonstatic_fields  =  super_has_nonstatic_fields ||
2694             ((nonstatic_double_count + nonstatic_word_count +
2695               nonstatic_short_count + nonstatic_byte_count +
2696               nonstatic_oop_count) != 0);
2697 
2698 
2699     // Prepare list of oops for oop maps generation.
2700     u2* nonstatic_oop_offsets;
2701     u2* nonstatic_oop_length;
2702     int nonstatic_oop_map_count = 0;
2703 
2704     nonstatic_oop_offsets = NEW_RESOURCE_ARRAY_IN_THREAD(
2705               THREAD, u2,  nonstatic_oop_count+1);
2706     nonstatic_oop_length  = NEW_RESOURCE_ARRAY_IN_THREAD(
2707               THREAD, u2,  nonstatic_oop_count+1);
2708 
2709     // Add fake fields for java.lang.Class instances (also see above).
2710     // FieldsAllocationStyle and CompactFields values will be reset to default.
2711     if(class_name() == vmSymbols::java_lang_Class() && class_loader.is_null()) {
2712       java_lang_Class_fix_post(&next_nonstatic_field_offset);
2713       nonstatic_oop_offsets[0] = (u2)first_nonstatic_field_offset;
2714       int fake_oop_count       = (( next_nonstatic_field_offset -
2715                                     first_nonstatic_field_offset ) / heapOopSize);
2716       nonstatic_oop_length [0] = (u2)fake_oop_count;
2717       nonstatic_oop_map_count  = 1;
2718       nonstatic_oop_count     -= fake_oop_count;
2719       first_nonstatic_oop_offset = first_nonstatic_field_offset;
2720     } else {
2721       first_nonstatic_oop_offset = 0; // will be set for first oop field
2722     }
2723 
2724 #ifndef PRODUCT
2725     if( PrintCompactFieldsSavings ) {
2726       next_nonstatic_double_offset = next_nonstatic_field_offset +
2727                                      (nonstatic_oop_count * heapOopSize);
2728       if ( nonstatic_double_count > 0 ) {
2729         next_nonstatic_double_offset = align_size_up(next_nonstatic_double_offset, BytesPerLong);
2730       }
2731       next_nonstatic_word_offset  = next_nonstatic_double_offset +
2732                                     (nonstatic_double_count * BytesPerLong);
2733       next_nonstatic_short_offset = next_nonstatic_word_offset +
2734                                     (nonstatic_word_count * BytesPerInt);
2735       next_nonstatic_byte_offset  = next_nonstatic_short_offset +
2736                                     (nonstatic_short_count * BytesPerShort);
2737       next_nonstatic_type_offset  = align_size_up((next_nonstatic_byte_offset +
2738                                     nonstatic_byte_count ), wordSize );
2739       orig_nonstatic_field_size   = nonstatic_field_size +
2740         ((next_nonstatic_type_offset - first_nonstatic_field_offset)/wordSize);
2741     }
2742 #endif
2743     bool compact_fields   = CompactFields;
2744     int  allocation_style = FieldsAllocationStyle;
2745     if( allocation_style < 0 || allocation_style > 1 ) { // Out of range?
2746       assert(false, "0 <= FieldsAllocationStyle <= 1");
2747       allocation_style = 1; // Optimistic
2748     }
2749 
2750     // The next classes have predefined hard-coded fields offsets
2751     // (see in JavaClasses::compute_hard_coded_offsets()).
2752     // Use default fields allocation order for them.
2753     if( (allocation_style != 0 || compact_fields ) && class_loader.is_null() &&
2754         (class_name() == vmSymbols::java_lang_AssertionStatusDirectives() ||
2755          class_name() == vmSymbols::java_lang_Class() ||
2756          class_name() == vmSymbols::java_lang_ClassLoader() ||
2757          class_name() == vmSymbols::java_lang_ref_Reference() ||
2758          class_name() == vmSymbols::java_lang_ref_SoftReference() ||
2759          class_name() == vmSymbols::java_lang_StackTraceElement() ||
2760          class_name() == vmSymbols::java_lang_String() ||
2761          class_name() == vmSymbols::java_lang_Throwable() ||
2762          class_name() == vmSymbols::java_lang_Boolean() ||
2763          class_name() == vmSymbols::java_lang_Character() ||
2764          class_name() == vmSymbols::java_lang_Float() ||
2765          class_name() == vmSymbols::java_lang_Double() ||
2766          class_name() == vmSymbols::java_lang_Byte() ||
2767          class_name() == vmSymbols::java_lang_Short() ||
2768          class_name() == vmSymbols::java_lang_Integer() ||
2769          class_name() == vmSymbols::java_lang_Long())) {
2770       allocation_style = 0;     // Allocate oops first
2771       compact_fields   = false; // Don't compact fields
2772     }
2773 
2774     if( allocation_style == 0 ) {
2775       // Fields order: oops, longs/doubles, ints, shorts/chars, bytes
2776       next_nonstatic_oop_offset    = next_nonstatic_field_offset;
2777       next_nonstatic_double_offset = next_nonstatic_oop_offset +
2778                                       (nonstatic_oop_count * heapOopSize);
2779     } else if( allocation_style == 1 ) {
2780       // Fields order: longs/doubles, ints, shorts/chars, bytes, oops
2781       next_nonstatic_double_offset = next_nonstatic_field_offset;
2782     } else {
2783       ShouldNotReachHere();
2784     }
2785 
2786     int nonstatic_oop_space_count   = 0;
2787     int nonstatic_word_space_count  = 0;
2788     int nonstatic_short_space_count = 0;
2789     int nonstatic_byte_space_count  = 0;
2790     int nonstatic_oop_space_offset;
2791     int nonstatic_word_space_offset;
2792     int nonstatic_short_space_offset;
2793     int nonstatic_byte_space_offset;
2794 
2795     bool compact_into_header = (UseCompressedOops &&
2796                                 allocation_style == 1 && compact_fields &&
2797                                 !super_has_nonstatic_fields);
2798 
2799     if( compact_into_header || nonstatic_double_count > 0 ) {
2800       int offset;
2801       // Pack something in with the header if no super klass has done so.
2802       if (compact_into_header) {
2803         offset = oopDesc::klass_gap_offset_in_bytes();
2804       } else {
2805         offset = next_nonstatic_double_offset;
2806       }
2807       next_nonstatic_double_offset = align_size_up(offset, BytesPerLong);
2808       if( compact_fields && offset != next_nonstatic_double_offset ) {
2809         // Allocate available fields into the gap before double field.
2810         int length = next_nonstatic_double_offset - offset;
2811         assert(length == BytesPerInt, "");
2812         nonstatic_word_space_offset = offset;
2813         if( nonstatic_word_count > 0 ) {
2814           nonstatic_word_count      -= 1;
2815           nonstatic_word_space_count = 1; // Only one will fit
2816           length -= BytesPerInt;
2817           offset += BytesPerInt;
2818         }
2819         nonstatic_short_space_offset = offset;
2820         while( length >= BytesPerShort && nonstatic_short_count > 0 ) {
2821           nonstatic_short_count       -= 1;
2822           nonstatic_short_space_count += 1;
2823           length -= BytesPerShort;
2824           offset += BytesPerShort;
2825         }
2826         nonstatic_byte_space_offset = offset;
2827         while( length > 0 && nonstatic_byte_count > 0 ) {
2828           nonstatic_byte_count       -= 1;
2829           nonstatic_byte_space_count += 1;
2830           length -= 1;
2831         }
2832         // Allocate oop field in the gap if there are no other fields for that.
2833         nonstatic_oop_space_offset = offset;
2834         if(!compact_into_header && length >= heapOopSize &&
2835             nonstatic_oop_count > 0 &&
2836             allocation_style != 0 ) { // when oop fields not first
2837           nonstatic_oop_count      -= 1;
2838           nonstatic_oop_space_count = 1; // Only one will fit
2839           length -= heapOopSize;
2840           offset += heapOopSize;
2841         }
2842       }
2843     }
2844 
2845     next_nonstatic_word_offset  = next_nonstatic_double_offset +
2846                                   (nonstatic_double_count * BytesPerLong);
2847     next_nonstatic_short_offset = next_nonstatic_word_offset +
2848                                   (nonstatic_word_count * BytesPerInt);
2849     next_nonstatic_byte_offset  = next_nonstatic_short_offset +
2850                                   (nonstatic_short_count * BytesPerShort);
2851 
2852     int notaligned_offset;
2853     if( allocation_style == 0 ) {
2854       notaligned_offset = next_nonstatic_byte_offset + nonstatic_byte_count;
2855     } else { // allocation_style == 1
2856       next_nonstatic_oop_offset = next_nonstatic_byte_offset + nonstatic_byte_count;
2857       if( nonstatic_oop_count > 0 ) {
2858         notaligned_offset = next_nonstatic_oop_offset;
2859         next_nonstatic_oop_offset = align_size_up(next_nonstatic_oop_offset, heapOopSize);
2860       }
2861       notaligned_offset = next_nonstatic_oop_offset + (nonstatic_oop_count * heapOopSize);
2862     }
2863     next_nonstatic_type_offset = align_size_up(notaligned_offset, wordSize );
2864     nonstatic_field_size = nonstatic_field_size + ((next_nonstatic_type_offset
2865                                       - first_nonstatic_field_offset)/wordSize);
2866 
2867     // Iterate over fields again and compute correct offsets.
2868     // The field allocation type was temporarily stored in the offset slot.
2869     // oop fields are located before non-oop fields (static and non-static).
2870     int len = fields->length();
2871     for (int i = 0; i < len; i += instanceKlass::next_offset) {
2872       int real_offset;
2873       FieldAllocationType atype = (FieldAllocationType) fields->ushort_at(i+4);
2874       switch (atype) {
2875         case STATIC_OOP:
2876           real_offset = next_static_oop_offset;
2877           next_static_oop_offset += heapOopSize;
2878           break;
2879         case STATIC_BYTE:
2880           real_offset = next_static_byte_offset;
2881           next_static_byte_offset += 1;
2882           break;
2883         case STATIC_SHORT:
2884           real_offset = next_static_short_offset;
2885           next_static_short_offset += BytesPerShort;
2886           break;
2887         case STATIC_WORD:
2888           real_offset = next_static_word_offset;
2889           next_static_word_offset += BytesPerInt;
2890           break;
2891         case STATIC_ALIGNED_DOUBLE:
2892         case STATIC_DOUBLE:
2893           real_offset = next_static_double_offset;
2894           next_static_double_offset += BytesPerLong;
2895           break;
2896         case NONSTATIC_OOP:
2897           if( nonstatic_oop_space_count > 0 ) {
2898             real_offset = nonstatic_oop_space_offset;
2899             nonstatic_oop_space_offset += heapOopSize;
2900             nonstatic_oop_space_count  -= 1;
2901           } else {
2902             real_offset = next_nonstatic_oop_offset;
2903             next_nonstatic_oop_offset += heapOopSize;
2904           }
2905           // Update oop maps
2906           if( nonstatic_oop_map_count > 0 &&
2907               nonstatic_oop_offsets[nonstatic_oop_map_count - 1] ==
2908               (u2)(real_offset - nonstatic_oop_length[nonstatic_oop_map_count - 1] * heapOopSize) ) {
2909             // Extend current oop map
2910             nonstatic_oop_length[nonstatic_oop_map_count - 1] += 1;
2911           } else {
2912             // Create new oop map
2913             nonstatic_oop_offsets[nonstatic_oop_map_count] = (u2)real_offset;
2914             nonstatic_oop_length [nonstatic_oop_map_count] = 1;
2915             nonstatic_oop_map_count += 1;
2916             if( first_nonstatic_oop_offset == 0 ) { // Undefined
2917               first_nonstatic_oop_offset = real_offset;
2918             }
2919           }
2920           break;
2921         case NONSTATIC_BYTE:
2922           if( nonstatic_byte_space_count > 0 ) {
2923             real_offset = nonstatic_byte_space_offset;
2924             nonstatic_byte_space_offset += 1;
2925             nonstatic_byte_space_count  -= 1;
2926           } else {
2927             real_offset = next_nonstatic_byte_offset;
2928             next_nonstatic_byte_offset += 1;
2929           }
2930           break;
2931         case NONSTATIC_SHORT:
2932           if( nonstatic_short_space_count > 0 ) {
2933             real_offset = nonstatic_short_space_offset;
2934             nonstatic_short_space_offset += BytesPerShort;
2935             nonstatic_short_space_count  -= 1;
2936           } else {
2937             real_offset = next_nonstatic_short_offset;
2938             next_nonstatic_short_offset += BytesPerShort;
2939           }
2940           break;
2941         case NONSTATIC_WORD:
2942           if( nonstatic_word_space_count > 0 ) {
2943             real_offset = nonstatic_word_space_offset;
2944             nonstatic_word_space_offset += BytesPerInt;
2945             nonstatic_word_space_count  -= 1;
2946           } else {
2947             real_offset = next_nonstatic_word_offset;
2948             next_nonstatic_word_offset += BytesPerInt;
2949           }
2950           break;
2951         case NONSTATIC_ALIGNED_DOUBLE:
2952         case NONSTATIC_DOUBLE:
2953           real_offset = next_nonstatic_double_offset;
2954           next_nonstatic_double_offset += BytesPerLong;
2955           break;
2956         default:
2957           ShouldNotReachHere();
2958       }
2959       fields->short_at_put(i+4, extract_low_short_from_int(real_offset) );
2960       fields->short_at_put(i+5, extract_high_short_from_int(real_offset) );
2961     }
2962 
2963     // Size of instances
2964     int instance_size;
2965 
2966     instance_size = align_object_size(next_nonstatic_type_offset / wordSize);
2967 
2968     assert(instance_size == align_object_size(instanceOopDesc::header_size() + nonstatic_field_size), "consistent layout helper value");
2969 
2970     // Size of non-static oop map blocks (in words) allocated at end of klass
2971     int nonstatic_oop_map_size = compute_oop_map_size(super_klass, nonstatic_oop_map_count, first_nonstatic_oop_offset);
2972 
2973     // Compute reference type
2974     ReferenceType rt;
2975     if (super_klass() == NULL) {
2976       rt = REF_NONE;
2977     } else {
2978       rt = super_klass->reference_type();
2979     }
2980 
2981     // We can now create the basic klassOop for this klass
2982     klassOop ik = oopFactory::new_instanceKlass(
2983                                     vtable_size, itable_size,
2984                                     static_field_size, nonstatic_oop_map_size,
2985                                     rt, CHECK_(nullHandle));
2986     instanceKlassHandle this_klass (THREAD, ik);
2987 
2988     assert(this_klass->static_field_size() == static_field_size &&
2989            this_klass->nonstatic_oop_map_size() == nonstatic_oop_map_size, "sanity check");
2990 
2991     // Fill in information already parsed
2992     this_klass->set_access_flags(access_flags);
2993     jint lh = Klass::instance_layout_helper(instance_size, false);
2994     this_klass->set_layout_helper(lh);
2995     assert(this_klass->oop_is_instance(), "layout is correct");
2996     assert(this_klass->size_helper() == instance_size, "correct size_helper");
2997     // Not yet: supers are done below to support the new subtype-checking fields
2998     //this_klass->set_super(super_klass());
2999     this_klass->set_class_loader(class_loader());
3000     this_klass->set_nonstatic_field_size(nonstatic_field_size);
3001     this_klass->set_has_nonstatic_fields(has_nonstatic_fields);
3002     this_klass->set_static_oop_field_size(fac.static_oop_count);
3003     cp->set_pool_holder(this_klass());
3004     this_klass->set_constants(cp());
3005     this_klass->set_local_interfaces(local_interfaces());
3006     this_klass->set_fields(fields());
3007     this_klass->set_methods(methods());
3008     if (has_final_method) {
3009       this_klass->set_has_final_method();
3010     }
3011     this_klass->set_method_ordering(method_ordering());
3012     this_klass->set_initial_method_idnum(methods->length());
3013     this_klass->set_name(cp->klass_name_at(this_class_index));
3014     this_klass->set_protection_domain(protection_domain());
3015     this_klass->set_fields_annotations(fields_annotations());
3016     this_klass->set_methods_annotations(methods_annotations());
3017     this_klass->set_methods_parameter_annotations(methods_parameter_annotations());
3018     this_klass->set_methods_default_annotations(methods_default_annotations());
3019 
3020     this_klass->set_minor_version(minor_version);
3021     this_klass->set_major_version(major_version);
3022 
3023     if (cached_class_file_bytes != NULL) {
3024       // JVMTI: we have an instanceKlass now, tell it about the cached bytes
3025       this_klass->set_cached_class_file(cached_class_file_bytes,
3026                                         cached_class_file_length);
3027     }
3028 
3029     // Miranda methods
3030     if ((num_miranda_methods > 0) ||
3031         // if this class introduced new miranda methods or
3032         (super_klass.not_null() && (super_klass->has_miranda_methods()))
3033         // super class exists and this class inherited miranda methods
3034         ) {
3035       this_klass->set_has_miranda_methods(); // then set a flag
3036     }
3037 
3038     // Additional attributes
3039     parse_classfile_attributes(cp, this_klass, CHECK_(nullHandle));
3040 
3041     // Make sure this is the end of class file stream
3042     guarantee_property(cfs->at_eos(), "Extra bytes at the end of class file %s", CHECK_(nullHandle));
3043 
3044     // Initialize static fields
3045     this_klass->do_local_static_fields(&initialize_static_field, CHECK_(nullHandle));
3046 
3047     // VerifyOops believes that once this has been set, the object is completely loaded.
3048     // Compute transitive closure of interfaces this class implements
3049     this_klass->set_transitive_interfaces(transitive_interfaces());
3050 
3051     // Fill in information needed to compute superclasses.
3052     this_klass->initialize_supers(super_klass(), CHECK_(nullHandle));
3053 
3054     // Initialize itable offset tables
3055     klassItable::setup_itable_offset_table(this_klass);
3056 
3057     // Do final class setup
3058     fill_oop_maps(this_klass, nonstatic_oop_map_count, nonstatic_oop_offsets, nonstatic_oop_length);
3059 
3060     set_precomputed_flags(this_klass);
3061 
3062     // reinitialize modifiers, using the InnerClasses attribute
3063     int computed_modifiers = this_klass->compute_modifier_flags(CHECK_(nullHandle));
3064     this_klass->set_modifier_flags(computed_modifiers);
3065 
3066     // check if this class can access its super class
3067     check_super_class_access(this_klass, CHECK_(nullHandle));
3068 
3069     // check if this class can access its superinterfaces
3070     check_super_interface_access(this_klass, CHECK_(nullHandle));
3071 
3072     // check if this class overrides any final method
3073     check_final_method_override(this_klass, CHECK_(nullHandle));
3074 
3075     // check that if this class is an interface then it doesn't have static methods
3076     if (this_klass->is_interface()) {
3077       check_illegal_static_method(this_klass, CHECK_(nullHandle));
3078     }
3079 
3080     ClassLoadingService::notify_class_loaded(instanceKlass::cast(this_klass()),
3081                                              false /* not shared class */);
3082 
3083     if (TraceClassLoading) {
3084       // print in a single call to reduce interleaving of output
3085       if (cfs->source() != NULL) {
3086         tty->print("[Loaded %s from %s]\n", this_klass->external_name(),
3087                    cfs->source());
3088       } else if (class_loader.is_null()) {
3089         if (THREAD->is_Java_thread()) {
3090           klassOop caller = ((JavaThread*)THREAD)->security_get_caller_class(1);
3091           tty->print("[Loaded %s by instance of %s]\n",
3092                      this_klass->external_name(),
3093                      instanceKlass::cast(caller)->external_name());
3094         } else {
3095           tty->print("[Loaded %s]\n", this_klass->external_name());
3096         }
3097       } else {
3098         ResourceMark rm;
3099         tty->print("[Loaded %s from %s]\n", this_klass->external_name(),
3100                    instanceKlass::cast(class_loader->klass())->external_name());
3101       }
3102     }
3103 
3104     if (TraceClassResolution) {
3105       // print out the superclass.
3106       const char * from = Klass::cast(this_klass())->external_name();
3107       if (this_klass->java_super() != NULL) {
3108         tty->print("RESOLVE %s %s\n", from, instanceKlass::cast(this_klass->java_super())->external_name());
3109       }
3110       // print out each of the interface classes referred to by this class.
3111       objArrayHandle local_interfaces(THREAD, this_klass->local_interfaces());
3112       if (!local_interfaces.is_null()) {
3113         int length = local_interfaces->length();
3114         for (int i = 0; i < length; i++) {
3115           klassOop k = klassOop(local_interfaces->obj_at(i));
3116           instanceKlass* to_class = instanceKlass::cast(k);
3117           const char * to = to_class->external_name();
3118           tty->print("RESOLVE %s %s\n", from, to);
3119         }
3120       }
3121     }
3122 
3123 #ifndef PRODUCT
3124     if( PrintCompactFieldsSavings ) {
3125       if( nonstatic_field_size < orig_nonstatic_field_size ) {
3126         tty->print("[Saved %d of %3d words in %s]\n",
3127                  orig_nonstatic_field_size - nonstatic_field_size,
3128                  orig_nonstatic_field_size, this_klass->external_name());
3129       } else if( nonstatic_field_size > orig_nonstatic_field_size ) {
3130         tty->print("[Wasted %d over %3d words in %s]\n",
3131                  nonstatic_field_size - orig_nonstatic_field_size,
3132                  orig_nonstatic_field_size, this_klass->external_name());
3133       }
3134     }
3135 #endif
3136 
3137     // preserve result across HandleMark
3138     preserve_this_klass = this_klass();
3139   }
3140 
3141   // Create new handle outside HandleMark
3142   instanceKlassHandle this_klass (THREAD, preserve_this_klass);
3143   debug_only(this_klass->as_klassOop()->verify();)
3144 
3145   return this_klass;
3146 }
3147 
3148 
3149 int ClassFileParser::compute_oop_map_size(instanceKlassHandle super, int nonstatic_oop_map_count, int first_nonstatic_oop_offset) {
3150   int map_size = super.is_null() ? 0 : super->nonstatic_oop_map_size();
3151   if (nonstatic_oop_map_count > 0) {
3152     // We have oops to add to map
3153     if (map_size == 0) {
3154       map_size = nonstatic_oop_map_count;
3155     } else {
3156       // Check whether we should add a new map block or whether the last one can be extended
3157       OopMapBlock* first_map = super->start_of_nonstatic_oop_maps();
3158       OopMapBlock* last_map = first_map + map_size - 1;
3159 
3160       int next_offset = last_map->offset() + (last_map->length() * heapOopSize);
3161       if (next_offset == first_nonstatic_oop_offset) {
3162         // There is no gap bettwen superklass's last oop field and first
3163         // local oop field, merge maps.
3164         nonstatic_oop_map_count -= 1;
3165       } else {
3166         // Superklass didn't end with a oop field, add extra maps
3167         assert(next_offset<first_nonstatic_oop_offset, "just checking");
3168       }
3169       map_size += nonstatic_oop_map_count;
3170     }
3171   }
3172   return map_size;
3173 }
3174 
3175 
3176 void ClassFileParser::fill_oop_maps(instanceKlassHandle k,
3177                         int nonstatic_oop_map_count,
3178                         u2* nonstatic_oop_offsets, u2* nonstatic_oop_length) {
3179   OopMapBlock* this_oop_map = k->start_of_nonstatic_oop_maps();
3180   OopMapBlock* last_oop_map = this_oop_map + k->nonstatic_oop_map_size();
3181   instanceKlass* super = k->superklass();
3182   if (super != NULL) {
3183     int super_oop_map_size     = super->nonstatic_oop_map_size();
3184     OopMapBlock* super_oop_map = super->start_of_nonstatic_oop_maps();
3185     // Copy maps from superklass
3186     while (super_oop_map_size-- > 0) {
3187       *this_oop_map++ = *super_oop_map++;
3188     }
3189   }
3190   if (nonstatic_oop_map_count > 0) {
3191     if (this_oop_map + nonstatic_oop_map_count > last_oop_map) {
3192       // Calculated in compute_oop_map_size() number of oop maps is less then
3193       // collected oop maps since there is no gap between superklass's last oop
3194       // field and first local oop field. Extend the last oop map copied
3195       // from the superklass instead of creating new one.
3196       nonstatic_oop_map_count--;
3197       nonstatic_oop_offsets++;
3198       this_oop_map--;
3199       this_oop_map->set_length(this_oop_map->length() + *nonstatic_oop_length++);
3200       this_oop_map++;
3201     }
3202     assert((this_oop_map + nonstatic_oop_map_count) == last_oop_map, "just checking");
3203     // Add new map blocks, fill them
3204     while (nonstatic_oop_map_count-- > 0) {
3205       this_oop_map->set_offset(*nonstatic_oop_offsets++);
3206       this_oop_map->set_length(*nonstatic_oop_length++);
3207       this_oop_map++;
3208     }
3209   }
3210 }
3211 
3212 
3213 void ClassFileParser::set_precomputed_flags(instanceKlassHandle k) {
3214   klassOop super = k->super();
3215 
3216   // Check if this klass has an empty finalize method (i.e. one with return bytecode only),
3217   // in which case we don't have to register objects as finalizable
3218   if (!_has_empty_finalizer) {
3219     if (_has_finalizer ||
3220         (super != NULL && super->klass_part()->has_finalizer())) {
3221       k->set_has_finalizer();
3222     }
3223   }
3224 
3225 #ifdef ASSERT
3226   bool f = false;
3227   methodOop m = k->lookup_method(vmSymbols::finalize_method_name(),
3228                                  vmSymbols::void_method_signature());
3229   if (m != NULL && !m->is_empty_method()) {
3230     f = true;
3231   }
3232   assert(f == k->has_finalizer(), "inconsistent has_finalizer");
3233 #endif
3234 
3235   // Check if this klass supports the java.lang.Cloneable interface
3236   if (SystemDictionary::cloneable_klass_loaded()) {
3237     if (k->is_subtype_of(SystemDictionary::cloneable_klass())) {
3238       k->set_is_cloneable();
3239     }
3240   }
3241 
3242   // Check if this klass has a vanilla default constructor
3243   if (super == NULL) {
3244     // java.lang.Object has empty default constructor
3245     k->set_has_vanilla_constructor();
3246   } else {
3247     if (Klass::cast(super)->has_vanilla_constructor() &&
3248         _has_vanilla_constructor) {
3249       k->set_has_vanilla_constructor();
3250     }
3251 #ifdef ASSERT
3252     bool v = false;
3253     if (Klass::cast(super)->has_vanilla_constructor()) {
3254       methodOop constructor = k->find_method(vmSymbols::object_initializer_name(
3255 ), vmSymbols::void_method_signature());
3256       if (constructor != NULL && constructor->is_vanilla_constructor()) {
3257         v = true;
3258       }
3259     }
3260     assert(v == k->has_vanilla_constructor(), "inconsistent has_vanilla_constructor");
3261 #endif
3262   }
3263 
3264   // If it cannot be fast-path allocated, set a bit in the layout helper.
3265   // See documentation of instanceKlass::can_be_fastpath_allocated().
3266   assert(k->size_helper() > 0, "layout_helper is initialized");
3267   if ((!RegisterFinalizersAtInit && k->has_finalizer())
3268       || k->is_abstract() || k->is_interface()
3269       || (k->name() == vmSymbols::java_lang_Class()
3270           && k->class_loader() == NULL)
3271       || k->size_helper() >= FastAllocateSizeLimit) {
3272     // Forbid fast-path allocation.
3273     jint lh = Klass::instance_layout_helper(k->size_helper(), true);
3274     k->set_layout_helper(lh);
3275   }
3276 }
3277 
3278 
3279 // utility method for appending and array with check for duplicates
3280 
3281 void append_interfaces(objArrayHandle result, int& index, objArrayOop ifs) {
3282   // iterate over new interfaces
3283   for (int i = 0; i < ifs->length(); i++) {
3284     oop e = ifs->obj_at(i);
3285     assert(e->is_klass() && instanceKlass::cast(klassOop(e))->is_interface(), "just checking");
3286     // check for duplicates
3287     bool duplicate = false;
3288     for (int j = 0; j < index; j++) {
3289       if (result->obj_at(j) == e) {
3290         duplicate = true;
3291         break;
3292       }
3293     }
3294     // add new interface
3295     if (!duplicate) {
3296       result->obj_at_put(index++, e);
3297     }
3298   }
3299 }
3300 
3301 objArrayHandle ClassFileParser::compute_transitive_interfaces(instanceKlassHandle super, objArrayHandle local_ifs, TRAPS) {
3302   // Compute maximum size for transitive interfaces
3303   int max_transitive_size = 0;
3304   int super_size = 0;
3305   // Add superclass transitive interfaces size
3306   if (super.not_null()) {
3307     super_size = super->transitive_interfaces()->length();
3308     max_transitive_size += super_size;
3309   }
3310   // Add local interfaces' super interfaces
3311   int local_size = local_ifs->length();
3312   for (int i = 0; i < local_size; i++) {
3313     klassOop l = klassOop(local_ifs->obj_at(i));
3314     max_transitive_size += instanceKlass::cast(l)->transitive_interfaces()->length();
3315   }
3316   // Finally add local interfaces
3317   max_transitive_size += local_size;
3318   // Construct array
3319   objArrayHandle result;
3320   if (max_transitive_size == 0) {
3321     // no interfaces, use canonicalized array
3322     result = objArrayHandle(THREAD, Universe::the_empty_system_obj_array());
3323   } else if (max_transitive_size == super_size) {
3324     // no new local interfaces added, share superklass' transitive interface array
3325     result = objArrayHandle(THREAD, super->transitive_interfaces());
3326   } else if (max_transitive_size == local_size) {
3327     // only local interfaces added, share local interface array
3328     result = local_ifs;
3329   } else {
3330     objArrayHandle nullHandle;
3331     objArrayOop new_objarray = oopFactory::new_system_objArray(max_transitive_size, CHECK_(nullHandle));
3332     result = objArrayHandle(THREAD, new_objarray);
3333     int index = 0;
3334     // Copy down from superclass
3335     if (super.not_null()) {
3336       append_interfaces(result, index, super->transitive_interfaces());
3337     }
3338     // Copy down from local interfaces' superinterfaces
3339     for (int i = 0; i < local_ifs->length(); i++) {
3340       klassOop l = klassOop(local_ifs->obj_at(i));
3341       append_interfaces(result, index, instanceKlass::cast(l)->transitive_interfaces());
3342     }
3343     // Finally add local interfaces
3344     append_interfaces(result, index, local_ifs());
3345 
3346     // Check if duplicates were removed
3347     if (index != max_transitive_size) {
3348       assert(index < max_transitive_size, "just checking");
3349       objArrayOop new_result = oopFactory::new_system_objArray(index, CHECK_(nullHandle));
3350       for (int i = 0; i < index; i++) {
3351         oop e = result->obj_at(i);
3352         assert(e != NULL, "just checking");
3353         new_result->obj_at_put(i, e);
3354       }
3355       result = objArrayHandle(THREAD, new_result);
3356     }
3357   }
3358   return result;
3359 }
3360 
3361 
3362 void ClassFileParser::check_super_class_access(instanceKlassHandle this_klass, TRAPS) {
3363   klassOop super = this_klass->super();
3364   if ((super != NULL) &&
3365       (!Reflection::verify_class_access(this_klass->as_klassOop(), super, false))) {
3366     ResourceMark rm(THREAD);
3367     Exceptions::fthrow(
3368       THREAD_AND_LOCATION,
3369       vmSymbolHandles::java_lang_IllegalAccessError(),
3370       "class %s cannot access its superclass %s",
3371       this_klass->external_name(),
3372       instanceKlass::cast(super)->external_name()
3373     );
3374     return;
3375   }
3376 }
3377 
3378 
3379 void ClassFileParser::check_super_interface_access(instanceKlassHandle this_klass, TRAPS) {
3380   objArrayHandle local_interfaces (THREAD, this_klass->local_interfaces());
3381   int lng = local_interfaces->length();
3382   for (int i = lng - 1; i >= 0; i--) {
3383     klassOop k = klassOop(local_interfaces->obj_at(i));
3384     assert (k != NULL && Klass::cast(k)->is_interface(), "invalid interface");
3385     if (!Reflection::verify_class_access(this_klass->as_klassOop(), k, false)) {
3386       ResourceMark rm(THREAD);
3387       Exceptions::fthrow(
3388         THREAD_AND_LOCATION,
3389         vmSymbolHandles::java_lang_IllegalAccessError(),
3390         "class %s cannot access its superinterface %s",
3391         this_klass->external_name(),
3392         instanceKlass::cast(k)->external_name()
3393       );
3394       return;
3395     }
3396   }
3397 }
3398 
3399 
3400 void ClassFileParser::check_final_method_override(instanceKlassHandle this_klass, TRAPS) {
3401   objArrayHandle methods (THREAD, this_klass->methods());
3402   int num_methods = methods->length();
3403 
3404   // go thru each method and check if it overrides a final method
3405   for (int index = 0; index < num_methods; index++) {
3406     methodOop m = (methodOop)methods->obj_at(index);
3407 
3408     // skip private, static and <init> methods
3409     if ((!m->is_private()) &&
3410         (!m->is_static()) &&
3411         (m->name() != vmSymbols::object_initializer_name())) {
3412 
3413       symbolOop name = m->name();
3414       symbolOop signature = m->signature();
3415       klassOop k = this_klass->super();
3416       methodOop super_m = NULL;
3417       while (k != NULL) {
3418         // skip supers that don't have final methods.
3419         if (k->klass_part()->has_final_method()) {
3420           // lookup a matching method in the super class hierarchy
3421           super_m = instanceKlass::cast(k)->lookup_method(name, signature);
3422           if (super_m == NULL) {
3423             break; // didn't find any match; get out
3424           }
3425 
3426           if (super_m->is_final() &&
3427               // matching method in super is final
3428               (Reflection::verify_field_access(this_klass->as_klassOop(),
3429                                                super_m->method_holder(),
3430                                                super_m->method_holder(),
3431                                                super_m->access_flags(), false))
3432             // this class can access super final method and therefore override
3433             ) {
3434             ResourceMark rm(THREAD);
3435             Exceptions::fthrow(
3436               THREAD_AND_LOCATION,
3437               vmSymbolHandles::java_lang_VerifyError(),
3438               "class %s overrides final method %s.%s",
3439               this_klass->external_name(),
3440               name->as_C_string(),
3441               signature->as_C_string()
3442             );
3443             return;
3444           }
3445 
3446           // continue to look from super_m's holder's super.
3447           k = instanceKlass::cast(super_m->method_holder())->super();
3448           continue;
3449         }
3450 
3451         k = k->klass_part()->super();
3452       }
3453     }
3454   }
3455 }
3456 
3457 
3458 // assumes that this_klass is an interface
3459 void ClassFileParser::check_illegal_static_method(instanceKlassHandle this_klass, TRAPS) {
3460   assert(this_klass->is_interface(), "not an interface");
3461   objArrayHandle methods (THREAD, this_klass->methods());
3462   int num_methods = methods->length();
3463 
3464   for (int index = 0; index < num_methods; index++) {
3465     methodOop m = (methodOop)methods->obj_at(index);
3466     // if m is static and not the init method, throw a verify error
3467     if ((m->is_static()) && (m->name() != vmSymbols::class_initializer_name())) {
3468       ResourceMark rm(THREAD);
3469       Exceptions::fthrow(
3470         THREAD_AND_LOCATION,
3471         vmSymbolHandles::java_lang_VerifyError(),
3472         "Illegal static method %s in interface %s",
3473         m->name()->as_C_string(),
3474         this_klass->external_name()
3475       );
3476       return;
3477     }
3478   }
3479 }
3480 
3481 // utility methods for format checking
3482 
3483 void ClassFileParser::verify_legal_class_modifiers(jint flags, TRAPS) {
3484   if (!_need_verify) { return; }
3485 
3486   const bool is_interface  = (flags & JVM_ACC_INTERFACE)  != 0;
3487   const bool is_abstract   = (flags & JVM_ACC_ABSTRACT)   != 0;
3488   const bool is_final      = (flags & JVM_ACC_FINAL)      != 0;
3489   const bool is_super      = (flags & JVM_ACC_SUPER)      != 0;
3490   const bool is_enum       = (flags & JVM_ACC_ENUM)       != 0;
3491   const bool is_annotation = (flags & JVM_ACC_ANNOTATION) != 0;
3492   const bool major_gte_15  = _major_version >= JAVA_1_5_VERSION;
3493 
3494   if ((is_abstract && is_final) ||
3495       (is_interface && !is_abstract) ||
3496       (is_interface && major_gte_15 && (is_super || is_enum)) ||
3497       (!is_interface && major_gte_15 && is_annotation)) {
3498     ResourceMark rm(THREAD);
3499     Exceptions::fthrow(
3500       THREAD_AND_LOCATION,
3501       vmSymbolHandles::java_lang_ClassFormatError(),
3502       "Illegal class modifiers in class %s: 0x%X",
3503       _class_name->as_C_string(), flags
3504     );
3505     return;
3506   }
3507 }
3508 
3509 bool ClassFileParser::has_illegal_visibility(jint flags) {
3510   const bool is_public    = (flags & JVM_ACC_PUBLIC)    != 0;
3511   const bool is_protected = (flags & JVM_ACC_PROTECTED) != 0;
3512   const bool is_private   = (flags & JVM_ACC_PRIVATE)   != 0;
3513 
3514   return ((is_public && is_protected) ||
3515           (is_public && is_private) ||
3516           (is_protected && is_private));
3517 }
3518 
3519 bool ClassFileParser::is_supported_version(u2 major, u2 minor) {
3520   u2 max_version = JDK_Version::is_gte_jdk17x_version() ?
3521     JAVA_MAX_SUPPORTED_VERSION : JAVA_6_VERSION;
3522   return (major >= JAVA_MIN_SUPPORTED_VERSION) &&
3523          (major <= max_version) &&
3524          ((major != max_version) ||
3525           (minor <= JAVA_MAX_SUPPORTED_MINOR_VERSION));
3526 }
3527 
3528 void ClassFileParser::verify_legal_field_modifiers(
3529     jint flags, bool is_interface, TRAPS) {
3530   if (!_need_verify) { return; }
3531 
3532   const bool is_public    = (flags & JVM_ACC_PUBLIC)    != 0;
3533   const bool is_protected = (flags & JVM_ACC_PROTECTED) != 0;
3534   const bool is_private   = (flags & JVM_ACC_PRIVATE)   != 0;
3535   const bool is_static    = (flags & JVM_ACC_STATIC)    != 0;
3536   const bool is_final     = (flags & JVM_ACC_FINAL)     != 0;
3537   const bool is_volatile  = (flags & JVM_ACC_VOLATILE)  != 0;
3538   const bool is_transient = (flags & JVM_ACC_TRANSIENT) != 0;
3539   const bool is_enum      = (flags & JVM_ACC_ENUM)      != 0;
3540   const bool major_gte_15 = _major_version >= JAVA_1_5_VERSION;
3541 
3542   bool is_illegal = false;
3543 
3544   if (is_interface) {
3545     if (!is_public || !is_static || !is_final || is_private ||
3546         is_protected || is_volatile || is_transient ||
3547         (major_gte_15 && is_enum)) {
3548       is_illegal = true;
3549     }
3550   } else { // not interface
3551     if (has_illegal_visibility(flags) || (is_final && is_volatile)) {
3552       is_illegal = true;
3553     }
3554   }
3555 
3556   if (is_illegal) {
3557     ResourceMark rm(THREAD);
3558     Exceptions::fthrow(
3559       THREAD_AND_LOCATION,
3560       vmSymbolHandles::java_lang_ClassFormatError(),
3561       "Illegal field modifiers in class %s: 0x%X",
3562       _class_name->as_C_string(), flags);
3563     return;
3564   }
3565 }
3566 
3567 void ClassFileParser::verify_legal_method_modifiers(
3568     jint flags, bool is_interface, symbolHandle name, TRAPS) {
3569   if (!_need_verify) { return; }
3570 
3571   const bool is_public       = (flags & JVM_ACC_PUBLIC)       != 0;
3572   const bool is_private      = (flags & JVM_ACC_PRIVATE)      != 0;
3573   const bool is_static       = (flags & JVM_ACC_STATIC)       != 0;
3574   const bool is_final        = (flags & JVM_ACC_FINAL)        != 0;
3575   const bool is_native       = (flags & JVM_ACC_NATIVE)       != 0;
3576   const bool is_abstract     = (flags & JVM_ACC_ABSTRACT)     != 0;
3577   const bool is_bridge       = (flags & JVM_ACC_BRIDGE)       != 0;
3578   const bool is_strict       = (flags & JVM_ACC_STRICT)       != 0;
3579   const bool is_synchronized = (flags & JVM_ACC_SYNCHRONIZED) != 0;
3580   const bool major_gte_15    = _major_version >= JAVA_1_5_VERSION;
3581   const bool is_initializer  = (name == vmSymbols::object_initializer_name());
3582 
3583   bool is_illegal = false;
3584 
3585   if (is_interface) {
3586     if (!is_abstract || !is_public || is_static || is_final ||
3587         is_native || (major_gte_15 && (is_synchronized || is_strict))) {
3588       is_illegal = true;
3589     }
3590   } else { // not interface
3591     if (is_initializer) {
3592       if (is_static || is_final || is_synchronized || is_native ||
3593           is_abstract || (major_gte_15 && is_bridge)) {
3594         is_illegal = true;
3595       }
3596     } else { // not initializer
3597       if (is_abstract) {
3598         if ((is_final || is_native || is_private || is_static ||
3599             (major_gte_15 && (is_synchronized || is_strict)))) {
3600           is_illegal = true;
3601         }
3602       }
3603       if (has_illegal_visibility(flags)) {
3604         is_illegal = true;
3605       }
3606     }
3607   }
3608 
3609   if (is_illegal) {
3610     ResourceMark rm(THREAD);
3611     Exceptions::fthrow(
3612       THREAD_AND_LOCATION,
3613       vmSymbolHandles::java_lang_ClassFormatError(),
3614       "Method %s in class %s has illegal modifiers: 0x%X",
3615       name->as_C_string(), _class_name->as_C_string(), flags);
3616     return;
3617   }
3618 }
3619 
3620 void ClassFileParser::verify_legal_utf8(const unsigned char* buffer, int length, TRAPS) {
3621   assert(_need_verify, "only called when _need_verify is true");
3622   int i = 0;
3623   int count = length >> 2;
3624   for (int k=0; k<count; k++) {
3625     unsigned char b0 = buffer[i];
3626     unsigned char b1 = buffer[i+1];
3627     unsigned char b2 = buffer[i+2];
3628     unsigned char b3 = buffer[i+3];
3629     // For an unsigned char v,
3630     // (v | v - 1) is < 128 (highest bit 0) for 0 < v < 128;
3631     // (v | v - 1) is >= 128 (highest bit 1) for v == 0 or v >= 128.
3632     unsigned char res = b0 | b0 - 1 |
3633                         b1 | b1 - 1 |
3634                         b2 | b2 - 1 |
3635                         b3 | b3 - 1;
3636     if (res >= 128) break;
3637     i += 4;
3638   }
3639   for(; i < length; i++) {
3640     unsigned short c;
3641     // no embedded zeros
3642     guarantee_property((buffer[i] != 0), "Illegal UTF8 string in constant pool in class file %s", CHECK);
3643     if(buffer[i] < 128) {
3644       continue;
3645     }
3646     if ((i + 5) < length) { // see if it's legal supplementary character
3647       if (UTF8::is_supplementary_character(&buffer[i])) {
3648         c = UTF8::get_supplementary_character(&buffer[i]);
3649         i += 5;
3650         continue;
3651       }
3652     }
3653     switch (buffer[i] >> 4) {
3654       default: break;
3655       case 0x8: case 0x9: case 0xA: case 0xB: case 0xF:
3656         classfile_parse_error("Illegal UTF8 string in constant pool in class file %s", CHECK);
3657       case 0xC: case 0xD:  // 110xxxxx  10xxxxxx
3658         c = (buffer[i] & 0x1F) << 6;
3659         i++;
3660         if ((i < length) && ((buffer[i] & 0xC0) == 0x80)) {
3661           c += buffer[i] & 0x3F;
3662           if (_major_version <= 47 || c == 0 || c >= 0x80) {
3663             // for classes with major > 47, c must a null or a character in its shortest form
3664             break;
3665           }
3666         }
3667         classfile_parse_error("Illegal UTF8 string in constant pool in class file %s", CHECK);
3668       case 0xE:  // 1110xxxx 10xxxxxx 10xxxxxx
3669         c = (buffer[i] & 0xF) << 12;
3670         i += 2;
3671         if ((i < length) && ((buffer[i-1] & 0xC0) == 0x80) && ((buffer[i] & 0xC0) == 0x80)) {
3672           c += ((buffer[i-1] & 0x3F) << 6) + (buffer[i] & 0x3F);
3673           if (_major_version <= 47 || c >= 0x800) {
3674             // for classes with major > 47, c must be in its shortest form
3675             break;
3676           }
3677         }
3678         classfile_parse_error("Illegal UTF8 string in constant pool in class file %s", CHECK);
3679     }  // end of switch
3680   } // end of for
3681 }
3682 
3683 // Checks if name is a legal class name.
3684 void ClassFileParser::verify_legal_class_name(symbolHandle name, TRAPS) {
3685   if (!_need_verify || _relax_verify) { return; }
3686 
3687   char buf[fixed_buffer_size];
3688   char* bytes = name->as_utf8_flexible_buffer(THREAD, buf, fixed_buffer_size);
3689   unsigned int length = name->utf8_length();
3690   bool legal = false;
3691 
3692   if (length > 0) {
3693     char* p;
3694     if (bytes[0] == JVM_SIGNATURE_ARRAY) {
3695       p = skip_over_field_signature(bytes, false, length, CHECK);
3696       legal = (p != NULL) && ((p - bytes) == (int)length);
3697     } else if (_major_version < JAVA_1_5_VERSION) {
3698       if (bytes[0] != '<') {
3699         p = skip_over_field_name(bytes, true, length);
3700         legal = (p != NULL) && ((p - bytes) == (int)length);
3701       }
3702     } else {
3703       // 4900761: relax the constraints based on JSR202 spec
3704       // Class names may be drawn from the entire Unicode character set.
3705       // Identifiers between '/' must be unqualified names.
3706       // The utf8 string has been verified when parsing cpool entries.
3707       legal = verify_unqualified_name(bytes, length, LegalClass);
3708     }
3709   }
3710   if (!legal) {
3711     ResourceMark rm(THREAD);
3712     Exceptions::fthrow(
3713       THREAD_AND_LOCATION,
3714       vmSymbolHandles::java_lang_ClassFormatError(),
3715       "Illegal class name \"%s\" in class file %s", bytes,
3716       _class_name->as_C_string()
3717     );
3718     return;
3719   }
3720 }
3721 
3722 // Checks if name is a legal field name.
3723 void ClassFileParser::verify_legal_field_name(symbolHandle name, TRAPS) {
3724   if (!_need_verify || _relax_verify) { return; }
3725 
3726   char buf[fixed_buffer_size];
3727   char* bytes = name->as_utf8_flexible_buffer(THREAD, buf, fixed_buffer_size);
3728   unsigned int length = name->utf8_length();
3729   bool legal = false;
3730 
3731   if (length > 0) {
3732     if (_major_version < JAVA_1_5_VERSION) {
3733       if (bytes[0] != '<') {
3734         char* p = skip_over_field_name(bytes, false, length);
3735         legal = (p != NULL) && ((p - bytes) == (int)length);
3736       }
3737     } else {
3738       // 4881221: relax the constraints based on JSR202 spec
3739       legal = verify_unqualified_name(bytes, length, LegalField);
3740     }
3741   }
3742 
3743   if (!legal) {
3744     ResourceMark rm(THREAD);
3745     Exceptions::fthrow(
3746       THREAD_AND_LOCATION,
3747       vmSymbolHandles::java_lang_ClassFormatError(),
3748       "Illegal field name \"%s\" in class %s", bytes,
3749       _class_name->as_C_string()
3750     );
3751     return;
3752   }
3753 }
3754 
3755 // Checks if name is a legal method name.
3756 void ClassFileParser::verify_legal_method_name(symbolHandle name, TRAPS) {
3757   if (!_need_verify || _relax_verify) { return; }
3758 
3759   assert(!name.is_null(), "method name is null");
3760   char buf[fixed_buffer_size];
3761   char* bytes = name->as_utf8_flexible_buffer(THREAD, buf, fixed_buffer_size);
3762   unsigned int length = name->utf8_length();
3763   bool legal = false;
3764 
3765   if (length > 0) {
3766     if (bytes[0] == '<') {
3767       if (name == vmSymbols::object_initializer_name() || name == vmSymbols::class_initializer_name()) {
3768         legal = true;
3769       }
3770     } else if (_major_version < JAVA_1_5_VERSION) {
3771       char* p;
3772       p = skip_over_field_name(bytes, false, length);
3773       legal = (p != NULL) && ((p - bytes) == (int)length);
3774     } else {
3775       // 4881221: relax the constraints based on JSR202 spec
3776       legal = verify_unqualified_name(bytes, length, LegalMethod);
3777     }
3778   }
3779 
3780   if (!legal) {
3781     ResourceMark rm(THREAD);
3782     Exceptions::fthrow(
3783       THREAD_AND_LOCATION,
3784       vmSymbolHandles::java_lang_ClassFormatError(),
3785       "Illegal method name \"%s\" in class %s", bytes,
3786       _class_name->as_C_string()
3787     );
3788     return;
3789   }
3790 }
3791 
3792 
3793 // Checks if signature is a legal field signature.
3794 void ClassFileParser::verify_legal_field_signature(symbolHandle name, symbolHandle signature, TRAPS) {
3795   if (!_need_verify) { return; }
3796 
3797   char buf[fixed_buffer_size];
3798   char* bytes = signature->as_utf8_flexible_buffer(THREAD, buf, fixed_buffer_size);
3799   unsigned int length = signature->utf8_length();
3800   char* p = skip_over_field_signature(bytes, false, length, CHECK);
3801 
3802   if (p == NULL || (p - bytes) != (int)length) {
3803     ResourceMark rm(THREAD);
3804     Exceptions::fthrow(
3805       THREAD_AND_LOCATION,
3806       vmSymbolHandles::java_lang_ClassFormatError(),
3807       "Field \"%s\" in class %s has illegal signature \"%s\"",
3808       name->as_C_string(), _class_name->as_C_string(), bytes
3809     );
3810     return;
3811   }
3812 }
3813 
3814 // Checks if signature is a legal method signature.
3815 // Returns number of parameters
3816 int ClassFileParser::verify_legal_method_signature(symbolHandle name, symbolHandle signature, TRAPS) {
3817   if (!_need_verify) {
3818     // make sure caller's args_size will be less than 0 even for non-static
3819     // method so it will be recomputed in compute_size_of_parameters().
3820     return -2;
3821   }
3822 
3823   unsigned int args_size = 0;
3824   char buf[fixed_buffer_size];
3825   char* p = signature->as_utf8_flexible_buffer(THREAD, buf, fixed_buffer_size);
3826   unsigned int length = signature->utf8_length();
3827   char* nextp;
3828 
3829   // The first character must be a '('
3830   if ((length > 0) && (*p++ == JVM_SIGNATURE_FUNC)) {
3831     length--;
3832     // Skip over legal field signatures
3833     nextp = skip_over_field_signature(p, false, length, CHECK_0);
3834     while ((length > 0) && (nextp != NULL)) {
3835       args_size++;
3836       if (p[0] == 'J' || p[0] == 'D') {
3837         args_size++;
3838       }
3839       length -= nextp - p;
3840       p = nextp;
3841       nextp = skip_over_field_signature(p, false, length, CHECK_0);
3842     }
3843     // The first non-signature thing better be a ')'
3844     if ((length > 0) && (*p++ == JVM_SIGNATURE_ENDFUNC)) {
3845       length--;
3846       if (name->utf8_length() > 0 && name->byte_at(0) == '<') {
3847         // All internal methods must return void
3848         if ((length == 1) && (p[0] == JVM_SIGNATURE_VOID)) {
3849           return args_size;
3850         }
3851       } else {
3852         // Now we better just have a return value
3853         nextp = skip_over_field_signature(p, true, length, CHECK_0);
3854         if (nextp && ((int)length == (nextp - p))) {
3855           return args_size;
3856         }
3857       }
3858     }
3859   }
3860   // Report error
3861   ResourceMark rm(THREAD);
3862   Exceptions::fthrow(
3863     THREAD_AND_LOCATION,
3864     vmSymbolHandles::java_lang_ClassFormatError(),
3865     "Method \"%s\" in class %s has illegal signature \"%s\"",
3866     name->as_C_string(),  _class_name->as_C_string(), p
3867   );
3868   return 0;
3869 }
3870 
3871 
3872 // Unqualified names may not contain the characters '.', ';', or '/'.
3873 // Method names also may not contain the characters '<' or '>', unless <init> or <clinit>.
3874 // Note that method names may not be <init> or <clinit> in this method.
3875 // Because these names have been checked as special cases before calling this method
3876 // in verify_legal_method_name.
3877 bool ClassFileParser::verify_unqualified_name(char* name, unsigned int length, int type) {
3878   jchar ch;
3879 
3880   for (char* p = name; p != name + length; ) {
3881     ch = *p;
3882     if (ch < 128) {
3883       p++;
3884       if (ch == '.' || ch == ';') {
3885         return false;   // do not permit '.' or ';'
3886       }
3887       if (type != LegalClass && ch == '/') {
3888         return false;   // do not permit '/' unless it's class name
3889       }
3890       if (type == LegalMethod && (ch == '<' || ch == '>')) {
3891         return false;   // do not permit '<' or '>' in method names
3892       }
3893     } else {
3894       char* tmp_p = UTF8::next(p, &ch);
3895       p = tmp_p;
3896     }
3897   }
3898   return true;
3899 }
3900 
3901 
3902 // Take pointer to a string. Skip over the longest part of the string that could
3903 // be taken as a fieldname. Allow '/' if slash_ok is true.
3904 // Return a pointer to just past the fieldname.
3905 // Return NULL if no fieldname at all was found, or in the case of slash_ok
3906 // being true, we saw consecutive slashes (meaning we were looking for a
3907 // qualified path but found something that was badly-formed).
3908 char* ClassFileParser::skip_over_field_name(char* name, bool slash_ok, unsigned int length) {
3909   char* p;
3910   jchar ch;
3911   jboolean last_is_slash = false;
3912   jboolean not_first_ch = false;
3913 
3914   for (p = name; p != name + length; not_first_ch = true) {
3915     char* old_p = p;
3916     ch = *p;
3917     if (ch < 128) {
3918       p++;
3919       // quick check for ascii
3920       if ((ch >= 'a' && ch <= 'z') ||
3921           (ch >= 'A' && ch <= 'Z') ||
3922           (ch == '_' || ch == '$') ||
3923           (not_first_ch && ch >= '0' && ch <= '9')) {
3924         last_is_slash = false;
3925         continue;
3926       }
3927       if (slash_ok && ch == '/') {
3928         if (last_is_slash) {
3929           return NULL;  // Don't permit consecutive slashes
3930         }
3931         last_is_slash = true;
3932         continue;
3933       }
3934     } else {
3935       jint unicode_ch;
3936       char* tmp_p = UTF8::next_character(p, &unicode_ch);
3937       p = tmp_p;
3938       last_is_slash = false;
3939       // Check if ch is Java identifier start or is Java identifier part
3940       // 4672820: call java.lang.Character methods directly without generating separate tables.
3941       EXCEPTION_MARK;
3942       instanceKlassHandle klass (THREAD, SystemDictionary::char_klass());
3943 
3944       // return value
3945       JavaValue result(T_BOOLEAN);
3946       // Set up the arguments to isJavaIdentifierStart and isJavaIdentifierPart
3947       JavaCallArguments args;
3948       args.push_int(unicode_ch);
3949 
3950       // public static boolean isJavaIdentifierStart(char ch);
3951       JavaCalls::call_static(&result,
3952                              klass,
3953                              vmSymbolHandles::isJavaIdentifierStart_name(),
3954                              vmSymbolHandles::int_bool_signature(),
3955                              &args,
3956                              THREAD);
3957 
3958       if (HAS_PENDING_EXCEPTION) {
3959         CLEAR_PENDING_EXCEPTION;
3960         return 0;
3961       }
3962       if (result.get_jboolean()) {
3963         continue;
3964       }
3965 
3966       if (not_first_ch) {
3967         // public static boolean isJavaIdentifierPart(char ch);
3968         JavaCalls::call_static(&result,
3969                                klass,
3970                                vmSymbolHandles::isJavaIdentifierPart_name(),
3971                                vmSymbolHandles::int_bool_signature(),
3972                                &args,
3973                                THREAD);
3974 
3975         if (HAS_PENDING_EXCEPTION) {
3976           CLEAR_PENDING_EXCEPTION;
3977           return 0;
3978         }
3979 
3980         if (result.get_jboolean()) {
3981           continue;
3982         }
3983       }
3984     }
3985     return (not_first_ch) ? old_p : NULL;
3986   }
3987   return (not_first_ch) ? p : NULL;
3988 }
3989 
3990 
3991 // Take pointer to a string. Skip over the longest part of the string that could
3992 // be taken as a field signature. Allow "void" if void_ok.
3993 // Return a pointer to just past the signature.
3994 // Return NULL if no legal signature is found.
3995 char* ClassFileParser::skip_over_field_signature(char* signature,
3996                                                  bool void_ok,
3997                                                  unsigned int length,
3998                                                  TRAPS) {
3999   unsigned int array_dim = 0;
4000   while (length > 0) {
4001     switch (signature[0]) {
4002       case JVM_SIGNATURE_VOID: if (!void_ok) { return NULL; }
4003       case JVM_SIGNATURE_BOOLEAN:
4004       case JVM_SIGNATURE_BYTE:
4005       case JVM_SIGNATURE_CHAR:
4006       case JVM_SIGNATURE_SHORT:
4007       case JVM_SIGNATURE_INT:
4008       case JVM_SIGNATURE_FLOAT:
4009       case JVM_SIGNATURE_LONG:
4010       case JVM_SIGNATURE_DOUBLE:
4011         return signature + 1;
4012       case JVM_SIGNATURE_CLASS: {
4013         if (_major_version < JAVA_1_5_VERSION) {
4014           // Skip over the class name if one is there
4015           char* p = skip_over_field_name(signature + 1, true, --length);
4016 
4017           // The next character better be a semicolon
4018           if (p && (p - signature) > 1 && p[0] == ';') {
4019             return p + 1;
4020           }
4021         } else {
4022           // 4900761: For class version > 48, any unicode is allowed in class name.
4023           length--;
4024           signature++;
4025           while (length > 0 && signature[0] != ';') {
4026             if (signature[0] == '.') {
4027               classfile_parse_error("Class name contains illegal character '.' in descriptor in class file %s", CHECK_0);
4028             }
4029             length--;
4030             signature++;
4031           }
4032           if (signature[0] == ';') { return signature + 1; }
4033         }
4034 
4035         return NULL;
4036       }
4037       case JVM_SIGNATURE_ARRAY:
4038         array_dim++;
4039         if (array_dim > 255) {
4040           // 4277370: array descriptor is valid only if it represents 255 or fewer dimensions.
4041           classfile_parse_error("Array type descriptor has more than 255 dimensions in class file %s", CHECK_0);
4042         }
4043         // The rest of what's there better be a legal signature
4044         signature++;
4045         length--;
4046         void_ok = false;
4047         break;
4048 
4049       default:
4050         return NULL;
4051     }
4052   }
4053   return NULL;
4054 }