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