duke@435: /*
ctornqvi@5211:  * 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/javaClasses.hpp"
stefank@2314: #include "classfile/symbolTable.hpp"
stefank@2314: #include "classfile/systemDictionary.hpp"
stefank@2314: #include "classfile/verifier.hpp"
stefank@2314: #include "classfile/vmSymbols.hpp"
stefank@2314: #include "interpreter/linkResolver.hpp"
stefank@2314: #include "memory/oopFactory.hpp"
stefank@2314: #include "memory/resourceArea.hpp"
stefank@2314: #include "memory/universe.inline.hpp"
stefank@2314: #include "oops/instanceKlass.hpp"
stefank@2314: #include "oops/objArrayKlass.hpp"
stefank@2314: #include "oops/objArrayOop.hpp"
stefank@2314: #include "prims/jvm.h"
stefank@2314: #include "runtime/arguments.hpp"
stefank@2314: #include "runtime/handles.inline.hpp"
stefank@2314: #include "runtime/javaCalls.hpp"
stefank@2314: #include "runtime/reflection.hpp"
stefank@2314: #include "runtime/reflectionUtils.hpp"
stefank@2314: #include "runtime/signature.hpp"
stefank@2314: #include "runtime/vframe.hpp"
duke@435: 
coleenp@4037: static void trace_class_resolution(Klass* to_class) {
duke@435:   ResourceMark rm;
duke@435:   int line_number = -1;
duke@435:   const char * source_file = NULL;
coleenp@4037:   Klass* caller = NULL;
duke@435:   JavaThread* jthread = JavaThread::current();
duke@435:   if (jthread->has_last_Java_frame()) {
duke@435:     vframeStream vfst(jthread);
duke@435:     // skip over any frames belonging to java.lang.Class
duke@435:     while (!vfst.at_end() &&
coleenp@4251:            vfst.method()->method_holder()->name() == vmSymbols::java_lang_Class()) {
duke@435:       vfst.next();
duke@435:     }
duke@435:     if (!vfst.at_end()) {
duke@435:       // this frame is a likely suspect
duke@435:       caller = vfst.method()->method_holder();
duke@435:       line_number = vfst.method()->line_number_from_bci(vfst.bci());
coleenp@4251:       Symbol* s = vfst.method()->method_holder()->source_file_name();
duke@435:       if (s != NULL) {
duke@435:         source_file = s->as_C_string();
duke@435:       }
duke@435:     }
duke@435:   }
duke@435:   if (caller != NULL) {
hseigel@4278:     const char * from = caller->external_name();
hseigel@4278:     const char * to = to_class->external_name();
duke@435:     // print in a single call to reduce interleaving between threads
duke@435:     if (source_file != NULL) {
duke@435:       tty->print("RESOLVE %s %s %s:%d (reflection)\n", from, to, source_file, line_number);
duke@435:     } else {
duke@435:       tty->print("RESOLVE %s %s (reflection)\n", from, to);
duke@435:     }
duke@435:   }
duke@435: }
duke@435: 
duke@435: 
duke@435: oop Reflection::box(jvalue* value, BasicType type, TRAPS) {
duke@435:   if (type == T_VOID) {
duke@435:     return NULL;
duke@435:   }
duke@435:   if (type == T_OBJECT || type == T_ARRAY) {
duke@435:     // regular objects are not boxed
duke@435:     return (oop) value->l;
duke@435:   }
duke@435:   oop result = java_lang_boxing_object::create(type, value, CHECK_NULL);
duke@435:   if (result == NULL) {
duke@435:     THROW_(vmSymbols::java_lang_IllegalArgumentException(), result);
duke@435:   }
duke@435:   return result;
duke@435: }
duke@435: 
duke@435: 
duke@435: BasicType Reflection::unbox_for_primitive(oop box, jvalue* value, TRAPS) {
duke@435:   if (box == NULL) {
duke@435:     THROW_(vmSymbols::java_lang_IllegalArgumentException(), T_ILLEGAL);
duke@435:   }
duke@435:   return java_lang_boxing_object::get_value(box, value);
duke@435: }
duke@435: 
duke@435: BasicType Reflection::unbox_for_regular_object(oop box, jvalue* value) {
duke@435:   // Note:  box is really the unboxed oop.  It might even be a Short, etc.!
duke@435:   value->l = (jobject) box;
duke@435:   return T_OBJECT;
duke@435: }
duke@435: 
duke@435: 
duke@435: void Reflection::widen(jvalue* value, BasicType current_type, BasicType wide_type, TRAPS) {
duke@435:   assert(wide_type != current_type, "widen should not be called with identical types");
duke@435:   switch (wide_type) {
duke@435:     case T_BOOLEAN:
duke@435:     case T_BYTE:
duke@435:     case T_CHAR:
duke@435:       break;  // fail
duke@435:     case T_SHORT:
duke@435:       switch (current_type) {
duke@435:         case T_BYTE:
duke@435:           value->s = (jshort) value->b;
duke@435:           return;
duke@435:       }
duke@435:       break;  // fail
duke@435:     case T_INT:
duke@435:       switch (current_type) {
duke@435:         case T_BYTE:
duke@435:           value->i = (jint) value->b;
duke@435:           return;
duke@435:         case T_CHAR:
duke@435:           value->i = (jint) value->c;
duke@435:           return;
duke@435:         case T_SHORT:
duke@435:           value->i = (jint) value->s;
duke@435:           return;
duke@435:       }
duke@435:       break;  // fail
duke@435:     case T_LONG:
duke@435:       switch (current_type) {
duke@435:         case T_BYTE:
duke@435:           value->j = (jlong) value->b;
duke@435:           return;
duke@435:         case T_CHAR:
duke@435:           value->j = (jlong) value->c;
duke@435:           return;
duke@435:         case T_SHORT:
duke@435:           value->j = (jlong) value->s;
duke@435:           return;
duke@435:         case T_INT:
duke@435:           value->j = (jlong) value->i;
duke@435:           return;
duke@435:       }
duke@435:       break;  // fail
duke@435:     case T_FLOAT:
duke@435:       switch (current_type) {
duke@435:         case T_BYTE:
duke@435:           value->f = (jfloat) value->b;
duke@435:           return;
duke@435:         case T_CHAR:
duke@435:           value->f = (jfloat) value->c;
duke@435:           return;
duke@435:         case T_SHORT:
duke@435:           value->f = (jfloat) value->s;
duke@435:           return;
duke@435:         case T_INT:
duke@435:           value->f = (jfloat) value->i;
duke@435:           return;
duke@435:         case T_LONG:
duke@435:           value->f = (jfloat) value->j;
duke@435:           return;
duke@435:       }
duke@435:       break;  // fail
duke@435:     case T_DOUBLE:
duke@435:       switch (current_type) {
duke@435:         case T_BYTE:
duke@435:           value->d = (jdouble) value->b;
duke@435:           return;
duke@435:         case T_CHAR:
duke@435:           value->d = (jdouble) value->c;
duke@435:           return;
duke@435:         case T_SHORT:
duke@435:           value->d = (jdouble) value->s;
duke@435:           return;
duke@435:         case T_INT:
duke@435:           value->d = (jdouble) value->i;
duke@435:           return;
duke@435:         case T_FLOAT:
duke@435:           value->d = (jdouble) value->f;
duke@435:           return;
duke@435:         case T_LONG:
duke@435:           value->d = (jdouble) value->j;
duke@435:           return;
duke@435:       }
duke@435:       break;  // fail
duke@435:     default:
duke@435:       break;  // fail
duke@435:   }
duke@435:   THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
duke@435: }
duke@435: 
duke@435: 
duke@435: BasicType Reflection::array_get(jvalue* value, arrayOop a, int index, TRAPS) {
duke@435:   if (!a->is_within_bounds(index)) {
duke@435:     THROW_(vmSymbols::java_lang_ArrayIndexOutOfBoundsException(), T_ILLEGAL);
duke@435:   }
duke@435:   if (a->is_objArray()) {
duke@435:     value->l = (jobject) objArrayOop(a)->obj_at(index);
duke@435:     return T_OBJECT;
duke@435:   } else {
duke@435:     assert(a->is_typeArray(), "just checking");
coleenp@4142:     BasicType type = TypeArrayKlass::cast(a->klass())->element_type();
duke@435:     switch (type) {
duke@435:       case T_BOOLEAN:
duke@435:         value->z = typeArrayOop(a)->bool_at(index);
duke@435:         break;
duke@435:       case T_CHAR:
duke@435:         value->c = typeArrayOop(a)->char_at(index);
duke@435:         break;
duke@435:       case T_FLOAT:
duke@435:         value->f = typeArrayOop(a)->float_at(index);
duke@435:         break;
duke@435:       case T_DOUBLE:
duke@435:         value->d = typeArrayOop(a)->double_at(index);
duke@435:         break;
duke@435:       case T_BYTE:
duke@435:         value->b = typeArrayOop(a)->byte_at(index);
duke@435:         break;
duke@435:       case T_SHORT:
duke@435:         value->s = typeArrayOop(a)->short_at(index);
duke@435:         break;
duke@435:       case T_INT:
duke@435:         value->i = typeArrayOop(a)->int_at(index);
duke@435:         break;
duke@435:       case T_LONG:
duke@435:         value->j = typeArrayOop(a)->long_at(index);
duke@435:         break;
duke@435:       default:
duke@435:         return T_ILLEGAL;
duke@435:     }
duke@435:     return type;
duke@435:   }
duke@435: }
duke@435: 
duke@435: 
duke@435: void Reflection::array_set(jvalue* value, arrayOop a, int index, BasicType value_type, TRAPS) {
duke@435:   if (!a->is_within_bounds(index)) {
duke@435:     THROW(vmSymbols::java_lang_ArrayIndexOutOfBoundsException());
duke@435:   }
duke@435:   if (a->is_objArray()) {
duke@435:     if (value_type == T_OBJECT) {
duke@435:       oop obj = (oop) value->l;
duke@435:       if (obj != NULL) {
coleenp@4142:         Klass* element_klass = ObjArrayKlass::cast(a->klass())->element_klass();
duke@435:         if (!obj->is_a(element_klass)) {
duke@435:           THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), "array element type mismatch");
duke@435:         }
duke@435:       }
duke@435:       objArrayOop(a)->obj_at_put(index, obj);
duke@435:     }
duke@435:   } else {
duke@435:     assert(a->is_typeArray(), "just checking");
coleenp@4142:     BasicType array_type = TypeArrayKlass::cast(a->klass())->element_type();
duke@435:     if (array_type != value_type) {
duke@435:       // The widen operation can potentially throw an exception, but cannot block,
duke@435:       // so typeArrayOop a is safe if the call succeeds.
duke@435:       widen(value, value_type, array_type, CHECK);
duke@435:     }
duke@435:     switch (array_type) {
duke@435:       case T_BOOLEAN:
duke@435:         typeArrayOop(a)->bool_at_put(index, value->z);
duke@435:         break;
duke@435:       case T_CHAR:
duke@435:         typeArrayOop(a)->char_at_put(index, value->c);
duke@435:         break;
duke@435:       case T_FLOAT:
duke@435:         typeArrayOop(a)->float_at_put(index, value->f);
duke@435:         break;
duke@435:       case T_DOUBLE:
duke@435:         typeArrayOop(a)->double_at_put(index, value->d);
duke@435:         break;
duke@435:       case T_BYTE:
duke@435:         typeArrayOop(a)->byte_at_put(index, value->b);
duke@435:         break;
duke@435:       case T_SHORT:
duke@435:         typeArrayOop(a)->short_at_put(index, value->s);
duke@435:         break;
duke@435:       case T_INT:
duke@435:         typeArrayOop(a)->int_at_put(index, value->i);
duke@435:         break;
duke@435:       case T_LONG:
duke@435:         typeArrayOop(a)->long_at_put(index, value->j);
duke@435:         break;
duke@435:       default:
duke@435:         THROW(vmSymbols::java_lang_IllegalArgumentException());
duke@435:     }
duke@435:   }
duke@435: }
duke@435: 
duke@435: 
coleenp@4037: Klass* Reflection::basic_type_mirror_to_arrayklass(oop basic_type_mirror, TRAPS) {
duke@435:   assert(java_lang_Class::is_primitive(basic_type_mirror), "just checking");
duke@435:   BasicType type = java_lang_Class::primitive_type(basic_type_mirror);
duke@435:   if (type == T_VOID) {
duke@435:     THROW_0(vmSymbols::java_lang_IllegalArgumentException());
duke@435:   } else {
duke@435:     return Universe::typeArrayKlassObj(type);
duke@435:   }
duke@435: }
duke@435: 
duke@435: 
coleenp@4037: oop Reflection:: basic_type_arrayklass_to_mirror(Klass* basic_type_arrayklass, TRAPS) {
coleenp@4142:   BasicType type = TypeArrayKlass::cast(basic_type_arrayklass)->element_type();
duke@435:   return Universe::java_mirror(type);
duke@435: }
duke@435: 
duke@435: 
duke@435: arrayOop Reflection::reflect_new_array(oop element_mirror, jint length, TRAPS) {
duke@435:   if (element_mirror == NULL) {
duke@435:     THROW_0(vmSymbols::java_lang_NullPointerException());
duke@435:   }
duke@435:   if (length < 0) {
duke@435:     THROW_0(vmSymbols::java_lang_NegativeArraySizeException());
duke@435:   }
duke@435:   if (java_lang_Class::is_primitive(element_mirror)) {
coleenp@4037:     Klass* tak = basic_type_mirror_to_arrayklass(element_mirror, CHECK_NULL);
coleenp@4142:     return TypeArrayKlass::cast(tak)->allocate(length, THREAD);
duke@435:   } else {
coleenp@4037:     Klass* k = java_lang_Class::as_Klass(element_mirror);
hseigel@4278:     if (k->oop_is_array() && ArrayKlass::cast(k)->dimension() >= MAX_DIM) {
duke@435:       THROW_0(vmSymbols::java_lang_IllegalArgumentException());
duke@435:     }
duke@435:     return oopFactory::new_objArray(k, length, THREAD);
duke@435:   }
duke@435: }
duke@435: 
duke@435: 
duke@435: arrayOop Reflection::reflect_new_multi_array(oop element_mirror, typeArrayOop dim_array, TRAPS) {
duke@435:   assert(dim_array->is_typeArray(), "just checking");
coleenp@4142:   assert(TypeArrayKlass::cast(dim_array->klass())->element_type() == T_INT, "just checking");
duke@435: 
duke@435:   if (element_mirror == NULL) {
duke@435:     THROW_0(vmSymbols::java_lang_NullPointerException());
duke@435:   }
duke@435: 
duke@435:   int len = dim_array->length();
duke@435:   if (len <= 0 || len > MAX_DIM) {
duke@435:     THROW_0(vmSymbols::java_lang_IllegalArgumentException());
duke@435:   }
duke@435: 
duke@435:   jint dimensions[MAX_DIM];   // C array copy of intArrayOop
duke@435:   for (int i = 0; i < len; i++) {
duke@435:     int d = dim_array->int_at(i);
duke@435:     if (d < 0) {
duke@435:       THROW_0(vmSymbols::java_lang_NegativeArraySizeException());
duke@435:     }
duke@435:     dimensions[i] = d;
duke@435:   }
duke@435: 
coleenp@4037:   Klass* klass;
duke@435:   int dim = len;
duke@435:   if (java_lang_Class::is_primitive(element_mirror)) {
duke@435:     klass = basic_type_mirror_to_arrayklass(element_mirror, CHECK_NULL);
duke@435:   } else {
coleenp@4037:     klass = java_lang_Class::as_Klass(element_mirror);
hseigel@4278:     if (klass->oop_is_array()) {
coleenp@4142:       int k_dim = ArrayKlass::cast(klass)->dimension();
duke@435:       if (k_dim + len > MAX_DIM) {
duke@435:         THROW_0(vmSymbols::java_lang_IllegalArgumentException());
duke@435:       }
duke@435:       dim += k_dim;
duke@435:     }
duke@435:   }
hseigel@4278:   klass = klass->array_klass(dim, CHECK_NULL);
ctornqvi@5211:   oop obj = ArrayKlass::cast(klass)->multi_allocate(len, dimensions, CHECK_NULL);
duke@435:   assert(obj->is_array(), "just checking");
duke@435:   return arrayOop(obj);
duke@435: }
duke@435: 
duke@435: 
duke@435: oop Reflection::array_component_type(oop mirror, TRAPS) {
duke@435:   if (java_lang_Class::is_primitive(mirror)) {
duke@435:     return NULL;
duke@435:   }
duke@435: 
coleenp@4037:   Klass* klass = java_lang_Class::as_Klass(mirror);
hseigel@4278:   if (!klass->oop_is_array()) {
duke@435:     return NULL;
duke@435:   }
duke@435: 
coleenp@4142:   oop result = ArrayKlass::cast(klass)->component_mirror();
duke@435: #ifdef ASSERT
duke@435:   oop result2 = NULL;
coleenp@4142:   if (ArrayKlass::cast(klass)->dimension() == 1) {
hseigel@4278:     if (klass->oop_is_typeArray()) {
duke@435:       result2 = basic_type_arrayklass_to_mirror(klass, CHECK_NULL);
duke@435:     } else {
hseigel@4278:       result2 = ObjArrayKlass::cast(klass)->element_klass()->java_mirror();
duke@435:     }
duke@435:   } else {
coleenp@4142:     Klass* lower_dim = ArrayKlass::cast(klass)->lower_dimension();
hseigel@4278:     assert(lower_dim->oop_is_array(), "just checking");
hseigel@4278:     result2 = lower_dim->java_mirror();
duke@435:   }
duke@435:   assert(result == result2, "results must be consistent");
duke@435: #endif //ASSERT
duke@435:   return result;
duke@435: }
duke@435: 
duke@435: 
coleenp@4037: bool Reflection::reflect_check_access(Klass* field_class, AccessFlags acc, Klass* target_class, bool is_method_invoke, TRAPS) {
duke@435:   // field_class  : declaring class
duke@435:   // acc          : declared field access
duke@435:   // target_class : for protected
duke@435: 
duke@435:   // Check if field or method is accessible to client.  Throw an
duke@435:   // IllegalAccessException and return false if not.
duke@435: 
duke@435:   // The "client" is the class associated with the nearest real frame
duke@435:   // getCallerClass already skips Method.invoke frames, so pass 0 in
duke@435:   // that case (same as classic).
duke@435:   ResourceMark rm(THREAD);
duke@435:   assert(THREAD->is_Java_thread(), "sanity check");
coleenp@4037:   Klass* client_class = ((JavaThread *)THREAD)->security_get_caller_class(is_method_invoke ? 0 : 1);
duke@435: 
duke@435:   if (client_class != field_class) {
duke@435:     if (!verify_class_access(client_class, field_class, false)
duke@435:         || !verify_field_access(client_class,
duke@435:                                 field_class,
duke@435:                                 field_class,
duke@435:                                 acc,
duke@435:                                 false)) {
duke@435:       THROW_(vmSymbols::java_lang_IllegalAccessException(), false);
duke@435:     }
duke@435:   }
duke@435: 
duke@435:   // Additional test for protected members: JLS 6.6.2
duke@435: 
duke@435:   if (acc.is_protected()) {
duke@435:     if (target_class != client_class) {
duke@435:       if (!is_same_class_package(client_class, field_class)) {
hseigel@4278:         if (!target_class->is_subclass_of(client_class)) {
duke@435:           THROW_(vmSymbols::java_lang_IllegalAccessException(), false);
duke@435:         }
duke@435:       }
duke@435:     }
duke@435:   }
duke@435: 
duke@435:   // Passed all tests
duke@435:   return true;
duke@435: }
duke@435: 
duke@435: 
coleenp@4037: bool Reflection::verify_class_access(Klass* current_class, Klass* new_class, bool classloader_only) {
duke@435:   // Verify that current_class can access new_class.  If the classloader_only
duke@435:   // flag is set, we automatically allow any accesses in which current_class
duke@435:   // doesn't have a classloader.
duke@435:   if ((current_class == NULL) ||
duke@435:       (current_class == new_class) ||
twisti@5354:       (new_class->is_public()) ||
duke@435:       is_same_class_package(current_class, new_class)) {
duke@435:     return true;
duke@435:   }
duke@435:   // New (1.4) reflection implementation. Allow all accesses from
duke@435:   // sun/reflect/MagicAccessorImpl subclasses to succeed trivially.
duke@435:   if (   JDK_Version::is_gte_jdk14x_version()
duke@435:       && UseNewReflection
hseigel@4278:       && current_class->is_subclass_of(SystemDictionary::reflect_MagicAccessorImpl_klass())) {
duke@435:     return true;
duke@435:   }
duke@435: 
kamg@4245:   // Also allow all accesses from
kamg@4245:   // java/lang/invoke/MagicLambdaImpl subclasses to succeed trivially.
kamg@4245:   if (current_class->is_subclass_of(SystemDictionary::lambda_MagicLambdaImpl_klass())) {
kamg@4245:     return true;
kamg@4245:   }
kamg@4245: 
duke@435:   return can_relax_access_check_for(current_class, new_class, classloader_only);
duke@435: }
duke@435: 
coleenp@4037: static bool under_host_klass(InstanceKlass* ik, Klass* host_klass) {
jrose@866:   DEBUG_ONLY(int inf_loop_check = 1000 * 1000 * 1000);
jrose@866:   for (;;) {
coleenp@4037:     Klass* hc = (Klass*) ik->host_klass();
jrose@866:     if (hc == NULL)        return false;
jrose@866:     if (hc == host_klass)  return true;
coleenp@4037:     ik = InstanceKlass::cast(hc);
jrose@866: 
jrose@866:     // There's no way to make a host class loop short of patching memory.
jrose@866:     // Therefore there cannot be a loop here unles there's another bug.
jrose@866:     // Still, let's check for it.
jrose@866:     assert(--inf_loop_check > 0, "no host_klass loop");
jrose@866:   }
jrose@866: }
jrose@866: 
duke@435: bool Reflection::can_relax_access_check_for(
coleenp@4037:     Klass* accessor, Klass* accessee, bool classloader_only) {
coleenp@4037:   InstanceKlass* accessor_ik = InstanceKlass::cast(accessor);
coleenp@4037:   InstanceKlass* accessee_ik  = InstanceKlass::cast(accessee);
jrose@866: 
jrose@866:   // If either is on the other's host_klass chain, access is OK,
jrose@866:   // because one is inside the other.
jrose@866:   if (under_host_klass(accessor_ik, accessee) ||
jrose@866:       under_host_klass(accessee_ik, accessor))
jrose@866:     return true;
jrose@866: 
hseigel@5213:   if ((RelaxAccessControlCheck &&
hseigel@5213:         accessor_ik->major_version() < Verifier::NO_RELAX_ACCESS_CTRL_CHECK_VERSION &&
hseigel@5213:         accessee_ik->major_version() < Verifier::NO_RELAX_ACCESS_CTRL_CHECK_VERSION) ||
hseigel@5213:       (accessor_ik->major_version() < Verifier::STRICTER_ACCESS_CTRL_CHECK_VERSION &&
hseigel@5213:        accessee_ik->major_version() < Verifier::STRICTER_ACCESS_CTRL_CHECK_VERSION)) {
duke@435:     return classloader_only &&
duke@435:       Verifier::relax_verify_for(accessor_ik->class_loader()) &&
duke@435:       accessor_ik->protection_domain() == accessee_ik->protection_domain() &&
duke@435:       accessor_ik->class_loader() == accessee_ik->class_loader();
duke@435:   } else {
duke@435:     return false;
duke@435:   }
duke@435: }
duke@435: 
coleenp@4037: bool Reflection::verify_field_access(Klass* current_class,
coleenp@4037:                                      Klass* resolved_class,
coleenp@4037:                                      Klass* field_class,
duke@435:                                      AccessFlags access,
duke@435:                                      bool classloader_only,
duke@435:                                      bool protected_restriction) {
duke@435:   // Verify that current_class can access a field of field_class, where that
duke@435:   // field's access bits are "access".  We assume that we've already verified
duke@435:   // that current_class can access field_class.
duke@435:   //
duke@435:   // If the classloader_only flag is set, we automatically allow any accesses
duke@435:   // in which current_class doesn't have a classloader.
duke@435:   //
duke@435:   // "resolved_class" is the runtime type of "field_class". Sometimes we don't
duke@435:   // need this distinction (e.g. if all we have is the runtime type, or during
duke@435:   // class file parsing when we only care about the static type); in that case
duke@435:   // callers should ensure that resolved_class == field_class.
duke@435:   //
duke@435:   if ((current_class == NULL) ||
duke@435:       (current_class == field_class) ||
duke@435:       access.is_public()) {
duke@435:     return true;
duke@435:   }
duke@435: 
duke@435:   if (access.is_protected()) {
duke@435:     if (!protected_restriction) {
duke@435:       // See if current_class is a subclass of field_class
hseigel@4278:       if (current_class->is_subclass_of(field_class)) {
kamg@550:         if (access.is_static() || // static fields are ok, see 6622385
kamg@550:             current_class == resolved_class ||
duke@435:             field_class == resolved_class ||
hseigel@4278:             current_class->is_subclass_of(resolved_class) ||
hseigel@4278:             resolved_class->is_subclass_of(current_class)) {
duke@435:           return true;
duke@435:         }
duke@435:       }
duke@435:     }
duke@435:   }
duke@435: 
duke@435:   if (!access.is_private() && is_same_class_package(current_class, field_class)) {
duke@435:     return true;
duke@435:   }
duke@435: 
duke@435:   // New (1.4) reflection implementation. Allow all accesses from
duke@435:   // sun/reflect/MagicAccessorImpl subclasses to succeed trivially.
duke@435:   if (   JDK_Version::is_gte_jdk14x_version()
duke@435:       && UseNewReflection
hseigel@4278:       && current_class->is_subclass_of(SystemDictionary::reflect_MagicAccessorImpl_klass())) {
duke@435:     return true;
duke@435:   }
duke@435: 
kamg@4245:   // Also allow all accesses from
kamg@4245:   // java/lang/invoke/MagicLambdaImpl subclasses to succeed trivially.
kamg@4245:   if (current_class->is_subclass_of(SystemDictionary::lambda_MagicLambdaImpl_klass())) {
kamg@4245:     return true;
kamg@4245:   }
kamg@4245: 
duke@435:   return can_relax_access_check_for(
duke@435:     current_class, field_class, classloader_only);
duke@435: }
duke@435: 
duke@435: 
coleenp@4037: bool Reflection::is_same_class_package(Klass* class1, Klass* class2) {
coleenp@4037:   return InstanceKlass::cast(class1)->is_same_class_package(class2);
duke@435: }
duke@435: 
coleenp@4037: bool Reflection::is_same_package_member(Klass* class1, Klass* class2, TRAPS) {
coleenp@4037:   return InstanceKlass::cast(class1)->is_same_package_member(class2, THREAD);
jrose@1100: }
jrose@1100: 
duke@435: 
duke@435: // Checks that the 'outer' klass has declared 'inner' as being an inner klass. If not,
duke@435: // throw an incompatible class change exception
jrose@1100: // If inner_is_member, require the inner to be a member of the outer.
jrose@1100: // If !inner_is_member, require the inner to be anonymous (a non-member).
jrose@1100: // Caller is responsible for figuring out in advance which case must be true.
jrose@1100: void Reflection::check_for_inner_class(instanceKlassHandle outer, instanceKlassHandle inner,
jrose@1100:                                        bool inner_is_member, TRAPS) {
jiangli@3670:   InnerClassesIterator iter(outer);
duke@435:   constantPoolHandle cp   (THREAD, outer->constants());
jiangli@3670:   for (; !iter.done(); iter.next()) {
jiangli@3670:      int ioff = iter.inner_class_info_index();
jiangli@3670:      int ooff = iter.outer_class_info_index();
duke@435: 
jrose@1100:      if (inner_is_member && ioff != 0 && ooff != 0) {
coleenp@4037:         Klass* o = cp->klass_at(ooff, CHECK);
duke@435:         if (o == outer()) {
coleenp@4037:           Klass* i = cp->klass_at(ioff, CHECK);
duke@435:           if (i == inner()) {
duke@435:             return;
duke@435:           }
duke@435:         }
duke@435:      }
jrose@1100:      if (!inner_is_member && ioff != 0 && ooff == 0 &&
jrose@1100:          cp->klass_name_at_matches(inner, ioff)) {
coleenp@4037:         Klass* i = cp->klass_at(ioff, CHECK);
jrose@1100:         if (i == inner()) {
jrose@1100:           return;
jrose@1100:         }
jrose@1100:      }
duke@435:   }
duke@435: 
duke@435:   // 'inner' not declared as an inner klass in outer
duke@435:   ResourceMark rm(THREAD);
duke@435:   Exceptions::fthrow(
duke@435:     THREAD_AND_LOCATION,
coleenp@2497:     vmSymbols::java_lang_IncompatibleClassChangeError(),
duke@435:     "%s and %s disagree on InnerClasses attribute",
duke@435:     outer->external_name(),
duke@435:     inner->external_name()
duke@435:   );
duke@435: }
duke@435: 
duke@435: // Utility method converting a single SignatureStream element into java.lang.Class instance
duke@435: 
duke@435: oop get_mirror_from_signature(methodHandle method, SignatureStream* ss, TRAPS) {
duke@435:   switch (ss->type()) {
duke@435:     default:
duke@435:       assert(ss->type() != T_VOID || ss->at_return_type(), "T_VOID should only appear as return type");
duke@435:       return java_lang_Class::primitive_mirror(ss->type());
duke@435:     case T_OBJECT:
duke@435:     case T_ARRAY:
coleenp@2497:       Symbol* name        = ss->as_symbol(CHECK_NULL);
coleenp@4251:       oop loader            = method->method_holder()->class_loader();
coleenp@4251:       oop protection_domain = method->method_holder()->protection_domain();
coleenp@4037:       Klass* k = SystemDictionary::resolve_or_fail(
coleenp@2497:                                        name,
duke@435:                                        Handle(THREAD, loader),
duke@435:                                        Handle(THREAD, protection_domain),
duke@435:                                        true, CHECK_NULL);
duke@435:       if (TraceClassResolution) {
duke@435:         trace_class_resolution(k);
duke@435:       }
never@2658:       return k->java_mirror();
duke@435:   };
duke@435: }
duke@435: 
duke@435: 
duke@435: objArrayHandle Reflection::get_parameter_types(methodHandle method, int parameter_count, oop* return_type, TRAPS) {
duke@435:   // Allocate array holding parameter types (java.lang.Class instances)
never@1577:   objArrayOop m = oopFactory::new_objArray(SystemDictionary::Class_klass(), parameter_count, CHECK_(objArrayHandle()));
duke@435:   objArrayHandle mirrors (THREAD, m);
duke@435:   int index = 0;
duke@435:   // Collect parameter types
coleenp@2497:   ResourceMark rm(THREAD);
coleenp@2497:   Symbol*  signature  = method->signature();
duke@435:   SignatureStream ss(signature);
duke@435:   while (!ss.at_return_type()) {
duke@435:     oop mirror = get_mirror_from_signature(method, &ss, CHECK_(objArrayHandle()));
duke@435:     mirrors->obj_at_put(index++, mirror);
duke@435:     ss.next();
duke@435:   }
duke@435:   assert(index == parameter_count, "invalid parameter count");
duke@435:   if (return_type != NULL) {
duke@435:     // Collect return type as well
duke@435:     assert(ss.at_return_type(), "return type should be present");
duke@435:     *return_type = get_mirror_from_signature(method, &ss, CHECK_(objArrayHandle()));
duke@435:   }
duke@435:   return mirrors;
duke@435: }
duke@435: 
duke@435: objArrayHandle Reflection::get_exception_types(methodHandle method, TRAPS) {
duke@435:   return method->resolved_checked_exceptions(CHECK_(objArrayHandle()));
duke@435: }
duke@435: 
duke@435: 
coleenp@2497: Handle Reflection::new_type(Symbol* signature, KlassHandle k, TRAPS) {
duke@435:   // Basic types
coleenp@2497:   BasicType type = vmSymbols::signature_type(signature);
duke@435:   if (type != T_OBJECT) {
duke@435:     return Handle(THREAD, Universe::java_mirror(type));
duke@435:   }
duke@435: 
coleenp@4037:   oop loader = InstanceKlass::cast(k())->class_loader();
hseigel@4278:   oop protection_domain = k()->protection_domain();
coleenp@4037:   Klass* result = SystemDictionary::resolve_or_fail(signature,
duke@435:                                     Handle(THREAD, loader),
duke@435:                                     Handle(THREAD, protection_domain),
duke@435:                                     true, CHECK_(Handle()));
duke@435: 
duke@435:   if (TraceClassResolution) {
duke@435:     trace_class_resolution(result);
duke@435:   }
duke@435: 
hseigel@4278:   oop nt = result->java_mirror();
duke@435:   return Handle(THREAD, nt);
duke@435: }
duke@435: 
duke@435: 
duke@435: oop Reflection::new_method(methodHandle method, bool intern_name, bool for_constant_pool_access, TRAPS) {
duke@435:   // In jdk1.2.x, getMethods on an interface erroneously includes <clinit>, thus the complicated assert.
duke@435:   // Also allow sun.reflect.ConstantPool to refer to <clinit> methods as java.lang.reflect.Methods.
duke@435:   assert(!method()->is_initializer() ||
duke@435:          (for_constant_pool_access && method()->is_static()) ||
duke@435:          (method()->name() == vmSymbols::class_initializer_name()
coleenp@4251:     && method()->method_holder()->is_interface() && JDK_Version::is_jdk12x_version()), "should call new_constructor instead");
duke@435:   instanceKlassHandle holder (THREAD, method->method_holder());
duke@435:   int slot = method->method_idnum();
duke@435: 
coleenp@2497:   Symbol*  signature  = method->signature();
duke@435:   int parameter_count = ArgumentCount(signature).size();
duke@435:   oop return_type_oop = NULL;
duke@435:   objArrayHandle parameter_types = get_parameter_types(method, parameter_count, &return_type_oop, CHECK_NULL);
duke@435:   if (parameter_types.is_null() || return_type_oop == NULL) return NULL;
duke@435: 
duke@435:   Handle return_type(THREAD, return_type_oop);
duke@435: 
duke@435:   objArrayHandle exception_types = get_exception_types(method, CHECK_NULL);
duke@435: 
duke@435:   if (exception_types.is_null()) return NULL;
duke@435: 
coleenp@2497:   Symbol*  method_name = method->name();
duke@435:   Handle name;
duke@435:   if (intern_name) {
duke@435:     // intern_name is only true with UseNewReflection
coleenp@2497:     oop name_oop = StringTable::intern(method_name, CHECK_NULL);
duke@435:     name = Handle(THREAD, name_oop);
duke@435:   } else {
duke@435:     name = java_lang_String::create_from_symbol(method_name, CHECK_NULL);
duke@435:   }
coleenp@2497:   if (name == NULL) return NULL;
duke@435: 
duke@435:   int modifiers = method->access_flags().as_int() & JVM_RECOGNIZED_METHOD_MODIFIERS;
duke@435: 
duke@435:   Handle mh = java_lang_reflect_Method::create(CHECK_NULL);
duke@435: 
duke@435:   java_lang_reflect_Method::set_clazz(mh(), holder->java_mirror());
duke@435:   java_lang_reflect_Method::set_slot(mh(), slot);
duke@435:   java_lang_reflect_Method::set_name(mh(), name());
duke@435:   java_lang_reflect_Method::set_return_type(mh(), return_type());
duke@435:   java_lang_reflect_Method::set_parameter_types(mh(), parameter_types());
duke@435:   java_lang_reflect_Method::set_exception_types(mh(), exception_types());
duke@435:   java_lang_reflect_Method::set_modifiers(mh(), modifiers);
duke@435:   java_lang_reflect_Method::set_override(mh(), false);
duke@435:   if (java_lang_reflect_Method::has_signature_field() &&
duke@435:       method->generic_signature() != NULL) {
coleenp@2497:     Symbol*  gs = method->generic_signature();
duke@435:     Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
duke@435:     java_lang_reflect_Method::set_signature(mh(), sig());
duke@435:   }
duke@435:   if (java_lang_reflect_Method::has_annotations_field()) {
coleenp@4037:     typeArrayOop an_oop = Annotations::make_java_array(method->annotations(), CHECK_NULL);
coleenp@4037:     java_lang_reflect_Method::set_annotations(mh(), an_oop);
duke@435:   }
duke@435:   if (java_lang_reflect_Method::has_parameter_annotations_field()) {
coleenp@4037:     typeArrayOop an_oop = Annotations::make_java_array(method->parameter_annotations(), CHECK_NULL);
coleenp@4037:     java_lang_reflect_Method::set_parameter_annotations(mh(), an_oop);
duke@435:   }
duke@435:   if (java_lang_reflect_Method::has_annotation_default_field()) {
coleenp@4037:     typeArrayOop an_oop = Annotations::make_java_array(method->annotation_default(), CHECK_NULL);
coleenp@4037:     java_lang_reflect_Method::set_annotation_default(mh(), an_oop);
duke@435:   }
stefank@4393:   if (java_lang_reflect_Method::has_type_annotations_field()) {
stefank@4393:     typeArrayOop an_oop = Annotations::make_java_array(method->type_annotations(), CHECK_NULL);
stefank@4393:     java_lang_reflect_Method::set_type_annotations(mh(), an_oop);
stefank@4393:   }
duke@435:   return mh();
duke@435: }
duke@435: 
duke@435: 
duke@435: oop Reflection::new_constructor(methodHandle method, TRAPS) {
duke@435:   assert(method()->is_initializer(), "should call new_method instead");
duke@435: 
duke@435:   instanceKlassHandle  holder (THREAD, method->method_holder());
duke@435:   int slot = method->method_idnum();
duke@435: 
coleenp@2497:   Symbol*  signature  = method->signature();
duke@435:   int parameter_count = ArgumentCount(signature).size();
duke@435:   objArrayHandle parameter_types = get_parameter_types(method, parameter_count, NULL, CHECK_NULL);
duke@435:   if (parameter_types.is_null()) return NULL;
duke@435: 
duke@435:   objArrayHandle exception_types = get_exception_types(method, CHECK_NULL);
duke@435:   if (exception_types.is_null()) return NULL;
duke@435: 
duke@435:   int modifiers = method->access_flags().as_int() & JVM_RECOGNIZED_METHOD_MODIFIERS;
duke@435: 
duke@435:   Handle ch = java_lang_reflect_Constructor::create(CHECK_NULL);
duke@435: 
duke@435:   java_lang_reflect_Constructor::set_clazz(ch(), holder->java_mirror());
duke@435:   java_lang_reflect_Constructor::set_slot(ch(), slot);
duke@435:   java_lang_reflect_Constructor::set_parameter_types(ch(), parameter_types());
duke@435:   java_lang_reflect_Constructor::set_exception_types(ch(), exception_types());
duke@435:   java_lang_reflect_Constructor::set_modifiers(ch(), modifiers);
duke@435:   java_lang_reflect_Constructor::set_override(ch(), false);
duke@435:   if (java_lang_reflect_Constructor::has_signature_field() &&
duke@435:       method->generic_signature() != NULL) {
coleenp@2497:     Symbol*  gs = method->generic_signature();
duke@435:     Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
duke@435:     java_lang_reflect_Constructor::set_signature(ch(), sig());
duke@435:   }
duke@435:   if (java_lang_reflect_Constructor::has_annotations_field()) {
coleenp@4037:     typeArrayOop an_oop = Annotations::make_java_array(method->annotations(), CHECK_NULL);
coleenp@4037:     java_lang_reflect_Constructor::set_annotations(ch(), an_oop);
duke@435:   }
duke@435:   if (java_lang_reflect_Constructor::has_parameter_annotations_field()) {
coleenp@4037:     typeArrayOop an_oop = Annotations::make_java_array(method->parameter_annotations(), CHECK_NULL);
coleenp@4037:     java_lang_reflect_Constructor::set_parameter_annotations(ch(), an_oop);
duke@435:   }
rbackman@5210:   if (java_lang_reflect_Constructor::has_type_annotations_field()) {
rbackman@5210:     typeArrayOop an_oop = Annotations::make_java_array(method->type_annotations(), CHECK_NULL);
rbackman@5210:     java_lang_reflect_Constructor::set_type_annotations(ch(), an_oop);
rbackman@5210:   }
duke@435:   return ch();
duke@435: }
duke@435: 
duke@435: 
duke@435: oop Reflection::new_field(fieldDescriptor* fd, bool intern_name, TRAPS) {
coleenp@2497:   Symbol*  field_name = fd->name();
duke@435:   Handle name;
duke@435:   if (intern_name) {
duke@435:     // intern_name is only true with UseNewReflection
coleenp@2497:     oop name_oop = StringTable::intern(field_name, CHECK_NULL);
duke@435:     name = Handle(THREAD, name_oop);
duke@435:   } else {
duke@435:     name = java_lang_String::create_from_symbol(field_name, CHECK_NULL);
duke@435:   }
coleenp@2497:   Symbol*  signature  = fd->signature();
coleenp@4037:   instanceKlassHandle  holder    (THREAD, fd->field_holder());
duke@435:   Handle type = new_type(signature, holder, CHECK_NULL);
duke@435:   Handle rh  = java_lang_reflect_Field::create(CHECK_NULL);
duke@435: 
coleenp@4251:   java_lang_reflect_Field::set_clazz(rh(), fd->field_holder()->java_mirror());
duke@435:   java_lang_reflect_Field::set_slot(rh(), fd->index());
duke@435:   java_lang_reflect_Field::set_name(rh(), name());
duke@435:   java_lang_reflect_Field::set_type(rh(), type());
duke@435:   // Note the ACC_ANNOTATION bit, which is a per-class access flag, is never set here.
duke@435:   java_lang_reflect_Field::set_modifiers(rh(), fd->access_flags().as_int() & JVM_RECOGNIZED_FIELD_MODIFIERS);
duke@435:   java_lang_reflect_Field::set_override(rh(), false);
duke@435:   if (java_lang_reflect_Field::has_signature_field() &&
jiangli@3879:       fd->has_generic_signature()) {
coleenp@2497:     Symbol*  gs = fd->generic_signature();
duke@435:     Handle sig = java_lang_String::create_from_symbol(gs, CHECK_NULL);
duke@435:     java_lang_reflect_Field::set_signature(rh(), sig());
duke@435:   }
duke@435:   if (java_lang_reflect_Field::has_annotations_field()) {
coleenp@4037:     typeArrayOop an_oop = Annotations::make_java_array(fd->annotations(), CHECK_NULL);
coleenp@4037:     java_lang_reflect_Field::set_annotations(rh(), an_oop);
duke@435:   }
stefank@4393:   if (java_lang_reflect_Field::has_type_annotations_field()) {
stefank@4393:     typeArrayOop an_oop = Annotations::make_java_array(fd->type_annotations(), CHECK_NULL);
stefank@4393:     java_lang_reflect_Field::set_type_annotations(rh(), an_oop);
stefank@4393:   }
duke@435:   return rh();
duke@435: }
duke@435: 
coleenp@4398: oop Reflection::new_parameter(Handle method, int index, Symbol* sym,
coleenp@4398:                               int flags, TRAPS) {
coleenp@4431:   Handle name;
coleenp@4431: 
coleenp@4431:   // A null symbol here translates to the empty string
coleenp@4431:   if(NULL != sym) {
coleenp@4431:     name = java_lang_String::create_from_symbol(sym, CHECK_NULL);
coleenp@4431:   } else {
coleenp@4431:     name = java_lang_String::create_from_str("", CHECK_NULL);
coleenp@4431:   }
coleenp@4431: 
coleenp@4398:   Handle rh = java_lang_reflect_Parameter::create(CHECK_NULL);
coleenp@4398:   java_lang_reflect_Parameter::set_name(rh(), name());
coleenp@4398:   java_lang_reflect_Parameter::set_modifiers(rh(), flags);
coleenp@4398:   java_lang_reflect_Parameter::set_executable(rh(), method());
coleenp@4398:   java_lang_reflect_Parameter::set_index(rh(), index);
coleenp@4398:   return rh();
coleenp@4398: }
coleenp@4398: 
duke@435: 
duke@435: methodHandle Reflection::resolve_interface_call(instanceKlassHandle klass, methodHandle method,
duke@435:                                                 KlassHandle recv_klass, Handle receiver, TRAPS) {
duke@435:   assert(!method.is_null() , "method should not be null");
duke@435: 
duke@435:   CallInfo info;
coleenp@2497:   Symbol*  signature  = method->signature();
coleenp@2497:   Symbol*  name       = method->name();
duke@435:   LinkResolver::resolve_interface_call(info, receiver, recv_klass, klass,
duke@435:                                        name, signature,
duke@435:                                        KlassHandle(), false, true,
duke@435:                                        CHECK_(methodHandle()));
duke@435:   return info.selected_method();
duke@435: }
duke@435: 
duke@435: 
duke@435: oop Reflection::invoke(instanceKlassHandle klass, methodHandle reflected_method,
duke@435:                        Handle receiver, bool override, objArrayHandle ptypes,
duke@435:                        BasicType rtype, objArrayHandle args, bool is_method_invoke, TRAPS) {
duke@435:   ResourceMark rm(THREAD);
duke@435: 
duke@435:   methodHandle method;      // actual method to invoke
duke@435:   KlassHandle target_klass; // target klass, receiver's klass for non-static
duke@435: 
duke@435:   // Ensure klass is initialized
duke@435:   klass->initialize(CHECK_NULL);
duke@435: 
duke@435:   bool is_static = reflected_method->is_static();
duke@435:   if (is_static) {
duke@435:     // ignore receiver argument
duke@435:     method = reflected_method;
duke@435:     target_klass = klass;
duke@435:   } else {
duke@435:     // check for null receiver
duke@435:     if (receiver.is_null()) {
duke@435:       THROW_0(vmSymbols::java_lang_NullPointerException());
duke@435:     }
duke@435:     // Check class of receiver against class declaring method
duke@435:     if (!receiver->is_a(klass())) {
duke@435:       THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "object is not an instance of declaring class");
duke@435:     }
duke@435:     // target klass is receiver's klass
duke@435:     target_klass = KlassHandle(THREAD, receiver->klass());
duke@435:     // no need to resolve if method is private or <init>
duke@435:     if (reflected_method->is_private() || reflected_method->name() == vmSymbols::object_initializer_name()) {
duke@435:       method = reflected_method;
duke@435:     } else {
duke@435:       // resolve based on the receiver
coleenp@4251:       if (reflected_method->method_holder()->is_interface()) {
duke@435:         // resolve interface call
duke@435:         if (ReflectionWrapResolutionErrors) {
duke@435:           // new default: 6531596
duke@435:           // Match resolution errors with those thrown due to reflection inlining
duke@435:           // Linktime resolution & IllegalAccessCheck already done by Class.getMethod()
duke@435:           method = resolve_interface_call(klass, reflected_method, target_klass, receiver, THREAD);
duke@435:           if (HAS_PENDING_EXCEPTION) {
duke@435:           // Method resolution threw an exception; wrap it in an InvocationTargetException
duke@435:             oop resolution_exception = PENDING_EXCEPTION;
duke@435:             CLEAR_PENDING_EXCEPTION;
duke@435:             JavaCallArguments args(Handle(THREAD, resolution_exception));
coleenp@2497:             THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
coleenp@2497:                 vmSymbols::throwable_void_signature(),
duke@435:                 &args);
duke@435:           }
duke@435:         } else {
duke@435:           method = resolve_interface_call(klass, reflected_method, target_klass, receiver, CHECK_(NULL));
duke@435:         }
duke@435:       }  else {
duke@435:         // if the method can be overridden, we resolve using the vtable index.
drchase@5732:         assert(!reflected_method->has_itable_index(), "");
drchase@5732:         int index = reflected_method->vtable_index();
duke@435:         method = reflected_method;
coleenp@4037:         if (index != Method::nonvirtual_vtable_index) {
duke@435:           // target_klass might be an arrayKlassOop but all vtables start at
duke@435:           // the same place. The cast is to avoid virtual call and assertion.
coleenp@4037:           InstanceKlass* inst = (InstanceKlass*)target_klass();
duke@435:           method = methodHandle(THREAD, inst->method_at_vtable(index));
duke@435:         }
duke@435:         if (!method.is_null()) {
duke@435:           // Check for abstract methods as well
duke@435:           if (method->is_abstract()) {
duke@435:             // new default: 6531596
duke@435:             if (ReflectionWrapResolutionErrors) {
duke@435:               ResourceMark rm(THREAD);
duke@435:               Handle h_origexception = Exceptions::new_exception(THREAD,
duke@435:                      vmSymbols::java_lang_AbstractMethodError(),
hseigel@4278:                      Method::name_and_sig_as_C_string(target_klass(),
duke@435:                      method->name(),
duke@435:                      method->signature()));
duke@435:               JavaCallArguments args(h_origexception);
coleenp@2497:               THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
coleenp@2497:                 vmSymbols::throwable_void_signature(),
duke@435:                 &args);
duke@435:             } else {
duke@435:               ResourceMark rm(THREAD);
duke@435:               THROW_MSG_0(vmSymbols::java_lang_AbstractMethodError(),
hseigel@4278:                         Method::name_and_sig_as_C_string(target_klass(),
duke@435:                                                                 method->name(),
duke@435:                                                                 method->signature()));
duke@435:             }
duke@435:           }
duke@435:         }
duke@435:       }
duke@435:     }
duke@435:   }
duke@435: 
duke@435:   // I believe this is a ShouldNotGetHere case which requires
duke@435:   // an internal vtable bug. If you ever get this please let Karen know.
duke@435:   if (method.is_null()) {
duke@435:     ResourceMark rm(THREAD);
duke@435:     THROW_MSG_0(vmSymbols::java_lang_NoSuchMethodError(),
hseigel@4278:                 Method::name_and_sig_as_C_string(klass(),
duke@435:                                                         reflected_method->name(),
duke@435:                                                         reflected_method->signature()));
duke@435:   }
duke@435: 
duke@435:   // In the JDK 1.4 reflection implementation, the security check is
duke@435:   // done at the Java level
duke@435:   if (!(JDK_Version::is_gte_jdk14x_version() && UseNewReflection)) {
duke@435: 
duke@435:   // Access checking (unless overridden by Method)
duke@435:   if (!override) {
duke@435:     if (!(klass->is_public() && reflected_method->is_public())) {
duke@435:       bool access = Reflection::reflect_check_access(klass(), reflected_method->access_flags(), target_klass(), is_method_invoke, CHECK_NULL);
duke@435:       if (!access) {
duke@435:         return NULL; // exception
duke@435:       }
duke@435:     }
duke@435:   }
duke@435: 
duke@435:   } // !(Universe::is_gte_jdk14x_version() && UseNewReflection)
duke@435: 
duke@435:   assert(ptypes->is_objArray(), "just checking");
duke@435:   int args_len = args.is_null() ? 0 : args->length();
duke@435:   // Check number of arguments
duke@435:   if (ptypes->length() != args_len) {
duke@435:     THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "wrong number of arguments");
duke@435:   }
duke@435: 
duke@435:   // Create object to contain parameters for the JavaCall
duke@435:   JavaCallArguments java_args(method->size_of_parameters());
duke@435: 
duke@435:   if (!is_static) {
duke@435:     java_args.push_oop(receiver);
duke@435:   }
duke@435: 
duke@435:   for (int i = 0; i < args_len; i++) {
duke@435:     oop type_mirror = ptypes->obj_at(i);
duke@435:     oop arg = args->obj_at(i);
duke@435:     if (java_lang_Class::is_primitive(type_mirror)) {
duke@435:       jvalue value;
duke@435:       BasicType ptype = basic_type_mirror_to_basic_type(type_mirror, CHECK_NULL);
duke@435:       BasicType atype = unbox_for_primitive(arg, &value, CHECK_NULL);
duke@435:       if (ptype != atype) {
duke@435:         widen(&value, atype, ptype, CHECK_NULL);
duke@435:       }
duke@435:       switch (ptype) {
duke@435:         case T_BOOLEAN:     java_args.push_int(value.z);    break;
duke@435:         case T_CHAR:        java_args.push_int(value.c);    break;
duke@435:         case T_BYTE:        java_args.push_int(value.b);    break;
duke@435:         case T_SHORT:       java_args.push_int(value.s);    break;
duke@435:         case T_INT:         java_args.push_int(value.i);    break;
duke@435:         case T_LONG:        java_args.push_long(value.j);   break;
duke@435:         case T_FLOAT:       java_args.push_float(value.f);  break;
duke@435:         case T_DOUBLE:      java_args.push_double(value.d); break;
duke@435:         default:
duke@435:           THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
duke@435:       }
duke@435:     } else {
duke@435:       if (arg != NULL) {
coleenp@4037:         Klass* k = java_lang_Class::as_Klass(type_mirror);
duke@435:         if (!arg->is_a(k)) {
duke@435:           THROW_MSG_0(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
duke@435:         }
duke@435:       }
duke@435:       Handle arg_handle(THREAD, arg);         // Create handle for argument
duke@435:       java_args.push_oop(arg_handle); // Push handle
duke@435:     }
duke@435:   }
duke@435: 
duke@435:   assert(java_args.size_of_parameters() == method->size_of_parameters(), "just checking");
duke@435: 
duke@435:   // All oops (including receiver) is passed in as Handles. An potential oop is returned as an
duke@435:   // oop (i.e., NOT as an handle)
duke@435:   JavaValue result(rtype);
duke@435:   JavaCalls::call(&result, method, &java_args, THREAD);
duke@435: 
duke@435:   if (HAS_PENDING_EXCEPTION) {
duke@435:     // Method threw an exception; wrap it in an InvocationTargetException
duke@435:     oop target_exception = PENDING_EXCEPTION;
duke@435:     CLEAR_PENDING_EXCEPTION;
duke@435:     JavaCallArguments args(Handle(THREAD, target_exception));
coleenp@2497:     THROW_ARG_0(vmSymbols::java_lang_reflect_InvocationTargetException(),
coleenp@2497:                 vmSymbols::throwable_void_signature(),
duke@435:                 &args);
duke@435:   } else {
duke@435:     if (rtype == T_BOOLEAN || rtype == T_BYTE || rtype == T_CHAR || rtype == T_SHORT)
duke@435:       narrow((jvalue*) result.get_value_addr(), rtype, CHECK_NULL);
duke@435:     return box((jvalue*) result.get_value_addr(), rtype, CHECK_NULL);
duke@435:   }
duke@435: }
duke@435: 
duke@435: 
duke@435: void Reflection::narrow(jvalue* value, BasicType narrow_type, TRAPS) {
duke@435:   switch (narrow_type) {
duke@435:     case T_BOOLEAN:
duke@435:      value->z = (jboolean) value->i;
duke@435:      return;
duke@435:     case T_BYTE:
duke@435:      value->b = (jbyte) value->i;
duke@435:      return;
duke@435:     case T_CHAR:
duke@435:      value->c = (jchar) value->i;
duke@435:      return;
duke@435:     case T_SHORT:
duke@435:      value->s = (jshort) value->i;
duke@435:      return;
duke@435:     default:
duke@435:       break; // fail
duke@435:    }
duke@435:   THROW_MSG(vmSymbols::java_lang_IllegalArgumentException(), "argument type mismatch");
duke@435: }
duke@435: 
duke@435: 
duke@435: BasicType Reflection::basic_type_mirror_to_basic_type(oop basic_type_mirror, TRAPS) {
duke@435:   assert(java_lang_Class::is_primitive(basic_type_mirror), "just checking");
duke@435:   return java_lang_Class::primitive_type(basic_type_mirror);
duke@435: }
duke@435: 
duke@435: // This would be nicer if, say, java.lang.reflect.Method was a subclass
duke@435: // of java.lang.reflect.Constructor
duke@435: 
duke@435: oop Reflection::invoke_method(oop method_mirror, Handle receiver, objArrayHandle args, TRAPS) {
duke@435:   oop mirror             = java_lang_reflect_Method::clazz(method_mirror);
duke@435:   int slot               = java_lang_reflect_Method::slot(method_mirror);
duke@435:   bool override          = java_lang_reflect_Method::override(method_mirror) != 0;
duke@435:   objArrayHandle ptypes(THREAD, objArrayOop(java_lang_reflect_Method::parameter_types(method_mirror)));
duke@435: 
duke@435:   oop return_type_mirror = java_lang_reflect_Method::return_type(method_mirror);
duke@435:   BasicType rtype;
duke@435:   if (java_lang_Class::is_primitive(return_type_mirror)) {
duke@435:     rtype = basic_type_mirror_to_basic_type(return_type_mirror, CHECK_NULL);
duke@435:   } else {
duke@435:     rtype = T_OBJECT;
duke@435:   }
duke@435: 
coleenp@4037:   instanceKlassHandle klass(THREAD, java_lang_Class::as_Klass(mirror));
coleenp@4037:   Method* m = klass->method_with_idnum(slot);
dcubed@486:   if (m == NULL) {
duke@435:     THROW_MSG_0(vmSymbols::java_lang_InternalError(), "invoke");
duke@435:   }
dcubed@486:   methodHandle method(THREAD, m);
duke@435: 
duke@435:   return invoke(klass, method, receiver, override, ptypes, rtype, args, true, THREAD);
duke@435: }
duke@435: 
duke@435: 
duke@435: oop Reflection::invoke_constructor(oop constructor_mirror, objArrayHandle args, TRAPS) {
duke@435:   oop mirror             = java_lang_reflect_Constructor::clazz(constructor_mirror);
duke@435:   int slot               = java_lang_reflect_Constructor::slot(constructor_mirror);
duke@435:   bool override          = java_lang_reflect_Constructor::override(constructor_mirror) != 0;
duke@435:   objArrayHandle ptypes(THREAD, objArrayOop(java_lang_reflect_Constructor::parameter_types(constructor_mirror)));
duke@435: 
coleenp@4037:   instanceKlassHandle klass(THREAD, java_lang_Class::as_Klass(mirror));
coleenp@4037:   Method* m = klass->method_with_idnum(slot);
dcubed@486:   if (m == NULL) {
duke@435:     THROW_MSG_0(vmSymbols::java_lang_InternalError(), "invoke");
duke@435:   }
dcubed@486:   methodHandle method(THREAD, m);
duke@435:   assert(method->name() == vmSymbols::object_initializer_name(), "invalid constructor");
duke@435: 
duke@435:   // Make sure klass gets initialize
duke@435:   klass->initialize(CHECK_NULL);
duke@435: 
duke@435:   // Create new instance (the receiver)
duke@435:   klass->check_valid_for_instantiation(false, CHECK_NULL);
duke@435:   Handle receiver = klass->allocate_instance_handle(CHECK_NULL);
duke@435: 
duke@435:   // Ignore result from call and return receiver
duke@435:   invoke(klass, method, receiver, override, ptypes, T_VOID, args, false, CHECK_NULL);
duke@435:   return receiver();
duke@435: }