duke@435: /*
dcubed@4562:  * Copyright (c) 1997, 2013, Oracle and/or its affiliates. All rights reserved.
duke@435:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@435:  *
duke@435:  * This code is free software; you can redistribute it and/or modify it
duke@435:  * under the terms of the GNU General Public License version 2 only, as
duke@435:  * published by the Free Software Foundation.
duke@435:  *
duke@435:  * This code is distributed in the hope that it will be useful, but WITHOUT
duke@435:  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@435:  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
duke@435:  * version 2 for more details (a copy is included in the LICENSE file that
duke@435:  * accompanied this code).
duke@435:  *
duke@435:  * You should have received a copy of the GNU General Public License version
duke@435:  * 2 along with this work; if not, write to the Free Software Foundation,
duke@435:  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@435:  *
trims@1907:  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
trims@1907:  * or visit www.oracle.com if you need additional information or have any
trims@1907:  * questions.
duke@435:  *
duke@435:  */
duke@435: 
stefank@2314: #include "precompiled.hpp"
stefank@2314: #include "classfile/systemDictionary.hpp"
stefank@2314: #include "classfile/vmSymbols.hpp"
stefank@2314: #include "gc_implementation/shared/markSweep.inline.hpp"
stefank@2314: #include "memory/gcLocker.hpp"
stefank@2314: #include "memory/resourceArea.hpp"
stefank@2314: #include "memory/universe.inline.hpp"
stefank@2314: #include "oops/instanceKlass.hpp"
stefank@2314: #include "oops/klassVtable.hpp"
coleenp@4037: #include "oops/method.hpp"
stefank@2314: #include "oops/objArrayOop.hpp"
stefank@2314: #include "oops/oop.inline.hpp"
stefank@2314: #include "prims/jvmtiRedefineClassesTrace.hpp"
stefank@2314: #include "runtime/arguments.hpp"
stefank@2314: #include "runtime/handles.inline.hpp"
stefank@2314: #include "utilities/copy.hpp"
duke@435: 
coleenp@4037: inline InstanceKlass* klassVtable::ik() const {
coleenp@4037:   Klass* k = _klass();
coleenp@4037:   assert(k->oop_is_instance(), "not an InstanceKlass");
coleenp@4037:   return (InstanceKlass*)k;
duke@435: }
duke@435: 
duke@435: 
duke@435: // this function computes the vtable size (including the size needed for miranda
duke@435: // methods) and the number of miranda methods in this class
duke@435: // Note on Miranda methods: Let's say there is a class C that implements
duke@435: // interface I.  Let's say there is a method m in I that neither C nor any
duke@435: // of its super classes implement (i.e there is no method of any access, with
duke@435: // the same name and signature as m), then m is a Miranda method which is
duke@435: // entered as a public abstract method in C's vtable.  From then on it should
duke@435: // treated as any other public method in C for method over-ride purposes.
kamg@4245: void klassVtable::compute_vtable_size_and_num_mirandas(
kamg@4245:     int* vtable_length_ret, int* num_new_mirandas,
kamg@4245:     GrowableArray<Method*>* all_mirandas, Klass* super,
kamg@4245:     Array<Method*>* methods, AccessFlags class_flags,
kamg@4245:     Handle classloader, Symbol* classname, Array<Klass*>* local_interfaces,
kamg@4245:     TRAPS) {
duke@435:   No_Safepoint_Verifier nsv;
duke@435: 
duke@435:   // set up default result values
kamg@4245:   int vtable_length = 0;
duke@435: 
duke@435:   // start off with super's vtable length
coleenp@4037:   InstanceKlass* sk = (InstanceKlass*)super;
duke@435:   vtable_length = super == NULL ? 0 : sk->vtable_length();
duke@435: 
duke@435:   // go thru each method in the methods table to see if it needs a new entry
duke@435:   int len = methods->length();
duke@435:   for (int i = 0; i < len; i++) {
coleenp@4037:     assert(methods->at(i)->is_method(), "must be a Method*");
coleenp@4037:     methodHandle mh(THREAD, methods->at(i));
duke@435: 
acorn@1087:     if (needs_new_vtable_entry(mh, super, classloader, classname, class_flags, THREAD)) {
duke@435:       vtable_length += vtableEntry::size(); // we need a new entry
duke@435:     }
duke@435:   }
duke@435: 
kamg@4245:   GrowableArray<Method*> new_mirandas(20);
duke@435:   // compute the number of mirandas methods that must be added to the end
kamg@4245:   get_mirandas(&new_mirandas, all_mirandas, super, methods, local_interfaces);
kamg@4245:   *num_new_mirandas = new_mirandas.length();
kamg@4245: 
kamg@4245:   vtable_length += *num_new_mirandas * vtableEntry::size();
duke@435: 
duke@435:   if (Universe::is_bootstrapping() && vtable_length == 0) {
duke@435:     // array classes don't have their superclass set correctly during
duke@435:     // bootstrapping
duke@435:     vtable_length = Universe::base_vtable_size();
duke@435:   }
duke@435: 
duke@435:   if (super == NULL && !Universe::is_bootstrapping() &&
duke@435:       vtable_length != Universe::base_vtable_size()) {
duke@435:     // Someone is attempting to redefine java.lang.Object incorrectly.  The
duke@435:     // only way this should happen is from
duke@435:     // SystemDictionary::resolve_from_stream(), which will detect this later
duke@435:     // and throw a security exception.  So don't assert here to let
duke@435:     // the exception occur.
duke@435:     vtable_length = Universe::base_vtable_size();
duke@435:   }
duke@435:   assert(super != NULL || vtable_length == Universe::base_vtable_size(),
duke@435:          "bad vtable size for class Object");
duke@435:   assert(vtable_length % vtableEntry::size() == 0, "bad vtable length");
duke@435:   assert(vtable_length >= Universe::base_vtable_size(), "vtable too small");
kamg@4245: 
kamg@4245:   *vtable_length_ret = vtable_length;
duke@435: }
duke@435: 
coleenp@4037: int klassVtable::index_of(Method* m, int len) const {
duke@435:   assert(m->vtable_index() >= 0, "do not ask this of non-vtable methods");
duke@435:   return m->vtable_index();
duke@435: }
duke@435: 
duke@435: int klassVtable::initialize_from_super(KlassHandle super) {
duke@435:   if (super.is_null()) {
duke@435:     return 0;
duke@435:   } else {
duke@435:     // copy methods from superKlass
coleenp@4037:     // can't inherit from array class, so must be InstanceKlass
duke@435:     assert(super->oop_is_instance(), "must be instance klass");
coleenp@4037:     InstanceKlass* sk = (InstanceKlass*)super();
duke@435:     klassVtable* superVtable = sk->vtable();
duke@435:     assert(superVtable->length() <= _length, "vtable too short");
duke@435: #ifdef ASSERT
duke@435:     superVtable->verify(tty, true);
duke@435: #endif
duke@435:     superVtable->copy_vtable_to(table());
duke@435: #ifndef PRODUCT
duke@435:     if (PrintVtables && Verbose) {
acorn@1087:       ResourceMark rm;
duke@435:       tty->print_cr("copy vtable from %s to %s size %d", sk->internal_name(), klass()->internal_name(), _length);
duke@435:     }
duke@435: #endif
duke@435:     return superVtable->length();
duke@435:   }
duke@435: }
duke@435: 
duke@435: // Revised lookup semantics   introduced 1.3 (Kestral beta)
duke@435: void klassVtable::initialize_vtable(bool checkconstraints, TRAPS) {
duke@435: 
duke@435:   // Note:  Arrays can have intermediate array supers.  Use java_super to skip them.
duke@435:   KlassHandle super (THREAD, klass()->java_super());
duke@435:   int nofNewEntries = 0;
duke@435: 
duke@435: 
duke@435:   if (PrintVtables && !klass()->oop_is_array()) {
duke@435:     ResourceMark rm(THREAD);
duke@435:     tty->print_cr("Initializing: %s", _klass->name()->as_C_string());
duke@435:   }
duke@435: 
duke@435: #ifdef ASSERT
duke@435:   oop* end_of_obj = (oop*)_klass() + _klass()->size();
duke@435:   oop* end_of_vtable = (oop*)&table()[_length];
duke@435:   assert(end_of_vtable <= end_of_obj, "vtable extends beyond end");
duke@435: #endif
duke@435: 
duke@435:   if (Universe::is_bootstrapping()) {
duke@435:     // just clear everything
duke@435:     for (int i = 0; i < _length; i++) table()[i].clear();
duke@435:     return;
duke@435:   }
duke@435: 
duke@435:   int super_vtable_len = initialize_from_super(super);
duke@435:   if (klass()->oop_is_array()) {
duke@435:     assert(super_vtable_len == _length, "arrays shouldn't introduce new methods");
duke@435:   } else {
coleenp@4037:     assert(_klass->oop_is_instance(), "must be InstanceKlass");
duke@435: 
coleenp@4037:     Array<Method*>* methods = ik()->methods();
coleenp@4037:     int len = methods->length();
duke@435:     int initialized = super_vtable_len;
duke@435: 
acorn@1087:     // update_inherited_vtable can stop for gc - ensure using handles
duke@435:     for (int i = 0; i < len; i++) {
duke@435:       HandleMark hm(THREAD);
coleenp@4037:       assert(methods->at(i)->is_method(), "must be a Method*");
coleenp@4037:       methodHandle mh(THREAD, methods->at(i));
duke@435: 
acorn@1087:       bool needs_new_entry = update_inherited_vtable(ik(), mh, super_vtable_len, checkconstraints, CHECK);
duke@435: 
duke@435:       if (needs_new_entry) {
duke@435:         put_method_at(mh(), initialized);
duke@435:         mh()->set_vtable_index(initialized); // set primary vtable index
duke@435:         initialized++;
duke@435:       }
duke@435:     }
duke@435: 
duke@435:     // add miranda methods; it will also update the value of initialized
kamg@4245:     fill_in_mirandas(&initialized);
duke@435: 
acorn@1087:     // In class hierarchies where the accessibility is not increasing (i.e., going from private ->
duke@435:     // package_private -> publicprotected), the vtable might actually be smaller than our initial
duke@435:     // calculation.
duke@435:     assert(initialized <= _length, "vtable initialization failed");
duke@435:     for(;initialized < _length; initialized++) {
duke@435:       put_method_at(NULL, initialized);
duke@435:     }
duke@435:     NOT_PRODUCT(verify(tty, true));
duke@435:   }
duke@435: }
duke@435: 
acorn@1087: // Called for cases where a method does not override its superclass' vtable entry
acorn@1087: // For bytecodes not produced by javac together it is possible that a method does not override
acorn@1087: // the superclass's method, but might indirectly override a super-super class's vtable entry
acorn@1087: // If none found, return a null superk, else return the superk of the method this does override
coleenp@4037: InstanceKlass* klassVtable::find_transitive_override(InstanceKlass* initialsuper, methodHandle target_method,
coleenp@2497:                             int vtable_index, Handle target_loader, Symbol* target_classname, Thread * THREAD) {
coleenp@4037:   InstanceKlass* superk = initialsuper;
acorn@1087:   while (superk != NULL && superk->super() != NULL) {
coleenp@4037:     InstanceKlass* supersuperklass = InstanceKlass::cast(superk->super());
acorn@1087:     klassVtable* ssVtable = supersuperklass->vtable();
acorn@1087:     if (vtable_index < ssVtable->length()) {
coleenp@4037:       Method* super_method = ssVtable->method_at(vtable_index);
acorn@1087: #ifndef PRODUCT
coleenp@2497:       Symbol* name= target_method()->name();
coleenp@2497:       Symbol* signature = target_method()->signature();
coleenp@2497:       assert(super_method->name() == name && super_method->signature() == signature, "vtable entry name/sig mismatch");
acorn@1087: #endif
acorn@1087:       if (supersuperklass->is_override(super_method, target_loader, target_classname, THREAD)) {
acorn@1087: #ifndef PRODUCT
acorn@1087:         if (PrintVtables && Verbose) {
acorn@1087:           ResourceMark rm(THREAD);
acorn@1087:           tty->print("transitive overriding superclass %s with %s::%s index %d, original flags: ",
acorn@1087:            supersuperklass->internal_name(),
acorn@1087:            _klass->internal_name(), (target_method() != NULL) ?
acorn@1087:            target_method()->name()->as_C_string() : "<NULL>", vtable_index);
acorn@1087:            super_method->access_flags().print_on(tty);
acorn@1087:            tty->print("overriders flags: ");
acorn@1087:            target_method->access_flags().print_on(tty);
acorn@1087:            tty->cr();
acorn@1087:         }
acorn@1087: #endif /*PRODUCT*/
acorn@1087:         break; // return found superk
acorn@1087:       }
acorn@1087:     } else  {
acorn@1087:       // super class has no vtable entry here, stop transitive search
coleenp@4037:       superk = (InstanceKlass*)NULL;
acorn@1087:       break;
acorn@1087:     }
acorn@1087:     // if no override found yet, continue to search up
coleenp@4037:     superk = InstanceKlass::cast(superk->super());
acorn@1087:   }
duke@435: 
acorn@1087:   return superk;
duke@435: }
duke@435: 
kamg@4245: // Methods that are "effectively" final don't need vtable entries.
kamg@4245: bool method_is_effectively_final(
kamg@4245:     AccessFlags klass_flags, methodHandle target) {
kamg@4245:   return target->is_final() || klass_flags.is_final() && !target->is_overpass();
kamg@4245: }
duke@435: 
duke@435: // Update child's copy of super vtable for overrides
duke@435: // OR return true if a new vtable entry is required
coleenp@4037: // Only called for InstanceKlass's, i.e. not for arrays
duke@435: // If that changed, could not use _klass as handle for klass
coleenp@4037: bool klassVtable::update_inherited_vtable(InstanceKlass* klass, methodHandle target_method, int super_vtable_len,
acorn@1087:                   bool checkconstraints, TRAPS) {
duke@435:   ResourceMark rm;
duke@435:   bool allocate_new = true;
coleenp@4037:   assert(klass->oop_is_instance(), "must be InstanceKlass");
duke@435: 
duke@435:   // Initialize the method's vtable index to "nonvirtual".
duke@435:   // If we allocate a vtable entry, we will update it to a non-negative number.
coleenp@4037:   target_method()->set_vtable_index(Method::nonvirtual_vtable_index);
duke@435: 
duke@435:   // Static and <init> methods are never in
duke@435:   if (target_method()->is_static() || target_method()->name() ==  vmSymbols::object_initializer_name()) {
duke@435:     return false;
duke@435:   }
duke@435: 
kamg@4245:   if (method_is_effectively_final(klass->access_flags(), target_method)) {
duke@435:     // a final method never needs a new entry; final methods can be statically
duke@435:     // resolved and they have to be present in the vtable only if they override
duke@435:     // a super's method, in which case they re-use its entry
duke@435:     allocate_new = false;
duke@435:   }
duke@435: 
duke@435:   // we need a new entry if there is no superclass
duke@435:   if (klass->super() == NULL) {
duke@435:     return allocate_new;
duke@435:   }
duke@435: 
duke@435:   // private methods always have a new entry in the vtable
acorn@1087:   // specification interpretation since classic has
acorn@1087:   // private methods not overriding
duke@435:   if (target_method()->is_private()) {
duke@435:     return allocate_new;
duke@435:   }
duke@435: 
duke@435:   // search through the vtable and update overridden entries
duke@435:   // Since check_signature_loaders acquires SystemDictionary_lock
acorn@1087:   // which can block for gc, once we are in this loop, use handles
acorn@1087:   // For classfiles built with >= jdk7, we now look for transitive overrides
duke@435: 
coleenp@2497:   Symbol* name = target_method()->name();
coleenp@2497:   Symbol* signature = target_method()->signature();
coleenp@4037:   Handle target_loader(THREAD, _klass()->class_loader());
coleenp@2497:   Symbol*  target_classname = _klass->name();
duke@435:   for(int i = 0; i < super_vtable_len; i++) {
coleenp@4037:     Method* super_method = method_at(i);
duke@435:     // Check if method name matches
coleenp@2497:     if (super_method->name() == name && super_method->signature() == signature) {
duke@435: 
acorn@1087:       // get super_klass for method_holder for the found method
coleenp@4251:       InstanceKlass* super_klass =  super_method->method_holder();
duke@435: 
acorn@1087:       if ((super_klass->is_override(super_method, target_loader, target_classname, THREAD)) ||
acorn@1087:       ((klass->major_version() >= VTABLE_TRANSITIVE_OVERRIDE_VERSION)
acorn@1087:         && ((super_klass = find_transitive_override(super_klass, target_method, i, target_loader,
coleenp@4037:              target_classname, THREAD)) != (InstanceKlass*)NULL))) {
acorn@1087:         // overriding, so no new entry
acorn@1087:         allocate_new = false;
duke@435: 
duke@435:         if (checkconstraints) {
duke@435:         // Override vtable entry if passes loader constraint check
duke@435:         // if loader constraint checking requested
duke@435:         // No need to visit his super, since he and his super
duke@435:         // have already made any needed loader constraints.
duke@435:         // Since loader constraints are transitive, it is enough
duke@435:         // to link to the first super, and we get all the others.
duke@435:           Handle super_loader(THREAD, super_klass->class_loader());
duke@435: 
acorn@1087:           if (target_loader() != super_loader()) {
duke@435:             ResourceMark rm(THREAD);
acorn@4840:             Symbol* failed_type_symbol =
acorn@1087:               SystemDictionary::check_signature_loaders(signature, target_loader,
duke@435:                                                         super_loader, true,
duke@435:                                                         CHECK_(false));
acorn@4840:             if (failed_type_symbol != NULL) {
duke@435:               const char* msg = "loader constraint violation: when resolving "
duke@435:                 "overridden method \"%s\" the class loader (instance"
duke@435:                 " of %s) of the current class, %s, and its superclass loader "
duke@435:                 "(instance of %s), have different Class objects for the type "
duke@435:                 "%s used in the signature";
duke@435:               char* sig = target_method()->name_and_sig_as_C_string();
acorn@1087:               const char* loader1 = SystemDictionary::loader_name(target_loader());
duke@435:               char* current = _klass->name()->as_C_string();
duke@435:               const char* loader2 = SystemDictionary::loader_name(super_loader());
acorn@4840:               char* failed_type_name = failed_type_symbol->as_C_string();
duke@435:               size_t buflen = strlen(msg) + strlen(sig) + strlen(loader1) +
duke@435:                 strlen(current) + strlen(loader2) + strlen(failed_type_name);
duke@435:               char* buf = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, buflen);
duke@435:               jio_snprintf(buf, buflen, msg, sig, loader1, current, loader2,
duke@435:                            failed_type_name);
duke@435:               THROW_MSG_(vmSymbols::java_lang_LinkageError(), buf, false);
duke@435:             }
duke@435:           }
acorn@1087:        }
acorn@1087: 
acorn@1087:         put_method_at(target_method(), i);
acorn@1087:         target_method()->set_vtable_index(i);
acorn@1087: #ifndef PRODUCT
acorn@1087:         if (PrintVtables && Verbose) {
acorn@1087:           tty->print("overriding with %s::%s index %d, original flags: ",
acorn@1087:            _klass->internal_name(), (target_method() != NULL) ?
acorn@1087:            target_method()->name()->as_C_string() : "<NULL>", i);
acorn@1087:            super_method->access_flags().print_on(tty);
acorn@1087:            tty->print("overriders flags: ");
acorn@1087:            target_method->access_flags().print_on(tty);
acorn@1087:            tty->cr();
duke@435:         }
acorn@1087: #endif /*PRODUCT*/
acorn@1087:       } else {
acorn@1087:         // allocate_new = true; default. We might override one entry,
acorn@1087:         // but not override another. Once we override one, not need new
duke@435: #ifndef PRODUCT
acorn@1087:         if (PrintVtables && Verbose) {
acorn@1087:           tty->print("NOT overriding with %s::%s index %d, original flags: ",
acorn@1087:            _klass->internal_name(), (target_method() != NULL) ?
acorn@1087:            target_method()->name()->as_C_string() : "<NULL>", i);
acorn@1087:            super_method->access_flags().print_on(tty);
acorn@1087:            tty->print("overriders flags: ");
acorn@1087:            target_method->access_flags().print_on(tty);
acorn@1087:            tty->cr();
acorn@1087:         }
duke@435: #endif /*PRODUCT*/
duke@435:       }
duke@435:     }
duke@435:   }
duke@435:   return allocate_new;
duke@435: }
duke@435: 
coleenp@4037: void klassVtable::put_method_at(Method* m, int index) {
duke@435: #ifndef PRODUCT
duke@435:   if (PrintVtables && Verbose) {
acorn@1087:     ResourceMark rm;
duke@435:     tty->print_cr("adding %s::%s at index %d", _klass->internal_name(),
duke@435:       (m != NULL) ? m->name()->as_C_string() : "<NULL>", index);
duke@435:   }
duke@435: #endif
duke@435:   table()[index].set(m);
duke@435: }
duke@435: 
duke@435: // Find out if a method "m" with superclass "super", loader "classloader" and
duke@435: // name "classname" needs a new vtable entry.  Let P be a class package defined
duke@435: // by "classloader" and "classname".
duke@435: // NOTE: The logic used here is very similar to the one used for computing
duke@435: // the vtables indices for a method. We cannot directly use that function because,
coleenp@4037: // we allocate the InstanceKlass at load time, and that requires that the
acorn@1087: // superclass has been loaded.
acorn@1087: // However, the vtable entries are filled in at link time, and therefore
acorn@1087: // the superclass' vtable may not yet have been filled in.
acorn@1087: bool klassVtable::needs_new_vtable_entry(methodHandle target_method,
coleenp@4037:                                          Klass* super,
acorn@1087:                                          Handle classloader,
coleenp@2497:                                          Symbol* classname,
acorn@1087:                                          AccessFlags class_flags,
acorn@1087:                                          TRAPS) {
kamg@4245: 
kamg@4245:   if (method_is_effectively_final(class_flags, target_method) ||
duke@435:       // a final method never needs a new entry; final methods can be statically
duke@435:       // resolved and they have to be present in the vtable only if they override
duke@435:       // a super's method, in which case they re-use its entry
acorn@1087:       (target_method()->is_static()) ||
duke@435:       // static methods don't need to be in vtable
acorn@1087:       (target_method()->name() ==  vmSymbols::object_initializer_name())
duke@435:       // <init> is never called dynamically-bound
duke@435:       ) {
duke@435:     return false;
duke@435:   }
duke@435: 
duke@435:   // we need a new entry if there is no superclass
duke@435:   if (super == NULL) {
duke@435:     return true;
duke@435:   }
duke@435: 
duke@435:   // private methods always have a new entry in the vtable
acorn@1087:   // specification interpretation since classic has
acorn@1087:   // private methods not overriding
acorn@1087:   if (target_method()->is_private()) {
duke@435:     return true;
duke@435:   }
duke@435: 
duke@435:   // search through the super class hierarchy to see if we need
duke@435:   // a new entry
acorn@1087:   ResourceMark rm;
coleenp@2497:   Symbol* name = target_method()->name();
coleenp@2497:   Symbol* signature = target_method()->signature();
coleenp@4037:   Klass* k = super;
coleenp@4037:   Method* super_method = NULL;
coleenp@4037:   InstanceKlass *holder = NULL;
coleenp@4037:   Method* recheck_method =  NULL;
duke@435:   while (k != NULL) {
duke@435:     // lookup through the hierarchy for a method with matching name and sign.
coleenp@4037:     super_method = InstanceKlass::cast(k)->lookup_method(name, signature);
acorn@1087:     if (super_method == NULL) {
duke@435:       break; // we still have to search for a matching miranda method
duke@435:     }
duke@435:     // get the class holding the matching method
acorn@1087:     // make sure you use that class for is_override
coleenp@4251:     InstanceKlass* superk = super_method->method_holder();
acorn@1087:     // we want only instance method matches
acorn@1087:     // pretend private methods are not in the super vtable
acorn@1087:     // since we do override around them: e.g. a.m pub/b.m private/c.m pub,
acorn@1087:     // ignore private, c.m pub does override a.m pub
acorn@1087:     // For classes that were not javac'd together, we also do transitive overriding around
acorn@1087:     // methods that have less accessibility
acorn@1087:     if ((!super_method->is_static()) &&
acorn@1087:        (!super_method->is_private())) {
acorn@1087:       if (superk->is_override(super_method, classloader, classname, THREAD)) {
duke@435:         return false;
acorn@1087:       // else keep looking for transitive overrides
duke@435:       }
duke@435:     }
duke@435: 
acorn@1087:     // Start with lookup result and continue to search up
acorn@1087:     k = superk->super(); // haven't found an override match yet; continue to look
duke@435:   }
duke@435: 
duke@435:   // if the target method is public or protected it may have a matching
duke@435:   // miranda method in the super, whose entry it should re-use.
acorn@1087:   // Actually, to handle cases that javac would not generate, we need
acorn@1087:   // this check for all access permissions.
coleenp@4037:   InstanceKlass *sk = InstanceKlass::cast(super);
acorn@1087:   if (sk->has_miranda_methods()) {
acorn@1087:     if (sk->lookup_method_in_all_interfaces(name, signature) != NULL) {
acorn@1087:       return false;  // found a matching miranda; we do not need a new entry
duke@435:     }
duke@435:   }
duke@435:   return true; // found no match; we need a new entry
duke@435: }
duke@435: 
duke@435: // Support for miranda methods
duke@435: 
duke@435: // get the vtable index of a miranda method with matching "name" and "signature"
coleenp@2497: int klassVtable::index_of_miranda(Symbol* name, Symbol* signature) {
duke@435:   // search from the bottom, might be faster
duke@435:   for (int i = (length() - 1); i >= 0; i--) {
coleenp@4037:     Method* m = table()[i].method();
duke@435:     if (is_miranda_entry_at(i) &&
duke@435:         m->name() == name && m->signature() == signature) {
duke@435:       return i;
duke@435:     }
duke@435:   }
coleenp@4037:   return Method::invalid_vtable_index;
duke@435: }
duke@435: 
duke@435: // check if an entry is miranda
duke@435: bool klassVtable::is_miranda_entry_at(int i) {
coleenp@4037:   Method* m = method_at(i);
coleenp@4037:   Klass* method_holder = m->method_holder();
coleenp@4037:   InstanceKlass *mhk = InstanceKlass::cast(method_holder);
duke@435: 
duke@435:   // miranda methods are interface methods in a class's vtable
duke@435:   if (mhk->is_interface()) {
kamg@4245:     assert(m->is_public(), "should be public");
duke@435:     assert(ik()->implements_interface(method_holder) , "this class should implement the interface");
duke@435:     assert(is_miranda(m, ik()->methods(), ik()->super()), "should be a miranda_method");
duke@435:     return true;
duke@435:   }
duke@435:   return false;
duke@435: }
duke@435: 
duke@435: // check if a method is a miranda method, given a class's methods table and it's super
duke@435: // the caller must make sure that the method belongs to an interface implemented by the class
coleenp@4037: bool klassVtable::is_miranda(Method* m, Array<Method*>* class_methods, Klass* super) {
coleenp@2497:   Symbol* name = m->name();
coleenp@2497:   Symbol* signature = m->signature();
coleenp@4037:   if (InstanceKlass::find_method(class_methods, name, signature) == NULL) {
dsamersoff@2360:     // did not find it in the method table of the current class
duke@435:     if (super == NULL) {
duke@435:       // super doesn't exist
duke@435:       return true;
dsamersoff@2360:     }
dsamersoff@2360: 
coleenp@4037:     Method* mo = InstanceKlass::cast(super)->lookup_method(name, signature);
dsamersoff@2360:     if (mo == NULL || mo->access_flags().is_private() ) {
dsamersoff@2360:       // super class hierarchy does not implement it or protection is different
dsamersoff@2360:       return true;
duke@435:     }
duke@435:   }
dsamersoff@2360: 
duke@435:   return false;
duke@435: }
duke@435: 
kamg@4245: void klassVtable::add_new_mirandas_to_lists(
kamg@4245:     GrowableArray<Method*>* new_mirandas, GrowableArray<Method*>* all_mirandas,
kamg@4245:     Array<Method*>* current_interface_methods, Array<Method*>* class_methods,
kamg@4245:     Klass* super) {
duke@435:   // iterate thru the current interface's method to see if it a miranda
duke@435:   int num_methods = current_interface_methods->length();
duke@435:   for (int i = 0; i < num_methods; i++) {
coleenp@4037:     Method* im = current_interface_methods->at(i);
duke@435:     bool is_duplicate = false;
kamg@4245:     int num_of_current_mirandas = new_mirandas->length();
duke@435:     // check for duplicate mirandas in different interfaces we implement
duke@435:     for (int j = 0; j < num_of_current_mirandas; j++) {
kamg@4245:       Method* miranda = new_mirandas->at(j);
duke@435:       if ((im->name() == miranda->name()) &&
duke@435:           (im->signature() == miranda->signature())) {
duke@435:         is_duplicate = true;
duke@435:         break;
duke@435:       }
duke@435:     }
duke@435: 
duke@435:     if (!is_duplicate) { // we don't want duplicate miranda entries in the vtable
duke@435:       if (is_miranda(im, class_methods, super)) { // is it a miranda at all?
coleenp@4037:         InstanceKlass *sk = InstanceKlass::cast(super);
duke@435:         // check if it is a duplicate of a super's miranda
duke@435:         if (sk->lookup_method_in_all_interfaces(im->name(), im->signature()) == NULL) {
kamg@4245:           new_mirandas->append(im);
kamg@4245:         }
kamg@4245:         if (all_mirandas != NULL) {
kamg@4245:           all_mirandas->append(im);
duke@435:         }
duke@435:       }
duke@435:     }
duke@435:   }
duke@435: }
duke@435: 
kamg@4245: void klassVtable::get_mirandas(GrowableArray<Method*>* new_mirandas,
kamg@4245:                                GrowableArray<Method*>* all_mirandas,
coleenp@4037:                                Klass* super, Array<Method*>* class_methods,
coleenp@4037:                                Array<Klass*>* local_interfaces) {
kamg@4245:   assert((new_mirandas->length() == 0) , "current mirandas must be 0");
duke@435: 
duke@435:   // iterate thru the local interfaces looking for a miranda
duke@435:   int num_local_ifs = local_interfaces->length();
duke@435:   for (int i = 0; i < num_local_ifs; i++) {
coleenp@4037:     InstanceKlass *ik = InstanceKlass::cast(local_interfaces->at(i));
kamg@4245:     add_new_mirandas_to_lists(new_mirandas, all_mirandas,
kamg@4245:                               ik->methods(), class_methods, super);
duke@435:     // iterate thru each local's super interfaces
coleenp@4037:     Array<Klass*>* super_ifs = ik->transitive_interfaces();
duke@435:     int num_super_ifs = super_ifs->length();
duke@435:     for (int j = 0; j < num_super_ifs; j++) {
coleenp@4037:       InstanceKlass *sik = InstanceKlass::cast(super_ifs->at(j));
kamg@4245:       add_new_mirandas_to_lists(new_mirandas, all_mirandas,
kamg@4245:                                 sik->methods(), class_methods, super);
duke@435:     }
duke@435:   }
duke@435: }
duke@435: 
duke@435: // fill in mirandas
kamg@4245: void klassVtable::fill_in_mirandas(int* initialized) {
kamg@4245:   GrowableArray<Method*> mirandas(20);
kamg@4245:   get_mirandas(&mirandas, NULL, ik()->super(), ik()->methods(),
kamg@4245:                ik()->local_interfaces());
kamg@4245:   for (int i = 0; i < mirandas.length(); i++) {
kamg@4245:     put_method_at(mirandas.at(i), *initialized);
kamg@4245:     ++(*initialized);
duke@435:   }
duke@435: }
duke@435: 
duke@435: void klassVtable::copy_vtable_to(vtableEntry* start) {
duke@435:   Copy::disjoint_words((HeapWord*)table(), (HeapWord*)start, _length * vtableEntry::size());
duke@435: }
duke@435: 
dcubed@4562: #if INCLUDE_JVMTI
coleenp@4037: void klassVtable::adjust_method_entries(Method** old_methods, Method** new_methods,
duke@435:                                         int methods_length, bool * trace_name_printed) {
duke@435:   // search the vtable for uses of either obsolete or EMCP methods
duke@435:   for (int j = 0; j < methods_length; j++) {
coleenp@4037:     Method* old_method = old_methods[j];
coleenp@4037:     Method* new_method = new_methods[j];
duke@435: 
duke@435:     // In the vast majority of cases we could get the vtable index
duke@435:     // by using:  old_method->vtable_index()
duke@435:     // However, there are rare cases, eg. sun.awt.X11.XDecoratedPeer.getX()
duke@435:     // in sun.awt.X11.XFramePeer where methods occur more than once in the
duke@435:     // vtable, so, alas, we must do an exhaustive search.
duke@435:     for (int index = 0; index < length(); index++) {
duke@435:       if (unchecked_method_at(index) == old_method) {
duke@435:         put_method_at(new_method, index);
duke@435: 
duke@435:         if (RC_TRACE_IN_RANGE(0x00100000, 0x00400000)) {
duke@435:           if (!(*trace_name_printed)) {
duke@435:             // RC_TRACE_MESG macro has an embedded ResourceMark
duke@435:             RC_TRACE_MESG(("adjust: name=%s",
coleenp@4251:                            old_method->method_holder()->external_name()));
duke@435:             *trace_name_printed = true;
duke@435:           }
duke@435:           // RC_TRACE macro has an embedded ResourceMark
duke@435:           RC_TRACE(0x00100000, ("vtable method update: %s(%s)",
duke@435:                                 new_method->name()->as_C_string(),
duke@435:                                 new_method->signature()->as_C_string()));
duke@435:         }
dcubed@4562:         // cannot 'break' here; see for-loop comment above.
duke@435:       }
duke@435:     }
duke@435:   }
duke@435: }
duke@435: 
dcubed@4562: // a vtable should never contain old or obsolete methods
dcubed@4562: bool klassVtable::check_no_old_or_obsolete_entries() {
dcubed@4562:   for (int i = 0; i < length(); i++) {
dcubed@4562:     Method* m = unchecked_method_at(i);
dcubed@4562:     if (m != NULL &&
dcubed@4562:         (NOT_PRODUCT(!m->is_valid() ||) m->is_old() || m->is_obsolete())) {
dcubed@4562:       return false;
dcubed@4562:     }
dcubed@4562:   }
dcubed@4562:   return true;
dcubed@4562: }
dcubed@4562: 
dcubed@4562: void klassVtable::dump_vtable() {
dcubed@4562:   tty->print_cr("vtable dump --");
dcubed@4562:   for (int i = 0; i < length(); i++) {
dcubed@4562:     Method* m = unchecked_method_at(i);
dcubed@4562:     if (m != NULL) {
dcubed@4562:       tty->print("      (%5d)  ", i);
dcubed@4562:       m->access_flags().print_on(tty);
dcubed@4562:       tty->print(" --  ");
dcubed@4562:       m->print_name(tty);
dcubed@4562:       tty->cr();
dcubed@4562:     }
dcubed@4562:   }
dcubed@4562: }
dcubed@4562: #endif // INCLUDE_JVMTI
dcubed@4562: 
coleenp@2777: // CDS/RedefineClasses support - clear vtables so they can be reinitialized
coleenp@2777: void klassVtable::clear_vtable() {
coleenp@2777:   for (int i = 0; i < _length; i++) table()[i].clear();
coleenp@2777: }
coleenp@2777: 
coleenp@2777: bool klassVtable::is_initialized() {
coleenp@2777:   return _length == 0 || table()[0].method() != NULL;
coleenp@2777: }
coleenp@2777: 
duke@435: //-----------------------------------------------------------------------------------------
duke@435: // Itable code
duke@435: 
duke@435: // Initialize a itableMethodEntry
coleenp@4037: void itableMethodEntry::initialize(Method* m) {
duke@435:   if (m == NULL) return;
duke@435: 
duke@435:   _method = m;
duke@435: }
duke@435: 
duke@435: klassItable::klassItable(instanceKlassHandle klass) {
duke@435:   _klass = klass;
duke@435: 
duke@435:   if (klass->itable_length() > 0) {
duke@435:     itableOffsetEntry* offset_entry = (itableOffsetEntry*)klass->start_of_itable();
duke@435:     if (offset_entry  != NULL && offset_entry->interface_klass() != NULL) { // Check that itable is initialized
duke@435:       // First offset entry points to the first method_entry
coleenp@4037:       intptr_t* method_entry  = (intptr_t *)(((address)klass()) + offset_entry->offset());
duke@435:       intptr_t* end         = klass->end_of_itable();
duke@435: 
coleenp@4037:       _table_offset      = (intptr_t*)offset_entry - (intptr_t*)klass();
duke@435:       _size_offset_table = (method_entry - ((intptr_t*)offset_entry)) / itableOffsetEntry::size();
duke@435:       _size_method_table = (end - method_entry)                  / itableMethodEntry::size();
duke@435:       assert(_table_offset >= 0 && _size_offset_table >= 0 && _size_method_table >= 0, "wrong computation");
duke@435:       return;
duke@435:     }
duke@435:   }
duke@435: 
dcubed@451:   // The length of the itable was either zero, or it has not yet been initialized.
duke@435:   _table_offset      = 0;
duke@435:   _size_offset_table = 0;
duke@435:   _size_method_table = 0;
duke@435: }
duke@435: 
duke@435: static int initialize_count = 0;
duke@435: 
duke@435: // Initialization
duke@435: void klassItable::initialize_itable(bool checkconstraints, TRAPS) {
dcubed@451:   // Cannot be setup doing bootstrapping, interfaces don't have
dcubed@451:   // itables, and klass with only ones entry have empty itables
dcubed@451:   if (Universe::is_bootstrapping() ||
dcubed@451:       _klass->is_interface() ||
dcubed@451:       _klass->itable_length() == itableOffsetEntry::size()) return;
duke@435: 
dcubed@451:   // There's alway an extra itable entry so we can null-terminate it.
dcubed@451:   guarantee(size_offset_table() >= 1, "too small");
dcubed@451:   int num_interfaces = size_offset_table() - 1;
duke@435:   if (num_interfaces > 0) {
dcubed@451:     if (TraceItables) tty->print_cr("%3d: Initializing itables for %s", ++initialize_count,
dcubed@451:                                     _klass->name()->as_C_string());
duke@435: 
duke@435: 
acorn@1087:     // Iterate through all interfaces
duke@435:     int i;
duke@435:     for(i = 0; i < num_interfaces; i++) {
duke@435:       itableOffsetEntry* ioe = offset_entry(i);
coleenp@4037:       HandleMark hm(THREAD);
duke@435:       KlassHandle interf_h (THREAD, ioe->interface_klass());
duke@435:       assert(interf_h() != NULL && ioe->offset() != 0, "bad offset entry in itable");
duke@435:       initialize_itable_for_interface(ioe->offset(), interf_h, checkconstraints, CHECK);
duke@435:     }
duke@435: 
duke@435:   }
dcubed@451:   // Check that the last entry is empty
dcubed@451:   itableOffsetEntry* ioe = offset_entry(size_offset_table() - 1);
dcubed@451:   guarantee(ioe->interface_klass() == NULL && ioe->offset() == 0, "terminator entry missing");
duke@435: }
duke@435: 
duke@435: 
duke@435: void klassItable::initialize_itable_for_interface(int method_table_offset, KlassHandle interf_h, bool checkconstraints, TRAPS) {
coleenp@4037:   Array<Method*>* methods = InstanceKlass::cast(interf_h())->methods();
coleenp@4037:   int nof_methods = methods->length();
duke@435:   HandleMark hm;
duke@435:   KlassHandle klass = _klass;
jcoomes@1844:   assert(nof_methods > 0, "at least one method must exist for interface to be in vtable");
coleenp@4037:   Handle interface_loader (THREAD, InstanceKlass::cast(interf_h())->class_loader());
duke@435:   int ime_num = 0;
duke@435: 
coleenp@4037:   // Skip first Method* if it is a class initializer
coleenp@4037:   int i = methods->at(0)->is_static_initializer() ? 1 : 0;
duke@435: 
duke@435:   // m, method_name, method_signature, klass reset each loop so they
duke@435:   // don't need preserving across check_signature_loaders call
duke@435:   // methods needs a handle in case of gc from check_signature_loaders
duke@435:   for(; i < nof_methods; i++) {
coleenp@4037:     Method* m = methods->at(i);
coleenp@2497:     Symbol* method_name = m->name();
coleenp@2497:     Symbol* method_signature = m->signature();
duke@435: 
duke@435:     // This is same code as in Linkresolver::lookup_instance_method_in_klasses
coleenp@4037:     Method* target = klass->uncached_lookup_method(method_name, method_signature);
duke@435:     while (target != NULL && target->is_static()) {
duke@435:       // continue with recursive lookup through the superclass
coleenp@4251:       Klass* super = target->method_holder()->super();
hseigel@4278:       target = (super == NULL) ? (Method*)NULL : super->uncached_lookup_method(method_name, method_signature);
duke@435:     }
duke@435:     if (target == NULL || !target->is_public() || target->is_abstract()) {
duke@435:       // Entry do not resolve. Leave it empty
duke@435:     } else {
duke@435:       // Entry did resolve, check loader constraints before initializing
duke@435:       // if checkconstraints requested
duke@435:       methodHandle  target_h (THREAD, target); // preserve across gc
duke@435:       if (checkconstraints) {
coleenp@4251:         Handle method_holder_loader (THREAD, target->method_holder()->class_loader());
duke@435:         if (method_holder_loader() != interface_loader()) {
duke@435:           ResourceMark rm(THREAD);
acorn@4840:           Symbol* failed_type_symbol =
duke@435:             SystemDictionary::check_signature_loaders(method_signature,
duke@435:                                                       method_holder_loader,
duke@435:                                                       interface_loader,
duke@435:                                                       true, CHECK);
acorn@4840:           if (failed_type_symbol != NULL) {
duke@435:             const char* msg = "loader constraint violation in interface "
duke@435:               "itable initialization: when resolving method \"%s\" the class"
duke@435:               " loader (instance of %s) of the current class, %s, "
duke@435:               "and the class loader (instance of %s) for interface "
duke@435:               "%s have different Class objects for the type %s "
duke@435:               "used in the signature";
duke@435:             char* sig = target_h()->name_and_sig_as_C_string();
duke@435:             const char* loader1 = SystemDictionary::loader_name(method_holder_loader());
duke@435:             char* current = klass->name()->as_C_string();
duke@435:             const char* loader2 = SystemDictionary::loader_name(interface_loader());
coleenp@4037:             char* iface = InstanceKlass::cast(interf_h())->name()->as_C_string();
acorn@4840:             char* failed_type_name = failed_type_symbol->as_C_string();
duke@435:             size_t buflen = strlen(msg) + strlen(sig) + strlen(loader1) +
duke@435:               strlen(current) + strlen(loader2) + strlen(iface) +
duke@435:               strlen(failed_type_name);
duke@435:             char* buf = NEW_RESOURCE_ARRAY_IN_THREAD(THREAD, char, buflen);
duke@435:             jio_snprintf(buf, buflen, msg, sig, loader1, current, loader2,
duke@435:                          iface, failed_type_name);
duke@435:             THROW_MSG(vmSymbols::java_lang_LinkageError(), buf);
duke@435:           }
duke@435:         }
duke@435:       }
duke@435: 
duke@435:       // ime may have moved during GC so recalculate address
duke@435:       itableOffsetEntry::method_entry(_klass(), method_table_offset)[ime_num].initialize(target_h());
duke@435:     }
duke@435:     // Progress to next entry
duke@435:     ime_num++;
duke@435:   }
duke@435: }
duke@435: 
coleenp@4037: // Update entry for specific Method*
coleenp@4037: void klassItable::initialize_with_method(Method* m) {
duke@435:   itableMethodEntry* ime = method_entry(0);
duke@435:   for(int i = 0; i < _size_method_table; i++) {
duke@435:     if (ime->method() == m) {
duke@435:       ime->initialize(m);
duke@435:     }
duke@435:     ime++;
duke@435:   }
duke@435: }
duke@435: 
dcubed@4562: #if INCLUDE_JVMTI
coleenp@4037: void klassItable::adjust_method_entries(Method** old_methods, Method** new_methods,
duke@435:                                         int methods_length, bool * trace_name_printed) {
duke@435:   // search the itable for uses of either obsolete or EMCP methods
duke@435:   for (int j = 0; j < methods_length; j++) {
coleenp@4037:     Method* old_method = old_methods[j];
coleenp@4037:     Method* new_method = new_methods[j];
duke@435:     itableMethodEntry* ime = method_entry(0);
duke@435: 
dcubed@1045:     // The itable can describe more than one interface and the same
dcubed@1045:     // method signature can be specified by more than one interface.
dcubed@1045:     // This means we have to do an exhaustive search to find all the
dcubed@1045:     // old_method references.
duke@435:     for (int i = 0; i < _size_method_table; i++) {
duke@435:       if (ime->method() == old_method) {
duke@435:         ime->initialize(new_method);
duke@435: 
duke@435:         if (RC_TRACE_IN_RANGE(0x00100000, 0x00400000)) {
duke@435:           if (!(*trace_name_printed)) {
duke@435:             // RC_TRACE_MESG macro has an embedded ResourceMark
duke@435:             RC_TRACE_MESG(("adjust: name=%s",
coleenp@4251:               old_method->method_holder()->external_name()));
duke@435:             *trace_name_printed = true;
duke@435:           }
duke@435:           // RC_TRACE macro has an embedded ResourceMark
duke@435:           RC_TRACE(0x00200000, ("itable method update: %s(%s)",
duke@435:             new_method->name()->as_C_string(),
duke@435:             new_method->signature()->as_C_string()));
duke@435:         }
dcubed@4562:         // cannot 'break' here; see for-loop comment above.
duke@435:       }
duke@435:       ime++;
duke@435:     }
duke@435:   }
duke@435: }
duke@435: 
dcubed@4562: // an itable should never contain old or obsolete methods
dcubed@4562: bool klassItable::check_no_old_or_obsolete_entries() {
dcubed@4562:   itableMethodEntry* ime = method_entry(0);
dcubed@4562:   for (int i = 0; i < _size_method_table; i++) {
dcubed@4562:     Method* m = ime->method();
dcubed@4562:     if (m != NULL &&
dcubed@4562:         (NOT_PRODUCT(!m->is_valid() ||) m->is_old() || m->is_obsolete())) {
dcubed@4562:       return false;
dcubed@4562:     }
dcubed@4562:     ime++;
dcubed@4562:   }
dcubed@4562:   return true;
dcubed@4562: }
dcubed@4562: 
dcubed@4562: void klassItable::dump_itable() {
dcubed@4562:   itableMethodEntry* ime = method_entry(0);
dcubed@4562:   tty->print_cr("itable dump --");
dcubed@4562:   for (int i = 0; i < _size_method_table; i++) {
dcubed@4562:     Method* m = ime->method();
dcubed@4562:     if (m != NULL) {
dcubed@4562:       tty->print("      (%5d)  ", i);
dcubed@4562:       m->access_flags().print_on(tty);
dcubed@4562:       tty->print(" --  ");
dcubed@4562:       m->print_name(tty);
dcubed@4562:       tty->cr();
dcubed@4562:     }
dcubed@4562:     ime++;
dcubed@4562:   }
dcubed@4562: }
dcubed@4562: #endif // INCLUDE_JVMTI
dcubed@4562: 
duke@435: 
duke@435: // Setup
duke@435: class InterfaceVisiterClosure : public StackObj {
duke@435:  public:
coleenp@4037:   virtual void doit(Klass* intf, int method_count) = 0;
duke@435: };
duke@435: 
duke@435: // Visit all interfaces with at-least one method (excluding <clinit>)
coleenp@4037: void visit_all_interfaces(Array<Klass*>* transitive_intf, InterfaceVisiterClosure *blk) {
duke@435:   // Handle array argument
duke@435:   for(int i = 0; i < transitive_intf->length(); i++) {
coleenp@4037:     Klass* intf = transitive_intf->at(i);
hseigel@4278:     assert(intf->is_interface(), "sanity check");
duke@435: 
duke@435:     // Find no. of methods excluding a <clinit>
coleenp@4037:     int method_count = InstanceKlass::cast(intf)->methods()->length();
duke@435:     if (method_count > 0) {
coleenp@4037:       Method* m = InstanceKlass::cast(intf)->methods()->at(0);
duke@435:       assert(m != NULL && m->is_method(), "sanity check");
duke@435:       if (m->name() == vmSymbols::object_initializer_name()) {
duke@435:         method_count--;
duke@435:       }
duke@435:     }
duke@435: 
duke@435:     // Only count interfaces with at least one method
duke@435:     if (method_count > 0) {
duke@435:       blk->doit(intf, method_count);
duke@435:     }
duke@435:   }
duke@435: }
duke@435: 
duke@435: class CountInterfacesClosure : public InterfaceVisiterClosure {
duke@435:  private:
duke@435:   int _nof_methods;
duke@435:   int _nof_interfaces;
duke@435:  public:
duke@435:    CountInterfacesClosure() { _nof_methods = 0; _nof_interfaces = 0; }
duke@435: 
duke@435:    int nof_methods() const    { return _nof_methods; }
duke@435:    int nof_interfaces() const { return _nof_interfaces; }
duke@435: 
coleenp@4037:    void doit(Klass* intf, int method_count) { _nof_methods += method_count; _nof_interfaces++; }
duke@435: };
duke@435: 
duke@435: class SetupItableClosure : public InterfaceVisiterClosure  {
duke@435:  private:
duke@435:   itableOffsetEntry* _offset_entry;
duke@435:   itableMethodEntry* _method_entry;
duke@435:   address            _klass_begin;
duke@435:  public:
duke@435:   SetupItableClosure(address klass_begin, itableOffsetEntry* offset_entry, itableMethodEntry* method_entry) {
duke@435:     _klass_begin  = klass_begin;
duke@435:     _offset_entry = offset_entry;
duke@435:     _method_entry = method_entry;
duke@435:   }
duke@435: 
duke@435:   itableMethodEntry* method_entry() const { return _method_entry; }
duke@435: 
coleenp@4037:   void doit(Klass* intf, int method_count) {
duke@435:     int offset = ((address)_method_entry) - _klass_begin;
duke@435:     _offset_entry->initialize(intf, offset);
duke@435:     _offset_entry++;
duke@435:     _method_entry += method_count;
duke@435:   }
duke@435: };
duke@435: 
coleenp@4037: int klassItable::compute_itable_size(Array<Klass*>* transitive_interfaces) {
duke@435:   // Count no of interfaces and total number of interface methods
duke@435:   CountInterfacesClosure cic;
coleenp@4037:   visit_all_interfaces(transitive_interfaces, &cic);
duke@435: 
dcubed@451:   // There's alway an extra itable entry so we can null-terminate it.
dcubed@451:   int itable_size = calc_itable_size(cic.nof_interfaces() + 1, cic.nof_methods());
duke@435: 
duke@435:   // Statistics
duke@435:   update_stats(itable_size * HeapWordSize);
duke@435: 
duke@435:   return itable_size;
duke@435: }
duke@435: 
duke@435: 
duke@435: // Fill out offset table and interface klasses into the itable space
duke@435: void klassItable::setup_itable_offset_table(instanceKlassHandle klass) {
duke@435:   if (klass->itable_length() == 0) return;
duke@435:   assert(!klass->is_interface(), "Should have zero length itable");
duke@435: 
duke@435:   // Count no of interfaces and total number of interface methods
duke@435:   CountInterfacesClosure cic;
duke@435:   visit_all_interfaces(klass->transitive_interfaces(), &cic);
duke@435:   int nof_methods    = cic.nof_methods();
duke@435:   int nof_interfaces = cic.nof_interfaces();
duke@435: 
dcubed@451:   // Add one extra entry so we can null-terminate the table
dcubed@451:   nof_interfaces++;
duke@435: 
coleenp@4037:   assert(compute_itable_size(klass->transitive_interfaces()) ==
duke@435:          calc_itable_size(nof_interfaces, nof_methods),
duke@435:          "mismatch calculation of itable size");
duke@435: 
duke@435:   // Fill-out offset table
duke@435:   itableOffsetEntry* ioe = (itableOffsetEntry*)klass->start_of_itable();
duke@435:   itableMethodEntry* ime = (itableMethodEntry*)(ioe + nof_interfaces);
duke@435:   intptr_t* end               = klass->end_of_itable();
never@2658:   assert((oop*)(ime + nof_methods) <= (oop*)klass->start_of_nonstatic_oop_maps(), "wrong offset calculation (1)");
coleenp@548:   assert((oop*)(end) == (oop*)(ime + nof_methods),                      "wrong offset calculation (2)");
duke@435: 
duke@435:   // Visit all interfaces and initialize itable offset table
coleenp@4037:   SetupItableClosure sic((address)klass(), ioe, ime);
duke@435:   visit_all_interfaces(klass->transitive_interfaces(), &sic);
duke@435: 
duke@435: #ifdef ASSERT
duke@435:   ime  = sic.method_entry();
duke@435:   oop* v = (oop*) klass->end_of_itable();
duke@435:   assert( (oop*)(ime) == v, "wrong offset calculation (2)");
duke@435: #endif
duke@435: }
duke@435: 
duke@435: 
duke@435: // m must be a method in an interface
coleenp@4037: int klassItable::compute_itable_index(Method* m) {
coleenp@4251:   InstanceKlass* intf = m->method_holder();
coleenp@4251:   assert(intf->is_interface(), "sanity check");
coleenp@4251:   Array<Method*>* methods = intf->methods();
duke@435:   int index = 0;
coleenp@4037:   while(methods->at(index) != m) {
duke@435:     index++;
duke@435:     assert(index < methods->length(), "should find index for resolve_invoke");
duke@435:   }
duke@435:   // Adjust for <clinit>, which is left out of table if first method
coleenp@4037:   if (methods->length() > 0 && methods->at(0)->is_static_initializer()) {
duke@435:     index--;
duke@435:   }
duke@435:   return index;
duke@435: }
duke@435: 
jrose@1100: 
jrose@1100: // inverse to compute_itable_index
coleenp@4037: Method* klassItable::method_for_itable_index(Klass* intf, int itable_index) {
coleenp@4037:   assert(InstanceKlass::cast(intf)->is_interface(), "sanity check");
coleenp@4037:   Array<Method*>* methods = InstanceKlass::cast(intf)->methods();
jrose@1100: 
jrose@1100:   int index = itable_index;
jrose@1100:   // Adjust for <clinit>, which is left out of table if first method
coleenp@4037:   if (methods->length() > 0 && methods->at(0)->is_static_initializer()) {
jrose@1100:     index++;
jrose@1100:   }
jrose@1100: 
jrose@1100:   if (itable_index < 0 || index >= methods->length())
jrose@1100:     return NULL;                // help caller defend against bad indexes
jrose@1100: 
coleenp@4037:   Method* m = methods->at(index);
jrose@1100:   assert(compute_itable_index(m) == itable_index, "correct inverse");
jrose@1100: 
jrose@1100:   return m;
jrose@1100: }
jrose@1100: 
duke@435: void klassVtable::verify(outputStream* st, bool forced) {
duke@435:   // make sure table is initialized
duke@435:   if (!Universe::is_fully_initialized()) return;
duke@435: #ifndef PRODUCT
duke@435:   // avoid redundant verifies
duke@435:   if (!forced && _verify_count == Universe::verify_count()) return;
duke@435:   _verify_count = Universe::verify_count();
duke@435: #endif
duke@435:   oop* end_of_obj = (oop*)_klass() + _klass()->size();
duke@435:   oop* end_of_vtable = (oop *)&table()[_length];
duke@435:   if (end_of_vtable > end_of_obj) {
jcoomes@1845:     fatal(err_msg("klass %s: klass object too short (vtable extends beyond "
jcoomes@1845:                   "end)", _klass->internal_name()));
duke@435:   }
duke@435: 
duke@435:   for (int i = 0; i < _length; i++) table()[i].verify(this, st);
duke@435:   // verify consistency with superKlass vtable
coleenp@4037:   Klass* super = _klass->super();
duke@435:   if (super != NULL) {
coleenp@4037:     InstanceKlass* sk = InstanceKlass::cast(super);
duke@435:     klassVtable* vt = sk->vtable();
duke@435:     for (int i = 0; i < vt->length(); i++) {
duke@435:       verify_against(st, vt, i);
duke@435:     }
duke@435:   }
duke@435: }
duke@435: 
duke@435: void klassVtable::verify_against(outputStream* st, klassVtable* vt, int index) {
duke@435:   vtableEntry* vte = &vt->table()[index];
duke@435:   if (vte->method()->name()      != table()[index].method()->name() ||
duke@435:       vte->method()->signature() != table()[index].method()->signature()) {
duke@435:     fatal("mismatched name/signature of vtable entries");
duke@435:   }
duke@435: }
duke@435: 
duke@435: #ifndef PRODUCT
duke@435: void klassVtable::print() {
duke@435:   ResourceMark rm;
duke@435:   tty->print("klassVtable for klass %s (length %d):\n", _klass->internal_name(), length());
duke@435:   for (int i = 0; i < length(); i++) {
duke@435:     table()[i].print();
duke@435:     tty->cr();
duke@435:   }
duke@435: }
duke@435: #endif
duke@435: 
duke@435: void vtableEntry::verify(klassVtable* vt, outputStream* st) {
duke@435:   NOT_PRODUCT(FlagSetting fs(IgnoreLockingAssertions, true));
duke@435:   assert(method() != NULL, "must have set method");
duke@435:   method()->verify();
duke@435:   // we sub_type, because it could be a miranda method
duke@435:   if (!vt->klass()->is_subtype_of(method()->method_holder())) {
duke@435: #ifndef PRODUCT
duke@435:     print();
duke@435: #endif
jcoomes@1845:     fatal(err_msg("vtableEntry " PTR_FORMAT ": method is from subclass", this));
duke@435:   }
duke@435: }
duke@435: 
duke@435: #ifndef PRODUCT
duke@435: 
duke@435: void vtableEntry::print() {
duke@435:   ResourceMark rm;
duke@435:   tty->print("vtableEntry %s: ", method()->name()->as_C_string());
duke@435:   if (Verbose) {
duke@435:     tty->print("m %#lx ", (address)method());
duke@435:   }
duke@435: }
duke@435: 
duke@435: class VtableStats : AllStatic {
duke@435:  public:
duke@435:   static int no_klasses;                // # classes with vtables
duke@435:   static int no_array_klasses;          // # array classes
duke@435:   static int no_instance_klasses;       // # instanceKlasses
duke@435:   static int sum_of_vtable_len;         // total # of vtable entries
duke@435:   static int sum_of_array_vtable_len;   // total # of vtable entries in array klasses only
duke@435:   static int fixed;                     // total fixed overhead in bytes
duke@435:   static int filler;                    // overhead caused by filler bytes
duke@435:   static int entries;                   // total bytes consumed by vtable entries
duke@435:   static int array_entries;             // total bytes consumed by array vtable entries
duke@435: 
coleenp@4037:   static void do_class(Klass* k) {
coleenp@4037:     Klass* kl = k;
duke@435:     klassVtable* vt = kl->vtable();
duke@435:     if (vt == NULL) return;
duke@435:     no_klasses++;
duke@435:     if (kl->oop_is_instance()) {
duke@435:       no_instance_klasses++;
duke@435:       kl->array_klasses_do(do_class);
duke@435:     }
duke@435:     if (kl->oop_is_array()) {
duke@435:       no_array_klasses++;
duke@435:       sum_of_array_vtable_len += vt->length();
duke@435:     }
duke@435:     sum_of_vtable_len += vt->length();
duke@435:   }
duke@435: 
duke@435:   static void compute() {
duke@435:     SystemDictionary::classes_do(do_class);
duke@435:     fixed  = no_klasses * oopSize;      // vtable length
duke@435:     // filler size is a conservative approximation
coleenp@4142:     filler = oopSize * (no_klasses - no_instance_klasses) * (sizeof(InstanceKlass) - sizeof(ArrayKlass) - 1);
duke@435:     entries = sizeof(vtableEntry) * sum_of_vtable_len;
duke@435:     array_entries = sizeof(vtableEntry) * sum_of_array_vtable_len;
duke@435:   }
duke@435: };
duke@435: 
duke@435: int VtableStats::no_klasses = 0;
duke@435: int VtableStats::no_array_klasses = 0;
duke@435: int VtableStats::no_instance_klasses = 0;
duke@435: int VtableStats::sum_of_vtable_len = 0;
duke@435: int VtableStats::sum_of_array_vtable_len = 0;
duke@435: int VtableStats::fixed = 0;
duke@435: int VtableStats::filler = 0;
duke@435: int VtableStats::entries = 0;
duke@435: int VtableStats::array_entries = 0;
duke@435: 
duke@435: void klassVtable::print_statistics() {
duke@435:   ResourceMark rm;
duke@435:   HandleMark hm;
duke@435:   VtableStats::compute();
duke@435:   tty->print_cr("vtable statistics:");
duke@435:   tty->print_cr("%6d classes (%d instance, %d array)", VtableStats::no_klasses, VtableStats::no_instance_klasses, VtableStats::no_array_klasses);
duke@435:   int total = VtableStats::fixed + VtableStats::filler + VtableStats::entries;
duke@435:   tty->print_cr("%6d bytes fixed overhead (refs + vtable object header)", VtableStats::fixed);
duke@435:   tty->print_cr("%6d bytes filler overhead", VtableStats::filler);
duke@435:   tty->print_cr("%6d bytes for vtable entries (%d for arrays)", VtableStats::entries, VtableStats::array_entries);
duke@435:   tty->print_cr("%6d bytes total", total);
duke@435: }
duke@435: 
duke@435: int  klassItable::_total_classes;   // Total no. of classes with itables
duke@435: long klassItable::_total_size;      // Total no. of bytes used for itables
duke@435: 
duke@435: void klassItable::print_statistics() {
duke@435:  tty->print_cr("itable statistics:");
duke@435:  tty->print_cr("%6d classes with itables", _total_classes);
duke@435:  tty->print_cr("%6d K uses for itables (average by class: %d bytes)", _total_size / K, _total_size / _total_classes);
duke@435: }
duke@435: 
duke@435: #endif // PRODUCT