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